Revert last change, something weird happened when I went to land.
[WebKit-https.git] / Source / JavaScriptCore / runtime / RegExpObject.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 "RegExpObject.h"
23
24 #include "Error.h"
25 #include "ExceptionHelpers.h"
26 #include "JSArray.h"
27 #include "JSGlobalObject.h"
28 #include "JSString.h"
29 #include "Lookup.h"
30 #include "RegExpConstructor.h"
31 #include "RegExpPrototype.h"
32 #include "UStringConcatenate.h"
33 #include <wtf/PassOwnPtr.h>
34
35 namespace JSC {
36
37 static JSValue regExpObjectGlobal(ExecState*, JSValue, const Identifier&);
38 static JSValue regExpObjectIgnoreCase(ExecState*, JSValue, const Identifier&);
39 static JSValue regExpObjectMultiline(ExecState*, JSValue, const Identifier&);
40 static JSValue regExpObjectSource(ExecState*, JSValue, const Identifier&);
41 static JSValue regExpObjectLastIndex(ExecState*, JSValue, const Identifier&);
42 static void setRegExpObjectLastIndex(ExecState*, JSObject*, JSValue);
43
44 } // namespace JSC
45
46 #include "RegExpObject.lut.h"
47
48 namespace JSC {
49
50 ASSERT_CLASS_FITS_IN_CELL(RegExpObject);
51
52 const ClassInfo RegExpObject::s_info = { "RegExp", &JSObjectWithGlobalObject::s_info, 0, ExecState::regExpTable };
53
54 /* Source for RegExpObject.lut.h
55 @begin regExpTable
56     global        regExpObjectGlobal       DontDelete|ReadOnly|DontEnum
57     ignoreCase    regExpObjectIgnoreCase   DontDelete|ReadOnly|DontEnum
58     multiline     regExpObjectMultiline    DontDelete|ReadOnly|DontEnum
59     source        regExpObjectSource       DontDelete|ReadOnly|DontEnum
60     lastIndex     regExpObjectLastIndex    DontDelete|DontEnum
61 @end
62 */
63
64 RegExpObject::RegExpObject(JSGlobalObject* globalObject, Structure* structure, NonNullPassRefPtr<RegExp> regExp)
65     : JSObjectWithGlobalObject(globalObject, structure)
66     , d(adoptPtr(new RegExpObjectData(regExp)))
67 {
68     ASSERT(inherits(&s_info));
69 }
70
71 RegExpObject::~RegExpObject()
72 {
73 }
74
75 void RegExpObject::visitChildren(SlotVisitor& visitor)
76 {
77     ASSERT_GC_OBJECT_INHERITS(this, &s_info);
78     COMPILE_ASSERT(StructureFlags & OverridesVisitChildren, OverridesVisitChildrenWithoutSettingFlag);
79     ASSERT(structure()->typeInfo().overridesVisitChildren());
80     Base::visitChildren(visitor);
81     if (UNLIKELY(!d->lastIndex.get().isInt32()))
82         visitor.append(&d->lastIndex);
83 }
84
85 bool RegExpObject::getOwnPropertySlot(ExecState* exec, const Identifier& propertyName, PropertySlot& slot)
86 {
87     return getStaticValueSlot<RegExpObject, JSObject>(exec, ExecState::regExpTable(exec), this, propertyName, slot);
88 }
89
90 bool RegExpObject::getOwnPropertyDescriptor(ExecState* exec, const Identifier& propertyName, PropertyDescriptor& descriptor)
91 {
92     return getStaticValueDescriptor<RegExpObject, JSObject>(exec, ExecState::regExpTable(exec), this, propertyName, descriptor);
93 }
94
95 JSValue regExpObjectGlobal(ExecState*, JSValue slotBase, const Identifier&)
96 {
97     return jsBoolean(asRegExpObject(slotBase)->regExp()->global());
98 }
99
100 JSValue regExpObjectIgnoreCase(ExecState*, JSValue slotBase, const Identifier&)
101 {
102     return jsBoolean(asRegExpObject(slotBase)->regExp()->ignoreCase());
103 }
104  
105 JSValue regExpObjectMultiline(ExecState*, JSValue slotBase, const Identifier&)
106 {            
107     return jsBoolean(asRegExpObject(slotBase)->regExp()->multiline());
108 }
109
110 JSValue regExpObjectSource(ExecState* exec, JSValue slotBase, const Identifier&)
111 {
112     return jsString(exec, asRegExpObject(slotBase)->regExp()->pattern());
113 }
114
115 JSValue regExpObjectLastIndex(ExecState*, JSValue slotBase, const Identifier&)
116 {
117     return asRegExpObject(slotBase)->getLastIndex();
118 }
119
120 void RegExpObject::put(ExecState* exec, const Identifier& propertyName, JSValue value, PutPropertySlot& slot)
121 {
122     lookupPut<RegExpObject, JSObject>(exec, propertyName, value, ExecState::regExpTable(exec), this, slot);
123 }
124
125 void setRegExpObjectLastIndex(ExecState* exec, JSObject* baseObject, JSValue value)
126 {
127     asRegExpObject(baseObject)->setLastIndex(exec->globalData(), value);
128 }
129
130 JSValue RegExpObject::test(ExecState* exec)
131 {
132     return jsBoolean(match(exec));
133 }
134
135 JSValue RegExpObject::exec(ExecState* exec)
136 {
137     if (match(exec))
138         return exec->lexicalGlobalObject()->regExpConstructor()->arrayOfMatches(exec);
139     return jsNull();
140 }
141
142 // Shared implementation used by test and exec.
143 bool RegExpObject::match(ExecState* exec)
144 {
145     RegExpConstructor* regExpConstructor = exec->lexicalGlobalObject()->regExpConstructor();
146     UString input = exec->argument(0).toString(exec);
147     JSGlobalData* globalData = &exec->globalData();
148     if (!regExp()->global()) {
149         int position;
150         int length;
151         regExpConstructor->performMatch(*globalData, d->regExp.get(), input, 0, position, length);
152         return position >= 0;
153     }
154
155     JSValue jsLastIndex = getLastIndex();
156     unsigned lastIndex;
157     if (LIKELY(jsLastIndex.isUInt32())) {
158         lastIndex = jsLastIndex.asUInt32();
159         if (lastIndex > input.length()) {
160             setLastIndex(0);
161             return false;
162         }
163     } else {
164         double doubleLastIndex = jsLastIndex.toInteger(exec);
165         if (doubleLastIndex < 0 || doubleLastIndex > input.length()) {
166             setLastIndex(0);
167             return false;
168         }
169         lastIndex = static_cast<unsigned>(doubleLastIndex);
170     }
171
172     int position;
173     int length = 0;
174     regExpConstructor->performMatch(*globalData, d->regExp.get(), input, lastIndex, position, length);
175     if (position < 0) {
176         setLastIndex(0);
177         return false;
178     }
179
180     setLastIndex(position + length);
181     return true;
182 }
183
184 } // namespace JSC