b32cca4e3b6df155d73a45c789c913d253ba83d3
[WebKit-https.git] / Source / JavaScriptCore / runtime / DatePrototype.cpp
1 /*
2  *  Copyright (C) 1999-2000 Harri Porten (porten@kde.org)
3  *  Copyright (C) 2004, 2005, 2006, 2007, 2008 Apple Inc. All rights reserved.
4  *  Copyright (C) 2008, 2009 Torch Mobile, Inc. All rights reserved.
5  *  Copyright (C) 2010 Torch Mobile (Beijing) Co. Ltd. All rights reserved.
6  *
7  *  This library is free software; you can redistribute it and/or
8  *  modify it under the terms of the GNU Lesser General Public
9  *  License as published by the Free Software Foundation; either
10  *  version 2 of the License, or (at your option) any later version.
11  *
12  *  This library is distributed in the hope that it will be useful,
13  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
14  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  *  Lesser General Public License for more details.
16  *
17  *  You should have received a copy of the GNU Lesser General Public
18  *  License along with this library; if not, write to the Free Software
19  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301
20  *  USA
21  *
22  */
23
24 #include "config.h"
25 #include "DatePrototype.h"
26
27 #include "DateConversion.h"
28 #include "DateInstance.h"
29 #include "Error.h"
30 #include "JSCBuiltins.h"
31 #include "JSDateMath.h"
32 #include "JSGlobalObject.h"
33 #include "JSObject.h"
34 #include "JSString.h"
35 #include "Lookup.h"
36 #include "ObjectPrototype.h"
37 #include "JSCInlines.h"
38 #include <limits.h>
39 #include <locale.h>
40 #include <math.h>
41 #include <stdlib.h>
42 #include <time.h>
43 #include <wtf/Assertions.h>
44 #include <wtf/MathExtras.h>
45 #include <wtf/StringExtras.h>
46
47 #if HAVE(LANGINFO_H)
48 #include <langinfo.h>
49 #endif
50
51 #if HAVE(SYS_PARAM_H)
52 #include <sys/param.h>
53 #endif
54
55 #if HAVE(SYS_TIME_H)
56 #include <sys/time.h>
57 #endif
58
59 #if HAVE(SYS_TIMEB_H)
60 #include <sys/timeb.h>
61 #endif
62
63 #if !(OS(DARWIN) && USE(CF))
64 #include <unicode/udat.h>
65 #endif
66
67 #if USE(CF)
68 #include <CoreFoundation/CoreFoundation.h>
69 #endif
70
71 using namespace WTF;
72
73 namespace JSC {
74
75 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetDate(ExecState*);
76 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetDay(ExecState*);
77 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetFullYear(ExecState*);
78 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetHours(ExecState*);
79 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetMilliSeconds(ExecState*);
80 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetMinutes(ExecState*);
81 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetMonth(ExecState*);
82 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetSeconds(ExecState*);
83 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetTimezoneOffset(ExecState*);
84 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCDate(ExecState*);
85 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCDay(ExecState*);
86 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCFullYear(ExecState*);
87 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCHours(ExecState*);
88 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCMilliseconds(ExecState*);
89 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCMinutes(ExecState*);
90 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCMonth(ExecState*);
91 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCSeconds(ExecState*);
92 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetYear(ExecState*);
93 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetDate(ExecState*);
94 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetFullYear(ExecState*);
95 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetHours(ExecState*);
96 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetMilliSeconds(ExecState*);
97 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetMinutes(ExecState*);
98 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetMonth(ExecState*);
99 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetSeconds(ExecState*);
100 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetTime(ExecState*);
101 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetUTCDate(ExecState*);
102 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetUTCFullYear(ExecState*);
103 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetUTCHours(ExecState*);
104 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetUTCMilliseconds(ExecState*);
105 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetUTCMinutes(ExecState*);
106 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetUTCMonth(ExecState*);
107 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetUTCSeconds(ExecState*);
108 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetYear(ExecState*);
109 EncodedJSValue JSC_HOST_CALL dateProtoFuncToDateString(ExecState*);
110 EncodedJSValue JSC_HOST_CALL dateProtoFuncToGMTString(ExecState*);
111 EncodedJSValue JSC_HOST_CALL dateProtoFuncToLocaleDateString(ExecState*);
112 EncodedJSValue JSC_HOST_CALL dateProtoFuncToLocaleString(ExecState*);
113 EncodedJSValue JSC_HOST_CALL dateProtoFuncToLocaleTimeString(ExecState*);
114 EncodedJSValue JSC_HOST_CALL dateProtoFuncToString(ExecState*);
115 EncodedJSValue JSC_HOST_CALL dateProtoFuncToTimeString(ExecState*);
116 EncodedJSValue JSC_HOST_CALL dateProtoFuncToUTCString(ExecState*);
117 EncodedJSValue JSC_HOST_CALL dateProtoFuncToISOString(ExecState*);
118 EncodedJSValue JSC_HOST_CALL dateProtoFuncToJSON(ExecState*);
119
120 }
121
122 #include "DatePrototype.lut.h"
123
124 namespace JSC {
125
126 enum LocaleDateTimeFormat { LocaleDateAndTime, LocaleDate, LocaleTime };
127  
128 #if OS(DARWIN) && USE(CF)
129
130 // FIXME: Since this is superior to the strftime-based version, why limit this to OS(DARWIN)?
131 // Instead we should consider using this whenever USE(CF) is true.
132
133 static CFDateFormatterStyle styleFromArgString(const String& string, CFDateFormatterStyle defaultStyle)
134 {
135     if (string == "short")
136         return kCFDateFormatterShortStyle;
137     if (string == "medium")
138         return kCFDateFormatterMediumStyle;
139     if (string == "long")
140         return kCFDateFormatterLongStyle;
141     if (string == "full")
142         return kCFDateFormatterFullStyle;
143     return defaultStyle;
144 }
145
146 static JSCell* formatLocaleDate(ExecState* exec, DateInstance*, double timeInMilliseconds, LocaleDateTimeFormat format)
147 {
148     CFDateFormatterStyle dateStyle = (format != LocaleTime ? kCFDateFormatterLongStyle : kCFDateFormatterNoStyle);
149     CFDateFormatterStyle timeStyle = (format != LocaleDate ? kCFDateFormatterLongStyle : kCFDateFormatterNoStyle);
150
151     bool useCustomFormat = false;
152     String customFormatString;
153
154     String arg0String = exec->argument(0).toString(exec)->value(exec);
155     if (arg0String == "custom" && !exec->argument(1).isUndefined()) {
156         useCustomFormat = true;
157         customFormatString = exec->argument(1).toString(exec)->value(exec);
158     } else if (format == LocaleDateAndTime && !exec->argument(1).isUndefined()) {
159         dateStyle = styleFromArgString(arg0String, dateStyle);
160         timeStyle = styleFromArgString(exec->argument(1).toString(exec)->value(exec), timeStyle);
161     } else if (format != LocaleTime && !exec->argument(0).isUndefined())
162         dateStyle = styleFromArgString(arg0String, dateStyle);
163     else if (format != LocaleDate && !exec->argument(0).isUndefined())
164         timeStyle = styleFromArgString(arg0String, timeStyle);
165
166     CFAbsoluteTime absoluteTime = floor(timeInMilliseconds / msPerSecond) - kCFAbsoluteTimeIntervalSince1970;
167
168     auto formatter = adoptCF(CFDateFormatterCreate(kCFAllocatorDefault, adoptCF(CFLocaleCopyCurrent()).get(), dateStyle, timeStyle));
169     if (useCustomFormat)
170         CFDateFormatterSetFormat(formatter.get(), customFormatString.createCFString().get());
171     return jsNontrivialString(exec, adoptCF(CFDateFormatterCreateStringWithAbsoluteTime(kCFAllocatorDefault, formatter.get(), absoluteTime)).get());
172 }
173
174 #elif !UCONFIG_NO_FORMATTING
175
176 static JSCell* formatLocaleDate(ExecState* exec, DateInstance*, double timeInMilliseconds, LocaleDateTimeFormat format)
177 {
178     UDateFormatStyle timeStyle = (format != LocaleDate ? UDAT_LONG : UDAT_NONE);
179     UDateFormatStyle dateStyle = (format != LocaleTime ? UDAT_LONG : UDAT_NONE);
180
181     UErrorCode status = U_ZERO_ERROR;
182     UDateFormat* df = udat_open(timeStyle, dateStyle, 0, 0, -1, 0, 0, &status);
183     if (!df)
184         return jsEmptyString(exec);
185
186     UChar buffer[128];
187     int32_t length;
188     length = udat_format(df, timeInMilliseconds, buffer, 128, 0, &status);
189     udat_close(df);
190     if (status != U_ZERO_ERROR)
191         return jsEmptyString(exec);
192
193     return jsNontrivialString(exec, String(buffer, length));
194 }
195
196 #else
197
198 static JSCell* formatLocaleDate(ExecState* exec, const GregorianDateTime& gdt, LocaleDateTimeFormat format)
199 {
200 #if OS(WINDOWS)
201     SYSTEMTIME systemTime;
202     memset(&systemTime, 0, sizeof(systemTime));
203     systemTime.wYear = gdt.year();
204     systemTime.wMonth = gdt.month() + 1;
205     systemTime.wDay = gdt.monthDay();
206     systemTime.wDayOfWeek = gdt.weekDay();
207     systemTime.wHour = gdt.hour();
208     systemTime.wMinute = gdt.minute();
209     systemTime.wSecond = gdt.second();
210
211     Vector<UChar, 128> buffer;
212     size_t length = 0;
213
214     if (format == LocaleDate) {
215         buffer.resize(GetDateFormatW(LOCALE_USER_DEFAULT, DATE_LONGDATE, &systemTime, 0, 0, 0));
216         length = GetDateFormatW(LOCALE_USER_DEFAULT, DATE_LONGDATE, &systemTime, 0, buffer.data(), buffer.size());
217     } else if (format == LocaleTime) {
218         buffer.resize(GetTimeFormatW(LOCALE_USER_DEFAULT, 0, &systemTime, 0, 0, 0));
219         length = GetTimeFormatW(LOCALE_USER_DEFAULT, 0, &systemTime, 0, buffer.data(), buffer.size());
220     } else if (format == LocaleDateAndTime) {
221         buffer.resize(GetDateFormatW(LOCALE_USER_DEFAULT, DATE_LONGDATE, &systemTime, 0, 0, 0) + GetTimeFormatW(LOCALE_USER_DEFAULT, 0, &systemTime, 0, 0, 0));
222         length = GetDateFormatW(LOCALE_USER_DEFAULT, DATE_LONGDATE, &systemTime, 0, buffer.data(), buffer.size());
223         if (length) {
224             buffer[length - 1] = ' ';
225             length += GetTimeFormatW(LOCALE_USER_DEFAULT, 0, &systemTime, 0, buffer.data() + length, buffer.size() - length);
226         }
227     } else
228         RELEASE_ASSERT_NOT_REACHED();
229
230     //  Remove terminating null character.
231     if (length)
232         length--;
233
234     return jsNontrivialString(exec, String(buffer.data(), length));
235
236 #else // OS(WINDOWS)
237
238 #if HAVE(LANGINFO_H)
239     static const nl_item formats[] = { D_T_FMT, D_FMT, T_FMT };
240 #else
241     static const char* const formatStrings[] = { "%#c", "%#x", "%X" };
242 #endif
243
244     // Offset year if needed
245     struct tm localTM = gdt;
246     int year = gdt.year();
247     bool yearNeedsOffset = year < 1900 || year > 2038;
248     if (yearNeedsOffset)
249         localTM.tm_year = equivalentYearForDST(year) - 1900;
250
251 #if HAVE(LANGINFO_H)
252     // We do not allow strftime to generate dates with 2-digits years,
253     // both to avoid ambiguity, and a crash in strncpy, for years that
254     // need offset.
255     char* formatString = strdup(nl_langinfo(formats[format]));
256     char* yPos = strchr(formatString, 'y');
257     if (yPos)
258         *yPos = 'Y';
259 #endif
260
261     // Do the formatting
262     const int bufsize = 128;
263     char timebuffer[bufsize];
264
265 #if HAVE(LANGINFO_H)
266     size_t ret = strftime(timebuffer, bufsize, formatString, &localTM);
267     free(formatString);
268 #else
269     size_t ret = strftime(timebuffer, bufsize, formatStrings[format], &localTM);
270 #endif
271
272     if (ret == 0)
273         return jsEmptyString(exec);
274
275     // Copy original into the buffer
276     if (yearNeedsOffset && format != LocaleTime) {
277         static const int yearLen = 5;   // FIXME will be a problem in the year 10,000
278         char yearString[yearLen];
279
280         snprintf(yearString, yearLen, "%d", localTM.tm_year + 1900);
281         char* yearLocation = strstr(timebuffer, yearString);
282         snprintf(yearString, yearLen, "%d", year);
283
284         strncpy(yearLocation, yearString, yearLen - 1);
285     }
286
287     // Convert multi-byte result to UNICODE.
288     // If __STDC_ISO_10646__ is defined, wide character represents
289     // UTF-16 (or UTF-32) code point. In most modern Unix like system
290     // (e.g. Linux with glibc 2.2 and above) the macro is defined,
291     // and wide character represents UTF-32 code point.
292     // Here we static_cast potential UTF-32 to UTF-16, it should be
293     // safe because date and (or) time related characters in different languages
294     // should be in UNICODE BMP. If mbstowcs fails, we just fall
295     // back on using multi-byte result as-is.
296 #ifdef __STDC_ISO_10646__
297     UChar buffer[bufsize];
298     wchar_t tempbuffer[bufsize];
299     size_t length = mbstowcs(tempbuffer, timebuffer, bufsize - 1);
300     if (length != static_cast<size_t>(-1)) {
301         for (size_t i = 0; i < length; ++i)
302             buffer[i] = static_cast<UChar>(tempbuffer[i]);
303         return jsNontrivialString(exec, String(buffer, length));
304     }
305 #endif
306
307     return jsNontrivialString(exec, timebuffer);
308 #endif // OS(WINDOWS)
309 }
310
311 static JSCell* formatLocaleDate(ExecState* exec, DateInstance* dateObject, double, LocaleDateTimeFormat format)
312 {
313     const GregorianDateTime* gregorianDateTime = dateObject->gregorianDateTime(exec);
314     if (!gregorianDateTime)
315         return jsNontrivialString(exec, ASCIILiteral("Invalid Date"));
316     return formatLocaleDate(exec, *gregorianDateTime, format);
317 }
318
319 #endif // OS(DARWIN) && USE(CF)
320
321 static EncodedJSValue formateDateInstance(ExecState* exec, DateTimeFormat format, bool asUTCVariant)
322 {
323     JSValue thisValue = exec->thisValue();
324     if (!thisValue.inherits(DateInstance::info()))
325         return throwVMTypeError(exec);
326
327     DateInstance* thisDateObj = asDateInstance(thisValue);
328
329     const GregorianDateTime* gregorianDateTime = asUTCVariant
330         ? thisDateObj->gregorianDateTimeUTC(exec)
331         : thisDateObj->gregorianDateTime(exec);
332     if (!gregorianDateTime)
333         return JSValue::encode(jsNontrivialString(exec, String(ASCIILiteral("Invalid Date"))));
334
335     return JSValue::encode(jsNontrivialString(exec, formatDateTime(*gregorianDateTime, format, asUTCVariant)));
336 }
337
338 // Converts a list of arguments sent to a Date member function into milliseconds, updating
339 // ms (representing milliseconds) and t (representing the rest of the date structure) appropriately.
340 //
341 // Format of member function: f([hour,] [min,] [sec,] [ms])
342 static bool fillStructuresUsingTimeArgs(ExecState* exec, int maxArgs, double* ms, GregorianDateTime* t)
343 {
344     double milliseconds = 0;
345     bool ok = true;
346     int idx = 0;
347     int numArgs = exec->argumentCount();
348     
349     // JS allows extra trailing arguments -- ignore them
350     if (numArgs > maxArgs)
351         numArgs = maxArgs;
352
353     // hours
354     if (maxArgs >= 4 && idx < numArgs) {
355         t->setHour(0);
356         double hours = exec->uncheckedArgument(idx++).toIntegerPreserveNaN(exec);
357         ok = std::isfinite(hours);
358         milliseconds += hours * msPerHour;
359     }
360
361     // minutes
362     if (maxArgs >= 3 && idx < numArgs && ok) {
363         t->setMinute(0);
364         double minutes = exec->uncheckedArgument(idx++).toIntegerPreserveNaN(exec);
365         ok = std::isfinite(minutes);
366         milliseconds += minutes * msPerMinute;
367     }
368     
369     // seconds
370     if (maxArgs >= 2 && idx < numArgs && ok) {
371         t->setSecond(0);
372         double seconds = exec->uncheckedArgument(idx++).toIntegerPreserveNaN(exec);
373         ok = std::isfinite(seconds);
374         milliseconds += seconds * msPerSecond;
375     }
376     
377     if (!ok)
378         return false;
379         
380     // milliseconds
381     if (idx < numArgs) {
382         double millis = exec->uncheckedArgument(idx).toIntegerPreserveNaN(exec);
383         ok = std::isfinite(millis);
384         milliseconds += millis;
385     } else
386         milliseconds += *ms;
387     
388     *ms = milliseconds;
389     return ok;
390 }
391
392 // Converts a list of arguments sent to a Date member function into years, months, and milliseconds, updating
393 // ms (representing milliseconds) and t (representing the rest of the date structure) appropriately.
394 //
395 // Format of member function: f([years,] [months,] [days])
396 static bool fillStructuresUsingDateArgs(ExecState *exec, int maxArgs, double *ms, GregorianDateTime *t)
397 {
398     int idx = 0;
399     bool ok = true;
400     int numArgs = exec->argumentCount();
401   
402     // JS allows extra trailing arguments -- ignore them
403     if (numArgs > maxArgs)
404         numArgs = maxArgs;
405   
406     // years
407     if (maxArgs >= 3 && idx < numArgs) {
408         double years = exec->uncheckedArgument(idx++).toIntegerPreserveNaN(exec);
409         ok = std::isfinite(years);
410         t->setYear(toInt32(years));
411     }
412     // months
413     if (maxArgs >= 2 && idx < numArgs && ok) {
414         double months = exec->uncheckedArgument(idx++).toIntegerPreserveNaN(exec);
415         ok = std::isfinite(months);
416         t->setMonth(toInt32(months));
417     }
418     // days
419     if (idx < numArgs && ok) {
420         double days = exec->uncheckedArgument(idx++).toIntegerPreserveNaN(exec);
421         ok = std::isfinite(days);
422         t->setMonthDay(0);
423         *ms += days * msPerDay;
424     }
425     
426     return ok;
427 }
428
429 const ClassInfo DatePrototype::s_info = {"Object", &JSNonFinalObject::s_info, &dateTable, CREATE_METHOD_TABLE(DatePrototype)};
430
431 /* Source for DatePrototype.lut.h
432 @begin dateTable
433   toString              dateProtoFuncToString                DontEnum|Function       0
434   toISOString           dateProtoFuncToISOString             DontEnum|Function       0
435   toUTCString           dateProtoFuncToUTCString             DontEnum|Function       0
436   toDateString          dateProtoFuncToDateString            DontEnum|Function       0
437   toTimeString          dateProtoFuncToTimeString            DontEnum|Function       0
438   toLocaleString        dateProtoFuncToLocaleString          DontEnum|Function       0
439   toLocaleDateString    dateProtoFuncToLocaleDateString      DontEnum|Function       0
440   toLocaleTimeString    dateProtoFuncToLocaleTimeString      DontEnum|Function       0
441   valueOf               dateProtoFuncGetTime                 DontEnum|Function       0
442   getTime               dateProtoFuncGetTime                 DontEnum|Function       0
443   getFullYear           dateProtoFuncGetFullYear             DontEnum|Function       0
444   getUTCFullYear        dateProtoFuncGetUTCFullYear          DontEnum|Function       0
445   toGMTString           dateProtoFuncToGMTString             DontEnum|Function       0
446   getMonth              dateProtoFuncGetMonth                DontEnum|Function       0
447   getUTCMonth           dateProtoFuncGetUTCMonth             DontEnum|Function       0
448   getDate               dateProtoFuncGetDate                 DontEnum|Function       0
449   getUTCDate            dateProtoFuncGetUTCDate              DontEnum|Function       0
450   getDay                dateProtoFuncGetDay                  DontEnum|Function       0
451   getUTCDay             dateProtoFuncGetUTCDay               DontEnum|Function       0
452   getHours              dateProtoFuncGetHours                DontEnum|Function       0
453   getUTCHours           dateProtoFuncGetUTCHours             DontEnum|Function       0
454   getMinutes            dateProtoFuncGetMinutes              DontEnum|Function       0
455   getUTCMinutes         dateProtoFuncGetUTCMinutes           DontEnum|Function       0
456   getSeconds            dateProtoFuncGetSeconds              DontEnum|Function       0
457   getUTCSeconds         dateProtoFuncGetUTCSeconds           DontEnum|Function       0
458   getMilliseconds       dateProtoFuncGetMilliSeconds         DontEnum|Function       0
459   getUTCMilliseconds    dateProtoFuncGetUTCMilliseconds      DontEnum|Function       0
460   getTimezoneOffset     dateProtoFuncGetTimezoneOffset       DontEnum|Function       0
461   setTime               dateProtoFuncSetTime                 DontEnum|Function       1
462   setMilliseconds       dateProtoFuncSetMilliSeconds         DontEnum|Function       1
463   setUTCMilliseconds    dateProtoFuncSetUTCMilliseconds      DontEnum|Function       1
464   setSeconds            dateProtoFuncSetSeconds              DontEnum|Function       2
465   setUTCSeconds         dateProtoFuncSetUTCSeconds           DontEnum|Function       2
466   setMinutes            dateProtoFuncSetMinutes              DontEnum|Function       3
467   setUTCMinutes         dateProtoFuncSetUTCMinutes           DontEnum|Function       3
468   setHours              dateProtoFuncSetHours                DontEnum|Function       4
469   setUTCHours           dateProtoFuncSetUTCHours             DontEnum|Function       4
470   setDate               dateProtoFuncSetDate                 DontEnum|Function       1
471   setUTCDate            dateProtoFuncSetUTCDate              DontEnum|Function       1
472   setMonth              dateProtoFuncSetMonth                DontEnum|Function       2
473   setUTCMonth           dateProtoFuncSetUTCMonth             DontEnum|Function       2
474   setFullYear           dateProtoFuncSetFullYear             DontEnum|Function       3
475   setUTCFullYear        dateProtoFuncSetUTCFullYear          DontEnum|Function       3
476   setYear               dateProtoFuncSetYear                 DontEnum|Function       1
477   getYear               dateProtoFuncGetYear                 DontEnum|Function       0
478   toJSON                dateProtoFuncToJSON                  DontEnum|Function       1
479 @end
480 */
481
482 // ECMA 15.9.4
483
484 DatePrototype::DatePrototype(VM& vm, Structure* structure)
485     : Base(vm, structure)
486 {
487 }
488
489 void DatePrototype::finishCreation(VM& vm, JSGlobalObject* globalObject)
490 {
491     Base::finishCreation(vm);
492     ASSERT(inherits(info()));
493
494 #if ENABLE(INTL)
495     JSC_BUILTIN_FUNCTION_WITHOUT_TRANSITION("toLocaleString", datePrototypeToLocaleStringCodeGenerator, DontEnum);
496     JSC_BUILTIN_FUNCTION_WITHOUT_TRANSITION("toLocaleDateString", datePrototypeToLocaleDateStringCodeGenerator, DontEnum);
497     JSC_BUILTIN_FUNCTION_WITHOUT_TRANSITION("toLocaleTimeString", datePrototypeToLocaleTimeStringCodeGenerator, DontEnum);
498 #else
499     UNUSED_PARAM(globalObject);
500 #endif // ENABLE(INTL)
501
502     // The constructor will be added later, after DateConstructor has been built.
503 }
504
505 bool DatePrototype::getOwnPropertySlot(JSObject* object, ExecState* exec, PropertyName propertyName, PropertySlot& slot)
506 {
507     return getStaticFunctionSlot<JSObject>(exec, dateTable, jsCast<DatePrototype*>(object), propertyName, slot);
508 }
509
510 // Functions
511
512 EncodedJSValue JSC_HOST_CALL dateProtoFuncToString(ExecState* exec)
513 {
514     const bool asUTCVariant = false;
515     return formateDateInstance(exec, DateTimeFormatDateAndTime, asUTCVariant);
516 }
517
518 EncodedJSValue JSC_HOST_CALL dateProtoFuncToUTCString(ExecState* exec)
519 {
520     const bool asUTCVariant = true;
521     return formateDateInstance(exec, DateTimeFormatDateAndTime, asUTCVariant);
522 }
523
524 EncodedJSValue JSC_HOST_CALL dateProtoFuncToISOString(ExecState* exec)
525 {
526     JSValue thisValue = exec->thisValue();
527     if (!thisValue.inherits(DateInstance::info()))
528         return throwVMTypeError(exec);
529     
530     DateInstance* thisDateObj = asDateInstance(thisValue); 
531     if (!std::isfinite(thisDateObj->internalNumber()))
532         return throwVMError(exec, createRangeError(exec, ASCIILiteral("Invalid Date")));
533
534     const GregorianDateTime* gregorianDateTime = thisDateObj->gregorianDateTimeUTC(exec);
535     if (!gregorianDateTime)
536         return JSValue::encode(jsNontrivialString(exec, String(ASCIILiteral("Invalid Date"))));
537     // Maximum amount of space we need in buffer: 7 (max. digits in year) + 2 * 5 (2 characters each for month, day, hour, minute, second) + 4 (. + 3 digits for milliseconds)
538     // 6 for formatting and one for null termination = 28. We add one extra character to allow us to force null termination.
539     char buffer[28];
540     // If the year is outside the bounds of 0 and 9999 inclusive we want to use the extended year format (ES 15.9.1.15.1).
541     int ms = static_cast<int>(fmod(thisDateObj->internalNumber(), msPerSecond));
542     if (ms < 0)
543         ms += msPerSecond;
544
545     int charactersWritten;
546     if (gregorianDateTime->year() > 9999 || gregorianDateTime->year() < 0)
547         charactersWritten = snprintf(buffer, sizeof(buffer), "%+07d-%02d-%02dT%02d:%02d:%02d.%03dZ", gregorianDateTime->year(), gregorianDateTime->month() + 1, gregorianDateTime->monthDay(), gregorianDateTime->hour(), gregorianDateTime->minute(), gregorianDateTime->second(), ms);
548     else
549         charactersWritten = snprintf(buffer, sizeof(buffer), "%04d-%02d-%02dT%02d:%02d:%02d.%03dZ", gregorianDateTime->year(), gregorianDateTime->month() + 1, gregorianDateTime->monthDay(), gregorianDateTime->hour(), gregorianDateTime->minute(), gregorianDateTime->second(), ms);
550
551     ASSERT(charactersWritten > 0 && static_cast<unsigned>(charactersWritten) < sizeof(buffer));
552     if (static_cast<unsigned>(charactersWritten) >= sizeof(buffer))
553         return JSValue::encode(jsEmptyString(exec));
554
555     return JSValue::encode(jsNontrivialString(exec, String(buffer, charactersWritten)));
556 }
557
558 EncodedJSValue JSC_HOST_CALL dateProtoFuncToDateString(ExecState* exec)
559 {
560     const bool asUTCVariant = false;
561     return formateDateInstance(exec, DateTimeFormatDate, asUTCVariant);
562 }
563
564 EncodedJSValue JSC_HOST_CALL dateProtoFuncToTimeString(ExecState* exec)
565 {
566     const bool asUTCVariant = false;
567     return formateDateInstance(exec, DateTimeFormatTime, asUTCVariant);
568 }
569
570 EncodedJSValue JSC_HOST_CALL dateProtoFuncToLocaleString(ExecState* exec)
571 {
572     JSValue thisValue = exec->thisValue();
573     if (!thisValue.inherits(DateInstance::info()))
574         return throwVMTypeError(exec);
575
576     DateInstance* thisDateObj = asDateInstance(thisValue); 
577     return JSValue::encode(formatLocaleDate(exec, thisDateObj, thisDateObj->internalNumber(), LocaleDateAndTime));
578 }
579
580 EncodedJSValue JSC_HOST_CALL dateProtoFuncToLocaleDateString(ExecState* exec)
581 {
582     JSValue thisValue = exec->thisValue();
583     if (!thisValue.inherits(DateInstance::info()))
584         return throwVMTypeError(exec);
585
586     DateInstance* thisDateObj = asDateInstance(thisValue); 
587     return JSValue::encode(formatLocaleDate(exec, thisDateObj, thisDateObj->internalNumber(), LocaleDate));
588 }
589
590 EncodedJSValue JSC_HOST_CALL dateProtoFuncToLocaleTimeString(ExecState* exec)
591 {
592     JSValue thisValue = exec->thisValue();
593     if (!thisValue.inherits(DateInstance::info()))
594         return throwVMTypeError(exec);
595
596     DateInstance* thisDateObj = asDateInstance(thisValue); 
597     return JSValue::encode(formatLocaleDate(exec, thisDateObj, thisDateObj->internalNumber(), LocaleTime));
598 }
599
600 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetTime(ExecState* exec)
601 {
602     JSValue thisValue = exec->thisValue();
603     if (!thisValue.inherits(DateInstance::info()))
604         return throwVMTypeError(exec);
605
606     return JSValue::encode(asDateInstance(thisValue)->internalValue());
607 }
608
609 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetFullYear(ExecState* exec)
610 {
611     JSValue thisValue = exec->thisValue();
612     if (!thisValue.inherits(DateInstance::info()))
613         return throwVMTypeError(exec);
614
615     DateInstance* thisDateObj = asDateInstance(thisValue); 
616
617     const GregorianDateTime* gregorianDateTime = thisDateObj->gregorianDateTime(exec);
618     if (!gregorianDateTime)
619         return JSValue::encode(jsNaN());
620     return JSValue::encode(jsNumber(gregorianDateTime->year()));
621 }
622
623 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCFullYear(ExecState* exec)
624 {
625     JSValue thisValue = exec->thisValue();
626     if (!thisValue.inherits(DateInstance::info()))
627         return throwVMTypeError(exec);
628
629     DateInstance* thisDateObj = asDateInstance(thisValue); 
630
631     const GregorianDateTime* gregorianDateTime = thisDateObj->gregorianDateTimeUTC(exec);
632     if (!gregorianDateTime)
633         return JSValue::encode(jsNaN());
634     return JSValue::encode(jsNumber(gregorianDateTime->year()));
635 }
636
637 EncodedJSValue JSC_HOST_CALL dateProtoFuncToGMTString(ExecState* exec)
638 {
639     const bool asUTCVariant = true;
640     return formateDateInstance(exec, DateTimeFormatDateAndTime, asUTCVariant);
641 }
642
643 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetMonth(ExecState* exec)
644 {
645     JSValue thisValue = exec->thisValue();
646     if (!thisValue.inherits(DateInstance::info()))
647         return throwVMTypeError(exec);
648
649     DateInstance* thisDateObj = asDateInstance(thisValue); 
650
651     const GregorianDateTime* gregorianDateTime = thisDateObj->gregorianDateTime(exec);
652     if (!gregorianDateTime)
653         return JSValue::encode(jsNaN());
654     return JSValue::encode(jsNumber(gregorianDateTime->month()));
655 }
656
657 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCMonth(ExecState* exec)
658 {
659     JSValue thisValue = exec->thisValue();
660     if (!thisValue.inherits(DateInstance::info()))
661         return throwVMTypeError(exec);
662
663     DateInstance* thisDateObj = asDateInstance(thisValue); 
664
665     const GregorianDateTime* gregorianDateTime = thisDateObj->gregorianDateTimeUTC(exec);
666     if (!gregorianDateTime)
667         return JSValue::encode(jsNaN());
668     return JSValue::encode(jsNumber(gregorianDateTime->month()));
669 }
670
671 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetDate(ExecState* exec)
672 {
673     JSValue thisValue = exec->thisValue();
674     if (!thisValue.inherits(DateInstance::info()))
675         return throwVMTypeError(exec);
676
677     DateInstance* thisDateObj = asDateInstance(thisValue); 
678
679     const GregorianDateTime* gregorianDateTime = thisDateObj->gregorianDateTime(exec);
680     if (!gregorianDateTime)
681         return JSValue::encode(jsNaN());
682     return JSValue::encode(jsNumber(gregorianDateTime->monthDay()));
683 }
684
685 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCDate(ExecState* exec)
686 {
687     JSValue thisValue = exec->thisValue();
688     if (!thisValue.inherits(DateInstance::info()))
689         return throwVMTypeError(exec);
690
691     DateInstance* thisDateObj = asDateInstance(thisValue); 
692
693     const GregorianDateTime* gregorianDateTime = thisDateObj->gregorianDateTimeUTC(exec);
694     if (!gregorianDateTime)
695         return JSValue::encode(jsNaN());
696     return JSValue::encode(jsNumber(gregorianDateTime->monthDay()));
697 }
698
699 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetDay(ExecState* exec)
700 {
701     JSValue thisValue = exec->thisValue();
702     if (!thisValue.inherits(DateInstance::info()))
703         return throwVMTypeError(exec);
704
705     DateInstance* thisDateObj = asDateInstance(thisValue); 
706
707     const GregorianDateTime* gregorianDateTime = thisDateObj->gregorianDateTime(exec);
708     if (!gregorianDateTime)
709         return JSValue::encode(jsNaN());
710     return JSValue::encode(jsNumber(gregorianDateTime->weekDay()));
711 }
712
713 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCDay(ExecState* exec)
714 {
715     JSValue thisValue = exec->thisValue();
716     if (!thisValue.inherits(DateInstance::info()))
717         return throwVMTypeError(exec);
718
719     DateInstance* thisDateObj = asDateInstance(thisValue); 
720
721     const GregorianDateTime* gregorianDateTime = thisDateObj->gregorianDateTimeUTC(exec);
722     if (!gregorianDateTime)
723         return JSValue::encode(jsNaN());
724     return JSValue::encode(jsNumber(gregorianDateTime->weekDay()));
725 }
726
727 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetHours(ExecState* exec)
728 {
729     JSValue thisValue = exec->thisValue();
730     if (!thisValue.inherits(DateInstance::info()))
731         return throwVMTypeError(exec);
732
733     DateInstance* thisDateObj = asDateInstance(thisValue); 
734
735     const GregorianDateTime* gregorianDateTime = thisDateObj->gregorianDateTime(exec);
736     if (!gregorianDateTime)
737         return JSValue::encode(jsNaN());
738     return JSValue::encode(jsNumber(gregorianDateTime->hour()));
739 }
740
741 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCHours(ExecState* exec)
742 {
743     JSValue thisValue = exec->thisValue();
744     if (!thisValue.inherits(DateInstance::info()))
745         return throwVMTypeError(exec);
746
747     DateInstance* thisDateObj = asDateInstance(thisValue); 
748
749     const GregorianDateTime* gregorianDateTime = thisDateObj->gregorianDateTimeUTC(exec);
750     if (!gregorianDateTime)
751         return JSValue::encode(jsNaN());
752     return JSValue::encode(jsNumber(gregorianDateTime->hour()));
753 }
754
755 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetMinutes(ExecState* exec)
756 {
757     JSValue thisValue = exec->thisValue();
758     if (!thisValue.inherits(DateInstance::info()))
759         return throwVMTypeError(exec);
760
761     DateInstance* thisDateObj = asDateInstance(thisValue); 
762
763     const GregorianDateTime* gregorianDateTime = thisDateObj->gregorianDateTime(exec);
764     if (!gregorianDateTime)
765         return JSValue::encode(jsNaN());
766     return JSValue::encode(jsNumber(gregorianDateTime->minute()));
767 }
768
769 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCMinutes(ExecState* exec)
770 {
771     JSValue thisValue = exec->thisValue();
772     if (!thisValue.inherits(DateInstance::info()))
773         return throwVMTypeError(exec);
774
775     DateInstance* thisDateObj = asDateInstance(thisValue); 
776
777     const GregorianDateTime* gregorianDateTime = thisDateObj->gregorianDateTimeUTC(exec);
778     if (!gregorianDateTime)
779         return JSValue::encode(jsNaN());
780     return JSValue::encode(jsNumber(gregorianDateTime->minute()));
781 }
782
783 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetSeconds(ExecState* exec)
784 {
785     JSValue thisValue = exec->thisValue();
786     if (!thisValue.inherits(DateInstance::info()))
787         return throwVMTypeError(exec);
788
789     DateInstance* thisDateObj = asDateInstance(thisValue); 
790
791     const GregorianDateTime* gregorianDateTime = thisDateObj->gregorianDateTime(exec);
792     if (!gregorianDateTime)
793         return JSValue::encode(jsNaN());
794     return JSValue::encode(jsNumber(gregorianDateTime->second()));
795 }
796
797 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCSeconds(ExecState* exec)
798 {
799     JSValue thisValue = exec->thisValue();
800     if (!thisValue.inherits(DateInstance::info()))
801         return throwVMTypeError(exec);
802
803     DateInstance* thisDateObj = asDateInstance(thisValue); 
804
805     const GregorianDateTime* gregorianDateTime = thisDateObj->gregorianDateTimeUTC(exec);
806     if (!gregorianDateTime)
807         return JSValue::encode(jsNaN());
808     return JSValue::encode(jsNumber(gregorianDateTime->second()));
809 }
810
811 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetMilliSeconds(ExecState* exec)
812 {
813     JSValue thisValue = exec->thisValue();
814     if (!thisValue.inherits(DateInstance::info()))
815         return throwVMTypeError(exec);
816
817     DateInstance* thisDateObj = asDateInstance(thisValue); 
818     double milli = thisDateObj->internalNumber();
819     if (std::isnan(milli))
820         return JSValue::encode(jsNaN());
821
822     double secs = floor(milli / msPerSecond);
823     double ms = milli - secs * msPerSecond;
824     return JSValue::encode(jsNumber(ms));
825 }
826
827 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCMilliseconds(ExecState* exec)
828 {
829     JSValue thisValue = exec->thisValue();
830     if (!thisValue.inherits(DateInstance::info()))
831         return throwVMTypeError(exec);
832
833     DateInstance* thisDateObj = asDateInstance(thisValue); 
834     double milli = thisDateObj->internalNumber();
835     if (std::isnan(milli))
836         return JSValue::encode(jsNaN());
837
838     double secs = floor(milli / msPerSecond);
839     double ms = milli - secs * msPerSecond;
840     return JSValue::encode(jsNumber(ms));
841 }
842
843 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetTimezoneOffset(ExecState* exec)
844 {
845     JSValue thisValue = exec->thisValue();
846     if (!thisValue.inherits(DateInstance::info()))
847         return throwVMTypeError(exec);
848
849     DateInstance* thisDateObj = asDateInstance(thisValue); 
850
851     const GregorianDateTime* gregorianDateTime = thisDateObj->gregorianDateTime(exec);
852     if (!gregorianDateTime)
853         return JSValue::encode(jsNaN());
854     return JSValue::encode(jsNumber(-gregorianDateTime->utcOffset() / minutesPerHour));
855 }
856
857 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetTime(ExecState* exec)
858 {
859     JSValue thisValue = exec->thisValue();
860     if (!thisValue.inherits(DateInstance::info()))
861         return throwVMTypeError(exec);
862
863     DateInstance* thisDateObj = asDateInstance(thisValue); 
864
865     double milli = timeClip(exec->argument(0).toNumber(exec));
866     JSValue result = jsNumber(milli);
867     thisDateObj->setInternalValue(exec->vm(), result);
868     return JSValue::encode(result);
869 }
870
871 static EncodedJSValue setNewValueFromTimeArgs(ExecState* exec, int numArgsToUse, WTF::TimeType inputTimeType)
872 {
873     JSValue thisValue = exec->thisValue();
874     if (!thisValue.inherits(DateInstance::info()))
875         return throwVMTypeError(exec);
876
877     DateInstance* thisDateObj = asDateInstance(thisValue);
878     double milli = thisDateObj->internalNumber();
879     VM& vm = exec->vm();
880     
881     if (!exec->argumentCount() || std::isnan(milli)) {
882         JSValue result = jsNaN();
883         thisDateObj->setInternalValue(vm, result);
884         return JSValue::encode(result);
885     }
886      
887     double secs = floor(milli / msPerSecond);
888     double ms = milli - secs * msPerSecond;
889
890     const GregorianDateTime* other = inputTimeType == WTF::UTCTime
891         ? thisDateObj->gregorianDateTimeUTC(exec)
892         : thisDateObj->gregorianDateTime(exec);
893     if (!other)
894         return JSValue::encode(jsNaN());
895
896     GregorianDateTime gregorianDateTime;
897     gregorianDateTime.copyFrom(*other);
898     if (!fillStructuresUsingTimeArgs(exec, numArgsToUse, &ms, &gregorianDateTime)) {
899         JSValue result = jsNaN();
900         thisDateObj->setInternalValue(vm, result);
901         return JSValue::encode(result);
902     } 
903     
904     JSValue result = jsNumber(gregorianDateTimeToMS(vm, gregorianDateTime, ms, inputTimeType));
905     thisDateObj->setInternalValue(vm, result);
906     return JSValue::encode(result);
907 }
908
909 static EncodedJSValue setNewValueFromDateArgs(ExecState* exec, int numArgsToUse, WTF::TimeType inputTimeType)
910 {
911     JSValue thisValue = exec->thisValue();
912     if (!thisValue.inherits(DateInstance::info()))
913         return throwVMTypeError(exec);
914
915     DateInstance* thisDateObj = asDateInstance(thisValue);
916     if (!exec->argumentCount()) {
917         JSValue result = jsNaN();
918         thisDateObj->setInternalValue(exec->vm(), result);
919         return JSValue::encode(result);
920     }
921
922     VM& vm = exec->vm();
923     double milli = thisDateObj->internalNumber();
924     double ms = 0; 
925
926     GregorianDateTime gregorianDateTime; 
927     if (numArgsToUse == 3 && std::isnan(milli)) 
928         msToGregorianDateTime(vm, 0, WTF::UTCTime, gregorianDateTime);
929     else { 
930         ms = milli - floor(milli / msPerSecond) * msPerSecond; 
931         const GregorianDateTime* other = inputTimeType == WTF::UTCTime
932             ? thisDateObj->gregorianDateTimeUTC(exec)
933             : thisDateObj->gregorianDateTime(exec);
934         if (!other)
935             return JSValue::encode(jsNaN());
936         gregorianDateTime.copyFrom(*other);
937     }
938     
939     if (!fillStructuresUsingDateArgs(exec, numArgsToUse, &ms, &gregorianDateTime)) {
940         JSValue result = jsNaN();
941         thisDateObj->setInternalValue(vm, result);
942         return JSValue::encode(result);
943     } 
944            
945     JSValue result = jsNumber(gregorianDateTimeToMS(vm, gregorianDateTime, ms, inputTimeType));
946     thisDateObj->setInternalValue(vm, result);
947     return JSValue::encode(result);
948 }
949
950 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetMilliSeconds(ExecState* exec)
951 {
952     return setNewValueFromTimeArgs(exec, 1, WTF::LocalTime);
953 }
954
955 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetUTCMilliseconds(ExecState* exec)
956 {
957     return setNewValueFromTimeArgs(exec, 1, WTF::UTCTime);
958 }
959
960 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetSeconds(ExecState* exec)
961 {
962     return setNewValueFromTimeArgs(exec, 2, WTF::LocalTime);
963 }
964
965 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetUTCSeconds(ExecState* exec)
966 {
967     return setNewValueFromTimeArgs(exec, 2, WTF::UTCTime);
968 }
969
970 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetMinutes(ExecState* exec)
971 {
972     return setNewValueFromTimeArgs(exec, 3, WTF::LocalTime);
973 }
974
975 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetUTCMinutes(ExecState* exec)
976 {
977     return setNewValueFromTimeArgs(exec, 3, WTF::UTCTime);
978 }
979
980 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetHours(ExecState* exec)
981 {
982     return setNewValueFromTimeArgs(exec, 4, WTF::LocalTime);
983 }
984
985 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetUTCHours(ExecState* exec)
986 {
987     return setNewValueFromTimeArgs(exec, 4, WTF::UTCTime);
988 }
989
990 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetDate(ExecState* exec)
991 {
992     return setNewValueFromDateArgs(exec, 1, WTF::LocalTime);
993 }
994
995 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetUTCDate(ExecState* exec)
996 {
997     return setNewValueFromDateArgs(exec, 1, WTF::UTCTime);
998 }
999
1000 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetMonth(ExecState* exec)
1001 {
1002     return setNewValueFromDateArgs(exec, 2, WTF::LocalTime);
1003 }
1004
1005 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetUTCMonth(ExecState* exec)
1006 {
1007     return setNewValueFromDateArgs(exec, 2, WTF::UTCTime);
1008 }
1009
1010 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetFullYear(ExecState* exec)
1011 {
1012     return setNewValueFromDateArgs(exec, 3, WTF::LocalTime);
1013 }
1014
1015 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetUTCFullYear(ExecState* exec)
1016 {
1017     return setNewValueFromDateArgs(exec, 3, WTF::UTCTime);
1018 }
1019
1020 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetYear(ExecState* exec)
1021 {
1022     JSValue thisValue = exec->thisValue();
1023     if (!thisValue.inherits(DateInstance::info()))
1024         return throwVMTypeError(exec);
1025
1026     VM& vm = exec->vm();
1027     DateInstance* thisDateObj = asDateInstance(thisValue);
1028     if (!exec->argumentCount()) { 
1029         JSValue result = jsNaN();
1030         thisDateObj->setInternalValue(vm, result);
1031         return JSValue::encode(result);
1032     }
1033
1034     double milli = thisDateObj->internalNumber();
1035     double ms = 0;
1036
1037     GregorianDateTime gregorianDateTime;
1038     if (std::isnan(milli))
1039         // Based on ECMA 262 B.2.5 (setYear)
1040         // the time must be reset to +0 if it is NaN.
1041         msToGregorianDateTime(vm, 0, WTF::UTCTime, gregorianDateTime);
1042     else {
1043         double secs = floor(milli / msPerSecond);
1044         ms = milli - secs * msPerSecond;
1045         if (const GregorianDateTime* other = thisDateObj->gregorianDateTime(exec))
1046             gregorianDateTime.copyFrom(*other);
1047     }
1048
1049     double year = exec->argument(0).toIntegerPreserveNaN(exec);
1050     if (!std::isfinite(year)) {
1051         JSValue result = jsNaN();
1052         thisDateObj->setInternalValue(vm, result);
1053         return JSValue::encode(result);
1054     }
1055
1056     gregorianDateTime.setYear(toInt32((year >= 0 && year <= 99) ? (year + 1900) : year));
1057     JSValue result = jsNumber(gregorianDateTimeToMS(vm, gregorianDateTime, ms, WTF::LocalTime));
1058     thisDateObj->setInternalValue(vm, result);
1059     return JSValue::encode(result);
1060 }
1061
1062 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetYear(ExecState* exec)
1063 {
1064     JSValue thisValue = exec->thisValue();
1065     if (!thisValue.inherits(DateInstance::info()))
1066         return throwVMTypeError(exec);
1067
1068     DateInstance* thisDateObj = asDateInstance(thisValue); 
1069
1070     const GregorianDateTime* gregorianDateTime = thisDateObj->gregorianDateTime(exec);
1071     if (!gregorianDateTime)
1072         return JSValue::encode(jsNaN());
1073
1074     // NOTE: IE returns the full year even in getYear.
1075     return JSValue::encode(jsNumber(gregorianDateTime->year() - 1900));
1076 }
1077
1078 EncodedJSValue JSC_HOST_CALL dateProtoFuncToJSON(ExecState* exec)
1079 {
1080     JSValue thisValue = exec->thisValue();
1081     JSObject* object = jsCast<JSObject*>(thisValue.toThis(exec, NotStrictMode));
1082     if (exec->hadException())
1083         return JSValue::encode(jsNull());
1084
1085     JSValue timeValue = object->toPrimitive(exec, PreferNumber);
1086     if (exec->hadException())
1087         return JSValue::encode(jsNull());
1088     if (timeValue.isNumber() && !(timeValue.isInt32() || std::isfinite(timeValue.asDouble())))
1089         return JSValue::encode(jsNull());
1090
1091     JSValue toISOValue = object->get(exec, exec->vm().propertyNames->toISOString);
1092     if (exec->hadException())
1093         return JSValue::encode(jsNull());
1094
1095     CallData callData;
1096     CallType callType = getCallData(toISOValue, callData);
1097     if (callType == CallTypeNone)
1098         return throwVMError(exec, createTypeError(exec, ASCIILiteral("toISOString is not a function")));
1099
1100     JSValue result = call(exec, asObject(toISOValue), callType, callData, object, exec->emptyList());
1101     if (exec->hadException())
1102         return JSValue::encode(jsNull());
1103     if (result.isObject())
1104         return throwVMError(exec, createTypeError(exec, ASCIILiteral("toISOString did not return a primitive value")));
1105     return JSValue::encode(result);
1106 }
1107
1108 } // namespace JSC