پودمان:Redirect: تفاوت میان نسخه‌ها

از امامت‌پدیا، دانشنامهٔ امامت و ولایت
جز (۱ نسخه واردشده)
 
imported>Johnuniq
(restore p.getTargetFromText which is used by Module:RfD which is causing "Lua error in Module:RfD at line 87: attempt to call upvalue 'getTargetFromText' (a nil value)")
 
(۲ نسخهٔ میانی ویرایش شده توسط ۲ کاربر نشان داده نشد)
خط ۱: خط ۱:
-- قسمت‌هایی از این پودمان تغییر کرده‌است. لطفاً هنگام به‌روزرسانی دقت کنید.
-- This module provides functions for getting the target of a redirect page.
-- This module provides functions for getting the target of a redirect page.


خط ۱۷: خط ۱۶:
-- Gets the name of a page that a redirect leads to, or nil if it isn't a
-- Gets the name of a page that a redirect leads to, or nil if it isn't a
-- redirect.
-- redirect.
-- چند خط نخست از این تابع تغییر کرده‌است.
function p.getTargetFromText(text)
function p.getTargetFromText(text)
local ret
local target = string.match(
ret = string.match(
text,
text,
"^%s*#[Rr][Ee][Dd][Ii][Rr][Ee][Cc][Tt]%s*:?%s*%[%[([^%[%]]-)%]%]"
"^%s*#[Rr][Ee][Dd][Ii][Rr][Ee][Cc][Tt]%s*:?%s*%[%[([^%[%]|]-)%]%]"
)
) or string.match(
if type(ret) == "nil" then
ret = string.match(
text,
text,
"^%s*#تغییر_?مسیر%s*:?%s*%[%[([^%[%]]-)%]%]"
"^%s*#[Rr][Ee][Dd][Ii][Rr][Ee][Cc][Tt]%s*:?%s*%[%[([^%[%]|]-)|[^%[%]]-%]%]"
)
)
end
return target and mw.uri.decode(target, 'PATH')
return ret
end
end


-- Gets the target of a redirect. If the page specified is not a redirect,
-- Gets the target of a redirect. If the page specified is not a redirect,
-- returns nil.
-- returns nil.
function p.getTarget(page)
function p.getTarget(page, fulltext)
-- Get the title object. Both page names and title objects are allowed
-- Get the title object. Both page names and title objects are allowed
-- as input.
-- as input.
خط ۴۵: خط ۳۹:
else
else
error(string.format(
error(string.format(
"آرگومان بد #1 به 'getTarget'"
"bad argument #1 to 'getTarget'"
.. " (رشته، عدد، یا شیء عنوان انتظار می‌رود، %s داده شده‌است)",
.. " (string, number, or title object expected, got %s)",
type(page)
type(page)
), 2)
), 2)
end
end
if not titleObj or not titleObj.isRedirect then
if not titleObj then
return nil
return nil
end
end
local targetTitle = titleObj.redirectTarget
-- Find the target by using string matching on the page content.
if targetTitle then
local target = p.getTargetFromText(titleObj:getContent() or "")
if fulltext then
if target then
return targetTitle.fullText
local targetTitle = getTitle(target)
else
if targetTitle then
return targetTitle.prefixedText
return targetTitle.prefixedText
else
return nil
end
end
else
else
-- The page is a redirect, but matching failed. This indicates a bug in
return nil
-- the redirect matching pattern, so throw an error.
error(string.format(
'نمی‌توان تغییرمسیر را در صفحهٔ «%s» تجزیه کرد',
titleObj.prefixedText
))
end
end
end
end
خط ۷۷: خط ۶۳:
-- target page name, or the passed page name when not a redirect. The passed
-- target page name, or the passed page name when not a redirect. The passed
-- page name can be given as plain text or as a page link.
-- page name can be given as plain text or as a page link.
--  
--
-- Returns page name as plain text, or when the bracket parameter is given, as a
-- Returns page name as plain text, or when the bracket parameter is given, as a
-- page link. Returns an error message when page does not exist or the redirect
-- page link. Returns an error message when page does not exist or the redirect
-- target cannot be determined for some reason.
-- target cannot be determined for some reason.
--]]
--]]
function p.luaMain(rname, bracket)
function p.luaMain(rname, bracket, fulltext)
if type(rname) ~= "string" or not rname:find("%S") then
if type(rname) ~= "string" or not rname:find("%S") then
return nil
return nil
خط ۸۸: خط ۷۴:
bracket = bracket and "[[%s]]" or "%s"
bracket = bracket and "[[%s]]" or "%s"
rname = rname:match("%[%[(.+)%]%]") or rname
rname = rname:match("%[%[(.+)%]%]") or rname
local target = p.getTarget(rname)
local target = p.getTarget(rname, fulltext)
local ret = target or rname
local ret = target or rname
ret = getTitle(ret)
ret = getTitle(ret)
if ret then
if ret then
ret = ret.prefixedText
if fulltext then
ret = ret.fullText
else
ret = ret.prefixedText
end
return bracket:format(ret)
return bracket:format(ret)
else
else
خط ۱۰۲: خط ۹۲:
function p.main(frame)
function p.main(frame)
local args = require('Module:Arguments').getArgs(frame, {frameOnly = true})
local args = require('Module:Arguments').getArgs(frame, {frameOnly = true})
return p.luaMain(args[1], args.bracket) or ''
return p.luaMain(args[1], args.bracket, args.fulltext) or ''
end
end


