[JSC] Unify how we throw TypeError from C++
[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 dateProtoFuncToLocaleDateString(ExecState*);
111 EncodedJSValue JSC_HOST_CALL dateProtoFuncToLocaleString(ExecState*);
112 EncodedJSValue JSC_HOST_CALL dateProtoFuncToLocaleTimeString(ExecState*);
113 EncodedJSValue JSC_HOST_CALL dateProtoFuncToPrimitiveSymbol(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   toDateString          dateProtoFuncToDateString            DontEnum|Function       0
436   toTimeString          dateProtoFuncToTimeString            DontEnum|Function       0
437   toLocaleString        dateProtoFuncToLocaleString          DontEnum|Function       0
438   toLocaleDateString    dateProtoFuncToLocaleDateString      DontEnum|Function       0
439   toLocaleTimeString    dateProtoFuncToLocaleTimeString      DontEnum|Function       0
440   valueOf               dateProtoFuncGetTime                 DontEnum|Function       0
441   getTime               dateProtoFuncGetTime                 DontEnum|Function       0
442   getFullYear           dateProtoFuncGetFullYear             DontEnum|Function       0
443   getUTCFullYear        dateProtoFuncGetUTCFullYear          DontEnum|Function       0
444   getMonth              dateProtoFuncGetMonth                DontEnum|Function       0
445   getUTCMonth           dateProtoFuncGetUTCMonth             DontEnum|Function       0
446   getDate               dateProtoFuncGetDate                 DontEnum|Function       0
447   getUTCDate            dateProtoFuncGetUTCDate              DontEnum|Function       0
448   getDay                dateProtoFuncGetDay                  DontEnum|Function       0
449   getUTCDay             dateProtoFuncGetUTCDay               DontEnum|Function       0
450   getHours              dateProtoFuncGetHours                DontEnum|Function       0
451   getUTCHours           dateProtoFuncGetUTCHours             DontEnum|Function       0
452   getMinutes            dateProtoFuncGetMinutes              DontEnum|Function       0
453   getUTCMinutes         dateProtoFuncGetUTCMinutes           DontEnum|Function       0
454   getSeconds            dateProtoFuncGetSeconds              DontEnum|Function       0
455   getUTCSeconds         dateProtoFuncGetUTCSeconds           DontEnum|Function       0
456   getMilliseconds       dateProtoFuncGetMilliSeconds         DontEnum|Function       0
457   getUTCMilliseconds    dateProtoFuncGetUTCMilliseconds      DontEnum|Function       0
458   getTimezoneOffset     dateProtoFuncGetTimezoneOffset       DontEnum|Function       0
459   setTime               dateProtoFuncSetTime                 DontEnum|Function       1
460   setMilliseconds       dateProtoFuncSetMilliSeconds         DontEnum|Function       1
461   setUTCMilliseconds    dateProtoFuncSetUTCMilliseconds      DontEnum|Function       1
462   setSeconds            dateProtoFuncSetSeconds              DontEnum|Function       2
463   setUTCSeconds         dateProtoFuncSetUTCSeconds           DontEnum|Function       2
464   setMinutes            dateProtoFuncSetMinutes              DontEnum|Function       3
465   setUTCMinutes         dateProtoFuncSetUTCMinutes           DontEnum|Function       3
466   setHours              dateProtoFuncSetHours                DontEnum|Function       4
467   setUTCHours           dateProtoFuncSetUTCHours             DontEnum|Function       4
468   setDate               dateProtoFuncSetDate                 DontEnum|Function       1
469   setUTCDate            dateProtoFuncSetUTCDate              DontEnum|Function       1
470   setMonth              dateProtoFuncSetMonth                DontEnum|Function       2
471   setUTCMonth           dateProtoFuncSetUTCMonth             DontEnum|Function       2
472   setFullYear           dateProtoFuncSetFullYear             DontEnum|Function       3
473   setUTCFullYear        dateProtoFuncSetUTCFullYear          DontEnum|Function       3
474   setYear               dateProtoFuncSetYear                 DontEnum|Function       1
475   getYear               dateProtoFuncGetYear                 DontEnum|Function       0
476   toJSON                dateProtoFuncToJSON                  DontEnum|Function       1
477 @end
478 */
479
480 // ECMA 15.9.4
481
482 DatePrototype::DatePrototype(VM& vm, Structure* structure)
483     : Base(vm, structure)
484 {
485 }
486
487 void DatePrototype::finishCreation(VM& vm, JSGlobalObject* globalObject)
488 {
489     Base::finishCreation(vm);
490     ASSERT(inherits(info()));
491
492     Identifier toUTCStringName = Identifier::fromString(&vm, ASCIILiteral("toUTCString"));
493     JSFunction* toUTCStringFunction = JSFunction::create(vm, globalObject, 0, toUTCStringName.string(), dateProtoFuncToUTCString);
494     putDirectWithoutTransition(vm, toUTCStringName, toUTCStringFunction, DontEnum);
495     putDirectWithoutTransition(vm, Identifier::fromString(&vm, ASCIILiteral("toGMTString")), toUTCStringFunction, DontEnum);
496
497 #if ENABLE(INTL)
498     JSC_BUILTIN_FUNCTION_WITHOUT_TRANSITION("toLocaleString", datePrototypeToLocaleStringCodeGenerator, DontEnum);
499     JSC_BUILTIN_FUNCTION_WITHOUT_TRANSITION("toLocaleDateString", datePrototypeToLocaleDateStringCodeGenerator, DontEnum);
500     JSC_BUILTIN_FUNCTION_WITHOUT_TRANSITION("toLocaleTimeString", datePrototypeToLocaleTimeStringCodeGenerator, DontEnum);
501 #else
502     UNUSED_PARAM(globalObject);
503 #endif // ENABLE(INTL)
504
505     JSC_NATIVE_FUNCTION(vm.propertyNames->toPrimitiveSymbol, dateProtoFuncToPrimitiveSymbol, DontEnum | ReadOnly, 1);
506     // The constructor will be added later, after DateConstructor has been built.
507 }
508
509 // Functions
510
511 EncodedJSValue JSC_HOST_CALL dateProtoFuncToString(ExecState* exec)
512 {
513     const bool asUTCVariant = false;
514     return formateDateInstance(exec, DateTimeFormatDateAndTime, asUTCVariant);
515 }
516
517 EncodedJSValue JSC_HOST_CALL dateProtoFuncToUTCString(ExecState* exec)
518 {
519     const bool asUTCVariant = true;
520     return formateDateInstance(exec, DateTimeFormatDateAndTime, asUTCVariant);
521 }
522
523 EncodedJSValue JSC_HOST_CALL dateProtoFuncToISOString(ExecState* exec)
524 {
525     JSValue thisValue = exec->thisValue();
526     if (!thisValue.inherits(DateInstance::info()))
527         return throwVMTypeError(exec);
528     
529     DateInstance* thisDateObj = asDateInstance(thisValue); 
530     if (!std::isfinite(thisDateObj->internalNumber()))
531         return throwVMError(exec, createRangeError(exec, ASCIILiteral("Invalid Date")));
532
533     const GregorianDateTime* gregorianDateTime = thisDateObj->gregorianDateTimeUTC(exec);
534     if (!gregorianDateTime)
535         return JSValue::encode(jsNontrivialString(exec, String(ASCIILiteral("Invalid Date"))));
536     // 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)
537     // 6 for formatting and one for null termination = 28. We add one extra character to allow us to force null termination.
538     char buffer[28];
539     // 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).
540     int ms = static_cast<int>(fmod(thisDateObj->internalNumber(), msPerSecond));
541     if (ms < 0)
542         ms += msPerSecond;
543
544     int charactersWritten;
545     if (gregorianDateTime->year() > 9999 || gregorianDateTime->year() < 0)
546         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);
547     else
548         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);
549
550     ASSERT(charactersWritten > 0 && static_cast<unsigned>(charactersWritten) < sizeof(buffer));
551     if (static_cast<unsigned>(charactersWritten) >= sizeof(buffer))
552         return JSValue::encode(jsEmptyString(exec));
553
554     return JSValue::encode(jsNontrivialString(exec, String(buffer, charactersWritten)));
555 }
556
557 EncodedJSValue JSC_HOST_CALL dateProtoFuncToDateString(ExecState* exec)
558 {
559     const bool asUTCVariant = false;
560     return formateDateInstance(exec, DateTimeFormatDate, asUTCVariant);
561 }
562
563 EncodedJSValue JSC_HOST_CALL dateProtoFuncToTimeString(ExecState* exec)
564 {
565     const bool asUTCVariant = false;
566     return formateDateInstance(exec, DateTimeFormatTime, asUTCVariant);
567 }
568
569 EncodedJSValue JSC_HOST_CALL dateProtoFuncToLocaleString(ExecState* exec)
570 {
571     JSValue thisValue = exec->thisValue();
572     if (!thisValue.inherits(DateInstance::info()))
573         return throwVMTypeError(exec);
574
575     DateInstance* thisDateObj = asDateInstance(thisValue); 
576     return JSValue::encode(formatLocaleDate(exec, thisDateObj, thisDateObj->internalNumber(), LocaleDateAndTime));
577 }
578
579 EncodedJSValue JSC_HOST_CALL dateProtoFuncToLocaleDateString(ExecState* exec)
580 {
581     JSValue thisValue = exec->thisValue();
582     if (!thisValue.inherits(DateInstance::info()))
583         return throwVMTypeError(exec);
584
585     DateInstance* thisDateObj = asDateInstance(thisValue); 
586     return JSValue::encode(formatLocaleDate(exec, thisDateObj, thisDateObj->internalNumber(), LocaleDate));
587 }
588
589 EncodedJSValue JSC_HOST_CALL dateProtoFuncToLocaleTimeString(ExecState* exec)
590 {
591     JSValue thisValue = exec->thisValue();
592     if (!thisValue.inherits(DateInstance::info()))
593         return throwVMTypeError(exec);
594
595     DateInstance* thisDateObj = asDateInstance(thisValue); 
596     return JSValue::encode(formatLocaleDate(exec, thisDateObj, thisDateObj->internalNumber(), LocaleTime));
597 }
598
599 EncodedJSValue JSC_HOST_CALL dateProtoFuncToPrimitiveSymbol(ExecState* exec)
600 {
601     JSValue thisValue = exec->thisValue();
602     if (!thisValue.isObject())
603         return throwVMTypeError(exec, "Date.prototype[Symbol.toPrimitive] expected |this| to be an object.");
604     JSObject* thisObject = jsCast<JSObject*>(thisValue);
605
606     if (!exec->argumentCount())
607         return throwVMTypeError(exec, "Date.prototype[Symbol.toPrimitive] expected a first argument.");
608
609     JSValue hintValue = exec->uncheckedArgument(0);
610     PreferredPrimitiveType type = toPreferredPrimitiveType(exec, hintValue);
611     if (exec->hadException())
612         return JSValue::encode(JSValue());
613
614     if (type == NoPreference)
615         type = PreferString;
616
617     return JSValue::encode(thisObject->ordinaryToPrimitive(exec, type));
618 }
619
620 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetTime(ExecState* exec)
621 {
622     JSValue thisValue = exec->thisValue();
623     if (!thisValue.inherits(DateInstance::info()))
624         return throwVMTypeError(exec);
625
626     return JSValue::encode(asDateInstance(thisValue)->internalValue());
627 }
628
629 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetFullYear(ExecState* exec)
630 {
631     JSValue thisValue = exec->thisValue();
632     if (!thisValue.inherits(DateInstance::info()))
633         return throwVMTypeError(exec);
634
635     DateInstance* thisDateObj = asDateInstance(thisValue); 
636
637     const GregorianDateTime* gregorianDateTime = thisDateObj->gregorianDateTime(exec);
638     if (!gregorianDateTime)
639         return JSValue::encode(jsNaN());
640     return JSValue::encode(jsNumber(gregorianDateTime->year()));
641 }
642
643 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCFullYear(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->gregorianDateTimeUTC(exec);
652     if (!gregorianDateTime)
653         return JSValue::encode(jsNaN());
654     return JSValue::encode(jsNumber(gregorianDateTime->year()));
655 }
656
657 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetMonth(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->gregorianDateTime(exec);
666     if (!gregorianDateTime)
667         return JSValue::encode(jsNaN());
668     return JSValue::encode(jsNumber(gregorianDateTime->month()));
669 }
670
671 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCMonth(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->gregorianDateTimeUTC(exec);
680     if (!gregorianDateTime)
681         return JSValue::encode(jsNaN());
682     return JSValue::encode(jsNumber(gregorianDateTime->month()));
683 }
684
685 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetDate(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->gregorianDateTime(exec);
694     if (!gregorianDateTime)
695         return JSValue::encode(jsNaN());
696     return JSValue::encode(jsNumber(gregorianDateTime->monthDay()));
697 }
698
699 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCDate(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->gregorianDateTimeUTC(exec);
708     if (!gregorianDateTime)
709         return JSValue::encode(jsNaN());
710     return JSValue::encode(jsNumber(gregorianDateTime->monthDay()));
711 }
712
713 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetDay(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->gregorianDateTime(exec);
722     if (!gregorianDateTime)
723         return JSValue::encode(jsNaN());
724     return JSValue::encode(jsNumber(gregorianDateTime->weekDay()));
725 }
726
727 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCDay(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->gregorianDateTimeUTC(exec);
736     if (!gregorianDateTime)
737         return JSValue::encode(jsNaN());
738     return JSValue::encode(jsNumber(gregorianDateTime->weekDay()));
739 }
740
741 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetHours(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->gregorianDateTime(exec);
750     if (!gregorianDateTime)
751         return JSValue::encode(jsNaN());
752     return JSValue::encode(jsNumber(gregorianDateTime->hour()));
753 }
754
755 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCHours(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->gregorianDateTimeUTC(exec);
764     if (!gregorianDateTime)
765         return JSValue::encode(jsNaN());
766     return JSValue::encode(jsNumber(gregorianDateTime->hour()));
767 }
768
769 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetMinutes(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->gregorianDateTime(exec);
778     if (!gregorianDateTime)
779         return JSValue::encode(jsNaN());
780     return JSValue::encode(jsNumber(gregorianDateTime->minute()));
781 }
782
783 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCMinutes(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->gregorianDateTimeUTC(exec);
792     if (!gregorianDateTime)
793         return JSValue::encode(jsNaN());
794     return JSValue::encode(jsNumber(gregorianDateTime->minute()));
795 }
796
797 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetSeconds(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->gregorianDateTime(exec);
806     if (!gregorianDateTime)
807         return JSValue::encode(jsNaN());
808     return JSValue::encode(jsNumber(gregorianDateTime->second()));
809 }
810
811 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCSeconds(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
819     const GregorianDateTime* gregorianDateTime = thisDateObj->gregorianDateTimeUTC(exec);
820     if (!gregorianDateTime)
821         return JSValue::encode(jsNaN());
822     return JSValue::encode(jsNumber(gregorianDateTime->second()));
823 }
824
825 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetMilliSeconds(ExecState* exec)
826 {
827     JSValue thisValue = exec->thisValue();
828     if (!thisValue.inherits(DateInstance::info()))
829         return throwVMTypeError(exec);
830
831     DateInstance* thisDateObj = asDateInstance(thisValue); 
832     double milli = thisDateObj->internalNumber();
833     if (std::isnan(milli))
834         return JSValue::encode(jsNaN());
835
836     double secs = floor(milli / msPerSecond);
837     double ms = milli - secs * msPerSecond;
838     return JSValue::encode(jsNumber(ms));
839 }
840
841 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetUTCMilliseconds(ExecState* exec)
842 {
843     JSValue thisValue = exec->thisValue();
844     if (!thisValue.inherits(DateInstance::info()))
845         return throwVMTypeError(exec);
846
847     DateInstance* thisDateObj = asDateInstance(thisValue); 
848     double milli = thisDateObj->internalNumber();
849     if (std::isnan(milli))
850         return JSValue::encode(jsNaN());
851
852     double secs = floor(milli / msPerSecond);
853     double ms = milli - secs * msPerSecond;
854     return JSValue::encode(jsNumber(ms));
855 }
856
857 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetTimezoneOffset(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     const GregorianDateTime* gregorianDateTime = thisDateObj->gregorianDateTime(exec);
866     if (!gregorianDateTime)
867         return JSValue::encode(jsNaN());
868     return JSValue::encode(jsNumber(-gregorianDateTime->utcOffset() / minutesPerHour));
869 }
870
871 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetTime(ExecState* exec)
872 {
873     JSValue thisValue = exec->thisValue();
874     if (!thisValue.inherits(DateInstance::info()))
875         return throwVMTypeError(exec);
876
877     DateInstance* thisDateObj = asDateInstance(thisValue); 
878
879     double milli = timeClip(exec->argument(0).toNumber(exec));
880     JSValue result = jsNumber(milli);
881     thisDateObj->setInternalValue(exec->vm(), result);
882     return JSValue::encode(result);
883 }
884
885 static EncodedJSValue setNewValueFromTimeArgs(ExecState* exec, int numArgsToUse, WTF::TimeType inputTimeType)
886 {
887     JSValue thisValue = exec->thisValue();
888     if (!thisValue.inherits(DateInstance::info()))
889         return throwVMTypeError(exec);
890
891     DateInstance* thisDateObj = asDateInstance(thisValue);
892     double milli = thisDateObj->internalNumber();
893     VM& vm = exec->vm();
894     
895     if (!exec->argumentCount() || std::isnan(milli)) {
896         JSValue result = jsNaN();
897         thisDateObj->setInternalValue(vm, result);
898         return JSValue::encode(result);
899     }
900      
901     double secs = floor(milli / msPerSecond);
902     double ms = milli - secs * msPerSecond;
903
904     const GregorianDateTime* other = inputTimeType == WTF::UTCTime
905         ? thisDateObj->gregorianDateTimeUTC(exec)
906         : thisDateObj->gregorianDateTime(exec);
907     if (!other)
908         return JSValue::encode(jsNaN());
909
910     GregorianDateTime gregorianDateTime;
911     gregorianDateTime.copyFrom(*other);
912     if (!fillStructuresUsingTimeArgs(exec, numArgsToUse, &ms, &gregorianDateTime)) {
913         JSValue result = jsNaN();
914         thisDateObj->setInternalValue(vm, result);
915         return JSValue::encode(result);
916     } 
917
918     double newUTCDate = gregorianDateTimeToMS(vm, gregorianDateTime, ms, inputTimeType);
919     JSValue result = jsNumber(timeClip(newUTCDate));
920     thisDateObj->setInternalValue(vm, result);
921     return JSValue::encode(result);
922 }
923
924 static EncodedJSValue setNewValueFromDateArgs(ExecState* exec, int numArgsToUse, WTF::TimeType inputTimeType)
925 {
926     JSValue thisValue = exec->thisValue();
927     if (!thisValue.inherits(DateInstance::info()))
928         return throwVMTypeError(exec);
929
930     DateInstance* thisDateObj = asDateInstance(thisValue);
931     if (!exec->argumentCount()) {
932         JSValue result = jsNaN();
933         thisDateObj->setInternalValue(exec->vm(), result);
934         return JSValue::encode(result);
935     }
936
937     VM& vm = exec->vm();
938     double milli = thisDateObj->internalNumber();
939     double ms = 0; 
940
941     GregorianDateTime gregorianDateTime; 
942     if (numArgsToUse == 3 && std::isnan(milli)) 
943         msToGregorianDateTime(vm, 0, WTF::UTCTime, gregorianDateTime);
944     else { 
945         ms = milli - floor(milli / msPerSecond) * msPerSecond; 
946         const GregorianDateTime* other = inputTimeType == WTF::UTCTime
947             ? thisDateObj->gregorianDateTimeUTC(exec)
948             : thisDateObj->gregorianDateTime(exec);
949         if (!other)
950             return JSValue::encode(jsNaN());
951         gregorianDateTime.copyFrom(*other);
952     }
953     
954     if (!fillStructuresUsingDateArgs(exec, numArgsToUse, &ms, &gregorianDateTime)) {
955         JSValue result = jsNaN();
956         thisDateObj->setInternalValue(vm, result);
957         return JSValue::encode(result);
958     } 
959
960     double newUTCDate = gregorianDateTimeToMS(vm, gregorianDateTime, ms, inputTimeType);
961     JSValue result = jsNumber(timeClip(newUTCDate));
962     thisDateObj->setInternalValue(vm, result);
963     return JSValue::encode(result);
964 }
965
966 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetMilliSeconds(ExecState* exec)
967 {
968     return setNewValueFromTimeArgs(exec, 1, WTF::LocalTime);
969 }
970
971 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetUTCMilliseconds(ExecState* exec)
972 {
973     return setNewValueFromTimeArgs(exec, 1, WTF::UTCTime);
974 }
975
976 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetSeconds(ExecState* exec)
977 {
978     return setNewValueFromTimeArgs(exec, 2, WTF::LocalTime);
979 }
980
981 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetUTCSeconds(ExecState* exec)
982 {
983     return setNewValueFromTimeArgs(exec, 2, WTF::UTCTime);
984 }
985
986 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetMinutes(ExecState* exec)
987 {
988     return setNewValueFromTimeArgs(exec, 3, WTF::LocalTime);
989 }
990
991 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetUTCMinutes(ExecState* exec)
992 {
993     return setNewValueFromTimeArgs(exec, 3, WTF::UTCTime);
994 }
995
996 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetHours(ExecState* exec)
997 {
998     return setNewValueFromTimeArgs(exec, 4, WTF::LocalTime);
999 }
1000
1001 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetUTCHours(ExecState* exec)
1002 {
1003     return setNewValueFromTimeArgs(exec, 4, WTF::UTCTime);
1004 }
1005
1006 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetDate(ExecState* exec)
1007 {
1008     return setNewValueFromDateArgs(exec, 1, WTF::LocalTime);
1009 }
1010
1011 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetUTCDate(ExecState* exec)
1012 {
1013     return setNewValueFromDateArgs(exec, 1, WTF::UTCTime);
1014 }
1015
1016 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetMonth(ExecState* exec)
1017 {
1018     return setNewValueFromDateArgs(exec, 2, WTF::LocalTime);
1019 }
1020
1021 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetUTCMonth(ExecState* exec)
1022 {
1023     return setNewValueFromDateArgs(exec, 2, WTF::UTCTime);
1024 }
1025
1026 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetFullYear(ExecState* exec)
1027 {
1028     return setNewValueFromDateArgs(exec, 3, WTF::LocalTime);
1029 }
1030
1031 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetUTCFullYear(ExecState* exec)
1032 {
1033     return setNewValueFromDateArgs(exec, 3, WTF::UTCTime);
1034 }
1035
1036 EncodedJSValue JSC_HOST_CALL dateProtoFuncSetYear(ExecState* exec)
1037 {
1038     JSValue thisValue = exec->thisValue();
1039     if (!thisValue.inherits(DateInstance::info()))
1040         return throwVMTypeError(exec);
1041
1042     VM& vm = exec->vm();
1043     DateInstance* thisDateObj = asDateInstance(thisValue);
1044     if (!exec->argumentCount()) { 
1045         JSValue result = jsNaN();
1046         thisDateObj->setInternalValue(vm, result);
1047         return JSValue::encode(result);
1048     }
1049
1050     double milli = thisDateObj->internalNumber();
1051     double ms = 0;
1052
1053     GregorianDateTime gregorianDateTime;
1054     if (std::isnan(milli))
1055         // Based on ECMA 262 B.2.5 (setYear)
1056         // the time must be reset to +0 if it is NaN.
1057         msToGregorianDateTime(vm, 0, WTF::UTCTime, gregorianDateTime);
1058     else {
1059         double secs = floor(milli / msPerSecond);
1060         ms = milli - secs * msPerSecond;
1061         if (const GregorianDateTime* other = thisDateObj->gregorianDateTime(exec))
1062             gregorianDateTime.copyFrom(*other);
1063     }
1064
1065     double year = exec->argument(0).toIntegerPreserveNaN(exec);
1066     if (!std::isfinite(year)) {
1067         JSValue result = jsNaN();
1068         thisDateObj->setInternalValue(vm, result);
1069         return JSValue::encode(result);
1070     }
1071
1072     gregorianDateTime.setYear(toInt32((year >= 0 && year <= 99) ? (year + 1900) : year));
1073     double timeInMilliseconds = gregorianDateTimeToMS(vm, gregorianDateTime, ms, WTF::LocalTime);
1074     JSValue result = jsNumber(timeClip(timeInMilliseconds));
1075     thisDateObj->setInternalValue(vm, result);
1076     return JSValue::encode(result);
1077 }
1078
1079 EncodedJSValue JSC_HOST_CALL dateProtoFuncGetYear(ExecState* exec)
1080 {
1081     JSValue thisValue = exec->thisValue();
1082     if (!thisValue.inherits(DateInstance::info()))
1083         return throwVMTypeError(exec);
1084
1085     DateInstance* thisDateObj = asDateInstance(thisValue); 
1086
1087     const GregorianDateTime* gregorianDateTime = thisDateObj->gregorianDateTime(exec);
1088     if (!gregorianDateTime)
1089         return JSValue::encode(jsNaN());
1090
1091     // NOTE: IE returns the full year even in getYear.
1092     return JSValue::encode(jsNumber(gregorianDateTime->year() - 1900));
1093 }
1094
1095 EncodedJSValue JSC_HOST_CALL dateProtoFuncToJSON(ExecState* exec)
1096 {
1097     JSValue thisValue = exec->thisValue();
1098     JSObject* object = jsCast<JSObject*>(thisValue.toThis(exec, NotStrictMode));
1099     if (exec->hadException())
1100         return JSValue::encode(jsNull());
1101
1102     JSValue timeValue = object->toPrimitive(exec, PreferNumber);
1103     if (exec->hadException())
1104         return JSValue::encode(jsNull());
1105     if (timeValue.isNumber() && !(timeValue.isInt32() || std::isfinite(timeValue.asDouble())))
1106         return JSValue::encode(jsNull());
1107
1108     JSValue toISOValue = object->get(exec, exec->vm().propertyNames->toISOString);
1109     if (exec->hadException())
1110         return JSValue::encode(jsNull());
1111
1112     CallData callData;
1113     CallType callType = getCallData(toISOValue, callData);
1114     if (callType == CallType::None)
1115         return throwVMTypeError(exec, ASCIILiteral("toISOString is not a function"));
1116
1117     JSValue result = call(exec, asObject(toISOValue), callType, callData, object, exec->emptyList());
1118     if (exec->hadException())
1119         return JSValue::encode(jsNull());
1120     if (result.isObject())
1121         return throwVMTypeError(exec, ASCIILiteral("toISOString did not return a primitive value"));
1122     return JSValue::encode(result);
1123 }
1124
1125 } // namespace JSC