blob: 83cc2785764f056c1e46241367095db6c21be66c [file] [log] [blame]
Mark Mendell09ed1a32015-03-25 08:30:06 -04001/*
2 * Copyright (C) 2015 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#include "intrinsics_x86.h"
18
Andreas Gampe21030dd2015-05-07 14:46:15 -070019#include <limits>
20
Mark Mendellfb8d2792015-03-31 22:16:59 -040021#include "arch/x86/instruction_set_features_x86.h"
Mathieu Chartiere401d142015-04-22 13:56:20 -070022#include "art_method.h"
Mark Mendelld5897672015-08-12 21:16:41 -040023#include "base/bit_utils.h"
Mark Mendell09ed1a32015-03-25 08:30:06 -040024#include "code_generator_x86.h"
25#include "entrypoints/quick/quick_entrypoints.h"
26#include "intrinsics.h"
Andreas Gampe85b62f22015-09-09 13:15:38 -070027#include "intrinsics_utils.h"
Mark Mendell09ed1a32015-03-25 08:30:06 -040028#include "mirror/array-inl.h"
Mark Mendell09ed1a32015-03-25 08:30:06 -040029#include "mirror/string.h"
30#include "thread.h"
31#include "utils/x86/assembler_x86.h"
32#include "utils/x86/constants_x86.h"
33
34namespace art {
35
36namespace x86 {
37
38static constexpr int kDoubleNaNHigh = 0x7FF80000;
39static constexpr int kDoubleNaNLow = 0x00000000;
Mark P Mendell2f10a5f2016-01-25 14:47:50 +000040static constexpr int64_t kDoubleNaN = INT64_C(0x7FF8000000000000);
41static constexpr int32_t kFloatNaN = INT32_C(0x7FC00000);
Mark Mendell09ed1a32015-03-25 08:30:06 -040042
Mark Mendellfb8d2792015-03-31 22:16:59 -040043IntrinsicLocationsBuilderX86::IntrinsicLocationsBuilderX86(CodeGeneratorX86* codegen)
Mark P Mendell2f10a5f2016-01-25 14:47:50 +000044 : arena_(codegen->GetGraph()->GetArena()),
45 codegen_(codegen) {
Mark Mendellfb8d2792015-03-31 22:16:59 -040046}
47
48
Mark Mendell09ed1a32015-03-25 08:30:06 -040049X86Assembler* IntrinsicCodeGeneratorX86::GetAssembler() {
Roland Levillainb488b782015-10-22 11:38:49 +010050 return down_cast<X86Assembler*>(codegen_->GetAssembler());
Mark Mendell09ed1a32015-03-25 08:30:06 -040051}
52
53ArenaAllocator* IntrinsicCodeGeneratorX86::GetAllocator() {
54 return codegen_->GetGraph()->GetArena();
55}
56
57bool IntrinsicLocationsBuilderX86::TryDispatch(HInvoke* invoke) {
58 Dispatch(invoke);
59 LocationSummary* res = invoke->GetLocations();
Roland Levillain0d5a2812015-11-13 10:07:31 +000060 if (res == nullptr) {
61 return false;
62 }
Roland Levillain0d5a2812015-11-13 10:07:31 +000063 return res->Intrinsified();
Mark Mendell09ed1a32015-03-25 08:30:06 -040064}
65
Roland Levillainec525fc2015-04-28 15:50:20 +010066static void MoveArguments(HInvoke* invoke, CodeGeneratorX86* codegen) {
Roland Levillain2d27c8e2015-04-28 15:48:45 +010067 InvokeDexCallingConventionVisitorX86 calling_convention_visitor;
Roland Levillainec525fc2015-04-28 15:50:20 +010068 IntrinsicVisitor::MoveArguments(invoke, codegen, &calling_convention_visitor);
Mark Mendell09ed1a32015-03-25 08:30:06 -040069}
70
Andreas Gampe85b62f22015-09-09 13:15:38 -070071using IntrinsicSlowPathX86 = IntrinsicSlowPath<InvokeDexCallingConventionVisitorX86>;
Mark Mendell09ed1a32015-03-25 08:30:06 -040072
Mark Mendell09ed1a32015-03-25 08:30:06 -040073#define __ assembler->
74
75static void CreateFPToIntLocations(ArenaAllocator* arena, HInvoke* invoke, bool is64bit) {
76 LocationSummary* locations = new (arena) LocationSummary(invoke,
77 LocationSummary::kNoCall,
78 kIntrinsified);
79 locations->SetInAt(0, Location::RequiresFpuRegister());
80 locations->SetOut(Location::RequiresRegister());
81 if (is64bit) {
82 locations->AddTemp(Location::RequiresFpuRegister());
83 }
84}
85
86static void CreateIntToFPLocations(ArenaAllocator* arena, HInvoke* invoke, bool is64bit) {
87 LocationSummary* locations = new (arena) LocationSummary(invoke,
88 LocationSummary::kNoCall,
89 kIntrinsified);
90 locations->SetInAt(0, Location::RequiresRegister());
91 locations->SetOut(Location::RequiresFpuRegister());
92 if (is64bit) {
93 locations->AddTemp(Location::RequiresFpuRegister());
94 locations->AddTemp(Location::RequiresFpuRegister());
95 }
96}
97
98static void MoveFPToInt(LocationSummary* locations, bool is64bit, X86Assembler* assembler) {
99 Location input = locations->InAt(0);
100 Location output = locations->Out();
101 if (is64bit) {
102 // Need to use the temporary.
103 XmmRegister temp = locations->GetTemp(0).AsFpuRegister<XmmRegister>();
104 __ movsd(temp, input.AsFpuRegister<XmmRegister>());
105 __ movd(output.AsRegisterPairLow<Register>(), temp);
106 __ psrlq(temp, Immediate(32));
107 __ movd(output.AsRegisterPairHigh<Register>(), temp);
108 } else {
109 __ movd(output.AsRegister<Register>(), input.AsFpuRegister<XmmRegister>());
110 }
111}
112
113static void MoveIntToFP(LocationSummary* locations, bool is64bit, X86Assembler* assembler) {
114 Location input = locations->InAt(0);
115 Location output = locations->Out();
116 if (is64bit) {
117 // Need to use the temporary.
118 XmmRegister temp1 = locations->GetTemp(0).AsFpuRegister<XmmRegister>();
119 XmmRegister temp2 = locations->GetTemp(1).AsFpuRegister<XmmRegister>();
120 __ movd(temp1, input.AsRegisterPairLow<Register>());
121 __ movd(temp2, input.AsRegisterPairHigh<Register>());
122 __ punpckldq(temp1, temp2);
123 __ movsd(output.AsFpuRegister<XmmRegister>(), temp1);
124 } else {
125 __ movd(output.AsFpuRegister<XmmRegister>(), input.AsRegister<Register>());
126 }
127}
128
129void IntrinsicLocationsBuilderX86::VisitDoubleDoubleToRawLongBits(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000130 CreateFPToIntLocations(arena_, invoke, /* is64bit */ true);
Mark Mendell09ed1a32015-03-25 08:30:06 -0400131}
132void IntrinsicLocationsBuilderX86::VisitDoubleLongBitsToDouble(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000133 CreateIntToFPLocations(arena_, invoke, /* is64bit */ true);
Mark Mendell09ed1a32015-03-25 08:30:06 -0400134}
135
136void IntrinsicCodeGeneratorX86::VisitDoubleDoubleToRawLongBits(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000137 MoveFPToInt(invoke->GetLocations(), /* is64bit */ true, GetAssembler());
Mark Mendell09ed1a32015-03-25 08:30:06 -0400138}
139void IntrinsicCodeGeneratorX86::VisitDoubleLongBitsToDouble(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000140 MoveIntToFP(invoke->GetLocations(), /* is64bit */ true, GetAssembler());
Mark Mendell09ed1a32015-03-25 08:30:06 -0400141}
142
143void IntrinsicLocationsBuilderX86::VisitFloatFloatToRawIntBits(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000144 CreateFPToIntLocations(arena_, invoke, /* is64bit */ false);
Mark Mendell09ed1a32015-03-25 08:30:06 -0400145}
146void IntrinsicLocationsBuilderX86::VisitFloatIntBitsToFloat(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000147 CreateIntToFPLocations(arena_, invoke, /* is64bit */ false);
Mark Mendell09ed1a32015-03-25 08:30:06 -0400148}
149
150void IntrinsicCodeGeneratorX86::VisitFloatFloatToRawIntBits(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000151 MoveFPToInt(invoke->GetLocations(), /* is64bit */ false, GetAssembler());
Mark Mendell09ed1a32015-03-25 08:30:06 -0400152}
153void IntrinsicCodeGeneratorX86::VisitFloatIntBitsToFloat(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000154 MoveIntToFP(invoke->GetLocations(), /* is64bit */ false, GetAssembler());
Mark Mendell09ed1a32015-03-25 08:30:06 -0400155}
156
157static void CreateIntToIntLocations(ArenaAllocator* arena, HInvoke* invoke) {
158 LocationSummary* locations = new (arena) LocationSummary(invoke,
159 LocationSummary::kNoCall,
160 kIntrinsified);
161 locations->SetInAt(0, Location::RequiresRegister());
162 locations->SetOut(Location::SameAsFirstInput());
163}
164
165static void CreateLongToIntLocations(ArenaAllocator* arena, HInvoke* invoke) {
166 LocationSummary* locations = new (arena) LocationSummary(invoke,
167 LocationSummary::kNoCall,
168 kIntrinsified);
169 locations->SetInAt(0, Location::RequiresRegister());
170 locations->SetOut(Location::RequiresRegister());
171}
172
173static void CreateLongToLongLocations(ArenaAllocator* arena, HInvoke* invoke) {
174 LocationSummary* locations = new (arena) LocationSummary(invoke,
175 LocationSummary::kNoCall,
176 kIntrinsified);
177 locations->SetInAt(0, Location::RequiresRegister());
178 locations->SetOut(Location::RequiresRegister(), Location::kOutputOverlap);
179}
180
181static void GenReverseBytes(LocationSummary* locations,
182 Primitive::Type size,
183 X86Assembler* assembler) {
184 Register out = locations->Out().AsRegister<Register>();
185
186 switch (size) {
187 case Primitive::kPrimShort:
188 // TODO: Can be done with an xchg of 8b registers. This is straight from Quick.
189 __ bswapl(out);
190 __ sarl(out, Immediate(16));
191 break;
192 case Primitive::kPrimInt:
193 __ bswapl(out);
194 break;
195 default:
196 LOG(FATAL) << "Unexpected size for reverse-bytes: " << size;
197 UNREACHABLE();
198 }
199}
200
201void IntrinsicLocationsBuilderX86::VisitIntegerReverseBytes(HInvoke* invoke) {
202 CreateIntToIntLocations(arena_, invoke);
203}
204
205void IntrinsicCodeGeneratorX86::VisitIntegerReverseBytes(HInvoke* invoke) {
206 GenReverseBytes(invoke->GetLocations(), Primitive::kPrimInt, GetAssembler());
207}
208
Mark Mendell58d25fd2015-04-03 14:52:31 -0400209void IntrinsicLocationsBuilderX86::VisitLongReverseBytes(HInvoke* invoke) {
210 CreateLongToLongLocations(arena_, invoke);
211}
212
213void IntrinsicCodeGeneratorX86::VisitLongReverseBytes(HInvoke* invoke) {
214 LocationSummary* locations = invoke->GetLocations();
215 Location input = locations->InAt(0);
216 Register input_lo = input.AsRegisterPairLow<Register>();
217 Register input_hi = input.AsRegisterPairHigh<Register>();
218 Location output = locations->Out();
219 Register output_lo = output.AsRegisterPairLow<Register>();
220 Register output_hi = output.AsRegisterPairHigh<Register>();
221
222 X86Assembler* assembler = GetAssembler();
223 // Assign the inputs to the outputs, mixing low/high.
224 __ movl(output_lo, input_hi);
225 __ movl(output_hi, input_lo);
226 __ bswapl(output_lo);
227 __ bswapl(output_hi);
228}
229
Mark Mendell09ed1a32015-03-25 08:30:06 -0400230void IntrinsicLocationsBuilderX86::VisitShortReverseBytes(HInvoke* invoke) {
231 CreateIntToIntLocations(arena_, invoke);
232}
233
234void IntrinsicCodeGeneratorX86::VisitShortReverseBytes(HInvoke* invoke) {
235 GenReverseBytes(invoke->GetLocations(), Primitive::kPrimShort, GetAssembler());
236}
237
238
239// TODO: Consider Quick's way of doing Double abs through integer operations, as the immediate we
240// need is 64b.
241
242static void CreateFloatToFloat(ArenaAllocator* arena, HInvoke* invoke) {
243 // TODO: Enable memory operations when the assembler supports them.
244 LocationSummary* locations = new (arena) LocationSummary(invoke,
245 LocationSummary::kNoCall,
246 kIntrinsified);
247 locations->SetInAt(0, Location::RequiresFpuRegister());
Mark Mendell09ed1a32015-03-25 08:30:06 -0400248 locations->SetOut(Location::SameAsFirstInput());
Mark P Mendell2f10a5f2016-01-25 14:47:50 +0000249 HInvokeStaticOrDirect* static_or_direct = invoke->AsInvokeStaticOrDirect();
250 DCHECK(static_or_direct != nullptr);
Nicolas Geoffray97793072016-02-16 15:33:54 +0000251 if (static_or_direct->HasSpecialInput() &&
252 invoke->InputAt(static_or_direct->GetSpecialInputIndex())->IsX86ComputeBaseMethodAddress()) {
Mark P Mendell2f10a5f2016-01-25 14:47:50 +0000253 // We need addressibility for the constant area.
254 locations->SetInAt(1, Location::RequiresRegister());
255 // We need a temporary to hold the constant.
256 locations->AddTemp(Location::RequiresFpuRegister());
257 }
Mark Mendell09ed1a32015-03-25 08:30:06 -0400258}
259
Mark P Mendell2f10a5f2016-01-25 14:47:50 +0000260static void MathAbsFP(LocationSummary* locations,
261 bool is64bit,
262 X86Assembler* assembler,
263 CodeGeneratorX86* codegen) {
Mark Mendell09ed1a32015-03-25 08:30:06 -0400264 Location output = locations->Out();
265
Mark P Mendell2f10a5f2016-01-25 14:47:50 +0000266 DCHECK(output.IsFpuRegister());
Nicolas Geoffray97793072016-02-16 15:33:54 +0000267 if (locations->GetInputCount() == 2 && locations->InAt(1).IsValid()) {
Mark P Mendell2f10a5f2016-01-25 14:47:50 +0000268 DCHECK(locations->InAt(1).IsRegister());
269 // We also have a constant area pointer.
270 Register constant_area = locations->InAt(1).AsRegister<Register>();
271 XmmRegister temp = locations->GetTemp(0).AsFpuRegister<XmmRegister>();
272 if (is64bit) {
273 __ movsd(temp, codegen->LiteralInt64Address(INT64_C(0x7FFFFFFFFFFFFFFF), constant_area));
274 __ andpd(output.AsFpuRegister<XmmRegister>(), temp);
275 } else {
276 __ movss(temp, codegen->LiteralInt32Address(INT32_C(0x7FFFFFFF), constant_area));
277 __ andps(output.AsFpuRegister<XmmRegister>(), temp);
278 }
279 } else {
Mark Mendell09ed1a32015-03-25 08:30:06 -0400280 // Create the right constant on an aligned stack.
281 if (is64bit) {
282 __ subl(ESP, Immediate(8));
283 __ pushl(Immediate(0x7FFFFFFF));
284 __ pushl(Immediate(0xFFFFFFFF));
285 __ andpd(output.AsFpuRegister<XmmRegister>(), Address(ESP, 0));
286 } else {
287 __ subl(ESP, Immediate(12));
288 __ pushl(Immediate(0x7FFFFFFF));
289 __ andps(output.AsFpuRegister<XmmRegister>(), Address(ESP, 0));
290 }
291 __ addl(ESP, Immediate(16));
Mark Mendell09ed1a32015-03-25 08:30:06 -0400292 }
293}
294
295void IntrinsicLocationsBuilderX86::VisitMathAbsDouble(HInvoke* invoke) {
296 CreateFloatToFloat(arena_, invoke);
297}
298
299void IntrinsicCodeGeneratorX86::VisitMathAbsDouble(HInvoke* invoke) {
Mark P Mendell2f10a5f2016-01-25 14:47:50 +0000300 MathAbsFP(invoke->GetLocations(), /* is64bit */ true, GetAssembler(), codegen_);
Mark Mendell09ed1a32015-03-25 08:30:06 -0400301}
302
303void IntrinsicLocationsBuilderX86::VisitMathAbsFloat(HInvoke* invoke) {
304 CreateFloatToFloat(arena_, invoke);
305}
306
307void IntrinsicCodeGeneratorX86::VisitMathAbsFloat(HInvoke* invoke) {
Mark P Mendell2f10a5f2016-01-25 14:47:50 +0000308 MathAbsFP(invoke->GetLocations(), /* is64bit */ false, GetAssembler(), codegen_);
Mark Mendell09ed1a32015-03-25 08:30:06 -0400309}
310
311static void CreateAbsIntLocation(ArenaAllocator* arena, HInvoke* invoke) {
312 LocationSummary* locations = new (arena) LocationSummary(invoke,
313 LocationSummary::kNoCall,
314 kIntrinsified);
315 locations->SetInAt(0, Location::RegisterLocation(EAX));
316 locations->SetOut(Location::SameAsFirstInput());
317 locations->AddTemp(Location::RegisterLocation(EDX));
318}
319
320static void GenAbsInteger(LocationSummary* locations, X86Assembler* assembler) {
321 Location output = locations->Out();
322 Register out = output.AsRegister<Register>();
323 DCHECK_EQ(out, EAX);
324 Register temp = locations->GetTemp(0).AsRegister<Register>();
325 DCHECK_EQ(temp, EDX);
326
327 // Sign extend EAX into EDX.
328 __ cdq();
329
330 // XOR EAX with sign.
331 __ xorl(EAX, EDX);
332
333 // Subtract out sign to correct.
334 __ subl(EAX, EDX);
335
336 // The result is in EAX.
337}
338
339static void CreateAbsLongLocation(ArenaAllocator* arena, HInvoke* invoke) {
340 LocationSummary* locations = new (arena) LocationSummary(invoke,
341 LocationSummary::kNoCall,
342 kIntrinsified);
343 locations->SetInAt(0, Location::RequiresRegister());
344 locations->SetOut(Location::RequiresRegister(), Location::kOutputOverlap);
345 locations->AddTemp(Location::RequiresRegister());
346}
347
348static void GenAbsLong(LocationSummary* locations, X86Assembler* assembler) {
349 Location input = locations->InAt(0);
350 Register input_lo = input.AsRegisterPairLow<Register>();
351 Register input_hi = input.AsRegisterPairHigh<Register>();
352 Location output = locations->Out();
353 Register output_lo = output.AsRegisterPairLow<Register>();
354 Register output_hi = output.AsRegisterPairHigh<Register>();
355 Register temp = locations->GetTemp(0).AsRegister<Register>();
356
357 // Compute the sign into the temporary.
358 __ movl(temp, input_hi);
359 __ sarl(temp, Immediate(31));
360
361 // Store the sign into the output.
362 __ movl(output_lo, temp);
363 __ movl(output_hi, temp);
364
365 // XOR the input to the output.
366 __ xorl(output_lo, input_lo);
367 __ xorl(output_hi, input_hi);
368
369 // Subtract the sign.
370 __ subl(output_lo, temp);
371 __ sbbl(output_hi, temp);
372}
373
374void IntrinsicLocationsBuilderX86::VisitMathAbsInt(HInvoke* invoke) {
375 CreateAbsIntLocation(arena_, invoke);
376}
377
378void IntrinsicCodeGeneratorX86::VisitMathAbsInt(HInvoke* invoke) {
379 GenAbsInteger(invoke->GetLocations(), GetAssembler());
380}
381
382void IntrinsicLocationsBuilderX86::VisitMathAbsLong(HInvoke* invoke) {
383 CreateAbsLongLocation(arena_, invoke);
384}
385
386void IntrinsicCodeGeneratorX86::VisitMathAbsLong(HInvoke* invoke) {
387 GenAbsLong(invoke->GetLocations(), GetAssembler());
388}
389
Mark P Mendell2f10a5f2016-01-25 14:47:50 +0000390static void GenMinMaxFP(LocationSummary* locations,
391 bool is_min,
392 bool is_double,
393 X86Assembler* assembler,
394 CodeGeneratorX86* codegen) {
Mark Mendell09ed1a32015-03-25 08:30:06 -0400395 Location op1_loc = locations->InAt(0);
396 Location op2_loc = locations->InAt(1);
397 Location out_loc = locations->Out();
398 XmmRegister out = out_loc.AsFpuRegister<XmmRegister>();
399
400 // Shortcut for same input locations.
401 if (op1_loc.Equals(op2_loc)) {
402 DCHECK(out_loc.Equals(op1_loc));
403 return;
404 }
405
406 // (out := op1)
407 // out <=? op2
408 // if Nan jmp Nan_label
409 // if out is min jmp done
410 // if op2 is min jmp op2_label
411 // handle -0/+0
412 // jmp done
413 // Nan_label:
414 // out := NaN
415 // op2_label:
416 // out := op2
417 // done:
418 //
419 // This removes one jmp, but needs to copy one input (op1) to out.
420 //
421 // TODO: This is straight from Quick (except literal pool). Make NaN an out-of-line slowpath?
422
423 XmmRegister op2 = op2_loc.AsFpuRegister<XmmRegister>();
424
Mark Mendell0c9497d2015-08-21 09:30:05 -0400425 NearLabel nan, done, op2_label;
Mark Mendell09ed1a32015-03-25 08:30:06 -0400426 if (is_double) {
427 __ ucomisd(out, op2);
428 } else {
429 __ ucomiss(out, op2);
430 }
431
432 __ j(Condition::kParityEven, &nan);
433
434 __ j(is_min ? Condition::kAbove : Condition::kBelow, &op2_label);
435 __ j(is_min ? Condition::kBelow : Condition::kAbove, &done);
436
437 // Handle 0.0/-0.0.
438 if (is_min) {
439 if (is_double) {
440 __ orpd(out, op2);
441 } else {
442 __ orps(out, op2);
443 }
444 } else {
445 if (is_double) {
446 __ andpd(out, op2);
447 } else {
448 __ andps(out, op2);
449 }
450 }
451 __ jmp(&done);
452
453 // NaN handling.
454 __ Bind(&nan);
Mark P Mendell2f10a5f2016-01-25 14:47:50 +0000455 // Do we have a constant area pointer?
Nicolas Geoffray97793072016-02-16 15:33:54 +0000456 if (locations->GetInputCount() == 3 && locations->InAt(2).IsValid()) {
Mark P Mendell2f10a5f2016-01-25 14:47:50 +0000457 DCHECK(locations->InAt(2).IsRegister());
458 Register constant_area = locations->InAt(2).AsRegister<Register>();
459 if (is_double) {
460 __ movsd(out, codegen->LiteralInt64Address(kDoubleNaN, constant_area));
461 } else {
462 __ movss(out, codegen->LiteralInt32Address(kFloatNaN, constant_area));
463 }
Mark Mendell09ed1a32015-03-25 08:30:06 -0400464 } else {
Mark P Mendell2f10a5f2016-01-25 14:47:50 +0000465 if (is_double) {
466 __ pushl(Immediate(kDoubleNaNHigh));
467 __ pushl(Immediate(kDoubleNaNLow));
468 __ movsd(out, Address(ESP, 0));
469 __ addl(ESP, Immediate(8));
470 } else {
471 __ pushl(Immediate(kFloatNaN));
472 __ movss(out, Address(ESP, 0));
473 __ addl(ESP, Immediate(4));
474 }
Mark Mendell09ed1a32015-03-25 08:30:06 -0400475 }
476 __ jmp(&done);
477
478 // out := op2;
479 __ Bind(&op2_label);
480 if (is_double) {
481 __ movsd(out, op2);
482 } else {
483 __ movss(out, op2);
484 }
485
486 // Done.
487 __ Bind(&done);
488}
489
490static void CreateFPFPToFPLocations(ArenaAllocator* arena, HInvoke* invoke) {
491 LocationSummary* locations = new (arena) LocationSummary(invoke,
492 LocationSummary::kNoCall,
493 kIntrinsified);
494 locations->SetInAt(0, Location::RequiresFpuRegister());
495 locations->SetInAt(1, Location::RequiresFpuRegister());
496 // The following is sub-optimal, but all we can do for now. It would be fine to also accept
497 // the second input to be the output (we can simply swap inputs).
498 locations->SetOut(Location::SameAsFirstInput());
Mark P Mendell2f10a5f2016-01-25 14:47:50 +0000499 HInvokeStaticOrDirect* static_or_direct = invoke->AsInvokeStaticOrDirect();
500 DCHECK(static_or_direct != nullptr);
Nicolas Geoffray97793072016-02-16 15:33:54 +0000501 if (static_or_direct->HasSpecialInput() &&
502 invoke->InputAt(static_or_direct->GetSpecialInputIndex())->IsX86ComputeBaseMethodAddress()) {
Mark P Mendell2f10a5f2016-01-25 14:47:50 +0000503 locations->SetInAt(2, Location::RequiresRegister());
504 }
Mark Mendell09ed1a32015-03-25 08:30:06 -0400505}
506
507void IntrinsicLocationsBuilderX86::VisitMathMinDoubleDouble(HInvoke* invoke) {
508 CreateFPFPToFPLocations(arena_, invoke);
509}
510
511void IntrinsicCodeGeneratorX86::VisitMathMinDoubleDouble(HInvoke* invoke) {
Mark P Mendell2f10a5f2016-01-25 14:47:50 +0000512 GenMinMaxFP(invoke->GetLocations(),
513 /* is_min */ true,
514 /* is_double */ true,
515 GetAssembler(),
516 codegen_);
Mark Mendell09ed1a32015-03-25 08:30:06 -0400517}
518
519void IntrinsicLocationsBuilderX86::VisitMathMinFloatFloat(HInvoke* invoke) {
520 CreateFPFPToFPLocations(arena_, invoke);
521}
522
523void IntrinsicCodeGeneratorX86::VisitMathMinFloatFloat(HInvoke* invoke) {
Mark P Mendell2f10a5f2016-01-25 14:47:50 +0000524 GenMinMaxFP(invoke->GetLocations(),
525 /* is_min */ true,
526 /* is_double */ false,
527 GetAssembler(),
528 codegen_);
Mark Mendell09ed1a32015-03-25 08:30:06 -0400529}
530
531void IntrinsicLocationsBuilderX86::VisitMathMaxDoubleDouble(HInvoke* invoke) {
532 CreateFPFPToFPLocations(arena_, invoke);
533}
534
535void IntrinsicCodeGeneratorX86::VisitMathMaxDoubleDouble(HInvoke* invoke) {
Mark P Mendell2f10a5f2016-01-25 14:47:50 +0000536 GenMinMaxFP(invoke->GetLocations(),
537 /* is_min */ false,
538 /* is_double */ true,
539 GetAssembler(),
540 codegen_);
Mark Mendell09ed1a32015-03-25 08:30:06 -0400541}
542
543void IntrinsicLocationsBuilderX86::VisitMathMaxFloatFloat(HInvoke* invoke) {
544 CreateFPFPToFPLocations(arena_, invoke);
545}
546
547void IntrinsicCodeGeneratorX86::VisitMathMaxFloatFloat(HInvoke* invoke) {
Mark P Mendell2f10a5f2016-01-25 14:47:50 +0000548 GenMinMaxFP(invoke->GetLocations(),
549 /* is_min */ false,
550 /* is_double */ false,
551 GetAssembler(),
552 codegen_);
Mark Mendell09ed1a32015-03-25 08:30:06 -0400553}
554
555static void GenMinMax(LocationSummary* locations, bool is_min, bool is_long,
556 X86Assembler* assembler) {
557 Location op1_loc = locations->InAt(0);
558 Location op2_loc = locations->InAt(1);
559
560 // Shortcut for same input locations.
561 if (op1_loc.Equals(op2_loc)) {
562 // Can return immediately, as op1_loc == out_loc.
563 // Note: if we ever support separate registers, e.g., output into memory, we need to check for
564 // a copy here.
565 DCHECK(locations->Out().Equals(op1_loc));
566 return;
567 }
568
569 if (is_long) {
570 // Need to perform a subtract to get the sign right.
571 // op1 is already in the same location as the output.
572 Location output = locations->Out();
573 Register output_lo = output.AsRegisterPairLow<Register>();
574 Register output_hi = output.AsRegisterPairHigh<Register>();
575
576 Register op2_lo = op2_loc.AsRegisterPairLow<Register>();
577 Register op2_hi = op2_loc.AsRegisterPairHigh<Register>();
578
579 // Spare register to compute the subtraction to set condition code.
580 Register temp = locations->GetTemp(0).AsRegister<Register>();
581
582 // Subtract off op2_low.
583 __ movl(temp, output_lo);
584 __ subl(temp, op2_lo);
585
586 // Now use the same tempo and the borrow to finish the subtraction of op2_hi.
587 __ movl(temp, output_hi);
588 __ sbbl(temp, op2_hi);
589
590 // Now the condition code is correct.
591 Condition cond = is_min ? Condition::kGreaterEqual : Condition::kLess;
592 __ cmovl(cond, output_lo, op2_lo);
593 __ cmovl(cond, output_hi, op2_hi);
594 } else {
595 Register out = locations->Out().AsRegister<Register>();
596 Register op2 = op2_loc.AsRegister<Register>();
597
598 // (out := op1)
599 // out <=? op2
600 // if out is min jmp done
601 // out := op2
602 // done:
603
604 __ cmpl(out, op2);
605 Condition cond = is_min ? Condition::kGreater : Condition::kLess;
606 __ cmovl(cond, out, op2);
607 }
608}
609
610static void CreateIntIntToIntLocations(ArenaAllocator* arena, HInvoke* invoke) {
611 LocationSummary* locations = new (arena) LocationSummary(invoke,
612 LocationSummary::kNoCall,
613 kIntrinsified);
614 locations->SetInAt(0, Location::RequiresRegister());
615 locations->SetInAt(1, Location::RequiresRegister());
616 locations->SetOut(Location::SameAsFirstInput());
617}
618
619static void CreateLongLongToLongLocations(ArenaAllocator* arena, HInvoke* invoke) {
620 LocationSummary* locations = new (arena) LocationSummary(invoke,
621 LocationSummary::kNoCall,
622 kIntrinsified);
623 locations->SetInAt(0, Location::RequiresRegister());
624 locations->SetInAt(1, Location::RequiresRegister());
625 locations->SetOut(Location::SameAsFirstInput());
626 // Register to use to perform a long subtract to set cc.
627 locations->AddTemp(Location::RequiresRegister());
628}
629
630void IntrinsicLocationsBuilderX86::VisitMathMinIntInt(HInvoke* invoke) {
631 CreateIntIntToIntLocations(arena_, invoke);
632}
633
634void IntrinsicCodeGeneratorX86::VisitMathMinIntInt(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000635 GenMinMax(invoke->GetLocations(), /* is_min */ true, /* is_long */ false, GetAssembler());
Mark Mendell09ed1a32015-03-25 08:30:06 -0400636}
637
638void IntrinsicLocationsBuilderX86::VisitMathMinLongLong(HInvoke* invoke) {
639 CreateLongLongToLongLocations(arena_, invoke);
640}
641
642void IntrinsicCodeGeneratorX86::VisitMathMinLongLong(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000643 GenMinMax(invoke->GetLocations(), /* is_min */ true, /* is_long */ true, GetAssembler());
Mark Mendell09ed1a32015-03-25 08:30:06 -0400644}
645
646void IntrinsicLocationsBuilderX86::VisitMathMaxIntInt(HInvoke* invoke) {
647 CreateIntIntToIntLocations(arena_, invoke);
648}
649
650void IntrinsicCodeGeneratorX86::VisitMathMaxIntInt(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000651 GenMinMax(invoke->GetLocations(), /* is_min */ false, /* is_long */ false, GetAssembler());
Mark Mendell09ed1a32015-03-25 08:30:06 -0400652}
653
654void IntrinsicLocationsBuilderX86::VisitMathMaxLongLong(HInvoke* invoke) {
655 CreateLongLongToLongLocations(arena_, invoke);
656}
657
658void IntrinsicCodeGeneratorX86::VisitMathMaxLongLong(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000659 GenMinMax(invoke->GetLocations(), /* is_min */ false, /* is_long */ true, GetAssembler());
Mark Mendell09ed1a32015-03-25 08:30:06 -0400660}
661
662static void CreateFPToFPLocations(ArenaAllocator* arena, HInvoke* invoke) {
663 LocationSummary* locations = new (arena) LocationSummary(invoke,
664 LocationSummary::kNoCall,
665 kIntrinsified);
666 locations->SetInAt(0, Location::RequiresFpuRegister());
667 locations->SetOut(Location::RequiresFpuRegister());
668}
669
670void IntrinsicLocationsBuilderX86::VisitMathSqrt(HInvoke* invoke) {
671 CreateFPToFPLocations(arena_, invoke);
672}
673
674void IntrinsicCodeGeneratorX86::VisitMathSqrt(HInvoke* invoke) {
675 LocationSummary* locations = invoke->GetLocations();
676 XmmRegister in = locations->InAt(0).AsFpuRegister<XmmRegister>();
677 XmmRegister out = locations->Out().AsFpuRegister<XmmRegister>();
678
679 GetAssembler()->sqrtsd(out, in);
680}
681
Mark Mendellfb8d2792015-03-31 22:16:59 -0400682static void InvokeOutOfLineIntrinsic(CodeGeneratorX86* codegen, HInvoke* invoke) {
Roland Levillainec525fc2015-04-28 15:50:20 +0100683 MoveArguments(invoke, codegen);
Mark Mendellfb8d2792015-03-31 22:16:59 -0400684
685 DCHECK(invoke->IsInvokeStaticOrDirect());
Nicolas Geoffray94015b92015-06-04 18:21:04 +0100686 codegen->GenerateStaticOrDirectCall(invoke->AsInvokeStaticOrDirect(),
687 Location::RegisterLocation(EAX));
Mingyao Yange90db122015-04-03 17:56:54 -0700688 codegen->RecordPcInfo(invoke, invoke->GetDexPc());
Mark Mendellfb8d2792015-03-31 22:16:59 -0400689
690 // Copy the result back to the expected output.
691 Location out = invoke->GetLocations()->Out();
692 if (out.IsValid()) {
693 DCHECK(out.IsRegister());
Andreas Gampe85b62f22015-09-09 13:15:38 -0700694 codegen->MoveFromReturnRegister(out, invoke->GetType());
Mark Mendellfb8d2792015-03-31 22:16:59 -0400695 }
696}
697
698static void CreateSSE41FPToFPLocations(ArenaAllocator* arena,
699 HInvoke* invoke,
700 CodeGeneratorX86* codegen) {
701 // Do we have instruction support?
702 if (codegen->GetInstructionSetFeatures().HasSSE4_1()) {
703 CreateFPToFPLocations(arena, invoke);
704 return;
705 }
706
707 // We have to fall back to a call to the intrinsic.
708 LocationSummary* locations = new (arena) LocationSummary(invoke,
Serban Constantinescu54ff4822016-07-07 18:03:19 +0100709 LocationSummary::kCallOnMainOnly);
Mark Mendellfb8d2792015-03-31 22:16:59 -0400710 InvokeRuntimeCallingConvention calling_convention;
711 locations->SetInAt(0, Location::RegisterLocation(calling_convention.GetFpuRegisterAt(0)));
712 locations->SetOut(Location::FpuRegisterLocation(XMM0));
713 // Needs to be EAX for the invoke.
714 locations->AddTemp(Location::RegisterLocation(EAX));
715}
716
717static void GenSSE41FPToFPIntrinsic(CodeGeneratorX86* codegen,
718 HInvoke* invoke,
719 X86Assembler* assembler,
720 int round_mode) {
721 LocationSummary* locations = invoke->GetLocations();
722 if (locations->WillCall()) {
723 InvokeOutOfLineIntrinsic(codegen, invoke);
724 } else {
725 XmmRegister in = locations->InAt(0).AsFpuRegister<XmmRegister>();
726 XmmRegister out = locations->Out().AsFpuRegister<XmmRegister>();
727 __ roundsd(out, in, Immediate(round_mode));
728 }
729}
730
731void IntrinsicLocationsBuilderX86::VisitMathCeil(HInvoke* invoke) {
732 CreateSSE41FPToFPLocations(arena_, invoke, codegen_);
733}
734
735void IntrinsicCodeGeneratorX86::VisitMathCeil(HInvoke* invoke) {
736 GenSSE41FPToFPIntrinsic(codegen_, invoke, GetAssembler(), 2);
737}
738
739void IntrinsicLocationsBuilderX86::VisitMathFloor(HInvoke* invoke) {
740 CreateSSE41FPToFPLocations(arena_, invoke, codegen_);
741}
742
743void IntrinsicCodeGeneratorX86::VisitMathFloor(HInvoke* invoke) {
744 GenSSE41FPToFPIntrinsic(codegen_, invoke, GetAssembler(), 1);
745}
746
747void IntrinsicLocationsBuilderX86::VisitMathRint(HInvoke* invoke) {
748 CreateSSE41FPToFPLocations(arena_, invoke, codegen_);
749}
750
751void IntrinsicCodeGeneratorX86::VisitMathRint(HInvoke* invoke) {
752 GenSSE41FPToFPIntrinsic(codegen_, invoke, GetAssembler(), 0);
753}
754
Mark Mendellfb8d2792015-03-31 22:16:59 -0400755void IntrinsicLocationsBuilderX86::VisitMathRoundFloat(HInvoke* invoke) {
756 // Do we have instruction support?
757 if (codegen_->GetInstructionSetFeatures().HasSSE4_1()) {
Aart Bik2c9f4952016-08-01 16:52:27 -0700758 HInvokeStaticOrDirect* static_or_direct = invoke->AsInvokeStaticOrDirect();
759 DCHECK(static_or_direct != nullptr);
Mark Mendellfb8d2792015-03-31 22:16:59 -0400760 LocationSummary* locations = new (arena_) LocationSummary(invoke,
761 LocationSummary::kNoCall,
762 kIntrinsified);
763 locations->SetInAt(0, Location::RequiresFpuRegister());
Aart Bik2c9f4952016-08-01 16:52:27 -0700764 if (static_or_direct->HasSpecialInput() &&
765 invoke->InputAt(
766 static_or_direct->GetSpecialInputIndex())->IsX86ComputeBaseMethodAddress()) {
767 locations->SetInAt(1, Location::RequiresRegister());
768 }
Nicolas Geoffrayd9b92402015-04-21 10:02:22 +0100769 locations->SetOut(Location::RequiresRegister());
Mark Mendellfb8d2792015-03-31 22:16:59 -0400770 locations->AddTemp(Location::RequiresFpuRegister());
771 locations->AddTemp(Location::RequiresFpuRegister());
772 return;
773 }
774
775 // We have to fall back to a call to the intrinsic.
776 LocationSummary* locations = new (arena_) LocationSummary(invoke,
Aart Bik2c9f4952016-08-01 16:52:27 -0700777 LocationSummary::kCallOnMainOnly);
Mark Mendellfb8d2792015-03-31 22:16:59 -0400778 InvokeRuntimeCallingConvention calling_convention;
779 locations->SetInAt(0, Location::RegisterLocation(calling_convention.GetFpuRegisterAt(0)));
780 locations->SetOut(Location::RegisterLocation(EAX));
781 // Needs to be EAX for the invoke.
782 locations->AddTemp(Location::RegisterLocation(EAX));
783}
784
785void IntrinsicCodeGeneratorX86::VisitMathRoundFloat(HInvoke* invoke) {
786 LocationSummary* locations = invoke->GetLocations();
Aart Bik2c9f4952016-08-01 16:52:27 -0700787 if (locations->WillCall()) { // TODO: can we reach this?
Mark Mendellfb8d2792015-03-31 22:16:59 -0400788 InvokeOutOfLineIntrinsic(codegen_, invoke);
789 return;
790 }
791
Mark Mendellfb8d2792015-03-31 22:16:59 -0400792 XmmRegister in = locations->InAt(0).AsFpuRegister<XmmRegister>();
Aart Bik2c9f4952016-08-01 16:52:27 -0700793 Register constant_area = locations->InAt(1).AsRegister<Register>();
794 XmmRegister t1 = locations->GetTemp(0).AsFpuRegister<XmmRegister>();
795 XmmRegister t2 = locations->GetTemp(1).AsFpuRegister<XmmRegister>();
Mark Mendellfb8d2792015-03-31 22:16:59 -0400796 Register out = locations->Out().AsRegister<Register>();
Aart Bik2c9f4952016-08-01 16:52:27 -0700797 NearLabel skip_incr, done;
Mark Mendellfb8d2792015-03-31 22:16:59 -0400798 X86Assembler* assembler = GetAssembler();
799
Aart Bik2c9f4952016-08-01 16:52:27 -0700800 // Since no direct x86 rounding instruction matches the required semantics,
801 // this intrinsic is implemented as follows:
802 // result = floor(in);
803 // if (in - result >= 0.5f)
804 // result = result + 1.0f;
805 __ movss(t2, in);
806 __ roundss(t1, in, Immediate(1));
807 __ subss(t2, t1);
808 __ comiss(t2, codegen_->LiteralInt32Address(bit_cast<int32_t, float>(0.5f), constant_area));
809 __ j(kBelow, &skip_incr);
810 __ addss(t1, codegen_->LiteralInt32Address(bit_cast<int32_t, float>(1.0f), constant_area));
811 __ Bind(&skip_incr);
Mark Mendellfb8d2792015-03-31 22:16:59 -0400812
Aart Bik2c9f4952016-08-01 16:52:27 -0700813 // Final conversion to an integer. Unfortunately this also does not have a
814 // direct x86 instruction, since NaN should map to 0 and large positive
815 // values need to be clipped to the extreme value.
Mark Mendellfb8d2792015-03-31 22:16:59 -0400816 __ movl(out, Immediate(kPrimIntMax));
Aart Bik2c9f4952016-08-01 16:52:27 -0700817 __ cvtsi2ss(t2, out);
818 __ comiss(t1, t2);
819 __ j(kAboveEqual, &done); // clipped to max (already in out), does not jump on unordered
820 __ movl(out, Immediate(0)); // does not change flags
821 __ j(kUnordered, &done); // NaN mapped to 0 (just moved in out)
822 __ cvttss2si(out, t1);
Mark Mendellfb8d2792015-03-31 22:16:59 -0400823 __ Bind(&done);
824}
825
Mark Mendella4f12202015-08-06 15:23:34 -0400826static void CreateFPToFPCallLocations(ArenaAllocator* arena,
827 HInvoke* invoke) {
828 LocationSummary* locations = new (arena) LocationSummary(invoke,
Serban Constantinescu54ff4822016-07-07 18:03:19 +0100829 LocationSummary::kCallOnMainOnly,
Mark Mendella4f12202015-08-06 15:23:34 -0400830 kIntrinsified);
831 InvokeRuntimeCallingConvention calling_convention;
832 locations->SetInAt(0, Location::FpuRegisterLocation(calling_convention.GetFpuRegisterAt(0)));
833 locations->SetOut(Location::FpuRegisterLocation(XMM0));
834}
835
836static void GenFPToFPCall(HInvoke* invoke, CodeGeneratorX86* codegen, QuickEntrypointEnum entry) {
837 LocationSummary* locations = invoke->GetLocations();
838 DCHECK(locations->WillCall());
839 DCHECK(invoke->IsInvokeStaticOrDirect());
840 X86Assembler* assembler = codegen->GetAssembler();
841
842 // We need some place to pass the parameters.
843 __ subl(ESP, Immediate(16));
844 __ cfi().AdjustCFAOffset(16);
845
846 // Pass the parameters at the bottom of the stack.
847 __ movsd(Address(ESP, 0), XMM0);
848
849 // If we have a second parameter, pass it next.
850 if (invoke->GetNumberOfArguments() == 2) {
851 __ movsd(Address(ESP, 8), XMM1);
852 }
853
854 // Now do the actual call.
Andreas Gampe542451c2016-07-26 09:02:02 -0700855 __ fs()->call(Address::Absolute(GetThreadOffset<kX86PointerSize>(entry)));
Mark Mendella4f12202015-08-06 15:23:34 -0400856
857 // Extract the return value from the FP stack.
858 __ fstpl(Address(ESP, 0));
859 __ movsd(XMM0, Address(ESP, 0));
860
861 // And clean up the stack.
862 __ addl(ESP, Immediate(16));
863 __ cfi().AdjustCFAOffset(-16);
864
865 codegen->RecordPcInfo(invoke, invoke->GetDexPc());
866}
867
868void IntrinsicLocationsBuilderX86::VisitMathCos(HInvoke* invoke) {
869 CreateFPToFPCallLocations(arena_, invoke);
870}
871
872void IntrinsicCodeGeneratorX86::VisitMathCos(HInvoke* invoke) {
873 GenFPToFPCall(invoke, codegen_, kQuickCos);
874}
875
876void IntrinsicLocationsBuilderX86::VisitMathSin(HInvoke* invoke) {
877 CreateFPToFPCallLocations(arena_, invoke);
878}
879
880void IntrinsicCodeGeneratorX86::VisitMathSin(HInvoke* invoke) {
881 GenFPToFPCall(invoke, codegen_, kQuickSin);
882}
883
884void IntrinsicLocationsBuilderX86::VisitMathAcos(HInvoke* invoke) {
885 CreateFPToFPCallLocations(arena_, invoke);
886}
887
888void IntrinsicCodeGeneratorX86::VisitMathAcos(HInvoke* invoke) {
889 GenFPToFPCall(invoke, codegen_, kQuickAcos);
890}
891
892void IntrinsicLocationsBuilderX86::VisitMathAsin(HInvoke* invoke) {
893 CreateFPToFPCallLocations(arena_, invoke);
894}
895
896void IntrinsicCodeGeneratorX86::VisitMathAsin(HInvoke* invoke) {
897 GenFPToFPCall(invoke, codegen_, kQuickAsin);
898}
899
900void IntrinsicLocationsBuilderX86::VisitMathAtan(HInvoke* invoke) {
901 CreateFPToFPCallLocations(arena_, invoke);
902}
903
904void IntrinsicCodeGeneratorX86::VisitMathAtan(HInvoke* invoke) {
905 GenFPToFPCall(invoke, codegen_, kQuickAtan);
906}
907
908void IntrinsicLocationsBuilderX86::VisitMathCbrt(HInvoke* invoke) {
909 CreateFPToFPCallLocations(arena_, invoke);
910}
911
912void IntrinsicCodeGeneratorX86::VisitMathCbrt(HInvoke* invoke) {
913 GenFPToFPCall(invoke, codegen_, kQuickCbrt);
914}
915
916void IntrinsicLocationsBuilderX86::VisitMathCosh(HInvoke* invoke) {
917 CreateFPToFPCallLocations(arena_, invoke);
918}
919
920void IntrinsicCodeGeneratorX86::VisitMathCosh(HInvoke* invoke) {
921 GenFPToFPCall(invoke, codegen_, kQuickCosh);
922}
923
924void IntrinsicLocationsBuilderX86::VisitMathExp(HInvoke* invoke) {
925 CreateFPToFPCallLocations(arena_, invoke);
926}
927
928void IntrinsicCodeGeneratorX86::VisitMathExp(HInvoke* invoke) {
929 GenFPToFPCall(invoke, codegen_, kQuickExp);
930}
931
932void IntrinsicLocationsBuilderX86::VisitMathExpm1(HInvoke* invoke) {
933 CreateFPToFPCallLocations(arena_, invoke);
934}
935
936void IntrinsicCodeGeneratorX86::VisitMathExpm1(HInvoke* invoke) {
937 GenFPToFPCall(invoke, codegen_, kQuickExpm1);
938}
939
940void IntrinsicLocationsBuilderX86::VisitMathLog(HInvoke* invoke) {
941 CreateFPToFPCallLocations(arena_, invoke);
942}
943
944void IntrinsicCodeGeneratorX86::VisitMathLog(HInvoke* invoke) {
945 GenFPToFPCall(invoke, codegen_, kQuickLog);
946}
947
948void IntrinsicLocationsBuilderX86::VisitMathLog10(HInvoke* invoke) {
949 CreateFPToFPCallLocations(arena_, invoke);
950}
951
952void IntrinsicCodeGeneratorX86::VisitMathLog10(HInvoke* invoke) {
953 GenFPToFPCall(invoke, codegen_, kQuickLog10);
954}
955
956void IntrinsicLocationsBuilderX86::VisitMathSinh(HInvoke* invoke) {
957 CreateFPToFPCallLocations(arena_, invoke);
958}
959
960void IntrinsicCodeGeneratorX86::VisitMathSinh(HInvoke* invoke) {
961 GenFPToFPCall(invoke, codegen_, kQuickSinh);
962}
963
964void IntrinsicLocationsBuilderX86::VisitMathTan(HInvoke* invoke) {
965 CreateFPToFPCallLocations(arena_, invoke);
966}
967
968void IntrinsicCodeGeneratorX86::VisitMathTan(HInvoke* invoke) {
969 GenFPToFPCall(invoke, codegen_, kQuickTan);
970}
971
972void IntrinsicLocationsBuilderX86::VisitMathTanh(HInvoke* invoke) {
973 CreateFPToFPCallLocations(arena_, invoke);
974}
975
976void IntrinsicCodeGeneratorX86::VisitMathTanh(HInvoke* invoke) {
977 GenFPToFPCall(invoke, codegen_, kQuickTanh);
978}
979
980static void CreateFPFPToFPCallLocations(ArenaAllocator* arena,
981 HInvoke* invoke) {
982 LocationSummary* locations = new (arena) LocationSummary(invoke,
Serban Constantinescu54ff4822016-07-07 18:03:19 +0100983 LocationSummary::kCallOnMainOnly,
Mark Mendella4f12202015-08-06 15:23:34 -0400984 kIntrinsified);
985 InvokeRuntimeCallingConvention calling_convention;
986 locations->SetInAt(0, Location::FpuRegisterLocation(calling_convention.GetFpuRegisterAt(0)));
987 locations->SetInAt(1, Location::FpuRegisterLocation(calling_convention.GetFpuRegisterAt(1)));
988 locations->SetOut(Location::FpuRegisterLocation(XMM0));
989}
990
991void IntrinsicLocationsBuilderX86::VisitMathAtan2(HInvoke* invoke) {
992 CreateFPFPToFPCallLocations(arena_, invoke);
993}
994
995void IntrinsicCodeGeneratorX86::VisitMathAtan2(HInvoke* invoke) {
996 GenFPToFPCall(invoke, codegen_, kQuickAtan2);
997}
998
999void IntrinsicLocationsBuilderX86::VisitMathHypot(HInvoke* invoke) {
1000 CreateFPFPToFPCallLocations(arena_, invoke);
1001}
1002
1003void IntrinsicCodeGeneratorX86::VisitMathHypot(HInvoke* invoke) {
1004 GenFPToFPCall(invoke, codegen_, kQuickHypot);
1005}
1006
1007void IntrinsicLocationsBuilderX86::VisitMathNextAfter(HInvoke* invoke) {
1008 CreateFPFPToFPCallLocations(arena_, invoke);
1009}
1010
1011void IntrinsicCodeGeneratorX86::VisitMathNextAfter(HInvoke* invoke) {
1012 GenFPToFPCall(invoke, codegen_, kQuickNextAfter);
1013}
1014
Mark Mendell6bc53a92015-07-01 14:26:52 -04001015void IntrinsicLocationsBuilderX86::VisitSystemArrayCopyChar(HInvoke* invoke) {
1016 // We need at least two of the positions or length to be an integer constant,
1017 // or else we won't have enough free registers.
1018 HIntConstant* src_pos = invoke->InputAt(1)->AsIntConstant();
1019 HIntConstant* dest_pos = invoke->InputAt(3)->AsIntConstant();
1020 HIntConstant* length = invoke->InputAt(4)->AsIntConstant();
1021
1022 int num_constants =
1023 ((src_pos != nullptr) ? 1 : 0)
1024 + ((dest_pos != nullptr) ? 1 : 0)
1025 + ((length != nullptr) ? 1 : 0);
1026
1027 if (num_constants < 2) {
1028 // Not enough free registers.
1029 return;
1030 }
1031
1032 // As long as we are checking, we might as well check to see if the src and dest
1033 // positions are >= 0.
1034 if ((src_pos != nullptr && src_pos->GetValue() < 0) ||
1035 (dest_pos != nullptr && dest_pos->GetValue() < 0)) {
1036 // We will have to fail anyways.
1037 return;
1038 }
1039
1040 // And since we are already checking, check the length too.
1041 if (length != nullptr) {
1042 int32_t len = length->GetValue();
1043 if (len < 0) {
1044 // Just call as normal.
1045 return;
1046 }
1047 }
1048
1049 // Okay, it is safe to generate inline code.
1050 LocationSummary* locations =
1051 new (arena_) LocationSummary(invoke, LocationSummary::kCallOnSlowPath, kIntrinsified);
1052 // arraycopy(Object src, int srcPos, Object dest, int destPos, int length).
1053 locations->SetInAt(0, Location::RequiresRegister());
1054 locations->SetInAt(1, Location::RegisterOrConstant(invoke->InputAt(1)));
1055 locations->SetInAt(2, Location::RequiresRegister());
1056 locations->SetInAt(3, Location::RegisterOrConstant(invoke->InputAt(3)));
1057 locations->SetInAt(4, Location::RegisterOrConstant(invoke->InputAt(4)));
1058
1059 // And we need some temporaries. We will use REP MOVSW, so we need fixed registers.
1060 locations->AddTemp(Location::RegisterLocation(ESI));
1061 locations->AddTemp(Location::RegisterLocation(EDI));
1062 locations->AddTemp(Location::RegisterLocation(ECX));
1063}
1064
1065static void CheckPosition(X86Assembler* assembler,
1066 Location pos,
1067 Register input,
Nicolas Geoffrayfea1abd2016-07-06 12:09:12 +01001068 Location length,
Andreas Gampe85b62f22015-09-09 13:15:38 -07001069 SlowPathCode* slow_path,
Nicolas Geoffrayfea1abd2016-07-06 12:09:12 +01001070 Register temp,
1071 bool length_is_input_length = false) {
1072 // Where is the length in the Array?
Mark Mendell6bc53a92015-07-01 14:26:52 -04001073 const uint32_t length_offset = mirror::Array::LengthOffset().Uint32Value();
1074
1075 if (pos.IsConstant()) {
1076 int32_t pos_const = pos.GetConstant()->AsIntConstant()->GetValue();
1077 if (pos_const == 0) {
Nicolas Geoffrayfea1abd2016-07-06 12:09:12 +01001078 if (!length_is_input_length) {
1079 // Check that length(input) >= length.
1080 if (length.IsConstant()) {
1081 __ cmpl(Address(input, length_offset),
1082 Immediate(length.GetConstant()->AsIntConstant()->GetValue()));
1083 } else {
1084 __ cmpl(Address(input, length_offset), length.AsRegister<Register>());
1085 }
1086 __ j(kLess, slow_path->GetEntryLabel());
1087 }
Mark Mendell6bc53a92015-07-01 14:26:52 -04001088 } else {
1089 // Check that length(input) >= pos.
Nicolas Geoffrayfea1abd2016-07-06 12:09:12 +01001090 __ movl(temp, Address(input, length_offset));
1091 __ subl(temp, Immediate(pos_const));
Mark Mendell6bc53a92015-07-01 14:26:52 -04001092 __ j(kLess, slow_path->GetEntryLabel());
1093
1094 // Check that (length(input) - pos) >= length.
Nicolas Geoffrayfea1abd2016-07-06 12:09:12 +01001095 if (length.IsConstant()) {
1096 __ cmpl(temp, Immediate(length.GetConstant()->AsIntConstant()->GetValue()));
1097 } else {
1098 __ cmpl(temp, length.AsRegister<Register>());
1099 }
Mark Mendell6bc53a92015-07-01 14:26:52 -04001100 __ j(kLess, slow_path->GetEntryLabel());
1101 }
Nicolas Geoffrayfea1abd2016-07-06 12:09:12 +01001102 } else if (length_is_input_length) {
1103 // The only way the copy can succeed is if pos is zero.
1104 Register pos_reg = pos.AsRegister<Register>();
1105 __ testl(pos_reg, pos_reg);
1106 __ j(kNotEqual, slow_path->GetEntryLabel());
Mark Mendell6bc53a92015-07-01 14:26:52 -04001107 } else {
1108 // Check that pos >= 0.
1109 Register pos_reg = pos.AsRegister<Register>();
1110 __ testl(pos_reg, pos_reg);
1111 __ j(kLess, slow_path->GetEntryLabel());
1112
1113 // Check that pos <= length(input).
1114 __ cmpl(Address(input, length_offset), pos_reg);
1115 __ j(kLess, slow_path->GetEntryLabel());
1116
1117 // Check that (length(input) - pos) >= length.
1118 __ movl(temp, Address(input, length_offset));
1119 __ subl(temp, pos_reg);
Nicolas Geoffrayfea1abd2016-07-06 12:09:12 +01001120 if (length.IsConstant()) {
1121 __ cmpl(temp, Immediate(length.GetConstant()->AsIntConstant()->GetValue()));
1122 } else {
1123 __ cmpl(temp, length.AsRegister<Register>());
1124 }
Mark Mendell6bc53a92015-07-01 14:26:52 -04001125 __ j(kLess, slow_path->GetEntryLabel());
1126 }
1127}
1128
1129void IntrinsicCodeGeneratorX86::VisitSystemArrayCopyChar(HInvoke* invoke) {
1130 X86Assembler* assembler = GetAssembler();
1131 LocationSummary* locations = invoke->GetLocations();
1132
1133 Register src = locations->InAt(0).AsRegister<Register>();
1134 Location srcPos = locations->InAt(1);
1135 Register dest = locations->InAt(2).AsRegister<Register>();
1136 Location destPos = locations->InAt(3);
1137 Location length = locations->InAt(4);
1138
1139 // Temporaries that we need for MOVSW.
1140 Register src_base = locations->GetTemp(0).AsRegister<Register>();
1141 DCHECK_EQ(src_base, ESI);
1142 Register dest_base = locations->GetTemp(1).AsRegister<Register>();
1143 DCHECK_EQ(dest_base, EDI);
1144 Register count = locations->GetTemp(2).AsRegister<Register>();
1145 DCHECK_EQ(count, ECX);
1146
Andreas Gampe85b62f22015-09-09 13:15:38 -07001147 SlowPathCode* slow_path = new (GetAllocator()) IntrinsicSlowPathX86(invoke);
Mark Mendell6bc53a92015-07-01 14:26:52 -04001148 codegen_->AddSlowPath(slow_path);
1149
1150 // Bail out if the source and destination are the same (to handle overlap).
1151 __ cmpl(src, dest);
1152 __ j(kEqual, slow_path->GetEntryLabel());
1153
1154 // Bail out if the source is null.
1155 __ testl(src, src);
1156 __ j(kEqual, slow_path->GetEntryLabel());
1157
1158 // Bail out if the destination is null.
1159 __ testl(dest, dest);
1160 __ j(kEqual, slow_path->GetEntryLabel());
1161
1162 // If the length is negative, bail out.
1163 // We have already checked in the LocationsBuilder for the constant case.
1164 if (!length.IsConstant()) {
1165 __ cmpl(length.AsRegister<Register>(), length.AsRegister<Register>());
1166 __ j(kLess, slow_path->GetEntryLabel());
1167 }
1168
1169 // We need the count in ECX.
1170 if (length.IsConstant()) {
1171 __ movl(count, Immediate(length.GetConstant()->AsIntConstant()->GetValue()));
1172 } else {
1173 __ movl(count, length.AsRegister<Register>());
1174 }
1175
Nicolas Geoffrayfea1abd2016-07-06 12:09:12 +01001176 // Validity checks: source. Use src_base as a temporary register.
1177 CheckPosition(assembler, srcPos, src, Location::RegisterLocation(count), slow_path, src_base);
Mark Mendell6bc53a92015-07-01 14:26:52 -04001178
Nicolas Geoffrayfea1abd2016-07-06 12:09:12 +01001179 // Validity checks: dest. Use src_base as a temporary register.
1180 CheckPosition(assembler, destPos, dest, Location::RegisterLocation(count), slow_path, src_base);
Mark Mendell6bc53a92015-07-01 14:26:52 -04001181
1182 // Okay, everything checks out. Finally time to do the copy.
1183 // Check assumption that sizeof(Char) is 2 (used in scaling below).
1184 const size_t char_size = Primitive::ComponentSize(Primitive::kPrimChar);
1185 DCHECK_EQ(char_size, 2u);
1186
1187 const uint32_t data_offset = mirror::Array::DataOffset(char_size).Uint32Value();
1188
1189 if (srcPos.IsConstant()) {
1190 int32_t srcPos_const = srcPos.GetConstant()->AsIntConstant()->GetValue();
1191 __ leal(src_base, Address(src, char_size * srcPos_const + data_offset));
1192 } else {
1193 __ leal(src_base, Address(src, srcPos.AsRegister<Register>(),
1194 ScaleFactor::TIMES_2, data_offset));
1195 }
1196 if (destPos.IsConstant()) {
1197 int32_t destPos_const = destPos.GetConstant()->AsIntConstant()->GetValue();
1198
1199 __ leal(dest_base, Address(dest, char_size * destPos_const + data_offset));
1200 } else {
1201 __ leal(dest_base, Address(dest, destPos.AsRegister<Register>(),
1202 ScaleFactor::TIMES_2, data_offset));
1203 }
1204
1205 // Do the move.
1206 __ rep_movsw();
1207
1208 __ Bind(slow_path->GetExitLabel());
1209}
1210
Nicolas Geoffrayd75948a2015-03-27 09:53:16 +00001211void IntrinsicLocationsBuilderX86::VisitStringCompareTo(HInvoke* invoke) {
1212 // The inputs plus one temp.
1213 LocationSummary* locations = new (arena_) LocationSummary(invoke,
Serban Constantinescu54ff4822016-07-07 18:03:19 +01001214 LocationSummary::kCallOnMainOnly,
Nicolas Geoffrayd75948a2015-03-27 09:53:16 +00001215 kIntrinsified);
1216 InvokeRuntimeCallingConvention calling_convention;
1217 locations->SetInAt(0, Location::RegisterLocation(calling_convention.GetRegisterAt(0)));
1218 locations->SetInAt(1, Location::RegisterLocation(calling_convention.GetRegisterAt(1)));
1219 locations->SetOut(Location::RegisterLocation(EAX));
Nicolas Geoffrayd75948a2015-03-27 09:53:16 +00001220}
1221
1222void IntrinsicCodeGeneratorX86::VisitStringCompareTo(HInvoke* invoke) {
1223 X86Assembler* assembler = GetAssembler();
1224 LocationSummary* locations = invoke->GetLocations();
1225
Nicolas Geoffray512e04d2015-03-27 17:21:24 +00001226 // Note that the null check must have been done earlier.
Calin Juravle641547a2015-04-21 22:08:51 +01001227 DCHECK(!invoke->CanDoImplicitNullCheckOn(invoke->InputAt(0)));
Nicolas Geoffrayd75948a2015-03-27 09:53:16 +00001228
1229 Register argument = locations->InAt(1).AsRegister<Register>();
1230 __ testl(argument, argument);
Andreas Gampe85b62f22015-09-09 13:15:38 -07001231 SlowPathCode* slow_path = new (GetAllocator()) IntrinsicSlowPathX86(invoke);
Nicolas Geoffrayd75948a2015-03-27 09:53:16 +00001232 codegen_->AddSlowPath(slow_path);
1233 __ j(kEqual, slow_path->GetEntryLabel());
1234
Andreas Gampe542451c2016-07-26 09:02:02 -07001235 __ fs()->call(Address::Absolute(QUICK_ENTRYPOINT_OFFSET(kX86PointerSize, pStringCompareTo)));
Nicolas Geoffrayd75948a2015-03-27 09:53:16 +00001236 __ Bind(slow_path->GetExitLabel());
1237}
1238
Agi Csakid7138c82015-08-13 17:46:44 -07001239void IntrinsicLocationsBuilderX86::VisitStringEquals(HInvoke* invoke) {
1240 LocationSummary* locations = new (arena_) LocationSummary(invoke,
1241 LocationSummary::kNoCall,
1242 kIntrinsified);
1243 locations->SetInAt(0, Location::RequiresRegister());
1244 locations->SetInAt(1, Location::RequiresRegister());
1245
1246 // Request temporary registers, ECX and EDI needed for repe_cmpsl instruction.
1247 locations->AddTemp(Location::RegisterLocation(ECX));
1248 locations->AddTemp(Location::RegisterLocation(EDI));
1249
1250 // Set output, ESI needed for repe_cmpsl instruction anyways.
1251 locations->SetOut(Location::RegisterLocation(ESI), Location::kOutputOverlap);
1252}
1253
1254void IntrinsicCodeGeneratorX86::VisitStringEquals(HInvoke* invoke) {
1255 X86Assembler* assembler = GetAssembler();
1256 LocationSummary* locations = invoke->GetLocations();
1257
1258 Register str = locations->InAt(0).AsRegister<Register>();
1259 Register arg = locations->InAt(1).AsRegister<Register>();
1260 Register ecx = locations->GetTemp(0).AsRegister<Register>();
1261 Register edi = locations->GetTemp(1).AsRegister<Register>();
1262 Register esi = locations->Out().AsRegister<Register>();
1263
Mark Mendell0c9497d2015-08-21 09:30:05 -04001264 NearLabel end, return_true, return_false;
Agi Csakid7138c82015-08-13 17:46:44 -07001265
1266 // Get offsets of count, value, and class fields within a string object.
1267 const uint32_t count_offset = mirror::String::CountOffset().Uint32Value();
1268 const uint32_t value_offset = mirror::String::ValueOffset().Uint32Value();
1269 const uint32_t class_offset = mirror::Object::ClassOffset().Uint32Value();
1270
1271 // Note that the null check must have been done earlier.
1272 DCHECK(!invoke->CanDoImplicitNullCheckOn(invoke->InputAt(0)));
1273
Nicolas Geoffraya83a54d2015-10-02 17:30:26 +01001274 StringEqualsOptimizations optimizations(invoke);
1275 if (!optimizations.GetArgumentNotNull()) {
1276 // Check if input is null, return false if it is.
1277 __ testl(arg, arg);
1278 __ j(kEqual, &return_false);
1279 }
Agi Csakid7138c82015-08-13 17:46:44 -07001280
Nicolas Geoffraya83a54d2015-10-02 17:30:26 +01001281 if (!optimizations.GetArgumentIsString()) {
Vladimir Marko53b52002016-05-24 19:30:45 +01001282 // Instanceof check for the argument by comparing class fields.
1283 // All string objects must have the same type since String cannot be subclassed.
1284 // Receiver must be a string object, so its class field is equal to all strings' class fields.
1285 // If the argument is a string object, its class field must be equal to receiver's class field.
Nicolas Geoffraya83a54d2015-10-02 17:30:26 +01001286 __ movl(ecx, Address(str, class_offset));
1287 __ cmpl(ecx, Address(arg, class_offset));
1288 __ j(kNotEqual, &return_false);
1289 }
Agi Csakid7138c82015-08-13 17:46:44 -07001290
1291 // Reference equality check, return true if same reference.
1292 __ cmpl(str, arg);
1293 __ j(kEqual, &return_true);
1294
1295 // Load length of receiver string.
1296 __ movl(ecx, Address(str, count_offset));
1297 // Check if lengths are equal, return false if they're not.
1298 __ cmpl(ecx, Address(arg, count_offset));
1299 __ j(kNotEqual, &return_false);
1300 // Return true if both strings are empty.
Mark Mendell0c9497d2015-08-21 09:30:05 -04001301 __ jecxz(&return_true);
Agi Csakid7138c82015-08-13 17:46:44 -07001302
1303 // Load starting addresses of string values into ESI/EDI as required for repe_cmpsl instruction.
1304 __ leal(esi, Address(str, value_offset));
1305 __ leal(edi, Address(arg, value_offset));
1306
1307 // Divide string length by 2 to compare characters 2 at a time and adjust for odd lengths.
1308 __ addl(ecx, Immediate(1));
1309 __ shrl(ecx, Immediate(1));
1310
1311 // Assertions that must hold in order to compare strings 2 characters at a time.
1312 DCHECK_ALIGNED(value_offset, 4);
1313 static_assert(IsAligned<4>(kObjectAlignment), "String of odd length is not zero padded");
1314
1315 // Loop to compare strings two characters at a time starting at the beginning of the string.
1316 __ repe_cmpsl();
1317 // If strings are not equal, zero flag will be cleared.
1318 __ j(kNotEqual, &return_false);
1319
1320 // Return true and exit the function.
1321 // If loop does not result in returning false, we return true.
1322 __ Bind(&return_true);
1323 __ movl(esi, Immediate(1));
1324 __ jmp(&end);
1325
1326 // Return false and exit the function.
1327 __ Bind(&return_false);
1328 __ xorl(esi, esi);
1329 __ Bind(&end);
1330}
1331
Andreas Gampe21030dd2015-05-07 14:46:15 -07001332static void CreateStringIndexOfLocations(HInvoke* invoke,
1333 ArenaAllocator* allocator,
1334 bool start_at_zero) {
1335 LocationSummary* locations = new (allocator) LocationSummary(invoke,
1336 LocationSummary::kCallOnSlowPath,
1337 kIntrinsified);
1338 // The data needs to be in EDI for scasw. So request that the string is there, anyways.
1339 locations->SetInAt(0, Location::RegisterLocation(EDI));
1340 // If we look for a constant char, we'll still have to copy it into EAX. So just request the
1341 // allocator to do that, anyways. We can still do the constant check by checking the parameter
1342 // of the instruction explicitly.
1343 // Note: This works as we don't clobber EAX anywhere.
1344 locations->SetInAt(1, Location::RegisterLocation(EAX));
1345 if (!start_at_zero) {
1346 locations->SetInAt(2, Location::RequiresRegister()); // The starting index.
1347 }
1348 // As we clobber EDI during execution anyways, also use it as the output.
1349 locations->SetOut(Location::SameAsFirstInput());
1350
1351 // repne scasw uses ECX as the counter.
1352 locations->AddTemp(Location::RegisterLocation(ECX));
1353 // Need another temporary to be able to compute the result.
1354 locations->AddTemp(Location::RequiresRegister());
1355}
1356
1357static void GenerateStringIndexOf(HInvoke* invoke,
1358 X86Assembler* assembler,
1359 CodeGeneratorX86* codegen,
1360 ArenaAllocator* allocator,
1361 bool start_at_zero) {
1362 LocationSummary* locations = invoke->GetLocations();
1363
1364 // Note that the null check must have been done earlier.
1365 DCHECK(!invoke->CanDoImplicitNullCheckOn(invoke->InputAt(0)));
1366
1367 Register string_obj = locations->InAt(0).AsRegister<Register>();
1368 Register search_value = locations->InAt(1).AsRegister<Register>();
1369 Register counter = locations->GetTemp(0).AsRegister<Register>();
1370 Register string_length = locations->GetTemp(1).AsRegister<Register>();
1371 Register out = locations->Out().AsRegister<Register>();
1372
1373 // Check our assumptions for registers.
1374 DCHECK_EQ(string_obj, EDI);
1375 DCHECK_EQ(search_value, EAX);
1376 DCHECK_EQ(counter, ECX);
1377 DCHECK_EQ(out, EDI);
1378
1379 // Check for code points > 0xFFFF. Either a slow-path check when we don't know statically,
Vladimir Markofb6c90a2016-05-06 15:52:12 +01001380 // or directly dispatch for a large constant, or omit slow-path for a small constant or a char.
Andreas Gampe85b62f22015-09-09 13:15:38 -07001381 SlowPathCode* slow_path = nullptr;
Vladimir Markofb6c90a2016-05-06 15:52:12 +01001382 HInstruction* code_point = invoke->InputAt(1);
1383 if (code_point->IsIntConstant()) {
Vladimir Markoda051082016-05-17 16:10:20 +01001384 if (static_cast<uint32_t>(code_point->AsIntConstant()->GetValue()) >
Andreas Gampe21030dd2015-05-07 14:46:15 -07001385 std::numeric_limits<uint16_t>::max()) {
1386 // Always needs the slow-path. We could directly dispatch to it, but this case should be
1387 // rare, so for simplicity just put the full slow-path down and branch unconditionally.
1388 slow_path = new (allocator) IntrinsicSlowPathX86(invoke);
1389 codegen->AddSlowPath(slow_path);
1390 __ jmp(slow_path->GetEntryLabel());
1391 __ Bind(slow_path->GetExitLabel());
1392 return;
1393 }
Vladimir Markofb6c90a2016-05-06 15:52:12 +01001394 } else if (code_point->GetType() != Primitive::kPrimChar) {
Andreas Gampe21030dd2015-05-07 14:46:15 -07001395 __ cmpl(search_value, Immediate(std::numeric_limits<uint16_t>::max()));
1396 slow_path = new (allocator) IntrinsicSlowPathX86(invoke);
1397 codegen->AddSlowPath(slow_path);
1398 __ j(kAbove, slow_path->GetEntryLabel());
1399 }
1400
1401 // From here down, we know that we are looking for a char that fits in 16 bits.
1402 // Location of reference to data array within the String object.
1403 int32_t value_offset = mirror::String::ValueOffset().Int32Value();
1404 // Location of count within the String object.
1405 int32_t count_offset = mirror::String::CountOffset().Int32Value();
1406
1407 // Load string length, i.e., the count field of the string.
1408 __ movl(string_length, Address(string_obj, count_offset));
1409
1410 // Do a zero-length check.
1411 // TODO: Support jecxz.
Mark Mendell0c9497d2015-08-21 09:30:05 -04001412 NearLabel not_found_label;
Andreas Gampe21030dd2015-05-07 14:46:15 -07001413 __ testl(string_length, string_length);
1414 __ j(kEqual, &not_found_label);
1415
1416 if (start_at_zero) {
1417 // Number of chars to scan is the same as the string length.
1418 __ movl(counter, string_length);
1419
1420 // Move to the start of the string.
1421 __ addl(string_obj, Immediate(value_offset));
1422 } else {
1423 Register start_index = locations->InAt(2).AsRegister<Register>();
1424
1425 // Do a start_index check.
1426 __ cmpl(start_index, string_length);
1427 __ j(kGreaterEqual, &not_found_label);
1428
1429 // Ensure we have a start index >= 0;
1430 __ xorl(counter, counter);
1431 __ cmpl(start_index, Immediate(0));
1432 __ cmovl(kGreater, counter, start_index);
1433
1434 // Move to the start of the string: string_obj + value_offset + 2 * start_index.
1435 __ leal(string_obj, Address(string_obj, counter, ScaleFactor::TIMES_2, value_offset));
1436
1437 // Now update ecx (the repne scasw work counter). We have string.length - start_index left to
1438 // compare.
1439 __ negl(counter);
1440 __ leal(counter, Address(string_length, counter, ScaleFactor::TIMES_1, 0));
1441 }
1442
1443 // Everything is set up for repne scasw:
1444 // * Comparison address in EDI.
1445 // * Counter in ECX.
1446 __ repne_scasw();
1447
1448 // Did we find a match?
1449 __ j(kNotEqual, &not_found_label);
1450
1451 // Yes, we matched. Compute the index of the result.
1452 __ subl(string_length, counter);
1453 __ leal(out, Address(string_length, -1));
1454
Mark Mendell0c9497d2015-08-21 09:30:05 -04001455 NearLabel done;
Andreas Gampe21030dd2015-05-07 14:46:15 -07001456 __ jmp(&done);
1457
1458 // Failed to match; return -1.
1459 __ Bind(&not_found_label);
1460 __ movl(out, Immediate(-1));
1461
1462 // And join up at the end.
1463 __ Bind(&done);
1464 if (slow_path != nullptr) {
1465 __ Bind(slow_path->GetExitLabel());
1466 }
1467}
1468
1469void IntrinsicLocationsBuilderX86::VisitStringIndexOf(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001470 CreateStringIndexOfLocations(invoke, arena_, /* start_at_zero */ true);
Andreas Gampe21030dd2015-05-07 14:46:15 -07001471}
1472
1473void IntrinsicCodeGeneratorX86::VisitStringIndexOf(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001474 GenerateStringIndexOf(invoke, GetAssembler(), codegen_, GetAllocator(), /* start_at_zero */ true);
Andreas Gampe21030dd2015-05-07 14:46:15 -07001475}
1476
1477void IntrinsicLocationsBuilderX86::VisitStringIndexOfAfter(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001478 CreateStringIndexOfLocations(invoke, arena_, /* start_at_zero */ false);
Andreas Gampe21030dd2015-05-07 14:46:15 -07001479}
1480
1481void IntrinsicCodeGeneratorX86::VisitStringIndexOfAfter(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001482 GenerateStringIndexOf(
1483 invoke, GetAssembler(), codegen_, GetAllocator(), /* start_at_zero */ false);
Andreas Gampe21030dd2015-05-07 14:46:15 -07001484}
1485
Jeff Hao848f70a2014-01-15 13:49:50 -08001486void IntrinsicLocationsBuilderX86::VisitStringNewStringFromBytes(HInvoke* invoke) {
1487 LocationSummary* locations = new (arena_) LocationSummary(invoke,
Serban Constantinescu54ff4822016-07-07 18:03:19 +01001488 LocationSummary::kCallOnMainOnly,
Jeff Hao848f70a2014-01-15 13:49:50 -08001489 kIntrinsified);
1490 InvokeRuntimeCallingConvention calling_convention;
1491 locations->SetInAt(0, Location::RegisterLocation(calling_convention.GetRegisterAt(0)));
1492 locations->SetInAt(1, Location::RegisterLocation(calling_convention.GetRegisterAt(1)));
1493 locations->SetInAt(2, Location::RegisterLocation(calling_convention.GetRegisterAt(2)));
1494 locations->SetInAt(3, Location::RegisterLocation(calling_convention.GetRegisterAt(3)));
1495 locations->SetOut(Location::RegisterLocation(EAX));
Jeff Hao848f70a2014-01-15 13:49:50 -08001496}
1497
1498void IntrinsicCodeGeneratorX86::VisitStringNewStringFromBytes(HInvoke* invoke) {
1499 X86Assembler* assembler = GetAssembler();
1500 LocationSummary* locations = invoke->GetLocations();
1501
1502 Register byte_array = locations->InAt(0).AsRegister<Register>();
1503 __ testl(byte_array, byte_array);
Andreas Gampe85b62f22015-09-09 13:15:38 -07001504 SlowPathCode* slow_path = new (GetAllocator()) IntrinsicSlowPathX86(invoke);
Jeff Hao848f70a2014-01-15 13:49:50 -08001505 codegen_->AddSlowPath(slow_path);
1506 __ j(kEqual, slow_path->GetEntryLabel());
1507
Andreas Gampe542451c2016-07-26 09:02:02 -07001508 __ fs()->call(Address::Absolute(QUICK_ENTRYPOINT_OFFSET(kX86PointerSize, pAllocStringFromBytes)));
Roland Levillainf969a202016-03-09 16:14:00 +00001509 CheckEntrypointTypes<kQuickAllocStringFromBytes, void*, void*, int32_t, int32_t, int32_t>();
Jeff Hao848f70a2014-01-15 13:49:50 -08001510 codegen_->RecordPcInfo(invoke, invoke->GetDexPc());
1511 __ Bind(slow_path->GetExitLabel());
1512}
1513
1514void IntrinsicLocationsBuilderX86::VisitStringNewStringFromChars(HInvoke* invoke) {
1515 LocationSummary* locations = new (arena_) LocationSummary(invoke,
Serban Constantinescu54ff4822016-07-07 18:03:19 +01001516 LocationSummary::kCallOnMainOnly,
Jeff Hao848f70a2014-01-15 13:49:50 -08001517 kIntrinsified);
1518 InvokeRuntimeCallingConvention calling_convention;
1519 locations->SetInAt(0, Location::RegisterLocation(calling_convention.GetRegisterAt(0)));
1520 locations->SetInAt(1, Location::RegisterLocation(calling_convention.GetRegisterAt(1)));
1521 locations->SetInAt(2, Location::RegisterLocation(calling_convention.GetRegisterAt(2)));
1522 locations->SetOut(Location::RegisterLocation(EAX));
1523}
1524
1525void IntrinsicCodeGeneratorX86::VisitStringNewStringFromChars(HInvoke* invoke) {
1526 X86Assembler* assembler = GetAssembler();
1527
Roland Levillaincc3839c2016-02-29 16:23:48 +00001528 // No need to emit code checking whether `locations->InAt(2)` is a null
1529 // pointer, as callers of the native method
1530 //
1531 // java.lang.StringFactory.newStringFromChars(int offset, int charCount, char[] data)
1532 //
1533 // all include a null check on `data` before calling that method.
Andreas Gampe542451c2016-07-26 09:02:02 -07001534 __ fs()->call(Address::Absolute(QUICK_ENTRYPOINT_OFFSET(kX86PointerSize, pAllocStringFromChars)));
Roland Levillainf969a202016-03-09 16:14:00 +00001535 CheckEntrypointTypes<kQuickAllocStringFromChars, void*, int32_t, int32_t, void*>();
Jeff Hao848f70a2014-01-15 13:49:50 -08001536 codegen_->RecordPcInfo(invoke, invoke->GetDexPc());
1537}
1538
1539void IntrinsicLocationsBuilderX86::VisitStringNewStringFromString(HInvoke* invoke) {
1540 LocationSummary* locations = new (arena_) LocationSummary(invoke,
Serban Constantinescu54ff4822016-07-07 18:03:19 +01001541 LocationSummary::kCallOnMainOnly,
Jeff Hao848f70a2014-01-15 13:49:50 -08001542 kIntrinsified);
1543 InvokeRuntimeCallingConvention calling_convention;
1544 locations->SetInAt(0, Location::RegisterLocation(calling_convention.GetRegisterAt(0)));
1545 locations->SetOut(Location::RegisterLocation(EAX));
Jeff Hao848f70a2014-01-15 13:49:50 -08001546}
1547
1548void IntrinsicCodeGeneratorX86::VisitStringNewStringFromString(HInvoke* invoke) {
1549 X86Assembler* assembler = GetAssembler();
1550 LocationSummary* locations = invoke->GetLocations();
1551
1552 Register string_to_copy = locations->InAt(0).AsRegister<Register>();
1553 __ testl(string_to_copy, string_to_copy);
Andreas Gampe85b62f22015-09-09 13:15:38 -07001554 SlowPathCode* slow_path = new (GetAllocator()) IntrinsicSlowPathX86(invoke);
Jeff Hao848f70a2014-01-15 13:49:50 -08001555 codegen_->AddSlowPath(slow_path);
1556 __ j(kEqual, slow_path->GetEntryLabel());
1557
Andreas Gampe542451c2016-07-26 09:02:02 -07001558 __ fs()->call(
1559 Address::Absolute(QUICK_ENTRYPOINT_OFFSET(kX86PointerSize, pAllocStringFromString)));
Roland Levillainf969a202016-03-09 16:14:00 +00001560 CheckEntrypointTypes<kQuickAllocStringFromString, void*, void*>();
Jeff Hao848f70a2014-01-15 13:49:50 -08001561 codegen_->RecordPcInfo(invoke, invoke->GetDexPc());
1562 __ Bind(slow_path->GetExitLabel());
1563}
1564
Mark Mendell8f8926a2015-08-17 11:39:06 -04001565void IntrinsicLocationsBuilderX86::VisitStringGetCharsNoCheck(HInvoke* invoke) {
1566 // public void getChars(int srcBegin, int srcEnd, char[] dst, int dstBegin);
1567 LocationSummary* locations = new (arena_) LocationSummary(invoke,
1568 LocationSummary::kNoCall,
1569 kIntrinsified);
1570 locations->SetInAt(0, Location::RequiresRegister());
1571 locations->SetInAt(1, Location::RegisterOrConstant(invoke->InputAt(1)));
1572 // Place srcEnd in ECX to save a move below.
1573 locations->SetInAt(2, Location::RegisterLocation(ECX));
1574 locations->SetInAt(3, Location::RequiresRegister());
1575 locations->SetInAt(4, Location::RequiresRegister());
1576
1577 // And we need some temporaries. We will use REP MOVSW, so we need fixed registers.
1578 // We don't have enough registers to also grab ECX, so handle below.
1579 locations->AddTemp(Location::RegisterLocation(ESI));
1580 locations->AddTemp(Location::RegisterLocation(EDI));
1581}
1582
1583void IntrinsicCodeGeneratorX86::VisitStringGetCharsNoCheck(HInvoke* invoke) {
1584 X86Assembler* assembler = GetAssembler();
1585 LocationSummary* locations = invoke->GetLocations();
1586
1587 size_t char_component_size = Primitive::ComponentSize(Primitive::kPrimChar);
1588 // Location of data in char array buffer.
1589 const uint32_t data_offset = mirror::Array::DataOffset(char_component_size).Uint32Value();
1590 // Location of char array data in string.
1591 const uint32_t value_offset = mirror::String::ValueOffset().Uint32Value();
1592
1593 // public void getChars(int srcBegin, int srcEnd, char[] dst, int dstBegin);
1594 Register obj = locations->InAt(0).AsRegister<Register>();
1595 Location srcBegin = locations->InAt(1);
1596 int srcBegin_value =
1597 srcBegin.IsConstant() ? srcBegin.GetConstant()->AsIntConstant()->GetValue() : 0;
1598 Register srcEnd = locations->InAt(2).AsRegister<Register>();
1599 Register dst = locations->InAt(3).AsRegister<Register>();
1600 Register dstBegin = locations->InAt(4).AsRegister<Register>();
1601
1602 // Check assumption that sizeof(Char) is 2 (used in scaling below).
1603 const size_t char_size = Primitive::ComponentSize(Primitive::kPrimChar);
1604 DCHECK_EQ(char_size, 2u);
1605
1606 // Compute the address of the destination buffer.
1607 __ leal(EDI, Address(dst, dstBegin, ScaleFactor::TIMES_2, data_offset));
1608
1609 // Compute the address of the source string.
1610 if (srcBegin.IsConstant()) {
1611 // Compute the address of the source string by adding the number of chars from
1612 // the source beginning to the value offset of a string.
1613 __ leal(ESI, Address(obj, srcBegin_value * char_size + value_offset));
1614 } else {
1615 __ leal(ESI, Address(obj, srcBegin.AsRegister<Register>(),
1616 ScaleFactor::TIMES_2, value_offset));
1617 }
1618
1619 // Compute the number of chars (words) to move.
1620 // Now is the time to save ECX, since we don't know if it will be used later.
1621 __ pushl(ECX);
1622 int stack_adjust = kX86WordSize;
1623 __ cfi().AdjustCFAOffset(stack_adjust);
1624 DCHECK_EQ(srcEnd, ECX);
1625 if (srcBegin.IsConstant()) {
1626 if (srcBegin_value != 0) {
1627 __ subl(ECX, Immediate(srcBegin_value));
1628 }
1629 } else {
1630 DCHECK(srcBegin.IsRegister());
1631 __ subl(ECX, srcBegin.AsRegister<Register>());
1632 }
1633
1634 // Do the move.
1635 __ rep_movsw();
1636
1637 // And restore ECX.
1638 __ popl(ECX);
1639 __ cfi().AdjustCFAOffset(-stack_adjust);
1640}
1641
Mark Mendell09ed1a32015-03-25 08:30:06 -04001642static void GenPeek(LocationSummary* locations, Primitive::Type size, X86Assembler* assembler) {
1643 Register address = locations->InAt(0).AsRegisterPairLow<Register>();
1644 Location out_loc = locations->Out();
1645 // x86 allows unaligned access. We do not have to check the input or use specific instructions
1646 // to avoid a SIGBUS.
1647 switch (size) {
1648 case Primitive::kPrimByte:
1649 __ movsxb(out_loc.AsRegister<Register>(), Address(address, 0));
1650 break;
1651 case Primitive::kPrimShort:
1652 __ movsxw(out_loc.AsRegister<Register>(), Address(address, 0));
1653 break;
1654 case Primitive::kPrimInt:
1655 __ movl(out_loc.AsRegister<Register>(), Address(address, 0));
1656 break;
1657 case Primitive::kPrimLong:
1658 __ movl(out_loc.AsRegisterPairLow<Register>(), Address(address, 0));
1659 __ movl(out_loc.AsRegisterPairHigh<Register>(), Address(address, 4));
1660 break;
1661 default:
1662 LOG(FATAL) << "Type not recognized for peek: " << size;
1663 UNREACHABLE();
1664 }
1665}
1666
1667void IntrinsicLocationsBuilderX86::VisitMemoryPeekByte(HInvoke* invoke) {
1668 CreateLongToIntLocations(arena_, invoke);
1669}
1670
1671void IntrinsicCodeGeneratorX86::VisitMemoryPeekByte(HInvoke* invoke) {
1672 GenPeek(invoke->GetLocations(), Primitive::kPrimByte, GetAssembler());
1673}
1674
1675void IntrinsicLocationsBuilderX86::VisitMemoryPeekIntNative(HInvoke* invoke) {
1676 CreateLongToIntLocations(arena_, invoke);
1677}
1678
1679void IntrinsicCodeGeneratorX86::VisitMemoryPeekIntNative(HInvoke* invoke) {
1680 GenPeek(invoke->GetLocations(), Primitive::kPrimInt, GetAssembler());
1681}
1682
1683void IntrinsicLocationsBuilderX86::VisitMemoryPeekLongNative(HInvoke* invoke) {
1684 CreateLongToLongLocations(arena_, invoke);
1685}
1686
1687void IntrinsicCodeGeneratorX86::VisitMemoryPeekLongNative(HInvoke* invoke) {
1688 GenPeek(invoke->GetLocations(), Primitive::kPrimLong, GetAssembler());
1689}
1690
1691void IntrinsicLocationsBuilderX86::VisitMemoryPeekShortNative(HInvoke* invoke) {
1692 CreateLongToIntLocations(arena_, invoke);
1693}
1694
1695void IntrinsicCodeGeneratorX86::VisitMemoryPeekShortNative(HInvoke* invoke) {
1696 GenPeek(invoke->GetLocations(), Primitive::kPrimShort, GetAssembler());
1697}
1698
1699static void CreateLongIntToVoidLocations(ArenaAllocator* arena, Primitive::Type size,
1700 HInvoke* invoke) {
1701 LocationSummary* locations = new (arena) LocationSummary(invoke,
1702 LocationSummary::kNoCall,
1703 kIntrinsified);
1704 locations->SetInAt(0, Location::RequiresRegister());
Roland Levillain4c0eb422015-04-24 16:43:49 +01001705 HInstruction* value = invoke->InputAt(1);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001706 if (size == Primitive::kPrimByte) {
1707 locations->SetInAt(1, Location::ByteRegisterOrConstant(EDX, value));
1708 } else {
1709 locations->SetInAt(1, Location::RegisterOrConstant(value));
1710 }
1711}
1712
1713static void GenPoke(LocationSummary* locations, Primitive::Type size, X86Assembler* assembler) {
1714 Register address = locations->InAt(0).AsRegisterPairLow<Register>();
1715 Location value_loc = locations->InAt(1);
1716 // x86 allows unaligned access. We do not have to check the input or use specific instructions
1717 // to avoid a SIGBUS.
1718 switch (size) {
1719 case Primitive::kPrimByte:
1720 if (value_loc.IsConstant()) {
1721 __ movb(Address(address, 0),
1722 Immediate(value_loc.GetConstant()->AsIntConstant()->GetValue()));
1723 } else {
1724 __ movb(Address(address, 0), value_loc.AsRegister<ByteRegister>());
1725 }
1726 break;
1727 case Primitive::kPrimShort:
1728 if (value_loc.IsConstant()) {
1729 __ movw(Address(address, 0),
1730 Immediate(value_loc.GetConstant()->AsIntConstant()->GetValue()));
1731 } else {
1732 __ movw(Address(address, 0), value_loc.AsRegister<Register>());
1733 }
1734 break;
1735 case Primitive::kPrimInt:
1736 if (value_loc.IsConstant()) {
1737 __ movl(Address(address, 0),
1738 Immediate(value_loc.GetConstant()->AsIntConstant()->GetValue()));
1739 } else {
1740 __ movl(Address(address, 0), value_loc.AsRegister<Register>());
1741 }
1742 break;
1743 case Primitive::kPrimLong:
1744 if (value_loc.IsConstant()) {
1745 int64_t value = value_loc.GetConstant()->AsLongConstant()->GetValue();
1746 __ movl(Address(address, 0), Immediate(Low32Bits(value)));
1747 __ movl(Address(address, 4), Immediate(High32Bits(value)));
1748 } else {
1749 __ movl(Address(address, 0), value_loc.AsRegisterPairLow<Register>());
1750 __ movl(Address(address, 4), value_loc.AsRegisterPairHigh<Register>());
1751 }
1752 break;
1753 default:
1754 LOG(FATAL) << "Type not recognized for poke: " << size;
1755 UNREACHABLE();
1756 }
1757}
1758
1759void IntrinsicLocationsBuilderX86::VisitMemoryPokeByte(HInvoke* invoke) {
1760 CreateLongIntToVoidLocations(arena_, Primitive::kPrimByte, invoke);
1761}
1762
1763void IntrinsicCodeGeneratorX86::VisitMemoryPokeByte(HInvoke* invoke) {
1764 GenPoke(invoke->GetLocations(), Primitive::kPrimByte, GetAssembler());
1765}
1766
1767void IntrinsicLocationsBuilderX86::VisitMemoryPokeIntNative(HInvoke* invoke) {
1768 CreateLongIntToVoidLocations(arena_, Primitive::kPrimInt, invoke);
1769}
1770
1771void IntrinsicCodeGeneratorX86::VisitMemoryPokeIntNative(HInvoke* invoke) {
1772 GenPoke(invoke->GetLocations(), Primitive::kPrimInt, GetAssembler());
1773}
1774
1775void IntrinsicLocationsBuilderX86::VisitMemoryPokeLongNative(HInvoke* invoke) {
1776 CreateLongIntToVoidLocations(arena_, Primitive::kPrimLong, invoke);
1777}
1778
1779void IntrinsicCodeGeneratorX86::VisitMemoryPokeLongNative(HInvoke* invoke) {
1780 GenPoke(invoke->GetLocations(), Primitive::kPrimLong, GetAssembler());
1781}
1782
1783void IntrinsicLocationsBuilderX86::VisitMemoryPokeShortNative(HInvoke* invoke) {
1784 CreateLongIntToVoidLocations(arena_, Primitive::kPrimShort, invoke);
1785}
1786
1787void IntrinsicCodeGeneratorX86::VisitMemoryPokeShortNative(HInvoke* invoke) {
1788 GenPoke(invoke->GetLocations(), Primitive::kPrimShort, GetAssembler());
1789}
1790
1791void IntrinsicLocationsBuilderX86::VisitThreadCurrentThread(HInvoke* invoke) {
1792 LocationSummary* locations = new (arena_) LocationSummary(invoke,
1793 LocationSummary::kNoCall,
1794 kIntrinsified);
1795 locations->SetOut(Location::RequiresRegister());
1796}
1797
1798void IntrinsicCodeGeneratorX86::VisitThreadCurrentThread(HInvoke* invoke) {
1799 Register out = invoke->GetLocations()->Out().AsRegister<Register>();
Andreas Gampe542451c2016-07-26 09:02:02 -07001800 GetAssembler()->fs()->movl(out, Address::Absolute(Thread::PeerOffset<kX86PointerSize>()));
Mark Mendell09ed1a32015-03-25 08:30:06 -04001801}
1802
Roland Levillain0d5a2812015-11-13 10:07:31 +00001803static void GenUnsafeGet(HInvoke* invoke,
1804 Primitive::Type type,
1805 bool is_volatile,
1806 CodeGeneratorX86* codegen) {
1807 X86Assembler* assembler = down_cast<X86Assembler*>(codegen->GetAssembler());
1808 LocationSummary* locations = invoke->GetLocations();
1809 Location base_loc = locations->InAt(1);
1810 Register base = base_loc.AsRegister<Register>();
1811 Location offset_loc = locations->InAt(2);
1812 Register offset = offset_loc.AsRegisterPairLow<Register>();
1813 Location output_loc = locations->Out();
Mark Mendell09ed1a32015-03-25 08:30:06 -04001814
1815 switch (type) {
Roland Levillain7c1559a2015-12-15 10:55:36 +00001816 case Primitive::kPrimInt: {
Roland Levillain0d5a2812015-11-13 10:07:31 +00001817 Register output = output_loc.AsRegister<Register>();
1818 __ movl(output, Address(base, offset, ScaleFactor::TIMES_1, 0));
Roland Levillain7c1559a2015-12-15 10:55:36 +00001819 break;
1820 }
1821
1822 case Primitive::kPrimNot: {
1823 Register output = output_loc.AsRegister<Register>();
1824 if (kEmitCompilerReadBarrier) {
1825 if (kUseBakerReadBarrier) {
1826 Location temp = locations->GetTemp(0);
Sang, Chunlei0fcd2b82016-04-05 17:12:59 +08001827 Address src(base, offset, ScaleFactor::TIMES_1, 0);
1828 codegen->GenerateReferenceLoadWithBakerReadBarrier(
1829 invoke, output_loc, base, src, temp, /* needs_null_check */ false);
Roland Levillain7c1559a2015-12-15 10:55:36 +00001830 } else {
1831 __ movl(output, Address(base, offset, ScaleFactor::TIMES_1, 0));
1832 codegen->GenerateReadBarrierSlow(
1833 invoke, output_loc, output_loc, base_loc, 0U, offset_loc);
1834 }
1835 } else {
1836 __ movl(output, Address(base, offset, ScaleFactor::TIMES_1, 0));
1837 __ MaybeUnpoisonHeapReference(output);
Roland Levillain4d027112015-07-01 15:41:14 +01001838 }
Mark Mendell09ed1a32015-03-25 08:30:06 -04001839 break;
Roland Levillain4d027112015-07-01 15:41:14 +01001840 }
Mark Mendell09ed1a32015-03-25 08:30:06 -04001841
1842 case Primitive::kPrimLong: {
Roland Levillain0d5a2812015-11-13 10:07:31 +00001843 Register output_lo = output_loc.AsRegisterPairLow<Register>();
1844 Register output_hi = output_loc.AsRegisterPairHigh<Register>();
Mark Mendell09ed1a32015-03-25 08:30:06 -04001845 if (is_volatile) {
1846 // Need to use a XMM to read atomically.
1847 XmmRegister temp = locations->GetTemp(0).AsFpuRegister<XmmRegister>();
1848 __ movsd(temp, Address(base, offset, ScaleFactor::TIMES_1, 0));
1849 __ movd(output_lo, temp);
1850 __ psrlq(temp, Immediate(32));
1851 __ movd(output_hi, temp);
1852 } else {
1853 __ movl(output_lo, Address(base, offset, ScaleFactor::TIMES_1, 0));
1854 __ movl(output_hi, Address(base, offset, ScaleFactor::TIMES_1, 4));
1855 }
1856 }
1857 break;
1858
1859 default:
1860 LOG(FATAL) << "Unsupported op size " << type;
1861 UNREACHABLE();
1862 }
1863}
1864
Roland Levillain7c1559a2015-12-15 10:55:36 +00001865static void CreateIntIntIntToIntLocations(ArenaAllocator* arena,
1866 HInvoke* invoke,
1867 Primitive::Type type,
1868 bool is_volatile) {
Roland Levillain0d5a2812015-11-13 10:07:31 +00001869 bool can_call = kEmitCompilerReadBarrier &&
1870 (invoke->GetIntrinsic() == Intrinsics::kUnsafeGetObject ||
1871 invoke->GetIntrinsic() == Intrinsics::kUnsafeGetObjectVolatile);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001872 LocationSummary* locations = new (arena) LocationSummary(invoke,
Roland Levillain0d5a2812015-11-13 10:07:31 +00001873 can_call ?
1874 LocationSummary::kCallOnSlowPath :
1875 LocationSummary::kNoCall,
Mark Mendell09ed1a32015-03-25 08:30:06 -04001876 kIntrinsified);
1877 locations->SetInAt(0, Location::NoLocation()); // Unused receiver.
1878 locations->SetInAt(1, Location::RequiresRegister());
1879 locations->SetInAt(2, Location::RequiresRegister());
Roland Levillain7c1559a2015-12-15 10:55:36 +00001880 if (type == Primitive::kPrimLong) {
Mark Mendell09ed1a32015-03-25 08:30:06 -04001881 if (is_volatile) {
1882 // Need to use XMM to read volatile.
1883 locations->AddTemp(Location::RequiresFpuRegister());
Roland Levillain3d312422016-06-23 13:53:42 +01001884 locations->SetOut(Location::RequiresRegister(), Location::kNoOutputOverlap);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001885 } else {
1886 locations->SetOut(Location::RequiresRegister(), Location::kOutputOverlap);
1887 }
1888 } else {
Roland Levillain3d312422016-06-23 13:53:42 +01001889 locations->SetOut(Location::RequiresRegister(),
1890 can_call ? Location::kOutputOverlap : Location::kNoOutputOverlap);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001891 }
Roland Levillain7c1559a2015-12-15 10:55:36 +00001892 if (type == Primitive::kPrimNot && kEmitCompilerReadBarrier && kUseBakerReadBarrier) {
1893 // We need a temporary register for the read barrier marking slow
Sang, Chunlei0fcd2b82016-04-05 17:12:59 +08001894 // path in InstructionCodeGeneratorX86::GenerateReferenceLoadWithBakerReadBarrier.
Roland Levillain7c1559a2015-12-15 10:55:36 +00001895 locations->AddTemp(Location::RequiresRegister());
1896 }
Mark Mendell09ed1a32015-03-25 08:30:06 -04001897}
1898
1899void IntrinsicLocationsBuilderX86::VisitUnsafeGet(HInvoke* invoke) {
Roland Levillain7c1559a2015-12-15 10:55:36 +00001900 CreateIntIntIntToIntLocations(arena_, invoke, Primitive::kPrimInt, /* is_volatile */ false);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001901}
1902void IntrinsicLocationsBuilderX86::VisitUnsafeGetVolatile(HInvoke* invoke) {
Roland Levillain7c1559a2015-12-15 10:55:36 +00001903 CreateIntIntIntToIntLocations(arena_, invoke, Primitive::kPrimInt, /* is_volatile */ true);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001904}
1905void IntrinsicLocationsBuilderX86::VisitUnsafeGetLong(HInvoke* invoke) {
Roland Levillain7c1559a2015-12-15 10:55:36 +00001906 CreateIntIntIntToIntLocations(arena_, invoke, Primitive::kPrimLong, /* is_volatile */ false);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001907}
1908void IntrinsicLocationsBuilderX86::VisitUnsafeGetLongVolatile(HInvoke* invoke) {
Roland Levillain7c1559a2015-12-15 10:55:36 +00001909 CreateIntIntIntToIntLocations(arena_, invoke, Primitive::kPrimLong, /* is_volatile */ true);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001910}
1911void IntrinsicLocationsBuilderX86::VisitUnsafeGetObject(HInvoke* invoke) {
Roland Levillain7c1559a2015-12-15 10:55:36 +00001912 CreateIntIntIntToIntLocations(arena_, invoke, Primitive::kPrimNot, /* is_volatile */ false);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001913}
1914void IntrinsicLocationsBuilderX86::VisitUnsafeGetObjectVolatile(HInvoke* invoke) {
Roland Levillain7c1559a2015-12-15 10:55:36 +00001915 CreateIntIntIntToIntLocations(arena_, invoke, Primitive::kPrimNot, /* is_volatile */ true);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001916}
1917
1918
1919void IntrinsicCodeGeneratorX86::VisitUnsafeGet(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001920 GenUnsafeGet(invoke, Primitive::kPrimInt, /* is_volatile */ false, codegen_);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001921}
1922void IntrinsicCodeGeneratorX86::VisitUnsafeGetVolatile(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001923 GenUnsafeGet(invoke, Primitive::kPrimInt, /* is_volatile */ true, codegen_);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001924}
1925void IntrinsicCodeGeneratorX86::VisitUnsafeGetLong(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001926 GenUnsafeGet(invoke, Primitive::kPrimLong, /* is_volatile */ false, codegen_);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001927}
1928void IntrinsicCodeGeneratorX86::VisitUnsafeGetLongVolatile(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001929 GenUnsafeGet(invoke, Primitive::kPrimLong, /* is_volatile */ true, codegen_);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001930}
1931void IntrinsicCodeGeneratorX86::VisitUnsafeGetObject(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001932 GenUnsafeGet(invoke, Primitive::kPrimNot, /* is_volatile */ false, codegen_);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001933}
1934void IntrinsicCodeGeneratorX86::VisitUnsafeGetObjectVolatile(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001935 GenUnsafeGet(invoke, Primitive::kPrimNot, /* is_volatile */ true, codegen_);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001936}
1937
1938
1939static void CreateIntIntIntIntToVoidPlusTempsLocations(ArenaAllocator* arena,
1940 Primitive::Type type,
1941 HInvoke* invoke,
1942 bool is_volatile) {
1943 LocationSummary* locations = new (arena) LocationSummary(invoke,
1944 LocationSummary::kNoCall,
1945 kIntrinsified);
1946 locations->SetInAt(0, Location::NoLocation()); // Unused receiver.
1947 locations->SetInAt(1, Location::RequiresRegister());
1948 locations->SetInAt(2, Location::RequiresRegister());
1949 locations->SetInAt(3, Location::RequiresRegister());
1950 if (type == Primitive::kPrimNot) {
1951 // Need temp registers for card-marking.
Roland Levillain4d027112015-07-01 15:41:14 +01001952 locations->AddTemp(Location::RequiresRegister()); // Possibly used for reference poisoning too.
Mark Mendell09ed1a32015-03-25 08:30:06 -04001953 // Ensure the value is in a byte register.
1954 locations->AddTemp(Location::RegisterLocation(ECX));
1955 } else if (type == Primitive::kPrimLong && is_volatile) {
1956 locations->AddTemp(Location::RequiresFpuRegister());
1957 locations->AddTemp(Location::RequiresFpuRegister());
1958 }
1959}
1960
1961void IntrinsicLocationsBuilderX86::VisitUnsafePut(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001962 CreateIntIntIntIntToVoidPlusTempsLocations(
1963 arena_, Primitive::kPrimInt, invoke, /* is_volatile */ false);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001964}
1965void IntrinsicLocationsBuilderX86::VisitUnsafePutOrdered(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001966 CreateIntIntIntIntToVoidPlusTempsLocations(
1967 arena_, Primitive::kPrimInt, invoke, /* is_volatile */ false);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001968}
1969void IntrinsicLocationsBuilderX86::VisitUnsafePutVolatile(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001970 CreateIntIntIntIntToVoidPlusTempsLocations(
1971 arena_, Primitive::kPrimInt, invoke, /* is_volatile */ true);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001972}
1973void IntrinsicLocationsBuilderX86::VisitUnsafePutObject(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001974 CreateIntIntIntIntToVoidPlusTempsLocations(
1975 arena_, Primitive::kPrimNot, invoke, /* is_volatile */ false);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001976}
1977void IntrinsicLocationsBuilderX86::VisitUnsafePutObjectOrdered(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001978 CreateIntIntIntIntToVoidPlusTempsLocations(
1979 arena_, Primitive::kPrimNot, invoke, /* is_volatile */ false);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001980}
1981void IntrinsicLocationsBuilderX86::VisitUnsafePutObjectVolatile(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001982 CreateIntIntIntIntToVoidPlusTempsLocations(
1983 arena_, Primitive::kPrimNot, invoke, /* is_volatile */ true);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001984}
1985void IntrinsicLocationsBuilderX86::VisitUnsafePutLong(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001986 CreateIntIntIntIntToVoidPlusTempsLocations(
1987 arena_, Primitive::kPrimLong, invoke, /* is_volatile */ false);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001988}
1989void IntrinsicLocationsBuilderX86::VisitUnsafePutLongOrdered(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001990 CreateIntIntIntIntToVoidPlusTempsLocations(
1991 arena_, Primitive::kPrimLong, invoke, /* is_volatile */ false);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001992}
1993void IntrinsicLocationsBuilderX86::VisitUnsafePutLongVolatile(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001994 CreateIntIntIntIntToVoidPlusTempsLocations(
1995 arena_, Primitive::kPrimLong, invoke, /* is_volatile */ true);
Mark Mendell09ed1a32015-03-25 08:30:06 -04001996}
1997
1998// We don't care for ordered: it requires an AnyStore barrier, which is already given by the x86
1999// memory model.
2000static void GenUnsafePut(LocationSummary* locations,
2001 Primitive::Type type,
2002 bool is_volatile,
2003 CodeGeneratorX86* codegen) {
Roland Levillainb488b782015-10-22 11:38:49 +01002004 X86Assembler* assembler = down_cast<X86Assembler*>(codegen->GetAssembler());
Mark Mendell09ed1a32015-03-25 08:30:06 -04002005 Register base = locations->InAt(1).AsRegister<Register>();
2006 Register offset = locations->InAt(2).AsRegisterPairLow<Register>();
2007 Location value_loc = locations->InAt(3);
2008
2009 if (type == Primitive::kPrimLong) {
2010 Register value_lo = value_loc.AsRegisterPairLow<Register>();
2011 Register value_hi = value_loc.AsRegisterPairHigh<Register>();
2012 if (is_volatile) {
2013 XmmRegister temp1 = locations->GetTemp(0).AsFpuRegister<XmmRegister>();
2014 XmmRegister temp2 = locations->GetTemp(1).AsFpuRegister<XmmRegister>();
2015 __ movd(temp1, value_lo);
2016 __ movd(temp2, value_hi);
2017 __ punpckldq(temp1, temp2);
2018 __ movsd(Address(base, offset, ScaleFactor::TIMES_1, 0), temp1);
2019 } else {
2020 __ movl(Address(base, offset, ScaleFactor::TIMES_1, 0), value_lo);
2021 __ movl(Address(base, offset, ScaleFactor::TIMES_1, 4), value_hi);
2022 }
Roland Levillain4d027112015-07-01 15:41:14 +01002023 } else if (kPoisonHeapReferences && type == Primitive::kPrimNot) {
2024 Register temp = locations->GetTemp(0).AsRegister<Register>();
2025 __ movl(temp, value_loc.AsRegister<Register>());
2026 __ PoisonHeapReference(temp);
2027 __ movl(Address(base, offset, ScaleFactor::TIMES_1, 0), temp);
Mark Mendell09ed1a32015-03-25 08:30:06 -04002028 } else {
2029 __ movl(Address(base, offset, ScaleFactor::TIMES_1, 0), value_loc.AsRegister<Register>());
2030 }
2031
2032 if (is_volatile) {
Mark P Mendell17077d82015-12-16 19:15:59 +00002033 codegen->MemoryFence();
Mark Mendell09ed1a32015-03-25 08:30:06 -04002034 }
2035
2036 if (type == Primitive::kPrimNot) {
Nicolas Geoffray07276db2015-05-18 14:22:09 +01002037 bool value_can_be_null = true; // TODO: Worth finding out this information?
Mark Mendell09ed1a32015-03-25 08:30:06 -04002038 codegen->MarkGCCard(locations->GetTemp(0).AsRegister<Register>(),
2039 locations->GetTemp(1).AsRegister<Register>(),
2040 base,
Nicolas Geoffray07276db2015-05-18 14:22:09 +01002041 value_loc.AsRegister<Register>(),
2042 value_can_be_null);
Mark Mendell09ed1a32015-03-25 08:30:06 -04002043 }
2044}
2045
2046void IntrinsicCodeGeneratorX86::VisitUnsafePut(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00002047 GenUnsafePut(invoke->GetLocations(), Primitive::kPrimInt, /* is_volatile */ false, codegen_);
Mark Mendell09ed1a32015-03-25 08:30:06 -04002048}
2049void IntrinsicCodeGeneratorX86::VisitUnsafePutOrdered(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00002050 GenUnsafePut(invoke->GetLocations(), Primitive::kPrimInt, /* is_volatile */ false, codegen_);
Mark Mendell09ed1a32015-03-25 08:30:06 -04002051}
2052void IntrinsicCodeGeneratorX86::VisitUnsafePutVolatile(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00002053 GenUnsafePut(invoke->GetLocations(), Primitive::kPrimInt, /* is_volatile */ true, codegen_);
Mark Mendell09ed1a32015-03-25 08:30:06 -04002054}
2055void IntrinsicCodeGeneratorX86::VisitUnsafePutObject(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00002056 GenUnsafePut(invoke->GetLocations(), Primitive::kPrimNot, /* is_volatile */ false, codegen_);
Mark Mendell09ed1a32015-03-25 08:30:06 -04002057}
2058void IntrinsicCodeGeneratorX86::VisitUnsafePutObjectOrdered(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00002059 GenUnsafePut(invoke->GetLocations(), Primitive::kPrimNot, /* is_volatile */ false, codegen_);
Mark Mendell09ed1a32015-03-25 08:30:06 -04002060}
2061void IntrinsicCodeGeneratorX86::VisitUnsafePutObjectVolatile(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00002062 GenUnsafePut(invoke->GetLocations(), Primitive::kPrimNot, /* is_volatile */ true, codegen_);
Mark Mendell09ed1a32015-03-25 08:30:06 -04002063}
2064void IntrinsicCodeGeneratorX86::VisitUnsafePutLong(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00002065 GenUnsafePut(invoke->GetLocations(), Primitive::kPrimLong, /* is_volatile */ false, codegen_);
Mark Mendell09ed1a32015-03-25 08:30:06 -04002066}
2067void IntrinsicCodeGeneratorX86::VisitUnsafePutLongOrdered(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00002068 GenUnsafePut(invoke->GetLocations(), Primitive::kPrimLong, /* is_volatile */ false, codegen_);
Mark Mendell09ed1a32015-03-25 08:30:06 -04002069}
2070void IntrinsicCodeGeneratorX86::VisitUnsafePutLongVolatile(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00002071 GenUnsafePut(invoke->GetLocations(), Primitive::kPrimLong, /* is_volatile */ true, codegen_);
Mark Mendell09ed1a32015-03-25 08:30:06 -04002072}
2073
Mark Mendell58d25fd2015-04-03 14:52:31 -04002074static void CreateIntIntIntIntIntToInt(ArenaAllocator* arena, Primitive::Type type,
2075 HInvoke* invoke) {
2076 LocationSummary* locations = new (arena) LocationSummary(invoke,
2077 LocationSummary::kNoCall,
2078 kIntrinsified);
2079 locations->SetInAt(0, Location::NoLocation()); // Unused receiver.
2080 locations->SetInAt(1, Location::RequiresRegister());
2081 // Offset is a long, but in 32 bit mode, we only need the low word.
2082 // Can we update the invoke here to remove a TypeConvert to Long?
2083 locations->SetInAt(2, Location::RequiresRegister());
2084 // Expected value must be in EAX or EDX:EAX.
2085 // For long, new value must be in ECX:EBX.
2086 if (type == Primitive::kPrimLong) {
2087 locations->SetInAt(3, Location::RegisterPairLocation(EAX, EDX));
2088 locations->SetInAt(4, Location::RegisterPairLocation(EBX, ECX));
2089 } else {
2090 locations->SetInAt(3, Location::RegisterLocation(EAX));
2091 locations->SetInAt(4, Location::RequiresRegister());
2092 }
2093
2094 // Force a byte register for the output.
2095 locations->SetOut(Location::RegisterLocation(EAX));
2096 if (type == Primitive::kPrimNot) {
2097 // Need temp registers for card-marking.
Roland Levillainb488b782015-10-22 11:38:49 +01002098 locations->AddTemp(Location::RequiresRegister()); // Possibly used for reference poisoning too.
Mark Mendell58d25fd2015-04-03 14:52:31 -04002099 // Need a byte register for marking.
2100 locations->AddTemp(Location::RegisterLocation(ECX));
2101 }
2102}
2103
2104void IntrinsicLocationsBuilderX86::VisitUnsafeCASInt(HInvoke* invoke) {
2105 CreateIntIntIntIntIntToInt(arena_, Primitive::kPrimInt, invoke);
2106}
2107
2108void IntrinsicLocationsBuilderX86::VisitUnsafeCASLong(HInvoke* invoke) {
2109 CreateIntIntIntIntIntToInt(arena_, Primitive::kPrimLong, invoke);
2110}
2111
2112void IntrinsicLocationsBuilderX86::VisitUnsafeCASObject(HInvoke* invoke) {
Roland Levillain391b8662015-12-18 11:43:38 +00002113 // The UnsafeCASObject intrinsic is missing a read barrier, and
2114 // therefore sometimes does not work as expected (b/25883050).
2115 // Turn it off temporarily as a quick fix, until the read barrier is
Roland Levillain3d312422016-06-23 13:53:42 +01002116 // implemented (see TODO in GenCAS).
Roland Levillain391b8662015-12-18 11:43:38 +00002117 //
Roland Levillain3d312422016-06-23 13:53:42 +01002118 // TODO(rpl): Implement read barrier support in GenCAS and re-enable
Roland Levillain391b8662015-12-18 11:43:38 +00002119 // this intrinsic.
2120 if (kEmitCompilerReadBarrier) {
2121 return;
2122 }
2123
Mark Mendell58d25fd2015-04-03 14:52:31 -04002124 CreateIntIntIntIntIntToInt(arena_, Primitive::kPrimNot, invoke);
2125}
2126
2127static void GenCAS(Primitive::Type type, HInvoke* invoke, CodeGeneratorX86* codegen) {
Roland Levillainb488b782015-10-22 11:38:49 +01002128 X86Assembler* assembler = down_cast<X86Assembler*>(codegen->GetAssembler());
Mark Mendell58d25fd2015-04-03 14:52:31 -04002129 LocationSummary* locations = invoke->GetLocations();
2130
2131 Register base = locations->InAt(1).AsRegister<Register>();
2132 Register offset = locations->InAt(2).AsRegisterPairLow<Register>();
2133 Location out = locations->Out();
2134 DCHECK_EQ(out.AsRegister<Register>(), EAX);
2135
Roland Levillainb488b782015-10-22 11:38:49 +01002136 if (type == Primitive::kPrimNot) {
Roland Levillain4d027112015-07-01 15:41:14 +01002137 Register expected = locations->InAt(3).AsRegister<Register>();
Roland Levillainb488b782015-10-22 11:38:49 +01002138 // Ensure `expected` is in EAX (required by the CMPXCHG instruction).
Roland Levillain4d027112015-07-01 15:41:14 +01002139 DCHECK_EQ(expected, EAX);
Mark Mendell58d25fd2015-04-03 14:52:31 -04002140 Register value = locations->InAt(4).AsRegister<Register>();
Roland Levillain4d027112015-07-01 15:41:14 +01002141
Roland Levillainb488b782015-10-22 11:38:49 +01002142 // Mark card for object assuming new value is stored.
2143 bool value_can_be_null = true; // TODO: Worth finding out this information?
2144 codegen->MarkGCCard(locations->GetTemp(0).AsRegister<Register>(),
2145 locations->GetTemp(1).AsRegister<Register>(),
2146 base,
2147 value,
2148 value_can_be_null);
2149
2150 bool base_equals_value = (base == value);
2151 if (kPoisonHeapReferences) {
2152 if (base_equals_value) {
2153 // If `base` and `value` are the same register location, move
2154 // `value` to a temporary register. This way, poisoning
2155 // `value` won't invalidate `base`.
2156 value = locations->GetTemp(0).AsRegister<Register>();
2157 __ movl(value, base);
Roland Levillain4d027112015-07-01 15:41:14 +01002158 }
Roland Levillainb488b782015-10-22 11:38:49 +01002159
2160 // Check that the register allocator did not assign the location
2161 // of `expected` (EAX) to `value` nor to `base`, so that heap
2162 // poisoning (when enabled) works as intended below.
2163 // - If `value` were equal to `expected`, both references would
2164 // be poisoned twice, meaning they would not be poisoned at
2165 // all, as heap poisoning uses address negation.
2166 // - If `base` were equal to `expected`, poisoning `expected`
2167 // would invalidate `base`.
2168 DCHECK_NE(value, expected);
2169 DCHECK_NE(base, expected);
2170
2171 __ PoisonHeapReference(expected);
2172 __ PoisonHeapReference(value);
Mark Mendell58d25fd2015-04-03 14:52:31 -04002173 }
2174
Roland Levillain391b8662015-12-18 11:43:38 +00002175 // TODO: Add a read barrier for the reference stored in the object
2176 // before attempting the CAS, similar to the one in the
2177 // art::Unsafe_compareAndSwapObject JNI implementation.
2178 //
2179 // Note that this code is not (yet) used when read barriers are
2180 // enabled (see IntrinsicLocationsBuilderX86::VisitUnsafeCASObject).
2181 DCHECK(!kEmitCompilerReadBarrier);
Mark Mendell58d25fd2015-04-03 14:52:31 -04002182 __ LockCmpxchgl(Address(base, offset, TIMES_1, 0), value);
Mark Mendell58d25fd2015-04-03 14:52:31 -04002183
Roland Levillain0d5a2812015-11-13 10:07:31 +00002184 // LOCK CMPXCHG has full barrier semantics, and we don't need
Roland Levillainb488b782015-10-22 11:38:49 +01002185 // scheduling barriers at this time.
Mark Mendell58d25fd2015-04-03 14:52:31 -04002186
Roland Levillainb488b782015-10-22 11:38:49 +01002187 // Convert ZF into the boolean result.
2188 __ setb(kZero, out.AsRegister<Register>());
2189 __ movzxb(out.AsRegister<Register>(), out.AsRegister<ByteRegister>());
Roland Levillain4d027112015-07-01 15:41:14 +01002190
Roland Levillain391b8662015-12-18 11:43:38 +00002191 // If heap poisoning is enabled, we need to unpoison the values
2192 // that were poisoned earlier.
Roland Levillainb488b782015-10-22 11:38:49 +01002193 if (kPoisonHeapReferences) {
2194 if (base_equals_value) {
2195 // `value` has been moved to a temporary register, no need to
2196 // unpoison it.
2197 } else {
2198 // Ensure `value` is different from `out`, so that unpoisoning
2199 // the former does not invalidate the latter.
2200 DCHECK_NE(value, out.AsRegister<Register>());
2201 __ UnpoisonHeapReference(value);
2202 }
2203 // Do not unpoison the reference contained in register
2204 // `expected`, as it is the same as register `out` (EAX).
2205 }
2206 } else {
2207 if (type == Primitive::kPrimInt) {
2208 // Ensure the expected value is in EAX (required by the CMPXCHG
2209 // instruction).
2210 DCHECK_EQ(locations->InAt(3).AsRegister<Register>(), EAX);
2211 __ LockCmpxchgl(Address(base, offset, TIMES_1, 0),
2212 locations->InAt(4).AsRegister<Register>());
2213 } else if (type == Primitive::kPrimLong) {
2214 // Ensure the expected value is in EAX:EDX and that the new
2215 // value is in EBX:ECX (required by the CMPXCHG8B instruction).
2216 DCHECK_EQ(locations->InAt(3).AsRegisterPairLow<Register>(), EAX);
2217 DCHECK_EQ(locations->InAt(3).AsRegisterPairHigh<Register>(), EDX);
2218 DCHECK_EQ(locations->InAt(4).AsRegisterPairLow<Register>(), EBX);
2219 DCHECK_EQ(locations->InAt(4).AsRegisterPairHigh<Register>(), ECX);
2220 __ LockCmpxchg8b(Address(base, offset, TIMES_1, 0));
2221 } else {
2222 LOG(FATAL) << "Unexpected CAS type " << type;
2223 }
2224
Roland Levillain0d5a2812015-11-13 10:07:31 +00002225 // LOCK CMPXCHG/LOCK CMPXCHG8B have full barrier semantics, and we
2226 // don't need scheduling barriers at this time.
Roland Levillainb488b782015-10-22 11:38:49 +01002227
2228 // Convert ZF into the boolean result.
2229 __ setb(kZero, out.AsRegister<Register>());
2230 __ movzxb(out.AsRegister<Register>(), out.AsRegister<ByteRegister>());
Roland Levillain4d027112015-07-01 15:41:14 +01002231 }
Mark Mendell58d25fd2015-04-03 14:52:31 -04002232}
2233
2234void IntrinsicCodeGeneratorX86::VisitUnsafeCASInt(HInvoke* invoke) {
2235 GenCAS(Primitive::kPrimInt, invoke, codegen_);
2236}
2237
2238void IntrinsicCodeGeneratorX86::VisitUnsafeCASLong(HInvoke* invoke) {
2239 GenCAS(Primitive::kPrimLong, invoke, codegen_);
2240}
2241
2242void IntrinsicCodeGeneratorX86::VisitUnsafeCASObject(HInvoke* invoke) {
Roland Levillain3d312422016-06-23 13:53:42 +01002243 // The UnsafeCASObject intrinsic is missing a read barrier, and
2244 // therefore sometimes does not work as expected (b/25883050).
2245 // Turn it off temporarily as a quick fix, until the read barrier is
2246 // implemented (see TODO in GenCAS).
2247 //
2248 // TODO(rpl): Implement read barrier support in GenCAS and re-enable
2249 // this intrinsic.
2250 DCHECK(!kEmitCompilerReadBarrier);
2251
Mark Mendell58d25fd2015-04-03 14:52:31 -04002252 GenCAS(Primitive::kPrimNot, invoke, codegen_);
2253}
2254
2255void IntrinsicLocationsBuilderX86::VisitIntegerReverse(HInvoke* invoke) {
2256 LocationSummary* locations = new (arena_) LocationSummary(invoke,
2257 LocationSummary::kNoCall,
2258 kIntrinsified);
2259 locations->SetInAt(0, Location::RequiresRegister());
2260 locations->SetOut(Location::SameAsFirstInput());
2261 locations->AddTemp(Location::RequiresRegister());
2262}
2263
2264static void SwapBits(Register reg, Register temp, int32_t shift, int32_t mask,
2265 X86Assembler* assembler) {
2266 Immediate imm_shift(shift);
2267 Immediate imm_mask(mask);
2268 __ movl(temp, reg);
2269 __ shrl(reg, imm_shift);
2270 __ andl(temp, imm_mask);
2271 __ andl(reg, imm_mask);
2272 __ shll(temp, imm_shift);
2273 __ orl(reg, temp);
2274}
2275
2276void IntrinsicCodeGeneratorX86::VisitIntegerReverse(HInvoke* invoke) {
Aart Bika19616e2016-02-01 18:57:58 -08002277 X86Assembler* assembler = GetAssembler();
Mark Mendell58d25fd2015-04-03 14:52:31 -04002278 LocationSummary* locations = invoke->GetLocations();
2279
2280 Register reg = locations->InAt(0).AsRegister<Register>();
2281 Register temp = locations->GetTemp(0).AsRegister<Register>();
2282
2283 /*
2284 * Use one bswap instruction to reverse byte order first and then use 3 rounds of
2285 * swapping bits to reverse bits in a number x. Using bswap to save instructions
2286 * compared to generic luni implementation which has 5 rounds of swapping bits.
2287 * x = bswap x
2288 * x = (x & 0x55555555) << 1 | (x >> 1) & 0x55555555;
2289 * x = (x & 0x33333333) << 2 | (x >> 2) & 0x33333333;
2290 * x = (x & 0x0F0F0F0F) << 4 | (x >> 4) & 0x0F0F0F0F;
2291 */
2292 __ bswapl(reg);
2293 SwapBits(reg, temp, 1, 0x55555555, assembler);
2294 SwapBits(reg, temp, 2, 0x33333333, assembler);
2295 SwapBits(reg, temp, 4, 0x0f0f0f0f, assembler);
2296}
2297
2298void IntrinsicLocationsBuilderX86::VisitLongReverse(HInvoke* invoke) {
2299 LocationSummary* locations = new (arena_) LocationSummary(invoke,
2300 LocationSummary::kNoCall,
2301 kIntrinsified);
2302 locations->SetInAt(0, Location::RequiresRegister());
2303 locations->SetOut(Location::SameAsFirstInput());
2304 locations->AddTemp(Location::RequiresRegister());
2305}
2306
2307void IntrinsicCodeGeneratorX86::VisitLongReverse(HInvoke* invoke) {
Aart Bika19616e2016-02-01 18:57:58 -08002308 X86Assembler* assembler = GetAssembler();
Mark Mendell58d25fd2015-04-03 14:52:31 -04002309 LocationSummary* locations = invoke->GetLocations();
2310
2311 Register reg_low = locations->InAt(0).AsRegisterPairLow<Register>();
2312 Register reg_high = locations->InAt(0).AsRegisterPairHigh<Register>();
2313 Register temp = locations->GetTemp(0).AsRegister<Register>();
2314
2315 // We want to swap high/low, then bswap each one, and then do the same
2316 // as a 32 bit reverse.
2317 // Exchange high and low.
2318 __ movl(temp, reg_low);
2319 __ movl(reg_low, reg_high);
2320 __ movl(reg_high, temp);
2321
2322 // bit-reverse low
2323 __ bswapl(reg_low);
2324 SwapBits(reg_low, temp, 1, 0x55555555, assembler);
2325 SwapBits(reg_low, temp, 2, 0x33333333, assembler);
2326 SwapBits(reg_low, temp, 4, 0x0f0f0f0f, assembler);
2327
2328 // bit-reverse high
2329 __ bswapl(reg_high);
2330 SwapBits(reg_high, temp, 1, 0x55555555, assembler);
2331 SwapBits(reg_high, temp, 2, 0x33333333, assembler);
2332 SwapBits(reg_high, temp, 4, 0x0f0f0f0f, assembler);
2333}
2334
Aart Bikc39dac12016-01-21 08:59:48 -08002335static void CreateBitCountLocations(
2336 ArenaAllocator* arena, CodeGeneratorX86* codegen, HInvoke* invoke, bool is_long) {
2337 if (!codegen->GetInstructionSetFeatures().HasPopCnt()) {
2338 // Do nothing if there is no popcnt support. This results in generating
2339 // a call for the intrinsic rather than direct code.
2340 return;
2341 }
2342 LocationSummary* locations = new (arena) LocationSummary(invoke,
2343 LocationSummary::kNoCall,
2344 kIntrinsified);
2345 if (is_long) {
Aart Bikc39dac12016-01-21 08:59:48 -08002346 locations->AddTemp(Location::RequiresRegister());
Aart Bikc39dac12016-01-21 08:59:48 -08002347 }
Aart Bik2a946072016-01-21 12:49:00 -08002348 locations->SetInAt(0, Location::Any());
Aart Bikc39dac12016-01-21 08:59:48 -08002349 locations->SetOut(Location::RequiresRegister());
2350}
2351
Aart Bika19616e2016-02-01 18:57:58 -08002352static void GenBitCount(X86Assembler* assembler,
2353 CodeGeneratorX86* codegen,
2354 HInvoke* invoke, bool is_long) {
Aart Bikc39dac12016-01-21 08:59:48 -08002355 LocationSummary* locations = invoke->GetLocations();
2356 Location src = locations->InAt(0);
2357 Register out = locations->Out().AsRegister<Register>();
2358
2359 if (invoke->InputAt(0)->IsConstant()) {
2360 // Evaluate this at compile time.
2361 int64_t value = Int64FromConstant(invoke->InputAt(0)->AsConstant());
Roland Levillainfa3912e2016-04-01 18:21:55 +01002362 int32_t result = is_long
Aart Bikc39dac12016-01-21 08:59:48 -08002363 ? POPCOUNT(static_cast<uint64_t>(value))
2364 : POPCOUNT(static_cast<uint32_t>(value));
Roland Levillainfa3912e2016-04-01 18:21:55 +01002365 codegen->Load32BitValue(out, result);
Aart Bikc39dac12016-01-21 08:59:48 -08002366 return;
2367 }
2368
2369 // Handle the non-constant cases.
2370 if (!is_long) {
2371 if (src.IsRegister()) {
2372 __ popcntl(out, src.AsRegister<Register>());
2373 } else {
2374 DCHECK(src.IsStackSlot());
2375 __ popcntl(out, Address(ESP, src.GetStackIndex()));
2376 }
Aart Bik2a946072016-01-21 12:49:00 -08002377 } else {
2378 // The 64-bit case needs to worry about two parts.
2379 Register temp = locations->GetTemp(0).AsRegister<Register>();
2380 if (src.IsRegisterPair()) {
2381 __ popcntl(temp, src.AsRegisterPairLow<Register>());
2382 __ popcntl(out, src.AsRegisterPairHigh<Register>());
2383 } else {
2384 DCHECK(src.IsDoubleStackSlot());
2385 __ popcntl(temp, Address(ESP, src.GetStackIndex()));
2386 __ popcntl(out, Address(ESP, src.GetHighStackIndex(kX86WordSize)));
2387 }
2388 __ addl(out, temp);
Aart Bikc39dac12016-01-21 08:59:48 -08002389 }
Aart Bikc39dac12016-01-21 08:59:48 -08002390}
2391
2392void IntrinsicLocationsBuilderX86::VisitIntegerBitCount(HInvoke* invoke) {
2393 CreateBitCountLocations(arena_, codegen_, invoke, /* is_long */ false);
2394}
2395
2396void IntrinsicCodeGeneratorX86::VisitIntegerBitCount(HInvoke* invoke) {
Aart Bika19616e2016-02-01 18:57:58 -08002397 GenBitCount(GetAssembler(), codegen_, invoke, /* is_long */ false);
Aart Bikc39dac12016-01-21 08:59:48 -08002398}
2399
2400void IntrinsicLocationsBuilderX86::VisitLongBitCount(HInvoke* invoke) {
2401 CreateBitCountLocations(arena_, codegen_, invoke, /* is_long */ true);
2402}
2403
2404void IntrinsicCodeGeneratorX86::VisitLongBitCount(HInvoke* invoke) {
Aart Bika19616e2016-02-01 18:57:58 -08002405 GenBitCount(GetAssembler(), codegen_, invoke, /* is_long */ true);
Aart Bikc39dac12016-01-21 08:59:48 -08002406}
2407
Mark Mendelld5897672015-08-12 21:16:41 -04002408static void CreateLeadingZeroLocations(ArenaAllocator* arena, HInvoke* invoke, bool is_long) {
2409 LocationSummary* locations = new (arena) LocationSummary(invoke,
2410 LocationSummary::kNoCall,
2411 kIntrinsified);
2412 if (is_long) {
2413 locations->SetInAt(0, Location::RequiresRegister());
2414 } else {
2415 locations->SetInAt(0, Location::Any());
2416 }
2417 locations->SetOut(Location::RequiresRegister());
2418}
2419
Aart Bika19616e2016-02-01 18:57:58 -08002420static void GenLeadingZeros(X86Assembler* assembler,
2421 CodeGeneratorX86* codegen,
2422 HInvoke* invoke, bool is_long) {
Mark Mendelld5897672015-08-12 21:16:41 -04002423 LocationSummary* locations = invoke->GetLocations();
2424 Location src = locations->InAt(0);
2425 Register out = locations->Out().AsRegister<Register>();
2426
2427 if (invoke->InputAt(0)->IsConstant()) {
2428 // Evaluate this at compile time.
2429 int64_t value = Int64FromConstant(invoke->InputAt(0)->AsConstant());
2430 if (value == 0) {
2431 value = is_long ? 64 : 32;
2432 } else {
2433 value = is_long ? CLZ(static_cast<uint64_t>(value)) : CLZ(static_cast<uint32_t>(value));
2434 }
Aart Bika19616e2016-02-01 18:57:58 -08002435 codegen->Load32BitValue(out, value);
Mark Mendelld5897672015-08-12 21:16:41 -04002436 return;
2437 }
2438
2439 // Handle the non-constant cases.
2440 if (!is_long) {
2441 if (src.IsRegister()) {
2442 __ bsrl(out, src.AsRegister<Register>());
2443 } else {
2444 DCHECK(src.IsStackSlot());
2445 __ bsrl(out, Address(ESP, src.GetStackIndex()));
2446 }
2447
2448 // BSR sets ZF if the input was zero, and the output is undefined.
Mark Mendell0c9497d2015-08-21 09:30:05 -04002449 NearLabel all_zeroes, done;
Mark Mendelld5897672015-08-12 21:16:41 -04002450 __ j(kEqual, &all_zeroes);
2451
2452 // Correct the result from BSR to get the final CLZ result.
2453 __ xorl(out, Immediate(31));
2454 __ jmp(&done);
2455
2456 // Fix the zero case with the expected result.
2457 __ Bind(&all_zeroes);
2458 __ movl(out, Immediate(32));
2459
2460 __ Bind(&done);
2461 return;
2462 }
2463
2464 // 64 bit case needs to worry about both parts of the register.
2465 DCHECK(src.IsRegisterPair());
2466 Register src_lo = src.AsRegisterPairLow<Register>();
2467 Register src_hi = src.AsRegisterPairHigh<Register>();
Mark Mendell0c9497d2015-08-21 09:30:05 -04002468 NearLabel handle_low, done, all_zeroes;
Mark Mendelld5897672015-08-12 21:16:41 -04002469
2470 // Is the high word zero?
2471 __ testl(src_hi, src_hi);
2472 __ j(kEqual, &handle_low);
2473
2474 // High word is not zero. We know that the BSR result is defined in this case.
2475 __ bsrl(out, src_hi);
2476
2477 // Correct the result from BSR to get the final CLZ result.
2478 __ xorl(out, Immediate(31));
2479 __ jmp(&done);
2480
2481 // High word was zero. We have to compute the low word count and add 32.
2482 __ Bind(&handle_low);
2483 __ bsrl(out, src_lo);
2484 __ j(kEqual, &all_zeroes);
2485
2486 // We had a valid result. Use an XOR to both correct the result and add 32.
2487 __ xorl(out, Immediate(63));
2488 __ jmp(&done);
2489
2490 // All zero case.
2491 __ Bind(&all_zeroes);
2492 __ movl(out, Immediate(64));
2493
2494 __ Bind(&done);
2495}
2496
2497void IntrinsicLocationsBuilderX86::VisitIntegerNumberOfLeadingZeros(HInvoke* invoke) {
2498 CreateLeadingZeroLocations(arena_, invoke, /* is_long */ false);
2499}
2500
2501void IntrinsicCodeGeneratorX86::VisitIntegerNumberOfLeadingZeros(HInvoke* invoke) {
Aart Bika19616e2016-02-01 18:57:58 -08002502 GenLeadingZeros(GetAssembler(), codegen_, invoke, /* is_long */ false);
Mark Mendelld5897672015-08-12 21:16:41 -04002503}
2504
2505void IntrinsicLocationsBuilderX86::VisitLongNumberOfLeadingZeros(HInvoke* invoke) {
2506 CreateLeadingZeroLocations(arena_, invoke, /* is_long */ true);
2507}
2508
2509void IntrinsicCodeGeneratorX86::VisitLongNumberOfLeadingZeros(HInvoke* invoke) {
Aart Bika19616e2016-02-01 18:57:58 -08002510 GenLeadingZeros(GetAssembler(), codegen_, invoke, /* is_long */ true);
Mark Mendelld5897672015-08-12 21:16:41 -04002511}
2512
Mark Mendell2d554792015-09-15 21:45:18 -04002513static void CreateTrailingZeroLocations(ArenaAllocator* arena, HInvoke* invoke, bool is_long) {
2514 LocationSummary* locations = new (arena) LocationSummary(invoke,
2515 LocationSummary::kNoCall,
2516 kIntrinsified);
2517 if (is_long) {
2518 locations->SetInAt(0, Location::RequiresRegister());
2519 } else {
2520 locations->SetInAt(0, Location::Any());
2521 }
2522 locations->SetOut(Location::RequiresRegister());
2523}
2524
Aart Bika19616e2016-02-01 18:57:58 -08002525static void GenTrailingZeros(X86Assembler* assembler,
2526 CodeGeneratorX86* codegen,
2527 HInvoke* invoke, bool is_long) {
Mark Mendell2d554792015-09-15 21:45:18 -04002528 LocationSummary* locations = invoke->GetLocations();
2529 Location src = locations->InAt(0);
2530 Register out = locations->Out().AsRegister<Register>();
2531
2532 if (invoke->InputAt(0)->IsConstant()) {
2533 // Evaluate this at compile time.
2534 int64_t value = Int64FromConstant(invoke->InputAt(0)->AsConstant());
2535 if (value == 0) {
2536 value = is_long ? 64 : 32;
2537 } else {
2538 value = is_long ? CTZ(static_cast<uint64_t>(value)) : CTZ(static_cast<uint32_t>(value));
2539 }
Aart Bika19616e2016-02-01 18:57:58 -08002540 codegen->Load32BitValue(out, value);
Mark Mendell2d554792015-09-15 21:45:18 -04002541 return;
2542 }
2543
2544 // Handle the non-constant cases.
2545 if (!is_long) {
2546 if (src.IsRegister()) {
2547 __ bsfl(out, src.AsRegister<Register>());
2548 } else {
2549 DCHECK(src.IsStackSlot());
2550 __ bsfl(out, Address(ESP, src.GetStackIndex()));
2551 }
2552
2553 // BSF sets ZF if the input was zero, and the output is undefined.
2554 NearLabel done;
2555 __ j(kNotEqual, &done);
2556
2557 // Fix the zero case with the expected result.
2558 __ movl(out, Immediate(32));
2559
2560 __ Bind(&done);
2561 return;
2562 }
2563
2564 // 64 bit case needs to worry about both parts of the register.
2565 DCHECK(src.IsRegisterPair());
2566 Register src_lo = src.AsRegisterPairLow<Register>();
2567 Register src_hi = src.AsRegisterPairHigh<Register>();
2568 NearLabel done, all_zeroes;
2569
2570 // If the low word is zero, then ZF will be set. If not, we have the answer.
2571 __ bsfl(out, src_lo);
2572 __ j(kNotEqual, &done);
2573
2574 // Low word was zero. We have to compute the high word count and add 32.
2575 __ bsfl(out, src_hi);
2576 __ j(kEqual, &all_zeroes);
2577
2578 // We had a valid result. Add 32 to account for the low word being zero.
2579 __ addl(out, Immediate(32));
2580 __ jmp(&done);
2581
2582 // All zero case.
2583 __ Bind(&all_zeroes);
2584 __ movl(out, Immediate(64));
2585
2586 __ Bind(&done);
2587}
2588
2589void IntrinsicLocationsBuilderX86::VisitIntegerNumberOfTrailingZeros(HInvoke* invoke) {
2590 CreateTrailingZeroLocations(arena_, invoke, /* is_long */ false);
2591}
2592
2593void IntrinsicCodeGeneratorX86::VisitIntegerNumberOfTrailingZeros(HInvoke* invoke) {
Aart Bika19616e2016-02-01 18:57:58 -08002594 GenTrailingZeros(GetAssembler(), codegen_, invoke, /* is_long */ false);
Mark Mendell2d554792015-09-15 21:45:18 -04002595}
2596
2597void IntrinsicLocationsBuilderX86::VisitLongNumberOfTrailingZeros(HInvoke* invoke) {
2598 CreateTrailingZeroLocations(arena_, invoke, /* is_long */ true);
2599}
2600
2601void IntrinsicCodeGeneratorX86::VisitLongNumberOfTrailingZeros(HInvoke* invoke) {
Aart Bika19616e2016-02-01 18:57:58 -08002602 GenTrailingZeros(GetAssembler(), codegen_, invoke, /* is_long */ true);
Mark Mendell2d554792015-09-15 21:45:18 -04002603}
2604
Serguei Katkov288c7a82016-05-16 11:53:15 +06002605void IntrinsicLocationsBuilderX86::VisitReferenceGetReferent(HInvoke* invoke) {
2606 if (kEmitCompilerReadBarrier) {
2607 // Do not intrinsify this call with the read barrier configuration.
2608 return;
2609 }
2610 LocationSummary* locations = new (arena_) LocationSummary(invoke,
2611 LocationSummary::kCallOnSlowPath,
2612 kIntrinsified);
2613 locations->SetInAt(0, Location::RequiresRegister());
2614 locations->SetOut(Location::SameAsFirstInput());
2615 locations->AddTemp(Location::RequiresRegister());
2616}
2617
2618void IntrinsicCodeGeneratorX86::VisitReferenceGetReferent(HInvoke* invoke) {
2619 DCHECK(!kEmitCompilerReadBarrier);
2620 LocationSummary* locations = invoke->GetLocations();
2621 X86Assembler* assembler = GetAssembler();
2622
2623 Register obj = locations->InAt(0).AsRegister<Register>();
2624 Register out = locations->Out().AsRegister<Register>();
2625
2626 SlowPathCode* slow_path = new (GetAllocator()) IntrinsicSlowPathX86(invoke);
2627 codegen_->AddSlowPath(slow_path);
2628
2629 // Load ArtMethod first.
2630 HInvokeStaticOrDirect* invoke_direct = invoke->AsInvokeStaticOrDirect();
2631 DCHECK(invoke_direct != nullptr);
2632 Location temp_loc = codegen_->GenerateCalleeMethodStaticOrDirectCall(
2633 invoke_direct, locations->GetTemp(0));
2634 DCHECK(temp_loc.Equals(locations->GetTemp(0)));
2635 Register temp = temp_loc.AsRegister<Register>();
2636
2637 // Now get declaring class.
2638 __ movl(temp, Address(temp, ArtMethod::DeclaringClassOffset().Int32Value()));
2639
2640 uint32_t slow_path_flag_offset = codegen_->GetReferenceSlowFlagOffset();
2641 uint32_t disable_flag_offset = codegen_->GetReferenceDisableFlagOffset();
2642 DCHECK_NE(slow_path_flag_offset, 0u);
2643 DCHECK_NE(disable_flag_offset, 0u);
2644 DCHECK_NE(slow_path_flag_offset, disable_flag_offset);
2645
2646 // Check static flags preventing us for using intrinsic.
2647 if (slow_path_flag_offset == disable_flag_offset + 1) {
2648 __ cmpw(Address(temp, disable_flag_offset), Immediate(0));
2649 __ j(kNotEqual, slow_path->GetEntryLabel());
2650 } else {
2651 __ cmpb(Address(temp, disable_flag_offset), Immediate(0));
2652 __ j(kNotEqual, slow_path->GetEntryLabel());
2653 __ cmpb(Address(temp, slow_path_flag_offset), Immediate(0));
2654 __ j(kNotEqual, slow_path->GetEntryLabel());
2655 }
2656
2657 // Fast path.
2658 __ movl(out, Address(obj, mirror::Reference::ReferentOffset().Int32Value()));
2659 codegen_->MaybeRecordImplicitNullCheck(invoke);
2660 __ MaybeUnpoisonHeapReference(out);
2661 __ Bind(slow_path->GetExitLabel());
2662}
2663
Nicolas Geoffrayfea1abd2016-07-06 12:09:12 +01002664static bool IsSameInput(HInstruction* instruction, size_t input0, size_t input1) {
2665 return instruction->InputAt(input0) == instruction->InputAt(input1);
2666}
2667
2668void IntrinsicLocationsBuilderX86::VisitSystemArrayCopy(HInvoke* invoke) {
2669 // TODO(rpl): Implement read barriers in the SystemArrayCopy
2670 // intrinsic and re-enable it (b/29516905).
2671 if (kEmitCompilerReadBarrier) {
2672 return;
2673 }
2674
2675 CodeGenerator::CreateSystemArrayCopyLocationSummary(invoke);
2676 if (invoke->GetLocations() != nullptr) {
2677 // Need a byte register for marking.
2678 invoke->GetLocations()->SetTempAt(1, Location::RegisterLocation(ECX));
2679
2680 static constexpr size_t kSrc = 0;
2681 static constexpr size_t kSrcPos = 1;
2682 static constexpr size_t kDest = 2;
2683 static constexpr size_t kDestPos = 3;
2684 static constexpr size_t kLength = 4;
2685
2686 if (!invoke->InputAt(kSrcPos)->IsIntConstant() &&
2687 !invoke->InputAt(kDestPos)->IsIntConstant() &&
2688 !invoke->InputAt(kLength)->IsIntConstant()) {
2689 if (!IsSameInput(invoke, kSrcPos, kDestPos) &&
2690 !IsSameInput(invoke, kSrcPos, kLength) &&
2691 !IsSameInput(invoke, kDestPos, kLength) &&
2692 !IsSameInput(invoke, kSrc, kDest)) {
2693 // Not enough registers, make the length also take a stack slot.
2694 invoke->GetLocations()->SetInAt(kLength, Location::Any());
2695 }
2696 }
2697 }
2698}
2699
2700void IntrinsicCodeGeneratorX86::VisitSystemArrayCopy(HInvoke* invoke) {
2701 // TODO(rpl): Implement read barriers in the SystemArrayCopy
2702 // intrinsic and re-enable it (b/29516905).
2703 DCHECK(!kEmitCompilerReadBarrier);
2704
2705 X86Assembler* assembler = GetAssembler();
2706 LocationSummary* locations = invoke->GetLocations();
2707
2708 uint32_t class_offset = mirror::Object::ClassOffset().Int32Value();
2709 uint32_t super_offset = mirror::Class::SuperClassOffset().Int32Value();
2710 uint32_t component_offset = mirror::Class::ComponentTypeOffset().Int32Value();
2711 uint32_t primitive_offset = mirror::Class::PrimitiveTypeOffset().Int32Value();
2712
2713 Register src = locations->InAt(0).AsRegister<Register>();
2714 Location src_pos = locations->InAt(1);
2715 Register dest = locations->InAt(2).AsRegister<Register>();
2716 Location dest_pos = locations->InAt(3);
2717 Location length = locations->InAt(4);
2718 Register temp1 = locations->GetTemp(0).AsRegister<Register>();
2719 Register temp2 = locations->GetTemp(1).AsRegister<Register>();
2720
2721 SlowPathCode* slow_path = new (GetAllocator()) IntrinsicSlowPathX86(invoke);
2722 codegen_->AddSlowPath(slow_path);
2723
2724 NearLabel conditions_on_positions_validated;
2725 SystemArrayCopyOptimizations optimizations(invoke);
2726
2727 // If source and destination are the same, we go to slow path if we need to do
2728 // forward copying.
2729 if (src_pos.IsConstant()) {
2730 int32_t src_pos_constant = src_pos.GetConstant()->AsIntConstant()->GetValue();
2731 if (dest_pos.IsConstant()) {
2732 int32_t dest_pos_constant = dest_pos.GetConstant()->AsIntConstant()->GetValue();
2733 if (optimizations.GetDestinationIsSource()) {
2734 // Checked when building locations.
2735 DCHECK_GE(src_pos_constant, dest_pos_constant);
2736 } else if (src_pos_constant < dest_pos_constant) {
2737 __ cmpl(src, dest);
2738 __ j(kEqual, slow_path->GetEntryLabel());
2739 }
2740 } else {
2741 if (!optimizations.GetDestinationIsSource()) {
2742 __ cmpl(src, dest);
2743 __ j(kNotEqual, &conditions_on_positions_validated);
2744 }
2745 __ cmpl(dest_pos.AsRegister<Register>(), Immediate(src_pos_constant));
2746 __ j(kGreater, slow_path->GetEntryLabel());
2747 }
2748 } else {
2749 if (!optimizations.GetDestinationIsSource()) {
2750 __ cmpl(src, dest);
2751 __ j(kNotEqual, &conditions_on_positions_validated);
2752 }
2753 if (dest_pos.IsConstant()) {
2754 int32_t dest_pos_constant = dest_pos.GetConstant()->AsIntConstant()->GetValue();
2755 __ cmpl(src_pos.AsRegister<Register>(), Immediate(dest_pos_constant));
2756 __ j(kLess, slow_path->GetEntryLabel());
2757 } else {
2758 __ cmpl(src_pos.AsRegister<Register>(), dest_pos.AsRegister<Register>());
2759 __ j(kLess, slow_path->GetEntryLabel());
2760 }
2761 }
2762
2763 __ Bind(&conditions_on_positions_validated);
2764
2765 if (!optimizations.GetSourceIsNotNull()) {
2766 // Bail out if the source is null.
2767 __ testl(src, src);
2768 __ j(kEqual, slow_path->GetEntryLabel());
2769 }
2770
2771 if (!optimizations.GetDestinationIsNotNull() && !optimizations.GetDestinationIsSource()) {
2772 // Bail out if the destination is null.
2773 __ testl(dest, dest);
2774 __ j(kEqual, slow_path->GetEntryLabel());
2775 }
2776
2777 Register temp3 = locations->GetTemp(2).AsRegister<Register>();
2778 if (length.IsStackSlot()) {
2779 __ movl(temp3, Address(ESP, length.GetStackIndex()));
2780 length = Location::RegisterLocation(temp3);
2781 }
2782
2783 // If the length is negative, bail out.
2784 // We have already checked in the LocationsBuilder for the constant case.
2785 if (!length.IsConstant() &&
2786 !optimizations.GetCountIsSourceLength() &&
2787 !optimizations.GetCountIsDestinationLength()) {
2788 __ testl(length.AsRegister<Register>(), length.AsRegister<Register>());
2789 __ j(kLess, slow_path->GetEntryLabel());
2790 }
2791
2792 // Validity checks: source.
2793 CheckPosition(assembler,
2794 src_pos,
2795 src,
2796 length,
2797 slow_path,
2798 temp1,
2799 optimizations.GetCountIsSourceLength());
2800
2801 // Validity checks: dest.
2802 CheckPosition(assembler,
2803 dest_pos,
2804 dest,
2805 length,
2806 slow_path,
2807 temp1,
2808 optimizations.GetCountIsDestinationLength());
2809
2810 if (!optimizations.GetDoesNotNeedTypeCheck()) {
2811 // Check whether all elements of the source array are assignable to the component
2812 // type of the destination array. We do two checks: the classes are the same,
2813 // or the destination is Object[]. If none of these checks succeed, we go to the
2814 // slow path.
2815 if (!optimizations.GetSourceIsNonPrimitiveArray()) {
2816 // /* HeapReference<Class> */ temp1 = temp1->klass_
2817 __ movl(temp1, Address(src, class_offset));
2818 __ MaybeUnpoisonHeapReference(temp1);
2819 // Bail out if the source is not a non primitive array.
2820 // /* HeapReference<Class> */ temp1 = temp1->component_type_
2821 __ movl(temp1, Address(temp1, component_offset));
2822 __ testl(temp1, temp1);
2823 __ j(kEqual, slow_path->GetEntryLabel());
2824 __ MaybeUnpoisonHeapReference(temp1);
2825 __ cmpw(Address(temp1, primitive_offset), Immediate(Primitive::kPrimNot));
2826 __ j(kNotEqual, slow_path->GetEntryLabel());
2827 }
2828
2829 if (!optimizations.GetDestinationIsNonPrimitiveArray()) {
2830 // /* HeapReference<Class> */ temp1 = temp1->klass_
2831 __ movl(temp1, Address(dest, class_offset));
2832 __ MaybeUnpoisonHeapReference(temp1);
2833 // Bail out if the destination is not a non primitive array.
2834 // /* HeapReference<Class> */ temp2 = temp1->component_type_
2835 __ movl(temp2, Address(temp1, component_offset));
2836 __ testl(temp2, temp2);
2837 __ j(kEqual, slow_path->GetEntryLabel());
2838 __ MaybeUnpoisonHeapReference(temp2);
2839 __ cmpw(Address(temp2, primitive_offset), Immediate(Primitive::kPrimNot));
2840 __ j(kNotEqual, slow_path->GetEntryLabel());
2841 // Re-poison the heap reference to make the compare instruction below
2842 // compare two poisoned references.
2843 __ PoisonHeapReference(temp1);
2844 } else {
2845 // /* HeapReference<Class> */ temp1 = temp1->klass_
2846 __ movl(temp1, Address(dest, class_offset));
2847 }
2848
2849 // Note: if poisoning is on, we are here comparing two poisoned references.
2850 __ cmpl(temp1, Address(src, class_offset));
2851
2852 if (optimizations.GetDestinationIsTypedObjectArray()) {
2853 NearLabel do_copy;
2854 __ j(kEqual, &do_copy);
2855 __ MaybeUnpoisonHeapReference(temp1);
2856 // /* HeapReference<Class> */ temp1 = temp1->component_type_
2857 __ movl(temp1, Address(temp1, component_offset));
2858 __ MaybeUnpoisonHeapReference(temp1);
2859 __ cmpl(Address(temp1, super_offset), Immediate(0));
2860 __ j(kNotEqual, slow_path->GetEntryLabel());
2861 __ Bind(&do_copy);
2862 } else {
2863 __ j(kNotEqual, slow_path->GetEntryLabel());
2864 }
2865 } else if (!optimizations.GetSourceIsNonPrimitiveArray()) {
2866 DCHECK(optimizations.GetDestinationIsNonPrimitiveArray());
2867 // Bail out if the source is not a non primitive array.
2868 // /* HeapReference<Class> */ temp1 = src->klass_
2869 __ movl(temp1, Address(src, class_offset));
2870 __ MaybeUnpoisonHeapReference(temp1);
2871 // /* HeapReference<Class> */ temp1 = temp1->component_type_
2872 __ movl(temp1, Address(temp1, component_offset));
2873 __ testl(temp1, temp1);
2874 __ j(kEqual, slow_path->GetEntryLabel());
2875 __ MaybeUnpoisonHeapReference(temp1);
2876 __ cmpw(Address(temp1, primitive_offset), Immediate(Primitive::kPrimNot));
2877 __ j(kNotEqual, slow_path->GetEntryLabel());
2878 }
2879
2880 // Compute base source address, base destination address, and end source address.
2881 int32_t element_size = Primitive::ComponentSize(Primitive::kPrimNot);
2882 DCHECK_EQ(element_size, 4);
2883 uint32_t offset = mirror::Array::DataOffset(element_size).Uint32Value();
2884 if (src_pos.IsConstant()) {
2885 int32_t constant = src_pos.GetConstant()->AsIntConstant()->GetValue();
2886 __ leal(temp1, Address(src, element_size * constant + offset));
2887 } else {
2888 __ leal(temp1, Address(src, src_pos.AsRegister<Register>(), ScaleFactor::TIMES_4, offset));
2889 }
2890
2891 if (dest_pos.IsConstant()) {
2892 int32_t constant = dest_pos.GetConstant()->AsIntConstant()->GetValue();
2893 __ leal(temp2, Address(dest, element_size * constant + offset));
2894 } else {
2895 __ leal(temp2, Address(dest, dest_pos.AsRegister<Register>(), ScaleFactor::TIMES_4, offset));
2896 }
2897
2898 if (length.IsConstant()) {
2899 int32_t constant = length.GetConstant()->AsIntConstant()->GetValue();
2900 __ leal(temp3, Address(temp1, element_size * constant));
2901 } else {
2902 __ leal(temp3, Address(temp1, length.AsRegister<Register>(), ScaleFactor::TIMES_4, 0));
2903 }
2904
2905 // Iterate over the arrays and do a raw copy of the objects. We don't need to
2906 // poison/unpoison.
2907 NearLabel loop, done;
2908 __ cmpl(temp1, temp3);
2909 __ j(kEqual, &done);
2910 __ Bind(&loop);
2911 __ pushl(Address(temp1, 0));
2912 __ cfi().AdjustCFAOffset(4);
2913 __ popl(Address(temp2, 0));
2914 __ cfi().AdjustCFAOffset(-4);
2915 __ addl(temp1, Immediate(element_size));
2916 __ addl(temp2, Immediate(element_size));
2917 __ cmpl(temp1, temp3);
2918 __ j(kNotEqual, &loop);
2919 __ Bind(&done);
2920
2921 // We only need one card marking on the destination array.
2922 codegen_->MarkGCCard(temp1,
2923 temp2,
2924 dest,
2925 Register(kNoRegister),
2926 /* value_can_be_null */ false);
2927
2928 __ Bind(slow_path->GetExitLabel());
2929}
2930
Aart Bik2f9fcc92016-03-01 15:16:54 -08002931UNIMPLEMENTED_INTRINSIC(X86, MathRoundDouble)
Aart Bik2f9fcc92016-03-01 15:16:54 -08002932UNIMPLEMENTED_INTRINSIC(X86, FloatIsInfinite)
2933UNIMPLEMENTED_INTRINSIC(X86, DoubleIsInfinite)
2934UNIMPLEMENTED_INTRINSIC(X86, IntegerHighestOneBit)
2935UNIMPLEMENTED_INTRINSIC(X86, LongHighestOneBit)
2936UNIMPLEMENTED_INTRINSIC(X86, IntegerLowestOneBit)
2937UNIMPLEMENTED_INTRINSIC(X86, LongLowestOneBit)
Mark Mendell09ed1a32015-03-25 08:30:06 -04002938
Aart Bik0e54c012016-03-04 12:08:31 -08002939// 1.8.
2940UNIMPLEMENTED_INTRINSIC(X86, UnsafeGetAndAddInt)
2941UNIMPLEMENTED_INTRINSIC(X86, UnsafeGetAndAddLong)
2942UNIMPLEMENTED_INTRINSIC(X86, UnsafeGetAndSetInt)
2943UNIMPLEMENTED_INTRINSIC(X86, UnsafeGetAndSetLong)
2944UNIMPLEMENTED_INTRINSIC(X86, UnsafeGetAndSetObject)
Aart Bik0e54c012016-03-04 12:08:31 -08002945
Aart Bik2f9fcc92016-03-01 15:16:54 -08002946UNREACHABLE_INTRINSICS(X86)
Roland Levillain4d027112015-07-01 15:41:14 +01002947
2948#undef __
2949
Mark Mendell09ed1a32015-03-25 08:30:06 -04002950} // namespace x86
2951} // namespace art