URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-old/] [newlib-1.17.0/] [newlib/] [libc/] [time/] [tzset_r.c] - Rev 847
Go to most recent revision | Compare with Previous | Blame | View Log
#include <_ansi.h> #include <reent.h> #include <stdio.h> #include <stdlib.h> #include <string.h> #include <sys/types.h> #include <sys/time.h> #include "local.h" static char __tzname_std[11]; static char __tzname_dst[11]; static char *prev_tzenv = NULL; _VOID _DEFUN (_tzset_r, (reent_ptr), struct _reent *reent_ptr) { char *tzenv; unsigned short hh, mm, ss, m, w, d; int sign, n; int i, ch; __tzinfo_type *tz = __gettzinfo (); if ((tzenv = _getenv_r (reent_ptr, "TZ")) == NULL) { TZ_LOCK; _timezone = 0; _daylight = 0; _tzname[0] = "GMT"; _tzname[1] = "GMT"; TZ_UNLOCK; return; } TZ_LOCK; if (prev_tzenv != NULL && strcmp(tzenv, prev_tzenv) == 0) { TZ_UNLOCK; return; } free(prev_tzenv); prev_tzenv = _malloc_r (reent_ptr, strlen(tzenv) + 1); if (prev_tzenv != NULL) strcpy (prev_tzenv, tzenv); /* ignore implementation-specific format specifier */ if (*tzenv == ':') ++tzenv; if (sscanf (tzenv, "%10[^0-9,+-]%n", __tzname_std, &n) <= 0) { TZ_UNLOCK; return; } tzenv += n; sign = 1; if (*tzenv == '-') { sign = -1; ++tzenv; } else if (*tzenv == '+') ++tzenv; mm = 0; ss = 0; if (sscanf (tzenv, "%hu%n:%hu%n:%hu%n", &hh, &n, &mm, &n, &ss, &n) < 1) { TZ_UNLOCK; return; } tz->__tzrule[0].offset = sign * (ss + SECSPERMIN * mm + SECSPERHOUR * hh); _tzname[0] = __tzname_std; tzenv += n; if (sscanf (tzenv, "%10[^0-9,+-]%n", __tzname_dst, &n) <= 0) { _tzname[1] = _tzname[0]; TZ_UNLOCK; return; } else _tzname[1] = __tzname_dst; tzenv += n; /* otherwise we have a dst name, look for the offset */ sign = 1; if (*tzenv == '-') { sign = -1; ++tzenv; } else if (*tzenv == '+') ++tzenv; hh = 0; mm = 0; ss = 0; n = 0; if (sscanf (tzenv, "%hu%n:%hu%n:%hu%n", &hh, &n, &mm, &n, &ss, &n) <= 0) tz->__tzrule[1].offset = tz->__tzrule[0].offset - 3600; else tz->__tzrule[1].offset = sign * (ss + SECSPERMIN * mm + SECSPERHOUR * hh); tzenv += n; for (i = 0; i < 2; ++i) { if (*tzenv == ',') ++tzenv; if (*tzenv == 'M') { if (sscanf (tzenv, "M%hu%n.%hu%n.%hu%n", &m, &n, &w, &n, &d, &n) != 3 || m < 1 || m > 12 || w < 1 || w > 5 || d > 6) { TZ_UNLOCK; return; } tz->__tzrule[i].ch = 'M'; tz->__tzrule[i].m = m; tz->__tzrule[i].n = w; tz->__tzrule[i].d = d; tzenv += n; } else { char *end; if (*tzenv == 'J') { ch = 'J'; ++tzenv; } else ch = 'D'; d = strtoul (tzenv, &end, 10); /* if unspecified, default to US settings */ /* From 1987-2006, US was M4.1.0,M10.5.0, but starting in 2007 is * M3.2.0,M11.1.0 (2nd Sunday March through 1st Sunday November) */ if (end == tzenv) { if (i == 0) { tz->__tzrule[0].ch = 'M'; tz->__tzrule[0].m = 3; tz->__tzrule[0].n = 2; tz->__tzrule[0].d = 0; } else { tz->__tzrule[1].ch = 'M'; tz->__tzrule[1].m = 11; tz->__tzrule[1].n = 1; tz->__tzrule[1].d = 0; } } else { tz->__tzrule[i].ch = ch; tz->__tzrule[i].d = d; } tzenv = end; } /* default time is 02:00:00 am */ hh = 2; mm = 0; ss = 0; n = 0; if (*tzenv == '/') sscanf (tzenv, "/%hu%n:%hu%n:%hu%n", &hh, &n, &mm, &n, &ss, &n); tz->__tzrule[i].s = ss + SECSPERMIN * mm + SECSPERHOUR * hh; tzenv += n; } __tzcalc_limits (tz->__tzyear); _timezone = tz->__tzrule[0].offset; _daylight = tz->__tzrule[0].offset != tz->__tzrule[1].offset; TZ_UNLOCK; }
Go to most recent revision | Compare with Previous | Blame | View Log