Module:Redirect: Difference between revisions

Content added Content deleted
Enwikipedia>Darklama
(rm extra space)
Enwikipedia>Darklama
(consistent parsing of passed page name, output when passed bracket, and interpretation of redirect)
Line 9: Line 9:


function p.main(frame)
function p.main(frame)
args=frame.args
local args, pargs = frame.args, (frame:getParent() or {}).args or {}
local rname, bracket = args[1] or pargs[1], args.bracket or pargs.bracket
parent=frame.getParent(frame)
if parent then pargs = parent.args else pargs={} end
if not rname or not mw.ustring.match(rname, "%S") then return "" end
local rname=args[1] or pargs[1] or ""
local bracket=args.bracket or pargs.bracket
bracket = bracket and "[[%s]]" or "%s"
rname = mw.ustring.match(rname,"%[%[(.+)%]%]") or rname
local bb = "";local be= "" -- store brackets if restoring to an output if bracket option is set
if rname then
if mw.ustring.gsub(rname,"%s","") == "" then return "" end
local rpage, err = mw.title.new(rname)
if bracket then
-- avoid expensive operation when nothing to do
local strip=mw.ustring.match(rname,"%[%[(.+)%]%]")
if not rpage then
if strip then rname=strip;bb="[[";be="]]" end
err = "File not found (mw.title.new failed)"
end
else return ""
elseif rpage.id == 0 then
err = "File not found (id=0):"
end
local rpage=mw.title.new(rname)
elseif not rpage.isRedirect then
return mw.ustring.format(bracket, rname) -- not a redirect so use passed page name (for some general-purpose template use)
local err=""
else
if rpage then -- avoid possibly expensive FileExists if we don't have anything
local redirect = mw.ustring.match( rpage:getContent() or "", "^#[Rr][Ee][Dd][Ii][Rr][Ee][Cc][Tt]%s*%[%[(.-)%]%]" )
if rpage.id ~= 0 then
-- if rpage.fileExists then
if rpage.isRedirect then
if redirect then
return mw.ustring.format(bracket, redirect)
return (bb.. tostring(mw.ustring.match(tostring(rpage.getContent(rpage)),"[Rr][Ee][Dd][Ii][Rr][Ee][Cc][Tt].-%[%[(.-)%]%]")..be) or [=[<span style="text-color:red;">[[Module:redirect]] error: failed to understand - [[]=] .. rname .. [=[]]</span]=])
end
else return rname -- not a redirect so leave the original text (for some general-purpose template use)
end
-- else err="File does not exist: "
err = "failed to understand"
-- end
end
else err="File not found (id=0):"
return '<span style="text-color:red;">[[Module:redirect]] error: ' .. err .. ' - [[' .. rname .. ']]</span>'
end
else err="File not found (mw.title.new failed)"
end
return [=[<span style="text-color:red;">[[Module:redirect]] error: ]=] .. err .. [=[ - [[]=] .. rname .. [=[]]</span>]=]
end
end