Module:Piechart/sandbox: Difference between revisions

Revision as of 21:04, 17 February 2025

Latest revision as of 19:16, 8 August 2025

(27 intermediate revisions by 4 users not shown)

Line 1:

local p = {}

local priv = {} -- private functions scope

-- expose private for easy testing/debugging

p.__priv = priv

-- require exact colors for printing

local forPrinting = "-webkit-print-color-adjust: exact; print-color-adjust: exact;"

--[===[

Smooth piechart module.

Draws charts in HTML with an accessible legend (optional).

A list of all features is in the "TODO" section of the main `p.pie` function.

Module info:

- Changelog and TODO: [[:en:User:Nux/pie_chart_-_todo]] (Piechart 1.0, 2.0 and beyond).

- Author: [[:en:User:Nux|Maciej Nux]].

Use with a helper template that adds required CSS.

Line 17 ⟶ 25:

{ "label": "raw pizza $v", "color": "#f30" }

]

Where $v is a formatted number (see `function prepareLabel`).

{{{meta}}}:

{"size":200, "autoscale":false, "legend":true}

All meta options are optional (see `function p.setupOptions`).

]===]

-- Author: [[User:Nux|Maciej Nux]] (pl.wikipedia.org).

--[[

Line 51 ⟶ 59:

-- 4-cuts

local entries = {

'{"label": "ciastka: $v", "value": 2, "color":"goldenrod"}',

'{"label": "słodycze: $v", "value": 4, "color":"darkred"}',

'{"label": "napoje: $v", "value": 1, "color":"lightblue"}',

'{"label": "kanapki: $v", "value": 3, "color":"wheat"}'

}

local json_data = '['..table.concat(entries, ',')..']'

Line 71 ⟶ 79:

]]

function p.color(frame)

local index = tonumber(priv.trim(frame.args[1]))

return ' ' .. priv.defaultColor(index)

end

--[===[

Main pie chart function.

Piechart.

TODO (maybe):

TODO:

[[:en:User:Nux/pie_chart_-_todo#Hopes_and_dreams]]

- [x] basic 2-element pie chart

]===]

- read json

- calculate value with -1

- generate html

- new css + tests

- provide dumb labels (just v%)

- [x] colors in json

- [x] 1st value >= 50%

- [x] custom labels support

- [x] pie size from 'meta' param (options json)

- [x] pl formatting for numbers?

- [x] support undefined value (instead of -1)

- [x] undefined in any order

- [x] scale values to 100% (autoscale)

- [x] order values clockwise (not left/right)

- [x] multi-cut pie

- [x] sanitize user values

- [x] auto colors

- [x] function to get color by number (for custom legend)

- [x] remember and show autoscaled data

- [x] generate a legend

- [x] simple legend positioning by (flex-)direction

- legend2: customization

- (?) itemTpl support

- replace default item with tpl

- can I / should I sanitize it?

- support for $v, $d, $p

- (?) custom head

- (?) validation of input

- check if required values are present

- message showing whole entry, when entry is invalid

- pre-sanitize values?

- sane info when JSON fails? Maybe dump JSON and show example with quotes-n-all...

- (?) option to sort entries by value

]]

function p.pie(frame)

local json_data = priv.trim(frame.args[1])

local options = {}

if (frame.args.meta) then

options.meta = priv.trim(frame.args.meta)

end

if (frame.args.caption) then

options.caption = trim(frame.args.caption)

end

local html = p.renderPie(json_data, options)

return priv.trim(html)

end

Line 146 ⟶ 118:

-- caption above the labels

caption = "",

-- footer below the labels

footer = "",

-- formatting template for labels

labelformat = "",

}

-- internals

options.style = ""

if user_options and user_options.captionmeta then

local decodeSuccess, rawOptions = pcall(function()

options.caption = user_options.caption

return mw.text.jsonDecode(user_options.meta, mw.text.JSON_TRY_FIXING)

end

end)

if user_options.meta then

if not decodeSuccess then

