Difference between revisions of "Module:Infobox/sandbox"

From blackwiki
Jump to navigation Jump to search
test>Mr. Stradivarius
(add odd and even header styles)
Line 26: Line 26:
 
     return ret
 
     return ret
 
end
 
end
 
+
 
local function getArgNums(prefix)
 
local function getArgNums(prefix)
 
     -- Returns a table containing the numbers of the arguments that exist
 
     -- Returns a table containing the numbers of the arguments that exist
Line 39: Line 39:
 
     return nums
 
     return nums
 
end
 
end
 
+
 
local function addRow(rowArgs)
 
local function addRow(rowArgs)
 
     -- Adds a row to the infobox, with either a header cell
 
     -- Adds a row to the infobox, with either a header cell
Line 50: Line 50:
 
                     .addClass(rowArgs.class)
 
                     .addClass(rowArgs.class)
 
                     .css('text-align', 'center')
 
                     .css('text-align', 'center')
                     .cssText(rowArgs.headerstyle)
+
                     .cssText(args.headerstyle)
 
                     .wikitext(rowArgs.header)
 
                     .wikitext(rowArgs.header)
 
     elseif rowArgs.data then
 
     elseif rowArgs.data then
Line 64: Line 64:
 
                     .done()
 
                     .done()
 
         end
 
         end
       
+
 
         local dataCell = row.tag('td')
 
         local dataCell = row.tag('td')
 
         if not rowArgs.label then  
 
         if not rowArgs.label then  
Line 78: Line 78:
 
     end
 
     end
 
end
 
end
 
+
 
local function renderTitle()
 
local function renderTitle()
 
     if not args.title then return end
 
     if not args.title then return end
 
+
 
     root
 
     root
 
         .tag('caption')
 
         .tag('caption')
Line 88: Line 88:
 
             .wikitext(args.title)
 
             .wikitext(args.title)
 
end
 
end
 
+
 
local function renderAboveRow()
 
local function renderAboveRow()
 
     if not args.above then return end
 
     if not args.above then return end
   
+
 
     root
 
     root
 
         .tag('tr')
 
         .tag('tr')
Line 103: Line 103:
 
                 .wikitext(args.above)
 
                 .wikitext(args.above)
 
end
 
end
 
+
 
local function renderBelowRow()
 
local function renderBelowRow()
 
     if not args.below then return end
 
     if not args.below then return end
   
+
 
     root
 
     root
 
         .tag('tr')
 
         .tag('tr')
Line 117: Line 117:
 
                 .wikitext(args.below)
 
                 .wikitext(args.below)
 
end
 
end
 
+
 
local function renderSubheaders()
 
local function renderSubheaders()
 
     if args.subheader then
 
     if args.subheader then
Line 135: Line 135:
 
     end
 
     end
 
end
 
end
 
+
 
local function renderImages()
 
local function renderImages()
 
     if args.image then
 
     if args.image then
Line 163: Line 163:
 
     end
 
     end
 
end
 
end
 
+
 
local function renderRows()
 
local function renderRows()
 
     -- Gets the union of the header and data argument numbers,
 
     -- Gets the union of the header and data argument numbers,
 
     -- and renders them all in order using addRow.
 
     -- and renders them all in order using addRow.
     local headernums = getArgNums('header')
+
     local rownums = union(getArgNums('header'), getArgNums('data'))
    local datanums = getArgNums('data')
 
    local rownums = union(headernums, datanums)
 
    local oddheaders = {} -- Find whether headers are odd or even.
 
    for i, v in ipairs(headernums) do
 
        if i % 2 == 1 then
 
            oddheaders[v] = true
 
        elseif i % 2 == 0 then
 
            oddheaders[v] = false
 
        end
 
    end
 
 
     table.sort(rownums)
 
     table.sort(rownums)
 
     for k, num in ipairs(rownums) do
 
     for k, num in ipairs(rownums) do
        local headerstyle
 
        local rowheaderstyle = args['headerstyle' .. tostring(num)]
 
        if rowheaderstyle then
 
            headerstyle = rowheaderstyle
 
        elseif oddheaders[num] and args.oddheaderstyle then
 
            headerstyle = args.oddheaderstyle
 
        elseif oddheaders[num] == false and args.evenheaderstyle then
 
            headerstyle = args.evenheaderstyle
 
        else
 
            headerstyle = args.headerstyle
 
        end
 
           
 
 
         addRow({
 
         addRow({
 
             header = args['header' .. tostring(num)],
 
             header = args['header' .. tostring(num)],
            headerstyle = headerstyle,
 
 
             label = args['label' .. tostring(num)],
 
             label = args['label' .. tostring(num)],
 
             data = args['data' .. tostring(num)],
 
             data = args['data' .. tostring(num)],
Line 203: Line 180:
 
     end
 
     end
 
end
 
end
 
+
 
local function renderNavBar()
 
local function renderNavBar()
 
     if not args.name then return end
 
     if not args.name then return end
   
+
 
     root
 
     root
 
         .tag('tr')
 
         .tag('tr')
Line 217: Line 194:
 
                 }))
 
                 }))
 
