local main = ;
local monthIndices =
local monthDays =
function checkIfDayValid(day, month, year) -- First check that the month can have at least this many days if (day > monthDays[month]) then return false end
-- February leap year check if (month
29 and not year) then return true end -- On Feb 29, check for valid year - every 4 but not 100 but 400 if (day
0) and (year % 100 ~= 0) or (year % 400
return trueend
function checkIfMonthValid(month) return month ~= 0 and month <= 12 -- <0 never happens with [0-9] patternend
function checkIfYearValid(year) return year >= 1583 -- up to 9999end
function checkIfHourValid(hour) return hour < 24 -- <0 never happens with [0-9] patternend
function checkIfMinuteValid(minute) return minute < 60 -- <0 never happens with [0-9] patternend
function checkIfSecondValid(second) return second < 60 -- <0 never happens with [0-9] patternend
local PARSERESULT_OKAY = 1local PARSERESULT_FAIL = 2 -- whatever we encountered isn't expected for any patternlocal PARSERESULT_UNCRECOGNIZED = 3 -- 14 May 12, 2014 (all elements okay, no pattern)local PARSERESULT_INCOMPLETE = 4 -- May 3local PARSERESULT_INCOMPLETERANGE = 5 -- 3 May 2012 - June 2013local PARSERESULT_INVALID = 6 -- May 32local PARSERESULT_INVALIDRANGE = 7 -- May 3 - May 2
-- This will first verify that we have a valid date and time and then output an ISO datetime stringfunction checkAndOutput(year, month, day, hour, minute, second, year2, month2, day2, hour2, minute2, second2)
local s
if (year and not checkIfYearValid(year)) then return PARSERESULT_INVALID; end if (month and not checkIfMonthValid(month)) then return PARSERESULT_INVALID; end if (day and not checkIfDayValid(day, month, year)) then return PARSERESULT_INVALID; end if (hour and not checkIfHourValid(hour)) then return PARSERESULT_INVALID; end if (minute and not checkIfMinuteValid(minute)) then return PARSERESULT_INVALID; end if (second and not checkIfSecondValid(second)) then return PARSERESULT_INVALID; end
if (year2 and not checkIfYearValid(year2)) then return PARSERESULT_INVALID; end if (month2 and not checkIfMonthValid(month2)) then return PARSERESULT_INVALID; end if (day2 and not checkIfDayValid(day2, month2, year2)) then return PARSERESULT_INVALID; end if (hour2 and not checkIfHourValid(hour2)) then return PARSERESULT_INVALID; end if (minute2 and not checkIfMinuteValid(minute2)) then return PARSERESULT_INVALID; end if (second2 and not checkIfSecondValid(second2)) then return PARSERESULT_INVALID; end
-- Check that end date is actually after start date if (year2 and year) then if (year2 < year) then return PARSERESULT_INVALIDRANGE end if (year2
month) then if (day2 and day) then if (day2 < day) then return PARSERESULT_INVALIDRANGE end -- TODO: compare time end end end end end
-- Check that the date is actually complete even if valid if (month and month2 and not year) then return PARSERESULT_INCOMPLETERANGE end -- any of 'd-dM', 'dM-dM', 'Md-d', 'Md-Md' if (month and not year) then return PARSERESULT_INCOMPLETE end -- 'May', 'May 15', '15 May' if (month2 and not year2) then return PARSERESULT_INCOMPLETE end -- same but other end -- While technically there are more cases, none should have been matched and been given to us local date1, time1, date2, time2
-- time only if (second and not year) then time1 = string.format('%02d:%02d:%02d', hour, minute, second) elseif (minute and not year) then time1 = string.format('%02d:%02d', hour, minute) elseif (hour and not year) then time1 = string.format('%02d', hour)
-- date and time elseif (second) then date1 = string.format('%d-%02d-%02d', year, month, day) time1 = string.format('%02d:%02d:%02d', hour, minute, second) elseif (minute) then date1 = string.format('%d-%02d-%02d', year, month, day) time1 = string.format('%02d:%02d', hour, minute) elseif (hour) then date1 = string.format('%d-%02d-%02d', year, month, day) time1 = string.format('%02d', hour)
-- date only elseif (day) then date1 = string.format('%d-%02d-%02d', year, month, day) elseif (month) then date1 = string.format('%d-%02d', year, month) elseif (year) then date1 = string.format('%d', year) end
-- time only if (second2 and not year2) then time2 = string.format('%02d:%02d:%02d', hour2, minute2, second2) elseif (minute2 and not year2) then time2 = string.format('%02d:%02d', hour2, minute2) elseif (hour2 and not year2) then time2 = string.format('%02d', hour2)
-- date and time elseif (second2) then date2 = string.format('%d-%02d-%02d', year2, month2, day2) time2 = string.format('%02d:%02d:%02d', hour2, minute2, second2) elseif (minute2) then date2 = string.format('%d-%02d-%02d', year2, month2, day2) time2 = string.format('%02d:%02d', hour2, minute2) elseif (hour2) then date2 = string.format('%d-%02d-%02d', year2, month2, day2) time2 = string.format('%02d', hour2)
-- date only elseif (day2) then date2 = string.format('%d-%02d-%02d', year2, month2, day2) elseif (month2) then date2 = string.format('%d-%02d', year2, month2) elseif (year2) then date2 = string.format('%d', year2) end
return PARSERESULT_OKAY, date1, time1, date2, time2 -- this function wouldn't be called withotu matching pattern, so at least 1 value should have been filled
end
function periodHourAdd(period) if (period
'p.m' or period
'p.m.') then -- random '.' is pattern match artifact return 12 else return 0 endend
local seekString -- this is our local seek string, so we don't have to pass it as parameter every time
local currentPosition -- this keeps track of where we are in seeking our current string
-- These are the element type "constants" for readability mostlylocal ELEMENT_INVALID = 1local ELEMENT_ONETWODIGITS = 2 -- '1' '12' '01'local ELEMENT_FOURDIGITS = 3 -- '1234'local ELEMENT_WHITESPACE = 4 -- ' ' ' 'local ELEMENT_MONTHWORD = 5 -- 'May' 'February' 'Aug'local ELEMENT_COMMA = 6 -- ',' ', 'local ELEMENT_DASH = 7 -- '-' ' - ' ' — ' '- ' ' -'local ELEMENT_DATESEPARATOR = 8 -- '-'local ELEMENT_TIMESEPARATOR = 9 -- ':'local ELEMENT_TIMEPERIOD = 10 -- 'am' 'p.m.'local ELEMENT_PERIODWHITESPACE = 11 -- '.' or '. 'local ELEMENT_ONETWODIGITSWITHORDINAL = 12 -- '12th' '3rd'
function seekNextElement -- Profiler says mw.ustring.find is the bottleneck, probably because it's unicode; not sure how to improve though besides writing my own pattern matcher
-- Digits with letters local foundPositionStart, foundPositionEnd, foundMatch, foundMatch2 = mw.ustring.find(seekString, '^([0-9]+)([a-z]+)%.?', currentPosition) if (foundPositionStart) then --currentPosition = foundPositionEnd + 1 -- this is our new start location -- only if we return -- Additionally check how many digits we actually have, as arbitrary number isn't valid if (#foundMatch <= 2) then -- most likely a day number if (foundMatch2
'nd' or foundMatch2
'th') then -- won't bother checking against a number, no false positives that I saw in 120k cases currentPosition = foundPositionEnd + 1 -- this is our new start location (forced to do this here, since we don't always return) return ELEMENT_ONETWODIGITSWITHORDINAL, tonumber(foundMatch), (currentPosition > mw.ustring.len(seekString)) --else -- let it capture digits again, this time '10am' '8p.m.' will be separate -- return ELEMENT_INVALID -- not a valid ordinal indicator end --else -- let it capture digits again, this time '10am' '8p.m.' will be separate -- return ELEMENT_INVALID -- just the invalid, the number of digits (3+) won't match any patterns end end -- Digits local foundPositionStart, foundPositionEnd, foundMatch = mw.ustring.find(seekString, '^([0-9]+)', currentPosition) if (foundPositionStart) then currentPosition = foundPositionEnd + 1 -- this is our new start location
-- Additionally check how many digits we actually have, as arbitrary number isn't valid if (#foundMatch <= 2) then -- most likely a day number or time number return ELEMENT_ONETWODIGITS, tonumber(foundMatch), (currentPosition > mw.ustring.len(seekString)) elseif (#foundMatch
-- Time period - a.m./p.m. (before letters) foundPositionStart, foundPositionEnd, foundMatch = mw.ustring.find(seekString, '^%s*([ap]%.?m%.?)', currentPosition) if (foundPositionStart) then currentPosition = foundPositionEnd + 1 -- this is our new start location return ELEMENT_TIMEPERIOD, foundMatch, (currentPosition > mw.ustring.len(seekString)) end
-- Word foundPositionStart, foundPositionEnd, foundMatch = mw.ustring.find(seekString, '^([A-Za-z]+)', currentPosition) if (foundPositionStart) then currentPosition = foundPositionEnd + 1 -- this is our new start location
if (#foundMatch >= 3) then
-- Find the possible month name index monthIndex = monthIndices[mw.ustring.lower(foundMatch)]
if (monthIndex) then return ELEMENT_MONTHWORD, monthIndex, (currentPosition > mw.ustring.len(seekString)) else return ELEMENT_INVALID -- just the invalid, the word didn't match a valid month name end else -- TODO LETTERS return ELEMENT_INVALID -- just the invalid, the word was too short to be valid month name end end
-- Time separator (colon without whitespace) foundPositionStart, foundPositionEnd, foundMatch = mw.ustring.find(seekString, '^(:)', currentPosition) if (foundPositionStart) then currentPosition = foundPositionEnd + 1 -- this is our new start location return ELEMENT_TIMESEPARATOR, foundMatch, (currentPosition > mw.ustring.len(seekString)) end
-- Comma and any following whitespace foundPositionStart, foundPositionEnd, foundMatch = mw.ustring.find(seekString, '^(%s*)', currentPosition) if (foundPositionStart) then currentPosition = foundPositionEnd + 1 -- this is our new start location return ELEMENT_COMMA, foundMatch, (currentPosition > mw.ustring.len(seekString)) end -- Period and any following whitespace ('Feb. 2010' or '29. June') foundPositionStart, foundPositionEnd, foundMatch = mw.ustring.find(seekString, '^(%.%s*)', currentPosition) if (foundPositionStart) then currentPosition = foundPositionEnd + 1 -- this is our new start location return ELEMENT_PERIODWHITESPACE, foundMatch, (currentPosition > mw.ustring.len(seekString)) end -- Dash with possible whitespace or Date separator (dash without whitespace) -- Both non-breaking spaces - ' - ' foundPositionStart, foundPositionEnd, foundMatch = mw.ustring.find(seekString, '^( [%-–—] )', currentPosition) if (foundPositionStart) then currentPosition = foundPositionEnd + 1 -- this is our new start location return ELEMENT_DASH, foundMatch, (currentPosition > mw.ustring.len(seekString)) end -- Non-breaking space - ' - ' foundPositionStart, foundPositionEnd, foundMatch = mw.ustring.find(seekString, '^( [%-–—]%s*)', currentPosition) if (foundPositionStart) then currentPosition = foundPositionEnd + 1 -- this is our new start location return ELEMENT_DASH, foundMatch, (currentPosition > mw.ustring.len(seekString)) end -- Dash entity code and both non-breaking spaces - ' - ' foundPositionStart, foundPositionEnd, foundMatch = mw.ustring.find(seekString, '^( &[nm]dash; )', currentPosition) if (foundPositionStart) then currentPosition = foundPositionEnd + 1 -- this is our new start location return ELEMENT_DASH, foundMatch, (currentPosition > mw.ustring.len(seekString)) end -- Dash entity code and non-breaking space - ' - ' foundPositionStart, foundPositionEnd, foundMatch = mw.ustring.find(seekString, '^( &[nm]dash;%s*)', currentPosition) if (foundPositionStart) then currentPosition = foundPositionEnd + 1 -- this is our new start location return ELEMENT_DASH, foundMatch, (currentPosition > mw.ustring.len(seekString)) end -- Dash entity code - ' - ' foundPositionStart, foundPositionEnd, foundMatch = mw.ustring.find(seekString, '^(%s*&[nm]dash;%s*)', currentPosition) if (foundPositionStart) then currentPosition = foundPositionEnd + 1 -- this is our new start location return ELEMENT_DASH, foundMatch, (currentPosition > mw.ustring.len(seekString)) end -- Regular whitespace foundPositionStart, foundPositionEnd, foundMatch = mw.ustring.find(seekString, '^(%s*[%-–—]%s*)', currentPosition) if (foundPositionStart) then currentPosition = foundPositionEnd + 1 -- this is our new start location if (foundMatch
-- Whitespace (after all others that capture whitespace) foundPositionStart, foundPositionEnd, foundMatch = mw.ustring.find(seekString, '^(%s+)', currentPosition) if (foundPositionStart) then currentPosition = foundPositionEnd + 1 -- this is our new start location return ELEMENT_WHITESPACE, foundMatch, (currentPosition > mw.ustring.len(seekString)) end -- Whitespace -- same as above but using (other that for dashes) foundPositionStart, foundPositionEnd, foundMatch = mw.ustring.find(seekString, '^ ', currentPosition) if (foundPositionStart) then currentPosition = foundPositionEnd + 1 -- this is our new start location return ELEMENT_WHITESPACE, foundMatch, (currentPosition > mw.ustring.len(seekString)) end
return ELEMENT_INVALID -- just the invalid, we won't be parsing this further
end
function parseDateString(input)
-- Reset our seek string and position seekString = input currentPosition = 1
local elements = local values =
-- Seek the entire string now local numberOfElements = 0 repeat
foundElement, foundValue, eos = seekNextElement
-- If we found something we can't process, return as unparsable if (foundElement
numberOfElements = numberOfElements + 1 elements[numberOfElements] = foundElement values[numberOfElements] = foundValue
until eos
--
-- Now comes an uber-deep if-then-else tree -- This is roughly the most efficient step-by-step parsing, something like log(N) -- Doing each combination via pattern/"Regex" is way slower -- Having each combination a clean function/preset means checking every element, so way slower -- Only immediate big improvement is to only seekNextElement when actually checking that deep, though this will make a (even bigger) mess
if (elements[1]
ELEMENT_ONETWODIGITSWITHORDINAL) then -- '3' or '10' or '12th' if (elements[2]
ELEMENT_PERIODWHITESPACE) then -- '3 ' or '3. ' if (elements[3]
3) then return checkAndOutput(nil, values[3], values[1], nil, nil, nil) end if (elements[4]
ELEMENT_PERIODWHITESPACE or elements[4]
ELEMENT_FOURDIGITS) then -- '3 May 2013' if (numberOfElements
ELEMENT_WHITESPACE or elements[6]
ELEMENT_ONETWODIGITS) then -- '3 May 2013, 10' if (elements[8]
8) then return checkAndOutput(values[5], values[3], values[1], values[7] + periodHourAdd(values[8]), nil, nil) end elseif (elements[8]
ELEMENT_ONETWODIGITS) then -- '3 May 2013, 10:38' if (numberOfElements
ELEMENT_TIMEPERIOD) then -- '3 May 2013, 10:38 am' if (numberOfElements
ELEMENT_TIMESEPARATOR) then -- '3 May 2013, 10:38:' if (elements[11]
11) then return checkAndOutput(values[5], values[3], values[1], values[7], values[9], values[11]) end if (elements[12]
12) then return checkAndOutput(values[5], values[3], values[1], values[7] + periodHourAdd(values[12]), values[9], values[11]) end end end end end end end elseif (elements[6]
ELEMENT_DATESEPARATOR) then -- '3 May 2013 - ' if (elements[7]
ELEMENT_ONETWODIGITSWITHORDINAL) then -- '3 May 2013 - 12' or '3rd May 2013 - 12th' if (elements[8]
ELEMENT_MONTHWORD) then -- '3 May 2013 - 12 February' if (elements[10]
ELEMENT_FOURDIGITS) then -- '3 May 2013 - 12 February 2014' if (numberOfElements
ELEMENT_DASH or elements[4]
ELEMENT_ONETWODIGITS or elements[5]
ELEMENT_WHITESPACE) then -- '3 May - 12 ' if (elements[7]
7) then return checkAndOutput(nil, values[3], values[1], nil, nil, nil, nil, values[7], values[5], nil, nil, nil) end if (elements[8]
ELEMENT_WHITESPACE) then -- '3 May - 12 October ' if (elements[9]
9) then return checkAndOutput(values[9], values[3], values[1], nil, nil, nil, values[9], values[7], values[5], nil, nil, nil) end end end end end end end end elseif (elements[2]
ELEMENT_DATESEPARATOR) then -- '3 - ' if (elements[3]
ELEMENT_ONETWODIGITSWITHORDINAL) then -- '3 - 12' or '3rd - 12th' if (elements[4]
ELEMENT_MONTHWORD) then -- '3 - 12 May' if (numberOfElements
ELEMENT_COMMA or elements[6]
ELEMENT_FOURDIGITS) then -- '3 - 12 May 2013' if (numberOfElements
-- Here's a case where we want to optimize or rather add readability and trim redundancy -- Basically, any time '10am', '10:28', '10:28am', '10:28:27', '10:28:27am' can be followed by a date, which means 5 copies of 30+ lines (urgh) -- Instead we will only check once, but using a different element index offset if needed, so date might start at element 4 or 5 or 6 etc. -- Currently we only have '10', but if it turns out to be a time we will be checking if it's followed by a date
local wasTime = false -- by default we didn't find a valid time syntax, we have '10' and that's not a time by itself without 'am/pm' or further precision local possibleHour, possibleMinute, possibleSecond -- temporary values that we will fill as far as we can when parsing time and use for time+date combo if one is found local i = 0 -- this is our offset from the closest possible location for date seeking
if (elements[2]
ELEMENT_ONETWODIGITS) then -- '10:28' if (numberOfElements
ELEMENT_TIMESEPARATOR) then -- '10:28:' wasTime = false -- a time can't end with separator, so if this is last match, we aren't appending any dates if (elements[5]
5) then return checkAndOutput(nil, nil, nil, values[1], values[3], values[5]) end possibleSecond = values[5] wasTime = true -- this is a valid final time, so we can check date appended to this i = 3 -- '10', ':', '28', ':' and '27' are five elements, so we start 3 further from 3 if (elements[6]
6) then return checkAndOutput(nil, nil, nil, values[1] + periodHourAdd(values[6]), values[3], values[5]) end possibleHour = values[1] + periodHourAdd(values[6]) -- hour now needs possible adjusting since we saw a time period -- wasTime = true -- already set i = 4 -- '10', ':', '28', ':', '27' and 'am' are six elements, so we start 4 further from 3 end end elseif (elements[4]
4) then return checkAndOutput(nil, nil, nil, values[1] + periodHourAdd(values[4]), values[3], nil) end wasTime = true -- this is a valid final time, so we can check date appended to this possibleHour = values[1] + periodHourAdd(values[4]) -- hour now needs possible adjusting since we saw a time period i = 2 -- '10', ':', '28' and 'am' are four elements, so we start 2 further from 3 end end elseif (elements[2]
2) then return checkAndOutput(nil, nil, nil, values[1] + periodHourAdd(values[2]), nil, nil) end possibleHour = values[1] + periodHourAdd(values[2]) -- only once we see 'am' (or ':' above) it is likely a time wasTime = true -- this is a valid final time, so we can check date appended to this i = 0 -- '10' and 'am' are two elements, so we start at 3 - default end
if (wasTime) then -- '10am', '10:28', '10:28am', '10:28:27', '10:28:27am' (using just '10:28:27...' below) -- Now we will try to append a date to the time if (elements[3+i]
ELEMENT_COMMA) then -- '10:28:27, ' if (elements[4+i]
ELEMENT_WHITESPACE) then -- '10:28:27, 3 ' if (elements[6+i]
ELEMENT_WHITESPACE) then -- '10:28:27, 3 May ' if (elements[8+i]
8+i) then return checkAndOutput(values[8+i], values[6+i], values[4+i], possibleHour, possibleMinute, possibleSecond) end end end end end elseif (elements[4+i]
ELEMENT_WHITESPACE) then -- '10:28:27, May ' if (elements[6+i]
ELEMENT_COMMA or elements[7+i]
ELEMENT_FOURDIGITS) then -- '10:28:27, May 3, 2013' if (numberOfElements
ELEMENT_FOURDIGITS) then -- '10:28:27, 2013' if (elements[5+i]
ELEMENT_ONETWODIGITS) then -- '10:28:27, 2013-05' if (elements[7+i]
ELEMENT_ONETWODIGITS) then -- '10:28:27, 2013-05-03' if (numberOfElements
elseif (elements[1]
1) then return checkAndOutput(values[1], nil, nil, nil, nil, nil) end if (elements[2]
ELEMENT_ONETWODIGITS) then -- '2013-05' --if (numberOfElements
ELEMENT_DATESEPARATOR) then -- '2013-05-' if (elements[5]
5) then return checkAndOutput(values[1], values[3], values[5], nil, nil, nil) end if (elements[6]
ELEMENT_COMMA) then -- '2013-05-03, ' if (elements[7]
ELEMENT_TIMEPERIOD) then -- '2013-05-03, 10 am' if (numberOfElements
ELEMENT_TIMESEPARATOR) then -- '2013-05-03, 10:' if (elements[9]
9) then return checkAndOutput(values[1], values[3], values[5], values[7], values[9], nil) end if (elements[10]
10) then return checkAndOutput(values[1], values[3], values[5], values[7] + periodHourAdd(values[10]), values[9], nil) end elseif (elements[10]
ELEMENT_ONETWODIGITS) then -- '2013-05-03, 10:38:27' if (numberOfElements
ELEMENT_TIMEPERIOD) then -- '2013-05-03, 10:38:27 am' if (numberOfElements
ELEMENT_DASH or elements[2]
ELEMENT_FOURDIGITS) then -- '2013 - 2014' if (numberOfElements
ELEMENT_WHITESPACE or elements[2]
ELEMENT_MONTHWORD) then -- '2013 May' if (numberOfElements
ELEMENT_WHITESPACE) then -- '2013 May ' if (elements[5]
5) then return checkAndOutput(values[1], values[3], values[5], nil, nil, nil) end end end elseif (elements[3]
ELEMENT_WHITESPACE) then -- '2013 15 ' if (elements[5]
5) then return checkAndOutput(values[1], values[5], values[3], nil, nil, nil) end end end end end
elseif (elements[1]
1) then return checkAndOutput(nil, values[1], nil, nil, nil, nil) end if (elements[2]
ELEMENT_PERIODWHITESPACE) then -- 'May ' or 'Feb. ' if (elements[3]
ELEMENT_ONETWODIGITSWITHORDINAL) then -- 'May 3' or 'May 3rd' if (numberOfElements
ELEMENT_COMMA or elements[4]
ELEMENT_FOURDIGITS) then -- 'May 3, 2013' if (numberOfElements
ELEMENT_WHITESPACE or elements[6]
ELEMENT_ONETWODIGITS) then -- May 3, 2013, 10' if (elements[8]
8) then return checkAndOutput(values[5], values[1], values[3], values[7] + periodHourAdd(values[8]), nil, nil) end elseif (elements[8]
ELEMENT_ONETWODIGITS) then -- May 3, 2013, 10:38' if (numberOfElements
ELEMENT_TIMEPERIOD) then -- May 3, 2013, 10:38 am' if (numberOfElements
ELEMENT_TIMESEPARATOR) then -- May 3, 2013, 10:38:' if (elements[11]
11) then return checkAndOutput(values[5], values[1], values[3], values[7], values[9], values[11]) end if (elements[12]
12) then return checkAndOutput(values[5], values[1], values[3], values[7] + periodHourAdd(values[12]), values[9], values[11]) end end end end end end end elseif (elements[6]
ELEMENT_DATESEPARATOR) then -- 'May 3, 2013 - ' if (elements[7]
ELEMENT_WHITESPACE) then -- 'May 3, 2013 - February ' if (elements[9]
ELEMENT_ONETWODIGITSWITHORDINAL) then -- 'May 3, 2013 - February 12' or 'May 3rd, 2013 - February 12th' if (elements[10]
ELEMENT_WHITESPACE) then -- 'May 3, 2013 - February 12, ' if (elements[11]
11) then return checkAndOutput(values[5], values[1], values[3], nil, nil, nil, values[11], values[7], values[9], nil, nil, nil) end end end end end end end end elseif (elements[4]
ELEMENT_DATESEPARATOR) then -- 'May 3 - ' if (elements[5]
ELEMENT_WHITESPACE) then -- 'May 3 - June ' if (elements[7]
ELEMENT_ONETWODIGITSWITHORDINAL) then -- 'May 3 - June 12' or 'May 3rd - June 12th' if (numberOfElements
ELEMENT_COMMA or elements[8]
ELEMENT_FOURDIGITS) then -- 'May 3 - June 12, 2014' if (numberOfElements
ELEMENT_ONETWODIGITS or elements[3]
5) then return checkAndOutput(nil, values[1], values[3], nil, nil, nil, nil, values[1], values[5], nil, nil, nil) end if (elements[6]
ELEMENT_WHITESPACE) then -- 'May 3 - 12, ' if (elements[7]
7) then return checkAndOutput(values[7], values[1], values[3], nil, nil, nil, values[7], values[1], values[5], nil, nil, nil) end end end end end elseif (elements[3]
3) then return checkAndOutput(values[3], values[1], nil, nil, nil, nil) end if (elements[4]
ELEMENT_DATESEPARATOR) then -- 'May 2013 -' if (elements[5]
ELEMENT_WHITESPACE) then -- 'May 2013 - June ' if (elements[7]
7) then return checkAndOutput(values[3], values[1], nil, nil, nil, nil, values[7], values[5], nil, nil, nil, nil) end end end end end end elseif (elements[2]
ELEMENT_DATESEPARATOR) then -- 'May - ' if (elements[3]
ELEMENT_WHITESPACE) then -- 'May - June ' if (elements[5]
5) then return checkAndOutput(values[5], values[1], nil, nil, nil, nil, values[5], values[3], nil, nil, nil, nil) end end end end elseif (elements[2]
ELEMENT_FOURDIGITS) then -- 'May, 2012' if (numberOfElements
else return PARSERESULT_UNRECOGNIZED -- the combination of elements was not a recognized one end
end
function hasMetadataTemplates(input) -- This is a basic list of the template names for metadata emiting tempaltes, there are inr eality more templates and more redirects if (string.match(input, '%