blob: a050a0546661ce88cbe303a8c11c566b4b612dba [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);
buzbee091cc402014-03-31 10:14:40 -0700797 NewLIR1(kX86Push32R, rs_rDI.GetReg());
798 MarkTemp(rs_rDI);
799 LockTemp(rs_rDI);
800 NewLIR1(kX86Push32R, rs_rSI.GetReg());
801 MarkTemp(rs_rSI);
802 LockTemp(rs_rSI);
Vladimir Markoa6fd8ba2013-12-13 10:53:49 +0000803 const int push_offset = 4 /* push edi */ + 4 /* push esi */;
buzbee2700f7e2014-03-07 09:46:20 -0800804 int srcObjSp = IsInReg(this, rl_src_obj, rs_rSI) ? 0
805 : (IsInReg(this, rl_src_obj, rs_rDI) ? 4
Yevgeny Rouband3a2dfa2014-03-18 15:55:16 +0700806 : (SRegOffset(rl_src_obj.s_reg_low) + push_offset));
buzbee695d13a2014-04-19 13:32:20 -0700807 // FIXME: needs 64-bit update.
buzbee2700f7e2014-03-07 09:46:20 -0800808 LoadWordDisp(TargetReg(kSp), srcObjSp, rs_rDI);
809 int srcOffsetSp = IsInReg(this, rl_src_offset, rs_rSI) ? 0
810 : (IsInReg(this, rl_src_offset, rs_rDI) ? 4
Yevgeny Rouband3a2dfa2014-03-18 15:55:16 +0700811 : (SRegOffset(rl_src_offset.s_reg_low) + push_offset));
buzbee2700f7e2014-03-07 09:46:20 -0800812 LoadWordDisp(TargetReg(kSp), srcOffsetSp, rs_rSI);
Ian Rogers0f9b9c52014-06-09 01:32:12 -0700813 NewLIR4(kX86LockCmpxchg64A, rs_rDI.GetReg(), rs_rSI.GetReg(), 0, 0);
Razvan A Lupusoru99ad7232014-02-25 17:41:08 -0800814
815 // After a store we need to insert barrier in case of potential load. Since the
816 // locked cmpxchg has full barrier semantics, only a scheduling barrier will be generated.
817 GenMemBarrier(kStoreLoad);
818
buzbee091cc402014-03-31 10:14:40 -0700819 FreeTemp(rs_rSI);
820 UnmarkTemp(rs_rSI);
821 NewLIR1(kX86Pop32R, rs_rSI.GetReg());
822 FreeTemp(rs_rDI);
823 UnmarkTemp(rs_rDI);
824 NewLIR1(kX86Pop32R, rs_rDI.GetReg());
Vladimir Marko70b797d2013-12-03 15:25:24 +0000825 FreeCallTemps();
Vladimir Markoc29bb612013-11-27 16:47:25 +0000826 } else {
827 // EAX must hold expected for CMPXCHG. Neither rl_new_value, nor r_ptr may be in EAX.
buzbee2700f7e2014-03-07 09:46:20 -0800828 FlushReg(rs_r0);
buzbee091cc402014-03-31 10:14:40 -0700829 Clobber(rs_r0);
buzbee2700f7e2014-03-07 09:46:20 -0800830 LockTemp(rs_r0);
Vladimir Markoc29bb612013-11-27 16:47:25 +0000831
buzbeea0cd2d72014-06-01 09:33:49 -0700832 RegLocation rl_object = LoadValue(rl_src_obj, kRefReg);
833 RegLocation rl_new_value = LoadValue(rl_src_new_value);
Vladimir Markoc29bb612013-11-27 16:47:25 +0000834
835 if (is_object && !mir_graph_->IsConstantNullRef(rl_new_value)) {
836 // Mark card for object assuming new value is stored.
buzbee091cc402014-03-31 10:14:40 -0700837 FreeTemp(rs_r0); // Temporarily release EAX for MarkGCCard().
buzbee2700f7e2014-03-07 09:46:20 -0800838 MarkGCCard(rl_new_value.reg, rl_object.reg);
buzbee091cc402014-03-31 10:14:40 -0700839 LockTemp(rs_r0);
Vladimir Markoc29bb612013-11-27 16:47:25 +0000840 }
841
842 RegLocation rl_offset = LoadValue(rl_src_offset, kCoreReg);
buzbee2700f7e2014-03-07 09:46:20 -0800843 LoadValueDirect(rl_src_expected, rs_r0);
Bill Buzbee00e1ec62014-02-27 23:44:13 +0000844 NewLIR5(kX86LockCmpxchgAR, rl_object.reg.GetReg(), rl_offset.reg.GetReg(), 0, 0, rl_new_value.reg.GetReg());
Vladimir Markoc29bb612013-11-27 16:47:25 +0000845
Razvan A Lupusoru99ad7232014-02-25 17:41:08 -0800846 // After a store we need to insert barrier in case of potential load. Since the
847 // locked cmpxchg has full barrier semantics, only a scheduling barrier will be generated.
848 GenMemBarrier(kStoreLoad);
849
buzbee091cc402014-03-31 10:14:40 -0700850 FreeTemp(rs_r0);
Vladimir Markoc29bb612013-11-27 16:47:25 +0000851 }
852
853 // Convert ZF to boolean
854 RegLocation rl_dest = InlineTarget(info); // boolean place for result
855 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
Ian Rogers0f9b9c52014-06-09 01:32:12 -0700856 RegStorage result_reg = rl_result.reg;
857
858 // SETcc only works with EAX..EDX.
859 if (result_reg.GetRegNum() >= rs_rX86_SP.GetRegNum()) {
860 result_reg = AllocateByteRegister();
861 DCHECK_LT(result_reg.GetRegNum(), rs_rX86_SP.GetRegNum());
862 }
863 NewLIR2(kX86Set8R, result_reg.GetReg(), kX86CondZ);
864 NewLIR2(kX86Movzx8RR, rl_result.reg.GetReg(), result_reg.GetReg());
865 if (IsTemp(result_reg)) {
866 FreeTemp(result_reg);
867 }
Vladimir Markoc29bb612013-11-27 16:47:25 +0000868 StoreValue(rl_dest, rl_result);
869 return true;
Brian Carlstrom7940e442013-07-12 13:46:57 -0700870}
871
buzbee2700f7e2014-03-07 09:46:20 -0800872LIR* X86Mir2Lir::OpPcRelLoad(RegStorage reg, LIR* target) {
Mark Mendell55d0eac2014-02-06 11:02:52 -0800873 CHECK(base_of_code_ != nullptr);
874
875 // Address the start of the method
876 RegLocation rl_method = mir_graph_->GetRegLocation(base_of_code_->s_reg_low);
Chao-ying Fue0ccdc02014-06-06 17:32:37 -0700877 if (rl_method.wide) {
878 LoadValueDirectWideFixed(rl_method, reg);
879 } else {
880 LoadValueDirectFixed(rl_method, reg);
881 }
Mark Mendell55d0eac2014-02-06 11:02:52 -0800882 store_method_addr_used_ = true;
883
884 // Load the proper value from the literal area.
885 // We don't know the proper offset for the value, so pick one that will force
886 // 4 byte offset. We will fix this up in the assembler later to have the right
887 // value.
buzbee2700f7e2014-03-07 09:46:20 -0800888 LIR *res = RawLIR(current_dalvik_offset_, kX86Mov32RM, reg.GetReg(), reg.GetReg(), 256,
889 0, 0, target);
Mark Mendell55d0eac2014-02-06 11:02:52 -0800890 res->target = target;
891 res->flags.fixup = kFixupLoad;
892 SetMemRefType(res, true, kLiteral);
893 store_method_addr_used_ = true;
894 return res;
Brian Carlstrom7940e442013-07-12 13:46:57 -0700895}
896
buzbee2700f7e2014-03-07 09:46:20 -0800897LIR* X86Mir2Lir::OpVldm(RegStorage r_base, int count) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700898 LOG(FATAL) << "Unexpected use of OpVldm for x86";
899 return NULL;
900}
901
buzbee2700f7e2014-03-07 09:46:20 -0800902LIR* X86Mir2Lir::OpVstm(RegStorage r_base, int count) {
Brian Carlstrom7940e442013-07-12 13:46:57 -0700903 LOG(FATAL) << "Unexpected use of OpVstm for x86";
904 return NULL;
905}
906
907void X86Mir2Lir::GenMultiplyByTwoBitMultiplier(RegLocation rl_src,
908 RegLocation rl_result, int lit,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700909 int first_bit, int second_bit) {
buzbee2700f7e2014-03-07 09:46:20 -0800910 RegStorage t_reg = AllocTemp();
911 OpRegRegImm(kOpLsl, t_reg, rl_src.reg, second_bit - first_bit);
912 OpRegRegReg(kOpAdd, rl_result.reg, rl_src.reg, t_reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700913 FreeTemp(t_reg);
914 if (first_bit != 0) {
buzbee2700f7e2014-03-07 09:46:20 -0800915 OpRegRegImm(kOpLsl, rl_result.reg, rl_result.reg, first_bit);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700916 }
917}
918
Mingyao Yange643a172014-04-08 11:02:52 -0700919void X86Mir2Lir::GenDivZeroCheckWide(RegStorage reg) {
Chao-ying Fua0147762014-06-06 18:38:49 -0700920 if (Gen64Bit()) {
921 DCHECK(reg.Is64Bit());
Razvan A Lupusoru090dd442013-12-20 14:35:03 -0800922
Chao-ying Fua0147762014-06-06 18:38:49 -0700923 NewLIR2(kX86Cmp64RI8, reg.GetReg(), 0);
924 } else {
925 DCHECK(reg.IsPair());
926
927 // We are not supposed to clobber the incoming storage, so allocate a temporary.
928 RegStorage t_reg = AllocTemp();
929 // Doing an OR is a quick way to check if both registers are zero. This will set the flags.
930 OpRegRegReg(kOpOr, t_reg, reg.GetLow(), reg.GetHigh());
931 // The temp is no longer needed so free it at this time.
932 FreeTemp(t_reg);
933 }
Razvan A Lupusoru090dd442013-12-20 14:35:03 -0800934
935 // In case of zero, throw ArithmeticException.
Mingyao Yange643a172014-04-08 11:02:52 -0700936 GenDivZeroCheck(kCondEq);
Brian Carlstrom7940e442013-07-12 13:46:57 -0700937}
938
Mingyao Yang80365d92014-04-18 12:10:58 -0700939void X86Mir2Lir::GenArrayBoundsCheck(RegStorage index,
940 RegStorage array_base,
941 int len_offset) {
942 class ArrayBoundsCheckSlowPath : public Mir2Lir::LIRSlowPath {
943 public:
944 ArrayBoundsCheckSlowPath(Mir2Lir* m2l, LIR* branch,
945 RegStorage index, RegStorage array_base, int32_t len_offset)
946 : LIRSlowPath(m2l, m2l->GetCurrentDexPc(), branch),
947 index_(index), array_base_(array_base), len_offset_(len_offset) {
948 }
949
950 void Compile() OVERRIDE {
951 m2l_->ResetRegPool();
952 m2l_->ResetDefTracking();
Mingyao Yang6ffcfa02014-04-25 11:06:00 -0700953 GenerateTargetLabel(kPseudoThrowTarget);
Mingyao Yang80365d92014-04-18 12:10:58 -0700954
955 RegStorage new_index = index_;
956 // Move index out of kArg1, either directly to kArg0, or to kArg2.
957 if (index_.GetReg() == m2l_->TargetReg(kArg1).GetReg()) {
958 if (array_base_.GetReg() == m2l_->TargetReg(kArg0).GetReg()) {
959 m2l_->OpRegCopy(m2l_->TargetReg(kArg2), index_);
960 new_index = m2l_->TargetReg(kArg2);
961 } else {
962 m2l_->OpRegCopy(m2l_->TargetReg(kArg0), index_);
963 new_index = m2l_->TargetReg(kArg0);
964 }
965 }
966 // Load array length to kArg1.
967 m2l_->OpRegMem(kOpMov, m2l_->TargetReg(kArg1), array_base_, len_offset_);
Dmitry Petrochenko9ee801f2014-05-12 11:31:37 +0700968 if (Is64BitInstructionSet(cu_->instruction_set)) {
969 m2l_->CallRuntimeHelperRegReg(QUICK_ENTRYPOINT_OFFSET(8, pThrowArrayBounds),
970 new_index, m2l_->TargetReg(kArg1), true);
971 } else {
972 m2l_->CallRuntimeHelperRegReg(QUICK_ENTRYPOINT_OFFSET(4, pThrowArrayBounds),
973 new_index, m2l_->TargetReg(kArg1), true);
974 }
Mingyao Yang80365d92014-04-18 12:10:58 -0700975 }
976
977 private:
978 const RegStorage index_;
979 const RegStorage array_base_;
980 const int32_t len_offset_;
981 };
982
983 OpRegMem(kOpCmp, index, array_base, len_offset);
984 LIR* branch = OpCondBranch(kCondUge, nullptr);
985 AddSlowPath(new (arena_) ArrayBoundsCheckSlowPath(this, branch,
986 index, array_base, len_offset));
987}
988
989void X86Mir2Lir::GenArrayBoundsCheck(int32_t index,
990 RegStorage array_base,
991 int32_t len_offset) {
992 class ArrayBoundsCheckSlowPath : public Mir2Lir::LIRSlowPath {
993 public:
994 ArrayBoundsCheckSlowPath(Mir2Lir* m2l, LIR* branch,
995 int32_t index, RegStorage array_base, int32_t len_offset)
996 : LIRSlowPath(m2l, m2l->GetCurrentDexPc(), branch),
997 index_(index), array_base_(array_base), len_offset_(len_offset) {
998 }
999
1000 void Compile() OVERRIDE {
1001 m2l_->ResetRegPool();
1002 m2l_->ResetDefTracking();
Mingyao Yang6ffcfa02014-04-25 11:06:00 -07001003 GenerateTargetLabel(kPseudoThrowTarget);
Mingyao Yang80365d92014-04-18 12:10:58 -07001004
1005 // Load array length to kArg1.
1006 m2l_->OpRegMem(kOpMov, m2l_->TargetReg(kArg1), array_base_, len_offset_);
1007 m2l_->LoadConstant(m2l_->TargetReg(kArg0), index_);
Dmitry Petrochenko9ee801f2014-05-12 11:31:37 +07001008 if (Is64BitInstructionSet(cu_->instruction_set)) {
1009 m2l_->CallRuntimeHelperRegReg(QUICK_ENTRYPOINT_OFFSET(8, pThrowArrayBounds),
1010 m2l_->TargetReg(kArg0), m2l_->TargetReg(kArg1), true);
1011 } else {
1012 m2l_->CallRuntimeHelperRegReg(QUICK_ENTRYPOINT_OFFSET(4, pThrowArrayBounds),
1013 m2l_->TargetReg(kArg0), m2l_->TargetReg(kArg1), true);
1014 }
Mingyao Yang80365d92014-04-18 12:10:58 -07001015 }
1016
1017 private:
1018 const int32_t index_;
1019 const RegStorage array_base_;
1020 const int32_t len_offset_;
1021 };
1022
1023 NewLIR3(IS_SIMM8(index) ? kX86Cmp32MI8 : kX86Cmp32MI, array_base.GetReg(), len_offset, index);
1024 LIR* branch = OpCondBranch(kCondLs, nullptr);
1025 AddSlowPath(new (arena_) ArrayBoundsCheckSlowPath(this, branch,
1026 index, array_base, len_offset));
1027}
1028
Brian Carlstrom7940e442013-07-12 13:46:57 -07001029// Test suspend flag, return target of taken suspend branch
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001030LIR* X86Mir2Lir::OpTestSuspend(LIR* target) {
Andreas Gampe2f244e92014-05-08 03:35:25 -07001031 if (Is64BitInstructionSet(cu_->instruction_set)) {
1032 OpTlsCmp(Thread::ThreadFlagsOffset<8>(), 0);
1033 } else {
1034 OpTlsCmp(Thread::ThreadFlagsOffset<4>(), 0);
1035 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001036 return OpCondBranch((target == NULL) ? kCondNe : kCondEq, target);
1037}
1038
1039// Decrement register and branch on condition
buzbee2700f7e2014-03-07 09:46:20 -08001040LIR* X86Mir2Lir::OpDecAndBranch(ConditionCode c_code, RegStorage reg, LIR* target) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001041 OpRegImm(kOpSub, reg, 1);
Yixin Shoua0dac3e2014-01-23 05:01:22 -08001042 return OpCondBranch(c_code, target);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001043}
1044
buzbee11b63d12013-08-27 07:34:17 -07001045bool X86Mir2Lir::SmallLiteralDivRem(Instruction::Code dalvik_opcode, bool is_div,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001046 RegLocation rl_src, RegLocation rl_dest, int lit) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001047 LOG(FATAL) << "Unexpected use of smallLiteralDive in x86";
1048 return false;
1049}
1050
Ian Rogerse2143c02014-03-28 08:47:16 -07001051bool X86Mir2Lir::EasyMultiply(RegLocation rl_src, RegLocation rl_dest, int lit) {
1052 LOG(FATAL) << "Unexpected use of easyMultiply in x86";
1053 return false;
1054}
1055
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001056LIR* X86Mir2Lir::OpIT(ConditionCode cond, const char* guide) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001057 LOG(FATAL) << "Unexpected use of OpIT in x86";
1058 return NULL;
1059}
1060
Dave Allison3da67a52014-04-02 17:03:45 -07001061void X86Mir2Lir::OpEndIT(LIR* it) {
1062 LOG(FATAL) << "Unexpected use of OpEndIT in x86";
1063}
1064
buzbee2700f7e2014-03-07 09:46:20 -08001065void X86Mir2Lir::GenImulRegImm(RegStorage dest, RegStorage src, int val) {
Mark Mendell4708dcd2014-01-22 09:05:18 -08001066 switch (val) {
1067 case 0:
buzbee2700f7e2014-03-07 09:46:20 -08001068 NewLIR2(kX86Xor32RR, dest.GetReg(), dest.GetReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001069 break;
1070 case 1:
1071 OpRegCopy(dest, src);
1072 break;
1073 default:
1074 OpRegRegImm(kOpMul, dest, src, val);
1075 break;
1076 }
1077}
1078
buzbee2700f7e2014-03-07 09:46:20 -08001079void X86Mir2Lir::GenImulMemImm(RegStorage dest, int sreg, int displacement, int val) {
Mark Mendell4708dcd2014-01-22 09:05:18 -08001080 LIR *m;
1081 switch (val) {
1082 case 0:
buzbee2700f7e2014-03-07 09:46:20 -08001083 NewLIR2(kX86Xor32RR, dest.GetReg(), dest.GetReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001084 break;
1085 case 1:
Vladimir Marko3bf7c602014-05-07 14:55:43 +01001086 LoadBaseDisp(rs_rX86_SP, displacement, dest, k32);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001087 break;
1088 default:
buzbee091cc402014-03-31 10:14:40 -07001089 m = NewLIR4(IS_SIMM8(val) ? kX86Imul32RMI8 : kX86Imul32RMI, dest.GetReg(),
1090 rs_rX86_SP.GetReg(), displacement, val);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001091 AnnotateDalvikRegAccess(m, displacement >> 2, true /* is_load */, true /* is_64bit */);
1092 break;
1093 }
1094}
1095
Mark Mendelle02d48f2014-01-15 11:19:23 -08001096void X86Mir2Lir::GenMulLong(Instruction::Code, RegLocation rl_dest, RegLocation rl_src1,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001097 RegLocation rl_src2) {
Alexei Zavjalovd8191d02014-06-11 18:26:40 +07001098 if (Gen64Bit()) {
1099 if (rl_src1.is_const) {
1100 std::swap(rl_src1, rl_src2);
1101 }
1102 // Are we multiplying by a constant?
1103 if (rl_src2.is_const) {
1104 int64_t val = mir_graph_->ConstantValueWide(rl_src2);
1105 if (val == 0) {
1106 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
1107 OpRegReg(kOpXor, rl_result.reg, rl_result.reg);
1108 StoreValueWide(rl_dest, rl_result);
1109 return;
1110 } else if (val == 1) {
1111 StoreValueWide(rl_dest, rl_src1);
1112 return;
1113 } else if (val == 2) {
1114 GenAddLong(Instruction::ADD_LONG, rl_dest, rl_src1, rl_src1);
1115 return;
1116 } else if (IsPowerOfTwo(val)) {
1117 int shift_amount = LowestSetBit(val);
1118 if (!BadOverlap(rl_src1, rl_dest)) {
1119 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
1120 RegLocation rl_result = GenShiftImmOpLong(Instruction::SHL_LONG, rl_dest,
1121 rl_src1, shift_amount);
1122 StoreValueWide(rl_dest, rl_result);
1123 return;
1124 }
1125 }
Alexei Zavjalovd8191d02014-06-11 18:26:40 +07001126 }
1127 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
1128 rl_src2 = LoadValueWide(rl_src2, kCoreReg);
1129 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
1130 if (rl_result.reg.GetReg() == rl_src1.reg.GetReg() &&
1131 rl_result.reg.GetReg() == rl_src2.reg.GetReg()) {
1132 NewLIR2(kX86Imul64RR, rl_result.reg.GetReg(), rl_result.reg.GetReg());
1133 } else if (rl_result.reg.GetReg() != rl_src1.reg.GetReg() &&
1134 rl_result.reg.GetReg() == rl_src2.reg.GetReg()) {
1135 NewLIR2(kX86Imul64RR, rl_result.reg.GetReg(), rl_src1.reg.GetReg());
1136 } else if (rl_result.reg.GetReg() == rl_src1.reg.GetReg() &&
1137 rl_result.reg.GetReg() != rl_src2.reg.GetReg()) {
1138 NewLIR2(kX86Imul64RR, rl_result.reg.GetReg(), rl_src2.reg.GetReg());
1139 } else {
1140 OpRegCopy(rl_result.reg, rl_src1.reg);
1141 NewLIR2(kX86Imul64RR, rl_result.reg.GetReg(), rl_src2.reg.GetReg());
1142 }
1143 StoreValueWide(rl_dest, rl_result);
1144 return;
1145 }
1146
Mark Mendell4708dcd2014-01-22 09:05:18 -08001147 if (rl_src1.is_const) {
1148 std::swap(rl_src1, rl_src2);
1149 }
1150 // Are we multiplying by a constant?
1151 if (rl_src2.is_const) {
1152 // Do special compare/branch against simple const operand
1153 int64_t val = mir_graph_->ConstantValueWide(rl_src2);
1154 if (val == 0) {
1155 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08001156 OpRegReg(kOpXor, rl_result.reg.GetLow(), rl_result.reg.GetLow());
1157 OpRegReg(kOpXor, rl_result.reg.GetHigh(), rl_result.reg.GetHigh());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001158 StoreValueWide(rl_dest, rl_result);
1159 return;
1160 } else if (val == 1) {
Mark Mendell4708dcd2014-01-22 09:05:18 -08001161 StoreValueWide(rl_dest, rl_src1);
1162 return;
1163 } else if (val == 2) {
1164 GenAddLong(Instruction::ADD_LONG, rl_dest, rl_src1, rl_src1);
1165 return;
1166 } else if (IsPowerOfTwo(val)) {
1167 int shift_amount = LowestSetBit(val);
1168 if (!BadOverlap(rl_src1, rl_dest)) {
1169 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
1170 RegLocation rl_result = GenShiftImmOpLong(Instruction::SHL_LONG, rl_dest,
1171 rl_src1, shift_amount);
1172 StoreValueWide(rl_dest, rl_result);
1173 return;
1174 }
1175 }
1176
1177 // Okay, just bite the bullet and do it.
1178 int32_t val_lo = Low32Bits(val);
1179 int32_t val_hi = High32Bits(val);
1180 FlushAllRegs();
1181 LockCallTemps(); // Prepare for explicit register usage.
buzbee30adc732014-05-09 15:10:18 -07001182 rl_src1 = UpdateLocWideTyped(rl_src1, kCoreReg);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001183 bool src1_in_reg = rl_src1.location == kLocPhysReg;
1184 int displacement = SRegOffset(rl_src1.s_reg_low);
1185
1186 // ECX <- 1H * 2L
1187 // EAX <- 1L * 2H
1188 if (src1_in_reg) {
buzbee2700f7e2014-03-07 09:46:20 -08001189 GenImulRegImm(rs_r1, rl_src1.reg.GetHigh(), val_lo);
1190 GenImulRegImm(rs_r0, rl_src1.reg.GetLow(), val_hi);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001191 } else {
buzbee2700f7e2014-03-07 09:46:20 -08001192 GenImulMemImm(rs_r1, GetSRegHi(rl_src1.s_reg_low), displacement + HIWORD_OFFSET, val_lo);
1193 GenImulMemImm(rs_r0, rl_src1.s_reg_low, displacement + LOWORD_OFFSET, val_hi);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001194 }
1195
1196 // ECX <- ECX + EAX (2H * 1L) + (1H * 2L)
buzbee091cc402014-03-31 10:14:40 -07001197 NewLIR2(kX86Add32RR, rs_r1.GetReg(), rs_r0.GetReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001198
1199 // EAX <- 2L
buzbee2700f7e2014-03-07 09:46:20 -08001200 LoadConstantNoClobber(rs_r0, val_lo);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001201
1202 // EDX:EAX <- 2L * 1L (double precision)
1203 if (src1_in_reg) {
buzbee2700f7e2014-03-07 09:46:20 -08001204 NewLIR1(kX86Mul32DaR, rl_src1.reg.GetLowReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001205 } else {
buzbee091cc402014-03-31 10:14:40 -07001206 LIR *m = NewLIR2(kX86Mul32DaM, rs_rX86_SP.GetReg(), displacement + LOWORD_OFFSET);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001207 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
1208 true /* is_load */, true /* is_64bit */);
1209 }
1210
1211 // EDX <- EDX + ECX (add high words)
buzbee091cc402014-03-31 10:14:40 -07001212 NewLIR2(kX86Add32RR, rs_r2.GetReg(), rs_r1.GetReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001213
1214 // Result is EDX:EAX
buzbee091cc402014-03-31 10:14:40 -07001215 RegLocation rl_result = {kLocPhysReg, 1, 0, 0, 0, 0, 0, 0, 1,
1216 RegStorage::MakeRegPair(rs_r0, rs_r2), INVALID_SREG, INVALID_SREG};
Mark Mendell4708dcd2014-01-22 09:05:18 -08001217 StoreValueWide(rl_dest, rl_result);
1218 return;
1219 }
1220
1221 // Nope. Do it the hard way
Mark Mendellde99bba2014-02-14 12:15:02 -08001222 // Check for V*V. We can eliminate a multiply in that case, as 2L*1H == 2H*1L.
1223 bool is_square = mir_graph_->SRegToVReg(rl_src1.s_reg_low) ==
1224 mir_graph_->SRegToVReg(rl_src2.s_reg_low);
1225
Mark Mendell4708dcd2014-01-22 09:05:18 -08001226 FlushAllRegs();
1227 LockCallTemps(); // Prepare for explicit register usage.
buzbee30adc732014-05-09 15:10:18 -07001228 rl_src1 = UpdateLocWideTyped(rl_src1, kCoreReg);
1229 rl_src2 = UpdateLocWideTyped(rl_src2, kCoreReg);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001230
1231 // At this point, the VRs are in their home locations.
1232 bool src1_in_reg = rl_src1.location == kLocPhysReg;
1233 bool src2_in_reg = rl_src2.location == kLocPhysReg;
1234
1235 // ECX <- 1H
1236 if (src1_in_reg) {
buzbee091cc402014-03-31 10:14:40 -07001237 NewLIR2(kX86Mov32RR, rs_r1.GetReg(), rl_src1.reg.GetHighReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001238 } else {
Vladimir Marko3bf7c602014-05-07 14:55:43 +01001239 LoadBaseDisp(rs_rX86_SP, SRegOffset(rl_src1.s_reg_low) + HIWORD_OFFSET, rs_r1, k32);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001240 }
1241
Mark Mendellde99bba2014-02-14 12:15:02 -08001242 if (is_square) {
1243 // Take advantage of the fact that the values are the same.
1244 // ECX <- ECX * 2L (1H * 2L)
1245 if (src2_in_reg) {
buzbee091cc402014-03-31 10:14:40 -07001246 NewLIR2(kX86Imul32RR, rs_r1.GetReg(), rl_src2.reg.GetLowReg());
Mark Mendellde99bba2014-02-14 12:15:02 -08001247 } else {
1248 int displacement = SRegOffset(rl_src2.s_reg_low);
buzbee091cc402014-03-31 10:14:40 -07001249 LIR *m = NewLIR3(kX86Imul32RM, rs_r1.GetReg(), rs_rX86_SP.GetReg(),
1250 displacement + LOWORD_OFFSET);
Mark Mendellde99bba2014-02-14 12:15:02 -08001251 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
1252 true /* is_load */, true /* is_64bit */);
1253 }
Mark Mendell4708dcd2014-01-22 09:05:18 -08001254
Mark Mendellde99bba2014-02-14 12:15:02 -08001255 // ECX <- 2*ECX (2H * 1L) + (1H * 2L)
buzbee091cc402014-03-31 10:14:40 -07001256 NewLIR2(kX86Add32RR, rs_r1.GetReg(), rs_r1.GetReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001257 } else {
Mark Mendellde99bba2014-02-14 12:15:02 -08001258 // EAX <- 2H
1259 if (src2_in_reg) {
buzbee091cc402014-03-31 10:14:40 -07001260 NewLIR2(kX86Mov32RR, rs_r0.GetReg(), rl_src2.reg.GetHighReg());
Mark Mendellde99bba2014-02-14 12:15:02 -08001261 } else {
Vladimir Marko3bf7c602014-05-07 14:55:43 +01001262 LoadBaseDisp(rs_rX86_SP, SRegOffset(rl_src2.s_reg_low) + HIWORD_OFFSET, rs_r0, k32);
Mark Mendellde99bba2014-02-14 12:15:02 -08001263 }
Mark Mendell4708dcd2014-01-22 09:05:18 -08001264
Mark Mendellde99bba2014-02-14 12:15:02 -08001265 // EAX <- EAX * 1L (2H * 1L)
1266 if (src1_in_reg) {
buzbee091cc402014-03-31 10:14:40 -07001267 NewLIR2(kX86Imul32RR, rs_r0.GetReg(), rl_src1.reg.GetLowReg());
Mark Mendellde99bba2014-02-14 12:15:02 -08001268 } else {
1269 int displacement = SRegOffset(rl_src1.s_reg_low);
buzbee091cc402014-03-31 10:14:40 -07001270 LIR *m = NewLIR3(kX86Imul32RM, rs_r0.GetReg(), rs_rX86_SP.GetReg(),
1271 displacement + LOWORD_OFFSET);
Mark Mendellde99bba2014-02-14 12:15:02 -08001272 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
1273 true /* is_load */, true /* is_64bit */);
1274 }
Mark Mendell4708dcd2014-01-22 09:05:18 -08001275
Mark Mendellde99bba2014-02-14 12:15:02 -08001276 // ECX <- ECX * 2L (1H * 2L)
1277 if (src2_in_reg) {
buzbee091cc402014-03-31 10:14:40 -07001278 NewLIR2(kX86Imul32RR, rs_r1.GetReg(), rl_src2.reg.GetLowReg());
Mark Mendellde99bba2014-02-14 12:15:02 -08001279 } else {
1280 int displacement = SRegOffset(rl_src2.s_reg_low);
buzbee091cc402014-03-31 10:14:40 -07001281 LIR *m = NewLIR3(kX86Imul32RM, rs_r1.GetReg(), rs_rX86_SP.GetReg(),
1282 displacement + LOWORD_OFFSET);
Mark Mendellde99bba2014-02-14 12:15:02 -08001283 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
1284 true /* is_load */, true /* is_64bit */);
1285 }
1286
1287 // ECX <- ECX + EAX (2H * 1L) + (1H * 2L)
buzbee091cc402014-03-31 10:14:40 -07001288 NewLIR2(kX86Add32RR, rs_r1.GetReg(), rs_r0.GetReg());
Mark Mendellde99bba2014-02-14 12:15:02 -08001289 }
Mark Mendell4708dcd2014-01-22 09:05:18 -08001290
1291 // EAX <- 2L
1292 if (src2_in_reg) {
buzbee091cc402014-03-31 10:14:40 -07001293 NewLIR2(kX86Mov32RR, rs_r0.GetReg(), rl_src2.reg.GetLowReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001294 } else {
Vladimir Marko3bf7c602014-05-07 14:55:43 +01001295 LoadBaseDisp(rs_rX86_SP, SRegOffset(rl_src2.s_reg_low) + LOWORD_OFFSET, rs_r0, k32);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001296 }
1297
1298 // EDX:EAX <- 2L * 1L (double precision)
1299 if (src1_in_reg) {
buzbee2700f7e2014-03-07 09:46:20 -08001300 NewLIR1(kX86Mul32DaR, rl_src1.reg.GetLowReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001301 } else {
1302 int displacement = SRegOffset(rl_src1.s_reg_low);
buzbee091cc402014-03-31 10:14:40 -07001303 LIR *m = NewLIR2(kX86Mul32DaM, rs_rX86_SP.GetReg(), displacement + LOWORD_OFFSET);
Mark Mendell4708dcd2014-01-22 09:05:18 -08001304 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
1305 true /* is_load */, true /* is_64bit */);
1306 }
1307
1308 // EDX <- EDX + ECX (add high words)
buzbee091cc402014-03-31 10:14:40 -07001309 NewLIR2(kX86Add32RR, rs_r2.GetReg(), rs_r1.GetReg());
Mark Mendell4708dcd2014-01-22 09:05:18 -08001310
1311 // Result is EDX:EAX
buzbee091cc402014-03-31 10:14:40 -07001312 RegLocation rl_result = {kLocPhysReg, 1, 0, 0, 0, 0, 0, 0, 1,
buzbee2700f7e2014-03-07 09:46:20 -08001313 RegStorage::MakeRegPair(rs_r0, rs_r2), INVALID_SREG, INVALID_SREG};
Mark Mendell4708dcd2014-01-22 09:05:18 -08001314 StoreValueWide(rl_dest, rl_result);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001315}
Mark Mendelle02d48f2014-01-15 11:19:23 -08001316
1317void X86Mir2Lir::GenLongRegOrMemOp(RegLocation rl_dest, RegLocation rl_src,
1318 Instruction::Code op) {
1319 DCHECK_EQ(rl_dest.location, kLocPhysReg);
1320 X86OpCode x86op = GetOpcode(op, rl_dest, rl_src, false);
1321 if (rl_src.location == kLocPhysReg) {
1322 // Both operands are in registers.
Serguei Katkovab5545f2014-03-25 10:51:15 +07001323 // But we must ensure that rl_src is in pair
Chao-ying Fua0147762014-06-06 18:38:49 -07001324 if (Gen64Bit()) {
1325 NewLIR2(x86op, rl_dest.reg.GetReg(), rl_src.reg.GetReg());
1326 } else {
1327 rl_src = LoadValueWide(rl_src, kCoreReg);
1328 if (rl_dest.reg.GetLowReg() == rl_src.reg.GetHighReg()) {
1329 // The registers are the same, so we would clobber it before the use.
1330 RegStorage temp_reg = AllocTemp();
1331 OpRegCopy(temp_reg, rl_dest.reg);
1332 rl_src.reg.SetHighReg(temp_reg.GetReg());
1333 }
1334 NewLIR2(x86op, rl_dest.reg.GetLowReg(), rl_src.reg.GetLowReg());
Mark Mendelle02d48f2014-01-15 11:19:23 -08001335
Chao-ying Fua0147762014-06-06 18:38:49 -07001336 x86op = GetOpcode(op, rl_dest, rl_src, true);
1337 NewLIR2(x86op, rl_dest.reg.GetHighReg(), rl_src.reg.GetHighReg());
1338 FreeTemp(rl_src.reg); // ???
1339 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08001340 return;
1341 }
1342
1343 // RHS is in memory.
1344 DCHECK((rl_src.location == kLocDalvikFrame) ||
1345 (rl_src.location == kLocCompilerTemp));
buzbee2700f7e2014-03-07 09:46:20 -08001346 int r_base = TargetReg(kSp).GetReg();
Mark Mendelle02d48f2014-01-15 11:19:23 -08001347 int displacement = SRegOffset(rl_src.s_reg_low);
1348
Chao-ying Fua0147762014-06-06 18:38:49 -07001349 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 -08001350 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
1351 true /* is_load */, true /* is64bit */);
Chao-ying Fua0147762014-06-06 18:38:49 -07001352 if (!Gen64Bit()) {
1353 x86op = GetOpcode(op, rl_dest, rl_src, true);
1354 lir = NewLIR3(x86op, rl_dest.reg.GetHighReg(), r_base, displacement + HIWORD_OFFSET);
1355 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08001356 AnnotateDalvikRegAccess(lir, (displacement + HIWORD_OFFSET) >> 2,
1357 true /* is_load */, true /* is64bit */);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001358}
1359
Mark Mendelle02d48f2014-01-15 11:19:23 -08001360void X86Mir2Lir::GenLongArith(RegLocation rl_dest, RegLocation rl_src, Instruction::Code op) {
buzbee30adc732014-05-09 15:10:18 -07001361 rl_dest = UpdateLocWideTyped(rl_dest, kCoreReg);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001362 if (rl_dest.location == kLocPhysReg) {
1363 // Ensure we are in a register pair
1364 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
1365
buzbee30adc732014-05-09 15:10:18 -07001366 rl_src = UpdateLocWideTyped(rl_src, kCoreReg);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001367 GenLongRegOrMemOp(rl_result, rl_src, op);
1368 StoreFinalValueWide(rl_dest, rl_result);
1369 return;
1370 }
1371
1372 // It wasn't in registers, so it better be in memory.
1373 DCHECK((rl_dest.location == kLocDalvikFrame) ||
1374 (rl_dest.location == kLocCompilerTemp));
1375 rl_src = LoadValueWide(rl_src, kCoreReg);
1376
1377 // Operate directly into memory.
1378 X86OpCode x86op = GetOpcode(op, rl_dest, rl_src, false);
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_dest.s_reg_low);
1381
Chao-ying Fua0147762014-06-06 18:38:49 -07001382 LIR *lir = NewLIR3(x86op, r_base, displacement + LOWORD_OFFSET,
1383 Gen64Bit() ? rl_src.reg.GetReg() : rl_src.reg.GetLowReg());
Mark Mendelle02d48f2014-01-15 11:19:23 -08001384 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
Serguei Katkov217fe732014-03-27 14:41:56 +07001385 true /* is_load */, true /* is64bit */);
1386 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
Mark Mendelle02d48f2014-01-15 11:19:23 -08001387 false /* is_load */, true /* is64bit */);
Chao-ying Fua0147762014-06-06 18:38:49 -07001388 if (!Gen64Bit()) {
1389 x86op = GetOpcode(op, rl_dest, rl_src, true);
1390 lir = NewLIR3(x86op, r_base, displacement + HIWORD_OFFSET, rl_src.reg.GetHighReg());
1391 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08001392 AnnotateDalvikRegAccess(lir, (displacement + HIWORD_OFFSET) >> 2,
Serguei Katkov217fe732014-03-27 14:41:56 +07001393 true /* is_load */, true /* is64bit */);
1394 AnnotateDalvikRegAccess(lir, (displacement + HIWORD_OFFSET) >> 2,
Mark Mendelle02d48f2014-01-15 11:19:23 -08001395 false /* is_load */, true /* is64bit */);
buzbee2700f7e2014-03-07 09:46:20 -08001396 FreeTemp(rl_src.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001397}
1398
Mark Mendelle02d48f2014-01-15 11:19:23 -08001399void X86Mir2Lir::GenLongArith(RegLocation rl_dest, RegLocation rl_src1,
1400 RegLocation rl_src2, Instruction::Code op,
1401 bool is_commutative) {
1402 // Is this really a 2 operand operation?
1403 switch (op) {
1404 case Instruction::ADD_LONG_2ADDR:
1405 case Instruction::SUB_LONG_2ADDR:
1406 case Instruction::AND_LONG_2ADDR:
1407 case Instruction::OR_LONG_2ADDR:
1408 case Instruction::XOR_LONG_2ADDR:
Mark Mendelle87f9b52014-04-30 14:13:18 -04001409 if (GenerateTwoOperandInstructions()) {
1410 GenLongArith(rl_dest, rl_src2, op);
1411 return;
1412 }
1413 break;
1414
Mark Mendelle02d48f2014-01-15 11:19:23 -08001415 default:
1416 break;
1417 }
1418
1419 if (rl_dest.location == kLocPhysReg) {
1420 RegLocation rl_result = LoadValueWide(rl_src1, kCoreReg);
1421
1422 // We are about to clobber the LHS, so it needs to be a temp.
1423 rl_result = ForceTempWide(rl_result);
1424
1425 // Perform the operation using the RHS.
buzbee30adc732014-05-09 15:10:18 -07001426 rl_src2 = UpdateLocWideTyped(rl_src2, kCoreReg);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001427 GenLongRegOrMemOp(rl_result, rl_src2, op);
1428
1429 // And now record that the result is in the temp.
1430 StoreFinalValueWide(rl_dest, rl_result);
1431 return;
1432 }
1433
1434 // It wasn't in registers, so it better be in memory.
1435 DCHECK((rl_dest.location == kLocDalvikFrame) ||
1436 (rl_dest.location == kLocCompilerTemp));
buzbee30adc732014-05-09 15:10:18 -07001437 rl_src1 = UpdateLocWideTyped(rl_src1, kCoreReg);
1438 rl_src2 = UpdateLocWideTyped(rl_src2, kCoreReg);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001439
1440 // Get one of the source operands into temporary register.
1441 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
Chao-ying Fua0147762014-06-06 18:38:49 -07001442 if (Gen64Bit()) {
1443 if (IsTemp(rl_src1.reg)) {
1444 GenLongRegOrMemOp(rl_src1, rl_src2, op);
1445 } else if (is_commutative) {
1446 rl_src2 = LoadValueWide(rl_src2, kCoreReg);
1447 // We need at least one of them to be a temporary.
1448 if (!IsTemp(rl_src2.reg)) {
1449 rl_src1 = ForceTempWide(rl_src1);
1450 GenLongRegOrMemOp(rl_src1, rl_src2, op);
1451 } else {
1452 GenLongRegOrMemOp(rl_src2, rl_src1, op);
1453 StoreFinalValueWide(rl_dest, rl_src2);
1454 return;
1455 }
1456 } else {
1457 // Need LHS to be the temp.
Mark Mendelle02d48f2014-01-15 11:19:23 -08001458 rl_src1 = ForceTempWide(rl_src1);
Yevgeny Rouban91b6ffa2014-03-07 14:35:44 +07001459 GenLongRegOrMemOp(rl_src1, rl_src2, op);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001460 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08001461 } else {
Chao-ying Fua0147762014-06-06 18:38:49 -07001462 if (IsTemp(rl_src1.reg.GetLow()) && IsTemp(rl_src1.reg.GetHigh())) {
1463 GenLongRegOrMemOp(rl_src1, rl_src2, op);
1464 } else if (is_commutative) {
1465 rl_src2 = LoadValueWide(rl_src2, kCoreReg);
1466 // We need at least one of them to be a temporary.
1467 if (!(IsTemp(rl_src2.reg.GetLow()) && IsTemp(rl_src2.reg.GetHigh()))) {
1468 rl_src1 = ForceTempWide(rl_src1);
1469 GenLongRegOrMemOp(rl_src1, rl_src2, op);
1470 } else {
1471 GenLongRegOrMemOp(rl_src2, rl_src1, op);
1472 StoreFinalValueWide(rl_dest, rl_src2);
1473 return;
1474 }
1475 } else {
1476 // Need LHS to be the temp.
1477 rl_src1 = ForceTempWide(rl_src1);
1478 GenLongRegOrMemOp(rl_src1, rl_src2, op);
1479 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08001480 }
1481
1482 StoreFinalValueWide(rl_dest, rl_src1);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001483}
1484
Mark Mendelle02d48f2014-01-15 11:19:23 -08001485void X86Mir2Lir::GenAddLong(Instruction::Code opcode, RegLocation rl_dest,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001486 RegLocation rl_src1, RegLocation rl_src2) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08001487 GenLongArith(rl_dest, rl_src1, rl_src2, opcode, true);
1488}
1489
1490void X86Mir2Lir::GenSubLong(Instruction::Code opcode, RegLocation rl_dest,
1491 RegLocation rl_src1, RegLocation rl_src2) {
1492 GenLongArith(rl_dest, rl_src1, rl_src2, opcode, false);
1493}
1494
1495void X86Mir2Lir::GenAndLong(Instruction::Code opcode, RegLocation rl_dest,
1496 RegLocation rl_src1, RegLocation rl_src2) {
1497 GenLongArith(rl_dest, rl_src1, rl_src2, opcode, true);
1498}
1499
1500void X86Mir2Lir::GenOrLong(Instruction::Code opcode, RegLocation rl_dest,
1501 RegLocation rl_src1, RegLocation rl_src2) {
1502 GenLongArith(rl_dest, rl_src1, rl_src2, opcode, true);
1503}
1504
1505void X86Mir2Lir::GenXorLong(Instruction::Code opcode, RegLocation rl_dest,
1506 RegLocation rl_src1, RegLocation rl_src2) {
1507 GenLongArith(rl_dest, rl_src1, rl_src2, opcode, true);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001508}
1509
Serban Constantinescued65c5e2014-05-22 15:10:18 +01001510void X86Mir2Lir::GenNotLong(RegLocation rl_dest, RegLocation rl_src) {
Chao-ying Fua0147762014-06-06 18:38:49 -07001511 if (Gen64Bit()) {
1512 rl_src = LoadValueWide(rl_src, kCoreReg);
1513 RegLocation rl_result;
1514 rl_result = EvalLocWide(rl_dest, kCoreReg, true);
1515 OpRegCopy(rl_result.reg, rl_src.reg);
1516 OpReg(kOpNot, rl_result.reg);
1517 StoreValueWide(rl_dest, rl_result);
1518 } else {
1519 LOG(FATAL) << "Unexpected use GenNotLong()";
1520 }
Serban Constantinescued65c5e2014-05-22 15:10:18 +01001521}
1522
1523void X86Mir2Lir::GenDivRemLong(Instruction::Code, RegLocation rl_dest, RegLocation rl_src1,
1524 RegLocation rl_src2, bool is_div) {
Chao-ying Fua0147762014-06-06 18:38:49 -07001525 if (!Gen64Bit()) {
1526 LOG(FATAL) << "Unexpected use GenDivRemLong()";
1527 return;
1528 }
1529
1530 // We have to use fixed registers, so flush all the temps.
1531 FlushAllRegs();
1532 LockCallTemps(); // Prepare for explicit register usage.
1533
1534 // Load LHS into RAX.
1535 LoadValueDirectWideFixed(rl_src1, rs_r0q);
1536
1537 // Load RHS into RCX.
1538 LoadValueDirectWideFixed(rl_src2, rs_r1q);
1539
1540 // Copy LHS sign bit into RDX.
1541 NewLIR0(kx86Cqo64Da);
1542
1543 // Handle division by zero case.
1544 GenDivZeroCheckWide(rs_r1q);
1545
1546 // Have to catch 0x8000000000000000/-1 case, or we will get an exception!
1547 NewLIR2(kX86Cmp64RI8, rs_r1q.GetReg(), -1);
1548 LIR *minus_one_branch = NewLIR2(kX86Jcc8, 0, kX86CondNe);
1549
1550 // RHS is -1.
1551 LoadConstantWide(rs_r3q, 0x8000000000000000);
1552 NewLIR2(kX86Cmp64RR, rs_r0q.GetReg(), rs_r3q.GetReg());
1553 LIR * minint_branch = NewLIR2(kX86Jcc8, 0, kX86CondNe);
1554
1555 // In 0x8000000000000000/-1 case.
1556 if (!is_div) {
1557 // For DIV, RAX is already right. For REM, we need RDX 0.
1558 NewLIR2(kX86Xor64RR, rs_r2q.GetReg(), rs_r2q.GetReg());
1559 }
1560 LIR* done = NewLIR1(kX86Jmp8, 0);
1561
1562 // Expected case.
1563 minus_one_branch->target = NewLIR0(kPseudoTargetLabel);
1564 minint_branch->target = minus_one_branch->target;
1565 NewLIR1(kX86Idivmod64DaR, rs_r1q.GetReg());
1566 done->target = NewLIR0(kPseudoTargetLabel);
1567
1568 // Result is in RAX for div and RDX for rem.
1569 RegLocation rl_result = {kLocPhysReg, 1, 0, 0, 0, 0, 0, 0, 1, rs_r0q, INVALID_SREG, INVALID_SREG};
1570 if (!is_div) {
1571 rl_result.reg.SetReg(r2q);
1572 }
1573
1574 StoreValueWide(rl_dest, rl_result);
Serban Constantinescued65c5e2014-05-22 15:10:18 +01001575}
1576
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001577void X86Mir2Lir::GenNegLong(RegLocation rl_dest, RegLocation rl_src) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08001578 rl_src = LoadValueWide(rl_src, kCoreReg);
Chao-ying Fua0147762014-06-06 18:38:49 -07001579 RegLocation rl_result;
1580 if (Gen64Bit()) {
1581 rl_result = EvalLocWide(rl_dest, kCoreReg, true);
1582 OpRegReg(kOpNeg, rl_result.reg, rl_src.reg);
1583 } else {
1584 rl_result = ForceTempWide(rl_src);
1585 if (((rl_dest.location == kLocPhysReg) && (rl_src.location == kLocPhysReg)) &&
1586 ((rl_dest.reg.GetLowReg() == rl_src.reg.GetHighReg()))) {
1587 // The registers are the same, so we would clobber it before the use.
1588 RegStorage temp_reg = AllocTemp();
1589 OpRegCopy(temp_reg, rl_result.reg);
1590 rl_result.reg.SetHighReg(temp_reg.GetReg());
1591 }
1592 OpRegReg(kOpNeg, rl_result.reg.GetLow(), rl_result.reg.GetLow()); // rLow = -rLow
1593 OpRegImm(kOpAdc, rl_result.reg.GetHigh(), 0); // rHigh = rHigh + CF
1594 OpRegReg(kOpNeg, rl_result.reg.GetHigh(), rl_result.reg.GetHigh()); // rHigh = -rHigh
Mark Mendelle02d48f2014-01-15 11:19:23 -08001595 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001596 StoreValueWide(rl_dest, rl_result);
1597}
1598
buzbee091cc402014-03-31 10:14:40 -07001599void X86Mir2Lir::OpRegThreadMem(OpKind op, RegStorage r_dest, ThreadOffset<4> thread_offset) {
Andreas Gampe2f244e92014-05-08 03:35:25 -07001600 DCHECK_EQ(kX86, cu_->instruction_set);
1601 X86OpCode opcode = kX86Bkpt;
1602 switch (op) {
1603 case kOpCmp: opcode = kX86Cmp32RT; break;
1604 case kOpMov: opcode = kX86Mov32RT; break;
1605 default:
1606 LOG(FATAL) << "Bad opcode: " << op;
1607 break;
1608 }
1609 NewLIR2(opcode, r_dest.GetReg(), thread_offset.Int32Value());
1610}
1611
1612void X86Mir2Lir::OpRegThreadMem(OpKind op, RegStorage r_dest, ThreadOffset<8> thread_offset) {
1613 DCHECK_EQ(kX86_64, cu_->instruction_set);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001614 X86OpCode opcode = kX86Bkpt;
Dmitry Petrochenko9ee801f2014-05-12 11:31:37 +07001615 if (Gen64Bit() && r_dest.Is64BitSolo()) {
1616 switch (op) {
1617 case kOpCmp: opcode = kX86Cmp64RT; break;
1618 case kOpMov: opcode = kX86Mov64RT; break;
1619 default:
1620 LOG(FATAL) << "Bad opcode(OpRegThreadMem 64): " << op;
1621 break;
1622 }
1623 } else {
1624 switch (op) {
1625 case kOpCmp: opcode = kX86Cmp32RT; break;
1626 case kOpMov: opcode = kX86Mov32RT; break;
1627 default:
1628 LOG(FATAL) << "Bad opcode: " << op;
1629 break;
1630 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001631 }
buzbee091cc402014-03-31 10:14:40 -07001632 NewLIR2(opcode, r_dest.GetReg(), thread_offset.Int32Value());
Brian Carlstrom7940e442013-07-12 13:46:57 -07001633}
1634
1635/*
1636 * Generate array load
1637 */
1638void X86Mir2Lir::GenArrayGet(int opt_flags, OpSize size, RegLocation rl_array,
Ian Rogersa9a82542013-10-04 11:17:26 -07001639 RegLocation rl_index, RegLocation rl_dest, int scale) {
buzbee091cc402014-03-31 10:14:40 -07001640 RegisterClass reg_class = RegClassBySize(size);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001641 int len_offset = mirror::Array::LengthOffset().Int32Value();
Brian Carlstrom7940e442013-07-12 13:46:57 -07001642 RegLocation rl_result;
buzbeea0cd2d72014-06-01 09:33:49 -07001643 rl_array = LoadValue(rl_array, kRefReg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001644
Mark Mendell343adb52013-12-18 06:02:17 -08001645 int data_offset;
buzbee695d13a2014-04-19 13:32:20 -07001646 if (size == k64 || size == kDouble) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001647 data_offset = mirror::Array::DataOffset(sizeof(int64_t)).Int32Value();
1648 } else {
1649 data_offset = mirror::Array::DataOffset(sizeof(int32_t)).Int32Value();
1650 }
1651
Mark Mendell343adb52013-12-18 06:02:17 -08001652 bool constant_index = rl_index.is_const;
1653 int32_t constant_index_value = 0;
1654 if (!constant_index) {
1655 rl_index = LoadValue(rl_index, kCoreReg);
1656 } else {
1657 constant_index_value = mir_graph_->ConstantValue(rl_index);
1658 // If index is constant, just fold it into the data offset
1659 data_offset += constant_index_value << scale;
1660 // treat as non array below
buzbee2700f7e2014-03-07 09:46:20 -08001661 rl_index.reg = RegStorage::InvalidReg();
Mark Mendell343adb52013-12-18 06:02:17 -08001662 }
1663
Brian Carlstrom7940e442013-07-12 13:46:57 -07001664 /* null object? */
buzbee2700f7e2014-03-07 09:46:20 -08001665 GenNullCheck(rl_array.reg, opt_flags);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001666
1667 if (!(opt_flags & MIR_IGNORE_RANGE_CHECK)) {
Mark Mendell343adb52013-12-18 06:02:17 -08001668 if (constant_index) {
Mingyao Yang80365d92014-04-18 12:10:58 -07001669 GenArrayBoundsCheck(constant_index_value, rl_array.reg, len_offset);
Mark Mendell343adb52013-12-18 06:02:17 -08001670 } else {
Mingyao Yang80365d92014-04-18 12:10:58 -07001671 GenArrayBoundsCheck(rl_index.reg, rl_array.reg, len_offset);
Mark Mendell343adb52013-12-18 06:02:17 -08001672 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001673 }
Mark Mendell343adb52013-12-18 06:02:17 -08001674 rl_result = EvalLoc(rl_dest, reg_class, true);
Vladimir Marko3bf7c602014-05-07 14:55:43 +01001675 LoadBaseIndexedDisp(rl_array.reg, rl_index.reg, scale, data_offset, rl_result.reg, size);
buzbee695d13a2014-04-19 13:32:20 -07001676 if ((size == k64) || (size == kDouble)) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001677 StoreValueWide(rl_dest, rl_result);
1678 } else {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001679 StoreValue(rl_dest, rl_result);
1680 }
1681}
1682
1683/*
1684 * Generate array store
1685 *
1686 */
1687void X86Mir2Lir::GenArrayPut(int opt_flags, OpSize size, RegLocation rl_array,
Ian Rogersa9a82542013-10-04 11:17:26 -07001688 RegLocation rl_index, RegLocation rl_src, int scale, bool card_mark) {
buzbee091cc402014-03-31 10:14:40 -07001689 RegisterClass reg_class = RegClassBySize(size);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001690 int len_offset = mirror::Array::LengthOffset().Int32Value();
1691 int data_offset;
1692
buzbee695d13a2014-04-19 13:32:20 -07001693 if (size == k64 || size == kDouble) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001694 data_offset = mirror::Array::DataOffset(sizeof(int64_t)).Int32Value();
1695 } else {
1696 data_offset = mirror::Array::DataOffset(sizeof(int32_t)).Int32Value();
1697 }
1698
buzbeea0cd2d72014-06-01 09:33:49 -07001699 rl_array = LoadValue(rl_array, kRefReg);
Mark Mendell343adb52013-12-18 06:02:17 -08001700 bool constant_index = rl_index.is_const;
1701 int32_t constant_index_value = 0;
1702 if (!constant_index) {
1703 rl_index = LoadValue(rl_index, kCoreReg);
1704 } else {
1705 // If index is constant, just fold it into the data offset
1706 constant_index_value = mir_graph_->ConstantValue(rl_index);
1707 data_offset += constant_index_value << scale;
1708 // treat as non array below
buzbee2700f7e2014-03-07 09:46:20 -08001709 rl_index.reg = RegStorage::InvalidReg();
Mark Mendell343adb52013-12-18 06:02:17 -08001710 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001711
1712 /* null object? */
buzbee2700f7e2014-03-07 09:46:20 -08001713 GenNullCheck(rl_array.reg, opt_flags);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001714
1715 if (!(opt_flags & MIR_IGNORE_RANGE_CHECK)) {
Mark Mendell343adb52013-12-18 06:02:17 -08001716 if (constant_index) {
Mingyao Yang80365d92014-04-18 12:10:58 -07001717 GenArrayBoundsCheck(constant_index_value, rl_array.reg, len_offset);
Mark Mendell343adb52013-12-18 06:02:17 -08001718 } else {
Mingyao Yang80365d92014-04-18 12:10:58 -07001719 GenArrayBoundsCheck(rl_index.reg, rl_array.reg, len_offset);
Mark Mendell343adb52013-12-18 06:02:17 -08001720 }
Brian Carlstrom7940e442013-07-12 13:46:57 -07001721 }
buzbee695d13a2014-04-19 13:32:20 -07001722 if ((size == k64) || (size == kDouble)) {
Brian Carlstrom7940e442013-07-12 13:46:57 -07001723 rl_src = LoadValueWide(rl_src, reg_class);
1724 } else {
1725 rl_src = LoadValue(rl_src, reg_class);
1726 }
1727 // If the src reg can't be byte accessed, move it to a temp first.
buzbee091cc402014-03-31 10:14:40 -07001728 if ((size == kSignedByte || size == kUnsignedByte) &&
1729 rl_src.reg.GetRegNum() >= rs_rX86_SP.GetRegNum()) {
buzbee2700f7e2014-03-07 09:46:20 -08001730 RegStorage temp = AllocTemp();
1731 OpRegCopy(temp, rl_src.reg);
Vladimir Marko3bf7c602014-05-07 14:55:43 +01001732 StoreBaseIndexedDisp(rl_array.reg, rl_index.reg, scale, data_offset, temp, size);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001733 } else {
Vladimir Marko3bf7c602014-05-07 14:55:43 +01001734 StoreBaseIndexedDisp(rl_array.reg, rl_index.reg, scale, data_offset, rl_src.reg, size);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001735 }
Ian Rogersa9a82542013-10-04 11:17:26 -07001736 if (card_mark) {
Ian Rogers773aab12013-10-14 13:50:10 -07001737 // Free rl_index if its a temp. Ensures there are 2 free regs for card mark.
Mark Mendell343adb52013-12-18 06:02:17 -08001738 if (!constant_index) {
buzbee091cc402014-03-31 10:14:40 -07001739 FreeTemp(rl_index.reg);
Mark Mendell343adb52013-12-18 06:02:17 -08001740 }
buzbee2700f7e2014-03-07 09:46:20 -08001741 MarkGCCard(rl_src.reg, rl_array.reg);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001742 }
1743}
1744
Mark Mendell4708dcd2014-01-22 09:05:18 -08001745RegLocation X86Mir2Lir::GenShiftImmOpLong(Instruction::Code opcode, RegLocation rl_dest,
1746 RegLocation rl_src, int shift_amount) {
Mark Mendelle87f9b52014-04-30 14:13:18 -04001747 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
Chao-ying Fua0147762014-06-06 18:38:49 -07001748 if (Gen64Bit()) {
1749 OpKind op = static_cast<OpKind>(0); /* Make gcc happy */
1750 switch (opcode) {
1751 case Instruction::SHL_LONG:
1752 case Instruction::SHL_LONG_2ADDR:
1753 op = kOpLsl;
1754 break;
1755 case Instruction::SHR_LONG:
1756 case Instruction::SHR_LONG_2ADDR:
1757 op = kOpAsr;
1758 break;
1759 case Instruction::USHR_LONG:
1760 case Instruction::USHR_LONG_2ADDR:
1761 op = kOpLsr;
1762 break;
1763 default:
1764 LOG(FATAL) << "Unexpected case";
1765 }
1766 OpRegRegImm(op, rl_result.reg, rl_src.reg, shift_amount);
1767 } else {
1768 switch (opcode) {
1769 case Instruction::SHL_LONG:
1770 case Instruction::SHL_LONG_2ADDR:
1771 DCHECK_NE(shift_amount, 1); // Prevent a double store from happening.
1772 if (shift_amount == 32) {
1773 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetLow());
1774 LoadConstant(rl_result.reg.GetLow(), 0);
1775 } else if (shift_amount > 31) {
1776 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetLow());
1777 NewLIR2(kX86Sal32RI, rl_result.reg.GetHighReg(), shift_amount - 32);
1778 LoadConstant(rl_result.reg.GetLow(), 0);
1779 } else {
1780 OpRegCopy(rl_result.reg, rl_src.reg);
1781 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetHigh());
1782 NewLIR3(kX86Shld32RRI, rl_result.reg.GetHighReg(), rl_result.reg.GetLowReg(),
1783 shift_amount);
1784 NewLIR2(kX86Sal32RI, rl_result.reg.GetLowReg(), shift_amount);
1785 }
1786 break;
1787 case Instruction::SHR_LONG:
1788 case Instruction::SHR_LONG_2ADDR:
1789 if (shift_amount == 32) {
1790 OpRegCopy(rl_result.reg.GetLow(), rl_src.reg.GetHigh());
1791 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetHigh());
1792 NewLIR2(kX86Sar32RI, rl_result.reg.GetHighReg(), 31);
1793 } else if (shift_amount > 31) {
1794 OpRegCopy(rl_result.reg.GetLow(), rl_src.reg.GetHigh());
1795 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetHigh());
1796 NewLIR2(kX86Sar32RI, rl_result.reg.GetLowReg(), shift_amount - 32);
1797 NewLIR2(kX86Sar32RI, rl_result.reg.GetHighReg(), 31);
1798 } else {
1799 OpRegCopy(rl_result.reg, rl_src.reg);
1800 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetHigh());
1801 NewLIR3(kX86Shrd32RRI, rl_result.reg.GetLowReg(), rl_result.reg.GetHighReg(),
1802 shift_amount);
1803 NewLIR2(kX86Sar32RI, rl_result.reg.GetHighReg(), shift_amount);
1804 }
1805 break;
1806 case Instruction::USHR_LONG:
1807 case Instruction::USHR_LONG_2ADDR:
1808 if (shift_amount == 32) {
1809 OpRegCopy(rl_result.reg.GetLow(), rl_src.reg.GetHigh());
1810 LoadConstant(rl_result.reg.GetHigh(), 0);
1811 } else if (shift_amount > 31) {
1812 OpRegCopy(rl_result.reg.GetLow(), rl_src.reg.GetHigh());
1813 NewLIR2(kX86Shr32RI, rl_result.reg.GetLowReg(), shift_amount - 32);
1814 LoadConstant(rl_result.reg.GetHigh(), 0);
1815 } else {
1816 OpRegCopy(rl_result.reg, rl_src.reg);
1817 OpRegCopy(rl_result.reg.GetHigh(), rl_src.reg.GetHigh());
1818 NewLIR3(kX86Shrd32RRI, rl_result.reg.GetLowReg(), rl_result.reg.GetHighReg(),
1819 shift_amount);
1820 NewLIR2(kX86Shr32RI, rl_result.reg.GetHighReg(), shift_amount);
1821 }
1822 break;
1823 default:
1824 LOG(FATAL) << "Unexpected case";
1825 }
Mark Mendell4708dcd2014-01-22 09:05:18 -08001826 }
1827 return rl_result;
1828}
1829
Brian Carlstrom7940e442013-07-12 13:46:57 -07001830void X86Mir2Lir::GenShiftImmOpLong(Instruction::Code opcode, RegLocation rl_dest,
Mark Mendell4708dcd2014-01-22 09:05:18 -08001831 RegLocation rl_src, RegLocation rl_shift) {
1832 // Per spec, we only care about low 6 bits of shift amount.
1833 int shift_amount = mir_graph_->ConstantValue(rl_shift) & 0x3f;
1834 if (shift_amount == 0) {
1835 rl_src = LoadValueWide(rl_src, kCoreReg);
1836 StoreValueWide(rl_dest, rl_src);
1837 return;
1838 } else if (shift_amount == 1 &&
1839 (opcode == Instruction::SHL_LONG || opcode == Instruction::SHL_LONG_2ADDR)) {
1840 // Need to handle this here to avoid calling StoreValueWide twice.
1841 GenAddLong(Instruction::ADD_LONG, rl_dest, rl_src, rl_src);
1842 return;
1843 }
1844 if (BadOverlap(rl_src, rl_dest)) {
1845 GenShiftOpLong(opcode, rl_dest, rl_src, rl_shift);
1846 return;
1847 }
1848 rl_src = LoadValueWide(rl_src, kCoreReg);
1849 RegLocation rl_result = GenShiftImmOpLong(opcode, rl_dest, rl_src, shift_amount);
1850 StoreValueWide(rl_dest, rl_result);
Brian Carlstrom7940e442013-07-12 13:46:57 -07001851}
1852
1853void X86Mir2Lir::GenArithImmOpLong(Instruction::Code opcode,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001854 RegLocation rl_dest, RegLocation rl_src1, RegLocation rl_src2) {
Chao-ying Fua0147762014-06-06 18:38:49 -07001855 bool isConstSuccess = false;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001856 switch (opcode) {
1857 case Instruction::ADD_LONG:
1858 case Instruction::AND_LONG:
1859 case Instruction::OR_LONG:
1860 case Instruction::XOR_LONG:
1861 if (rl_src2.is_const) {
Chao-ying Fua0147762014-06-06 18:38:49 -07001862 isConstSuccess = GenLongLongImm(rl_dest, rl_src1, rl_src2, opcode);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001863 } else {
1864 DCHECK(rl_src1.is_const);
Chao-ying Fua0147762014-06-06 18:38:49 -07001865 isConstSuccess = GenLongLongImm(rl_dest, rl_src2, rl_src1, opcode);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001866 }
1867 break;
1868 case Instruction::SUB_LONG:
1869 case Instruction::SUB_LONG_2ADDR:
1870 if (rl_src2.is_const) {
Chao-ying Fua0147762014-06-06 18:38:49 -07001871 isConstSuccess = GenLongLongImm(rl_dest, rl_src1, rl_src2, opcode);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001872 } else {
1873 GenSubLong(opcode, rl_dest, rl_src1, rl_src2);
Chao-ying Fua0147762014-06-06 18:38:49 -07001874 isConstSuccess = true;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001875 }
1876 break;
1877 case Instruction::ADD_LONG_2ADDR:
1878 case Instruction::OR_LONG_2ADDR:
1879 case Instruction::XOR_LONG_2ADDR:
1880 case Instruction::AND_LONG_2ADDR:
1881 if (rl_src2.is_const) {
Mark Mendelle87f9b52014-04-30 14:13:18 -04001882 if (GenerateTwoOperandInstructions()) {
Chao-ying Fua0147762014-06-06 18:38:49 -07001883 isConstSuccess = GenLongImm(rl_dest, rl_src2, opcode);
Mark Mendelle87f9b52014-04-30 14:13:18 -04001884 } else {
Chao-ying Fua0147762014-06-06 18:38:49 -07001885 isConstSuccess = GenLongLongImm(rl_dest, rl_src1, rl_src2, opcode);
Mark Mendelle87f9b52014-04-30 14:13:18 -04001886 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08001887 } else {
1888 DCHECK(rl_src1.is_const);
Chao-ying Fua0147762014-06-06 18:38:49 -07001889 isConstSuccess = GenLongLongImm(rl_dest, rl_src2, rl_src1, opcode);
Mark Mendelle02d48f2014-01-15 11:19:23 -08001890 }
1891 break;
1892 default:
Chao-ying Fua0147762014-06-06 18:38:49 -07001893 isConstSuccess = false;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001894 break;
1895 }
Chao-ying Fua0147762014-06-06 18:38:49 -07001896
1897 if (!isConstSuccess) {
1898 // Default - bail to non-const handler.
1899 GenArithOpLong(opcode, rl_dest, rl_src1, rl_src2);
1900 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08001901}
1902
1903bool X86Mir2Lir::IsNoOp(Instruction::Code op, int32_t value) {
1904 switch (op) {
1905 case Instruction::AND_LONG_2ADDR:
1906 case Instruction::AND_LONG:
1907 return value == -1;
1908 case Instruction::OR_LONG:
1909 case Instruction::OR_LONG_2ADDR:
1910 case Instruction::XOR_LONG:
1911 case Instruction::XOR_LONG_2ADDR:
1912 return value == 0;
1913 default:
1914 return false;
1915 }
1916}
1917
1918X86OpCode X86Mir2Lir::GetOpcode(Instruction::Code op, RegLocation dest, RegLocation rhs,
1919 bool is_high_op) {
1920 bool rhs_in_mem = rhs.location != kLocPhysReg;
1921 bool dest_in_mem = dest.location != kLocPhysReg;
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001922 bool is64Bit = Gen64Bit();
Mark Mendelle02d48f2014-01-15 11:19:23 -08001923 DCHECK(!rhs_in_mem || !dest_in_mem);
1924 switch (op) {
1925 case Instruction::ADD_LONG:
1926 case Instruction::ADD_LONG_2ADDR:
1927 if (dest_in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001928 return is64Bit ? kX86Add64MR : is_high_op ? kX86Adc32MR : kX86Add32MR;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001929 } else if (rhs_in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001930 return is64Bit ? kX86Add64RM : is_high_op ? kX86Adc32RM : kX86Add32RM;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001931 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001932 return is64Bit ? kX86Add64RR : is_high_op ? kX86Adc32RR : kX86Add32RR;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001933 case Instruction::SUB_LONG:
1934 case Instruction::SUB_LONG_2ADDR:
1935 if (dest_in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001936 return is64Bit ? kX86Sub64MR : is_high_op ? kX86Sbb32MR : kX86Sub32MR;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001937 } else if (rhs_in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001938 return is64Bit ? kX86Sub64RM : is_high_op ? kX86Sbb32RM : kX86Sub32RM;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001939 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001940 return is64Bit ? kX86Sub64RR : is_high_op ? kX86Sbb32RR : kX86Sub32RR;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001941 case Instruction::AND_LONG_2ADDR:
1942 case Instruction::AND_LONG:
1943 if (dest_in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001944 return is64Bit ? kX86And64MR : kX86And32MR;
1945 }
1946 if (is64Bit) {
1947 return rhs_in_mem ? kX86And64RM : kX86And64RR;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001948 }
1949 return rhs_in_mem ? kX86And32RM : kX86And32RR;
1950 case Instruction::OR_LONG:
1951 case Instruction::OR_LONG_2ADDR:
1952 if (dest_in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001953 return is64Bit ? kX86Or64MR : kX86Or32MR;
1954 }
1955 if (is64Bit) {
1956 return rhs_in_mem ? kX86Or64RM : kX86Or64RR;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001957 }
1958 return rhs_in_mem ? kX86Or32RM : kX86Or32RR;
1959 case Instruction::XOR_LONG:
1960 case Instruction::XOR_LONG_2ADDR:
1961 if (dest_in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001962 return is64Bit ? kX86Xor64MR : kX86Xor32MR;
1963 }
1964 if (is64Bit) {
1965 return rhs_in_mem ? kX86Xor64RM : kX86Xor64RR;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001966 }
1967 return rhs_in_mem ? kX86Xor32RM : kX86Xor32RR;
1968 default:
1969 LOG(FATAL) << "Unexpected opcode: " << op;
1970 return kX86Add32RR;
1971 }
1972}
1973
1974X86OpCode X86Mir2Lir::GetOpcode(Instruction::Code op, RegLocation loc, bool is_high_op,
1975 int32_t value) {
1976 bool in_mem = loc.location != kLocPhysReg;
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001977 bool is64Bit = Gen64Bit();
Mark Mendelle02d48f2014-01-15 11:19:23 -08001978 bool byte_imm = IS_SIMM8(value);
buzbee091cc402014-03-31 10:14:40 -07001979 DCHECK(in_mem || !loc.reg.IsFloat());
Mark Mendelle02d48f2014-01-15 11:19:23 -08001980 switch (op) {
1981 case Instruction::ADD_LONG:
1982 case Instruction::ADD_LONG_2ADDR:
1983 if (byte_imm) {
1984 if (in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001985 return is64Bit ? kX86Add64MI8 : is_high_op ? kX86Adc32MI8 : kX86Add32MI8;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001986 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001987 return is64Bit ? kX86Add64RI8 : is_high_op ? kX86Adc32RI8 : kX86Add32RI8;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001988 }
1989 if (in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001990 return is64Bit ? kX86Add64MI : is_high_op ? kX86Adc32MI : kX86Add32MI;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001991 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001992 return is64Bit ? kX86Add64RI : is_high_op ? kX86Adc32RI : kX86Add32RI;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001993 case Instruction::SUB_LONG:
1994 case Instruction::SUB_LONG_2ADDR:
1995 if (byte_imm) {
1996 if (in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001997 return is64Bit ? kX86Sub64MI8 : is_high_op ? kX86Sbb32MI8 : kX86Sub32MI8;
Mark Mendelle02d48f2014-01-15 11:19:23 -08001998 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07001999 return is64Bit ? kX86Sub64RI8 : is_high_op ? kX86Sbb32RI8 : kX86Sub32RI8;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002000 }
2001 if (in_mem) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002002 return is64Bit ? kX86Sub64MI : is_high_op ? kX86Sbb32MI : kX86Sub32MI;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002003 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002004 return is64Bit ? kX86Sub64RI : is_high_op ? kX86Sbb32RI : kX86Sub32RI;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002005 case Instruction::AND_LONG_2ADDR:
2006 case Instruction::AND_LONG:
2007 if (byte_imm) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002008 if (is64Bit) {
2009 return in_mem ? kX86And64MI8 : kX86And64RI8;
2010 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08002011 return in_mem ? kX86And32MI8 : kX86And32RI8;
2012 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002013 if (is64Bit) {
2014 return in_mem ? kX86And64MI : kX86And64RI;
2015 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08002016 return in_mem ? kX86And32MI : kX86And32RI;
2017 case Instruction::OR_LONG:
2018 case Instruction::OR_LONG_2ADDR:
2019 if (byte_imm) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002020 if (is64Bit) {
2021 return in_mem ? kX86Or64MI8 : kX86Or64RI8;
2022 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08002023 return in_mem ? kX86Or32MI8 : kX86Or32RI8;
2024 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002025 if (is64Bit) {
2026 return in_mem ? kX86Or64MI : kX86Or64RI;
2027 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08002028 return in_mem ? kX86Or32MI : kX86Or32RI;
2029 case Instruction::XOR_LONG:
2030 case Instruction::XOR_LONG_2ADDR:
2031 if (byte_imm) {
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002032 if (is64Bit) {
2033 return in_mem ? kX86Xor64MI8 : kX86Xor64RI8;
2034 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08002035 return in_mem ? kX86Xor32MI8 : kX86Xor32RI8;
2036 }
Chao-ying Fue0ccdc02014-06-06 17:32:37 -07002037 if (is64Bit) {
2038 return in_mem ? kX86Xor64MI : kX86Xor64RI;
2039 }
Mark Mendelle02d48f2014-01-15 11:19:23 -08002040 return in_mem ? kX86Xor32MI : kX86Xor32RI;
2041 default:
2042 LOG(FATAL) << "Unexpected opcode: " << op;
2043 return kX86Add32MI;
2044 }
2045}
2046
Chao-ying Fua0147762014-06-06 18:38:49 -07002047bool X86Mir2Lir::GenLongImm(RegLocation rl_dest, RegLocation rl_src, Instruction::Code op) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08002048 DCHECK(rl_src.is_const);
2049 int64_t val = mir_graph_->ConstantValueWide(rl_src);
Chao-ying Fua0147762014-06-06 18:38:49 -07002050
2051 if (Gen64Bit()) {
2052 // We can do with imm only if it fits 32 bit
2053 if (val != (static_cast<int64_t>(static_cast<int32_t>(val)))) {
2054 return false;
2055 }
2056
2057 rl_dest = UpdateLocWideTyped(rl_dest, kCoreReg);
2058
2059 if ((rl_dest.location == kLocDalvikFrame) ||
2060 (rl_dest.location == kLocCompilerTemp)) {
2061 int r_base = TargetReg(kSp).GetReg();
2062 int displacement = SRegOffset(rl_dest.s_reg_low);
2063
2064 X86OpCode x86op = GetOpcode(op, rl_dest, false, val);
2065 LIR *lir = NewLIR3(x86op, r_base, displacement + LOWORD_OFFSET, val);
2066 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
2067 true /* is_load */, true /* is64bit */);
2068 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
2069 false /* is_load */, true /* is64bit */);
2070 return true;
2071 }
2072
2073 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
2074 DCHECK_EQ(rl_result.location, kLocPhysReg);
2075 DCHECK(!rl_result.reg.IsFloat());
2076
2077 X86OpCode x86op = GetOpcode(op, rl_result, false, val);
2078 NewLIR2(x86op, rl_result.reg.GetReg(), val);
2079
2080 StoreValueWide(rl_dest, rl_result);
2081 return true;
2082 }
2083
Mark Mendelle02d48f2014-01-15 11:19:23 -08002084 int32_t val_lo = Low32Bits(val);
2085 int32_t val_hi = High32Bits(val);
buzbee30adc732014-05-09 15:10:18 -07002086 rl_dest = UpdateLocWideTyped(rl_dest, kCoreReg);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002087
2088 // Can we just do this into memory?
2089 if ((rl_dest.location == kLocDalvikFrame) ||
2090 (rl_dest.location == kLocCompilerTemp)) {
buzbee2700f7e2014-03-07 09:46:20 -08002091 int r_base = TargetReg(kSp).GetReg();
Mark Mendelle02d48f2014-01-15 11:19:23 -08002092 int displacement = SRegOffset(rl_dest.s_reg_low);
2093
2094 if (!IsNoOp(op, val_lo)) {
2095 X86OpCode x86op = GetOpcode(op, rl_dest, false, val_lo);
buzbee2700f7e2014-03-07 09:46:20 -08002096 LIR *lir = NewLIR3(x86op, r_base, displacement + LOWORD_OFFSET, val_lo);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002097 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
Serguei Katkov217fe732014-03-27 14:41:56 +07002098 true /* is_load */, true /* is64bit */);
2099 AnnotateDalvikRegAccess(lir, (displacement + LOWORD_OFFSET) >> 2,
Mark Mendelle02d48f2014-01-15 11:19:23 -08002100 false /* is_load */, true /* is64bit */);
2101 }
2102 if (!IsNoOp(op, val_hi)) {
2103 X86OpCode x86op = GetOpcode(op, rl_dest, true, val_hi);
buzbee2700f7e2014-03-07 09:46:20 -08002104 LIR *lir = NewLIR3(x86op, r_base, displacement + HIWORD_OFFSET, val_hi);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002105 AnnotateDalvikRegAccess(lir, (displacement + HIWORD_OFFSET) >> 2,
Serguei Katkov217fe732014-03-27 14:41:56 +07002106 true /* is_load */, true /* is64bit */);
2107 AnnotateDalvikRegAccess(lir, (displacement + HIWORD_OFFSET) >> 2,
Mark Mendelle02d48f2014-01-15 11:19:23 -08002108 false /* is_load */, true /* is64bit */);
2109 }
Chao-ying Fua0147762014-06-06 18:38:49 -07002110 return true;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002111 }
2112
2113 RegLocation rl_result = EvalLocWide(rl_dest, kCoreReg, true);
2114 DCHECK_EQ(rl_result.location, kLocPhysReg);
buzbee091cc402014-03-31 10:14:40 -07002115 DCHECK(!rl_result.reg.IsFloat());
Mark Mendelle02d48f2014-01-15 11:19:23 -08002116
2117 if (!IsNoOp(op, val_lo)) {
2118 X86OpCode x86op = GetOpcode(op, rl_result, false, val_lo);
buzbee2700f7e2014-03-07 09:46:20 -08002119 NewLIR2(x86op, rl_result.reg.GetLowReg(), val_lo);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002120 }
2121 if (!IsNoOp(op, val_hi)) {
2122 X86OpCode x86op = GetOpcode(op, rl_result, true, val_hi);
Bill Buzbee00e1ec62014-02-27 23:44:13 +00002123 NewLIR2(x86op, rl_result.reg.GetHighReg(), val_hi);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002124 }
2125 StoreValueWide(rl_dest, rl_result);
Chao-ying Fua0147762014-06-06 18:38:49 -07002126 return true;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002127}
2128
Chao-ying Fua0147762014-06-06 18:38:49 -07002129bool X86Mir2Lir::GenLongLongImm(RegLocation rl_dest, RegLocation rl_src1,
Mark Mendelle02d48f2014-01-15 11:19:23 -08002130 RegLocation rl_src2, Instruction::Code op) {
2131 DCHECK(rl_src2.is_const);
2132 int64_t val = mir_graph_->ConstantValueWide(rl_src2);
Chao-ying Fua0147762014-06-06 18:38:49 -07002133
2134 if (Gen64Bit()) {
2135 // We can do with imm only if it fits 32 bit
2136 if (val != (static_cast<int64_t>(static_cast<int32_t>(val)))) {
2137 return false;
2138 }
2139 if (rl_dest.location == kLocPhysReg &&
2140 rl_src1.location == kLocPhysReg && !rl_dest.reg.IsFloat()) {
2141 X86OpCode x86op = GetOpcode(op, rl_dest, false, val);
2142 NewLIR2(x86op, rl_dest.reg.GetReg(), val);
2143 StoreFinalValueWide(rl_dest, rl_dest);
2144 return true;
2145 }
2146
2147 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
2148 // We need the values to be in a temporary
2149 RegLocation rl_result = ForceTempWide(rl_src1);
2150
2151 X86OpCode x86op = GetOpcode(op, rl_result, false, val);
2152 NewLIR2(x86op, rl_result.reg.GetReg(), val);
2153
2154 StoreFinalValueWide(rl_dest, rl_result);
2155 return true;
2156 }
2157
Mark Mendelle02d48f2014-01-15 11:19:23 -08002158 int32_t val_lo = Low32Bits(val);
2159 int32_t val_hi = High32Bits(val);
buzbee30adc732014-05-09 15:10:18 -07002160 rl_dest = UpdateLocWideTyped(rl_dest, kCoreReg);
2161 rl_src1 = UpdateLocWideTyped(rl_src1, kCoreReg);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002162
2163 // Can we do this directly into the destination registers?
2164 if (rl_dest.location == kLocPhysReg && rl_src1.location == kLocPhysReg &&
buzbee2700f7e2014-03-07 09:46:20 -08002165 rl_dest.reg.GetLowReg() == rl_src1.reg.GetLowReg() &&
buzbee091cc402014-03-31 10:14:40 -07002166 rl_dest.reg.GetHighReg() == rl_src1.reg.GetHighReg() && !rl_dest.reg.IsFloat()) {
Mark Mendelle02d48f2014-01-15 11:19:23 -08002167 if (!IsNoOp(op, val_lo)) {
2168 X86OpCode x86op = GetOpcode(op, rl_dest, false, val_lo);
buzbee2700f7e2014-03-07 09:46:20 -08002169 NewLIR2(x86op, rl_dest.reg.GetLowReg(), val_lo);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002170 }
2171 if (!IsNoOp(op, val_hi)) {
2172 X86OpCode x86op = GetOpcode(op, rl_dest, true, val_hi);
Bill Buzbee00e1ec62014-02-27 23:44:13 +00002173 NewLIR2(x86op, rl_dest.reg.GetHighReg(), val_hi);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002174 }
Maxim Kazantsev653f2bf2014-02-13 15:11:17 +07002175
2176 StoreFinalValueWide(rl_dest, rl_dest);
Chao-ying Fua0147762014-06-06 18:38:49 -07002177 return true;
Mark Mendelle02d48f2014-01-15 11:19:23 -08002178 }
2179
2180 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
2181 DCHECK_EQ(rl_src1.location, kLocPhysReg);
2182
2183 // We need the values to be in a temporary
2184 RegLocation rl_result = ForceTempWide(rl_src1);
2185 if (!IsNoOp(op, val_lo)) {
2186 X86OpCode x86op = GetOpcode(op, rl_result, false, val_lo);
buzbee2700f7e2014-03-07 09:46:20 -08002187 NewLIR2(x86op, rl_result.reg.GetLowReg(), val_lo);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002188 }
2189 if (!IsNoOp(op, val_hi)) {
2190 X86OpCode x86op = GetOpcode(op, rl_result, true, val_hi);
Bill Buzbee00e1ec62014-02-27 23:44:13 +00002191 NewLIR2(x86op, rl_result.reg.GetHighReg(), val_hi);
Mark Mendelle02d48f2014-01-15 11:19:23 -08002192 }
2193
2194 StoreFinalValueWide(rl_dest, rl_result);
Chao-ying Fua0147762014-06-06 18:38:49 -07002195 return true;
Brian Carlstrom7940e442013-07-12 13:46:57 -07002196}
2197
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002198// For final classes there are no sub-classes to check and so we can answer the instance-of
2199// question with simple comparisons. Use compares to memory and SETEQ to optimize for x86.
2200void X86Mir2Lir::GenInstanceofFinal(bool use_declaring_class, uint32_t type_idx,
2201 RegLocation rl_dest, RegLocation rl_src) {
buzbeea0cd2d72014-06-01 09:33:49 -07002202 RegLocation object = LoadValue(rl_src, kRefReg);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002203 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002204 RegStorage result_reg = rl_result.reg;
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002205
2206 // SETcc only works with EAX..EDX.
buzbee091cc402014-03-31 10:14:40 -07002207 if (result_reg == object.reg || result_reg.GetRegNum() >= rs_rX86_SP.GetRegNum()) {
Mark Mendelle87f9b52014-04-30 14:13:18 -04002208 result_reg = AllocateByteRegister();
buzbee091cc402014-03-31 10:14:40 -07002209 DCHECK_LT(result_reg.GetRegNum(), rs_rX86_SP.GetRegNum());
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002210 }
2211
2212 // Assume that there is no match.
2213 LoadConstant(result_reg, 0);
buzbee2700f7e2014-03-07 09:46:20 -08002214 LIR* null_branchover = OpCmpImmBranch(kCondEq, object.reg, 0, NULL);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002215
Mark Mendellade54a22014-06-09 12:49:55 -04002216 // We will use this register to compare to memory below.
2217 // References are 32 bit in memory, and 64 bit in registers (in 64 bit mode).
2218 // For this reason, force allocation of a 32 bit register to use, so that the
2219 // compare to memory will be done using a 32 bit comparision.
2220 // The LoadRefDisp(s) below will work normally, even in 64 bit mode.
2221 RegStorage check_class = AllocTemp();
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002222
2223 // If Method* is already in a register, we can save a copy.
2224 RegLocation rl_method = mir_graph_->GetMethodLoc();
Dmitry Petrochenko9ee801f2014-05-12 11:31:37 +07002225 int32_t offset_of_type = mirror::Array::DataOffset(sizeof(mirror::HeapReference<mirror::Class*>)).Int32Value() +
2226 (sizeof(mirror::HeapReference<mirror::Class*>) * type_idx);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002227
2228 if (rl_method.location == kLocPhysReg) {
2229 if (use_declaring_class) {
buzbee695d13a2014-04-19 13:32:20 -07002230 LoadRefDisp(rl_method.reg, mirror::ArtMethod::DeclaringClassOffset().Int32Value(),
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002231 check_class);
2232 } else {
buzbee695d13a2014-04-19 13:32:20 -07002233 LoadRefDisp(rl_method.reg, mirror::ArtMethod::DexCacheResolvedTypesOffset().Int32Value(),
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002234 check_class);
buzbee695d13a2014-04-19 13:32:20 -07002235 LoadRefDisp(check_class, offset_of_type, check_class);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002236 }
2237 } else {
2238 LoadCurrMethodDirect(check_class);
2239 if (use_declaring_class) {
buzbee695d13a2014-04-19 13:32:20 -07002240 LoadRefDisp(check_class, mirror::ArtMethod::DeclaringClassOffset().Int32Value(),
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002241 check_class);
2242 } else {
buzbee695d13a2014-04-19 13:32:20 -07002243 LoadRefDisp(check_class, mirror::ArtMethod::DexCacheResolvedTypesOffset().Int32Value(),
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002244 check_class);
buzbee695d13a2014-04-19 13:32:20 -07002245 LoadRefDisp(check_class, offset_of_type, check_class);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002246 }
2247 }
2248
2249 // Compare the computed class to the class in the object.
2250 DCHECK_EQ(object.location, kLocPhysReg);
buzbee2700f7e2014-03-07 09:46:20 -08002251 OpRegMem(kOpCmp, check_class, object.reg, mirror::Object::ClassOffset().Int32Value());
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002252
2253 // Set the low byte of the result to 0 or 1 from the compare condition code.
buzbee2700f7e2014-03-07 09:46:20 -08002254 NewLIR2(kX86Set8R, result_reg.GetReg(), kX86CondEq);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002255
2256 LIR* target = NewLIR0(kPseudoTargetLabel);
2257 null_branchover->target = target;
2258 FreeTemp(check_class);
2259 if (IsTemp(result_reg)) {
buzbee2700f7e2014-03-07 09:46:20 -08002260 OpRegCopy(rl_result.reg, result_reg);
Mark Mendelldf8ee2e2014-01-27 16:37:47 -08002261 FreeTemp(result_reg);
2262 }
2263 StoreValue(rl_dest, rl_result);
2264}
2265
Mark Mendell6607d972014-02-10 06:54:18 -08002266void X86Mir2Lir::GenInstanceofCallingHelper(bool needs_access_check, bool type_known_final,
2267 bool type_known_abstract, bool use_declaring_class,
2268 bool can_assume_type_is_in_dex_cache,
2269 uint32_t type_idx, RegLocation rl_dest,
2270 RegLocation rl_src) {
2271 FlushAllRegs();
2272 // May generate a call - use explicit registers.
2273 LockCallTemps();
2274 LoadCurrMethodDirect(TargetReg(kArg1)); // kArg1 gets current Method*.
buzbee2700f7e2014-03-07 09:46:20 -08002275 RegStorage class_reg = TargetReg(kArg2); // kArg2 will hold the Class*.
Mark Mendell6607d972014-02-10 06:54:18 -08002276 // Reference must end up in kArg0.
2277 if (needs_access_check) {
2278 // Check we have access to type_idx and if not throw IllegalAccessError,
2279 // Caller function returns Class* in kArg0.
Dmitry Petrochenko9ee801f2014-05-12 11:31:37 +07002280 if (Is64BitInstructionSet(cu_->instruction_set)) {
2281 CallRuntimeHelperImm(QUICK_ENTRYPOINT_OFFSET(8, pInitializeTypeAndVerifyAccess),
2282 type_idx, true);
2283 } else {
2284 CallRuntimeHelperImm(QUICK_ENTRYPOINT_OFFSET(4, pInitializeTypeAndVerifyAccess),
2285 type_idx, true);
2286 }
Mark Mendell6607d972014-02-10 06:54:18 -08002287 OpRegCopy(class_reg, TargetReg(kRet0));
2288 LoadValueDirectFixed(rl_src, TargetReg(kArg0));
2289 } else if (use_declaring_class) {
2290 LoadValueDirectFixed(rl_src, TargetReg(kArg0));
buzbee695d13a2014-04-19 13:32:20 -07002291 LoadRefDisp(TargetReg(kArg1), mirror::ArtMethod::DeclaringClassOffset().Int32Value(),
buzbee2700f7e2014-03-07 09:46:20 -08002292 class_reg);
Mark Mendell6607d972014-02-10 06:54:18 -08002293 } else {
2294 // Load dex cache entry into class_reg (kArg2).
2295 LoadValueDirectFixed(rl_src, TargetReg(kArg0));
buzbee695d13a2014-04-19 13:32:20 -07002296 LoadRefDisp(TargetReg(kArg1), mirror::ArtMethod::DexCacheResolvedTypesOffset().Int32Value(),
buzbee2700f7e2014-03-07 09:46:20 -08002297 class_reg);
Mark Mendell6607d972014-02-10 06:54:18 -08002298 int32_t offset_of_type =
buzbeea0cd2d72014-06-01 09:33:49 -07002299 mirror::Array::DataOffset(sizeof(mirror::HeapReference<mirror::Class*>)).Int32Value() +
2300 (sizeof(mirror::HeapReference<mirror::Class*>) * type_idx);
buzbee695d13a2014-04-19 13:32:20 -07002301 LoadRefDisp(class_reg, offset_of_type, class_reg);
Mark Mendell6607d972014-02-10 06:54:18 -08002302 if (!can_assume_type_is_in_dex_cache) {
2303 // Need to test presence of type in dex cache at runtime.
2304 LIR* hop_branch = OpCmpImmBranch(kCondNe, class_reg, 0, NULL);
2305 // Type is not resolved. Call out to helper, which will return resolved type in kRet0/kArg0.
Dmitry Petrochenko9ee801f2014-05-12 11:31:37 +07002306 if (Is64BitInstructionSet(cu_->instruction_set)) {
2307 CallRuntimeHelperImm(QUICK_ENTRYPOINT_OFFSET(8, pInitializeType), type_idx, true);
2308 } else {
2309 CallRuntimeHelperImm(QUICK_ENTRYPOINT_OFFSET(4, pInitializeType), type_idx, true);
2310 }
Mark Mendell6607d972014-02-10 06:54:18 -08002311 OpRegCopy(TargetReg(kArg2), TargetReg(kRet0)); // Align usage with fast path.
2312 LoadValueDirectFixed(rl_src, TargetReg(kArg0)); /* Reload Ref. */
2313 // Rejoin code paths
2314 LIR* hop_target = NewLIR0(kPseudoTargetLabel);
2315 hop_branch->target = hop_target;
2316 }
2317 }
2318 /* kArg0 is ref, kArg2 is class. If ref==null, use directly as bool result. */
buzbeea0cd2d72014-06-01 09:33:49 -07002319 RegLocation rl_result = GetReturn(kRefReg);
Mark Mendell6607d972014-02-10 06:54:18 -08002320
2321 // SETcc only works with EAX..EDX.
buzbee091cc402014-03-31 10:14:40 -07002322 DCHECK_LT(rl_result.reg.GetRegNum(), 4);
Mark Mendell6607d972014-02-10 06:54:18 -08002323
2324 // Is the class NULL?
2325 LIR* branch1 = OpCmpImmBranch(kCondEq, TargetReg(kArg0), 0, NULL);
2326
2327 /* Load object->klass_. */
2328 DCHECK_EQ(mirror::Object::ClassOffset().Int32Value(), 0);
buzbee695d13a2014-04-19 13:32:20 -07002329 LoadRefDisp(TargetReg(kArg0), mirror::Object::ClassOffset().Int32Value(), TargetReg(kArg1));
Mark Mendell6607d972014-02-10 06:54:18 -08002330 /* kArg0 is ref, kArg1 is ref->klass_, kArg2 is class. */
2331 LIR* branchover = nullptr;
2332 if (type_known_final) {
2333 // Ensure top 3 bytes of result are 0.
buzbee2700f7e2014-03-07 09:46:20 -08002334 LoadConstant(rl_result.reg, 0);
Mark Mendell6607d972014-02-10 06:54:18 -08002335 OpRegReg(kOpCmp, TargetReg(kArg1), TargetReg(kArg2));
2336 // Set the low byte of the result to 0 or 1 from the compare condition code.
Bill Buzbee00e1ec62014-02-27 23:44:13 +00002337 NewLIR2(kX86Set8R, rl_result.reg.GetReg(), kX86CondEq);
Mark Mendell6607d972014-02-10 06:54:18 -08002338 } else {
2339 if (!type_known_abstract) {
buzbee2700f7e2014-03-07 09:46:20 -08002340 LoadConstant(rl_result.reg, 1); // Assume result succeeds.
Mark Mendell6607d972014-02-10 06:54:18 -08002341 branchover = OpCmpBranch(kCondEq, TargetReg(kArg1), TargetReg(kArg2), NULL);
2342 }
2343 OpRegCopy(TargetReg(kArg0), TargetReg(kArg2));
Dmitry Petrochenko9ee801f2014-05-12 11:31:37 +07002344 if (Is64BitInstructionSet(cu_->instruction_set)) {
2345 OpThreadMem(kOpBlx, QUICK_ENTRYPOINT_OFFSET(8, pInstanceofNonTrivial));
2346 } else {
2347 OpThreadMem(kOpBlx, QUICK_ENTRYPOINT_OFFSET(4, pInstanceofNonTrivial));
2348 }
Mark Mendell6607d972014-02-10 06:54:18 -08002349 }
2350 // TODO: only clobber when type isn't final?
2351 ClobberCallerSave();
2352 /* Branch targets here. */
2353 LIR* target = NewLIR0(kPseudoTargetLabel);
2354 StoreValue(rl_dest, rl_result);
2355 branch1->target = target;
2356 if (branchover != nullptr) {
2357 branchover->target = target;
2358 }
2359}
2360
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002361void X86Mir2Lir::GenArithOpInt(Instruction::Code opcode, RegLocation rl_dest,
2362 RegLocation rl_lhs, RegLocation rl_rhs) {
2363 OpKind op = kOpBkpt;
2364 bool is_div_rem = false;
2365 bool unary = false;
2366 bool shift_op = false;
2367 bool is_two_addr = false;
2368 RegLocation rl_result;
2369 switch (opcode) {
2370 case Instruction::NEG_INT:
2371 op = kOpNeg;
2372 unary = true;
2373 break;
2374 case Instruction::NOT_INT:
2375 op = kOpMvn;
2376 unary = true;
2377 break;
2378 case Instruction::ADD_INT_2ADDR:
2379 is_two_addr = true;
2380 // Fallthrough
2381 case Instruction::ADD_INT:
2382 op = kOpAdd;
2383 break;
2384 case Instruction::SUB_INT_2ADDR:
2385 is_two_addr = true;
2386 // Fallthrough
2387 case Instruction::SUB_INT:
2388 op = kOpSub;
2389 break;
2390 case Instruction::MUL_INT_2ADDR:
2391 is_two_addr = true;
2392 // Fallthrough
2393 case Instruction::MUL_INT:
2394 op = kOpMul;
2395 break;
2396 case Instruction::DIV_INT_2ADDR:
2397 is_two_addr = true;
2398 // Fallthrough
2399 case Instruction::DIV_INT:
2400 op = kOpDiv;
2401 is_div_rem = true;
2402 break;
2403 /* NOTE: returns in kArg1 */
2404 case Instruction::REM_INT_2ADDR:
2405 is_two_addr = true;
2406 // Fallthrough
2407 case Instruction::REM_INT:
2408 op = kOpRem;
2409 is_div_rem = true;
2410 break;
2411 case Instruction::AND_INT_2ADDR:
2412 is_two_addr = true;
2413 // Fallthrough
2414 case Instruction::AND_INT:
2415 op = kOpAnd;
2416 break;
2417 case Instruction::OR_INT_2ADDR:
2418 is_two_addr = true;
2419 // Fallthrough
2420 case Instruction::OR_INT:
2421 op = kOpOr;
2422 break;
2423 case Instruction::XOR_INT_2ADDR:
2424 is_two_addr = true;
2425 // Fallthrough
2426 case Instruction::XOR_INT:
2427 op = kOpXor;
2428 break;
2429 case Instruction::SHL_INT_2ADDR:
2430 is_two_addr = true;
2431 // Fallthrough
2432 case Instruction::SHL_INT:
2433 shift_op = true;
2434 op = kOpLsl;
2435 break;
2436 case Instruction::SHR_INT_2ADDR:
2437 is_two_addr = true;
2438 // Fallthrough
2439 case Instruction::SHR_INT:
2440 shift_op = true;
2441 op = kOpAsr;
2442 break;
2443 case Instruction::USHR_INT_2ADDR:
2444 is_two_addr = true;
2445 // Fallthrough
2446 case Instruction::USHR_INT:
2447 shift_op = true;
2448 op = kOpLsr;
2449 break;
2450 default:
2451 LOG(FATAL) << "Invalid word arith op: " << opcode;
2452 }
2453
Mark Mendelle87f9b52014-04-30 14:13:18 -04002454 // Can we convert to a two address instruction?
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002455 if (!is_two_addr &&
2456 (mir_graph_->SRegToVReg(rl_dest.s_reg_low) ==
2457 mir_graph_->SRegToVReg(rl_lhs.s_reg_low))) {
Mark Mendelle87f9b52014-04-30 14:13:18 -04002458 is_two_addr = true;
2459 }
2460
2461 if (!GenerateTwoOperandInstructions()) {
2462 is_two_addr = false;
2463 }
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002464
2465 // Get the div/rem stuff out of the way.
2466 if (is_div_rem) {
2467 rl_result = GenDivRem(rl_dest, rl_lhs, rl_rhs, op == kOpDiv, true);
2468 StoreValue(rl_dest, rl_result);
2469 return;
2470 }
2471
2472 if (unary) {
2473 rl_lhs = LoadValue(rl_lhs, kCoreReg);
buzbee30adc732014-05-09 15:10:18 -07002474 rl_result = UpdateLocTyped(rl_dest, kCoreReg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002475 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002476 OpRegReg(op, rl_result.reg, rl_lhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002477 } else {
2478 if (shift_op) {
2479 // X86 doesn't require masking and must use ECX.
buzbee2700f7e2014-03-07 09:46:20 -08002480 RegStorage t_reg = TargetReg(kCount); // rCX
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002481 LoadValueDirectFixed(rl_rhs, t_reg);
2482 if (is_two_addr) {
2483 // Can we do this directly into memory?
buzbee30adc732014-05-09 15:10:18 -07002484 rl_result = UpdateLocTyped(rl_dest, kCoreReg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002485 rl_rhs = LoadValue(rl_rhs, kCoreReg);
2486 if (rl_result.location != kLocPhysReg) {
2487 // Okay, we can do this into memory
buzbee2700f7e2014-03-07 09:46:20 -08002488 OpMemReg(op, rl_result, t_reg.GetReg());
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002489 FreeTemp(t_reg);
2490 return;
buzbee091cc402014-03-31 10:14:40 -07002491 } else if (!rl_result.reg.IsFloat()) {
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002492 // Can do this directly into the result register
buzbee2700f7e2014-03-07 09:46:20 -08002493 OpRegReg(op, rl_result.reg, t_reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002494 FreeTemp(t_reg);
2495 StoreFinalValue(rl_dest, rl_result);
2496 return;
2497 }
2498 }
2499 // Three address form, or we can't do directly.
2500 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2501 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002502 OpRegRegReg(op, rl_result.reg, rl_lhs.reg, t_reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002503 FreeTemp(t_reg);
2504 } else {
2505 // Multiply is 3 operand only (sort of).
2506 if (is_two_addr && op != kOpMul) {
2507 // Can we do this directly into memory?
buzbee30adc732014-05-09 15:10:18 -07002508 rl_result = UpdateLocTyped(rl_dest, kCoreReg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002509 if (rl_result.location == kLocPhysReg) {
Serguei Katkov366f8ae2014-04-15 16:55:26 +07002510 // Ensure res is in a core reg
2511 rl_result = EvalLoc(rl_dest, kCoreReg, true);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002512 // Can we do this from memory directly?
buzbee30adc732014-05-09 15:10:18 -07002513 rl_rhs = UpdateLocTyped(rl_rhs, kCoreReg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002514 if (rl_rhs.location != kLocPhysReg) {
buzbee2700f7e2014-03-07 09:46:20 -08002515 OpRegMem(op, rl_result.reg, rl_rhs);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002516 StoreFinalValue(rl_dest, rl_result);
2517 return;
buzbee091cc402014-03-31 10:14:40 -07002518 } else if (!rl_rhs.reg.IsFloat()) {
buzbee2700f7e2014-03-07 09:46:20 -08002519 OpRegReg(op, rl_result.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002520 StoreFinalValue(rl_dest, rl_result);
2521 return;
2522 }
2523 }
2524 rl_rhs = LoadValue(rl_rhs, kCoreReg);
Serguei Katkovd293fb42014-05-19 15:45:42 +07002525 // It might happen rl_rhs and rl_dest are the same VR
2526 // in this case rl_dest is in reg after LoadValue while
2527 // rl_result is not updated yet, so do this
2528 rl_result = UpdateLocTyped(rl_dest, kCoreReg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002529 if (rl_result.location != kLocPhysReg) {
2530 // Okay, we can do this into memory.
Bill Buzbee00e1ec62014-02-27 23:44:13 +00002531 OpMemReg(op, rl_result, rl_rhs.reg.GetReg());
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002532 return;
buzbee091cc402014-03-31 10:14:40 -07002533 } else if (!rl_result.reg.IsFloat()) {
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002534 // Can do this directly into the result register.
buzbee2700f7e2014-03-07 09:46:20 -08002535 OpRegReg(op, rl_result.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002536 StoreFinalValue(rl_dest, rl_result);
2537 return;
2538 } else {
2539 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2540 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002541 OpRegRegReg(op, rl_result.reg, rl_lhs.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002542 }
2543 } else {
2544 // Try to use reg/memory instructions.
buzbee30adc732014-05-09 15:10:18 -07002545 rl_lhs = UpdateLocTyped(rl_lhs, kCoreReg);
2546 rl_rhs = UpdateLocTyped(rl_rhs, kCoreReg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002547 // We can't optimize with FP registers.
2548 if (!IsOperationSafeWithoutTemps(rl_lhs, rl_rhs)) {
2549 // Something is difficult, so fall back to the standard case.
2550 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2551 rl_rhs = LoadValue(rl_rhs, kCoreReg);
2552 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002553 OpRegRegReg(op, rl_result.reg, rl_lhs.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002554 } else {
2555 // We can optimize by moving to result and using memory operands.
2556 if (rl_rhs.location != kLocPhysReg) {
2557 // Force LHS into result.
Serguei Katkov66da1362014-03-14 13:33:33 +07002558 // We should be careful with order here
2559 // If rl_dest and rl_lhs points to the same VR we should load first
2560 // If the are different we should find a register first for dest
Chao-ying Fua0147762014-06-06 18:38:49 -07002561 if (mir_graph_->SRegToVReg(rl_dest.s_reg_low) ==
2562 mir_graph_->SRegToVReg(rl_lhs.s_reg_low)) {
Serguei Katkov66da1362014-03-14 13:33:33 +07002563 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2564 rl_result = EvalLoc(rl_dest, kCoreReg, true);
Mark Mendelle87f9b52014-04-30 14:13:18 -04002565 // No-op if these are the same.
2566 OpRegCopy(rl_result.reg, rl_lhs.reg);
Serguei Katkov66da1362014-03-14 13:33:33 +07002567 } else {
2568 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002569 LoadValueDirect(rl_lhs, rl_result.reg);
Serguei Katkov66da1362014-03-14 13:33:33 +07002570 }
buzbee2700f7e2014-03-07 09:46:20 -08002571 OpRegMem(op, rl_result.reg, rl_rhs);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002572 } else if (rl_lhs.location != kLocPhysReg) {
2573 // RHS is in a register; LHS is in memory.
2574 if (op != kOpSub) {
2575 // Force RHS into result and operate on memory.
2576 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002577 OpRegCopy(rl_result.reg, rl_rhs.reg);
2578 OpRegMem(op, rl_result.reg, rl_lhs);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002579 } else {
2580 // Subtraction isn't commutative.
2581 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2582 rl_rhs = LoadValue(rl_rhs, kCoreReg);
2583 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002584 OpRegRegReg(op, rl_result.reg, rl_lhs.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002585 }
2586 } else {
2587 // Both are in registers.
2588 rl_lhs = LoadValue(rl_lhs, kCoreReg);
2589 rl_rhs = LoadValue(rl_rhs, kCoreReg);
2590 rl_result = EvalLoc(rl_dest, kCoreReg, true);
buzbee2700f7e2014-03-07 09:46:20 -08002591 OpRegRegReg(op, rl_result.reg, rl_lhs.reg, rl_rhs.reg);
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002592 }
2593 }
2594 }
2595 }
2596 }
2597 StoreValue(rl_dest, rl_result);
2598}
2599
2600bool X86Mir2Lir::IsOperationSafeWithoutTemps(RegLocation rl_lhs, RegLocation rl_rhs) {
2601 // If we have non-core registers, then we can't do good things.
buzbee091cc402014-03-31 10:14:40 -07002602 if (rl_lhs.location == kLocPhysReg && rl_lhs.reg.IsFloat()) {
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002603 return false;
2604 }
buzbee091cc402014-03-31 10:14:40 -07002605 if (rl_rhs.location == kLocPhysReg && rl_rhs.reg.IsFloat()) {
Mark Mendellfeb2b4e2014-01-28 12:59:49 -08002606 return false;
2607 }
2608
2609 // Everything will be fine :-).
2610 return true;
2611}
Chao-ying Fua0147762014-06-06 18:38:49 -07002612
2613void X86Mir2Lir::GenIntToLong(RegLocation rl_dest, RegLocation rl_src) {
2614 if (!Gen64Bit()) {
2615 Mir2Lir::GenIntToLong(rl_dest, rl_src);
2616 return;
2617 }
2618 RegLocation rl_result = EvalLoc(rl_dest, kCoreReg, true);
2619 if (rl_src.location == kLocPhysReg) {
2620 NewLIR2(kX86MovsxdRR, rl_result.reg.GetReg(), rl_src.reg.GetReg());
2621 } else {
2622 int displacement = SRegOffset(rl_src.s_reg_low);
2623 LIR *m = NewLIR3(kX86MovsxdRM, rl_result.reg.GetReg(), rs_rX86_SP.GetReg(),
2624 displacement + LOWORD_OFFSET);
2625 AnnotateDalvikRegAccess(m, (displacement + LOWORD_OFFSET) >> 2,
2626 true /* is_load */, true /* is_64bit */);
2627 }
2628 StoreValueWide(rl_dest, rl_result);
2629}
2630
2631void X86Mir2Lir::GenShiftOpLong(Instruction::Code opcode, RegLocation rl_dest,
2632 RegLocation rl_src1, RegLocation rl_shift) {
2633 if (!Gen64Bit()) {
2634 Mir2Lir::GenShiftOpLong(opcode, rl_dest, rl_src1, rl_shift);
2635 return;
2636 }
2637
2638 bool is_two_addr = false;
2639 OpKind op = kOpBkpt;
2640 RegLocation rl_result;
2641
2642 switch (opcode) {
2643 case Instruction::SHL_LONG_2ADDR:
2644 is_two_addr = true;
2645 // Fallthrough
2646 case Instruction::SHL_LONG:
2647 op = kOpLsl;
2648 break;
2649 case Instruction::SHR_LONG_2ADDR:
2650 is_two_addr = true;
2651 // Fallthrough
2652 case Instruction::SHR_LONG:
2653 op = kOpAsr;
2654 break;
2655 case Instruction::USHR_LONG_2ADDR:
2656 is_two_addr = true;
2657 // Fallthrough
2658 case Instruction::USHR_LONG:
2659 op = kOpLsr;
2660 break;
2661 default:
2662 op = kOpBkpt;
2663 }
2664
2665 // X86 doesn't require masking and must use ECX.
2666 RegStorage t_reg = TargetReg(kCount); // rCX
2667 LoadValueDirectFixed(rl_shift, t_reg);
2668 if (is_two_addr) {
2669 // Can we do this directly into memory?
2670 rl_result = UpdateLocWideTyped(rl_dest, kCoreReg);
2671 if (rl_result.location != kLocPhysReg) {
2672 // Okay, we can do this into memory
2673 OpMemReg(op, rl_result, t_reg.GetReg());
2674 } else if (!rl_result.reg.IsFloat()) {
2675 // Can do this directly into the result register
2676 OpRegReg(op, rl_result.reg, t_reg);
2677 StoreFinalValueWide(rl_dest, rl_result);
2678 }
2679 } else {
2680 // Three address form, or we can't do directly.
2681 rl_src1 = LoadValueWide(rl_src1, kCoreReg);
2682 rl_result = EvalLocWide(rl_dest, kCoreReg, true);
2683 OpRegRegReg(op, rl_result.reg, rl_src1.reg, t_reg);
2684 StoreFinalValueWide(rl_dest, rl_result);
2685 }
2686
2687 FreeTemp(t_reg);
2688}
2689
Brian Carlstrom7940e442013-07-12 13:46:57 -07002690} // namespace art