c81dddf67bae496628f004a787fa05d68af2dfb3
[WebKit-https.git] / Source / WTF / wtf / DateMath.cpp
1 /*
2  * Copyright (C) 1999-2000 Harri Porten (porten@kde.org)
3  * Copyright (C) 2006-2007, 2014 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 #include "StringExtras.h"
81
82 #include <algorithm>
83 #include <limits.h>
84 #include <limits>
85 #include <stdint.h>
86 #include <time.h>
87 #include <wtf/text/StringBuilder.h>
88
89 #if OS(WINDOWS)
90 #include <windows.h>
91 #endif
92
93 #if HAVE(ERRNO_H)
94 #include <errno.h>
95 #endif
96
97 #if HAVE(SYS_TIME_H)
98 #include <sys/time.h>
99 #endif
100
101 #if HAVE(SYS_TIMEB_H)
102 #include <sys/timeb.h>
103 #endif
104
105 using namespace WTF;
106
107 namespace WTF {
108
109 /* Constants */
110
111 static const double maxUnixTime = 2145859200.0; // 12/31/2037
112
113 // Day of year for the first day of each month, where index 0 is January, and day 0 is January 1.
114 // First for non-leap years, then for leap years.
115 static const int firstDayOfMonth[2][12] = {
116     {0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334},
117     {0, 31, 60, 91, 121, 152, 182, 213, 244, 274, 305, 335}
118 };
119
120 #if !OS(WINCE)
121 static inline void getLocalTime(const time_t* localTime, struct tm* localTM)
122 {
123 #if COMPILER(MINGW)
124     *localTM = *localtime(localTime);
125 #elif COMPILER(MSVC)
126     localtime_s(localTM, localTime);
127 #else
128     localtime_r(localTime, localTM);
129 #endif
130 }
131 #endif
132
133 bool isLeapYear(int year)
134 {
135     if (year % 4 != 0)
136         return false;
137     if (year % 400 == 0)
138         return true;
139     if (year % 100 == 0)
140         return false;
141     return true;
142 }
143
144 static inline int daysInYear(int year)
145 {
146     return 365 + isLeapYear(year);
147 }
148
149 static inline double daysFrom1970ToYear(int year)
150 {
151     // The Gregorian Calendar rules for leap years:
152     // Every fourth year is a leap year.  2004, 2008, and 2012 are leap years.
153     // However, every hundredth year is not a leap year.  1900 and 2100 are not leap years.
154     // Every four hundred years, there's a leap year after all.  2000 and 2400 are leap years.
155
156     static const int leapDaysBefore1971By4Rule = 1970 / 4;
157     static const int excludedLeapDaysBefore1971By100Rule = 1970 / 100;
158     static const int leapDaysBefore1971By400Rule = 1970 / 400;
159
160     const double yearMinusOne = year - 1;
161     const double yearsToAddBy4Rule = floor(yearMinusOne / 4.0) - leapDaysBefore1971By4Rule;
162     const double yearsToExcludeBy100Rule = floor(yearMinusOne / 100.0) - excludedLeapDaysBefore1971By100Rule;
163     const double yearsToAddBy400Rule = floor(yearMinusOne / 400.0) - leapDaysBefore1971By400Rule;
164
165     return 365.0 * (year - 1970) + yearsToAddBy4Rule - yearsToExcludeBy100Rule + yearsToAddBy400Rule;
166 }
167
168 double msToDays(double ms)
169 {
170     return floor(ms / msPerDay);
171 }
172
173 static void appendTwoDigitNumber(StringBuilder& builder, int number)
174 {
175     ASSERT(number >= 0);
176     ASSERT(number < 100);
177     builder.append(static_cast<LChar>('0' + number / 10));
178     builder.append(static_cast<LChar>('0' + number % 10));
179 }
180
181 int msToYear(double ms)
182 {
183     ASSERT(fabs(ms) <= maxECMAScriptTime);
184     int approxYear = static_cast<int>(floor(ms / (msPerDay * 365.2425)) + 1970);
185     double msFromApproxYearTo1970 = msPerDay * daysFrom1970ToYear(approxYear);
186     if (msFromApproxYearTo1970 > ms)
187         return approxYear - 1;
188     if (msFromApproxYearTo1970 + msPerDay * daysInYear(approxYear) <= ms)
189         return approxYear + 1;
190     return approxYear;
191 }
192
193 int dayInYear(double ms, int year)
194 {
195     return static_cast<int>(msToDays(ms) - daysFrom1970ToYear(year));
196 }
197
198 static inline double msToMilliseconds(double ms)
199 {
200     double result = fmod(ms, msPerDay);
201     if (result < 0)
202         result += msPerDay;
203     return result;
204 }
205
206 int msToMinutes(double ms)
207 {
208     double result = fmod(floor(ms / msPerMinute), minutesPerHour);
209     if (result < 0)
210         result += minutesPerHour;
211     return static_cast<int>(result);
212 }
213
214 int msToHours(double ms)
215 {
216     double result = fmod(floor(ms/msPerHour), hoursPerDay);
217     if (result < 0)
218         result += hoursPerDay;
219     return static_cast<int>(result);
220 }
221
222 int monthFromDayInYear(int dayInYear, bool leapYear)
223 {
224     const int d = dayInYear;
225     int step;
226
227     if (d < (step = 31))
228         return 0;
229     step += (leapYear ? 29 : 28);
230     if (d < step)
231         return 1;
232     if (d < (step += 31))
233         return 2;
234     if (d < (step += 30))
235         return 3;
236     if (d < (step += 31))
237         return 4;
238     if (d < (step += 30))
239         return 5;
240     if (d < (step += 31))
241         return 6;
242     if (d < (step += 31))
243         return 7;
244     if (d < (step += 30))
245         return 8;
246     if (d < (step += 31))
247         return 9;
248     if (d < (step += 30))
249         return 10;
250     return 11;
251 }
252
253 static inline bool checkMonth(int dayInYear, int& startDayOfThisMonth, int& startDayOfNextMonth, int daysInThisMonth)
254 {
255     startDayOfThisMonth = startDayOfNextMonth;
256     startDayOfNextMonth += daysInThisMonth;
257     return (dayInYear <= startDayOfNextMonth);
258 }
259
260 int dayInMonthFromDayInYear(int dayInYear, bool leapYear)
261 {
262     const int d = dayInYear;
263     int step;
264     int next = 30;
265
266     if (d <= next)
267         return d + 1;
268     const int daysInFeb = (leapYear ? 29 : 28);
269     if (checkMonth(d, step, next, daysInFeb))
270         return d - step;
271     if (checkMonth(d, step, next, 31))
272         return d - step;
273     if (checkMonth(d, step, next, 30))
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, 31))
282         return d - step;
283     if (checkMonth(d, step, next, 30))
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     step = next;
290     return d - step;
291 }
292
293 int dayInYear(int year, int month, int day)
294 {
295     return firstDayOfMonth[isLeapYear(year)][month] + day - 1;
296 }
297
298 double dateToDaysFrom1970(int year, int month, int day)
299 {
300     year += month / 12;
301
302     month %= 12;
303     if (month < 0) {
304         month += 12;
305         --year;
306     }
307
308     double yearday = floor(daysFrom1970ToYear(year));
309     ASSERT((year >= 1970 && yearday >= 0) || (year < 1970 && yearday < 0));
310     return yearday + dayInYear(year, month, day);
311 }
312
313 // There is a hard limit at 2038 that we currently do not have a workaround
314 // for (rdar://problem/5052975).
315 static inline int maximumYearForDST()
316 {
317     return 2037;
318 }
319
320 static inline int minimumYearForDST()
321 {
322     // Because of the 2038 issue (see maximumYearForDST) if the current year is
323     // greater than the max year minus 27 (2010), we want to use the max year
324     // minus 27 instead, to ensure there is a range of 28 years that all years
325     // can map to.
326     return std::min(msToYear(jsCurrentTime()), maximumYearForDST() - 27) ;
327 }
328
329 /*
330  * Find an equivalent year for the one given, where equivalence is determined by
331  * the two years having the same leapness and the first day of the year, falling
332  * on the same day of the week.
333  *
334  * This function returns a year between this current year and 2037, however this
335  * function will potentially return incorrect results if the current year is after
336  * 2010, (rdar://problem/5052975), if the year passed in is before 1900 or after
337  * 2100, (rdar://problem/5055038).
338  */
339 int equivalentYearForDST(int year)
340 {
341     // It is ok if the cached year is not the current year as long as the rules
342     // for DST did not change between the two years; if they did the app would need
343     // to be restarted.
344     static int minYear = minimumYearForDST();
345     int maxYear = maximumYearForDST();
346
347     int difference;
348     if (year > maxYear)
349         difference = minYear - year;
350     else if (year < minYear)
351         difference = maxYear - year;
352     else
353         return year;
354
355     int quotient = difference / 28;
356     int product = (quotient) * 28;
357
358     year += product;
359     ASSERT((year >= minYear && year <= maxYear) || (product - year == static_cast<int>(std::numeric_limits<double>::quiet_NaN())));
360     return year;
361 }
362
363 #if !HAVE(TM_GMTOFF)
364
365 static int32_t calculateUTCOffset()
366 {
367 #if OS(WINDOWS)
368     TIME_ZONE_INFORMATION timeZoneInformation;
369     GetTimeZoneInformation(&timeZoneInformation);
370     int32_t bias = timeZoneInformation.Bias + timeZoneInformation.StandardBias;
371     return -bias * 60 * 1000;
372 #else
373     time_t localTime = time(0);
374     tm localt;
375     getLocalTime(&localTime, &localt);
376
377     // Get the difference between this time zone and UTC on the 1st of January of this year.
378     localt.tm_sec = 0;
379     localt.tm_min = 0;
380     localt.tm_hour = 0;
381     localt.tm_mday = 1;
382     localt.tm_mon = 0;
383     // Not setting localt.tm_year!
384     localt.tm_wday = 0;
385     localt.tm_yday = 0;
386     localt.tm_isdst = 0;
387 #if HAVE(TM_GMTOFF)
388     localt.tm_gmtoff = 0;
389 #endif
390 #if HAVE(TM_ZONE)
391     localt.tm_zone = 0;
392 #endif
393
394 #if HAVE(TIMEGM)
395     time_t utcOffset = timegm(&localt) - mktime(&localt);
396 #else
397     // Using a canned date of 01/01/2009 on platforms with weaker date-handling foo.
398     localt.tm_year = 109;
399     time_t utcOffset = 1230768000 - mktime(&localt);
400 #endif
401
402     return static_cast<int32_t>(utcOffset * 1000);
403 #endif
404 }
405
406 #if OS(WINDOWS)
407 // Code taken from http://support.microsoft.com/kb/167296
408 static void UnixTimeToFileTime(time_t t, LPFILETIME pft)
409 {
410     // Note that LONGLONG is a 64-bit value
411     LONGLONG ll;
412
413     ll = Int32x32To64(t, 10000000) + 116444736000000000;
414     pft->dwLowDateTime = (DWORD)ll;
415     pft->dwHighDateTime = ll >> 32;
416 }
417 #endif
418
419 /*
420  * Get the DST offset for the time passed in.
421  */
422 static double calculateDSTOffset(time_t localTime, double utcOffset)
423 {
424 #if OS(WINCE)
425     UNUSED_PARAM(localTime);
426     UNUSED_PARAM(utcOffset);
427     return 0;
428 #elif OS(WINDOWS)
429     FILETIME utcFileTime;
430     UnixTimeToFileTime(localTime, &utcFileTime);
431     SYSTEMTIME utcSystemTime, localSystemTime;
432     FileTimeToSystemTime(&utcFileTime, &utcSystemTime);
433     SystemTimeToTzSpecificLocalTime(0, &utcSystemTime, &localSystemTime);
434
435     double offsetTime = (localTime * msPerSecond) + utcOffset;
436
437     // Offset from UTC but doesn't include DST obviously
438     int offsetHour =  msToHours(offsetTime);
439     int offsetMinute =  msToMinutes(offsetTime);
440
441     double diff = ((localSystemTime.wHour - offsetHour) * secondsPerHour) + ((localSystemTime.wMinute - offsetMinute) * 60);
442
443     return diff * msPerSecond;
444 #else
445     //input is UTC so we have to shift back to local time to determine DST thus the + getUTCOffset()
446     double offsetTime = (localTime * msPerSecond) + utcOffset;
447
448     // Offset from UTC but doesn't include DST obviously
449     int offsetHour =  msToHours(offsetTime);
450     int offsetMinute =  msToMinutes(offsetTime);
451
452     tm localTM;
453     getLocalTime(&localTime, &localTM);
454
455     double diff = ((localTM.tm_hour - offsetHour) * secondsPerHour) + ((localTM.tm_min - offsetMinute) * 60);
456
457     if (diff < 0)
458         diff += secondsPerDay;
459
460     return (diff * msPerSecond);
461 #endif
462 }
463
464 #endif
465
466 // Returns combined offset in millisecond (UTC + DST).
467 LocalTimeOffset calculateLocalTimeOffset(double ms)
468 {
469     // On Mac OS X, the call to localtime (see calculateDSTOffset) will return historically accurate
470     // DST information (e.g. New Zealand did not have DST from 1946 to 1974) however the JavaScript
471     // standard explicitly dictates that historical information should not be considered when
472     // determining DST. For this reason we shift away from years that localtime can handle but would
473     // return historically accurate information.
474     int year = msToYear(ms);
475     int equivalentYear = equivalentYearForDST(year);
476     if (year != equivalentYear) {
477         bool leapYear = isLeapYear(year);
478         int dayInYearLocal = dayInYear(ms, year);
479         int dayInMonth = dayInMonthFromDayInYear(dayInYearLocal, leapYear);
480         int month = monthFromDayInYear(dayInYearLocal, leapYear);
481         double day = dateToDaysFrom1970(equivalentYear, month, dayInMonth);
482         ms = (day * msPerDay) + msToMilliseconds(ms);
483     }
484
485     double localTimeSeconds = ms / msPerSecond;
486     if (localTimeSeconds > maxUnixTime)
487         localTimeSeconds = maxUnixTime;
488     else if (localTimeSeconds < 0) // Go ahead a day to make localtime work (does not work with 0).
489         localTimeSeconds += secondsPerDay;
490     // FIXME: time_t has a potential problem in 2038.
491     time_t localTime = static_cast<time_t>(localTimeSeconds);
492
493 #if HAVE(TM_GMTOFF)
494     tm localTM;
495     getLocalTime(&localTime, &localTM);
496     return LocalTimeOffset(localTM.tm_isdst, localTM.tm_gmtoff * msPerSecond);
497 #else
498     double utcOffset = calculateUTCOffset();
499     double dstOffset = calculateDSTOffset(localTime, utcOffset);
500     return LocalTimeOffset(dstOffset, utcOffset + dstOffset);
501 #endif
502 }
503
504 void initializeDates()
505 {
506 #if !ASSERT_DISABLED
507     static bool alreadyInitialized;
508     ASSERT(!alreadyInitialized);
509     alreadyInitialized = true;
510 #endif
511
512     equivalentYearForDST(2000); // Need to call once to initialize a static used in this function.
513 }
514
515 static inline double ymdhmsToSeconds(int year, long mon, long day, long hour, long minute, double second)
516 {
517     int mday = firstDayOfMonth[isLeapYear(year)][mon - 1];
518     double ydays = daysFrom1970ToYear(year);
519
520     return (second + minute * secondsPerMinute + hour * secondsPerHour + (mday + day - 1 + ydays) * secondsPerDay);
521 }
522
523 // We follow the recommendation of RFC 2822 to consider all
524 // obsolete time zones not listed here equivalent to "-0000".
525 static const struct KnownZone {
526 #if !OS(WINDOWS)
527     const
528 #endif
529         char tzName[4];
530     int tzOffset;
531 } known_zones[] = {
532     { "UT", 0 },
533     { "GMT", 0 },
534     { "EST", -300 },
535     { "EDT", -240 },
536     { "CST", -360 },
537     { "CDT", -300 },
538     { "MST", -420 },
539     { "MDT", -360 },
540     { "PST", -480 },
541     { "PDT", -420 }
542 };
543
544 inline static void skipSpacesAndComments(const char*& s)
545 {
546     int nesting = 0;
547     char ch;
548     while ((ch = *s)) {
549         if (!isASCIISpace(ch)) {
550             if (ch == '(')
551                 nesting++;
552             else if (ch == ')' && nesting > 0)
553                 nesting--;
554             else if (nesting == 0)
555                 break;
556         }
557         s++;
558     }
559 }
560
561 // returns 0-11 (Jan-Dec); -1 on failure
562 static int findMonth(const char* monthStr)
563 {
564     ASSERT(monthStr);
565     char needle[4];
566     for (int i = 0; i < 3; ++i) {
567         if (!*monthStr)
568             return -1;
569         needle[i] = static_cast<char>(toASCIILower(*monthStr++));
570     }
571     needle[3] = '\0';
572     const char *haystack = "janfebmaraprmayjunjulaugsepoctnovdec";
573     const char *str = strstr(haystack, needle);
574     if (str) {
575         int position = static_cast<int>(str - haystack);
576         if (position % 3 == 0)
577             return position / 3;
578     }
579     return -1;
580 }
581
582 static bool parseInt(const char* string, char** stopPosition, int base, int* result)
583 {
584     long longResult = strtol(string, stopPosition, base);
585     // Avoid the use of errno as it is not available on Windows CE
586     if (string == *stopPosition || longResult <= std::numeric_limits<int>::min() || longResult >= std::numeric_limits<int>::max())
587         return false;
588     *result = static_cast<int>(longResult);
589     return true;
590 }
591
592 static bool parseLong(const char* string, char** stopPosition, int base, long* result)
593 {
594     *result = strtol(string, stopPosition, base);
595     // Avoid the use of errno as it is not available on Windows CE
596     if (string == *stopPosition || *result == std::numeric_limits<long>::min() || *result == std::numeric_limits<long>::max())
597         return false;
598     return true;
599 }
600
601 // Parses a date with the format YYYY[-MM[-DD]].
602 // Year parsing is lenient, allows any number of digits, and +/-.
603 // Returns 0 if a parse error occurs, else returns the end of the parsed portion of the string.
604 static char* parseES5DatePortion(const char* currentPosition, int& year, long& month, long& day)
605 {
606     char* postParsePosition;
607
608     // This is a bit more lenient on the year string than ES5 specifies:
609     // instead of restricting to 4 digits (or 6 digits with mandatory +/-),
610     // it accepts any integer value. Consider this an implementation fallback.
611     if (!parseInt(currentPosition, &postParsePosition, 10, &year))
612         return 0;
613
614     // Check for presence of -MM portion.
615     if (*postParsePosition != '-')
616         return postParsePosition;
617     currentPosition = postParsePosition + 1;
618     
619     if (!isASCIIDigit(*currentPosition))
620         return 0;
621     if (!parseLong(currentPosition, &postParsePosition, 10, &month))
622         return 0;
623     if ((postParsePosition - currentPosition) != 2)
624         return 0;
625
626     // Check for presence of -DD portion.
627     if (*postParsePosition != '-')
628         return postParsePosition;
629     currentPosition = postParsePosition + 1;
630     
631     if (!isASCIIDigit(*currentPosition))
632         return 0;
633     if (!parseLong(currentPosition, &postParsePosition, 10, &day))
634         return 0;
635     if ((postParsePosition - currentPosition) != 2)
636         return 0;
637     return postParsePosition;
638 }
639
640 // Parses a time with the format HH:mm[:ss[.sss]][Z|(+|-)00:00].
641 // Fractional seconds parsing is lenient, allows any number of digits.
642 // Returns 0 if a parse error occurs, else returns the end of the parsed portion of the string.
643 static char* parseES5TimePortion(char* currentPosition, long& hours, long& minutes, double& seconds, long& timeZoneSeconds)
644 {
645     char* postParsePosition;
646     if (!isASCIIDigit(*currentPosition))
647         return 0;
648     if (!parseLong(currentPosition, &postParsePosition, 10, &hours))
649         return 0;
650     if (*postParsePosition != ':' || (postParsePosition - currentPosition) != 2)
651         return 0;
652     currentPosition = postParsePosition + 1;
653     
654     if (!isASCIIDigit(*currentPosition))
655         return 0;
656     if (!parseLong(currentPosition, &postParsePosition, 10, &minutes))
657         return 0;
658     if ((postParsePosition - currentPosition) != 2)
659         return 0;
660     currentPosition = postParsePosition;
661
662     // Seconds are optional.
663     if (*currentPosition == ':') {
664         ++currentPosition;
665     
666         long intSeconds;
667         if (!isASCIIDigit(*currentPosition))
668             return 0;
669         if (!parseLong(currentPosition, &postParsePosition, 10, &intSeconds))
670             return 0;
671         if ((postParsePosition - currentPosition) != 2)
672             return 0;
673         seconds = intSeconds;
674         if (*postParsePosition == '.') {
675             currentPosition = postParsePosition + 1;
676             
677             // In ECMA-262-5 it's a bit unclear if '.' can be present without milliseconds, but
678             // a reasonable interpretation guided by the given examples and RFC 3339 says "no".
679             // We check the next character to avoid reading +/- timezone hours after an invalid decimal.
680             if (!isASCIIDigit(*currentPosition))
681                 return 0;
682             
683             // We are more lenient than ES5 by accepting more or less than 3 fraction digits.
684             long fracSeconds;
685             if (!parseLong(currentPosition, &postParsePosition, 10, &fracSeconds))
686                 return 0;
687             
688             long numFracDigits = postParsePosition - currentPosition;
689             seconds += fracSeconds * pow(10.0, static_cast<double>(-numFracDigits));
690         }
691         currentPosition = postParsePosition;
692     }
693
694     if (*currentPosition == 'Z')
695         return currentPosition + 1;
696
697     bool tzNegative;
698     if (*currentPosition == '-')
699         tzNegative = true;
700     else if (*currentPosition == '+')
701         tzNegative = false;
702     else
703         return currentPosition; // no timezone
704     ++currentPosition;
705     
706     long tzHours;
707     long tzHoursAbs;
708     long tzMinutes;
709     
710     if (!isASCIIDigit(*currentPosition))
711         return 0;
712     if (!parseLong(currentPosition, &postParsePosition, 10, &tzHours))
713         return 0;
714     if (*postParsePosition != ':' || (postParsePosition - currentPosition) != 2)
715         return 0;
716     tzHoursAbs = labs(tzHours);
717     currentPosition = postParsePosition + 1;
718     
719     if (!isASCIIDigit(*currentPosition))
720         return 0;
721     if (!parseLong(currentPosition, &postParsePosition, 10, &tzMinutes))
722         return 0;
723     if ((postParsePosition - currentPosition) != 2)
724         return 0;
725     currentPosition = postParsePosition;
726     
727     if (tzHoursAbs > 24)
728         return 0;
729     if (tzMinutes < 0 || tzMinutes > 59)
730         return 0;
731     
732     timeZoneSeconds = 60 * (tzMinutes + (60 * tzHoursAbs));
733     if (tzNegative)
734         timeZoneSeconds = -timeZoneSeconds;
735
736     return currentPosition;
737 }
738
739 double parseES5DateFromNullTerminatedCharacters(const char* dateString)
740 {
741     // This parses a date of the form defined in ECMA-262-5, section 15.9.1.15
742     // (similar to RFC 3339 / ISO 8601: YYYY-MM-DDTHH:mm:ss[.sss]Z).
743     // In most cases it is intentionally strict (e.g. correct field widths, no stray whitespace).
744     
745     static const long daysPerMonth[12] = { 31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 };
746     
747     // The year must be present, but the other fields may be omitted - see ES5.1 15.9.1.15.
748     int year = 0;
749     long month = 1;
750     long day = 1;
751     long hours = 0;
752     long minutes = 0;
753     double seconds = 0;
754     long timeZoneSeconds = 0;
755
756     // Parse the date YYYY[-MM[-DD]]
757     char* currentPosition = parseES5DatePortion(dateString, year, month, day);
758     if (!currentPosition)
759         return std::numeric_limits<double>::quiet_NaN();
760     // Look for a time portion.
761     if (*currentPosition == 'T') {
762         // Parse the time HH:mm[:ss[.sss]][Z|(+|-)00:00]
763         currentPosition = parseES5TimePortion(currentPosition + 1, hours, minutes, seconds, timeZoneSeconds);
764         if (!currentPosition)
765             return std::numeric_limits<double>::quiet_NaN();
766     }
767     // Check that we have parsed all characters in the string.
768     if (*currentPosition)
769         return std::numeric_limits<double>::quiet_NaN();
770
771     // A few of these checks could be done inline above, but since many of them are interrelated
772     // we would be sacrificing readability to "optimize" the (presumably less common) failure path.
773     if (month < 1 || month > 12)
774         return std::numeric_limits<double>::quiet_NaN();
775     if (day < 1 || day > daysPerMonth[month - 1])
776         return std::numeric_limits<double>::quiet_NaN();
777     if (month == 2 && day > 28 && !isLeapYear(year))
778         return std::numeric_limits<double>::quiet_NaN();
779     if (hours < 0 || hours > 24)
780         return std::numeric_limits<double>::quiet_NaN();
781     if (hours == 24 && (minutes || seconds))
782         return std::numeric_limits<double>::quiet_NaN();
783     if (minutes < 0 || minutes > 59)
784         return std::numeric_limits<double>::quiet_NaN();
785     if (seconds < 0 || seconds >= 61)
786         return std::numeric_limits<double>::quiet_NaN();
787     if (seconds > 60) {
788         // Discard leap seconds by clamping to the end of a minute.
789         seconds = 60;
790     }
791         
792     double dateSeconds = ymdhmsToSeconds(year, month, day, hours, minutes, seconds) - timeZoneSeconds;
793     return dateSeconds * msPerSecond;
794 }
795
796 double parseDateFromNullTerminatedCharacters(const char* dateString, bool& haveTZ, int& offset)
797 {
798     haveTZ = false;
799     offset = 0;
800
801     // This parses a date in the form:
802     //     Tuesday, 09-Nov-99 23:12:40 GMT
803     // or
804     //     Sat, 01-Jan-2000 08:00:00 GMT
805     // or
806     //     Sat, 01 Jan 2000 08:00:00 GMT
807     // or
808     //     01 Jan 99 22:00 +0100    (exceptions in rfc822/rfc2822)
809     // ### non RFC formats, added for Javascript:
810     //     [Wednesday] January 09 1999 23:12:40 GMT
811     //     [Wednesday] January 09 23:12:40 GMT 1999
812     //
813     // We ignore the weekday.
814      
815     // Skip leading space
816     skipSpacesAndComments(dateString);
817
818     long month = -1;
819     const char *wordStart = dateString;
820     // Check contents of first words if not number
821     while (*dateString && !isASCIIDigit(*dateString)) {
822         if (isASCIISpace(*dateString) || *dateString == '(') {
823             if (dateString - wordStart >= 3)
824                 month = findMonth(wordStart);
825             skipSpacesAndComments(dateString);
826             wordStart = dateString;
827         } else
828            dateString++;
829     }
830
831     // Missing delimiter between month and day (like "January29")?
832     if (month == -1 && wordStart != dateString)
833         month = findMonth(wordStart);
834
835     skipSpacesAndComments(dateString);
836
837     if (!*dateString)
838         return std::numeric_limits<double>::quiet_NaN();
839
840     // ' 09-Nov-99 23:12:40 GMT'
841     char* newPosStr;
842     long day;
843     if (!parseLong(dateString, &newPosStr, 10, &day))
844         return std::numeric_limits<double>::quiet_NaN();
845     dateString = newPosStr;
846
847     if (!*dateString)
848         return std::numeric_limits<double>::quiet_NaN();
849
850     if (day < 0)
851         return std::numeric_limits<double>::quiet_NaN();
852
853     int year = 0;
854     if (day > 31) {
855         // ### where is the boundary and what happens below?
856         if (*dateString != '/')
857             return std::numeric_limits<double>::quiet_NaN();
858         // looks like a YYYY/MM/DD date
859         if (!*++dateString)
860             return std::numeric_limits<double>::quiet_NaN();
861         if (day <= std::numeric_limits<int>::min() || day >= std::numeric_limits<int>::max())
862             return std::numeric_limits<double>::quiet_NaN();
863         year = static_cast<int>(day);
864         if (!parseLong(dateString, &newPosStr, 10, &month))
865             return std::numeric_limits<double>::quiet_NaN();
866         month -= 1;
867         dateString = newPosStr;
868         if (*dateString++ != '/' || !*dateString)
869             return std::numeric_limits<double>::quiet_NaN();
870         if (!parseLong(dateString, &newPosStr, 10, &day))
871             return std::numeric_limits<double>::quiet_NaN();
872         dateString = newPosStr;
873     } else if (*dateString == '/' && month == -1) {
874         dateString++;
875         // This looks like a MM/DD/YYYY date, not an RFC date.
876         month = day - 1; // 0-based
877         if (!parseLong(dateString, &newPosStr, 10, &day))
878             return std::numeric_limits<double>::quiet_NaN();
879         if (day < 1 || day > 31)
880             return std::numeric_limits<double>::quiet_NaN();
881         dateString = newPosStr;
882         if (*dateString == '/')
883             dateString++;
884         if (!*dateString)
885             return std::numeric_limits<double>::quiet_NaN();
886      } else {
887         if (*dateString == '-')
888             dateString++;
889
890         skipSpacesAndComments(dateString);
891
892         if (*dateString == ',')
893             dateString++;
894
895         if (month == -1) { // not found yet
896             month = findMonth(dateString);
897             if (month == -1)
898                 return std::numeric_limits<double>::quiet_NaN();
899
900             while (*dateString && *dateString != '-' && *dateString != ',' && !isASCIISpace(*dateString))
901                 dateString++;
902
903             if (!*dateString)
904                 return std::numeric_limits<double>::quiet_NaN();
905
906             // '-99 23:12:40 GMT'
907             if (*dateString != '-' && *dateString != '/' && *dateString != ',' && !isASCIISpace(*dateString))
908                 return std::numeric_limits<double>::quiet_NaN();
909             dateString++;
910         }
911     }
912
913     if (month < 0 || month > 11)
914         return std::numeric_limits<double>::quiet_NaN();
915
916     // '99 23:12:40 GMT'
917     if (year <= 0 && *dateString) {
918         if (!parseInt(dateString, &newPosStr, 10, &year))
919             return std::numeric_limits<double>::quiet_NaN();
920     }
921
922     // Don't fail if the time is missing.
923     long hour = 0;
924     long minute = 0;
925     long second = 0;
926     if (!*newPosStr)
927         dateString = newPosStr;
928     else {
929         // ' 23:12:40 GMT'
930         if (!(isASCIISpace(*newPosStr) || *newPosStr == ',')) {
931             if (*newPosStr != ':')
932                 return std::numeric_limits<double>::quiet_NaN();
933             // There was no year; the number was the hour.
934             year = -1;
935         } else {
936             // in the normal case (we parsed the year), advance to the next number
937             dateString = ++newPosStr;
938             skipSpacesAndComments(dateString);
939         }
940
941         parseLong(dateString, &newPosStr, 10, &hour);
942         // Do not check for errno here since we want to continue
943         // even if errno was set becasue we are still looking
944         // for the timezone!
945
946         // Read a number? If not, this might be a timezone name.
947         if (newPosStr != dateString) {
948             dateString = newPosStr;
949
950             if (hour < 0 || hour > 23)
951                 return std::numeric_limits<double>::quiet_NaN();
952
953             if (!*dateString)
954                 return std::numeric_limits<double>::quiet_NaN();
955
956             // ':12:40 GMT'
957             if (*dateString++ != ':')
958                 return std::numeric_limits<double>::quiet_NaN();
959
960             if (!parseLong(dateString, &newPosStr, 10, &minute))
961                 return std::numeric_limits<double>::quiet_NaN();
962             dateString = newPosStr;
963
964             if (minute < 0 || minute > 59)
965                 return std::numeric_limits<double>::quiet_NaN();
966
967             // ':40 GMT'
968             if (*dateString && *dateString != ':' && !isASCIISpace(*dateString))
969                 return std::numeric_limits<double>::quiet_NaN();
970
971             // seconds are optional in rfc822 + rfc2822
972             if (*dateString ==':') {
973                 dateString++;
974
975                 if (!parseLong(dateString, &newPosStr, 10, &second))
976                     return std::numeric_limits<double>::quiet_NaN();
977                 dateString = newPosStr;
978
979                 if (second < 0 || second > 59)
980                     return std::numeric_limits<double>::quiet_NaN();
981             }
982
983             skipSpacesAndComments(dateString);
984
985             if (strncasecmp(dateString, "AM", 2) == 0) {
986                 if (hour > 12)
987                     return std::numeric_limits<double>::quiet_NaN();
988                 if (hour == 12)
989                     hour = 0;
990                 dateString += 2;
991                 skipSpacesAndComments(dateString);
992             } else if (strncasecmp(dateString, "PM", 2) == 0) {
993                 if (hour > 12)
994                     return std::numeric_limits<double>::quiet_NaN();
995                 if (hour != 12)
996                     hour += 12;
997                 dateString += 2;
998                 skipSpacesAndComments(dateString);
999             }
1000         }
1001     }
1002     
1003     // The year may be after the time but before the time zone.
1004     if (isASCIIDigit(*dateString) && year == -1) {
1005         if (!parseInt(dateString, &newPosStr, 10, &year))
1006             return std::numeric_limits<double>::quiet_NaN();
1007         dateString = newPosStr;
1008         skipSpacesAndComments(dateString);
1009     }
1010
1011     // Don't fail if the time zone is missing. 
1012     // Some websites omit the time zone (4275206).
1013     if (*dateString) {
1014         if (strncasecmp(dateString, "GMT", 3) == 0 || strncasecmp(dateString, "UTC", 3) == 0) {
1015             dateString += 3;
1016             haveTZ = true;
1017         }
1018
1019         if (*dateString == '+' || *dateString == '-') {
1020             int o;
1021             if (!parseInt(dateString, &newPosStr, 10, &o))
1022                 return std::numeric_limits<double>::quiet_NaN();
1023             dateString = newPosStr;
1024
1025             if (o < -9959 || o > 9959)
1026                 return std::numeric_limits<double>::quiet_NaN();
1027
1028             int sgn = (o < 0) ? -1 : 1;
1029             o = abs(o);
1030             if (*dateString != ':') {
1031                 if (o >= 24)
1032                     offset = ((o / 100) * 60 + (o % 100)) * sgn;
1033                 else
1034                     offset = o * 60 * sgn;
1035             } else { // GMT+05:00
1036                 ++dateString; // skip the ':'
1037                 int o2;
1038                 if (!parseInt(dateString, &newPosStr, 10, &o2))
1039                     return std::numeric_limits<double>::quiet_NaN();
1040                 dateString = newPosStr;
1041                 offset = (o * 60 + o2) * sgn;
1042             }
1043             haveTZ = true;
1044         } else {
1045             for (size_t i = 0; i < WTF_ARRAY_LENGTH(known_zones); ++i) {
1046                 if (0 == strncasecmp(dateString, known_zones[i].tzName, strlen(known_zones[i].tzName))) {
1047                     offset = known_zones[i].tzOffset;
1048                     dateString += strlen(known_zones[i].tzName);
1049                     haveTZ = true;
1050                     break;
1051                 }
1052             }
1053         }
1054     }
1055
1056     skipSpacesAndComments(dateString);
1057
1058     if (*dateString && year == -1) {
1059         if (!parseInt(dateString, &newPosStr, 10, &year))
1060             return std::numeric_limits<double>::quiet_NaN();
1061         dateString = newPosStr;
1062         skipSpacesAndComments(dateString);
1063     }
1064
1065     // Trailing garbage
1066     if (*dateString)
1067         return std::numeric_limits<double>::quiet_NaN();
1068
1069     // Y2K: Handle 2 digit years.
1070     if (year >= 0 && year < 100) {
1071         if (year < 50)
1072             year += 2000;
1073         else
1074             year += 1900;
1075     }
1076     
1077     return ymdhmsToSeconds(year, month + 1, day, hour, minute, second) * msPerSecond;
1078 }
1079
1080 double parseDateFromNullTerminatedCharacters(const char* dateString)
1081 {
1082     bool haveTZ;
1083     int offset;
1084     double ms = parseDateFromNullTerminatedCharacters(dateString, haveTZ, offset);
1085     if (std::isnan(ms))
1086         return std::numeric_limits<double>::quiet_NaN();
1087
1088     // fall back to local timezone
1089     if (!haveTZ)
1090         offset = calculateLocalTimeOffset(ms).offset / msPerMinute;
1091
1092     return ms - (offset * msPerMinute);
1093 }
1094
1095 double timeClip(double t)
1096 {
1097     if (!std::isfinite(t))
1098         return std::numeric_limits<double>::quiet_NaN();
1099     if (fabs(t) > maxECMAScriptTime)
1100         return std::numeric_limits<double>::quiet_NaN();
1101     return trunc(t);
1102 }
1103
1104 // See http://tools.ietf.org/html/rfc2822#section-3.3 for more information.
1105 String makeRFC2822DateString(unsigned dayOfWeek, unsigned day, unsigned month, unsigned year, unsigned hours, unsigned minutes, unsigned seconds, int utcOffset)
1106 {
1107     StringBuilder stringBuilder;
1108     stringBuilder.append(weekdayName[dayOfWeek]);
1109     stringBuilder.appendLiteral(", ");
1110     stringBuilder.appendNumber(day);
1111     stringBuilder.append(' ');
1112     stringBuilder.append(monthName[month]);
1113     stringBuilder.append(' ');
1114     stringBuilder.appendNumber(year);
1115     stringBuilder.append(' ');
1116
1117     appendTwoDigitNumber(stringBuilder, hours);
1118     stringBuilder.append(':');
1119     appendTwoDigitNumber(stringBuilder, minutes);
1120     stringBuilder.append(':');
1121     appendTwoDigitNumber(stringBuilder, seconds);
1122     stringBuilder.append(' ');
1123
1124     stringBuilder.append(utcOffset > 0 ? '+' : '-');
1125     int absoluteUTCOffset = abs(utcOffset);
1126     appendTwoDigitNumber(stringBuilder, absoluteUTCOffset / 60);
1127     appendTwoDigitNumber(stringBuilder, absoluteUTCOffset % 60);
1128
1129     return stringBuilder.toString();
1130 }
1131
1132 } // namespace WTF