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(textInput)
	text = mw.ustring.gsub(textInput, "????????", "REDIRECT");
	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*%[%[([^%[%]|]-)|[^%[%]]-%]%]"
	)
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 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
			if fulltext then
				return targetTitle.fullText
			else
				return targetTitle.prefixedText
			end
		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(
			'could not parse redirect on page "%s"',
			fulltext and titleObj.fullText or 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, 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

人参补什么	什么原因导致脑出血	体检挂什么科	脑梗是什么病严重吗	妥了是什么意思
什么是室性早搏	西洋参有什么作用和功效	牙医需要什么学历	煸是什么意思	腹部b超挂什么科
70年产权是什么意思	生命线分叉是什么意思	尿蛋白2十吃什么药	青光眼用什么眼药水	甲状腺结节有什么症状
头晕脑胀是什么原因	什么食物蛋白质含量最高	分诊是什么意思	双开是什么意思	绿豆不能和什么一起吃

什么是色盲hcv8jop6ns4r.cn	超市理货员是做什么的hcv8jop4ns8r.cn	为什么要文化大革命hcv9jop2ns8r.cn	骨皮质是什么hcv8jop5ns8r.cn	1985是什么年hcv9jop6ns7r.cn
狐臭什么味hcv8jop7ns4r.cn	梦见抓螃蟹是什么征兆hcv9jop8ns2r.cn	雷替斯是什么药bysq.com	豆柏是什么hcv7jop9ns0r.cn	牛排用什么油煎好吃hcv9jop6ns4r.cn
芒果像什么比喻句hcv8jop0ns3r.cn	ig是什么1949doufunao.com	高山茶属于什么茶hcv8jop7ns3r.cn	火把节什么时候hcv8jop8ns0r.cn	多吃什么可以长头发hcv8jop7ns5r.cn
肚子不舒服挂什么科hcv9jop4ns0r.cn	为什么喉咙经常痛96micro.com	性腺六项是查什么的bjhyzcsm.com	头皮脂溢性皮炎用什么洗发水zhiyanzhang.com	1932年属什么hcv8jop2ns4r.cn

会声会影x8（视频编辑制作软件） V18.0.1.42 中文版

Main

Examples

LuaMain

IsRedirect

Examples

LuaIsRedirect

GetTarget

See also