blob: 8b9a686ece0f65c095590a11f9519819d77cd8c1 [file] [log] [blame]
Brian Carlstrom7940e442013-07-12 13:46:57 -07001/*
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 */
Brian Carlstrom7940e442013-07-12 13:46:57 -070016#include "dex/compiler_ir.h"
17#include "dex/compiler_internals.h"
Brian Carlstrom60d7a652014-03-13 18:10:08 -070018#include "dex/quick/arm/arm_lir.h"
Brian Carlstrom7940e442013-07-12 13:46:57 -070019#include "dex/quick/mir_to_lir-inl.h"
Ian Rogers166db042013-07-26 12:05:57 -070020#include "entrypoints/quick/quick_entrypoints.h"
Brian Carlstrom7940e442013-07-12 13:46:57 -070021#include "mirror/array.h"
Andreas Gampe9c3b0892014-04-24 17:33:34 +000022#include "mirror/object_array-inl.h"
Hiroshi Yamauchibe1ca552014-01-15 11:46:48 -080023#include "mirror/object-inl.h"
Brian Carlstrom7940e442013-07-12 13:46:57 -070024#include "verifier/method_verifier.h"
Dave Allisonbcec6fb2014-01-17 12:52:22 -080025#include <functional>
Brian Carlstrom7940e442013-07-12 13:46:57 -070026
27namespace art {
28
Andreas Gampe9c3b0892014-04-24 17:33:34 +000029// Shortcuts to repeatedly used long types.
30typedef mirror::ObjectArray<mirror::Object> ObjArray;
31typedef mirror::ObjectArray<mirror::Class> ClassArray;
32
Brian Carlstrom7940e442013-07-12 13:46:57 -070033/*
34 * This source files contains "gen" codegen routines that should
35 * be applicable to most targets. Only mid-level support utilities
36 * and "op" calls may be used here.
37 */
38
39/*
buzbeeb48819d2013-09-14 16:15:25 -070040 * Generate a kPseudoBarrier marker to indicate the boundary of special
Brian Carlstrom7940e442013-07-12 13:46:57 -070041 * blocks.
42 */
Brian Carlstrom2ce745c2013-07-17 17:44:30 -070043void Mir2Lir::GenBarrier() {
Brian Carlstrom7940e442013-07-12 13:46:57 -070044 LIR* barrier = NewLIR0(kPseudoBarrier);
45 /* Mark all resources as being clobbered */
buzbeeb48819d2013-09-14 16:15:25 -070046 DCHECK(!barrier->flags.use_def_invalid);
47 barrier->u.m.def_mask = ENCODE_ALL;
Brian Carlstrom7940e442013-07-12 13:46:57 -070048}
49
Mingyao Yange643a172014-04-08 11:02:52 -070050void Mir2Lir::GenDivZeroException() {
51 LIR* branch = OpUnconditionalBranch(nullptr);
52 AddDivZeroCheckSlowPath(branch);
53}
54
55void Mir2Lir::GenDivZeroCheck(ConditionCode c_code) {
Mingyao Yang42894562014-04-07 12:42:16 -070056 LIR* branch = OpCondBranch(c_code, nullptr);
57 AddDivZeroCheckSlowPath(branch);
58}
59
Mingyao Yange643a172014-04-08 11:02:52 -070060void Mir2Lir::GenDivZeroCheck(RegStorage reg) {
61 LIR* branch = OpCmpImmBranch(kCondEq, reg, 0, nullptr);
Mingyao Yang42894562014-04-07 12:42:16 -070062 AddDivZeroCheckSlowPath(branch);
63}
64
65void Mir2Lir::AddDivZeroCheckSlowPath(LIR* branch) {
66 class DivZeroCheckSlowPath : public Mir2Lir::LIRSlowPath {
67 public:
68 DivZeroCheckSlowPath(Mir2Lir* m2l, LIR* branch)
69 : LIRSlowPath(m2l, m2l->GetCurrentDexPc(), branch) {
70 }
71
Mingyao Yange643a172014-04-08 11:02:52 -070072 void Compile() OVERRIDE {
Mingyao Yang42894562014-04-07 12:42:16 -070073 m2l_->ResetRegPool();
74 m2l_->ResetDefTracking();
Mingyao Yang6ffcfa02014-04-25 11:06:00 -070075 GenerateTargetLabel(kPseudoThrowTarget);
Mingyao Yang42894562014-04-07 12:42:16 -070076 m2l_->CallRuntimeHelper(QUICK_ENTRYPOINT_OFFSET(4, pThrowDivZero), true);
77 }
78 };
79
80 AddSlowPath(new (arena_) DivZeroCheckSlowPath(this, branch));
81}
Dave Allisonb373e092014-02-20 16:06:36 -080082
Mingyao Yang80365d92014-04-18 12:10:58 -070083void Mir2Lir::GenArrayBoundsCheck(RegStorage index, RegStorage length) {
84 class ArrayBoundsCheckSlowPath : public Mir2Lir::LIRSlowPath {
85 public:
86 ArrayBoundsCheckSlowPath(Mir2Lir* m2l, LIR* branch, RegStorage index, RegStorage length)
87 : LIRSlowPath(m2l, m2l->GetCurrentDexPc(), branch),
88 index_(index), length_(length) {
89 }
90
91 void Compile() OVERRIDE {
92 m2l_->ResetRegPool();
93 m2l_->ResetDefTracking();
Mingyao Yang6ffcfa02014-04-25 11:06:00 -070094 GenerateTargetLabel(kPseudoThrowTarget);
Mingyao Yang80365d92014-04-18 12:10:58 -070095 m2l_->CallRuntimeHelperRegReg(QUICK_ENTRYPOINT_OFFSET(4, pThrowArrayBounds),
96 index_, length_, true);
97 }
98
99 private:
100 const RegStorage index_;
101 const RegStorage length_;
102 };
103
104 LIR* branch = OpCmpBranch(kCondUge, index, length, nullptr);
105 AddSlowPath(new (arena_) ArrayBoundsCheckSlowPath(this, branch, index, length));
106}
107
108void Mir2Lir::GenArrayBoundsCheck(int index, RegStorage length) {
109 class ArrayBoundsCheckSlowPath : public Mir2Lir::LIRSlowPath {
110 public:
111 ArrayBoundsCheckSlowPath(Mir2Lir* m2l, LIR* branch, int index, RegStorage length)
112 : LIRSlowPath(m2l, m2l->GetCurrentDexPc(), branch),
113 index_(index), length_(length) {
114 }
115
116 void Compile() OVERRIDE {
117 m2l_->ResetRegPool();
118 m2l_->ResetDefTracking();
Mingyao Yang6ffcfa02014-04-25 11:06:00 -0700119 GenerateTargetLabel(kPseudoThrowTarget);
Mingyao Yang80365d92014-04-18 12:10:58 -0700120
121 m2l_->OpRegCopy(m2l_->TargetReg(kArg1), length_);
122 m2l_->LoadConstant(m2l_->TargetReg(kArg0), index_);
123 m2l_->CallRuntimeHelperRegReg(QUICK_ENTRYPOINT_OFFSET(4, pThrowArrayBounds),
124 m2l_->TargetReg(kArg0), m2l_->TargetReg(kArg1), true);
125 }
126
127 private:
128 const int32_t index_;
129 const RegStorage length_;
130 };
131
132 LIR* branch = OpCmpImmBranch(kCondLs, length, index, nullptr);
133 AddSlowPath(new (arena_) ArrayBoundsCheckSlowPath(this, branch, index, length));
134}
135
Mingyao Yange643a172014-04-08 11:02:52 -0700136LIR* Mir2Lir::GenNullCheck(RegStorage reg) {
137 class NullCheckSlowPath : public Mir2Lir::LIRSlowPath {
138 public:
139 NullCheckSlowPath(Mir2Lir* m2l, LIR* branch)
140 : LIRSlowPath(m2l, m2l->GetCurrentDexPc(), branch) {
141 }
142
143 void Compile() OVERRIDE {
144 m2l_->ResetRegPool();
145 m2l_->ResetDefTracking();
Mingyao Yang6ffcfa02014-04-25 11:06:00 -0700146 GenerateTargetLabel(kPseudoThrowTarget);
Mingyao Yange643a172014-04-08 11:02:52 -0700147 m2l_->CallRuntimeHelper(QUICK_ENTRYPOINT_OFFSET(4, pThrowNullPointer), true);
148 }
149 };
150
151 LIR* branch = OpCmpImmBranch(kCondEq, reg, 0, nullptr);
152 AddSlowPath(new (arena_) NullCheckSlowPath(this, branch));
153 return branch;
154}
155
Brian Carlstrom7940e442013-07-12 13:46:57 -0700156/* Perform null-check on a register. */
buzbee2700f7e2014-03-07 09:46:20 -0800157LIR* Mir2Lir::GenNullCheck(RegStorage m_reg, int opt_flags) {
Dave Allisonb373e092014-02-20 16:06:36 -0800158 if (Runtime::Current()->ExplicitNullChecks()) {
Dave Allisonf9439142014-03-27 15:10:22 -0700159 return GenExplicitNullCheck(m_reg, opt_flags);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700160 }
Dave Allisonb373e092014-02-20 16:06:36 -0800161 return nullptr;
162}
163
Dave Allisonf9439142014-03-27 15:10:22 -0700164/* Perform an explicit null-check on a register. */
165LIR* Mir2Lir::GenExplicitNullCheck(RegStorage m_reg, int opt_flags) {
166 if (!(cu_->disable_opt & (1 << kNullCheckElimination)) && (opt_flags & MIR_IGNORE_NULL_CHECK)) {
167 return NULL;
168 }
Mingyao Yange643a172014-04-08 11:02:52 -0700169 return GenNullCheck(m_reg);
Dave Allisonf9439142014-03-27 15:10:22 -0700170}
171
Dave Allisonb373e092014-02-20 16:06:36 -0800172void Mir2Lir::MarkPossibleNullPointerException(int opt_flags) {
173 if (!Runtime::Current()->ExplicitNullChecks()) {
174 if (!(cu_->disable_opt & (1 << kNullCheckElimination)) && (opt_flags & MIR_IGNORE_NULL_CHECK)) {
175 return;
176 }
177 MarkSafepointPC(last_lir_insn_);
178 }
179}
180
181void Mir2Lir::MarkPossibleStackOverflowException() {
182 if (!Runtime::Current()->ExplicitStackOverflowChecks()) {
183 MarkSafepointPC(last_lir_insn_);
184 }
185}
186
buzbee2700f7e2014-03-07 09:46:20 -0800187void Mir2Lir::ForceImplicitNullCheck(RegStorage reg, int opt_flags) {
Dave Allisonb373e092014-02-20 16:06:36 -0800188 if (!Runtime::Current()->ExplicitNullChecks()) {
189 if (!(cu_->disable_opt & (1 << kNullCheckElimination)) && (opt_flags & MIR_IGNORE_NULL_CHECK)) {
190 return;
191 }
192 // Force an implicit null check by performing a memory operation (load) from the given
193 // register with offset 0. This will cause a signal if the register contains 0 (null).
buzbee2700f7e2014-03-07 09:46:20 -0800194 RegStorage tmp = AllocTemp();
195 // TODO: for Mips, would be best to use rZERO as the bogus register target.
buzbee695d13a2014-04-19 13:32:20 -0700196 LIR* load = Load32Disp(reg, 0, tmp);
Dave Allisonb373e092014-02-20 16:06:36 -0800197 FreeTemp(tmp);
198 MarkSafepointPC(load);
199 }
Brian Carlstrom7940e442013-07-12 13:46:57 -0700200}
201
Brian Carlstrom7940e442013-07-12 13:46:57 -0700202void Mir2Lir::GenCompareAndBranch(Instruction::Code opcode, RegLocation rl_src1,
203 RegLocation rl_src2, LIR* taken,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700204 LIR* fall_through) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700205 ConditionCode cond;
206 switch (opcode) {
207 case Instruction::IF_EQ:
208 cond = kCondEq;
209 break;
210 case Instruction::IF_NE:
211 cond = kCondNe;
212 break;
213 case Instruction::IF_LT:
214 cond = kCondLt;
215 break;
216 case Instruction::IF_GE:
217 cond = kCondGe;
218 break;
219 case Instruction::IF_GT:
220 cond = kCondGt;
221 break;
222 case Instruction::IF_LE:
223 cond = kCondLe;
224 break;
225 default:
226 cond = static_cast<ConditionCode>(0);
227 LOG(FATAL) << "Unexpected opcode " << opcode;
228 }
229
230 // Normalize such that if either operand is constant, src2 will be constant
231 if (rl_src1.is_const) {
232 RegLocation rl_temp = rl_src1;
233 rl_src1 = rl_src2;
234 rl_src2 = rl_temp;
235 cond = FlipComparisonOrder(cond);
236 }
237
238 rl_src1 = LoadValue(rl_src1, kCoreReg);
239 // Is this really an immediate comparison?
240 if (rl_src2.is_const) {
241 // If it's already live in a register or not easily materialized, just keep going
242 RegLocation rl_temp = UpdateLoc(rl_src2);
243 if ((rl_temp.location == kLocDalvikFrame) &&
244 InexpensiveConstantInt(mir_graph_->ConstantValue(rl_src2))) {
245 // OK - convert this to a compare immediate and branch
buzbee2700f7e2014-03-07 09:46:20 -0800246 OpCmpImmBranch(cond, rl_src1.reg, mir_graph_->ConstantValue(rl_src2), taken);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700247 return;
248 }
249 }
250 rl_src2 = LoadValue(rl_src2, kCoreReg);
buzbee2700f7e2014-03-07 09:46:20 -0800251 OpCmpBranch(cond, rl_src1.reg, rl_src2.reg, taken);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700252}
253
254void Mir2Lir::GenCompareZeroAndBranch(Instruction::Code opcode, RegLocation rl_src, LIR* taken,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700255 LIR* fall_through) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700256 ConditionCode cond;
257 rl_src = LoadValue(rl_src, kCoreReg);
258 switch (opcode) {
259 case Instruction::IF_EQZ:
260 cond = kCondEq;
261 break;
262 case Instruction::IF_NEZ:
263 cond = kCondNe;
264 break;
265 case Instruction::IF_LTZ:
266 cond = kCondLt;
267 break;
268 case Instruction::IF_GEZ:
269 cond = kCondGe;
270 break;
271 case Instruction::IF_GTZ:
272 cond = kCondGt;
273 break;
274 case Instruction::IF_LEZ:
275 cond = kCondLe;
276 break;
277 default:
278 cond = static_cast<ConditionCode>(0);
279 LOG(FATAL) << "Unexpected opcode " << opcode;
280 }
buzbee2700f7e2014-03-07 09:46:20 -0800281 OpCmpImmBranch(cond, rl_src.reg, 0, taken);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700282}
283
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700284void Mir2Lir::GenIntToLong(RegLocation rl_dest, RegLocation rl_src) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700285 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
286 if (rl_src.location == kLocPhysReg) {
buzbee2700f7e2014-03-07 09:46:20 -0800287 OpRegCopy(rl_result.reg, rl_src.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700288 } else {
buzbee2700f7e2014-03-07 09:46:20 -0800289 LoadValueDirect(rl_src, rl_result.reg.GetLow());
Brian Carlstrom7940e442013-07-12 13:46:57 -0700290 }
buzbee2700f7e2014-03-07 09:46:20 -0800291 OpRegRegImm(kOpAsr, rl_result.reg.GetHigh(), rl_result.reg.GetLow(), 31);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700292 StoreValueWide(rl_dest, rl_result);
293}
294
295void Mir2Lir::GenIntNarrowing(Instruction::Code opcode, RegLocation rl_dest,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700296 RegLocation rl_src) {
Brian Carlstrom6f485c62013-07-18 15:35:35 -0700297 rl_src = LoadValue(rl_src, kCoreReg);
298 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
299 OpKind op = kOpInvalid;
300 switch (opcode) {
301 case Instruction::INT_TO_BYTE:
302 op = kOp2Byte;
303 break;
304 case Instruction::INT_TO_SHORT:
305 op = kOp2Short;
Brian Carlstrom7940e442013-07-12 13:46:57 -0700306 break;
Brian Carlstrom6f485c62013-07-18 15:35:35 -0700307 case Instruction::INT_TO_CHAR:
308 op = kOp2Char;
309 break;
310 default:
311 LOG(ERROR) << "Bad int conversion type";
312 }
buzbee2700f7e2014-03-07 09:46:20 -0800313 OpRegReg(op, rl_result.reg, rl_src.reg);
Brian Carlstrom6f485c62013-07-18 15:35:35 -0700314 StoreValue(rl_dest, rl_result);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700315}
316
317/*
318 * Let helper function take care of everything. Will call
319 * Array::AllocFromCode(type_idx, method, count);
320 * Note: AllocFromCode will handle checks for errNegativeArraySize.
321 */
322void Mir2Lir::GenNewArray(uint32_t type_idx, RegLocation rl_dest,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700323 RegLocation rl_src) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700324 FlushAllRegs(); /* Everything to home location */
Ian Rogersdd7624d2014-03-14 17:43:00 -0700325 ThreadOffset<4> func_offset(-1);
Hiroshi Yamauchibb8f0ab2014-01-27 16:50:29 -0800326 const DexFile* dex_file = cu_->dex_file;
327 CompilerDriver* driver = cu_->compiler_driver;
328 if (cu_->compiler_driver->CanAccessTypeWithoutChecks(cu_->method_idx, *dex_file,
Brian Carlstrom7940e442013-07-12 13:46:57 -0700329 type_idx)) {
Hiroshi Yamauchibb8f0ab2014-01-27 16:50:29 -0800330 bool is_type_initialized; // Ignored as an array does not have an initializer.
331 bool use_direct_type_ptr;
332 uintptr_t direct_type_ptr;
333 if (kEmbedClassInCode &&
334 driver->CanEmbedTypeInCode(*dex_file, type_idx,
335 &is_type_initialized, &use_direct_type_ptr, &direct_type_ptr)) {
336 // The fast path.
337 if (!use_direct_type_ptr) {
Mark Mendell55d0eac2014-02-06 11:02:52 -0800338 LoadClassType(type_idx, kArg0);
Ian Rogersdd7624d2014-03-14 17:43:00 -0700339 func_offset = QUICK_ENTRYPOINT_OFFSET(4, pAllocArrayResolved);
Hiroshi Yamauchibb8f0ab2014-01-27 16:50:29 -0800340 CallRuntimeHelperRegMethodRegLocation(func_offset, TargetReg(kArg0), rl_src, true);
341 } else {
342 // Use the direct pointer.
Ian Rogersdd7624d2014-03-14 17:43:00 -0700343 func_offset = QUICK_ENTRYPOINT_OFFSET(4, pAllocArrayResolved);
Hiroshi Yamauchibb8f0ab2014-01-27 16:50:29 -0800344 CallRuntimeHelperImmMethodRegLocation(func_offset, direct_type_ptr, rl_src, true);
345 }
346 } else {
347 // The slow path.
348 DCHECK_EQ(func_offset.Int32Value(), -1);
Ian Rogersdd7624d2014-03-14 17:43:00 -0700349 func_offset = QUICK_ENTRYPOINT_OFFSET(4, pAllocArray);
Hiroshi Yamauchibb8f0ab2014-01-27 16:50:29 -0800350 CallRuntimeHelperImmMethodRegLocation(func_offset, type_idx, rl_src, true);
351 }
352 DCHECK_NE(func_offset.Int32Value(), -1);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700353 } else {
Ian Rogersdd7624d2014-03-14 17:43:00 -0700354 func_offset= QUICK_ENTRYPOINT_OFFSET(4, pAllocArrayWithAccessCheck);
Hiroshi Yamauchibb8f0ab2014-01-27 16:50:29 -0800355 CallRuntimeHelperImmMethodRegLocation(func_offset, type_idx, rl_src, true);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700356 }
Brian Carlstrom7940e442013-07-12 13:46:57 -0700357 RegLocation rl_result = GetReturn(false);
358 StoreValue(rl_dest, rl_result);
359}
360
361/*
362 * Similar to GenNewArray, but with post-allocation initialization.
363 * Verifier guarantees we're dealing with an array class. Current
364 * code throws runtime exception "bad Filled array req" for 'D' and 'J'.
365 * Current code also throws internal unimp if not 'L', '[' or 'I'.
366 */
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700367void Mir2Lir::GenFilledNewArray(CallInfo* info) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700368 int elems = info->num_arg_words;
369 int type_idx = info->index;
370 FlushAllRegs(); /* Everything to home location */
Ian Rogersdd7624d2014-03-14 17:43:00 -0700371 ThreadOffset<4> func_offset(-1);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700372 if (cu_->compiler_driver->CanAccessTypeWithoutChecks(cu_->method_idx, *cu_->dex_file,
373 type_idx)) {
Ian Rogersdd7624d2014-03-14 17:43:00 -0700374 func_offset = QUICK_ENTRYPOINT_OFFSET(4, pCheckAndAllocArray);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700375 } else {
Ian Rogersdd7624d2014-03-14 17:43:00 -0700376 func_offset = QUICK_ENTRYPOINT_OFFSET(4, pCheckAndAllocArrayWithAccessCheck);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700377 }
378 CallRuntimeHelperImmMethodImm(func_offset, type_idx, elems, true);
379 FreeTemp(TargetReg(kArg2));
380 FreeTemp(TargetReg(kArg1));
381 /*
382 * NOTE: the implicit target for Instruction::FILLED_NEW_ARRAY is the
383 * return region. Because AllocFromCode placed the new array
384 * in kRet0, we'll just lock it into place. When debugger support is
385 * added, it may be necessary to additionally copy all return
386 * values to a home location in thread-local storage
387 */
388 LockTemp(TargetReg(kRet0));
389
390 // TODO: use the correct component size, currently all supported types
391 // share array alignment with ints (see comment at head of function)
392 size_t component_size = sizeof(int32_t);
393
394 // Having a range of 0 is legal
395 if (info->is_range && (elems > 0)) {
396 /*
397 * Bit of ugliness here. We're going generate a mem copy loop
398 * on the register range, but it is possible that some regs
399 * in the range have been promoted. This is unlikely, but
400 * before generating the copy, we'll just force a flush
401 * of any regs in the source range that have been promoted to
402 * home location.
403 */
404 for (int i = 0; i < elems; i++) {
405 RegLocation loc = UpdateLoc(info->args[i]);
406 if (loc.location == kLocPhysReg) {
buzbee695d13a2014-04-19 13:32:20 -0700407 Store32Disp(TargetReg(kSp), SRegOffset(loc.s_reg_low), loc.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700408 }
409 }
410 /*
411 * TUNING note: generated code here could be much improved, but
412 * this is an uncommon operation and isn't especially performance
413 * critical.
414 */
buzbee2700f7e2014-03-07 09:46:20 -0800415 RegStorage r_src = AllocTemp();
416 RegStorage r_dst = AllocTemp();
417 RegStorage r_idx = AllocTemp();
418 RegStorage r_val;
Brian Carlstromdf629502013-07-17 22:39:56 -0700419 switch (cu_->instruction_set) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700420 case kThumb2:
421 r_val = TargetReg(kLr);
422 break;
423 case kX86:
Dmitry Petrochenko6a58cb12014-04-02 17:27:59 +0700424 case kX86_64:
Brian Carlstrom7940e442013-07-12 13:46:57 -0700425 FreeTemp(TargetReg(kRet0));
426 r_val = AllocTemp();
427 break;
428 case kMips:
429 r_val = AllocTemp();
430 break;
431 default: LOG(FATAL) << "Unexpected instruction set: " << cu_->instruction_set;
432 }
433 // Set up source pointer
434 RegLocation rl_first = info->args[0];
435 OpRegRegImm(kOpAdd, r_src, TargetReg(kSp), SRegOffset(rl_first.s_reg_low));
436 // Set up the target pointer
437 OpRegRegImm(kOpAdd, r_dst, TargetReg(kRet0),
438 mirror::Array::DataOffset(component_size).Int32Value());
439 // Set up the loop counter (known to be > 0)
440 LoadConstant(r_idx, elems - 1);
441 // Generate the copy loop. Going backwards for convenience
442 LIR* target = NewLIR0(kPseudoTargetLabel);
443 // Copy next element
buzbee695d13a2014-04-19 13:32:20 -0700444 LoadBaseIndexed(r_src, r_idx, r_val, 2, k32);
445 StoreBaseIndexed(r_dst, r_idx, r_val, 2, k32);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700446 FreeTemp(r_val);
447 OpDecAndBranch(kCondGe, r_idx, target);
Dmitry Petrochenko6a58cb12014-04-02 17:27:59 +0700448 if (cu_->instruction_set == kX86 || cu_->instruction_set == kX86_64) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700449 // Restore the target pointer
450 OpRegRegImm(kOpAdd, TargetReg(kRet0), r_dst,
451 -mirror::Array::DataOffset(component_size).Int32Value());
452 }
453 } else if (!info->is_range) {
454 // TUNING: interleave
455 for (int i = 0; i < elems; i++) {
456 RegLocation rl_arg = LoadValue(info->args[i], kCoreReg);
buzbee695d13a2014-04-19 13:32:20 -0700457 Store32Disp(TargetReg(kRet0),
458 mirror::Array::DataOffset(component_size).Int32Value() + i * 4, rl_arg.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700459 // If the LoadValue caused a temp to be allocated, free it
buzbee2700f7e2014-03-07 09:46:20 -0800460 if (IsTemp(rl_arg.reg)) {
461 FreeTemp(rl_arg.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700462 }
463 }
464 }
465 if (info->result.location != kLocInvalid) {
466 StoreValue(info->result, GetReturn(false /* not fp */));
467 }
468}
469
Dave Allisonbcec6fb2014-01-17 12:52:22 -0800470//
471// Slow path to ensure a class is initialized for sget/sput.
472//
473class StaticFieldSlowPath : public Mir2Lir::LIRSlowPath {
474 public:
buzbee2700f7e2014-03-07 09:46:20 -0800475 StaticFieldSlowPath(Mir2Lir* m2l, LIR* unresolved, LIR* uninit, LIR* cont, int storage_index,
476 RegStorage r_base) :
477 LIRSlowPath(m2l, m2l->GetCurrentDexPc(), unresolved, cont), uninit_(uninit),
478 storage_index_(storage_index), r_base_(r_base) {
Dave Allisonbcec6fb2014-01-17 12:52:22 -0800479 }
480
481 void Compile() {
482 LIR* unresolved_target = GenerateTargetLabel();
483 uninit_->target = unresolved_target;
Ian Rogersdd7624d2014-03-14 17:43:00 -0700484 m2l_->CallRuntimeHelperImm(QUICK_ENTRYPOINT_OFFSET(4, pInitializeStaticStorage),
buzbee2700f7e2014-03-07 09:46:20 -0800485 storage_index_, true);
Dave Allisonbcec6fb2014-01-17 12:52:22 -0800486 // Copy helper's result into r_base, a no-op on all but MIPS.
487 m2l_->OpRegCopy(r_base_, m2l_->TargetReg(kRet0));
488
489 m2l_->OpUnconditionalBranch(cont_);
490 }
491
492 private:
493 LIR* const uninit_;
494 const int storage_index_;
buzbee2700f7e2014-03-07 09:46:20 -0800495 const RegStorage r_base_;
Dave Allisonbcec6fb2014-01-17 12:52:22 -0800496};
497
Vladimir Markobe0e5462014-02-26 11:24:15 +0000498void Mir2Lir::GenSput(MIR* mir, RegLocation rl_src, bool is_long_or_double,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700499 bool is_object) {
Vladimir Markobe0e5462014-02-26 11:24:15 +0000500 const MirSFieldLoweringInfo& field_info = mir_graph_->GetSFieldLoweringInfo(mir);
501 cu_->compiler_driver->ProcessedStaticField(field_info.FastPut(), field_info.IsReferrersClass());
502 if (field_info.FastPut() && !SLOW_FIELD_PATH) {
503 DCHECK_GE(field_info.FieldOffset().Int32Value(), 0);
buzbee2700f7e2014-03-07 09:46:20 -0800504 RegStorage r_base;
Vladimir Markobe0e5462014-02-26 11:24:15 +0000505 if (field_info.IsReferrersClass()) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700506 // Fast path, static storage base is this method's class
507 RegLocation rl_method = LoadCurrMethod();
Ian Rogers5ddb4102014-01-07 08:58:46 -0800508 r_base = AllocTemp();
buzbee695d13a2014-04-19 13:32:20 -0700509 LoadRefDisp(rl_method.reg, mirror::ArtMethod::DeclaringClassOffset().Int32Value(), r_base);
buzbee2700f7e2014-03-07 09:46:20 -0800510 if (IsTemp(rl_method.reg)) {
511 FreeTemp(rl_method.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700512 }
513 } else {
514 // Medium path, static storage base in a different class which requires checks that the other
515 // class is initialized.
516 // TODO: remove initialized check now that we are initializing classes in the compiler driver.
Vladimir Markobe0e5462014-02-26 11:24:15 +0000517 DCHECK_NE(field_info.StorageIndex(), DexFile::kDexNoIndex);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700518 // May do runtime call so everything to home locations.
519 FlushAllRegs();
520 // Using fixed register to sync with possible call to runtime support.
buzbee2700f7e2014-03-07 09:46:20 -0800521 RegStorage r_method = TargetReg(kArg1);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700522 LockTemp(r_method);
523 LoadCurrMethodDirect(r_method);
Ian Rogers5ddb4102014-01-07 08:58:46 -0800524 r_base = TargetReg(kArg0);
525 LockTemp(r_base);
buzbee695d13a2014-04-19 13:32:20 -0700526 LoadRefDisp(r_method, mirror::ArtMethod::DexCacheResolvedTypesOffset().Int32Value(), r_base);
Andreas Gampe9c3b0892014-04-24 17:33:34 +0000527 int32_t offset_of_field = ObjArray::OffsetOfElement(field_info.StorageIndex()).Int32Value();
528 LoadRefDisp(r_base, offset_of_field, r_base);
Ian Rogers5ddb4102014-01-07 08:58:46 -0800529 // r_base now points at static storage (Class*) or NULL if the type is not yet resolved.
Vladimir Markobfea9c22014-01-17 17:49:33 +0000530 if (!field_info.IsInitialized() &&
531 (mir->optimization_flags & MIR_IGNORE_CLINIT_CHECK) == 0) {
Ian Rogers5ddb4102014-01-07 08:58:46 -0800532 // Check if r_base is NULL or a not yet initialized class.
Dave Allisonbcec6fb2014-01-17 12:52:22 -0800533
534 // The slow path is invoked if the r_base is NULL or the class pointed
535 // to by it is not initialized.
Ian Rogers5ddb4102014-01-07 08:58:46 -0800536 LIR* unresolved_branch = OpCmpImmBranch(kCondEq, r_base, 0, NULL);
buzbee2700f7e2014-03-07 09:46:20 -0800537 RegStorage r_tmp = TargetReg(kArg2);
Ian Rogers5ddb4102014-01-07 08:58:46 -0800538 LockTemp(r_tmp);
Dave Allisonbcec6fb2014-01-17 12:52:22 -0800539 LIR* uninit_branch = OpCmpMemImmBranch(kCondLt, r_tmp, r_base,
Mark Mendell766e9292014-01-27 07:55:47 -0800540 mirror::Class::StatusOffset().Int32Value(),
541 mirror::Class::kStatusInitialized, NULL);
Dave Allisonbcec6fb2014-01-17 12:52:22 -0800542 LIR* cont = NewLIR0(kPseudoTargetLabel);
Ian Rogers5ddb4102014-01-07 08:58:46 -0800543
buzbee2700f7e2014-03-07 09:46:20 -0800544 AddSlowPath(new (arena_) StaticFieldSlowPath(this, unresolved_branch, uninit_branch, cont,
Vladimir Markobe0e5462014-02-26 11:24:15 +0000545 field_info.StorageIndex(), r_base));
Ian Rogers5ddb4102014-01-07 08:58:46 -0800546
547 FreeTemp(r_tmp);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700548 }
Brian Carlstrom7940e442013-07-12 13:46:57 -0700549 FreeTemp(r_method);
550 }
551 // rBase now holds static storage base
552 if (is_long_or_double) {
Yevgeny Roubanb4b06672014-04-16 18:13:10 +0700553 RegisterClass register_kind = kAnyReg;
554 if (field_info.IsVolatile() && cu_->instruction_set == kX86) {
555 // Force long/double volatile stores into SSE registers to avoid tearing.
556 register_kind = kFPReg;
557 }
558 rl_src = LoadValueWide(rl_src, register_kind);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700559 } else {
560 rl_src = LoadValue(rl_src, kAnyReg);
561 }
Vladimir Markobe0e5462014-02-26 11:24:15 +0000562 if (field_info.IsVolatile()) {
Razvan A Lupusoru99ad7232014-02-25 17:41:08 -0800563 // There might have been a store before this volatile one so insert StoreStore barrier.
Brian Carlstrom7940e442013-07-12 13:46:57 -0700564 GenMemBarrier(kStoreStore);
565 }
566 if (is_long_or_double) {
buzbee2700f7e2014-03-07 09:46:20 -0800567 StoreBaseDispWide(r_base, field_info.FieldOffset().Int32Value(), rl_src.reg);
buzbee695d13a2014-04-19 13:32:20 -0700568 } else if (rl_src.ref) {
569 StoreRefDisp(r_base, field_info.FieldOffset().Int32Value(), rl_src.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700570 } else {
buzbee695d13a2014-04-19 13:32:20 -0700571 Store32Disp(r_base, field_info.FieldOffset().Int32Value(), rl_src.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700572 }
Vladimir Markobe0e5462014-02-26 11:24:15 +0000573 if (field_info.IsVolatile()) {
Razvan A Lupusoru99ad7232014-02-25 17:41:08 -0800574 // A load might follow the volatile store so insert a StoreLoad barrier.
Brian Carlstrom7940e442013-07-12 13:46:57 -0700575 GenMemBarrier(kStoreLoad);
576 }
577 if (is_object && !mir_graph_->IsConstantNullRef(rl_src)) {
buzbee2700f7e2014-03-07 09:46:20 -0800578 MarkGCCard(rl_src.reg, r_base);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700579 }
Ian Rogers5ddb4102014-01-07 08:58:46 -0800580 FreeTemp(r_base);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700581 } else {
582 FlushAllRegs(); // Everything to home locations
Ian Rogersdd7624d2014-03-14 17:43:00 -0700583 ThreadOffset<4> setter_offset =
584 is_long_or_double ? QUICK_ENTRYPOINT_OFFSET(4, pSet64Static)
585 : (is_object ? QUICK_ENTRYPOINT_OFFSET(4, pSetObjStatic)
586 : QUICK_ENTRYPOINT_OFFSET(4, pSet32Static));
Vladimir Markobe0e5462014-02-26 11:24:15 +0000587 CallRuntimeHelperImmRegLocation(setter_offset, field_info.FieldIndex(), rl_src, true);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700588 }
589}
590
Vladimir Markobe0e5462014-02-26 11:24:15 +0000591void Mir2Lir::GenSget(MIR* mir, RegLocation rl_dest,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700592 bool is_long_or_double, bool is_object) {
Vladimir Markobe0e5462014-02-26 11:24:15 +0000593 const MirSFieldLoweringInfo& field_info = mir_graph_->GetSFieldLoweringInfo(mir);
594 cu_->compiler_driver->ProcessedStaticField(field_info.FastGet(), field_info.IsReferrersClass());
595 if (field_info.FastGet() && !SLOW_FIELD_PATH) {
596 DCHECK_GE(field_info.FieldOffset().Int32Value(), 0);
buzbee2700f7e2014-03-07 09:46:20 -0800597 RegStorage r_base;
Vladimir Markobe0e5462014-02-26 11:24:15 +0000598 if (field_info.IsReferrersClass()) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700599 // Fast path, static storage base is this method's class
600 RegLocation rl_method = LoadCurrMethod();
Ian Rogers5ddb4102014-01-07 08:58:46 -0800601 r_base = AllocTemp();
buzbee695d13a2014-04-19 13:32:20 -0700602 LoadRefDisp(rl_method.reg, mirror::ArtMethod::DeclaringClassOffset().Int32Value(), r_base);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700603 } else {
604 // Medium path, static storage base in a different class which requires checks that the other
605 // class is initialized
Vladimir Markobe0e5462014-02-26 11:24:15 +0000606 DCHECK_NE(field_info.StorageIndex(), DexFile::kDexNoIndex);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700607 // May do runtime call so everything to home locations.
608 FlushAllRegs();
609 // Using fixed register to sync with possible call to runtime support.
buzbee2700f7e2014-03-07 09:46:20 -0800610 RegStorage r_method = TargetReg(kArg1);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700611 LockTemp(r_method);
612 LoadCurrMethodDirect(r_method);
Ian Rogers5ddb4102014-01-07 08:58:46 -0800613 r_base = TargetReg(kArg0);
614 LockTemp(r_base);
buzbee695d13a2014-04-19 13:32:20 -0700615 LoadRefDisp(r_method, mirror::ArtMethod::DexCacheResolvedTypesOffset().Int32Value(), r_base);
Andreas Gampe9c3b0892014-04-24 17:33:34 +0000616 int32_t offset_of_field = ObjArray::OffsetOfElement(field_info.StorageIndex()).Int32Value();
617 LoadRefDisp(r_base, offset_of_field, r_base);
Ian Rogers5ddb4102014-01-07 08:58:46 -0800618 // r_base now points at static storage (Class*) or NULL if the type is not yet resolved.
Vladimir Markobfea9c22014-01-17 17:49:33 +0000619 if (!field_info.IsInitialized() &&
620 (mir->optimization_flags & MIR_IGNORE_CLINIT_CHECK) == 0) {
Ian Rogers5ddb4102014-01-07 08:58:46 -0800621 // Check if r_base is NULL or a not yet initialized class.
Dave Allisonbcec6fb2014-01-17 12:52:22 -0800622
623 // The slow path is invoked if the r_base is NULL or the class pointed
624 // to by it is not initialized.
Ian Rogers5ddb4102014-01-07 08:58:46 -0800625 LIR* unresolved_branch = OpCmpImmBranch(kCondEq, r_base, 0, NULL);
buzbee2700f7e2014-03-07 09:46:20 -0800626 RegStorage r_tmp = TargetReg(kArg2);
Ian Rogers5ddb4102014-01-07 08:58:46 -0800627 LockTemp(r_tmp);
Dave Allisonbcec6fb2014-01-17 12:52:22 -0800628 LIR* uninit_branch = OpCmpMemImmBranch(kCondLt, r_tmp, r_base,
Mark Mendell766e9292014-01-27 07:55:47 -0800629 mirror::Class::StatusOffset().Int32Value(),
630 mirror::Class::kStatusInitialized, NULL);
Dave Allisonbcec6fb2014-01-17 12:52:22 -0800631 LIR* cont = NewLIR0(kPseudoTargetLabel);
Ian Rogers5ddb4102014-01-07 08:58:46 -0800632
buzbee2700f7e2014-03-07 09:46:20 -0800633 AddSlowPath(new (arena_) StaticFieldSlowPath(this, unresolved_branch, uninit_branch, cont,
Vladimir Markobe0e5462014-02-26 11:24:15 +0000634 field_info.StorageIndex(), r_base));
Ian Rogers5ddb4102014-01-07 08:58:46 -0800635
636 FreeTemp(r_tmp);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700637 }
Brian Carlstrom7940e442013-07-12 13:46:57 -0700638 FreeTemp(r_method);
639 }
Ian Rogers5ddb4102014-01-07 08:58:46 -0800640 // r_base now holds static storage base
Yevgeny Roubanb4b06672014-04-16 18:13:10 +0700641 RegisterClass result_reg_kind = kAnyReg;
642 if (field_info.IsVolatile() && cu_->instruction_set == kX86) {
643 // Force long/double volatile loads into SSE registers to avoid tearing.
644 result_reg_kind = kFPReg;
645 }
646 RegLocation rl_result = EvalLoc(rl_dest, result_reg_kind, true);
Razvan A Lupusoru99ad7232014-02-25 17:41:08 -0800647
Brian Carlstrom7940e442013-07-12 13:46:57 -0700648 if (is_long_or_double) {
buzbee2700f7e2014-03-07 09:46:20 -0800649 LoadBaseDispWide(r_base, field_info.FieldOffset().Int32Value(), rl_result.reg, INVALID_SREG);
buzbee695d13a2014-04-19 13:32:20 -0700650 } else if (rl_result.ref) {
651 LoadRefDisp(r_base, field_info.FieldOffset().Int32Value(), rl_result.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700652 } else {
buzbee695d13a2014-04-19 13:32:20 -0700653 Load32Disp(r_base, field_info.FieldOffset().Int32Value(), rl_result.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700654 }
Ian Rogers5ddb4102014-01-07 08:58:46 -0800655 FreeTemp(r_base);
Razvan A Lupusoru99ad7232014-02-25 17:41:08 -0800656
657 if (field_info.IsVolatile()) {
658 // Without context sensitive analysis, we must issue the most conservative barriers.
659 // In this case, either a load or store may follow so we issue both barriers.
660 GenMemBarrier(kLoadLoad);
661 GenMemBarrier(kLoadStore);
662 }
663
Brian Carlstrom7940e442013-07-12 13:46:57 -0700664 if (is_long_or_double) {
665 StoreValueWide(rl_dest, rl_result);
666 } else {
667 StoreValue(rl_dest, rl_result);
668 }
669 } else {
670 FlushAllRegs(); // Everything to home locations
Ian Rogersdd7624d2014-03-14 17:43:00 -0700671 ThreadOffset<4> getterOffset =
672 is_long_or_double ? QUICK_ENTRYPOINT_OFFSET(4, pGet64Static)
673 :(is_object ? QUICK_ENTRYPOINT_OFFSET(4, pGetObjStatic)
674 : QUICK_ENTRYPOINT_OFFSET(4, pGet32Static));
Vladimir Markobe0e5462014-02-26 11:24:15 +0000675 CallRuntimeHelperImm(getterOffset, field_info.FieldIndex(), true);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700676 if (is_long_or_double) {
677 RegLocation rl_result = GetReturnWide(rl_dest.fp);
678 StoreValueWide(rl_dest, rl_result);
679 } else {
680 RegLocation rl_result = GetReturn(rl_dest.fp);
681 StoreValue(rl_dest, rl_result);
682 }
683 }
684}
685
Dave Allisonbcec6fb2014-01-17 12:52:22 -0800686// Generate code for all slow paths.
687void Mir2Lir::HandleSlowPaths() {
688 int n = slow_paths_.Size();
689 for (int i = 0; i < n; ++i) {
690 LIRSlowPath* slowpath = slow_paths_.Get(i);
691 slowpath->Compile();
692 }
693 slow_paths_.Reset();
694}
695
Vladimir Markobe0e5462014-02-26 11:24:15 +0000696void Mir2Lir::GenIGet(MIR* mir, int opt_flags, OpSize size,
Brian Carlstrom7940e442013-07-12 13:46:57 -0700697 RegLocation rl_dest, RegLocation rl_obj, bool is_long_or_double,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700698 bool is_object) {
Vladimir Markobe0e5462014-02-26 11:24:15 +0000699 const MirIFieldLoweringInfo& field_info = mir_graph_->GetIFieldLoweringInfo(mir);
700 cu_->compiler_driver->ProcessedInstanceField(field_info.FastGet());
701 if (field_info.FastGet() && !SLOW_FIELD_PATH) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700702 RegLocation rl_result;
703 RegisterClass reg_class = oat_reg_class_by_size(size);
Vladimir Markobe0e5462014-02-26 11:24:15 +0000704 DCHECK_GE(field_info.FieldOffset().Int32Value(), 0);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700705 rl_obj = LoadValue(rl_obj, kCoreReg);
706 if (is_long_or_double) {
707 DCHECK(rl_dest.wide);
buzbee2700f7e2014-03-07 09:46:20 -0800708 GenNullCheck(rl_obj.reg, opt_flags);
Dmitry Petrochenko6a58cb12014-04-02 17:27:59 +0700709 if (cu_->instruction_set == kX86 || cu_->instruction_set == kX86_64) {
Yevgeny Roubanb4b06672014-04-16 18:13:10 +0700710 RegisterClass result_reg_kind = kAnyReg;
711 if (field_info.IsVolatile() && cu_->instruction_set == kX86) {
712 // Force long/double volatile loads into SSE registers to avoid tearing.
713 result_reg_kind = kFPReg;
714 }
715 rl_result = EvalLoc(rl_dest, result_reg_kind, true);
buzbee2700f7e2014-03-07 09:46:20 -0800716 LoadBaseDispWide(rl_obj.reg, field_info.FieldOffset().Int32Value(), rl_result.reg,
717 rl_obj.s_reg_low);
Dave Allisonb373e092014-02-20 16:06:36 -0800718 MarkPossibleNullPointerException(opt_flags);
Vladimir Markobe0e5462014-02-26 11:24:15 +0000719 if (field_info.IsVolatile()) {
Razvan A Lupusoru99ad7232014-02-25 17:41:08 -0800720 // Without context sensitive analysis, we must issue the most conservative barriers.
721 // In this case, either a load or store may follow so we issue both barriers.
Brian Carlstrom7940e442013-07-12 13:46:57 -0700722 GenMemBarrier(kLoadLoad);
Razvan A Lupusoru99ad7232014-02-25 17:41:08 -0800723 GenMemBarrier(kLoadStore);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700724 }
725 } else {
buzbee2700f7e2014-03-07 09:46:20 -0800726 RegStorage reg_ptr = AllocTemp();
727 OpRegRegImm(kOpAdd, reg_ptr, rl_obj.reg, field_info.FieldOffset().Int32Value());
Brian Carlstrom7940e442013-07-12 13:46:57 -0700728 rl_result = EvalLoc(rl_dest, reg_class, true);
buzbee2700f7e2014-03-07 09:46:20 -0800729 LoadBaseDispWide(reg_ptr, 0, rl_result.reg, INVALID_SREG);
Dave Allisonf9439142014-03-27 15:10:22 -0700730 MarkPossibleNullPointerException(opt_flags);
Vladimir Markobe0e5462014-02-26 11:24:15 +0000731 if (field_info.IsVolatile()) {
Razvan A Lupusoru99ad7232014-02-25 17:41:08 -0800732 // Without context sensitive analysis, we must issue the most conservative barriers.
733 // In this case, either a load or store may follow so we issue both barriers.
Brian Carlstrom7940e442013-07-12 13:46:57 -0700734 GenMemBarrier(kLoadLoad);
Razvan A Lupusoru99ad7232014-02-25 17:41:08 -0800735 GenMemBarrier(kLoadStore);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700736 }
737 FreeTemp(reg_ptr);
738 }
739 StoreValueWide(rl_dest, rl_result);
740 } else {
741 rl_result = EvalLoc(rl_dest, reg_class, true);
buzbee2700f7e2014-03-07 09:46:20 -0800742 GenNullCheck(rl_obj.reg, opt_flags);
buzbee695d13a2014-04-19 13:32:20 -0700743 LoadBaseDisp(rl_obj.reg, field_info.FieldOffset().Int32Value(), rl_result.reg, k32,
buzbee2700f7e2014-03-07 09:46:20 -0800744 rl_obj.s_reg_low);
Dave Allisonb373e092014-02-20 16:06:36 -0800745 MarkPossibleNullPointerException(opt_flags);
Vladimir Markobe0e5462014-02-26 11:24:15 +0000746 if (field_info.IsVolatile()) {
Razvan A Lupusoru99ad7232014-02-25 17:41:08 -0800747 // Without context sensitive analysis, we must issue the most conservative barriers.
748 // In this case, either a load or store may follow so we issue both barriers.
Brian Carlstrom7940e442013-07-12 13:46:57 -0700749 GenMemBarrier(kLoadLoad);
Razvan A Lupusoru99ad7232014-02-25 17:41:08 -0800750 GenMemBarrier(kLoadStore);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700751 }
752 StoreValue(rl_dest, rl_result);
753 }
754 } else {
Ian Rogersdd7624d2014-03-14 17:43:00 -0700755 ThreadOffset<4> getterOffset =
756 is_long_or_double ? QUICK_ENTRYPOINT_OFFSET(4, pGet64Instance)
757 : (is_object ? QUICK_ENTRYPOINT_OFFSET(4, pGetObjInstance)
758 : QUICK_ENTRYPOINT_OFFSET(4, pGet32Instance));
Vladimir Markobe0e5462014-02-26 11:24:15 +0000759 CallRuntimeHelperImmRegLocation(getterOffset, field_info.FieldIndex(), rl_obj, true);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700760 if (is_long_or_double) {
761 RegLocation rl_result = GetReturnWide(rl_dest.fp);
762 StoreValueWide(rl_dest, rl_result);
763 } else {
764 RegLocation rl_result = GetReturn(rl_dest.fp);
765 StoreValue(rl_dest, rl_result);
766 }
767 }
768}
769
Vladimir Markobe0e5462014-02-26 11:24:15 +0000770void Mir2Lir::GenIPut(MIR* mir, int opt_flags, OpSize size,
Brian Carlstrom7940e442013-07-12 13:46:57 -0700771 RegLocation rl_src, RegLocation rl_obj, bool is_long_or_double,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700772 bool is_object) {
Vladimir Markobe0e5462014-02-26 11:24:15 +0000773 const MirIFieldLoweringInfo& field_info = mir_graph_->GetIFieldLoweringInfo(mir);
774 cu_->compiler_driver->ProcessedInstanceField(field_info.FastPut());
775 if (field_info.FastPut() && !SLOW_FIELD_PATH) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700776 RegisterClass reg_class = oat_reg_class_by_size(size);
Vladimir Markobe0e5462014-02-26 11:24:15 +0000777 DCHECK_GE(field_info.FieldOffset().Int32Value(), 0);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700778 rl_obj = LoadValue(rl_obj, kCoreReg);
779 if (is_long_or_double) {
Yevgeny Roubanb4b06672014-04-16 18:13:10 +0700780 RegisterClass src_reg_kind = kAnyReg;
781 if (field_info.IsVolatile() && cu_->instruction_set == kX86) {
782 // Force long/double volatile stores into SSE registers to avoid tearing.
783 src_reg_kind = kFPReg;
784 }
785 rl_src = LoadValueWide(rl_src, src_reg_kind);
buzbee2700f7e2014-03-07 09:46:20 -0800786 GenNullCheck(rl_obj.reg, opt_flags);
787 RegStorage reg_ptr = AllocTemp();
788 OpRegRegImm(kOpAdd, reg_ptr, rl_obj.reg, field_info.FieldOffset().Int32Value());
Vladimir Markobe0e5462014-02-26 11:24:15 +0000789 if (field_info.IsVolatile()) {
Razvan A Lupusoru99ad7232014-02-25 17:41:08 -0800790 // There might have been a store before this volatile one so insert StoreStore barrier.
Brian Carlstrom7940e442013-07-12 13:46:57 -0700791 GenMemBarrier(kStoreStore);
792 }
buzbee2700f7e2014-03-07 09:46:20 -0800793 StoreBaseDispWide(reg_ptr, 0, rl_src.reg);
Dave Allisonb373e092014-02-20 16:06:36 -0800794 MarkPossibleNullPointerException(opt_flags);
Vladimir Markobe0e5462014-02-26 11:24:15 +0000795 if (field_info.IsVolatile()) {
Razvan A Lupusoru99ad7232014-02-25 17:41:08 -0800796 // A load might follow the volatile store so insert a StoreLoad barrier.
797 GenMemBarrier(kStoreLoad);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700798 }
799 FreeTemp(reg_ptr);
800 } else {
801 rl_src = LoadValue(rl_src, reg_class);
buzbee2700f7e2014-03-07 09:46:20 -0800802 GenNullCheck(rl_obj.reg, opt_flags);
Vladimir Markobe0e5462014-02-26 11:24:15 +0000803 if (field_info.IsVolatile()) {
Razvan A Lupusoru99ad7232014-02-25 17:41:08 -0800804 // There might have been a store before this volatile one so insert StoreStore barrier.
Brian Carlstrom7940e442013-07-12 13:46:57 -0700805 GenMemBarrier(kStoreStore);
806 }
buzbee695d13a2014-04-19 13:32:20 -0700807 Store32Disp(rl_obj.reg, field_info.FieldOffset().Int32Value(), rl_src.reg);
Dave Allisonb373e092014-02-20 16:06:36 -0800808 MarkPossibleNullPointerException(opt_flags);
Vladimir Markobe0e5462014-02-26 11:24:15 +0000809 if (field_info.IsVolatile()) {
Razvan A Lupusoru99ad7232014-02-25 17:41:08 -0800810 // A load might follow the volatile store so insert a StoreLoad barrier.
811 GenMemBarrier(kStoreLoad);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700812 }
813 if (is_object && !mir_graph_->IsConstantNullRef(rl_src)) {
buzbee2700f7e2014-03-07 09:46:20 -0800814 MarkGCCard(rl_src.reg, rl_obj.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700815 }
816 }
817 } else {
Ian Rogersdd7624d2014-03-14 17:43:00 -0700818 ThreadOffset<4> setter_offset =
819 is_long_or_double ? QUICK_ENTRYPOINT_OFFSET(4, pSet64Instance)
820 : (is_object ? QUICK_ENTRYPOINT_OFFSET(4, pSetObjInstance)
821 : QUICK_ENTRYPOINT_OFFSET(4, pSet32Instance));
Vladimir Markobe0e5462014-02-26 11:24:15 +0000822 CallRuntimeHelperImmRegLocationRegLocation(setter_offset, field_info.FieldIndex(),
823 rl_obj, rl_src, true);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700824 }
825}
826
Ian Rogersa9a82542013-10-04 11:17:26 -0700827void Mir2Lir::GenArrayObjPut(int opt_flags, RegLocation rl_array, RegLocation rl_index,
828 RegLocation rl_src) {
829 bool needs_range_check = !(opt_flags & MIR_IGNORE_RANGE_CHECK);
830 bool needs_null_check = !((cu_->disable_opt & (1 << kNullCheckElimination)) &&
831 (opt_flags & MIR_IGNORE_NULL_CHECK));
Ian Rogersdd7624d2014-03-14 17:43:00 -0700832 ThreadOffset<4> helper = needs_range_check
833 ? (needs_null_check ? QUICK_ENTRYPOINT_OFFSET(4, pAputObjectWithNullAndBoundCheck)
834 : QUICK_ENTRYPOINT_OFFSET(4, pAputObjectWithBoundCheck))
835 : QUICK_ENTRYPOINT_OFFSET(4, pAputObject);
Ian Rogersa9a82542013-10-04 11:17:26 -0700836 CallRuntimeHelperRegLocationRegLocationRegLocation(helper, rl_array, rl_index, rl_src, true);
837}
838
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700839void Mir2Lir::GenConstClass(uint32_t type_idx, RegLocation rl_dest) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700840 RegLocation rl_method = LoadCurrMethod();
buzbee2700f7e2014-03-07 09:46:20 -0800841 RegStorage res_reg = AllocTemp();
Brian Carlstrom7940e442013-07-12 13:46:57 -0700842 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
843 if (!cu_->compiler_driver->CanAccessTypeWithoutChecks(cu_->method_idx,
844 *cu_->dex_file,
845 type_idx)) {
846 // Call out to helper which resolves type and verifies access.
847 // Resolved type returned in kRet0.
Ian Rogersdd7624d2014-03-14 17:43:00 -0700848 CallRuntimeHelperImmReg(QUICK_ENTRYPOINT_OFFSET(4, pInitializeTypeAndVerifyAccess),
buzbee2700f7e2014-03-07 09:46:20 -0800849 type_idx, rl_method.reg, true);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700850 RegLocation rl_result = GetReturn(false);
851 StoreValue(rl_dest, rl_result);
852 } else {
853 // We're don't need access checks, load type from dex cache
854 int32_t dex_cache_offset =
Brian Carlstromea46f952013-07-30 01:26:50 -0700855 mirror::ArtMethod::DexCacheResolvedTypesOffset().Int32Value();
buzbee695d13a2014-04-19 13:32:20 -0700856 Load32Disp(rl_method.reg, dex_cache_offset, res_reg);
Andreas Gampe9c3b0892014-04-24 17:33:34 +0000857 int32_t offset_of_type = ClassArray::OffsetOfElement(type_idx).Int32Value();
buzbee695d13a2014-04-19 13:32:20 -0700858 Load32Disp(res_reg, offset_of_type, rl_result.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700859 if (!cu_->compiler_driver->CanAssumeTypeIsPresentInDexCache(*cu_->dex_file,
860 type_idx) || SLOW_TYPE_PATH) {
861 // Slow path, at runtime test if type is null and if so initialize
862 FlushAllRegs();
buzbee2700f7e2014-03-07 09:46:20 -0800863 LIR* branch = OpCmpImmBranch(kCondEq, rl_result.reg, 0, NULL);
Dave Allisonbcec6fb2014-01-17 12:52:22 -0800864 LIR* cont = NewLIR0(kPseudoTargetLabel);
865
866 // Object to generate the slow path for class resolution.
867 class SlowPath : public LIRSlowPath {
868 public:
869 SlowPath(Mir2Lir* m2l, LIR* fromfast, LIR* cont, const int type_idx,
870 const RegLocation& rl_method, const RegLocation& rl_result) :
871 LIRSlowPath(m2l, m2l->GetCurrentDexPc(), fromfast, cont), type_idx_(type_idx),
872 rl_method_(rl_method), rl_result_(rl_result) {
873 }
874
875 void Compile() {
876 GenerateTargetLabel();
877
Ian Rogersdd7624d2014-03-14 17:43:00 -0700878 m2l_->CallRuntimeHelperImmReg(QUICK_ENTRYPOINT_OFFSET(4, pInitializeType), type_idx_,
buzbee2700f7e2014-03-07 09:46:20 -0800879 rl_method_.reg, true);
880 m2l_->OpRegCopy(rl_result_.reg, m2l_->TargetReg(kRet0));
Dave Allisonbcec6fb2014-01-17 12:52:22 -0800881
882 m2l_->OpUnconditionalBranch(cont_);
883 }
884
885 private:
886 const int type_idx_;
887 const RegLocation rl_method_;
888 const RegLocation rl_result_;
889 };
890
891 // Add to list for future.
buzbee2700f7e2014-03-07 09:46:20 -0800892 AddSlowPath(new (arena_) SlowPath(this, branch, cont, type_idx, rl_method, rl_result));
Dave Allisonbcec6fb2014-01-17 12:52:22 -0800893
Brian Carlstrom7940e442013-07-12 13:46:57 -0700894 StoreValue(rl_dest, rl_result);
Dave Allisonbcec6fb2014-01-17 12:52:22 -0800895 } else {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700896 // Fast path, we're done - just store result
897 StoreValue(rl_dest, rl_result);
898 }
899 }
900}
901
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700902void Mir2Lir::GenConstString(uint32_t string_idx, RegLocation rl_dest) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700903 /* NOTE: Most strings should be available at compile time */
Andreas Gampe9c3b0892014-04-24 17:33:34 +0000904 int32_t offset_of_string = mirror::ObjectArray<mirror::String>::OffsetOfElement(string_idx).
905 Int32Value();
Brian Carlstrom7940e442013-07-12 13:46:57 -0700906 if (!cu_->compiler_driver->CanAssumeStringIsPresentInDexCache(
907 *cu_->dex_file, string_idx) || SLOW_STRING_PATH) {
908 // slow path, resolve string if not in dex cache
909 FlushAllRegs();
Brian Carlstrom7934ac22013-07-26 10:54:15 -0700910 LockCallTemps(); // Using explicit registers
Mark Mendell766e9292014-01-27 07:55:47 -0800911
912 // If the Method* is already in a register, we can save a copy.
913 RegLocation rl_method = mir_graph_->GetMethodLoc();
buzbee2700f7e2014-03-07 09:46:20 -0800914 RegStorage r_method;
Mark Mendell766e9292014-01-27 07:55:47 -0800915 if (rl_method.location == kLocPhysReg) {
916 // A temp would conflict with register use below.
buzbee2700f7e2014-03-07 09:46:20 -0800917 DCHECK(!IsTemp(rl_method.reg));
918 r_method = rl_method.reg;
Mark Mendell766e9292014-01-27 07:55:47 -0800919 } else {
920 r_method = TargetReg(kArg2);
921 LoadCurrMethodDirect(r_method);
922 }
buzbee695d13a2014-04-19 13:32:20 -0700923 LoadRefDisp(r_method, mirror::ArtMethod::DexCacheStringsOffset().Int32Value(),
924 TargetReg(kArg0));
Mark Mendell766e9292014-01-27 07:55:47 -0800925
Brian Carlstrom7940e442013-07-12 13:46:57 -0700926 // Might call out to helper, which will return resolved string in kRet0
buzbee695d13a2014-04-19 13:32:20 -0700927 Load32Disp(TargetReg(kArg0), offset_of_string, TargetReg(kRet0));
Mingyao Yang3b004ba2014-04-29 15:55:37 -0700928 LIR* fromfast = OpCmpImmBranch(kCondEq, TargetReg(kRet0), 0, NULL);
929 LIR* cont = NewLIR0(kPseudoTargetLabel);
Mark Mendell766e9292014-01-27 07:55:47 -0800930
Mingyao Yang3b004ba2014-04-29 15:55:37 -0700931 {
Dave Allisonbcec6fb2014-01-17 12:52:22 -0800932 // Object to generate the slow path for string resolution.
933 class SlowPath : public LIRSlowPath {
934 public:
Mingyao Yang3b004ba2014-04-29 15:55:37 -0700935 SlowPath(Mir2Lir* m2l, LIR* fromfast, LIR* cont, RegStorage r_method, int32_t string_idx) :
936 LIRSlowPath(m2l, m2l->GetCurrentDexPc(), fromfast, cont),
937 r_method_(r_method), string_idx_(string_idx) {
Dave Allisonbcec6fb2014-01-17 12:52:22 -0800938 }
939
940 void Compile() {
941 GenerateTargetLabel();
Mingyao Yang3b004ba2014-04-29 15:55:37 -0700942 m2l_->CallRuntimeHelperRegImm(QUICK_ENTRYPOINT_OFFSET(4, pResolveString),
943 r_method_, string_idx_, true);
Dave Allisonbcec6fb2014-01-17 12:52:22 -0800944 m2l_->OpUnconditionalBranch(cont_);
945 }
946
947 private:
Mingyao Yang3b004ba2014-04-29 15:55:37 -0700948 const RegStorage r_method_;
949 const int32_t string_idx_;
Dave Allisonbcec6fb2014-01-17 12:52:22 -0800950 };
951
Mingyao Yang3b004ba2014-04-29 15:55:37 -0700952 AddSlowPath(new (arena_) SlowPath(this, fromfast, cont, r_method, string_idx));
Brian Carlstrom7940e442013-07-12 13:46:57 -0700953 }
Mingyao Yang3b004ba2014-04-29 15:55:37 -0700954
Brian Carlstrom7940e442013-07-12 13:46:57 -0700955 GenBarrier();
956 StoreValue(rl_dest, GetReturn(false));
957 } else {
958 RegLocation rl_method = LoadCurrMethod();
buzbee2700f7e2014-03-07 09:46:20 -0800959 RegStorage res_reg = AllocTemp();
Brian Carlstrom7940e442013-07-12 13:46:57 -0700960 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee695d13a2014-04-19 13:32:20 -0700961 LoadRefDisp(rl_method.reg, mirror::ArtMethod::DexCacheStringsOffset().Int32Value(), res_reg);
962 Load32Disp(res_reg, offset_of_string, rl_result.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700963 StoreValue(rl_dest, rl_result);
964 }
965}
966
967/*
968 * Let helper function take care of everything. Will
969 * call Class::NewInstanceFromCode(type_idx, method);
970 */
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700971void Mir2Lir::GenNewInstance(uint32_t type_idx, RegLocation rl_dest) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700972 FlushAllRegs(); /* Everything to home location */
973 // alloc will always check for resolution, do we also need to verify
974 // access because the verifier was unable to?
Ian Rogersdd7624d2014-03-14 17:43:00 -0700975 ThreadOffset<4> func_offset(-1);
Hiroshi Yamauchibe1ca552014-01-15 11:46:48 -0800976 const DexFile* dex_file = cu_->dex_file;
977 CompilerDriver* driver = cu_->compiler_driver;
978 if (driver->CanAccessInstantiableTypeWithoutChecks(
979 cu_->method_idx, *dex_file, type_idx)) {
980 bool is_type_initialized;
981 bool use_direct_type_ptr;
982 uintptr_t direct_type_ptr;
983 if (kEmbedClassInCode &&
984 driver->CanEmbedTypeInCode(*dex_file, type_idx,
985 &is_type_initialized, &use_direct_type_ptr, &direct_type_ptr)) {
986 // The fast path.
987 if (!use_direct_type_ptr) {
Mark Mendell55d0eac2014-02-06 11:02:52 -0800988 LoadClassType(type_idx, kArg0);
Hiroshi Yamauchibe1ca552014-01-15 11:46:48 -0800989 if (!is_type_initialized) {
Ian Rogersdd7624d2014-03-14 17:43:00 -0700990 func_offset = QUICK_ENTRYPOINT_OFFSET(4, pAllocObjectResolved);
Hiroshi Yamauchibe1ca552014-01-15 11:46:48 -0800991 CallRuntimeHelperRegMethod(func_offset, TargetReg(kArg0), true);
992 } else {
Ian Rogersdd7624d2014-03-14 17:43:00 -0700993 func_offset = QUICK_ENTRYPOINT_OFFSET(4, pAllocObjectInitialized);
Hiroshi Yamauchibe1ca552014-01-15 11:46:48 -0800994 CallRuntimeHelperRegMethod(func_offset, TargetReg(kArg0), true);
995 }
996 } else {
997 // Use the direct pointer.
998 if (!is_type_initialized) {
Ian Rogersdd7624d2014-03-14 17:43:00 -0700999 func_offset = QUICK_ENTRYPOINT_OFFSET(4, pAllocObjectResolved);
Hiroshi Yamauchibe1ca552014-01-15 11:46:48 -08001000 CallRuntimeHelperImmMethod(func_offset, direct_type_ptr, true);
1001 } else {
Ian Rogersdd7624d2014-03-14 17:43:00 -07001002 func_offset = QUICK_ENTRYPOINT_OFFSET(4, pAllocObjectInitialized);
Hiroshi Yamauchibe1ca552014-01-15 11:46:48 -08001003 CallRuntimeHelperImmMethod(func_offset, direct_type_ptr, true);
1004 }
1005 }
1006 } else {
1007 // The slow path.
1008 DCHECK_EQ(func_offset.Int32Value(), -1);
Ian Rogersdd7624d2014-03-14 17:43:00 -07001009 func_offset = QUICK_ENTRYPOINT_OFFSET(4, pAllocObject);
Hiroshi Yamauchibe1ca552014-01-15 11:46:48 -08001010 CallRuntimeHelperImmMethod(func_offset, type_idx, true);
1011 }
1012 DCHECK_NE(func_offset.Int32Value(), -1);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001013 } else {
Ian Rogersdd7624d2014-03-14 17:43:00 -07001014 func_offset = QUICK_ENTRYPOINT_OFFSET(4, pAllocObjectWithAccessCheck);
Hiroshi Yamauchibe1ca552014-01-15 11:46:48 -08001015 CallRuntimeHelperImmMethod(func_offset, type_idx, true);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001016 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001017 RegLocation rl_result = GetReturn(false);
1018 StoreValue(rl_dest, rl_result);
1019}
1020
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001021void Mir2Lir::GenThrow(RegLocation rl_src) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001022 FlushAllRegs();
Ian Rogersdd7624d2014-03-14 17:43:00 -07001023 CallRuntimeHelperRegLocation(QUICK_ENTRYPOINT_OFFSET(4, pDeliverException), rl_src, true);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001024}
1025
1026// For final classes there are no sub-classes to check and so we can answer the instance-of
1027// question with simple comparisons.
1028void Mir2Lir::GenInstanceofFinal(bool use_declaring_class, uint32_t type_idx, RegLocation rl_dest,
1029 RegLocation rl_src) {
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08001030 // X86 has its own implementation.
Dmitry Petrochenko6a58cb12014-04-02 17:27:59 +07001031 DCHECK(cu_->instruction_set != kX86 && cu_->instruction_set != kX86_64);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08001032
Brian Carlstrom7940e442013-07-12 13:46:57 -07001033 RegLocation object = LoadValue(rl_src, kCoreReg);
1034 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08001035 RegStorage result_reg = rl_result.reg;
1036 if (result_reg == object.reg) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001037 result_reg = AllocTypedTemp(false, kCoreReg);
1038 }
1039 LoadConstant(result_reg, 0); // assume false
buzbee2700f7e2014-03-07 09:46:20 -08001040 LIR* null_branchover = OpCmpImmBranch(kCondEq, object.reg, 0, NULL);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001041
buzbee2700f7e2014-03-07 09:46:20 -08001042 RegStorage check_class = AllocTypedTemp(false, kCoreReg);
1043 RegStorage object_class = AllocTypedTemp(false, kCoreReg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001044
1045 LoadCurrMethodDirect(check_class);
1046 if (use_declaring_class) {
buzbee695d13a2014-04-19 13:32:20 -07001047 LoadRefDisp(check_class, mirror::ArtMethod::DeclaringClassOffset().Int32Value(), check_class);
1048 LoadRefDisp(object.reg, mirror::Object::ClassOffset().Int32Value(), object_class);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001049 } else {
buzbee695d13a2014-04-19 13:32:20 -07001050 LoadRefDisp(check_class, mirror::ArtMethod::DexCacheResolvedTypesOffset().Int32Value(),
1051 check_class);
1052 LoadRefDisp(object.reg, mirror::Object::ClassOffset().Int32Value(), object_class);
Andreas Gampe9c3b0892014-04-24 17:33:34 +00001053 int32_t offset_of_type = ClassArray::OffsetOfElement(type_idx).Int32Value();
buzbee695d13a2014-04-19 13:32:20 -07001054 LoadRefDisp(check_class, offset_of_type, check_class);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001055 }
1056
1057 LIR* ne_branchover = NULL;
buzbee695d13a2014-04-19 13:32:20 -07001058 // FIXME: what should we be comparing here? compressed or decompressed references?
Brian Carlstrom7940e442013-07-12 13:46:57 -07001059 if (cu_->instruction_set == kThumb2) {
1060 OpRegReg(kOpCmp, check_class, object_class); // Same?
Dave Allison3da67a52014-04-02 17:03:45 -07001061 LIR* it = OpIT(kCondEq, ""); // if-convert the test
Brian Carlstrom7940e442013-07-12 13:46:57 -07001062 LoadConstant(result_reg, 1); // .eq case - load true
Dave Allison3da67a52014-04-02 17:03:45 -07001063 OpEndIT(it);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001064 } else {
1065 ne_branchover = OpCmpBranch(kCondNe, check_class, object_class, NULL);
1066 LoadConstant(result_reg, 1); // eq case - load true
1067 }
1068 LIR* target = NewLIR0(kPseudoTargetLabel);
1069 null_branchover->target = target;
1070 if (ne_branchover != NULL) {
1071 ne_branchover->target = target;
1072 }
1073 FreeTemp(object_class);
1074 FreeTemp(check_class);
1075 if (IsTemp(result_reg)) {
buzbee2700f7e2014-03-07 09:46:20 -08001076 OpRegCopy(rl_result.reg, result_reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001077 FreeTemp(result_reg);
1078 }
1079 StoreValue(rl_dest, rl_result);
1080}
1081
1082void Mir2Lir::GenInstanceofCallingHelper(bool needs_access_check, bool type_known_final,
1083 bool type_known_abstract, bool use_declaring_class,
1084 bool can_assume_type_is_in_dex_cache,
1085 uint32_t type_idx, RegLocation rl_dest,
1086 RegLocation rl_src) {
Mark Mendell6607d972014-02-10 06:54:18 -08001087 // X86 has its own implementation.
Dmitry Petrochenko6a58cb12014-04-02 17:27:59 +07001088 DCHECK(cu_->instruction_set != kX86 && cu_->instruction_set != kX86_64);
Mark Mendell6607d972014-02-10 06:54:18 -08001089
Brian Carlstrom7940e442013-07-12 13:46:57 -07001090 FlushAllRegs();
1091 // May generate a call - use explicit registers
1092 LockCallTemps();
1093 LoadCurrMethodDirect(TargetReg(kArg1)); // kArg1 <= current Method*
buzbee2700f7e2014-03-07 09:46:20 -08001094 RegStorage class_reg = TargetReg(kArg2); // kArg2 will hold the Class*
Brian Carlstrom7940e442013-07-12 13:46:57 -07001095 if (needs_access_check) {
1096 // Check we have access to type_idx and if not throw IllegalAccessError,
1097 // returns Class* in kArg0
Ian Rogersdd7624d2014-03-14 17:43:00 -07001098 CallRuntimeHelperImm(QUICK_ENTRYPOINT_OFFSET(4, pInitializeTypeAndVerifyAccess),
Brian Carlstrom7940e442013-07-12 13:46:57 -07001099 type_idx, true);
1100 OpRegCopy(class_reg, TargetReg(kRet0)); // Align usage with fast path
1101 LoadValueDirectFixed(rl_src, TargetReg(kArg0)); // kArg0 <= ref
1102 } else if (use_declaring_class) {
1103 LoadValueDirectFixed(rl_src, TargetReg(kArg0)); // kArg0 <= ref
buzbee695d13a2014-04-19 13:32:20 -07001104 LoadRefDisp(TargetReg(kArg1), mirror::ArtMethod::DeclaringClassOffset().Int32Value(),
buzbee2700f7e2014-03-07 09:46:20 -08001105 class_reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001106 } else {
1107 // Load dex cache entry into class_reg (kArg2)
1108 LoadValueDirectFixed(rl_src, TargetReg(kArg0)); // kArg0 <= ref
buzbee695d13a2014-04-19 13:32:20 -07001109 LoadRefDisp(TargetReg(kArg1), mirror::ArtMethod::DexCacheResolvedTypesOffset().Int32Value(),
1110 class_reg);
Andreas Gampe9c3b0892014-04-24 17:33:34 +00001111 int32_t offset_of_type = ClassArray::OffsetOfElement(type_idx).Int32Value();
buzbee695d13a2014-04-19 13:32:20 -07001112 LoadRefDisp(class_reg, offset_of_type, class_reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001113 if (!can_assume_type_is_in_dex_cache) {
1114 // Need to test presence of type in dex cache at runtime
1115 LIR* hop_branch = OpCmpImmBranch(kCondNe, class_reg, 0, NULL);
1116 // Not resolved
1117 // Call out to helper, which will return resolved type in kRet0
Ian Rogersdd7624d2014-03-14 17:43:00 -07001118 CallRuntimeHelperImm(QUICK_ENTRYPOINT_OFFSET(4, pInitializeType), type_idx, true);
Brian Carlstrom7934ac22013-07-26 10:54:15 -07001119 OpRegCopy(TargetReg(kArg2), TargetReg(kRet0)); // Align usage with fast path
Brian Carlstrom7940e442013-07-12 13:46:57 -07001120 LoadValueDirectFixed(rl_src, TargetReg(kArg0)); /* reload Ref */
1121 // Rejoin code paths
1122 LIR* hop_target = NewLIR0(kPseudoTargetLabel);
1123 hop_branch->target = hop_target;
1124 }
1125 }
1126 /* kArg0 is ref, kArg2 is class. If ref==null, use directly as bool result */
1127 RegLocation rl_result = GetReturn(false);
1128 if (cu_->instruction_set == kMips) {
1129 // On MIPS rArg0 != rl_result, place false in result if branch is taken.
buzbee2700f7e2014-03-07 09:46:20 -08001130 LoadConstant(rl_result.reg, 0);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001131 }
1132 LIR* branch1 = OpCmpImmBranch(kCondEq, TargetReg(kArg0), 0, NULL);
1133
1134 /* load object->klass_ */
1135 DCHECK_EQ(mirror::Object::ClassOffset().Int32Value(), 0);
buzbee695d13a2014-04-19 13:32:20 -07001136 LoadRefDisp(TargetReg(kArg0), mirror::Object::ClassOffset().Int32Value(), TargetReg(kArg1));
Brian Carlstrom7940e442013-07-12 13:46:57 -07001137 /* kArg0 is ref, kArg1 is ref->klass_, kArg2 is class */
1138 LIR* branchover = NULL;
1139 if (type_known_final) {
1140 // rl_result == ref == null == 0.
1141 if (cu_->instruction_set == kThumb2) {
1142 OpRegReg(kOpCmp, TargetReg(kArg1), TargetReg(kArg2)); // Same?
Dave Allison3da67a52014-04-02 17:03:45 -07001143 LIR* it = OpIT(kCondEq, "E"); // if-convert the test
buzbee2700f7e2014-03-07 09:46:20 -08001144 LoadConstant(rl_result.reg, 1); // .eq case - load true
1145 LoadConstant(rl_result.reg, 0); // .ne case - load false
Dave Allison3da67a52014-04-02 17:03:45 -07001146 OpEndIT(it);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001147 } else {
buzbee2700f7e2014-03-07 09:46:20 -08001148 LoadConstant(rl_result.reg, 0); // ne case - load false
Brian Carlstrom7940e442013-07-12 13:46:57 -07001149 branchover = OpCmpBranch(kCondNe, TargetReg(kArg1), TargetReg(kArg2), NULL);
buzbee2700f7e2014-03-07 09:46:20 -08001150 LoadConstant(rl_result.reg, 1); // eq case - load true
Brian Carlstrom7940e442013-07-12 13:46:57 -07001151 }
1152 } else {
1153 if (cu_->instruction_set == kThumb2) {
Ian Rogersdd7624d2014-03-14 17:43:00 -07001154 RegStorage r_tgt = LoadHelper(QUICK_ENTRYPOINT_OFFSET(4, pInstanceofNonTrivial));
Dave Allison3da67a52014-04-02 17:03:45 -07001155 LIR* it = nullptr;
Brian Carlstrom7940e442013-07-12 13:46:57 -07001156 if (!type_known_abstract) {
1157 /* Uses conditional nullification */
1158 OpRegReg(kOpCmp, TargetReg(kArg1), TargetReg(kArg2)); // Same?
Dave Allison3da67a52014-04-02 17:03:45 -07001159 it = OpIT(kCondEq, "EE"); // if-convert the test
Brian Carlstrom7940e442013-07-12 13:46:57 -07001160 LoadConstant(TargetReg(kArg0), 1); // .eq case - load true
1161 }
1162 OpRegCopy(TargetReg(kArg0), TargetReg(kArg2)); // .ne case - arg0 <= class
1163 OpReg(kOpBlx, r_tgt); // .ne case: helper(class, ref->class)
Dave Allison3da67a52014-04-02 17:03:45 -07001164 if (it != nullptr) {
1165 OpEndIT(it);
1166 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001167 FreeTemp(r_tgt);
1168 } else {
1169 if (!type_known_abstract) {
1170 /* Uses branchovers */
buzbee2700f7e2014-03-07 09:46:20 -08001171 LoadConstant(rl_result.reg, 1); // assume true
Brian Carlstrom7940e442013-07-12 13:46:57 -07001172 branchover = OpCmpBranch(kCondEq, TargetReg(kArg1), TargetReg(kArg2), NULL);
1173 }
Ian Rogersdd7624d2014-03-14 17:43:00 -07001174 RegStorage r_tgt = LoadHelper(QUICK_ENTRYPOINT_OFFSET(4, pInstanceofNonTrivial));
Mark Mendell6607d972014-02-10 06:54:18 -08001175 OpRegCopy(TargetReg(kArg0), TargetReg(kArg2)); // .ne case - arg0 <= class
1176 OpReg(kOpBlx, r_tgt); // .ne case: helper(class, ref->class)
1177 FreeTemp(r_tgt);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001178 }
1179 }
1180 // TODO: only clobber when type isn't final?
Vladimir Marko31c2aac2013-12-09 16:31:19 +00001181 ClobberCallerSave();
Brian Carlstrom7940e442013-07-12 13:46:57 -07001182 /* branch targets here */
1183 LIR* target = NewLIR0(kPseudoTargetLabel);
1184 StoreValue(rl_dest, rl_result);
1185 branch1->target = target;
1186 if (branchover != NULL) {
1187 branchover->target = target;
1188 }
1189}
1190
1191void Mir2Lir::GenInstanceof(uint32_t type_idx, RegLocation rl_dest, RegLocation rl_src) {
1192 bool type_known_final, type_known_abstract, use_declaring_class;
1193 bool needs_access_check = !cu_->compiler_driver->CanAccessTypeWithoutChecks(cu_->method_idx,
1194 *cu_->dex_file,
1195 type_idx,
1196 &type_known_final,
1197 &type_known_abstract,
1198 &use_declaring_class);
1199 bool can_assume_type_is_in_dex_cache = !needs_access_check &&
1200 cu_->compiler_driver->CanAssumeTypeIsPresentInDexCache(*cu_->dex_file, type_idx);
1201
1202 if ((use_declaring_class || can_assume_type_is_in_dex_cache) && type_known_final) {
1203 GenInstanceofFinal(use_declaring_class, type_idx, rl_dest, rl_src);
1204 } else {
1205 GenInstanceofCallingHelper(needs_access_check, type_known_final, type_known_abstract,
1206 use_declaring_class, can_assume_type_is_in_dex_cache,
1207 type_idx, rl_dest, rl_src);
1208 }
1209}
1210
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001211void Mir2Lir::GenCheckCast(uint32_t insn_idx, uint32_t type_idx, RegLocation rl_src) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001212 bool type_known_final, type_known_abstract, use_declaring_class;
1213 bool needs_access_check = !cu_->compiler_driver->CanAccessTypeWithoutChecks(cu_->method_idx,
1214 *cu_->dex_file,
1215 type_idx,
1216 &type_known_final,
1217 &type_known_abstract,
1218 &use_declaring_class);
1219 // Note: currently type_known_final is unused, as optimizing will only improve the performance
1220 // of the exception throw path.
1221 DexCompilationUnit* cu = mir_graph_->GetCurrentDexCompilationUnit();
Vladimir Marko2730db02014-01-27 11:15:17 +00001222 if (!needs_access_check && cu_->compiler_driver->IsSafeCast(cu, insn_idx)) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001223 // Verifier type analysis proved this check cast would never cause an exception.
1224 return;
1225 }
1226 FlushAllRegs();
1227 // May generate a call - use explicit registers
1228 LockCallTemps();
1229 LoadCurrMethodDirect(TargetReg(kArg1)); // kArg1 <= current Method*
buzbee2700f7e2014-03-07 09:46:20 -08001230 RegStorage class_reg = TargetReg(kArg2); // kArg2 will hold the Class*
Brian Carlstrom7940e442013-07-12 13:46:57 -07001231 if (needs_access_check) {
1232 // Check we have access to type_idx and if not throw IllegalAccessError,
1233 // returns Class* in kRet0
1234 // InitializeTypeAndVerifyAccess(idx, method)
Ian Rogersdd7624d2014-03-14 17:43:00 -07001235 CallRuntimeHelperImmReg(QUICK_ENTRYPOINT_OFFSET(4, pInitializeTypeAndVerifyAccess),
Brian Carlstrom7940e442013-07-12 13:46:57 -07001236 type_idx, TargetReg(kArg1), true);
1237 OpRegCopy(class_reg, TargetReg(kRet0)); // Align usage with fast path
1238 } else if (use_declaring_class) {
buzbee695d13a2014-04-19 13:32:20 -07001239 LoadRefDisp(TargetReg(kArg1), mirror::ArtMethod::DeclaringClassOffset().Int32Value(),
1240 class_reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001241 } else {
1242 // Load dex cache entry into class_reg (kArg2)
buzbee695d13a2014-04-19 13:32:20 -07001243 LoadRefDisp(TargetReg(kArg1), mirror::ArtMethod::DexCacheResolvedTypesOffset().Int32Value(),
1244 class_reg);
Andreas Gampe9c3b0892014-04-24 17:33:34 +00001245 int32_t offset_of_type = ClassArray::OffsetOfElement(type_idx).Int32Value();
buzbee695d13a2014-04-19 13:32:20 -07001246 LoadRefDisp(class_reg, offset_of_type, class_reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001247 if (!cu_->compiler_driver->CanAssumeTypeIsPresentInDexCache(*cu_->dex_file, type_idx)) {
1248 // Need to test presence of type in dex cache at runtime
Dave Allisonbcec6fb2014-01-17 12:52:22 -08001249 LIR* hop_branch = OpCmpImmBranch(kCondEq, class_reg, 0, NULL);
1250 LIR* cont = NewLIR0(kPseudoTargetLabel);
1251
1252 // Slow path to initialize the type. Executed if the type is NULL.
1253 class SlowPath : public LIRSlowPath {
1254 public:
1255 SlowPath(Mir2Lir* m2l, LIR* fromfast, LIR* cont, const int type_idx,
buzbee2700f7e2014-03-07 09:46:20 -08001256 const RegStorage class_reg) :
Dave Allisonbcec6fb2014-01-17 12:52:22 -08001257 LIRSlowPath(m2l, m2l->GetCurrentDexPc(), fromfast, cont), type_idx_(type_idx),
1258 class_reg_(class_reg) {
1259 }
1260
1261 void Compile() {
1262 GenerateTargetLabel();
1263
1264 // Call out to helper, which will return resolved type in kArg0
1265 // InitializeTypeFromCode(idx, method)
Ian Rogersdd7624d2014-03-14 17:43:00 -07001266 m2l_->CallRuntimeHelperImmReg(QUICK_ENTRYPOINT_OFFSET(4, pInitializeType), type_idx_,
Dave Allisonbcec6fb2014-01-17 12:52:22 -08001267 m2l_->TargetReg(kArg1), true);
1268 m2l_->OpRegCopy(class_reg_, m2l_->TargetReg(kRet0)); // Align usage with fast path
1269 m2l_->OpUnconditionalBranch(cont_);
1270 }
1271 public:
1272 const int type_idx_;
buzbee2700f7e2014-03-07 09:46:20 -08001273 const RegStorage class_reg_;
Dave Allisonbcec6fb2014-01-17 12:52:22 -08001274 };
1275
buzbee2700f7e2014-03-07 09:46:20 -08001276 AddSlowPath(new (arena_) SlowPath(this, hop_branch, cont, type_idx, class_reg));
Brian Carlstrom7940e442013-07-12 13:46:57 -07001277 }
1278 }
1279 // At this point, class_reg (kArg2) has class
1280 LoadValueDirectFixed(rl_src, TargetReg(kArg0)); // kArg0 <= ref
Dave Allisonbcec6fb2014-01-17 12:52:22 -08001281
1282 // Slow path for the case where the classes are not equal. In this case we need
1283 // to call a helper function to do the check.
1284 class SlowPath : public LIRSlowPath {
1285 public:
1286 SlowPath(Mir2Lir* m2l, LIR* fromfast, LIR* cont, bool load):
1287 LIRSlowPath(m2l, m2l->GetCurrentDexPc(), fromfast, cont), load_(load) {
1288 }
1289
1290 void Compile() {
1291 GenerateTargetLabel();
1292
1293 if (load_) {
buzbee695d13a2014-04-19 13:32:20 -07001294 m2l_->LoadRefDisp(m2l_->TargetReg(kArg0), mirror::Object::ClassOffset().Int32Value(),
1295 m2l_->TargetReg(kArg1));
Dave Allisonbcec6fb2014-01-17 12:52:22 -08001296 }
Ian Rogersdd7624d2014-03-14 17:43:00 -07001297 m2l_->CallRuntimeHelperRegReg(QUICK_ENTRYPOINT_OFFSET(4, pCheckCast), m2l_->TargetReg(kArg2),
Dave Allisonbcec6fb2014-01-17 12:52:22 -08001298 m2l_->TargetReg(kArg1), true);
1299
1300 m2l_->OpUnconditionalBranch(cont_);
1301 }
1302
1303 private:
Mingyao Yang3b004ba2014-04-29 15:55:37 -07001304 const bool load_;
Dave Allisonbcec6fb2014-01-17 12:52:22 -08001305 };
1306
1307 if (type_known_abstract) {
1308 // Easier case, run slow path if target is non-null (slow path will load from target)
1309 LIR* branch = OpCmpImmBranch(kCondNe, TargetReg(kArg0), 0, NULL);
1310 LIR* cont = NewLIR0(kPseudoTargetLabel);
1311 AddSlowPath(new (arena_) SlowPath(this, branch, cont, true));
1312 } else {
1313 // Harder, more common case. We need to generate a forward branch over the load
1314 // if the target is null. If it's non-null we perform the load and branch to the
1315 // slow path if the classes are not equal.
1316
1317 /* Null is OK - continue */
1318 LIR* branch1 = OpCmpImmBranch(kCondEq, TargetReg(kArg0), 0, NULL);
1319 /* load object->klass_ */
1320 DCHECK_EQ(mirror::Object::ClassOffset().Int32Value(), 0);
buzbee695d13a2014-04-19 13:32:20 -07001321 LoadRefDisp(TargetReg(kArg0), mirror::Object::ClassOffset().Int32Value(), TargetReg(kArg1));
Dave Allisonbcec6fb2014-01-17 12:52:22 -08001322
1323 LIR* branch2 = OpCmpBranch(kCondNe, TargetReg(kArg1), class_reg, NULL);
1324 LIR* cont = NewLIR0(kPseudoTargetLabel);
1325
1326 // Add the slow path that will not perform load since this is already done.
1327 AddSlowPath(new (arena_) SlowPath(this, branch2, cont, false));
1328
1329 // Set the null check to branch to the continuation.
1330 branch1->target = cont;
Brian Carlstrom7940e442013-07-12 13:46:57 -07001331 }
1332}
1333
1334void Mir2Lir::GenLong3Addr(OpKind first_op, OpKind second_op, RegLocation rl_dest,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001335 RegLocation rl_src1, RegLocation rl_src2) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001336 RegLocation rl_result;
1337 if (cu_->instruction_set == kThumb2) {
1338 /*
1339 * NOTE: This is the one place in the code in which we might have
1340 * as many as six live temporary registers. There are 5 in the normal
1341 * set for Arm. Until we have spill capabilities, temporarily add
1342 * lr to the temp set. It is safe to do this locally, but note that
1343 * lr is used explicitly elsewhere in the code generator and cannot
1344 * normally be used as a general temp register.
1345 */
1346 MarkTemp(TargetReg(kLr)); // Add lr to the temp pool
1347 FreeTemp(TargetReg(kLr)); // and make it available
1348 }
1349 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
1350 rl_src2 = LoadValueWide(rl_src2, kCoreReg);
1351 rl_result = EvalLoc(rl_dest, kCoreReg, true);
1352 // The longs may overlap - use intermediate temp if so
buzbee2700f7e2014-03-07 09:46:20 -08001353 if ((rl_result.reg.GetLowReg() == rl_src1.reg.GetHighReg()) || (rl_result.reg.GetLowReg() == rl_src2.reg.GetHighReg())) {
1354 RegStorage t_reg = AllocTemp();
1355 OpRegRegReg(first_op, t_reg, rl_src1.reg.GetLow(), rl_src2.reg.GetLow());
1356 OpRegRegReg(second_op, rl_result.reg.GetHigh(), rl_src1.reg.GetHigh(), rl_src2.reg.GetHigh());
1357 OpRegCopy(rl_result.reg.GetLow(), t_reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001358 FreeTemp(t_reg);
1359 } else {
buzbee2700f7e2014-03-07 09:46:20 -08001360 OpRegRegReg(first_op, rl_result.reg.GetLow(), rl_src1.reg.GetLow(), rl_src2.reg.GetLow());
1361 OpRegRegReg(second_op, rl_result.reg.GetHigh(), rl_src1.reg.GetHigh(), rl_src2.reg.GetHigh());
Brian Carlstrom7940e442013-07-12 13:46:57 -07001362 }
1363 /*
1364 * NOTE: If rl_dest refers to a frame variable in a large frame, the
1365 * following StoreValueWide might need to allocate a temp register.
1366 * To further work around the lack of a spill capability, explicitly
1367 * free any temps from rl_src1 & rl_src2 that aren't still live in rl_result.
1368 * Remove when spill is functional.
1369 */
1370 FreeRegLocTemps(rl_result, rl_src1);
1371 FreeRegLocTemps(rl_result, rl_src2);
1372 StoreValueWide(rl_dest, rl_result);
1373 if (cu_->instruction_set == kThumb2) {
1374 Clobber(TargetReg(kLr));
1375 UnmarkTemp(TargetReg(kLr)); // Remove lr from the temp pool
1376 }
1377}
1378
1379
1380void Mir2Lir::GenShiftOpLong(Instruction::Code opcode, RegLocation rl_dest,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001381 RegLocation rl_src1, RegLocation rl_shift) {
Ian Rogersdd7624d2014-03-14 17:43:00 -07001382 ThreadOffset<4> func_offset(-1);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001383
1384 switch (opcode) {
1385 case Instruction::SHL_LONG:
1386 case Instruction::SHL_LONG_2ADDR:
Ian Rogersdd7624d2014-03-14 17:43:00 -07001387 func_offset = QUICK_ENTRYPOINT_OFFSET(4, pShlLong);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001388 break;
1389 case Instruction::SHR_LONG:
1390 case Instruction::SHR_LONG_2ADDR:
Ian Rogersdd7624d2014-03-14 17:43:00 -07001391 func_offset = QUICK_ENTRYPOINT_OFFSET(4, pShrLong);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001392 break;
1393 case Instruction::USHR_LONG:
1394 case Instruction::USHR_LONG_2ADDR:
Ian Rogersdd7624d2014-03-14 17:43:00 -07001395 func_offset = QUICK_ENTRYPOINT_OFFSET(4, pUshrLong);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001396 break;
1397 default:
1398 LOG(FATAL) << "Unexpected case";
1399 }
1400 FlushAllRegs(); /* Send everything to home location */
1401 CallRuntimeHelperRegLocationRegLocation(func_offset, rl_src1, rl_shift, false);
1402 RegLocation rl_result = GetReturnWide(false);
1403 StoreValueWide(rl_dest, rl_result);
1404}
1405
1406
1407void Mir2Lir::GenArithOpInt(Instruction::Code opcode, RegLocation rl_dest,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001408 RegLocation rl_src1, RegLocation rl_src2) {
Dmitry Petrochenko6a58cb12014-04-02 17:27:59 +07001409 DCHECK(cu_->instruction_set != kX86 && cu_->instruction_set != kX86_64);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001410 OpKind op = kOpBkpt;
1411 bool is_div_rem = false;
1412 bool check_zero = false;
1413 bool unary = false;
1414 RegLocation rl_result;
1415 bool shift_op = false;
1416 switch (opcode) {
1417 case Instruction::NEG_INT:
1418 op = kOpNeg;
1419 unary = true;
1420 break;
1421 case Instruction::NOT_INT:
1422 op = kOpMvn;
1423 unary = true;
1424 break;
1425 case Instruction::ADD_INT:
1426 case Instruction::ADD_INT_2ADDR:
1427 op = kOpAdd;
1428 break;
1429 case Instruction::SUB_INT:
1430 case Instruction::SUB_INT_2ADDR:
1431 op = kOpSub;
1432 break;
1433 case Instruction::MUL_INT:
1434 case Instruction::MUL_INT_2ADDR:
1435 op = kOpMul;
1436 break;
1437 case Instruction::DIV_INT:
1438 case Instruction::DIV_INT_2ADDR:
1439 check_zero = true;
1440 op = kOpDiv;
1441 is_div_rem = true;
1442 break;
1443 /* NOTE: returns in kArg1 */
1444 case Instruction::REM_INT:
1445 case Instruction::REM_INT_2ADDR:
1446 check_zero = true;
1447 op = kOpRem;
1448 is_div_rem = true;
1449 break;
1450 case Instruction::AND_INT:
1451 case Instruction::AND_INT_2ADDR:
1452 op = kOpAnd;
1453 break;
1454 case Instruction::OR_INT:
1455 case Instruction::OR_INT_2ADDR:
1456 op = kOpOr;
1457 break;
1458 case Instruction::XOR_INT:
1459 case Instruction::XOR_INT_2ADDR:
1460 op = kOpXor;
1461 break;
1462 case Instruction::SHL_INT:
1463 case Instruction::SHL_INT_2ADDR:
1464 shift_op = true;
1465 op = kOpLsl;
1466 break;
1467 case Instruction::SHR_INT:
1468 case Instruction::SHR_INT_2ADDR:
1469 shift_op = true;
1470 op = kOpAsr;
1471 break;
1472 case Instruction::USHR_INT:
1473 case Instruction::USHR_INT_2ADDR:
1474 shift_op = true;
1475 op = kOpLsr;
1476 break;
1477 default:
1478 LOG(FATAL) << "Invalid word arith op: " << opcode;
1479 }
1480 if (!is_div_rem) {
1481 if (unary) {
1482 rl_src1 = LoadValue(rl_src1, kCoreReg);
1483 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08001484 OpRegReg(op, rl_result.reg, rl_src1.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001485 } else {
1486 if (shift_op) {
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08001487 rl_src2 = LoadValue(rl_src2, kCoreReg);
buzbee2700f7e2014-03-07 09:46:20 -08001488 RegStorage t_reg = AllocTemp();
1489 OpRegRegImm(kOpAnd, t_reg, rl_src2.reg, 31);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001490 rl_src1 = LoadValue(rl_src1, kCoreReg);
1491 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08001492 OpRegRegReg(op, rl_result.reg, rl_src1.reg, t_reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001493 FreeTemp(t_reg);
1494 } else {
1495 rl_src1 = LoadValue(rl_src1, kCoreReg);
1496 rl_src2 = LoadValue(rl_src2, kCoreReg);
1497 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08001498 OpRegRegReg(op, rl_result.reg, rl_src1.reg, rl_src2.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001499 }
1500 }
1501 StoreValue(rl_dest, rl_result);
1502 } else {
Dave Allison70202782013-10-22 17:52:19 -07001503 bool done = false; // Set to true if we happen to find a way to use a real instruction.
Brian Carlstrom7940e442013-07-12 13:46:57 -07001504 if (cu_->instruction_set == kMips) {
1505 rl_src1 = LoadValue(rl_src1, kCoreReg);
1506 rl_src2 = LoadValue(rl_src2, kCoreReg);
1507 if (check_zero) {
Mingyao Yangd15f4e22014-04-17 18:46:24 -07001508 GenDivZeroCheck(rl_src2.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001509 }
buzbee2700f7e2014-03-07 09:46:20 -08001510 rl_result = GenDivRem(rl_dest, rl_src1.reg, rl_src2.reg, op == kOpDiv);
Dave Allison70202782013-10-22 17:52:19 -07001511 done = true;
1512 } else if (cu_->instruction_set == kThumb2) {
1513 if (cu_->GetInstructionSetFeatures().HasDivideInstruction()) {
1514 // Use ARM SDIV instruction for division. For remainder we also need to
1515 // calculate using a MUL and subtract.
1516 rl_src1 = LoadValue(rl_src1, kCoreReg);
1517 rl_src2 = LoadValue(rl_src2, kCoreReg);
1518 if (check_zero) {
Mingyao Yangd15f4e22014-04-17 18:46:24 -07001519 GenDivZeroCheck(rl_src2.reg);
Dave Allison70202782013-10-22 17:52:19 -07001520 }
buzbee2700f7e2014-03-07 09:46:20 -08001521 rl_result = GenDivRem(rl_dest, rl_src1.reg, rl_src2.reg, op == kOpDiv);
Dave Allison70202782013-10-22 17:52:19 -07001522 done = true;
1523 }
1524 }
1525
1526 // If we haven't already generated the code use the callout function.
1527 if (!done) {
Ian Rogersdd7624d2014-03-14 17:43:00 -07001528 ThreadOffset<4> func_offset = QUICK_ENTRYPOINT_OFFSET(4, pIdivmod);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001529 FlushAllRegs(); /* Send everything to home location */
1530 LoadValueDirectFixed(rl_src2, TargetReg(kArg1));
buzbee2700f7e2014-03-07 09:46:20 -08001531 RegStorage r_tgt = CallHelperSetup(func_offset);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001532 LoadValueDirectFixed(rl_src1, TargetReg(kArg0));
1533 if (check_zero) {
Mingyao Yange643a172014-04-08 11:02:52 -07001534 GenDivZeroCheck(TargetReg(kArg1));
Brian Carlstrom7940e442013-07-12 13:46:57 -07001535 }
Dave Allison70202782013-10-22 17:52:19 -07001536 // NOTE: callout here is not a safepoint.
Brian Carlstromdf629502013-07-17 22:39:56 -07001537 CallHelper(r_tgt, func_offset, false /* not a safepoint */);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001538 if (op == kOpDiv)
1539 rl_result = GetReturn(false);
1540 else
1541 rl_result = GetReturnAlt();
1542 }
1543 StoreValue(rl_dest, rl_result);
1544 }
1545}
1546
1547/*
1548 * The following are the first-level codegen routines that analyze the format
1549 * of each bytecode then either dispatch special purpose codegen routines
1550 * or produce corresponding Thumb instructions directly.
1551 */
1552
Brian Carlstrom7940e442013-07-12 13:46:57 -07001553// Returns true if no more than two bits are set in 'x'.
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001554static bool IsPopCountLE2(unsigned int x) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001555 x &= x - 1;
1556 return (x & (x - 1)) == 0;
1557}
1558
Brian Carlstrom7940e442013-07-12 13:46:57 -07001559// Returns true if it added instructions to 'cu' to divide 'rl_src' by 'lit'
1560// and store the result in 'rl_dest'.
buzbee11b63d12013-08-27 07:34:17 -07001561bool Mir2Lir::HandleEasyDivRem(Instruction::Code dalvik_opcode, bool is_div,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001562 RegLocation rl_src, RegLocation rl_dest, int lit) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001563 if ((lit < 2) || ((cu_->instruction_set != kThumb2) && !IsPowerOfTwo(lit))) {
1564 return false;
1565 }
1566 // No divide instruction for Arm, so check for more special cases
1567 if ((cu_->instruction_set == kThumb2) && !IsPowerOfTwo(lit)) {
buzbee11b63d12013-08-27 07:34:17 -07001568 return SmallLiteralDivRem(dalvik_opcode, is_div, rl_src, rl_dest, lit);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001569 }
1570 int k = LowestSetBit(lit);
1571 if (k >= 30) {
1572 // Avoid special cases.
1573 return false;
1574 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001575 rl_src = LoadValue(rl_src, kCoreReg);
1576 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee11b63d12013-08-27 07:34:17 -07001577 if (is_div) {
buzbee2700f7e2014-03-07 09:46:20 -08001578 RegStorage t_reg = AllocTemp();
Brian Carlstrom7940e442013-07-12 13:46:57 -07001579 if (lit == 2) {
1580 // Division by 2 is by far the most common division by constant.
buzbee2700f7e2014-03-07 09:46:20 -08001581 OpRegRegImm(kOpLsr, t_reg, rl_src.reg, 32 - k);
1582 OpRegRegReg(kOpAdd, t_reg, t_reg, rl_src.reg);
1583 OpRegRegImm(kOpAsr, rl_result.reg, t_reg, k);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001584 } else {
buzbee2700f7e2014-03-07 09:46:20 -08001585 OpRegRegImm(kOpAsr, t_reg, rl_src.reg, 31);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001586 OpRegRegImm(kOpLsr, t_reg, t_reg, 32 - k);
buzbee2700f7e2014-03-07 09:46:20 -08001587 OpRegRegReg(kOpAdd, t_reg, t_reg, rl_src.reg);
1588 OpRegRegImm(kOpAsr, rl_result.reg, t_reg, k);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001589 }
1590 } else {
buzbee2700f7e2014-03-07 09:46:20 -08001591 RegStorage t_reg1 = AllocTemp();
1592 RegStorage t_reg2 = AllocTemp();
Brian Carlstrom7940e442013-07-12 13:46:57 -07001593 if (lit == 2) {
buzbee2700f7e2014-03-07 09:46:20 -08001594 OpRegRegImm(kOpLsr, t_reg1, rl_src.reg, 32 - k);
1595 OpRegRegReg(kOpAdd, t_reg2, t_reg1, rl_src.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001596 OpRegRegImm(kOpAnd, t_reg2, t_reg2, lit -1);
buzbee2700f7e2014-03-07 09:46:20 -08001597 OpRegRegReg(kOpSub, rl_result.reg, t_reg2, t_reg1);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001598 } else {
buzbee2700f7e2014-03-07 09:46:20 -08001599 OpRegRegImm(kOpAsr, t_reg1, rl_src.reg, 31);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001600 OpRegRegImm(kOpLsr, t_reg1, t_reg1, 32 - k);
buzbee2700f7e2014-03-07 09:46:20 -08001601 OpRegRegReg(kOpAdd, t_reg2, t_reg1, rl_src.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001602 OpRegRegImm(kOpAnd, t_reg2, t_reg2, lit - 1);
buzbee2700f7e2014-03-07 09:46:20 -08001603 OpRegRegReg(kOpSub, rl_result.reg, t_reg2, t_reg1);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001604 }
1605 }
1606 StoreValue(rl_dest, rl_result);
1607 return true;
1608}
1609
1610// Returns true if it added instructions to 'cu' to multiply 'rl_src' by 'lit'
1611// and store the result in 'rl_dest'.
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001612bool Mir2Lir::HandleEasyMultiply(RegLocation rl_src, RegLocation rl_dest, int lit) {
Ian Rogerse2143c02014-03-28 08:47:16 -07001613 if (lit < 0) {
1614 return false;
1615 }
1616 if (lit == 0) {
1617 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
1618 LoadConstant(rl_result.reg, 0);
1619 StoreValue(rl_dest, rl_result);
1620 return true;
1621 }
1622 if (lit == 1) {
1623 rl_src = LoadValue(rl_src, kCoreReg);
1624 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
1625 OpRegCopy(rl_result.reg, rl_src.reg);
1626 StoreValue(rl_dest, rl_result);
1627 return true;
1628 }
Zheng Xuf9719f92014-04-02 13:31:31 +01001629 // There is RegRegRegShift on Arm, so check for more special cases
1630 if (cu_->instruction_set == kThumb2) {
Ian Rogerse2143c02014-03-28 08:47:16 -07001631 return EasyMultiply(rl_src, rl_dest, lit);
1632 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001633 // Can we simplify this multiplication?
1634 bool power_of_two = false;
1635 bool pop_count_le2 = false;
1636 bool power_of_two_minus_one = false;
Ian Rogerse2143c02014-03-28 08:47:16 -07001637 if (IsPowerOfTwo(lit)) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001638 power_of_two = true;
1639 } else if (IsPopCountLE2(lit)) {
1640 pop_count_le2 = true;
1641 } else if (IsPowerOfTwo(lit + 1)) {
1642 power_of_two_minus_one = true;
1643 } else {
1644 return false;
1645 }
1646 rl_src = LoadValue(rl_src, kCoreReg);
1647 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
1648 if (power_of_two) {
1649 // Shift.
buzbee2700f7e2014-03-07 09:46:20 -08001650 OpRegRegImm(kOpLsl, rl_result.reg, rl_src.reg, LowestSetBit(lit));
Brian Carlstrom7940e442013-07-12 13:46:57 -07001651 } else if (pop_count_le2) {
1652 // Shift and add and shift.
1653 int first_bit = LowestSetBit(lit);
1654 int second_bit = LowestSetBit(lit ^ (1 << first_bit));
1655 GenMultiplyByTwoBitMultiplier(rl_src, rl_result, lit, first_bit, second_bit);
1656 } else {
1657 // Reverse subtract: (src << (shift + 1)) - src.
1658 DCHECK(power_of_two_minus_one);
1659 // TUNING: rsb dst, src, src lsl#LowestSetBit(lit + 1)
buzbee2700f7e2014-03-07 09:46:20 -08001660 RegStorage t_reg = AllocTemp();
1661 OpRegRegImm(kOpLsl, t_reg, rl_src.reg, LowestSetBit(lit + 1));
1662 OpRegRegReg(kOpSub, rl_result.reg, t_reg, rl_src.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001663 }
1664 StoreValue(rl_dest, rl_result);
1665 return true;
1666}
1667
1668void Mir2Lir::GenArithOpIntLit(Instruction::Code opcode, RegLocation rl_dest, RegLocation rl_src,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001669 int lit) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001670 RegLocation rl_result;
1671 OpKind op = static_cast<OpKind>(0); /* Make gcc happy */
1672 int shift_op = false;
1673 bool is_div = false;
1674
1675 switch (opcode) {
1676 case Instruction::RSUB_INT_LIT8:
1677 case Instruction::RSUB_INT: {
1678 rl_src = LoadValue(rl_src, kCoreReg);
1679 rl_result = EvalLoc(rl_dest, kCoreReg, true);
1680 if (cu_->instruction_set == kThumb2) {
buzbee2700f7e2014-03-07 09:46:20 -08001681 OpRegRegImm(kOpRsub, rl_result.reg, rl_src.reg, lit);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001682 } else {
buzbee2700f7e2014-03-07 09:46:20 -08001683 OpRegReg(kOpNeg, rl_result.reg, rl_src.reg);
1684 OpRegImm(kOpAdd, rl_result.reg, lit);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001685 }
1686 StoreValue(rl_dest, rl_result);
1687 return;
1688 }
1689
1690 case Instruction::SUB_INT:
1691 case Instruction::SUB_INT_2ADDR:
1692 lit = -lit;
1693 // Intended fallthrough
1694 case Instruction::ADD_INT:
1695 case Instruction::ADD_INT_2ADDR:
1696 case Instruction::ADD_INT_LIT8:
1697 case Instruction::ADD_INT_LIT16:
1698 op = kOpAdd;
1699 break;
1700 case Instruction::MUL_INT:
1701 case Instruction::MUL_INT_2ADDR:
1702 case Instruction::MUL_INT_LIT8:
1703 case Instruction::MUL_INT_LIT16: {
1704 if (HandleEasyMultiply(rl_src, rl_dest, lit)) {
1705 return;
1706 }
1707 op = kOpMul;
1708 break;
1709 }
1710 case Instruction::AND_INT:
1711 case Instruction::AND_INT_2ADDR:
1712 case Instruction::AND_INT_LIT8:
1713 case Instruction::AND_INT_LIT16:
1714 op = kOpAnd;
1715 break;
1716 case Instruction::OR_INT:
1717 case Instruction::OR_INT_2ADDR:
1718 case Instruction::OR_INT_LIT8:
1719 case Instruction::OR_INT_LIT16:
1720 op = kOpOr;
1721 break;
1722 case Instruction::XOR_INT:
1723 case Instruction::XOR_INT_2ADDR:
1724 case Instruction::XOR_INT_LIT8:
1725 case Instruction::XOR_INT_LIT16:
1726 op = kOpXor;
1727 break;
1728 case Instruction::SHL_INT_LIT8:
1729 case Instruction::SHL_INT:
1730 case Instruction::SHL_INT_2ADDR:
1731 lit &= 31;
1732 shift_op = true;
1733 op = kOpLsl;
1734 break;
1735 case Instruction::SHR_INT_LIT8:
1736 case Instruction::SHR_INT:
1737 case Instruction::SHR_INT_2ADDR:
1738 lit &= 31;
1739 shift_op = true;
1740 op = kOpAsr;
1741 break;
1742 case Instruction::USHR_INT_LIT8:
1743 case Instruction::USHR_INT:
1744 case Instruction::USHR_INT_2ADDR:
1745 lit &= 31;
1746 shift_op = true;
1747 op = kOpLsr;
1748 break;
1749
1750 case Instruction::DIV_INT:
1751 case Instruction::DIV_INT_2ADDR:
1752 case Instruction::DIV_INT_LIT8:
1753 case Instruction::DIV_INT_LIT16:
1754 case Instruction::REM_INT:
1755 case Instruction::REM_INT_2ADDR:
1756 case Instruction::REM_INT_LIT8:
1757 case Instruction::REM_INT_LIT16: {
1758 if (lit == 0) {
Mingyao Yange643a172014-04-08 11:02:52 -07001759 GenDivZeroException();
Brian Carlstrom7940e442013-07-12 13:46:57 -07001760 return;
1761 }
buzbee11b63d12013-08-27 07:34:17 -07001762 if ((opcode == Instruction::DIV_INT) ||
Brian Carlstrom7940e442013-07-12 13:46:57 -07001763 (opcode == Instruction::DIV_INT_2ADDR) ||
buzbee11b63d12013-08-27 07:34:17 -07001764 (opcode == Instruction::DIV_INT_LIT8) ||
Brian Carlstrom7940e442013-07-12 13:46:57 -07001765 (opcode == Instruction::DIV_INT_LIT16)) {
1766 is_div = true;
1767 } else {
1768 is_div = false;
1769 }
buzbee11b63d12013-08-27 07:34:17 -07001770 if (HandleEasyDivRem(opcode, is_div, rl_src, rl_dest, lit)) {
1771 return;
1772 }
Dave Allison70202782013-10-22 17:52:19 -07001773
1774 bool done = false;
Brian Carlstrom7940e442013-07-12 13:46:57 -07001775 if (cu_->instruction_set == kMips) {
1776 rl_src = LoadValue(rl_src, kCoreReg);
buzbee2700f7e2014-03-07 09:46:20 -08001777 rl_result = GenDivRemLit(rl_dest, rl_src.reg, lit, is_div);
Dave Allison70202782013-10-22 17:52:19 -07001778 done = true;
Dmitry Petrochenko6a58cb12014-04-02 17:27:59 +07001779 } else if (cu_->instruction_set == kX86 || cu_->instruction_set == kX86_64) {
Mark Mendell2bf31e62014-01-23 12:13:40 -08001780 rl_result = GenDivRemLit(rl_dest, rl_src, lit, is_div);
1781 done = true;
Dave Allison70202782013-10-22 17:52:19 -07001782 } else if (cu_->instruction_set == kThumb2) {
1783 if (cu_->GetInstructionSetFeatures().HasDivideInstruction()) {
1784 // Use ARM SDIV instruction for division. For remainder we also need to
1785 // calculate using a MUL and subtract.
1786 rl_src = LoadValue(rl_src, kCoreReg);
buzbee2700f7e2014-03-07 09:46:20 -08001787 rl_result = GenDivRemLit(rl_dest, rl_src.reg, lit, is_div);
Dave Allison70202782013-10-22 17:52:19 -07001788 done = true;
1789 }
1790 }
1791
1792 if (!done) {
1793 FlushAllRegs(); /* Everything to home location. */
Brian Carlstrom7940e442013-07-12 13:46:57 -07001794 LoadValueDirectFixed(rl_src, TargetReg(kArg0));
1795 Clobber(TargetReg(kArg0));
Ian Rogersdd7624d2014-03-14 17:43:00 -07001796 ThreadOffset<4> func_offset = QUICK_ENTRYPOINT_OFFSET(4, pIdivmod);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001797 CallRuntimeHelperRegImm(func_offset, TargetReg(kArg0), lit, false);
1798 if (is_div)
1799 rl_result = GetReturn(false);
1800 else
1801 rl_result = GetReturnAlt();
1802 }
1803 StoreValue(rl_dest, rl_result);
1804 return;
1805 }
1806 default:
1807 LOG(FATAL) << "Unexpected opcode " << opcode;
1808 }
1809 rl_src = LoadValue(rl_src, kCoreReg);
1810 rl_result = EvalLoc(rl_dest, kCoreReg, true);
Dave Allison70202782013-10-22 17:52:19 -07001811 // Avoid shifts by literal 0 - no support in Thumb. Change to copy.
Brian Carlstrom7940e442013-07-12 13:46:57 -07001812 if (shift_op && (lit == 0)) {
buzbee2700f7e2014-03-07 09:46:20 -08001813 OpRegCopy(rl_result.reg, rl_src.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001814 } else {
buzbee2700f7e2014-03-07 09:46:20 -08001815 OpRegRegImm(op, rl_result.reg, rl_src.reg, lit);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001816 }
1817 StoreValue(rl_dest, rl_result);
1818}
1819
1820void Mir2Lir::GenArithOpLong(Instruction::Code opcode, RegLocation rl_dest,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001821 RegLocation rl_src1, RegLocation rl_src2) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001822 RegLocation rl_result;
1823 OpKind first_op = kOpBkpt;
1824 OpKind second_op = kOpBkpt;
1825 bool call_out = false;
1826 bool check_zero = false;
Ian Rogersdd7624d2014-03-14 17:43:00 -07001827 ThreadOffset<4> func_offset(-1);
buzbee2700f7e2014-03-07 09:46:20 -08001828 int ret_reg = TargetReg(kRet0).GetReg();
Brian Carlstrom7940e442013-07-12 13:46:57 -07001829
1830 switch (opcode) {
1831 case Instruction::NOT_LONG:
1832 rl_src2 = LoadValueWide(rl_src2, kCoreReg);
1833 rl_result = EvalLoc(rl_dest, kCoreReg, true);
1834 // Check for destructive overlap
buzbee2700f7e2014-03-07 09:46:20 -08001835 if (rl_result.reg.GetLowReg() == rl_src2.reg.GetHighReg()) {
1836 RegStorage t_reg = AllocTemp();
1837 OpRegCopy(t_reg, rl_src2.reg.GetHigh());
1838 OpRegReg(kOpMvn, rl_result.reg.GetLow(), rl_src2.reg.GetLow());
1839 OpRegReg(kOpMvn, rl_result.reg.GetHigh(), t_reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001840 FreeTemp(t_reg);
1841 } else {
buzbee2700f7e2014-03-07 09:46:20 -08001842 OpRegReg(kOpMvn, rl_result.reg.GetLow(), rl_src2.reg.GetLow());
1843 OpRegReg(kOpMvn, rl_result.reg.GetHigh(), rl_src2.reg.GetHigh());
Brian Carlstrom7940e442013-07-12 13:46:57 -07001844 }
1845 StoreValueWide(rl_dest, rl_result);
1846 return;
1847 case Instruction::ADD_LONG:
1848 case Instruction::ADD_LONG_2ADDR:
1849 if (cu_->instruction_set != kThumb2) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08001850 GenAddLong(opcode, rl_dest, rl_src1, rl_src2);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001851 return;
1852 }
1853 first_op = kOpAdd;
1854 second_op = kOpAdc;
1855 break;
1856 case Instruction::SUB_LONG:
1857 case Instruction::SUB_LONG_2ADDR:
1858 if (cu_->instruction_set != kThumb2) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08001859 GenSubLong(opcode, rl_dest, rl_src1, rl_src2);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001860 return;
1861 }
1862 first_op = kOpSub;
1863 second_op = kOpSbc;
1864 break;
1865 case Instruction::MUL_LONG:
1866 case Instruction::MUL_LONG_2ADDR:
Mark Mendell4708dcd2014-01-22 09:05:18 -08001867 if (cu_->instruction_set != kMips) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08001868 GenMulLong(opcode, rl_dest, rl_src1, rl_src2);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001869 return;
1870 } else {
1871 call_out = true;
buzbee2700f7e2014-03-07 09:46:20 -08001872 ret_reg = TargetReg(kRet0).GetReg();
Ian Rogersdd7624d2014-03-14 17:43:00 -07001873 func_offset = QUICK_ENTRYPOINT_OFFSET(4, pLmul);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001874 }
1875 break;
1876 case Instruction::DIV_LONG:
1877 case Instruction::DIV_LONG_2ADDR:
1878 call_out = true;
1879 check_zero = true;
buzbee2700f7e2014-03-07 09:46:20 -08001880 ret_reg = TargetReg(kRet0).GetReg();
Ian Rogersdd7624d2014-03-14 17:43:00 -07001881 func_offset = QUICK_ENTRYPOINT_OFFSET(4, pLdiv);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001882 break;
1883 case Instruction::REM_LONG:
1884 case Instruction::REM_LONG_2ADDR:
1885 call_out = true;
1886 check_zero = true;
Ian Rogersdd7624d2014-03-14 17:43:00 -07001887 func_offset = QUICK_ENTRYPOINT_OFFSET(4, pLmod);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001888 /* NOTE - for Arm, result is in kArg2/kArg3 instead of kRet0/kRet1 */
buzbee2700f7e2014-03-07 09:46:20 -08001889 ret_reg = (cu_->instruction_set == kThumb2) ? TargetReg(kArg2).GetReg() : TargetReg(kRet0).GetReg();
Brian Carlstrom7940e442013-07-12 13:46:57 -07001890 break;
1891 case Instruction::AND_LONG_2ADDR:
1892 case Instruction::AND_LONG:
Dmitry Petrochenko6a58cb12014-04-02 17:27:59 +07001893 if (cu_->instruction_set == kX86 || cu_->instruction_set == kX86_64) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08001894 return GenAndLong(opcode, rl_dest, rl_src1, rl_src2);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001895 }
1896 first_op = kOpAnd;
1897 second_op = kOpAnd;
1898 break;
1899 case Instruction::OR_LONG:
1900 case Instruction::OR_LONG_2ADDR:
Dmitry Petrochenko6a58cb12014-04-02 17:27:59 +07001901 if (cu_->instruction_set == kX86 || cu_->instruction_set == kX86_64) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08001902 GenOrLong(opcode, rl_dest, rl_src1, rl_src2);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001903 return;
1904 }
1905 first_op = kOpOr;
1906 second_op = kOpOr;
1907 break;
1908 case Instruction::XOR_LONG:
1909 case Instruction::XOR_LONG_2ADDR:
Dmitry Petrochenko6a58cb12014-04-02 17:27:59 +07001910 if (cu_->instruction_set == kX86 || cu_->instruction_set == kX86_64) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08001911 GenXorLong(opcode, rl_dest, rl_src1, rl_src2);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001912 return;
1913 }
1914 first_op = kOpXor;
1915 second_op = kOpXor;
1916 break;
1917 case Instruction::NEG_LONG: {
1918 GenNegLong(rl_dest, rl_src2);
1919 return;
1920 }
1921 default:
1922 LOG(FATAL) << "Invalid long arith op";
1923 }
1924 if (!call_out) {
1925 GenLong3Addr(first_op, second_op, rl_dest, rl_src1, rl_src2);
1926 } else {
1927 FlushAllRegs(); /* Send everything to home location */
1928 if (check_zero) {
buzbee2700f7e2014-03-07 09:46:20 -08001929 RegStorage r_tmp1 = RegStorage::MakeRegPair(TargetReg(kArg0), TargetReg(kArg1));
1930 RegStorage r_tmp2 = RegStorage::MakeRegPair(TargetReg(kArg2), TargetReg(kArg3));
1931 LoadValueDirectWideFixed(rl_src2, r_tmp2);
1932 RegStorage r_tgt = CallHelperSetup(func_offset);
Mingyao Yange643a172014-04-08 11:02:52 -07001933 GenDivZeroCheckWide(RegStorage::MakeRegPair(TargetReg(kArg2), TargetReg(kArg3)));
buzbee2700f7e2014-03-07 09:46:20 -08001934 LoadValueDirectWideFixed(rl_src1, r_tmp1);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001935 // NOTE: callout here is not a safepoint
1936 CallHelper(r_tgt, func_offset, false /* not safepoint */);
1937 } else {
1938 CallRuntimeHelperRegLocationRegLocation(func_offset, rl_src1, rl_src2, false);
1939 }
1940 // Adjust return regs in to handle case of rem returning kArg2/kArg3
buzbee2700f7e2014-03-07 09:46:20 -08001941 if (ret_reg == TargetReg(kRet0).GetReg())
Brian Carlstrom7940e442013-07-12 13:46:57 -07001942 rl_result = GetReturnWide(false);
1943 else
1944 rl_result = GetReturnWideAlt();
1945 StoreValueWide(rl_dest, rl_result);
1946 }
1947}
1948
Ian Rogersdd7624d2014-03-14 17:43:00 -07001949void Mir2Lir::GenConversionCall(ThreadOffset<4> func_offset,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001950 RegLocation rl_dest, RegLocation rl_src) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001951 /*
1952 * Don't optimize the register usage since it calls out to support
1953 * functions
1954 */
1955 FlushAllRegs(); /* Send everything to home location */
Brian Carlstrom7940e442013-07-12 13:46:57 -07001956 CallRuntimeHelperRegLocation(func_offset, rl_src, false);
1957 if (rl_dest.wide) {
1958 RegLocation rl_result;
1959 rl_result = GetReturnWide(rl_dest.fp);
1960 StoreValueWide(rl_dest, rl_result);
1961 } else {
1962 RegLocation rl_result;
1963 rl_result = GetReturn(rl_dest.fp);
1964 StoreValue(rl_dest, rl_result);
1965 }
1966}
1967
Mingyao Yang6ffcfa02014-04-25 11:06:00 -07001968class SuspendCheckSlowPath : public Mir2Lir::LIRSlowPath {
1969 public:
1970 SuspendCheckSlowPath(Mir2Lir* m2l, LIR* branch, LIR* cont)
1971 : LIRSlowPath(m2l, m2l->GetCurrentDexPc(), branch, cont) {
1972 }
1973
1974 void Compile() OVERRIDE {
1975 m2l_->ResetRegPool();
1976 m2l_->ResetDefTracking();
1977 GenerateTargetLabel(kPseudoSuspendTarget);
1978 m2l_->CallRuntimeHelper(QUICK_ENTRYPOINT_OFFSET(4, pTestSuspend), true);
1979 if (cont_ != nullptr) {
1980 m2l_->OpUnconditionalBranch(cont_);
1981 }
1982 }
1983};
1984
Brian Carlstrom7940e442013-07-12 13:46:57 -07001985/* Check if we need to check for pending suspend request */
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001986void Mir2Lir::GenSuspendTest(int opt_flags) {
Dave Allisonb373e092014-02-20 16:06:36 -08001987 if (Runtime::Current()->ExplicitSuspendChecks()) {
1988 if (NO_SUSPEND || (opt_flags & MIR_IGNORE_SUSPEND_CHECK)) {
1989 return;
1990 }
1991 FlushAllRegs();
1992 LIR* branch = OpTestSuspend(NULL);
Mingyao Yang6ffcfa02014-04-25 11:06:00 -07001993 LIR* cont = NewLIR0(kPseudoTargetLabel);
1994 AddSlowPath(new (arena_) SuspendCheckSlowPath(this, branch, cont));
Dave Allisonb373e092014-02-20 16:06:36 -08001995 } else {
1996 if (NO_SUSPEND || (opt_flags & MIR_IGNORE_SUSPEND_CHECK)) {
1997 return;
1998 }
1999 FlushAllRegs(); // TODO: needed?
2000 LIR* inst = CheckSuspendUsingLoad();
2001 MarkSafepointPC(inst);
Brian Carlstrom7940e442013-07-12 13:46:57 -07002002 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07002003}
2004
2005/* Check if we need to check for pending suspend request */
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07002006void Mir2Lir::GenSuspendTestAndBranch(int opt_flags, LIR* target) {
Dave Allisonb373e092014-02-20 16:06:36 -08002007 if (Runtime::Current()->ExplicitSuspendChecks()) {
2008 if (NO_SUSPEND || (opt_flags & MIR_IGNORE_SUSPEND_CHECK)) {
2009 OpUnconditionalBranch(target);
2010 return;
2011 }
2012 OpTestSuspend(target);
Dave Allisonb373e092014-02-20 16:06:36 -08002013 FlushAllRegs();
Mingyao Yang6ffcfa02014-04-25 11:06:00 -07002014 LIR* branch = OpUnconditionalBranch(nullptr);
2015 AddSlowPath(new (arena_) SuspendCheckSlowPath(this, branch, target));
Dave Allisonb373e092014-02-20 16:06:36 -08002016 } else {
2017 // For the implicit suspend check, just perform the trigger
2018 // load and branch to the target.
2019 if (NO_SUSPEND || (opt_flags & MIR_IGNORE_SUSPEND_CHECK)) {
2020 OpUnconditionalBranch(target);
2021 return;
2022 }
2023 FlushAllRegs();
2024 LIR* inst = CheckSuspendUsingLoad();
2025 MarkSafepointPC(inst);
Brian Carlstrom7940e442013-07-12 13:46:57 -07002026 OpUnconditionalBranch(target);
Brian Carlstrom7940e442013-07-12 13:46:57 -07002027 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07002028}
2029
Ian Rogersd9c4fc92013-10-01 19:45:43 -07002030/* Call out to helper assembly routine that will null check obj and then lock it. */
2031void Mir2Lir::GenMonitorEnter(int opt_flags, RegLocation rl_src) {
2032 FlushAllRegs();
Ian Rogersdd7624d2014-03-14 17:43:00 -07002033 CallRuntimeHelperRegLocation(QUICK_ENTRYPOINT_OFFSET(4, pLockObject), rl_src, true);
Ian Rogersd9c4fc92013-10-01 19:45:43 -07002034}
2035
2036/* Call out to helper assembly routine that will null check obj and then unlock it. */
2037void Mir2Lir::GenMonitorExit(int opt_flags, RegLocation rl_src) {
2038 FlushAllRegs();
Ian Rogersdd7624d2014-03-14 17:43:00 -07002039 CallRuntimeHelperRegLocation(QUICK_ENTRYPOINT_OFFSET(4, pUnlockObject), rl_src, true);
Ian Rogersd9c4fc92013-10-01 19:45:43 -07002040}
2041
Bill Buzbeed61ba4b2014-01-13 21:44:01 +00002042/* Generic code for generating a wide constant into a VR. */
2043void Mir2Lir::GenConstWide(RegLocation rl_dest, int64_t value) {
2044 RegLocation rl_result = EvalLoc(rl_dest, kAnyReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002045 LoadConstantWide(rl_result.reg, value);
Bill Buzbeed61ba4b2014-01-13 21:44:01 +00002046 StoreValueWide(rl_dest, rl_result);
2047}
2048
Brian Carlstrom7940e442013-07-12 13:46:57 -07002049} // namespace art