aboutsummaryrefslogtreecommitdiff
path: root/src/lib9/date.c
blob: 5ceeb1b5902f83b8023319f942510e6285cf4734 (plain)
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
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
#include <u.h>
#include <stdlib.h> /* setenv etc. */
#define NOPLAN9DEFINES
#include <libc.h>
#include <time.h>

#define _HAVETIMEGM 1
#define _HAVETMZONE 1
#define _HAVETMGMTOFF 1

#if defined(__linux__)
#	undef _HAVETMZONE

#elif defined(__sun__)
#	undef _HAVETIMEGM
#	undef _HAVETMZONE
#	undef _HAVETMGMTOFF

#endif

static Tm bigtm;

static void
tm2Tm(struct tm *tm, Tm *bigtm)
{
	char *s;

	memset(bigtm, 0, sizeof *bigtm);
	bigtm->sec = tm->tm_sec;
	bigtm->min = tm->tm_min;
	bigtm->hour = tm->tm_hour;
	bigtm->mday = tm->tm_mday;
	bigtm->mon = tm->tm_mon;
	bigtm->year = tm->tm_year;
	bigtm->wday = tm->tm_wday;
	strftime(bigtm->zone, sizeof bigtm->zone, "%Z", tm);
#ifdef _HAVETMGMTOFF
	bigtm->tzoff = tm->tm_gmtoff;
#endif
	
	if(bigtm->zone[0] == 0){
		s = getenv("TIMEZONE");
		if(s){
			strecpy(bigtm->zone, bigtm->zone+4, s);
			free(s);
		}
	}
}

static void
Tm2tm(Tm *bigtm, struct tm *tm)
{
	memset(tm, 0, sizeof *tm);
	tm->tm_sec = bigtm->sec;
	tm->tm_min = bigtm->min;
	tm->tm_hour = bigtm->hour;
	tm->tm_mday = bigtm->mday;
	tm->tm_mon = bigtm->mon;
	tm->tm_year = bigtm->year;
	tm->tm_wday = bigtm->wday;
#ifdef _HAVETMZONE
	tm->tm_zone = bigtm->zone;
#endif
#ifdef _HAVETMGMTOFF
	tm->tm_gmtoff = bigtm->tzoff;
#endif
}

Tm*
p9gmtime(long x)
{
	time_t t;
	struct tm tm;

	t = (time_t)x;
	tm = *gmtime(&t);
	tm2Tm(&tm, &bigtm);
	return &bigtm;
}

Tm*
p9localtime(long x)
{
	time_t t;
	struct tm tm;

	t = (time_t)x;
	tm = *localtime(&t);
	tm2Tm(&tm, &bigtm);
	return &bigtm;
}

#if !defined(_HAVETIMEGM)
static time_t
timegm(struct tm *tm)
{
	time_t ret;
	char *tz;
	char *s;

	tz = getenv("TZ");
	putenv("TZ=");
	tzset();
	ret = mktime(tm);
	if(tz){
		s = smprint("TZ=%s", tz);
		if(s)
			putenv(s);
	}
	return ret;
}
#endif

long
p9tm2sec(Tm *bigtm)
{
	struct tm tm;

	Tm2tm(bigtm, &tm);
	if(strcmp(bigtm->zone, "GMT") == 0 || strcmp(bigtm->zone, "UCT") == 0)
		return timegm(&tm);
	return mktime(&tm);	/* local time zone */
}