-- Returns "yes" if the specified page is a redirect, and the blank string
-- Returns true if the specified page is a redirect, and false otherwise.
-- otherwise.
function p.luaIsRedirect(page)
function p.isRedirect(frame)
local titleObj = getTitle(page)
local args = require('Module:Arguments').getArgs(frame, {frameOnly = true})
local titleObj = getTitle(args[1])
if not titleObj then
if not titleObj then
return ''
return false
end
end
if titleObj.isRedirect then
if titleObj.isRedirect then
return true
else
return false
end
end
-- Provides access to the luaIsRedirect function from wikitext, returning 'yes'
-- if the specified page is a redirect, and the blank string otherwise.
function p.isRedirect(frame)
local args = require('Module:Arguments').getArgs(frame, {frameOnly = true})
if p.luaIsRedirect(args[1]) then
return 'yes'
return 'yes'
else
else

نسخهٔ کنونی تا ‏۱۰ سپتامبر ۲۰۲۱، ساعت ۱۱:۱۶

توضیحات این پودمان می‌تواند در پودمان:Redirect/توضیحات قرار گیرد.

-- This module provides functions for getting the target of a redirect page.

local p = {}

-- Gets a mw.title object, using pcall to avoid generating script errors if we
-- are over the expensive function count limit (among other possible causes).
local function getTitle(...)
	local success, titleObj = pcall(mw.title.new, ...)
	if success then
		return titleObj
	else
		return nil
	end
end

-- Gets the name of a page that a redirect leads to, or nil if it isn't a
-- redirect.
function p.getTargetFromText(text)
	local target = string.match(
		text,
		"^%s*#[Rr][Ee][Dd][Ii][Rr][Ee][Cc][Tt]%s*:?%s*%[%[([^%[%]|]-)%]%]"
	) or string.match(
		text,
		"^%s*#[Rr][Ee][Dd][Ii][Rr][Ee][Cc][Tt]%s*:?%s*%[%[([^%[%]|]-)|[^%[%]]-%]%]"
	)
	return target and mw.uri.decode(target, 'PATH')
end

-- Gets the target of a redirect. If the page specified is not a redirect,
-- returns nil.
function p.getTarget(page, fulltext)
	-- Get the title object. Both page names and title objects are allowed
	-- as input.
	local titleObj
	if type(page) == 'string' or type(page) == 'number' then
		titleObj = getTitle(page)
	elseif type(page) == 'table' and type(page.getContent) == 'function' then
		titleObj = page
	else
		error(string.format(
			"bad argument #1 to 'getTarget'"
				.. " (string, number, or title object expected, got %s)",
			type(page)
		), 2)
	end
	if not titleObj then
		return nil
	end
	local targetTitle = titleObj.redirectTarget
	if targetTitle then
		if fulltext then
			return targetTitle.fullText
		else
			return targetTitle.prefixedText
		end
	else
		return nil
	end
end

--[[
-- Given a single page name determines what page it redirects to and returns the
-- target page name, or the passed page name when not a redirect. The passed
-- page name can be given as plain text or as a page link.
--
-- Returns page name as plain text, or when the bracket parameter is given, as a
-- page link. Returns an error message when page does not exist or the redirect
-- target cannot be determined for some reason.
--]]
function p.luaMain(rname, bracket, fulltext)
	if type(rname) ~= "string" or not rname:find("%S") then
		return nil
	end
	bracket = bracket and "[[%s]]" or "%s"
	rname = rname:match("%[%[(.+)%]%]") or rname
	local target = p.getTarget(rname, fulltext)
	local ret = target or rname
	ret = getTitle(ret)
	if ret then
		if fulltext then
			ret = ret.fullText
		else
			ret = ret.prefixedText
		end
		return bracket:format(ret)
	else
		return nil
	end
end

-- Provides access to the luaMain function from wikitext.
function p.main(frame)
	local args = require('Module:Arguments').getArgs(frame, {frameOnly = true})
	return p.luaMain(args[1], args.bracket, args.fulltext) or ''
end

-- Returns true if the specified page is a redirect, and false otherwise.
function p.luaIsRedirect(page)
	local titleObj = getTitle(page)
	if not titleObj then
		return false
	end
	if titleObj.isRedirect then
		return true
	else
		return false
	end
end

-- Provides access to the luaIsRedirect function from wikitext, returning 'yes'
-- if the specified page is a redirect, and the blank string otherwise.
function p.isRedirect(frame)
	local args = require('Module:Arguments').getArgs(frame, {frameOnly = true})
	if p.luaIsRedirect(args[1]) then
		return 'yes'
	else
		return ''
	end
end

return p