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 "JSArray.h"
26 #include "JSGlobalObject.h"
27 #include "JSString.h"
28 #include "RegExpConstructor.h"
29 #include "RegExpPrototype.h"
30
31 namespace JSC {
32
33 static JSValue regExpObjectGlobal(ExecState*, const Identifier&, const PropertySlot&);
34 static JSValue regExpObjectIgnoreCase(ExecState*, const Identifier&, const PropertySlot&);
35 static JSValue regExpObjectMultiline(ExecState*, const Identifier&, const PropertySlot&);
36 static JSValue regExpObjectSource(ExecState*, const Identifier&, const PropertySlot&);
37 static JSValue regExpObjectLastIndex(ExecState*, const Identifier&, const PropertySlot&);
38 static void setRegExpObjectLastIndex(ExecState*, JSObject*, JSValue);
39
40 } // namespace JSC
41
42 #include "RegExpObject.lut.h"
43
44 namespace JSC {
45
46 ASSERT_CLASS_FITS_IN_CELL(RegExpObject);
47
48 const ClassInfo RegExpObject::info = { "RegExp", 0, 0, ExecState::regExpTable };
49
50 /* Source for RegExpObject.lut.h
51 @begin regExpTable
52 global regExpObjectGlobal DontDelete|ReadOnly|DontEnum
53 ignoreCase regExpObjectIgnoreCase DontDelete|ReadOnly|DontEnum
54 multiline regExpObjectMultiline DontDelete|ReadOnly|DontEnum
55 source regExpObjectSource DontDelete|ReadOnly|DontEnum
56 lastIndex regExpObjectLastIndex DontDelete|DontEnum
57 @end
58 */
59
RegExpObject(PassRefPtr<Structure> structure,PassRefPtr<RegExp> regExp)60 RegExpObject::RegExpObject(PassRefPtr<Structure> structure, PassRefPtr<RegExp> regExp)
61 : JSObject(structure)
62 , d(new RegExpObjectData(regExp, 0))
63 {
64 }
65
~RegExpObject()66 RegExpObject::~RegExpObject()
67 {
68 }
69
getOwnPropertySlot(ExecState * exec,const Identifier & propertyName,PropertySlot & slot)70 bool RegExpObject::getOwnPropertySlot(ExecState* exec, const Identifier& propertyName, PropertySlot& slot)
71 {
72 return getStaticValueSlot<RegExpObject, JSObject>(exec, ExecState::regExpTable(exec), this, propertyName, slot);
73 }
74
regExpObjectGlobal(ExecState *,const Identifier &,const PropertySlot & slot)75 JSValue regExpObjectGlobal(ExecState*, const Identifier&, const PropertySlot& slot)
76 {
77 return jsBoolean(asRegExpObject(slot.slotBase())->regExp()->global());
78 }
79
regExpObjectIgnoreCase(ExecState *,const Identifier &,const PropertySlot & slot)80 JSValue regExpObjectIgnoreCase(ExecState*, const Identifier&, const PropertySlot& slot)
81 {
82 return jsBoolean(asRegExpObject(slot.slotBase())->regExp()->ignoreCase());
83 }
84
regExpObjectMultiline(ExecState *,const Identifier &,const PropertySlot & slot)85 JSValue regExpObjectMultiline(ExecState*, const Identifier&, const PropertySlot& slot)
86 {
87 return jsBoolean(asRegExpObject(slot.slotBase())->regExp()->multiline());
88 }
89
regExpObjectSource(ExecState * exec,const Identifier &,const PropertySlot & slot)90 JSValue regExpObjectSource(ExecState* exec, const Identifier&, const PropertySlot& slot)
91 {
92 return jsString(exec, asRegExpObject(slot.slotBase())->regExp()->pattern());
93 }
94
regExpObjectLastIndex(ExecState * exec,const Identifier &,const PropertySlot & slot)95 JSValue regExpObjectLastIndex(ExecState* exec, const Identifier&, const PropertySlot& slot)
96 {
97 return jsNumber(exec, asRegExpObject(slot.slotBase())->lastIndex());
98 }
99
put(ExecState * exec,const Identifier & propertyName,JSValue value,PutPropertySlot & slot)100 void RegExpObject::put(ExecState* exec, const Identifier& propertyName, JSValue value, PutPropertySlot& slot)
101 {
102 lookupPut<RegExpObject, JSObject>(exec, propertyName, value, ExecState::regExpTable(exec), this, slot);
103 }
104
setRegExpObjectLastIndex(ExecState * exec,JSObject * baseObject,JSValue value)105 void setRegExpObjectLastIndex(ExecState* exec, JSObject* baseObject, JSValue value)
106 {
107 asRegExpObject(baseObject)->setLastIndex(value.toInteger(exec));
108 }
109
test(ExecState * exec,const ArgList & args)110 JSValue RegExpObject::test(ExecState* exec, const ArgList& args)
111 {
112 return jsBoolean(match(exec, args));
113 }
114
exec(ExecState * exec,const ArgList & args)115 JSValue RegExpObject::exec(ExecState* exec, const ArgList& args)
116 {
117 if (match(exec, args))
118 return exec->lexicalGlobalObject()->regExpConstructor()->arrayOfMatches(exec);
119 return jsNull();
120 }
121
callRegExpObject(ExecState * exec,JSObject * function,JSValue,const ArgList & args)122 static JSValue JSC_HOST_CALL callRegExpObject(ExecState* exec, JSObject* function, JSValue, const ArgList& args)
123 {
124 return asRegExpObject(function)->exec(exec, args);
125 }
126
getCallData(CallData & callData)127 CallType RegExpObject::getCallData(CallData& callData)
128 {
129 callData.native.function = callRegExpObject;
130 return CallTypeHost;
131 }
132
133 // Shared implementation used by test and exec.
match(ExecState * exec,const ArgList & args)134 bool RegExpObject::match(ExecState* exec, const ArgList& args)
135 {
136 RegExpConstructor* regExpConstructor = exec->lexicalGlobalObject()->regExpConstructor();
137
138 UString input = args.isEmpty() ? regExpConstructor->input() : args.at(0).toString(exec);
139 if (input.isNull()) {
140 throwError(exec, GeneralError, "No input to " + toString(exec) + ".");
141 return false;
142 }
143
144 if (!regExp()->global()) {
145 int position;
146 int length;
147 regExpConstructor->performMatch(d->regExp.get(), input, 0, position, length);
148 return position >= 0;
149 }
150
151 if (d->lastIndex < 0 || d->lastIndex > input.size()) {
152 d->lastIndex = 0;
153 return false;
154 }
155
156 int position;
157 int length;
158 regExpConstructor->performMatch(d->regExp.get(), input, static_cast<int>(d->lastIndex), position, length);
159 if (position < 0) {
160 d->lastIndex = 0;
161 return false;
162 }
163
164 d->lastIndex = position + length;
165 return true;
166 }
167
168 } // namespace JSC
169