1#include <time.h>
2#if defined(__wasilibc_unmodified_upstream) || defined(_REENTRANT)
3#include <pthread.h>
4#endif
5#include <errno.h>
6#include <stdio.h>
7#include <stdlib.h>
8
9int getdate_err;
10
11struct tm *getdate(const char *s)
12{
13 static struct tm tmbuf;
14 struct tm *ret = 0;
15 char *datemsk = getenv("DATEMSK");
16 FILE *f = 0;
17 char fmt[100], *p;
18 int cs;
19
20#if defined(__wasilibc_unmodified_upstream) || defined(_REENTRANT)
21 pthread_setcancelstate(PTHREAD_CANCEL_DEFERRED, &cs);
22#endif
23
24 if (!datemsk) {
25 getdate_err = 1;
26 goto out;
27 }
28
29 f = fopen(datemsk, "rbe");
30 if (!f) {
31 if (errno == ENOMEM) getdate_err = 6;
32 else getdate_err = 2;
33 goto out;
34 }
35
36 while (fgets(fmt, sizeof fmt, f)) {
37 p = strptime(s, fmt, &tmbuf);
38 if (p && !*p) {
39 ret = &tmbuf;
40 goto out;
41 }
42 }
43
44 if (ferror(f)) getdate_err = 5;
45 else getdate_err = 7;
46out:
47 if (f) fclose(f);
48#if defined(__wasilibc_unmodified_upstream) || defined(_REENTRANT)
49 pthread_setcancelstate(cs, 0);
50#endif
51 return ret;
52}