local rawOptions = mw.text.jsonDecode(user_options.meta, mw.text.JSON_TRY_FIXING)

rawOptions = false

mw.log('invalid meta parameters')

end

if rawOptions then

if type(rawOptions.size) == "number" then

Line 179 ⟶ 158:

if (type(rawOptions.caption) == "string") then

options.caption = rawOptions.caption

end

if (type(rawOptions.footer) == "string") then

options.footer = rawOptions.footer

end

if (type(rawOptions.labelformat) == "string") then

options.labelformat = rawOptions.labelformat

end

end

Line 194 ⟶ 179:

return options

end

-- internal for testing legend rendering

p.__priv.legendDebug = false

--[[

Line 201 ⟶ 189:

]]

function p.renderPie(json_data, user_options)

if type(json_data) ~= "string" then

local data = mw.text.jsonDecode(json_data, mw.text.JSON_TRY_FIXING)

error('invalid piechart data type: '..type(json_data))

end

if #json_data < 2 then

error('piechart data is empty')

end

local decodeSuccess, data = pcall(function()

return mw.text.jsonDecode(json_data, mw.text.JSON_TRY_FIXING)

end)

-- Handle decode error

if not decodeSuccess then

error('invalid piechart data: '..json_data)

end

local options = p.setupOptions(user_options)

Line 212:

-- error info

if not ok then

html = html .. priv.renderErrors(data)

end

Line 218:

if options.legend then

html = html .. p.renderLegend(data, options)

end

if p.__priv.legendDebug then

return html

end

Line 228 ⟶ 232:

return html

end

function priv.boundaryFormatting(diff)

local value = 0.0

if diff <= 1.0 then

value = math.ceil(diff / 0.2) * 0.2 -- 0.2 step

else

value = math.ceil(diff / 0.5) * 0.5 -- 0.5 step

end

return string.format("%.1f", value)

end

-- Check if sum will trigger autoscaling

function priv.willAutoscale(sum)

-- Compare with a number larger then 100% to avoid floating-point precision problems

--- ...and data precision problems https://en.wikipedia.org/wiki/Template_talk:Pie_chart#c-PrimeHunter-20250420202500-Allow_percentage_sum_slightly_above_100

local diff = sum - 100

local grace = 1

return diff > grace

end

-- Tracking errors in data (note: somewhat expensive, similar to a red link)

-- In short: ±0.3 is a reasonable deviation; ±1 when the errors accumulate

-- https://en.wikipedia.org/wiki/Template_talk:Pie_chart#c-Nux-20250429152000-Nux-20250422224600

function priv.sumErrorTracking(sum, items)

local diff = sum - 100

if diff >= 0.4 and diff <= 10 then

local firstItem = items[1]

