Module:Toolbar: Difference between revisions

From Zoophilia Wiki
Jump to navigationJump to search
meta>Mr. Stradivarius
(create)
 
m (13 revisions imported)
 
(12 intermediate revisions by 4 users not shown)
Line 1: Line 1:
local p = {}
-- This module implements {{toolbar}}.
local args = {}


-- Create concatenator object.
local mArguments -- Lazily initialise [[Module:Arguments]]
local Concatenator = {result = ''}
local mTableTools = require('Module:TableTools')
local yesno = require('Module:Yesno')


function Concatenator:new()
local p = {}
    local o = {}
    setmetatable(o, self)
    self.__index = self
    return o
end


function Concatenator:add(s)
function p.main(frame)
    if type(s) ~= 'string' then
mArguments = require('Module:Arguments')
        error('Attempt to concatenate non-string value', 2)
local args = mArguments.getArgs(frame)
    end
return p._main(args)
    self.result = self.result .. s
end
 
-- Get the keys of the numerical arguments that are present.
local function getArgNums()
    local nums = {}
    for k, v in pairs(args) do
        local num = tostring(k):match('^([1-9]%d*)$')
        if num then table.insert(nums, tonumber(num)) end
    end
    table.sort(nums)
    return nums
end
end


local function makeToolbarItems()
function p._main(args)
    -- Get numerical argument keys.
local toolbarItems = p.makeToolbarItems(args)
    local nums = getArgNums()
if not toolbarItems then
    -- Get the separator text.
-- Return the blank string if no arguments were specified, rather than
    local sep = (args.separator or 'pipe') .. '-separator'
-- returning empty brackets.
    sep = mw.message.new(sep):plain()
return ''
   
elseif yesno(args.span) == false then
    -- Generate the toolbar items.
return string.format(
    local ti = Concatenator:new()
'(%s)',
    for i, v in ipairs(nums) do
toolbarItems
        ti:add(args[v])
)
        if nums[i + 1] then
else
            ti:add(sep)
return string.format(
        end
'<span class="plainlinks%s"%s>(%s)</span>',
    end
type(args.class) == 'string' and ' ' .. args.class or '',
    return ti.result
type(args.style) == 'string' and string.format(' style="%s"', args.style) or '',
toolbarItems
)
end
end
end


local function makeToolbar()
function p.makeToolbarItems(args)
    local class = args.class or ''
local nums = mTableTools.numKeys(args)
    local style = (args.style and ('style="' .. args.style .. '"')) or ''
local sep = (args.separator or 'pipe') .. '-separator'
    local t = Concatenator:new()
sep = mw.message.new(sep):plain()
   
local ret = {}
    -- Generate opening span tag.
for i, v in ipairs(nums) do
    t:add('<span class="plainlinks ')
ret[#ret + 1] = mw.ustring.gsub(args[v], "%[%[::+(.-)%]%]", "[[:%1]]")
    t:add(class)
end
    t:add('" ')
if #ret > 0 then
    t:add(style)
return table.concat(ret, sep)
    t:add('>')
else
   
return nil
    -- Generate toolbar items.
end
    t:add('(')
    t:add(makeToolbarItems())
    t:add(')')
   
    -- Generate closing span tag.
    t:add('</span>')
   
    return t.result
end
end


function p.main(frame)
    -- If called via #invoke, use the args passed into the invoking template.
    -- Otherwise, for testing purposes, assume args are being passed directly in.
    local origArgs
    if frame == mw.getCurrentFrame() then
        origArgs = frame:getParent().args
    else
        origArgs = frame
    end
   
    -- Strip whitespace and remove nil values
    for k, v in pairs(origArgs) do
        v = mw.text.trim(v)
        if v ~= '' then
            args[k] = v
        end
    end
   
    return makeToolbar()
end
return p
return p

Latest revision as of 04:44, 3 September 2020

Documentation for this module may be created at Module:Toolbar/doc 

-- This module implements {{toolbar}}.

local mArguments -- Lazily initialise [[Module:Arguments]]
local mTableTools = require('Module:TableTools')
local yesno = require('Module:Yesno')

local p = {}

function p.main(frame)
	mArguments = require('Module:Arguments')
	local args = mArguments.getArgs(frame)
	return p._main(args)
end

function p._main(args)
	local toolbarItems = p.makeToolbarItems(args)
	if not toolbarItems then
		-- Return the blank string if no arguments were specified, rather than
		-- returning empty brackets.
		return ''
	elseif yesno(args.span) == false then
		return string.format(
			'(%s)',
			toolbarItems
		)
	else
		return string.format(
			'<span class="plainlinks%s"%s>(%s)</span>',
			type(args.class) == 'string' and ' ' .. args.class or '',
			type(args.style) == 'string' and string.format(' style="%s"', args.style) or '',
			toolbarItems
		)
	end
end

function p.makeToolbarItems(args)
	local nums = mTableTools.numKeys(args)
	local sep = (args.separator or 'pipe') .. '-separator'
	sep = mw.message.new(sep):plain()
	local ret = {}
	for i, v in ipairs(nums) do
		ret[#ret + 1] = mw.ustring.gsub(args[v], "%[%[::+(.-)%]%]", "[[:%1]]")
	end
	if #ret > 0 then
		return table.concat(ret, sep)
	else
		return nil
	end
end

return p
Retrieved from "https://zoophilia.wiki/index.php?title=Module:Toolbar&oldid=68645"