Modul:Redirect: Perbedaan revisi
Loncat ke navigasi
Loncat ke pencarian
Mediawiki>Jackmcbarn (handle percent-encoding like MediaWiki does, from sandbox) |
k (1 revisi diimpor) |
||
(1 revisi antara oleh pengguna yang sama tidak ditampilkan) | |||
Baris 1: | Baris 1: | ||
-- This module provides functions for getting the target of a redirect page. | -- This module provides functions for getting the target of a redirect page. | ||
Baris 17: | Baris 19: | ||
-- redirect. | -- redirect. | ||
function p.getTargetFromText(text) | function p.getTargetFromText(text) | ||
return 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*%[%[([^%[%]|]-)%]%]" | ||
Baris 23: | Baris 25: | ||
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( | |||
text, | |||
"^%s*#[Aa][Ll][Ii][Hh]%s*:?%s*%[%[([^%[%]|]-)%]%]" | |||
) | ) | ||
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) | ||
-- 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. | ||
Baris 53: | Baris 57: | ||
local targetTitle = getTitle(target) | local targetTitle = getTitle(target) | ||
if targetTitle then | if targetTitle then | ||
return targetTitle.prefixedText | |||
else | else | ||
return nil | return nil | ||
Baris 65: | Baris 65: | ||
-- the redirect matching pattern, so throw an error. | -- the redirect matching pattern, so throw an error. | ||
error(string.format( | error(string.format( | ||
' | 'tidak bisa mengurai pengalihan pada halaman "%s"', | ||
titleObj.prefixedText | |||
)) | )) | ||
end | end | ||
Baris 80: | Baris 80: | ||
-- target cannot be determined for some reason. | -- target cannot be determined for some reason. | ||
--]] | --]] | ||
function p.luaMain(rname, bracket | function p.luaMain(rname, bracket) | ||
if type(rname) ~= "string" or not rname:find("%S") then | if type(rname) ~= "string" or not rname:find("%S") then | ||
return nil | return nil | ||
Baris 86: | Baris 86: | ||
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) | ||
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 | |||
return bracket:format(ret) | return bracket:format(ret) | ||
else | else | ||
Baris 103: | Baris 99: | ||
-- Provides access to the luaMain function from wikitext. | -- Provides access to the luaMain function from wikitext. | ||
function p.main(frame) | function p.main(frame) | ||
local args = require(' | local args = require('Modul:Arguments').getArgs(frame, {frameOnly = true}) | ||
return p.luaMain(args[1], args.bracket | return p.luaMain(args[1], args.bracket) or '' | ||
end | end | ||
Baris 123: | Baris 119: | ||
-- if the specified page is a redirect, and the blank string otherwise. | -- if the specified page is a redirect, and the blank string otherwise. | ||
function p.isRedirect(frame) | function p.isRedirect(frame) | ||
local args = require(' | local args = require('Modul:Arguments').getArgs(frame, {frameOnly = true}) | ||
if p.luaIsRedirect(args[1]) then | if p.luaIsRedirect(args[1]) then | ||
return ' | return 'ya' | ||
else | else | ||
return '' | return '' |
Revisi terkini pada 29 Juli 2021 22.01
Dokumentasi untuk modul ini dapat dibuat di Modul:Redirect/doc
-- 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) return 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*%[%[([^%[%]|]-)|[^%[%]]-%]%]" ) or string.match( text, "^%s*#[Aa][Ll][Ii][Hh]%s*:?%s*%[%[([^%[%]|]-)%]%]" ) end -- Gets the target of a redirect. If the page specified is not a redirect, -- returns nil. function p.getTarget(page) -- 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 or not titleObj.isRedirect then return nil end -- Find the target by using string matching on the page content. local target = p.getTargetFromText(titleObj:getContent() or "") if target then local targetTitle = getTitle(target) if targetTitle then return targetTitle.prefixedText else return nil end else -- The page is a redirect, but matching failed. This indicates a bug in -- the redirect matching pattern, so throw an error. error(string.format( 'tidak bisa mengurai pengalihan pada halaman "%s"', titleObj.prefixedText )) 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) 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) local ret = target or rname ret = getTitle(ret) if ret then ret = ret.prefixedText return bracket:format(ret) else return nil end end -- Provides access to the luaMain function from wikitext. function p.main(frame) local args = require('Modul:Arguments').getArgs(frame, {frameOnly = true}) return p.luaMain(args[1], args.bracket) 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('Modul:Arguments').getArgs(frame, {frameOnly = true}) if p.luaIsRedirect(args[1]) then return 'ya' else return '' end end return p