local lastItem = items[#items]

mw.addWarning("pie chart: Σ (value) = "..sum.."% ("..firstItem.value.." + .. .+ "..lastItem.value..")")

if mw.title.getCurrentTitle().namespace == 0 then

local suffix = priv.boundaryFormatting(diff)

_ = mw.title.new("Module:Piechart/tracing/diff below "..suffix).id

end

end

end

-- Prepare data (slices etc)

function p.prepareEntries(data, options)

local sum = priv.sumValues(data);

-- force autoscale when over 100

if priv.willAutoscale(sum > 100) then

options.autoscale = true

end

Line 243 ⟶ 281:

for index, entry in ipairs(data) do

no = no + 1

if not priv.prepareSlice(entry, no, sum, total, options) then

no = no - 1

ok = false

Line 253 ⟶ 291:

end

function priv.sumValues(data)

local sum = 0;

for _, entry in ipairs(data) do

local value = entry.value

if not (type(value) ~= "number" or value < 0) then

sum = sum + value

end

end

Line 265 ⟶ 303:

-- render error info

function priv.renderErrors(data)

local html = "\n<ol class='chart-errors' style='display:none'>"

for _, entry in ipairs(data) do

if entry.error then

local entryJson = mw.text.jsonEncode(entry)

html = html .. "\n<li>".. entryJson .."</li>"

end

Line 277 ⟶ 315:

-- Prepare single slice data (modifies entry).

-- @param no = 1..total
function priv.prepareSlice(entry, no, sum, total, options)

local autoscale = options.autoscale

local value = entry.value

Line 295 ⟶ 334:

-- prepare final label

entry.label = priv.prepareLabel(entryoptions.labellabelformat, entry)

-- prepare final slice bg color

local index = no

if no == total then

index = -1

end

-- background, but also color for MW syntax linter

entry.bcolor = priv.backColor(entry, indexno, total) .. ";color:#000"

return true

Line 310 ⟶ 344:

function p.renderLegend(data, options)

local html = ""

if options.caption ~= "" or options.footer ~= "" then

html = "\n<div class='smooth-pie-legend-container'>"

end

if options.caption ~= "" then

html = html .. "<div class='smooth-pie-caption'>" .. options.caption .. "</div>"

end

Line 317 ⟶ 353:

for _, entry in ipairs(data) do

if not entry.error then

html = html .. priv.renderLegendItem(entry, options)

end

end

html = html .. "\n</ol>\n"

if options.captionfooter ~= "" then

html = html .. "<div class='smooth-pie-footer'>" .. options.footer .. "</div>"

end

if options.caption ~= "" or options.footer ~= "" then

html = html .. "</div>\n"

end

Line 327 ⟶ 366:

end

-- render legend item

function priv.renderLegendItem(entry, options)

-- invisible value (for a11y reasons this should not be used for important values!)

if entry.visible ~= nil and entry.visible == false then

Line 336 ⟶ 375:

local bcolor = entry.bcolor

local html = "\n<li>"

if p.__priv.legendDebug then

forPrinting = ""

end

html = html .. '<span class="l-color" style="'..forPrinting..bcolor..'"></span>'

html = html .. '<span class="l-label">'..label..'</span>'

Line 348 ⟶ 390:

local first = true

local previous = 0

local no = 0

local items = ""

local header = ""

for index, entry in ipairs(data) do

if not entry.error then

items = items .. priv.renderItem(previous, entry, options)

no = no + 1

if no == total then

header = renderFinal(entry, options)

else

items = items .. renderOther(previous, entry, options)

end

previous = previous + entry.value

end

end

local footer = '\n</div>'

local header = priv.renderHeader(options)

local footer = '\n<div class="smooth-pie-border"></div></div>'

return header, items, footer

end

-- header of pie-items (class="smooth-pie")

-- final, but header...

function renderFinalpriv.renderHeader(entry, options)

local labelbcolor = entry.label'background:#888;color:#000'

local bcolor = entry.bcolor

local size = options.size

Line 383 ⟶ 419:

<div class="smooth-pie"

style="]]..style..[["

title="]]..p.extract_text(label)..[["

]]..aria..[[

>]]

return html

end

-- Render pie-item

-- any other then final

function-- renderOther(previous, entry,is optionsa sum of previous values)

function priv.renderItem(previous, entry, options)

local value = entry.value

local label = entry.label

Line 397 ⟶ 433:

if (value < 0.03) then

mw.log('value too small', value, label)

mw.addWarning("pie chart: Value too small ↆ "..value.."% ("..label..")")

return ""

end

-- minimize transformation defects

if value < 10 then

if previous > 1 then

previous = previous - 0.01

end

value = value + 0.02

else

if previous > 1 then

previous = previous - 0.1

end

value = value + 0.2

end

-- force sum to be below 100% (needed due to value errors)

if previous + value > 100 then

if previous >= 100 then

mw.log('previous is already at 100', value, label)

return ""

end

value = 100 - previous

end

local html = ""

Line 405 ⟶ 463:

-- mw.logObject({'v,p,l', value, previous, label})

if (value >= 50) then

html = priv.sliceWithClass('pie50', 50, value, previous, bcolor, label)

elseif (value >= 25) then

