![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to timelib.c CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / php / ext / date / lib|
Return to timelib.c CVS log | Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / php / ext / date / lib |
1.1 misho 1: /*
2: +----------------------------------------------------------------------+
3: | PHP Version 5 |
4: +----------------------------------------------------------------------+
1.1.1.4 ! misho 5: | Copyright (c) 1997-2014 The PHP Group |
1.1 misho 6: +----------------------------------------------------------------------+
7: | This source file is subject to version 3.01 of the PHP license, |
8: | that is bundled with this package in the file LICENSE, and is |
9: | available through the world-wide-web at the following url: |
10: | http://www.php.net/license/3_01.txt |
11: | If you did not receive a copy of the PHP license and are unable to |
12: | obtain it through the world-wide-web, please send a note to |
13: | license@php.net so we can mail you a copy immediately. |
14: +----------------------------------------------------------------------+
15: | Authors: Derick Rethans <derick@derickrethans.nl> |
16: +----------------------------------------------------------------------+
17: */
18:
1.1.1.2 misho 19: /* $Id$ */
1.1 misho 20:
21: #include "timelib.h"
22: #include <ctype.h>
23: #include <math.h>
24:
25: #define TIMELIB_TIME_FREE(m) \
26: if (m) { \
27: free(m); \
28: m = NULL; \
29: } \
30:
31: #define TIMELIB_LLABS(y) (y < 0 ? (y * -1) : y)
32:
33: timelib_time* timelib_time_ctor(void)
34: {
35: timelib_time *t;
36: t = calloc(1, sizeof(timelib_time));
37:
38: return t;
39: }
40:
41: timelib_rel_time* timelib_rel_time_ctor(void)
42: {
43: timelib_rel_time *t;
44: t = calloc(1, sizeof(timelib_rel_time));
45:
46: return t;
47: }
48:
49: timelib_time* timelib_time_clone(timelib_time *orig)
50: {
51: timelib_time *tmp = timelib_time_ctor();
52: memcpy(tmp, orig, sizeof(timelib_time));
53: if (orig->tz_abbr) {
54: tmp->tz_abbr = strdup(orig->tz_abbr);
55: }
56: if (orig->tz_info) {
57: tmp->tz_info = orig->tz_info;
58: }
59: return tmp;
60: }
61:
62: timelib_rel_time* timelib_rel_time_clone(timelib_rel_time *rel)
63: {
64: timelib_rel_time *tmp = timelib_rel_time_ctor();
65: memcpy(tmp, rel, sizeof(timelib_rel_time));
66: return tmp;
67: }
68:
69: void timelib_time_tz_abbr_update(timelib_time* tm, char* tz_abbr)
70: {
71: unsigned int i;
72:
73: TIMELIB_TIME_FREE(tm->tz_abbr);
74: tm->tz_abbr = strdup(tz_abbr);
75: for (i = 0; i < strlen(tz_abbr); i++) {
76: tm->tz_abbr[i] = toupper(tz_abbr[i]);
77: }
78: }
79:
80: void timelib_time_dtor(timelib_time* t)
81: {
82: TIMELIB_TIME_FREE(t->tz_abbr);
83: TIMELIB_TIME_FREE(t);
84: }
85:
86: void timelib_rel_time_dtor(timelib_rel_time* t)
87: {
88: TIMELIB_TIME_FREE(t);
89: }
90:
91: timelib_time_offset* timelib_time_offset_ctor(void)
92: {
93: timelib_time_offset *t;
94: t = calloc(1, sizeof(timelib_time_offset));
95:
96: return t;
97: }
98:
99: void timelib_time_offset_dtor(timelib_time_offset* t)
100: {
101: TIMELIB_TIME_FREE(t->abbr);
102: TIMELIB_TIME_FREE(t);
103: }
104:
105: timelib_tzinfo* timelib_tzinfo_ctor(char *name)
106: {
107: timelib_tzinfo *t;
108: t = calloc(1, sizeof(timelib_tzinfo));
109: t->name = strdup(name);
110:
111: return t;
112: }
113:
114: timelib_tzinfo *timelib_tzinfo_clone(timelib_tzinfo *tz)
115: {
116: timelib_tzinfo *tmp = timelib_tzinfo_ctor(tz->name);
117: tmp->ttisgmtcnt = tz->ttisgmtcnt;
118: tmp->ttisstdcnt = tz->ttisstdcnt;
119: tmp->leapcnt = tz->leapcnt;
120: tmp->timecnt = tz->timecnt;
121: tmp->typecnt = tz->typecnt;
122: tmp->charcnt = tz->charcnt;
123:
124: tmp->trans = (int32_t *) malloc(tz->timecnt * sizeof(int32_t));
125: tmp->trans_idx = (unsigned char*) malloc(tz->timecnt * sizeof(unsigned char));
126: memcpy(tmp->trans, tz->trans, tz->timecnt * sizeof(int32_t));
127: memcpy(tmp->trans_idx, tz->trans_idx, tz->timecnt * sizeof(unsigned char));
128:
129: tmp->type = (ttinfo*) malloc(tz->typecnt * sizeof(struct ttinfo));
130: memcpy(tmp->type, tz->type, tz->typecnt * sizeof(struct ttinfo));
131:
132: tmp->timezone_abbr = (char*) malloc(tz->charcnt);
133: memcpy(tmp->timezone_abbr, tz->timezone_abbr, tz->charcnt);
134:
135: tmp->leap_times = (tlinfo*) malloc(tz->leapcnt * sizeof(tlinfo));
136: memcpy(tmp->leap_times, tz->leap_times, tz->leapcnt * sizeof(tlinfo));
137:
138: return tmp;
139: }
140:
141: void timelib_tzinfo_dtor(timelib_tzinfo *tz)
142: {
143: TIMELIB_TIME_FREE(tz->name);
144: TIMELIB_TIME_FREE(tz->trans);
145: TIMELIB_TIME_FREE(tz->trans_idx);
146: TIMELIB_TIME_FREE(tz->type);
147: TIMELIB_TIME_FREE(tz->timezone_abbr);
148: TIMELIB_TIME_FREE(tz->leap_times);
149: TIMELIB_TIME_FREE(tz->location.comments);
150: TIMELIB_TIME_FREE(tz);
151: tz = NULL;
152: }
153:
154: char *timelib_get_tz_abbr_ptr(timelib_time *t)
155: {
156: if (!t->sse_uptodate) {
157: timelib_update_ts(t, NULL);
158: };
159: return t->tz_abbr;
160: }
161:
162: void timelib_error_container_dtor(timelib_error_container *errors)
163: {
164: int i;
165:
166: for (i = 0; i < errors->warning_count; i++) {
167: free(errors->warning_messages[i].message);
168: }
169: free(errors->warning_messages);
170: for (i = 0; i < errors->error_count; i++) {
171: free(errors->error_messages[i].message);
172: }
173: free(errors->error_messages);
174: free(errors);
175: }
176:
177: signed long timelib_date_to_int(timelib_time *d, int *error)
178: {
179: timelib_sll ts;
180:
181: ts = d->sse;
182:
183: if (ts < LONG_MIN || ts > LONG_MAX) {
184: if (error) {
185: *error = 1;
186: }
187: return 0;
188: }
189: if (error) {
190: *error = 0;
191: }
192: return (signed long) d->sse;
193: }
194:
195: void timelib_decimal_hour_to_hms(double h, int *hour, int *min, int *sec)
196: {
197: *hour = floor(h);
198: *min = floor((h - *hour) * 60);
199: *sec = (h - *hour - ((float) *min / 60)) * 3600;
200: }
201:
202: void timelib_dump_date(timelib_time *d, int options)
203: {
204: if ((options & 2) == 2) {
205: printf("TYPE: %d ", d->zone_type);
206: }
207: printf("TS: %lld | %s%04lld-%02lld-%02lld %02lld:%02lld:%02lld",
208: d->sse, d->y < 0 ? "-" : "", TIMELIB_LLABS(d->y), d->m, d->d, d->h, d->i, d->s);
209: if (d->f > +0.0) {
210: printf(" %.5f", d->f);
211: }
212:
213: if (d->is_localtime) {
214: switch (d->zone_type) {
215: case TIMELIB_ZONETYPE_OFFSET: /* Only offset */
216: printf(" GMT %05d%s", d->z, d->dst == 1 ? " (DST)" : "");
217: break;
218: case TIMELIB_ZONETYPE_ID: /* Timezone struct */
219: /* Show abbreviation if wanted */
220: if (d->tz_abbr) {
221: printf(" %s", d->tz_abbr);
222: }
223: /* Do we have a TimeZone struct? */
224: if (d->tz_info) {
225: printf(" %s", d->tz_info->name);
226: }
227: break;
228: case TIMELIB_ZONETYPE_ABBR:
229: printf(" %s", d->tz_abbr);
230: printf(" %05d%s", d->z, d->dst == 1 ? " (DST)" : "");
231: break;
232: }
233: }
234:
235: if ((options & 1) == 1) {
236: if (d->have_relative) {
237: printf("%3lldY %3lldM %3lldD / %3lldH %3lldM %3lldS",
238: d->relative.y, d->relative.m, d->relative.d, d->relative.h, d->relative.i, d->relative.s);
239: if (d->relative.first_last_day_of != 0) {
240: switch (d->relative.first_last_day_of) {
241: case 1:
242: printf(" / first day of");
243: break;
244: case 2:
245: printf(" / last day of");
246: break;
247: }
248: }
249: if (d->relative.have_weekday_relative) {
250: printf(" / %d.%d", d->relative.weekday, d->relative.weekday_behavior);
251: }
252: if (d->relative.have_special_relative) {
253: switch (d->relative.special.type) {
254: case TIMELIB_SPECIAL_WEEKDAY:
255: printf(" / %lld weekday", d->relative.special.amount);
256: break;
257: case TIMELIB_SPECIAL_DAY_OF_WEEK_IN_MONTH:
258: printf(" / x y of z month");
259: break;
260: case TIMELIB_SPECIAL_LAST_DAY_OF_WEEK_IN_MONTH:
261: printf(" / last y of z month");
262: break;
263: }
264: }
265: }
266: }
267: printf("\n");
268: }
269:
270: void timelib_dump_rel_time(timelib_rel_time *d)
271: {
272: printf("%3lldY %3lldM %3lldD / %3lldH %3lldM %3lldS (days: %lld)%s",
273: d->y, d->m, d->d, d->h, d->i, d->s, d->days, d->invert ? " inverted" : "");
274: if (d->first_last_day_of != 0) {
275: switch (d->first_last_day_of) {
276: case 1:
277: printf(" / first day of");
278: break;
279: case 2:
280: printf(" / last day of");
281: break;
282: }
283: }
284: printf("\n");
285: }
286: