2 * Copyright (C) 1996-2000 Michael R. Elkins <me@mutt.org>
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation; either version 2 of the License, or
7 * (at your option) any later version.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, write to the Free Software
16 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111, USA.
24 static const char *next_word (const char *s)
26 while (*s && !ISSPACE (*s))
32 int mutt_check_month (const char *s)
36 for (i = 0; i < 12; i++)
37 if (mutt_strncasecmp (s, Months[i], 3) == 0)
39 return (-1); /* error */
42 static int is_day_name (const char *s)
46 if ((strlen (s) < 3) || !*(s + 3) || !ISSPACE (*(s+3)))
49 if (mutt_strncasecmp (s, Weekdays[i], 3) == 0)
55 * A valid message separator looks like:
57 * From [ <return-path> ] <weekday> <month> <day> <time> [ <timezone> ] <year>
60 int is_from (const char *s, char *path, size_t pathlen, time_t *tp)
68 if (mutt_strncmp ("From ", s, 5) != 0)
71 s = next_word (s); /* skip over the From part. */
75 dprint (3, (debugfile, "\nis_from(): parsing: %s", s));
83 for (p = s; *p && (q || !ISSPACE (*p)); p++)
96 if (q || !*p) return 0;
100 len = (size_t) (p - s);
101 if (len + 1 > pathlen)
103 memcpy (path, s, len);
105 dprint (3, (debugfile, "is_from(): got return path: %s\n", path));
113 if (!is_day_name (s))
115 dprint(1, (debugfile, "is_from(): expected weekday, got: %s\n", s));
123 /* do a quick check to make sure that this isn't really the day of the week.
124 * this could happen when receiving mail from a local user whose login name
125 * is the same as a three-letter abbreviation of the day of the week.
133 /* now we should be on the month. */
134 if ((tm.tm_mon = mutt_check_month (s)) < 0) return 0;
139 if (sscanf (s, "%d", &tm.tm_mday) != 1) return 0;
145 /* Accept either HH:MM or HH:MM:SS */
146 if (sscanf (s, "%d:%d:%d", &tm.tm_hour, &tm.tm_min, &tm.tm_sec) == 3);
147 else if (sscanf (s, "%d:%d", &tm.tm_hour, &tm.tm_min) == 2)
156 if (isalpha ((unsigned char) *s) || *s == '+' || *s == '-')
162 * some places have two timezone fields after the time, e.g.
163 * From xxxx@yyyyyyy.fr Wed Aug 2 00:39:12 MET DST 1995
165 if (isalpha ((unsigned char) *s))
173 if (sscanf (s, "%d", &yr) != 1) return 0;
174 tm.tm_year = yr > 1900 ? yr - 1900 : (yr < 70 ? yr + 100 : yr);
176 dprint (3,(debugfile, "is_from(): month=%d, day=%d, hr=%d, min=%d, sec=%d, yr=%d.\n",
177 tm.tm_mon, tm.tm_mday, tm.tm_hour, tm.tm_min, tm.tm_sec, tm.tm_year));
181 if (tp) *tp = mutt_mktime (&tm, 0);