html = priv.sliceWithClass('pie25', 25, value, previous, bcolor, label)

elseif (value >= 12.5) then

html = priv.sliceWithClass('pie12-5', 12.5, value, previous, bcolor, label)

elseif (value >= 7) then

html = priv.sliceWithClass('pie7', 7, value, previous, bcolor, label)

elseif (value >= 5) then

html = priv.sliceWithClass('pie5', 5, value, previous, bcolor, label)

else

-- 0-5%

local cutIndex = priv.round(value*10)

if cutIndex < 1 then

cutIndex = 1

end

local cut = p.cuts[cutIndex]

local transform = priv.rotation(previous)

html = priv.sliceX(cut, transform, bcolor, label)

end

-- mw.log(html)

Line 430 ⟶ 488:

-- round to int

function priv.round(number)

return math.floor(number + 0.5)

end

-- render full slice with specific class

function priv.sliceWithClass(sizeClass, sizeStep, value, previous, bcolor, label)

local transform = priv.rotation(previous)

local html = ""

html = html .. priv.sliceBase(sizeClass, transform, bcolor, label)

-- mw.logObject({'sliceWithClass:', sizeClass, sizeStep, value, previous, bcolor, label})

if (value > sizeStep) then

local extra = value - sizeStep

transform = priv.rotation(previous + extra)

-- mw.logObject({'sliceWithClass; extra, transform', extra, transform})

html = html .. priv.sliceBase(sizeClass, transform, bcolor, label)

end

return html

Line 450 ⟶ 508:

-- render single slice

function priv.sliceBase(sizeClass, transform, bcolor, label)

local style = bcolor

if transform ~= "" then

style = style .. '; ' .. transform

end

return '\n\t<div class="'..sizeClass..'" style="'..style..'" title="'..p.extract_text(label)..'"></div>'

end

Line 461 ⟶ 519:

-- range in theory: 0 to 24.(9)% reaching 24.(9)% for cut = +inf

-- range in practice: 0 to 5%

function priv.sliceX(cut, transform, bcolor, label)

local path = 'clip-path: polygon(0% 0%, '..cut..'% 0%, 0 100%)'

return '\n\t<div style="'..transform..'; '..bcolor..'; '..path..'" title="'..p.extract_text(label)..'"></div>'

end

-- translate value to turn rotation (v=100 => 1.0turn)

function priv.rotation(value)

if (value > 0.001) then

returnlocal f = string.format("transform: rotate(%.3fturn)7f", value / 100)

f = f:gsub("(%d)0+$", "%1") -- remove trailing zeros

return "transform: rotate("..f.."turn)"

end

return ''

end

-- Language sensitive float, small numbers.

function priv.formatNum(value)

local lang = mw.language.getContentLanguage()

Line 492 ⟶ 552:

return v

end

p._formatNum = formatNum

-- Format large values.

function priv.formatLargeNum(value)

local lang = mw.language.getContentLanguage()

-- add thusands separators

local v = lang:formatNum(value)

return v

end

-- Testing formatLargeNum.

-- p.__priv.test_formatLargeNum()

function priv.test_formatLargeNum()

mw.log("must not add fractional part")

mw.log( p.__priv.formatLargeNum(12) )

mw.log( p.__priv.formatLargeNum(123) )

mw.log("should preserve fractional part for small numbers")

mw.log( p.__priv.formatLargeNum(1.1) )

mw.log( p.__priv.formatLargeNum(1.12) )

mw.log( p.__priv.formatLargeNum(12.1) )

mw.log("can preserve long fractional part")

mw.log( p.__priv.formatLargeNum(1.1234) )

mw.log( p.__priv.formatLargeNum(1.12345) )

mw.log("should add separators above 1k")

mw.log( p.__priv.formatLargeNum(999) )

mw.log( p.__priv.formatLargeNum(1234) )

mw.log( p.__priv.formatLargeNum(12345) )

mw.log( p.__priv.formatLargeNum(123456) )

