src/libstddjb/localtm_scan.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55

/* ISC license. */

#include <sys/types.h>
#include <errno.h>
#include <time.h>
#include <skalibs/types.h>
#include <skalibs/djbtime.h>

size_t localtm_scan (char const *s, struct tm *l)
{
  struct tm ll = { .tm_isdst = -1 } ;
  size_t n = 0 ;
  unsigned int u ;
  register size_t i = uint_scan(s+n, &u) ;
  if (!i) goto fail ;
  n += i ;
  if (u < 1900) goto fail ;
  u -= 1900 ; ll.tm_year = u ;
  if (s[n++] != '-') goto fail ;
  i = uint_scan(s+n, &u) ;
  if (!i) goto fail ;
  n += i ;
  if (!u || (u > 12)) goto fail ;
  u-- ; ll.tm_mon = u ;
  if (s[n++] != '-') goto fail ;
  i = uint_scan(s+n, &u) ;
  if (!i) goto fail ;
  n += i ;
  if (!u || (u > 31)) goto fail ;
  ll.tm_mday = u ;
  if ((s[n] != ' ') && (s[n] != 'T')) goto fail ;
  n++ ;
  i = uint_scan(s+n, &u) ;
  if (!i) goto fail ;
  n += i ;
  if (u > 23) goto fail ;
  ll.tm_hour = u ;
  if (s[n++] != ':') goto fail ;
  i = uint_scan(s+n, &u) ;
  if (!i) goto fail ;
  n += i ;
  if (u > 59) goto fail ;
  ll.tm_min = u ;
  if (s[n++] != ':') goto fail ;
  i = uint_scan(s+n, &u) ;
  if (!i) goto fail ;
  n += i ;
  if (u > 60) goto fail ;
  ll.tm_sec = u ;
  if (mktime(&ll) == (time_t)-1) goto fail ;
  *l = ll ;
  return n ;
 fail:
  return (errno = EINVAL, 0) ;
}