blob: 4a77df219864d2efc308f00e493229cd07b692e3 [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
885 // SETcc only works with EAX..EDX.
886 if (result_reg.GetRegNum() >= rs_rX86_SP.GetRegNum()) {
887 result_reg = AllocateByteRegister();
888 DCHECK_LT(result_reg.GetRegNum(), rs_rX86_SP.GetRegNum());
889 }
890 NewLIR2(kX86Set8R, result_reg.GetReg(), kX86CondZ);
891 NewLIR2(kX86Movzx8RR, rl_result.reg.GetReg(), result_reg.GetReg());
892 if (IsTemp(result_reg)) {
893 FreeTemp(result_reg);
894 }
Vladimir Markoc29bb612013-11-27 16:47:25 +0000895 StoreValue(rl_dest, rl_result);
896 return true;
Brian Carlstrom7940e442013-07-12 13:46:57 -0700897}
898
buzbee2700f7e2014-03-07 09:46:20 -0800899LIR* X86Mir2Lir::OpPcRelLoad(RegStorage reg, LIR* target) {
Mark Mendell55d0eac2014-02-06 11:02:52 -0800900 CHECK(base_of_code_ != nullptr);
901
902 // Address the start of the method
903 RegLocation rl_method = mir_graph_->GetRegLocation(base_of_code_->s_reg_low);
Chao-ying Fue0ccdc02014-06-06 17:32:37 -0700904 if (rl_method.wide) {
905 LoadValueDirectWideFixed(rl_method, reg);
906 } else {
907 LoadValueDirectFixed(rl_method, reg);
908 }
Mark Mendell55d0eac2014-02-06 11:02:52 -0800909 store_method_addr_used_ = true;
910
911 // Load the proper value from the literal area.
912 // We don't know the proper offset for the value, so pick one that will force
913 // 4 byte offset. We will fix this up in the assembler later to have the right
914 // value.
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100915 ScopedMemRefType mem_ref_type(this, ResourceMask::kLiteral);
buzbee2700f7e2014-03-07 09:46:20 -0800916 LIR *res = RawLIR(current_dalvik_offset_, kX86Mov32RM, reg.GetReg(), reg.GetReg(), 256,
917 0, 0, target);
Mark Mendell55d0eac2014-02-06 11:02:52 -0800918 res->target = target;
919 res->flags.fixup = kFixupLoad;
Mark Mendell55d0eac2014-02-06 11:02:52 -0800920 store_method_addr_used_ = true;
921 return res;
Brian Carlstrom7940e442013-07-12 13:46:57 -0700922}
923
buzbee2700f7e2014-03-07 09:46:20 -0800924LIR* X86Mir2Lir::OpVldm(RegStorage r_base, int count) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700925 LOG(FATAL) << "Unexpected use of OpVldm for x86";
926 return NULL;
927}
928
buzbee2700f7e2014-03-07 09:46:20 -0800929LIR* X86Mir2Lir::OpVstm(RegStorage r_base, int count) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700930 LOG(FATAL) << "Unexpected use of OpVstm for x86";
931 return NULL;
932}
933
934void X86Mir2Lir::GenMultiplyByTwoBitMultiplier(RegLocation rl_src,
935 RegLocation rl_result, int lit,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700936 int first_bit, int second_bit) {
buzbee2700f7e2014-03-07 09:46:20 -0800937 RegStorage t_reg = AllocTemp();
938 OpRegRegImm(kOpLsl, t_reg, rl_src.reg, second_bit - first_bit);
939 OpRegRegReg(kOpAdd, rl_result.reg, rl_src.reg, t_reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700940 FreeTemp(t_reg);
941 if (first_bit != 0) {
buzbee2700f7e2014-03-07 09:46:20 -0800942 OpRegRegImm(kOpLsl, rl_result.reg, rl_result.reg, first_bit);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700943 }
944}
945
Mingyao Yange643a172014-04-08 11:02:52 -0700946void X86Mir2Lir::GenDivZeroCheckWide(RegStorage reg) {
Chao-ying Fua0147762014-06-06 18:38:49 -0700947 if (Gen64Bit()) {
948 DCHECK(reg.Is64Bit());
Razvan A Lupusoru090dd442013-12-20 14:35:03 -0800949
Chao-ying Fua0147762014-06-06 18:38:49 -0700950 NewLIR2(kX86Cmp64RI8, reg.GetReg(), 0);
951 } else {
952 DCHECK(reg.IsPair());
953
954 // We are not supposed to clobber the incoming storage, so allocate a temporary.
955 RegStorage t_reg = AllocTemp();
956 // Doing an OR is a quick way to check if both registers are zero. This will set the flags.
957 OpRegRegReg(kOpOr, t_reg, reg.GetLow(), reg.GetHigh());
958 // The temp is no longer needed so free it at this time.
959 FreeTemp(t_reg);
960 }
Razvan A Lupusoru090dd442013-12-20 14:35:03 -0800961
962 // In case of zero, throw ArithmeticException.
Mingyao Yange643a172014-04-08 11:02:52 -0700963 GenDivZeroCheck(kCondEq);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700964}
965
Mingyao Yang80365d92014-04-18 12:10:58 -0700966void X86Mir2Lir::GenArrayBoundsCheck(RegStorage index,
967 RegStorage array_base,
968 int len_offset) {
969 class ArrayBoundsCheckSlowPath : public Mir2Lir::LIRSlowPath {
970 public:
971 ArrayBoundsCheckSlowPath(Mir2Lir* m2l, LIR* branch,
972 RegStorage index, RegStorage array_base, int32_t len_offset)
973 : LIRSlowPath(m2l, m2l->GetCurrentDexPc(), branch),
974 index_(index), array_base_(array_base), len_offset_(len_offset) {
975 }
976
977 void Compile() OVERRIDE {
978 m2l_->ResetRegPool();
979 m2l_->ResetDefTracking();
Mingyao Yang6ffcfa02014-04-25 11:06:00 -0700980 GenerateTargetLabel(kPseudoThrowTarget);
Mingyao Yang80365d92014-04-18 12:10:58 -0700981
982 RegStorage new_index = index_;
983 // Move index out of kArg1, either directly to kArg0, or to kArg2.
984 if (index_.GetReg() == m2l_->TargetReg(kArg1).GetReg()) {
985 if (array_base_.GetReg() == m2l_->TargetReg(kArg0).GetReg()) {
986 m2l_->OpRegCopy(m2l_->TargetReg(kArg2), index_);
987 new_index = m2l_->TargetReg(kArg2);
988 } else {
989 m2l_->OpRegCopy(m2l_->TargetReg(kArg0), index_);
990 new_index = m2l_->TargetReg(kArg0);
991 }
992 }
993 // Load array length to kArg1.
994 m2l_->OpRegMem(kOpMov, m2l_->TargetReg(kArg1), array_base_, len_offset_);
Dmitry Petrochenko9ee801f2014-05-12 11:31:37 +0700995 if (Is64BitInstructionSet(cu_->instruction_set)) {
996 m2l_->CallRuntimeHelperRegReg(QUICK_ENTRYPOINT_OFFSET(8, pThrowArrayBounds),
997 new_index, m2l_->TargetReg(kArg1), true);
998 } else {
999 m2l_->CallRuntimeHelperRegReg(QUICK_ENTRYPOINT_OFFSET(4, pThrowArrayBounds),
1000 new_index, m2l_->TargetReg(kArg1), true);
1001 }
Mingyao Yang80365d92014-04-18 12:10:58 -07001002 }
1003
1004 private:
1005 const RegStorage index_;
1006 const RegStorage array_base_;
1007 const int32_t len_offset_;
1008 };
1009
1010 OpRegMem(kOpCmp, index, array_base, len_offset);
1011 LIR* branch = OpCondBranch(kCondUge, nullptr);
1012 AddSlowPath(new (arena_) ArrayBoundsCheckSlowPath(this, branch,
1013 index, array_base, len_offset));
1014}
1015
1016void X86Mir2Lir::GenArrayBoundsCheck(int32_t index,
1017 RegStorage array_base,
1018 int32_t len_offset) {
1019 class ArrayBoundsCheckSlowPath : public Mir2Lir::LIRSlowPath {
1020 public:
1021 ArrayBoundsCheckSlowPath(Mir2Lir* m2l, LIR* branch,
1022 int32_t index, RegStorage array_base, int32_t len_offset)
1023 : LIRSlowPath(m2l, m2l->GetCurrentDexPc(), branch),
1024 index_(index), array_base_(array_base), len_offset_(len_offset) {
1025 }
1026
1027 void Compile() OVERRIDE {
1028 m2l_->ResetRegPool();
1029 m2l_->ResetDefTracking();
Mingyao Yang6ffcfa02014-04-25 11:06:00 -07001030 GenerateTargetLabel(kPseudoThrowTarget);
Mingyao Yang80365d92014-04-18 12:10:58 -07001031
1032 // Load array length to kArg1.
1033 m2l_->OpRegMem(kOpMov, m2l_->TargetReg(kArg1), array_base_, len_offset_);
1034 m2l_->LoadConstant(m2l_->TargetReg(kArg0), index_);
Dmitry Petrochenko9ee801f2014-05-12 11:31:37 +07001035 if (Is64BitInstructionSet(cu_->instruction_set)) {
1036 m2l_->CallRuntimeHelperRegReg(QUICK_ENTRYPOINT_OFFSET(8, pThrowArrayBounds),
1037 m2l_->TargetReg(kArg0), m2l_->TargetReg(kArg1), true);
1038 } else {
1039 m2l_->CallRuntimeHelperRegReg(QUICK_ENTRYPOINT_OFFSET(4, pThrowArrayBounds),
1040 m2l_->TargetReg(kArg0), m2l_->TargetReg(kArg1), true);
1041 }
Mingyao Yang80365d92014-04-18 12:10:58 -07001042 }
1043
1044 private:
1045 const int32_t index_;
1046 const RegStorage array_base_;
1047 const int32_t len_offset_;
1048 };
1049
1050 NewLIR3(IS_SIMM8(index) ? kX86Cmp32MI8 : kX86Cmp32MI, array_base.GetReg(), len_offset, index);
1051 LIR* branch = OpCondBranch(kCondLs, nullptr);
1052 AddSlowPath(new (arena_) ArrayBoundsCheckSlowPath(this, branch,
1053 index, array_base, len_offset));
1054}
1055
Brian Carlstrom7940e442013-07-12 13:46:57 -07001056// Test suspend flag, return target of taken suspend branch
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001057LIR* X86Mir2Lir::OpTestSuspend(LIR* target) {
Andreas Gampe2f244e92014-05-08 03:35:25 -07001058 if (Is64BitInstructionSet(cu_->instruction_set)) {
1059 OpTlsCmp(Thread::ThreadFlagsOffset<8>(), 0);
1060 } else {
1061 OpTlsCmp(Thread::ThreadFlagsOffset<4>(), 0);
1062 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001063 return OpCondBranch((target == NULL) ? kCondNe : kCondEq, target);
1064}
1065
1066// Decrement register and branch on condition
buzbee2700f7e2014-03-07 09:46:20 -08001067LIR* X86Mir2Lir::OpDecAndBranch(ConditionCode c_code, RegStorage reg, LIR* target) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001068 OpRegImm(kOpSub, reg, 1);
Yixin Shoua0dac3e2014-01-23 05:01:22 -08001069 return OpCondBranch(c_code, target);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001070}
1071
buzbee11b63d12013-08-27 07:34:17 -07001072bool X86Mir2Lir::SmallLiteralDivRem(Instruction::Code dalvik_opcode, bool is_div,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001073 RegLocation rl_src, RegLocation rl_dest, int lit) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001074 LOG(FATAL) << "Unexpected use of smallLiteralDive in x86";
1075 return false;
1076}
1077
Ian Rogerse2143c02014-03-28 08:47:16 -07001078bool X86Mir2Lir::EasyMultiply(RegLocation rl_src, RegLocation rl_dest, int lit) {
1079 LOG(FATAL) << "Unexpected use of easyMultiply in x86";
1080 return false;
1081}
1082
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001083LIR* X86Mir2Lir::OpIT(ConditionCode cond, const char* guide) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001084 LOG(FATAL) << "Unexpected use of OpIT in x86";
1085 return NULL;
1086}
1087
Dave Allison3da67a52014-04-02 17:03:45 -07001088void X86Mir2Lir::OpEndIT(LIR* it) {
1089 LOG(FATAL) << "Unexpected use of OpEndIT in x86";
1090}
1091
buzbee2700f7e2014-03-07 09:46:20 -08001092void X86Mir2Lir::GenImulRegImm(RegStorage dest, RegStorage src, int val) {
Mark Mendell4708dcd2014-01-22 09:05:18 -08001093 switch (val) {
1094 case 0:
buzbee2700f7e2014-03-07 09:46:20 -08001095 NewLIR2(kX86Xor32RR, dest.GetReg(), dest.GetReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001096 break;
1097 case 1:
1098 OpRegCopy(dest, src);
1099 break;
1100 default:
1101 OpRegRegImm(kOpMul, dest, src, val);
1102 break;
1103 }
1104}
1105
buzbee2700f7e2014-03-07 09:46:20 -08001106void X86Mir2Lir::GenImulMemImm(RegStorage dest, int sreg, int displacement, int val) {
Vladimir Marko8dea81c2014-06-06 14:50:36 +01001107 // All memory accesses below reference dalvik regs.
1108 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
1109
Mark Mendell4708dcd2014-01-22 09:05:18 -08001110 LIR *m;
1111 switch (val) {
1112 case 0:
buzbee2700f7e2014-03-07 09:46:20 -08001113 NewLIR2(kX86Xor32RR, dest.GetReg(), dest.GetReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001114 break;
1115 case 1:
Vladimir Marko3bf7c602014-05-07 14:55:43 +01001116 LoadBaseDisp(rs_rX86_SP, displacement, dest, k32);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001117 break;
1118 default:
buzbee091cc402014-03-31 10:14:40 -07001119 m = NewLIR4(IS_SIMM8(val) ? kX86Imul32RMI8 : kX86Imul32RMI, dest.GetReg(),
1120 rs_rX86_SP.GetReg(), displacement, val);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001121 AnnotateDalvikRegAccess(m, displacement >> 2, true /* is_load */, true /* is_64bit */);
1122 break;
1123 }
1124}
1125
Mark Mendelle02d48f2014-01-15 11:19:23 -08001126void X86Mir2Lir::GenMulLong(Instruction::Code, RegLocation rl_dest, RegLocation rl_src1,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001127 RegLocation rl_src2) {
Vladimir Marko8dea81c2014-06-06 14:50:36 +01001128 // All memory accesses below reference dalvik regs.
1129 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
1130
Alexei Zavjalovd8191d02014-06-11 18:26:40 +07001131 if (Gen64Bit()) {
1132 if (rl_src1.is_const) {
1133 std::swap(rl_src1, rl_src2);
1134 }
1135 // Are we multiplying by a constant?
1136 if (rl_src2.is_const) {
1137 int64_t val = mir_graph_->ConstantValueWide(rl_src2);
1138 if (val == 0) {
1139 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
1140 OpRegReg(kOpXor, rl_result.reg, rl_result.reg);
1141 StoreValueWide(rl_dest, rl_result);
1142 return;
1143 } else if (val == 1) {
1144 StoreValueWide(rl_dest, rl_src1);
1145 return;
1146 } else if (val == 2) {
1147 GenAddLong(Instruction::ADD_LONG, rl_dest, rl_src1, rl_src1);
1148 return;
1149 } else if (IsPowerOfTwo(val)) {
1150 int shift_amount = LowestSetBit(val);
1151 if (!BadOverlap(rl_src1, rl_dest)) {
1152 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
1153 RegLocation rl_result = GenShiftImmOpLong(Instruction::SHL_LONG, rl_dest,
1154 rl_src1, shift_amount);
1155 StoreValueWide(rl_dest, rl_result);
1156 return;
1157 }
1158 }
Alexei Zavjalovd8191d02014-06-11 18:26:40 +07001159 }
1160 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
1161 rl_src2 = LoadValueWide(rl_src2, kCoreReg);
1162 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
1163 if (rl_result.reg.GetReg() == rl_src1.reg.GetReg() &&
1164 rl_result.reg.GetReg() == rl_src2.reg.GetReg()) {
1165 NewLIR2(kX86Imul64RR, rl_result.reg.GetReg(), rl_result.reg.GetReg());
1166 } else if (rl_result.reg.GetReg() != rl_src1.reg.GetReg() &&
1167 rl_result.reg.GetReg() == rl_src2.reg.GetReg()) {
1168 NewLIR2(kX86Imul64RR, rl_result.reg.GetReg(), rl_src1.reg.GetReg());
1169 } else if (rl_result.reg.GetReg() == rl_src1.reg.GetReg() &&
1170 rl_result.reg.GetReg() != rl_src2.reg.GetReg()) {
1171 NewLIR2(kX86Imul64RR, rl_result.reg.GetReg(), rl_src2.reg.GetReg());
1172 } else {
1173 OpRegCopy(rl_result.reg, rl_src1.reg);
1174 NewLIR2(kX86Imul64RR, rl_result.reg.GetReg(), rl_src2.reg.GetReg());
1175 }
1176 StoreValueWide(rl_dest, rl_result);
1177 return;
1178 }
1179
Mark Mendell4708dcd2014-01-22 09:05:18 -08001180 if (rl_src1.is_const) {
1181 std::swap(rl_src1, rl_src2);
1182 }
1183 // Are we multiplying by a constant?
1184 if (rl_src2.is_const) {
1185 // Do special compare/branch against simple const operand
1186 int64_t val = mir_graph_->ConstantValueWide(rl_src2);
1187 if (val == 0) {
1188 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08001189 OpRegReg(kOpXor, rl_result.reg.GetLow(), rl_result.reg.GetLow());
1190 OpRegReg(kOpXor, rl_result.reg.GetHigh(), rl_result.reg.GetHigh());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001191 StoreValueWide(rl_dest, rl_result);
1192 return;
1193 } else if (val == 1) {
Mark Mendell4708dcd2014-01-22 09:05:18 -08001194 StoreValueWide(rl_dest, rl_src1);
1195 return;
1196 } else if (val == 2) {
1197 GenAddLong(Instruction::ADD_LONG, rl_dest, rl_src1, rl_src1);
1198 return;
1199 } else if (IsPowerOfTwo(val)) {
1200 int shift_amount = LowestSetBit(val);
1201 if (!BadOverlap(rl_src1, rl_dest)) {
1202 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
1203 RegLocation rl_result = GenShiftImmOpLong(Instruction::SHL_LONG, rl_dest,
1204 rl_src1, shift_amount);
1205 StoreValueWide(rl_dest, rl_result);
1206 return;
1207 }
1208 }
1209
1210 // Okay, just bite the bullet and do it.
1211 int32_t val_lo = Low32Bits(val);
1212 int32_t val_hi = High32Bits(val);
1213 FlushAllRegs();
1214 LockCallTemps(); // Prepare for explicit register usage.
buzbee30adc732014-05-09 15:10:18 -07001215 rl_src1 = UpdateLocWideTyped(rl_src1, kCoreReg);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001216 bool src1_in_reg = rl_src1.location == kLocPhysReg;
1217 int displacement = SRegOffset(rl_src1.s_reg_low);
1218
1219 // ECX <- 1H * 2L
1220 // EAX <- 1L * 2H
1221 if (src1_in_reg) {
buzbee2700f7e2014-03-07 09:46:20 -08001222 GenImulRegImm(rs_r1, rl_src1.reg.GetHigh(), val_lo);
1223 GenImulRegImm(rs_r0, rl_src1.reg.GetLow(), val_hi);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001224 } else {
buzbee2700f7e2014-03-07 09:46:20 -08001225 GenImulMemImm(rs_r1, GetSRegHi(rl_src1.s_reg_low), displacement + HIWORD_OFFSET, val_lo);
1226 GenImulMemImm(rs_r0, rl_src1.s_reg_low, displacement + LOWORD_OFFSET, val_hi);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001227 }
1228
1229 // ECX <- ECX + EAX (2H * 1L) + (1H * 2L)
buzbee091cc402014-03-31 10:14:40 -07001230 NewLIR2(kX86Add32RR, rs_r1.GetReg(), rs_r0.GetReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001231
1232 // EAX <- 2L
buzbee2700f7e2014-03-07 09:46:20 -08001233 LoadConstantNoClobber(rs_r0, val_lo);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001234
1235 // EDX:EAX <- 2L * 1L (double precision)
1236 if (src1_in_reg) {
buzbee2700f7e2014-03-07 09:46:20 -08001237 NewLIR1(kX86Mul32DaR, rl_src1.reg.GetLowReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001238 } else {
buzbee091cc402014-03-31 10:14:40 -07001239 LIR *m = NewLIR2(kX86Mul32DaM, rs_rX86_SP.GetReg(), displacement + LOWORD_OFFSET);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001240 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
1241 true /* is_load */, true /* is_64bit */);
1242 }
1243
1244 // EDX <- EDX + ECX (add high words)
buzbee091cc402014-03-31 10:14:40 -07001245 NewLIR2(kX86Add32RR, rs_r2.GetReg(), rs_r1.GetReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001246
1247 // Result is EDX:EAX
buzbee091cc402014-03-31 10:14:40 -07001248 RegLocation rl_result = {kLocPhysReg, 1, 0, 0, 0, 0, 0, 0, 1,
1249 RegStorage::MakeRegPair(rs_r0, rs_r2), INVALID_SREG, INVALID_SREG};
Mark Mendell4708dcd2014-01-22 09:05:18 -08001250 StoreValueWide(rl_dest, rl_result);
1251 return;
1252 }
1253
1254 // Nope. Do it the hard way
Mark Mendellde99bba2014-02-14 12:15:02 -08001255 // Check for V*V. We can eliminate a multiply in that case, as 2L*1H == 2H*1L.
1256 bool is_square = mir_graph_->SRegToVReg(rl_src1.s_reg_low) ==
1257 mir_graph_->SRegToVReg(rl_src2.s_reg_low);
1258
Mark Mendell4708dcd2014-01-22 09:05:18 -08001259 FlushAllRegs();
1260 LockCallTemps(); // Prepare for explicit register usage.
buzbee30adc732014-05-09 15:10:18 -07001261 rl_src1 = UpdateLocWideTyped(rl_src1, kCoreReg);
1262 rl_src2 = UpdateLocWideTyped(rl_src2, kCoreReg);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001263
1264 // At this point, the VRs are in their home locations.
1265 bool src1_in_reg = rl_src1.location == kLocPhysReg;
1266 bool src2_in_reg = rl_src2.location == kLocPhysReg;
1267
1268 // ECX <- 1H
1269 if (src1_in_reg) {
buzbee091cc402014-03-31 10:14:40 -07001270 NewLIR2(kX86Mov32RR, rs_r1.GetReg(), rl_src1.reg.GetHighReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001271 } else {
Vladimir Marko3bf7c602014-05-07 14:55:43 +01001272 LoadBaseDisp(rs_rX86_SP, SRegOffset(rl_src1.s_reg_low) + HIWORD_OFFSET, rs_r1, k32);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001273 }
1274
Mark Mendellde99bba2014-02-14 12:15:02 -08001275 if (is_square) {
1276 // Take advantage of the fact that the values are the same.
1277 // ECX <- ECX * 2L (1H * 2L)
1278 if (src2_in_reg) {
buzbee091cc402014-03-31 10:14:40 -07001279 NewLIR2(kX86Imul32RR, rs_r1.GetReg(), rl_src2.reg.GetLowReg());
Mark Mendellde99bba2014-02-14 12:15:02 -08001280 } else {
1281 int displacement = SRegOffset(rl_src2.s_reg_low);
buzbee091cc402014-03-31 10:14:40 -07001282 LIR *m = NewLIR3(kX86Imul32RM, rs_r1.GetReg(), rs_rX86_SP.GetReg(),
1283 displacement + LOWORD_OFFSET);
Mark Mendellde99bba2014-02-14 12:15:02 -08001284 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
1285 true /* is_load */, true /* is_64bit */);
1286 }
Mark Mendell4708dcd2014-01-22 09:05:18 -08001287
Mark Mendellde99bba2014-02-14 12:15:02 -08001288 // ECX <- 2*ECX (2H * 1L) + (1H * 2L)
buzbee091cc402014-03-31 10:14:40 -07001289 NewLIR2(kX86Add32RR, rs_r1.GetReg(), rs_r1.GetReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001290 } else {
Mark Mendellde99bba2014-02-14 12:15:02 -08001291 // EAX <- 2H
1292 if (src2_in_reg) {
buzbee091cc402014-03-31 10:14:40 -07001293 NewLIR2(kX86Mov32RR, rs_r0.GetReg(), rl_src2.reg.GetHighReg());
Mark Mendellde99bba2014-02-14 12:15:02 -08001294 } else {
Vladimir Marko3bf7c602014-05-07 14:55:43 +01001295 LoadBaseDisp(rs_rX86_SP, SRegOffset(rl_src2.s_reg_low) + HIWORD_OFFSET, rs_r0, k32);
Mark Mendellde99bba2014-02-14 12:15:02 -08001296 }
Mark Mendell4708dcd2014-01-22 09:05:18 -08001297
Mark Mendellde99bba2014-02-14 12:15:02 -08001298 // EAX <- EAX * 1L (2H * 1L)
1299 if (src1_in_reg) {
buzbee091cc402014-03-31 10:14:40 -07001300 NewLIR2(kX86Imul32RR, rs_r0.GetReg(), rl_src1.reg.GetLowReg());
Mark Mendellde99bba2014-02-14 12:15:02 -08001301 } else {
1302 int displacement = SRegOffset(rl_src1.s_reg_low);
buzbee091cc402014-03-31 10:14:40 -07001303 LIR *m = NewLIR3(kX86Imul32RM, rs_r0.GetReg(), rs_rX86_SP.GetReg(),
1304 displacement + LOWORD_OFFSET);
Mark Mendellde99bba2014-02-14 12:15:02 -08001305 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
1306 true /* is_load */, true /* is_64bit */);
1307 }
Mark Mendell4708dcd2014-01-22 09:05:18 -08001308
Mark Mendellde99bba2014-02-14 12:15:02 -08001309 // ECX <- ECX * 2L (1H * 2L)
1310 if (src2_in_reg) {
buzbee091cc402014-03-31 10:14:40 -07001311 NewLIR2(kX86Imul32RR, rs_r1.GetReg(), rl_src2.reg.GetLowReg());
Mark Mendellde99bba2014-02-14 12:15:02 -08001312 } else {
1313 int displacement = SRegOffset(rl_src2.s_reg_low);
buzbee091cc402014-03-31 10:14:40 -07001314 LIR *m = NewLIR3(kX86Imul32RM, rs_r1.GetReg(), rs_rX86_SP.GetReg(),
1315 displacement + LOWORD_OFFSET);
Mark Mendellde99bba2014-02-14 12:15:02 -08001316 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
1317 true /* is_load */, true /* is_64bit */);
1318 }
1319
1320 // ECX <- ECX + EAX (2H * 1L) + (1H * 2L)
buzbee091cc402014-03-31 10:14:40 -07001321 NewLIR2(kX86Add32RR, rs_r1.GetReg(), rs_r0.GetReg());
Mark Mendellde99bba2014-02-14 12:15:02 -08001322 }
Mark Mendell4708dcd2014-01-22 09:05:18 -08001323
1324 // EAX <- 2L
1325 if (src2_in_reg) {
buzbee091cc402014-03-31 10:14:40 -07001326 NewLIR2(kX86Mov32RR, rs_r0.GetReg(), rl_src2.reg.GetLowReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001327 } else {
Vladimir Marko3bf7c602014-05-07 14:55:43 +01001328 LoadBaseDisp(rs_rX86_SP, SRegOffset(rl_src2.s_reg_low) + LOWORD_OFFSET, rs_r0, k32);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001329 }
1330
1331 // EDX:EAX <- 2L * 1L (double precision)
1332 if (src1_in_reg) {
buzbee2700f7e2014-03-07 09:46:20 -08001333 NewLIR1(kX86Mul32DaR, rl_src1.reg.GetLowReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001334 } else {
1335 int displacement = SRegOffset(rl_src1.s_reg_low);
buzbee091cc402014-03-31 10:14:40 -07001336 LIR *m = NewLIR2(kX86Mul32DaM, rs_rX86_SP.GetReg(), displacement + LOWORD_OFFSET);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001337 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
1338 true /* is_load */, true /* is_64bit */);
1339 }
1340
1341 // EDX <- EDX + ECX (add high words)
buzbee091cc402014-03-31 10:14:40 -07001342 NewLIR2(kX86Add32RR, rs_r2.GetReg(), rs_r1.GetReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001343
1344 // Result is EDX:EAX
buzbee091cc402014-03-31 10:14:40 -07001345 RegLocation rl_result = {kLocPhysReg, 1, 0, 0, 0, 0, 0, 0, 1,
buzbee2700f7e2014-03-07 09:46:20 -08001346 RegStorage::MakeRegPair(rs_r0, rs_r2), INVALID_SREG, INVALID_SREG};
Mark Mendell4708dcd2014-01-22 09:05:18 -08001347 StoreValueWide(rl_dest, rl_result);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001348}
Mark Mendelle02d48f2014-01-15 11:19:23 -08001349
1350void X86Mir2Lir::GenLongRegOrMemOp(RegLocation rl_dest, RegLocation rl_src,
1351 Instruction::Code op) {
1352 DCHECK_EQ(rl_dest.location, kLocPhysReg);
1353 X86OpCode x86op = GetOpcode(op, rl_dest, rl_src, false);
1354 if (rl_src.location == kLocPhysReg) {
1355 // Both operands are in registers.
Serguei Katkovab5545f2014-03-25 10:51:15 +07001356 // But we must ensure that rl_src is in pair
Chao-ying Fua0147762014-06-06 18:38:49 -07001357 if (Gen64Bit()) {
1358 NewLIR2(x86op, rl_dest.reg.GetReg(), rl_src.reg.GetReg());
1359 } else {
1360 rl_src = LoadValueWide(rl_src, kCoreReg);
1361 if (rl_dest.reg.GetLowReg() == rl_src.reg.GetHighReg()) {
1362 // The registers are the same, so we would clobber it before the use.
1363 RegStorage temp_reg = AllocTemp();
1364 OpRegCopy(temp_reg, rl_dest.reg);
1365 rl_src.reg.SetHighReg(temp_reg.GetReg());
1366 }
1367 NewLIR2(x86op, rl_dest.reg.GetLowReg(), rl_src.reg.GetLowReg());
Mark Mendelle02d48f2014-01-15 11:19:23 -08001368
Chao-ying Fua0147762014-06-06 18:38:49 -07001369 x86op = GetOpcode(op, rl_dest, rl_src, true);
1370 NewLIR2(x86op, rl_dest.reg.GetHighReg(), rl_src.reg.GetHighReg());
1371 FreeTemp(rl_src.reg); // ???
1372 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08001373 return;
1374 }
1375
1376 // RHS is in memory.
1377 DCHECK((rl_src.location == kLocDalvikFrame) ||
1378 (rl_src.location == kLocCompilerTemp));
buzbee2700f7e2014-03-07 09:46:20 -08001379 int r_base = TargetReg(kSp).GetReg();
Mark Mendelle02d48f2014-01-15 11:19:23 -08001380 int displacement = SRegOffset(rl_src.s_reg_low);
1381
Vladimir Marko8dea81c2014-06-06 14:50:36 +01001382 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
Chao-ying Fua0147762014-06-06 18:38:49 -07001383 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 -08001384 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
1385 true /* is_load */, true /* is64bit */);
Chao-ying Fua0147762014-06-06 18:38:49 -07001386 if (!Gen64Bit()) {
1387 x86op = GetOpcode(op, rl_dest, rl_src, true);
1388 lir = NewLIR3(x86op, rl_dest.reg.GetHighReg(), r_base, displacement + HIWORD_OFFSET);
1389 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08001390 AnnotateDalvikRegAccess(lir, (displacement + HIWORD_OFFSET) >> 2,
1391 true /* is_load */, true /* is64bit */);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001392}
1393
Mark Mendelle02d48f2014-01-15 11:19:23 -08001394void X86Mir2Lir::GenLongArith(RegLocation rl_dest, RegLocation rl_src, Instruction::Code op) {
buzbee30adc732014-05-09 15:10:18 -07001395 rl_dest = UpdateLocWideTyped(rl_dest, kCoreReg);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001396 if (rl_dest.location == kLocPhysReg) {
1397 // Ensure we are in a register pair
1398 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
1399
buzbee30adc732014-05-09 15:10:18 -07001400 rl_src = UpdateLocWideTyped(rl_src, kCoreReg);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001401 GenLongRegOrMemOp(rl_result, rl_src, op);
1402 StoreFinalValueWide(rl_dest, rl_result);
1403 return;
1404 }
1405
1406 // It wasn't in registers, so it better be in memory.
1407 DCHECK((rl_dest.location == kLocDalvikFrame) ||
1408 (rl_dest.location == kLocCompilerTemp));
1409 rl_src = LoadValueWide(rl_src, kCoreReg);
1410
1411 // Operate directly into memory.
1412 X86OpCode x86op = GetOpcode(op, rl_dest, rl_src, false);
buzbee2700f7e2014-03-07 09:46:20 -08001413 int r_base = TargetReg(kSp).GetReg();
Mark Mendelle02d48f2014-01-15 11:19:23 -08001414 int displacement = SRegOffset(rl_dest.s_reg_low);
1415
Vladimir Marko8dea81c2014-06-06 14:50:36 +01001416 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
Chao-ying Fua0147762014-06-06 18:38:49 -07001417 LIR *lir = NewLIR3(x86op, r_base, displacement + LOWORD_OFFSET,
1418 Gen64Bit() ? rl_src.reg.GetReg() : rl_src.reg.GetLowReg());
Mark Mendelle02d48f2014-01-15 11:19:23 -08001419 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
Serguei Katkov217fe732014-03-27 14:41:56 +07001420 true /* is_load */, true /* is64bit */);
1421 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
Mark Mendelle02d48f2014-01-15 11:19:23 -08001422 false /* is_load */, true /* is64bit */);
Chao-ying Fua0147762014-06-06 18:38:49 -07001423 if (!Gen64Bit()) {
1424 x86op = GetOpcode(op, rl_dest, rl_src, true);
1425 lir = NewLIR3(x86op, r_base, displacement + HIWORD_OFFSET, rl_src.reg.GetHighReg());
1426 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08001427 AnnotateDalvikRegAccess(lir, (displacement + HIWORD_OFFSET) >> 2,
Serguei Katkov217fe732014-03-27 14:41:56 +07001428 true /* is_load */, true /* is64bit */);
1429 AnnotateDalvikRegAccess(lir, (displacement + HIWORD_OFFSET) >> 2,
Mark Mendelle02d48f2014-01-15 11:19:23 -08001430 false /* is_load */, true /* is64bit */);
buzbee2700f7e2014-03-07 09:46:20 -08001431 FreeTemp(rl_src.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001432}
1433
Mark Mendelle02d48f2014-01-15 11:19:23 -08001434void X86Mir2Lir::GenLongArith(RegLocation rl_dest, RegLocation rl_src1,
1435 RegLocation rl_src2, Instruction::Code op,
1436 bool is_commutative) {
1437 // Is this really a 2 operand operation?
1438 switch (op) {
1439 case Instruction::ADD_LONG_2ADDR:
1440 case Instruction::SUB_LONG_2ADDR:
1441 case Instruction::AND_LONG_2ADDR:
1442 case Instruction::OR_LONG_2ADDR:
1443 case Instruction::XOR_LONG_2ADDR:
Mark Mendelle87f9b52014-04-30 14:13:18 -04001444 if (GenerateTwoOperandInstructions()) {
1445 GenLongArith(rl_dest, rl_src2, op);
1446 return;
1447 }
1448 break;
1449
Mark Mendelle02d48f2014-01-15 11:19:23 -08001450 default:
1451 break;
1452 }
1453
1454 if (rl_dest.location == kLocPhysReg) {
1455 RegLocation rl_result = LoadValueWide(rl_src1, kCoreReg);
1456
1457 // We are about to clobber the LHS, so it needs to be a temp.
1458 rl_result = ForceTempWide(rl_result);
1459
1460 // Perform the operation using the RHS.
buzbee30adc732014-05-09 15:10:18 -07001461 rl_src2 = UpdateLocWideTyped(rl_src2, kCoreReg);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001462 GenLongRegOrMemOp(rl_result, rl_src2, op);
1463
1464 // And now record that the result is in the temp.
1465 StoreFinalValueWide(rl_dest, rl_result);
1466 return;
1467 }
1468
1469 // It wasn't in registers, so it better be in memory.
1470 DCHECK((rl_dest.location == kLocDalvikFrame) ||
1471 (rl_dest.location == kLocCompilerTemp));
buzbee30adc732014-05-09 15:10:18 -07001472 rl_src1 = UpdateLocWideTyped(rl_src1, kCoreReg);
1473 rl_src2 = UpdateLocWideTyped(rl_src2, kCoreReg);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001474
1475 // Get one of the source operands into temporary register.
1476 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
Chao-ying Fua0147762014-06-06 18:38:49 -07001477 if (Gen64Bit()) {
1478 if (IsTemp(rl_src1.reg)) {
1479 GenLongRegOrMemOp(rl_src1, rl_src2, op);
1480 } else if (is_commutative) {
1481 rl_src2 = LoadValueWide(rl_src2, kCoreReg);
1482 // We need at least one of them to be a temporary.
1483 if (!IsTemp(rl_src2.reg)) {
1484 rl_src1 = ForceTempWide(rl_src1);
1485 GenLongRegOrMemOp(rl_src1, rl_src2, op);
1486 } else {
1487 GenLongRegOrMemOp(rl_src2, rl_src1, op);
1488 StoreFinalValueWide(rl_dest, rl_src2);
1489 return;
1490 }
1491 } else {
1492 // Need LHS to be the temp.
Mark Mendelle02d48f2014-01-15 11:19:23 -08001493 rl_src1 = ForceTempWide(rl_src1);
Yevgeny Rouban91b6ffa2014-03-07 14:35:44 +07001494 GenLongRegOrMemOp(rl_src1, rl_src2, op);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001495 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08001496 } else {
Chao-ying Fua0147762014-06-06 18:38:49 -07001497 if (IsTemp(rl_src1.reg.GetLow()) && IsTemp(rl_src1.reg.GetHigh())) {
1498 GenLongRegOrMemOp(rl_src1, rl_src2, op);
1499 } else if (is_commutative) {
1500 rl_src2 = LoadValueWide(rl_src2, kCoreReg);
1501 // We need at least one of them to be a temporary.
1502 if (!(IsTemp(rl_src2.reg.GetLow()) && IsTemp(rl_src2.reg.GetHigh()))) {
1503 rl_src1 = ForceTempWide(rl_src1);
1504 GenLongRegOrMemOp(rl_src1, rl_src2, op);
1505 } else {
1506 GenLongRegOrMemOp(rl_src2, rl_src1, op);
1507 StoreFinalValueWide(rl_dest, rl_src2);
1508 return;
1509 }
1510 } else {
1511 // Need LHS to be the temp.
1512 rl_src1 = ForceTempWide(rl_src1);
1513 GenLongRegOrMemOp(rl_src1, rl_src2, op);
1514 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08001515 }
1516
1517 StoreFinalValueWide(rl_dest, rl_src1);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001518}
1519
Mark Mendelle02d48f2014-01-15 11:19:23 -08001520void X86Mir2Lir::GenAddLong(Instruction::Code opcode, RegLocation rl_dest,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001521 RegLocation rl_src1, RegLocation rl_src2) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08001522 GenLongArith(rl_dest, rl_src1, rl_src2, opcode, true);
1523}
1524
1525void X86Mir2Lir::GenSubLong(Instruction::Code opcode, RegLocation rl_dest,
1526 RegLocation rl_src1, RegLocation rl_src2) {
1527 GenLongArith(rl_dest, rl_src1, rl_src2, opcode, false);
1528}
1529
1530void X86Mir2Lir::GenAndLong(Instruction::Code opcode, RegLocation rl_dest,
1531 RegLocation rl_src1, RegLocation rl_src2) {
1532 GenLongArith(rl_dest, rl_src1, rl_src2, opcode, true);
1533}
1534
1535void X86Mir2Lir::GenOrLong(Instruction::Code opcode, RegLocation rl_dest,
1536 RegLocation rl_src1, RegLocation rl_src2) {
1537 GenLongArith(rl_dest, rl_src1, rl_src2, opcode, true);
1538}
1539
1540void X86Mir2Lir::GenXorLong(Instruction::Code opcode, RegLocation rl_dest,
1541 RegLocation rl_src1, RegLocation rl_src2) {
1542 GenLongArith(rl_dest, rl_src1, rl_src2, opcode, true);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001543}
1544
Serban Constantinescued65c5e2014-05-22 15:10:18 +01001545void X86Mir2Lir::GenNotLong(RegLocation rl_dest, RegLocation rl_src) {
Chao-ying Fua0147762014-06-06 18:38:49 -07001546 if (Gen64Bit()) {
1547 rl_src = LoadValueWide(rl_src, kCoreReg);
1548 RegLocation rl_result;
1549 rl_result = EvalLocWide(rl_dest, kCoreReg, true);
1550 OpRegCopy(rl_result.reg, rl_src.reg);
1551 OpReg(kOpNot, rl_result.reg);
1552 StoreValueWide(rl_dest, rl_result);
1553 } else {
1554 LOG(FATAL) << "Unexpected use GenNotLong()";
1555 }
Serban Constantinescued65c5e2014-05-22 15:10:18 +01001556}
1557
1558void X86Mir2Lir::GenDivRemLong(Instruction::Code, RegLocation rl_dest, RegLocation rl_src1,
1559 RegLocation rl_src2, bool is_div) {
Chao-ying Fua0147762014-06-06 18:38:49 -07001560 if (!Gen64Bit()) {
1561 LOG(FATAL) << "Unexpected use GenDivRemLong()";
1562 return;
1563 }
1564
1565 // We have to use fixed registers, so flush all the temps.
1566 FlushAllRegs();
1567 LockCallTemps(); // Prepare for explicit register usage.
1568
1569 // Load LHS into RAX.
1570 LoadValueDirectWideFixed(rl_src1, rs_r0q);
1571
1572 // Load RHS into RCX.
1573 LoadValueDirectWideFixed(rl_src2, rs_r1q);
1574
1575 // Copy LHS sign bit into RDX.
1576 NewLIR0(kx86Cqo64Da);
1577
1578 // Handle division by zero case.
1579 GenDivZeroCheckWide(rs_r1q);
1580
1581 // Have to catch 0x8000000000000000/-1 case, or we will get an exception!
1582 NewLIR2(kX86Cmp64RI8, rs_r1q.GetReg(), -1);
1583 LIR *minus_one_branch = NewLIR2(kX86Jcc8, 0, kX86CondNe);
1584
1585 // RHS is -1.
1586 LoadConstantWide(rs_r3q, 0x8000000000000000);
1587 NewLIR2(kX86Cmp64RR, rs_r0q.GetReg(), rs_r3q.GetReg());
1588 LIR * minint_branch = NewLIR2(kX86Jcc8, 0, kX86CondNe);
1589
1590 // In 0x8000000000000000/-1 case.
1591 if (!is_div) {
1592 // For DIV, RAX is already right. For REM, we need RDX 0.
1593 NewLIR2(kX86Xor64RR, rs_r2q.GetReg(), rs_r2q.GetReg());
1594 }
1595 LIR* done = NewLIR1(kX86Jmp8, 0);
1596
1597 // Expected case.
1598 minus_one_branch->target = NewLIR0(kPseudoTargetLabel);
1599 minint_branch->target = minus_one_branch->target;
1600 NewLIR1(kX86Idivmod64DaR, rs_r1q.GetReg());
1601 done->target = NewLIR0(kPseudoTargetLabel);
1602
1603 // Result is in RAX for div and RDX for rem.
1604 RegLocation rl_result = {kLocPhysReg, 1, 0, 0, 0, 0, 0, 0, 1, rs_r0q, INVALID_SREG, INVALID_SREG};
1605 if (!is_div) {
1606 rl_result.reg.SetReg(r2q);
1607 }
1608
1609 StoreValueWide(rl_dest, rl_result);
Serban Constantinescued65c5e2014-05-22 15:10:18 +01001610}
1611
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001612void X86Mir2Lir::GenNegLong(RegLocation rl_dest, RegLocation rl_src) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08001613 rl_src = LoadValueWide(rl_src, kCoreReg);
Chao-ying Fua0147762014-06-06 18:38:49 -07001614 RegLocation rl_result;
1615 if (Gen64Bit()) {
1616 rl_result = EvalLocWide(rl_dest, kCoreReg, true);
1617 OpRegReg(kOpNeg, rl_result.reg, rl_src.reg);
1618 } else {
1619 rl_result = ForceTempWide(rl_src);
1620 if (((rl_dest.location == kLocPhysReg) && (rl_src.location == kLocPhysReg)) &&
1621 ((rl_dest.reg.GetLowReg() == rl_src.reg.GetHighReg()))) {
1622 // The registers are the same, so we would clobber it before the use.
1623 RegStorage temp_reg = AllocTemp();
1624 OpRegCopy(temp_reg, rl_result.reg);
1625 rl_result.reg.SetHighReg(temp_reg.GetReg());
1626 }
1627 OpRegReg(kOpNeg, rl_result.reg.GetLow(), rl_result.reg.GetLow()); // rLow = -rLow
1628 OpRegImm(kOpAdc, rl_result.reg.GetHigh(), 0); // rHigh = rHigh + CF
1629 OpRegReg(kOpNeg, rl_result.reg.GetHigh(), rl_result.reg.GetHigh()); // rHigh = -rHigh
Mark Mendelle02d48f2014-01-15 11:19:23 -08001630 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001631 StoreValueWide(rl_dest, rl_result);
1632}
1633
buzbee091cc402014-03-31 10:14:40 -07001634void X86Mir2Lir::OpRegThreadMem(OpKind op, RegStorage r_dest, ThreadOffset<4> thread_offset) {
Andreas Gampe2f244e92014-05-08 03:35:25 -07001635 DCHECK_EQ(kX86, cu_->instruction_set);
1636 X86OpCode opcode = kX86Bkpt;
1637 switch (op) {
1638 case kOpCmp: opcode = kX86Cmp32RT; break;
1639 case kOpMov: opcode = kX86Mov32RT; break;
1640 default:
1641 LOG(FATAL) << "Bad opcode: " << op;
1642 break;
1643 }
1644 NewLIR2(opcode, r_dest.GetReg(), thread_offset.Int32Value());
1645}
1646
1647void X86Mir2Lir::OpRegThreadMem(OpKind op, RegStorage r_dest, ThreadOffset<8> thread_offset) {
1648 DCHECK_EQ(kX86_64, cu_->instruction_set);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001649 X86OpCode opcode = kX86Bkpt;
Dmitry Petrochenko9ee801f2014-05-12 11:31:37 +07001650 if (Gen64Bit() && r_dest.Is64BitSolo()) {
1651 switch (op) {
1652 case kOpCmp: opcode = kX86Cmp64RT; break;
1653 case kOpMov: opcode = kX86Mov64RT; break;
1654 default:
1655 LOG(FATAL) << "Bad opcode(OpRegThreadMem 64): " << op;
1656 break;
1657 }
1658 } else {
1659 switch (op) {
1660 case kOpCmp: opcode = kX86Cmp32RT; break;
1661 case kOpMov: opcode = kX86Mov32RT; break;
1662 default:
1663 LOG(FATAL) << "Bad opcode: " << op;
1664 break;
1665 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001666 }
buzbee091cc402014-03-31 10:14:40 -07001667 NewLIR2(opcode, r_dest.GetReg(), thread_offset.Int32Value());
Brian Carlstrom7940e442013-07-12 13:46:57 -07001668}
1669
1670/*
1671 * Generate array load
1672 */
1673void X86Mir2Lir::GenArrayGet(int opt_flags, OpSize size, RegLocation rl_array,
Ian Rogersa9a82542013-10-04 11:17:26 -07001674 RegLocation rl_index, RegLocation rl_dest, int scale) {
buzbee091cc402014-03-31 10:14:40 -07001675 RegisterClass reg_class = RegClassBySize(size);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001676 int len_offset = mirror::Array::LengthOffset().Int32Value();
Brian Carlstrom7940e442013-07-12 13:46:57 -07001677 RegLocation rl_result;
buzbeea0cd2d72014-06-01 09:33:49 -07001678 rl_array = LoadValue(rl_array, kRefReg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001679
Mark Mendell343adb52013-12-18 06:02:17 -08001680 int data_offset;
buzbee695d13a2014-04-19 13:32:20 -07001681 if (size == k64 || size == kDouble) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001682 data_offset = mirror::Array::DataOffset(sizeof(int64_t)).Int32Value();
1683 } else {
1684 data_offset = mirror::Array::DataOffset(sizeof(int32_t)).Int32Value();
1685 }
1686
Mark Mendell343adb52013-12-18 06:02:17 -08001687 bool constant_index = rl_index.is_const;
1688 int32_t constant_index_value = 0;
1689 if (!constant_index) {
1690 rl_index = LoadValue(rl_index, kCoreReg);
1691 } else {
1692 constant_index_value = mir_graph_->ConstantValue(rl_index);
1693 // If index is constant, just fold it into the data offset
1694 data_offset += constant_index_value << scale;
1695 // treat as non array below
buzbee2700f7e2014-03-07 09:46:20 -08001696 rl_index.reg = RegStorage::InvalidReg();
Mark Mendell343adb52013-12-18 06:02:17 -08001697 }
1698
Brian Carlstrom7940e442013-07-12 13:46:57 -07001699 /* null object? */
buzbee2700f7e2014-03-07 09:46:20 -08001700 GenNullCheck(rl_array.reg, opt_flags);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001701
1702 if (!(opt_flags & MIR_IGNORE_RANGE_CHECK)) {
Mark Mendell343adb52013-12-18 06:02:17 -08001703 if (constant_index) {
Mingyao Yang80365d92014-04-18 12:10:58 -07001704 GenArrayBoundsCheck(constant_index_value, rl_array.reg, len_offset);
Mark Mendell343adb52013-12-18 06:02:17 -08001705 } else {
Mingyao Yang80365d92014-04-18 12:10:58 -07001706 GenArrayBoundsCheck(rl_index.reg, rl_array.reg, len_offset);
Mark Mendell343adb52013-12-18 06:02:17 -08001707 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001708 }
Mark Mendell343adb52013-12-18 06:02:17 -08001709 rl_result = EvalLoc(rl_dest, reg_class, true);
Vladimir Marko3bf7c602014-05-07 14:55:43 +01001710 LoadBaseIndexedDisp(rl_array.reg, rl_index.reg, scale, data_offset, rl_result.reg, size);
buzbee695d13a2014-04-19 13:32:20 -07001711 if ((size == k64) || (size == kDouble)) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001712 StoreValueWide(rl_dest, rl_result);
1713 } else {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001714 StoreValue(rl_dest, rl_result);
1715 }
1716}
1717
1718/*
1719 * Generate array store
1720 *
1721 */
1722void X86Mir2Lir::GenArrayPut(int opt_flags, OpSize size, RegLocation rl_array,
Ian Rogersa9a82542013-10-04 11:17:26 -07001723 RegLocation rl_index, RegLocation rl_src, int scale, bool card_mark) {
buzbee091cc402014-03-31 10:14:40 -07001724 RegisterClass reg_class = RegClassBySize(size);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001725 int len_offset = mirror::Array::LengthOffset().Int32Value();
1726 int data_offset;
1727
buzbee695d13a2014-04-19 13:32:20 -07001728 if (size == k64 || size == kDouble) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001729 data_offset = mirror::Array::DataOffset(sizeof(int64_t)).Int32Value();
1730 } else {
1731 data_offset = mirror::Array::DataOffset(sizeof(int32_t)).Int32Value();
1732 }
1733
buzbeea0cd2d72014-06-01 09:33:49 -07001734 rl_array = LoadValue(rl_array, kRefReg);
Mark Mendell343adb52013-12-18 06:02:17 -08001735 bool constant_index = rl_index.is_const;
1736 int32_t constant_index_value = 0;
1737 if (!constant_index) {
1738 rl_index = LoadValue(rl_index, kCoreReg);
1739 } else {
1740 // If index is constant, just fold it into the data offset
1741 constant_index_value = mir_graph_->ConstantValue(rl_index);
1742 data_offset += constant_index_value << scale;
1743 // treat as non array below
buzbee2700f7e2014-03-07 09:46:20 -08001744 rl_index.reg = RegStorage::InvalidReg();
Mark Mendell343adb52013-12-18 06:02:17 -08001745 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001746
1747 /* null object? */
buzbee2700f7e2014-03-07 09:46:20 -08001748 GenNullCheck(rl_array.reg, opt_flags);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001749
1750 if (!(opt_flags & MIR_IGNORE_RANGE_CHECK)) {
Mark Mendell343adb52013-12-18 06:02:17 -08001751 if (constant_index) {
Mingyao Yang80365d92014-04-18 12:10:58 -07001752 GenArrayBoundsCheck(constant_index_value, rl_array.reg, len_offset);
Mark Mendell343adb52013-12-18 06:02:17 -08001753 } else {
Mingyao Yang80365d92014-04-18 12:10:58 -07001754 GenArrayBoundsCheck(rl_index.reg, rl_array.reg, len_offset);
Mark Mendell343adb52013-12-18 06:02:17 -08001755 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001756 }
buzbee695d13a2014-04-19 13:32:20 -07001757 if ((size == k64) || (size == kDouble)) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001758 rl_src = LoadValueWide(rl_src, reg_class);
1759 } else {
1760 rl_src = LoadValue(rl_src, reg_class);
1761 }
1762 // If the src reg can't be byte accessed, move it to a temp first.
buzbee091cc402014-03-31 10:14:40 -07001763 if ((size == kSignedByte || size == kUnsignedByte) &&
1764 rl_src.reg.GetRegNum() >= rs_rX86_SP.GetRegNum()) {
buzbee2700f7e2014-03-07 09:46:20 -08001765 RegStorage temp = AllocTemp();
1766 OpRegCopy(temp, rl_src.reg);
Vladimir Marko3bf7c602014-05-07 14:55:43 +01001767 StoreBaseIndexedDisp(rl_array.reg, rl_index.reg, scale, data_offset, temp, size);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001768 } else {
Vladimir Marko3bf7c602014-05-07 14:55:43 +01001769 StoreBaseIndexedDisp(rl_array.reg, rl_index.reg, scale, data_offset, rl_src.reg, size);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001770 }
Ian Rogersa9a82542013-10-04 11:17:26 -07001771 if (card_mark) {
Ian Rogers773aab12013-10-14 13:50:10 -07001772 // Free rl_index if its a temp. Ensures there are 2 free regs for card mark.
Mark Mendell343adb52013-12-18 06:02:17 -08001773 if (!constant_index) {
buzbee091cc402014-03-31 10:14:40 -07001774 FreeTemp(rl_index.reg);
Mark Mendell343adb52013-12-18 06:02:17 -08001775 }
buzbee2700f7e2014-03-07 09:46:20 -08001776 MarkGCCard(rl_src.reg, rl_array.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001777 }
1778}
1779
Mark Mendell4708dcd2014-01-22 09:05:18 -08001780RegLocation X86Mir2Lir::GenShiftImmOpLong(Instruction::Code opcode, RegLocation rl_dest,
1781 RegLocation rl_src, int shift_amount) {
Mark Mendelle87f9b52014-04-30 14:13:18 -04001782 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
Chao-ying Fua0147762014-06-06 18:38:49 -07001783 if (Gen64Bit()) {
1784 OpKind op = static_cast<OpKind>(0); /* Make gcc happy */
1785 switch (opcode) {
1786 case Instruction::SHL_LONG:
1787 case Instruction::SHL_LONG_2ADDR:
1788 op = kOpLsl;
1789 break;
1790 case Instruction::SHR_LONG:
1791 case Instruction::SHR_LONG_2ADDR:
1792 op = kOpAsr;
1793 break;
1794 case Instruction::USHR_LONG:
1795 case Instruction::USHR_LONG_2ADDR:
1796 op = kOpLsr;
1797 break;
1798 default:
1799 LOG(FATAL) << "Unexpected case";
1800 }
1801 OpRegRegImm(op, rl_result.reg, rl_src.reg, shift_amount);
1802 } else {
1803 switch (opcode) {
1804 case Instruction::SHL_LONG:
1805 case Instruction::SHL_LONG_2ADDR:
1806 DCHECK_NE(shift_amount, 1); // Prevent a double store from happening.
1807 if (shift_amount == 32) {
1808 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetLow());
1809 LoadConstant(rl_result.reg.GetLow(), 0);
1810 } else if (shift_amount > 31) {
1811 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetLow());
1812 NewLIR2(kX86Sal32RI, rl_result.reg.GetHighReg(), shift_amount - 32);
1813 LoadConstant(rl_result.reg.GetLow(), 0);
1814 } else {
1815 OpRegCopy(rl_result.reg, rl_src.reg);
1816 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetHigh());
1817 NewLIR3(kX86Shld32RRI, rl_result.reg.GetHighReg(), rl_result.reg.GetLowReg(),
1818 shift_amount);
1819 NewLIR2(kX86Sal32RI, rl_result.reg.GetLowReg(), shift_amount);
1820 }
1821 break;
1822 case Instruction::SHR_LONG:
1823 case Instruction::SHR_LONG_2ADDR:
1824 if (shift_amount == 32) {
1825 OpRegCopy(rl_result.reg.GetLow(), rl_src.reg.GetHigh());
1826 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetHigh());
1827 NewLIR2(kX86Sar32RI, rl_result.reg.GetHighReg(), 31);
1828 } else if (shift_amount > 31) {
1829 OpRegCopy(rl_result.reg.GetLow(), rl_src.reg.GetHigh());
1830 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetHigh());
1831 NewLIR2(kX86Sar32RI, rl_result.reg.GetLowReg(), shift_amount - 32);
1832 NewLIR2(kX86Sar32RI, rl_result.reg.GetHighReg(), 31);
1833 } else {
1834 OpRegCopy(rl_result.reg, rl_src.reg);
1835 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetHigh());
1836 NewLIR3(kX86Shrd32RRI, rl_result.reg.GetLowReg(), rl_result.reg.GetHighReg(),
1837 shift_amount);
1838 NewLIR2(kX86Sar32RI, rl_result.reg.GetHighReg(), shift_amount);
1839 }
1840 break;
1841 case Instruction::USHR_LONG:
1842 case Instruction::USHR_LONG_2ADDR:
1843 if (shift_amount == 32) {
1844 OpRegCopy(rl_result.reg.GetLow(), rl_src.reg.GetHigh());
1845 LoadConstant(rl_result.reg.GetHigh(), 0);
1846 } else if (shift_amount > 31) {
1847 OpRegCopy(rl_result.reg.GetLow(), rl_src.reg.GetHigh());
1848 NewLIR2(kX86Shr32RI, rl_result.reg.GetLowReg(), shift_amount - 32);
1849 LoadConstant(rl_result.reg.GetHigh(), 0);
1850 } else {
1851 OpRegCopy(rl_result.reg, rl_src.reg);
1852 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetHigh());
1853 NewLIR3(kX86Shrd32RRI, rl_result.reg.GetLowReg(), rl_result.reg.GetHighReg(),
1854 shift_amount);
1855 NewLIR2(kX86Shr32RI, rl_result.reg.GetHighReg(), shift_amount);
1856 }
1857 break;
1858 default:
1859 LOG(FATAL) << "Unexpected case";
1860 }
Mark Mendell4708dcd2014-01-22 09:05:18 -08001861 }
1862 return rl_result;
1863}
1864
Brian Carlstrom7940e442013-07-12 13:46:57 -07001865void X86Mir2Lir::GenShiftImmOpLong(Instruction::Code opcode, RegLocation rl_dest,
Mark Mendell4708dcd2014-01-22 09:05:18 -08001866 RegLocation rl_src, RegLocation rl_shift) {
1867 // Per spec, we only care about low 6 bits of shift amount.
1868 int shift_amount = mir_graph_->ConstantValue(rl_shift) & 0x3f;
1869 if (shift_amount == 0) {
1870 rl_src = LoadValueWide(rl_src, kCoreReg);
1871 StoreValueWide(rl_dest, rl_src);
1872 return;
1873 } else if (shift_amount == 1 &&
1874 (opcode == Instruction::SHL_LONG || opcode == Instruction::SHL_LONG_2ADDR)) {
1875 // Need to handle this here to avoid calling StoreValueWide twice.
1876 GenAddLong(Instruction::ADD_LONG, rl_dest, rl_src, rl_src);
1877 return;
1878 }
1879 if (BadOverlap(rl_src, rl_dest)) {
1880 GenShiftOpLong(opcode, rl_dest, rl_src, rl_shift);
1881 return;
1882 }
1883 rl_src = LoadValueWide(rl_src, kCoreReg);
1884 RegLocation rl_result = GenShiftImmOpLong(opcode, rl_dest, rl_src, shift_amount);
1885 StoreValueWide(rl_dest, rl_result);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001886}
1887
1888void X86Mir2Lir::GenArithImmOpLong(Instruction::Code opcode,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001889 RegLocation rl_dest, RegLocation rl_src1, RegLocation rl_src2) {
Chao-ying Fua0147762014-06-06 18:38:49 -07001890 bool isConstSuccess = false;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001891 switch (opcode) {
1892 case Instruction::ADD_LONG:
1893 case Instruction::AND_LONG:
1894 case Instruction::OR_LONG:
1895 case Instruction::XOR_LONG:
1896 if (rl_src2.is_const) {
Chao-ying Fua0147762014-06-06 18:38:49 -07001897 isConstSuccess = GenLongLongImm(rl_dest, rl_src1, rl_src2, opcode);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001898 } else {
1899 DCHECK(rl_src1.is_const);
Chao-ying Fua0147762014-06-06 18:38:49 -07001900 isConstSuccess = GenLongLongImm(rl_dest, rl_src2, rl_src1, opcode);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001901 }
1902 break;
1903 case Instruction::SUB_LONG:
1904 case Instruction::SUB_LONG_2ADDR:
1905 if (rl_src2.is_const) {
Chao-ying Fua0147762014-06-06 18:38:49 -07001906 isConstSuccess = GenLongLongImm(rl_dest, rl_src1, rl_src2, opcode);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001907 } else {
1908 GenSubLong(opcode, rl_dest, rl_src1, rl_src2);
Chao-ying Fua0147762014-06-06 18:38:49 -07001909 isConstSuccess = true;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001910 }
1911 break;
1912 case Instruction::ADD_LONG_2ADDR:
1913 case Instruction::OR_LONG_2ADDR:
1914 case Instruction::XOR_LONG_2ADDR:
1915 case Instruction::AND_LONG_2ADDR:
1916 if (rl_src2.is_const) {
Mark Mendelle87f9b52014-04-30 14:13:18 -04001917 if (GenerateTwoOperandInstructions()) {
Chao-ying Fua0147762014-06-06 18:38:49 -07001918 isConstSuccess = GenLongImm(rl_dest, rl_src2, opcode);
Mark Mendelle87f9b52014-04-30 14:13:18 -04001919 } else {
Chao-ying Fua0147762014-06-06 18:38:49 -07001920 isConstSuccess = GenLongLongImm(rl_dest, rl_src1, rl_src2, opcode);
Mark Mendelle87f9b52014-04-30 14:13:18 -04001921 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08001922 } else {
1923 DCHECK(rl_src1.is_const);
Chao-ying Fua0147762014-06-06 18:38:49 -07001924 isConstSuccess = GenLongLongImm(rl_dest, rl_src2, rl_src1, opcode);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001925 }
1926 break;
1927 default:
Chao-ying Fua0147762014-06-06 18:38:49 -07001928 isConstSuccess = false;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001929 break;
1930 }
Chao-ying Fua0147762014-06-06 18:38:49 -07001931
1932 if (!isConstSuccess) {
1933 // Default - bail to non-const handler.
1934 GenArithOpLong(opcode, rl_dest, rl_src1, rl_src2);
1935 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08001936}
1937
1938bool X86Mir2Lir::IsNoOp(Instruction::Code op, int32_t value) {
1939 switch (op) {
1940 case Instruction::AND_LONG_2ADDR:
1941 case Instruction::AND_LONG:
1942 return value == -1;
1943 case Instruction::OR_LONG:
1944 case Instruction::OR_LONG_2ADDR:
1945 case Instruction::XOR_LONG:
1946 case Instruction::XOR_LONG_2ADDR:
1947 return value == 0;
1948 default:
1949 return false;
1950 }
1951}
1952
1953X86OpCode X86Mir2Lir::GetOpcode(Instruction::Code op, RegLocation dest, RegLocation rhs,
1954 bool is_high_op) {
1955 bool rhs_in_mem = rhs.location != kLocPhysReg;
1956 bool dest_in_mem = dest.location != kLocPhysReg;
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001957 bool is64Bit = Gen64Bit();
Mark Mendelle02d48f2014-01-15 11:19:23 -08001958 DCHECK(!rhs_in_mem || !dest_in_mem);
1959 switch (op) {
1960 case Instruction::ADD_LONG:
1961 case Instruction::ADD_LONG_2ADDR:
1962 if (dest_in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001963 return is64Bit ? kX86Add64MR : is_high_op ? kX86Adc32MR : kX86Add32MR;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001964 } else if (rhs_in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001965 return is64Bit ? kX86Add64RM : is_high_op ? kX86Adc32RM : kX86Add32RM;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001966 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001967 return is64Bit ? kX86Add64RR : is_high_op ? kX86Adc32RR : kX86Add32RR;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001968 case Instruction::SUB_LONG:
1969 case Instruction::SUB_LONG_2ADDR:
1970 if (dest_in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001971 return is64Bit ? kX86Sub64MR : is_high_op ? kX86Sbb32MR : kX86Sub32MR;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001972 } else if (rhs_in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001973 return is64Bit ? kX86Sub64RM : is_high_op ? kX86Sbb32RM : kX86Sub32RM;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001974 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001975 return is64Bit ? kX86Sub64RR : is_high_op ? kX86Sbb32RR : kX86Sub32RR;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001976 case Instruction::AND_LONG_2ADDR:
1977 case Instruction::AND_LONG:
1978 if (dest_in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001979 return is64Bit ? kX86And64MR : kX86And32MR;
1980 }
1981 if (is64Bit) {
1982 return rhs_in_mem ? kX86And64RM : kX86And64RR;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001983 }
1984 return rhs_in_mem ? kX86And32RM : kX86And32RR;
1985 case Instruction::OR_LONG:
1986 case Instruction::OR_LONG_2ADDR:
1987 if (dest_in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001988 return is64Bit ? kX86Or64MR : kX86Or32MR;
1989 }
1990 if (is64Bit) {
1991 return rhs_in_mem ? kX86Or64RM : kX86Or64RR;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001992 }
1993 return rhs_in_mem ? kX86Or32RM : kX86Or32RR;
1994 case Instruction::XOR_LONG:
1995 case Instruction::XOR_LONG_2ADDR:
1996 if (dest_in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001997 return is64Bit ? kX86Xor64MR : kX86Xor32MR;
1998 }
1999 if (is64Bit) {
2000 return rhs_in_mem ? kX86Xor64RM : kX86Xor64RR;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002001 }
2002 return rhs_in_mem ? kX86Xor32RM : kX86Xor32RR;
2003 default:
2004 LOG(FATAL) << "Unexpected opcode: " << op;
2005 return kX86Add32RR;
2006 }
2007}
2008
2009X86OpCode X86Mir2Lir::GetOpcode(Instruction::Code op, RegLocation loc, bool is_high_op,
2010 int32_t value) {
2011 bool in_mem = loc.location != kLocPhysReg;
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002012 bool is64Bit = Gen64Bit();
Mark Mendelle02d48f2014-01-15 11:19:23 -08002013 bool byte_imm = IS_SIMM8(value);
buzbee091cc402014-03-31 10:14:40 -07002014 DCHECK(in_mem || !loc.reg.IsFloat());
Mark Mendelle02d48f2014-01-15 11:19:23 -08002015 switch (op) {
2016 case Instruction::ADD_LONG:
2017 case Instruction::ADD_LONG_2ADDR:
2018 if (byte_imm) {
2019 if (in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002020 return is64Bit ? kX86Add64MI8 : is_high_op ? kX86Adc32MI8 : kX86Add32MI8;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002021 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002022 return is64Bit ? kX86Add64RI8 : is_high_op ? kX86Adc32RI8 : kX86Add32RI8;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002023 }
2024 if (in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002025 return is64Bit ? kX86Add64MI : is_high_op ? kX86Adc32MI : kX86Add32MI;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002026 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002027 return is64Bit ? kX86Add64RI : is_high_op ? kX86Adc32RI : kX86Add32RI;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002028 case Instruction::SUB_LONG:
2029 case Instruction::SUB_LONG_2ADDR:
2030 if (byte_imm) {
2031 if (in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002032 return is64Bit ? kX86Sub64MI8 : is_high_op ? kX86Sbb32MI8 : kX86Sub32MI8;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002033 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002034 return is64Bit ? kX86Sub64RI8 : is_high_op ? kX86Sbb32RI8 : kX86Sub32RI8;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002035 }
2036 if (in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002037 return is64Bit ? kX86Sub64MI : is_high_op ? kX86Sbb32MI : kX86Sub32MI;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002038 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002039 return is64Bit ? kX86Sub64RI : is_high_op ? kX86Sbb32RI : kX86Sub32RI;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002040 case Instruction::AND_LONG_2ADDR:
2041 case Instruction::AND_LONG:
2042 if (byte_imm) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002043 if (is64Bit) {
2044 return in_mem ? kX86And64MI8 : kX86And64RI8;
2045 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08002046 return in_mem ? kX86And32MI8 : kX86And32RI8;
2047 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002048 if (is64Bit) {
2049 return in_mem ? kX86And64MI : kX86And64RI;
2050 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08002051 return in_mem ? kX86And32MI : kX86And32RI;
2052 case Instruction::OR_LONG:
2053 case Instruction::OR_LONG_2ADDR:
2054 if (byte_imm) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002055 if (is64Bit) {
2056 return in_mem ? kX86Or64MI8 : kX86Or64RI8;
2057 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08002058 return in_mem ? kX86Or32MI8 : kX86Or32RI8;
2059 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002060 if (is64Bit) {
2061 return in_mem ? kX86Or64MI : kX86Or64RI;
2062 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08002063 return in_mem ? kX86Or32MI : kX86Or32RI;
2064 case Instruction::XOR_LONG:
2065 case Instruction::XOR_LONG_2ADDR:
2066 if (byte_imm) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002067 if (is64Bit) {
2068 return in_mem ? kX86Xor64MI8 : kX86Xor64RI8;
2069 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08002070 return in_mem ? kX86Xor32MI8 : kX86Xor32RI8;
2071 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002072 if (is64Bit) {
2073 return in_mem ? kX86Xor64MI : kX86Xor64RI;
2074 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08002075 return in_mem ? kX86Xor32MI : kX86Xor32RI;
2076 default:
2077 LOG(FATAL) << "Unexpected opcode: " << op;
2078 return kX86Add32MI;
2079 }
2080}
2081
Chao-ying Fua0147762014-06-06 18:38:49 -07002082bool X86Mir2Lir::GenLongImm(RegLocation rl_dest, RegLocation rl_src, Instruction::Code op) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08002083 DCHECK(rl_src.is_const);
2084 int64_t val = mir_graph_->ConstantValueWide(rl_src);
Chao-ying Fua0147762014-06-06 18:38:49 -07002085
2086 if (Gen64Bit()) {
2087 // We can do with imm only if it fits 32 bit
2088 if (val != (static_cast<int64_t>(static_cast<int32_t>(val)))) {
2089 return false;
2090 }
2091
2092 rl_dest = UpdateLocWideTyped(rl_dest, kCoreReg);
2093
2094 if ((rl_dest.location == kLocDalvikFrame) ||
2095 (rl_dest.location == kLocCompilerTemp)) {
2096 int r_base = TargetReg(kSp).GetReg();
2097 int displacement = SRegOffset(rl_dest.s_reg_low);
2098
Vladimir Marko8dea81c2014-06-06 14:50:36 +01002099 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
Chao-ying Fua0147762014-06-06 18:38:49 -07002100 X86OpCode x86op = GetOpcode(op, rl_dest, false, val);
2101 LIR *lir = NewLIR3(x86op, r_base, displacement + LOWORD_OFFSET, val);
2102 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
2103 true /* is_load */, true /* is64bit */);
2104 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
2105 false /* is_load */, true /* is64bit */);
2106 return true;
2107 }
2108
2109 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
2110 DCHECK_EQ(rl_result.location, kLocPhysReg);
2111 DCHECK(!rl_result.reg.IsFloat());
2112
2113 X86OpCode x86op = GetOpcode(op, rl_result, false, val);
2114 NewLIR2(x86op, rl_result.reg.GetReg(), val);
2115
2116 StoreValueWide(rl_dest, rl_result);
2117 return true;
2118 }
2119
Mark Mendelle02d48f2014-01-15 11:19:23 -08002120 int32_t val_lo = Low32Bits(val);
2121 int32_t val_hi = High32Bits(val);
buzbee30adc732014-05-09 15:10:18 -07002122 rl_dest = UpdateLocWideTyped(rl_dest, kCoreReg);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002123
2124 // Can we just do this into memory?
2125 if ((rl_dest.location == kLocDalvikFrame) ||
2126 (rl_dest.location == kLocCompilerTemp)) {
buzbee2700f7e2014-03-07 09:46:20 -08002127 int r_base = TargetReg(kSp).GetReg();
Mark Mendelle02d48f2014-01-15 11:19:23 -08002128 int displacement = SRegOffset(rl_dest.s_reg_low);
2129
Vladimir Marko8dea81c2014-06-06 14:50:36 +01002130 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002131 if (!IsNoOp(op, val_lo)) {
2132 X86OpCode x86op = GetOpcode(op, rl_dest, false, val_lo);
buzbee2700f7e2014-03-07 09:46:20 -08002133 LIR *lir = NewLIR3(x86op, r_base, displacement + LOWORD_OFFSET, val_lo);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002134 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
Serguei Katkov217fe732014-03-27 14:41:56 +07002135 true /* is_load */, true /* is64bit */);
2136 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
Mark Mendelle02d48f2014-01-15 11:19:23 -08002137 false /* is_load */, true /* is64bit */);
2138 }
2139 if (!IsNoOp(op, val_hi)) {
2140 X86OpCode x86op = GetOpcode(op, rl_dest, true, val_hi);
buzbee2700f7e2014-03-07 09:46:20 -08002141 LIR *lir = NewLIR3(x86op, r_base, displacement + HIWORD_OFFSET, val_hi);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002142 AnnotateDalvikRegAccess(lir, (displacement + HIWORD_OFFSET) >> 2,
Serguei Katkov217fe732014-03-27 14:41:56 +07002143 true /* is_load */, true /* is64bit */);
2144 AnnotateDalvikRegAccess(lir, (displacement + HIWORD_OFFSET) >> 2,
Mark Mendelle02d48f2014-01-15 11:19:23 -08002145 false /* is_load */, true /* is64bit */);
2146 }
Chao-ying Fua0147762014-06-06 18:38:49 -07002147 return true;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002148 }
2149
2150 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
2151 DCHECK_EQ(rl_result.location, kLocPhysReg);
buzbee091cc402014-03-31 10:14:40 -07002152 DCHECK(!rl_result.reg.IsFloat());
Mark Mendelle02d48f2014-01-15 11:19:23 -08002153
2154 if (!IsNoOp(op, val_lo)) {
2155 X86OpCode x86op = GetOpcode(op, rl_result, false, val_lo);
buzbee2700f7e2014-03-07 09:46:20 -08002156 NewLIR2(x86op, rl_result.reg.GetLowReg(), val_lo);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002157 }
2158 if (!IsNoOp(op, val_hi)) {
2159 X86OpCode x86op = GetOpcode(op, rl_result, true, val_hi);
Bill Buzbee00e1ec62014-02-27 23:44:13 +00002160 NewLIR2(x86op, rl_result.reg.GetHighReg(), val_hi);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002161 }
2162 StoreValueWide(rl_dest, rl_result);
Chao-ying Fua0147762014-06-06 18:38:49 -07002163 return true;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002164}
2165
Chao-ying Fua0147762014-06-06 18:38:49 -07002166bool X86Mir2Lir::GenLongLongImm(RegLocation rl_dest, RegLocation rl_src1,
Mark Mendelle02d48f2014-01-15 11:19:23 -08002167 RegLocation rl_src2, Instruction::Code op) {
2168 DCHECK(rl_src2.is_const);
2169 int64_t val = mir_graph_->ConstantValueWide(rl_src2);
Chao-ying Fua0147762014-06-06 18:38:49 -07002170
2171 if (Gen64Bit()) {
2172 // We can do with imm only if it fits 32 bit
2173 if (val != (static_cast<int64_t>(static_cast<int32_t>(val)))) {
2174 return false;
2175 }
2176 if (rl_dest.location == kLocPhysReg &&
2177 rl_src1.location == kLocPhysReg && !rl_dest.reg.IsFloat()) {
2178 X86OpCode x86op = GetOpcode(op, rl_dest, false, val);
2179 NewLIR2(x86op, rl_dest.reg.GetReg(), val);
2180 StoreFinalValueWide(rl_dest, rl_dest);
2181 return true;
2182 }
2183
2184 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
2185 // We need the values to be in a temporary
2186 RegLocation rl_result = ForceTempWide(rl_src1);
2187
2188 X86OpCode x86op = GetOpcode(op, rl_result, false, val);
2189 NewLIR2(x86op, rl_result.reg.GetReg(), val);
2190
2191 StoreFinalValueWide(rl_dest, rl_result);
2192 return true;
2193 }
2194
Mark Mendelle02d48f2014-01-15 11:19:23 -08002195 int32_t val_lo = Low32Bits(val);
2196 int32_t val_hi = High32Bits(val);
buzbee30adc732014-05-09 15:10:18 -07002197 rl_dest = UpdateLocWideTyped(rl_dest, kCoreReg);
2198 rl_src1 = UpdateLocWideTyped(rl_src1, kCoreReg);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002199
2200 // Can we do this directly into the destination registers?
2201 if (rl_dest.location == kLocPhysReg && rl_src1.location == kLocPhysReg &&
buzbee2700f7e2014-03-07 09:46:20 -08002202 rl_dest.reg.GetLowReg() == rl_src1.reg.GetLowReg() &&
buzbee091cc402014-03-31 10:14:40 -07002203 rl_dest.reg.GetHighReg() == rl_src1.reg.GetHighReg() && !rl_dest.reg.IsFloat()) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08002204 if (!IsNoOp(op, val_lo)) {
2205 X86OpCode x86op = GetOpcode(op, rl_dest, false, val_lo);
buzbee2700f7e2014-03-07 09:46:20 -08002206 NewLIR2(x86op, rl_dest.reg.GetLowReg(), val_lo);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002207 }
2208 if (!IsNoOp(op, val_hi)) {
2209 X86OpCode x86op = GetOpcode(op, rl_dest, true, val_hi);
Bill Buzbee00e1ec62014-02-27 23:44:13 +00002210 NewLIR2(x86op, rl_dest.reg.GetHighReg(), val_hi);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002211 }
Maxim Kazantsev653f2bf2014-02-13 15:11:17 +07002212
2213 StoreFinalValueWide(rl_dest, rl_dest);
Chao-ying Fua0147762014-06-06 18:38:49 -07002214 return true;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002215 }
2216
2217 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
2218 DCHECK_EQ(rl_src1.location, kLocPhysReg);
2219
2220 // We need the values to be in a temporary
2221 RegLocation rl_result = ForceTempWide(rl_src1);
2222 if (!IsNoOp(op, val_lo)) {
2223 X86OpCode x86op = GetOpcode(op, rl_result, false, val_lo);
buzbee2700f7e2014-03-07 09:46:20 -08002224 NewLIR2(x86op, rl_result.reg.GetLowReg(), val_lo);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002225 }
2226 if (!IsNoOp(op, val_hi)) {
2227 X86OpCode x86op = GetOpcode(op, rl_result, true, val_hi);
Bill Buzbee00e1ec62014-02-27 23:44:13 +00002228 NewLIR2(x86op, rl_result.reg.GetHighReg(), val_hi);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002229 }
2230
2231 StoreFinalValueWide(rl_dest, rl_result);
Chao-ying Fua0147762014-06-06 18:38:49 -07002232 return true;
Brian Carlstrom7940e442013-07-12 13:46:57 -07002233}
2234
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002235// For final classes there are no sub-classes to check and so we can answer the instance-of
2236// question with simple comparisons. Use compares to memory and SETEQ to optimize for x86.
2237void X86Mir2Lir::GenInstanceofFinal(bool use_declaring_class, uint32_t type_idx,
2238 RegLocation rl_dest, RegLocation rl_src) {
buzbeea0cd2d72014-06-01 09:33:49 -07002239 RegLocation object = LoadValue(rl_src, kRefReg);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002240 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002241 RegStorage result_reg = rl_result.reg;
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002242
2243 // SETcc only works with EAX..EDX.
buzbee091cc402014-03-31 10:14:40 -07002244 if (result_reg == object.reg || result_reg.GetRegNum() >= rs_rX86_SP.GetRegNum()) {
Mark Mendelle87f9b52014-04-30 14:13:18 -04002245 result_reg = AllocateByteRegister();
buzbee091cc402014-03-31 10:14:40 -07002246 DCHECK_LT(result_reg.GetRegNum(), rs_rX86_SP.GetRegNum());
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002247 }
2248
2249 // Assume that there is no match.
2250 LoadConstant(result_reg, 0);
buzbee2700f7e2014-03-07 09:46:20 -08002251 LIR* null_branchover = OpCmpImmBranch(kCondEq, object.reg, 0, NULL);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002252
Mark Mendellade54a22014-06-09 12:49:55 -04002253 // We will use this register to compare to memory below.
2254 // References are 32 bit in memory, and 64 bit in registers (in 64 bit mode).
2255 // For this reason, force allocation of a 32 bit register to use, so that the
2256 // compare to memory will be done using a 32 bit comparision.
2257 // The LoadRefDisp(s) below will work normally, even in 64 bit mode.
2258 RegStorage check_class = AllocTemp();
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002259
2260 // If Method* is already in a register, we can save a copy.
2261 RegLocation rl_method = mir_graph_->GetMethodLoc();
Dmitry Petrochenko9ee801f2014-05-12 11:31:37 +07002262 int32_t offset_of_type = mirror::Array::DataOffset(sizeof(mirror::HeapReference<mirror::Class*>)).Int32Value() +
2263 (sizeof(mirror::HeapReference<mirror::Class*>) * type_idx);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002264
2265 if (rl_method.location == kLocPhysReg) {
2266 if (use_declaring_class) {
buzbee695d13a2014-04-19 13:32:20 -07002267 LoadRefDisp(rl_method.reg, mirror::ArtMethod::DeclaringClassOffset().Int32Value(),
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002268 check_class);
2269 } else {
buzbee695d13a2014-04-19 13:32:20 -07002270 LoadRefDisp(rl_method.reg, mirror::ArtMethod::DexCacheResolvedTypesOffset().Int32Value(),
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002271 check_class);
buzbee695d13a2014-04-19 13:32:20 -07002272 LoadRefDisp(check_class, offset_of_type, check_class);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002273 }
2274 } else {
2275 LoadCurrMethodDirect(check_class);
2276 if (use_declaring_class) {
buzbee695d13a2014-04-19 13:32:20 -07002277 LoadRefDisp(check_class, mirror::ArtMethod::DeclaringClassOffset().Int32Value(),
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002278 check_class);
2279 } else {
buzbee695d13a2014-04-19 13:32:20 -07002280 LoadRefDisp(check_class, mirror::ArtMethod::DexCacheResolvedTypesOffset().Int32Value(),
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002281 check_class);
buzbee695d13a2014-04-19 13:32:20 -07002282 LoadRefDisp(check_class, offset_of_type, check_class);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002283 }
2284 }
2285
2286 // Compare the computed class to the class in the object.
2287 DCHECK_EQ(object.location, kLocPhysReg);
buzbee2700f7e2014-03-07 09:46:20 -08002288 OpRegMem(kOpCmp, check_class, object.reg, mirror::Object::ClassOffset().Int32Value());
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002289
2290 // Set the low byte of the result to 0 or 1 from the compare condition code.
buzbee2700f7e2014-03-07 09:46:20 -08002291 NewLIR2(kX86Set8R, result_reg.GetReg(), kX86CondEq);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002292
2293 LIR* target = NewLIR0(kPseudoTargetLabel);
2294 null_branchover->target = target;
2295 FreeTemp(check_class);
2296 if (IsTemp(result_reg)) {
buzbee2700f7e2014-03-07 09:46:20 -08002297 OpRegCopy(rl_result.reg, result_reg);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002298 FreeTemp(result_reg);
2299 }
2300 StoreValue(rl_dest, rl_result);
2301}
2302
Mark Mendell6607d972014-02-10 06:54:18 -08002303void X86Mir2Lir::GenInstanceofCallingHelper(bool needs_access_check, bool type_known_final,
2304 bool type_known_abstract, bool use_declaring_class,
2305 bool can_assume_type_is_in_dex_cache,
2306 uint32_t type_idx, RegLocation rl_dest,
2307 RegLocation rl_src) {
2308 FlushAllRegs();
2309 // May generate a call - use explicit registers.
2310 LockCallTemps();
2311 LoadCurrMethodDirect(TargetReg(kArg1)); // kArg1 gets current Method*.
buzbee2700f7e2014-03-07 09:46:20 -08002312 RegStorage class_reg = TargetReg(kArg2); // kArg2 will hold the Class*.
Mark Mendell6607d972014-02-10 06:54:18 -08002313 // Reference must end up in kArg0.
2314 if (needs_access_check) {
2315 // Check we have access to type_idx and if not throw IllegalAccessError,
2316 // Caller function returns Class* in kArg0.
Dmitry Petrochenko9ee801f2014-05-12 11:31:37 +07002317 if (Is64BitInstructionSet(cu_->instruction_set)) {
2318 CallRuntimeHelperImm(QUICK_ENTRYPOINT_OFFSET(8, pInitializeTypeAndVerifyAccess),
2319 type_idx, true);
2320 } else {
2321 CallRuntimeHelperImm(QUICK_ENTRYPOINT_OFFSET(4, pInitializeTypeAndVerifyAccess),
2322 type_idx, true);
2323 }
Mark Mendell6607d972014-02-10 06:54:18 -08002324 OpRegCopy(class_reg, TargetReg(kRet0));
2325 LoadValueDirectFixed(rl_src, TargetReg(kArg0));
2326 } else if (use_declaring_class) {
2327 LoadValueDirectFixed(rl_src, TargetReg(kArg0));
buzbee695d13a2014-04-19 13:32:20 -07002328 LoadRefDisp(TargetReg(kArg1), mirror::ArtMethod::DeclaringClassOffset().Int32Value(),
buzbee2700f7e2014-03-07 09:46:20 -08002329 class_reg);
Mark Mendell6607d972014-02-10 06:54:18 -08002330 } else {
2331 // Load dex cache entry into class_reg (kArg2).
2332 LoadValueDirectFixed(rl_src, TargetReg(kArg0));
buzbee695d13a2014-04-19 13:32:20 -07002333 LoadRefDisp(TargetReg(kArg1), mirror::ArtMethod::DexCacheResolvedTypesOffset().Int32Value(),
buzbee2700f7e2014-03-07 09:46:20 -08002334 class_reg);
Mark Mendell6607d972014-02-10 06:54:18 -08002335 int32_t offset_of_type =
buzbeea0cd2d72014-06-01 09:33:49 -07002336 mirror::Array::DataOffset(sizeof(mirror::HeapReference<mirror::Class*>)).Int32Value() +
2337 (sizeof(mirror::HeapReference<mirror::Class*>) * type_idx);
buzbee695d13a2014-04-19 13:32:20 -07002338 LoadRefDisp(class_reg, offset_of_type, class_reg);
Mark Mendell6607d972014-02-10 06:54:18 -08002339 if (!can_assume_type_is_in_dex_cache) {
2340 // Need to test presence of type in dex cache at runtime.
2341 LIR* hop_branch = OpCmpImmBranch(kCondNe, class_reg, 0, NULL);
2342 // Type is not resolved. Call out to helper, which will return resolved type in kRet0/kArg0.
Dmitry Petrochenko9ee801f2014-05-12 11:31:37 +07002343 if (Is64BitInstructionSet(cu_->instruction_set)) {
2344 CallRuntimeHelperImm(QUICK_ENTRYPOINT_OFFSET(8, pInitializeType), type_idx, true);
2345 } else {
2346 CallRuntimeHelperImm(QUICK_ENTRYPOINT_OFFSET(4, pInitializeType), type_idx, true);
2347 }
Mark Mendell6607d972014-02-10 06:54:18 -08002348 OpRegCopy(TargetReg(kArg2), TargetReg(kRet0)); // Align usage with fast path.
2349 LoadValueDirectFixed(rl_src, TargetReg(kArg0)); /* Reload Ref. */
2350 // Rejoin code paths
2351 LIR* hop_target = NewLIR0(kPseudoTargetLabel);
2352 hop_branch->target = hop_target;
2353 }
2354 }
2355 /* kArg0 is ref, kArg2 is class. If ref==null, use directly as bool result. */
buzbeea0cd2d72014-06-01 09:33:49 -07002356 RegLocation rl_result = GetReturn(kRefReg);
Mark Mendell6607d972014-02-10 06:54:18 -08002357
2358 // SETcc only works with EAX..EDX.
buzbee091cc402014-03-31 10:14:40 -07002359 DCHECK_LT(rl_result.reg.GetRegNum(), 4);
Mark Mendell6607d972014-02-10 06:54:18 -08002360
2361 // Is the class NULL?
2362 LIR* branch1 = OpCmpImmBranch(kCondEq, TargetReg(kArg0), 0, NULL);
2363
2364 /* Load object->klass_. */
2365 DCHECK_EQ(mirror::Object::ClassOffset().Int32Value(), 0);
buzbee695d13a2014-04-19 13:32:20 -07002366 LoadRefDisp(TargetReg(kArg0), mirror::Object::ClassOffset().Int32Value(), TargetReg(kArg1));
Mark Mendell6607d972014-02-10 06:54:18 -08002367 /* kArg0 is ref, kArg1 is ref->klass_, kArg2 is class. */
2368 LIR* branchover = nullptr;
2369 if (type_known_final) {
2370 // Ensure top 3 bytes of result are 0.
buzbee2700f7e2014-03-07 09:46:20 -08002371 LoadConstant(rl_result.reg, 0);
Mark Mendell6607d972014-02-10 06:54:18 -08002372 OpRegReg(kOpCmp, TargetReg(kArg1), TargetReg(kArg2));
2373 // Set the low byte of the result to 0 or 1 from the compare condition code.
Bill Buzbee00e1ec62014-02-27 23:44:13 +00002374 NewLIR2(kX86Set8R, rl_result.reg.GetReg(), kX86CondEq);
Mark Mendell6607d972014-02-10 06:54:18 -08002375 } else {
2376 if (!type_known_abstract) {
buzbee2700f7e2014-03-07 09:46:20 -08002377 LoadConstant(rl_result.reg, 1); // Assume result succeeds.
Mark Mendell6607d972014-02-10 06:54:18 -08002378 branchover = OpCmpBranch(kCondEq, TargetReg(kArg1), TargetReg(kArg2), NULL);
2379 }
2380 OpRegCopy(TargetReg(kArg0), TargetReg(kArg2));
Dmitry Petrochenko9ee801f2014-05-12 11:31:37 +07002381 if (Is64BitInstructionSet(cu_->instruction_set)) {
2382 OpThreadMem(kOpBlx, QUICK_ENTRYPOINT_OFFSET(8, pInstanceofNonTrivial));
2383 } else {
2384 OpThreadMem(kOpBlx, QUICK_ENTRYPOINT_OFFSET(4, pInstanceofNonTrivial));
2385 }
Mark Mendell6607d972014-02-10 06:54:18 -08002386 }
2387 // TODO: only clobber when type isn't final?
2388 ClobberCallerSave();
2389 /* Branch targets here. */
2390 LIR* target = NewLIR0(kPseudoTargetLabel);
2391 StoreValue(rl_dest, rl_result);
2392 branch1->target = target;
2393 if (branchover != nullptr) {
2394 branchover->target = target;
2395 }
2396}
2397
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002398void X86Mir2Lir::GenArithOpInt(Instruction::Code opcode, RegLocation rl_dest,
2399 RegLocation rl_lhs, RegLocation rl_rhs) {
2400 OpKind op = kOpBkpt;
2401 bool is_div_rem = false;
2402 bool unary = false;
2403 bool shift_op = false;
2404 bool is_two_addr = false;
2405 RegLocation rl_result;
2406 switch (opcode) {
2407 case Instruction::NEG_INT:
2408 op = kOpNeg;
2409 unary = true;
2410 break;
2411 case Instruction::NOT_INT:
2412 op = kOpMvn;
2413 unary = true;
2414 break;
2415 case Instruction::ADD_INT_2ADDR:
2416 is_two_addr = true;
2417 // Fallthrough
2418 case Instruction::ADD_INT:
2419 op = kOpAdd;
2420 break;
2421 case Instruction::SUB_INT_2ADDR:
2422 is_two_addr = true;
2423 // Fallthrough
2424 case Instruction::SUB_INT:
2425 op = kOpSub;
2426 break;
2427 case Instruction::MUL_INT_2ADDR:
2428 is_two_addr = true;
2429 // Fallthrough
2430 case Instruction::MUL_INT:
2431 op = kOpMul;
2432 break;
2433 case Instruction::DIV_INT_2ADDR:
2434 is_two_addr = true;
2435 // Fallthrough
2436 case Instruction::DIV_INT:
2437 op = kOpDiv;
2438 is_div_rem = true;
2439 break;
2440 /* NOTE: returns in kArg1 */
2441 case Instruction::REM_INT_2ADDR:
2442 is_two_addr = true;
2443 // Fallthrough
2444 case Instruction::REM_INT:
2445 op = kOpRem;
2446 is_div_rem = true;
2447 break;
2448 case Instruction::AND_INT_2ADDR:
2449 is_two_addr = true;
2450 // Fallthrough
2451 case Instruction::AND_INT:
2452 op = kOpAnd;
2453 break;
2454 case Instruction::OR_INT_2ADDR:
2455 is_two_addr = true;
2456 // Fallthrough
2457 case Instruction::OR_INT:
2458 op = kOpOr;
2459 break;
2460 case Instruction::XOR_INT_2ADDR:
2461 is_two_addr = true;
2462 // Fallthrough
2463 case Instruction::XOR_INT:
2464 op = kOpXor;
2465 break;
2466 case Instruction::SHL_INT_2ADDR:
2467 is_two_addr = true;
2468 // Fallthrough
2469 case Instruction::SHL_INT:
2470 shift_op = true;
2471 op = kOpLsl;
2472 break;
2473 case Instruction::SHR_INT_2ADDR:
2474 is_two_addr = true;
2475 // Fallthrough
2476 case Instruction::SHR_INT:
2477 shift_op = true;
2478 op = kOpAsr;
2479 break;
2480 case Instruction::USHR_INT_2ADDR:
2481 is_two_addr = true;
2482 // Fallthrough
2483 case Instruction::USHR_INT:
2484 shift_op = true;
2485 op = kOpLsr;
2486 break;
2487 default:
2488 LOG(FATAL) << "Invalid word arith op: " << opcode;
2489 }
2490
Mark Mendelle87f9b52014-04-30 14:13:18 -04002491 // Can we convert to a two address instruction?
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002492 if (!is_two_addr &&
2493 (mir_graph_->SRegToVReg(rl_dest.s_reg_low) ==
2494 mir_graph_->SRegToVReg(rl_lhs.s_reg_low))) {
Mark Mendelle87f9b52014-04-30 14:13:18 -04002495 is_two_addr = true;
2496 }
2497
2498 if (!GenerateTwoOperandInstructions()) {
2499 is_two_addr = false;
2500 }
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002501
2502 // Get the div/rem stuff out of the way.
2503 if (is_div_rem) {
2504 rl_result = GenDivRem(rl_dest, rl_lhs, rl_rhs, op == kOpDiv, true);
2505 StoreValue(rl_dest, rl_result);
2506 return;
2507 }
2508
Vladimir Marko8dea81c2014-06-06 14:50:36 +01002509 // If we generate any memory access below, it will reference a dalvik reg.
2510 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
2511
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002512 if (unary) {
2513 rl_lhs = LoadValue(rl_lhs, kCoreReg);
buzbee30adc732014-05-09 15:10:18 -07002514 rl_result = UpdateLocTyped(rl_dest, kCoreReg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002515 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002516 OpRegReg(op, rl_result.reg, rl_lhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002517 } else {
2518 if (shift_op) {
2519 // X86 doesn't require masking and must use ECX.
buzbee2700f7e2014-03-07 09:46:20 -08002520 RegStorage t_reg = TargetReg(kCount); // rCX
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002521 LoadValueDirectFixed(rl_rhs, t_reg);
2522 if (is_two_addr) {
2523 // Can we do this directly into memory?
buzbee30adc732014-05-09 15:10:18 -07002524 rl_result = UpdateLocTyped(rl_dest, kCoreReg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002525 rl_rhs = LoadValue(rl_rhs, kCoreReg);
2526 if (rl_result.location != kLocPhysReg) {
2527 // Okay, we can do this into memory
buzbee2700f7e2014-03-07 09:46:20 -08002528 OpMemReg(op, rl_result, t_reg.GetReg());
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002529 FreeTemp(t_reg);
2530 return;
buzbee091cc402014-03-31 10:14:40 -07002531 } else if (!rl_result.reg.IsFloat()) {
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002532 // Can do this directly into the result register
buzbee2700f7e2014-03-07 09:46:20 -08002533 OpRegReg(op, rl_result.reg, t_reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002534 FreeTemp(t_reg);
2535 StoreFinalValue(rl_dest, rl_result);
2536 return;
2537 }
2538 }
2539 // Three address form, or we can't do directly.
2540 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2541 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002542 OpRegRegReg(op, rl_result.reg, rl_lhs.reg, t_reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002543 FreeTemp(t_reg);
2544 } else {
2545 // Multiply is 3 operand only (sort of).
2546 if (is_two_addr && op != kOpMul) {
2547 // Can we do this directly into memory?
buzbee30adc732014-05-09 15:10:18 -07002548 rl_result = UpdateLocTyped(rl_dest, kCoreReg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002549 if (rl_result.location == kLocPhysReg) {
Serguei Katkov366f8ae2014-04-15 16:55:26 +07002550 // Ensure res is in a core reg
2551 rl_result = EvalLoc(rl_dest, kCoreReg, true);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002552 // Can we do this from memory directly?
buzbee30adc732014-05-09 15:10:18 -07002553 rl_rhs = UpdateLocTyped(rl_rhs, kCoreReg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002554 if (rl_rhs.location != kLocPhysReg) {
buzbee2700f7e2014-03-07 09:46:20 -08002555 OpRegMem(op, rl_result.reg, rl_rhs);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002556 StoreFinalValue(rl_dest, rl_result);
2557 return;
buzbee091cc402014-03-31 10:14:40 -07002558 } else if (!rl_rhs.reg.IsFloat()) {
buzbee2700f7e2014-03-07 09:46:20 -08002559 OpRegReg(op, rl_result.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002560 StoreFinalValue(rl_dest, rl_result);
2561 return;
2562 }
2563 }
2564 rl_rhs = LoadValue(rl_rhs, kCoreReg);
Serguei Katkovd293fb42014-05-19 15:45:42 +07002565 // It might happen rl_rhs and rl_dest are the same VR
2566 // in this case rl_dest is in reg after LoadValue while
2567 // rl_result is not updated yet, so do this
2568 rl_result = UpdateLocTyped(rl_dest, kCoreReg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002569 if (rl_result.location != kLocPhysReg) {
2570 // Okay, we can do this into memory.
Bill Buzbee00e1ec62014-02-27 23:44:13 +00002571 OpMemReg(op, rl_result, rl_rhs.reg.GetReg());
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002572 return;
buzbee091cc402014-03-31 10:14:40 -07002573 } else if (!rl_result.reg.IsFloat()) {
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002574 // Can do this directly into the result register.
buzbee2700f7e2014-03-07 09:46:20 -08002575 OpRegReg(op, rl_result.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002576 StoreFinalValue(rl_dest, rl_result);
2577 return;
2578 } else {
2579 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2580 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002581 OpRegRegReg(op, rl_result.reg, rl_lhs.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002582 }
2583 } else {
2584 // Try to use reg/memory instructions.
buzbee30adc732014-05-09 15:10:18 -07002585 rl_lhs = UpdateLocTyped(rl_lhs, kCoreReg);
2586 rl_rhs = UpdateLocTyped(rl_rhs, kCoreReg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002587 // We can't optimize with FP registers.
2588 if (!IsOperationSafeWithoutTemps(rl_lhs, rl_rhs)) {
2589 // Something is difficult, so fall back to the standard case.
2590 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2591 rl_rhs = LoadValue(rl_rhs, kCoreReg);
2592 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002593 OpRegRegReg(op, rl_result.reg, rl_lhs.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002594 } else {
2595 // We can optimize by moving to result and using memory operands.
2596 if (rl_rhs.location != kLocPhysReg) {
2597 // Force LHS into result.
Serguei Katkov66da1362014-03-14 13:33:33 +07002598 // We should be careful with order here
2599 // If rl_dest and rl_lhs points to the same VR we should load first
2600 // If the are different we should find a register first for dest
Chao-ying Fua0147762014-06-06 18:38:49 -07002601 if (mir_graph_->SRegToVReg(rl_dest.s_reg_low) ==
2602 mir_graph_->SRegToVReg(rl_lhs.s_reg_low)) {
Serguei Katkov66da1362014-03-14 13:33:33 +07002603 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2604 rl_result = EvalLoc(rl_dest, kCoreReg, true);
Mark Mendelle87f9b52014-04-30 14:13:18 -04002605 // No-op if these are the same.
2606 OpRegCopy(rl_result.reg, rl_lhs.reg);
Serguei Katkov66da1362014-03-14 13:33:33 +07002607 } else {
2608 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002609 LoadValueDirect(rl_lhs, rl_result.reg);
Serguei Katkov66da1362014-03-14 13:33:33 +07002610 }
buzbee2700f7e2014-03-07 09:46:20 -08002611 OpRegMem(op, rl_result.reg, rl_rhs);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002612 } else if (rl_lhs.location != kLocPhysReg) {
2613 // RHS is in a register; LHS is in memory.
2614 if (op != kOpSub) {
2615 // Force RHS into result and operate on memory.
2616 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002617 OpRegCopy(rl_result.reg, rl_rhs.reg);
2618 OpRegMem(op, rl_result.reg, rl_lhs);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002619 } else {
2620 // Subtraction isn't commutative.
2621 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2622 rl_rhs = LoadValue(rl_rhs, kCoreReg);
2623 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002624 OpRegRegReg(op, rl_result.reg, rl_lhs.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002625 }
2626 } else {
2627 // Both are in registers.
2628 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2629 rl_rhs = LoadValue(rl_rhs, kCoreReg);
2630 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002631 OpRegRegReg(op, rl_result.reg, rl_lhs.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002632 }
2633 }
2634 }
2635 }
2636 }
2637 StoreValue(rl_dest, rl_result);
2638}
2639
2640bool X86Mir2Lir::IsOperationSafeWithoutTemps(RegLocation rl_lhs, RegLocation rl_rhs) {
2641 // If we have non-core registers, then we can't do good things.
buzbee091cc402014-03-31 10:14:40 -07002642 if (rl_lhs.location == kLocPhysReg && rl_lhs.reg.IsFloat()) {
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002643 return false;
2644 }
buzbee091cc402014-03-31 10:14:40 -07002645 if (rl_rhs.location == kLocPhysReg && rl_rhs.reg.IsFloat()) {
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002646 return false;
2647 }
2648
2649 // Everything will be fine :-).
2650 return true;
2651}
Chao-ying Fua0147762014-06-06 18:38:49 -07002652
2653void X86Mir2Lir::GenIntToLong(RegLocation rl_dest, RegLocation rl_src) {
2654 if (!Gen64Bit()) {
2655 Mir2Lir::GenIntToLong(rl_dest, rl_src);
2656 return;
2657 }
2658 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
2659 if (rl_src.location == kLocPhysReg) {
2660 NewLIR2(kX86MovsxdRR, rl_result.reg.GetReg(), rl_src.reg.GetReg());
2661 } else {
2662 int displacement = SRegOffset(rl_src.s_reg_low);
Vladimir Marko8dea81c2014-06-06 14:50:36 +01002663 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
Chao-ying Fua0147762014-06-06 18:38:49 -07002664 LIR *m = NewLIR3(kX86MovsxdRM, rl_result.reg.GetReg(), rs_rX86_SP.GetReg(),
2665 displacement + LOWORD_OFFSET);
2666 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
2667 true /* is_load */, true /* is_64bit */);
2668 }
2669 StoreValueWide(rl_dest, rl_result);
2670}
2671
2672void X86Mir2Lir::GenShiftOpLong(Instruction::Code opcode, RegLocation rl_dest,
2673 RegLocation rl_src1, RegLocation rl_shift) {
2674 if (!Gen64Bit()) {
2675 Mir2Lir::GenShiftOpLong(opcode, rl_dest, rl_src1, rl_shift);
2676 return;
2677 }
2678
2679 bool is_two_addr = false;
2680 OpKind op = kOpBkpt;
2681 RegLocation rl_result;
2682
2683 switch (opcode) {
2684 case Instruction::SHL_LONG_2ADDR:
2685 is_two_addr = true;
2686 // Fallthrough
2687 case Instruction::SHL_LONG:
2688 op = kOpLsl;
2689 break;
2690 case Instruction::SHR_LONG_2ADDR:
2691 is_two_addr = true;
2692 // Fallthrough
2693 case Instruction::SHR_LONG:
2694 op = kOpAsr;
2695 break;
2696 case Instruction::USHR_LONG_2ADDR:
2697 is_two_addr = true;
2698 // Fallthrough
2699 case Instruction::USHR_LONG:
2700 op = kOpLsr;
2701 break;
2702 default:
2703 op = kOpBkpt;
2704 }
2705
2706 // X86 doesn't require masking and must use ECX.
2707 RegStorage t_reg = TargetReg(kCount); // rCX
2708 LoadValueDirectFixed(rl_shift, t_reg);
2709 if (is_two_addr) {
2710 // Can we do this directly into memory?
2711 rl_result = UpdateLocWideTyped(rl_dest, kCoreReg);
2712 if (rl_result.location != kLocPhysReg) {
2713 // Okay, we can do this into memory
Vladimir Marko8dea81c2014-06-06 14:50:36 +01002714 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
Chao-ying Fua0147762014-06-06 18:38:49 -07002715 OpMemReg(op, rl_result, t_reg.GetReg());
2716 } else if (!rl_result.reg.IsFloat()) {
2717 // Can do this directly into the result register
2718 OpRegReg(op, rl_result.reg, t_reg);
2719 StoreFinalValueWide(rl_dest, rl_result);
2720 }
2721 } else {
2722 // Three address form, or we can't do directly.
2723 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
2724 rl_result = EvalLocWide(rl_dest, kCoreReg, true);
2725 OpRegRegReg(op, rl_result.reg, rl_src1.reg, t_reg);
2726 StoreFinalValueWide(rl_dest, rl_result);
2727 }
2728
2729 FreeTemp(t_reg);
2730}
2731
Brian Carlstrom7940e442013-07-12 13:46:57 -07002732} // namespace art