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

嗓子干疼是什么原因	吃什么食物可以降低尿酸	肺气虚吃什么中成药	黑色的玫瑰花代表什么	武的部首是什么
熊是什么意思	玫瑰和月季有什么区别	阴唇肥大有什么影响	谨言是什么意思	尿频尿急吃什么药比较好
促甲状腺素高是什么意思	尿检4个加号什么意思	衣原体感染男性吃什么药	宫颈多发囊肿是什么意思	7月17日什么星座
1997年属牛是什么命	1997年的牛是什么命	香港的别称是什么	右眼皮一直跳是什么原因	宫颈炎和阴道炎有什么区别

郎才女貌是什么意思sanhestory.com	额头凉凉的是什么原因hcv9jop2ns5r.cn	海蓝之谜适合什么肤质hcv9jop6ns7r.cn	胃胀放屁多是什么原因hcv7jop6ns6r.cn	空腹喝牛奶为什么会拉肚子hcv8jop5ns5r.cn
yp是什么意思hcv9jop1ns1r.cn	伤口感染吃什么消炎药hcv7jop6ns1r.cn	红茶适合什么季节喝hcv8jop5ns6r.cn	吃维生素b有什么好处hcv7jop7ns2r.cn	总打喷嚏是什么原因hcv9jop6ns0r.cn
激素水平是什么意思hcv8jop2ns5r.cn	梦见楼塌了是什么意思hcv8jop3ns1r.cn	螃蟹不能和什么一起吃hcv8jop6ns0r.cn	气血不足吃什么食物hcv9jop4ns2r.cn	兔子可以吃什么水果hcv9jop6ns2r.cn
腾冲有什么好玩的景点hcv7jop7ns2r.cn	限购是什么意思hcv9jop1ns2r.cn	钾是什么hcv8jop1ns1r.cn	做不好的梦预示着什么hcv8jop1ns8r.cn	捋一捋是什么意思zhongyiyatai.com

旗下4成基金规模低于2亿平安大华“管发不管养”

Main

Examples

LuaMain

IsRedirect

Examples

LuaIsRedirect

GetTarget

See also