#include "apr.h"
#include "apr_lib.h"
#define APR_WANT_STRFUNC
#include "apr_want.h"
#if APR_HAVE_STDLIB_H
#include <stdlib.h>
#endif
#if APR_HAVE_CTYPE_H
#include <ctype.h>
#endif
#include "apr_date.h"
APU_DECLARE(int) apr_date_checkmask(const char *data, const char *mask)
{
int i;
char d;
for (i = 0; i < 256; i++) {
d = data[i];
switch (mask[i]) {
case '\0':
return (d == '\0');
case '*':
return 1;
case '@':
if (!apr_isupper(d))
return 0;
break;
case '$':
if (!apr_islower(d))
return 0;
break;
case '#':
if (!apr_isdigit(d))
return 0;
break;
case '&':
if (!apr_isxdigit(d))
return 0;
break;
case '~':
if ((d != ' ') && !apr_isdigit(d))
return 0;
break;
default:
if (mask[i] != d)
return 0;
break;
}
}
return 0;
}
APU_DECLARE(apr_time_t) apr_date_parse_http(const char *date)
{
apr_time_exp_t ds;
apr_time_t result;
int mint, mon;
const char *monstr, *timstr;
static const int months[12] =
{
('J' << 16) | ('a' << 8) | 'n', ('F' << 16) | ('e' << 8) | 'b',
('M' << 16) | ('a' << 8) | 'r', ('A' << 16) | ('p' << 8) | 'r',
('M' << 16) | ('a' << 8) | 'y', ('J' << 16) | ('u' << 8) | 'n',
('J' << 16) | ('u' << 8) | 'l', ('A' << 16) | ('u' << 8) | 'g',
('S' << 16) | ('e' << 8) | 'p', ('O' << 16) | ('c' << 8) | 't',
('N' << 16) | ('o' << 8) | 'v', ('D' << 16) | ('e' << 8) | 'c'};
if (!date)
return APR_DATE_BAD;
while (*date && apr_isspace(*date))
++date;
if (*date == '\0')
return APR_DATE_BAD;
if ((date = strchr(date, ' ')) == NULL)
return APR_DATE_BAD;
++date;
if (apr_date_checkmask(date, "## @$$ #### ##:##:## *")) {
ds.tm_year = ((date[7] - '0') * 10 + (date[8] - '0') - 19) * 100;
if (ds.tm_year < 0)
return APR_DATE_BAD;
ds.tm_year += ((date[9] - '0') * 10) + (date[10] - '0');
ds.tm_mday = ((date[0] - '0') * 10) + (date[1] - '0');
monstr = date + 3;
timstr = date + 12;
}
else if (apr_date_checkmask(date, "##-@$$-## ##:##:## *")) {
ds.tm_year = ((date[7] - '0') * 10) + (date[8] - '0');
if (ds.tm_year < 70)
ds.tm_year += 100;
ds.tm_mday = ((date[0] - '0') * 10) + (date[1] - '0');
monstr = date + 3;
timstr = date + 10;
}
else if (apr_date_checkmask(date, "@$$ ~# ##:##:## ####*")) {
ds.tm_year = ((date[16] - '0') * 10 + (date[17] - '0') - 19) * 100;
if (ds.tm_year < 0)
return APR_DATE_BAD;
ds.tm_year += ((date[18] - '0') * 10) + (date[19] - '0');
if (date[4] == ' ')
ds.tm_mday = 0;
else
ds.tm_mday = (date[4] - '0') * 10;
ds.tm_mday += (date[5] - '0');
monstr = date;
timstr = date + 7;
}
else if (apr_date_checkmask(date, "# @$$ #### ##:##:## *")) {
ds.tm_year = ((date[6] - '0') * 10 + (date[7] - '0') - 19) * 100;
if (ds.tm_year < 0)
return APR_DATE_BAD;
ds.tm_year += ((date[8] - '0') * 10) + (date[9] - '0');
ds.tm_mday = (date[0] - '0');
monstr = date + 2;
timstr = date + 11;
}
else
return APR_DATE_BAD;
if (ds.tm_mday <= 0 || ds.tm_mday > 31)
return APR_DATE_BAD;
ds.tm_hour = ((timstr[0] - '0') * 10) + (timstr[1] - '0');
ds.tm_min = ((timstr[3] - '0') * 10) + (timstr[4] - '0');
ds.tm_sec = ((timstr[6] - '0') * 10) + (timstr[7] - '0');
if ((ds.tm_hour > 23) || (ds.tm_min > 59) || (ds.tm_sec > 61))
return APR_DATE_BAD;
mint = (monstr[0] << 16) | (monstr[1] << 8) | monstr[2];
for (mon = 0; mon < 12; mon++)
if (mint == months[mon])
break;
if (mon == 12)
return APR_DATE_BAD;
if ((ds.tm_mday == 31) && (mon == 3 || mon == 5 || mon == 8 || mon == 10))
return APR_DATE_BAD;
if ((mon == 1) &&
((ds.tm_mday > 29) ||
((ds.tm_mday == 29)
&& ((ds.tm_year & 3)
|| (((ds.tm_year % 100) == 0)
&& (((ds.tm_year % 400) != 100)))))))
return APR_DATE_BAD;
ds.tm_mon = mon;
ds.tm_usec = 0;
ds.tm_gmtoff = 0;
if (apr_time_exp_get(&result, &ds) != APR_SUCCESS)
return APR_DATE_BAD;
return result;
}
#define TIMEPARSE(ds,hr10,hr1,min10,min1,sec10,sec1) \
{ \
ds.tm_hour = ((hr10 - '0') * 10) + (hr1 - '0'); \
ds.tm_min = ((min10 - '0') * 10) + (min1 - '0'); \
ds.tm_sec = ((sec10 - '0') * 10) + (sec1 - '0'); \
}
#define TIMEPARSE_STD(ds,timstr) \
{ \
TIMEPARSE(ds, timstr[0],timstr[1], \
timstr[3],timstr[4], \
timstr[6],timstr[7]); \
}
APU_DECLARE(apr_time_t) apr_date_parse_rfc(const char *date)
{
apr_time_exp_t ds;
apr_time_t result;
int mint, mon;
const char *monstr, *timstr, *gmtstr;
static const int months[12] =
{
('J' << 16) | ('a' << 8) | 'n', ('F' << 16) | ('e' << 8) | 'b',
('M' << 16) | ('a' << 8) | 'r', ('A' << 16) | ('p' << 8) | 'r',
('M' << 16) | ('a' << 8) | 'y', ('J' << 16) | ('u' << 8) | 'n',
('J' << 16) | ('u' << 8) | 'l', ('A' << 16) | ('u' << 8) | 'g',
('S' << 16) | ('e' << 8) | 'p', ('O' << 16) | ('c' << 8) | 't',
('N' << 16) | ('o' << 8) | 'v', ('D' << 16) | ('e' << 8) | 'c' };
if (!date)
return APR_DATE_BAD;
if (!apr_isdigit(date[0]))
{
while (*date && apr_isspace(*date))
++date;
if (*date == '\0')
return APR_DATE_BAD;
if ((date = strchr(date, ' ')) == NULL)
return APR_DATE_BAD;
++date; }
if (apr_date_checkmask(date, "## @$$ #### ##:##:## *")) {
ds.tm_year = ((date[7] - '0') * 10 + (date[8] - '0') - 19) * 100;
if (ds.tm_year < 0)
return APR_DATE_BAD;
ds.tm_year += ((date[9] - '0') * 10) + (date[10] - '0');
ds.tm_mday = ((date[0] - '0') * 10) + (date[1] - '0');
monstr = date + 3;
timstr = date + 12;
gmtstr = date + 21;
TIMEPARSE_STD(ds, timstr);
}
else if (apr_date_checkmask(date, "##-@$$-## ##:##:## *")) {
ds.tm_year = ((date[7] - '0') * 10) + (date[8] - '0');
if (ds.tm_year < 70)
ds.tm_year += 100;
ds.tm_mday = ((date[0] - '0') * 10) + (date[1] - '0');
monstr = date + 3;
timstr = date + 10;
gmtstr = date + 19;
TIMEPARSE_STD(ds, timstr);
}
else if (apr_date_checkmask(date, "@$$ ~# ##:##:## ####*")) {
ds.tm_year = ((date[16] - '0') * 10 + (date[17] - '0') - 19) * 100;
if (ds.tm_year < 0)
return APR_DATE_BAD;
ds.tm_year += ((date[18] - '0') * 10) + (date[19] - '0');
if (date[4] == ' ')
ds.tm_mday = 0;
else
ds.tm_mday = (date[4] - '0') * 10;
ds.tm_mday += (date[5] - '0');
monstr = date;
timstr = date + 7;
gmtstr = NULL;
TIMEPARSE_STD(ds, timstr);
}
else if (apr_date_checkmask(date, "# @$$ #### ##:##:## *")) {
ds.tm_year = ((date[6] - '0') * 10 + (date[7] - '0') - 19) * 100;
if (ds.tm_year < 0)
return APR_DATE_BAD;
ds.tm_year += ((date[8] - '0') * 10) + (date[9] - '0');
ds.tm_mday = (date[0] - '0');
monstr = date + 2;
timstr = date + 11;
gmtstr = date + 20;
TIMEPARSE_STD(ds, timstr);
}
else if (apr_date_checkmask(date, "## @$$ ## ##:##:## *")) {
ds.tm_year = ((date[7] - '0') * 10) + (date[8] - '0');
if (ds.tm_year < 70)
ds.tm_year += 100;
ds.tm_mday = ((date[0] - '0') * 10) + (date[1] - '0');
monstr = date + 3;
timstr = date + 10;
gmtstr = date + 19;
TIMEPARSE_STD(ds, timstr);
}
else if (apr_date_checkmask(date, " # @$$ ## ##:##:## *")) {
ds.tm_year = ((date[7] - '0') * 10) + (date[8] - '0');
if (ds.tm_year < 70)
ds.tm_year += 100;
ds.tm_mday = (date[1] - '0');
monstr = date + 3;
timstr = date + 10;
gmtstr = date + 19;
TIMEPARSE_STD(ds, timstr);
}
else if (apr_date_checkmask(date, "# @$$ ## ##:##:## *")) {
ds.tm_year = ((date[6] - '0') * 10) + (date[7] - '0');
if (ds.tm_year < 70)
ds.tm_year += 100;
ds.tm_mday = (date[0] - '0');
monstr = date + 2;
timstr = date + 9;
gmtstr = date + 18;
TIMEPARSE_STD(ds, timstr);
}
else if (apr_date_checkmask(date, "## @$$ ## ##:## *")) {
ds.tm_year = ((date[7] - '0') * 10) + (date[8] - '0');
if (ds.tm_year < 70)
ds.tm_year += 100;
ds.tm_mday = ((date[0] - '0') * 10) + (date[1] - '0');
monstr = date + 3;
timstr = date + 10;
gmtstr = NULL;
TIMEPARSE(ds, timstr[0],timstr[1], timstr[3],timstr[4], '0','0');
}
else if (apr_date_checkmask(date, "# @$$ ## ##:## *")) {
ds.tm_year = ((date[6] - '0') * 10) + (date[7] - '0');
if (ds.tm_year < 70)
ds.tm_year += 100;
ds.tm_mday = (date[0] - '0');
monstr = date + 2;
timstr = date + 9;
gmtstr = NULL;
TIMEPARSE(ds, timstr[0],timstr[1], timstr[3],timstr[4], '0','0');
}
else if (apr_date_checkmask(date, "## @$$ ## #:##:## *")) {
ds.tm_year = ((date[7] - '0') * 10) + (date[8] - '0');
if (ds.tm_year < 70)
ds.tm_year += 100;
ds.tm_mday = ((date[0] - '0') * 10) + (date[1] - '0');
monstr = date + 3;
timstr = date + 9;
gmtstr = date + 18;
TIMEPARSE(ds, '0',timstr[1], timstr[3],timstr[4], timstr[6],timstr[7]);
}
else if (apr_date_checkmask(date, "# @$$ ## #:##:## *")) {
ds.tm_year = ((date[6] - '0') * 10) + (date[7] - '0');
if (ds.tm_year < 70)
ds.tm_year += 100;
ds.tm_mday = (date[0] - '0');
monstr = date + 2;
timstr = date + 8;
gmtstr = date + 17;
TIMEPARSE(ds, '0',timstr[1], timstr[3],timstr[4], timstr[6],timstr[7]);
}
else if (apr_date_checkmask(date, " # @$$ #### ##:##:## *")) {
ds.tm_year = ((date[7] - '0') * 10 + (date[8] - '0') - 19) * 100;
if (ds.tm_year < 0)
return APR_DATE_BAD;
ds.tm_year += ((date[9] - '0') * 10) + (date[10] - '0');
ds.tm_mday = (date[1] - '0');
monstr = date + 3;
timstr = date + 12;
gmtstr = date + 21;
TIMEPARSE_STD(ds, timstr);
}
else if (apr_date_checkmask(date, "##-@$$-#### ##:##:## *")) {
ds.tm_year = ((date[7] - '0') * 10 + (date[8] - '0') - 19) * 100;
if (ds.tm_year < 0)
return APR_DATE_BAD;
ds.tm_year += ((date[9] - '0') * 10) + (date[10] - '0');
ds.tm_mday = ((date[0] - '0') * 10) + (date[1] - '0');
monstr = date + 3;
timstr = date + 12;
gmtstr = date + 21;
TIMEPARSE_STD(ds, timstr);
}
else
return APR_DATE_BAD;
if (ds.tm_mday <= 0 || ds.tm_mday > 31)
return APR_DATE_BAD;
if ((ds.tm_hour > 23) || (ds.tm_min > 59) || (ds.tm_sec > 61))
return APR_DATE_BAD;
mint = (monstr[0] << 16) | (monstr[1] << 8) | monstr[2];
for (mon = 0; mon < 12; mon++)
if (mint == months[mon])
break;
if (mon == 12)
return APR_DATE_BAD;
if ((ds.tm_mday == 31) && (mon == 3 || mon == 5 || mon == 8 || mon == 10))
return APR_DATE_BAD;
if ((mon == 1) &&
((ds.tm_mday > 29)
|| ((ds.tm_mday == 29)
&& ((ds.tm_year & 3)
|| (((ds.tm_year % 100) == 0)
&& (((ds.tm_year % 400) != 100)))))))
return APR_DATE_BAD;
ds.tm_mon = mon;
ds.tm_gmtoff = 0;
if (gmtstr) {
int offset;
switch (*gmtstr) {
case '-':
offset = atoi(gmtstr+1);
ds.tm_gmtoff -= (offset / 100) * 60 * 60;
ds.tm_gmtoff -= (offset % 100) * 60;
break;
case '+':
offset = atoi(gmtstr+1);
ds.tm_gmtoff += (offset / 100) * 60 * 60;
ds.tm_gmtoff += (offset % 100) * 60;
break;
}
}
ds.tm_usec = 0;
if (apr_time_exp_gmt_get(&result, &ds) != APR_SUCCESS)
return APR_DATE_BAD;
return result;
}