Florian Schneider
7e40108ff5
Pass on the incoming arguments descriptor when invoking an irregexp function. Avoiding loading an arguments descriptor in the intrinsic code also allows generated regexp code in precompiled code. Loading a new descriptor is not necessary since the arguments are already on the stack in the right order. Use named constants for parameter indices in the regexp assembler. BUG= R=srdjan@google.com Review URL: https://codereview.chromium.org//1305993005 .
101 lines
3.6 KiB
C++
101 lines
3.6 KiB
C++
// Copyright (c) 2012, the Dart project authors. Please see the AUTHORS file
|
|
// for details. All rights reserved. Use of this source code is governed by a
|
|
// BSD-style license that can be found in the LICENSE file.
|
|
|
|
#include "platform/assert.h"
|
|
#include "vm/bootstrap_natives.h"
|
|
#include "vm/exceptions.h"
|
|
#include "vm/native_entry.h"
|
|
#include "vm/object.h"
|
|
#include "vm/regexp_parser.h"
|
|
#include "vm/regexp_assembler_ir.h"
|
|
#include "vm/regexp_assembler_bytecode.h"
|
|
#include "vm/thread.h"
|
|
|
|
namespace dart {
|
|
|
|
DECLARE_FLAG(bool, trace_irregexp);
|
|
DECLARE_FLAG(bool, interpret_irregexp);
|
|
|
|
|
|
DEFINE_NATIVE_ENTRY(JSSyntaxRegExp_factory, 4) {
|
|
ASSERT(TypeArguments::CheckedHandle(arguments->NativeArgAt(0)).IsNull());
|
|
GET_NON_NULL_NATIVE_ARGUMENT(String, pattern, arguments->NativeArgAt(1));
|
|
GET_NON_NULL_NATIVE_ARGUMENT(
|
|
Instance, handle_multi_line, arguments->NativeArgAt(2));
|
|
GET_NON_NULL_NATIVE_ARGUMENT(
|
|
Instance, handle_case_sensitive, arguments->NativeArgAt(3));
|
|
bool ignore_case = handle_case_sensitive.raw() != Bool::True().raw();
|
|
bool multi_line = handle_multi_line.raw() == Bool::True().raw();
|
|
|
|
// Parse the pattern once in order to throw any format exceptions within
|
|
// the factory constructor. It is parsed again upon compilation.
|
|
RegExpCompileData compileData;
|
|
if (!RegExpParser::ParseRegExp(pattern, multi_line, &compileData)) {
|
|
// Parsing failures throw an exception.
|
|
UNREACHABLE();
|
|
}
|
|
|
|
// Create a JSRegExp object containing only the initial parameters.
|
|
return RegExpEngine::CreateJSRegExp(zone,
|
|
pattern,
|
|
multi_line,
|
|
ignore_case);
|
|
}
|
|
|
|
|
|
DEFINE_NATIVE_ENTRY(JSSyntaxRegExp_getPattern, 1) {
|
|
const JSRegExp& regexp = JSRegExp::CheckedHandle(arguments->NativeArgAt(0));
|
|
ASSERT(!regexp.IsNull());
|
|
return regexp.pattern();
|
|
}
|
|
|
|
|
|
DEFINE_NATIVE_ENTRY(JSSyntaxRegExp_getIsMultiLine, 1) {
|
|
const JSRegExp& regexp = JSRegExp::CheckedHandle(arguments->NativeArgAt(0));
|
|
ASSERT(!regexp.IsNull());
|
|
return Bool::Get(regexp.is_multi_line()).raw();
|
|
}
|
|
|
|
|
|
DEFINE_NATIVE_ENTRY(JSSyntaxRegExp_getIsCaseSensitive, 1) {
|
|
const JSRegExp& regexp = JSRegExp::CheckedHandle(arguments->NativeArgAt(0));
|
|
ASSERT(!regexp.IsNull());
|
|
return Bool::Get(!regexp.is_ignore_case()).raw();
|
|
}
|
|
|
|
|
|
DEFINE_NATIVE_ENTRY(JSSyntaxRegExp_getGroupCount, 1) {
|
|
const JSRegExp& regexp = JSRegExp::CheckedHandle(arguments->NativeArgAt(0));
|
|
ASSERT(!regexp.IsNull());
|
|
if (regexp.is_initialized()) {
|
|
return regexp.num_bracket_expressions();
|
|
}
|
|
const String& pattern = String::Handle(regexp.pattern());
|
|
const String& errmsg = String::Handle(
|
|
String::New("Regular expression is not initialized yet. "));
|
|
const String& message = String::Handle(String::Concat(errmsg, pattern));
|
|
const Array& args = Array::Handle(Array::New(1));
|
|
args.SetAt(0, message);
|
|
Exceptions::ThrowByType(Exceptions::kFormat, args);
|
|
return Object::null();
|
|
}
|
|
|
|
|
|
DEFINE_NATIVE_ENTRY(JSSyntaxRegExp_ExecuteMatch, 3) {
|
|
// This function is intrinsified. See Intrinsifier::JSRegExp_ExecuteMatch.
|
|
const JSRegExp& regexp = JSRegExp::CheckedHandle(arguments->NativeArgAt(0));
|
|
ASSERT(!regexp.IsNull());
|
|
GET_NON_NULL_NATIVE_ARGUMENT(String, subject, arguments->NativeArgAt(1));
|
|
GET_NON_NULL_NATIVE_ARGUMENT(Smi, start_index, arguments->NativeArgAt(2));
|
|
|
|
if (FLAG_interpret_irregexp) {
|
|
return BytecodeRegExpMacroAssembler::Interpret(regexp, subject, start_index,
|
|
zone);
|
|
}
|
|
|
|
return IRRegExpMacroAssembler::Execute(regexp, subject, start_index, zone);
|
|
}
|
|
|
|
} // namespace dart
|