模も組ぐみ:Ilh

模かたぎ块文档[查看] [编辑] [历史] [清きよし除じょ缓存]

本ほん模も块为{{Internal link helper}}的てきLua实现。

本ほん模も块支持しじ通どおり过传入にゅうLua调用参さん数すう代替だいたい模も板ばん调用参さん数すう。

local ilh = {}
local getArgs
local yesno = require('Module:Yesno')
local lan = require('Module:Lan')
local langData = mw.loadData( 'Module:Ilh/data' )

--local frameArgs
local COMMON_TAIL='</span>'
local MODEL={
	 frame_head='<span class="ilh-all %s" data-orig-title="%s" data-lang-code="%s" data-lang-name="%s" data-foreign-title="%s">'
	,frame_tail=COMMON_TAIL
	,page_head='<span class="ilh-page">'
	,page_tail=COMMON_TAIL
	,comment_head='<span class="noprint ilh-comment">（'
	,comment_tail='）'..COMMON_TAIL
	,lang_head='<span class="ilh-lang">'
	,lang_tail=COMMON_TAIL
	,colon='<span class="ilh-colon">：</span>'
	,link_head='<span class="ilh-link">'
	,link_body='-{[[:%s:%s|<span lang="%s" dir="auto">%s</span>]]}-'
	,link_tail=COMMON_TAIL
}
local clazz_pageExist_framehead='ilh-blue'
local TRA_CAT='[[Category:有ゆう蓝链却未移うつり除じょ内部ないぶ链接助手じょしゅ模も板ばん的てき页面]]'

function ilh.main(frame)
	if not getArgs then
		getArgs = require('Module:Arguments').getArgs
	end
	local args = getArgs(frame)
	
	if langData[args['lang-code']] == nil then
		args['lang'] = mw.language.fetchLanguageName( args['lang-code'], mw.getContentLanguage():getCode() ) 	
	elseif langData[args['lang-code']]['lang-hans'] and langData[args['lang-code']]['lang-hans'] then
		args['lang'] = lan._main({['zh-hans']=langData[args['lang-code']]['lang-hans'], ['zh-hant']=langData[args['lang-code']]['lang-hant']}, frame)
	elseif langData[args['lang-code']]['lang'] == nil then
		args['lang'] = mw.language.fetchLanguageName( args['lang-code'], mw.getContentLanguage():getCode() ) 	
	else 
		args['lang'] = langData[args['lang-code']]['lang']
	end

	return ilh._ilh(args)
end

function ilh._ilh(args)
	--frameArgs = getArgs(frame, {frameOnly=true})

	local context={}
	context["isMainPage"]=ilh.isMainPage()
	context["localPage"]=args[1]
	context["foreignPage"]=args[2] or args[1] --如果{{{2}}}不ふ传入的てき话
	context["displayName"]=args["d"] or args[1]
	context["langCode"]=args["lang-code"]
	context["lang"]=args["lang"]
	context["nocat"]=yesno( args["nocat"] , false )

	context["isExist"]= (args["$exist$"] and args["$exist$"]==1) or ilh.isExist(context["localPage"])
	
	local curPage_obj=mw.title.getCurrentTitle()
	context["isNoCatWithNamespace"]=curPage_obj:inNamespaces(2,828) --User,Module
	--context["curPageNamespace"]=curPage_obj.namespace

	return (context["isMainPage"] and ilh.onlyLink(context)) or ilh.functionLink(context)
end

function ilh.onlyLink(context)
	return ( context["isExist"] and mw.ustring.format( '[[%s|%s]]', context["localPage"], context["displayName"] ) ) or context["displayName"]
end

