Module:Tabular data

 localp={}
 locallang=mw.getContentLanguage()
 localnavbar=require("Module:Navbar")

 localmessages={
 ["true"]="Yes",
 ["false"]="No",
 null="N/A",
 }

 localbgColors={
 ["true"]="#9f9",
 ["false"]="#f99",
 null="#ececec",
 }

 localcolors={
 null="#2c2c2c",
 }

 --- Returns the value of the cell at the given row index and column name.
 --- A row index of 1 refers to the first row in the table. A row index of -1
 --- refers to the last row in the table. It is an error to specify a row index
 --- of 0.
 --- Usage: {{#invoke:Tabular data | cell | Table name | output_row = Index of row to output | output_column = Name of column to output }}
 functionp.cell(frame)
 localdata=mw.ext.data.get(frame.args[1])
 localrowIdx=tonumber(frame.args.output_row)
 localoutputColumnName=frame.args.output_column

 localoutputColumnIdx
 fori,fieldinipairs(data.schema.fields)do
 iffield.name==outputColumnNamethen
 outputColumnIdx=i
 break
 end
 end
 assert(outputColumnIdx,mw.ustring.format("Output column "%s" not found.",outputColumnName))

 ifrowIdx>0then
 rowIdx=(rowIdx-1)%#data.data+1
 elseifrowIdx<0then
 rowIdx=rowIdx%#data.data+1
 else
 error("0 is not a valid row index.")
 end

 returndata.data[rowIdx][outputColumnIdx]
 end

 --- Returns the value of the cell in the given output column of the row matching
 --- the search key and column.
 --- Reminiscent of LOOKUP() macros in popular spreadsheet applications, except
 --- that the search key must match exactly. (On the other hand, this means the
 --- table does not need to be sorted.)
 --- Usage: {{#invoke: Tabular data | lookup | Table name | search_value = Value to find in column | search_column = Name of column to search in | output_column = Name of column to output }}
 functionp.lookup(frame)
 localdata=mw.ext.data.get(frame.args[1])
 localsearchValue=frame.args.search_value
 localsearchColumnName=frame.args.search_column
 localoutputColumnName=frame.args.output_column

 localsearchColumnIdx
 localoutputColumnIdx
 fori,fieldinipairs(data.schema.fields)do
 iffield.name==searchColumnNamethen
 searchColumnIdx=i
 end
 iffield.name==outputColumnNamethen
 outputColumnIdx=i
 end
 ifsearchColumnIdxandoutputColumnIdxthen
 break
 end
 end
 assert(searchColumnIdx,mw.ustring.format("Search column "%s" not found.",searchColumnName))
 assert(outputColumnIdx,mw.ustring.format("Output column "%s" not found.",outputColumnName))

 fori,recordinipairs(data.data)do
 ifrecord[searchColumnIdx]==searchValuethen
 returnrecord[outputColumnIdx]
 end
 end
 end

 --- Returns a tabular data page as a wikitext table.
 --- Usage: {{#invoke: Module:Tabular data | wikitable | Table name }}
 functionp.wikitable(frame)
 localpageName=frame.args[1]
 localdata=mw.ext.data.get(pageName)

 localdatatypes={}

 localhtmlTable=mw.html.create("table")
 :addClass("wikitable sortable")
 htmlTable
 :tag("caption")
 :wikitext(navbar.navbar({
 template=":c:Data:"..pageName,
 mini="y",
 style="float: right;",
 "view","edit",
 }))
 :wikitext(data.description)

 localheaderRow=htmlTable
 :tag("tr")
 fori,fieldinipairs(data.schema.fields)do
 headerRow
 :tag("th")
 :attr("scope","col")
 :attr("data-sort-type",datatypes[j]=="text"and"string"ordatatypes[j])
 :wikitext(field.title)
 datatypes[i]=field.type
 end

 fori,recordinipairs(data.data)do
 localrow=htmlTable:tag("tr")
 forj=1,#data.schema.fieldsdo
 localcell=row:tag("td")
 ifrecord[j]then
 localformattedData=record[j]
 ifdatatypes[j]=="number"then
 formattedData=lang:formatNum(formattedData)
 cell:attr("align","right")
 elseifdatatypes[j]=="boolean"then
 cell
 :addClass(record[j]and"table-yes"or"table-no")
 :css({
 background=record[j]andbgColors["true"]orbgColors["false"],
 color=record[j]andcolors["true"]orcolors["false"],
 ["vertical-align"]="middle",
 ["text-align"]="center",
 })
 :wikitext(record[j]andmessages["true"]ormessages["false"])
 end
 cell:wikitext(formattedData)
 else
 cell
 :addClass("mw-tabular-value-null")
 :addClass("table-na")
 :css({
 background=bgColors.null,
 color=colors.null,
 ["vertical-align"]="middle",
 ["text-align"]="center",
 })
 :wikitext(messages.null)
 end
 end
 end

 localfooter=htmlTable
 :tag("tr")
 :tag("td")
 :addClass("sortbottom")
 :attr("colspan",#data.schema.fields)
 footer:wikitext(data.sources)
 footer:tag("br")

 locallicenseText=mw.message.new("Jsonconfig-license",
 mw.ustring.format("[%s %s]",data.license.url,data.license.text))
 footer
 :tag("i")
 :wikitext(tostring(licenseText))

 returnhtmlTable
 end

 returnp