Pass VM instead of JSGlobalObject to RegExp constructor.
[WebKit-https.git] / Source / JavaScriptCore / runtime / RegExpPrototype.cpp
1 /*
2  *  Copyright (C) 1999-2000 Harri Porten (porten@kde.org)
3  *  Copyright (C) 2003, 2007, 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 "RegExpPrototype.h"
23
24 #include "ArrayPrototype.h"
25 #include "Error.h"
26 #include "JSArray.h"
27 #include "JSCJSValue.h"
28 #include "JSFunction.h"
29 #include "JSObject.h"
30 #include "JSString.h"
31 #include "JSStringBuilder.h"
32 #include "ObjectPrototype.h"
33 #include "Operations.h"
34 #include "RegExpObject.h"
35 #include "RegExp.h"
36 #include "RegExpCache.h"
37 #include "StringRecursionChecker.h"
38
39 namespace JSC {
40
41 static EncodedJSValue JSC_HOST_CALL regExpProtoFuncTest(ExecState*);
42 static EncodedJSValue JSC_HOST_CALL regExpProtoFuncExec(ExecState*);
43 static EncodedJSValue JSC_HOST_CALL regExpProtoFuncCompile(ExecState*);
44 static EncodedJSValue JSC_HOST_CALL regExpProtoFuncToString(ExecState*);
45
46 }
47
48 #include "RegExpPrototype.lut.h"
49
50 namespace JSC {
51
52 const ClassInfo RegExpPrototype::s_info = { "RegExp", &RegExpObject::s_info, 0, ExecState::regExpPrototypeTable, CREATE_METHOD_TABLE(RegExpPrototype) };
53
54 /* Source for RegExpPrototype.lut.h
55 @begin regExpPrototypeTable
56   compile   regExpProtoFuncCompile      DontEnum|Function 2
57   exec      regExpProtoFuncExec         DontEnum|Function 1
58   test      regExpProtoFuncTest         DontEnum|Function 1
59   toString  regExpProtoFuncToString     DontEnum|Function 0
60 @end
61 */
62
63 RegExpPrototype::RegExpPrototype(VM& vm, Structure* structure, RegExp* regExp)
64     : RegExpObject(vm, structure, regExp)
65 {
66 }
67
68 bool RegExpPrototype::getOwnPropertySlot(JSObject* object, ExecState* exec, PropertyName propertyName, PropertySlot &slot)
69 {
70     return getStaticFunctionSlot<RegExpObject>(exec, ExecState::regExpPrototypeTable(exec), jsCast<RegExpPrototype*>(object), propertyName, slot);
71 }
72
73 // ------------------------------ Functions ---------------------------
74
75 EncodedJSValue JSC_HOST_CALL regExpProtoFuncTest(ExecState* exec)
76 {
77     JSValue thisValue = exec->hostThisValue();
78     if (!thisValue.inherits(RegExpObject::info()))
79         return throwVMTypeError(exec);
80     return JSValue::encode(jsBoolean(asRegExpObject(thisValue)->test(exec, exec->argument(0).toString(exec))));
81 }
82
83 EncodedJSValue JSC_HOST_CALL regExpProtoFuncExec(ExecState* exec)
84 {
85     JSValue thisValue = exec->hostThisValue();
86     if (!thisValue.inherits(RegExpObject::info()))
87         return throwVMTypeError(exec);
88     return JSValue::encode(asRegExpObject(thisValue)->exec(exec, exec->argument(0).toString(exec)));
89 }
90
91 EncodedJSValue JSC_HOST_CALL regExpProtoFuncCompile(ExecState* exec)
92 {
93     JSValue thisValue = exec->hostThisValue();
94     if (!thisValue.inherits(RegExpObject::info()))
95         return throwVMTypeError(exec);
96
97     RegExp* regExp;
98     JSValue arg0 = exec->argument(0);
99     JSValue arg1 = exec->argument(1);
100     
101     if (arg0.inherits(RegExpObject::info())) {
102         if (!arg1.isUndefined())
103             return throwVMError(exec, createTypeError(exec, ASCIILiteral("Cannot supply flags when constructing one RegExp from another.")));
104         regExp = asRegExpObject(arg0)->regExp();
105     } else {
106         String pattern = !exec->argumentCount() ? emptyString() : arg0.toString(exec)->value(exec);
107         if (exec->hadException())
108             return JSValue::encode(jsUndefined());
109
110         RegExpFlags flags = NoFlags;
111         if (!arg1.isUndefined()) {
112             flags = regExpFlags(arg1.toString(exec)->value(exec));
113             if (exec->hadException())
114                 return JSValue::encode(jsUndefined());
115             if (flags == InvalidFlags)
116                 return throwVMError(exec, createSyntaxError(exec, ASCIILiteral("Invalid flags supplied to RegExp constructor.")));
117         }
118         regExp = RegExp::create(exec->vm(), pattern, flags);
119     }
120
121     if (!regExp->isValid())
122         return throwVMError(exec, createSyntaxError(exec, regExp->errorMessage()));
123
124     asRegExpObject(thisValue)->setRegExp(exec->vm(), regExp);
125     asRegExpObject(thisValue)->setLastIndex(exec, 0);
126     return JSValue::encode(jsUndefined());
127 }
128
129 EncodedJSValue JSC_HOST_CALL regExpProtoFuncToString(ExecState* exec)
130 {
131     JSValue thisValue = exec->hostThisValue();
132     if (!thisValue.inherits(RegExpObject::info()))
133         return throwVMTypeError(exec);
134
135     RegExpObject* thisObject = asRegExpObject(thisValue);
136
137     StringRecursionChecker checker(exec, thisObject);
138     if (JSValue earlyReturnValue = checker.earlyReturnValue())
139         return JSValue::encode(earlyReturnValue);
140
141     char postfix[5] = { '/', 0, 0, 0, 0 };
142     int index = 1;
143     if (thisObject->get(exec, exec->propertyNames().global).toBoolean(exec))
144         postfix[index++] = 'g';
145     if (thisObject->get(exec, exec->propertyNames().ignoreCase).toBoolean(exec))
146         postfix[index++] = 'i';
147     if (thisObject->get(exec, exec->propertyNames().multiline).toBoolean(exec))
148         postfix[index] = 'm';
149     String source = thisObject->get(exec, exec->propertyNames().source).toString(exec)->value(exec);
150     // If source is empty, use "/(?:)/" to avoid colliding with comment syntax
151     return JSValue::encode(jsMakeNontrivialString(exec, "/", source, postfix));
152 }
153
154 } // namespace JSC