end
 
end
 
+
 
local function renderItalicTitle()
 
local function renderItalicTitle()
 
     local italicTitle = args['italic title'] and mw.ustring.lower(args['italic title'])
 
     local italicTitle = args['italic title'] and mw.ustring.lower(args['italic title'])
Line 224: Line 201:
 
     end
 
     end
 
end
 
end
 
+
 
local function renderTrackingCategories()
 
local function renderTrackingCategories()
 
     if args.decat ~= 'yes' then
 
     if args.decat ~= 'yes' then
Line 235: Line 212:
 
     end
 
     end
 
end
 
end
 
+
 
local function _infobox()
 
local function _infobox()
 
     -- Specify the overall layout of the infobox, with special settings
 
     -- Specify the overall layout of the infobox, with special settings
Line 241: Line 218:
 
     if args.child ~= 'yes' then
 
     if args.child ~= 'yes' then
 
         root = HtmlBuilder.create('table')
 
         root = HtmlBuilder.create('table')
       
+
 
         root
 
         root
 
             .addClass('infobox')
 
             .addClass('infobox')
Line 247: Line 224:
 
             .attr('cellspacing', 3)
 
             .attr('cellspacing', 3)
 
             .css('border-spacing', '3px')
 
             .css('border-spacing', '3px')
           
+
 
             if args.subbox == 'yes' then
 
             if args.subbox == 'yes' then
 
                 root
 
                 root
Line 265: Line 242:
 
         root
 
         root
 
             .cssText(args.bodystyle)
 
             .cssText(args.bodystyle)
   
+
 
         renderTitle()
 
         renderTitle()
 
         renderAboveRow()
 
         renderAboveRow()
 
     else
 
     else
 
         root = HtmlBuilder.create()
 
         root = HtmlBuilder.create()
       
+
 
         root
 
         root
 
             .wikitext(args.title)
 
             .wikitext(args.title)
 
     end
 
     end
 
+
 
     renderSubheaders()
 
     renderSubheaders()
 
     renderImages()  
 
     renderImages()  
Line 282: Line 259:
 
     renderItalicTitle()
 
     renderItalicTitle()
 
     renderTrackingCategories()
 
     renderTrackingCategories()
   
+
 
     return tostring(root)
 
     return tostring(root)
 
end
 
end
 
+
 
local function preprocessSingleArg(argName)
 
local function preprocessSingleArg(argName)
 
     -- If the argument exists and isn't blank, add it to the argument table.
 
     -- If the argument exists and isn't blank, add it to the argument table.
Line 293: Line 270:
 
     end
 
     end
 
end
 
end
 
+
 
local function preprocessArgs(prefixTable, step)
 
local function preprocessArgs(prefixTable, step)
 
     -- Assign the parameters with the given prefixes to the args table, in order, in batches
 
     -- Assign the parameters with the given prefixes to the args table, in order, in batches
Line 307: Line 284:
 
         error("Invalid step value detected", 2)
 
         error("Invalid step value detected", 2)
 
     end
 
     end
   
+
 
     -- Get arguments without a number suffix, and check for bad input.
 
     -- Get arguments without a number suffix, and check for bad input.
 
     for i,v in ipairs(prefixTable) do
 
     for i,v in ipairs(prefixTable) do
Line 324: Line 301:
 
         end
 
         end
 
     end
 
     end
 
+
 
     -- Get arguments with number suffixes.
 
     -- Get arguments with number suffixes.
 
     local a = 1 -- Counter variable.
 
     local a = 1 -- Counter variable.
Line 360: Line 337:
 
         origArgs = frame
 
         origArgs = frame
 
     end
 
     end
   
