You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
76 lines
1.7 KiB
C
76 lines
1.7 KiB
C
#define _GNU_SOURCE
|
|
#define __deprecated__
|
|
#include "scan.h"
|
|
#include "byte.h"
|
|
#include "case.h"
|
|
#include <time.h>
|
|
#include <stdlib.h>
|
|
|
|
#ifdef sgi
|
|
extern char** environ;
|
|
#endif
|
|
|
|
/* "2014-05-27T19:22:16Z" */
|
|
size_t scan_iso8601(const char* in,struct timespec* t) {
|
|
struct tm x;
|
|
const char* c;
|
|
unsigned long tmp;
|
|
if (!(c=in)) return 0;
|
|
if (scan_ulong(c,&tmp)!=4 || c[4]!='-') return 0; c+=5; x.tm_year=(int)(tmp-1900);
|
|
if (scan_ulong(c,&tmp)!=2 || c[2]!='-') return 0; c+=3; x.tm_mon=(int)(tmp-1);
|
|
if (scan_ulong(c,&tmp)!=2 || c[2]!='T') return 0; c+=3; x.tm_mday=(int)tmp;
|
|
if (scan_ulong(c,&tmp)!=2 || c[2]!=':') return 0; c+=3; x.tm_hour=(int)tmp;
|
|
if (scan_ulong(c,&tmp)!=2 || c[2]!=':') return 0; c+=3; x.tm_min=(int)tmp;
|
|
if (scan_ulong(c,&tmp)!=2) return 0; c+=2; x.tm_sec=(int)tmp;
|
|
if (*c=='.') {
|
|
size_t i;
|
|
++c;
|
|
i=scan_ulong(c,&tmp);
|
|
c+=i;
|
|
if (i<1 || i>9)
|
|
t->tv_nsec=0;
|
|
else {
|
|
while (i<9) {
|
|
++i;
|
|
tmp*=10;
|
|
}
|
|
t->tv_nsec=tmp;
|
|
}
|
|
}
|
|
|
|
x.tm_wday=x.tm_yday=x.tm_isdst=0;
|
|
#if defined(__dietlibc__) || defined(__GLIBC__)
|
|
t->tv_sec=timegm(&x);
|
|
#elif defined(__MINGW32__)
|
|
t->tv_sec=mktime(&x);
|
|
#else
|
|
{
|
|
#ifdef sgi
|
|
char** old=environ;
|
|
char** newenv={0};
|
|
environ=newenv;
|
|
t->tv_sec=mktime(&x);
|
|
environ=old;
|
|
#else
|
|
char* old=getenv("TZ");
|
|
unsetenv("TZ");
|
|
t->tv_sec=mktime(&x);
|
|
if (old) setenv("TZ",old,1);
|
|
#endif
|
|
}
|
|
#endif
|
|
|
|
if (*c=='+' || *c=='-') {
|
|
int signum = (*c=='+') - (*c=='-');
|
|
unsigned int val;
|
|
++c;
|
|
if (scan_ulong(c,&tmp)!=2 || c[2]!=':') return 0; c+=3; val=tmp*60;
|
|
if (scan_ulong(c,&tmp)!=2) return 0; c+=2; val+=tmp;
|
|
t->tv_sec+=signum*val;
|
|
} else if (*c=='Z')
|
|
++c;
|
|
else
|
|
return 0;
|
|
return (size_t)(c-in);
|
|
}
|