6420b5d8a07087488486c0cc9b1acf1191858e19
[WebKit-https.git] / Source / WTF / wtf / DateMath.cpp
1 /*
2  * Copyright (C) 1999-2000 Harri Porten (porten@kde.org)
3  * Copyright (C) 2006-2017 Apple Inc. All rights reserved.
4  * Copyright (C) 2009 Google Inc. All rights reserved.
5  * Copyright (C) 2007-2009 Torch Mobile, Inc.
6  * Copyright (C) 2010 &yet, LLC. (nate@andyet.net)
7  *
8  * The Original Code is Mozilla Communicator client code, released
9  * March 31, 1998.
10  *
11  * The Initial Developer of the Original Code is
12  * Netscape Communications Corporation.
13  * Portions created by the Initial Developer are Copyright (C) 1998
14  * the Initial Developer. All Rights Reserved.
15  *
16  * This library is free software; you can redistribute it and/or
17  * modify it under the terms of the GNU Lesser General Public
18  * License as published by the Free Software Foundation; either
19  * version 2.1 of the License, or (at your option) any later version.
20  *
21  * This library is distributed in the hope that it will be useful,
22  * but WITHOUT ANY WARRANTY; without even the implied warranty of
23  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
24  * Lesser General Public License for more details.
25  *
26  * You should have received a copy of the GNU Lesser General Public
27  * License along with this library; if not, write to the Free Software
28  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
29  *
30  * Alternatively, the contents of this file may be used under the terms
31  * of either the Mozilla Public License Version 1.1, found at
32  * http://www.mozilla.org/MPL/ (the "MPL") or the GNU General Public
33  * License Version 2.0, found at http://www.fsf.org/copyleft/gpl.html
34  * (the "GPL"), in which case the provisions of the MPL or the GPL are
35  * applicable instead of those above.  If you wish to allow use of your
36  * version of this file only under the terms of one of those two
37  * licenses (the MPL or the GPL) and not to allow others to use your
38  * version of this file under the LGPL, indicate your decision by
39  * deletingthe provisions above and replace them with the notice and
40  * other provisions required by the MPL or the GPL, as the case may be.
41  * If you do not delete the provisions above, a recipient may use your
42  * version of this file under any of the LGPL, the MPL or the GPL.
43
44  * Copyright 2006-2008 the V8 project authors. All rights reserved.
45  * Redistribution and use in source and binary forms, with or without
46  * modification, are permitted provided that the following conditions are
47  * met:
48  *
49  *     * Redistributions of source code must retain the above copyright
50  *       notice, this list of conditions and the following disclaimer.
51  *     * Redistributions in binary form must reproduce the above
52  *       copyright notice, this list of conditions and the following
53  *       disclaimer in the documentation and/or other materials provided
54  *       with the distribution.
55  *     * Neither the name of Google Inc. nor the names of its
56  *       contributors may be used to endorse or promote products derived
57  *       from this software without specific prior written permission.
58  *
59  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
60  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
61  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
62  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
63  * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
64  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
65  * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
66  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
67  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
68  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
69  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
70  */
71
72 #include "config.h"
73 #include "DateMath.h"
74
75 #include "Assertions.h"
76 #include "ASCIICType.h"
77 #include "CurrentTime.h"
78 #include "MathExtras.h"
79 #include "StdLibExtras.h"
80
81 #include <algorithm>
82 #include <limits.h>
83 #include <limits>
84 #include <stdint.h>
85 #include <time.h>
86 #include <wtf/text/StringBuilder.h>
87
88 #if OS(WINDOWS)
89 #include <windows.h>
90 #endif
91
92 #if HAVE(ERRNO_H)
93 #include <errno.h>
94 #endif
95
96 #if HAVE(SYS_TIME_H)
97 #include <sys/time.h>
98 #endif
99
100 #if HAVE(SYS_TIMEB_H)
101 #include <sys/timeb.h>
102 #endif
103
104 namespace WTF {
105
106 // FIXME: Should this function go into StringCommon.h or some other header?
107 template<unsigned length> inline bool startsWithLettersIgnoringASCIICase(const char* string, const char (&lowercaseLetters)[length])
108 {
109     return equalLettersIgnoringASCIICase(string, lowercaseLetters, length - 1);
110 }
111
112 /* Constants */
113
114 static const double maxUnixTime = 2145859200.0; // 12/31/2037
115 // ECMAScript asks not to support for a date of which total
116 // millisecond value is larger than the following value.
117 // See 15.9.1.14 of ECMA-262 5th edition.
118 static const double maxECMAScriptTime = 8.64E15;
119
120 // Day of year for the first day of each month, where index 0 is January, and day 0 is January 1.
121 // First for non-leap years, then for leap years.
122 static const int firstDayOfMonth[2][12] = {
123     {0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334},
124     {0, 31, 60, 91, 121, 152, 182, 213, 244, 274, 305, 335}
125 };
126
127 static inline void getLocalTime(const time_t* localTime, struct tm* localTM)
128 {
129 #if COMPILER(MSVC)
130     localtime_s(localTM, localTime);
131 #elif HAVE(LOCALTIME_R)
132     localtime_r(localTime, localTM);
133 #else
134     localtime_s(localTime, localTM);
135 #endif
136 }
137
138 bool isLeapYear(int year)
139 {
140     if (year % 4 != 0)
141         return false;
142     if (year % 400 == 0)
143         return true;
144     if (year % 100 == 0)
145         return false;
146     return true;
147 }
148
149 static inline int daysInYear(int year)
150 {
151     return 365 + isLeapYear(year);
152 }
153
154 static inline double daysFrom1970ToYear(int year)
155 {
156     // The Gregorian Calendar rules for leap years:
157     // Every fourth year is a leap year.  2004, 2008, and 2012 are leap years.
158     // However, every hundredth year is not a leap year.  1900 and 2100 are not leap years.
159     // Every four hundred years, there's a leap year after all.  2000 and 2400 are leap years.
160
161     static const int leapDaysBefore1971By4Rule = 1970 / 4;
162     static const int excludedLeapDaysBefore1971By100Rule = 1970 / 100;
163     static const int leapDaysBefore1971By400Rule = 1970 / 400;
164
165     const double yearMinusOne = year - 1;
166     const double yearsToAddBy4Rule = floor(yearMinusOne / 4.0) - leapDaysBefore1971By4Rule;
167     const double yearsToExcludeBy100Rule = floor(yearMinusOne / 100.0) - excludedLeapDaysBefore1971By100Rule;
168     const double yearsToAddBy400Rule = floor(yearMinusOne / 400.0) - leapDaysBefore1971By400Rule;
169
170     return 365.0 * (year - 1970.0) + yearsToAddBy4Rule - yearsToExcludeBy100Rule + yearsToAddBy400Rule;
171 }
172
173 double msToDays(double ms)
174 {
175     return floor(ms / msPerDay);
176 }
177
178 static void appendTwoDigitNumber(StringBuilder& builder, int number)
179 {
180     ASSERT(number >= 0);
181     ASSERT(number < 100);
182     builder.append(static_cast<LChar>('0' + number / 10));
183     builder.append(static_cast<LChar>('0' + number % 10));
184 }
185
186 int msToYear(double ms)
187 {
188     int approxYear = static_cast<int>(floor(ms / (msPerDay * 365.2425)) + 1970);
189     double msFromApproxYearTo1970 = msPerDay * daysFrom1970ToYear(approxYear);
190     if (msFromApproxYearTo1970 > ms)
191         return approxYear - 1;
192     if (msFromApproxYearTo1970 + msPerDay * daysInYear(approxYear) <= ms)
193         return approxYear + 1;
194     return approxYear;
195 }
196
197 int dayInYear(double ms, int year)
198 {
199     return static_cast<int>(msToDays(ms) - daysFrom1970ToYear(year));
200 }
201
202 static inline double msToMilliseconds(double ms)
203 {
204     double result = fmod(ms, msPerDay);
205     if (result < 0)
206         result += msPerDay;
207     return result;
208 }
209
210 int msToMinutes(double ms)
211 {
212     double result = fmod(floor(ms / msPerMinute), minutesPerHour);
213     if (result < 0)
214         result += minutesPerHour;
215     return static_cast<int>(result);
216 }
217
218 int msToHours(double ms)
219 {
220     double result = fmod(floor(ms/msPerHour), hoursPerDay);
221     if (result < 0)
222         result += hoursPerDay;
223     return static_cast<int>(result);
224 }
225
226 int monthFromDayInYear(int dayInYear, bool leapYear)
227 {
228     const int d = dayInYear;
229     int step;
230
231     if (d < (step = 31))
232         return 0;
233     step += (leapYear ? 29 : 28);
234     if (d < step)
235         return 1;
236     if (d < (step += 31))
237         return 2;
238     if (d < (step += 30))
239         return 3;
240     if (d < (step += 31))
241         return 4;
242     if (d < (step += 30))
243         return 5;
244     if (d < (step += 31))
245         return 6;
246     if (d < (step += 31))
247         return 7;
248     if (d < (step += 30))
249         return 8;
250     if (d < (step += 31))
251         return 9;
252     if (d < (step += 30))
253         return 10;
254     return 11;
255 }
256
257 static inline bool checkMonth(int dayInYear, int& startDayOfThisMonth, int& startDayOfNextMonth, int daysInThisMonth)
258 {
259     startDayOfThisMonth = startDayOfNextMonth;
260     startDayOfNextMonth += daysInThisMonth;
261     return (dayInYear <= startDayOfNextMonth);
262 }
263
264 int dayInMonthFromDayInYear(int dayInYear, bool leapYear)
265 {
266     const int d = dayInYear;
267     int step;
268     int next = 30;
269
270     if (d <= next)
271         return d + 1;
272     const int daysInFeb = (leapYear ? 29 : 28);
273     if (checkMonth(d, step, next, daysInFeb))
274         return d - step;
275     if (checkMonth(d, step, next, 31))
276         return d - step;
277     if (checkMonth(d, step, next, 30))
278         return d - step;
279     if (checkMonth(d, step, next, 31))
280         return d - step;
281     if (checkMonth(d, step, next, 30))
282         return d - step;
283     if (checkMonth(d, step, next, 31))
284         return d - step;
285     if (checkMonth(d, step, next, 31))
286         return d - step;
287     if (checkMonth(d, step, next, 30))
288         return d - step;
289     if (checkMonth(d, step, next, 31))
290         return d - step;
291     if (checkMonth(d, step, next, 30))
292         return d - step;
293     step = next;
294     return d - step;
295 }
296
297 int dayInYear(int year, int month, int day)
298 {
299     return firstDayOfMonth[isLeapYear(year)][month] + day - 1;
300 }
301
302 double dateToDaysFrom1970(int year, int month, int day)
303 {
304     year += month / 12;
305
306     month %= 12;
307     if (month < 0) {
308         month += 12;
309         --year;
310     }
311
312     double yearday = floor(daysFrom1970ToYear(year));
313     ASSERT((year >= 1970 && yearday >= 0) || (year < 1970 && yearday < 0));
314     return yearday + dayInYear(year, month, day);
315 }
316
317 // There is a hard limit at 2038 that we currently do not have a workaround
318 // for (rdar://problem/5052975).
319 static inline int maximumYearForDST()
320 {
321     return 2037;
322 }
323
324 static inline int minimumYearForDST()
325 {
326     // Because of the 2038 issue (see maximumYearForDST) if the current year is
327     // greater than the max year minus 27 (2010), we want to use the max year
328     // minus 27 instead, to ensure there is a range of 28 years that all years
329     // can map to.
330     return std::min(msToYear(jsCurrentTime()), maximumYearForDST() - 27) ;
331 }
332
333 /*
334  * Find an equivalent year for the one given, where equivalence is deterined by
335  * the two years having the same leapness and the first day of the year, falling
336  * on the same day of the week.
337  *
338  * This function returns a year between this current year and 2037, however this
339  * function will potentially return incorrect results if the current year is after
340  * 2010, (rdar://problem/5052975), if the year passed in is before 1900 or after
341  * 2100, (rdar://problem/5055038).
342  */
343 int equivalentYearForDST(int year)
344 {
345     // It is ok if the cached year is not the current year as long as the rules
346     // for DST did not change between the two years; if they did the app would need
347     // to be restarted.
348     static int minYear = minimumYearForDST();
349     int maxYear = maximumYearForDST();
350
351     int difference;
352     if (year > maxYear)
353         difference = minYear - year;
354     else if (year < minYear)
355         difference = maxYear - year;
356     else
357         return year;
358
359     int quotient = difference / 28;
360     int product = (quotient) * 28;
361
362     year += product;
363     return year;
364 }
365
366 #if OS(WINDOWS)
367 typedef BOOL(WINAPI* callGetTimeZoneInformationForYear_t)(USHORT, PDYNAMIC_TIME_ZONE_INFORMATION, LPTIME_ZONE_INFORMATION);
368
369 static callGetTimeZoneInformationForYear_t timeZoneInformationForYearFunction()
370 {
371     static callGetTimeZoneInformationForYear_t getTimeZoneInformationForYear = nullptr;
372
373     if (getTimeZoneInformationForYear)
374         return getTimeZoneInformationForYear;
375
376     HMODULE module = ::GetModuleHandleW(L"kernel32.dll");
377     if (!module)
378         return nullptr;
379
380     getTimeZoneInformationForYear = reinterpret_cast<callGetTimeZoneInformationForYear_t>(::GetProcAddress(module, "GetTimeZoneInformationForYear"));
381
382     return getTimeZoneInformationForYear;
383 }
384 #endif
385
386 static int32_t calculateUTCOffset()
387 {
388 #if OS(WINDOWS)
389     TIME_ZONE_INFORMATION timeZoneInformation;
390     DWORD rc = 0;
391
392     if (callGetTimeZoneInformationForYear_t timeZoneFunction = timeZoneInformationForYearFunction()) {
393         // If available, use the Windows API call that takes into account the varying DST from
394         // year to year.
395         SYSTEMTIME systemTime;
396         ::GetSystemTime(&systemTime);
397         rc = timeZoneFunction(systemTime.wYear, nullptr, &timeZoneInformation);
398         if (rc == TIME_ZONE_ID_INVALID)
399             return 0;
400     } else {
401         rc = ::GetTimeZoneInformation(&timeZoneInformation);
402         if (rc == TIME_ZONE_ID_INVALID)
403             return 0;
404     }
405
406     int32_t bias = timeZoneInformation.Bias;
407
408     if (rc == TIME_ZONE_ID_DAYLIGHT)
409         bias += timeZoneInformation.DaylightBias;
410     else if (rc == TIME_ZONE_ID_STANDARD || rc == TIME_ZONE_ID_UNKNOWN)
411         bias += timeZoneInformation.StandardBias;
412
413     return -bias * 60 * 1000;
414 #else
415     time_t localTime = time(0);
416     tm localt;
417     getLocalTime(&localTime, &localt);
418
419     // Get the difference between this time zone and UTC on the 1st of January of this year.
420     localt.tm_sec = 0;
421     localt.tm_min = 0;
422     localt.tm_hour = 0;
423     localt.tm_mday = 1;
424     localt.tm_mon = 0;
425     // Not setting localt.tm_year!
426     localt.tm_wday = 0;
427     localt.tm_yday = 0;
428     localt.tm_isdst = 0;
429 #if HAVE(TM_GMTOFF)
430     localt.tm_gmtoff = 0;
431 #endif
432 #if HAVE(TM_ZONE)
433     localt.tm_zone = 0;
434 #endif
435
436 #if HAVE(TIMEGM)
437     time_t utcOffset = timegm(&localt) - mktime(&localt);
438 #else
439     // Using a canned date of 01/01/2009 on platforms with weaker date-handling foo.
440     localt.tm_year = 109;
441     time_t utcOffset = 1230768000 - mktime(&localt);
442 #endif
443
444     return static_cast<int32_t>(utcOffset * 1000);
445 #endif
446 }
447
448 #if !HAVE(TM_GMTOFF)
449
450 #if OS(WINDOWS)
451 // Code taken from http://support.microsoft.com/kb/167296
452 static void UnixTimeToFileTime(time_t t, LPFILETIME pft)
453 {
454     // Note that LONGLONG is a 64-bit value
455     LONGLONG ll;
456
457     ll = Int32x32To64(t, 10000000) + 116444736000000000;
458     pft->dwLowDateTime = (DWORD)ll;
459     pft->dwHighDateTime = ll >> 32;
460 }
461 #endif
462
463 /*
464  * Get the DST offset for the time passed in.
465  */
466 static double calculateDSTOffset(time_t localTime, double utcOffset)
467 {
468 #if OS(WINDOWS)
469     FILETIME utcFileTime;
470     UnixTimeToFileTime(localTime, &utcFileTime);
471     SYSTEMTIME utcSystemTime, localSystemTime;
472     if (!::FileTimeToSystemTime(&utcFileTime, &utcSystemTime))
473         return 0;
474     if (!::SystemTimeToTzSpecificLocalTime(nullptr, &utcSystemTime, &localSystemTime))
475         return 0;
476
477     double offsetTime = (localTime * msPerSecond) + utcOffset;
478
479     // Offset from UTC but doesn't include DST obviously
480     int offsetHour =  msToHours(offsetTime);
481     int offsetMinute =  msToMinutes(offsetTime);
482
483     double diff = ((localSystemTime.wHour - offsetHour) * secondsPerHour) + ((localSystemTime.wMinute - offsetMinute) * 60);
484
485     return diff * msPerSecond;
486 #else
487     //input is UTC so we have to shift back to local time to determine DST thus the + getUTCOffset()
488     double offsetTime = (localTime * msPerSecond) + utcOffset;
489
490     // Offset from UTC but doesn't include DST obviously
491     int offsetHour =  msToHours(offsetTime);
492     int offsetMinute =  msToMinutes(offsetTime);
493
494     tm localTM;
495     getLocalTime(&localTime, &localTM);
496
497     double diff = ((localTM.tm_hour - offsetHour) * secondsPerHour) + ((localTM.tm_min - offsetMinute) * 60);
498
499     if (diff < 0)
500         diff += secondsPerDay;
501
502     return (diff * msPerSecond);
503 #endif
504 }
505
506 #endif
507
508 // Returns combined offset in millisecond (UTC + DST).
509 LocalTimeOffset calculateLocalTimeOffset(double ms, TimeType inputTimeType)
510 {
511 #if HAVE(TM_GMTOFF)
512     double localToUTCTimeOffset = inputTimeType == LocalTime ? calculateUTCOffset() : 0;
513 #else
514     double localToUTCTimeOffset = calculateUTCOffset();
515 #endif
516     if (inputTimeType == LocalTime)
517         ms -= localToUTCTimeOffset;
518
519     // On Mac OS X, the call to localtime (see calculateDSTOffset) will return historically accurate
520     // DST information (e.g. New Zealand did not have DST from 1946 to 1974) however the JavaScript
521     // standard explicitly dictates that historical information should not be considered when
522     // determining DST. For this reason we shift away from years that localtime can handle but would
523     // return historically accurate information.
524     int year = msToYear(ms);
525     int equivalentYear = equivalentYearForDST(year);
526     if (year != equivalentYear) {
527         bool leapYear = isLeapYear(year);
528         int dayInYearLocal = dayInYear(ms, year);
529         int dayInMonth = dayInMonthFromDayInYear(dayInYearLocal, leapYear);
530         int month = monthFromDayInYear(dayInYearLocal, leapYear);
531         double day = dateToDaysFrom1970(equivalentYear, month, dayInMonth);
532         ms = (day * msPerDay) + msToMilliseconds(ms);
533     }
534
535     double localTimeSeconds = ms / msPerSecond;
536     if (localTimeSeconds > maxUnixTime)
537         localTimeSeconds = maxUnixTime;
538     else if (localTimeSeconds < 0) // Go ahead a day to make localtime work (does not work with 0).
539         localTimeSeconds += secondsPerDay;
540     // FIXME: time_t has a potential problem in 2038.
541     time_t localTime = static_cast<time_t>(localTimeSeconds);
542
543 #if HAVE(TM_GMTOFF)
544     tm localTM;
545     getLocalTime(&localTime, &localTM);
546     return LocalTimeOffset(localTM.tm_isdst, localTM.tm_gmtoff * msPerSecond);
547 #else
548     double dstOffset = calculateDSTOffset(localTime, localToUTCTimeOffset);
549     return LocalTimeOffset(dstOffset, localToUTCTimeOffset + dstOffset);
550 #endif
551 }
552
553 void initializeDates()
554 {
555 #if !ASSERT_DISABLED
556     static bool alreadyInitialized;
557     ASSERT(!alreadyInitialized);
558     alreadyInitialized = true;
559 #endif
560
561     equivalentYearForDST(2000); // Need to call once to initialize a static used in this function.
562 }
563
564 static inline double ymdhmsToSeconds(int year, long mon, long day, long hour, long minute, double second)
565 {
566     int mday = firstDayOfMonth[isLeapYear(year)][mon - 1];
567     double ydays = daysFrom1970ToYear(year);
568
569     return (second + minute * secondsPerMinute + hour * secondsPerHour + (mday + day - 1 + ydays) * secondsPerDay);
570 }
571
572 // We follow the recommendation of RFC 2822 to consider all
573 // obsolete time zones not listed here equivalent to "-0000".
574 static const struct KnownZone {
575 #if !OS(WINDOWS)
576     const
577 #endif
578         char tzName[4];
579     int tzOffset;
580 } knownZones[] = {
581     { "ut", 0 },
582     { "gmt", 0 },
583     { "est", -300 },
584     { "edt", -240 },
585     { "cst", -360 },
586     { "cdt", -300 },
587     { "mst", -420 },
588     { "mdt", -360 },
589     { "pst", -480 },
590     { "pdt", -420 }
591 };
592
593 inline static void skipSpacesAndComments(const char*& s)
594 {
595     int nesting = 0;
596     char ch;
597     while ((ch = *s)) {
598         if (!isASCIISpace(ch)) {
599             if (ch == '(')
600                 nesting++;
601             else if (ch == ')' && nesting > 0)
602                 nesting--;
603             else if (nesting == 0)
604                 break;
605         }
606         s++;
607     }
608 }
609
610 // returns 0-11 (Jan-Dec); -1 on failure
611 static int findMonth(const char* monthStr)
612 {
613     ASSERT(monthStr);
614     char needle[4];
615     for (int i = 0; i < 3; ++i) {
616         if (!*monthStr)
617             return -1;
618         needle[i] = static_cast<char>(toASCIILower(*monthStr++));
619     }
620     needle[3] = '\0';
621     const char *haystack = "janfebmaraprmayjunjulaugsepoctnovdec";
622     const char *str = strstr(haystack, needle);
623     if (str) {
624         int position = static_cast<int>(str - haystack);
625         if (position % 3 == 0)
626             return position / 3;
627     }
628     return -1;
629 }
630
631 static bool parseInt(const char* string, char** stopPosition, int base, int* result)
632 {
633     long longResult = strtol(string, stopPosition, base);
634     // Avoid the use of errno as it is not available on Windows CE
635     if (string == *stopPosition || longResult <= std::numeric_limits<int>::min() || longResult >= std::numeric_limits<int>::max())
636         return false;
637     *result = static_cast<int>(longResult);
638     return true;
639 }
640
641 static bool parseLong(const char* string, char** stopPosition, int base, long* result)
642 {
643     *result = strtol(string, stopPosition, base);
644     // Avoid the use of errno as it is not available on Windows CE
645     if (string == *stopPosition || *result == std::numeric_limits<long>::min() || *result == std::numeric_limits<long>::max())
646         return false;
647     return true;
648 }
649
650 // Parses a date with the format YYYY[-MM[-DD]].
651 // Year parsing is lenient, allows any number of digits, and +/-.
652 // Returns 0 if a parse error occurs, else returns the end of the parsed portion of the string.
653 static char* parseES5DatePortion(const char* currentPosition, int& year, long& month, long& day)
654 {
655     char* postParsePosition;
656
657     // This is a bit more lenient on the year string than ES5 specifies:
658     // instead of restricting to 4 digits (or 6 digits with mandatory +/-),
659     // it accepts any integer value. Consider this an implementation fallback.
660     if (!parseInt(currentPosition, &postParsePosition, 10, &year))
661         return 0;
662
663     // Check for presence of -MM portion.
664     if (*postParsePosition != '-')
665         return postParsePosition;
666     currentPosition = postParsePosition + 1;
667     
668     if (!isASCIIDigit(*currentPosition))
669         return 0;
670     if (!parseLong(currentPosition, &postParsePosition, 10, &month))
671         return 0;
672     if ((postParsePosition - currentPosition) != 2)
673         return 0;
674
675     // Check for presence of -DD portion.
676     if (*postParsePosition != '-')
677         return postParsePosition;
678     currentPosition = postParsePosition + 1;
679     
680     if (!isASCIIDigit(*currentPosition))
681         return 0;
682     if (!parseLong(currentPosition, &postParsePosition, 10, &day))
683         return 0;
684     if ((postParsePosition - currentPosition) != 2)
685         return 0;
686     return postParsePosition;
687 }
688
689 // Parses a time with the format HH:mm[:ss[.sss]][Z|(+|-)00:00].
690 // Fractional seconds parsing is lenient, allows any number of digits.
691 // Returns 0 if a parse error occurs, else returns the end of the parsed portion of the string.
692 static char* parseES5TimePortion(char* currentPosition, long& hours, long& minutes, double& seconds, long& timeZoneSeconds)
693 {
694     char* postParsePosition;
695     if (!isASCIIDigit(*currentPosition))
696         return 0;
697     if (!parseLong(currentPosition, &postParsePosition, 10, &hours))
698         return 0;
699     if (*postParsePosition != ':' || (postParsePosition - currentPosition) != 2)
700         return 0;
701     currentPosition = postParsePosition + 1;
702     
703     if (!isASCIIDigit(*currentPosition))
704         return 0;
705     if (!parseLong(currentPosition, &postParsePosition, 10, &minutes))
706         return 0;
707     if ((postParsePosition - currentPosition) != 2)
708         return 0;
709     currentPosition = postParsePosition;
710
711     // Seconds are optional.
712     if (*currentPosition == ':') {
713         ++currentPosition;
714     
715         long intSeconds;
716         if (!isASCIIDigit(*currentPosition))
717             return 0;
718         if (!parseLong(currentPosition, &postParsePosition, 10, &intSeconds))
719             return 0;
720         if ((postParsePosition - currentPosition) != 2)
721             return 0;
722         seconds = intSeconds;
723         if (*postParsePosition == '.') {
724             currentPosition = postParsePosition + 1;
725             
726             // In ECMA-262-5 it's a bit unclear if '.' can be present without milliseconds, but
727             // a reasonable interpretation guided by the given examples and RFC 3339 says "no".
728             // We check the next character to avoid reading +/- timezone hours after an invalid decimal.
729             if (!isASCIIDigit(*currentPosition))
730                 return 0;
731             
732             // We are more lenient than ES5 by accepting more or less than 3 fraction digits.
733             long fracSeconds;
734             if (!parseLong(currentPosition, &postParsePosition, 10, &fracSeconds))
735                 return 0;
736             
737             long numFracDigits = postParsePosition - currentPosition;
738             seconds += fracSeconds * pow(10.0, static_cast<double>(-numFracDigits));
739         }
740         currentPosition = postParsePosition;
741     }
742
743     if (*currentPosition == 'Z')
744         return currentPosition + 1;
745
746     bool tzNegative;
747     if (*currentPosition == '-')
748         tzNegative = true;
749     else if (*currentPosition == '+')
750         tzNegative = false;
751     else
752         return currentPosition; // no timezone
753     ++currentPosition;
754     
755     long tzHours;
756     long tzHoursAbs;
757     long tzMinutes;
758     
759     if (!isASCIIDigit(*currentPosition))
760         return 0;
761     if (!parseLong(currentPosition, &postParsePosition, 10, &tzHours))
762         return 0;
763     if (*postParsePosition != ':' || (postParsePosition - currentPosition) != 2)
764         return 0;
765     tzHoursAbs = labs(tzHours);
766     currentPosition = postParsePosition + 1;
767     
768     if (!isASCIIDigit(*currentPosition))
769         return 0;
770     if (!parseLong(currentPosition, &postParsePosition, 10, &tzMinutes))
771         return 0;
772     if ((postParsePosition - currentPosition) != 2)
773         return 0;
774     currentPosition = postParsePosition;
775     
776     if (tzHoursAbs > 24)
777         return 0;
778     if (tzMinutes < 0 || tzMinutes > 59)
779         return 0;
780     
781     timeZoneSeconds = 60 * (tzMinutes + (60 * tzHoursAbs));
782     if (tzNegative)
783         timeZoneSeconds = -timeZoneSeconds;
784
785     return currentPosition;
786 }
787
788 double parseES5DateFromNullTerminatedCharacters(const char* dateString)
789 {
790     // This parses a date of the form defined in ECMA-262-5, section 15.9.1.15
791     // (similar to RFC 3339 / ISO 8601: YYYY-MM-DDTHH:mm:ss[.sss]Z).
792     // In most cases it is intentionally strict (e.g. correct field widths, no stray whitespace).
793     
794     static const long daysPerMonth[12] = { 31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 };
795     
796     // The year must be present, but the other fields may be omitted - see ES5.1 15.9.1.15.
797     int year = 0;
798     long month = 1;
799     long day = 1;
800     long hours = 0;
801     long minutes = 0;
802     double seconds = 0;
803     long timeZoneSeconds = 0;
804
805     // Parse the date YYYY[-MM[-DD]]
806     char* currentPosition = parseES5DatePortion(dateString, year, month, day);
807     if (!currentPosition)
808         return std::numeric_limits<double>::quiet_NaN();
809     // Look for a time portion.
810     if (*currentPosition == 'T') {
811         // Parse the time HH:mm[:ss[.sss]][Z|(+|-)00:00]
812         currentPosition = parseES5TimePortion(currentPosition + 1, hours, minutes, seconds, timeZoneSeconds);
813         if (!currentPosition)
814             return std::numeric_limits<double>::quiet_NaN();
815     }
816     // Check that we have parsed all characters in the string.
817     if (*currentPosition)
818         return std::numeric_limits<double>::quiet_NaN();
819
820     // A few of these checks could be done inline above, but since many of them are interrelated
821     // we would be sacrificing readability to "optimize" the (presumably less common) failure path.
822     if (month < 1 || month > 12)
823         return std::numeric_limits<double>::quiet_NaN();
824     if (day < 1 || day > daysPerMonth[month - 1])
825         return std::numeric_limits<double>::quiet_NaN();
826     if (month == 2 && day > 28 && !isLeapYear(year))
827         return std::numeric_limits<double>::quiet_NaN();
828     if (hours < 0 || hours > 24)
829         return std::numeric_limits<double>::quiet_NaN();
830     if (hours == 24 && (minutes || seconds))
831         return std::numeric_limits<double>::quiet_NaN();
832     if (minutes < 0 || minutes > 59)
833         return std::numeric_limits<double>::quiet_NaN();
834     if (seconds < 0 || seconds >= 61)
835         return std::numeric_limits<double>::quiet_NaN();
836     if (seconds > 60) {
837         // Discard leap seconds by clamping to the end of a minute.
838         seconds = 60;
839     }
840         
841     double dateSeconds = ymdhmsToSeconds(year, month, day, hours, minutes, seconds) - timeZoneSeconds;
842     return dateSeconds * msPerSecond;
843 }
844
845 // Odd case where 'exec' is allowed to be 0, to accomodate a caller in WebCore.
846 double parseDateFromNullTerminatedCharacters(const char* dateString, bool& haveTZ, int& offset)
847 {
848     haveTZ = false;
849     offset = 0;
850
851     // This parses a date in the form:
852     //     Tuesday, 09-Nov-99 23:12:40 GMT
853     // or
854     //     Sat, 01-Jan-2000 08:00:00 GMT
855     // or
856     //     Sat, 01 Jan 2000 08:00:00 GMT
857     // or
858     //     01 Jan 99 22:00 +0100    (exceptions in rfc822/rfc2822)
859     // ### non RFC formats, added for Javascript:
860     //     [Wednesday] January 09 1999 23:12:40 GMT
861     //     [Wednesday] January 09 23:12:40 GMT 1999
862     //
863     // We ignore the weekday.
864      
865     // Skip leading space
866     skipSpacesAndComments(dateString);
867
868     long month = -1;
869     const char *wordStart = dateString;
870     // Check contents of first words if not number
871     while (*dateString && !isASCIIDigit(*dateString)) {
872         if (isASCIISpace(*dateString) || *dateString == '(') {
873             if (dateString - wordStart >= 3)
874                 month = findMonth(wordStart);
875             skipSpacesAndComments(dateString);
876             wordStart = dateString;
877         } else
878            dateString++;
879     }
880
881     // Missing delimiter between month and day (like "January29")?
882     if (month == -1 && wordStart != dateString)
883         month = findMonth(wordStart);
884
885     skipSpacesAndComments(dateString);
886
887     if (!*dateString)
888         return std::numeric_limits<double>::quiet_NaN();
889
890     // ' 09-Nov-99 23:12:40 GMT'
891     char* newPosStr;
892     long day;
893     if (!parseLong(dateString, &newPosStr, 10, &day))
894         return std::numeric_limits<double>::quiet_NaN();
895     dateString = newPosStr;
896
897     if (day < 0)
898         return std::numeric_limits<double>::quiet_NaN();
899
900     std::optional<int> year;
901     if (day > 31) {
902         // ### where is the boundary and what happens below?
903         if (*dateString != '/')
904             return std::numeric_limits<double>::quiet_NaN();
905         // looks like a YYYY/MM/DD date
906         if (!*++dateString)
907             return std::numeric_limits<double>::quiet_NaN();
908         if (day <= std::numeric_limits<int>::min() || day >= std::numeric_limits<int>::max())
909             return std::numeric_limits<double>::quiet_NaN();
910         year = static_cast<int>(day);
911         if (!parseLong(dateString, &newPosStr, 10, &month))
912             return std::numeric_limits<double>::quiet_NaN();
913         month -= 1;
914         dateString = newPosStr;
915         if (*dateString++ != '/' || !*dateString)
916             return std::numeric_limits<double>::quiet_NaN();
917         if (!parseLong(dateString, &newPosStr, 10, &day))
918             return std::numeric_limits<double>::quiet_NaN();
919         dateString = newPosStr;
920     } else if (*dateString == '/' && month == -1) {
921         dateString++;
922         // This looks like a MM/DD/YYYY date, not an RFC date.
923         month = day - 1; // 0-based
924         if (!parseLong(dateString, &newPosStr, 10, &day))
925             return std::numeric_limits<double>::quiet_NaN();
926         if (day < 1 || day > 31)
927             return std::numeric_limits<double>::quiet_NaN();
928         dateString = newPosStr;
929         if (*dateString == '/')
930             dateString++;
931         if (!*dateString)
932             return std::numeric_limits<double>::quiet_NaN();
933      } else {
934         if (*dateString == '-')
935             dateString++;
936
937         skipSpacesAndComments(dateString);
938
939         if (*dateString == ',')
940             dateString++;
941
942         if (month == -1) { // not found yet
943             month = findMonth(dateString);
944             if (month == -1)
945                 return std::numeric_limits<double>::quiet_NaN();
946
947             while (*dateString && *dateString != '-' && *dateString != ',' && !isASCIISpace(*dateString))
948                 dateString++;
949
950             if (!*dateString)
951                 return std::numeric_limits<double>::quiet_NaN();
952
953             // '-99 23:12:40 GMT'
954             if (*dateString != '-' && *dateString != '/' && *dateString != ',' && !isASCIISpace(*dateString))
955                 return std::numeric_limits<double>::quiet_NaN();
956             dateString++;
957         }
958     }
959
960     if (month < 0 || month > 11)
961         return std::numeric_limits<double>::quiet_NaN();
962
963     // '99 23:12:40 GMT'
964     if (*dateString && !year) {
965         int result = 0;
966         if (!parseInt(dateString, &newPosStr, 10, &result))
967             return std::numeric_limits<double>::quiet_NaN();
968         year = result;
969     }
970
971     // Don't fail if the time is missing.
972     long hour = 0;
973     long minute = 0;
974     long second = 0;
975     if (!*newPosStr)
976         dateString = newPosStr;
977     else {
978         // ' 23:12:40 GMT'
979         if (!(isASCIISpace(*newPosStr) || *newPosStr == ',')) {
980             if (*newPosStr != ':')
981                 return std::numeric_limits<double>::quiet_NaN();
982             // There was no year; the number was the hour.
983             year = std::nullopt;
984         } else {
985             // in the normal case (we parsed the year), advance to the next number
986             dateString = ++newPosStr;
987             skipSpacesAndComments(dateString);
988         }
989
990         parseLong(dateString, &newPosStr, 10, &hour);
991         // Do not check for errno here since we want to continue
992         // even if errno was set becasue we are still looking
993         // for the timezone!
994
995         // Read a number? If not, this might be a timezone name.
996         if (newPosStr != dateString) {
997             dateString = newPosStr;
998
999             if (hour < 0 || hour > 23)
1000                 return std::numeric_limits<double>::quiet_NaN();
1001
1002             if (!*dateString)
1003                 return std::numeric_limits<double>::quiet_NaN();
1004
1005             // ':12:40 GMT'
1006             if (*dateString++ != ':')
1007                 return std::numeric_limits<double>::quiet_NaN();
1008
1009             if (!parseLong(dateString, &newPosStr, 10, &minute))
1010                 return std::numeric_limits<double>::quiet_NaN();
1011             dateString = newPosStr;
1012
1013             if (minute < 0 || minute > 59)
1014                 return std::numeric_limits<double>::quiet_NaN();
1015
1016             // ':40 GMT'
1017             if (*dateString && *dateString != ':' && !isASCIISpace(*dateString))
1018                 return std::numeric_limits<double>::quiet_NaN();
1019
1020             // seconds are optional in rfc822 + rfc2822
1021             if (*dateString ==':') {
1022                 dateString++;
1023
1024                 if (!parseLong(dateString, &newPosStr, 10, &second))
1025                     return std::numeric_limits<double>::quiet_NaN();
1026                 dateString = newPosStr;
1027
1028                 if (second < 0 || second > 59)
1029                     return std::numeric_limits<double>::quiet_NaN();
1030             }
1031
1032             skipSpacesAndComments(dateString);
1033
1034             if (startsWithLettersIgnoringASCIICase(dateString, "am")) {
1035                 if (hour > 12)
1036                     return std::numeric_limits<double>::quiet_NaN();
1037                 if (hour == 12)
1038                     hour = 0;
1039                 dateString += 2;
1040                 skipSpacesAndComments(dateString);
1041             } else if (startsWithLettersIgnoringASCIICase(dateString, "pm")) {
1042                 if (hour > 12)
1043                     return std::numeric_limits<double>::quiet_NaN();
1044                 if (hour != 12)
1045                     hour += 12;
1046                 dateString += 2;
1047                 skipSpacesAndComments(dateString);
1048             }
1049         }
1050     }
1051     
1052     // The year may be after the time but before the time zone.
1053     if (isASCIIDigit(*dateString) && !year) {
1054         int result = 0;
1055         if (!parseInt(dateString, &newPosStr, 10, &result))
1056             return std::numeric_limits<double>::quiet_NaN();
1057         year = result;
1058         dateString = newPosStr;
1059         skipSpacesAndComments(dateString);
1060     }
1061
1062     // Don't fail if the time zone is missing. 
1063     // Some websites omit the time zone (4275206).
1064     if (*dateString) {
1065         if (startsWithLettersIgnoringASCIICase(dateString, "gmt") || startsWithLettersIgnoringASCIICase(dateString, "utc")) {
1066             dateString += 3;
1067             haveTZ = true;
1068         }
1069
1070         if (*dateString == '+' || *dateString == '-') {
1071             int o;
1072             if (!parseInt(dateString, &newPosStr, 10, &o))
1073                 return std::numeric_limits<double>::quiet_NaN();
1074             dateString = newPosStr;
1075
1076             if (o < -9959 || o > 9959)
1077                 return std::numeric_limits<double>::quiet_NaN();
1078
1079             int sgn = (o < 0) ? -1 : 1;
1080             o = abs(o);
1081             if (*dateString != ':') {
1082                 if (o >= 24)
1083                     offset = ((o / 100) * 60 + (o % 100)) * sgn;
1084                 else
1085                     offset = o * 60 * sgn;
1086             } else { // GMT+05:00
1087                 ++dateString; // skip the ':'
1088                 int o2;
1089                 if (!parseInt(dateString, &newPosStr, 10, &o2))
1090                     return std::numeric_limits<double>::quiet_NaN();
1091                 dateString = newPosStr;
1092                 offset = (o * 60 + o2) * sgn;
1093             }
1094             haveTZ = true;
1095         } else {
1096             for (auto& knownZone : knownZones) {
1097                 // Since the passed-in length is used for both strings, the following checks that
1098                 // dateString has the time zone name as a prefix, not that it is equal.
1099                 auto length = strlen(knownZone.tzName);
1100                 if (equalLettersIgnoringASCIICase(dateString, knownZone.tzName, length)) {
1101                     offset = knownZone.tzOffset;
1102                     dateString += length;
1103                     haveTZ = true;
1104                     break;
1105                 }
1106             }
1107         }
1108     }
1109
1110     skipSpacesAndComments(dateString);
1111
1112     if (*dateString && !year) {
1113         int result = 0;
1114         if (!parseInt(dateString, &newPosStr, 10, &result))
1115             return std::numeric_limits<double>::quiet_NaN();
1116         year = result;
1117         dateString = newPosStr;
1118         skipSpacesAndComments(dateString);
1119     }
1120
1121     // Trailing garbage
1122     if (*dateString)
1123         return std::numeric_limits<double>::quiet_NaN();
1124
1125     // Y2K: Handle 2 digit years.
1126     if (year) {
1127         int yearValue = year.value();
1128         if (yearValue >= 0 && yearValue < 100) {
1129             if (yearValue < 50)
1130                 yearValue += 2000;
1131             else
1132                 yearValue += 1900;
1133         }
1134         year = yearValue;
1135     } else {
1136         // We select 2000 as default value. This is because of the following reasons.
1137         // 1. Year 2000 was used for the initial value of the variable `year`. While it won't be posed to users in WebKit,
1138         //    V8 used this 2000 as its default value. (As of April 2017, V8 is using the year 2001 and Spider Monkey is
1139         //    not doing this kind of fallback.)
1140         // 2. It is a leap year. When using `new Date("Feb 29")`, we assume that people want to save month and day.
1141         //    Leap year can save user inputs if they is valid. If we use the current year instead, the current year
1142         //    may not be a leap year. In that case, `new Date("Feb 29").getMonth()` becomes 2 (March).
1143         year = 2000;
1144     }
1145     ASSERT(year);
1146     
1147     return ymdhmsToSeconds(year.value(), month + 1, day, hour, minute, second) * msPerSecond;
1148 }
1149
1150 double parseDateFromNullTerminatedCharacters(const char* dateString)
1151 {
1152     bool haveTZ;
1153     int offset;
1154     double ms = parseDateFromNullTerminatedCharacters(dateString, haveTZ, offset);
1155     if (std::isnan(ms))
1156         return std::numeric_limits<double>::quiet_NaN();
1157
1158     // fall back to local timezone
1159     if (!haveTZ)
1160         offset = calculateLocalTimeOffset(ms, LocalTime).offset / msPerMinute; // ms value is in local time milliseconds.
1161
1162     return ms - (offset * msPerMinute);
1163 }
1164
1165 double timeClip(double t)
1166 {
1167     if (!std::isfinite(t))
1168         return std::numeric_limits<double>::quiet_NaN();
1169     if (fabs(t) > maxECMAScriptTime)
1170         return std::numeric_limits<double>::quiet_NaN();
1171     return trunc(t);
1172 }
1173
1174 // See http://tools.ietf.org/html/rfc2822#section-3.3 for more information.
1175 String makeRFC2822DateString(unsigned dayOfWeek, unsigned day, unsigned month, unsigned year, unsigned hours, unsigned minutes, unsigned seconds, int utcOffset)
1176 {
1177     StringBuilder stringBuilder;
1178     stringBuilder.append(weekdayName[dayOfWeek]);
1179     stringBuilder.appendLiteral(", ");
1180     stringBuilder.appendNumber(day);
1181     stringBuilder.append(' ');
1182     stringBuilder.append(monthName[month]);
1183     stringBuilder.append(' ');
1184     stringBuilder.appendNumber(year);
1185     stringBuilder.append(' ');
1186
1187     appendTwoDigitNumber(stringBuilder, hours);
1188     stringBuilder.append(':');
1189     appendTwoDigitNumber(stringBuilder, minutes);
1190     stringBuilder.append(':');
1191     appendTwoDigitNumber(stringBuilder, seconds);
1192     stringBuilder.append(' ');
1193
1194     stringBuilder.append(utcOffset > 0 ? '+' : '-');
1195     int absoluteUTCOffset = abs(utcOffset);
1196     appendTwoDigitNumber(stringBuilder, absoluteUTCOffset / 60);
1197     appendTwoDigitNumber(stringBuilder, absoluteUTCOffset % 60);
1198
1199     return stringBuilder.toString();
1200 }
1201
1202 } // namespace WTF