+
 
     -- Parse the data parameters in the same order that the old {{infobox}} did, so that
 
     -- Parse the data parameters in the same order that the old {{infobox}} did, so that
 
     -- references etc. will display in the expected places. Parameters that depend on
 
     -- references etc. will display in the expected places. Parameters that depend on
Line 387: Line 364:
 
     preprocessSingleArg('imageclass')
 
     preprocessSingleArg('imageclass')
 
     preprocessArgs({
 
     preprocessArgs({
         {prefix = 'header', depend = {'headerstyle'}},
+
         {prefix = 'header'},
 
         {prefix = 'data', depend = {'label', 'rowclass'}},
 
         {prefix = 'data', depend = {'label', 'rowclass'}},
 
         {prefix = 'class'}
 
         {prefix = 'class'}
 
     }, 50)
 
     }, 50)
 
     preprocessSingleArg('headerstyle')
 
     preprocessSingleArg('headerstyle')
    preprocessSingleArg('oddheaderstyle')
 
    preprocessSingleArg('evenheaderstyle')
 
 
     preprocessSingleArg('labelstyle')
 
     preprocessSingleArg('labelstyle')
 
     preprocessSingleArg('datastyle')
 
     preprocessSingleArg('datastyle')

Revision as of 11:10, 29 July 2013

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

--
-- This module implements {{Infobox}}
--
 
local p = {}
 
local HtmlBuilder = require('Module:HtmlBuilder')
 
local args = {}
local origArgs
local root
 
function union(t1, t2)
    -- Returns the union of the values of two tables, as a sequence.
    local vals = {}
    for k, v in pairs(t1) do
        vals[v] = true
    end
    for k, v in pairs(t2) do
        vals[v] = true
    end
    local ret = {}
    for k, v in pairs(vals) do
        table.insert(ret, k)
    end
    return ret
end
 
local function getArgNums(prefix)
    -- Returns a table containing the numbers of the arguments that exist
    -- for the specified prefix. For example, if the prefix was 'data', and
    -- 'data1', 'data2', and 'data5' exist, it would return {1, 2, 5}.
    local nums = {}
    for k, v in pairs(args) do
        local num = tostring(k):match('^' .. prefix .. '([1-9]%d*)$')
        if num then table.insert(nums, tonumber(num)) end
    end
    table.sort(nums)
    return nums
end
 
local function addRow(rowArgs)
    -- Adds a row to the infobox, with either a header cell
    -- or a label/data cell combination.
    if rowArgs.header then
        root
            .tag('tr')
                .tag('th')
                    .attr('colspan', 2)
                    .addClass(rowArgs.class)
                    .css('text-align', 'center')
                    .cssText(args.headerstyle)
                    .wikitext(rowArgs.header)
    elseif rowArgs.data then
        local row = root.tag('tr')
        row.addClass(rowArgs.rowclass)
        if rowArgs.label then
            row
                .tag('th')
                    .attr('scope', 'row')
                    .css('text-align', 'left')
                    .cssText(args.labelstyle)
                    .wikitext(rowArgs.label)
                    .done()
        end
 
        local dataCell = row.tag('td')
        if not rowArgs.label then 
            dataCell
                .attr('colspan', 2)
                .css('text-align', 'center') 
        end
        dataCell
            .addClass(rowArgs.class)
            .cssText(rowArgs.datastyle)
            .newline()
            .wikitext(rowArgs.data)
    end
end
 
local function renderTitle()
    if not args.title then return end
 
    root
        .tag('caption')
            .addClass(args.titleclass)
            .cssText(args.titlestyle)
            .wikitext(args.title)
end
 
local function renderAboveRow()
    if not args.above then return end
 
    root
        .tag('tr')
            .tag('th')
                .attr('colspan', 2)
                .addClass(args.aboveclass)
                .css('text-align', 'center')
                .css('font-size', '125%')
                .css('font-weight', 'bold')
                .cssText(args.abovestyle)
                .wikitext(args.above)
end
 
local function renderBelowRow()
    if not args.below then return end
 
    root
        .tag('tr')
            .tag('td')
                .attr('colspan', '2')
                .addClass(args.belowclass)
                .css('text-align', 'center')
                .cssText(args.belowstyle)
                .newline()
                .wikitext(args.below)
end
 
