83e7c5a7573a4ff9d10c64aa653cc8b88424cbf1
[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, RegExp* regExp)
65     : JSObjectWithGlobalObject(globalObject, structure)
66     , d(adoptPtr(new RegExpObjectData(globalObject->globalData(), this, 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 (d->regExp)
82         visitor.append(&d->regExp);
83     if (UNLIKELY(!d->lastIndex.get().isInt32()))
84         visitor.append(&d->lastIndex);
85 }
86
87 bool RegExpObject::getOwnPropertySlot(ExecState* exec, const Identifier& propertyName, PropertySlot& slot)
88 {
89     return getStaticValueSlot<RegExpObject, JSObject>(exec, ExecState::regExpTable(exec), this, propertyName, slot);
90 }
91
92 bool RegExpObject::getOwnPropertyDescriptor(ExecState* exec, const Identifier& propertyName, PropertyDescriptor& descriptor)
93 {
94     return getStaticValueDescriptor<RegExpObject, JSObject>(exec, ExecState::regExpTable(exec), this, propertyName, descriptor);
95 }
96
97 JSValue regExpObjectGlobal(ExecState*, JSValue slotBase, const Identifier&)
98 {
99     return jsBoolean(asRegExpObject(slotBase)->regExp()->global());
100 }
101
102 JSValue regExpObjectIgnoreCase(ExecState*, JSValue slotBase, const Identifier&)
103 {
104     return jsBoolean(asRegExpObject(slotBase)->regExp()->ignoreCase());
105 }
106  
107 JSValue regExpObjectMultiline(ExecState*, JSValue slotBase, const Identifier&)
108 {            
109     return jsBoolean(asRegExpObject(slotBase)->regExp()->multiline());
110 }
111
112 JSValue regExpObjectSource(ExecState* exec, JSValue slotBase, const Identifier&)
113 {
114     return jsString(exec, asRegExpObject(slotBase)->regExp()->pattern());
115 }
116
117 JSValue regExpObjectLastIndex(ExecState*, JSValue slotBase, const Identifier&)
118 {
119     return asRegExpObject(slotBase)->getLastIndex();
120 }
121
122 void RegExpObject::put(ExecState* exec, const Identifier& propertyName, JSValue value, PutPropertySlot& slot)
123 {
124     lookupPut<RegExpObject, JSObject>(exec, propertyName, value, ExecState::regExpTable(exec), this, slot);
125 }
126
127 void setRegExpObjectLastIndex(ExecState* exec, JSObject* baseObject, JSValue value)
128 {
129     asRegExpObject(baseObject)->setLastIndex(exec->globalData(), value);
130 }
131
132 JSValue RegExpObject::test(ExecState* exec)
133 {
134     return jsBoolean(match(exec));
135 }
136
137 JSValue RegExpObject::exec(ExecState* exec)
138 {
139     if (match(exec))
140         return exec->lexicalGlobalObject()->regExpConstructor()->arrayOfMatches(exec);
141     return jsNull();
142 }
143
144 // Shared implementation used by test and exec.
145 bool RegExpObject::match(ExecState* exec)
146 {
147     RegExpConstructor* regExpConstructor = exec->lexicalGlobalObject()->regExpConstructor();
148     UString input = exec->argument(0).toString(exec);
149     JSGlobalData* globalData = &exec->globalData();
150     if (!regExp()->global()) {
151         int position;
152         int length;
153         regExpConstructor->performMatch(*globalData, d->regExp.get(), input, 0, position, length);
154         return position >= 0;
155     }
156
157     JSValue jsLastIndex = getLastIndex();
158     unsigned lastIndex;
159     if (LIKELY(jsLastIndex.isUInt32())) {
160         lastIndex = jsLastIndex.asUInt32();
161         if (lastIndex > input.length()) {
162             setLastIndex(0);
163             return false;
164         }
165     } else {
166         double doubleLastIndex = jsLastIndex.toInteger(exec);
167         if (doubleLastIndex < 0 || doubleLastIndex > input.length()) {
168             setLastIndex(0);
169             return false;
170         }
171         lastIndex = static_cast<unsigned>(doubleLastIndex);
172     }
173
174     int position;
175     int length = 0;
176     regExpConstructor->performMatch(*globalData, d->regExp.get(), input, lastIndex, position, length);
177     if (position < 0) {
178         setLastIndex(0);
179         return false;
180     }
181
182     setLastIndex(position + length);
183     return true;
184 }
185
186 } // namespace JSC