Modiwl:Infobox: Gwahaniaeth rhwng fersiynau
Appearance
Cynnwys wedi'i ddileu Cynnwys wedi'i ychwanegu
PK2 (sgwrs | cyfraniadau) BDim crynodeb golygu |
Dafyddt (sgwrs | cyfraniadau) diweddaru o en Tagiau: Gwrthdröwyd |
||
Llinell 1: | Llinell 1: | ||
-- |
|||
-- This module implements {{Infobox}} |
|||
-- |
|||
local p = {} |
local p = {} |
||
local navbar = require('Module:Navbar')._navbar |
|||
local args = {} |
local args = {} |
||
local origArgs = {} |
local origArgs = {} |
||
local root |
local root |
||
local empty_row_categories = {} |
|||
local category_in_empty_row_pattern = '%[%[%s*[Cc][Aa][Tt][Ee][Gg][Oo][Rr][Yy]%s*:[^]]*]]' |
|||
local has_rows = false |
|||
local lists = { |
|||
plainlist_t = { |
|||
patterns = { |
|||
'^plainlist$', |
|||
'%splainlist$', |
|||
'^plainlist%s', |
|||
'%splainlist%s' |
|||
}, |
|||
found = false, |
|||
styles = 'Plainlist/styles.css' |
|||
}, |
|||
hlist_t = { |
|||
patterns = { |
|||
'^hlist$', |
|||
'%shlist$', |
|||
'^hlist%s', |
|||
'%shlist%s' |
|||
}, |
|||
found = false, |
|||
styles = 'Hlist/styles.css' |
|||
} |
|||
} |
|||
local function |
local function has_list_class(args_to_check) |
||
for _, list in pairs(lists) do |
|||
if not list.found then |
|||
for _, arg in pairs(args_to_check) do |
|||
for _, pattern in ipairs(list.patterns) do |
|||
if mw.ustring.find(arg or '', pattern) then |
|||
list.found = true |
|||
break |
|||
end |
|||
end |
|||
if list.found then break end |
|||
end |
|||
end |
|||
end |
|||
end |
|||
local function fixChildBoxes(sval, tt) |
local function fixChildBoxes(sval, tt) |
||
local function notempty( s ) return s and s:match( '%S' ) end |
|||
if notempty(sval) then |
if notempty(sval) then |
||
local marker = '<span class=special_infobox_marker>' |
local marker = '<span class=special_infobox_marker>' |
||
local s = sval |
local s = sval |
||
-- start moving templatestyles and categories inside of table rows |
|||
local slast = '' |
|||
while slast ~= s do |
|||
slast = s |
|||
s = mw.ustring.gsub(s, '(</[Tt][Rr]%s*>%s*)(%[%[%s*[Cc][Aa][Tt][Ee][Gg][Oo][Rr][Yy]%s*:[^]]*%]%])', '%2%1') |
|||
s = mw.ustring.gsub(s, '(</[Tt][Rr]%s*>%s*)(\127[^\127]*UNIQ%-%-templatestyles%-%x+%-QINU[^\127]*\127)', '%2%1') |
|||
end |
|||
-- end moving templatestyles and categories inside of table rows |
|||
s = mw.ustring.gsub(s, '(<%s*[Tt][Rr])', marker .. '%1') |
s = mw.ustring.gsub(s, '(<%s*[Tt][Rr])', marker .. '%1') |
||
s = mw.ustring.gsub(s, '(</[Tt][Rr]%s*>)', '%1' .. marker) |
s = mw.ustring.gsub(s, '(</[Tt][Rr]%s*>)', '%1' .. marker) |
||
Llinell 39: | Llinell 81: | ||
local rowstyle = ' style="display:none"' |
local rowstyle = ' style="display:none"' |
||
if notempty(subcells[k]) then rowstyle = '' end |
if notempty(subcells[k]) then rowstyle = '' end |
||
s = s .. '<tr' .. rowstyle ..'><' .. tt .. ' colspan=2>\n' .. |
s = s .. '<tr' .. rowstyle ..'><' .. tt .. ' colspan=2>\n' .. |
||
subcells[k] |
|||
elseif notempty(subcells[k]) then |
elseif notempty(subcells[k]) then |
||
if (k % 2) == 0 then |
if (k % 2) == 0 then |
||
s = s .. subcells[k] |
s = s .. subcells[k] |
||
else |
else |
||
s = s .. '<tr><' .. tt .. ' colspan=2>\n' .. |
s = s .. '<tr><' .. tt .. ' colspan=2>\n' .. |
||
subcells[k] .. '</' .. tt .. '></tr>' |
|||
end |
end |
||
end |
end |
||
Llinell 50: | Llinell 94: | ||
end |
end |
||
-- the next two lines add a newline at the end of lists for the PHP parser |
-- the next two lines add a newline at the end of lists for the PHP parser |
||
-- [[Special:Diff/849054481]] |
|||
-- https://en.wikipedia.org/w/index.php?title=Template_talk:Infobox_musical_artist&oldid=849054481 |
|||
-- remove when [[:phab:T191516]] is fixed or OBE |
-- remove when [[:phab:T191516]] is fixed or OBE |
||
s = mw.ustring.gsub(s, '([\r\n][%*#;:][^\r\n]*)$', '%1\n') |
s = mw.ustring.gsub(s, '([\r\n][%*#;:][^\r\n]*)$', '%1\n') |
||
Llinell 62: | Llinell 106: | ||
end |
end |
||
-- Cleans empty tables |
|||
local function cleanInfobox() |
|||
root = tostring(root) |
|||
if has_rows == false then |
|||
root = mw.ustring.gsub(root, '<table[^<>]*>%s*</table>', '') |
|||
end |
|||
end |
|||
-- Returns the union of the values of two tables, as a sequence. |
|||
local function union(t1, t2) |
local function union(t1, t2) |
||
-- Returns the union of the values of two tables, as a sequence. |
|||
local vals = {} |
local vals = {} |
||
for k, v in pairs(t1) do |
for k, v in pairs(t1) do |
||
Llinell 78: | Llinell 131: | ||
end |
end |
||
-- 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 function getArgNums(prefix) |
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 = {} |
local nums = {} |
||
for k, v in pairs(args) do |
for k, v in pairs(args) do |
||
Llinell 91: | Llinell 144: | ||
end |
end |
||
-- Adds a row to the infobox, with either a header cell |
|||
-- or a label/data cell combination. |
|||
local function addRow(rowArgs) |
local function addRow(rowArgs) |
||
-- Adds a row to the infobox, with either a header cell |
|||
-- or a label/data cell combination. |
|||
if rowArgs.header and rowArgs.header ~= '_BLANK_' then |
if rowArgs.header and rowArgs.header ~= '_BLANK_' then |
||
has_rows = true |
|||
has_list_class({ rowArgs.rowclass, rowArgs.class, args.headerclass }) |
|||
root |
root |
||
:tag('tr') |
:tag('tr') |
||
:addClass(rowArgs.rowclass) |
:addClass(rowArgs.rowclass) |
||
:cssText(rowArgs.rowstyle) |
:cssText(rowArgs.rowstyle) |
||
:attr('id', rowArgs.rowid) |
|||
:tag('th') |
:tag('th') |
||
:attr('colspan', 2) |
:attr('colspan', '2') |
||
:addClass('infobox-header') |
|||
:attr('id', rowArgs.headerid) |
|||
:addClass(rowArgs.class) |
:addClass(rowArgs.class) |
||
:addClass(args.headerclass) |
:addClass(args.headerclass) |
||
-- @deprecated next; target .infobox-<name> .infobox-header |
|||
:css('text-align', 'center') |
|||
:cssText(args.headerstyle) |
:cssText(args.headerstyle) |
||
:cssText(rowArgs.rowcellstyle) |
:cssText(rowArgs.rowcellstyle) |
||
:wikitext(fixChildBoxes(rowArgs.header, 'th')) |
:wikitext(fixChildBoxes(rowArgs.header, 'th')) |
||
if rowArgs.data then |
if rowArgs.data then |
||
root:wikitext('[[Category:Pages |
root:wikitext( |
||
'[[Category:Pages using infobox templates with ignored data cells]]' |
|||
) |
|||
elseif rowArgs.data then |
|||
if not rowArgs.data:gsub('%[%[%s*[Cc][Aa][Tt][Ee][Gg][Oo][Rr][Yy]%s*:[^]]*]]', ''):match('^%S') then |
|||
rowArgs.rowstyle = 'display:none' |
|||
end |
end |
||
elseif rowArgs.data and rowArgs.data:gsub(category_in_empty_row_pattern, ''):match('^%S') then |
|||
has_rows = true |
|||
has_list_class({ rowArgs.rowclass, rowArgs.class }) |
|||
local row = root:tag('tr') |
local row = root:tag('tr') |
||
row:addClass(rowArgs.rowclass) |
row:addClass(rowArgs.rowclass) |
||
row:cssText(rowArgs.rowstyle) |
row:cssText(rowArgs.rowstyle) |
||
row:attr('id', rowArgs.rowid) |
|||
if rowArgs.label then |
if rowArgs.label then |
||
row |
row |
||
:tag('th') |
:tag('th') |
||
:attr('scope', 'row') |
:attr('scope', 'row') |
||
: |
:addClass('infobox-label') |
||
-- @deprecated next; target .infobox-<name> .infobox-label |
|||
:cssText(args.labelstyle) |
:cssText(args.labelstyle) |
||
:cssText(rowArgs.rowcellstyle) |
:cssText(rowArgs.rowcellstyle) |
||
Llinell 132: | Llinell 190: | ||
local dataCell = row:tag('td') |
local dataCell = row:tag('td') |
||
if not rowArgs.label then |
|||
dataCell |
|||
:attr('colspan', 2) |
|||
:css('text-align', 'center') |
|||
end |
|||
dataCell |
dataCell |
||
:attr(' |
:attr('colspan', not rowArgs.label and '2' or nil) |
||
:addClass(not rowArgs.label and 'infobox-full-data' or 'infobox-data') |
|||
:addClass(rowArgs.class) |
:addClass(rowArgs.class) |
||
-- @deprecated next; target .infobox-<name> .infobox(-full)-data |
|||
:cssText(rowArgs.datastyle) |
:cssText(rowArgs.datastyle) |
||
:cssText(rowArgs.rowcellstyle) |
:cssText(rowArgs.rowcellstyle) |
||
:wikitext(fixChildBoxes(rowArgs.data, 'td')) |
:wikitext(fixChildBoxes(rowArgs.data, 'td')) |
||
else |
|||
table.insert(empty_row_categories, rowArgs.data or '') |
|||
end |
end |
||
end |
end |
||
Llinell 149: | Llinell 206: | ||
if not args.title then return end |
if not args.title then return end |
||
has_rows = true |
|||
has_list_class({args.titleclass}) |
|||
root |
root |
||
:tag('caption') |
:tag('caption') |
||
:addClass('infobox-title') |
|||
:addClass(args.titleclass) |
:addClass(args.titleclass) |
||
-- @deprecated next; target .infobox-<name> .infobox-title |
|||
:cssText(args.titlestyle) |
:cssText(args.titlestyle) |
||
:wikitext(args.title) |
:wikitext(args.title) |
||
end |
end |
||
Llinell 159: | Llinell 222: | ||
if not args.above then return end |
if not args.above then return end |
||
has_rows = true |
|||
has_list_class({ args.aboveclass }) |
|||
root |
root |
||
:tag('tr') |
:tag('tr') |
||
:tag('th') |
:tag('th') |
||
:attr('colspan', 2) |
:attr('colspan', '2') |
||
:addClass('infobox-above') |
|||
:addClass(args.aboveclass) |
:addClass(args.aboveclass) |
||
-- @deprecated next; target .infobox-<name> .infobox-above |
|||
:css('text-align', 'center') |
|||
:css('font-size', '125%') |
|||
:css('font-weight', 'bold') |
|||
:cssText(args.abovestyle) |
:cssText(args.abovestyle) |
||
:wikitext(fixChildBoxes(args.above,'th')) |
:wikitext(fixChildBoxes(args.above,'th')) |
||
Llinell 174: | Llinell 239: | ||
if not args.below then return end |
if not args.below then return end |
||
has_rows = true |
|||
has_list_class({ args.belowclass }) |
|||
root |
root |
||
:tag('tr') |
:tag('tr') |
||
:tag('td') |
:tag('td') |
||
:attr('colspan', '2') |
:attr('colspan', '2') |
||
:addClass('infobox-below') |
|||
:addClass(args.belowclass) |
:addClass(args.belowclass) |
||
-- @deprecated next; target .infobox-<name> .infobox-below |
|||
:css('text-align', 'center') |
|||
:cssText(args.belowstyle) |
:cssText(args.belowstyle) |
||
:wikitext(fixChildBoxes(args.below,'td')) |
:wikitext(fixChildBoxes(args.below,'td')) |
||
end |
|||
local function addSubheaderRow(subheaderArgs) |
|||
if subheaderArgs.data and |
|||
subheaderArgs.data:gsub(category_in_empty_row_pattern, ''):match('^%S') then |
|||
has_rows = true |
|||
has_list_class({ subheaderArgs.rowclass, subheaderArgs.class }) |
|||
local row = root:tag('tr') |
|||
row:addClass(subheaderArgs.rowclass) |
|||
local dataCell = row:tag('td') |
|||
dataCell |
|||
:attr('colspan', '2') |
|||
:addClass('infobox-subheader') |
|||
:addClass(subheaderArgs.class) |
|||
:cssText(subheaderArgs.datastyle) |
|||
:cssText(subheaderArgs.rowcellstyle) |
|||
:wikitext(fixChildBoxes(subheaderArgs.data, 'td')) |
|||
else |
|||
table.insert(empty_row_categories, subheaderArgs.data or '') |
|||
end |
|||
end |
end |
||
Llinell 193: | Llinell 284: | ||
local subheadernums = getArgNums('subheader') |
local subheadernums = getArgNums('subheader') |
||
for k, num in ipairs(subheadernums) do |
for k, num in ipairs(subheadernums) do |
||
addSubheaderRow({ |
|||
data = args['subheader' .. tostring(num)], |
data = args['subheader' .. tostring(num)], |
||
-- @deprecated next; target .infobox-<name> .infobox-subheader |
|||
datastyle = args.subheaderstyle, |
datastyle = args.subheaderstyle, |
||
rowcellstyle = args['subheaderstyle' .. tostring(num)], |
rowcellstyle = args['subheaderstyle' .. tostring(num)], |
||
Llinell 200: | Llinell 292: | ||
rowclass = args['subheaderrowclass' .. tostring(num)] |
rowclass = args['subheaderrowclass' .. tostring(num)] |
||
}) |
}) |
||
end |
|||
end |
|||
local function addImageRow(imageArgs) |
|||
if imageArgs.data and |
|||
imageArgs.data:gsub(category_in_empty_row_pattern, ''):match('^%S') then |
|||
has_rows = true |
|||
has_list_class({ imageArgs.rowclass, imageArgs.class }) |
|||
local row = root:tag('tr') |
|||
row:addClass(imageArgs.rowclass) |
|||
local dataCell = row:tag('td') |
|||
dataCell |
|||
:attr('colspan', '2') |
|||
:addClass('infobox-image') |
|||
:addClass(imageArgs.class) |
|||
:cssText(imageArgs.datastyle) |
|||
:wikitext(fixChildBoxes(imageArgs.data, 'td')) |
|||
else |
|||
table.insert(empty_row_categories, imageArgs.data or '') |
|||
end |
end |
||
end |
end |
||
Llinell 217: | Llinell 332: | ||
data |
data |
||
:tag('div') |
:tag('div') |
||
:addClass('infobox-caption') |
|||
-- @deprecated next; target .infobox-<name> .infobox-caption |
|||
:cssText(args.captionstyle) |
:cssText(args.captionstyle) |
||
:wikitext(caption) |
:wikitext(caption) |
||
end |
end |
||
addImageRow({ |
|||
data = tostring(data), |
data = tostring(data), |
||
-- @deprecated next; target .infobox-<name> .infobox-image |
|||
datastyle = args.imagestyle, |
datastyle = args.imagestyle, |
||
class = args.imageclass, |
class = args.imageclass, |
||
Llinell 229: | Llinell 347: | ||
end |
end |
||
-- When autoheaders are turned on, preprocesses the rows |
|||
local function preprocessRows() |
local function preprocessRows() |
||
if not args.autoheaders then return end |
|||
-- 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')) |
local rownums = union(getArgNums('header'), getArgNums('data')) |
||
table.sort(rownums) |
table.sort(rownums) |
||
Llinell 241: | Llinell 360: | ||
end |
end |
||
lastheader = num |
lastheader = num |
||
elseif args['data' .. tostring(num)] and |
elseif args['data' .. tostring(num)] and |
||
args['data' .. tostring(num)]:gsub( |
|||
category_in_empty_row_pattern, '' |
|||
):match('^%S') then |
|||
local data = args['data' .. tostring(num)] |
local data = args['data' .. tostring(num)] |
||
if data:gsub( |
if data:gsub(category_in_empty_row_pattern, ''):match('%S') then |
||
lastheader = nil |
lastheader = nil |
||
end |
end |
||
Llinell 253: | Llinell 375: | ||
end |
end |
||
-- Gets the union of the header and data argument numbers, |
|||
-- and renders them all in order |
|||
local function renderRows() |
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')) |
local rownums = union(getArgNums('header'), getArgNums('data')) |
||
table.sort(rownums) |
table.sort(rownums) |
||
Llinell 266: | Llinell 389: | ||
class = args['class' .. tostring(num)], |
class = args['class' .. tostring(num)], |
||
rowclass = args['rowclass' .. tostring(num)], |
rowclass = args['rowclass' .. tostring(num)], |
||
-- @deprecated next; target .infobox-<name> rowclass |
|||
rowstyle = args['rowstyle' .. tostring(num)], |
rowstyle = args['rowstyle' .. tostring(num)], |
||
rowcellstyle = args['rowcellstyle' .. tostring(num)] |
rowcellstyle = args['rowcellstyle' .. tostring(num)] |
||
dataid = args['dataid' .. tostring(num)], |
|||
labelid = args['labelid' .. tostring(num)], |
|||
headerid = args['headerid' .. tostring(num)], |
|||
rowid = args['rowid' .. tostring(num)] |
|||
}) |
}) |
||
end |
end |
||
Llinell 279: | Llinell 399: | ||
if not args.name then return end |
if not args.name then return end |
||
has_rows = true |
|||
root |
root |
||
:tag('tr') |
:tag('tr') |
||
:tag('td') |
:tag('td') |
||
:attr('colspan', '2') |
:attr('colspan', '2') |
||
: |
:addClass('infobox-navbar') |
||
:wikitext( |
:wikitext(require('Module:Navbar')._navbar{ |
||
args.name, |
args.name, |
||
mini = 1, |
mini = 1, |
||
Llinell 293: | Llinell 414: | ||
local italicTitle = args['italic title'] and mw.ustring.lower(args['italic title']) |
local italicTitle = args['italic title'] and mw.ustring.lower(args['italic title']) |
||
if italicTitle == '' or italicTitle == 'force' or italicTitle == 'yes' then |
if italicTitle == '' or italicTitle == 'force' or italicTitle == 'yes' then |
||
root:wikitext( |
root:wikitext(require('Module:Italic title')._main({})) |
||
end |
end |
||
end |
end |
||
-- Categories in otherwise empty rows are collected in empty_row_categories. |
|||
-- This function adds them to the module output. It is not affected by |
|||
-- args.decat because this module should not prevent module-external categories |
|||
-- from rendering. |
|||
local function renderEmptyRowCategories() |
|||
for _, s in ipairs(empty_row_categories) do |
|||
root:wikitext(s) |
|||
end |
|||
end |
|||
-- Render tracking categories. args.decat == turns off tracking categories. |
|||
local function renderTrackingCategories() |
local function renderTrackingCategories() |
||
if args.decat |
if args.decat == 'yes' then return end |
||
if args.child == 'yes' then |
|||
if args.title then |
|||
root:wikitext( |
|||
'[[Category:Pages using embedded infobox templates with the title parameter]]' |
|||
) |
|||
elseif #(getArgNums('data')) == 0 and mw.title.getCurrentTitle().namespace == 0 then |
|||
root:wikitext('[[Category:Articles which use infobox templates with no data rows]]') |
|||
end |
end |
||
elseif #(getArgNums('data')) == 0 and mw.title.getCurrentTitle().namespace == 0 then |
|||
root:wikitext('[[Category:Articles using infobox templates with no data rows]]') |
|||
end |
end |
||
end |
end |
||
--[=[ |
|||
Loads the templatestyles for the infobox. |
|||
TODO: FINISH loading base templatestyles here rather than in |
|||
MediaWiki:Common.css. There are 4-5000 pages with 'raw' infobox tables. |
|||
See [[Mediawiki_talk:Common.css/to_do#Infobox]] and/or come help :). |
|||
When we do this we should clean up the inline CSS below too. |
|||
Will have to do some bizarre conversion category like with sidebar. |
|||
]=] |
|||
local function loadTemplateStyles() |
|||
local frame = mw.getCurrentFrame() |
|||
local hlist_templatestyles = '' |
|||
if lists.hlist_t.found then |
|||
hlist_templatestyles = frame:extensionTag{ |
|||
name = 'templatestyles', args = { src = lists.hlist_t.styles } |
|||
} |
|||
end |
|||
local plainlist_templatestyles = '' |
|||
if lists.plainlist_t.found then |
|||
plainlist_templatestyles = frame:extensionTag{ |
|||
name = 'templatestyles', args = { src = lists.plainlist_t.styles } |
|||
} |
|||
end |
|||
-- See function description |
|||
local base_templatestyles = frame:extensionTag{ |
|||
name = 'templatestyles', args = { src = 'Module:Infobox/styles.css' } |
|||
} |
|||
local templatestyles = '' |
|||
if args['templatestyles'] then |
|||
templatestyles = frame:extensionTag{ |
|||
name = 'templatestyles', args = { src = args['templatestyles'] } |
|||
} |
|||
end |
|||
local child_templatestyles = '' |
|||
if args['child templatestyles'] then |
|||
child_templatestyles = frame:extensionTag{ |
|||
name = 'templatestyles', args = { src = args['child templatestyles'] } |
|||
} |
|||
end |
|||
local grandchild_templatestyles = '' |
|||
if args['grandchild templatestyles'] then |
|||
grandchild_templatestyles = frame:extensionTag{ |
|||
name = 'templatestyles', args = { src = args['grandchild templatestyles'] } |
|||
} |
|||
end |
|||
return table.concat({ |
|||
-- hlist -> plainlist -> base is best-effort to preserve old Common.css ordering. |
|||
-- this ordering is not a guarantee because the rows of interest invoking |
|||
-- each class may not be on a specific page |
|||
hlist_templatestyles, |
|||
plainlist_templatestyles, |
|||
base_templatestyles, |
|||
templatestyles, |
|||
child_templatestyles, |
|||
grandchild_templatestyles |
|||
}) |
|||
end |
|||
-- common functions between the child and non child cases |
|||
local function structure_infobox_common() |
|||
renderSubheaders() |
|||
renderImages() |
|||
preprocessRows() |
|||
renderRows() |
|||
renderBelowRow() |
|||
renderNavBar() |
|||
renderItalicTitle() |
|||
renderEmptyRowCategories() |
|||
renderTrackingCategories() |
|||
cleanInfobox() |
|||
end |
|||
-- Specify the overall layout of the infobox, with special settings if the |
|||
-- infobox is used as a 'child' inside another infobox. |
|||
local function _infobox() |
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 |
if args.child ~= 'yes' then |
||
root = mw.html.create('table') |
root = mw.html.create('table') |
||
root |
root |
||
:addClass |
:addClass(args.subbox == 'yes' and 'infobox-subbox' or 'infobox') |
||
:addClass(args.bodyclass) |
:addClass(args.bodyclass) |
||
-- @deprecated next; target .infobox-<name> |
|||
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) |
:cssText(args.bodystyle) |
||
has_list_class({ args.bodyclass }) |
|||
renderTitle() |
renderTitle() |
||
Llinell 345: | Llinell 544: | ||
:wikitext(args.title) |
:wikitext(args.title) |
||
end |
end |
||
structure_infobox_common() |
|||
renderSubheaders() |
|||
return loadTemplateStyles() .. root |
|||
renderImages() |
|||
if args.autoheaders then |
|||
preprocessRows() |
|||
end |
|||
renderRows() |
|||
renderBelowRow() |
|||
renderNavBar() |
|||
renderItalicTitle() |
|||
renderTrackingCategories() |
|||
return tostring(root) |
|||
end |
end |
||
-- 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. |
|||
local function preprocessSingleArg(argName) |
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 |
if origArgs[argName] and origArgs[argName] ~= '' then |
||
args[argName] = origArgs[argName] |
args[argName] = origArgs[argName] |
||
Llinell 368: | Llinell 557: | ||
end |
end |
||
-- 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. |
|||
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 |
|||
-- 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 |
if type(prefixTable) ~= 'table' then |
||
error("Non-table value detected for the prefix table", 2) |
error("Non-table value detected for the prefix table", 2) |
||
Llinell 384: | Llinell 574: | ||
-- 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 |
||
if type(v) ~= 'table' or type(v.prefix) ~= "string" or |
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) |
error('Invalid input detected to preprocessArgs prefix table', 2) |
||
end |
end |
||
preprocessSingleArg(v.prefix) |
preprocessSingleArg(v.prefix) |
||
-- Only parse the depend parameter if the prefix parameter is present and not blank. |
-- Only parse the depend parameter if the prefix parameter is present |
||
-- and not blank. |
|||
if args[v.prefix] and v.depend then |
if args[v.prefix] and v.depend then |
||
for j, dependValue in ipairs(v.depend) do |
for j, dependValue in ipairs(v.depend) do |
||
Llinell 408: | Llinell 600: | ||
local prefixArgName = v.prefix .. tostring(i) |
local prefixArgName = v.prefix .. tostring(i) |
||
if origArgs[prefixArgName] then |
if origArgs[prefixArgName] then |
||
-- Do another loop if any arguments are found, even blank ones. |
|||
moreArgumentsExist = true |
|||
preprocessSingleArg(prefixArgName) |
preprocessSingleArg(prefixArgName) |
||
end |
end |
||
-- Process the depend table if the prefix argument is present |
-- Process the depend table if the prefix argument is present |
||
-- we are processing "prefix1" and "prefix" is |
-- and not blank, or we are processing "prefix1" and "prefix" is |
||
-- if the depend table is present. |
-- 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 |
if v.depend and (args[prefixArgName] or (i == 1 and args[v.prefix])) then |
||
for j,dependValue in ipairs(v.depend) do |
for j,dependValue in ipairs(v.depend) do |
||
Llinell 426: | Llinell 619: | ||
end |
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. |
|||
local function parseDataParameters() |
local function parseDataParameters() |
||
-- 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('autoheaders') |
preprocessSingleArg('autoheaders') |
||
preprocessSingleArg('child') |
preprocessSingleArg('child') |
||
Llinell 459: | Llinell 653: | ||
{prefix = 'rowstyle'}, |
{prefix = 'rowstyle'}, |
||
{prefix = 'rowcellstyle'}, |
{prefix = 'rowcellstyle'}, |
||
{prefix = 'class'} |
{prefix = 'class'} |
||
{prefix = 'dataid'}, |
|||
{prefix = 'labelid'}, |
|||
{prefix = 'headerid'}, |
|||
{prefix = 'rowid'} |
|||
}, 50) |
}, 50) |
||
preprocessSingleArg('headerclass') |
preprocessSingleArg('headerclass') |
||
Llinell 473: | Llinell 663: | ||
preprocessSingleArg('belowstyle') |
preprocessSingleArg('belowstyle') |
||
preprocessSingleArg('name') |
preprocessSingleArg('name') |
||
-- different behaviour for italics if blank or absent |
|||
args['italic title'] = origArgs['italic title'] |
|||
preprocessSingleArg('decat') |
preprocessSingleArg('decat') |
||
preprocessSingleArg('templatestyles') |
|||
preprocessSingleArg('child templatestyles') |
|||
preprocessSingleArg('grandchild templatestyles') |
|||
end |
end |
||
-- If called via #invoke, use the args passed into the invoking template. |
|||
-- Otherwise, for testing purposes, assume args are being passed directly in. |
|||
function p.infobox(frame) |
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 |
if frame == mw.getCurrentFrame() then |
||
origArgs = frame:getParent().args |
origArgs = frame:getParent().args |
||
Llinell 491: | Llinell 685: | ||
end |
end |
||
-- For calling via #invoke within a template |
|||
function p.infoboxTemplate(frame) |
function p.infoboxTemplate(frame) |
||
-- For calling via #invoke within a template |
|||
origArgs = {} |
origArgs = {} |
||
for k,v in pairs(frame.args) do origArgs[k] = mw.text.trim(v) end |
for k,v in pairs(frame.args) do origArgs[k] = mw.text.trim(v) end |
Fersiwn yn ôl 15:48, 18 Mehefin 2024
This template is used on 3308957 pages, and changes to it will be widely noticed. Please test any changes in the template's /sandbox or /testcases subpages, or in a user subpage, and consider discussing changes at the talk page before implementing them. |
This module is subject to page protection. It is a highly visible module in use by a very large number of pages, or is substituted very frequently. Because vandalism or mistakes would affect many pages, and even trivial editing might cause substantial load on the servers, it is protected from editing. |
Uses Lua: |
Module:Infobox yn fodiwl sy'n defnyddio'r Nodyn: {{Infobox}}.
Categoriau tracio
- Category:Pages which use infobox templates with ignored data cells (493)
- Category:Articles which use infobox templates with no data rows (6,635)
- Category:Pages which use embedded infobox templates with the title parameter (1)
MAe
local p = {}
local args = {}
local origArgs = {}
local root
local empty_row_categories = {}
local category_in_empty_row_pattern = '%[%[%s*[Cc][Aa][Tt][Ee][Gg][Oo][Rr][Yy]%s*:[^]]*]]'
local has_rows = false
local lists = {
plainlist_t = {
patterns = {
'^plainlist$',
'%splainlist$',
'^plainlist%s',
'%splainlist%s'
},
found = false,
styles = 'Plainlist/styles.css'
},
hlist_t = {
patterns = {
'^hlist$',
'%shlist$',
'^hlist%s',
'%shlist%s'
},
found = false,
styles = 'Hlist/styles.css'
}
}
local function has_list_class(args_to_check)
for _, list in pairs(lists) do
if not list.found then
for _, arg in pairs(args_to_check) do
for _, pattern in ipairs(list.patterns) do
if mw.ustring.find(arg or '', pattern) then
list.found = true
break
end
end
if list.found then break end
end
end
end
end
local function fixChildBoxes(sval, tt)
local function notempty( s ) return s and s:match( '%S' ) end
if notempty(sval) then
local marker = '<span class=special_infobox_marker>'
local s = sval
-- start moving templatestyles and categories inside of table rows
local slast = ''
while slast ~= s do
slast = s
s = mw.ustring.gsub(s, '(</[Tt][Rr]%s*>%s*)(%[%[%s*[Cc][Aa][Tt][Ee][Gg][Oo][Rr][Yy]%s*:[^]]*%]%])', '%2%1')
s = mw.ustring.gsub(s, '(</[Tt][Rr]%s*>%s*)(\127[^\127]*UNIQ%-%-templatestyles%-%x+%-QINU[^\127]*\127)', '%2%1')
end
-- end moving templatestyles and categories inside of table rows
s = mw.ustring.gsub(s, '(<%s*[Tt][Rr])', marker .. '%1')
s = mw.ustring.gsub(s, '(</[Tt][Rr]%s*>)', '%1' .. marker)
if s:match(marker) then
s = mw.ustring.gsub(s, marker .. '%s*' .. marker, '')
s = mw.ustring.gsub(s, '([\r\n]|-[^\r\n]*[\r\n])%s*' .. marker, '%1')
s = mw.ustring.gsub(s, marker .. '%s*([\r\n]|-)', '%1')
s = mw.ustring.gsub(s, '(</[Cc][Aa][Pp][Tt][Ii][Oo][Nn]%s*>%s*)' .. marker, '%1')
s = mw.ustring.gsub(s, '(<%s*[Tt][Aa][Bb][Ll][Ee][^<>]*>%s*)' .. marker, '%1')
s = mw.ustring.gsub(s, '^(%{|[^\r\n]*[\r\n]%s*)' .. marker, '%1')
s = mw.ustring.gsub(s, '([\r\n]%{|[^\r\n]*[\r\n]%s*)' .. marker, '%1')
s = mw.ustring.gsub(s, marker .. '(%s*</[Tt][Aa][Bb][Ll][Ee]%s*>)', '%1')
s = mw.ustring.gsub(s, marker .. '(%s*\n|%})', '%1')
end
if s:match(marker) then
local subcells = mw.text.split(s, marker)
s = ''
for k = 1, #subcells do
if k == 1 then
s = s .. subcells[k] .. '</' .. tt .. '></tr>'
elseif k == #subcells then
local rowstyle = ' style="display:none"'
if notempty(subcells[k]) then rowstyle = '' end
s = s .. '<tr' .. rowstyle ..'><' .. tt .. ' colspan=2>\n' ..
subcells[k]
elseif notempty(subcells[k]) then
if (k % 2) == 0 then
s = s .. subcells[k]
else
s = s .. '<tr><' .. tt .. ' colspan=2>\n' ..
subcells[k] .. '</' .. tt .. '></tr>'
end
end
end
end
-- the next two lines add a newline at the end of lists for the PHP parser
-- [[Special:Diff/849054481]]
-- remove when [[:phab:T191516]] is fixed or OBE
s = mw.ustring.gsub(s, '([\r\n][%*#;:][^\r\n]*)$', '%1\n')
s = mw.ustring.gsub(s, '^([%*#;:][^\r\n]*)$', '%1\n')
s = mw.ustring.gsub(s, '^([%*#;:])', '\n%1')
s = mw.ustring.gsub(s, '^(%{%|)', '\n%1')
return s
else
return sval
end
end
-- Cleans empty tables
local function cleanInfobox()
root = tostring(root)
if has_rows == false then
root = mw.ustring.gsub(root, '<table[^<>]*>%s*</table>', '')
end
end
-- Returns the union of the values of two tables, as a sequence.
local function union(t1, t2)
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
-- 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 function getArgNums(prefix)
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
-- Adds a row to the infobox, with either a header cell
-- or a label/data cell combination.
local function addRow(rowArgs)
if rowArgs.header and rowArgs.header ~= '_BLANK_' then
has_rows = true
has_list_class({ rowArgs.rowclass, rowArgs.class, args.headerclass })
root
:tag('tr')
:addClass(rowArgs.rowclass)
:cssText(rowArgs.rowstyle)
:tag('th')
:attr('colspan', '2')
:addClass('infobox-header')
:addClass(rowArgs.class)
:addClass(args.headerclass)
-- @deprecated next; target .infobox-<name> .infobox-header
:cssText(args.headerstyle)
:cssText(rowArgs.rowcellstyle)
:wikitext(fixChildBoxes(rowArgs.header, 'th'))
if rowArgs.data then
root:wikitext(
'[[Category:Pages using infobox templates with ignored data cells]]'
)
end
elseif rowArgs.data and rowArgs.data:gsub(category_in_empty_row_pattern, ''):match('^%S') then
has_rows = true
has_list_class({ rowArgs.rowclass, rowArgs.class })
local row = root:tag('tr')
row:addClass(rowArgs.rowclass)
row:cssText(rowArgs.rowstyle)
if rowArgs.label then
row
:tag('th')
:attr('scope', 'row')
:addClass('infobox-label')
-- @deprecated next; target .infobox-<name> .infobox-label
:cssText(args.labelstyle)
:cssText(rowArgs.rowcellstyle)
:wikitext(rowArgs.label)
:done()
end
local dataCell = row:tag('td')
dataCell
:attr('colspan', not rowArgs.label and '2' or nil)
:addClass(not rowArgs.label and 'infobox-full-data' or 'infobox-data')
:addClass(rowArgs.class)
-- @deprecated next; target .infobox-<name> .infobox(-full)-data
:cssText(rowArgs.datastyle)
:cssText(rowArgs.rowcellstyle)
:wikitext(fixChildBoxes(rowArgs.data, 'td'))
else
table.insert(empty_row_categories, rowArgs.data or '')
end
end
local function renderTitle()
if not args.title then return end
has_rows = true
has_list_class({args.titleclass})
root
:tag('caption')
:addClass('infobox-title')
:addClass(args.titleclass)
-- @deprecated next; target .infobox-<name> .infobox-title
:cssText(args.titlestyle)
:wikitext(args.title)
end
local function renderAboveRow()
if not args.above then return end
has_rows = true
has_list_class({ args.aboveclass })
root
:tag('tr')
:tag('th')
:attr('colspan', '2')
:addClass('infobox-above')
:addClass(args.aboveclass)
-- @deprecated next; target .infobox-<name> .infobox-above
:cssText(args.abovestyle)
:wikitext(fixChildBoxes(args.above,'th'))
end
local function renderBelowRow()
if not args.below then return end
has_rows = true
has_list_class({ args.belowclass })
root
:tag('tr')
:tag('td')
:attr('colspan', '2')
:addClass('infobox-below')
:addClass(args.belowclass)
-- @deprecated next; target .infobox-<name> .infobox-below
:cssText(args.belowstyle)
:wikitext(fixChildBoxes(args.below,'td'))
end
local function addSubheaderRow(subheaderArgs)
if subheaderArgs.data and
subheaderArgs.data:gsub(category_in_empty_row_pattern, ''):match('^%S') then
has_rows = true
has_list_class({ subheaderArgs.rowclass, subheaderArgs.class })
local row = root:tag('tr')
row:addClass(subheaderArgs.rowclass)
local dataCell = row:tag('td')
dataCell
:attr('colspan', '2')
:addClass('infobox-subheader')
:addClass(subheaderArgs.class)
:cssText(subheaderArgs.datastyle)
:cssText(subheaderArgs.rowcellstyle)
:wikitext(fixChildBoxes(subheaderArgs.data, 'td'))
else
table.insert(empty_row_categories, subheaderArgs.data or '')
end
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
addSubheaderRow({
data = args['subheader' .. tostring(num)],
-- @deprecated next; target .infobox-<name> .infobox-subheader
datastyle = args.subheaderstyle,
rowcellstyle = args['subheaderstyle' .. tostring(num)],
class = args.subheaderclass,
rowclass = args['subheaderrowclass' .. tostring(num)]
})
end
end
local function addImageRow(imageArgs)
if imageArgs.data and
imageArgs.data:gsub(category_in_empty_row_pattern, ''):match('^%S') then
has_rows = true
has_list_class({ imageArgs.rowclass, imageArgs.class })
local row = root:tag('tr')
row:addClass(imageArgs.rowclass)
local dataCell = row:tag('td')
dataCell
:attr('colspan', '2')
:addClass('infobox-image')
:addClass(imageArgs.class)
:cssText(imageArgs.datastyle)
:wikitext(fixChildBoxes(imageArgs.data, 'td'))
else
table.insert(empty_row_categories, imageArgs.data or '')
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 = mw.html.create():wikitext(args['image' .. tostring(num)])
if caption then
data
:tag('div')
:addClass('infobox-caption')
-- @deprecated next; target .infobox-<name> .infobox-caption
:cssText(args.captionstyle)
:wikitext(caption)
end
addImageRow({
data = tostring(data),
-- @deprecated next; target .infobox-<name> .infobox-image
datastyle = args.imagestyle,
class = args.imageclass,
rowclass = args['imagerowclass' .. tostring(num)]
})
end
end
-- When autoheaders are turned on, preprocesses the rows
local function preprocessRows()
if not args.autoheaders then return end
local rownums = union(getArgNums('header'), getArgNums('data'))
table.sort(rownums)
local lastheader
for k, num in ipairs(rownums) do
if args['header' .. tostring(num)] then
if lastheader then
args['header' .. tostring(lastheader)] = nil
end
lastheader = num
elseif args['data' .. tostring(num)] and
args['data' .. tostring(num)]:gsub(
category_in_empty_row_pattern, ''
):match('^%S') then
local data = args['data' .. tostring(num)]
if data:gsub(category_in_empty_row_pattern, ''):match('%S') then
lastheader = nil
end
end
end
if lastheader then
args['header' .. tostring(lastheader)] = nil
end
end
-- Gets the union of the header and data argument numbers,
-- and renders them all in order
local function renderRows()
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)],
-- @deprecated next; target .infobox-<name> rowclass
rowstyle = args['rowstyle' .. tostring(num)],
rowcellstyle = args['rowcellstyle' .. tostring(num)]
})
end
end
local function renderNavBar()
if not args.name then return end
has_rows = true
root
:tag('tr')
:tag('td')
:attr('colspan', '2')
:addClass('infobox-navbar')
:wikitext(require('Module:Navbar')._navbar{
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(require('Module:Italic title')._main({}))
end
end
-- Categories in otherwise empty rows are collected in empty_row_categories.
-- This function adds them to the module output. It is not affected by
-- args.decat because this module should not prevent module-external categories
-- from rendering.
local function renderEmptyRowCategories()
for _, s in ipairs(empty_row_categories) do
root:wikitext(s)
end
end
-- Render tracking categories. args.decat == turns off tracking categories.
local function renderTrackingCategories()
if args.decat == 'yes' then return end
if args.child == 'yes' then
if args.title then
root:wikitext(
'[[Category:Pages using embedded infobox templates with the title parameter]]'
)
end
elseif #(getArgNums('data')) == 0 and mw.title.getCurrentTitle().namespace == 0 then
root:wikitext('[[Category:Articles using infobox templates with no data rows]]')
end
end
--[=[
Loads the templatestyles for the infobox.
TODO: FINISH loading base templatestyles here rather than in
MediaWiki:Common.css. There are 4-5000 pages with 'raw' infobox tables.
See [[Mediawiki_talk:Common.css/to_do#Infobox]] and/or come help :).
When we do this we should clean up the inline CSS below too.
Will have to do some bizarre conversion category like with sidebar.
]=]
local function loadTemplateStyles()
local frame = mw.getCurrentFrame()
local hlist_templatestyles = ''
if lists.hlist_t.found then
hlist_templatestyles = frame:extensionTag{
name = 'templatestyles', args = { src = lists.hlist_t.styles }
}
end
local plainlist_templatestyles = ''
if lists.plainlist_t.found then
plainlist_templatestyles = frame:extensionTag{
name = 'templatestyles', args = { src = lists.plainlist_t.styles }
}
end
-- See function description
local base_templatestyles = frame:extensionTag{
name = 'templatestyles', args = { src = 'Module:Infobox/styles.css' }
}
local templatestyles = ''
if args['templatestyles'] then
templatestyles = frame:extensionTag{
name = 'templatestyles', args = { src = args['templatestyles'] }
}
end
local child_templatestyles = ''
if args['child templatestyles'] then
child_templatestyles = frame:extensionTag{
name = 'templatestyles', args = { src = args['child templatestyles'] }
}
end
local grandchild_templatestyles = ''
if args['grandchild templatestyles'] then
grandchild_templatestyles = frame:extensionTag{
name = 'templatestyles', args = { src = args['grandchild templatestyles'] }
}
end
return table.concat({
-- hlist -> plainlist -> base is best-effort to preserve old Common.css ordering.
-- this ordering is not a guarantee because the rows of interest invoking
-- each class may not be on a specific page
hlist_templatestyles,
plainlist_templatestyles,
base_templatestyles,
templatestyles,
child_templatestyles,
grandchild_templatestyles
})
end
-- common functions between the child and non child cases
local function structure_infobox_common()
renderSubheaders()
renderImages()
preprocessRows()
renderRows()
renderBelowRow()
renderNavBar()
renderItalicTitle()
renderEmptyRowCategories()
renderTrackingCategories()
cleanInfobox()
end
-- Specify the overall layout of the infobox, with special settings if the
-- infobox is used as a 'child' inside another infobox.
local function _infobox()
if args.child ~= 'yes' then
root = mw.html.create('table')
root
:addClass(args.subbox == 'yes' and 'infobox-subbox' or 'infobox')
:addClass(args.bodyclass)
-- @deprecated next; target .infobox-<name>
:cssText(args.bodystyle)
has_list_class({ args.bodyclass })
renderTitle()
renderAboveRow()
else
root = mw.html.create()
root
:wikitext(args.title)
end
structure_infobox_common()
return loadTemplateStyles() .. root
end
-- 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.
local function preprocessSingleArg(argName)
if origArgs[argName] and origArgs[argName] ~= '' then
args[argName] = origArgs[argName]
end
end
-- 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.
local function preprocessArgs(prefixTable, step)
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
-- Do another loop if any arguments are found, even blank ones.
moreArgumentsExist = true
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
-- 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.
local function parseDataParameters()
preprocessSingleArg('autoheaders')
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'}},
{prefix = 'rowclass'},
{prefix = 'rowstyle'},
{prefix = 'rowcellstyle'},
{prefix = 'class'}
}, 50)
preprocessSingleArg('headerclass')
preprocessSingleArg('headerstyle')
preprocessSingleArg('labelstyle')
preprocessSingleArg('datastyle')
preprocessSingleArg('below')
preprocessSingleArg('belowclass')
preprocessSingleArg('belowstyle')
preprocessSingleArg('name')
-- different behaviour for italics if blank or absent
args['italic title'] = origArgs['italic title']
preprocessSingleArg('decat')
preprocessSingleArg('templatestyles')
preprocessSingleArg('child templatestyles')
preprocessSingleArg('grandchild templatestyles')
end
-- If called via #invoke, use the args passed into the invoking template.
-- Otherwise, for testing purposes, assume args are being passed directly in.
function p.infobox(frame)
if frame == mw.getCurrentFrame() then
origArgs = frame:getParent().args
else
origArgs = frame
end
parseDataParameters()
return _infobox()
end
-- For calling via #invoke within a template
function p.infoboxTemplate(frame)
origArgs = {}
for k,v in pairs(frame.args) do origArgs[k] = mw.text.trim(v) end
parseDataParameters()
return _infobox()
end
return p