first try at implementing getdate function
[musl] / src / time / getdate.c
1 #include <time.h>
2 #include <pthread.h>
3 #include <errno.h>
4 #include <stdio.h>
5 #include <stdlib.h>
6
7 int getdate_err;
8
9 struct tm *getdate(const char *s)
10 {
11         static struct tm tmbuf;
12         struct tm *ret = 0;
13         char *datemsk = getenv("DATEMSK");
14         FILE *f = 0;
15         char fmt[100], *p;
16         int cs;
17
18         pthread_setcancelstate(PTHREAD_CANCEL_DEFERRED, &cs);
19
20         if (!datemsk) {
21                 getdate_err = 1;
22                 goto out;
23         }
24
25         f = fopen(datemsk, "r");
26         if (!f) {
27                 if (errno == ENOMEM) getdate_err = 6;
28                 else getdate_err = 2;
29                 goto out;
30         }
31
32         while (fgets(fmt, sizeof fmt, f)) {
33                 p = strptime(s, fmt, &tmbuf);
34 dprintf(2, "%s %s\n", s, fmt);
35 dprintf(2, "%p %d\n", p, p?*p:0);
36                 if (p && !*p) {
37                         ret = &tmbuf;
38                         goto out;
39                 }
40         }
41
42         getdate_err = 7;
43 out:
44         if (f) fclose(f);
45         pthread_setcancelstate(cs, 0);
46         return ret;
47 }