Module:Redirect/sandbox: Difference between revisions

Revision as of 01:47, 7 March 2017

Latest revision as of 21:25, 16 April 2023

(12 intermediate revisions by 5 users not shown)

Line 2:

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 targetTitlesuccess, titleObj = pcall(mw.title.new(target, ...)

if targetsuccess then

return truetitleObj

else

return falsenil

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)

returnlocal target = string.match(

text,

"^%s*#[Rr][Ee][Dd][Ii][Rr][Ee][Cc][Tt]%s*:?%s*%[%[([^%[%]|]-)%]%]"

Line 13 ⟶ 24:

"^%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 = mw.title.newgetTitle(page)

elseif type(page) == 'table' and type(page.getContent) == 'function' then

titleObj = page

Line 32 ⟶ 44:

), 2)

end

if not titleObj or not titleObj.isRedirect then

return nil

end

local targetTitle = titleObj.redirectTarget

if targetTitle then

-- Find the target by using string matching on the page content.

if fulltext then

local target = p.getTargetFromText(titleObj:getContent() or "")

return targetTitle.prefixedTextfullText

if target then

local targetTitle = mw.title.new(target)

if targetTitle then

return targetTitle.prefixedText

else

return niltargetTitle.prefixedText

end

else

return nil

-- The page is a redirect, but matching failed. This indicates a bug in

-- the redirect matching pattern, so throw an error.

error(string.format(

'could not parse redirect on page "%s"',

titleObj.prefixedText

))

end

end

Line 59 ⟶ 63:

-- 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._mainluaMain(rname, bracket, fulltext)

if type(rname) ~= "string" or not rname:find("%S") then

return nil

Line 70 ⟶ 74:

bracket = bracket and "[[%s]]" or "%s"

rname = rname:match("%[%[(.+)%]%]") or rname

local target = p.getTarget(rname, fulltext)

local ret = target or rname

ret = mw.title.newgetTitle(ret)

if ret then

if fulltext then

ret = ret.prefixedTextfullText

else

titleObjret = ret.prefixedText

end

return bracket:format(ret)

else

Line 84 ⟶ 92:

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._isRedirectluaIsRedirect(page)

local titleObj = mw.title.newgetTitle(page)

if not titleObj then

return false

end

ifreturn titleObj.isRedirect then

return true

else

return false

end

end

Line 110 ⟶ 114:

end

end

-- Aliases for deprecated function names; needed for backwards compatibility

p.luaMain = p._main

p.luaIsRedirect = p._isRedirect

return p