mw.log( p.__priv.formatLargeNum(1234567) )

mw.log("must handle large float, but might round values")

mw.log( p.__priv.formatLargeNum(1234.123) )

mw.log( p.__priv.formatLargeNum(12345.123) )

mw.log( p.__priv.formatLargeNum(123456.123) )

mw.log( p.__priv.formatLargeNum(1234567.123) )

end

--[[

Line 498 ⟶ 593:

Typical tpl:

"Abc$L: $v" (same as: "$label: $auto")

will result in:

"Abc: 23%" -- when values are percentages

Line 504 ⟶ 599:

Advanced tpl:

"Abc$L: $d ($p)" --e.g. only"Abc: works1234 with(23%)" autoscalefor {"label":"Abc", "value":1234}

"$L: $v" is the same as above when values are autoscaled

Long vs short variable names:

$label ($L)

$auto ($v)

$value ($d)

$percent ($p)

]]

function priv.prepareLabel(tpl, entry)

-- staticsetup default tpl

if not tpl andor not string.find(tpl, '$')== "" then

-- simple if no label

return tpl

if not entry.label or entry.label == "" then

tpl = "$v"

else

if entry.label:find("%$[a-z]") then

tpl = entry.label

else

tpl = "$L: $v"

end

end

end

local labelLabel = entry.label and entry.label or priv.getLangOther()

-- format % value without %

local ppRaw = priv.formatNum(entry.value)

local pp = pRaw .. "%%"

local label = tpl

-- aliases

label = label

:gsub("%$label", "$L")

:gsub("%$auto", "$v")

:gsub("%$value", "$d")

:gsub("%$percent", "$p")

-- replace variables

label = label:gsub("%$L", labelLabel)

local d = priv.formatLargeNum(entry.raw and entry.raw or entry.value)

local v = entry.raw and (d .. " (" .. pp .. ")") or pp

label = label

:gsub("%$p", pp)

:gsub("%$d", d)

:gsub("%$v", v)

-- Report unknown variables

-- default template

for var in label:gmatch("%$[a-zA-Z]+") do

if not tpl then

tpl-- =in "$v"preview

mw.addWarning("pie chart: Unknown variable (wrong format of your label): " .. var)

-- tracing links

_ = mw.title.new("Module:Piechart/tracing/unknown-variable").id

end

local label = ""

if entry.raw then

label = tpl:gsub("%$p", p .. "%%"):gsub("%$d", entry.raw):gsub("%$v", entry.raw .. " (" .. p .. "%%)")

else

label = tpl:gsub("%$v", p .. "%%")

end

return label

end

Line 531 ⟶ 658:

-- default colors

-- source: https://colorbrewer2.org/#type=diverging&scheme=PRGn&n=6

local colorGroupSize = 3 -- must be at least 3

local colorGroups = 4

