diff options
Diffstat (limited to 'js/src/vm/Time.cpp')
-rw-r--r-- | js/src/vm/Time.cpp | 220 |
1 files changed, 220 insertions, 0 deletions
diff --git a/js/src/vm/Time.cpp b/js/src/vm/Time.cpp new file mode 100644 index 0000000000..79884a962c --- /dev/null +++ b/js/src/vm/Time.cpp @@ -0,0 +1,220 @@ +/* -*- Mode: C++; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 2 -*- + * vim: set ts=8 sts=2 et sw=2 tw=80: + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. */ + +/* PR time code. */ + +#include "vm/Time.h" + +#ifdef SOLARIS +# define _REENTRANT 1 +#endif +#include <string.h> +#include <time.h> + +#include "jstypes.h" + +#ifdef XP_WIN +# include <windef.h> +# include <winbase.h> +# include <crtdbg.h> /* for _CrtSetReportMode */ +# include <stdlib.h> /* for _set_invalid_parameter_handler */ +#endif + +#ifdef XP_UNIX + +# ifdef _SVID_GETTOD /* Defined only on Solaris, see Solaris <sys/types.h> */ +extern int gettimeofday(struct timeval* tv); +# endif + +# include <sys/time.h> + +#endif /* XP_UNIX */ + +#if defined(XP_UNIX) +int64_t PRMJ_Now() { + struct timeval tv; + +# ifdef _SVID_GETTOD /* Defined only on Solaris, see Solaris <sys/types.h> */ + gettimeofday(&tv); +# else + gettimeofday(&tv, 0); +# endif /* _SVID_GETTOD */ + + return int64_t(tv.tv_sec) * PRMJ_USEC_PER_SEC + int64_t(tv.tv_usec); +} + +#else + +// Returns the number of microseconds since the Unix epoch. +static int64_t FileTimeToUnixMicroseconds(const FILETIME& ft) { + // Get the time in 100ns intervals. + int64_t t = (int64_t(ft.dwHighDateTime) << 32) | int64_t(ft.dwLowDateTime); + + // The Windows epoch is around 1600. The Unix epoch is around 1970. + // Subtract the difference. + static const int64_t TimeToEpochIn100ns = 0x19DB1DED53E8000; + t -= TimeToEpochIn100ns; + + // Divide by 10 to convert to microseconds. + return t / 10; +} + +int64_t PRMJ_Now() { + FILETIME ft; + GetSystemTimePreciseAsFileTime(&ft); + return FileTimeToUnixMicroseconds(ft); +} +#endif + +#if !JS_HAS_INTL_API +# ifdef XP_WIN +static void PRMJ_InvalidParameterHandler(const wchar_t* expression, + const wchar_t* function, + const wchar_t* file, unsigned int line, + uintptr_t pReserved) { + /* empty */ +} +# endif + +/* Format a time value into a buffer. Same semantics as strftime() */ +size_t PRMJ_FormatTime(char* buf, size_t buflen, const char* fmt, + const PRMJTime* prtm, int timeZoneYear, + int offsetInSeconds) { + size_t result = 0; +# if defined(XP_UNIX) || defined(XP_WIN) + struct tm a; +# ifdef XP_WIN + _invalid_parameter_handler oldHandler; +# ifndef __MINGW32__ + int oldReportMode; +# endif // __MINGW32__ +# endif // XP_WIN + + memset(&a, 0, sizeof(struct tm)); + + a.tm_sec = prtm->tm_sec; + a.tm_min = prtm->tm_min; + a.tm_hour = prtm->tm_hour; + a.tm_mday = prtm->tm_mday; + a.tm_mon = prtm->tm_mon; + a.tm_wday = prtm->tm_wday; + + /* + * On systems where |struct tm| has members tm_gmtoff and tm_zone, we + * must fill in those values, or else strftime will return wrong results + * (e.g., bug 511726, bug 554338). + */ +# if defined(HAVE_LOCALTIME_R) && defined(HAVE_TM_ZONE_TM_GMTOFF) + char emptyTimeZoneId[] = ""; + { + /* + * Fill out |td| to the time represented by |prtm|, leaving the + * timezone fields zeroed out. localtime_r will then fill in the + * timezone fields for that local time according to the system's + * timezone parameters. Use |timeZoneYear| for the year to ensure the + * time zone name matches the time zone offset used by the caller. + */ + struct tm td; + memset(&td, 0, sizeof(td)); + td.tm_sec = prtm->tm_sec; + td.tm_min = prtm->tm_min; + td.tm_hour = prtm->tm_hour; + td.tm_mday = prtm->tm_mday; + td.tm_mon = prtm->tm_mon; + td.tm_wday = prtm->tm_wday; + td.tm_year = timeZoneYear - 1900; + td.tm_yday = prtm->tm_yday; + td.tm_isdst = prtm->tm_isdst; + + time_t t = mktime(&td); + + // If either mktime or localtime_r failed, fill in the fallback time + // zone offset |offsetInSeconds| and set the time zone identifier to + // the empty string. + if (t != static_cast<time_t>(-1) && localtime_r(&t, &td)) { + a.tm_gmtoff = td.tm_gmtoff; + a.tm_zone = td.tm_zone; + } else { + a.tm_gmtoff = offsetInSeconds; + a.tm_zone = emptyTimeZoneId; + } + } +# endif + + /* + * Years before 1900 and after 9999 cause strftime() to abort on Windows. + * To avoid that we replace it with FAKE_YEAR_BASE + year % 100 and then + * replace matching substrings in the strftime() result with the real year. + * Note that FAKE_YEAR_BASE should be a multiple of 100 to make 2-digit + * year formats (%y) work correctly (since we won't find the fake year + * in that case). + */ + constexpr int FAKE_YEAR_BASE = 9900; + int fake_tm_year = 0; + if (prtm->tm_year < 1900 || prtm->tm_year > 9999) { + fake_tm_year = FAKE_YEAR_BASE + prtm->tm_year % 100; + a.tm_year = fake_tm_year - 1900; + } else { + a.tm_year = prtm->tm_year - 1900; + } + a.tm_yday = prtm->tm_yday; + a.tm_isdst = prtm->tm_isdst; + + /* + * Even with the above, SunOS 4 seems to detonate if tm_zone and tm_gmtoff + * are null. This doesn't quite work, though - the timezone is off by + * tzoff + dst. (And mktime seems to return -1 for the exact dst + * changeover time.) + */ + +# ifdef XP_WIN + oldHandler = _set_invalid_parameter_handler(PRMJ_InvalidParameterHandler); +# ifndef __MINGW32__ + /* + * MinGW doesn't have _CrtSetReportMode and defines it to be a no-op. + * We ifdef it off to avoid warnings about unused variables + */ + oldReportMode = _CrtSetReportMode(_CRT_ASSERT, 0); +# endif // __MINGW32__ +# endif // XP_WIN + + result = strftime(buf, buflen, fmt, &a); + +# ifdef XP_WIN + _set_invalid_parameter_handler(oldHandler); +# ifndef __MINGW32__ + _CrtSetReportMode(_CRT_ASSERT, oldReportMode); +# endif // __MINGW32__ +# endif // XP_WIN + + if (fake_tm_year && result) { + char real_year[16]; + char fake_year[16]; + size_t real_year_len; + size_t fake_year_len; + char* p; + + sprintf(real_year, "%d", prtm->tm_year); + real_year_len = strlen(real_year); + sprintf(fake_year, "%d", fake_tm_year); + fake_year_len = strlen(fake_year); + + /* Replace the fake year in the result with the real year. */ + for (p = buf; (p = strstr(p, fake_year)); p += real_year_len) { + size_t new_result = result + real_year_len - fake_year_len; + if (new_result >= buflen) { + return 0; + } + memmove(p + real_year_len, p + fake_year_len, strlen(p + fake_year_len)); + memcpy(p, real_year, real_year_len); + result = new_result; + *(buf + result) = '\0'; + } + } +# endif + return result; +} +#endif /* !JS_HAS_INTL_API */ |