local function renderSubheaders()
    if args.subheader then
        args.subheader1 = args.subheader
    end
    if args.subheaderrowclass then
        args.subheaderrowclass1 = args.subheaderrowclass
    end
    local subheadernums = getArgNums('subheader')
    for k, num in ipairs(subheadernums) do
        addRow({
            data = args['subheader' .. tostring(num)],
            datastyle = args.subheaderstyle or args['subheaderstyle' .. tostring(num)],
            class = args.subheaderclass,
            rowclass = args['subheaderrowclass' .. tostring(num)]
        })
    end
end
 
local function renderImages()
    if args.image then
        args.image1 = args.image
    end
    if args.caption then
        args.caption1 = args.caption
    end
    local imagenums = getArgNums('image')
    for k, num in ipairs(imagenums) do
        local caption = args['caption' .. tostring(num)]
        local data = HtmlBuilder.create().wikitext(args['image' .. tostring(num)])
        if caption then
            data
                .tag('br', {selfClosing = true})
                    .done()
                .tag('div')
                    .cssText(args.captionstyle)
                    .wikitext(caption)
        end
        addRow({
            data = tostring(data),
            datastyle = args.imagestyle,
            class = args.imageclass,
            rowclass = args['imagerowclass' .. tostring(num)]
        })
    end
end
 
local function renderRows()
    -- Gets the union of the header and data argument numbers,
    -- and renders them all in order using addRow.
    local rownums = union(getArgNums('header'), getArgNums('data'))
    table.sort(rownums)
    for k, num in ipairs(rownums) do
        addRow({
            header = args['header' .. tostring(num)],
            label = args['label' .. tostring(num)],
            data = args['data' .. tostring(num)],
            datastyle = args.datastyle,
            class = args['class' .. tostring(num)],
            rowclass = args['rowclass' .. tostring(num)]
        })
    end
end
 
local function renderNavBar()
    if not args.name then return end
 
    root
        .tag('tr')
            .tag('td')
                .attr('colspan', '2')
                .css('text-align', 'right')
                .wikitext(mw.getCurrentFrame():expandTemplate({ 
                    title = 'navbar', 
                    args = { args.name, mini = 1 }
                }))
end
 
local function renderItalicTitle()
    local italicTitle = args['italic title'] and mw.ustring.lower(args['italic title'])
    if italicTitle == '' or italicTitle == 'force' or italicTitle == 'yes' then
        root.wikitext(mw.getCurrentFrame():expandTemplate({title = 'italic title'}))
    end
end
 
local function renderTrackingCategories()
    if args.decat ~= 'yes' then
        if #(getArgNums('data')) == 0 and mw.title.getCurrentTitle().namespace == 0 then
            root.wikitext('[[Category:Articles which use infobox templates with no data rows]]')
        end
        if args.child == 'yes' and args.title then
            root.wikitext('[[Category:Articles which use embedded infobox templates with the title parameter]]')
        end
    end
end
 
local function _infobox()
    -- Specify the overall layout of the infobox, with special settings
    -- if the infobox is used as a 'child' inside another infobox.
    if args.child ~= 'yes' then
        root = HtmlBuilder.create('table')
 
        root
            .addClass('infobox')
            .addClass(args.bodyclass)
            .attr('cellspacing', 3)
            .css('border-spacing', '3px')
 
            if args.subbox == 'yes' then
                root
                    .css('padding', '0')
                    .css('border', 'none')
                    .css('margin', '-3px')
                    .css('width', 'auto')
                    .css('min-width', '100%')
                    .css('font-size', '100%')
                    .css('clear', 'none')
                    .css('float', 'none')
                    .css('background-color', 'transparent')
            else
                root
                    .css('width', '22em')
            end
        root
            .cssText(args.bodystyle)
 
        renderTitle()
        renderAboveRow()
    else
        root = HtmlBuilder.create()
 
        root
            .wikitext(args.title)
    end
 
    renderSubheaders()
    renderImages() 
    renderRows() 
    renderBelowRow()  
    renderNavBar()
    renderItalicTitle()
    renderTrackingCategories()
 
    return tostring(root)
end
 
local function preprocessSingleArg(argName)
    -- If the argument exists and isn't blank, add it to the argument table.
    -- Blank arguments are treated as nil to match the behaviour of ParserFunctions.
    if origArgs[argName] and origArgs[argName] ~= '' then
        args[argName] = origArgs[argName]
    end
end
 
