We should support CreateThis in the FTL
[WebKit-https.git] / Source / JavaScriptCore / runtime / DateConstructor.cpp
1 /*
2  *  Copyright (C) 1999-2000 Harri Porten (porten@kde.org)
3  *  Copyright (C) 2004-2018 Apple Inc. All rights reserved.
4  *
5  *  This library is free software; you can redistribute it and/or
6  *  modify it under the terms of the GNU Lesser General Public
7  *  License as published by the Free Software Foundation; either
8  *  version 2 of the License, or (at your option) any later version.
9  *
10  *  This library is distributed in the hope that it will be useful,
11  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
12  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  *  Lesser General Public License for more details.
14  *
15  *  You should have received a copy of the GNU Lesser General Public
16  *  License along with this library; if not, write to the Free Software
17  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301
18  *  USA
19  *
20  */
21
22 #include "config.h"
23 #include "DateConstructor.h"
24
25 #include "DateConversion.h"
26 #include "DateInstance.h"
27 #include "DatePrototype.h"
28 #include "JSDateMath.h"
29 #include "JSFunction.h"
30 #include "JSGlobalObject.h"
31 #include "JSString.h"
32 #include "ObjectPrototype.h"
33 #include "JSCInlines.h"
34 #include <math.h>
35 #include <time.h>
36 #include <wtf/MathExtras.h>
37
38 #if HAVE(SYS_TIME_H)
39 #include <sys/time.h>
40 #endif
41
42 #if HAVE(SYS_TIMEB_H)
43 #include <sys/timeb.h>
44 #endif
45
46 using namespace WTF;
47
48 namespace JSC {
49
50 EncodedJSValue JSC_HOST_CALL dateParse(ExecState*);
51 EncodedJSValue JSC_HOST_CALL dateUTC(ExecState*);
52
53 }
54
55 #include "DateConstructor.lut.h"
56
57 namespace JSC {
58
59 const ClassInfo DateConstructor::s_info = { "Function", &InternalFunction::s_info, &dateConstructorTable, nullptr, CREATE_METHOD_TABLE(DateConstructor) };
60
61 /* Source for DateConstructor.lut.h
62 @begin dateConstructorTable
63   parse     dateParse   DontEnum|Function 1
64   UTC       dateUTC     DontEnum|Function 7
65   now       dateNow     DontEnum|Function 0
66 @end
67 */
68
69 STATIC_ASSERT_IS_TRIVIALLY_DESTRUCTIBLE(DateConstructor);
70
71 static EncodedJSValue JSC_HOST_CALL callDate(ExecState*);
72 static EncodedJSValue JSC_HOST_CALL constructWithDateConstructor(ExecState*);
73
74 DateConstructor::DateConstructor(VM& vm, Structure* structure)
75     : InternalFunction(vm, structure, callDate, constructWithDateConstructor)
76 {
77 }
78
79 void DateConstructor::finishCreation(VM& vm, DatePrototype* datePrototype)
80 {
81     Base::finishCreation(vm, "Date");
82     putDirectWithoutTransition(vm, vm.propertyNames->prototype, datePrototype, PropertyAttribute::DontEnum | PropertyAttribute::DontDelete | PropertyAttribute::ReadOnly);
83     putDirectWithoutTransition(vm, vm.propertyNames->length, jsNumber(7), PropertyAttribute::ReadOnly | PropertyAttribute::DontEnum);
84 }
85
86 static double millisecondsFromComponents(ExecState* exec, const ArgList& args, WTF::TimeType timeType)
87 {
88     VM& vm = exec->vm();
89     auto scope = DECLARE_THROW_SCOPE(vm);
90
91     double doubleArguments[7];
92     for (int i = 0; i < 7; i++) {
93         doubleArguments[i] = args.at(i).toNumber(exec);
94         RETURN_IF_EXCEPTION(scope, 0);
95     }
96
97     int numArgs = args.size();
98
99     if ((!std::isfinite(doubleArguments[0]) || (doubleArguments[0] > INT_MAX) || (doubleArguments[0] < INT_MIN))
100         || (!std::isfinite(doubleArguments[1]) || (doubleArguments[1] > INT_MAX) || (doubleArguments[1] < INT_MIN))
101         || (numArgs >= 3 && (!std::isfinite(doubleArguments[2]) || (doubleArguments[2] > INT_MAX) || (doubleArguments[2] < INT_MIN)))
102         || (numArgs >= 4 && (!std::isfinite(doubleArguments[3]) || (doubleArguments[3] > INT_MAX) || (doubleArguments[3] < INT_MIN)))
103         || (numArgs >= 5 && (!std::isfinite(doubleArguments[4]) || (doubleArguments[4] > INT_MAX) || (doubleArguments[4] < INT_MIN)))
104         || (numArgs >= 6 && (!std::isfinite(doubleArguments[5]) || (doubleArguments[5] > INT_MAX) || (doubleArguments[5] < INT_MIN)))
105         || (numArgs >= 7 && (!std::isfinite(doubleArguments[6]) || (doubleArguments[6] > INT_MAX) || (doubleArguments[6] < INT_MIN))))
106         return PNaN;
107
108     GregorianDateTime t;
109     int year = JSC::toInt32(doubleArguments[0]);
110     t.setYear((year >= 0 && year <= 99) ? (year + 1900) : year);
111     t.setMonth(JSC::toInt32(doubleArguments[1]));
112     t.setMonthDay((numArgs >= 3) ? JSC::toInt32(doubleArguments[2]) : 1);
113     t.setHour(JSC::toInt32(doubleArguments[3]));
114     t.setMinute(JSC::toInt32(doubleArguments[4]));
115     t.setSecond(JSC::toInt32(doubleArguments[5]));
116     t.setIsDST(-1);
117     double ms = (numArgs >= 7) ? doubleArguments[6] : 0;
118     return gregorianDateTimeToMS(vm, t, ms, timeType);
119 }
120
121 // ECMA 15.9.3
122 JSObject* constructDate(ExecState* exec, JSGlobalObject* globalObject, JSValue newTarget, const ArgList& args)
123 {
124     VM& vm = exec->vm();
125     auto scope = DECLARE_THROW_SCOPE(vm);
126     int numArgs = args.size();
127
128     double value;
129
130     if (numArgs == 0) // new Date() ECMA 15.9.3.3
131         value = jsCurrentTime();
132     else if (numArgs == 1) {
133         JSValue arg0 = args.at(0);
134         if (auto* dateInstance = jsDynamicCast<DateInstance*>(vm, arg0))
135             value = dateInstance->internalNumber();
136         else {
137             JSValue primitive = arg0.toPrimitive(exec);
138             RETURN_IF_EXCEPTION(scope, nullptr);
139             if (primitive.isString()) {
140                 value = parseDate(exec, vm, asString(primitive)->value(exec));
141                 RETURN_IF_EXCEPTION(scope, nullptr);
142             } else
143                 value = primitive.toNumber(exec);
144         }
145     } else
146         value = millisecondsFromComponents(exec, args, WTF::LocalTime);
147     RETURN_IF_EXCEPTION(scope, nullptr);
148
149     Structure* dateStructure = InternalFunction::createSubclassStructure(exec, newTarget, globalObject->dateStructure());
150     RETURN_IF_EXCEPTION(scope, nullptr);
151
152     return DateInstance::create(vm, dateStructure, value);
153 }
154     
155 static EncodedJSValue JSC_HOST_CALL constructWithDateConstructor(ExecState* exec)
156 {
157     ArgList args(exec);
158     return JSValue::encode(constructDate(exec, jsCast<InternalFunction*>(exec->jsCallee())->globalObject(exec->vm()), exec->newTarget(), args));
159 }
160
161 // ECMA 15.9.2
162 static EncodedJSValue JSC_HOST_CALL callDate(ExecState* exec)
163 {
164     VM& vm = exec->vm();
165     GregorianDateTime ts;
166     msToGregorianDateTime(vm, WallTime::now().secondsSinceEpoch().milliseconds(), WTF::LocalTime, ts);
167     return JSValue::encode(jsNontrivialString(&vm, formatDateTime(ts, DateTimeFormatDateAndTime, false)));
168 }
169
170 EncodedJSValue JSC_HOST_CALL dateParse(ExecState* exec)
171 {
172     VM& vm = exec->vm();
173     auto scope = DECLARE_THROW_SCOPE(vm);
174     String dateStr = exec->argument(0).toWTFString(exec);
175     RETURN_IF_EXCEPTION(scope, encodedJSValue());
176     scope.release();
177     return JSValue::encode(jsNumber(parseDate(exec, vm, dateStr)));
178 }
179
180 EncodedJSValue JSC_HOST_CALL dateNow(ExecState*)
181 {
182     return JSValue::encode(jsNumber(jsCurrentTime()));
183 }
184
185 EncodedJSValue JSC_HOST_CALL dateUTC(ExecState* exec) 
186 {
187     double ms = millisecondsFromComponents(exec, ArgList(exec), WTF::UTCTime);
188     return JSValue::encode(jsNumber(timeClip(ms)));
189 }
190
191 } // namespace JSC