blob: b3428133e08d17fe141e53f4b61a6643c47a713f [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/*
Brian Carlstrom7940e442013-07-12 13:46:57 -070027 * Compare two 64-bit values
28 * x = y return 0
29 * x < y return -1
30 * x > y return 1
31 */
32void X86Mir2Lir::GenCmpLong(RegLocation rl_dest, RegLocation rl_src1,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -070033 RegLocation rl_src2) {
Chao-ying Fua0147762014-06-06 18:38:49 -070034 if (Gen64Bit()) {
35 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
36 rl_src2 = LoadValueWide(rl_src2, kCoreReg);
37 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
38 OpRegReg(kOpXor, rl_result.reg, rl_result.reg); // result = 0
39 OpRegReg(kOpCmp, rl_src1.reg, rl_src2.reg);
40 NewLIR2(kX86Set8R, rl_result.reg.GetReg(), kX86CondNe); // result = (src1 != src2) ? 1 : result
41 RegStorage temp_reg = AllocTemp();
42 OpRegReg(kOpNeg, temp_reg, rl_result.reg);
43 OpRegReg(kOpCmp, rl_src1.reg, rl_src2.reg);
44 // result = (src1 < src2) ? -result : result
45 OpCondRegReg(kOpCmov, kCondLt, rl_result.reg, temp_reg);
46 StoreValue(rl_dest, rl_result);
47 FreeTemp(temp_reg);
48 return;
49 }
50
Brian Carlstrom7940e442013-07-12 13:46:57 -070051 FlushAllRegs();
52 LockCallTemps(); // Prepare for explicit register usage
buzbee091cc402014-03-31 10:14:40 -070053 RegStorage r_tmp1 = RegStorage::MakeRegPair(rs_r0, rs_r1);
54 RegStorage r_tmp2 = RegStorage::MakeRegPair(rs_r2, rs_r3);
buzbee2700f7e2014-03-07 09:46:20 -080055 LoadValueDirectWideFixed(rl_src1, r_tmp1);
56 LoadValueDirectWideFixed(rl_src2, r_tmp2);
Brian Carlstrom7940e442013-07-12 13:46:57 -070057 // Compute (r1:r0) = (r1:r0) - (r3:r2)
buzbee2700f7e2014-03-07 09:46:20 -080058 OpRegReg(kOpSub, rs_r0, rs_r2); // r0 = r0 - r2
59 OpRegReg(kOpSbc, rs_r1, rs_r3); // r1 = r1 - r3 - CF
buzbee091cc402014-03-31 10:14:40 -070060 NewLIR2(kX86Set8R, rs_r2.GetReg(), kX86CondL); // r2 = (r1:r0) < (r3:r2) ? 1 : 0
61 NewLIR2(kX86Movzx8RR, rs_r2.GetReg(), rs_r2.GetReg());
buzbee2700f7e2014-03-07 09:46:20 -080062 OpReg(kOpNeg, rs_r2); // r2 = -r2
63 OpRegReg(kOpOr, rs_r0, rs_r1); // r0 = high | low - sets ZF
buzbee091cc402014-03-31 10:14:40 -070064 NewLIR2(kX86Set8R, rs_r0.GetReg(), kX86CondNz); // r0 = (r1:r0) != (r3:r2) ? 1 : 0
Brian Carlstrom7940e442013-07-12 13:46:57 -070065 NewLIR2(kX86Movzx8RR, r0, r0);
buzbee2700f7e2014-03-07 09:46:20 -080066 OpRegReg(kOpOr, rs_r0, rs_r2); // r0 = r0 | r2
Brian Carlstrom7940e442013-07-12 13:46:57 -070067 RegLocation rl_result = LocCReturn();
68 StoreValue(rl_dest, rl_result);
69}
70
71X86ConditionCode X86ConditionEncoding(ConditionCode cond) {
72 switch (cond) {
73 case kCondEq: return kX86CondEq;
74 case kCondNe: return kX86CondNe;
75 case kCondCs: return kX86CondC;
76 case kCondCc: return kX86CondNc;
Vladimir Marko58af1f92013-12-19 13:31:15 +000077 case kCondUlt: return kX86CondC;
78 case kCondUge: return kX86CondNc;
Brian Carlstrom7940e442013-07-12 13:46:57 -070079 case kCondMi: return kX86CondS;
80 case kCondPl: return kX86CondNs;
81 case kCondVs: return kX86CondO;
82 case kCondVc: return kX86CondNo;
83 case kCondHi: return kX86CondA;
84 case kCondLs: return kX86CondBe;
85 case kCondGe: return kX86CondGe;
86 case kCondLt: return kX86CondL;
87 case kCondGt: return kX86CondG;
88 case kCondLe: return kX86CondLe;
89 case kCondAl:
90 case kCondNv: LOG(FATAL) << "Should not reach here";
91 }
92 return kX86CondO;
93}
94
buzbee2700f7e2014-03-07 09:46:20 -080095LIR* X86Mir2Lir::OpCmpBranch(ConditionCode cond, RegStorage src1, RegStorage src2, LIR* target) {
96 NewLIR2(kX86Cmp32RR, src1.GetReg(), src2.GetReg());
Brian Carlstrom7940e442013-07-12 13:46:57 -070097 X86ConditionCode cc = X86ConditionEncoding(cond);
98 LIR* branch = NewLIR2(kX86Jcc8, 0 /* lir operand for Jcc offset */ ,
99 cc);
100 branch->target = target;
101 return branch;
102}
103
buzbee2700f7e2014-03-07 09:46:20 -0800104LIR* X86Mir2Lir::OpCmpImmBranch(ConditionCode cond, RegStorage reg,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700105 int check_value, LIR* target) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700106 if ((check_value == 0) && (cond == kCondEq || cond == kCondNe)) {
107 // TODO: when check_value == 0 and reg is rCX, use the jcxz/nz opcode
buzbee2700f7e2014-03-07 09:46:20 -0800108 NewLIR2(kX86Test32RR, reg.GetReg(), reg.GetReg());
Brian Carlstrom7940e442013-07-12 13:46:57 -0700109 } else {
buzbee2700f7e2014-03-07 09:46:20 -0800110 NewLIR2(IS_SIMM8(check_value) ? kX86Cmp32RI8 : kX86Cmp32RI, reg.GetReg(), check_value);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700111 }
112 X86ConditionCode cc = X86ConditionEncoding(cond);
113 LIR* branch = NewLIR2(kX86Jcc8, 0 /* lir operand for Jcc offset */ , cc);
114 branch->target = target;
115 return branch;
116}
117
buzbee2700f7e2014-03-07 09:46:20 -0800118LIR* X86Mir2Lir::OpRegCopyNoInsert(RegStorage r_dest, RegStorage r_src) {
119 // If src or dest is a pair, we'll be using low reg.
120 if (r_dest.IsPair()) {
121 r_dest = r_dest.GetLow();
122 }
123 if (r_src.IsPair()) {
124 r_src = r_src.GetLow();
125 }
buzbee091cc402014-03-31 10:14:40 -0700126 if (r_dest.IsFloat() || r_src.IsFloat())
Brian Carlstrom7940e442013-07-12 13:46:57 -0700127 return OpFpRegCopy(r_dest, r_src);
Chao-ying Fue0ccdc02014-06-06 17:32:37 -0700128 LIR* res = RawLIR(current_dalvik_offset_, r_dest.Is64Bit() ? kX86Mov64RR : kX86Mov32RR,
buzbee2700f7e2014-03-07 09:46:20 -0800129 r_dest.GetReg(), r_src.GetReg());
Razvan A Lupusorubd288c22013-12-20 17:27:23 -0800130 if (!(cu_->disable_opt & (1 << kSafeOptimizations)) && r_dest == r_src) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700131 res->flags.is_nop = true;
132 }
133 return res;
134}
135
buzbee7a11ab02014-04-28 20:02:38 -0700136void X86Mir2Lir::OpRegCopy(RegStorage r_dest, RegStorage r_src) {
137 if (r_dest != r_src) {
138 LIR *res = OpRegCopyNoInsert(r_dest, r_src);
139 AppendLIR(res);
140 }
Brian Carlstrom7940e442013-07-12 13:46:57 -0700141}
142
buzbee2700f7e2014-03-07 09:46:20 -0800143void X86Mir2Lir::OpRegCopyWide(RegStorage r_dest, RegStorage r_src) {
buzbee7a11ab02014-04-28 20:02:38 -0700144 if (r_dest != r_src) {
buzbee091cc402014-03-31 10:14:40 -0700145 bool dest_fp = r_dest.IsFloat();
146 bool src_fp = r_src.IsFloat();
buzbee7a11ab02014-04-28 20:02:38 -0700147 if (dest_fp) {
148 if (src_fp) {
buzbee091cc402014-03-31 10:14:40 -0700149 OpRegCopy(r_dest, r_src);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700150 } else {
buzbee7a11ab02014-04-28 20:02:38 -0700151 // TODO: Prevent this from happening in the code. The result is often
152 // unused or could have been loaded more easily from memory.
Chao-ying Fue0ccdc02014-06-06 17:32:37 -0700153 if (!r_src.IsPair()) {
154 DCHECK(!r_dest.IsPair());
155 NewLIR2(kX86MovqxrRR, r_dest.GetReg(), r_src.GetReg());
156 } else {
157 NewLIR2(kX86MovdxrRR, r_dest.GetReg(), r_src.GetLowReg());
158 RegStorage r_tmp = AllocTempDouble();
159 NewLIR2(kX86MovdxrRR, r_tmp.GetReg(), r_src.GetHighReg());
160 NewLIR2(kX86PunpckldqRR, r_dest.GetReg(), r_tmp.GetReg());
161 FreeTemp(r_tmp);
162 }
buzbee7a11ab02014-04-28 20:02:38 -0700163 }
164 } else {
165 if (src_fp) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -0700166 if (!r_dest.IsPair()) {
167 DCHECK(!r_src.IsPair());
168 NewLIR2(kX86MovqrxRR, r_dest.GetReg(), r_src.GetReg());
buzbee7a11ab02014-04-28 20:02:38 -0700169 } else {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -0700170 NewLIR2(kX86MovdrxRR, r_dest.GetLowReg(), r_src.GetReg());
171 RegStorage temp_reg = AllocTempDouble();
172 NewLIR2(kX86MovsdRR, temp_reg.GetReg(), r_src.GetReg());
173 NewLIR2(kX86PsrlqRI, temp_reg.GetReg(), 32);
174 NewLIR2(kX86MovdrxRR, r_dest.GetHighReg(), temp_reg.GetReg());
175 }
176 } else {
177 DCHECK_EQ(r_dest.IsPair(), r_src.IsPair());
178 if (!r_src.IsPair()) {
179 // Just copy the register directly.
180 OpRegCopy(r_dest, r_src);
181 } else {
182 // Handle overlap
183 if (r_src.GetHighReg() == r_dest.GetLowReg() &&
184 r_src.GetLowReg() == r_dest.GetHighReg()) {
185 // Deal with cycles.
186 RegStorage temp_reg = AllocTemp();
187 OpRegCopy(temp_reg, r_dest.GetHigh());
188 OpRegCopy(r_dest.GetHigh(), r_dest.GetLow());
189 OpRegCopy(r_dest.GetLow(), temp_reg);
190 FreeTemp(temp_reg);
191 } else if (r_src.GetHighReg() == r_dest.GetLowReg()) {
192 OpRegCopy(r_dest.GetHigh(), r_src.GetHigh());
193 OpRegCopy(r_dest.GetLow(), r_src.GetLow());
194 } else {
195 OpRegCopy(r_dest.GetLow(), r_src.GetLow());
196 OpRegCopy(r_dest.GetHigh(), r_src.GetHigh());
197 }
buzbee7a11ab02014-04-28 20:02:38 -0700198 }
Brian Carlstrom7940e442013-07-12 13:46:57 -0700199 }
200 }
201 }
202}
203
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700204void X86Mir2Lir::GenSelect(BasicBlock* bb, MIR* mir) {
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800205 RegLocation rl_result;
206 RegLocation rl_src = mir_graph_->GetSrc(mir, 0);
207 RegLocation rl_dest = mir_graph_->GetDest(mir);
buzbeea0cd2d72014-06-01 09:33:49 -0700208 // Avoid using float regs here.
209 RegisterClass src_reg_class = rl_src.ref ? kRefReg : kCoreReg;
210 RegisterClass result_reg_class = rl_dest.ref ? kRefReg : kCoreReg;
211 rl_src = LoadValue(rl_src, src_reg_class);
Vladimir Markoa1a70742014-03-03 10:28:05 +0000212 ConditionCode ccode = mir->meta.ccode;
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800213
214 // The kMirOpSelect has two variants, one for constants and one for moves.
215 const bool is_constant_case = (mir->ssa_rep->num_uses == 1);
216
217 if (is_constant_case) {
218 int true_val = mir->dalvikInsn.vB;
219 int false_val = mir->dalvikInsn.vC;
buzbeea0cd2d72014-06-01 09:33:49 -0700220 rl_result = EvalLoc(rl_dest, result_reg_class, true);
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800221
222 /*
Vladimir Markoa1a70742014-03-03 10:28:05 +0000223 * For ccode == kCondEq:
224 *
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800225 * 1) When the true case is zero and result_reg is not same as src_reg:
226 * xor result_reg, result_reg
227 * cmp $0, src_reg
228 * mov t1, $false_case
229 * cmovnz result_reg, t1
230 * 2) When the false case is zero and result_reg is not same as src_reg:
231 * xor result_reg, result_reg
232 * cmp $0, src_reg
233 * mov t1, $true_case
234 * cmovz result_reg, t1
235 * 3) All other cases (we do compare first to set eflags):
236 * cmp $0, src_reg
Vladimir Markoa1a70742014-03-03 10:28:05 +0000237 * mov result_reg, $false_case
238 * mov t1, $true_case
239 * cmovz result_reg, t1
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800240 */
buzbeea0cd2d72014-06-01 09:33:49 -0700241 // FIXME: depending on how you use registers you could get a false != mismatch when dealing
242 // with different views of the same underlying physical resource (i.e. solo32 vs. solo64).
buzbee2700f7e2014-03-07 09:46:20 -0800243 const bool result_reg_same_as_src =
244 (rl_src.location == kLocPhysReg && rl_src.reg.GetReg() == rl_result.reg.GetReg());
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800245 const bool true_zero_case = (true_val == 0 && false_val != 0 && !result_reg_same_as_src);
246 const bool false_zero_case = (false_val == 0 && true_val != 0 && !result_reg_same_as_src);
247 const bool catch_all_case = !(true_zero_case || false_zero_case);
248
249 if (true_zero_case || false_zero_case) {
buzbee2700f7e2014-03-07 09:46:20 -0800250 OpRegReg(kOpXor, rl_result.reg, rl_result.reg);
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800251 }
252
253 if (true_zero_case || false_zero_case || catch_all_case) {
buzbee2700f7e2014-03-07 09:46:20 -0800254 OpRegImm(kOpCmp, rl_src.reg, 0);
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800255 }
256
257 if (catch_all_case) {
buzbee2700f7e2014-03-07 09:46:20 -0800258 OpRegImm(kOpMov, rl_result.reg, false_val);
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800259 }
260
261 if (true_zero_case || false_zero_case || catch_all_case) {
Vladimir Markoa1a70742014-03-03 10:28:05 +0000262 ConditionCode cc = true_zero_case ? NegateComparison(ccode) : ccode;
263 int immediateForTemp = true_zero_case ? false_val : true_val;
buzbeea0cd2d72014-06-01 09:33:49 -0700264 RegStorage temp1_reg = AllocTypedTemp(false, result_reg_class);
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800265 OpRegImm(kOpMov, temp1_reg, immediateForTemp);
266
buzbee2700f7e2014-03-07 09:46:20 -0800267 OpCondRegReg(kOpCmov, cc, rl_result.reg, temp1_reg);
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800268
269 FreeTemp(temp1_reg);
270 }
271 } else {
272 RegLocation rl_true = mir_graph_->GetSrc(mir, 1);
273 RegLocation rl_false = mir_graph_->GetSrc(mir, 2);
buzbeea0cd2d72014-06-01 09:33:49 -0700274 rl_true = LoadValue(rl_true, result_reg_class);
275 rl_false = LoadValue(rl_false, result_reg_class);
276 rl_result = EvalLoc(rl_dest, result_reg_class, true);
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800277
278 /*
Vladimir Markoa1a70742014-03-03 10:28:05 +0000279 * For ccode == kCondEq:
280 *
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800281 * 1) When true case is already in place:
282 * cmp $0, src_reg
283 * cmovnz result_reg, false_reg
284 * 2) When false case is already in place:
285 * cmp $0, src_reg
286 * cmovz result_reg, true_reg
287 * 3) When neither cases are in place:
288 * cmp $0, src_reg
Vladimir Markoa1a70742014-03-03 10:28:05 +0000289 * mov result_reg, false_reg
290 * cmovz result_reg, true_reg
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800291 */
292
293 // kMirOpSelect is generated just for conditional cases when comparison is done with zero.
buzbee2700f7e2014-03-07 09:46:20 -0800294 OpRegImm(kOpCmp, rl_src.reg, 0);
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800295
Bill Buzbee00e1ec62014-02-27 23:44:13 +0000296 if (rl_result.reg.GetReg() == rl_true.reg.GetReg()) {
buzbee2700f7e2014-03-07 09:46:20 -0800297 OpCondRegReg(kOpCmov, NegateComparison(ccode), rl_result.reg, rl_false.reg);
Bill Buzbee00e1ec62014-02-27 23:44:13 +0000298 } else if (rl_result.reg.GetReg() == rl_false.reg.GetReg()) {
buzbee2700f7e2014-03-07 09:46:20 -0800299 OpCondRegReg(kOpCmov, ccode, rl_result.reg, rl_true.reg);
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800300 } else {
buzbee2700f7e2014-03-07 09:46:20 -0800301 OpRegCopy(rl_result.reg, rl_false.reg);
302 OpCondRegReg(kOpCmov, ccode, rl_result.reg, rl_true.reg);
Razvan A Lupusorue27b3bf2014-01-23 09:41:45 -0800303 }
304 }
305
306 StoreValue(rl_dest, rl_result);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700307}
308
309void X86Mir2Lir::GenFusedLongCmpBranch(BasicBlock* bb, MIR* mir) {
buzbee0d829482013-10-11 15:24:55 -0700310 LIR* taken = &block_label_list_[bb->taken];
Brian Carlstrom7940e442013-07-12 13:46:57 -0700311 RegLocation rl_src1 = mir_graph_->GetSrcWide(mir, 0);
312 RegLocation rl_src2 = mir_graph_->GetSrcWide(mir, 2);
Vladimir Markoa8946072014-01-22 10:30:44 +0000313 ConditionCode ccode = mir->meta.ccode;
Mark Mendell412d4f82013-12-18 13:32:36 -0800314
315 if (rl_src1.is_const) {
316 std::swap(rl_src1, rl_src2);
317 ccode = FlipComparisonOrder(ccode);
318 }
319 if (rl_src2.is_const) {
320 // Do special compare/branch against simple const operand
321 int64_t val = mir_graph_->ConstantValueWide(rl_src2);
322 GenFusedLongCmpImmBranch(bb, rl_src1, val, ccode);
323 return;
324 }
325
Brian Carlstrom7940e442013-07-12 13:46:57 -0700326 FlushAllRegs();
327 LockCallTemps(); // Prepare for explicit register usage
buzbee091cc402014-03-31 10:14:40 -0700328 RegStorage r_tmp1 = RegStorage::MakeRegPair(rs_r0, rs_r1);
329 RegStorage r_tmp2 = RegStorage::MakeRegPair(rs_r2, rs_r3);
buzbee2700f7e2014-03-07 09:46:20 -0800330 LoadValueDirectWideFixed(rl_src1, r_tmp1);
331 LoadValueDirectWideFixed(rl_src2, r_tmp2);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700332 // Swap operands and condition code to prevent use of zero flag.
333 if (ccode == kCondLe || ccode == kCondGt) {
334 // Compute (r3:r2) = (r3:r2) - (r1:r0)
buzbee2700f7e2014-03-07 09:46:20 -0800335 OpRegReg(kOpSub, rs_r2, rs_r0); // r2 = r2 - r0
336 OpRegReg(kOpSbc, rs_r3, rs_r1); // r3 = r3 - r1 - CF
Brian Carlstrom7940e442013-07-12 13:46:57 -0700337 } else {
338 // Compute (r1:r0) = (r1:r0) - (r3:r2)
buzbee2700f7e2014-03-07 09:46:20 -0800339 OpRegReg(kOpSub, rs_r0, rs_r2); // r0 = r0 - r2
340 OpRegReg(kOpSbc, rs_r1, rs_r3); // r1 = r1 - r3 - CF
Brian Carlstrom7940e442013-07-12 13:46:57 -0700341 }
342 switch (ccode) {
343 case kCondEq:
344 case kCondNe:
buzbee2700f7e2014-03-07 09:46:20 -0800345 OpRegReg(kOpOr, rs_r0, rs_r1); // r0 = r0 | r1
Brian Carlstrom7940e442013-07-12 13:46:57 -0700346 break;
347 case kCondLe:
348 ccode = kCondGe;
349 break;
350 case kCondGt:
351 ccode = kCondLt;
352 break;
353 case kCondLt:
354 case kCondGe:
355 break;
356 default:
357 LOG(FATAL) << "Unexpected ccode: " << ccode;
358 }
359 OpCondBranch(ccode, taken);
360}
361
Mark Mendell412d4f82013-12-18 13:32:36 -0800362void X86Mir2Lir::GenFusedLongCmpImmBranch(BasicBlock* bb, RegLocation rl_src1,
363 int64_t val, ConditionCode ccode) {
364 int32_t val_lo = Low32Bits(val);
365 int32_t val_hi = High32Bits(val);
366 LIR* taken = &block_label_list_[bb->taken];
Mark Mendell412d4f82013-12-18 13:32:36 -0800367 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
Mark Mendell752e2052014-05-01 10:19:04 -0400368 bool is_equality_test = ccode == kCondEq || ccode == kCondNe;
369 if (is_equality_test && val != 0) {
370 rl_src1 = ForceTempWide(rl_src1);
371 }
buzbee2700f7e2014-03-07 09:46:20 -0800372 RegStorage low_reg = rl_src1.reg.GetLow();
373 RegStorage high_reg = rl_src1.reg.GetHigh();
Mark Mendell412d4f82013-12-18 13:32:36 -0800374
Mark Mendell752e2052014-05-01 10:19:04 -0400375 if (is_equality_test) {
376 // We can simpolify of comparing for ==, != to 0.
377 if (val == 0) {
378 if (IsTemp(low_reg)) {
379 OpRegReg(kOpOr, low_reg, high_reg);
380 // We have now changed it; ignore the old values.
381 Clobber(rl_src1.reg);
382 } else {
383 RegStorage t_reg = AllocTemp();
384 OpRegRegReg(kOpOr, t_reg, low_reg, high_reg);
385 FreeTemp(t_reg);
386 }
387 OpCondBranch(ccode, taken);
388 return;
389 }
390
391 // Need to compute the actual value for ==, !=.
392 OpRegImm(kOpSub, low_reg, val_lo);
393 NewLIR2(kX86Sbb32RI, high_reg.GetReg(), val_hi);
394 OpRegReg(kOpOr, high_reg, low_reg);
395 Clobber(rl_src1.reg);
396 } else if (ccode == kCondLe || ccode == kCondGt) {
397 // Swap operands and condition code to prevent use of zero flag.
398 RegStorage tmp = AllocTypedTempWide(false, kCoreReg);
399 LoadConstantWide(tmp, val);
400 OpRegReg(kOpSub, tmp.GetLow(), low_reg);
401 OpRegReg(kOpSbc, tmp.GetHigh(), high_reg);
402 ccode = (ccode == kCondLe) ? kCondGe : kCondLt;
403 FreeTemp(tmp);
404 } else {
405 // We can use a compare for the low word to set CF.
406 OpRegImm(kOpCmp, low_reg, val_lo);
407 if (IsTemp(high_reg)) {
408 NewLIR2(kX86Sbb32RI, high_reg.GetReg(), val_hi);
409 // We have now changed it; ignore the old values.
410 Clobber(rl_src1.reg);
411 } else {
412 // mov temp_reg, high_reg; sbb temp_reg, high_constant
413 RegStorage t_reg = AllocTemp();
414 OpRegCopy(t_reg, high_reg);
415 NewLIR2(kX86Sbb32RI, t_reg.GetReg(), val_hi);
416 FreeTemp(t_reg);
417 }
Mark Mendell412d4f82013-12-18 13:32:36 -0800418 }
419
Mark Mendell752e2052014-05-01 10:19:04 -0400420 OpCondBranch(ccode, taken);
Mark Mendell412d4f82013-12-18 13:32:36 -0800421}
422
Mark Mendell2bf31e62014-01-23 12:13:40 -0800423void X86Mir2Lir::CalculateMagicAndShift(int divisor, int& magic, int& shift) {
424 // It does not make sense to calculate magic and shift for zero divisor.
425 DCHECK_NE(divisor, 0);
426
427 /* According to H.S.Warren's Hacker's Delight Chapter 10 and
428 * T,Grablund, P.L.Montogomery's Division by invariant integers using multiplication.
429 * The magic number M and shift S can be calculated in the following way:
430 * Let nc be the most positive value of numerator(n) such that nc = kd - 1,
431 * where divisor(d) >=2.
432 * Let nc be the most negative value of numerator(n) such that nc = kd + 1,
433 * where divisor(d) <= -2.
434 * Thus nc can be calculated like:
435 * nc = 2^31 + 2^31 % d - 1, where d >= 2
436 * nc = -2^31 + (2^31 + 1) % d, where d >= 2.
437 *
438 * So the shift p is the smallest p satisfying
439 * 2^p > nc * (d - 2^p % d), where d >= 2
440 * 2^p > nc * (d + 2^p % d), where d <= -2.
441 *
442 * the magic number M is calcuated by
443 * M = (2^p + d - 2^p % d) / d, where d >= 2
444 * M = (2^p - d - 2^p % d) / d, where d <= -2.
445 *
446 * Notice that p is always bigger than or equal to 32, so we just return 32-p as
447 * the shift number S.
448 */
449
450 int32_t p = 31;
451 const uint32_t two31 = 0x80000000U;
452
453 // Initialize the computations.
454 uint32_t abs_d = (divisor >= 0) ? divisor : -divisor;
455 uint32_t tmp = two31 + (static_cast<uint32_t>(divisor) >> 31);
456 uint32_t abs_nc = tmp - 1 - tmp % abs_d;
457 uint32_t quotient1 = two31 / abs_nc;
458 uint32_t remainder1 = two31 % abs_nc;
459 uint32_t quotient2 = two31 / abs_d;
460 uint32_t remainder2 = two31 % abs_d;
461
462 /*
463 * To avoid handling both positive and negative divisor, Hacker's Delight
464 * introduces a method to handle these 2 cases together to avoid duplication.
465 */
466 uint32_t delta;
467 do {
468 p++;
469 quotient1 = 2 * quotient1;
470 remainder1 = 2 * remainder1;
471 if (remainder1 >= abs_nc) {
472 quotient1++;
473 remainder1 = remainder1 - abs_nc;
474 }
475 quotient2 = 2 * quotient2;
476 remainder2 = 2 * remainder2;
477 if (remainder2 >= abs_d) {
478 quotient2++;
479 remainder2 = remainder2 - abs_d;
480 }
481 delta = abs_d - remainder2;
482 } while (quotient1 < delta || (quotient1 == delta && remainder1 == 0));
483
484 magic = (divisor > 0) ? (quotient2 + 1) : (-quotient2 - 1);
485 shift = p - 32;
486}
487
buzbee2700f7e2014-03-07 09:46:20 -0800488RegLocation X86Mir2Lir::GenDivRemLit(RegLocation rl_dest, RegStorage reg_lo, int lit, bool is_div) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700489 LOG(FATAL) << "Unexpected use of GenDivRemLit for x86";
490 return rl_dest;
491}
492
Mark Mendell2bf31e62014-01-23 12:13:40 -0800493RegLocation X86Mir2Lir::GenDivRemLit(RegLocation rl_dest, RegLocation rl_src,
494 int imm, bool is_div) {
495 // Use a multiply (and fixup) to perform an int div/rem by a constant.
496
497 // We have to use fixed registers, so flush all the temps.
498 FlushAllRegs();
499 LockCallTemps(); // Prepare for explicit register usage.
500
501 // Assume that the result will be in EDX.
buzbee091cc402014-03-31 10:14:40 -0700502 RegLocation rl_result = {kLocPhysReg, 0, 0, 0, 0, 0, 0, 0, 1, rs_r2, INVALID_SREG, INVALID_SREG};
Mark Mendell2bf31e62014-01-23 12:13:40 -0800503
Alexei Zavjalov79aa4232014-02-13 13:55:50 +0700504 // handle div/rem by 1 special case.
505 if (imm == 1) {
Mark Mendell2bf31e62014-01-23 12:13:40 -0800506 if (is_div) {
Alexei Zavjalov79aa4232014-02-13 13:55:50 +0700507 // x / 1 == x.
508 StoreValue(rl_result, rl_src);
509 } else {
510 // x % 1 == 0.
buzbee2700f7e2014-03-07 09:46:20 -0800511 LoadConstantNoClobber(rs_r0, 0);
Alexei Zavjalov79aa4232014-02-13 13:55:50 +0700512 // For this case, return the result in EAX.
Bill Buzbee00e1ec62014-02-27 23:44:13 +0000513 rl_result.reg.SetReg(r0);
Alexei Zavjalov79aa4232014-02-13 13:55:50 +0700514 }
515 } else if (imm == -1) { // handle 0x80000000 / -1 special case.
516 if (is_div) {
517 LIR *minint_branch = 0;
buzbee2700f7e2014-03-07 09:46:20 -0800518 LoadValueDirectFixed(rl_src, rs_r0);
519 OpRegImm(kOpCmp, rs_r0, 0x80000000);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800520 minint_branch = NewLIR2(kX86Jcc8, 0, kX86CondEq);
521
522 // for x != MIN_INT, x / -1 == -x.
523 NewLIR1(kX86Neg32R, r0);
524
525 LIR* branch_around = NewLIR1(kX86Jmp8, 0);
526 // The target for cmp/jmp above.
527 minint_branch->target = NewLIR0(kPseudoTargetLabel);
528 // EAX already contains the right value (0x80000000),
529 branch_around->target = NewLIR0(kPseudoTargetLabel);
530 } else {
531 // x % -1 == 0.
buzbee2700f7e2014-03-07 09:46:20 -0800532 LoadConstantNoClobber(rs_r0, 0);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800533 }
534 // For this case, return the result in EAX.
Bill Buzbee00e1ec62014-02-27 23:44:13 +0000535 rl_result.reg.SetReg(r0);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800536 } else {
Alexei Zavjalov79aa4232014-02-13 13:55:50 +0700537 CHECK(imm <= -2 || imm >= 2);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800538 // Use H.S.Warren's Hacker's Delight Chapter 10 and
539 // T,Grablund, P.L.Montogomery's Division by invariant integers using multiplication.
540 int magic, shift;
541 CalculateMagicAndShift(imm, magic, shift);
542
543 /*
544 * For imm >= 2,
545 * int(n/imm) = floor(n/imm) = floor(M*n/2^S), while n > 0
546 * int(n/imm) = ceil(n/imm) = floor(M*n/2^S) +1, while n < 0.
547 * For imm <= -2,
548 * int(n/imm) = ceil(n/imm) = floor(M*n/2^S) +1 , while n > 0
549 * int(n/imm) = floor(n/imm) = floor(M*n/2^S), while n < 0.
550 * We implement this algorithm in the following way:
551 * 1. multiply magic number m and numerator n, get the higher 32bit result in EDX
552 * 2. if imm > 0 and magic < 0, add numerator to EDX
553 * if imm < 0 and magic > 0, sub numerator from EDX
554 * 3. if S !=0, SAR S bits for EDX
555 * 4. add 1 to EDX if EDX < 0
556 * 5. Thus, EDX is the quotient
557 */
558
559 // Numerator into EAX.
buzbee2700f7e2014-03-07 09:46:20 -0800560 RegStorage numerator_reg;
Mark Mendell2bf31e62014-01-23 12:13:40 -0800561 if (!is_div || (imm > 0 && magic < 0) || (imm < 0 && magic > 0)) {
562 // We will need the value later.
563 if (rl_src.location == kLocPhysReg) {
564 // We can use it directly.
buzbee091cc402014-03-31 10:14:40 -0700565 DCHECK(rl_src.reg.GetReg() != rs_r0.GetReg() && rl_src.reg.GetReg() != rs_r2.GetReg());
buzbee2700f7e2014-03-07 09:46:20 -0800566 numerator_reg = rl_src.reg;
Mark Mendell2bf31e62014-01-23 12:13:40 -0800567 } else {
buzbee2700f7e2014-03-07 09:46:20 -0800568 numerator_reg = rs_r1;
569 LoadValueDirectFixed(rl_src, numerator_reg);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800570 }
buzbee2700f7e2014-03-07 09:46:20 -0800571 OpRegCopy(rs_r0, numerator_reg);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800572 } else {
573 // Only need this once. Just put it into EAX.
buzbee2700f7e2014-03-07 09:46:20 -0800574 LoadValueDirectFixed(rl_src, rs_r0);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800575 }
576
577 // EDX = magic.
buzbee2700f7e2014-03-07 09:46:20 -0800578 LoadConstantNoClobber(rs_r2, magic);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800579
580 // EDX:EAX = magic & dividend.
buzbee091cc402014-03-31 10:14:40 -0700581 NewLIR1(kX86Imul32DaR, rs_r2.GetReg());
Mark Mendell2bf31e62014-01-23 12:13:40 -0800582
583 if (imm > 0 && magic < 0) {
584 // Add numerator to EDX.
buzbee2700f7e2014-03-07 09:46:20 -0800585 DCHECK(numerator_reg.Valid());
buzbee091cc402014-03-31 10:14:40 -0700586 NewLIR2(kX86Add32RR, rs_r2.GetReg(), numerator_reg.GetReg());
Mark Mendell2bf31e62014-01-23 12:13:40 -0800587 } else if (imm < 0 && magic > 0) {
buzbee2700f7e2014-03-07 09:46:20 -0800588 DCHECK(numerator_reg.Valid());
buzbee091cc402014-03-31 10:14:40 -0700589 NewLIR2(kX86Sub32RR, rs_r2.GetReg(), numerator_reg.GetReg());
Mark Mendell2bf31e62014-01-23 12:13:40 -0800590 }
591
592 // Do we need the shift?
593 if (shift != 0) {
594 // Shift EDX by 'shift' bits.
buzbee091cc402014-03-31 10:14:40 -0700595 NewLIR2(kX86Sar32RI, rs_r2.GetReg(), shift);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800596 }
597
598 // Add 1 to EDX if EDX < 0.
599
600 // Move EDX to EAX.
buzbee2700f7e2014-03-07 09:46:20 -0800601 OpRegCopy(rs_r0, rs_r2);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800602
603 // Move sign bit to bit 0, zeroing the rest.
buzbee091cc402014-03-31 10:14:40 -0700604 NewLIR2(kX86Shr32RI, rs_r2.GetReg(), 31);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800605
606 // EDX = EDX + EAX.
buzbee091cc402014-03-31 10:14:40 -0700607 NewLIR2(kX86Add32RR, rs_r2.GetReg(), rs_r0.GetReg());
Mark Mendell2bf31e62014-01-23 12:13:40 -0800608
609 // Quotient is in EDX.
610 if (!is_div) {
611 // We need to compute the remainder.
612 // Remainder is divisor - (quotient * imm).
buzbee2700f7e2014-03-07 09:46:20 -0800613 DCHECK(numerator_reg.Valid());
614 OpRegCopy(rs_r0, numerator_reg);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800615
616 // EAX = numerator * imm.
buzbee2700f7e2014-03-07 09:46:20 -0800617 OpRegRegImm(kOpMul, rs_r2, rs_r2, imm);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800618
619 // EDX -= EAX.
buzbee091cc402014-03-31 10:14:40 -0700620 NewLIR2(kX86Sub32RR, rs_r0.GetReg(), rs_r2.GetReg());
Mark Mendell2bf31e62014-01-23 12:13:40 -0800621
622 // For this case, return the result in EAX.
Bill Buzbee00e1ec62014-02-27 23:44:13 +0000623 rl_result.reg.SetReg(r0);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800624 }
625 }
626
627 return rl_result;
628}
629
buzbee2700f7e2014-03-07 09:46:20 -0800630RegLocation X86Mir2Lir::GenDivRem(RegLocation rl_dest, RegStorage reg_lo, RegStorage reg_hi,
631 bool is_div) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700632 LOG(FATAL) << "Unexpected use of GenDivRem for x86";
633 return rl_dest;
634}
635
Mark Mendell2bf31e62014-01-23 12:13:40 -0800636RegLocation X86Mir2Lir::GenDivRem(RegLocation rl_dest, RegLocation rl_src1,
637 RegLocation rl_src2, bool is_div, bool check_zero) {
638 // We have to use fixed registers, so flush all the temps.
639 FlushAllRegs();
640 LockCallTemps(); // Prepare for explicit register usage.
641
642 // Load LHS into EAX.
buzbee2700f7e2014-03-07 09:46:20 -0800643 LoadValueDirectFixed(rl_src1, rs_r0);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800644
645 // Load RHS into EBX.
buzbee2700f7e2014-03-07 09:46:20 -0800646 LoadValueDirectFixed(rl_src2, rs_r1);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800647
648 // Copy LHS sign bit into EDX.
649 NewLIR0(kx86Cdq32Da);
650
651 if (check_zero) {
652 // Handle division by zero case.
Mingyao Yange643a172014-04-08 11:02:52 -0700653 GenDivZeroCheck(rs_r1);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800654 }
655
656 // Have to catch 0x80000000/-1 case, or we will get an exception!
buzbee2700f7e2014-03-07 09:46:20 -0800657 OpRegImm(kOpCmp, rs_r1, -1);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800658 LIR *minus_one_branch = NewLIR2(kX86Jcc8, 0, kX86CondNe);
659
660 // RHS is -1.
buzbee2700f7e2014-03-07 09:46:20 -0800661 OpRegImm(kOpCmp, rs_r0, 0x80000000);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800662 LIR * minint_branch = NewLIR2(kX86Jcc8, 0, kX86CondNe);
663
664 // In 0x80000000/-1 case.
665 if (!is_div) {
666 // For DIV, EAX is already right. For REM, we need EDX 0.
buzbee2700f7e2014-03-07 09:46:20 -0800667 LoadConstantNoClobber(rs_r2, 0);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800668 }
669 LIR* done = NewLIR1(kX86Jmp8, 0);
670
671 // Expected case.
672 minus_one_branch->target = NewLIR0(kPseudoTargetLabel);
673 minint_branch->target = minus_one_branch->target;
buzbee091cc402014-03-31 10:14:40 -0700674 NewLIR1(kX86Idivmod32DaR, rs_r1.GetReg());
Mark Mendell2bf31e62014-01-23 12:13:40 -0800675 done->target = NewLIR0(kPseudoTargetLabel);
676
677 // Result is in EAX for div and EDX for rem.
buzbee091cc402014-03-31 10:14:40 -0700678 RegLocation rl_result = {kLocPhysReg, 0, 0, 0, 0, 0, 0, 0, 1, rs_r0, INVALID_SREG, INVALID_SREG};
Mark Mendell2bf31e62014-01-23 12:13:40 -0800679 if (!is_div) {
Bill Buzbee00e1ec62014-02-27 23:44:13 +0000680 rl_result.reg.SetReg(r2);
Mark Mendell2bf31e62014-01-23 12:13:40 -0800681 }
682 return rl_result;
683}
684
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700685bool X86Mir2Lir::GenInlinedMinMaxInt(CallInfo* info, bool is_min) {
Dmitry Petrochenko6a58cb12014-04-02 17:27:59 +0700686 DCHECK(cu_->instruction_set == kX86 || cu_->instruction_set == kX86_64);
Razvan A Lupusorubd288c22013-12-20 17:27:23 -0800687
688 // Get the two arguments to the invoke and place them in GP registers.
Brian Carlstrom7940e442013-07-12 13:46:57 -0700689 RegLocation rl_src1 = info->args[0];
690 RegLocation rl_src2 = info->args[1];
691 rl_src1 = LoadValue(rl_src1, kCoreReg);
692 rl_src2 = LoadValue(rl_src2, kCoreReg);
Razvan A Lupusorubd288c22013-12-20 17:27:23 -0800693
Brian Carlstrom7940e442013-07-12 13:46:57 -0700694 RegLocation rl_dest = InlineTarget(info);
695 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
Razvan A Lupusorubd288c22013-12-20 17:27:23 -0800696
697 /*
698 * If the result register is the same as the second element, then we need to be careful.
699 * The reason is that the first copy will inadvertently clobber the second element with
700 * the first one thus yielding the wrong result. Thus we do a swap in that case.
701 */
Bill Buzbee00e1ec62014-02-27 23:44:13 +0000702 if (rl_result.reg.GetReg() == rl_src2.reg.GetReg()) {
Razvan A Lupusorubd288c22013-12-20 17:27:23 -0800703 std::swap(rl_src1, rl_src2);
704 }
705
706 // Pick the first integer as min/max.
buzbee2700f7e2014-03-07 09:46:20 -0800707 OpRegCopy(rl_result.reg, rl_src1.reg);
Razvan A Lupusorubd288c22013-12-20 17:27:23 -0800708
709 // If the integers are both in the same register, then there is nothing else to do
710 // because they are equal and we have already moved one into the result.
Bill Buzbee00e1ec62014-02-27 23:44:13 +0000711 if (rl_src1.reg.GetReg() != rl_src2.reg.GetReg()) {
Razvan A Lupusorubd288c22013-12-20 17:27:23 -0800712 // It is possible we didn't pick correctly so do the actual comparison now.
buzbee2700f7e2014-03-07 09:46:20 -0800713 OpRegReg(kOpCmp, rl_src1.reg, rl_src2.reg);
Razvan A Lupusorubd288c22013-12-20 17:27:23 -0800714
715 // Conditionally move the other integer into the destination register.
716 ConditionCode condition_code = is_min ? kCondGt : kCondLt;
buzbee2700f7e2014-03-07 09:46:20 -0800717 OpCondRegReg(kOpCmov, condition_code, rl_result.reg, rl_src2.reg);
Razvan A Lupusorubd288c22013-12-20 17:27:23 -0800718 }
719
Brian Carlstrom7940e442013-07-12 13:46:57 -0700720 StoreValue(rl_dest, rl_result);
721 return true;
722}
723
Vladimir Markoe508a202013-11-04 15:24:22 +0000724bool X86Mir2Lir::GenInlinedPeek(CallInfo* info, OpSize size) {
725 RegLocation rl_src_address = info->args[0]; // long address
buzbee2700f7e2014-03-07 09:46:20 -0800726 rl_src_address = NarrowRegLoc(rl_src_address); // ignore high half in info->args[1]
buzbee695d13a2014-04-19 13:32:20 -0700727 RegLocation rl_dest = size == k64 ? InlineTargetWide(info) : InlineTarget(info);
Vladimir Markoe508a202013-11-04 15:24:22 +0000728 RegLocation rl_address = LoadValue(rl_src_address, kCoreReg);
729 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
Vladimir Marko455759b2014-05-06 20:49:36 +0100730 // Unaligned access is allowed on x86.
Vladimir Marko3bf7c602014-05-07 14:55:43 +0100731 LoadBaseDisp(rl_address.reg, 0, rl_result.reg, size);
buzbee695d13a2014-04-19 13:32:20 -0700732 if (size == k64) {
Vladimir Markoe508a202013-11-04 15:24:22 +0000733 StoreValueWide(rl_dest, rl_result);
734 } else {
buzbee695d13a2014-04-19 13:32:20 -0700735 DCHECK(size == kSignedByte || size == kSignedHalf || size == k32);
Vladimir Markoe508a202013-11-04 15:24:22 +0000736 StoreValue(rl_dest, rl_result);
737 }
738 return true;
739}
740
741bool X86Mir2Lir::GenInlinedPoke(CallInfo* info, OpSize size) {
742 RegLocation rl_src_address = info->args[0]; // long address
buzbee2700f7e2014-03-07 09:46:20 -0800743 rl_src_address = NarrowRegLoc(rl_src_address); // ignore high half in info->args[1]
Vladimir Markoe508a202013-11-04 15:24:22 +0000744 RegLocation rl_src_value = info->args[2]; // [size] value
745 RegLocation rl_address = LoadValue(rl_src_address, kCoreReg);
buzbee695d13a2014-04-19 13:32:20 -0700746 if (size == k64) {
Vladimir Markoe508a202013-11-04 15:24:22 +0000747 // Unaligned access is allowed on x86.
748 RegLocation rl_value = LoadValueWide(rl_src_value, kCoreReg);
Vladimir Marko455759b2014-05-06 20:49:36 +0100749 StoreBaseDisp(rl_address.reg, 0, rl_value.reg, size);
Vladimir Markoe508a202013-11-04 15:24:22 +0000750 } else {
buzbee695d13a2014-04-19 13:32:20 -0700751 DCHECK(size == kSignedByte || size == kSignedHalf || size == k32);
Vladimir Markoe508a202013-11-04 15:24:22 +0000752 // Unaligned access is allowed on x86.
753 RegLocation rl_value = LoadValue(rl_src_value, kCoreReg);
buzbee2700f7e2014-03-07 09:46:20 -0800754 StoreBaseDisp(rl_address.reg, 0, rl_value.reg, size);
Vladimir Markoe508a202013-11-04 15:24:22 +0000755 }
756 return true;
757}
758
buzbee2700f7e2014-03-07 09:46:20 -0800759void X86Mir2Lir::OpLea(RegStorage r_base, RegStorage reg1, RegStorage reg2, int scale, int offset) {
760 NewLIR5(kX86Lea32RA, r_base.GetReg(), reg1.GetReg(), reg2.GetReg(), scale, offset);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700761}
762
Ian Rogersdd7624d2014-03-14 17:43:00 -0700763void X86Mir2Lir::OpTlsCmp(ThreadOffset<4> offset, int val) {
Andreas Gampe2f244e92014-05-08 03:35:25 -0700764 DCHECK_EQ(kX86, cu_->instruction_set);
765 NewLIR2(kX86Cmp16TI8, offset.Int32Value(), val);
766}
767
768void X86Mir2Lir::OpTlsCmp(ThreadOffset<8> offset, int val) {
769 DCHECK_EQ(kX86_64, cu_->instruction_set);
Ian Rogers468532e2013-08-05 10:56:33 -0700770 NewLIR2(kX86Cmp16TI8, offset.Int32Value(), val);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700771}
772
buzbee2700f7e2014-03-07 09:46:20 -0800773static bool IsInReg(X86Mir2Lir *pMir2Lir, const RegLocation &rl, RegStorage reg) {
774 return rl.reg.Valid() && rl.reg.GetReg() == reg.GetReg() && (pMir2Lir->IsLive(reg) || rl.home);
Yevgeny Rouband3a2dfa2014-03-18 15:55:16 +0700775}
776
Vladimir Marko1c282e22013-11-21 14:49:47 +0000777bool X86Mir2Lir::GenInlinedCas(CallInfo* info, bool is_long, bool is_object) {
Dmitry Petrochenko6a58cb12014-04-02 17:27:59 +0700778 DCHECK(cu_->instruction_set == kX86 || cu_->instruction_set == kX86_64);
Vladimir Markoc29bb612013-11-27 16:47:25 +0000779 // Unused - RegLocation rl_src_unsafe = info->args[0];
780 RegLocation rl_src_obj = info->args[1]; // Object - known non-null
781 RegLocation rl_src_offset = info->args[2]; // long low
buzbee2700f7e2014-03-07 09:46:20 -0800782 rl_src_offset = NarrowRegLoc(rl_src_offset); // ignore high half in info->args[3]
Vladimir Markoc29bb612013-11-27 16:47:25 +0000783 RegLocation rl_src_expected = info->args[4]; // int, long or Object
784 // If is_long, high half is in info->args[5]
785 RegLocation rl_src_new_value = info->args[is_long ? 6 : 5]; // int, long or Object
786 // If is_long, high half is in info->args[7]
787
788 if (is_long) {
Yevgeny Rouband3a2dfa2014-03-18 15:55:16 +0700789 // TODO: avoid unnecessary loads of SI and DI when the values are in registers.
790 // TODO: CFI support.
Vladimir Marko70b797d2013-12-03 15:25:24 +0000791 FlushAllRegs();
792 LockCallTemps();
buzbee091cc402014-03-31 10:14:40 -0700793 RegStorage r_tmp1 = RegStorage::MakeRegPair(rs_rAX, rs_rDX);
794 RegStorage r_tmp2 = RegStorage::MakeRegPair(rs_rBX, rs_rCX);
buzbee2700f7e2014-03-07 09:46:20 -0800795 LoadValueDirectWideFixed(rl_src_expected, r_tmp1);
796 LoadValueDirectWideFixed(rl_src_new_value, r_tmp2);
buzbee695d13a2014-04-19 13:32:20 -0700797 // FIXME: needs 64-bit update.
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100798 const bool obj_in_di = IsInReg(this, rl_src_obj, rs_rDI);
799 const bool obj_in_si = IsInReg(this, rl_src_obj, rs_rSI);
800 DCHECK(!obj_in_si || !obj_in_di);
801 const bool off_in_di = IsInReg(this, rl_src_offset, rs_rDI);
802 const bool off_in_si = IsInReg(this, rl_src_offset, rs_rSI);
803 DCHECK(!off_in_si || !off_in_di);
804 // If obj/offset is in a reg, use that reg. Otherwise, use the empty reg.
805 RegStorage rs_obj = obj_in_di ? rs_rDI : obj_in_si ? rs_rSI : !off_in_di ? rs_rDI : rs_rSI;
806 RegStorage rs_off = off_in_si ? rs_rSI : off_in_di ? rs_rDI : !obj_in_si ? rs_rSI : rs_rDI;
807 bool push_di = (!obj_in_di && !off_in_di) && (rs_obj == rs_rDI || rs_off == rs_rDI);
808 bool push_si = (!obj_in_si && !off_in_si) && (rs_obj == rs_rSI || rs_off == rs_rSI);
809 if (push_di) {
810 NewLIR1(kX86Push32R, rs_rDI.GetReg());
811 MarkTemp(rs_rDI);
812 LockTemp(rs_rDI);
813 }
814 if (push_si) {
815 NewLIR1(kX86Push32R, rs_rSI.GetReg());
816 MarkTemp(rs_rSI);
817 LockTemp(rs_rSI);
818 }
819 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
820 const size_t push_offset = (push_si ? 4u : 0u) + (push_di ? 4u : 0u);
821 if (!obj_in_si && !obj_in_di) {
822 LoadWordDisp(TargetReg(kSp), SRegOffset(rl_src_obj.s_reg_low) + push_offset, rs_obj);
823 // Dalvik register annotation in LoadBaseIndexedDisp() used wrong offset. Fix it.
824 DCHECK(!DECODE_ALIAS_INFO_WIDE(last_lir_insn_->flags.alias_info));
825 int reg_id = DECODE_ALIAS_INFO_REG(last_lir_insn_->flags.alias_info) - push_offset / 4u;
826 AnnotateDalvikRegAccess(last_lir_insn_, reg_id, true, false);
827 }
828 if (!off_in_si && !off_in_di) {
829 LoadWordDisp(TargetReg(kSp), SRegOffset(rl_src_offset.s_reg_low) + push_offset, rs_off);
830 // Dalvik register annotation in LoadBaseIndexedDisp() used wrong offset. Fix it.
831 DCHECK(!DECODE_ALIAS_INFO_WIDE(last_lir_insn_->flags.alias_info));
832 int reg_id = DECODE_ALIAS_INFO_REG(last_lir_insn_->flags.alias_info) - push_offset / 4u;
833 AnnotateDalvikRegAccess(last_lir_insn_, reg_id, true, false);
834 }
835 NewLIR4(kX86LockCmpxchg64A, rs_obj.GetReg(), rs_off.GetReg(), 0, 0);
Razvan A Lupusoru99ad7232014-02-25 17:41:08 -0800836
837 // After a store we need to insert barrier in case of potential load. Since the
838 // locked cmpxchg has full barrier semantics, only a scheduling barrier will be generated.
839 GenMemBarrier(kStoreLoad);
840
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100841
842 if (push_si) {
843 FreeTemp(rs_rSI);
844 UnmarkTemp(rs_rSI);
845 NewLIR1(kX86Pop32R, rs_rSI.GetReg());
846 }
847 if (push_di) {
848 FreeTemp(rs_rDI);
849 UnmarkTemp(rs_rDI);
850 NewLIR1(kX86Pop32R, rs_rDI.GetReg());
851 }
Vladimir Marko70b797d2013-12-03 15:25:24 +0000852 FreeCallTemps();
Vladimir Markoc29bb612013-11-27 16:47:25 +0000853 } else {
854 // EAX must hold expected for CMPXCHG. Neither rl_new_value, nor r_ptr may be in EAX.
buzbee2700f7e2014-03-07 09:46:20 -0800855 FlushReg(rs_r0);
buzbee091cc402014-03-31 10:14:40 -0700856 Clobber(rs_r0);
buzbee2700f7e2014-03-07 09:46:20 -0800857 LockTemp(rs_r0);
Vladimir Markoc29bb612013-11-27 16:47:25 +0000858
buzbeea0cd2d72014-06-01 09:33:49 -0700859 RegLocation rl_object = LoadValue(rl_src_obj, kRefReg);
860 RegLocation rl_new_value = LoadValue(rl_src_new_value);
Vladimir Markoc29bb612013-11-27 16:47:25 +0000861
862 if (is_object && !mir_graph_->IsConstantNullRef(rl_new_value)) {
863 // Mark card for object assuming new value is stored.
buzbee091cc402014-03-31 10:14:40 -0700864 FreeTemp(rs_r0); // Temporarily release EAX for MarkGCCard().
buzbee2700f7e2014-03-07 09:46:20 -0800865 MarkGCCard(rl_new_value.reg, rl_object.reg);
buzbee091cc402014-03-31 10:14:40 -0700866 LockTemp(rs_r0);
Vladimir Markoc29bb612013-11-27 16:47:25 +0000867 }
868
869 RegLocation rl_offset = LoadValue(rl_src_offset, kCoreReg);
buzbee2700f7e2014-03-07 09:46:20 -0800870 LoadValueDirect(rl_src_expected, rs_r0);
Bill Buzbee00e1ec62014-02-27 23:44:13 +0000871 NewLIR5(kX86LockCmpxchgAR, rl_object.reg.GetReg(), rl_offset.reg.GetReg(), 0, 0, rl_new_value.reg.GetReg());
Vladimir Markoc29bb612013-11-27 16:47:25 +0000872
Razvan A Lupusoru99ad7232014-02-25 17:41:08 -0800873 // After a store we need to insert barrier in case of potential load. Since the
874 // locked cmpxchg has full barrier semantics, only a scheduling barrier will be generated.
875 GenMemBarrier(kStoreLoad);
876
buzbee091cc402014-03-31 10:14:40 -0700877 FreeTemp(rs_r0);
Vladimir Markoc29bb612013-11-27 16:47:25 +0000878 }
879
880 // Convert ZF to boolean
881 RegLocation rl_dest = InlineTarget(info); // boolean place for result
882 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
Ian Rogers0f9b9c52014-06-09 01:32:12 -0700883 RegStorage result_reg = rl_result.reg;
884
Chao-ying Fu7e399fd2014-06-10 18:11:11 -0700885 // For 32-bit, SETcc only works with EAX..EDX.
886 if (!IsByteRegister(result_reg)) {
Ian Rogers0f9b9c52014-06-09 01:32:12 -0700887 result_reg = AllocateByteRegister();
Ian Rogers0f9b9c52014-06-09 01:32:12 -0700888 }
889 NewLIR2(kX86Set8R, result_reg.GetReg(), kX86CondZ);
890 NewLIR2(kX86Movzx8RR, rl_result.reg.GetReg(), result_reg.GetReg());
891 if (IsTemp(result_reg)) {
892 FreeTemp(result_reg);
893 }
Vladimir Markoc29bb612013-11-27 16:47:25 +0000894 StoreValue(rl_dest, rl_result);
895 return true;
Brian Carlstrom7940e442013-07-12 13:46:57 -0700896}
897
buzbee2700f7e2014-03-07 09:46:20 -0800898LIR* X86Mir2Lir::OpPcRelLoad(RegStorage reg, LIR* target) {
Mark Mendell55d0eac2014-02-06 11:02:52 -0800899 CHECK(base_of_code_ != nullptr);
900
901 // Address the start of the method
902 RegLocation rl_method = mir_graph_->GetRegLocation(base_of_code_->s_reg_low);
Chao-ying Fue0ccdc02014-06-06 17:32:37 -0700903 if (rl_method.wide) {
904 LoadValueDirectWideFixed(rl_method, reg);
905 } else {
906 LoadValueDirectFixed(rl_method, reg);
907 }
Mark Mendell55d0eac2014-02-06 11:02:52 -0800908 store_method_addr_used_ = true;
909
910 // Load the proper value from the literal area.
911 // We don't know the proper offset for the value, so pick one that will force
912 // 4 byte offset. We will fix this up in the assembler later to have the right
913 // value.
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100914 ScopedMemRefType mem_ref_type(this, ResourceMask::kLiteral);
buzbee2700f7e2014-03-07 09:46:20 -0800915 LIR *res = RawLIR(current_dalvik_offset_, kX86Mov32RM, reg.GetReg(), reg.GetReg(), 256,
916 0, 0, target);
Mark Mendell55d0eac2014-02-06 11:02:52 -0800917 res->target = target;
918 res->flags.fixup = kFixupLoad;
Mark Mendell55d0eac2014-02-06 11:02:52 -0800919 store_method_addr_used_ = true;
920 return res;
Brian Carlstrom7940e442013-07-12 13:46:57 -0700921}
922
buzbee2700f7e2014-03-07 09:46:20 -0800923LIR* X86Mir2Lir::OpVldm(RegStorage r_base, int count) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700924 LOG(FATAL) << "Unexpected use of OpVldm for x86";
925 return NULL;
926}
927
buzbee2700f7e2014-03-07 09:46:20 -0800928LIR* X86Mir2Lir::OpVstm(RegStorage r_base, int count) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700929 LOG(FATAL) << "Unexpected use of OpVstm for x86";
930 return NULL;
931}
932
933void X86Mir2Lir::GenMultiplyByTwoBitMultiplier(RegLocation rl_src,
934 RegLocation rl_result, int lit,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700935 int first_bit, int second_bit) {
buzbee2700f7e2014-03-07 09:46:20 -0800936 RegStorage t_reg = AllocTemp();
937 OpRegRegImm(kOpLsl, t_reg, rl_src.reg, second_bit - first_bit);
938 OpRegRegReg(kOpAdd, rl_result.reg, rl_src.reg, t_reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700939 FreeTemp(t_reg);
940 if (first_bit != 0) {
buzbee2700f7e2014-03-07 09:46:20 -0800941 OpRegRegImm(kOpLsl, rl_result.reg, rl_result.reg, first_bit);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700942 }
943}
944
Mingyao Yange643a172014-04-08 11:02:52 -0700945void X86Mir2Lir::GenDivZeroCheckWide(RegStorage reg) {
Chao-ying Fua0147762014-06-06 18:38:49 -0700946 if (Gen64Bit()) {
947 DCHECK(reg.Is64Bit());
Razvan A Lupusoru090dd442013-12-20 14:35:03 -0800948
Chao-ying Fua0147762014-06-06 18:38:49 -0700949 NewLIR2(kX86Cmp64RI8, reg.GetReg(), 0);
950 } else {
951 DCHECK(reg.IsPair());
952
953 // We are not supposed to clobber the incoming storage, so allocate a temporary.
954 RegStorage t_reg = AllocTemp();
955 // Doing an OR is a quick way to check if both registers are zero. This will set the flags.
956 OpRegRegReg(kOpOr, t_reg, reg.GetLow(), reg.GetHigh());
957 // The temp is no longer needed so free it at this time.
958 FreeTemp(t_reg);
959 }
Razvan A Lupusoru090dd442013-12-20 14:35:03 -0800960
961 // In case of zero, throw ArithmeticException.
Mingyao Yange643a172014-04-08 11:02:52 -0700962 GenDivZeroCheck(kCondEq);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700963}
964
Mingyao Yang80365d92014-04-18 12:10:58 -0700965void X86Mir2Lir::GenArrayBoundsCheck(RegStorage index,
966 RegStorage array_base,
967 int len_offset) {
968 class ArrayBoundsCheckSlowPath : public Mir2Lir::LIRSlowPath {
969 public:
970 ArrayBoundsCheckSlowPath(Mir2Lir* m2l, LIR* branch,
971 RegStorage index, RegStorage array_base, int32_t len_offset)
972 : LIRSlowPath(m2l, m2l->GetCurrentDexPc(), branch),
973 index_(index), array_base_(array_base), len_offset_(len_offset) {
974 }
975
976 void Compile() OVERRIDE {
977 m2l_->ResetRegPool();
978 m2l_->ResetDefTracking();
Mingyao Yang6ffcfa02014-04-25 11:06:00 -0700979 GenerateTargetLabel(kPseudoThrowTarget);
Mingyao Yang80365d92014-04-18 12:10:58 -0700980
981 RegStorage new_index = index_;
982 // Move index out of kArg1, either directly to kArg0, or to kArg2.
983 if (index_.GetReg() == m2l_->TargetReg(kArg1).GetReg()) {
984 if (array_base_.GetReg() == m2l_->TargetReg(kArg0).GetReg()) {
985 m2l_->OpRegCopy(m2l_->TargetReg(kArg2), index_);
986 new_index = m2l_->TargetReg(kArg2);
987 } else {
988 m2l_->OpRegCopy(m2l_->TargetReg(kArg0), index_);
989 new_index = m2l_->TargetReg(kArg0);
990 }
991 }
992 // Load array length to kArg1.
993 m2l_->OpRegMem(kOpMov, m2l_->TargetReg(kArg1), array_base_, len_offset_);
buzbee33ae5582014-06-12 14:56:32 -0700994 if (cu_->target64) {
Dmitry Petrochenko9ee801f2014-05-12 11:31:37 +0700995 m2l_->CallRuntimeHelperRegReg(QUICK_ENTRYPOINT_OFFSET(8, pThrowArrayBounds),
996 new_index, m2l_->TargetReg(kArg1), true);
997 } else {
998 m2l_->CallRuntimeHelperRegReg(QUICK_ENTRYPOINT_OFFSET(4, pThrowArrayBounds),
999 new_index, m2l_->TargetReg(kArg1), true);
1000 }
Mingyao Yang80365d92014-04-18 12:10:58 -07001001 }
1002
1003 private:
1004 const RegStorage index_;
1005 const RegStorage array_base_;
1006 const int32_t len_offset_;
1007 };
1008
1009 OpRegMem(kOpCmp, index, array_base, len_offset);
1010 LIR* branch = OpCondBranch(kCondUge, nullptr);
1011 AddSlowPath(new (arena_) ArrayBoundsCheckSlowPath(this, branch,
1012 index, array_base, len_offset));
1013}
1014
1015void X86Mir2Lir::GenArrayBoundsCheck(int32_t index,
1016 RegStorage array_base,
1017 int32_t len_offset) {
1018 class ArrayBoundsCheckSlowPath : public Mir2Lir::LIRSlowPath {
1019 public:
1020 ArrayBoundsCheckSlowPath(Mir2Lir* m2l, LIR* branch,
1021 int32_t index, RegStorage array_base, int32_t len_offset)
1022 : LIRSlowPath(m2l, m2l->GetCurrentDexPc(), branch),
1023 index_(index), array_base_(array_base), len_offset_(len_offset) {
1024 }
1025
1026 void Compile() OVERRIDE {
1027 m2l_->ResetRegPool();
1028 m2l_->ResetDefTracking();
Mingyao Yang6ffcfa02014-04-25 11:06:00 -07001029 GenerateTargetLabel(kPseudoThrowTarget);
Mingyao Yang80365d92014-04-18 12:10:58 -07001030
1031 // Load array length to kArg1.
1032 m2l_->OpRegMem(kOpMov, m2l_->TargetReg(kArg1), array_base_, len_offset_);
1033 m2l_->LoadConstant(m2l_->TargetReg(kArg0), index_);
buzbee33ae5582014-06-12 14:56:32 -07001034 if (cu_->target64) {
Dmitry Petrochenko9ee801f2014-05-12 11:31:37 +07001035 m2l_->CallRuntimeHelperRegReg(QUICK_ENTRYPOINT_OFFSET(8, pThrowArrayBounds),
1036 m2l_->TargetReg(kArg0), m2l_->TargetReg(kArg1), true);
1037 } else {
1038 m2l_->CallRuntimeHelperRegReg(QUICK_ENTRYPOINT_OFFSET(4, pThrowArrayBounds),
1039 m2l_->TargetReg(kArg0), m2l_->TargetReg(kArg1), true);
1040 }
Mingyao Yang80365d92014-04-18 12:10:58 -07001041 }
1042
1043 private:
1044 const int32_t index_;
1045 const RegStorage array_base_;
1046 const int32_t len_offset_;
1047 };
1048
1049 NewLIR3(IS_SIMM8(index) ? kX86Cmp32MI8 : kX86Cmp32MI, array_base.GetReg(), len_offset, index);
1050 LIR* branch = OpCondBranch(kCondLs, nullptr);
1051 AddSlowPath(new (arena_) ArrayBoundsCheckSlowPath(this, branch,
1052 index, array_base, len_offset));
1053}
1054
Brian Carlstrom7940e442013-07-12 13:46:57 -07001055// Test suspend flag, return target of taken suspend branch
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001056LIR* X86Mir2Lir::OpTestSuspend(LIR* target) {
buzbee33ae5582014-06-12 14:56:32 -07001057 if (cu_->target64) {
Andreas Gampe2f244e92014-05-08 03:35:25 -07001058 OpTlsCmp(Thread::ThreadFlagsOffset<8>(), 0);
1059 } else {
1060 OpTlsCmp(Thread::ThreadFlagsOffset<4>(), 0);
1061 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001062 return OpCondBranch((target == NULL) ? kCondNe : kCondEq, target);
1063}
1064
1065// Decrement register and branch on condition
buzbee2700f7e2014-03-07 09:46:20 -08001066LIR* X86Mir2Lir::OpDecAndBranch(ConditionCode c_code, RegStorage reg, LIR* target) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001067 OpRegImm(kOpSub, reg, 1);
Yixin Shoua0dac3e2014-01-23 05:01:22 -08001068 return OpCondBranch(c_code, target);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001069}
1070
buzbee11b63d12013-08-27 07:34:17 -07001071bool X86Mir2Lir::SmallLiteralDivRem(Instruction::Code dalvik_opcode, bool is_div,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001072 RegLocation rl_src, RegLocation rl_dest, int lit) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001073 LOG(FATAL) << "Unexpected use of smallLiteralDive in x86";
1074 return false;
1075}
1076
Ian Rogerse2143c02014-03-28 08:47:16 -07001077bool X86Mir2Lir::EasyMultiply(RegLocation rl_src, RegLocation rl_dest, int lit) {
1078 LOG(FATAL) << "Unexpected use of easyMultiply in x86";
1079 return false;
1080}
1081
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001082LIR* X86Mir2Lir::OpIT(ConditionCode cond, const char* guide) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001083 LOG(FATAL) << "Unexpected use of OpIT in x86";
1084 return NULL;
1085}
1086
Dave Allison3da67a52014-04-02 17:03:45 -07001087void X86Mir2Lir::OpEndIT(LIR* it) {
1088 LOG(FATAL) << "Unexpected use of OpEndIT in x86";
1089}
1090
buzbee2700f7e2014-03-07 09:46:20 -08001091void X86Mir2Lir::GenImulRegImm(RegStorage dest, RegStorage src, int val) {
Mark Mendell4708dcd2014-01-22 09:05:18 -08001092 switch (val) {
1093 case 0:
buzbee2700f7e2014-03-07 09:46:20 -08001094 NewLIR2(kX86Xor32RR, dest.GetReg(), dest.GetReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001095 break;
1096 case 1:
1097 OpRegCopy(dest, src);
1098 break;
1099 default:
1100 OpRegRegImm(kOpMul, dest, src, val);
1101 break;
1102 }
1103}
1104
buzbee2700f7e2014-03-07 09:46:20 -08001105void X86Mir2Lir::GenImulMemImm(RegStorage dest, int sreg, int displacement, int val) {
Vladimir Marko8dea81c2014-06-06 14:50:36 +01001106 // All memory accesses below reference dalvik regs.
1107 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
1108
Mark Mendell4708dcd2014-01-22 09:05:18 -08001109 LIR *m;
1110 switch (val) {
1111 case 0:
buzbee2700f7e2014-03-07 09:46:20 -08001112 NewLIR2(kX86Xor32RR, dest.GetReg(), dest.GetReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001113 break;
1114 case 1:
Vladimir Marko3bf7c602014-05-07 14:55:43 +01001115 LoadBaseDisp(rs_rX86_SP, displacement, dest, k32);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001116 break;
1117 default:
buzbee091cc402014-03-31 10:14:40 -07001118 m = NewLIR4(IS_SIMM8(val) ? kX86Imul32RMI8 : kX86Imul32RMI, dest.GetReg(),
1119 rs_rX86_SP.GetReg(), displacement, val);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001120 AnnotateDalvikRegAccess(m, displacement >> 2, true /* is_load */, true /* is_64bit */);
1121 break;
1122 }
1123}
1124
Mark Mendelle02d48f2014-01-15 11:19:23 -08001125void X86Mir2Lir::GenMulLong(Instruction::Code, RegLocation rl_dest, RegLocation rl_src1,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001126 RegLocation rl_src2) {
Vladimir Marko8dea81c2014-06-06 14:50:36 +01001127 // All memory accesses below reference dalvik regs.
1128 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
1129
Alexei Zavjalovd8191d02014-06-11 18:26:40 +07001130 if (Gen64Bit()) {
1131 if (rl_src1.is_const) {
1132 std::swap(rl_src1, rl_src2);
1133 }
1134 // Are we multiplying by a constant?
1135 if (rl_src2.is_const) {
1136 int64_t val = mir_graph_->ConstantValueWide(rl_src2);
1137 if (val == 0) {
1138 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
1139 OpRegReg(kOpXor, rl_result.reg, rl_result.reg);
1140 StoreValueWide(rl_dest, rl_result);
1141 return;
1142 } else if (val == 1) {
1143 StoreValueWide(rl_dest, rl_src1);
1144 return;
1145 } else if (val == 2) {
1146 GenAddLong(Instruction::ADD_LONG, rl_dest, rl_src1, rl_src1);
1147 return;
1148 } else if (IsPowerOfTwo(val)) {
1149 int shift_amount = LowestSetBit(val);
1150 if (!BadOverlap(rl_src1, rl_dest)) {
1151 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
1152 RegLocation rl_result = GenShiftImmOpLong(Instruction::SHL_LONG, rl_dest,
1153 rl_src1, shift_amount);
1154 StoreValueWide(rl_dest, rl_result);
1155 return;
1156 }
1157 }
Alexei Zavjalovd8191d02014-06-11 18:26:40 +07001158 }
1159 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
1160 rl_src2 = LoadValueWide(rl_src2, kCoreReg);
1161 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
1162 if (rl_result.reg.GetReg() == rl_src1.reg.GetReg() &&
1163 rl_result.reg.GetReg() == rl_src2.reg.GetReg()) {
1164 NewLIR2(kX86Imul64RR, rl_result.reg.GetReg(), rl_result.reg.GetReg());
1165 } else if (rl_result.reg.GetReg() != rl_src1.reg.GetReg() &&
1166 rl_result.reg.GetReg() == rl_src2.reg.GetReg()) {
1167 NewLIR2(kX86Imul64RR, rl_result.reg.GetReg(), rl_src1.reg.GetReg());
1168 } else if (rl_result.reg.GetReg() == rl_src1.reg.GetReg() &&
1169 rl_result.reg.GetReg() != rl_src2.reg.GetReg()) {
1170 NewLIR2(kX86Imul64RR, rl_result.reg.GetReg(), rl_src2.reg.GetReg());
1171 } else {
1172 OpRegCopy(rl_result.reg, rl_src1.reg);
1173 NewLIR2(kX86Imul64RR, rl_result.reg.GetReg(), rl_src2.reg.GetReg());
1174 }
1175 StoreValueWide(rl_dest, rl_result);
1176 return;
1177 }
1178
Mark Mendell4708dcd2014-01-22 09:05:18 -08001179 if (rl_src1.is_const) {
1180 std::swap(rl_src1, rl_src2);
1181 }
1182 // Are we multiplying by a constant?
1183 if (rl_src2.is_const) {
1184 // Do special compare/branch against simple const operand
1185 int64_t val = mir_graph_->ConstantValueWide(rl_src2);
1186 if (val == 0) {
1187 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08001188 OpRegReg(kOpXor, rl_result.reg.GetLow(), rl_result.reg.GetLow());
1189 OpRegReg(kOpXor, rl_result.reg.GetHigh(), rl_result.reg.GetHigh());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001190 StoreValueWide(rl_dest, rl_result);
1191 return;
1192 } else if (val == 1) {
Mark Mendell4708dcd2014-01-22 09:05:18 -08001193 StoreValueWide(rl_dest, rl_src1);
1194 return;
1195 } else if (val == 2) {
1196 GenAddLong(Instruction::ADD_LONG, rl_dest, rl_src1, rl_src1);
1197 return;
1198 } else if (IsPowerOfTwo(val)) {
1199 int shift_amount = LowestSetBit(val);
1200 if (!BadOverlap(rl_src1, rl_dest)) {
1201 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
1202 RegLocation rl_result = GenShiftImmOpLong(Instruction::SHL_LONG, rl_dest,
1203 rl_src1, shift_amount);
1204 StoreValueWide(rl_dest, rl_result);
1205 return;
1206 }
1207 }
1208
1209 // Okay, just bite the bullet and do it.
1210 int32_t val_lo = Low32Bits(val);
1211 int32_t val_hi = High32Bits(val);
1212 FlushAllRegs();
1213 LockCallTemps(); // Prepare for explicit register usage.
buzbee30adc732014-05-09 15:10:18 -07001214 rl_src1 = UpdateLocWideTyped(rl_src1, kCoreReg);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001215 bool src1_in_reg = rl_src1.location == kLocPhysReg;
1216 int displacement = SRegOffset(rl_src1.s_reg_low);
1217
1218 // ECX <- 1H * 2L
1219 // EAX <- 1L * 2H
1220 if (src1_in_reg) {
buzbee2700f7e2014-03-07 09:46:20 -08001221 GenImulRegImm(rs_r1, rl_src1.reg.GetHigh(), val_lo);
1222 GenImulRegImm(rs_r0, rl_src1.reg.GetLow(), val_hi);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001223 } else {
buzbee2700f7e2014-03-07 09:46:20 -08001224 GenImulMemImm(rs_r1, GetSRegHi(rl_src1.s_reg_low), displacement + HIWORD_OFFSET, val_lo);
1225 GenImulMemImm(rs_r0, rl_src1.s_reg_low, displacement + LOWORD_OFFSET, val_hi);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001226 }
1227
1228 // ECX <- ECX + EAX (2H * 1L) + (1H * 2L)
buzbee091cc402014-03-31 10:14:40 -07001229 NewLIR2(kX86Add32RR, rs_r1.GetReg(), rs_r0.GetReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001230
1231 // EAX <- 2L
buzbee2700f7e2014-03-07 09:46:20 -08001232 LoadConstantNoClobber(rs_r0, val_lo);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001233
1234 // EDX:EAX <- 2L * 1L (double precision)
1235 if (src1_in_reg) {
buzbee2700f7e2014-03-07 09:46:20 -08001236 NewLIR1(kX86Mul32DaR, rl_src1.reg.GetLowReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001237 } else {
buzbee091cc402014-03-31 10:14:40 -07001238 LIR *m = NewLIR2(kX86Mul32DaM, rs_rX86_SP.GetReg(), displacement + LOWORD_OFFSET);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001239 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
1240 true /* is_load */, true /* is_64bit */);
1241 }
1242
1243 // EDX <- EDX + ECX (add high words)
buzbee091cc402014-03-31 10:14:40 -07001244 NewLIR2(kX86Add32RR, rs_r2.GetReg(), rs_r1.GetReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001245
1246 // Result is EDX:EAX
buzbee091cc402014-03-31 10:14:40 -07001247 RegLocation rl_result = {kLocPhysReg, 1, 0, 0, 0, 0, 0, 0, 1,
1248 RegStorage::MakeRegPair(rs_r0, rs_r2), INVALID_SREG, INVALID_SREG};
Mark Mendell4708dcd2014-01-22 09:05:18 -08001249 StoreValueWide(rl_dest, rl_result);
1250 return;
1251 }
1252
1253 // Nope. Do it the hard way
Mark Mendellde99bba2014-02-14 12:15:02 -08001254 // Check for V*V. We can eliminate a multiply in that case, as 2L*1H == 2H*1L.
1255 bool is_square = mir_graph_->SRegToVReg(rl_src1.s_reg_low) ==
1256 mir_graph_->SRegToVReg(rl_src2.s_reg_low);
1257
Mark Mendell4708dcd2014-01-22 09:05:18 -08001258 FlushAllRegs();
1259 LockCallTemps(); // Prepare for explicit register usage.
buzbee30adc732014-05-09 15:10:18 -07001260 rl_src1 = UpdateLocWideTyped(rl_src1, kCoreReg);
1261 rl_src2 = UpdateLocWideTyped(rl_src2, kCoreReg);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001262
1263 // At this point, the VRs are in their home locations.
1264 bool src1_in_reg = rl_src1.location == kLocPhysReg;
1265 bool src2_in_reg = rl_src2.location == kLocPhysReg;
1266
1267 // ECX <- 1H
1268 if (src1_in_reg) {
buzbee091cc402014-03-31 10:14:40 -07001269 NewLIR2(kX86Mov32RR, rs_r1.GetReg(), rl_src1.reg.GetHighReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001270 } else {
Vladimir Marko3bf7c602014-05-07 14:55:43 +01001271 LoadBaseDisp(rs_rX86_SP, SRegOffset(rl_src1.s_reg_low) + HIWORD_OFFSET, rs_r1, k32);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001272 }
1273
Mark Mendellde99bba2014-02-14 12:15:02 -08001274 if (is_square) {
1275 // Take advantage of the fact that the values are the same.
1276 // ECX <- ECX * 2L (1H * 2L)
1277 if (src2_in_reg) {
buzbee091cc402014-03-31 10:14:40 -07001278 NewLIR2(kX86Imul32RR, rs_r1.GetReg(), rl_src2.reg.GetLowReg());
Mark Mendellde99bba2014-02-14 12:15:02 -08001279 } else {
1280 int displacement = SRegOffset(rl_src2.s_reg_low);
buzbee091cc402014-03-31 10:14:40 -07001281 LIR *m = NewLIR3(kX86Imul32RM, rs_r1.GetReg(), rs_rX86_SP.GetReg(),
1282 displacement + LOWORD_OFFSET);
Mark Mendellde99bba2014-02-14 12:15:02 -08001283 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
1284 true /* is_load */, true /* is_64bit */);
1285 }
Mark Mendell4708dcd2014-01-22 09:05:18 -08001286
Mark Mendellde99bba2014-02-14 12:15:02 -08001287 // ECX <- 2*ECX (2H * 1L) + (1H * 2L)
buzbee091cc402014-03-31 10:14:40 -07001288 NewLIR2(kX86Add32RR, rs_r1.GetReg(), rs_r1.GetReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001289 } else {
Mark Mendellde99bba2014-02-14 12:15:02 -08001290 // EAX <- 2H
1291 if (src2_in_reg) {
buzbee091cc402014-03-31 10:14:40 -07001292 NewLIR2(kX86Mov32RR, rs_r0.GetReg(), rl_src2.reg.GetHighReg());
Mark Mendellde99bba2014-02-14 12:15:02 -08001293 } else {
Vladimir Marko3bf7c602014-05-07 14:55:43 +01001294 LoadBaseDisp(rs_rX86_SP, SRegOffset(rl_src2.s_reg_low) + HIWORD_OFFSET, rs_r0, k32);
Mark Mendellde99bba2014-02-14 12:15:02 -08001295 }
Mark Mendell4708dcd2014-01-22 09:05:18 -08001296
Mark Mendellde99bba2014-02-14 12:15:02 -08001297 // EAX <- EAX * 1L (2H * 1L)
1298 if (src1_in_reg) {
buzbee091cc402014-03-31 10:14:40 -07001299 NewLIR2(kX86Imul32RR, rs_r0.GetReg(), rl_src1.reg.GetLowReg());
Mark Mendellde99bba2014-02-14 12:15:02 -08001300 } else {
1301 int displacement = SRegOffset(rl_src1.s_reg_low);
buzbee091cc402014-03-31 10:14:40 -07001302 LIR *m = NewLIR3(kX86Imul32RM, rs_r0.GetReg(), rs_rX86_SP.GetReg(),
1303 displacement + LOWORD_OFFSET);
Mark Mendellde99bba2014-02-14 12:15:02 -08001304 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
1305 true /* is_load */, true /* is_64bit */);
1306 }
Mark Mendell4708dcd2014-01-22 09:05:18 -08001307
Mark Mendellde99bba2014-02-14 12:15:02 -08001308 // ECX <- ECX * 2L (1H * 2L)
1309 if (src2_in_reg) {
buzbee091cc402014-03-31 10:14:40 -07001310 NewLIR2(kX86Imul32RR, rs_r1.GetReg(), rl_src2.reg.GetLowReg());
Mark Mendellde99bba2014-02-14 12:15:02 -08001311 } else {
1312 int displacement = SRegOffset(rl_src2.s_reg_low);
buzbee091cc402014-03-31 10:14:40 -07001313 LIR *m = NewLIR3(kX86Imul32RM, rs_r1.GetReg(), rs_rX86_SP.GetReg(),
1314 displacement + LOWORD_OFFSET);
Mark Mendellde99bba2014-02-14 12:15:02 -08001315 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
1316 true /* is_load */, true /* is_64bit */);
1317 }
1318
1319 // ECX <- ECX + EAX (2H * 1L) + (1H * 2L)
buzbee091cc402014-03-31 10:14:40 -07001320 NewLIR2(kX86Add32RR, rs_r1.GetReg(), rs_r0.GetReg());
Mark Mendellde99bba2014-02-14 12:15:02 -08001321 }
Mark Mendell4708dcd2014-01-22 09:05:18 -08001322
1323 // EAX <- 2L
1324 if (src2_in_reg) {
buzbee091cc402014-03-31 10:14:40 -07001325 NewLIR2(kX86Mov32RR, rs_r0.GetReg(), rl_src2.reg.GetLowReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001326 } else {
Vladimir Marko3bf7c602014-05-07 14:55:43 +01001327 LoadBaseDisp(rs_rX86_SP, SRegOffset(rl_src2.s_reg_low) + LOWORD_OFFSET, rs_r0, k32);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001328 }
1329
1330 // EDX:EAX <- 2L * 1L (double precision)
1331 if (src1_in_reg) {
buzbee2700f7e2014-03-07 09:46:20 -08001332 NewLIR1(kX86Mul32DaR, rl_src1.reg.GetLowReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001333 } else {
1334 int displacement = SRegOffset(rl_src1.s_reg_low);
buzbee091cc402014-03-31 10:14:40 -07001335 LIR *m = NewLIR2(kX86Mul32DaM, rs_rX86_SP.GetReg(), displacement + LOWORD_OFFSET);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001336 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
1337 true /* is_load */, true /* is_64bit */);
1338 }
1339
1340 // EDX <- EDX + ECX (add high words)
buzbee091cc402014-03-31 10:14:40 -07001341 NewLIR2(kX86Add32RR, rs_r2.GetReg(), rs_r1.GetReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001342
1343 // Result is EDX:EAX
buzbee091cc402014-03-31 10:14:40 -07001344 RegLocation rl_result = {kLocPhysReg, 1, 0, 0, 0, 0, 0, 0, 1,
buzbee2700f7e2014-03-07 09:46:20 -08001345 RegStorage::MakeRegPair(rs_r0, rs_r2), INVALID_SREG, INVALID_SREG};
Mark Mendell4708dcd2014-01-22 09:05:18 -08001346 StoreValueWide(rl_dest, rl_result);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001347}
Mark Mendelle02d48f2014-01-15 11:19:23 -08001348
1349void X86Mir2Lir::GenLongRegOrMemOp(RegLocation rl_dest, RegLocation rl_src,
1350 Instruction::Code op) {
1351 DCHECK_EQ(rl_dest.location, kLocPhysReg);
1352 X86OpCode x86op = GetOpcode(op, rl_dest, rl_src, false);
1353 if (rl_src.location == kLocPhysReg) {
1354 // Both operands are in registers.
Serguei Katkovab5545f2014-03-25 10:51:15 +07001355 // But we must ensure that rl_src is in pair
Chao-ying Fua0147762014-06-06 18:38:49 -07001356 if (Gen64Bit()) {
1357 NewLIR2(x86op, rl_dest.reg.GetReg(), rl_src.reg.GetReg());
1358 } else {
1359 rl_src = LoadValueWide(rl_src, kCoreReg);
1360 if (rl_dest.reg.GetLowReg() == rl_src.reg.GetHighReg()) {
1361 // The registers are the same, so we would clobber it before the use.
1362 RegStorage temp_reg = AllocTemp();
1363 OpRegCopy(temp_reg, rl_dest.reg);
1364 rl_src.reg.SetHighReg(temp_reg.GetReg());
1365 }
1366 NewLIR2(x86op, rl_dest.reg.GetLowReg(), rl_src.reg.GetLowReg());
Mark Mendelle02d48f2014-01-15 11:19:23 -08001367
Chao-ying Fua0147762014-06-06 18:38:49 -07001368 x86op = GetOpcode(op, rl_dest, rl_src, true);
1369 NewLIR2(x86op, rl_dest.reg.GetHighReg(), rl_src.reg.GetHighReg());
1370 FreeTemp(rl_src.reg); // ???
1371 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08001372 return;
1373 }
1374
1375 // RHS is in memory.
1376 DCHECK((rl_src.location == kLocDalvikFrame) ||
1377 (rl_src.location == kLocCompilerTemp));
buzbee2700f7e2014-03-07 09:46:20 -08001378 int r_base = TargetReg(kSp).GetReg();
Mark Mendelle02d48f2014-01-15 11:19:23 -08001379 int displacement = SRegOffset(rl_src.s_reg_low);
1380
Vladimir Marko8dea81c2014-06-06 14:50:36 +01001381 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
Chao-ying Fua0147762014-06-06 18:38:49 -07001382 LIR *lir = NewLIR3(x86op, Gen64Bit() ? rl_dest.reg.GetReg() : rl_dest.reg.GetLowReg(), r_base, displacement + LOWORD_OFFSET);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001383 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
1384 true /* is_load */, true /* is64bit */);
Chao-ying Fua0147762014-06-06 18:38:49 -07001385 if (!Gen64Bit()) {
1386 x86op = GetOpcode(op, rl_dest, rl_src, true);
1387 lir = NewLIR3(x86op, rl_dest.reg.GetHighReg(), r_base, displacement + HIWORD_OFFSET);
Chao-ying Fu7e399fd2014-06-10 18:11:11 -07001388 AnnotateDalvikRegAccess(lir, (displacement + HIWORD_OFFSET) >> 2,
1389 true /* is_load */, true /* is64bit */);
Chao-ying Fua0147762014-06-06 18:38:49 -07001390 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001391}
1392
Mark Mendelle02d48f2014-01-15 11:19:23 -08001393void X86Mir2Lir::GenLongArith(RegLocation rl_dest, RegLocation rl_src, Instruction::Code op) {
buzbee30adc732014-05-09 15:10:18 -07001394 rl_dest = UpdateLocWideTyped(rl_dest, kCoreReg);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001395 if (rl_dest.location == kLocPhysReg) {
1396 // Ensure we are in a register pair
1397 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
1398
buzbee30adc732014-05-09 15:10:18 -07001399 rl_src = UpdateLocWideTyped(rl_src, kCoreReg);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001400 GenLongRegOrMemOp(rl_result, rl_src, op);
1401 StoreFinalValueWide(rl_dest, rl_result);
1402 return;
1403 }
1404
1405 // It wasn't in registers, so it better be in memory.
1406 DCHECK((rl_dest.location == kLocDalvikFrame) ||
1407 (rl_dest.location == kLocCompilerTemp));
1408 rl_src = LoadValueWide(rl_src, kCoreReg);
1409
1410 // Operate directly into memory.
1411 X86OpCode x86op = GetOpcode(op, rl_dest, rl_src, false);
buzbee2700f7e2014-03-07 09:46:20 -08001412 int r_base = TargetReg(kSp).GetReg();
Mark Mendelle02d48f2014-01-15 11:19:23 -08001413 int displacement = SRegOffset(rl_dest.s_reg_low);
1414
Vladimir Marko8dea81c2014-06-06 14:50:36 +01001415 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
Chao-ying Fua0147762014-06-06 18:38:49 -07001416 LIR *lir = NewLIR3(x86op, r_base, displacement + LOWORD_OFFSET,
1417 Gen64Bit() ? rl_src.reg.GetReg() : rl_src.reg.GetLowReg());
Mark Mendelle02d48f2014-01-15 11:19:23 -08001418 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
Serguei Katkov217fe732014-03-27 14:41:56 +07001419 true /* is_load */, true /* is64bit */);
1420 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
Mark Mendelle02d48f2014-01-15 11:19:23 -08001421 false /* is_load */, true /* is64bit */);
Chao-ying Fua0147762014-06-06 18:38:49 -07001422 if (!Gen64Bit()) {
1423 x86op = GetOpcode(op, rl_dest, rl_src, true);
1424 lir = NewLIR3(x86op, r_base, displacement + HIWORD_OFFSET, rl_src.reg.GetHighReg());
Chao-ying Fu7e399fd2014-06-10 18:11:11 -07001425 AnnotateDalvikRegAccess(lir, (displacement + HIWORD_OFFSET) >> 2,
1426 true /* is_load */, true /* is64bit */);
1427 AnnotateDalvikRegAccess(lir, (displacement + HIWORD_OFFSET) >> 2,
1428 false /* is_load */, true /* is64bit */);
Chao-ying Fua0147762014-06-06 18:38:49 -07001429 }
buzbee2700f7e2014-03-07 09:46:20 -08001430 FreeTemp(rl_src.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001431}
1432
Mark Mendelle02d48f2014-01-15 11:19:23 -08001433void X86Mir2Lir::GenLongArith(RegLocation rl_dest, RegLocation rl_src1,
1434 RegLocation rl_src2, Instruction::Code op,
1435 bool is_commutative) {
1436 // Is this really a 2 operand operation?
1437 switch (op) {
1438 case Instruction::ADD_LONG_2ADDR:
1439 case Instruction::SUB_LONG_2ADDR:
1440 case Instruction::AND_LONG_2ADDR:
1441 case Instruction::OR_LONG_2ADDR:
1442 case Instruction::XOR_LONG_2ADDR:
Mark Mendelle87f9b52014-04-30 14:13:18 -04001443 if (GenerateTwoOperandInstructions()) {
1444 GenLongArith(rl_dest, rl_src2, op);
1445 return;
1446 }
1447 break;
1448
Mark Mendelle02d48f2014-01-15 11:19:23 -08001449 default:
1450 break;
1451 }
1452
1453 if (rl_dest.location == kLocPhysReg) {
1454 RegLocation rl_result = LoadValueWide(rl_src1, kCoreReg);
1455
1456 // We are about to clobber the LHS, so it needs to be a temp.
1457 rl_result = ForceTempWide(rl_result);
1458
1459 // Perform the operation using the RHS.
buzbee30adc732014-05-09 15:10:18 -07001460 rl_src2 = UpdateLocWideTyped(rl_src2, kCoreReg);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001461 GenLongRegOrMemOp(rl_result, rl_src2, op);
1462
1463 // And now record that the result is in the temp.
1464 StoreFinalValueWide(rl_dest, rl_result);
1465 return;
1466 }
1467
1468 // It wasn't in registers, so it better be in memory.
1469 DCHECK((rl_dest.location == kLocDalvikFrame) ||
1470 (rl_dest.location == kLocCompilerTemp));
buzbee30adc732014-05-09 15:10:18 -07001471 rl_src1 = UpdateLocWideTyped(rl_src1, kCoreReg);
1472 rl_src2 = UpdateLocWideTyped(rl_src2, kCoreReg);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001473
1474 // Get one of the source operands into temporary register.
1475 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
Chao-ying Fua0147762014-06-06 18:38:49 -07001476 if (Gen64Bit()) {
1477 if (IsTemp(rl_src1.reg)) {
1478 GenLongRegOrMemOp(rl_src1, rl_src2, op);
1479 } else if (is_commutative) {
1480 rl_src2 = LoadValueWide(rl_src2, kCoreReg);
1481 // We need at least one of them to be a temporary.
1482 if (!IsTemp(rl_src2.reg)) {
1483 rl_src1 = ForceTempWide(rl_src1);
1484 GenLongRegOrMemOp(rl_src1, rl_src2, op);
1485 } else {
1486 GenLongRegOrMemOp(rl_src2, rl_src1, op);
1487 StoreFinalValueWide(rl_dest, rl_src2);
1488 return;
1489 }
1490 } else {
1491 // Need LHS to be the temp.
Mark Mendelle02d48f2014-01-15 11:19:23 -08001492 rl_src1 = ForceTempWide(rl_src1);
Yevgeny Rouban91b6ffa2014-03-07 14:35:44 +07001493 GenLongRegOrMemOp(rl_src1, rl_src2, op);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001494 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08001495 } else {
Chao-ying Fua0147762014-06-06 18:38:49 -07001496 if (IsTemp(rl_src1.reg.GetLow()) && IsTemp(rl_src1.reg.GetHigh())) {
1497 GenLongRegOrMemOp(rl_src1, rl_src2, op);
1498 } else if (is_commutative) {
1499 rl_src2 = LoadValueWide(rl_src2, kCoreReg);
1500 // We need at least one of them to be a temporary.
1501 if (!(IsTemp(rl_src2.reg.GetLow()) && IsTemp(rl_src2.reg.GetHigh()))) {
1502 rl_src1 = ForceTempWide(rl_src1);
1503 GenLongRegOrMemOp(rl_src1, rl_src2, op);
1504 } else {
1505 GenLongRegOrMemOp(rl_src2, rl_src1, op);
1506 StoreFinalValueWide(rl_dest, rl_src2);
1507 return;
1508 }
1509 } else {
1510 // Need LHS to be the temp.
1511 rl_src1 = ForceTempWide(rl_src1);
1512 GenLongRegOrMemOp(rl_src1, rl_src2, op);
1513 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08001514 }
1515
1516 StoreFinalValueWide(rl_dest, rl_src1);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001517}
1518
Mark Mendelle02d48f2014-01-15 11:19:23 -08001519void X86Mir2Lir::GenAddLong(Instruction::Code opcode, RegLocation rl_dest,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001520 RegLocation rl_src1, RegLocation rl_src2) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08001521 GenLongArith(rl_dest, rl_src1, rl_src2, opcode, true);
1522}
1523
1524void X86Mir2Lir::GenSubLong(Instruction::Code opcode, RegLocation rl_dest,
1525 RegLocation rl_src1, RegLocation rl_src2) {
1526 GenLongArith(rl_dest, rl_src1, rl_src2, opcode, false);
1527}
1528
1529void X86Mir2Lir::GenAndLong(Instruction::Code opcode, RegLocation rl_dest,
1530 RegLocation rl_src1, RegLocation rl_src2) {
1531 GenLongArith(rl_dest, rl_src1, rl_src2, opcode, true);
1532}
1533
1534void X86Mir2Lir::GenOrLong(Instruction::Code opcode, RegLocation rl_dest,
1535 RegLocation rl_src1, RegLocation rl_src2) {
1536 GenLongArith(rl_dest, rl_src1, rl_src2, opcode, true);
1537}
1538
1539void X86Mir2Lir::GenXorLong(Instruction::Code opcode, RegLocation rl_dest,
1540 RegLocation rl_src1, RegLocation rl_src2) {
1541 GenLongArith(rl_dest, rl_src1, rl_src2, opcode, true);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001542}
1543
Serban Constantinescued65c5e2014-05-22 15:10:18 +01001544void X86Mir2Lir::GenNotLong(RegLocation rl_dest, RegLocation rl_src) {
Chao-ying Fua0147762014-06-06 18:38:49 -07001545 if (Gen64Bit()) {
1546 rl_src = LoadValueWide(rl_src, kCoreReg);
1547 RegLocation rl_result;
1548 rl_result = EvalLocWide(rl_dest, kCoreReg, true);
1549 OpRegCopy(rl_result.reg, rl_src.reg);
1550 OpReg(kOpNot, rl_result.reg);
1551 StoreValueWide(rl_dest, rl_result);
1552 } else {
1553 LOG(FATAL) << "Unexpected use GenNotLong()";
1554 }
Serban Constantinescued65c5e2014-05-22 15:10:18 +01001555}
1556
1557void X86Mir2Lir::GenDivRemLong(Instruction::Code, RegLocation rl_dest, RegLocation rl_src1,
1558 RegLocation rl_src2, bool is_div) {
Chao-ying Fua0147762014-06-06 18:38:49 -07001559 if (!Gen64Bit()) {
1560 LOG(FATAL) << "Unexpected use GenDivRemLong()";
1561 return;
1562 }
1563
1564 // We have to use fixed registers, so flush all the temps.
1565 FlushAllRegs();
1566 LockCallTemps(); // Prepare for explicit register usage.
1567
1568 // Load LHS into RAX.
1569 LoadValueDirectWideFixed(rl_src1, rs_r0q);
1570
1571 // Load RHS into RCX.
1572 LoadValueDirectWideFixed(rl_src2, rs_r1q);
1573
1574 // Copy LHS sign bit into RDX.
1575 NewLIR0(kx86Cqo64Da);
1576
1577 // Handle division by zero case.
1578 GenDivZeroCheckWide(rs_r1q);
1579
1580 // Have to catch 0x8000000000000000/-1 case, or we will get an exception!
1581 NewLIR2(kX86Cmp64RI8, rs_r1q.GetReg(), -1);
1582 LIR *minus_one_branch = NewLIR2(kX86Jcc8, 0, kX86CondNe);
1583
1584 // RHS is -1.
1585 LoadConstantWide(rs_r3q, 0x8000000000000000);
1586 NewLIR2(kX86Cmp64RR, rs_r0q.GetReg(), rs_r3q.GetReg());
1587 LIR * minint_branch = NewLIR2(kX86Jcc8, 0, kX86CondNe);
1588
1589 // In 0x8000000000000000/-1 case.
1590 if (!is_div) {
1591 // For DIV, RAX is already right. For REM, we need RDX 0.
1592 NewLIR2(kX86Xor64RR, rs_r2q.GetReg(), rs_r2q.GetReg());
1593 }
1594 LIR* done = NewLIR1(kX86Jmp8, 0);
1595
1596 // Expected case.
1597 minus_one_branch->target = NewLIR0(kPseudoTargetLabel);
1598 minint_branch->target = minus_one_branch->target;
1599 NewLIR1(kX86Idivmod64DaR, rs_r1q.GetReg());
1600 done->target = NewLIR0(kPseudoTargetLabel);
1601
1602 // Result is in RAX for div and RDX for rem.
1603 RegLocation rl_result = {kLocPhysReg, 1, 0, 0, 0, 0, 0, 0, 1, rs_r0q, INVALID_SREG, INVALID_SREG};
1604 if (!is_div) {
1605 rl_result.reg.SetReg(r2q);
1606 }
1607
1608 StoreValueWide(rl_dest, rl_result);
Serban Constantinescued65c5e2014-05-22 15:10:18 +01001609}
1610
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001611void X86Mir2Lir::GenNegLong(RegLocation rl_dest, RegLocation rl_src) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08001612 rl_src = LoadValueWide(rl_src, kCoreReg);
Chao-ying Fua0147762014-06-06 18:38:49 -07001613 RegLocation rl_result;
1614 if (Gen64Bit()) {
1615 rl_result = EvalLocWide(rl_dest, kCoreReg, true);
1616 OpRegReg(kOpNeg, rl_result.reg, rl_src.reg);
1617 } else {
1618 rl_result = ForceTempWide(rl_src);
1619 if (((rl_dest.location == kLocPhysReg) && (rl_src.location == kLocPhysReg)) &&
1620 ((rl_dest.reg.GetLowReg() == rl_src.reg.GetHighReg()))) {
1621 // The registers are the same, so we would clobber it before the use.
1622 RegStorage temp_reg = AllocTemp();
1623 OpRegCopy(temp_reg, rl_result.reg);
1624 rl_result.reg.SetHighReg(temp_reg.GetReg());
1625 }
1626 OpRegReg(kOpNeg, rl_result.reg.GetLow(), rl_result.reg.GetLow()); // rLow = -rLow
1627 OpRegImm(kOpAdc, rl_result.reg.GetHigh(), 0); // rHigh = rHigh + CF
1628 OpRegReg(kOpNeg, rl_result.reg.GetHigh(), rl_result.reg.GetHigh()); // rHigh = -rHigh
Mark Mendelle02d48f2014-01-15 11:19:23 -08001629 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001630 StoreValueWide(rl_dest, rl_result);
1631}
1632
buzbee091cc402014-03-31 10:14:40 -07001633void X86Mir2Lir::OpRegThreadMem(OpKind op, RegStorage r_dest, ThreadOffset<4> thread_offset) {
Andreas Gampe2f244e92014-05-08 03:35:25 -07001634 DCHECK_EQ(kX86, cu_->instruction_set);
1635 X86OpCode opcode = kX86Bkpt;
1636 switch (op) {
1637 case kOpCmp: opcode = kX86Cmp32RT; break;
1638 case kOpMov: opcode = kX86Mov32RT; break;
1639 default:
1640 LOG(FATAL) << "Bad opcode: " << op;
1641 break;
1642 }
1643 NewLIR2(opcode, r_dest.GetReg(), thread_offset.Int32Value());
1644}
1645
1646void X86Mir2Lir::OpRegThreadMem(OpKind op, RegStorage r_dest, ThreadOffset<8> thread_offset) {
1647 DCHECK_EQ(kX86_64, cu_->instruction_set);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001648 X86OpCode opcode = kX86Bkpt;
Dmitry Petrochenko9ee801f2014-05-12 11:31:37 +07001649 if (Gen64Bit() && r_dest.Is64BitSolo()) {
1650 switch (op) {
1651 case kOpCmp: opcode = kX86Cmp64RT; break;
1652 case kOpMov: opcode = kX86Mov64RT; break;
1653 default:
1654 LOG(FATAL) << "Bad opcode(OpRegThreadMem 64): " << op;
1655 break;
1656 }
1657 } else {
1658 switch (op) {
1659 case kOpCmp: opcode = kX86Cmp32RT; break;
1660 case kOpMov: opcode = kX86Mov32RT; break;
1661 default:
1662 LOG(FATAL) << "Bad opcode: " << op;
1663 break;
1664 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001665 }
buzbee091cc402014-03-31 10:14:40 -07001666 NewLIR2(opcode, r_dest.GetReg(), thread_offset.Int32Value());
Brian Carlstrom7940e442013-07-12 13:46:57 -07001667}
1668
1669/*
1670 * Generate array load
1671 */
1672void X86Mir2Lir::GenArrayGet(int opt_flags, OpSize size, RegLocation rl_array,
Ian Rogersa9a82542013-10-04 11:17:26 -07001673 RegLocation rl_index, RegLocation rl_dest, int scale) {
buzbee091cc402014-03-31 10:14:40 -07001674 RegisterClass reg_class = RegClassBySize(size);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001675 int len_offset = mirror::Array::LengthOffset().Int32Value();
Brian Carlstrom7940e442013-07-12 13:46:57 -07001676 RegLocation rl_result;
buzbeea0cd2d72014-06-01 09:33:49 -07001677 rl_array = LoadValue(rl_array, kRefReg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001678
Mark Mendell343adb52013-12-18 06:02:17 -08001679 int data_offset;
buzbee695d13a2014-04-19 13:32:20 -07001680 if (size == k64 || size == kDouble) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001681 data_offset = mirror::Array::DataOffset(sizeof(int64_t)).Int32Value();
1682 } else {
1683 data_offset = mirror::Array::DataOffset(sizeof(int32_t)).Int32Value();
1684 }
1685
Mark Mendell343adb52013-12-18 06:02:17 -08001686 bool constant_index = rl_index.is_const;
1687 int32_t constant_index_value = 0;
1688 if (!constant_index) {
1689 rl_index = LoadValue(rl_index, kCoreReg);
1690 } else {
1691 constant_index_value = mir_graph_->ConstantValue(rl_index);
1692 // If index is constant, just fold it into the data offset
1693 data_offset += constant_index_value << scale;
1694 // treat as non array below
buzbee2700f7e2014-03-07 09:46:20 -08001695 rl_index.reg = RegStorage::InvalidReg();
Mark Mendell343adb52013-12-18 06:02:17 -08001696 }
1697
Brian Carlstrom7940e442013-07-12 13:46:57 -07001698 /* null object? */
buzbee2700f7e2014-03-07 09:46:20 -08001699 GenNullCheck(rl_array.reg, opt_flags);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001700
1701 if (!(opt_flags & MIR_IGNORE_RANGE_CHECK)) {
Mark Mendell343adb52013-12-18 06:02:17 -08001702 if (constant_index) {
Mingyao Yang80365d92014-04-18 12:10:58 -07001703 GenArrayBoundsCheck(constant_index_value, rl_array.reg, len_offset);
Mark Mendell343adb52013-12-18 06:02:17 -08001704 } else {
Mingyao Yang80365d92014-04-18 12:10:58 -07001705 GenArrayBoundsCheck(rl_index.reg, rl_array.reg, len_offset);
Mark Mendell343adb52013-12-18 06:02:17 -08001706 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001707 }
Mark Mendell343adb52013-12-18 06:02:17 -08001708 rl_result = EvalLoc(rl_dest, reg_class, true);
Vladimir Marko3bf7c602014-05-07 14:55:43 +01001709 LoadBaseIndexedDisp(rl_array.reg, rl_index.reg, scale, data_offset, rl_result.reg, size);
buzbee695d13a2014-04-19 13:32:20 -07001710 if ((size == k64) || (size == kDouble)) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001711 StoreValueWide(rl_dest, rl_result);
1712 } else {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001713 StoreValue(rl_dest, rl_result);
1714 }
1715}
1716
1717/*
1718 * Generate array store
1719 *
1720 */
1721void X86Mir2Lir::GenArrayPut(int opt_flags, OpSize size, RegLocation rl_array,
Ian Rogersa9a82542013-10-04 11:17:26 -07001722 RegLocation rl_index, RegLocation rl_src, int scale, bool card_mark) {
buzbee091cc402014-03-31 10:14:40 -07001723 RegisterClass reg_class = RegClassBySize(size);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001724 int len_offset = mirror::Array::LengthOffset().Int32Value();
1725 int data_offset;
1726
buzbee695d13a2014-04-19 13:32:20 -07001727 if (size == k64 || size == kDouble) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001728 data_offset = mirror::Array::DataOffset(sizeof(int64_t)).Int32Value();
1729 } else {
1730 data_offset = mirror::Array::DataOffset(sizeof(int32_t)).Int32Value();
1731 }
1732
buzbeea0cd2d72014-06-01 09:33:49 -07001733 rl_array = LoadValue(rl_array, kRefReg);
Mark Mendell343adb52013-12-18 06:02:17 -08001734 bool constant_index = rl_index.is_const;
1735 int32_t constant_index_value = 0;
1736 if (!constant_index) {
1737 rl_index = LoadValue(rl_index, kCoreReg);
1738 } else {
1739 // If index is constant, just fold it into the data offset
1740 constant_index_value = mir_graph_->ConstantValue(rl_index);
1741 data_offset += constant_index_value << scale;
1742 // treat as non array below
buzbee2700f7e2014-03-07 09:46:20 -08001743 rl_index.reg = RegStorage::InvalidReg();
Mark Mendell343adb52013-12-18 06:02:17 -08001744 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001745
1746 /* null object? */
buzbee2700f7e2014-03-07 09:46:20 -08001747 GenNullCheck(rl_array.reg, opt_flags);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001748
1749 if (!(opt_flags & MIR_IGNORE_RANGE_CHECK)) {
Mark Mendell343adb52013-12-18 06:02:17 -08001750 if (constant_index) {
Mingyao Yang80365d92014-04-18 12:10:58 -07001751 GenArrayBoundsCheck(constant_index_value, rl_array.reg, len_offset);
Mark Mendell343adb52013-12-18 06:02:17 -08001752 } else {
Mingyao Yang80365d92014-04-18 12:10:58 -07001753 GenArrayBoundsCheck(rl_index.reg, rl_array.reg, len_offset);
Mark Mendell343adb52013-12-18 06:02:17 -08001754 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001755 }
buzbee695d13a2014-04-19 13:32:20 -07001756 if ((size == k64) || (size == kDouble)) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001757 rl_src = LoadValueWide(rl_src, reg_class);
1758 } else {
1759 rl_src = LoadValue(rl_src, reg_class);
1760 }
1761 // If the src reg can't be byte accessed, move it to a temp first.
Chao-ying Fu7e399fd2014-06-10 18:11:11 -07001762 if ((size == kSignedByte || size == kUnsignedByte) && !IsByteRegister(rl_src.reg)) {
buzbee2700f7e2014-03-07 09:46:20 -08001763 RegStorage temp = AllocTemp();
1764 OpRegCopy(temp, rl_src.reg);
Vladimir Marko3bf7c602014-05-07 14:55:43 +01001765 StoreBaseIndexedDisp(rl_array.reg, rl_index.reg, scale, data_offset, temp, size);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001766 } else {
Vladimir Marko3bf7c602014-05-07 14:55:43 +01001767 StoreBaseIndexedDisp(rl_array.reg, rl_index.reg, scale, data_offset, rl_src.reg, size);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001768 }
Ian Rogersa9a82542013-10-04 11:17:26 -07001769 if (card_mark) {
Ian Rogers773aab12013-10-14 13:50:10 -07001770 // Free rl_index if its a temp. Ensures there are 2 free regs for card mark.
Mark Mendell343adb52013-12-18 06:02:17 -08001771 if (!constant_index) {
buzbee091cc402014-03-31 10:14:40 -07001772 FreeTemp(rl_index.reg);
Mark Mendell343adb52013-12-18 06:02:17 -08001773 }
buzbee2700f7e2014-03-07 09:46:20 -08001774 MarkGCCard(rl_src.reg, rl_array.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001775 }
1776}
1777
Mark Mendell4708dcd2014-01-22 09:05:18 -08001778RegLocation X86Mir2Lir::GenShiftImmOpLong(Instruction::Code opcode, RegLocation rl_dest,
1779 RegLocation rl_src, int shift_amount) {
Mark Mendelle87f9b52014-04-30 14:13:18 -04001780 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
Chao-ying Fua0147762014-06-06 18:38:49 -07001781 if (Gen64Bit()) {
1782 OpKind op = static_cast<OpKind>(0); /* Make gcc happy */
1783 switch (opcode) {
1784 case Instruction::SHL_LONG:
1785 case Instruction::SHL_LONG_2ADDR:
1786 op = kOpLsl;
1787 break;
1788 case Instruction::SHR_LONG:
1789 case Instruction::SHR_LONG_2ADDR:
1790 op = kOpAsr;
1791 break;
1792 case Instruction::USHR_LONG:
1793 case Instruction::USHR_LONG_2ADDR:
1794 op = kOpLsr;
1795 break;
1796 default:
1797 LOG(FATAL) << "Unexpected case";
1798 }
1799 OpRegRegImm(op, rl_result.reg, rl_src.reg, shift_amount);
1800 } else {
1801 switch (opcode) {
1802 case Instruction::SHL_LONG:
1803 case Instruction::SHL_LONG_2ADDR:
1804 DCHECK_NE(shift_amount, 1); // Prevent a double store from happening.
1805 if (shift_amount == 32) {
1806 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetLow());
1807 LoadConstant(rl_result.reg.GetLow(), 0);
1808 } else if (shift_amount > 31) {
1809 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetLow());
1810 NewLIR2(kX86Sal32RI, rl_result.reg.GetHighReg(), shift_amount - 32);
1811 LoadConstant(rl_result.reg.GetLow(), 0);
1812 } else {
Mark Mendellb9b9d662014-06-16 13:03:42 -04001813 OpRegCopy(rl_result.reg.GetLow(), rl_src.reg.GetLow());
Chao-ying Fua0147762014-06-06 18:38:49 -07001814 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetHigh());
1815 NewLIR3(kX86Shld32RRI, rl_result.reg.GetHighReg(), rl_result.reg.GetLowReg(),
1816 shift_amount);
1817 NewLIR2(kX86Sal32RI, rl_result.reg.GetLowReg(), shift_amount);
1818 }
1819 break;
1820 case Instruction::SHR_LONG:
1821 case Instruction::SHR_LONG_2ADDR:
1822 if (shift_amount == 32) {
1823 OpRegCopy(rl_result.reg.GetLow(), rl_src.reg.GetHigh());
1824 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetHigh());
1825 NewLIR2(kX86Sar32RI, rl_result.reg.GetHighReg(), 31);
1826 } else if (shift_amount > 31) {
1827 OpRegCopy(rl_result.reg.GetLow(), rl_src.reg.GetHigh());
1828 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetHigh());
1829 NewLIR2(kX86Sar32RI, rl_result.reg.GetLowReg(), shift_amount - 32);
1830 NewLIR2(kX86Sar32RI, rl_result.reg.GetHighReg(), 31);
1831 } else {
Mark Mendellb9b9d662014-06-16 13:03:42 -04001832 OpRegCopy(rl_result.reg.GetLow(), rl_src.reg.GetLow());
Chao-ying Fua0147762014-06-06 18:38:49 -07001833 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetHigh());
1834 NewLIR3(kX86Shrd32RRI, rl_result.reg.GetLowReg(), rl_result.reg.GetHighReg(),
1835 shift_amount);
1836 NewLIR2(kX86Sar32RI, rl_result.reg.GetHighReg(), shift_amount);
1837 }
1838 break;
1839 case Instruction::USHR_LONG:
1840 case Instruction::USHR_LONG_2ADDR:
1841 if (shift_amount == 32) {
1842 OpRegCopy(rl_result.reg.GetLow(), rl_src.reg.GetHigh());
1843 LoadConstant(rl_result.reg.GetHigh(), 0);
1844 } else if (shift_amount > 31) {
1845 OpRegCopy(rl_result.reg.GetLow(), rl_src.reg.GetHigh());
1846 NewLIR2(kX86Shr32RI, rl_result.reg.GetLowReg(), shift_amount - 32);
1847 LoadConstant(rl_result.reg.GetHigh(), 0);
1848 } else {
Mark Mendellb9b9d662014-06-16 13:03:42 -04001849 OpRegCopy(rl_result.reg.GetLow(), rl_src.reg.GetLow());
Chao-ying Fua0147762014-06-06 18:38:49 -07001850 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetHigh());
1851 NewLIR3(kX86Shrd32RRI, rl_result.reg.GetLowReg(), rl_result.reg.GetHighReg(),
1852 shift_amount);
1853 NewLIR2(kX86Shr32RI, rl_result.reg.GetHighReg(), shift_amount);
1854 }
1855 break;
1856 default:
1857 LOG(FATAL) << "Unexpected case";
1858 }
Mark Mendell4708dcd2014-01-22 09:05:18 -08001859 }
1860 return rl_result;
1861}
1862
Brian Carlstrom7940e442013-07-12 13:46:57 -07001863void X86Mir2Lir::GenShiftImmOpLong(Instruction::Code opcode, RegLocation rl_dest,
Mark Mendell4708dcd2014-01-22 09:05:18 -08001864 RegLocation rl_src, RegLocation rl_shift) {
1865 // Per spec, we only care about low 6 bits of shift amount.
1866 int shift_amount = mir_graph_->ConstantValue(rl_shift) & 0x3f;
1867 if (shift_amount == 0) {
1868 rl_src = LoadValueWide(rl_src, kCoreReg);
1869 StoreValueWide(rl_dest, rl_src);
1870 return;
1871 } else if (shift_amount == 1 &&
1872 (opcode == Instruction::SHL_LONG || opcode == Instruction::SHL_LONG_2ADDR)) {
1873 // Need to handle this here to avoid calling StoreValueWide twice.
1874 GenAddLong(Instruction::ADD_LONG, rl_dest, rl_src, rl_src);
1875 return;
1876 }
1877 if (BadOverlap(rl_src, rl_dest)) {
1878 GenShiftOpLong(opcode, rl_dest, rl_src, rl_shift);
1879 return;
1880 }
1881 rl_src = LoadValueWide(rl_src, kCoreReg);
1882 RegLocation rl_result = GenShiftImmOpLong(opcode, rl_dest, rl_src, shift_amount);
1883 StoreValueWide(rl_dest, rl_result);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001884}
1885
1886void X86Mir2Lir::GenArithImmOpLong(Instruction::Code opcode,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001887 RegLocation rl_dest, RegLocation rl_src1, RegLocation rl_src2) {
Chao-ying Fua0147762014-06-06 18:38:49 -07001888 bool isConstSuccess = false;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001889 switch (opcode) {
1890 case Instruction::ADD_LONG:
1891 case Instruction::AND_LONG:
1892 case Instruction::OR_LONG:
1893 case Instruction::XOR_LONG:
1894 if (rl_src2.is_const) {
Chao-ying Fua0147762014-06-06 18:38:49 -07001895 isConstSuccess = GenLongLongImm(rl_dest, rl_src1, rl_src2, opcode);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001896 } else {
1897 DCHECK(rl_src1.is_const);
Chao-ying Fua0147762014-06-06 18:38:49 -07001898 isConstSuccess = GenLongLongImm(rl_dest, rl_src2, rl_src1, opcode);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001899 }
1900 break;
1901 case Instruction::SUB_LONG:
1902 case Instruction::SUB_LONG_2ADDR:
1903 if (rl_src2.is_const) {
Chao-ying Fua0147762014-06-06 18:38:49 -07001904 isConstSuccess = GenLongLongImm(rl_dest, rl_src1, rl_src2, opcode);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001905 } else {
1906 GenSubLong(opcode, rl_dest, rl_src1, rl_src2);
Chao-ying Fua0147762014-06-06 18:38:49 -07001907 isConstSuccess = true;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001908 }
1909 break;
1910 case Instruction::ADD_LONG_2ADDR:
1911 case Instruction::OR_LONG_2ADDR:
1912 case Instruction::XOR_LONG_2ADDR:
1913 case Instruction::AND_LONG_2ADDR:
1914 if (rl_src2.is_const) {
Mark Mendelle87f9b52014-04-30 14:13:18 -04001915 if (GenerateTwoOperandInstructions()) {
Chao-ying Fua0147762014-06-06 18:38:49 -07001916 isConstSuccess = GenLongImm(rl_dest, rl_src2, opcode);
Mark Mendelle87f9b52014-04-30 14:13:18 -04001917 } else {
Chao-ying Fua0147762014-06-06 18:38:49 -07001918 isConstSuccess = GenLongLongImm(rl_dest, rl_src1, rl_src2, opcode);
Mark Mendelle87f9b52014-04-30 14:13:18 -04001919 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08001920 } else {
1921 DCHECK(rl_src1.is_const);
Chao-ying Fua0147762014-06-06 18:38:49 -07001922 isConstSuccess = GenLongLongImm(rl_dest, rl_src2, rl_src1, opcode);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001923 }
1924 break;
1925 default:
Chao-ying Fua0147762014-06-06 18:38:49 -07001926 isConstSuccess = false;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001927 break;
1928 }
Chao-ying Fua0147762014-06-06 18:38:49 -07001929
1930 if (!isConstSuccess) {
1931 // Default - bail to non-const handler.
1932 GenArithOpLong(opcode, rl_dest, rl_src1, rl_src2);
1933 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08001934}
1935
1936bool X86Mir2Lir::IsNoOp(Instruction::Code op, int32_t value) {
1937 switch (op) {
1938 case Instruction::AND_LONG_2ADDR:
1939 case Instruction::AND_LONG:
1940 return value == -1;
1941 case Instruction::OR_LONG:
1942 case Instruction::OR_LONG_2ADDR:
1943 case Instruction::XOR_LONG:
1944 case Instruction::XOR_LONG_2ADDR:
1945 return value == 0;
1946 default:
1947 return false;
1948 }
1949}
1950
1951X86OpCode X86Mir2Lir::GetOpcode(Instruction::Code op, RegLocation dest, RegLocation rhs,
1952 bool is_high_op) {
1953 bool rhs_in_mem = rhs.location != kLocPhysReg;
1954 bool dest_in_mem = dest.location != kLocPhysReg;
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001955 bool is64Bit = Gen64Bit();
Mark Mendelle02d48f2014-01-15 11:19:23 -08001956 DCHECK(!rhs_in_mem || !dest_in_mem);
1957 switch (op) {
1958 case Instruction::ADD_LONG:
1959 case Instruction::ADD_LONG_2ADDR:
1960 if (dest_in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001961 return is64Bit ? kX86Add64MR : is_high_op ? kX86Adc32MR : kX86Add32MR;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001962 } else if (rhs_in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001963 return is64Bit ? kX86Add64RM : is_high_op ? kX86Adc32RM : kX86Add32RM;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001964 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001965 return is64Bit ? kX86Add64RR : is_high_op ? kX86Adc32RR : kX86Add32RR;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001966 case Instruction::SUB_LONG:
1967 case Instruction::SUB_LONG_2ADDR:
1968 if (dest_in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001969 return is64Bit ? kX86Sub64MR : is_high_op ? kX86Sbb32MR : kX86Sub32MR;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001970 } else if (rhs_in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001971 return is64Bit ? kX86Sub64RM : is_high_op ? kX86Sbb32RM : kX86Sub32RM;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001972 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001973 return is64Bit ? kX86Sub64RR : is_high_op ? kX86Sbb32RR : kX86Sub32RR;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001974 case Instruction::AND_LONG_2ADDR:
1975 case Instruction::AND_LONG:
1976 if (dest_in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001977 return is64Bit ? kX86And64MR : kX86And32MR;
1978 }
1979 if (is64Bit) {
1980 return rhs_in_mem ? kX86And64RM : kX86And64RR;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001981 }
1982 return rhs_in_mem ? kX86And32RM : kX86And32RR;
1983 case Instruction::OR_LONG:
1984 case Instruction::OR_LONG_2ADDR:
1985 if (dest_in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001986 return is64Bit ? kX86Or64MR : kX86Or32MR;
1987 }
1988 if (is64Bit) {
1989 return rhs_in_mem ? kX86Or64RM : kX86Or64RR;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001990 }
1991 return rhs_in_mem ? kX86Or32RM : kX86Or32RR;
1992 case Instruction::XOR_LONG:
1993 case Instruction::XOR_LONG_2ADDR:
1994 if (dest_in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001995 return is64Bit ? kX86Xor64MR : kX86Xor32MR;
1996 }
1997 if (is64Bit) {
1998 return rhs_in_mem ? kX86Xor64RM : kX86Xor64RR;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001999 }
2000 return rhs_in_mem ? kX86Xor32RM : kX86Xor32RR;
2001 default:
2002 LOG(FATAL) << "Unexpected opcode: " << op;
2003 return kX86Add32RR;
2004 }
2005}
2006
2007X86OpCode X86Mir2Lir::GetOpcode(Instruction::Code op, RegLocation loc, bool is_high_op,
2008 int32_t value) {
2009 bool in_mem = loc.location != kLocPhysReg;
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002010 bool is64Bit = Gen64Bit();
Mark Mendelle02d48f2014-01-15 11:19:23 -08002011 bool byte_imm = IS_SIMM8(value);
buzbee091cc402014-03-31 10:14:40 -07002012 DCHECK(in_mem || !loc.reg.IsFloat());
Mark Mendelle02d48f2014-01-15 11:19:23 -08002013 switch (op) {
2014 case Instruction::ADD_LONG:
2015 case Instruction::ADD_LONG_2ADDR:
2016 if (byte_imm) {
2017 if (in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002018 return is64Bit ? kX86Add64MI8 : is_high_op ? kX86Adc32MI8 : kX86Add32MI8;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002019 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002020 return is64Bit ? kX86Add64RI8 : is_high_op ? kX86Adc32RI8 : kX86Add32RI8;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002021 }
2022 if (in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002023 return is64Bit ? kX86Add64MI : is_high_op ? kX86Adc32MI : kX86Add32MI;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002024 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002025 return is64Bit ? kX86Add64RI : is_high_op ? kX86Adc32RI : kX86Add32RI;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002026 case Instruction::SUB_LONG:
2027 case Instruction::SUB_LONG_2ADDR:
2028 if (byte_imm) {
2029 if (in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002030 return is64Bit ? kX86Sub64MI8 : is_high_op ? kX86Sbb32MI8 : kX86Sub32MI8;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002031 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002032 return is64Bit ? kX86Sub64RI8 : is_high_op ? kX86Sbb32RI8 : kX86Sub32RI8;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002033 }
2034 if (in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002035 return is64Bit ? kX86Sub64MI : is_high_op ? kX86Sbb32MI : kX86Sub32MI;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002036 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002037 return is64Bit ? kX86Sub64RI : is_high_op ? kX86Sbb32RI : kX86Sub32RI;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002038 case Instruction::AND_LONG_2ADDR:
2039 case Instruction::AND_LONG:
2040 if (byte_imm) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002041 if (is64Bit) {
2042 return in_mem ? kX86And64MI8 : kX86And64RI8;
2043 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08002044 return in_mem ? kX86And32MI8 : kX86And32RI8;
2045 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002046 if (is64Bit) {
2047 return in_mem ? kX86And64MI : kX86And64RI;
2048 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08002049 return in_mem ? kX86And32MI : kX86And32RI;
2050 case Instruction::OR_LONG:
2051 case Instruction::OR_LONG_2ADDR:
2052 if (byte_imm) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002053 if (is64Bit) {
2054 return in_mem ? kX86Or64MI8 : kX86Or64RI8;
2055 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08002056 return in_mem ? kX86Or32MI8 : kX86Or32RI8;
2057 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002058 if (is64Bit) {
2059 return in_mem ? kX86Or64MI : kX86Or64RI;
2060 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08002061 return in_mem ? kX86Or32MI : kX86Or32RI;
2062 case Instruction::XOR_LONG:
2063 case Instruction::XOR_LONG_2ADDR:
2064 if (byte_imm) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002065 if (is64Bit) {
2066 return in_mem ? kX86Xor64MI8 : kX86Xor64RI8;
2067 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08002068 return in_mem ? kX86Xor32MI8 : kX86Xor32RI8;
2069 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002070 if (is64Bit) {
2071 return in_mem ? kX86Xor64MI : kX86Xor64RI;
2072 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08002073 return in_mem ? kX86Xor32MI : kX86Xor32RI;
2074 default:
2075 LOG(FATAL) << "Unexpected opcode: " << op;
2076 return kX86Add32MI;
2077 }
2078}
2079
Chao-ying Fua0147762014-06-06 18:38:49 -07002080bool X86Mir2Lir::GenLongImm(RegLocation rl_dest, RegLocation rl_src, Instruction::Code op) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08002081 DCHECK(rl_src.is_const);
2082 int64_t val = mir_graph_->ConstantValueWide(rl_src);
Chao-ying Fua0147762014-06-06 18:38:49 -07002083
2084 if (Gen64Bit()) {
2085 // We can do with imm only if it fits 32 bit
2086 if (val != (static_cast<int64_t>(static_cast<int32_t>(val)))) {
2087 return false;
2088 }
2089
2090 rl_dest = UpdateLocWideTyped(rl_dest, kCoreReg);
2091
2092 if ((rl_dest.location == kLocDalvikFrame) ||
2093 (rl_dest.location == kLocCompilerTemp)) {
2094 int r_base = TargetReg(kSp).GetReg();
2095 int displacement = SRegOffset(rl_dest.s_reg_low);
2096
Vladimir Marko8dea81c2014-06-06 14:50:36 +01002097 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
Chao-ying Fua0147762014-06-06 18:38:49 -07002098 X86OpCode x86op = GetOpcode(op, rl_dest, false, val);
2099 LIR *lir = NewLIR3(x86op, r_base, displacement + LOWORD_OFFSET, val);
2100 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
2101 true /* is_load */, true /* is64bit */);
2102 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
2103 false /* is_load */, true /* is64bit */);
2104 return true;
2105 }
2106
2107 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
2108 DCHECK_EQ(rl_result.location, kLocPhysReg);
2109 DCHECK(!rl_result.reg.IsFloat());
2110
2111 X86OpCode x86op = GetOpcode(op, rl_result, false, val);
2112 NewLIR2(x86op, rl_result.reg.GetReg(), val);
2113
2114 StoreValueWide(rl_dest, rl_result);
2115 return true;
2116 }
2117
Mark Mendelle02d48f2014-01-15 11:19:23 -08002118 int32_t val_lo = Low32Bits(val);
2119 int32_t val_hi = High32Bits(val);
buzbee30adc732014-05-09 15:10:18 -07002120 rl_dest = UpdateLocWideTyped(rl_dest, kCoreReg);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002121
2122 // Can we just do this into memory?
2123 if ((rl_dest.location == kLocDalvikFrame) ||
2124 (rl_dest.location == kLocCompilerTemp)) {
buzbee2700f7e2014-03-07 09:46:20 -08002125 int r_base = TargetReg(kSp).GetReg();
Mark Mendelle02d48f2014-01-15 11:19:23 -08002126 int displacement = SRegOffset(rl_dest.s_reg_low);
2127
Vladimir Marko8dea81c2014-06-06 14:50:36 +01002128 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002129 if (!IsNoOp(op, val_lo)) {
2130 X86OpCode x86op = GetOpcode(op, rl_dest, false, val_lo);
buzbee2700f7e2014-03-07 09:46:20 -08002131 LIR *lir = NewLIR3(x86op, r_base, displacement + LOWORD_OFFSET, val_lo);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002132 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
Serguei Katkov217fe732014-03-27 14:41:56 +07002133 true /* is_load */, true /* is64bit */);
2134 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
Mark Mendelle02d48f2014-01-15 11:19:23 -08002135 false /* is_load */, true /* is64bit */);
2136 }
2137 if (!IsNoOp(op, val_hi)) {
2138 X86OpCode x86op = GetOpcode(op, rl_dest, true, val_hi);
buzbee2700f7e2014-03-07 09:46:20 -08002139 LIR *lir = NewLIR3(x86op, r_base, displacement + HIWORD_OFFSET, val_hi);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002140 AnnotateDalvikRegAccess(lir, (displacement + HIWORD_OFFSET) >> 2,
Serguei Katkov217fe732014-03-27 14:41:56 +07002141 true /* is_load */, true /* is64bit */);
2142 AnnotateDalvikRegAccess(lir, (displacement + HIWORD_OFFSET) >> 2,
Mark Mendelle02d48f2014-01-15 11:19:23 -08002143 false /* is_load */, true /* is64bit */);
2144 }
Chao-ying Fua0147762014-06-06 18:38:49 -07002145 return true;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002146 }
2147
2148 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
2149 DCHECK_EQ(rl_result.location, kLocPhysReg);
buzbee091cc402014-03-31 10:14:40 -07002150 DCHECK(!rl_result.reg.IsFloat());
Mark Mendelle02d48f2014-01-15 11:19:23 -08002151
2152 if (!IsNoOp(op, val_lo)) {
2153 X86OpCode x86op = GetOpcode(op, rl_result, false, val_lo);
buzbee2700f7e2014-03-07 09:46:20 -08002154 NewLIR2(x86op, rl_result.reg.GetLowReg(), val_lo);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002155 }
2156 if (!IsNoOp(op, val_hi)) {
2157 X86OpCode x86op = GetOpcode(op, rl_result, true, val_hi);
Bill Buzbee00e1ec62014-02-27 23:44:13 +00002158 NewLIR2(x86op, rl_result.reg.GetHighReg(), val_hi);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002159 }
2160 StoreValueWide(rl_dest, rl_result);
Chao-ying Fua0147762014-06-06 18:38:49 -07002161 return true;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002162}
2163
Chao-ying Fua0147762014-06-06 18:38:49 -07002164bool X86Mir2Lir::GenLongLongImm(RegLocation rl_dest, RegLocation rl_src1,
Mark Mendelle02d48f2014-01-15 11:19:23 -08002165 RegLocation rl_src2, Instruction::Code op) {
2166 DCHECK(rl_src2.is_const);
2167 int64_t val = mir_graph_->ConstantValueWide(rl_src2);
Chao-ying Fua0147762014-06-06 18:38:49 -07002168
2169 if (Gen64Bit()) {
2170 // We can do with imm only if it fits 32 bit
2171 if (val != (static_cast<int64_t>(static_cast<int32_t>(val)))) {
2172 return false;
2173 }
2174 if (rl_dest.location == kLocPhysReg &&
2175 rl_src1.location == kLocPhysReg && !rl_dest.reg.IsFloat()) {
2176 X86OpCode x86op = GetOpcode(op, rl_dest, false, val);
2177 NewLIR2(x86op, rl_dest.reg.GetReg(), val);
2178 StoreFinalValueWide(rl_dest, rl_dest);
2179 return true;
2180 }
2181
2182 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
2183 // We need the values to be in a temporary
2184 RegLocation rl_result = ForceTempWide(rl_src1);
2185
2186 X86OpCode x86op = GetOpcode(op, rl_result, false, val);
2187 NewLIR2(x86op, rl_result.reg.GetReg(), val);
2188
2189 StoreFinalValueWide(rl_dest, rl_result);
2190 return true;
2191 }
2192
Mark Mendelle02d48f2014-01-15 11:19:23 -08002193 int32_t val_lo = Low32Bits(val);
2194 int32_t val_hi = High32Bits(val);
buzbee30adc732014-05-09 15:10:18 -07002195 rl_dest = UpdateLocWideTyped(rl_dest, kCoreReg);
2196 rl_src1 = UpdateLocWideTyped(rl_src1, kCoreReg);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002197
2198 // Can we do this directly into the destination registers?
2199 if (rl_dest.location == kLocPhysReg && rl_src1.location == kLocPhysReg &&
buzbee2700f7e2014-03-07 09:46:20 -08002200 rl_dest.reg.GetLowReg() == rl_src1.reg.GetLowReg() &&
buzbee091cc402014-03-31 10:14:40 -07002201 rl_dest.reg.GetHighReg() == rl_src1.reg.GetHighReg() && !rl_dest.reg.IsFloat()) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08002202 if (!IsNoOp(op, val_lo)) {
2203 X86OpCode x86op = GetOpcode(op, rl_dest, false, val_lo);
buzbee2700f7e2014-03-07 09:46:20 -08002204 NewLIR2(x86op, rl_dest.reg.GetLowReg(), val_lo);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002205 }
2206 if (!IsNoOp(op, val_hi)) {
2207 X86OpCode x86op = GetOpcode(op, rl_dest, true, val_hi);
Bill Buzbee00e1ec62014-02-27 23:44:13 +00002208 NewLIR2(x86op, rl_dest.reg.GetHighReg(), val_hi);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002209 }
Maxim Kazantsev653f2bf2014-02-13 15:11:17 +07002210
2211 StoreFinalValueWide(rl_dest, rl_dest);
Chao-ying Fua0147762014-06-06 18:38:49 -07002212 return true;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002213 }
2214
2215 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
2216 DCHECK_EQ(rl_src1.location, kLocPhysReg);
2217
2218 // We need the values to be in a temporary
2219 RegLocation rl_result = ForceTempWide(rl_src1);
2220 if (!IsNoOp(op, val_lo)) {
2221 X86OpCode x86op = GetOpcode(op, rl_result, false, val_lo);
buzbee2700f7e2014-03-07 09:46:20 -08002222 NewLIR2(x86op, rl_result.reg.GetLowReg(), val_lo);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002223 }
2224 if (!IsNoOp(op, val_hi)) {
2225 X86OpCode x86op = GetOpcode(op, rl_result, true, val_hi);
Bill Buzbee00e1ec62014-02-27 23:44:13 +00002226 NewLIR2(x86op, rl_result.reg.GetHighReg(), val_hi);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002227 }
2228
2229 StoreFinalValueWide(rl_dest, rl_result);
Chao-ying Fua0147762014-06-06 18:38:49 -07002230 return true;
Brian Carlstrom7940e442013-07-12 13:46:57 -07002231}
2232
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002233// For final classes there are no sub-classes to check and so we can answer the instance-of
2234// question with simple comparisons. Use compares to memory and SETEQ to optimize for x86.
2235void X86Mir2Lir::GenInstanceofFinal(bool use_declaring_class, uint32_t type_idx,
2236 RegLocation rl_dest, RegLocation rl_src) {
buzbeea0cd2d72014-06-01 09:33:49 -07002237 RegLocation object = LoadValue(rl_src, kRefReg);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002238 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002239 RegStorage result_reg = rl_result.reg;
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002240
Chao-ying Fu7e399fd2014-06-10 18:11:11 -07002241 // For 32-bit, SETcc only works with EAX..EDX.
2242 if (result_reg == object.reg || !IsByteRegister(result_reg)) {
Mark Mendelle87f9b52014-04-30 14:13:18 -04002243 result_reg = AllocateByteRegister();
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002244 }
2245
2246 // Assume that there is no match.
2247 LoadConstant(result_reg, 0);
buzbee2700f7e2014-03-07 09:46:20 -08002248 LIR* null_branchover = OpCmpImmBranch(kCondEq, object.reg, 0, NULL);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002249
Mark Mendellade54a22014-06-09 12:49:55 -04002250 // We will use this register to compare to memory below.
2251 // References are 32 bit in memory, and 64 bit in registers (in 64 bit mode).
2252 // For this reason, force allocation of a 32 bit register to use, so that the
2253 // compare to memory will be done using a 32 bit comparision.
2254 // The LoadRefDisp(s) below will work normally, even in 64 bit mode.
2255 RegStorage check_class = AllocTemp();
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002256
2257 // If Method* is already in a register, we can save a copy.
2258 RegLocation rl_method = mir_graph_->GetMethodLoc();
Dmitry Petrochenko9ee801f2014-05-12 11:31:37 +07002259 int32_t offset_of_type = mirror::Array::DataOffset(sizeof(mirror::HeapReference<mirror::Class*>)).Int32Value() +
2260 (sizeof(mirror::HeapReference<mirror::Class*>) * type_idx);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002261
2262 if (rl_method.location == kLocPhysReg) {
2263 if (use_declaring_class) {
buzbee695d13a2014-04-19 13:32:20 -07002264 LoadRefDisp(rl_method.reg, mirror::ArtMethod::DeclaringClassOffset().Int32Value(),
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002265 check_class);
2266 } else {
buzbee695d13a2014-04-19 13:32:20 -07002267 LoadRefDisp(rl_method.reg, mirror::ArtMethod::DexCacheResolvedTypesOffset().Int32Value(),
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002268 check_class);
buzbee695d13a2014-04-19 13:32:20 -07002269 LoadRefDisp(check_class, offset_of_type, check_class);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002270 }
2271 } else {
2272 LoadCurrMethodDirect(check_class);
2273 if (use_declaring_class) {
buzbee695d13a2014-04-19 13:32:20 -07002274 LoadRefDisp(check_class, mirror::ArtMethod::DeclaringClassOffset().Int32Value(),
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002275 check_class);
2276 } else {
buzbee695d13a2014-04-19 13:32:20 -07002277 LoadRefDisp(check_class, mirror::ArtMethod::DexCacheResolvedTypesOffset().Int32Value(),
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002278 check_class);
buzbee695d13a2014-04-19 13:32:20 -07002279 LoadRefDisp(check_class, offset_of_type, check_class);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002280 }
2281 }
2282
2283 // Compare the computed class to the class in the object.
2284 DCHECK_EQ(object.location, kLocPhysReg);
buzbee2700f7e2014-03-07 09:46:20 -08002285 OpRegMem(kOpCmp, check_class, object.reg, mirror::Object::ClassOffset().Int32Value());
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002286
2287 // Set the low byte of the result to 0 or 1 from the compare condition code.
buzbee2700f7e2014-03-07 09:46:20 -08002288 NewLIR2(kX86Set8R, result_reg.GetReg(), kX86CondEq);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002289
2290 LIR* target = NewLIR0(kPseudoTargetLabel);
2291 null_branchover->target = target;
2292 FreeTemp(check_class);
2293 if (IsTemp(result_reg)) {
buzbee2700f7e2014-03-07 09:46:20 -08002294 OpRegCopy(rl_result.reg, result_reg);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002295 FreeTemp(result_reg);
2296 }
2297 StoreValue(rl_dest, rl_result);
2298}
2299
Mark Mendell6607d972014-02-10 06:54:18 -08002300void X86Mir2Lir::GenInstanceofCallingHelper(bool needs_access_check, bool type_known_final,
2301 bool type_known_abstract, bool use_declaring_class,
2302 bool can_assume_type_is_in_dex_cache,
2303 uint32_t type_idx, RegLocation rl_dest,
2304 RegLocation rl_src) {
2305 FlushAllRegs();
2306 // May generate a call - use explicit registers.
2307 LockCallTemps();
2308 LoadCurrMethodDirect(TargetReg(kArg1)); // kArg1 gets current Method*.
buzbee2700f7e2014-03-07 09:46:20 -08002309 RegStorage class_reg = TargetReg(kArg2); // kArg2 will hold the Class*.
Mark Mendell6607d972014-02-10 06:54:18 -08002310 // Reference must end up in kArg0.
2311 if (needs_access_check) {
2312 // Check we have access to type_idx and if not throw IllegalAccessError,
2313 // Caller function returns Class* in kArg0.
buzbee33ae5582014-06-12 14:56:32 -07002314 if (cu_->target64) {
Dmitry Petrochenko9ee801f2014-05-12 11:31:37 +07002315 CallRuntimeHelperImm(QUICK_ENTRYPOINT_OFFSET(8, pInitializeTypeAndVerifyAccess),
2316 type_idx, true);
2317 } else {
2318 CallRuntimeHelperImm(QUICK_ENTRYPOINT_OFFSET(4, pInitializeTypeAndVerifyAccess),
2319 type_idx, true);
2320 }
Mark Mendell6607d972014-02-10 06:54:18 -08002321 OpRegCopy(class_reg, TargetReg(kRet0));
2322 LoadValueDirectFixed(rl_src, TargetReg(kArg0));
2323 } else if (use_declaring_class) {
2324 LoadValueDirectFixed(rl_src, TargetReg(kArg0));
buzbee695d13a2014-04-19 13:32:20 -07002325 LoadRefDisp(TargetReg(kArg1), mirror::ArtMethod::DeclaringClassOffset().Int32Value(),
buzbee2700f7e2014-03-07 09:46:20 -08002326 class_reg);
Mark Mendell6607d972014-02-10 06:54:18 -08002327 } else {
2328 // Load dex cache entry into class_reg (kArg2).
2329 LoadValueDirectFixed(rl_src, TargetReg(kArg0));
buzbee695d13a2014-04-19 13:32:20 -07002330 LoadRefDisp(TargetReg(kArg1), mirror::ArtMethod::DexCacheResolvedTypesOffset().Int32Value(),
buzbee2700f7e2014-03-07 09:46:20 -08002331 class_reg);
Mark Mendell6607d972014-02-10 06:54:18 -08002332 int32_t offset_of_type =
buzbeea0cd2d72014-06-01 09:33:49 -07002333 mirror::Array::DataOffset(sizeof(mirror::HeapReference<mirror::Class*>)).Int32Value() +
2334 (sizeof(mirror::HeapReference<mirror::Class*>) * type_idx);
buzbee695d13a2014-04-19 13:32:20 -07002335 LoadRefDisp(class_reg, offset_of_type, class_reg);
Mark Mendell6607d972014-02-10 06:54:18 -08002336 if (!can_assume_type_is_in_dex_cache) {
2337 // Need to test presence of type in dex cache at runtime.
2338 LIR* hop_branch = OpCmpImmBranch(kCondNe, class_reg, 0, NULL);
2339 // Type is not resolved. Call out to helper, which will return resolved type in kRet0/kArg0.
buzbee33ae5582014-06-12 14:56:32 -07002340 if (cu_->target64) {
Dmitry Petrochenko9ee801f2014-05-12 11:31:37 +07002341 CallRuntimeHelperImm(QUICK_ENTRYPOINT_OFFSET(8, pInitializeType), type_idx, true);
2342 } else {
2343 CallRuntimeHelperImm(QUICK_ENTRYPOINT_OFFSET(4, pInitializeType), type_idx, true);
2344 }
Mark Mendell6607d972014-02-10 06:54:18 -08002345 OpRegCopy(TargetReg(kArg2), TargetReg(kRet0)); // Align usage with fast path.
2346 LoadValueDirectFixed(rl_src, TargetReg(kArg0)); /* Reload Ref. */
2347 // Rejoin code paths
2348 LIR* hop_target = NewLIR0(kPseudoTargetLabel);
2349 hop_branch->target = hop_target;
2350 }
2351 }
2352 /* kArg0 is ref, kArg2 is class. If ref==null, use directly as bool result. */
buzbeea0cd2d72014-06-01 09:33:49 -07002353 RegLocation rl_result = GetReturn(kRefReg);
Mark Mendell6607d972014-02-10 06:54:18 -08002354
Alexei Zavjalov95455002014-06-09 23:27:46 +07002355 // On x86-64 kArg0 is not EAX, so we have to copy ref from kArg0 to EAX.
2356 if (Gen64Bit()) {
2357 OpRegCopy(rl_result.reg, TargetReg(kArg0));
2358 }
2359
Chao-ying Fu7e399fd2014-06-10 18:11:11 -07002360 // For 32-bit, SETcc only works with EAX..EDX.
buzbee091cc402014-03-31 10:14:40 -07002361 DCHECK_LT(rl_result.reg.GetRegNum(), 4);
Mark Mendell6607d972014-02-10 06:54:18 -08002362
2363 // Is the class NULL?
2364 LIR* branch1 = OpCmpImmBranch(kCondEq, TargetReg(kArg0), 0, NULL);
2365
2366 /* Load object->klass_. */
2367 DCHECK_EQ(mirror::Object::ClassOffset().Int32Value(), 0);
buzbee695d13a2014-04-19 13:32:20 -07002368 LoadRefDisp(TargetReg(kArg0), mirror::Object::ClassOffset().Int32Value(), TargetReg(kArg1));
Mark Mendell6607d972014-02-10 06:54:18 -08002369 /* kArg0 is ref, kArg1 is ref->klass_, kArg2 is class. */
2370 LIR* branchover = nullptr;
2371 if (type_known_final) {
2372 // Ensure top 3 bytes of result are 0.
buzbee2700f7e2014-03-07 09:46:20 -08002373 LoadConstant(rl_result.reg, 0);
Mark Mendell6607d972014-02-10 06:54:18 -08002374 OpRegReg(kOpCmp, TargetReg(kArg1), TargetReg(kArg2));
2375 // Set the low byte of the result to 0 or 1 from the compare condition code.
Bill Buzbee00e1ec62014-02-27 23:44:13 +00002376 NewLIR2(kX86Set8R, rl_result.reg.GetReg(), kX86CondEq);
Mark Mendell6607d972014-02-10 06:54:18 -08002377 } else {
2378 if (!type_known_abstract) {
buzbee2700f7e2014-03-07 09:46:20 -08002379 LoadConstant(rl_result.reg, 1); // Assume result succeeds.
Mark Mendell6607d972014-02-10 06:54:18 -08002380 branchover = OpCmpBranch(kCondEq, TargetReg(kArg1), TargetReg(kArg2), NULL);
2381 }
2382 OpRegCopy(TargetReg(kArg0), TargetReg(kArg2));
buzbee33ae5582014-06-12 14:56:32 -07002383 if (cu_->target64) {
Dmitry Petrochenko9ee801f2014-05-12 11:31:37 +07002384 OpThreadMem(kOpBlx, QUICK_ENTRYPOINT_OFFSET(8, pInstanceofNonTrivial));
2385 } else {
2386 OpThreadMem(kOpBlx, QUICK_ENTRYPOINT_OFFSET(4, pInstanceofNonTrivial));
2387 }
Mark Mendell6607d972014-02-10 06:54:18 -08002388 }
2389 // TODO: only clobber when type isn't final?
2390 ClobberCallerSave();
2391 /* Branch targets here. */
2392 LIR* target = NewLIR0(kPseudoTargetLabel);
2393 StoreValue(rl_dest, rl_result);
2394 branch1->target = target;
2395 if (branchover != nullptr) {
2396 branchover->target = target;
2397 }
2398}
2399
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002400void X86Mir2Lir::GenArithOpInt(Instruction::Code opcode, RegLocation rl_dest,
2401 RegLocation rl_lhs, RegLocation rl_rhs) {
2402 OpKind op = kOpBkpt;
2403 bool is_div_rem = false;
2404 bool unary = false;
2405 bool shift_op = false;
2406 bool is_two_addr = false;
2407 RegLocation rl_result;
2408 switch (opcode) {
2409 case Instruction::NEG_INT:
2410 op = kOpNeg;
2411 unary = true;
2412 break;
2413 case Instruction::NOT_INT:
2414 op = kOpMvn;
2415 unary = true;
2416 break;
2417 case Instruction::ADD_INT_2ADDR:
2418 is_two_addr = true;
2419 // Fallthrough
2420 case Instruction::ADD_INT:
2421 op = kOpAdd;
2422 break;
2423 case Instruction::SUB_INT_2ADDR:
2424 is_two_addr = true;
2425 // Fallthrough
2426 case Instruction::SUB_INT:
2427 op = kOpSub;
2428 break;
2429 case Instruction::MUL_INT_2ADDR:
2430 is_two_addr = true;
2431 // Fallthrough
2432 case Instruction::MUL_INT:
2433 op = kOpMul;
2434 break;
2435 case Instruction::DIV_INT_2ADDR:
2436 is_two_addr = true;
2437 // Fallthrough
2438 case Instruction::DIV_INT:
2439 op = kOpDiv;
2440 is_div_rem = true;
2441 break;
2442 /* NOTE: returns in kArg1 */
2443 case Instruction::REM_INT_2ADDR:
2444 is_two_addr = true;
2445 // Fallthrough
2446 case Instruction::REM_INT:
2447 op = kOpRem;
2448 is_div_rem = true;
2449 break;
2450 case Instruction::AND_INT_2ADDR:
2451 is_two_addr = true;
2452 // Fallthrough
2453 case Instruction::AND_INT:
2454 op = kOpAnd;
2455 break;
2456 case Instruction::OR_INT_2ADDR:
2457 is_two_addr = true;
2458 // Fallthrough
2459 case Instruction::OR_INT:
2460 op = kOpOr;
2461 break;
2462 case Instruction::XOR_INT_2ADDR:
2463 is_two_addr = true;
2464 // Fallthrough
2465 case Instruction::XOR_INT:
2466 op = kOpXor;
2467 break;
2468 case Instruction::SHL_INT_2ADDR:
2469 is_two_addr = true;
2470 // Fallthrough
2471 case Instruction::SHL_INT:
2472 shift_op = true;
2473 op = kOpLsl;
2474 break;
2475 case Instruction::SHR_INT_2ADDR:
2476 is_two_addr = true;
2477 // Fallthrough
2478 case Instruction::SHR_INT:
2479 shift_op = true;
2480 op = kOpAsr;
2481 break;
2482 case Instruction::USHR_INT_2ADDR:
2483 is_two_addr = true;
2484 // Fallthrough
2485 case Instruction::USHR_INT:
2486 shift_op = true;
2487 op = kOpLsr;
2488 break;
2489 default:
2490 LOG(FATAL) << "Invalid word arith op: " << opcode;
2491 }
2492
Mark Mendelle87f9b52014-04-30 14:13:18 -04002493 // Can we convert to a two address instruction?
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002494 if (!is_two_addr &&
2495 (mir_graph_->SRegToVReg(rl_dest.s_reg_low) ==
2496 mir_graph_->SRegToVReg(rl_lhs.s_reg_low))) {
Mark Mendelle87f9b52014-04-30 14:13:18 -04002497 is_two_addr = true;
2498 }
2499
2500 if (!GenerateTwoOperandInstructions()) {
2501 is_two_addr = false;
2502 }
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002503
2504 // Get the div/rem stuff out of the way.
2505 if (is_div_rem) {
2506 rl_result = GenDivRem(rl_dest, rl_lhs, rl_rhs, op == kOpDiv, true);
2507 StoreValue(rl_dest, rl_result);
2508 return;
2509 }
2510
Vladimir Marko8dea81c2014-06-06 14:50:36 +01002511 // If we generate any memory access below, it will reference a dalvik reg.
2512 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
2513
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002514 if (unary) {
2515 rl_lhs = LoadValue(rl_lhs, kCoreReg);
buzbee30adc732014-05-09 15:10:18 -07002516 rl_result = UpdateLocTyped(rl_dest, kCoreReg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002517 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002518 OpRegReg(op, rl_result.reg, rl_lhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002519 } else {
2520 if (shift_op) {
2521 // X86 doesn't require masking and must use ECX.
buzbee2700f7e2014-03-07 09:46:20 -08002522 RegStorage t_reg = TargetReg(kCount); // rCX
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002523 LoadValueDirectFixed(rl_rhs, t_reg);
2524 if (is_two_addr) {
2525 // Can we do this directly into memory?
buzbee30adc732014-05-09 15:10:18 -07002526 rl_result = UpdateLocTyped(rl_dest, kCoreReg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002527 rl_rhs = LoadValue(rl_rhs, kCoreReg);
2528 if (rl_result.location != kLocPhysReg) {
2529 // Okay, we can do this into memory
buzbee2700f7e2014-03-07 09:46:20 -08002530 OpMemReg(op, rl_result, t_reg.GetReg());
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002531 FreeTemp(t_reg);
2532 return;
buzbee091cc402014-03-31 10:14:40 -07002533 } else if (!rl_result.reg.IsFloat()) {
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002534 // Can do this directly into the result register
buzbee2700f7e2014-03-07 09:46:20 -08002535 OpRegReg(op, rl_result.reg, t_reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002536 FreeTemp(t_reg);
2537 StoreFinalValue(rl_dest, rl_result);
2538 return;
2539 }
2540 }
2541 // Three address form, or we can't do directly.
2542 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2543 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002544 OpRegRegReg(op, rl_result.reg, rl_lhs.reg, t_reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002545 FreeTemp(t_reg);
2546 } else {
2547 // Multiply is 3 operand only (sort of).
2548 if (is_two_addr && op != kOpMul) {
2549 // Can we do this directly into memory?
buzbee30adc732014-05-09 15:10:18 -07002550 rl_result = UpdateLocTyped(rl_dest, kCoreReg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002551 if (rl_result.location == kLocPhysReg) {
Serguei Katkov366f8ae2014-04-15 16:55:26 +07002552 // Ensure res is in a core reg
2553 rl_result = EvalLoc(rl_dest, kCoreReg, true);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002554 // Can we do this from memory directly?
buzbee30adc732014-05-09 15:10:18 -07002555 rl_rhs = UpdateLocTyped(rl_rhs, kCoreReg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002556 if (rl_rhs.location != kLocPhysReg) {
buzbee2700f7e2014-03-07 09:46:20 -08002557 OpRegMem(op, rl_result.reg, rl_rhs);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002558 StoreFinalValue(rl_dest, rl_result);
2559 return;
buzbee091cc402014-03-31 10:14:40 -07002560 } else if (!rl_rhs.reg.IsFloat()) {
buzbee2700f7e2014-03-07 09:46:20 -08002561 OpRegReg(op, rl_result.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002562 StoreFinalValue(rl_dest, rl_result);
2563 return;
2564 }
2565 }
2566 rl_rhs = LoadValue(rl_rhs, kCoreReg);
Serguei Katkovd293fb42014-05-19 15:45:42 +07002567 // It might happen rl_rhs and rl_dest are the same VR
2568 // in this case rl_dest is in reg after LoadValue while
2569 // rl_result is not updated yet, so do this
2570 rl_result = UpdateLocTyped(rl_dest, kCoreReg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002571 if (rl_result.location != kLocPhysReg) {
2572 // Okay, we can do this into memory.
Bill Buzbee00e1ec62014-02-27 23:44:13 +00002573 OpMemReg(op, rl_result, rl_rhs.reg.GetReg());
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002574 return;
buzbee091cc402014-03-31 10:14:40 -07002575 } else if (!rl_result.reg.IsFloat()) {
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002576 // Can do this directly into the result register.
buzbee2700f7e2014-03-07 09:46:20 -08002577 OpRegReg(op, rl_result.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002578 StoreFinalValue(rl_dest, rl_result);
2579 return;
2580 } else {
2581 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2582 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002583 OpRegRegReg(op, rl_result.reg, rl_lhs.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002584 }
2585 } else {
2586 // Try to use reg/memory instructions.
buzbee30adc732014-05-09 15:10:18 -07002587 rl_lhs = UpdateLocTyped(rl_lhs, kCoreReg);
2588 rl_rhs = UpdateLocTyped(rl_rhs, kCoreReg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002589 // We can't optimize with FP registers.
2590 if (!IsOperationSafeWithoutTemps(rl_lhs, rl_rhs)) {
2591 // Something is difficult, so fall back to the standard case.
2592 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2593 rl_rhs = LoadValue(rl_rhs, kCoreReg);
2594 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002595 OpRegRegReg(op, rl_result.reg, rl_lhs.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002596 } else {
2597 // We can optimize by moving to result and using memory operands.
2598 if (rl_rhs.location != kLocPhysReg) {
2599 // Force LHS into result.
Serguei Katkov66da1362014-03-14 13:33:33 +07002600 // We should be careful with order here
2601 // If rl_dest and rl_lhs points to the same VR we should load first
2602 // If the are different we should find a register first for dest
Chao-ying Fua0147762014-06-06 18:38:49 -07002603 if (mir_graph_->SRegToVReg(rl_dest.s_reg_low) ==
2604 mir_graph_->SRegToVReg(rl_lhs.s_reg_low)) {
Serguei Katkov66da1362014-03-14 13:33:33 +07002605 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2606 rl_result = EvalLoc(rl_dest, kCoreReg, true);
Mark Mendelle87f9b52014-04-30 14:13:18 -04002607 // No-op if these are the same.
2608 OpRegCopy(rl_result.reg, rl_lhs.reg);
Serguei Katkov66da1362014-03-14 13:33:33 +07002609 } else {
2610 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002611 LoadValueDirect(rl_lhs, rl_result.reg);
Serguei Katkov66da1362014-03-14 13:33:33 +07002612 }
buzbee2700f7e2014-03-07 09:46:20 -08002613 OpRegMem(op, rl_result.reg, rl_rhs);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002614 } else if (rl_lhs.location != kLocPhysReg) {
2615 // RHS is in a register; LHS is in memory.
2616 if (op != kOpSub) {
2617 // Force RHS into result and operate on memory.
2618 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002619 OpRegCopy(rl_result.reg, rl_rhs.reg);
2620 OpRegMem(op, rl_result.reg, rl_lhs);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002621 } else {
2622 // Subtraction isn't commutative.
2623 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2624 rl_rhs = LoadValue(rl_rhs, kCoreReg);
2625 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002626 OpRegRegReg(op, rl_result.reg, rl_lhs.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002627 }
2628 } else {
2629 // Both are in registers.
2630 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2631 rl_rhs = LoadValue(rl_rhs, kCoreReg);
2632 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002633 OpRegRegReg(op, rl_result.reg, rl_lhs.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002634 }
2635 }
2636 }
2637 }
2638 }
2639 StoreValue(rl_dest, rl_result);
2640}
2641
2642bool X86Mir2Lir::IsOperationSafeWithoutTemps(RegLocation rl_lhs, RegLocation rl_rhs) {
2643 // If we have non-core registers, then we can't do good things.
buzbee091cc402014-03-31 10:14:40 -07002644 if (rl_lhs.location == kLocPhysReg && rl_lhs.reg.IsFloat()) {
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002645 return false;
2646 }
buzbee091cc402014-03-31 10:14:40 -07002647 if (rl_rhs.location == kLocPhysReg && rl_rhs.reg.IsFloat()) {
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002648 return false;
2649 }
2650
2651 // Everything will be fine :-).
2652 return true;
2653}
Chao-ying Fua0147762014-06-06 18:38:49 -07002654
2655void X86Mir2Lir::GenIntToLong(RegLocation rl_dest, RegLocation rl_src) {
2656 if (!Gen64Bit()) {
2657 Mir2Lir::GenIntToLong(rl_dest, rl_src);
2658 return;
2659 }
Chao-ying Fu7e399fd2014-06-10 18:11:11 -07002660 rl_src = UpdateLoc(rl_src);
Chao-ying Fua0147762014-06-06 18:38:49 -07002661 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
2662 if (rl_src.location == kLocPhysReg) {
2663 NewLIR2(kX86MovsxdRR, rl_result.reg.GetReg(), rl_src.reg.GetReg());
2664 } else {
2665 int displacement = SRegOffset(rl_src.s_reg_low);
Vladimir Marko8dea81c2014-06-06 14:50:36 +01002666 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
Chao-ying Fua0147762014-06-06 18:38:49 -07002667 LIR *m = NewLIR3(kX86MovsxdRM, rl_result.reg.GetReg(), rs_rX86_SP.GetReg(),
2668 displacement + LOWORD_OFFSET);
2669 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
2670 true /* is_load */, true /* is_64bit */);
2671 }
2672 StoreValueWide(rl_dest, rl_result);
2673}
2674
2675void X86Mir2Lir::GenShiftOpLong(Instruction::Code opcode, RegLocation rl_dest,
2676 RegLocation rl_src1, RegLocation rl_shift) {
2677 if (!Gen64Bit()) {
2678 Mir2Lir::GenShiftOpLong(opcode, rl_dest, rl_src1, rl_shift);
2679 return;
2680 }
2681
2682 bool is_two_addr = false;
2683 OpKind op = kOpBkpt;
2684 RegLocation rl_result;
2685
2686 switch (opcode) {
2687 case Instruction::SHL_LONG_2ADDR:
2688 is_two_addr = true;
2689 // Fallthrough
2690 case Instruction::SHL_LONG:
2691 op = kOpLsl;
2692 break;
2693 case Instruction::SHR_LONG_2ADDR:
2694 is_two_addr = true;
2695 // Fallthrough
2696 case Instruction::SHR_LONG:
2697 op = kOpAsr;
2698 break;
2699 case Instruction::USHR_LONG_2ADDR:
2700 is_two_addr = true;
2701 // Fallthrough
2702 case Instruction::USHR_LONG:
2703 op = kOpLsr;
2704 break;
2705 default:
2706 op = kOpBkpt;
2707 }
2708
2709 // X86 doesn't require masking and must use ECX.
2710 RegStorage t_reg = TargetReg(kCount); // rCX
2711 LoadValueDirectFixed(rl_shift, t_reg);
2712 if (is_two_addr) {
2713 // Can we do this directly into memory?
2714 rl_result = UpdateLocWideTyped(rl_dest, kCoreReg);
2715 if (rl_result.location != kLocPhysReg) {
2716 // Okay, we can do this into memory
Vladimir Marko8dea81c2014-06-06 14:50:36 +01002717 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
Chao-ying Fua0147762014-06-06 18:38:49 -07002718 OpMemReg(op, rl_result, t_reg.GetReg());
2719 } else if (!rl_result.reg.IsFloat()) {
2720 // Can do this directly into the result register
2721 OpRegReg(op, rl_result.reg, t_reg);
2722 StoreFinalValueWide(rl_dest, rl_result);
2723 }
2724 } else {
2725 // Three address form, or we can't do directly.
2726 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
2727 rl_result = EvalLocWide(rl_dest, kCoreReg, true);
2728 OpRegRegReg(op, rl_result.reg, rl_src1.reg, t_reg);
2729 StoreFinalValueWide(rl_dest, rl_result);
2730 }
2731
2732 FreeTemp(t_reg);
2733}
2734
Brian Carlstrom7940e442013-07-12 13:46:57 -07002735} // namespace art