Module:Template link general: Difference between revisions

    From Nonbinary Wiki
    (New module)
     
     
    (30 intermediate revisions by 4 users not shown)
    Line 7: Line 7:
    return s ~= nil and s ~= ""
    return s ~= nil and s ~= ""
    end
    end
    local nw = mw.text.nowiki


    local function addTemplate(s)
    local function addTemplate(s)
    Line 36: Line 38:
    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
    Line 50: Line 52:
    if not _ne(textPart) then
    if not _ne(textPart) then
    if titleObj ~= nil then
    if titleObj ~= nil then
    textPart = titleObj.ns == 10 and titleObj.text or titleObj.fullText
    textPart = titleObj:inNamespace("Template") and args['1'] or titleObj.fullText
    else
    else
    -- redlink
    -- redlink
    textPart = trimTemplate(args['1'])
    textPart = args['1']
    end
    end
    end
    end
    if _ne(args.subst) then
    if _ne(args.subst) then
    -- HACK: the ns thing above is probably broken
    textPart = 'subst:' .. textPart
    textPart = 'subst:' .. textPart
    end
    end
    if _ne(args.brace) then
    if _ne(args.brace) then
    textPart = '{{' .. textPart .. '}}'
    textPart = nw('{{') .. textPart .. nw('}}')
    elseif _ne(args.braceinside) then
    elseif _ne(args.braceinside) then
    textPart = '{' .. textPart .. '}'
    textPart = nw('{') .. textPart .. nw('}')
    end
    end
    titlePart = titlePart .. '|' .. textPart
    titlePart = titlePart .. '|' .. textPart .. ']]'
    if _ne(args.braceinside) then
    if _ne(args.braceinside) then
    titlePart = '{' .. titlePart .. '}'
    titlePart = nw('{') .. titlePart .. nw('}')
    end
    end
    return titlePart
    return titlePart
    Line 75: Line 78:


    function p.main(frame)
    function p.main(frame)
    local args = getArgs(frame)
    local args = getArgs(frame, {
    trim = true,
    removeBlanks = false
    })
    return p._main(args)
    return p._main(args)
    end
    end
    Line 81: Line 87:
    function p._main(args)
    function p._main(args)
    local bold = _ne(args.bold) or _ne(args.boldlink) or _ne(args.boldname)
    local bold = _ne(args.bold) or _ne(args.boldlink) or _ne(args.boldname)
    local italic = _ne(args.italic) or _ne(italic.italics)
    local italic = _ne(args.italic) or _ne(args.italics)
    local dontBrace = _ne(args.brace) or _ne(args.braceinside)
    local dontBrace = _ne(args.brace) or _ne(args.braceinside)
    local code = _ne(args.code) or _ne(args.tt)
    local code = _ne(args.code) or _ne(args.tt)
    Line 92: Line 98:
    -- Build the arguments
    -- Build the arguments
    local textPart = ""
    local textPart = ""
    for i = 2, 11 do
    local textPartBuffer = ""
    local ii = tostring(i)
    local i = 2
    local val = args[ii]
    while args[i] do
    if not _ne(ii) then break end
    local val = args[i]
    if not _ne(args.yeswiki) then val = '<nowiki>' .. val .. '</nowiki>' end
    textPartBuffer = textPartBuffer .. '&#124;'
    if italic then val = '<span style="font-style:italic;">' .. val .. '</span>' end
    if val ~= "" then
    textPart = textPart .. '&#124;' .. val
    if _ne(args.nowiki) then
    -- Unstrip nowiki tags first because calling nw on something that already contains nowiki tags will
    -- mangle the nowiki strip marker and result in literal UNIQ...QINU showing up
    val = nw(mw.text.unstripNoWiki(val))
    end
    if italic then val = '<span style="font-style:italic;">' .. val .. '</span>' end
    textPart = textPart .. textPartBuffer .. val
    textPartBuffer = ""
    end
    i = i+1
    end
    end
    if _ne(args['12']) then textPart = textPart .. '&#124;…' end
     
    -- final wrap
    -- final wrap
    local ret = titlePart .. textPart
    local ret = titlePart .. textPart
    if not dontBrace then ret = '{{' .. ret .. '}}' end
    if not dontBrace then ret = nw('{{') .. ret .. nw('}}') end
    if _ne(args.a) then ret = '<nowiki>*</nowiki>&nbsp;' .. ret end
    if _ne(args.a) then ret = nw('*') .. '&nbsp;' .. ret end
    if _ne(args.kbd) then ret = '<kbd>' .. ret .. '</kbd>' end
    if _ne(args.kbd) then ret = '<kbd>' .. ret .. '</kbd>' end
    if code then
    if code then
    Line 113: Line 127:
    end
    end
    if _ne(args.nowrap) then ret = '<span class="nowrap">' .. ret .. '</span>' end
    if _ne(args.nowrap) then ret = '<span class="nowrap">' .. ret .. '</span>' end
    --[[ Wrap as html??
    local span = mw.html.create('span')
    span:wikitext(ret)
    --]]
    if _ne(args.debug) then ret = ret .. '\n<pre>' .. mw.text.encode(mw.dumpObject(args)) .. '</pre>' end
    return ret
    return ret
    end
    end


    return p
    return p

    Latest revision as of 11:44, 21 May 2021

    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 nw = mw.text.nowiki
    
    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:inNamespace("Template") and args['1'] or titleObj.fullText
    		else
    			-- redlink
    			textPart = args['1']
    		end
    	end
    	
    	if _ne(args.subst) then
    		-- HACK: the ns thing above is probably broken
    		textPart = 'subst:' .. textPart
    	end
    	
    	if _ne(args.brace) then
    		textPart = nw('{{') .. textPart .. nw('}}')
    	elseif _ne(args.braceinside) then
    		textPart = nw('{') .. textPart .. nw('}')
    	end
    	
    	titlePart = titlePart .. '|' .. textPart .. ']]'
    	if _ne(args.braceinside) then
    		titlePart = nw('{') .. titlePart .. nw('}')
    	end
    	return titlePart
    end
    
    function p.main(frame)
    	local args = getArgs(frame, {
    		trim = true,
    		removeBlanks = false
    	})
    	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 = ""
    	local textPartBuffer = ""
    	local i = 2
    	while args[i] do
    		local val = args[i]
    		textPartBuffer = textPartBuffer .. '&#124;'
    		if val ~= "" then
    			if _ne(args.nowiki) then
    				-- Unstrip nowiki tags first because calling nw on something that already contains nowiki tags will
    				-- mangle the nowiki strip marker and result in literal UNIQ...QINU showing up
    				val = nw(mw.text.unstripNoWiki(val))
    			end
    			if italic then val = '<span style="font-style:italic;">' .. val .. '</span>' end
    			textPart = textPart .. textPartBuffer .. val
    			textPartBuffer = ""
    		end
    		i = i+1
    	end
    
    	-- final wrap
    	local ret = titlePart .. textPart
    	if not dontBrace then ret = nw('{{') .. ret .. nw('}}') end
    	if _ne(args.a) then ret = nw('*') .. '&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')
    	span:wikitext(ret)
    	--]]
    	if _ne(args.debug) then ret = ret .. '\n<pre>' .. mw.text.encode(mw.dumpObject(args)) .. '</pre>' end
    	return ret
    end
    
    return p