Ticket #2092: patch-1.5.11.tamo.iso8601.1

diff -r e0ed9b512a7b pattern.c
--- a/pattern.c Fri Sep 23 07:29:53 2005
+++ b/pattern.c Tue Sep 27 01:15:38 2005
@@ -429,6 +429,60 @@
   return 0;
 }
 
+static const char *getISO8601 (const char *s, struct tm *t, BUFFER *err)
+{
+  const char *p;
+  char buf[9];
+  time_t now = time (NULL);
+  struct tm *tm = localtime (&now);
+  size_t len = strspn (s, "0123456789");
+
+  if (len < 3 || len > 8)
+  {
+    snprintf (err->data, err->dsize, _("Invalid day of month: %s"), s);
+    return NULL;
+  }
+
+  p = s + len;
+  strfcpy (buf, s, sizeof (buf));
+  buf[len] = '\0';
+
+  t->tm_mday = strtol (buf + len - 2, NULL, 10);
+  if (t->tm_mday < 1 || t->tm_mday > 31)
+  {
+    snprintf (err->data, err->dsize, _("Invalid day of month: %s"), buf + len - 2);
+    return NULL;
+  }
+  buf[len -= 2] = '\0';
+
+  if (len == 1) /* "312" => Mar 12 */
+    len++;
+  t->tm_mon = strtol (buf + len - 2, NULL, 10) - 1;
+  if (t->tm_mon < 0 || t->tm_mon > 11)
+  {
+    snprintf (err->data, err->dsize, _("Invalid month: %s"), buf + len - 2);
+    return NULL;
+  }
+  buf[len -= 2] = '\0';
+
+  if (len < 2)
+  {
+    t->tm_year = tm->tm_year;
+    return p;
+  }
+  if (len == 3)
+  {
+    snprintf (err->data, err->dsize, _("Invalid year: %s"), buf);
+    return NULL;
+  }
+  t->tm_year = strtol (buf, NULL, 10);
+  if (t->tm_year < 70) /* year 2000+ */
+    t->tm_year += 100;
+  else if (t->tm_year > 1900)
+    t->tm_year -= 1900;
+  return p;
+}
+
 static const char *getDate (const char *s, struct tm *t, BUFFER *err)
 {
   char *p;
@@ -437,10 +491,7 @@
 
   t->tm_mday = strtol (s, &p, 10);
   if (t->tm_mday < 1 || t->tm_mday > 31)
-  {
-    snprintf (err->data, err->dsize, _("Invalid day of month: %s"), s);
-    return NULL;
-  }
+    return (getISO8601 (s, t, err));
   if (*p != '/')
   {
     /* fill in today's month and year */