function ilh.functionLink(context)
	context["_localPage"]=mw.ustring.gsub(context["localPage"],'"','&quot;')
	context["_foreignPage"]=mw.ustring.gsub(context["foreignPage"],'"','&quot;')
	local need_cat=
				   (not context["nocat"])
				   and
				   (not context["isNoCatWithNamespace"])
				   --[[not (
					   context["curPageNamespace"]==2 --User
					or context["curPageNamespace"]==828 --Module
				   )]]
	--mw.log(context["nocat"])
	--mw.log(context["curPageNamespace"])
	--mw.log(need_cat)

	local output_context={}
	table.insert(output_context,
					mw.ustring.format(MODEL.frame_head ,
						 (context["isExist"] and clazz_pageExist_framehead) or ''
						,context["_localPage"]
						,context["langCode"]
						,context["lang"]
						,context["_foreignPage"]
					)
				)
		table.insert(output_context,MODEL.page_head)
			table.insert(output_context,
							mw.ustring.format('[[:%s|%s]]' ,
								context["localPage"],context["displayName"]
							)
						)
		table.insert(output_context,MODEL.page_tail)
		if context["isExist"] then
			if need_cat then
				table.insert(output_context,TRA_CAT)
			end
		else
			table.insert(output_context,MODEL.comment_head)
				table.insert(output_context,MODEL.lang_head)
					table.insert(output_context,context["lang"])
				table.insert(output_context,MODEL.lang_tail)

				table.insert(output_context,MODEL.colon)

				table.insert(output_context,MODEL.link_head)
					table.insert(output_context,
									mw.ustring.format(MODEL.link_body,
										 context["langCode"]
										,(context["foreignPage"] or context["localPage"])
										,context["langCode"]
										,(context["foreignPage"] or context["localPage"])
									)
								)
				table.insert(output_context,MODEL.link_tail)
			table.insert(output_context,MODEL.comment_tail)
		end
	table.insert(output_context,MODEL.frame_tail)

	return table.concat(output_context,"")
end

--以下いか需要じゅよう更さら高だか效こう的てき实现

--确定主ぬし页
--使用しようmw信しんじ息いき获得主ぬし页名
--使用しようlanguage库获得本とくもと站默认语言げん代だい码（zh）来らい确定信しん息いき的てき对应语言，获得全ぜん主しゅ页名
---因いん为其他たzh分ぶん语言只ただ有名ゆうめい，没ぼつ有ゆう命名めいめい空そら间，可か以识别出来でき，但ただし麻あさ烦
--然しか后きさき判断はんだん当とう前ぜん页和主ぬし页是否ひ一致いっち
---计划做重定てい向こう判断はんだん，但ただし没ぼっ需要じゅよう
function ilh.isMainPage()
	local mainpage_msgobj=mw.message.new('Mainpage')
	mainpage_msgobj=mainpage_msgobj:inLanguage(mw.getContentLanguage():getCode())
	local mainPage_obj=mw.title.makeTitle(0,mainpage_msgobj:plain())
	local curpage_obj=mw.title.getCurrentTitle()
	--local curpage_redirectFrom_obj=curpage_obj.redirectTarget
	--[[if curpage_redirectFrom_obj ~=false then
		curpage_obj=curpage_redirectFrom_obj
	end]]
	return mw.title.equals(mainPage_obj,curpage_obj) --and curpage_obj.namespace==4
end

--确定页面存在そんざい
---exists是ぜ高だか开销方法ほうほう，需要じゅよう更さら高だか效こう的てき实现
--带保护的包装ほうそう方法ほうほう
--由よし于exists和わ解析かいせき器き函数かんすうifexist都と是ぜ高だか开销方法ほうほう
--而ifexist达到限げん制せい时默认返回かい结果为false的てき操作そうさ
--而exists会かい直接ちょくせつ抛ほう出で错误而中断ちゅうだん执行
--所以ゆえん将しょう相しょう应调用よう包つつみ裹，压制exists的てき抛ほう错，按照ifexist的てき理念りねん，返かえし回かいfalse
--正常せいじょう情じょう况下则一切いっさい正常せいじょう
function ilh.isExist(pageName)
	local execStatus,result=pcall(ilh._isExist,pageName)
	
	if execStatus then
		return result
	else
		return false
	end
end
--真ま实方法ほう
function ilh._isExist(pageName)
	local localPage_obj=mw.title.makeTitle(0,pageName)
	return localPage_obj.exists
end
--end

return ilh