Xenharmonic Wiki

Module:Template input parse: Difference between revisions

← Older edit
Ganaram inukshuk (talk | contribs)
autopatrolled
4,810 edits
m Cleared todo: since tip's purpose is to parse template input, the absence of input should just be an empty table, not nil
Ganaram inukshuk (talk | contribs)
autopatrolled
4,810 edits
m testing...?
 
(2 intermediate revisions by 2 users not shown)
Line 8: Line 8:
function p.parse_entries(unparsed, delimiter)
function p.parse_entries(unparsed, delimiter)
local parsed = {}
local parsed = {}
local delimiter = delimiter or ';'
local delimiter = delimiter or ";"
local expr = '([^' .. delimiter .. ']+)'
local expr = "([^" .. delimiter .. "]+)"
for entry in string.gmatch(unparsed, expr) do
for entry in string.gmatch(unparsed, expr) do
local trimmed = entry:gsub("^%s*(.-)%s*$", "%1")
local trimmed = entry:gsub("^%s*(.-)%s*$", "%1")
Line 23: Line 23:
function p.parse_numeric_entries(unparsed, delimiter)
function p.parse_numeric_entries(unparsed, delimiter)
local parsed = {}
local parsed = {}
local delimiter = delimiter or ';'
local delimiter = delimiter or ";"
local expr = '([^' .. delimiter .. ']+)'
local expr = "([^" .. delimiter .. "]+)"
for entry in string.gmatch(unparsed, expr) do
for entry in string.gmatch(unparsed, expr) do
local trimmed = entry:gsub("^%s*(.-)%s*$", "%1")
local trimmed = entry:gsub("^%s*(.-)%s*$", "%1")
Line 37: Line 37:
function p.parse_pair(unparsed, delimiter)
function p.parse_pair(unparsed, delimiter)
local parsed = {}
local parsed = {}
local delimiter = delimiter or ':'
local delimiter = delimiter or ":"
local expr = '([^' .. delimiter .. ']+)'
local expr = "([^" .. delimiter .. "]+)"
for entry in string.gmatch(unparsed, expr) do
for entry in string.gmatch(unparsed, expr) do
local trimmed = entry:gsub("^%s*(.-)%s*$", "%1")
local trimmed = entry:gsub("^%s*(.-)%s*$", "%1")
Line 52: Line 52:
-- Helper function
-- Helper function
-- Parses a pair of numeric values
-- Parses a pair of numeric values
function p.parse_numeric_pair(unparsed, delimiter)
-- Passing in TRUE for is_fuzzy allows singular values to be parsed as ratios
-- whose denominator is 1; default is FALSE
function p.parse_numeric_pair(unparsed, delimiter, is_fuzzy)
local parsed = {}
local parsed = {}
local delimiter = delimiter or ':'
local delimiter = delimiter or ":"
local expr = '([^' .. delimiter .. ']+)'
local is_fuzzy = is_fuzzy or false
local expr = "([^" .. delimiter .. "]+)"
for entry in string.gmatch(unparsed, expr) do
for entry in string.gmatch(unparsed, expr) do
local trimmed = entry:gsub("^%s*(.-)%s*$", "%1")
local trimmed = entry:gsub("^%s*(.-)%s*$", "%1")
Line 63: Line 66:
if #parsed == 2 then
if #parsed == 2 then
return parsed
return parsed
elseif #parsed == 1 and is_fuzzy then
return { parsed[1], 1 }
else
else
return nil
return nil
Line 75: Line 80:
-- as the intended use is parsing ratios a/b, so input must be formatted as such
-- as the intended use is parsing ratios a/b, so input must be formatted as such
-- "a/b; c/d; e/f"
-- "a/b; c/d; e/f"
function p.parse_numeric_pairs(unparsed, delimiter1, delimiter2)
-- Passing in TRUE for is_fuzzy allows singular values to be parsed as ratios
-- whose denominator is 1; defualt is FALSE.
function p.parse_numeric_pairs(unparsed, delimiter1, delimiter2, is_fuzzy)
local delimiter1 = delimiter1 or ";"
local delimiter1 = delimiter1 or ";"
local delimiter2 = delimiter2 or "/"
local delimiter2 = delimiter2 or "/"
local is_fuzzy = is_fuzzy or false
-- Split the string of unparsed pairs
-- Split the string of unparsed pairs
local parsed = p.parse_entries(unparsed, delimiter1)
local parsed = p.parse_entries(unparsed, delimiter1)
Line 83: Line 91:
local pairs_ = {}
local pairs_ = {}
for i = 1, #parsed do
for i = 1, #parsed do
local pair = p.parse_numeric_pair(parsed[i], delimiter2)
local pair = p.parse_numeric_pair(parsed[i], delimiter2, is_fuzzy)
if pair ~= nil and #pair == 2 then
table.insert(pairs_, pair)
end
end
return pairs_
end
 
-- Helper function
-- A less strict version of parse-numeric-pairs that parses singular values
-- as a ratio with denominator 1.
function p.parse_numeric_pair_fuzzy(unparsed, delimiter)
local parsed = {}
local delimiter = delimiter or ':'
local expr = '([^' .. delimiter .. ']+)'
for entry in string.gmatch(unparsed, expr) do
local trimmed = entry:gsub("^%s*(.-)%s*$", "%1")
local numeric = tonumber(trimmed)
table.insert(parsed, numeric) -- Add to array
end
if #parsed == 2 then
return parsed
elseif #parsed == 1 then
return { parsed[1], 1 }
else
return nil
end
end
 
-- Helper function
-- Parses a list of numeric pairs, where if values are not ratios, they're
-- interpreted as ratios with denominator 1.
function p.parse_numeric_pairs_fuzzy(unparsed, delimiter1, delimiter2)
local delimiter1 = delimiter1 or ";"
local delimiter2 = delimiter2 or "/"
-- Split the string of unparsed pairs
local parsed = p.parse_entries(unparsed, delimiter1)
-- Then tokenize the tokens into numeric pairs
local pairs_ = {}
for i = 1, #parsed do
local pair = p.parse_numeric_pair_fuzzy(parsed[i], delimiter2)
if pair ~= nil and #pair == 2 then
if pair ~= nil and #pair == 2 then
table.insert(pairs_, pair)
table.insert(pairs_, pair)
Line 150: Line 118:
end
end


function p.tester()
function p.tester()
local parse_me = "15625/15552; 325/324, 625/624"
return p.parse_numeric_pairs_fuzzy("2.5.7/6.11/6", ".", "/")
local parsed_me = p.parse_entries(parse_me, ";")
local parsed_me_2 = {}
for i = 1, #parsed_me do
local parsed = p.parse_numeric_pairs(parsed_me[i], ",", false)
table.insert(parsed_me_2, parsed)
end
return parsed_me_2
end
end


return p
return p
Retrieved from "https://en.xen.wiki/w/Module:Template_input_parse"