local colorPalette = {

-- green (from dark)

Line 551 ⟶ 680:

local lastColor = '#fff'

-- background color from entry or the default colors

function priv.backColor(entry, no, total)

if (type(entry.color) == "string") then

-- Remove unsafe characters from entry.color

local sanitizedColor = entry.color:gsub("[^a-zA-Z0-9#%-]", "")

:gsub('&#35;', '#') -- workaround Module:Political_party issue reported on talk

return 'background:' .. sanitizedColor

:gsub("[^a-zA-Z0-9#%-]", "")

else

return 'background:' .. sanitizedColor

local color = defaultColor(no)

else

return 'background:' .. color

local color = priv.defaultColor(no, total)

end

return 'background:' .. color

end

end

-- color from the default colors

function priv.defaultColor(no, total)

-- last entry color for 0 or -1

function defaultColor(no)

local color = lastColor

if (no ><= 0) then

return color

local cIndex = (no - 1) % #colorPalette + 1

end

color = colorPalette[cIndex]

local size = #colorPalette

if not total or total == 0 then

total = size + 1

end

local colorNo = priv.defaultColorNo(no, total, size)

if colorNo > 0 then

color = colorPalette[colorNo]

end

return color

end

-- gets color number from default colors

-- trys to return a light color as the last one

-- 0 means white-ish color should be used

function priv.defaultColorNo(no, total, size)

local color = 0 -- special, lastColor

if total == 1 then

color = 1

elseif total <= colorGroupSize * (colorGroups - 1) then

if no < total then

color = no

else

local groupIndex = ((no - 1) % colorGroupSize)

if groupIndex == 0 then -- dark

color = no+1

elseif groupIndex == 1 then -- med

color = no+1

else

color = no

end

end

elseif no < total then

color = ((no - 1) % size) + 1

end

return color

end

--[[

Testing defaultColorNo:

p.__priv.test_defaultColorNo(1, 12)

p.__priv.test_defaultColorNo(2, 12)

p.__priv.test_defaultColorNo(3, 12)

p.__priv.test_defaultColorNo(4, 12)

p.__priv.test_defaultColorNo(5, 12)

p.__priv.test_defaultColorNo(6, 12)

]]

function priv.test_defaultColorNo(total, size)

for no=1,total do

local color = priv.defaultColorNo(no, total, size)

mw.logObject({no=no, color=color})

end

end

Line 579 ⟶ 756:

`s:gsub(...)` returns a string and a number

]]

function priv.trim(s)

return (s:gsub("^%s+", ""):gsub("%s+$", ""))

end

Line 594 ⟶ 771:

-- mw.log(p.extract_text("sandwiches: $v"))

function p.extract_text(label)

label = label

-- quick death mode

-- replace links with pipe (e.g., [[candy|sweets]])

if not label:find("%[%[") then

:gsub("%[%[[^|%]]+|(.-)%]%]", "%1")

return label

-- replace simple links without pipe (e.g., [[sandwich]])

end

:gsub("%[%[(.-)%]%]", "%1")

-- replace links with pipe (e.g., [[candy|sweets]])

-- remove templates?

label = label:gsub("%[%[[^|%]]+|(.-)%]%]", "%1")

-- :gsub("{.-}", "")

-- replace simple links without pipe (e.g., [[sandwich]])

-- remove tags

label = label:gsub("%[%[(.-)%]%]", "%1")

:gsub("<[^>]+>", "")

-- escape special chars just in case

return label

:gsub("<", "&lt;"):gsub(">", "&gt;")

:gsub("'", "&#39;"):gsub("\"", "&quot;")

return label

end

Line 619 ⟶ 799:

]]

function p.parseEnumParams(frame)

local args = frame:getParent().args

return priv.parseEnumParams(args)

local result = {}

end

function priv.parseEnumParams(args)

local i = 1

local result = {}

local i = 1

local sum = 0.0

local hasCustomColor = false -- has last custom color

while args["value" .. i] do

-- value is required in this mode; it's also assumed to be 0..100

local entry = { value = tonumber(args["value" .. i]) or 0 }

-- label and color is optional

local if args["label" .. i] and= args["label" .. i] ~= "" then

if label and label ~= "" then

entry.label = args["label" .. i] .. " ("..entry.value.."%)"

entry.label = label

end

end

hasCustomColor = false

hasCustomColor = false

if args["color" .. i] and args["color" .. i] ~= "" then

local entry.color = args["color" .. i]

if color and color ~= "" then

hasCustomColor = true

entry.color = color

end

hasCustomColor = true

table.insert(result, entry)

end

sum = sum + entry.value

table.insert(result, entry)

i = i + 1

sum = sum + entry.value

end

i = i + 1

-- support other value mapping

local lang = mw.language.getContentLanguage()

local langOther = "Other"

if (lang:getCode() == 'pl') then

langOther = "Inne"

end

-- re-loop to set values in labels

local willAutoscale = priv.willAutoscale(sum)

for _, entry in ipairs(result) do

local label = entry.label

if label and not label:find("%$[a-z]") then

-- autoscale will be forced, so use $v in labels

