make dateparsing case insensitive

Acourding to RFC 5322 and 5234 the date field
is case insenitive

diff --git a/sbr/dtimep.lex b/sbr/dtimep.lex
index 4f07aac..340abf1 100644 (file)
--- a/sbr/dtimep.lex
+++ b/sbr/dtimep.lex
@@ -125,28 +125,28 @@ zonehack (struct tws *tw)
 #endif /* ADJUST_NUMERIC_ONLY_TZ_OFFSETS_WRT_DST */
 %}
 
-sun    ([Ss]un(day)?)
-mon    ([Mm]on(day)?)
-tue    ([Tt]ue(sday)?)
-wed    ([Ww]ed(nesday)?)
-thu    ([Tt]hu(rsday)?)
-fri    ([Ff]ri(day)?)
-sat    ([Ss]at(urday)?)
+sun    ([Ss][Uu][Nn]([Dd][Aa][Yy])?)
+mon    ([Mm][Oo][Nn]([Dd][Aa][Yy])?)
+tue    ([Tt][Uu][Ee]([Ss][Dd][Aa][Yy])?)
+wed    ([Ww][Ee][Dd]([Nn][Ee][Ss][Dd][Aa][Yy])?)
+thu    ([Tt][Hh][Uu]([Rr][Ss][Dd][Aa][Yy])?)
+fri    ([Ff][Rr][Ii]([Dd][Aa][Yy])?)
+sat    ([Ss][Aa][Tt]([Uu][Rr][Dd][Aa][Yy])?)
 
 DAY    ({sun}|{mon}|{tue}|{wed}|{thu}|{fri}|{sat})
 
-jan    ([Jj]an(uary)?)
-feb    ([Ff]eb(ruary)?)
-mar    ([Mm]ar(ch)?)
-apr    ([Aa]pr(il)?)
-may    ([Mm]ay)
-jun    ([Jj]un(e)?)
-jul    ([Jj]ul(y)?)
-aug    ([Aa]ug(ust)?)
-sep    ([Ss]ep(tember)?)
-oct    ([Oo]ct(ober)?)
-nov    ([Nn]ov(ember)?)
-dec    ([Dd]ec(ember)?)
+jan    ([Jj][Aa][Nn]([Uu][Aa][Rr][Yy])?)
+feb    ([Ff][Ee][Bb]([Rr][Uu][Aa][Rr][Yy])?)
+mar    ([Mm][Aa][Rr]([Cc][Hh])?)
+apr    ([Aa][Pp][Rr]([Ii][Ll])?)
+may    ([Mm][Aa][Yy])
+jun    ([Jj][Uu][Nn]([Ee])?)
+jul    ([Jj][Uu][Ll]([Yy])?)
+aug    ([Aa][Uu][Gg]([Uu][Ss][Tt])?)
+sep    ([Ss][Ee][Pp]([Tt][Ee][Mm][Bb][Ee][Rr])?)
+oct    ([Oo][Cc][Tt]([Oo][Bb][Ee][Rr])?)
+nov    ([Nn][Oo][Vv]([Ee][Mm][Bb][Ee][Rr])?)
+dec    ([Dd][Ee][Cc]([Ee][Mm][Bb][Ee][Rr])?)
 
 MONTH  ({jan}|{feb}|{mar}|{apr}|{may}|{jun}|{jul}|{aug}|{sep}|{oct}|{nov}|{dec})