Module:Template link general: Difference between revisions

    From Nonbinary Wiki
    mNo edit summary
    mNo edit summary
    Line 36: Line 36:
    local titleObj
    local titleObj
    local titlePart = '[[:'
    local titlePart = '[['
    if args['1'] then
    if args['1'] then
    -- This handles :Page and other NS
    -- This handles :Page and other NS

    Revision as of 23:07, 20 April 2020

    Documentation for this module may be created at Module:Template link general/doc

    -- This implements Template:Tlg
    local getArgs = require('Module:Arguments').getArgs
    local p = {}
    
    -- Is a string non-empty?
    local function _ne(s) 
    	return s ~= nil and s ~= ""
    end
    
    local function addTemplate(s)
    	local i, _ = s:find(':', 1, true)
    	if i == nil then
    		return 'Template:' .. s
    	end
    	local ns = s:sub(1, i - 1)
    	if ns == '' or mw.site.namespaces[ns] then
    		return s
    	else
    		return 'Template:' .. s
    	end
    end
    
    local function trimTemplate(s)
    	local needle = 'template:'
    	if s:sub(1, needle:len()):lower() == needle then
    		return s:sub(needle:len() + 1)	
    	else
    		return s
    	end
    end
    
    local function linkTitle(args)
    	if _ne(args.nolink) then
    		return args['1']
    	end
    	
    	local titleObj
    	local titlePart = '[['
    	if args['1'] then
    		-- This handles :Page and other NS
    		titleObj = mw.title.new(args['1'], 'Template')
    	else
    		titleObj = mw.title.getCurrentTitle()
    	end
    	
    	titlePart = titlePart .. (titleObj ~= nil and titleObj.fullText or
    				addTemplate(args['1']))
    	
    	local textPart = args.alttext
    	if not _ne(textPart) then
    		if titleObj ~= nil then
    			textPart = titleObj.ns == 10 and titleObj.text or titleObj.fullText
    		else
    			-- redlink
    			textPart = trimTemplate(args['1'])
    		end
    	end
    	
    	if _ne(args.subst) then
    		textPart = 'subst:' .. textPart
    	end
    	
    	if _ne(args.brace) then
    		textPart = '<nowiki>{{</nowiki>' .. textPart .. '<nowiki>}}</nowiki>'
    	elseif _ne(args.braceinside) then
    		textPart = '{' .. textPart .. '}'
    	end
    	
    	titlePart = titlePart .. '&#124;' .. textPart
    	if _ne(args.braceinside) then
    		titlePart = '<nowiki>{' .. titlePart .. '}</nowiki>'
    	end
    	return titlePart
    end
    
    function p.main(frame)
    	local args = getArgs(frame)
    	return p._main(args)
    end
    
    function p._main(args)
    	local bold = _ne(args.bold) or _ne(args.boldlink) or _ne(args.boldname)
    	local italic = _ne(args.italic) or _ne(args.italics)
    	local dontBrace = _ne(args.brace) or _ne(args.braceinside)
    	local code = _ne(args.code) or _ne(args.tt)
    	
    	-- Build the link part
    	local titlePart = linkTitle(args)
    	if bold then titlePart = "'''" .. titlePart .. "'''" end
    	if _ne(args.nowrapname) then titlePart = '<span class="nowrap">' .. titlePart .. '</span>' end
    	
    	-- Build the arguments
    	local textPart = ""
    	for i = 2, 11 do
    		local ii = tostring(i)
    		local val = args[ii]
    		if not _ne(val) then break end
    		if not _ne(args.yeswiki) then val = '<nowiki>' .. val .. '</nowiki>' end
    		if italic then val = '<span style="font-style:italic;">' .. val .. '</span>' end
    		textPart = textPart .. '&#124;' .. val
    	end
    	if _ne(args['12']) then textPart = textPart .. '&#124;…' end
    	
    	-- final wrap
    	local ret = titlePart .. textPart .. ']]'
    	if not dontBrace then ret = '<nowiki>{{</nowiki>' .. ret .. '<nowiki>}}</nowiki>' end
    	if _ne(args.a) then ret = '<nowiki>*</nowiki>&nbsp;' .. ret end
    	if _ne(args.kbd) then ret = '<kbd>' .. ret .. '</kbd>' end
    	if code then
    		ret = '<code>' .. ret .. '</code>'
    	elseif _ne(args.plaincode) then
    		ret = '<code style="border:none;background:transparent;">' .. ret .. '</code>'
    	end
    	if _ne(args.nowrap) then ret = '<span class="nowrap">' .. ret .. '</span>' end
    	
    	-- Wrap as html
    	local span = mw.html.create()
    	span:wikitext(ret)
    	return tostring(span)
    end
    
    return p