OLD | NEW |
| (Empty) |
1 // Copyright 2012 the V8 project authors. All rights reserved. | |
2 // Use of this source code is governed by a BSD-style license that can be | |
3 // found in the LICENSE file. | |
4 | |
5 #include "src/v8.h" | |
6 | |
7 #include "src/assembler.h" | |
8 #include "src/ast.h" | |
9 #include "src/regexp-macro-assembler.h" | |
10 #include "src/regexp-stack.h" | |
11 #include "src/simulator.h" | |
12 | |
13 namespace v8 { | |
14 namespace internal { | |
15 | |
16 RegExpMacroAssembler::RegExpMacroAssembler(Isolate* isolate, Zone* zone) | |
17 : slow_safe_compiler_(false), | |
18 global_mode_(NOT_GLOBAL), | |
19 isolate_(isolate), | |
20 zone_(zone) {} | |
21 | |
22 | |
23 RegExpMacroAssembler::~RegExpMacroAssembler() { | |
24 } | |
25 | |
26 | |
27 #ifndef V8_INTERPRETED_REGEXP // Avoid unused code, e.g., on ARM. | |
28 | |
29 NativeRegExpMacroAssembler::NativeRegExpMacroAssembler(Isolate* isolate, | |
30 Zone* zone) | |
31 : RegExpMacroAssembler(isolate, zone) {} | |
32 | |
33 | |
34 NativeRegExpMacroAssembler::~NativeRegExpMacroAssembler() { | |
35 } | |
36 | |
37 | |
38 bool NativeRegExpMacroAssembler::CanReadUnaligned() { | |
39 return FLAG_enable_unaligned_accesses && !slow_safe(); | |
40 } | |
41 | |
42 const byte* NativeRegExpMacroAssembler::StringCharacterPosition( | |
43 String* subject, | |
44 int start_index) { | |
45 if (subject->IsConsString()) { | |
46 subject = ConsString::cast(subject)->first(); | |
47 } else if (subject->IsSlicedString()) { | |
48 start_index += SlicedString::cast(subject)->offset(); | |
49 subject = SlicedString::cast(subject)->parent(); | |
50 } | |
51 DCHECK(start_index >= 0); | |
52 DCHECK(start_index <= subject->length()); | |
53 if (subject->IsSeqOneByteString()) { | |
54 return reinterpret_cast<const byte*>( | |
55 SeqOneByteString::cast(subject)->GetChars() + start_index); | |
56 } else if (subject->IsSeqTwoByteString()) { | |
57 return reinterpret_cast<const byte*>( | |
58 SeqTwoByteString::cast(subject)->GetChars() + start_index); | |
59 } else if (subject->IsExternalOneByteString()) { | |
60 return reinterpret_cast<const byte*>( | |
61 ExternalOneByteString::cast(subject)->GetChars() + start_index); | |
62 } else { | |
63 return reinterpret_cast<const byte*>( | |
64 ExternalTwoByteString::cast(subject)->GetChars() + start_index); | |
65 } | |
66 } | |
67 | |
68 | |
69 int NativeRegExpMacroAssembler::CheckStackGuardState( | |
70 Isolate* isolate, int start_index, bool is_direct_call, | |
71 Address* return_address, Code* re_code, String** subject, | |
72 const byte** input_start, const byte** input_end) { | |
73 DCHECK(re_code->instruction_start() <= *return_address); | |
74 DCHECK(*return_address <= re_code->instruction_end()); | |
75 int return_value = 0; | |
76 // Prepare for possible GC. | |
77 HandleScope handles(isolate); | |
78 Handle<Code> code_handle(re_code); | |
79 Handle<String> subject_handle(*subject); | |
80 bool is_one_byte = subject_handle->IsOneByteRepresentationUnderneath(); | |
81 | |
82 StackLimitCheck check(isolate); | |
83 if (check.JsHasOverflowed()) { | |
84 isolate->StackOverflow(); | |
85 return_value = EXCEPTION; | |
86 } else if (is_direct_call) { | |
87 // If not real stack overflow the stack guard was used to interrupt | |
88 // execution for another purpose. If this is a direct call from JavaScript | |
89 // retry the RegExp forcing the call through the runtime system. | |
90 // Currently the direct call cannot handle a GC. | |
91 return_value = RETRY; | |
92 } else { | |
93 Object* result = isolate->stack_guard()->HandleInterrupts(); | |
94 if (result->IsException()) return_value = EXCEPTION; | |
95 } | |
96 | |
97 DisallowHeapAllocation no_gc; | |
98 | |
99 if (*code_handle != re_code) { // Return address no longer valid | |
100 intptr_t delta = code_handle->address() - re_code->address(); | |
101 // Overwrite the return address on the stack. | |
102 *return_address += delta; | |
103 } | |
104 | |
105 // If we continue, we need to update the subject string addresses. | |
106 if (return_value == 0) { | |
107 // String encoding might have changed. | |
108 if (subject_handle->IsOneByteRepresentationUnderneath() != is_one_byte) { | |
109 // If we changed between an LATIN1 and an UC16 string, the specialized | |
110 // code cannot be used, and we need to restart regexp matching from | |
111 // scratch (including, potentially, compiling a new version of the code). | |
112 return_value = RETRY; | |
113 } else { | |
114 *subject = *subject_handle; | |
115 intptr_t byte_length = *input_end - *input_start; | |
116 *input_start = StringCharacterPosition(*subject, start_index); | |
117 *input_end = *input_start + byte_length; | |
118 } | |
119 } | |
120 return return_value; | |
121 } | |
122 | |
123 | |
124 NativeRegExpMacroAssembler::Result NativeRegExpMacroAssembler::Match( | |
125 Handle<Code> regexp_code, | |
126 Handle<String> subject, | |
127 int* offsets_vector, | |
128 int offsets_vector_length, | |
129 int previous_index, | |
130 Isolate* isolate) { | |
131 | |
132 DCHECK(subject->IsFlat()); | |
133 DCHECK(previous_index >= 0); | |
134 DCHECK(previous_index <= subject->length()); | |
135 | |
136 // No allocations before calling the regexp, but we can't use | |
137 // DisallowHeapAllocation, since regexps might be preempted, and another | |
138 // thread might do allocation anyway. | |
139 | |
140 String* subject_ptr = *subject; | |
141 // Character offsets into string. | |
142 int start_offset = previous_index; | |
143 int char_length = subject_ptr->length() - start_offset; | |
144 int slice_offset = 0; | |
145 | |
146 // The string has been flattened, so if it is a cons string it contains the | |
147 // full string in the first part. | |
148 if (StringShape(subject_ptr).IsCons()) { | |
149 DCHECK_EQ(0, ConsString::cast(subject_ptr)->second()->length()); | |
150 subject_ptr = ConsString::cast(subject_ptr)->first(); | |
151 } else if (StringShape(subject_ptr).IsSliced()) { | |
152 SlicedString* slice = SlicedString::cast(subject_ptr); | |
153 subject_ptr = slice->parent(); | |
154 slice_offset = slice->offset(); | |
155 } | |
156 // Ensure that an underlying string has the same representation. | |
157 bool is_one_byte = subject_ptr->IsOneByteRepresentation(); | |
158 DCHECK(subject_ptr->IsExternalString() || subject_ptr->IsSeqString()); | |
159 // String is now either Sequential or External | |
160 int char_size_shift = is_one_byte ? 0 : 1; | |
161 | |
162 const byte* input_start = | |
163 StringCharacterPosition(subject_ptr, start_offset + slice_offset); | |
164 int byte_length = char_length << char_size_shift; | |
165 const byte* input_end = input_start + byte_length; | |
166 Result res = Execute(*regexp_code, | |
167 *subject, | |
168 start_offset, | |
169 input_start, | |
170 input_end, | |
171 offsets_vector, | |
172 offsets_vector_length, | |
173 isolate); | |
174 return res; | |
175 } | |
176 | |
177 | |
178 NativeRegExpMacroAssembler::Result NativeRegExpMacroAssembler::Execute( | |
179 Code* code, | |
180 String* input, // This needs to be the unpacked (sliced, cons) string. | |
181 int start_offset, | |
182 const byte* input_start, | |
183 const byte* input_end, | |
184 int* output, | |
185 int output_size, | |
186 Isolate* isolate) { | |
187 // Ensure that the minimum stack has been allocated. | |
188 RegExpStackScope stack_scope(isolate); | |
189 Address stack_base = stack_scope.stack()->stack_base(); | |
190 | |
191 int direct_call = 0; | |
192 int result = CALL_GENERATED_REGEXP_CODE(code->entry(), | |
193 input, | |
194 start_offset, | |
195 input_start, | |
196 input_end, | |
197 output, | |
198 output_size, | |
199 stack_base, | |
200 direct_call, | |
201 isolate); | |
202 DCHECK(result >= RETRY); | |
203 | |
204 if (result == EXCEPTION && !isolate->has_pending_exception()) { | |
205 // We detected a stack overflow (on the backtrack stack) in RegExp code, | |
206 // but haven't created the exception yet. | |
207 isolate->StackOverflow(); | |
208 } | |
209 return static_cast<Result>(result); | |
210 } | |
211 | |
212 | |
213 const byte NativeRegExpMacroAssembler::word_character_map[] = { | |
214 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, | |
215 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, | |
216 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, | |
217 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, | |
218 | |
219 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, | |
220 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, | |
221 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, // '0' - '7' | |
222 0xffu, 0xffu, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, // '8' - '9' | |
223 | |
224 0x00u, 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, // 'A' - 'G' | |
225 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, // 'H' - 'O' | |
226 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, // 'P' - 'W' | |
227 0xffu, 0xffu, 0xffu, 0x00u, 0x00u, 0x00u, 0x00u, 0xffu, // 'X' - 'Z', '_' | |
228 | |
229 0x00u, 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, // 'a' - 'g' | |
230 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, // 'h' - 'o' | |
231 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, 0xffu, // 'p' - 'w' | |
232 0xffu, 0xffu, 0xffu, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, // 'x' - 'z' | |
233 // Latin-1 range | |
234 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, | |
235 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, | |
236 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, | |
237 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, | |
238 | |
239 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, | |
240 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, | |
241 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, | |
242 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, | |
243 | |
244 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, | |
245 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, | |
246 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, | |
247 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, | |
248 | |
249 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, | |
250 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, | |
251 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, | |
252 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, 0x00u, | |
253 }; | |
254 | |
255 | |
256 int NativeRegExpMacroAssembler::CaseInsensitiveCompareUC16( | |
257 Address byte_offset1, | |
258 Address byte_offset2, | |
259 size_t byte_length, | |
260 Isolate* isolate) { | |
261 unibrow::Mapping<unibrow::Ecma262Canonicalize>* canonicalize = | |
262 isolate->regexp_macro_assembler_canonicalize(); | |
263 // This function is not allowed to cause a garbage collection. | |
264 // A GC might move the calling generated code and invalidate the | |
265 // return address on the stack. | |
266 DCHECK(byte_length % 2 == 0); | |
267 uc16* substring1 = reinterpret_cast<uc16*>(byte_offset1); | |
268 uc16* substring2 = reinterpret_cast<uc16*>(byte_offset2); | |
269 size_t length = byte_length >> 1; | |
270 | |
271 for (size_t i = 0; i < length; i++) { | |
272 unibrow::uchar c1 = substring1[i]; | |
273 unibrow::uchar c2 = substring2[i]; | |
274 if (c1 != c2) { | |
275 unibrow::uchar s1[1] = { c1 }; | |
276 canonicalize->get(c1, '\0', s1); | |
277 if (s1[0] != c2) { | |
278 unibrow::uchar s2[1] = { c2 }; | |
279 canonicalize->get(c2, '\0', s2); | |
280 if (s1[0] != s2[0]) { | |
281 return 0; | |
282 } | |
283 } | |
284 } | |
285 } | |
286 return 1; | |
287 } | |
288 | |
289 | |
290 Address NativeRegExpMacroAssembler::GrowStack(Address stack_pointer, | |
291 Address* stack_base, | |
292 Isolate* isolate) { | |
293 RegExpStack* regexp_stack = isolate->regexp_stack(); | |
294 size_t size = regexp_stack->stack_capacity(); | |
295 Address old_stack_base = regexp_stack->stack_base(); | |
296 DCHECK(old_stack_base == *stack_base); | |
297 DCHECK(stack_pointer <= old_stack_base); | |
298 DCHECK(static_cast<size_t>(old_stack_base - stack_pointer) <= size); | |
299 Address new_stack_base = regexp_stack->EnsureCapacity(size * 2); | |
300 if (new_stack_base == NULL) { | |
301 return NULL; | |
302 } | |
303 *stack_base = new_stack_base; | |
304 intptr_t stack_content_size = old_stack_base - stack_pointer; | |
305 return new_stack_base - stack_content_size; | |
306 } | |
307 | |
308 #endif // V8_INTERPRETED_REGEXP | |
309 | |
310 } // namespace internal | |
311 } // namespace v8 | |
OLD | NEW |