https://dogcraft.net/wiki/index.php?action=history&feed=atom&title=Module%3AYMD_to_ISO 2026-04-12T18:19:47Z Revision history for this page on the wiki MediaWiki 1.39.2 https://dogcraft.net/wiki/index.php?title=Module:YMD_to_ISO&diff=24420&oldid=prev 2022-04-04T20:46:50Z

<p>from wikipedia (https://en.wikipedia.org/w/index.php?title=Module:YMD_to_ISO)</p> <p><b>New page</b></p><div>local p = {}<br /> <br /> local function month_number(month_name)<br /> local months_full = {january=1, february=2, march=3, april=4, may=5, june=6, july=7, august=8, september=9, october=10, november=11, december=12}<br /> local months_abbr = {jan=1, feb=2, mar=3, apr=4, may=5, jun=6, jul=7, aug=8, sep=9, oct=10, nov=11, dec=12}<br /> local month_lc, _ = string.gsub(string.lower(month_name),'%.','',1)<br /> local month_num = months_full[month_lc] or months_abbr[month_lc] or 0<br /> if month_lc == 'sept' then<br /> month_num = 9<br /> end<br /> return month_num<br /> end<br /> <br /> local function days_in_month(month_num,year)<br /> -- modified from code in Module:Citation/CS1/Date_validation<br /> local days = {31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31}<br /> local month_length<br /> if month_num == 2 then -- February: 28 days, unless leap year<br /> month_length = 28<br /> if year &lt;= 1582 then -- Julian calendar before Oct 1582<br /> if (year%4) == 0 then<br /> month_length = 29 -- if leap year, then 29 days<br /> end<br /> else -- Gregorian calendar since Oct 1582<br /> if ( (year%4)==0 and ((year%100)~=0 or (year%400)==0) ) then <br /> month_length = 29 -- if leap year, then 29 days <br /> end<br /> end<br /> else -- not February, get number of days for month<br /> month_length = days[month_num]<br /> end<br /> return month_length<br /> end<br /> <br /> local function zero_pad(string)<br /> if string.len(string) == 1 then<br /> return '0' .. string<br /> else<br /> return string<br /> end<br /> end<br /> <br /> function p.main(frame)<br /> if frame.args[1] == nil then<br /> return '' -- first argument is missing<br /> end<br /> local arg1, _ = string.gsub(mw.text.trim(frame.args[1]),'_',' ')<br /> return p._main(arg1)<br /> end<br /> function p._main(arg1)<br /> if arg1 == '' then<br /> return '' -- first argument is empty<br /> end<br /> if not arg1:match('^%d%d%d%d %a%a%a%a?%.?%a?%a?%a?%a?%a?%a? *%d%d?$') then<br /> return arg1 -- invalid date pattern<br /> end<br /> local year, month_name, day = string.match(arg1, '^(%d%d%d%d) *(%a%a%a%a?%.?%a?%a?%a?%a?%a?%a?) *(%d%d?)$')<br /> if month_number(month_name) == 0 then<br /> return arg1 -- invalid month name or abbreviation<br /> end<br /> if tonumber(day) &lt; 1 or tonumber(day) &gt; days_in_month(month_number(month_name),tonumber(year)) then<br /> return arg1 -- invalid day number for given month<br /> end<br /> return year .. '-' .. zero_pad(tostring(month_number(month_name))) .. '-' .. zero_pad(day)<br /> end<br /> <br /> return p</div>

Domino