JavaScriptCore:
[WebKit-https.git] / JavaScriptCore / kjs / NativeErrorConstructor.cpp
1 /*
2  *  Copyright (C) 1999-2000 Harri Porten (porten@kde.org)
3  *  Copyright (C) 2003, 2008 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  USA
18  *
19  */
20
21 #include "config.h"
22 #include "NativeErrorConstructor.h"
23
24 #include "ErrorInstance.h"
25 #include "FunctionPrototype.h"
26 #include "JSFunction.h"
27 #include "NativeErrorPrototype.h"
28
29 namespace KJS {
30
31 const ClassInfo NativeErrorConstructor::info = { "Function", &InternalFunction::info, 0, 0 };
32
33 NativeErrorConstructor::NativeErrorConstructor(ExecState* exec, FunctionPrototype* functionPrototype, NativeErrorPrototype* nativeErrorPrototype)
34     : InternalFunction(functionPrototype, Identifier(exec, nativeErrorPrototype->getDirect(exec->propertyNames().name)->getString()))
35     , m_proto(nativeErrorPrototype)
36 {
37     putDirect(exec->propertyNames().length, jsNumber(exec, 1), DontDelete | ReadOnly | DontEnum); // ECMA 15.11.7.5
38     putDirect(exec->propertyNames().prototype, m_proto, DontDelete | ReadOnly | DontEnum);
39 }
40
41 ErrorInstance* NativeErrorConstructor::construct(ExecState* exec, const ArgList& args)
42 {
43     ErrorInstance* object = new (exec) ErrorInstance(m_proto);
44     if (!args.at(exec, 0)->isUndefined())
45         object->putDirect(exec->propertyNames().message, jsString(exec, args.at(exec, 0)->toString(exec)));
46     return object;
47 }
48
49 static JSObject* constructWithNativeErrorConstructor(ExecState* exec, JSObject* constructor, const ArgList& args)
50 {
51     return static_cast<NativeErrorConstructor*>(constructor)->construct(exec, args);
52 }
53
54 ConstructType NativeErrorConstructor::getConstructData(ConstructData& constructData)
55 {
56     constructData.native.function = constructWithNativeErrorConstructor;
57     return ConstructTypeNative;
58 }
59
60 static JSValue* callNativeErrorConstructor(ExecState* exec, JSObject* constructor, JSValue*, const ArgList& args)
61 {
62     return static_cast<NativeErrorConstructor*>(constructor)->construct(exec, args);
63 }
64
65 CallType NativeErrorConstructor::getCallData(CallData& callData)
66 {
67     callData.native.function = callNativeErrorConstructor;
68     return CallTypeHost;
69 }
70
71 void NativeErrorConstructor::mark()
72 {
73     JSObject::mark();
74     if (m_proto && !m_proto->marked())
75         m_proto->mark();
76 }
77
78 } // namespace KJS