blob: 46dbdf1db4f6f7a52dd10ae3199930f69e5157de [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 */
16
17/* This file contains codegen for the X86 ISA */
18
19#include "codegen_x86.h"
20#include "dex/quick/mir_to_lir-inl.h"
21#include "mirror/array.h"
22#include "x86_lir.h"
23
24namespace art {
25
26/*
27 * Perform register memory operation.
28 */
buzbee2700f7e2014-03-07 09:46:20 -080029LIR* X86Mir2Lir::GenRegMemCheck(ConditionCode c_code, RegStorage reg1, RegStorage base,
30 int offset, ThrowKind kind) {
Brian Carlstrom7940e442013-07-12 13:46:57 -070031 LIR* tgt = RawLIR(0, kPseudoThrowTarget, kind,
buzbee2700f7e2014-03-07 09:46:20 -080032 current_dalvik_offset_, reg1.GetReg(), base.GetReg(), offset);
Brian Carlstrom7940e442013-07-12 13:46:57 -070033 OpRegMem(kOpCmp, reg1, base, offset);
34 LIR* branch = OpCondBranch(c_code, tgt);
35 // Remember branch target - will process later
36 throw_launchpads_.Insert(tgt);
37 return branch;
38}
39
40/*
Mark Mendell343adb52013-12-18 06:02:17 -080041 * Perform a compare of memory to immediate value
42 */
buzbee2700f7e2014-03-07 09:46:20 -080043LIR* X86Mir2Lir::GenMemImmedCheck(ConditionCode c_code, RegStorage base, int offset,
44 int check_value, ThrowKind kind) {
Mark Mendell343adb52013-12-18 06:02:17 -080045 LIR* tgt = RawLIR(0, kPseudoThrowTarget, kind,
buzbee2700f7e2014-03-07 09:46:20 -080046 current_dalvik_offset_, base.GetReg(), check_value, 0);
47 NewLIR3(IS_SIMM8(check_value) ? kX86Cmp32MI8 : kX86Cmp32MI, base.GetReg(), offset, check_value);
Mark Mendell343adb52013-12-18 06:02:17 -080048 LIR* branch = OpCondBranch(c_code, tgt);
49 // Remember branch target - will process later
50 throw_launchpads_.Insert(tgt);
51 return branch;
52}
53
54/*
Brian Carlstrom7940e442013-07-12 13:46:57 -070055 * Compare two 64-bit values
56 * x = y return 0
57 * x < y return -1
58 * x > y return 1
59 */
60void X86Mir2Lir::GenCmpLong(RegLocation rl_dest, RegLocation rl_src1,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -070061 RegLocation rl_src2) {
Brian Carlstrom7940e442013-07-12 13:46:57 -070062 FlushAllRegs();
63 LockCallTemps(); // Prepare for explicit register usage
buzbee2700f7e2014-03-07 09:46:20 -080064 RegStorage r_tmp1(RegStorage::k64BitPair, r0, r1);
65 RegStorage r_tmp2(RegStorage::k64BitPair, r2, r3);
66 LoadValueDirectWideFixed(rl_src1, r_tmp1);
67 LoadValueDirectWideFixed(rl_src2, r_tmp2);
Brian Carlstrom7940e442013-07-12 13:46:57 -070068 // Compute (r1:r0) = (r1:r0) - (r3:r2)
buzbee2700f7e2014-03-07 09:46:20 -080069 OpRegReg(kOpSub, rs_r0, rs_r2); // r0 = r0 - r2
70 OpRegReg(kOpSbc, rs_r1, rs_r3); // r1 = r1 - r3 - CF
Brian Carlstrom7940e442013-07-12 13:46:57 -070071 NewLIR2(kX86Set8R, r2, kX86CondL); // r2 = (r1:r0) < (r3:r2) ? 1 : 0
72 NewLIR2(kX86Movzx8RR, r2, r2);
buzbee2700f7e2014-03-07 09:46:20 -080073 OpReg(kOpNeg, rs_r2); // r2 = -r2
74 OpRegReg(kOpOr, rs_r0, rs_r1); // r0 = high | low - sets ZF
Brian Carlstrom7940e442013-07-12 13:46:57 -070075 NewLIR2(kX86Set8R, r0, kX86CondNz); // r0 = (r1:r0) != (r3:r2) ? 1 : 0
76 NewLIR2(kX86Movzx8RR, r0, r0);
buzbee2700f7e2014-03-07 09:46:20 -080077 OpRegReg(kOpOr, rs_r0, rs_r2); // r0 = r0 | r2
Brian Carlstrom7940e442013-07-12 13:46:57 -070078 RegLocation rl_result = LocCReturn();
79 StoreValue(rl_dest, rl_result);
80}
81
82X86ConditionCode X86ConditionEncoding(ConditionCode cond) {
83 switch (cond) {
84 case kCondEq: return kX86CondEq;
85 case kCondNe: return kX86CondNe;
86 case kCondCs: return kX86CondC;
87 case kCondCc: return kX86CondNc;
Vladimir Marko58af1f92013-12-19 13:31:15 +000088 case kCondUlt: return kX86CondC;
89 case kCondUge: return kX86CondNc;
Brian Carlstrom7940e442013-07-12 13:46:57 -070090 case kCondMi: return kX86CondS;
91 case kCondPl: return kX86CondNs;
92 case kCondVs: return kX86CondO;
93 case kCondVc: return kX86CondNo;
94 case kCondHi: return kX86CondA;
95 case kCondLs: return kX86CondBe;
96 case kCondGe: return kX86CondGe;
97 case kCondLt: return kX86CondL;
98 case kCondGt: return kX86CondG;
99 case kCondLe: return kX86CondLe;
100 case kCondAl:
101 case kCondNv: LOG(FATAL) << "Should not reach here";
102 }
103 return kX86CondO;
104}
105
buzbee2700f7e2014-03-07 09:46:20 -0800106LIR* X86Mir2Lir::OpCmpBranch(ConditionCode cond, RegStorage src1, RegStorage src2, LIR* target) {
107 NewLIR2(kX86Cmp32RR, src1.GetReg(), src2.GetReg());
Brian Carlstrom7940e442013-07-12 13:46:57 -0700108 X86ConditionCode cc = X86ConditionEncoding(cond);
109 LIR* branch = NewLIR2(kX86Jcc8, 0 /* lir operand for Jcc offset */ ,
110 cc);
111 branch->target = target;
112 return branch;
113}
114
buzbee2700f7e2014-03-07 09:46:20 -0800115LIR* X86Mir2Lir::OpCmpImmBranch(ConditionCode cond, RegStorage reg,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700116 int check_value, LIR* target) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700117 if ((check_value == 0) && (cond == kCondEq || cond == kCondNe)) {
118 // TODO: when check_value == 0 and reg is rCX, use the jcxz/nz opcode
buzbee2700f7e2014-03-07 09:46:20 -0800119 NewLIR2(kX86Test32RR, reg.GetReg(), reg.GetReg());
Brian Carlstrom7940e442013-07-12 13:46:57 -0700120 } else {
buzbee2700f7e2014-03-07 09:46:20 -0800121 NewLIR2(IS_SIMM8(check_value) ? kX86Cmp32RI8 : kX86Cmp32RI, reg.GetReg(), check_value);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700122 }
123 X86ConditionCode cc = X86ConditionEncoding(cond);
124 LIR* branch = NewLIR2(kX86Jcc8, 0 /* lir operand for Jcc offset */ , cc);
125 branch->target = target;
126 return branch;
127}
128
buzbee2700f7e2014-03-07 09:46:20 -0800129LIR* X86Mir2Lir::OpRegCopyNoInsert(RegStorage r_dest, RegStorage r_src) {
130 // If src or dest is a pair, we'll be using low reg.
131 if (r_dest.IsPair()) {
132 r_dest = r_dest.GetLow();
133 }
134 if (r_src.IsPair()) {
135 r_src = r_src.GetLow();
136 }
137 if (X86_FPREG(r_dest.GetReg()) || X86_FPREG(r_src.GetReg()))
Brian Carlstrom7940e442013-07-12 13:46:57 -0700138 return OpFpRegCopy(r_dest, r_src);
139 LIR* res = RawLIR(current_dalvik_offset_, kX86Mov32RR,
buzbee2700f7e2014-03-07 09:46:20 -0800140 r_dest.GetReg(), r_src.GetReg());
Razvan A Lupusorubd288c22013-12-20 17:27:23 -0800141 if (!(cu_->disable_opt & (1 << kSafeOptimizations)) && r_dest == r_src) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700142 res->flags.is_nop = true;
143 }
144 return res;
145}
146
buzbee2700f7e2014-03-07 09:46:20 -0800147LIR* X86Mir2Lir::OpRegCopy(RegStorage r_dest, RegStorage r_src) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700148 LIR *res = OpRegCopyNoInsert(r_dest, r_src);
149 AppendLIR(res);
150 return res;
151}
152
buzbee2700f7e2014-03-07 09:46:20 -0800153void X86Mir2Lir::OpRegCopyWide(RegStorage r_dest, RegStorage r_src) {
154 // FIXME: handle k64BitSolo when we start using them.
155 DCHECK(r_dest.IsPair());
156 DCHECK(r_src.IsPair());
157 bool dest_fp = X86_FPREG(r_dest.GetLowReg());
158 bool src_fp = X86_FPREG(r_src.GetLowReg());
Brian Carlstrom7940e442013-07-12 13:46:57 -0700159 if (dest_fp) {
160 if (src_fp) {
buzbee2700f7e2014-03-07 09:46:20 -0800161 // TODO: we ought to handle this case here - reserve OpRegCopy for 32-bit copies.
162 OpRegCopy(RegStorage::Solo64(S2d(r_dest.GetLowReg(), r_dest.GetHighReg())),
163 RegStorage::Solo64(S2d(r_src.GetLowReg(), r_src.GetHighReg())));
Brian Carlstrom7940e442013-07-12 13:46:57 -0700164 } else {
165 // TODO: Prevent this from happening in the code. The result is often
166 // unused or could have been loaded more easily from memory.
buzbee2700f7e2014-03-07 09:46:20 -0800167 NewLIR2(kX86MovdxrRR, r_dest.GetLowReg(), r_src.GetLowReg());
168 RegStorage r_tmp = AllocTempDouble();
169 NewLIR2(kX86MovdxrRR, r_tmp.GetLowReg(), r_src.GetHighReg());
170 NewLIR2(kX86PunpckldqRR, r_dest.GetLowReg(), r_tmp.GetLowReg());
171 FreeTemp(r_tmp);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700172 }
173 } else {
174 if (src_fp) {
buzbee2700f7e2014-03-07 09:46:20 -0800175 NewLIR2(kX86MovdrxRR, r_dest.GetLowReg(), r_src.GetLowReg());
176 NewLIR2(kX86PsrlqRI, r_src.GetLowReg(), 32);
177 NewLIR2(kX86MovdrxRR, r_dest.GetHighReg(), r_src.GetLowReg());
Brian Carlstrom7940e442013-07-12 13:46:57 -0700178 } else {
179 // Handle overlap
buzbee2700f7e2014-03-07 09:46:20 -0800180 if (r_src.GetHighReg() == r_dest.GetLowReg() && r_src.GetLowReg() == r_dest.GetHighReg()) {
Razvan A Lupusoru3bc01742014-02-06 13:18:43 -0800181 // Deal with cycles.
buzbee2700f7e2014-03-07 09:46:20 -0800182 RegStorage temp_reg = AllocTemp();
183 OpRegCopy(temp_reg, r_dest.GetHigh());
184 OpRegCopy(r_dest.GetHigh(), r_dest.GetLow());
185 OpRegCopy(r_dest.GetLow(), temp_reg);
Razvan A Lupusoru3bc01742014-02-06 13:18:43 -0800186 FreeTemp(temp_reg);
buzbee2700f7e2014-03-07 09:46:20 -0800187 } else if (r_src.GetHighReg() == r_dest.GetLowReg()) {
188 OpRegCopy(r_dest.GetHigh(), r_src.GetHigh());
189 OpRegCopy(r_dest.GetLow(), r_src.GetLow());
Brian Carlstrom7940e442013-07-12 13:46:57 -0700190 } else {
buzbee2700f7e2014-03-07 09:46:20 -0800191 OpRegCopy(r_dest.GetLow(), r_src.GetLow());
192 OpRegCopy(r_dest.GetHigh(), r_src.GetHigh());
Brian Carlstrom7940e442013-07-12 13:46:57 -0700193 }
194 }
195 }
196}
197
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700198void X86Mir2Lir::GenSelect(BasicBlock* bb, MIR* mir) {
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800199 RegLocation rl_result;
200 RegLocation rl_src = mir_graph_->GetSrc(mir, 0);
201 RegLocation rl_dest = mir_graph_->GetDest(mir);
202 rl_src = LoadValue(rl_src, kCoreReg);
Vladimir Markoa1a70742014-03-03 10:28:05 +0000203 ConditionCode ccode = mir->meta.ccode;
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800204
205 // The kMirOpSelect has two variants, one for constants and one for moves.
206 const bool is_constant_case = (mir->ssa_rep->num_uses == 1);
207
208 if (is_constant_case) {
209 int true_val = mir->dalvikInsn.vB;
210 int false_val = mir->dalvikInsn.vC;
211 rl_result = EvalLoc(rl_dest, kCoreReg, true);
212
213 /*
Vladimir Markoa1a70742014-03-03 10:28:05 +0000214 * For ccode == kCondEq:
215 *
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800216 * 1) When the true case is zero and result_reg is not same as src_reg:
217 * xor result_reg, result_reg
218 * cmp $0, src_reg
219 * mov t1, $false_case
220 * cmovnz result_reg, t1
221 * 2) When the false case is zero and result_reg is not same as src_reg:
222 * xor result_reg, result_reg
223 * cmp $0, src_reg
224 * mov t1, $true_case
225 * cmovz result_reg, t1
226 * 3) All other cases (we do compare first to set eflags):
227 * cmp $0, src_reg
Vladimir Markoa1a70742014-03-03 10:28:05 +0000228 * mov result_reg, $false_case
229 * mov t1, $true_case
230 * cmovz result_reg, t1
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800231 */
buzbee2700f7e2014-03-07 09:46:20 -0800232 const bool result_reg_same_as_src =
233 (rl_src.location == kLocPhysReg && rl_src.reg.GetReg() == rl_result.reg.GetReg());
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800234 const bool true_zero_case = (true_val == 0 && false_val != 0 && !result_reg_same_as_src);
235 const bool false_zero_case = (false_val == 0 && true_val != 0 && !result_reg_same_as_src);
236 const bool catch_all_case = !(true_zero_case || false_zero_case);
237
238 if (true_zero_case || false_zero_case) {
buzbee2700f7e2014-03-07 09:46:20 -0800239 OpRegReg(kOpXor, rl_result.reg, rl_result.reg);
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800240 }
241
242 if (true_zero_case || false_zero_case || catch_all_case) {
buzbee2700f7e2014-03-07 09:46:20 -0800243 OpRegImm(kOpCmp, rl_src.reg, 0);
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800244 }
245
246 if (catch_all_case) {
buzbee2700f7e2014-03-07 09:46:20 -0800247 OpRegImm(kOpMov, rl_result.reg, false_val);
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800248 }
249
250 if (true_zero_case || false_zero_case || catch_all_case) {
Vladimir Markoa1a70742014-03-03 10:28:05 +0000251 ConditionCode cc = true_zero_case ? NegateComparison(ccode) : ccode;
252 int immediateForTemp = true_zero_case ? false_val : true_val;
buzbee2700f7e2014-03-07 09:46:20 -0800253 RegStorage temp1_reg = AllocTemp();
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800254 OpRegImm(kOpMov, temp1_reg, immediateForTemp);
255
buzbee2700f7e2014-03-07 09:46:20 -0800256 OpCondRegReg(kOpCmov, cc, rl_result.reg, temp1_reg);
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800257
258 FreeTemp(temp1_reg);
259 }
260 } else {
261 RegLocation rl_true = mir_graph_->GetSrc(mir, 1);
262 RegLocation rl_false = mir_graph_->GetSrc(mir, 2);
263 rl_true = LoadValue(rl_true, kCoreReg);
264 rl_false = LoadValue(rl_false, kCoreReg);
265 rl_result = EvalLoc(rl_dest, kCoreReg, true);
266
267 /*
Vladimir Markoa1a70742014-03-03 10:28:05 +0000268 * For ccode == kCondEq:
269 *
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800270 * 1) When true case is already in place:
271 * cmp $0, src_reg
272 * cmovnz result_reg, false_reg
273 * 2) When false case is already in place:
274 * cmp $0, src_reg
275 * cmovz result_reg, true_reg
276 * 3) When neither cases are in place:
277 * cmp $0, src_reg
Vladimir Markoa1a70742014-03-03 10:28:05 +0000278 * mov result_reg, false_reg
279 * cmovz result_reg, true_reg
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800280 */
281
282 // kMirOpSelect is generated just for conditional cases when comparison is done with zero.
buzbee2700f7e2014-03-07 09:46:20 -0800283 OpRegImm(kOpCmp, rl_src.reg, 0);
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800284
Bill Buzbee00e1ec62014-02-27 23:44:13 +0000285 if (rl_result.reg.GetReg() == rl_true.reg.GetReg()) {
buzbee2700f7e2014-03-07 09:46:20 -0800286 OpCondRegReg(kOpCmov, NegateComparison(ccode), rl_result.reg, rl_false.reg);
Bill Buzbee00e1ec62014-02-27 23:44:13 +0000287 } else if (rl_result.reg.GetReg() == rl_false.reg.GetReg()) {
buzbee2700f7e2014-03-07 09:46:20 -0800288 OpCondRegReg(kOpCmov, ccode, rl_result.reg, rl_true.reg);
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800289 } else {
buzbee2700f7e2014-03-07 09:46:20 -0800290 OpRegCopy(rl_result.reg, rl_false.reg);
291 OpCondRegReg(kOpCmov, ccode, rl_result.reg, rl_true.reg);
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800292 }
293 }
294
295 StoreValue(rl_dest, rl_result);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700296}
297
298void X86Mir2Lir::GenFusedLongCmpBranch(BasicBlock* bb, MIR* mir) {
buzbee0d829482013-10-11 15:24:55 -0700299 LIR* taken = &block_label_list_[bb->taken];
Brian Carlstrom7940e442013-07-12 13:46:57 -0700300 RegLocation rl_src1 = mir_graph_->GetSrcWide(mir, 0);
301 RegLocation rl_src2 = mir_graph_->GetSrcWide(mir, 2);
Vladimir Markoa8946072014-01-22 10:30:44 +0000302 ConditionCode ccode = mir->meta.ccode;
Mark Mendell412d4f82013-12-18 13:32:36 -0800303
304 if (rl_src1.is_const) {
305 std::swap(rl_src1, rl_src2);
306 ccode = FlipComparisonOrder(ccode);
307 }
308 if (rl_src2.is_const) {
309 // Do special compare/branch against simple const operand
310 int64_t val = mir_graph_->ConstantValueWide(rl_src2);
311 GenFusedLongCmpImmBranch(bb, rl_src1, val, ccode);
312 return;
313 }
314
Brian Carlstrom7940e442013-07-12 13:46:57 -0700315 FlushAllRegs();
316 LockCallTemps(); // Prepare for explicit register usage
buzbee2700f7e2014-03-07 09:46:20 -0800317 RegStorage r_tmp1(RegStorage::k64BitPair, r0, r1);
318 RegStorage r_tmp2(RegStorage::k64BitPair, r2, r3);
319 LoadValueDirectWideFixed(rl_src1, r_tmp1);
320 LoadValueDirectWideFixed(rl_src2, r_tmp2);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700321 // Swap operands and condition code to prevent use of zero flag.
322 if (ccode == kCondLe || ccode == kCondGt) {
323 // Compute (r3:r2) = (r3:r2) - (r1:r0)
buzbee2700f7e2014-03-07 09:46:20 -0800324 OpRegReg(kOpSub, rs_r2, rs_r0); // r2 = r2 - r0
325 OpRegReg(kOpSbc, rs_r3, rs_r1); // r3 = r3 - r1 - CF
Brian Carlstrom7940e442013-07-12 13:46:57 -0700326 } else {
327 // Compute (r1:r0) = (r1:r0) - (r3:r2)
buzbee2700f7e2014-03-07 09:46:20 -0800328 OpRegReg(kOpSub, rs_r0, rs_r2); // r0 = r0 - r2
329 OpRegReg(kOpSbc, rs_r1, rs_r3); // r1 = r1 - r3 - CF
Brian Carlstrom7940e442013-07-12 13:46:57 -0700330 }
331 switch (ccode) {
332 case kCondEq:
333 case kCondNe:
buzbee2700f7e2014-03-07 09:46:20 -0800334 OpRegReg(kOpOr, rs_r0, rs_r1); // r0 = r0 | r1
Brian Carlstrom7940e442013-07-12 13:46:57 -0700335 break;
336 case kCondLe:
337 ccode = kCondGe;
338 break;
339 case kCondGt:
340 ccode = kCondLt;
341 break;
342 case kCondLt:
343 case kCondGe:
344 break;
345 default:
346 LOG(FATAL) << "Unexpected ccode: " << ccode;
347 }
348 OpCondBranch(ccode, taken);
349}
350
Mark Mendell412d4f82013-12-18 13:32:36 -0800351void X86Mir2Lir::GenFusedLongCmpImmBranch(BasicBlock* bb, RegLocation rl_src1,
352 int64_t val, ConditionCode ccode) {
353 int32_t val_lo = Low32Bits(val);
354 int32_t val_hi = High32Bits(val);
355 LIR* taken = &block_label_list_[bb->taken];
356 LIR* not_taken = &block_label_list_[bb->fall_through];
357 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
buzbee2700f7e2014-03-07 09:46:20 -0800358 RegStorage low_reg = rl_src1.reg.GetLow();
359 RegStorage high_reg = rl_src1.reg.GetHigh();
Mark Mendell412d4f82013-12-18 13:32:36 -0800360
361 if (val == 0 && (ccode == kCondEq || ccode == kCondNe)) {
buzbee2700f7e2014-03-07 09:46:20 -0800362 RegStorage t_reg = AllocTemp();
Mark Mendell412d4f82013-12-18 13:32:36 -0800363 OpRegRegReg(kOpOr, t_reg, low_reg, high_reg);
364 FreeTemp(t_reg);
365 OpCondBranch(ccode, taken);
366 return;
367 }
368
369 OpRegImm(kOpCmp, high_reg, val_hi);
370 switch (ccode) {
371 case kCondEq:
372 case kCondNe:
373 OpCondBranch(kCondNe, (ccode == kCondEq) ? not_taken : taken);
374 break;
375 case kCondLt:
376 OpCondBranch(kCondLt, taken);
377 OpCondBranch(kCondGt, not_taken);
378 ccode = kCondUlt;
379 break;
380 case kCondLe:
381 OpCondBranch(kCondLt, taken);
382 OpCondBranch(kCondGt, not_taken);
383 ccode = kCondLs;
384 break;
385 case kCondGt:
386 OpCondBranch(kCondGt, taken);
387 OpCondBranch(kCondLt, not_taken);
388 ccode = kCondHi;
389 break;
390 case kCondGe:
391 OpCondBranch(kCondGt, taken);
392 OpCondBranch(kCondLt, not_taken);
393 ccode = kCondUge;
394 break;
395 default:
396 LOG(FATAL) << "Unexpected ccode: " << ccode;
397 }
398 OpCmpImmBranch(ccode, low_reg, val_lo, taken);
399}
400
Mark Mendell2bf31e62014-01-23 12:13:40 -0800401void X86Mir2Lir::CalculateMagicAndShift(int divisor, int& magic, int& shift) {
402 // It does not make sense to calculate magic and shift for zero divisor.
403 DCHECK_NE(divisor, 0);
404
405 /* According to H.S.Warren's Hacker's Delight Chapter 10 and
406 * T,Grablund, P.L.Montogomery's Division by invariant integers using multiplication.
407 * The magic number M and shift S can be calculated in the following way:
408 * Let nc be the most positive value of numerator(n) such that nc = kd - 1,
409 * where divisor(d) >=2.
410 * Let nc be the most negative value of numerator(n) such that nc = kd + 1,
411 * where divisor(d) <= -2.
412 * Thus nc can be calculated like:
413 * nc = 2^31 + 2^31 % d - 1, where d >= 2
414 * nc = -2^31 + (2^31 + 1) % d, where d >= 2.
415 *
416 * So the shift p is the smallest p satisfying
417 * 2^p > nc * (d - 2^p % d), where d >= 2
418 * 2^p > nc * (d + 2^p % d), where d <= -2.
419 *
420 * the magic number M is calcuated by
421 * M = (2^p + d - 2^p % d) / d, where d >= 2
422 * M = (2^p - d - 2^p % d) / d, where d <= -2.
423 *
424 * Notice that p is always bigger than or equal to 32, so we just return 32-p as
425 * the shift number S.
426 */
427
428 int32_t p = 31;
429 const uint32_t two31 = 0x80000000U;
430
431 // Initialize the computations.
432 uint32_t abs_d = (divisor >= 0) ? divisor : -divisor;
433 uint32_t tmp = two31 + (static_cast<uint32_t>(divisor) >> 31);
434 uint32_t abs_nc = tmp - 1 - tmp % abs_d;
435 uint32_t quotient1 = two31 / abs_nc;
436 uint32_t remainder1 = two31 % abs_nc;
437 uint32_t quotient2 = two31 / abs_d;
438 uint32_t remainder2 = two31 % abs_d;
439
440 /*
441 * To avoid handling both positive and negative divisor, Hacker's Delight
442 * introduces a method to handle these 2 cases together to avoid duplication.
443 */
444 uint32_t delta;
445 do {
446 p++;
447 quotient1 = 2 * quotient1;
448 remainder1 = 2 * remainder1;
449 if (remainder1 >= abs_nc) {
450 quotient1++;
451 remainder1 = remainder1 - abs_nc;
452 }
453 quotient2 = 2 * quotient2;
454 remainder2 = 2 * remainder2;
455 if (remainder2 >= abs_d) {
456 quotient2++;
457 remainder2 = remainder2 - abs_d;
458 }
459 delta = abs_d - remainder2;
460 } while (quotient1 < delta || (quotient1 == delta && remainder1 == 0));
461
462 magic = (divisor > 0) ? (quotient2 + 1) : (-quotient2 - 1);
463 shift = p - 32;
464}
465
buzbee2700f7e2014-03-07 09:46:20 -0800466RegLocation X86Mir2Lir::GenDivRemLit(RegLocation rl_dest, RegStorage reg_lo, int lit, bool is_div) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700467 LOG(FATAL) << "Unexpected use of GenDivRemLit for x86";
468 return rl_dest;
469}
470
Mark Mendell2bf31e62014-01-23 12:13:40 -0800471RegLocation X86Mir2Lir::GenDivRemLit(RegLocation rl_dest, RegLocation rl_src,
472 int imm, bool is_div) {
473 // Use a multiply (and fixup) to perform an int div/rem by a constant.
474
475 // We have to use fixed registers, so flush all the temps.
476 FlushAllRegs();
477 LockCallTemps(); // Prepare for explicit register usage.
478
479 // Assume that the result will be in EDX.
buzbee2700f7e2014-03-07 09:46:20 -0800480 RegLocation rl_result = {kLocPhysReg, 0, 0, 0, 0, 0, 0, 0, 1, kVectorNotUsed, rs_r2,
481 INVALID_SREG, INVALID_SREG};
Mark Mendell2bf31e62014-01-23 12:13:40 -0800482
Alexei Zavjalov79aa4232014-02-13 13:55:50 +0700483 // handle div/rem by 1 special case.
484 if (imm == 1) {
Mark Mendell2bf31e62014-01-23 12:13:40 -0800485 if (is_div) {
Alexei Zavjalov79aa4232014-02-13 13:55:50 +0700486 // x / 1 == x.
487 StoreValue(rl_result, rl_src);
488 } else {
489 // x % 1 == 0.
buzbee2700f7e2014-03-07 09:46:20 -0800490 LoadConstantNoClobber(rs_r0, 0);
Alexei Zavjalov79aa4232014-02-13 13:55:50 +0700491 // For this case, return the result in EAX.
Bill Buzbee00e1ec62014-02-27 23:44:13 +0000492 rl_result.reg.SetReg(r0);
Alexei Zavjalov79aa4232014-02-13 13:55:50 +0700493 }
494 } else if (imm == -1) { // handle 0x80000000 / -1 special case.
495 if (is_div) {
496 LIR *minint_branch = 0;
buzbee2700f7e2014-03-07 09:46:20 -0800497 LoadValueDirectFixed(rl_src, rs_r0);
498 OpRegImm(kOpCmp, rs_r0, 0x80000000);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800499 minint_branch = NewLIR2(kX86Jcc8, 0, kX86CondEq);
500
501 // for x != MIN_INT, x / -1 == -x.
502 NewLIR1(kX86Neg32R, r0);
503
504 LIR* branch_around = NewLIR1(kX86Jmp8, 0);
505 // The target for cmp/jmp above.
506 minint_branch->target = NewLIR0(kPseudoTargetLabel);
507 // EAX already contains the right value (0x80000000),
508 branch_around->target = NewLIR0(kPseudoTargetLabel);
509 } else {
510 // x % -1 == 0.
buzbee2700f7e2014-03-07 09:46:20 -0800511 LoadConstantNoClobber(rs_r0, 0);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800512 }
513 // For this case, return the result in EAX.
Bill Buzbee00e1ec62014-02-27 23:44:13 +0000514 rl_result.reg.SetReg(r0);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800515 } else {
Alexei Zavjalov79aa4232014-02-13 13:55:50 +0700516 CHECK(imm <= -2 || imm >= 2);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800517 // Use H.S.Warren's Hacker's Delight Chapter 10 and
518 // T,Grablund, P.L.Montogomery's Division by invariant integers using multiplication.
519 int magic, shift;
520 CalculateMagicAndShift(imm, magic, shift);
521
522 /*
523 * For imm >= 2,
524 * int(n/imm) = floor(n/imm) = floor(M*n/2^S), while n > 0
525 * int(n/imm) = ceil(n/imm) = floor(M*n/2^S) +1, while n < 0.
526 * For imm <= -2,
527 * int(n/imm) = ceil(n/imm) = floor(M*n/2^S) +1 , while n > 0
528 * int(n/imm) = floor(n/imm) = floor(M*n/2^S), while n < 0.
529 * We implement this algorithm in the following way:
530 * 1. multiply magic number m and numerator n, get the higher 32bit result in EDX
531 * 2. if imm > 0 and magic < 0, add numerator to EDX
532 * if imm < 0 and magic > 0, sub numerator from EDX
533 * 3. if S !=0, SAR S bits for EDX
534 * 4. add 1 to EDX if EDX < 0
535 * 5. Thus, EDX is the quotient
536 */
537
538 // Numerator into EAX.
buzbee2700f7e2014-03-07 09:46:20 -0800539 RegStorage numerator_reg;
Mark Mendell2bf31e62014-01-23 12:13:40 -0800540 if (!is_div || (imm > 0 && magic < 0) || (imm < 0 && magic > 0)) {
541 // We will need the value later.
542 if (rl_src.location == kLocPhysReg) {
543 // We can use it directly.
Bill Buzbee00e1ec62014-02-27 23:44:13 +0000544 DCHECK(rl_src.reg.GetReg() != r0 && rl_src.reg.GetReg() != r2);
buzbee2700f7e2014-03-07 09:46:20 -0800545 numerator_reg = rl_src.reg;
Mark Mendell2bf31e62014-01-23 12:13:40 -0800546 } else {
buzbee2700f7e2014-03-07 09:46:20 -0800547 numerator_reg = rs_r1;
548 LoadValueDirectFixed(rl_src, numerator_reg);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800549 }
buzbee2700f7e2014-03-07 09:46:20 -0800550 OpRegCopy(rs_r0, numerator_reg);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800551 } else {
552 // Only need this once. Just put it into EAX.
buzbee2700f7e2014-03-07 09:46:20 -0800553 LoadValueDirectFixed(rl_src, rs_r0);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800554 }
555
556 // EDX = magic.
buzbee2700f7e2014-03-07 09:46:20 -0800557 LoadConstantNoClobber(rs_r2, magic);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800558
559 // EDX:EAX = magic & dividend.
560 NewLIR1(kX86Imul32DaR, r2);
561
562 if (imm > 0 && magic < 0) {
563 // Add numerator to EDX.
buzbee2700f7e2014-03-07 09:46:20 -0800564 DCHECK(numerator_reg.Valid());
565 NewLIR2(kX86Add32RR, r2, numerator_reg.GetReg());
Mark Mendell2bf31e62014-01-23 12:13:40 -0800566 } else if (imm < 0 && magic > 0) {
buzbee2700f7e2014-03-07 09:46:20 -0800567 DCHECK(numerator_reg.Valid());
568 NewLIR2(kX86Sub32RR, r2, numerator_reg.GetReg());
Mark Mendell2bf31e62014-01-23 12:13:40 -0800569 }
570
571 // Do we need the shift?
572 if (shift != 0) {
573 // Shift EDX by 'shift' bits.
574 NewLIR2(kX86Sar32RI, r2, shift);
575 }
576
577 // Add 1 to EDX if EDX < 0.
578
579 // Move EDX to EAX.
buzbee2700f7e2014-03-07 09:46:20 -0800580 OpRegCopy(rs_r0, rs_r2);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800581
582 // Move sign bit to bit 0, zeroing the rest.
583 NewLIR2(kX86Shr32RI, r2, 31);
584
585 // EDX = EDX + EAX.
586 NewLIR2(kX86Add32RR, r2, r0);
587
588 // Quotient is in EDX.
589 if (!is_div) {
590 // We need to compute the remainder.
591 // Remainder is divisor - (quotient * imm).
buzbee2700f7e2014-03-07 09:46:20 -0800592 DCHECK(numerator_reg.Valid());
593 OpRegCopy(rs_r0, numerator_reg);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800594
595 // EAX = numerator * imm.
buzbee2700f7e2014-03-07 09:46:20 -0800596 OpRegRegImm(kOpMul, rs_r2, rs_r2, imm);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800597
598 // EDX -= EAX.
599 NewLIR2(kX86Sub32RR, r0, r2);
600
601 // For this case, return the result in EAX.
Bill Buzbee00e1ec62014-02-27 23:44:13 +0000602 rl_result.reg.SetReg(r0);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800603 }
604 }
605
606 return rl_result;
607}
608
buzbee2700f7e2014-03-07 09:46:20 -0800609RegLocation X86Mir2Lir::GenDivRem(RegLocation rl_dest, RegStorage reg_lo, RegStorage reg_hi,
610 bool is_div) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700611 LOG(FATAL) << "Unexpected use of GenDivRem for x86";
612 return rl_dest;
613}
614
Mark Mendell2bf31e62014-01-23 12:13:40 -0800615RegLocation X86Mir2Lir::GenDivRem(RegLocation rl_dest, RegLocation rl_src1,
616 RegLocation rl_src2, bool is_div, bool check_zero) {
617 // We have to use fixed registers, so flush all the temps.
618 FlushAllRegs();
619 LockCallTemps(); // Prepare for explicit register usage.
620
621 // Load LHS into EAX.
buzbee2700f7e2014-03-07 09:46:20 -0800622 LoadValueDirectFixed(rl_src1, rs_r0);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800623
624 // Load RHS into EBX.
buzbee2700f7e2014-03-07 09:46:20 -0800625 LoadValueDirectFixed(rl_src2, rs_r1);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800626
627 // Copy LHS sign bit into EDX.
628 NewLIR0(kx86Cdq32Da);
629
630 if (check_zero) {
631 // Handle division by zero case.
Mingyao Yange643a172014-04-08 11:02:52 -0700632 GenDivZeroCheck(rs_r1);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800633 }
634
635 // Have to catch 0x80000000/-1 case, or we will get an exception!
buzbee2700f7e2014-03-07 09:46:20 -0800636 OpRegImm(kOpCmp, rs_r1, -1);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800637 LIR *minus_one_branch = NewLIR2(kX86Jcc8, 0, kX86CondNe);
638
639 // RHS is -1.
buzbee2700f7e2014-03-07 09:46:20 -0800640 OpRegImm(kOpCmp, rs_r0, 0x80000000);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800641 LIR * minint_branch = NewLIR2(kX86Jcc8, 0, kX86CondNe);
642
643 // In 0x80000000/-1 case.
644 if (!is_div) {
645 // For DIV, EAX is already right. For REM, we need EDX 0.
buzbee2700f7e2014-03-07 09:46:20 -0800646 LoadConstantNoClobber(rs_r2, 0);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800647 }
648 LIR* done = NewLIR1(kX86Jmp8, 0);
649
650 // Expected case.
651 minus_one_branch->target = NewLIR0(kPseudoTargetLabel);
652 minint_branch->target = minus_one_branch->target;
653 NewLIR1(kX86Idivmod32DaR, r1);
654 done->target = NewLIR0(kPseudoTargetLabel);
655
656 // Result is in EAX for div and EDX for rem.
buzbee2700f7e2014-03-07 09:46:20 -0800657 RegLocation rl_result = {kLocPhysReg, 0, 0, 0, 0, 0, 0, 0, 1, kVectorNotUsed, rs_r0,
658 INVALID_SREG, INVALID_SREG};
Mark Mendell2bf31e62014-01-23 12:13:40 -0800659 if (!is_div) {
Bill Buzbee00e1ec62014-02-27 23:44:13 +0000660 rl_result.reg.SetReg(r2);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800661 }
662 return rl_result;
663}
664
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700665bool X86Mir2Lir::GenInlinedMinMaxInt(CallInfo* info, bool is_min) {
Dmitry Petrochenko6a58cb12014-04-02 17:27:59 +0700666 DCHECK(cu_->instruction_set == kX86 || cu_->instruction_set == kX86_64);
Razvan A Lupusorubd288c22013-12-20 17:27:23 -0800667
668 // Get the two arguments to the invoke and place them in GP registers.
Brian Carlstrom7940e442013-07-12 13:46:57 -0700669 RegLocation rl_src1 = info->args[0];
670 RegLocation rl_src2 = info->args[1];
671 rl_src1 = LoadValue(rl_src1, kCoreReg);
672 rl_src2 = LoadValue(rl_src2, kCoreReg);
Razvan A Lupusorubd288c22013-12-20 17:27:23 -0800673
Brian Carlstrom7940e442013-07-12 13:46:57 -0700674 RegLocation rl_dest = InlineTarget(info);
675 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
Razvan A Lupusorubd288c22013-12-20 17:27:23 -0800676
677 /*
678 * If the result register is the same as the second element, then we need to be careful.
679 * The reason is that the first copy will inadvertently clobber the second element with
680 * the first one thus yielding the wrong result. Thus we do a swap in that case.
681 */
Bill Buzbee00e1ec62014-02-27 23:44:13 +0000682 if (rl_result.reg.GetReg() == rl_src2.reg.GetReg()) {
Razvan A Lupusorubd288c22013-12-20 17:27:23 -0800683 std::swap(rl_src1, rl_src2);
684 }
685
686 // Pick the first integer as min/max.
buzbee2700f7e2014-03-07 09:46:20 -0800687 OpRegCopy(rl_result.reg, rl_src1.reg);
Razvan A Lupusorubd288c22013-12-20 17:27:23 -0800688
689 // If the integers are both in the same register, then there is nothing else to do
690 // because they are equal and we have already moved one into the result.
Bill Buzbee00e1ec62014-02-27 23:44:13 +0000691 if (rl_src1.reg.GetReg() != rl_src2.reg.GetReg()) {
Razvan A Lupusorubd288c22013-12-20 17:27:23 -0800692 // It is possible we didn't pick correctly so do the actual comparison now.
buzbee2700f7e2014-03-07 09:46:20 -0800693 OpRegReg(kOpCmp, rl_src1.reg, rl_src2.reg);
Razvan A Lupusorubd288c22013-12-20 17:27:23 -0800694
695 // Conditionally move the other integer into the destination register.
696 ConditionCode condition_code = is_min ? kCondGt : kCondLt;
buzbee2700f7e2014-03-07 09:46:20 -0800697 OpCondRegReg(kOpCmov, condition_code, rl_result.reg, rl_src2.reg);
Razvan A Lupusorubd288c22013-12-20 17:27:23 -0800698 }
699
Brian Carlstrom7940e442013-07-12 13:46:57 -0700700 StoreValue(rl_dest, rl_result);
701 return true;
702}
703
Vladimir Markoe508a202013-11-04 15:24:22 +0000704bool X86Mir2Lir::GenInlinedPeek(CallInfo* info, OpSize size) {
705 RegLocation rl_src_address = info->args[0]; // long address
buzbee2700f7e2014-03-07 09:46:20 -0800706 rl_src_address = NarrowRegLoc(rl_src_address); // ignore high half in info->args[1]
Mark Mendell55d0eac2014-02-06 11:02:52 -0800707 RegLocation rl_dest = size == kLong ? InlineTargetWide(info) : InlineTarget(info);
Vladimir Markoe508a202013-11-04 15:24:22 +0000708 RegLocation rl_address = LoadValue(rl_src_address, kCoreReg);
709 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
710 if (size == kLong) {
711 // Unaligned access is allowed on x86.
buzbee2700f7e2014-03-07 09:46:20 -0800712 LoadBaseDispWide(rl_address.reg, 0, rl_result.reg, INVALID_SREG);
Vladimir Markoe508a202013-11-04 15:24:22 +0000713 StoreValueWide(rl_dest, rl_result);
714 } else {
715 DCHECK(size == kSignedByte || size == kSignedHalf || size == kWord);
716 // Unaligned access is allowed on x86.
buzbee2700f7e2014-03-07 09:46:20 -0800717 LoadBaseDisp(rl_address.reg, 0, rl_result.reg, size, INVALID_SREG);
Vladimir Markoe508a202013-11-04 15:24:22 +0000718 StoreValue(rl_dest, rl_result);
719 }
720 return true;
721}
722
723bool X86Mir2Lir::GenInlinedPoke(CallInfo* info, OpSize size) {
724 RegLocation rl_src_address = info->args[0]; // long address
buzbee2700f7e2014-03-07 09:46:20 -0800725 rl_src_address = NarrowRegLoc(rl_src_address); // ignore high half in info->args[1]
Vladimir Markoe508a202013-11-04 15:24:22 +0000726 RegLocation rl_src_value = info->args[2]; // [size] value
727 RegLocation rl_address = LoadValue(rl_src_address, kCoreReg);
728 if (size == kLong) {
729 // Unaligned access is allowed on x86.
730 RegLocation rl_value = LoadValueWide(rl_src_value, kCoreReg);
buzbee2700f7e2014-03-07 09:46:20 -0800731 StoreBaseDispWide(rl_address.reg, 0, rl_value.reg);
Vladimir Markoe508a202013-11-04 15:24:22 +0000732 } else {
733 DCHECK(size == kSignedByte || size == kSignedHalf || size == kWord);
734 // Unaligned access is allowed on x86.
735 RegLocation rl_value = LoadValue(rl_src_value, kCoreReg);
buzbee2700f7e2014-03-07 09:46:20 -0800736 StoreBaseDisp(rl_address.reg, 0, rl_value.reg, size);
Vladimir Markoe508a202013-11-04 15:24:22 +0000737 }
738 return true;
739}
740
buzbee2700f7e2014-03-07 09:46:20 -0800741void X86Mir2Lir::OpLea(RegStorage r_base, RegStorage reg1, RegStorage reg2, int scale, int offset) {
742 NewLIR5(kX86Lea32RA, r_base.GetReg(), reg1.GetReg(), reg2.GetReg(), scale, offset);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700743}
744
Ian Rogersdd7624d2014-03-14 17:43:00 -0700745void X86Mir2Lir::OpTlsCmp(ThreadOffset<4> offset, int val) {
Ian Rogers468532e2013-08-05 10:56:33 -0700746 NewLIR2(kX86Cmp16TI8, offset.Int32Value(), val);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700747}
748
buzbee2700f7e2014-03-07 09:46:20 -0800749static bool IsInReg(X86Mir2Lir *pMir2Lir, const RegLocation &rl, RegStorage reg) {
750 return rl.reg.Valid() && rl.reg.GetReg() == reg.GetReg() && (pMir2Lir->IsLive(reg) || rl.home);
Yevgeny Rouband3a2dfa2014-03-18 15:55:16 +0700751}
752
Vladimir Marko1c282e22013-11-21 14:49:47 +0000753bool X86Mir2Lir::GenInlinedCas(CallInfo* info, bool is_long, bool is_object) {
Dmitry Petrochenko6a58cb12014-04-02 17:27:59 +0700754 DCHECK(cu_->instruction_set == kX86 || cu_->instruction_set == kX86_64);
Vladimir Markoc29bb612013-11-27 16:47:25 +0000755 // Unused - RegLocation rl_src_unsafe = info->args[0];
756 RegLocation rl_src_obj = info->args[1]; // Object - known non-null
757 RegLocation rl_src_offset = info->args[2]; // long low
buzbee2700f7e2014-03-07 09:46:20 -0800758 rl_src_offset = NarrowRegLoc(rl_src_offset); // ignore high half in info->args[3]
Vladimir Markoc29bb612013-11-27 16:47:25 +0000759 RegLocation rl_src_expected = info->args[4]; // int, long or Object
760 // If is_long, high half is in info->args[5]
761 RegLocation rl_src_new_value = info->args[is_long ? 6 : 5]; // int, long or Object
762 // If is_long, high half is in info->args[7]
763
764 if (is_long) {
Yevgeny Rouband3a2dfa2014-03-18 15:55:16 +0700765 // TODO: avoid unnecessary loads of SI and DI when the values are in registers.
766 // TODO: CFI support.
Vladimir Marko70b797d2013-12-03 15:25:24 +0000767 FlushAllRegs();
768 LockCallTemps();
buzbee2700f7e2014-03-07 09:46:20 -0800769 RegStorage r_tmp1(RegStorage::k64BitPair, rAX, rDX);
770 RegStorage r_tmp2(RegStorage::k64BitPair, rBX, rCX);
771 LoadValueDirectWideFixed(rl_src_expected, r_tmp1);
772 LoadValueDirectWideFixed(rl_src_new_value, r_tmp2);
Vladimir Marko70b797d2013-12-03 15:25:24 +0000773 NewLIR1(kX86Push32R, rDI);
774 MarkTemp(rDI);
775 LockTemp(rDI);
776 NewLIR1(kX86Push32R, rSI);
777 MarkTemp(rSI);
778 LockTemp(rSI);
Vladimir Markoa6fd8ba2013-12-13 10:53:49 +0000779 const int push_offset = 4 /* push edi */ + 4 /* push esi */;
buzbee2700f7e2014-03-07 09:46:20 -0800780 int srcObjSp = IsInReg(this, rl_src_obj, rs_rSI) ? 0
781 : (IsInReg(this, rl_src_obj, rs_rDI) ? 4
Yevgeny Rouband3a2dfa2014-03-18 15:55:16 +0700782 : (SRegOffset(rl_src_obj.s_reg_low) + push_offset));
buzbee2700f7e2014-03-07 09:46:20 -0800783 LoadWordDisp(TargetReg(kSp), srcObjSp, rs_rDI);
784 int srcOffsetSp = IsInReg(this, rl_src_offset, rs_rSI) ? 0
785 : (IsInReg(this, rl_src_offset, rs_rDI) ? 4
Yevgeny Rouband3a2dfa2014-03-18 15:55:16 +0700786 : (SRegOffset(rl_src_offset.s_reg_low) + push_offset));
buzbee2700f7e2014-03-07 09:46:20 -0800787 LoadWordDisp(TargetReg(kSp), srcOffsetSp, rs_rSI);
Vladimir Marko70b797d2013-12-03 15:25:24 +0000788 NewLIR4(kX86LockCmpxchg8bA, rDI, rSI, 0, 0);
Razvan A Lupusoru99ad7232014-02-25 17:41:08 -0800789
790 // After a store we need to insert barrier in case of potential load. Since the
791 // locked cmpxchg has full barrier semantics, only a scheduling barrier will be generated.
792 GenMemBarrier(kStoreLoad);
793
Vladimir Marko70b797d2013-12-03 15:25:24 +0000794 FreeTemp(rSI);
795 UnmarkTemp(rSI);
796 NewLIR1(kX86Pop32R, rSI);
797 FreeTemp(rDI);
798 UnmarkTemp(rDI);
799 NewLIR1(kX86Pop32R, rDI);
800 FreeCallTemps();
Vladimir Markoc29bb612013-11-27 16:47:25 +0000801 } else {
802 // EAX must hold expected for CMPXCHG. Neither rl_new_value, nor r_ptr may be in EAX.
buzbee2700f7e2014-03-07 09:46:20 -0800803 FlushReg(rs_r0);
804 LockTemp(rs_r0);
Vladimir Markoc29bb612013-11-27 16:47:25 +0000805
Vladimir Markoc29bb612013-11-27 16:47:25 +0000806 RegLocation rl_object = LoadValue(rl_src_obj, kCoreReg);
807 RegLocation rl_new_value = LoadValue(rl_src_new_value, kCoreReg);
808
809 if (is_object && !mir_graph_->IsConstantNullRef(rl_new_value)) {
810 // Mark card for object assuming new value is stored.
811 FreeTemp(r0); // Temporarily release EAX for MarkGCCard().
buzbee2700f7e2014-03-07 09:46:20 -0800812 MarkGCCard(rl_new_value.reg, rl_object.reg);
Vladimir Markoc29bb612013-11-27 16:47:25 +0000813 LockTemp(r0);
814 }
815
816 RegLocation rl_offset = LoadValue(rl_src_offset, kCoreReg);
buzbee2700f7e2014-03-07 09:46:20 -0800817 LoadValueDirect(rl_src_expected, rs_r0);
Bill Buzbee00e1ec62014-02-27 23:44:13 +0000818 NewLIR5(kX86LockCmpxchgAR, rl_object.reg.GetReg(), rl_offset.reg.GetReg(), 0, 0, rl_new_value.reg.GetReg());
Vladimir Markoc29bb612013-11-27 16:47:25 +0000819
Razvan A Lupusoru99ad7232014-02-25 17:41:08 -0800820 // After a store we need to insert barrier in case of potential load. Since the
821 // locked cmpxchg has full barrier semantics, only a scheduling barrier will be generated.
822 GenMemBarrier(kStoreLoad);
823
Vladimir Markoc29bb612013-11-27 16:47:25 +0000824 FreeTemp(r0);
825 }
826
827 // Convert ZF to boolean
828 RegLocation rl_dest = InlineTarget(info); // boolean place for result
829 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
Bill Buzbee00e1ec62014-02-27 23:44:13 +0000830 NewLIR2(kX86Set8R, rl_result.reg.GetReg(), kX86CondZ);
831 NewLIR2(kX86Movzx8RR, rl_result.reg.GetReg(), rl_result.reg.GetReg());
Vladimir Markoc29bb612013-11-27 16:47:25 +0000832 StoreValue(rl_dest, rl_result);
833 return true;
Brian Carlstrom7940e442013-07-12 13:46:57 -0700834}
835
buzbee2700f7e2014-03-07 09:46:20 -0800836LIR* X86Mir2Lir::OpPcRelLoad(RegStorage reg, LIR* target) {
Mark Mendell55d0eac2014-02-06 11:02:52 -0800837 CHECK(base_of_code_ != nullptr);
838
839 // Address the start of the method
840 RegLocation rl_method = mir_graph_->GetRegLocation(base_of_code_->s_reg_low);
841 LoadValueDirectFixed(rl_method, reg);
842 store_method_addr_used_ = true;
843
844 // Load the proper value from the literal area.
845 // We don't know the proper offset for the value, so pick one that will force
846 // 4 byte offset. We will fix this up in the assembler later to have the right
847 // value.
buzbee2700f7e2014-03-07 09:46:20 -0800848 LIR *res = RawLIR(current_dalvik_offset_, kX86Mov32RM, reg.GetReg(), reg.GetReg(), 256,
849 0, 0, target);
Mark Mendell55d0eac2014-02-06 11:02:52 -0800850 res->target = target;
851 res->flags.fixup = kFixupLoad;
852 SetMemRefType(res, true, kLiteral);
853 store_method_addr_used_ = true;
854 return res;
Brian Carlstrom7940e442013-07-12 13:46:57 -0700855}
856
buzbee2700f7e2014-03-07 09:46:20 -0800857LIR* X86Mir2Lir::OpVldm(RegStorage r_base, int count) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700858 LOG(FATAL) << "Unexpected use of OpVldm for x86";
859 return NULL;
860}
861
buzbee2700f7e2014-03-07 09:46:20 -0800862LIR* X86Mir2Lir::OpVstm(RegStorage r_base, int count) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700863 LOG(FATAL) << "Unexpected use of OpVstm for x86";
864 return NULL;
865}
866
867void X86Mir2Lir::GenMultiplyByTwoBitMultiplier(RegLocation rl_src,
868 RegLocation rl_result, int lit,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700869 int first_bit, int second_bit) {
buzbee2700f7e2014-03-07 09:46:20 -0800870 RegStorage t_reg = AllocTemp();
871 OpRegRegImm(kOpLsl, t_reg, rl_src.reg, second_bit - first_bit);
872 OpRegRegReg(kOpAdd, rl_result.reg, rl_src.reg, t_reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700873 FreeTemp(t_reg);
874 if (first_bit != 0) {
buzbee2700f7e2014-03-07 09:46:20 -0800875 OpRegRegImm(kOpLsl, rl_result.reg, rl_result.reg, first_bit);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700876 }
877}
878
Mingyao Yange643a172014-04-08 11:02:52 -0700879void X86Mir2Lir::GenDivZeroCheckWide(RegStorage reg) {
buzbee2700f7e2014-03-07 09:46:20 -0800880 DCHECK(reg.IsPair()); // TODO: allow 64BitSolo.
881 // We are not supposed to clobber the incoming storage, so allocate a temporary.
882 RegStorage t_reg = AllocTemp();
Razvan A Lupusoru090dd442013-12-20 14:35:03 -0800883
884 // Doing an OR is a quick way to check if both registers are zero. This will set the flags.
buzbee2700f7e2014-03-07 09:46:20 -0800885 OpRegRegReg(kOpOr, t_reg, reg.GetLow(), reg.GetHigh());
Razvan A Lupusoru090dd442013-12-20 14:35:03 -0800886
887 // In case of zero, throw ArithmeticException.
Mingyao Yange643a172014-04-08 11:02:52 -0700888 GenDivZeroCheck(kCondEq);
Razvan A Lupusoru090dd442013-12-20 14:35:03 -0800889
890 // The temp is no longer needed so free it at this time.
Brian Carlstrom7940e442013-07-12 13:46:57 -0700891 FreeTemp(t_reg);
892}
893
Mingyao Yang9d463142014-04-17 15:22:09 -0700894void X86Mir2Lir::GenArrayBoundsCheck(RegStorage index,
895 RegStorage array_base,
896 int len_offset) {
897 class ArrayBoundsCheckSlowPath : public Mir2Lir::LIRSlowPath {
898 public:
899 ArrayBoundsCheckSlowPath(Mir2Lir* m2l, LIR* branch,
900 RegStorage index, RegStorage array_base, int len_offset)
901 : LIRSlowPath(m2l, m2l->GetCurrentDexPc(), branch),
902 index_(index), array_base_(array_base), len_offset_(len_offset) {
903 }
904
905 void Compile() OVERRIDE {
906 m2l_->ResetRegPool();
907 m2l_->ResetDefTracking();
908 GenerateTargetLabel();
909 // Load array length to array_base_.
910 m2l_->OpRegMem(kOpMov, array_base_, array_base_, len_offset_);
911 m2l_->CallRuntimeHelperRegReg(QUICK_ENTRYPOINT_OFFSET(4, pThrowArrayBounds),
912 index_, array_base_, true);
913 }
914
915 private:
916 RegStorage index_;
917 RegStorage array_base_;
918 int len_offset_;
919 };
920
921 OpRegMem(kOpCmp, index, array_base, len_offset);
922 LIR* branch = OpCondBranch(kCondUge, nullptr);
923 AddSlowPath(new (arena_) ArrayBoundsCheckSlowPath(this, branch,
924 index, array_base, len_offset));
925}
926
927void X86Mir2Lir::GenArrayBoundsCheck(int index,
928 RegStorage array_base,
929 int len_offset) {
930 class ArrayBoundsCheckSlowPath : public Mir2Lir::LIRSlowPath {
931 public:
932 ArrayBoundsCheckSlowPath(Mir2Lir* m2l, LIR* branch,
933 int index, RegStorage array_base, int len_offset)
934 : LIRSlowPath(m2l, m2l->GetCurrentDexPc(), branch),
935 index_(index), array_base_(array_base), len_offset_(len_offset) {
936 }
937
938 void Compile() OVERRIDE {
939 m2l_->ResetRegPool();
940 m2l_->ResetDefTracking();
941 GenerateTargetLabel();
942 // kArg0 will be used to hold the constant index.
943 if (array_base_.GetReg() == m2l_->TargetReg(kArg0).GetReg()) {
944 m2l_->OpRegCopy(m2l_->TargetReg(kArg1), array_base_);
945 array_base_ = m2l_->TargetReg(kArg1);
946 }
947 m2l_->LoadConstant(m2l_->TargetReg(kArg0), index_);
948 // Load array length to kArg1.
949 m2l_->OpRegMem(kOpMov, m2l_->TargetReg(kArg1), array_base_, len_offset_);
950 m2l_->CallRuntimeHelperRegReg(QUICK_ENTRYPOINT_OFFSET(4, pThrowArrayBounds),
951 m2l_->TargetReg(kArg0), m2l_->TargetReg(kArg1), true);
952 }
953
954 private:
955 int index_;
956 RegStorage array_base_;
957 int len_offset_;
958 };
959
960 NewLIR3(IS_SIMM8(index) ? kX86Cmp32MI8 : kX86Cmp32MI, array_base.GetReg(), len_offset, index);
961 LIR* branch = OpCondBranch(kCondLs, nullptr);
962 AddSlowPath(new (arena_) ArrayBoundsCheckSlowPath(this, branch,
963 index, array_base, len_offset));
964}
965
Brian Carlstrom7940e442013-07-12 13:46:57 -0700966// Test suspend flag, return target of taken suspend branch
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700967LIR* X86Mir2Lir::OpTestSuspend(LIR* target) {
Ian Rogersdd7624d2014-03-14 17:43:00 -0700968 OpTlsCmp(Thread::ThreadFlagsOffset<4>(), 0);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700969 return OpCondBranch((target == NULL) ? kCondNe : kCondEq, target);
970}
971
972// Decrement register and branch on condition
buzbee2700f7e2014-03-07 09:46:20 -0800973LIR* X86Mir2Lir::OpDecAndBranch(ConditionCode c_code, RegStorage reg, LIR* target) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700974 OpRegImm(kOpSub, reg, 1);
Yixin Shoua0dac3e2014-01-23 05:01:22 -0800975 return OpCondBranch(c_code, target);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700976}
977
buzbee11b63d12013-08-27 07:34:17 -0700978bool X86Mir2Lir::SmallLiteralDivRem(Instruction::Code dalvik_opcode, bool is_div,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700979 RegLocation rl_src, RegLocation rl_dest, int lit) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700980 LOG(FATAL) << "Unexpected use of smallLiteralDive in x86";
981 return false;
982}
983
Ian Rogerse2143c02014-03-28 08:47:16 -0700984bool X86Mir2Lir::EasyMultiply(RegLocation rl_src, RegLocation rl_dest, int lit) {
985 LOG(FATAL) << "Unexpected use of easyMultiply in x86";
986 return false;
987}
988
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700989LIR* X86Mir2Lir::OpIT(ConditionCode cond, const char* guide) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700990 LOG(FATAL) << "Unexpected use of OpIT in x86";
991 return NULL;
992}
993
Dave Allison3da67a52014-04-02 17:03:45 -0700994void X86Mir2Lir::OpEndIT(LIR* it) {
995 LOG(FATAL) << "Unexpected use of OpEndIT in x86";
996}
997
buzbee2700f7e2014-03-07 09:46:20 -0800998void X86Mir2Lir::GenImulRegImm(RegStorage dest, RegStorage src, int val) {
Mark Mendell4708dcd2014-01-22 09:05:18 -0800999 switch (val) {
1000 case 0:
buzbee2700f7e2014-03-07 09:46:20 -08001001 NewLIR2(kX86Xor32RR, dest.GetReg(), dest.GetReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001002 break;
1003 case 1:
1004 OpRegCopy(dest, src);
1005 break;
1006 default:
1007 OpRegRegImm(kOpMul, dest, src, val);
1008 break;
1009 }
1010}
1011
buzbee2700f7e2014-03-07 09:46:20 -08001012void X86Mir2Lir::GenImulMemImm(RegStorage dest, int sreg, int displacement, int val) {
Mark Mendell4708dcd2014-01-22 09:05:18 -08001013 LIR *m;
1014 switch (val) {
1015 case 0:
buzbee2700f7e2014-03-07 09:46:20 -08001016 NewLIR2(kX86Xor32RR, dest.GetReg(), dest.GetReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001017 break;
1018 case 1:
buzbee2700f7e2014-03-07 09:46:20 -08001019 LoadBaseDisp(rs_rX86_SP, displacement, dest, kWord, sreg);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001020 break;
1021 default:
buzbee2700f7e2014-03-07 09:46:20 -08001022 m = NewLIR4(IS_SIMM8(val) ? kX86Imul32RMI8 : kX86Imul32RMI, dest.GetReg(), rX86_SP,
Mark Mendell4708dcd2014-01-22 09:05:18 -08001023 displacement, val);
1024 AnnotateDalvikRegAccess(m, displacement >> 2, true /* is_load */, true /* is_64bit */);
1025 break;
1026 }
1027}
1028
Mark Mendelle02d48f2014-01-15 11:19:23 -08001029void X86Mir2Lir::GenMulLong(Instruction::Code, RegLocation rl_dest, RegLocation rl_src1,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001030 RegLocation rl_src2) {
Mark Mendell4708dcd2014-01-22 09:05:18 -08001031 if (rl_src1.is_const) {
1032 std::swap(rl_src1, rl_src2);
1033 }
1034 // Are we multiplying by a constant?
1035 if (rl_src2.is_const) {
1036 // Do special compare/branch against simple const operand
1037 int64_t val = mir_graph_->ConstantValueWide(rl_src2);
1038 if (val == 0) {
1039 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08001040 OpRegReg(kOpXor, rl_result.reg.GetLow(), rl_result.reg.GetLow());
1041 OpRegReg(kOpXor, rl_result.reg.GetHigh(), rl_result.reg.GetHigh());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001042 StoreValueWide(rl_dest, rl_result);
1043 return;
1044 } else if (val == 1) {
Mark Mendell4708dcd2014-01-22 09:05:18 -08001045 StoreValueWide(rl_dest, rl_src1);
1046 return;
1047 } else if (val == 2) {
1048 GenAddLong(Instruction::ADD_LONG, rl_dest, rl_src1, rl_src1);
1049 return;
1050 } else if (IsPowerOfTwo(val)) {
1051 int shift_amount = LowestSetBit(val);
1052 if (!BadOverlap(rl_src1, rl_dest)) {
1053 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
1054 RegLocation rl_result = GenShiftImmOpLong(Instruction::SHL_LONG, rl_dest,
1055 rl_src1, shift_amount);
1056 StoreValueWide(rl_dest, rl_result);
1057 return;
1058 }
1059 }
1060
1061 // Okay, just bite the bullet and do it.
1062 int32_t val_lo = Low32Bits(val);
1063 int32_t val_hi = High32Bits(val);
1064 FlushAllRegs();
1065 LockCallTemps(); // Prepare for explicit register usage.
1066 rl_src1 = UpdateLocWide(rl_src1);
1067 bool src1_in_reg = rl_src1.location == kLocPhysReg;
1068 int displacement = SRegOffset(rl_src1.s_reg_low);
1069
1070 // ECX <- 1H * 2L
1071 // EAX <- 1L * 2H
1072 if (src1_in_reg) {
buzbee2700f7e2014-03-07 09:46:20 -08001073 GenImulRegImm(rs_r1, rl_src1.reg.GetHigh(), val_lo);
1074 GenImulRegImm(rs_r0, rl_src1.reg.GetLow(), val_hi);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001075 } else {
buzbee2700f7e2014-03-07 09:46:20 -08001076 GenImulMemImm(rs_r1, GetSRegHi(rl_src1.s_reg_low), displacement + HIWORD_OFFSET, val_lo);
1077 GenImulMemImm(rs_r0, rl_src1.s_reg_low, displacement + LOWORD_OFFSET, val_hi);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001078 }
1079
1080 // ECX <- ECX + EAX (2H * 1L) + (1H * 2L)
1081 NewLIR2(kX86Add32RR, r1, r0);
1082
1083 // EAX <- 2L
buzbee2700f7e2014-03-07 09:46:20 -08001084 LoadConstantNoClobber(rs_r0, val_lo);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001085
1086 // EDX:EAX <- 2L * 1L (double precision)
1087 if (src1_in_reg) {
buzbee2700f7e2014-03-07 09:46:20 -08001088 NewLIR1(kX86Mul32DaR, rl_src1.reg.GetLowReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001089 } else {
1090 LIR *m = NewLIR2(kX86Mul32DaM, rX86_SP, displacement + LOWORD_OFFSET);
1091 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
1092 true /* is_load */, true /* is_64bit */);
1093 }
1094
1095 // EDX <- EDX + ECX (add high words)
1096 NewLIR2(kX86Add32RR, r2, r1);
1097
1098 // Result is EDX:EAX
Bill Buzbee00e1ec62014-02-27 23:44:13 +00001099 RegLocation rl_result = {kLocPhysReg, 1, 0, 0, 0, 0, 0, 0, 1, kVectorNotUsed,
buzbee2700f7e2014-03-07 09:46:20 -08001100 RegStorage::MakeRegPair(rs_r0, rs_r2),
Mark Mendell4708dcd2014-01-22 09:05:18 -08001101 INVALID_SREG, INVALID_SREG};
1102 StoreValueWide(rl_dest, rl_result);
1103 return;
1104 }
1105
1106 // Nope. Do it the hard way
Mark Mendellde99bba2014-02-14 12:15:02 -08001107 // Check for V*V. We can eliminate a multiply in that case, as 2L*1H == 2H*1L.
1108 bool is_square = mir_graph_->SRegToVReg(rl_src1.s_reg_low) ==
1109 mir_graph_->SRegToVReg(rl_src2.s_reg_low);
1110
Mark Mendell4708dcd2014-01-22 09:05:18 -08001111 FlushAllRegs();
1112 LockCallTemps(); // Prepare for explicit register usage.
1113 rl_src1 = UpdateLocWide(rl_src1);
1114 rl_src2 = UpdateLocWide(rl_src2);
1115
1116 // At this point, the VRs are in their home locations.
1117 bool src1_in_reg = rl_src1.location == kLocPhysReg;
1118 bool src2_in_reg = rl_src2.location == kLocPhysReg;
1119
1120 // ECX <- 1H
1121 if (src1_in_reg) {
Bill Buzbee00e1ec62014-02-27 23:44:13 +00001122 NewLIR2(kX86Mov32RR, r1, rl_src1.reg.GetHighReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001123 } else {
buzbee2700f7e2014-03-07 09:46:20 -08001124 LoadBaseDisp(rs_rX86_SP, SRegOffset(rl_src1.s_reg_low) + HIWORD_OFFSET, rs_r1,
Mark Mendell4708dcd2014-01-22 09:05:18 -08001125 kWord, GetSRegHi(rl_src1.s_reg_low));
1126 }
1127
Mark Mendellde99bba2014-02-14 12:15:02 -08001128 if (is_square) {
1129 // Take advantage of the fact that the values are the same.
1130 // ECX <- ECX * 2L (1H * 2L)
1131 if (src2_in_reg) {
buzbee2700f7e2014-03-07 09:46:20 -08001132 NewLIR2(kX86Imul32RR, r1, rl_src2.reg.GetLowReg());
Mark Mendellde99bba2014-02-14 12:15:02 -08001133 } else {
1134 int displacement = SRegOffset(rl_src2.s_reg_low);
1135 LIR *m = NewLIR3(kX86Imul32RM, r1, rX86_SP, displacement + LOWORD_OFFSET);
1136 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
1137 true /* is_load */, true /* is_64bit */);
1138 }
Mark Mendell4708dcd2014-01-22 09:05:18 -08001139
Mark Mendellde99bba2014-02-14 12:15:02 -08001140 // ECX <- 2*ECX (2H * 1L) + (1H * 2L)
1141 NewLIR2(kX86Add32RR, r1, r1);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001142 } else {
Mark Mendellde99bba2014-02-14 12:15:02 -08001143 // EAX <- 2H
1144 if (src2_in_reg) {
Bill Buzbee00e1ec62014-02-27 23:44:13 +00001145 NewLIR2(kX86Mov32RR, r0, rl_src2.reg.GetHighReg());
Mark Mendellde99bba2014-02-14 12:15:02 -08001146 } else {
buzbee2700f7e2014-03-07 09:46:20 -08001147 LoadBaseDisp(rs_rX86_SP, SRegOffset(rl_src2.s_reg_low) + HIWORD_OFFSET, rs_r0,
Mark Mendellde99bba2014-02-14 12:15:02 -08001148 kWord, GetSRegHi(rl_src2.s_reg_low));
1149 }
Mark Mendell4708dcd2014-01-22 09:05:18 -08001150
Mark Mendellde99bba2014-02-14 12:15:02 -08001151 // EAX <- EAX * 1L (2H * 1L)
1152 if (src1_in_reg) {
buzbee2700f7e2014-03-07 09:46:20 -08001153 NewLIR2(kX86Imul32RR, r0, rl_src1.reg.GetLowReg());
Mark Mendellde99bba2014-02-14 12:15:02 -08001154 } else {
1155 int displacement = SRegOffset(rl_src1.s_reg_low);
1156 LIR *m = NewLIR3(kX86Imul32RM, r0, rX86_SP, displacement + LOWORD_OFFSET);
1157 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
1158 true /* is_load */, true /* is_64bit */);
1159 }
Mark Mendell4708dcd2014-01-22 09:05:18 -08001160
Mark Mendellde99bba2014-02-14 12:15:02 -08001161 // ECX <- ECX * 2L (1H * 2L)
1162 if (src2_in_reg) {
buzbee2700f7e2014-03-07 09:46:20 -08001163 NewLIR2(kX86Imul32RR, r1, rl_src2.reg.GetLowReg());
Mark Mendellde99bba2014-02-14 12:15:02 -08001164 } else {
1165 int displacement = SRegOffset(rl_src2.s_reg_low);
1166 LIR *m = NewLIR3(kX86Imul32RM, r1, rX86_SP, displacement + LOWORD_OFFSET);
1167 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
1168 true /* is_load */, true /* is_64bit */);
1169 }
1170
1171 // ECX <- ECX + EAX (2H * 1L) + (1H * 2L)
1172 NewLIR2(kX86Add32RR, r1, r0);
1173 }
Mark Mendell4708dcd2014-01-22 09:05:18 -08001174
1175 // EAX <- 2L
1176 if (src2_in_reg) {
buzbee2700f7e2014-03-07 09:46:20 -08001177 NewLIR2(kX86Mov32RR, r0, rl_src2.reg.GetLowReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001178 } else {
buzbee2700f7e2014-03-07 09:46:20 -08001179 LoadBaseDisp(rs_rX86_SP, SRegOffset(rl_src2.s_reg_low) + LOWORD_OFFSET, rs_r0,
Mark Mendell4708dcd2014-01-22 09:05:18 -08001180 kWord, rl_src2.s_reg_low);
1181 }
1182
1183 // EDX:EAX <- 2L * 1L (double precision)
1184 if (src1_in_reg) {
buzbee2700f7e2014-03-07 09:46:20 -08001185 NewLIR1(kX86Mul32DaR, rl_src1.reg.GetLowReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001186 } else {
1187 int displacement = SRegOffset(rl_src1.s_reg_low);
1188 LIR *m = NewLIR2(kX86Mul32DaM, rX86_SP, displacement + LOWORD_OFFSET);
1189 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
1190 true /* is_load */, true /* is_64bit */);
1191 }
1192
1193 // EDX <- EDX + ECX (add high words)
1194 NewLIR2(kX86Add32RR, r2, r1);
1195
1196 // Result is EDX:EAX
Bill Buzbee00e1ec62014-02-27 23:44:13 +00001197 RegLocation rl_result = {kLocPhysReg, 1, 0, 0, 0, 0, 0, 0, 1, kVectorNotUsed,
buzbee2700f7e2014-03-07 09:46:20 -08001198 RegStorage::MakeRegPair(rs_r0, rs_r2), INVALID_SREG, INVALID_SREG};
Mark Mendell4708dcd2014-01-22 09:05:18 -08001199 StoreValueWide(rl_dest, rl_result);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001200}
Mark Mendelle02d48f2014-01-15 11:19:23 -08001201
1202void X86Mir2Lir::GenLongRegOrMemOp(RegLocation rl_dest, RegLocation rl_src,
1203 Instruction::Code op) {
1204 DCHECK_EQ(rl_dest.location, kLocPhysReg);
1205 X86OpCode x86op = GetOpcode(op, rl_dest, rl_src, false);
1206 if (rl_src.location == kLocPhysReg) {
1207 // Both operands are in registers.
Serguei Katkovab5545f2014-03-25 10:51:15 +07001208 // But we must ensure that rl_src is in pair
1209 rl_src = EvalLocWide(rl_src, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08001210 if (rl_dest.reg.GetLowReg() == rl_src.reg.GetHighReg()) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08001211 // The registers are the same, so we would clobber it before the use.
buzbee2700f7e2014-03-07 09:46:20 -08001212 RegStorage temp_reg = AllocTemp();
1213 OpRegCopy(temp_reg, rl_dest.reg);
1214 rl_src.reg.SetHighReg(temp_reg.GetReg());
Mark Mendelle02d48f2014-01-15 11:19:23 -08001215 }
buzbee2700f7e2014-03-07 09:46:20 -08001216 NewLIR2(x86op, rl_dest.reg.GetLowReg(), rl_src.reg.GetLowReg());
Mark Mendelle02d48f2014-01-15 11:19:23 -08001217
1218 x86op = GetOpcode(op, rl_dest, rl_src, true);
Bill Buzbee00e1ec62014-02-27 23:44:13 +00001219 NewLIR2(x86op, rl_dest.reg.GetHighReg(), rl_src.reg.GetHighReg());
buzbee2700f7e2014-03-07 09:46:20 -08001220 FreeTemp(rl_src.reg);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001221 return;
1222 }
1223
1224 // RHS is in memory.
1225 DCHECK((rl_src.location == kLocDalvikFrame) ||
1226 (rl_src.location == kLocCompilerTemp));
buzbee2700f7e2014-03-07 09:46:20 -08001227 int r_base = TargetReg(kSp).GetReg();
Mark Mendelle02d48f2014-01-15 11:19:23 -08001228 int displacement = SRegOffset(rl_src.s_reg_low);
1229
buzbee2700f7e2014-03-07 09:46:20 -08001230 LIR *lir = NewLIR3(x86op, rl_dest.reg.GetLowReg(), r_base, displacement + LOWORD_OFFSET);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001231 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
1232 true /* is_load */, true /* is64bit */);
1233 x86op = GetOpcode(op, rl_dest, rl_src, true);
buzbee2700f7e2014-03-07 09:46:20 -08001234 lir = NewLIR3(x86op, rl_dest.reg.GetHighReg(), r_base, displacement + HIWORD_OFFSET);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001235 AnnotateDalvikRegAccess(lir, (displacement + HIWORD_OFFSET) >> 2,
1236 true /* is_load */, true /* is64bit */);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001237}
1238
Mark Mendelle02d48f2014-01-15 11:19:23 -08001239void X86Mir2Lir::GenLongArith(RegLocation rl_dest, RegLocation rl_src, Instruction::Code op) {
1240 rl_dest = UpdateLocWide(rl_dest);
1241 if (rl_dest.location == kLocPhysReg) {
1242 // Ensure we are in a register pair
1243 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
1244
1245 rl_src = UpdateLocWide(rl_src);
1246 GenLongRegOrMemOp(rl_result, rl_src, op);
1247 StoreFinalValueWide(rl_dest, rl_result);
1248 return;
1249 }
1250
1251 // It wasn't in registers, so it better be in memory.
1252 DCHECK((rl_dest.location == kLocDalvikFrame) ||
1253 (rl_dest.location == kLocCompilerTemp));
1254 rl_src = LoadValueWide(rl_src, kCoreReg);
1255
1256 // Operate directly into memory.
1257 X86OpCode x86op = GetOpcode(op, rl_dest, rl_src, false);
buzbee2700f7e2014-03-07 09:46:20 -08001258 int r_base = TargetReg(kSp).GetReg();
Mark Mendelle02d48f2014-01-15 11:19:23 -08001259 int displacement = SRegOffset(rl_dest.s_reg_low);
1260
buzbee2700f7e2014-03-07 09:46:20 -08001261 LIR *lir = NewLIR3(x86op, r_base, displacement + LOWORD_OFFSET, rl_src.reg.GetLowReg());
Mark Mendelle02d48f2014-01-15 11:19:23 -08001262 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
Serguei Katkov217fe732014-03-27 14:41:56 +07001263 true /* is_load */, true /* is64bit */);
1264 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
Mark Mendelle02d48f2014-01-15 11:19:23 -08001265 false /* is_load */, true /* is64bit */);
1266 x86op = GetOpcode(op, rl_dest, rl_src, true);
buzbee2700f7e2014-03-07 09:46:20 -08001267 lir = NewLIR3(x86op, r_base, displacement + HIWORD_OFFSET, rl_src.reg.GetHighReg());
Mark Mendelle02d48f2014-01-15 11:19:23 -08001268 AnnotateDalvikRegAccess(lir, (displacement + HIWORD_OFFSET) >> 2,
Serguei Katkov217fe732014-03-27 14:41:56 +07001269 true /* is_load */, true /* is64bit */);
1270 AnnotateDalvikRegAccess(lir, (displacement + HIWORD_OFFSET) >> 2,
Mark Mendelle02d48f2014-01-15 11:19:23 -08001271 false /* is_load */, true /* is64bit */);
buzbee2700f7e2014-03-07 09:46:20 -08001272 FreeTemp(rl_src.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001273}
1274
Mark Mendelle02d48f2014-01-15 11:19:23 -08001275void X86Mir2Lir::GenLongArith(RegLocation rl_dest, RegLocation rl_src1,
1276 RegLocation rl_src2, Instruction::Code op,
1277 bool is_commutative) {
1278 // Is this really a 2 operand operation?
1279 switch (op) {
1280 case Instruction::ADD_LONG_2ADDR:
1281 case Instruction::SUB_LONG_2ADDR:
1282 case Instruction::AND_LONG_2ADDR:
1283 case Instruction::OR_LONG_2ADDR:
1284 case Instruction::XOR_LONG_2ADDR:
1285 GenLongArith(rl_dest, rl_src2, op);
1286 return;
1287 default:
1288 break;
1289 }
1290
1291 if (rl_dest.location == kLocPhysReg) {
1292 RegLocation rl_result = LoadValueWide(rl_src1, kCoreReg);
1293
1294 // We are about to clobber the LHS, so it needs to be a temp.
1295 rl_result = ForceTempWide(rl_result);
1296
1297 // Perform the operation using the RHS.
1298 rl_src2 = UpdateLocWide(rl_src2);
1299 GenLongRegOrMemOp(rl_result, rl_src2, op);
1300
1301 // And now record that the result is in the temp.
1302 StoreFinalValueWide(rl_dest, rl_result);
1303 return;
1304 }
1305
1306 // It wasn't in registers, so it better be in memory.
1307 DCHECK((rl_dest.location == kLocDalvikFrame) ||
1308 (rl_dest.location == kLocCompilerTemp));
1309 rl_src1 = UpdateLocWide(rl_src1);
1310 rl_src2 = UpdateLocWide(rl_src2);
1311
1312 // Get one of the source operands into temporary register.
1313 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
buzbee2700f7e2014-03-07 09:46:20 -08001314 if (IsTemp(rl_src1.reg.GetLowReg()) && IsTemp(rl_src1.reg.GetHighReg())) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08001315 GenLongRegOrMemOp(rl_src1, rl_src2, op);
1316 } else if (is_commutative) {
1317 rl_src2 = LoadValueWide(rl_src2, kCoreReg);
1318 // We need at least one of them to be a temporary.
buzbee2700f7e2014-03-07 09:46:20 -08001319 if (!(IsTemp(rl_src2.reg.GetLowReg()) && IsTemp(rl_src2.reg.GetHighReg()))) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08001320 rl_src1 = ForceTempWide(rl_src1);
Yevgeny Rouban91b6ffa2014-03-07 14:35:44 +07001321 GenLongRegOrMemOp(rl_src1, rl_src2, op);
1322 } else {
1323 GenLongRegOrMemOp(rl_src2, rl_src1, op);
1324 StoreFinalValueWide(rl_dest, rl_src2);
1325 return;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001326 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08001327 } else {
1328 // Need LHS to be the temp.
1329 rl_src1 = ForceTempWide(rl_src1);
1330 GenLongRegOrMemOp(rl_src1, rl_src2, op);
1331 }
1332
1333 StoreFinalValueWide(rl_dest, rl_src1);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001334}
1335
Mark Mendelle02d48f2014-01-15 11:19:23 -08001336void X86Mir2Lir::GenAddLong(Instruction::Code opcode, RegLocation rl_dest,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001337 RegLocation rl_src1, RegLocation rl_src2) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08001338 GenLongArith(rl_dest, rl_src1, rl_src2, opcode, true);
1339}
1340
1341void X86Mir2Lir::GenSubLong(Instruction::Code opcode, RegLocation rl_dest,
1342 RegLocation rl_src1, RegLocation rl_src2) {
1343 GenLongArith(rl_dest, rl_src1, rl_src2, opcode, false);
1344}
1345
1346void X86Mir2Lir::GenAndLong(Instruction::Code opcode, RegLocation rl_dest,
1347 RegLocation rl_src1, RegLocation rl_src2) {
1348 GenLongArith(rl_dest, rl_src1, rl_src2, opcode, true);
1349}
1350
1351void X86Mir2Lir::GenOrLong(Instruction::Code opcode, RegLocation rl_dest,
1352 RegLocation rl_src1, RegLocation rl_src2) {
1353 GenLongArith(rl_dest, rl_src1, rl_src2, opcode, true);
1354}
1355
1356void X86Mir2Lir::GenXorLong(Instruction::Code opcode, RegLocation rl_dest,
1357 RegLocation rl_src1, RegLocation rl_src2) {
1358 GenLongArith(rl_dest, rl_src1, rl_src2, opcode, true);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001359}
1360
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001361void X86Mir2Lir::GenNegLong(RegLocation rl_dest, RegLocation rl_src) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08001362 rl_src = LoadValueWide(rl_src, kCoreReg);
1363 RegLocation rl_result = ForceTempWide(rl_src);
Bill Buzbee00e1ec62014-02-27 23:44:13 +00001364 if (((rl_dest.location == kLocPhysReg) && (rl_src.location == kLocPhysReg)) &&
buzbee2700f7e2014-03-07 09:46:20 -08001365 ((rl_dest.reg.GetLowReg() == rl_src.reg.GetHighReg()))) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08001366 // The registers are the same, so we would clobber it before the use.
buzbee2700f7e2014-03-07 09:46:20 -08001367 RegStorage temp_reg = AllocTemp();
1368 OpRegCopy(temp_reg, rl_result.reg);
1369 rl_result.reg.SetHighReg(temp_reg.GetReg());
Mark Mendelle02d48f2014-01-15 11:19:23 -08001370 }
buzbee2700f7e2014-03-07 09:46:20 -08001371 OpRegReg(kOpNeg, rl_result.reg.GetLow(), rl_result.reg.GetLow()); // rLow = -rLow
1372 OpRegImm(kOpAdc, rl_result.reg.GetHigh(), 0); // rHigh = rHigh + CF
1373 OpRegReg(kOpNeg, rl_result.reg.GetHigh(), rl_result.reg.GetHigh()); // rHigh = -rHigh
Brian Carlstrom7940e442013-07-12 13:46:57 -07001374 StoreValueWide(rl_dest, rl_result);
1375}
1376
Ian Rogersdd7624d2014-03-14 17:43:00 -07001377void X86Mir2Lir::OpRegThreadMem(OpKind op, int r_dest, ThreadOffset<4> thread_offset) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001378 X86OpCode opcode = kX86Bkpt;
1379 switch (op) {
1380 case kOpCmp: opcode = kX86Cmp32RT; break;
1381 case kOpMov: opcode = kX86Mov32RT; break;
1382 default:
1383 LOG(FATAL) << "Bad opcode: " << op;
1384 break;
1385 }
Ian Rogers468532e2013-08-05 10:56:33 -07001386 NewLIR2(opcode, r_dest, thread_offset.Int32Value());
Brian Carlstrom7940e442013-07-12 13:46:57 -07001387}
1388
1389/*
1390 * Generate array load
1391 */
1392void X86Mir2Lir::GenArrayGet(int opt_flags, OpSize size, RegLocation rl_array,
Ian Rogersa9a82542013-10-04 11:17:26 -07001393 RegLocation rl_index, RegLocation rl_dest, int scale) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001394 RegisterClass reg_class = oat_reg_class_by_size(size);
1395 int len_offset = mirror::Array::LengthOffset().Int32Value();
Brian Carlstrom7940e442013-07-12 13:46:57 -07001396 RegLocation rl_result;
1397 rl_array = LoadValue(rl_array, kCoreReg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001398
Mark Mendell343adb52013-12-18 06:02:17 -08001399 int data_offset;
Brian Carlstrom7940e442013-07-12 13:46:57 -07001400 if (size == kLong || size == kDouble) {
1401 data_offset = mirror::Array::DataOffset(sizeof(int64_t)).Int32Value();
1402 } else {
1403 data_offset = mirror::Array::DataOffset(sizeof(int32_t)).Int32Value();
1404 }
1405
Mark Mendell343adb52013-12-18 06:02:17 -08001406 bool constant_index = rl_index.is_const;
1407 int32_t constant_index_value = 0;
1408 if (!constant_index) {
1409 rl_index = LoadValue(rl_index, kCoreReg);
1410 } else {
1411 constant_index_value = mir_graph_->ConstantValue(rl_index);
1412 // If index is constant, just fold it into the data offset
1413 data_offset += constant_index_value << scale;
1414 // treat as non array below
buzbee2700f7e2014-03-07 09:46:20 -08001415 rl_index.reg = RegStorage::InvalidReg();
Mark Mendell343adb52013-12-18 06:02:17 -08001416 }
1417
Brian Carlstrom7940e442013-07-12 13:46:57 -07001418 /* null object? */
buzbee2700f7e2014-03-07 09:46:20 -08001419 GenNullCheck(rl_array.reg, opt_flags);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001420
1421 if (!(opt_flags & MIR_IGNORE_RANGE_CHECK)) {
Mark Mendell343adb52013-12-18 06:02:17 -08001422 if (constant_index) {
Mingyao Yang9d463142014-04-17 15:22:09 -07001423 GenArrayBoundsCheck(constant_index_value, rl_array.reg, len_offset);
Mark Mendell343adb52013-12-18 06:02:17 -08001424 } else {
Mingyao Yang9d463142014-04-17 15:22:09 -07001425 GenArrayBoundsCheck(rl_index.reg, rl_array.reg, len_offset);
Mark Mendell343adb52013-12-18 06:02:17 -08001426 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001427 }
Mark Mendell343adb52013-12-18 06:02:17 -08001428 rl_result = EvalLoc(rl_dest, reg_class, true);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001429 if ((size == kLong) || (size == kDouble)) {
buzbee2700f7e2014-03-07 09:46:20 -08001430 LoadBaseIndexedDisp(rl_array.reg, rl_index.reg, scale, data_offset, rl_result.reg.GetLow(),
1431 rl_result.reg.GetHigh(), size, INVALID_SREG);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001432 StoreValueWide(rl_dest, rl_result);
1433 } else {
buzbee2700f7e2014-03-07 09:46:20 -08001434 LoadBaseIndexedDisp(rl_array.reg, rl_index.reg, scale, data_offset, rl_result.reg,
1435 RegStorage::InvalidReg(), size, INVALID_SREG);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001436 StoreValue(rl_dest, rl_result);
1437 }
1438}
1439
1440/*
1441 * Generate array store
1442 *
1443 */
1444void X86Mir2Lir::GenArrayPut(int opt_flags, OpSize size, RegLocation rl_array,
Ian Rogersa9a82542013-10-04 11:17:26 -07001445 RegLocation rl_index, RegLocation rl_src, int scale, bool card_mark) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001446 RegisterClass reg_class = oat_reg_class_by_size(size);
1447 int len_offset = mirror::Array::LengthOffset().Int32Value();
1448 int data_offset;
1449
1450 if (size == kLong || size == kDouble) {
1451 data_offset = mirror::Array::DataOffset(sizeof(int64_t)).Int32Value();
1452 } else {
1453 data_offset = mirror::Array::DataOffset(sizeof(int32_t)).Int32Value();
1454 }
1455
1456 rl_array = LoadValue(rl_array, kCoreReg);
Mark Mendell343adb52013-12-18 06:02:17 -08001457 bool constant_index = rl_index.is_const;
1458 int32_t constant_index_value = 0;
1459 if (!constant_index) {
1460 rl_index = LoadValue(rl_index, kCoreReg);
1461 } else {
1462 // If index is constant, just fold it into the data offset
1463 constant_index_value = mir_graph_->ConstantValue(rl_index);
1464 data_offset += constant_index_value << scale;
1465 // treat as non array below
buzbee2700f7e2014-03-07 09:46:20 -08001466 rl_index.reg = RegStorage::InvalidReg();
Mark Mendell343adb52013-12-18 06:02:17 -08001467 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001468
1469 /* null object? */
buzbee2700f7e2014-03-07 09:46:20 -08001470 GenNullCheck(rl_array.reg, opt_flags);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001471
1472 if (!(opt_flags & MIR_IGNORE_RANGE_CHECK)) {
Mark Mendell343adb52013-12-18 06:02:17 -08001473 if (constant_index) {
Mingyao Yang9d463142014-04-17 15:22:09 -07001474 GenArrayBoundsCheck(constant_index_value, rl_array.reg, len_offset);
Mark Mendell343adb52013-12-18 06:02:17 -08001475 } else {
Mingyao Yang9d463142014-04-17 15:22:09 -07001476 GenArrayBoundsCheck(rl_index.reg, rl_array.reg, len_offset);
Mark Mendell343adb52013-12-18 06:02:17 -08001477 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001478 }
1479 if ((size == kLong) || (size == kDouble)) {
1480 rl_src = LoadValueWide(rl_src, reg_class);
1481 } else {
1482 rl_src = LoadValue(rl_src, reg_class);
1483 }
1484 // If the src reg can't be byte accessed, move it to a temp first.
Bill Buzbee00e1ec62014-02-27 23:44:13 +00001485 if ((size == kSignedByte || size == kUnsignedByte) && rl_src.reg.GetReg() >= 4) {
buzbee2700f7e2014-03-07 09:46:20 -08001486 RegStorage temp = AllocTemp();
1487 OpRegCopy(temp, rl_src.reg);
1488 StoreBaseIndexedDisp(rl_array.reg, rl_index.reg, scale, data_offset, temp,
1489 RegStorage::InvalidReg(), size, INVALID_SREG);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001490 } else {
buzbee2700f7e2014-03-07 09:46:20 -08001491 if (rl_src.wide) {
1492 StoreBaseIndexedDisp(rl_array.reg, rl_index.reg, scale, data_offset, rl_src.reg.GetLow(),
1493 rl_src.reg.GetHigh(), size, INVALID_SREG);
1494 } else {
1495 StoreBaseIndexedDisp(rl_array.reg, rl_index.reg, scale, data_offset, rl_src.reg,
1496 RegStorage::InvalidReg(), size, INVALID_SREG);
1497 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001498 }
Ian Rogersa9a82542013-10-04 11:17:26 -07001499 if (card_mark) {
Ian Rogers773aab12013-10-14 13:50:10 -07001500 // Free rl_index if its a temp. Ensures there are 2 free regs for card mark.
Mark Mendell343adb52013-12-18 06:02:17 -08001501 if (!constant_index) {
Bill Buzbee00e1ec62014-02-27 23:44:13 +00001502 FreeTemp(rl_index.reg.GetReg());
Mark Mendell343adb52013-12-18 06:02:17 -08001503 }
buzbee2700f7e2014-03-07 09:46:20 -08001504 MarkGCCard(rl_src.reg, rl_array.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001505 }
1506}
1507
Mark Mendell4708dcd2014-01-22 09:05:18 -08001508RegLocation X86Mir2Lir::GenShiftImmOpLong(Instruction::Code opcode, RegLocation rl_dest,
1509 RegLocation rl_src, int shift_amount) {
1510 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
1511 switch (opcode) {
1512 case Instruction::SHL_LONG:
1513 case Instruction::SHL_LONG_2ADDR:
1514 DCHECK_NE(shift_amount, 1); // Prevent a double store from happening.
1515 if (shift_amount == 32) {
buzbee2700f7e2014-03-07 09:46:20 -08001516 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetLow());
1517 LoadConstant(rl_result.reg.GetLow(), 0);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001518 } else if (shift_amount > 31) {
buzbee2700f7e2014-03-07 09:46:20 -08001519 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetLow());
Bill Buzbee00e1ec62014-02-27 23:44:13 +00001520 FreeTemp(rl_src.reg.GetHighReg());
1521 NewLIR2(kX86Sal32RI, rl_result.reg.GetHighReg(), shift_amount - 32);
buzbee2700f7e2014-03-07 09:46:20 -08001522 LoadConstant(rl_result.reg.GetLow(), 0);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001523 } else {
buzbee2700f7e2014-03-07 09:46:20 -08001524 OpRegCopy(rl_result.reg, rl_src.reg);
1525 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetHigh());
1526 NewLIR3(kX86Shld32RRI, rl_result.reg.GetHighReg(), rl_result.reg.GetLowReg(), shift_amount);
1527 NewLIR2(kX86Sal32RI, rl_result.reg.GetLowReg(), shift_amount);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001528 }
1529 break;
1530 case Instruction::SHR_LONG:
1531 case Instruction::SHR_LONG_2ADDR:
1532 if (shift_amount == 32) {
buzbee2700f7e2014-03-07 09:46:20 -08001533 OpRegCopy(rl_result.reg.GetLow(), rl_src.reg.GetHigh());
1534 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetHigh());
Bill Buzbee00e1ec62014-02-27 23:44:13 +00001535 NewLIR2(kX86Sar32RI, rl_result.reg.GetHighReg(), 31);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001536 } else if (shift_amount > 31) {
buzbee2700f7e2014-03-07 09:46:20 -08001537 OpRegCopy(rl_result.reg.GetLow(), rl_src.reg.GetHigh());
1538 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetHigh());
1539 NewLIR2(kX86Sar32RI, rl_result.reg.GetLowReg(), shift_amount - 32);
Bill Buzbee00e1ec62014-02-27 23:44:13 +00001540 NewLIR2(kX86Sar32RI, rl_result.reg.GetHighReg(), 31);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001541 } else {
buzbee2700f7e2014-03-07 09:46:20 -08001542 OpRegCopy(rl_result.reg, rl_src.reg);
1543 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetHigh());
1544 NewLIR3(kX86Shrd32RRI, rl_result.reg.GetLowReg(), rl_result.reg.GetHighReg(), shift_amount);
Bill Buzbee00e1ec62014-02-27 23:44:13 +00001545 NewLIR2(kX86Sar32RI, rl_result.reg.GetHighReg(), shift_amount);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001546 }
1547 break;
1548 case Instruction::USHR_LONG:
1549 case Instruction::USHR_LONG_2ADDR:
1550 if (shift_amount == 32) {
buzbee2700f7e2014-03-07 09:46:20 -08001551 OpRegCopy(rl_result.reg.GetLow(), rl_src.reg.GetHigh());
1552 LoadConstant(rl_result.reg.GetHigh(), 0);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001553 } else if (shift_amount > 31) {
buzbee2700f7e2014-03-07 09:46:20 -08001554 OpRegCopy(rl_result.reg.GetLow(), rl_src.reg.GetHigh());
1555 NewLIR2(kX86Shr32RI, rl_result.reg.GetLowReg(), shift_amount - 32);
1556 LoadConstant(rl_result.reg.GetHigh(), 0);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001557 } else {
buzbee2700f7e2014-03-07 09:46:20 -08001558 OpRegCopy(rl_result.reg, rl_src.reg);
1559 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetHigh());
1560 NewLIR3(kX86Shrd32RRI, rl_result.reg.GetLowReg(), rl_result.reg.GetHighReg(), shift_amount);
Bill Buzbee00e1ec62014-02-27 23:44:13 +00001561 NewLIR2(kX86Shr32RI, rl_result.reg.GetHighReg(), shift_amount);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001562 }
1563 break;
1564 default:
1565 LOG(FATAL) << "Unexpected case";
1566 }
1567 return rl_result;
1568}
1569
Brian Carlstrom7940e442013-07-12 13:46:57 -07001570void X86Mir2Lir::GenShiftImmOpLong(Instruction::Code opcode, RegLocation rl_dest,
Mark Mendell4708dcd2014-01-22 09:05:18 -08001571 RegLocation rl_src, RegLocation rl_shift) {
1572 // Per spec, we only care about low 6 bits of shift amount.
1573 int shift_amount = mir_graph_->ConstantValue(rl_shift) & 0x3f;
1574 if (shift_amount == 0) {
1575 rl_src = LoadValueWide(rl_src, kCoreReg);
1576 StoreValueWide(rl_dest, rl_src);
1577 return;
1578 } else if (shift_amount == 1 &&
1579 (opcode == Instruction::SHL_LONG || opcode == Instruction::SHL_LONG_2ADDR)) {
1580 // Need to handle this here to avoid calling StoreValueWide twice.
1581 GenAddLong(Instruction::ADD_LONG, rl_dest, rl_src, rl_src);
1582 return;
1583 }
1584 if (BadOverlap(rl_src, rl_dest)) {
1585 GenShiftOpLong(opcode, rl_dest, rl_src, rl_shift);
1586 return;
1587 }
1588 rl_src = LoadValueWide(rl_src, kCoreReg);
1589 RegLocation rl_result = GenShiftImmOpLong(opcode, rl_dest, rl_src, shift_amount);
1590 StoreValueWide(rl_dest, rl_result);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001591}
1592
1593void X86Mir2Lir::GenArithImmOpLong(Instruction::Code opcode,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001594 RegLocation rl_dest, RegLocation rl_src1, RegLocation rl_src2) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08001595 switch (opcode) {
1596 case Instruction::ADD_LONG:
1597 case Instruction::AND_LONG:
1598 case Instruction::OR_LONG:
1599 case Instruction::XOR_LONG:
1600 if (rl_src2.is_const) {
1601 GenLongLongImm(rl_dest, rl_src1, rl_src2, opcode);
1602 } else {
1603 DCHECK(rl_src1.is_const);
1604 GenLongLongImm(rl_dest, rl_src2, rl_src1, opcode);
1605 }
1606 break;
1607 case Instruction::SUB_LONG:
1608 case Instruction::SUB_LONG_2ADDR:
1609 if (rl_src2.is_const) {
1610 GenLongLongImm(rl_dest, rl_src1, rl_src2, opcode);
1611 } else {
1612 GenSubLong(opcode, rl_dest, rl_src1, rl_src2);
1613 }
1614 break;
1615 case Instruction::ADD_LONG_2ADDR:
1616 case Instruction::OR_LONG_2ADDR:
1617 case Instruction::XOR_LONG_2ADDR:
1618 case Instruction::AND_LONG_2ADDR:
1619 if (rl_src2.is_const) {
1620 GenLongImm(rl_dest, rl_src2, opcode);
1621 } else {
1622 DCHECK(rl_src1.is_const);
1623 GenLongLongImm(rl_dest, rl_src2, rl_src1, opcode);
1624 }
1625 break;
1626 default:
1627 // Default - bail to non-const handler.
1628 GenArithOpLong(opcode, rl_dest, rl_src1, rl_src2);
1629 break;
1630 }
1631}
1632
1633bool X86Mir2Lir::IsNoOp(Instruction::Code op, int32_t value) {
1634 switch (op) {
1635 case Instruction::AND_LONG_2ADDR:
1636 case Instruction::AND_LONG:
1637 return value == -1;
1638 case Instruction::OR_LONG:
1639 case Instruction::OR_LONG_2ADDR:
1640 case Instruction::XOR_LONG:
1641 case Instruction::XOR_LONG_2ADDR:
1642 return value == 0;
1643 default:
1644 return false;
1645 }
1646}
1647
1648X86OpCode X86Mir2Lir::GetOpcode(Instruction::Code op, RegLocation dest, RegLocation rhs,
1649 bool is_high_op) {
1650 bool rhs_in_mem = rhs.location != kLocPhysReg;
1651 bool dest_in_mem = dest.location != kLocPhysReg;
1652 DCHECK(!rhs_in_mem || !dest_in_mem);
1653 switch (op) {
1654 case Instruction::ADD_LONG:
1655 case Instruction::ADD_LONG_2ADDR:
1656 if (dest_in_mem) {
1657 return is_high_op ? kX86Adc32MR : kX86Add32MR;
1658 } else if (rhs_in_mem) {
1659 return is_high_op ? kX86Adc32RM : kX86Add32RM;
1660 }
1661 return is_high_op ? kX86Adc32RR : kX86Add32RR;
1662 case Instruction::SUB_LONG:
1663 case Instruction::SUB_LONG_2ADDR:
1664 if (dest_in_mem) {
1665 return is_high_op ? kX86Sbb32MR : kX86Sub32MR;
1666 } else if (rhs_in_mem) {
1667 return is_high_op ? kX86Sbb32RM : kX86Sub32RM;
1668 }
1669 return is_high_op ? kX86Sbb32RR : kX86Sub32RR;
1670 case Instruction::AND_LONG_2ADDR:
1671 case Instruction::AND_LONG:
1672 if (dest_in_mem) {
1673 return kX86And32MR;
1674 }
1675 return rhs_in_mem ? kX86And32RM : kX86And32RR;
1676 case Instruction::OR_LONG:
1677 case Instruction::OR_LONG_2ADDR:
1678 if (dest_in_mem) {
1679 return kX86Or32MR;
1680 }
1681 return rhs_in_mem ? kX86Or32RM : kX86Or32RR;
1682 case Instruction::XOR_LONG:
1683 case Instruction::XOR_LONG_2ADDR:
1684 if (dest_in_mem) {
1685 return kX86Xor32MR;
1686 }
1687 return rhs_in_mem ? kX86Xor32RM : kX86Xor32RR;
1688 default:
1689 LOG(FATAL) << "Unexpected opcode: " << op;
1690 return kX86Add32RR;
1691 }
1692}
1693
1694X86OpCode X86Mir2Lir::GetOpcode(Instruction::Code op, RegLocation loc, bool is_high_op,
1695 int32_t value) {
1696 bool in_mem = loc.location != kLocPhysReg;
1697 bool byte_imm = IS_SIMM8(value);
buzbee2700f7e2014-03-07 09:46:20 -08001698 DCHECK(in_mem || !IsFpReg(loc.reg));
Mark Mendelle02d48f2014-01-15 11:19:23 -08001699 switch (op) {
1700 case Instruction::ADD_LONG:
1701 case Instruction::ADD_LONG_2ADDR:
1702 if (byte_imm) {
1703 if (in_mem) {
1704 return is_high_op ? kX86Adc32MI8 : kX86Add32MI8;
1705 }
1706 return is_high_op ? kX86Adc32RI8 : kX86Add32RI8;
1707 }
1708 if (in_mem) {
1709 return is_high_op ? kX86Adc32MI : kX86Add32MI;
1710 }
1711 return is_high_op ? kX86Adc32RI : kX86Add32RI;
1712 case Instruction::SUB_LONG:
1713 case Instruction::SUB_LONG_2ADDR:
1714 if (byte_imm) {
1715 if (in_mem) {
1716 return is_high_op ? kX86Sbb32MI8 : kX86Sub32MI8;
1717 }
1718 return is_high_op ? kX86Sbb32RI8 : kX86Sub32RI8;
1719 }
1720 if (in_mem) {
1721 return is_high_op ? kX86Sbb32MI : kX86Sub32MI;
1722 }
1723 return is_high_op ? kX86Sbb32RI : kX86Sub32RI;
1724 case Instruction::AND_LONG_2ADDR:
1725 case Instruction::AND_LONG:
1726 if (byte_imm) {
1727 return in_mem ? kX86And32MI8 : kX86And32RI8;
1728 }
1729 return in_mem ? kX86And32MI : kX86And32RI;
1730 case Instruction::OR_LONG:
1731 case Instruction::OR_LONG_2ADDR:
1732 if (byte_imm) {
1733 return in_mem ? kX86Or32MI8 : kX86Or32RI8;
1734 }
1735 return in_mem ? kX86Or32MI : kX86Or32RI;
1736 case Instruction::XOR_LONG:
1737 case Instruction::XOR_LONG_2ADDR:
1738 if (byte_imm) {
1739 return in_mem ? kX86Xor32MI8 : kX86Xor32RI8;
1740 }
1741 return in_mem ? kX86Xor32MI : kX86Xor32RI;
1742 default:
1743 LOG(FATAL) << "Unexpected opcode: " << op;
1744 return kX86Add32MI;
1745 }
1746}
1747
1748void X86Mir2Lir::GenLongImm(RegLocation rl_dest, RegLocation rl_src, Instruction::Code op) {
1749 DCHECK(rl_src.is_const);
1750 int64_t val = mir_graph_->ConstantValueWide(rl_src);
1751 int32_t val_lo = Low32Bits(val);
1752 int32_t val_hi = High32Bits(val);
1753 rl_dest = UpdateLocWide(rl_dest);
1754
1755 // Can we just do this into memory?
1756 if ((rl_dest.location == kLocDalvikFrame) ||
1757 (rl_dest.location == kLocCompilerTemp)) {
buzbee2700f7e2014-03-07 09:46:20 -08001758 int r_base = TargetReg(kSp).GetReg();
Mark Mendelle02d48f2014-01-15 11:19:23 -08001759 int displacement = SRegOffset(rl_dest.s_reg_low);
1760
1761 if (!IsNoOp(op, val_lo)) {
1762 X86OpCode x86op = GetOpcode(op, rl_dest, false, val_lo);
buzbee2700f7e2014-03-07 09:46:20 -08001763 LIR *lir = NewLIR3(x86op, r_base, displacement + LOWORD_OFFSET, val_lo);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001764 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
Serguei Katkov217fe732014-03-27 14:41:56 +07001765 true /* is_load */, true /* is64bit */);
1766 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
Mark Mendelle02d48f2014-01-15 11:19:23 -08001767 false /* is_load */, true /* is64bit */);
1768 }
1769 if (!IsNoOp(op, val_hi)) {
1770 X86OpCode x86op = GetOpcode(op, rl_dest, true, val_hi);
buzbee2700f7e2014-03-07 09:46:20 -08001771 LIR *lir = NewLIR3(x86op, r_base, displacement + HIWORD_OFFSET, val_hi);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001772 AnnotateDalvikRegAccess(lir, (displacement + HIWORD_OFFSET) >> 2,
Serguei Katkov217fe732014-03-27 14:41:56 +07001773 true /* is_load */, true /* is64bit */);
1774 AnnotateDalvikRegAccess(lir, (displacement + HIWORD_OFFSET) >> 2,
Mark Mendelle02d48f2014-01-15 11:19:23 -08001775 false /* is_load */, true /* is64bit */);
1776 }
1777 return;
1778 }
1779
1780 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
1781 DCHECK_EQ(rl_result.location, kLocPhysReg);
buzbee2700f7e2014-03-07 09:46:20 -08001782 DCHECK(!IsFpReg(rl_result.reg));
Mark Mendelle02d48f2014-01-15 11:19:23 -08001783
1784 if (!IsNoOp(op, val_lo)) {
1785 X86OpCode x86op = GetOpcode(op, rl_result, false, val_lo);
buzbee2700f7e2014-03-07 09:46:20 -08001786 NewLIR2(x86op, rl_result.reg.GetLowReg(), val_lo);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001787 }
1788 if (!IsNoOp(op, val_hi)) {
1789 X86OpCode x86op = GetOpcode(op, rl_result, true, val_hi);
Bill Buzbee00e1ec62014-02-27 23:44:13 +00001790 NewLIR2(x86op, rl_result.reg.GetHighReg(), val_hi);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001791 }
1792 StoreValueWide(rl_dest, rl_result);
1793}
1794
1795void X86Mir2Lir::GenLongLongImm(RegLocation rl_dest, RegLocation rl_src1,
1796 RegLocation rl_src2, Instruction::Code op) {
1797 DCHECK(rl_src2.is_const);
1798 int64_t val = mir_graph_->ConstantValueWide(rl_src2);
1799 int32_t val_lo = Low32Bits(val);
1800 int32_t val_hi = High32Bits(val);
1801 rl_dest = UpdateLocWide(rl_dest);
1802 rl_src1 = UpdateLocWide(rl_src1);
1803
1804 // Can we do this directly into the destination registers?
1805 if (rl_dest.location == kLocPhysReg && rl_src1.location == kLocPhysReg &&
buzbee2700f7e2014-03-07 09:46:20 -08001806 rl_dest.reg.GetLowReg() == rl_src1.reg.GetLowReg() &&
1807 rl_dest.reg.GetHighReg() == rl_src1.reg.GetHighReg() &&
1808 !IsFpReg(rl_dest.reg)) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08001809 if (!IsNoOp(op, val_lo)) {
1810 X86OpCode x86op = GetOpcode(op, rl_dest, false, val_lo);
buzbee2700f7e2014-03-07 09:46:20 -08001811 NewLIR2(x86op, rl_dest.reg.GetLowReg(), val_lo);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001812 }
1813 if (!IsNoOp(op, val_hi)) {
1814 X86OpCode x86op = GetOpcode(op, rl_dest, true, val_hi);
Bill Buzbee00e1ec62014-02-27 23:44:13 +00001815 NewLIR2(x86op, rl_dest.reg.GetHighReg(), val_hi);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001816 }
Maxim Kazantsev653f2bf2014-02-13 15:11:17 +07001817
1818 StoreFinalValueWide(rl_dest, rl_dest);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001819 return;
1820 }
1821
1822 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
1823 DCHECK_EQ(rl_src1.location, kLocPhysReg);
1824
1825 // We need the values to be in a temporary
1826 RegLocation rl_result = ForceTempWide(rl_src1);
1827 if (!IsNoOp(op, val_lo)) {
1828 X86OpCode x86op = GetOpcode(op, rl_result, false, val_lo);
buzbee2700f7e2014-03-07 09:46:20 -08001829 NewLIR2(x86op, rl_result.reg.GetLowReg(), val_lo);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001830 }
1831 if (!IsNoOp(op, val_hi)) {
1832 X86OpCode x86op = GetOpcode(op, rl_result, true, val_hi);
Bill Buzbee00e1ec62014-02-27 23:44:13 +00001833 NewLIR2(x86op, rl_result.reg.GetHighReg(), val_hi);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001834 }
1835
1836 StoreFinalValueWide(rl_dest, rl_result);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001837}
1838
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08001839// For final classes there are no sub-classes to check and so we can answer the instance-of
1840// question with simple comparisons. Use compares to memory and SETEQ to optimize for x86.
1841void X86Mir2Lir::GenInstanceofFinal(bool use_declaring_class, uint32_t type_idx,
1842 RegLocation rl_dest, RegLocation rl_src) {
1843 RegLocation object = LoadValue(rl_src, kCoreReg);
1844 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08001845 RegStorage result_reg = rl_result.reg;
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08001846
1847 // SETcc only works with EAX..EDX.
buzbee2700f7e2014-03-07 09:46:20 -08001848 if (result_reg == object.reg || result_reg.GetReg() >= 4) {
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08001849 result_reg = AllocTypedTemp(false, kCoreReg);
buzbee2700f7e2014-03-07 09:46:20 -08001850 DCHECK_LT(result_reg.GetReg(), 4);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08001851 }
1852
1853 // Assume that there is no match.
1854 LoadConstant(result_reg, 0);
buzbee2700f7e2014-03-07 09:46:20 -08001855 LIR* null_branchover = OpCmpImmBranch(kCondEq, object.reg, 0, NULL);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08001856
buzbee2700f7e2014-03-07 09:46:20 -08001857 RegStorage check_class = AllocTypedTemp(false, kCoreReg);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08001858
1859 // If Method* is already in a register, we can save a copy.
1860 RegLocation rl_method = mir_graph_->GetMethodLoc();
1861 int32_t offset_of_type = mirror::Array::DataOffset(sizeof(mirror::Class*)).Int32Value() +
1862 (sizeof(mirror::Class*) * type_idx);
1863
1864 if (rl_method.location == kLocPhysReg) {
1865 if (use_declaring_class) {
buzbee2700f7e2014-03-07 09:46:20 -08001866 LoadWordDisp(rl_method.reg, mirror::ArtMethod::DeclaringClassOffset().Int32Value(),
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08001867 check_class);
1868 } else {
buzbee2700f7e2014-03-07 09:46:20 -08001869 LoadWordDisp(rl_method.reg, mirror::ArtMethod::DexCacheResolvedTypesOffset().Int32Value(),
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08001870 check_class);
1871 LoadWordDisp(check_class, offset_of_type, check_class);
1872 }
1873 } else {
1874 LoadCurrMethodDirect(check_class);
1875 if (use_declaring_class) {
buzbee2700f7e2014-03-07 09:46:20 -08001876 LoadWordDisp(check_class, mirror::ArtMethod::DeclaringClassOffset().Int32Value(),
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08001877 check_class);
1878 } else {
buzbee2700f7e2014-03-07 09:46:20 -08001879 LoadWordDisp(check_class, mirror::ArtMethod::DexCacheResolvedTypesOffset().Int32Value(),
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08001880 check_class);
1881 LoadWordDisp(check_class, offset_of_type, check_class);
1882 }
1883 }
1884
1885 // Compare the computed class to the class in the object.
1886 DCHECK_EQ(object.location, kLocPhysReg);
buzbee2700f7e2014-03-07 09:46:20 -08001887 OpRegMem(kOpCmp, check_class, object.reg, mirror::Object::ClassOffset().Int32Value());
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08001888
1889 // Set the low byte of the result to 0 or 1 from the compare condition code.
buzbee2700f7e2014-03-07 09:46:20 -08001890 NewLIR2(kX86Set8R, result_reg.GetReg(), kX86CondEq);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08001891
1892 LIR* target = NewLIR0(kPseudoTargetLabel);
1893 null_branchover->target = target;
1894 FreeTemp(check_class);
1895 if (IsTemp(result_reg)) {
buzbee2700f7e2014-03-07 09:46:20 -08001896 OpRegCopy(rl_result.reg, result_reg);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08001897 FreeTemp(result_reg);
1898 }
1899 StoreValue(rl_dest, rl_result);
1900}
1901
Mark Mendell6607d972014-02-10 06:54:18 -08001902void X86Mir2Lir::GenInstanceofCallingHelper(bool needs_access_check, bool type_known_final,
1903 bool type_known_abstract, bool use_declaring_class,
1904 bool can_assume_type_is_in_dex_cache,
1905 uint32_t type_idx, RegLocation rl_dest,
1906 RegLocation rl_src) {
1907 FlushAllRegs();
1908 // May generate a call - use explicit registers.
1909 LockCallTemps();
1910 LoadCurrMethodDirect(TargetReg(kArg1)); // kArg1 gets current Method*.
buzbee2700f7e2014-03-07 09:46:20 -08001911 RegStorage class_reg = TargetReg(kArg2); // kArg2 will hold the Class*.
Mark Mendell6607d972014-02-10 06:54:18 -08001912 // Reference must end up in kArg0.
1913 if (needs_access_check) {
1914 // Check we have access to type_idx and if not throw IllegalAccessError,
1915 // Caller function returns Class* in kArg0.
Ian Rogersdd7624d2014-03-14 17:43:00 -07001916 CallRuntimeHelperImm(QUICK_ENTRYPOINT_OFFSET(4, pInitializeTypeAndVerifyAccess),
Mark Mendell6607d972014-02-10 06:54:18 -08001917 type_idx, true);
1918 OpRegCopy(class_reg, TargetReg(kRet0));
1919 LoadValueDirectFixed(rl_src, TargetReg(kArg0));
1920 } else if (use_declaring_class) {
1921 LoadValueDirectFixed(rl_src, TargetReg(kArg0));
buzbee2700f7e2014-03-07 09:46:20 -08001922 LoadWordDisp(TargetReg(kArg1), mirror::ArtMethod::DeclaringClassOffset().Int32Value(),
1923 class_reg);
Mark Mendell6607d972014-02-10 06:54:18 -08001924 } else {
1925 // Load dex cache entry into class_reg (kArg2).
1926 LoadValueDirectFixed(rl_src, TargetReg(kArg0));
buzbee2700f7e2014-03-07 09:46:20 -08001927 LoadWordDisp(TargetReg(kArg1), mirror::ArtMethod::DexCacheResolvedTypesOffset().Int32Value(),
1928 class_reg);
Mark Mendell6607d972014-02-10 06:54:18 -08001929 int32_t offset_of_type =
1930 mirror::Array::DataOffset(sizeof(mirror::Class*)).Int32Value() + (sizeof(mirror::Class*)
1931 * type_idx);
1932 LoadWordDisp(class_reg, offset_of_type, class_reg);
1933 if (!can_assume_type_is_in_dex_cache) {
1934 // Need to test presence of type in dex cache at runtime.
1935 LIR* hop_branch = OpCmpImmBranch(kCondNe, class_reg, 0, NULL);
1936 // Type is not resolved. Call out to helper, which will return resolved type in kRet0/kArg0.
Ian Rogersdd7624d2014-03-14 17:43:00 -07001937 CallRuntimeHelperImm(QUICK_ENTRYPOINT_OFFSET(4, pInitializeType), type_idx, true);
Mark Mendell6607d972014-02-10 06:54:18 -08001938 OpRegCopy(TargetReg(kArg2), TargetReg(kRet0)); // Align usage with fast path.
1939 LoadValueDirectFixed(rl_src, TargetReg(kArg0)); /* Reload Ref. */
1940 // Rejoin code paths
1941 LIR* hop_target = NewLIR0(kPseudoTargetLabel);
1942 hop_branch->target = hop_target;
1943 }
1944 }
1945 /* kArg0 is ref, kArg2 is class. If ref==null, use directly as bool result. */
1946 RegLocation rl_result = GetReturn(false);
1947
1948 // SETcc only works with EAX..EDX.
Bill Buzbee00e1ec62014-02-27 23:44:13 +00001949 DCHECK_LT(rl_result.reg.GetReg(), 4);
Mark Mendell6607d972014-02-10 06:54:18 -08001950
1951 // Is the class NULL?
1952 LIR* branch1 = OpCmpImmBranch(kCondEq, TargetReg(kArg0), 0, NULL);
1953
1954 /* Load object->klass_. */
1955 DCHECK_EQ(mirror::Object::ClassOffset().Int32Value(), 0);
1956 LoadWordDisp(TargetReg(kArg0), mirror::Object::ClassOffset().Int32Value(), TargetReg(kArg1));
1957 /* kArg0 is ref, kArg1 is ref->klass_, kArg2 is class. */
1958 LIR* branchover = nullptr;
1959 if (type_known_final) {
1960 // Ensure top 3 bytes of result are 0.
buzbee2700f7e2014-03-07 09:46:20 -08001961 LoadConstant(rl_result.reg, 0);
Mark Mendell6607d972014-02-10 06:54:18 -08001962 OpRegReg(kOpCmp, TargetReg(kArg1), TargetReg(kArg2));
1963 // Set the low byte of the result to 0 or 1 from the compare condition code.
Bill Buzbee00e1ec62014-02-27 23:44:13 +00001964 NewLIR2(kX86Set8R, rl_result.reg.GetReg(), kX86CondEq);
Mark Mendell6607d972014-02-10 06:54:18 -08001965 } else {
1966 if (!type_known_abstract) {
buzbee2700f7e2014-03-07 09:46:20 -08001967 LoadConstant(rl_result.reg, 1); // Assume result succeeds.
Mark Mendell6607d972014-02-10 06:54:18 -08001968 branchover = OpCmpBranch(kCondEq, TargetReg(kArg1), TargetReg(kArg2), NULL);
1969 }
1970 OpRegCopy(TargetReg(kArg0), TargetReg(kArg2));
Ian Rogersdd7624d2014-03-14 17:43:00 -07001971 OpThreadMem(kOpBlx, QUICK_ENTRYPOINT_OFFSET(4, pInstanceofNonTrivial));
Mark Mendell6607d972014-02-10 06:54:18 -08001972 }
1973 // TODO: only clobber when type isn't final?
1974 ClobberCallerSave();
1975 /* Branch targets here. */
1976 LIR* target = NewLIR0(kPseudoTargetLabel);
1977 StoreValue(rl_dest, rl_result);
1978 branch1->target = target;
1979 if (branchover != nullptr) {
1980 branchover->target = target;
1981 }
1982}
1983
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08001984void X86Mir2Lir::GenArithOpInt(Instruction::Code opcode, RegLocation rl_dest,
1985 RegLocation rl_lhs, RegLocation rl_rhs) {
1986 OpKind op = kOpBkpt;
1987 bool is_div_rem = false;
1988 bool unary = false;
1989 bool shift_op = false;
1990 bool is_two_addr = false;
1991 RegLocation rl_result;
1992 switch (opcode) {
1993 case Instruction::NEG_INT:
1994 op = kOpNeg;
1995 unary = true;
1996 break;
1997 case Instruction::NOT_INT:
1998 op = kOpMvn;
1999 unary = true;
2000 break;
2001 case Instruction::ADD_INT_2ADDR:
2002 is_two_addr = true;
2003 // Fallthrough
2004 case Instruction::ADD_INT:
2005 op = kOpAdd;
2006 break;
2007 case Instruction::SUB_INT_2ADDR:
2008 is_two_addr = true;
2009 // Fallthrough
2010 case Instruction::SUB_INT:
2011 op = kOpSub;
2012 break;
2013 case Instruction::MUL_INT_2ADDR:
2014 is_two_addr = true;
2015 // Fallthrough
2016 case Instruction::MUL_INT:
2017 op = kOpMul;
2018 break;
2019 case Instruction::DIV_INT_2ADDR:
2020 is_two_addr = true;
2021 // Fallthrough
2022 case Instruction::DIV_INT:
2023 op = kOpDiv;
2024 is_div_rem = true;
2025 break;
2026 /* NOTE: returns in kArg1 */
2027 case Instruction::REM_INT_2ADDR:
2028 is_two_addr = true;
2029 // Fallthrough
2030 case Instruction::REM_INT:
2031 op = kOpRem;
2032 is_div_rem = true;
2033 break;
2034 case Instruction::AND_INT_2ADDR:
2035 is_two_addr = true;
2036 // Fallthrough
2037 case Instruction::AND_INT:
2038 op = kOpAnd;
2039 break;
2040 case Instruction::OR_INT_2ADDR:
2041 is_two_addr = true;
2042 // Fallthrough
2043 case Instruction::OR_INT:
2044 op = kOpOr;
2045 break;
2046 case Instruction::XOR_INT_2ADDR:
2047 is_two_addr = true;
2048 // Fallthrough
2049 case Instruction::XOR_INT:
2050 op = kOpXor;
2051 break;
2052 case Instruction::SHL_INT_2ADDR:
2053 is_two_addr = true;
2054 // Fallthrough
2055 case Instruction::SHL_INT:
2056 shift_op = true;
2057 op = kOpLsl;
2058 break;
2059 case Instruction::SHR_INT_2ADDR:
2060 is_two_addr = true;
2061 // Fallthrough
2062 case Instruction::SHR_INT:
2063 shift_op = true;
2064 op = kOpAsr;
2065 break;
2066 case Instruction::USHR_INT_2ADDR:
2067 is_two_addr = true;
2068 // Fallthrough
2069 case Instruction::USHR_INT:
2070 shift_op = true;
2071 op = kOpLsr;
2072 break;
2073 default:
2074 LOG(FATAL) << "Invalid word arith op: " << opcode;
2075 }
2076
2077 // Can we convert to a two address instruction?
2078 if (!is_two_addr &&
2079 (mir_graph_->SRegToVReg(rl_dest.s_reg_low) ==
2080 mir_graph_->SRegToVReg(rl_lhs.s_reg_low))) {
2081 is_two_addr = true;
2082 }
2083
2084 // Get the div/rem stuff out of the way.
2085 if (is_div_rem) {
2086 rl_result = GenDivRem(rl_dest, rl_lhs, rl_rhs, op == kOpDiv, true);
2087 StoreValue(rl_dest, rl_result);
2088 return;
2089 }
2090
2091 if (unary) {
2092 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2093 rl_result = UpdateLoc(rl_dest);
2094 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002095 OpRegReg(op, rl_result.reg, rl_lhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002096 } else {
2097 if (shift_op) {
2098 // X86 doesn't require masking and must use ECX.
buzbee2700f7e2014-03-07 09:46:20 -08002099 RegStorage t_reg = TargetReg(kCount); // rCX
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002100 LoadValueDirectFixed(rl_rhs, t_reg);
2101 if (is_two_addr) {
2102 // Can we do this directly into memory?
2103 rl_result = UpdateLoc(rl_dest);
2104 rl_rhs = LoadValue(rl_rhs, kCoreReg);
2105 if (rl_result.location != kLocPhysReg) {
2106 // Okay, we can do this into memory
buzbee2700f7e2014-03-07 09:46:20 -08002107 OpMemReg(op, rl_result, t_reg.GetReg());
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002108 FreeTemp(t_reg);
2109 return;
Bill Buzbee00e1ec62014-02-27 23:44:13 +00002110 } else if (!IsFpReg(rl_result.reg.GetReg())) {
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002111 // Can do this directly into the result register
buzbee2700f7e2014-03-07 09:46:20 -08002112 OpRegReg(op, rl_result.reg, t_reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002113 FreeTemp(t_reg);
2114 StoreFinalValue(rl_dest, rl_result);
2115 return;
2116 }
2117 }
2118 // Three address form, or we can't do directly.
2119 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2120 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002121 OpRegRegReg(op, rl_result.reg, rl_lhs.reg, t_reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002122 FreeTemp(t_reg);
2123 } else {
2124 // Multiply is 3 operand only (sort of).
2125 if (is_two_addr && op != kOpMul) {
2126 // Can we do this directly into memory?
2127 rl_result = UpdateLoc(rl_dest);
2128 if (rl_result.location == kLocPhysReg) {
Serguei Katkov366f8ae2014-04-15 16:55:26 +07002129 // Ensure res is in a core reg
2130 rl_result = EvalLoc(rl_dest, kCoreReg, true);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002131 // Can we do this from memory directly?
2132 rl_rhs = UpdateLoc(rl_rhs);
2133 if (rl_rhs.location != kLocPhysReg) {
buzbee2700f7e2014-03-07 09:46:20 -08002134 OpRegMem(op, rl_result.reg, rl_rhs);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002135 StoreFinalValue(rl_dest, rl_result);
2136 return;
buzbee2700f7e2014-03-07 09:46:20 -08002137 } else if (!IsFpReg(rl_rhs.reg)) {
2138 OpRegReg(op, rl_result.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002139 StoreFinalValue(rl_dest, rl_result);
2140 return;
2141 }
2142 }
2143 rl_rhs = LoadValue(rl_rhs, kCoreReg);
2144 if (rl_result.location != kLocPhysReg) {
2145 // Okay, we can do this into memory.
Bill Buzbee00e1ec62014-02-27 23:44:13 +00002146 OpMemReg(op, rl_result, rl_rhs.reg.GetReg());
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002147 return;
buzbee2700f7e2014-03-07 09:46:20 -08002148 } else if (!IsFpReg(rl_result.reg)) {
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002149 // Can do this directly into the result register.
buzbee2700f7e2014-03-07 09:46:20 -08002150 OpRegReg(op, rl_result.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002151 StoreFinalValue(rl_dest, rl_result);
2152 return;
2153 } else {
2154 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2155 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002156 OpRegRegReg(op, rl_result.reg, rl_lhs.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002157 }
2158 } else {
2159 // Try to use reg/memory instructions.
2160 rl_lhs = UpdateLoc(rl_lhs);
2161 rl_rhs = UpdateLoc(rl_rhs);
2162 // We can't optimize with FP registers.
2163 if (!IsOperationSafeWithoutTemps(rl_lhs, rl_rhs)) {
2164 // Something is difficult, so fall back to the standard case.
2165 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2166 rl_rhs = LoadValue(rl_rhs, kCoreReg);
2167 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002168 OpRegRegReg(op, rl_result.reg, rl_lhs.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002169 } else {
2170 // We can optimize by moving to result and using memory operands.
2171 if (rl_rhs.location != kLocPhysReg) {
2172 // Force LHS into result.
Serguei Katkov66da1362014-03-14 13:33:33 +07002173 // We should be careful with order here
2174 // If rl_dest and rl_lhs points to the same VR we should load first
2175 // If the are different we should find a register first for dest
2176 if (mir_graph_->SRegToVReg(rl_dest.s_reg_low) == mir_graph_->SRegToVReg(rl_lhs.s_reg_low)) {
2177 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2178 rl_result = EvalLoc(rl_dest, kCoreReg, true);
2179 } else {
2180 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002181 LoadValueDirect(rl_lhs, rl_result.reg);
Serguei Katkov66da1362014-03-14 13:33:33 +07002182 }
buzbee2700f7e2014-03-07 09:46:20 -08002183 OpRegMem(op, rl_result.reg, rl_rhs);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002184 } else if (rl_lhs.location != kLocPhysReg) {
2185 // RHS is in a register; LHS is in memory.
2186 if (op != kOpSub) {
2187 // Force RHS into result and operate on memory.
2188 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002189 OpRegCopy(rl_result.reg, rl_rhs.reg);
2190 OpRegMem(op, rl_result.reg, rl_lhs);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002191 } else {
2192 // Subtraction isn't commutative.
2193 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2194 rl_rhs = LoadValue(rl_rhs, kCoreReg);
2195 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002196 OpRegRegReg(op, rl_result.reg, rl_lhs.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002197 }
2198 } else {
2199 // Both are in registers.
2200 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2201 rl_rhs = LoadValue(rl_rhs, kCoreReg);
2202 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002203 OpRegRegReg(op, rl_result.reg, rl_lhs.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002204 }
2205 }
2206 }
2207 }
2208 }
2209 StoreValue(rl_dest, rl_result);
2210}
2211
2212bool X86Mir2Lir::IsOperationSafeWithoutTemps(RegLocation rl_lhs, RegLocation rl_rhs) {
2213 // If we have non-core registers, then we can't do good things.
Bill Buzbee00e1ec62014-02-27 23:44:13 +00002214 if (rl_lhs.location == kLocPhysReg && IsFpReg(rl_lhs.reg.GetReg())) {
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002215 return false;
2216 }
Bill Buzbee00e1ec62014-02-27 23:44:13 +00002217 if (rl_rhs.location == kLocPhysReg && IsFpReg(rl_rhs.reg.GetReg())) {
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002218 return false;
2219 }
2220
2221 // Everything will be fine :-).
2222 return true;
2223}
Brian Carlstrom7940e442013-07-12 13:46:57 -07002224} // namespace art