1 /*
2 * Copyright (C) 2012 The Android Open Source Project
3 *
4 * Licensed under the Apache License, Version 2.0 (the "License");
5 * you may not use this file except in compliance with the License.
6 * You may obtain a copy of the License at
7 *
8 * http://www.apache.org/licenses/LICENSE-2.0
9 *
10 * Unless required by applicable law or agreed to in writing, software
11 * distributed under the License is distributed on an "AS IS" BASIS,
12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13 * See the License for the specific language governing permissions and
14 * limitations under the License.
15 */
16
17 #include <math.h>
18 #include <string.h>
19
20 #include "arch/arm/asm_support_arm.h"
21 #include "base/bit_utils.h"
22 #include "entrypoints/entrypoint_utils.h"
23 #include "entrypoints/jni/jni_entrypoints.h"
24 #include "entrypoints/quick/quick_alloc_entrypoints.h"
25 #include "entrypoints/quick/quick_default_externs.h"
26 #include "entrypoints/quick/quick_default_init_entrypoints.h"
27 #include "entrypoints/quick/quick_entrypoints.h"
28 #include "entrypoints/quick/runtime_entrypoints_list.h"
29 #include "entrypoints/runtime_asm_entrypoints.h"
30 #include "interpreter/interpreter.h"
31
32 namespace art HIDDEN {
33
34 // Read barrier entrypoints.
35 // art_quick_read_barrier_mark_regX uses an non-standard calling
36 // convention: it expects its input in register X and returns its
37 // result in that same register, and saves and restores all
38 // caller-save registers.
39 extern "C" mirror::Object* art_quick_read_barrier_mark_reg00(mirror::Object*);
40 extern "C" mirror::Object* art_quick_read_barrier_mark_reg01(mirror::Object*);
41 extern "C" mirror::Object* art_quick_read_barrier_mark_reg02(mirror::Object*);
42 extern "C" mirror::Object* art_quick_read_barrier_mark_reg03(mirror::Object*);
43 extern "C" mirror::Object* art_quick_read_barrier_mark_reg04(mirror::Object*);
44 extern "C" mirror::Object* art_quick_read_barrier_mark_reg05(mirror::Object*);
45 extern "C" mirror::Object* art_quick_read_barrier_mark_reg06(mirror::Object*);
46 extern "C" mirror::Object* art_quick_read_barrier_mark_reg07(mirror::Object*);
47 extern "C" mirror::Object* art_quick_read_barrier_mark_reg08(mirror::Object*);
48 extern "C" mirror::Object* art_quick_read_barrier_mark_reg09(mirror::Object*);
49 extern "C" mirror::Object* art_quick_read_barrier_mark_reg10(mirror::Object*);
50 extern "C" mirror::Object* art_quick_read_barrier_mark_reg11(mirror::Object*);
51 extern "C" mirror::Object* art_quick_read_barrier_mark_reg12(mirror::Object*);
52
53 extern "C" mirror::Object* art_quick_read_barrier_mark_introspection(mirror::Object*);
54 extern "C" mirror::Object* art_quick_read_barrier_mark_introspection_narrow(mirror::Object*);
55 extern "C" mirror::Object* art_quick_read_barrier_mark_introspection_arrays(mirror::Object*);
56 extern "C" mirror::Object* art_quick_read_barrier_mark_introspection_gc_roots_wide(mirror::Object*);
57 extern "C" mirror::Object* art_quick_read_barrier_mark_introspection_gc_roots_narrow(
58 mirror::Object*);
59 extern "C" mirror::Object* art_quick_read_barrier_mark_introspection_intrinsic_cas(mirror::Object*);
60
61 // Used by soft float.
62 // Single-precision FP arithmetics.
63 extern "C" float fmodf(float a, float b); // REM_FLOAT[_2ADDR]
64 // Double-precision FP arithmetics.
65 extern "C" double fmod(double a, double b); // REM_DOUBLE[_2ADDR]
66
67 // Used by hard float.
68 extern "C" float art_quick_fmodf(float a, float b); // REM_FLOAT[_2ADDR]
69 extern "C" double art_quick_fmod(double a, double b); // REM_DOUBLE[_2ADDR]
70
71 // Integer arithmetics.
72 extern "C" int __aeabi_idivmod(int32_t, int32_t); // [DIV|REM]_INT[_2ADDR|_LIT8|_LIT16]
73
74 // Long long arithmetics - REM_LONG[_2ADDR] and DIV_LONG[_2ADDR]
75 extern "C" int64_t __aeabi_ldivmod(int64_t, int64_t);
76
UpdateReadBarrierEntrypoints(QuickEntryPoints * qpoints,bool is_active)77 void UpdateReadBarrierEntrypoints(QuickEntryPoints* qpoints, bool is_active) {
78 qpoints->SetReadBarrierMarkReg00(is_active ? art_quick_read_barrier_mark_reg00 : nullptr);
79 qpoints->SetReadBarrierMarkReg01(is_active ? art_quick_read_barrier_mark_reg01 : nullptr);
80 qpoints->SetReadBarrierMarkReg02(is_active ? art_quick_read_barrier_mark_reg02 : nullptr);
81 qpoints->SetReadBarrierMarkReg03(is_active ? art_quick_read_barrier_mark_reg03 : nullptr);
82 qpoints->SetReadBarrierMarkReg04(is_active ? art_quick_read_barrier_mark_reg04 : nullptr);
83 qpoints->SetReadBarrierMarkReg05(is_active ? art_quick_read_barrier_mark_reg05 : nullptr);
84 qpoints->SetReadBarrierMarkReg06(is_active ? art_quick_read_barrier_mark_reg06 : nullptr);
85 qpoints->SetReadBarrierMarkReg07(is_active ? art_quick_read_barrier_mark_reg07 : nullptr);
86 qpoints->SetReadBarrierMarkReg08(is_active ? art_quick_read_barrier_mark_reg08 : nullptr);
87 qpoints->SetReadBarrierMarkReg09(is_active ? art_quick_read_barrier_mark_reg09 : nullptr);
88 qpoints->SetReadBarrierMarkReg10(is_active ? art_quick_read_barrier_mark_reg10 : nullptr);
89 qpoints->SetReadBarrierMarkReg11(is_active ? art_quick_read_barrier_mark_reg11 : nullptr);
90
91 if (gUseReadBarrier && kUseBakerReadBarrier) {
92 // For the alignment check, strip the Thumb mode bit.
93 DCHECK_ALIGNED(reinterpret_cast<intptr_t>(art_quick_read_barrier_mark_introspection) - 1u,
94 256u);
95 // Check the field narrow entrypoint offset from the introspection entrypoint.
96 intptr_t narrow_diff =
97 reinterpret_cast<intptr_t>(art_quick_read_barrier_mark_introspection_narrow) -
98 reinterpret_cast<intptr_t>(art_quick_read_barrier_mark_introspection);
99 DCHECK_EQ(BAKER_MARK_INTROSPECTION_FIELD_LDR_NARROW_ENTRYPOINT_OFFSET, narrow_diff);
100 // Check array switch cases offsets from the introspection entrypoint.
101 intptr_t array_diff =
102 reinterpret_cast<intptr_t>(art_quick_read_barrier_mark_introspection_arrays) -
103 reinterpret_cast<intptr_t>(art_quick_read_barrier_mark_introspection);
104 DCHECK_EQ(BAKER_MARK_INTROSPECTION_ARRAY_SWITCH_OFFSET, array_diff);
105 // Check the GC root entrypoint offsets from the introspection entrypoint.
106 intptr_t gc_roots_wide_diff =
107 reinterpret_cast<intptr_t>(art_quick_read_barrier_mark_introspection_gc_roots_wide) -
108 reinterpret_cast<intptr_t>(art_quick_read_barrier_mark_introspection);
109 DCHECK_EQ(BAKER_MARK_INTROSPECTION_GC_ROOT_LDR_WIDE_ENTRYPOINT_OFFSET, gc_roots_wide_diff);
110 intptr_t gc_roots_narrow_diff =
111 reinterpret_cast<intptr_t>(art_quick_read_barrier_mark_introspection_gc_roots_narrow) -
112 reinterpret_cast<intptr_t>(art_quick_read_barrier_mark_introspection);
113 DCHECK_EQ(BAKER_MARK_INTROSPECTION_GC_ROOT_LDR_NARROW_ENTRYPOINT_OFFSET, gc_roots_narrow_diff);
114 intptr_t intrinsic_cas_diff =
115 reinterpret_cast<intptr_t>(art_quick_read_barrier_mark_introspection_intrinsic_cas) -
116 reinterpret_cast<intptr_t>(art_quick_read_barrier_mark_introspection);
117 DCHECK_EQ(BAKER_MARK_INTROSPECTION_INTRINSIC_CAS_ENTRYPOINT_OFFSET, intrinsic_cas_diff);
118 // The register 12, i.e. IP, is reserved, so there is no art_quick_read_barrier_mark_reg12.
119 // We're using the entry to hold a pointer to the introspection entrypoint instead.
120 qpoints->SetReadBarrierMarkReg12(
121 is_active ? art_quick_read_barrier_mark_introspection : nullptr);
122 }
123 }
124
InitEntryPoints(JniEntryPoints * jpoints,QuickEntryPoints * qpoints,bool monitor_jni_entry_exit)125 void InitEntryPoints(JniEntryPoints* jpoints,
126 QuickEntryPoints* qpoints,
127 bool monitor_jni_entry_exit) {
128 DefaultInitEntryPoints(jpoints, qpoints, monitor_jni_entry_exit);
129
130 // Cast
131 qpoints->SetInstanceofNonTrivial(artInstanceOfFromCode);
132 qpoints->SetCheckInstanceOf(art_quick_check_instance_of);
133
134 // Math
135 qpoints->SetIdivmod(__aeabi_idivmod);
136 qpoints->SetLdiv(__aeabi_ldivmod);
137 qpoints->SetLmod(__aeabi_ldivmod); // result returned in r2:r3
138 qpoints->SetLmul(art_quick_mul_long);
139 qpoints->SetShlLong(art_quick_shl_long);
140 qpoints->SetShrLong(art_quick_shr_long);
141 qpoints->SetUshrLong(art_quick_ushr_long);
142 qpoints->SetFmod(art_quick_fmod);
143 qpoints->SetFmodf(art_quick_fmodf);
144 qpoints->SetD2l(art_quick_d2l);
145 qpoints->SetF2l(art_quick_f2l);
146 qpoints->SetL2f(art_quick_l2f);
147
148 // More math.
149 qpoints->SetCos(cos);
150 qpoints->SetSin(sin);
151 qpoints->SetAcos(acos);
152 qpoints->SetAsin(asin);
153 qpoints->SetAtan(atan);
154 qpoints->SetAtan2(atan2);
155 qpoints->SetPow(pow);
156 qpoints->SetCbrt(cbrt);
157 qpoints->SetCosh(cosh);
158 qpoints->SetExp(exp);
159 qpoints->SetExpm1(expm1);
160 qpoints->SetHypot(hypot);
161 qpoints->SetLog(log);
162 qpoints->SetLog10(log10);
163 qpoints->SetNextAfter(nextafter);
164 qpoints->SetSinh(sinh);
165 qpoints->SetTan(tan);
166 qpoints->SetTanh(tanh);
167
168 // Intrinsics
169 qpoints->SetIndexOf(art_quick_indexof);
170 // The ARM StringCompareTo intrinsic does not call the runtime.
171 qpoints->SetStringCompareTo(nullptr);
172 qpoints->SetMemcpy(memcpy);
173
174 // Read barrier.
175 UpdateReadBarrierEntrypoints(qpoints, /*is_active=*/ false);
176 qpoints->SetReadBarrierMarkReg12(nullptr); // Cannot use register 12 (IP) to pass arguments.
177 qpoints->SetReadBarrierMarkReg13(nullptr); // Cannot use register 13 (SP) to pass arguments.
178 qpoints->SetReadBarrierMarkReg14(nullptr); // Cannot use register 14 (LR) to pass arguments.
179 qpoints->SetReadBarrierMarkReg15(nullptr); // Cannot use register 15 (PC) to pass arguments.
180 // ARM has only 16 core registers.
181 qpoints->SetReadBarrierMarkReg16(nullptr);
182 qpoints->SetReadBarrierMarkReg17(nullptr);
183 qpoints->SetReadBarrierMarkReg18(nullptr);
184 qpoints->SetReadBarrierMarkReg19(nullptr);
185 qpoints->SetReadBarrierMarkReg20(nullptr);
186 qpoints->SetReadBarrierMarkReg21(nullptr);
187 qpoints->SetReadBarrierMarkReg22(nullptr);
188 qpoints->SetReadBarrierMarkReg23(nullptr);
189 qpoints->SetReadBarrierMarkReg24(nullptr);
190 qpoints->SetReadBarrierMarkReg25(nullptr);
191 qpoints->SetReadBarrierMarkReg26(nullptr);
192 qpoints->SetReadBarrierMarkReg27(nullptr);
193 qpoints->SetReadBarrierMarkReg28(nullptr);
194 qpoints->SetReadBarrierMarkReg29(nullptr);
195 qpoints->SetReadBarrierSlow(artReadBarrierSlow);
196 qpoints->SetReadBarrierForRootSlow(artReadBarrierForRootSlow);
197 }
198
UpdateLowOverheadTraceEntrypoints(QuickEntryPoints * qpoints,bool enable)199 void UpdateLowOverheadTraceEntrypoints([[maybe_unused]] QuickEntryPoints* qpoints,
200 [[maybe_unused]] bool enable) {
201 // This is a nop on this architecture. Low overhead tracing is only implemented for ARM64.
202 }
203
204 } // namespace art
205