if willAutoscale then

entry.label = label .. " $v"

else

entry.label = label .. " ($p)"

end

end

end

-- tracking data errors

priv.sumErrorTracking(sum, result)

-- support other value mapping

local langOther = priv.getLangOther()

local colorOther = "#FEFDFD" -- white-ish for custom colors for best chance and contrast

local otherValue = 100 - sum

if args["other"] and args["other"] ~= "" then

if args["other"] and args["other"] ~= "" then

local value = 100 - sum

if valueotherValue < 0.001 then

valueotherValue = 0

end

local otherEntry = { label = (args["other-label"] or langOther) .. " ($p)" }

if args["other-color"] and args["other-color"] ~= "" then

otherEntry.color = args["other-color"]

else

otherEntry.color = colorOther

end

table.insert(result, otherEntry)

elseif otherValue > 0.01 then

if hasCustomColor then

table.insert(result, {visible = false, label = langOther .. " ($v)", color = colorOther})

else

table.insert(result, {visible = false, label = langOther .. " ($v)"})

end

local otherEntry = { label = (args["other-label"] or langOther) .. " ("..formatNum(value).."%)" }

if args["other-color"] and args["other-color"] ~= "" then

otherEntry.color = args["other-color"]

else

otherEntry.color = colorOther

end

table.insert(result, otherEntry)

elseif sum < 100 then

if hasCustomColor then

table.insert(result, {visible = false, label = langOther .. " ($v)", color = colorOther})

else

table.insert(result, {visible = false, label = langOther .. " ($v)"})

end

end

local jsonString = mw.text.jsonEncode(result)

return jsonString

end

function priv.getLangOther()

-- support other value mapping

local lang = mw.language.getContentLanguage()

if (lang:getCode() == 'pl') then

return "Inne"

end

return "Other"

end

-- Function to check if a value is true-ish

local trueValues = { ["true"] = true, ["1"] = true, ["on"] = true, ["yes"] = true }

function priv.isTrueishValue(value)

-- should return nil for empty args (i.e. undefined i.e. default)

if not value or value == "" then return nil end

value = priv.trim(value)

if value == "" then return nil end

-- other non-empty are false

return trueValues[value:lower()] or false

end

--[[

Parse classic template params into JSON with chart meta data.

]]

function p.parseMetaParams(frame)

local args = frame:getParent().args

local meta = {}

-- default meta for value1..n parameters

-- ...and for thumb right/left

local thumb = args["thumb"]

if args["value1"] or (thumb and (thumb == "right" or thumb == "left")) then

meta.size = 200

meta.legend = true

end

-- explicit meta param

if args["meta"] then

local decodeSuccess, tempMeta = pcall(function()

return mw.text.jsonDecode(args["meta"], mw.text.JSON_TRY_FIXING)

end)

if not decodeSuccess then

mw.log('invalid meta parameter')

else

meta = tempMeta

end

end

if args["size"] then meta.size = tonumber(args["size"]) end

if args["radius"] and tonumber(args["radius"]) then

meta.size = 2 * tonumber(args["radius"])

end

if args["autoscale"] then meta.autoscale = priv.isTrueishValue(args["autoscale"]) end

if args["legend"] then meta.legend = priv.isTrueishValue(args["legend"]) end

if args["ariahidechart"] then meta.ariahidechart = priv.isTrueishValue(args["ariahidechart"]) end

if args["direction"] and args["direction"] ~= "" then

meta.direction = args["direction"]:gsub("[^a-z0-9%-]", "")

end

if args["width"] and args["width"] ~= "" then

meta.width = args["width"]:gsub("[^a-z0-9%-]", "")

end

if args["caption"] and args["caption"] ~= "" then

meta.caption = args["caption"]

end

if args["footer"] and args["footer"] ~= "" then

meta.footer = args["footer"]

end

if args["labelformat"] and args["labelformat"] ~= "" then

meta.labelformat = args["labelformat"]

end

return mw.text.jsonEncode(meta)

end