OLD | NEW |
1 // Copyright (c) 2011, the Dart project authors. Please see the AUTHORS file | 1 // Copyright (c) 2011, the Dart project authors. Please see the AUTHORS file |
2 // for details. All rights reserved. Use of this source code is governed by a | 2 // for details. All rights reserved. Use of this source code is governed by a |
3 // BSD-style license that can be found in the LICENSE file. | 3 // BSD-style license that can be found in the LICENSE file. |
4 | 4 |
5 #ifndef VM_NATIVE_ENTRY_H_ | 5 #ifndef VM_NATIVE_ENTRY_H_ |
6 #define VM_NATIVE_ENTRY_H_ | 6 #define VM_NATIVE_ENTRY_H_ |
7 | 7 |
8 #include "vm/allocation.h" | 8 #include "vm/allocation.h" |
9 #include "vm/assembler.h" | 9 #include "vm/assembler.h" |
10 #include "vm/code_generator.h" | 10 #include "vm/code_generator.h" |
11 #include "vm/exceptions.h" | 11 #include "vm/exceptions.h" |
12 #include "vm/native_arguments.h" | 12 #include "vm/native_arguments.h" |
13 #include "vm/verifier.h" | 13 #include "vm/verifier.h" |
14 | 14 |
15 #include "include/dart_api.h" | 15 #include "include/dart_api.h" |
16 | 16 |
17 namespace dart { | 17 namespace dart { |
18 | 18 |
19 DECLARE_FLAG(bool, deoptimize_alot); | |
20 DECLARE_FLAG(bool, trace_natives); | |
21 | |
22 // Forward declarations. | 19 // Forward declarations. |
23 class Class; | 20 class Class; |
24 class String; | 21 class String; |
25 | 22 |
26 typedef void (*NativeFunction)(NativeArguments* arguments); | 23 typedef void (*NativeFunction)(NativeArguments* arguments); |
27 | 24 |
28 | 25 |
29 #define NATIVE_ENTRY_FUNCTION(name) BootstrapNatives::DN_##name | 26 #define NATIVE_ENTRY_FUNCTION(name) BootstrapNatives::DN_##name |
30 | 27 |
31 #ifdef DEBUG | 28 #ifdef DEBUG |
32 #define SET_NATIVE_RETVAL(args, value) \ | 29 #define SET_NATIVE_RETVAL(args, value) \ |
33 RawObject* retval = value; \ | 30 RawObject* retval = value; \ |
34 ASSERT(retval->IsDartInstance()); \ | 31 ASSERT(retval->IsDartInstance()); \ |
35 arguments->SetReturnUnsafe(retval); | 32 arguments->SetReturnUnsafe(retval); |
36 #else | 33 #else |
37 #define SET_NATIVE_RETVAL(arguments, value) \ | 34 #define SET_NATIVE_RETVAL(arguments, value) \ |
38 arguments->SetReturnUnsafe(value); | 35 arguments->SetReturnUnsafe(value); |
39 #endif | 36 #endif |
40 | 37 |
41 #define DEFINE_NATIVE_ENTRY(name, argument_count) \ | 38 #define DEFINE_NATIVE_ENTRY(name, argument_count) \ |
42 static RawObject* DN_Helper##name(Isolate* isolate, \ | 39 static RawObject* DN_Helper##name(Isolate* isolate, \ |
43 NativeArguments* arguments); \ | 40 NativeArguments* arguments); \ |
44 void NATIVE_ENTRY_FUNCTION(name)(Dart_NativeArguments args) { \ | 41 void NATIVE_ENTRY_FUNCTION(name)(Dart_NativeArguments args) { \ |
45 CHECK_STACK_ALIGNMENT; \ | 42 CHECK_STACK_ALIGNMENT; \ |
46 VERIFY_ON_TRANSITION; \ | 43 VERIFY_ON_TRANSITION; \ |
47 NativeArguments* arguments = reinterpret_cast<NativeArguments*>(args); \ | 44 NativeArguments* arguments = reinterpret_cast<NativeArguments*>(args); \ |
48 ASSERT(arguments->NativeArgCount() == argument_count); \ | 45 ASSERT(arguments->NativeArgCount() == argument_count); \ |
49 if (FLAG_trace_natives) OS::Print("Calling native: %s\n", ""#name); \ | 46 TRACE_NATIVES(""#name); \ |
50 { \ | 47 { \ |
51 StackZone zone(arguments->isolate()); \ | 48 StackZone zone(arguments->isolate()); \ |
52 HANDLESCOPE(arguments->isolate()); \ | |
53 SET_NATIVE_RETVAL(arguments, \ | 49 SET_NATIVE_RETVAL(arguments, \ |
54 DN_Helper##name(arguments->isolate(), arguments)); \ | 50 DN_Helper##name(arguments->isolate(), arguments)); \ |
55 if (FLAG_deoptimize_alot) DeoptimizeAll(); \ | 51 DEOPTIMIZE_ALOT; \ |
56 } \ | 52 } \ |
57 VERIFY_ON_TRANSITION; \ | 53 VERIFY_ON_TRANSITION; \ |
58 } \ | 54 } \ |
59 static RawObject* DN_Helper##name(Isolate* isolate, \ | 55 static RawObject* DN_Helper##name(Isolate* isolate, \ |
60 NativeArguments* arguments) | 56 NativeArguments* arguments) |
61 | 57 |
62 | 58 |
63 // Natives should throw an exception if an illegal argument or null is passed. | 59 // Natives should throw an exception if an illegal argument or null is passed. |
64 // type name = value. | 60 // type name = value. |
65 #define GET_NON_NULL_NATIVE_ARGUMENT(type, name, value) \ | 61 #define GET_NON_NULL_NATIVE_ARGUMENT(type, name, value) \ |
(...skipping 19 matching lines...) Expand all Loading... |
85 __args__.SetAt(0, __##name##_instance__); \ | 81 __args__.SetAt(0, __##name##_instance__); \ |
86 Exceptions::ThrowByType(Exceptions::kArgument, __args__); \ | 82 Exceptions::ThrowByType(Exceptions::kArgument, __args__); \ |
87 } \ | 83 } \ |
88 } \ | 84 } \ |
89 name ^= value; | 85 name ^= value; |
90 | 86 |
91 | 87 |
92 // Helper class for resolving and handling native functions. | 88 // Helper class for resolving and handling native functions. |
93 class NativeEntry : public AllStatic { | 89 class NativeEntry : public AllStatic { |
94 public: | 90 public: |
| 91 static const intptr_t kNumCallWrapperArguments = 2; |
| 92 |
95 // Resolve specified dart native function to the actual native entrypoint. | 93 // Resolve specified dart native function to the actual native entrypoint. |
96 static NativeFunction ResolveNative(const Class& cls, | 94 static NativeFunction ResolveNative(const Library& library, |
97 const String& function_name, | 95 const String& function_name, |
98 int number_of_arguments); | 96 int number_of_arguments); |
| 97 static void NativeCallWrapper(Dart_NativeArguments args, |
| 98 Dart_NativeFunction func); |
| 99 static const ExternalLabel& NativeCallWrapperLabel(); |
99 }; | 100 }; |
100 | 101 |
101 } // namespace dart | 102 } // namespace dart |
102 | 103 |
103 #endif // VM_NATIVE_ENTRY_H_ | 104 #endif // VM_NATIVE_ENTRY_H_ |
OLD | NEW |