local function preprocessArgs(prefixTable, step)
    -- Assign the parameters with the given prefixes to the args table, in order, in batches
    -- of the step size specified. This is to prevent references etc. from appearing in the
    -- wrong order. The prefixTable should be an array containing tables, each of which has
    -- two possible fields, a "prefix" string and a "depend" table. The function always parses
    -- parameters containing the "prefix" string, but only parses parameters in the "depend"
    -- table if the prefix parameter is present and non-blank.
    if type(prefixTable) ~= 'table' then
        error("Non-table value detected for the prefix table", 2)
    end
    if type(step) ~= 'number' then
        error("Invalid step value detected", 2)
    end
 
    -- Get arguments without a number suffix, and check for bad input.
    for i,v in ipairs(prefixTable) do
        if type(v) ~= 'table' or type(v.prefix) ~= "string" or (v.depend and type(v.depend) ~= 'table') then
            error('Invalid input detected to preprocessArgs prefix table', 2)
        end
        preprocessSingleArg(v.prefix)
        -- Only parse the depend parameter if the prefix parameter is present and not blank.
        if args[v.prefix] and v.depend then
            for j, dependValue in ipairs(v.depend) do
                if type(dependValue) ~= 'string' then
                    error('Invalid "depend" parameter value detected in preprocessArgs')
                end
                preprocessSingleArg(dependValue)
            end
        end
    end
 
    -- Get arguments with number suffixes.
    local a = 1 -- Counter variable.
    local moreArgumentsExist = true
    while moreArgumentsExist == true do
        moreArgumentsExist = false
        for i = a, a + step - 1 do
            for j,v in ipairs(prefixTable) do
                local prefixArgName = v.prefix .. tostring(i)
                if origArgs[prefixArgName] then
                    moreArgumentsExist = true -- Do another loop if any arguments are found, even blank ones.
                    preprocessSingleArg(prefixArgName)
                end
                -- Process the depend table if the prefix argument is present and not blank, or
                -- we are processing "prefix1" and "prefix" is present and not blank, and
                -- if the depend table is present.
                if v.depend and (args[prefixArgName] or (i == 1 and args[v.prefix])) then
                    for j,dependValue in ipairs(v.depend) do
                        local dependArgName = dependValue .. tostring(i)
                        preprocessSingleArg(dependArgName)
                    end
                end
            end
        end
        a = a + step
    end
end
 
function p.infobox(frame)
    -- If called via #invoke, use the args passed into the invoking template.
    -- Otherwise, for testing purposes, assume args are being passed directly in.
    if frame == mw.getCurrentFrame() then
        origArgs = frame:getParent().args
    else
        origArgs = frame
    end
 
    -- Parse the data parameters in the same order that the old {{infobox}} did, so that
    -- references etc. will display in the expected places. Parameters that depend on
    -- another parameter are only processed if that parameter is present, to avoid
    -- phantom references appearing in article reference lists.
    preprocessSingleArg('child')
    preprocessSingleArg('bodyclass')
    preprocessSingleArg('subbox')
    preprocessSingleArg('bodystyle')
    preprocessSingleArg('title')
    preprocessSingleArg('titleclass')
    preprocessSingleArg('titlestyle')
    preprocessSingleArg('above')
    preprocessSingleArg('aboveclass')
    preprocessSingleArg('abovestyle')
    preprocessArgs({
        {prefix = 'subheader', depend = {'subheaderstyle', 'subheaderrowclass'}}
    }, 10)
    preprocessSingleArg('subheaderstyle')
    preprocessSingleArg('subheaderclass')
    preprocessArgs({
        {prefix = 'image', depend = {'caption', 'imagerowclass'}}
    }, 10)
    preprocessSingleArg('captionstyle')
    preprocessSingleArg('imagestyle')
    preprocessSingleArg('imageclass')
    preprocessArgs({
        {prefix = 'header'},
        {prefix = 'data', depend = {'label', 'rowclass'}},
        {prefix = 'class'}
    }, 50)
    preprocessSingleArg('headerstyle')
    preprocessSingleArg('labelstyle')
    preprocessSingleArg('datastyle')
    preprocessSingleArg('below')
    preprocessSingleArg('belowclass')
    preprocessSingleArg('belowstyle')
    preprocessSingleArg('name')
    args['italic title'] = origArgs['italic title'] -- different behaviour if blank or absent
    preprocessSingleArg('decat')
 
    return _infobox()
end
 
return p