Loading...
--- Libc/Libc-825.26/stdtime/FreeBSD/localtime.c
+++ Libc/Libc-320/stdtime/FreeBSD/localtime.c
@@ -1,15 +1,15 @@
/*
** This file is in the public domain, so clarified as of
-** 1996-06-05 by Arthur David Olson (arthur_david_olson@nih.gov).
+** June 5, 1996 by Arthur David Olson (arthur_david_olson@nih.gov).
*/
#include <sys/cdefs.h>
#ifndef lint
#ifndef NOID
-static char elsieid[] __unused = "@(#)localtime.c 7.78";
+static char elsieid[] __unused = "@(#)localtime.c 7.57";
#endif /* !defined NOID */
#endif /* !defined lint */
-__FBSDID("$FreeBSD: src/lib/libc/stdtime/localtime.c,v 1.43 2008/04/01 06:56:11 davidxu Exp $");
+__FBSDID("$FreeBSD: src/lib/libc/stdtime/localtime.c,v 1.36 2003/02/16 17:29:11 nectar Exp $");
/*
** Leap second handling from Bradley White (bww@k.gp.cs.cmu.edu).
@@ -22,22 +22,8 @@
#include "namespace.h"
#include <sys/types.h>
#include <sys/stat.h>
-#include <time.h>
#include <fcntl.h>
#include <pthread.h>
-#include <errno.h>
-#ifdef NOTIFY_TZ
-//#define NOTIFY_TZ_DEBUG
-//#define NOTIFY_TZ_DEBUG_FILE "/var/log/localtime.debug"
-//#define NOTIFY_TZ_LOG "/var/log/localtime.log"
-/* force ALL_STATE if NOTIFY_TZ is set */
-#ifndef ALL_STATE
-#define ALL_STATE
-#endif /* ALL_STATE */
-#include <mach/mach_init.h>
-#include <notify.h>
-#include <alloca.h>
-#endif /* NOTIFY_TZ */
#include "private.h"
#include "un-namespace.h"
@@ -47,21 +33,6 @@
#define _MUTEX_LOCK(x) if (__isthreaded) _pthread_mutex_lock(x)
#define _MUTEX_UNLOCK(x) if (__isthreaded) _pthread_mutex_unlock(x)
-
-#define _RWLOCK_RDLOCK(x) \
- do { \
- if (__isthreaded) _pthread_rwlock_rdlock(x); \
- } while (0)
-
-#define _RWLOCK_WRLOCK(x) \
- do { \
- if (__isthreaded) _pthread_rwlock_wrlock(x); \
- } while (0)
-
-#define _RWLOCK_UNLOCK(x) \
- do { \
- if (__isthreaded) _pthread_rwlock_unlock(x); \
- } while (0)
/*
** SunOS 4.1.1 headers lack O_BINARY.
@@ -99,30 +70,14 @@
static char wildabbr[] = "WILDABBR";
-/*
- * In June 2004 it was decided UTC was a more appropriate default time
- * zone than GMT.
- */
-
-static const char gmt[] = "UTC";
-
-/*
-** The DST rules to use if TZ has no rules and we can't load TZDEFRULES.
-** We default to US rules as of 1999-08-17.
-** POSIX 1003.1 section 8.1.1 says that the default DST rules are
-** implementation dependent; for historical reasons, US rules are a
-** common default.
-*/
-#ifndef TZDEFRULESTRING
-#define TZDEFRULESTRING ",M4.1.0,M10.5.0"
-#endif /* !defined TZDEFDST */
+static const char gmt[] = "GMT";
struct ttinfo { /* time type information */
- long tt_gmtoff; /* UTC offset in seconds */
+ long tt_gmtoff; /* GMT offset in seconds */
int tt_isdst; /* used to set tm_isdst */
int tt_abbrind; /* abbreviation list index */
int tt_ttisstd; /* TRUE if transition is std time */
- int tt_ttisgmt; /* TRUE if transition is UTC */
+ int tt_ttisgmt; /* TRUE if transition is GMT */
};
struct lsinfo { /* leap second information */
@@ -164,94 +119,36 @@
#define DAY_OF_YEAR 1 /* n - day of year */
#define MONTH_NTH_DAY_OF_WEEK 2 /* Mm.n.d - month, week, day of week */
-#ifdef NOTIFY_TZ
-typedef struct {
- int token;
- int notify_was_off;
- int is_set;
-} notify_tz_t;
-
-#define NOTIFY_TZ_NAME "com.apple.system.timezone"
-#endif /* NOTIFY_TZ */
-
/*
** Prototypes for static functions.
*/
-#define localsub _st_localsub
-#define time1 _st_time1
-#define tzset_basic _st_tzset_basic
-__private_extern__
-#ifdef __LP64__
-struct tm * localsub(const time_t * timep, long offset,
- struct tm * tmp);
-#else /* !__LP64__ */
-void localsub(const time_t * timep, long offset,
- struct tm * tmp);
-#endif /* __LP64__ */
-__private_extern__
-time_t time1(struct tm * tmp,
-#ifdef __LP64__
- struct tm *(*funcp) (const time_t *,
- long, struct tm *),
-#else /* !__LP64__ */
- void(*funcp) (const time_t *,
- long, struct tm *),
-#endif /* __LP64__ */
- long offset,
- int unix03);
-__private_extern__
-void tzset_basic(int);
-
-#if !BUILDING_VARIANT
+
static long detzcode(const char * codep);
-static const char * getzname(const char * strp, char **name, size_t *len);
+static const char * getzname(const char * strp);
static const char * getnum(const char * strp, int * nump, int min,
int max);
static const char * getsecs(const char * strp, long * secsp);
static const char * getoffset(const char * strp, long * offsetp);
static const char * getrule(const char * strp, struct rule * rulep);
static void gmtload(struct state * sp);
-#ifdef __LP64__
-static struct tm * gmtsub(const time_t * timep, long offset,
- struct tm * tmp);
-#else /* !__LP64__ */
static void gmtsub(const time_t * timep, long offset,
struct tm * tmp);
-#endif /* __LP64__ */
+static void localsub(const time_t * timep, long offset,
+ struct tm * tmp);
static int increment_overflow(int * number, int delta);
static int normalize_overflow(int * tensptr, int * unitsptr,
int base);
-#ifdef NOTIFY_TZ
-static void notify_check_tz(notify_tz_t *p);
-static void notify_register_tz(char *file, notify_tz_t *p);
-#endif /* NOTIFY_TZ */
static void settzname(void);
+static time_t time1(struct tm * tmp,
+ void(*funcp) (const time_t *,
+ long, struct tm *),
+ long offset);
static time_t time2(struct tm *tmp,
-#ifdef __LP64__
- struct tm *(*funcp) (const time_t *,
- long, struct tm*),
-#else /* !__LP64__ */
void(*funcp) (const time_t *,
long, struct tm*),
-#endif /* __LP64__ */
- long offset, int * okayp, int unix03);
-static time_t time2sub(struct tm *tmp,
-#ifdef __LP64__
- struct tm *(*funcp) (const time_t *,
- long, struct tm*),
-#else /* !__LP64__ */
- void(*funcp) (const time_t *,
- long, struct tm*),
-#endif /* __LP64__ */
- long offset, int * okayp, int do_norm_secs,
- int unix03);
-#ifdef __LP64__
-static struct tm * timesub(const time_t * timep, long offset,
- const struct state * sp, struct tm * tmp);
-#else /* !__LP64__ */
+ long offset, int * okayp);
static void timesub(const time_t * timep, long offset,
const struct state * sp, struct tm * tmp);
-#endif /* __LP64__ */
static int tmcomp(const struct tm * atmp,
const struct tm * btmp);
static time_t transtime(time_t janfirst, int year,
@@ -277,14 +174,9 @@
#endif /* !defined TZ_STRLEN_MAX */
static char lcl_TZname[TZ_STRLEN_MAX + 1];
-#ifdef NOTIFY_TZ
-#define lcl_is_set (lcl_notify.is_set)
-#define gmt_is_set (gmt_notify.is_set)
-#else /* ! NOTIFY_TZ */
static int lcl_is_set;
static int gmt_is_set;
-#endif /* NOTIFY_TZ */
-__private_extern__ pthread_rwlock_t lcl_rwlock = PTHREAD_RWLOCK_INITIALIZER;
+static pthread_mutex_t lcl_mutex = PTHREAD_MUTEX_INITIALIZER;
static pthread_mutex_t gmt_mutex = PTHREAD_MUTEX_INITIALIZER;
char * tzname[2] = {
@@ -302,61 +194,14 @@
static struct tm tm;
-#define USG_COMPAT
-#define ALTZONE
#ifdef USG_COMPAT
+time_t timezone = 0;
int daylight = 0;
-__private_extern__ void _st_set_timezone(long);
#endif /* defined USG_COMPAT */
#ifdef ALTZONE
-__private_extern__ long __darwin_altzone = 0;
-#define altzone __darwin_altzone
+time_t altzone = 0;
#endif /* defined ALTZONE */
-
-#ifdef NOTIFY_TZ
-#ifdef NOTIFY_TZ_DEBUG
-#ifdef NOTIFY_TZ_DEBUG_FILE
-#define NOTIFY_TZ_PRINTF(fmt, args...) \
-{ \
- FILE *_notify_tz_fp_; \
- if((_notify_tz_fp_ = fopen(NOTIFY_TZ_DEBUG_FILE, "a")) != NULL) { \
- fprintf(_notify_tz_fp_, "%d: " fmt, getpid(), ## args); \
- fclose(_notify_tz_fp_); \
- } \
-}
-#else /* ! NOTIFY_TZ_DEBUG_FILE */
-#define NOTIFY_TZ_PRINTF(args...) fprintf(stdout, ## args)
-#endif /* NOTIFY_TZ_DEBUG_FILE */
-#endif /* NOTIFY_TZ_DEBUG */
-#ifdef NOTIFY_TZ_LOG
-#define NOTIFY_LOG(fmt, args...) \
-{ \
- FILE *_notify_log_fp_; \
- if((_notify_log_fp_ = fopen(NOTIFY_TZ_LOG, "a")) != NULL) { \
- fprintf(_notify_log_fp_, "%d: " fmt, getpid(), ## args); \
- fclose(_notify_log_fp_); \
- } \
-}
-#endif /* NOTIFY_TZ_LOG */
-/*--------------------------------------------------------------------
- * __notify_78945668_info__ is a global variable (defined in Libnotify)
- * that can be used to disable the notify mechanism. Set to a negative
- * value to disable. It can then be set back to zero to re-enable.
- *-------------------------------------------------------------------- */
-extern int __notify_78945668_info__;
-
-/*--------------------------------------------------------------------
- * fullname is used to pass the actual path of the timezone file to the
- * notify routines. If it is a nil string, that means no timezone file
- * is being used.
- *-------------------------------------------------------------------- */
-static char * fullname = NULL;
-
-static notify_tz_t gmt_notify = {-1, 0, 0};
-static notify_tz_t lcl_notify = {-1, 0, 0};
-static char notify_tz_name[] = NOTIFY_TZ_NAME;
-#endif /* NOTIFY_TZ */
static long
detzcode(codep)
@@ -375,203 +220,51 @@
settzname(void)
{
struct state * sp = lclptr;
- int i, need;
- unsigned char * types;
-#define NEED_STD 1
-#define NEED_DST 2
-#define NEED_DAYLIGHT 4
-#define NEED_ALL (NEED_STD | NEED_DST | NEED_DAYLIGHT)
+ int i;
tzname[0] = wildabbr;
tzname[1] = wildabbr;
#ifdef USG_COMPAT
daylight = 0;
- _st_set_timezone(0);
+ timezone = 0;
#endif /* defined USG_COMPAT */
#ifdef ALTZONE
altzone = 0;
#endif /* defined ALTZONE */
#ifdef ALL_STATE
if (sp == NULL) {
- tzname[0] = tzname[1] = (char *)gmt;
+ tzname[0] = tzname[1] = gmt;
return;
}
#endif /* defined ALL_STATE */
+ for (i = 0; i < sp->typecnt; ++i) {
+ const struct ttinfo * const ttisp = &sp->ttis[i];
+
+ tzname[ttisp->tt_isdst] =
+ &sp->chars[ttisp->tt_abbrind];
+#ifdef USG_COMPAT
+ if (ttisp->tt_isdst)
+ daylight = 1;
+ if (i == 0 || !ttisp->tt_isdst)
+ timezone = -(ttisp->tt_gmtoff);
+#endif /* defined USG_COMPAT */
+#ifdef ALTZONE
+ if (i == 0 || ttisp->tt_isdst)
+ altzone = -(ttisp->tt_gmtoff);
+#endif /* defined ALTZONE */
+ }
/*
- * PR-3765457: The original settzname went sequentially through the ttis
- * array, rather than correctly indexing via the types array, to get
- * the real order of the timezone changes. In addition, as a speed up,
- * we start at the end of the changes, and work back, so that most of
- * the time, we don't have to look through the entire array.
- */
- if (sp->timecnt == 0 && sp->typecnt == 1) {
- /*
- * Unfortunately, there is an edge case when typecnt == 1 and
- * timecnt == 0, which would cause the loop to never run. So
- * in that case, we fudge things up so that it is as if
- * timecnt == 1.
- */
- i = 0;
- types = (unsigned char *)""; /* we use the null as index */
- } else {
- /* the usual case */
- i = sp->timecnt - 1;
- types = sp->types;
- }
- need = NEED_ALL;
- for (; i >= 0 && need; --i) {
- const struct ttinfo * const ttisp = &sp->ttis[types[i]];
-
-#ifdef USG_COMPAT
- if ((need & NEED_DAYLIGHT) && ttisp->tt_isdst) {
- need &= ~NEED_DAYLIGHT;
- daylight = 1;
- }
-#endif /* defined USG_COMPAT */
- if (ttisp->tt_isdst) {
- if (need & NEED_DST) {
- need &= ~NEED_DST;
- tzname[1] = &sp->chars[ttisp->tt_abbrind];
-#ifdef ALTZONE
- altzone = -(ttisp->tt_gmtoff);
-#endif /* defined ALTZONE */
- }
- } else if (need & NEED_STD) {
- need &= ~NEED_STD;
- tzname[0] = &sp->chars[ttisp->tt_abbrind];
-#ifdef USG_COMPAT
- _st_set_timezone(-(ttisp->tt_gmtoff));
-#endif /* defined USG_COMPAT */
- }
-#if defined(ALTZONE) || defined(USG_COMPAT)
- if (i == 0) {
-#endif /* defined(ALTZONE) || defined(USG_COMPAT) */
-#ifdef ALTZONE
- if (need & NEED_DST)
- altzone = -(ttisp->tt_gmtoff);
-#endif /* defined ALTZONE */
-#ifdef USG_COMPAT
- if (need & NEED_STD)
- _st_set_timezone(-(ttisp->tt_gmtoff));
-#endif /* defined USG_COMPAT */
-#if defined(ALTZONE) || defined(USG_COMPAT)
- }
-#endif /* defined(ALTZONE) || defined(USG_COMPAT) */
- }
-}
-
-#ifdef NOTIFY_TZ
-static void
-notify_check_tz(notify_tz_t *p)
-{
- unsigned int nstat;
- int ncheck;
-
- if (__notify_78945668_info__ < 0) {
-#ifdef NOTIFY_TZ_DEBUG
- if(!p->notify_was_off) NOTIFY_TZ_PRINTF("notify_check_tz: setting %s_notify->notify_was_off\n", (p == &lcl_notify ? "lcl" : "gmt"));
-#endif /* NOTIFY_TZ_DEBUG */
- p->notify_was_off = 1;
- return;
- }
- /* force rereading the timezone file if notify was off */
- if (p->notify_was_off) {
-#ifdef NOTIFY_TZ_DEBUG
- NOTIFY_TZ_PRINTF("notify_check_tz: saw %s_notify->notify_was_off\n", (p == &lcl_notify ? "lcl" : "gmt"));
-#endif /* NOTIFY_TZ_DEBUG */
- p->is_set = 0;
- p->notify_was_off = 0;
- return;
- }
- if (p->token < 0)
- return;
- nstat = notify_check(p->token, &ncheck);
- if (nstat || ncheck) {
- p->is_set = 0;
-#ifdef NOTIFY_TZ_DEBUG
- NOTIFY_TZ_PRINTF("notify_check_tz: %s changed\n", (p == &lcl_notify) ? "lcl" : "gmt");
-#endif /* NOTIFY_TZ_DEBUG */
- }
-#ifdef NOTIFY_TZ_DEBUG
- NOTIFY_TZ_PRINTF("notify_check_tz: %s unchanged\n", (p == &lcl_notify) ? "lcl" : "gmt");
-#endif /* NOTIFY_TZ_DEBUG */
-}
-
-extern uint32_t notify_monitor_file(int token, char *path, int flags);
-
-static void
-notify_register_tz(char *file, notify_tz_t *p)
-{
- char *name;
- unsigned int nstat;
- int ncheck;
-
- if (__notify_78945668_info__ < 0)
- return;
- /*----------------------------------------------------------------
- * Since we don't record the last time zone filename, just cancel
- * (which should remove the file monitor) and setup from scratch
- *----------------------------------------------------------------*/
- if (p->token >= 0)
- notify_cancel(p->token);
- if (!file || *file == 0) {
- /* no time zone file to monitor */
- p->token = -1;
- return;
- }
- /*----------------------------------------------------------------
- * Just use com.apple.system.timezone if the path is /etc/localtime.
- * Otherwise use com.apple.system.timezone.<fullpath>
- *----------------------------------------------------------------*/
- if (TZDEFAULT && strcmp(file, TZDEFAULT) == 0)
- name = notify_tz_name;
- else {
- name = alloca(sizeof(notify_tz_name) + strlen(file) + 1);
- if (name == NULL) {
- p->token = -1;
- return;
- }
- strcpy(name, notify_tz_name);
- strcat(name, ".");
- strcat(name, file);
- }
-#ifdef NOTIFY_TZ_DEBUG
- NOTIFY_TZ_PRINTF("notify_register_tz: file=%s name=%s\n", file, name);
-#endif /* NOTIFY_TZ_DEBUG */
- nstat = notify_register_check(name, &p->token);
- if (nstat != 0) {
- p->token = -1;
- p->is_set = 0;
-#ifdef NOTIFY_TZ_DEBUG
- NOTIFY_TZ_PRINTF("***notify_register_tz: notify_register_check failed: %u\n", nstat);
-#endif /* NOTIFY_TZ_DEBUG */
-#ifdef NOTIFY_TZ_LOG
- NOTIFY_LOG("notify_register_check(%s) failed: %u\n", name, nstat);
-#endif /* NOTIFY_TZ_LOG */
- return;
- }
- /* don't need to request monitoring /etc/localtime */
- if (name != notify_tz_name) {
-#ifdef NOTIFY_TZ_DEBUG
- NOTIFY_TZ_PRINTF("notify_register_tz: monitor %s\n", file);
-#endif /* NOTIFY_TZ_DEBUG */
- nstat = notify_monitor_file(p->token, file, 0);
- if (nstat != 0) {
- notify_cancel(p->token);
- p->token = -1;
- p->is_set = 0;
-#ifdef NOTIFY_TZ_DEBUG
- NOTIFY_TZ_PRINTF("***notify_register_tz: notify_monitor_file failed: %u\n", nstat);
-#endif /* NOTIFY_TZ_DEBUG */
-#ifdef NOTIFY_TZ_LOG
- NOTIFY_LOG("notify_monitor_file(%s) failed: %u\n", file, nstat);
-#endif /* NOTIFY_TZ_LOG */
- return;
- }
- }
- notify_check(p->token, &ncheck); /* this always returns true */
-}
-#endif /* NOTIFY_TZ */
+ ** And to get the latest zone names into tzname. . .
+ */
+ for (i = 0; i < sp->timecnt; ++i) {
+ const struct ttinfo * const ttisp =
+ &sp->ttis[
+ sp->types[i]];
+
+ tzname[ttisp->tt_isdst] =
+ &sp->chars[ttisp->tt_abbrind];
+ }
+}
static int
tzload(name, sp)
@@ -582,9 +275,6 @@
int i;
int fid;
-#ifdef NOTIFY_TZ_DEBUG
- NOTIFY_TZ_PRINTF("tzload: name=%s\n", name);
-#endif /* NOTIFY_TZ_DEBUG */
/* XXX The following is from OpenBSD, and I'm not sure it is correct */
if (name != NULL && issetugid() != 0)
if ((name[0] == ':' && name[1] == '/') ||
@@ -602,15 +292,7 @@
** to hold the longest file name string that the implementation
** guarantees can be opened."
*/
-#ifdef NOTIFY_TZ
- if (!fullname) {
- fullname = malloc(FILENAME_MAX + 1);
- if (!fullname)
- return -1;
- }
-#else /* ! NOTIFY_TZ */
char fullname[FILENAME_MAX + 1];
-#endif /* NOTIFY_TZ */
if (name[0] == ':')
++name;
@@ -618,11 +300,7 @@
if (!doaccess) {
if ((p = TZDIR) == NULL)
return -1;
-#ifdef NOTIFY_TZ
- if ((strlen(p) + 1 + strlen(name) + 1) >= (FILENAME_MAX + 1))
-#else /* ! NOTIFY_TZ */
if ((strlen(p) + 1 + strlen(name) + 1) >= sizeof fullname)
-#endif /* NOTIFY_TZ */
return -1;
(void) strcpy(fullname, p);
(void) strcat(fullname, "/");
@@ -634,10 +312,6 @@
doaccess = TRUE;
name = fullname;
}
-#ifdef NOTIFY_TZ
- else
- strcpy(fullname, name);
-#endif /* NOTIFY_TZ */
if (doaccess && access(name, R_OK) != 0)
return -1;
if ((fid = _open(name, OPEN_MODE)) == -1)
@@ -649,26 +323,27 @@
}
{
struct tzhead * tzhp;
- union {
- struct tzhead tzhead;
- char buf[sizeof *sp + sizeof *tzhp];
- } u;
+ char buf[sizeof *sp + sizeof *tzhp];
int ttisstdcnt;
int ttisgmtcnt;
-#ifdef NOTIFY_TZ_DEBUG
- NOTIFY_TZ_PRINTF("tzload: reading %s\n", name);
-#endif /* NOTIFY_TZ_DEBUG */
- i = _read(fid, u.buf, sizeof u.buf);
+ i = _read(fid, buf, sizeof buf);
if (_close(fid) != 0)
return -1;
- ttisstdcnt = (int) detzcode(u.tzhead.tzh_ttisstdcnt);
- ttisgmtcnt = (int) detzcode(u.tzhead.tzh_ttisgmtcnt);
- sp->leapcnt = (int) detzcode(u.tzhead.tzh_leapcnt);
- sp->timecnt = (int) detzcode(u.tzhead.tzh_timecnt);
- sp->typecnt = (int) detzcode(u.tzhead.tzh_typecnt);
- sp->charcnt = (int) detzcode(u.tzhead.tzh_charcnt);
- p = u.tzhead.tzh_charcnt + sizeof u.tzhead.tzh_charcnt;
+ p = buf;
+ p += (sizeof tzhp->tzh_magic) + (sizeof tzhp->tzh_reserved);
+ ttisstdcnt = (int) detzcode(p);
+ p += 4;
+ ttisgmtcnt = (int) detzcode(p);
+ p += 4;
+ sp->leapcnt = (int) detzcode(p);
+ p += 4;
+ sp->timecnt = (int) detzcode(p);
+ p += 4;
+ sp->typecnt = (int) detzcode(p);
+ p += 4;
+ sp->charcnt = (int) detzcode(p);
+ p += 4;
if (sp->leapcnt < 0 || sp->leapcnt > TZ_MAX_LEAPS ||
sp->typecnt <= 0 || sp->typecnt > TZ_MAX_TYPES ||
sp->timecnt < 0 || sp->timecnt > TZ_MAX_TIMES ||
@@ -676,7 +351,7 @@
(ttisstdcnt != sp->typecnt && ttisstdcnt != 0) ||
(ttisgmtcnt != sp->typecnt && ttisgmtcnt != 0))
return -1;
- if (i - (p - u.buf) < sp->timecnt * 4 + /* ats */
+ if (i - (p - buf) < sp->timecnt * 4 + /* ats */
sp->timecnt + /* types */
sp->typecnt * (4 + 2) + /* ttinfos */
sp->charcnt + /* chars */
@@ -765,24 +440,14 @@
*/
static const char *
-getzname(strp, name, len)
+getzname(strp)
const char * strp;
-char ** name;
-size_t * len;
{
char c;
- char * ket;
-
- if (*strp == '<' && (ket = strchr(strp, '>')) != NULL) {
- *name = (char *)(strp + 1);
- *len = ket - strp - 1;
- return ket + 1;
- }
- *name = (char *)strp;
+
while ((c = *strp) != '\0' && !is_digit(c) && c != ',' && c != '-' &&
c != '+')
++strp;
- *len = strp - *name;
return strp;
}
@@ -944,8 +609,8 @@
}
/*
-** Given the Epoch-relative time of January 1, 00:00:00 UTC, in a year, the
-** year, a rule, and the offset from UTC at the time that rule takes effect,
+** Given the Epoch-relative time of January 1, 00:00:00 GMT, in a year, the
+** year, a rule, and the offset from GMT at the time that rule takes effect,
** calculate the Epoch-relative time that rule takes effect.
*/
@@ -1031,10 +696,10 @@
}
/*
- ** "value" is the Epoch-relative time of 00:00:00 UTC on the day in
+ ** "value" is the Epoch-relative time of 00:00:00 GMT on the day in
** question. To get the Epoch-relative time of the specified local
** time on that day, add the transition time and the current offset
- ** from UTC.
+ ** from GMT.
*/
return value + rulep->r_time + offset;
}
@@ -1062,15 +727,16 @@
int load_result;
INITIALIZE(dstname);
+ stdname = name;
if (lastditch) {
- stdname = name;
stdlen = strlen(name); /* length of standard zone name */
name += stdlen;
if (stdlen >= sizeof sp->chars)
stdlen = (sizeof sp->chars) - 1;
stdoffset = 0;
} else {
- name = getzname(name, (char **)&stdname, &stdlen);
+ name = getzname(name);
+ stdlen = name - stdname;
if (stdlen < 3)
return -1;
if (*name == '\0')
@@ -1082,14 +748,12 @@
}
}
load_result = tzload(TZDEFRULES, sp);
-#ifdef NOTIFY_TZ
- *fullname = 0; /* mark fullname as invalid */
-#endif /* NOTIFY_TZ */
if (load_result != 0)
sp->leapcnt = 0; /* so, we're off a little */
if (*name != '\0') {
dstname = name;
- name = getzname(name, (char **)&dstname, &dstlen);
+ name = getzname(name);
+ dstlen = name - dstname; /* length of DST zone name */
if (dstlen < 3)
return -1;
if (*name != '\0' && *name != ',' && *name != ';') {
@@ -1097,8 +761,6 @@
if (name == NULL)
return -1;
} else dstoffset = stdoffset - SECSPERHOUR;
- if (*name == '\0' && load_result != 0)
- name = TZDEFRULESTRING;
if (*name == ',' || *name == ';') {
struct rule start;
struct rule end;
@@ -1160,6 +822,8 @@
int j;
if (*name != '\0')
+ return -1;
+ if (load_result != 0)
return -1;
/*
** Initial values of theirstdoffset and theirdstoffset.
@@ -1234,7 +898,6 @@
sp->ttis[1].tt_gmtoff = -dstoffset;
sp->ttis[1].tt_isdst = TRUE;
sp->ttis[1].tt_abbrind = stdlen + 1;
- sp->typecnt = 2;
}
} else {
dstlen = 0;
@@ -1247,7 +910,7 @@
sp->charcnt = stdlen + 1;
if (dstlen != 0)
sp->charcnt += dstlen + 1;
- if ((size_t) sp->charcnt > sizeof sp->chars)
+ if (sp->charcnt > sizeof sp->chars)
return -1;
cp = sp->chars;
(void) strncpy(cp, stdname, stdlen);
@@ -1269,42 +932,10 @@
}
static void
-tzsetwall_basic(int rdlocked)
-{
-#ifdef NOTIFY_TZ
- notify_check_tz(&lcl_notify);
-#else
- if (TZDEFAULT) {
- static struct timespec last_mtimespec = {0, 0};
- struct stat statbuf;
-
- if (lstat(TZDEFAULT, &statbuf) == 0) {
- if (statbuf.st_mtimespec.tv_sec > last_mtimespec.tv_sec ||
- (statbuf.st_mtimespec.tv_sec == last_mtimespec.tv_sec &&
- statbuf.st_mtimespec.tv_nsec > last_mtimespec.tv_nsec)) {
- /* Trigger resetting the local TZ */
- lcl_is_set = 0;
- }
- last_mtimespec = statbuf.st_mtimespec;
- }
- }
-#endif /* NOTIFY_TZ */
- if (!rdlocked)
- _RWLOCK_RDLOCK(&lcl_rwlock);
- if (lcl_is_set < 0) {
-#ifdef NOTIFY_TZ_DEBUG
- NOTIFY_TZ_PRINTF("tzsetwall_basic lcl_is_set < 0\n");
-#endif
- if (!rdlocked)
- _RWLOCK_UNLOCK(&lcl_rwlock);
+tzsetwall_basic(void)
+{
+ if (lcl_is_set < 0)
return;
- }
-#ifdef NOTIFY_TZ_DEBUG
- NOTIFY_TZ_PRINTF("tzsetwall_basic not set\n");
-#endif
- _RWLOCK_UNLOCK(&lcl_rwlock);
-
- _RWLOCK_WRLOCK(&lcl_rwlock);
lcl_is_set = -1;
#ifdef ALL_STATE
@@ -1312,62 +943,37 @@
lclptr = (struct state *) malloc(sizeof *lclptr);
if (lclptr == NULL) {
settzname(); /* all we can do */
- _RWLOCK_UNLOCK(&lcl_rwlock);
- if (rdlocked)
- _RWLOCK_RDLOCK(&lcl_rwlock);
return;
}
}
#endif /* defined ALL_STATE */
if (tzload((char *) NULL, lclptr) != 0)
gmtload(lclptr);
-#ifdef NOTIFY_TZ
- notify_register_tz(fullname, &lcl_notify);
-#endif /* NOTIFY_TZ */
settzname();
- _RWLOCK_UNLOCK(&lcl_rwlock);
-
- if (rdlocked)
- _RWLOCK_RDLOCK(&lcl_rwlock);
}
void
tzsetwall(void)
{
-#ifdef NOTIFY_TZ_DEBUG
- NOTIFY_TZ_PRINTF("tzsetwall called\n");
-#endif /* NOTIFY_TZ_DEBUG */
- tzsetwall_basic(0);
-}
-
-__private_extern__ void
-tzset_basic(int rdlocked)
+ _MUTEX_LOCK(&lcl_mutex);
+ tzsetwall_basic();
+ _MUTEX_UNLOCK(&lcl_mutex);
+}
+
+static void
+tzset_basic(void)
{
const char * name;
name = getenv("TZ");
if (name == NULL) {
- tzsetwall_basic(rdlocked);
+ tzsetwall_basic();
return;
}
-#ifdef NOTIFY_TZ
- notify_check_tz(&lcl_notify);
-#endif /* NOTIFY_TZ */
- if (!rdlocked)
- _RWLOCK_RDLOCK(&lcl_rwlock);
- if (lcl_is_set > 0 && strcmp(lcl_TZname, name) == 0) {
- if (!rdlocked)
- _RWLOCK_UNLOCK(&lcl_rwlock);
-#ifdef NOTIFY_TZ_DEBUG
- NOTIFY_TZ_PRINTF("tzset_basic matched %s\n", lcl_TZname);
-#endif
+ if (lcl_is_set > 0 && strcmp(lcl_TZname, name) == 0)
return;
- }
- _RWLOCK_UNLOCK(&lcl_rwlock);
-
- _RWLOCK_WRLOCK(&lcl_rwlock);
- lcl_is_set = strlen(name) < sizeof lcl_TZname;
+ lcl_is_set = (strlen(name) < sizeof(lcl_TZname));
if (lcl_is_set)
(void) strcpy(lcl_TZname, name);
@@ -1376,9 +982,6 @@
lclptr = (struct state *) malloc(sizeof *lclptr);
if (lclptr == NULL) {
settzname(); /* all we can do */
- _RWLOCK_UNLOCK(&lcl_rwlock);
- if (rdlocked)
- _RWLOCK_RDLOCK(&lcl_rwlock);
return;
}
}
@@ -1389,35 +992,21 @@
*/
lclptr->leapcnt = 0; /* so, we're off a little */
lclptr->timecnt = 0;
- lclptr->typecnt = 0;
- lclptr->ttis[0].tt_isdst = 0;
lclptr->ttis[0].tt_gmtoff = 0;
lclptr->ttis[0].tt_abbrind = 0;
(void) strcpy(lclptr->chars, gmt);
-#ifdef NOTIFY_TZ
- if (fullname)
- *fullname = 0;
-#endif /* NOTIFY_TZ */
} else if (tzload(name, lclptr) != 0)
if (name[0] == ':' || tzparse(name, lclptr, FALSE) != 0)
(void) gmtload(lclptr);
-#ifdef NOTIFY_TZ
- notify_register_tz(fullname, &lcl_notify);
-#endif /* NOTIFY_TZ */
settzname();
- _RWLOCK_UNLOCK(&lcl_rwlock);
-
- if (rdlocked)
- _RWLOCK_RDLOCK(&lcl_rwlock);
}
void
tzset(void)
{
-#ifdef NOTIFY_TZ_DEBUG
- NOTIFY_TZ_PRINTF("tzset called TZ=%s\n", getenv("TZ"));
-#endif /* NOTIFY_TZ_DEBUG */
- tzset_basic(0);
+ _MUTEX_LOCK(&lcl_mutex);
+ tzset_basic();
+ _MUTEX_UNLOCK(&lcl_mutex);
}
/*
@@ -1430,11 +1019,7 @@
*/
/*ARGSUSED*/
-#ifdef __LP64__
-__private_extern__ struct tm *
-#else /* !__LP64__ */
-__private_extern__ void
-#endif /* __LP64__ */
+static void
localsub(timep, offset, tmp)
const time_t * const timep;
const long offset;
@@ -1445,18 +1030,11 @@
int i;
const time_t t = *timep;
-#ifdef NOTIFY_TZ_DEBUG
- NOTIFY_TZ_PRINTF("localsub called\n");
-#endif /* NOTIFY_TZ_DEBUG */
sp = lclptr;
#ifdef ALL_STATE
if (sp == NULL) {
-#ifdef __LP64__
- return gmtsub(timep, offset, tmp);
-#else /* !__LP64__ */
gmtsub(timep, offset, tmp);
return;
-#endif /* __LP64__ */
}
#endif /* defined ALL_STATE */
if (sp->timecnt == 0 || t < sp->ats[0]) {
@@ -1479,20 +1057,24 @@
** t += ttisp->tt_gmtoff;
** timesub(&t, 0L, sp, tmp);
*/
-#ifdef __LP64__
- if (timesub(&t, ttisp->tt_gmtoff, sp, tmp) == NULL)
- return NULL;
-#else /* !__LP64__ */
timesub(&t, ttisp->tt_gmtoff, sp, tmp);
-#endif /* __LP64__ */
tmp->tm_isdst = ttisp->tt_isdst;
tzname[tmp->tm_isdst] = &sp->chars[ttisp->tt_abbrind];
#ifdef TM_ZONE
tmp->TM_ZONE = &sp->chars[ttisp->tt_abbrind];
#endif /* defined TM_ZONE */
-#ifdef __LP64__
- return tmp;
-#endif /* __LP64__ */
+}
+
+struct tm *
+localtime_r(timep, p_tm)
+const time_t * const timep;
+struct tm *p_tm;
+{
+ _MUTEX_LOCK(&lcl_mutex);
+ tzset_basic();
+ localsub(timep, 0L, p_tm);
+ _MUTEX_UNLOCK(&lcl_mutex);
+ return(p_tm);
}
struct tm *
@@ -1504,17 +1086,14 @@
struct tm *p_tm;
if (__isthreaded != 0) {
- if (localtime_key == (pthread_key_t)-1) {
- _pthread_mutex_lock(&localtime_mutex);
- if (localtime_key == (pthread_key_t)-1) {
- localtime_key = __LIBC_PTHREAD_KEY_LOCALTIME;
- if (pthread_key_init_np(localtime_key, free) < 0) {
- _pthread_mutex_unlock(&localtime_mutex);
- return(NULL);
- }
+ _pthread_mutex_lock(&localtime_mutex);
+ if (localtime_key < 0) {
+ if (_pthread_key_create(&localtime_key, free) < 0) {
+ _pthread_mutex_unlock(&localtime_mutex);
+ return(NULL);
}
- _pthread_mutex_unlock(&localtime_mutex);
- }
+ }
+ _pthread_mutex_unlock(&localtime_mutex);
p_tm = _pthread_getspecific(localtime_key);
if (p_tm == NULL) {
if ((p_tm = (struct tm *)malloc(sizeof(struct tm)))
@@ -1522,98 +1101,43 @@
return(NULL);
_pthread_setspecific(localtime_key, p_tm);
}
- _RWLOCK_RDLOCK(&lcl_rwlock);
- tzset_basic(1);
-#ifdef __LP64__
- p_tm = localsub(timep, 0L, p_tm);
-#else /* !__LP64__ */
+ _pthread_mutex_lock(&lcl_mutex);
+ tzset_basic();
localsub(timep, 0L, p_tm);
-#endif /* __LP64__ */
- _RWLOCK_UNLOCK(&lcl_rwlock);
+ _pthread_mutex_unlock(&lcl_mutex);
return(p_tm);
} else {
- tzset_basic(0);
-#ifdef __LP64__
- return localsub(timep, 0L, &tm);
-#else /* !__LP64__ */
+ tzset_basic();
localsub(timep, 0L, &tm);
return(&tm);
-#endif /* __LP64__ */
- }
-}
-
-/*
-** Re-entrant version of localtime.
-*/
-
-struct tm *
-localtime_r(const time_t * const __restrict timep, struct tm * __restrict tm)
-{
- _RWLOCK_RDLOCK(&lcl_rwlock);
- tzset_basic(1);
-#ifdef __LP64__
- tm = localsub(timep, 0L, tm);
-#else /* !__LP64__ */
- localsub(timep, 0L, tm);
-#endif /* __LP64__ */
- _RWLOCK_UNLOCK(&lcl_rwlock);
- return tm;
+ }
}
/*
** gmtsub is to gmtime as localsub is to localtime.
*/
-#ifdef __LP64__
-static struct tm *
-#else /* !__LP64__ */
static void
-#endif /* __LP64__ */
gmtsub(timep, offset, tmp)
const time_t * const timep;
const long offset;
struct tm * const tmp;
{
-#ifdef NOTIFY_TZ_DEBUG
- NOTIFY_TZ_PRINTF("gmtsub called\n");
-#endif /* NOTIFY_TZ_DEBUG */
-#ifdef NOTIFY_TZ
- notify_check_tz(&gmt_notify);
-#endif /* NOTIFY_TZ */
+ _MUTEX_LOCK(&gmt_mutex);
if (!gmt_is_set) {
- _MUTEX_LOCK(&gmt_mutex);
- if (!gmt_is_set) {
+ gmt_is_set = TRUE;
#ifdef ALL_STATE
-#ifdef NOTIFY_TZ
- if (gmtptr == NULL)
-#endif /* NOTIFY_TZ */
- gmtptr = (struct state *) malloc(sizeof *gmtptr);
- if (gmtptr != NULL)
-#ifdef NOTIFY_TZ
- {
-#endif /* NOTIFY_TZ */
+ gmtptr = (struct state *) malloc(sizeof *gmtptr);
+ if (gmtptr != NULL)
#endif /* defined ALL_STATE */
- gmtload(gmtptr);
-#ifdef NOTIFY_TZ
- notify_register_tz(fullname, &gmt_notify);
-#ifdef ALL_STATE
- }
-#endif
-#endif /* NOTIFY_TZ */
- gmt_is_set = TRUE;
- }
- _MUTEX_UNLOCK(&gmt_mutex);
- }
-#ifdef __LP64__
- if(timesub(timep, offset, gmtptr, tmp) == NULL)
- return NULL;
-#else /* !__LP64__ */
+ gmtload(gmtptr);
+ }
+ _MUTEX_UNLOCK(&gmt_mutex);
timesub(timep, offset, gmtptr, tmp);
-#endif /* __LP64__ */
#ifdef TM_ZONE
/*
** Could get fancy here and deliver something such as
- ** "UTC+xxxx" or "UTC-xxxx" if offset is non-zero,
+ ** "GMT+xxxx" or "GMT-xxxx" if offset is non-zero,
** but this is no time for a treasure hunt.
*/
if (offset != 0)
@@ -1621,7 +1145,7 @@
else {
#ifdef ALL_STATE
if (gmtptr == NULL)
- tmp->TM_ZONE = (char *)gmt;
+ tmp->TM_ZONE = gmt;
else tmp->TM_ZONE = gmtptr->chars;
#endif /* defined ALL_STATE */
#ifndef ALL_STATE
@@ -1629,9 +1153,6 @@
#endif /* State Farm */
}
#endif /* defined TM_ZONE */
-#ifdef __LP64__
- return tmp;
-#endif /* __LP64__ */
}
struct tm *
@@ -1643,17 +1164,14 @@
struct tm *p_tm;
if (__isthreaded != 0) {
- if (gmtime_key == (pthread_key_t)-1) {
- _pthread_mutex_lock(&gmtime_mutex);
- if (gmtime_key == (pthread_key_t)-1) {
- gmtime_key = __LIBC_PTHREAD_KEY_GMTIME;
- if (pthread_key_init_np(gmtime_key, free) < 0) {
- _pthread_mutex_unlock(&gmtime_mutex);
- return(NULL);
- }
+ _pthread_mutex_lock(&gmtime_mutex);
+ if (gmtime_key < 0) {
+ if (_pthread_key_create(&gmtime_key, free) < 0) {
+ _pthread_mutex_unlock(&gmtime_mutex);
+ return(NULL);
}
- _pthread_mutex_unlock(&gmtime_mutex);
- }
+ }
+ _pthread_mutex_unlock(&gmtime_mutex);
/*
* Changed to follow POSIX.1 threads standard, which
* is what BSD currently has.
@@ -1665,39 +1183,20 @@
}
_pthread_setspecific(gmtime_key, p_tm);
}
-#ifdef __LP64__
- return gmtsub(timep, 0L, p_tm);
-#else /* !__LP64__ */
gmtsub(timep, 0L, p_tm);
return(p_tm);
-#endif /* __LP64__ */
}
else {
-#ifdef __LP64__
- return gmtsub(timep, 0L, &tm);
-#else /* !__LP64__ */
gmtsub(timep, 0L, &tm);
return(&tm);
-#endif /* __LP64__ */
- }
-}
-
-/*
-* Re-entrant version of gmtime.
-*/
+ }
+}
struct tm *
-gmtime_r(timep, tm)
-const time_t * const timep;
-struct tm * tm;
-{
-
-#ifdef __LP64__
- return gmtsub(timep, 0L, tm);
-#else /* !__LP64__ */
+gmtime_r(const time_t * timep, struct tm * tm)
+{
gmtsub(timep, 0L, tm);
- return tm;
-#endif /* __LP64__ */
+ return(tm);
}
#ifdef STD_INSPIRED
@@ -1707,21 +1206,13 @@
const time_t * const timep;
const long offset;
{
-#ifdef __LP64__
- return gmtsub(timep, offset, &tm);
-#else /* !__LP64__ */
gmtsub(timep, offset, &tm);
return &tm;
-#endif /* __LP64__ */
}
#endif /* defined STD_INSPIRED */
-#ifdef __LP64__
-static struct tm *
-#else /* !__LP64__ */
static void
-#endif /* __LP64__ */
timesub(timep, offset, sp, tmp)
const time_t * const timep;
const long offset;
@@ -1798,12 +1289,7 @@
if (tmp->tm_wday < 0)
tmp->tm_wday += DAYSPERWEEK;
y = EPOCH_YEAR;
-#define _LEAPS_THRU_END_OF(y) ((y) / 4 - (y) / 100 + (y) / 400)
-#ifdef __LP64__
-#define LEAPS_THRU_END_OF(y) ((y) >= 0 ? _LEAPS_THRU_END_OF(y) : _LEAPS_THRU_END_OF((y) + 1) - 1)
-#else /* !__LP64__ */
-#define LEAPS_THRU_END_OF(y) _LEAPS_THRU_END_OF(y)
-#endif /* __LP64__ */
+#define LEAPS_THRU_END_OF(y) ((y) / 4 - (y) / 100 + (y) / 400)
while (days < 0 || days >= (long) year_lengths[yleap = isleap(y)]) {
long newy;
@@ -1815,16 +1301,7 @@
LEAPS_THRU_END_OF(y - 1);
y = newy;
}
-#ifdef __LP64__
- y -= TM_YEAR_BASE;
- if (y < INT_MIN || y > INT_MAX) {
- errno = EOVERFLOW;
- return NULL;
- }
- tmp->tm_year = y;
-#else /* !__LP64__ */
tmp->tm_year = y - TM_YEAR_BASE;
-#endif /* __LP64__ */
tmp->tm_yday = (int) days;
ip = mon_lengths[yleap];
for (tmp->tm_mon = 0; days >= (long) ip[tmp->tm_mon]; ++(tmp->tm_mon))
@@ -1834,9 +1311,6 @@
#ifdef TM_GMTOFF
tmp->TM_GMTOFF = offset;
#endif /* defined TM_GMTOFF */
-#ifdef __LP64__
- return tmp;
-#endif /* __LP64__ */
}
char *
@@ -1845,45 +1319,20 @@
{
/*
** Section 4.12.3.2 of X3.159-1989 requires that
-** The ctime function converts the calendar time pointed to by timer
+** The ctime funciton converts the calendar time pointed to by timer
** to local time in the form of a string. It is equivalent to
** asctime(localtime(timer))
*/
-#ifdef __LP64__
- /*
- * In 64-bit, the timep value may produce a time value with a year
- * that exceeds 32-bits in size (won't fit in struct tm), so localtime
- * will return NULL.
- */
- struct tm *tm = localtime(timep);
-
- if (tm == NULL)
- return NULL;
- return asctime(tm);
-#else /* !__LP64__ */
return asctime(localtime(timep));
-#endif /* __LP64__ */
}
char *
ctime_r(timep, buf)
const time_t * const timep;
-char * buf;
-{
- struct tm tm;
-
-#ifdef __LP64__
- /*
- * In 64-bit, the timep value may produce a time value with a year
- * that exceeds 32-bits in size (won't fit in struct tm), so localtime_r
- * will return NULL.
- */
- if (localtime_r(timep, &tm) == NULL)
- return NULL;
- return asctime_r(&tm, buf);
-#else /* !__LP64__ */
+char *buf;
+{
+ struct tm tm;
return asctime_r(localtime_r(timep, &tm), buf);
-#endif /* __LP64__ */
}
/*
@@ -1938,14 +1387,8 @@
{
int result;
- /*
- * Assume that atmp and btmp point to normalized tm strutures.
- * So only arithmetic with tm_year could overflow in 64-bit.
- */
- if (atmp->tm_year != btmp->tm_year) {
- return (atmp->tm_year > btmp->tm_year ? 1 : -1);
- }
- if ((result = (atmp->tm_mon - btmp->tm_mon)) == 0 &&
+ if ((result = (atmp->tm_year - btmp->tm_year)) == 0 &&
+ (result = (atmp->tm_mon - btmp->tm_mon)) == 0 &&
(result = (atmp->tm_mday - btmp->tm_mday)) == 0 &&
(result = (atmp->tm_hour - btmp->tm_hour)) == 0 &&
(result = (atmp->tm_min - btmp->tm_min)) == 0)
@@ -1954,17 +1397,11 @@
}
static time_t
-time2sub(tmp, funcp, offset, okayp, do_norm_secs, unix03)
+time2(tmp, funcp, offset, okayp)
struct tm * const tmp;
-#ifdef __LP64__
-struct tm *(* const funcp)(const time_t*, long, struct tm*);
-#else /* !__LP64__ */
void (* const funcp)(const time_t*, long, struct tm*);
-#endif /* __LP64__ */
const long offset;
int * const okayp;
-const int do_norm_secs;
-int unix03;
{
const struct state * sp;
int dir;
@@ -1974,17 +1411,9 @@
time_t newt;
time_t t;
struct tm yourtm, mytm;
-#ifdef __LP64__
- long year, il;
-#endif /* __LP64__ */
*okayp = FALSE;
yourtm = *tmp;
- if (do_norm_secs) {
- if (normalize_overflow(&yourtm.tm_min, &yourtm.tm_sec,
- SECSPERMIN))
- return WRONG;
- }
if (normalize_overflow(&yourtm.tm_hour, &yourtm.tm_min, MINSPERHOUR))
return WRONG;
if (normalize_overflow(&yourtm.tm_mday, &yourtm.tm_hour, HOURSPERDAY))
@@ -1995,66 +1424,32 @@
** Turn yourtm.tm_year into an actual year number for now.
** It is converted back to an offset from TM_YEAR_BASE later.
*/
-#ifdef __LP64__
- year = (long)yourtm.tm_year + TM_YEAR_BASE;
-#else /* !__LP64__ */
if (increment_overflow(&yourtm.tm_year, TM_YEAR_BASE))
return WRONG;
-#endif /* __LP64__ */
while (yourtm.tm_mday <= 0) {
-#ifdef __LP64__
- year--;
- il = year + (1 < yourtm.tm_mon);
- yourtm.tm_mday += year_lengths[isleap(il)];
-#else /* !__LP64__ */
if (increment_overflow(&yourtm.tm_year, -1))
return WRONG;
i = yourtm.tm_year + (1 < yourtm.tm_mon);
yourtm.tm_mday += year_lengths[isleap(i)];
-#endif /* __LP64__ */
}
while (yourtm.tm_mday > DAYSPERLYEAR) {
-#ifdef __LP64__
- il = year + (1 < yourtm.tm_mon);
- yourtm.tm_mday -= year_lengths[isleap(il)];
- year++;
-#else /* !__LP64__ */
i = yourtm.tm_year + (1 < yourtm.tm_mon);
yourtm.tm_mday -= year_lengths[isleap(i)];
if (increment_overflow(&yourtm.tm_year, 1))
return WRONG;
-#endif /* __LP64__ */
}
for ( ; ; ) {
-#ifdef __LP64__
- i = mon_lengths[isleap(year)][yourtm.tm_mon];
-#else /* !__LP64__ */
i = mon_lengths[isleap(yourtm.tm_year)][yourtm.tm_mon];
-#endif /* __LP64__ */
if (yourtm.tm_mday <= i)
break;
yourtm.tm_mday -= i;
if (++yourtm.tm_mon >= MONSPERYEAR) {
yourtm.tm_mon = 0;
-#ifdef __LP64__
- year++;
-#else /* !__LP64__ */
if (increment_overflow(&yourtm.tm_year, 1))
return WRONG;
-#endif /* __LP64__ */
- }
- }
-#ifdef __LP64__
- year -= TM_YEAR_BASE;
- if (year > INT_MAX || year < INT_MIN)
- return WRONG;
- yourtm.tm_year = year;
-#else /* !__LP64__ */
+ }
+ }
if (increment_overflow(&yourtm.tm_year, -TM_YEAR_BASE))
- return WRONG;
-#endif /* __LP64__ */
- /* Don't go below 1900 for POLA */
- if (yourtm.tm_year < 0)
return WRONG;
if (yourtm.tm_sec >= 0 && yourtm.tm_sec < SECSPERMIN)
saved_seconds = 0;
@@ -2079,18 +1474,10 @@
** Divide the search space in half
** (this works whether time_t is signed or unsigned).
*/
-#ifdef __LP64__
- /* optimization: see if the value is 31-bit (signed) */
- t = (((time_t) 1) << (TYPE_BIT(int) - 1)) - 1;
- bits = ((*funcp)(&t, offset, &mytm) == NULL || tmcomp(&mytm, &yourtm) < 0) ? TYPE_BIT(time_t) - 1 : TYPE_BIT(int) - 1;
-#else /* !__LP64__ */
bits = TYPE_BIT(time_t) - 1;
-#endif /* __LP64__ */
/*
- ** In 64-bit, we now return an error if we cannot represent the
- ** struct tm value in a time_t. And tmcomp() is fixed to avoid
- ** overflow in tm_year. So we only put a cap on bits because time_t
- ** can't be larger that 56 bit (when tm_year == INT_MAX).
+ ** If we have more than this, we will overflow tm_year for tmcomp().
+ ** We should really return an error if we cannot represent it.
*/
if (bits > 56)
bits = 56;
@@ -2101,19 +1488,8 @@
*/
t = TYPE_SIGNED(time_t) ? 0 : (((time_t) 1) << bits);
for ( ; ; ) {
-#ifdef __LP64__
- if ((*funcp)(&t, offset, &mytm) == NULL) {
- /* we overflowed, so t is too big */
- dir = 1;
- goto skip_tmcomp;
- }
-#else /* !__LP64__ */
(*funcp)(&t, offset, &mytm);
-#endif /* __LP64__ */
dir = tmcomp(&mytm, &yourtm);
-#ifdef __LP64__
-skip_tmcomp:
-#endif /* __LP64__ */
if (dir != 0) {
if (bits-- < 0)
return WRONG;
@@ -2124,9 +1500,6 @@
else t += ((time_t) 1) << bits;
continue;
}
- sp = (funcp == localsub) ? lclptr : gmtptr;
- if (unix03 && sp->typecnt == 1 && yourtm.tm_isdst > 0)
- yourtm.tm_isdst = 0; /* alternative time does not apply */
if (yourtm.tm_isdst < 0 || mytm.tm_isdst == yourtm.tm_isdst)
break;
/*
@@ -2135,6 +1508,12 @@
** It's okay to guess wrong since the guess
** gets checked.
*/
+ /*
+ ** The (void *) casts are the benefit of SunOS 3.3 on Sun 2's.
+ */
+ sp = (const struct state *)
+ (((void *) funcp == (void *) localsub) ?
+ lclptr : gmtptr);
#ifdef ALL_STATE
if (sp == NULL)
return WRONG;
@@ -2147,12 +1526,7 @@
continue;
newt = t + sp->ttis[j].tt_gmtoff -
sp->ttis[i].tt_gmtoff;
-#ifdef __LP64__
- if ((*funcp)(&newt, offset, &mytm) == NULL)
- return WRONG;
-#else /* !__LP64__ */
(*funcp)(&newt, offset, &mytm);
-#endif /* __LP64__ */
if (tmcomp(&mytm, &yourtm) != 0)
continue;
if (mytm.tm_isdst != yourtm.tm_isdst)
@@ -2171,63 +1545,25 @@
if ((newt < t) != (saved_seconds < 0))
return WRONG;
t = newt;
-#ifdef __LP64__
- if ((*funcp)(&t, offset, tmp) == NULL)
- return WRONG;
-#else /* !__LP64__ */
(*funcp)(&t, offset, tmp);
-#endif /* __LP64__ */
*okayp = TRUE;
return t;
}
static time_t
-time2(tmp, funcp, offset, okayp, unix03)
+time1(tmp, funcp, offset)
struct tm * const tmp;
-#ifdef __LP64__
-struct tm *(* const funcp)(const time_t*, long, struct tm*);
-#else /* !__LP64__ */
-void (* const funcp)(const time_t*, long, struct tm*);
-#endif /* __LP64__ */
+void (* const funcp)(const time_t *, long, struct tm *);
const long offset;
-int * const okayp;
-int unix03;
-{
- time_t t;
-
- /*
- ** First try without normalization of seconds
- ** (in case tm_sec contains a value associated with a leap second).
- ** If that fails, try with normalization of seconds.
- */
- t = time2sub(tmp, funcp, offset, okayp, FALSE, unix03);
- return *okayp ? t : time2sub(tmp, funcp, offset, okayp, TRUE, unix03);
-}
-
-__private_extern__ time_t
-time1(tmp, funcp, offset, unix03)
-struct tm * const tmp;
-#ifdef __LP64__
-struct tm *(* const funcp)(const time_t *, long, struct tm *);
-#else /* !__LP64__ */
-void (* const funcp)(const time_t *, long, struct tm *);
-#endif /* __LP64__ */
-const long offset;
-int unix03;
{
time_t t;
const struct state * sp;
int samei, otheri;
- int sameind, otherind;
- int i;
- int nseen;
- int seen[TZ_MAX_TYPES];
- int types[TZ_MAX_TYPES];
int okay;
if (tmp->tm_isdst > 1)
tmp->tm_isdst = 1;
- t = time2(tmp, funcp, offset, &okay, unix03);
+ t = time2(tmp, funcp, offset, &okay);
#ifdef PCTS
/*
** PCTS code courtesy Grant Sullivan (grant@osf.org).
@@ -2247,31 +1583,25 @@
** We try to divine the type they started from and adjust to the
** type they need.
*/
- sp = (funcp == localsub) ? lclptr : gmtptr;
+ /*
+ ** The (void *) casts are the benefit of SunOS 3.3 on Sun 2's.
+ */
+ sp = (const struct state *) (((void *) funcp == (void *) localsub) ?
+ lclptr : gmtptr);
#ifdef ALL_STATE
if (sp == NULL)
return WRONG;
#endif /* defined ALL_STATE */
- for (i = 0; i < sp->typecnt; ++i)
- seen[i] = FALSE;
- nseen = 0;
- for (i = sp->timecnt - 1; i >= 0; --i)
- if (!seen[sp->types[i]]) {
- seen[sp->types[i]] = TRUE;
- types[nseen++] = sp->types[i];
- }
- for (sameind = 0; sameind < nseen; ++sameind) {
- samei = types[sameind];
+ for (samei = sp->typecnt - 1; samei >= 0; --samei) {
if (sp->ttis[samei].tt_isdst != tmp->tm_isdst)
continue;
- for (otherind = 0; otherind < nseen; ++otherind) {
- otheri = types[otherind];
+ for (otheri = sp->typecnt - 1; otheri >= 0; --otheri) {
if (sp->ttis[otheri].tt_isdst == tmp->tm_isdst)
continue;
tmp->tm_sec += sp->ttis[otheri].tt_gmtoff -
sp->ttis[samei].tt_gmtoff;
tmp->tm_isdst = !tmp->tm_isdst;
- t = time2(tmp, funcp, offset, &okay, unix03);
+ t = time2(tmp, funcp, offset, &okay);
if (okay)
return t;
tmp->tm_sec -= sp->ttis[otheri].tt_gmtoff -
@@ -2281,25 +1611,19 @@
}
return WRONG;
}
-#else /* BUILDING_VARIANT */
-__private_extern__ pthread_rwlock_t lcl_rwlock;
-#endif /* BUILDING_VARIANT */
time_t
mktime(tmp)
struct tm * const tmp;
{
time_t mktime_return_value;
- int serrno = errno;
- _RWLOCK_RDLOCK(&lcl_rwlock);
- tzset_basic(1);
- mktime_return_value = time1(tmp, localsub, 0L, __DARWIN_UNIX03);
- _RWLOCK_UNLOCK(&lcl_rwlock);
- errno = serrno;
+ _MUTEX_LOCK(&lcl_mutex);
+ tzset_basic();
+ mktime_return_value = time1(tmp, localsub, 0L);
+ _MUTEX_UNLOCK(&lcl_mutex);
return(mktime_return_value);
}
-#if !BUILDING_VARIANT
#ifdef STD_INSPIRED
time_t
@@ -2315,7 +1639,7 @@
struct tm * const tmp;
{
tmp->tm_isdst = 0;
- return time1(tmp, gmtsub, 0L, __DARWIN_UNIX03);
+ return time1(tmp, gmtsub, 0L);
}
time_t
@@ -2324,7 +1648,7 @@
const long offset;
{
tmp->tm_isdst = 0;
- return time1(tmp, gmtsub, offset, __DARWIN_UNIX03);
+ return time1(tmp, gmtsub, offset);
}
#endif /* defined STD_INSPIRED */
@@ -2357,7 +1681,7 @@
/*
** IEEE Std 1003.1-1988 (POSIX) legislates that 536457599
-** shall correspond to "Wed Dec 31 23:59:59 UTC 1986", which
+** shall correspond to "Wed Dec 31 23:59:59 GMT 1986", which
** is not the case if we are accounting for leap seconds.
** So, we provide the following conversion routines for use
** when exchanging timestamps with POSIX conforming systems.
@@ -2424,4 +1748,3 @@
}
#endif /* defined STD_INSPIRED */
-#endif /* !BUILDING_VARIANT */