blob: 7e0d72930c587b92e817e45d124fae23805db2bc [file] [log] [blame]
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001/*
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_64.h"
18
Andreas Gampe21030dd2015-05-07 14:46:15 -070019#include <limits>
20
Mark Mendellfb8d2792015-03-31 22:16:59 -040021#include "arch/x86_64/instruction_set_features_x86_64.h"
Mathieu Chartiere401d142015-04-22 13:56:20 -070022#include "art_method-inl.h"
Mark Mendelld5897672015-08-12 21:16:41 -040023#include "base/bit_utils.h"
Andreas Gampe71fb52f2014-12-29 17:43:08 -080024#include "code_generator_x86_64.h"
25#include "entrypoints/quick/quick_entrypoints.h"
26#include "intrinsics.h"
Andreas Gampe85b62f22015-09-09 13:15:38 -070027#include "intrinsics_utils.h"
Andreas Gampe71fb52f2014-12-29 17:43:08 -080028#include "mirror/array-inl.h"
Andreas Gampe71fb52f2014-12-29 17:43:08 -080029#include "mirror/string.h"
30#include "thread.h"
31#include "utils/x86_64/assembler_x86_64.h"
32#include "utils/x86_64/constants_x86_64.h"
33
34namespace art {
35
36namespace x86_64 {
37
Mark Mendellfb8d2792015-03-31 22:16:59 -040038IntrinsicLocationsBuilderX86_64::IntrinsicLocationsBuilderX86_64(CodeGeneratorX86_64* codegen)
39 : arena_(codegen->GetGraph()->GetArena()), codegen_(codegen) {
40}
41
42
Andreas Gampe71fb52f2014-12-29 17:43:08 -080043X86_64Assembler* IntrinsicCodeGeneratorX86_64::GetAssembler() {
Roland Levillainb488b782015-10-22 11:38:49 +010044 return down_cast<X86_64Assembler*>(codegen_->GetAssembler());
Andreas Gampe71fb52f2014-12-29 17:43:08 -080045}
46
Andreas Gampe878d58c2015-01-15 23:24:00 -080047ArenaAllocator* IntrinsicCodeGeneratorX86_64::GetAllocator() {
Andreas Gampe71fb52f2014-12-29 17:43:08 -080048 return codegen_->GetGraph()->GetArena();
49}
50
51bool IntrinsicLocationsBuilderX86_64::TryDispatch(HInvoke* invoke) {
52 Dispatch(invoke);
Roland Levillain0d5a2812015-11-13 10:07:31 +000053 LocationSummary* res = invoke->GetLocations();
54 if (res == nullptr) {
55 return false;
56 }
Roland Levillain0d5a2812015-11-13 10:07:31 +000057 return res->Intrinsified();
Andreas Gampe71fb52f2014-12-29 17:43:08 -080058}
59
Roland Levillainec525fc2015-04-28 15:50:20 +010060static void MoveArguments(HInvoke* invoke, CodeGeneratorX86_64* codegen) {
Roland Levillain2d27c8e2015-04-28 15:48:45 +010061 InvokeDexCallingConventionVisitorX86_64 calling_convention_visitor;
Roland Levillainec525fc2015-04-28 15:50:20 +010062 IntrinsicVisitor::MoveArguments(invoke, codegen, &calling_convention_visitor);
Andreas Gampe71fb52f2014-12-29 17:43:08 -080063}
64
Andreas Gampe85b62f22015-09-09 13:15:38 -070065using IntrinsicSlowPathX86_64 = IntrinsicSlowPath<InvokeDexCallingConventionVisitorX86_64>;
Andreas Gampe71fb52f2014-12-29 17:43:08 -080066
Andreas Gampe71fb52f2014-12-29 17:43:08 -080067#define __ assembler->
68
69static void CreateFPToIntLocations(ArenaAllocator* arena, HInvoke* invoke) {
70 LocationSummary* locations = new (arena) LocationSummary(invoke,
71 LocationSummary::kNoCall,
72 kIntrinsified);
73 locations->SetInAt(0, Location::RequiresFpuRegister());
74 locations->SetOut(Location::RequiresRegister());
75}
76
77static void CreateIntToFPLocations(ArenaAllocator* arena, HInvoke* invoke) {
78 LocationSummary* locations = new (arena) LocationSummary(invoke,
79 LocationSummary::kNoCall,
80 kIntrinsified);
81 locations->SetInAt(0, Location::RequiresRegister());
82 locations->SetOut(Location::RequiresFpuRegister());
83}
84
85static void MoveFPToInt(LocationSummary* locations, bool is64bit, X86_64Assembler* assembler) {
86 Location input = locations->InAt(0);
87 Location output = locations->Out();
88 __ movd(output.AsRegister<CpuRegister>(), input.AsFpuRegister<XmmRegister>(), is64bit);
89}
90
91static void MoveIntToFP(LocationSummary* locations, bool is64bit, X86_64Assembler* assembler) {
92 Location input = locations->InAt(0);
93 Location output = locations->Out();
94 __ movd(output.AsFpuRegister<XmmRegister>(), input.AsRegister<CpuRegister>(), is64bit);
95}
96
97void IntrinsicLocationsBuilderX86_64::VisitDoubleDoubleToRawLongBits(HInvoke* invoke) {
98 CreateFPToIntLocations(arena_, invoke);
99}
100void IntrinsicLocationsBuilderX86_64::VisitDoubleLongBitsToDouble(HInvoke* invoke) {
101 CreateIntToFPLocations(arena_, invoke);
102}
103
104void IntrinsicCodeGeneratorX86_64::VisitDoubleDoubleToRawLongBits(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000105 MoveFPToInt(invoke->GetLocations(), /* is64bit */ true, GetAssembler());
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800106}
107void IntrinsicCodeGeneratorX86_64::VisitDoubleLongBitsToDouble(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000108 MoveIntToFP(invoke->GetLocations(), /* is64bit */ true, GetAssembler());
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800109}
110
111void IntrinsicLocationsBuilderX86_64::VisitFloatFloatToRawIntBits(HInvoke* invoke) {
112 CreateFPToIntLocations(arena_, invoke);
113}
114void IntrinsicLocationsBuilderX86_64::VisitFloatIntBitsToFloat(HInvoke* invoke) {
115 CreateIntToFPLocations(arena_, invoke);
116}
117
118void IntrinsicCodeGeneratorX86_64::VisitFloatFloatToRawIntBits(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000119 MoveFPToInt(invoke->GetLocations(), /* is64bit */ false, GetAssembler());
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800120}
121void IntrinsicCodeGeneratorX86_64::VisitFloatIntBitsToFloat(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000122 MoveIntToFP(invoke->GetLocations(), /* is64bit */ false, GetAssembler());
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800123}
124
125static void CreateIntToIntLocations(ArenaAllocator* arena, HInvoke* invoke) {
126 LocationSummary* locations = new (arena) LocationSummary(invoke,
127 LocationSummary::kNoCall,
128 kIntrinsified);
129 locations->SetInAt(0, Location::RequiresRegister());
130 locations->SetOut(Location::SameAsFirstInput());
131}
132
133static void GenReverseBytes(LocationSummary* locations,
134 Primitive::Type size,
135 X86_64Assembler* assembler) {
136 CpuRegister out = locations->Out().AsRegister<CpuRegister>();
137
138 switch (size) {
139 case Primitive::kPrimShort:
140 // TODO: Can be done with an xchg of 8b registers. This is straight from Quick.
141 __ bswapl(out);
142 __ sarl(out, Immediate(16));
143 break;
144 case Primitive::kPrimInt:
145 __ bswapl(out);
146 break;
147 case Primitive::kPrimLong:
148 __ bswapq(out);
149 break;
150 default:
151 LOG(FATAL) << "Unexpected size for reverse-bytes: " << size;
152 UNREACHABLE();
153 }
154}
155
156void IntrinsicLocationsBuilderX86_64::VisitIntegerReverseBytes(HInvoke* invoke) {
157 CreateIntToIntLocations(arena_, invoke);
158}
159
160void IntrinsicCodeGeneratorX86_64::VisitIntegerReverseBytes(HInvoke* invoke) {
161 GenReverseBytes(invoke->GetLocations(), Primitive::kPrimInt, GetAssembler());
162}
163
164void IntrinsicLocationsBuilderX86_64::VisitLongReverseBytes(HInvoke* invoke) {
165 CreateIntToIntLocations(arena_, invoke);
166}
167
168void IntrinsicCodeGeneratorX86_64::VisitLongReverseBytes(HInvoke* invoke) {
169 GenReverseBytes(invoke->GetLocations(), Primitive::kPrimLong, GetAssembler());
170}
171
172void IntrinsicLocationsBuilderX86_64::VisitShortReverseBytes(HInvoke* invoke) {
173 CreateIntToIntLocations(arena_, invoke);
174}
175
176void IntrinsicCodeGeneratorX86_64::VisitShortReverseBytes(HInvoke* invoke) {
177 GenReverseBytes(invoke->GetLocations(), Primitive::kPrimShort, GetAssembler());
178}
179
180
181// TODO: Consider Quick's way of doing Double abs through integer operations, as the immediate we
182// need is 64b.
183
184static void CreateFloatToFloatPlusTemps(ArenaAllocator* arena, HInvoke* invoke) {
185 // TODO: Enable memory operations when the assembler supports them.
186 LocationSummary* locations = new (arena) LocationSummary(invoke,
187 LocationSummary::kNoCall,
188 kIntrinsified);
189 locations->SetInAt(0, Location::RequiresFpuRegister());
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800190 locations->SetOut(Location::SameAsFirstInput());
Mark Mendellf55c3e02015-03-26 21:07:46 -0400191 locations->AddTemp(Location::RequiresFpuRegister()); // FP reg to hold mask.
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800192}
193
Mark Mendell39dcf552015-04-09 20:42:42 -0400194static void MathAbsFP(LocationSummary* locations,
195 bool is64bit,
196 X86_64Assembler* assembler,
197 CodeGeneratorX86_64* codegen) {
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800198 Location output = locations->Out();
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800199
Mark Mendellcfa410b2015-05-25 16:02:44 -0400200 DCHECK(output.IsFpuRegister());
201 XmmRegister xmm_temp = locations->GetTemp(0).AsFpuRegister<XmmRegister>();
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800202
Mark Mendellcfa410b2015-05-25 16:02:44 -0400203 // TODO: Can mask directly with constant area using pand if we can guarantee
204 // that the literal is aligned on a 16 byte boundary. This will avoid a
205 // temporary.
206 if (is64bit) {
207 __ movsd(xmm_temp, codegen->LiteralInt64Address(INT64_C(0x7FFFFFFFFFFFFFFF)));
208 __ andpd(output.AsFpuRegister<XmmRegister>(), xmm_temp);
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800209 } else {
Mark Mendellcfa410b2015-05-25 16:02:44 -0400210 __ movss(xmm_temp, codegen->LiteralInt32Address(INT32_C(0x7FFFFFFF)));
211 __ andps(output.AsFpuRegister<XmmRegister>(), xmm_temp);
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800212 }
213}
214
215void IntrinsicLocationsBuilderX86_64::VisitMathAbsDouble(HInvoke* invoke) {
216 CreateFloatToFloatPlusTemps(arena_, invoke);
217}
218
219void IntrinsicCodeGeneratorX86_64::VisitMathAbsDouble(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000220 MathAbsFP(invoke->GetLocations(), /* is64bit */ true, GetAssembler(), codegen_);
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800221}
222
223void IntrinsicLocationsBuilderX86_64::VisitMathAbsFloat(HInvoke* invoke) {
224 CreateFloatToFloatPlusTemps(arena_, invoke);
225}
226
227void IntrinsicCodeGeneratorX86_64::VisitMathAbsFloat(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000228 MathAbsFP(invoke->GetLocations(), /* is64bit */ false, GetAssembler(), codegen_);
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800229}
230
231static void CreateIntToIntPlusTemp(ArenaAllocator* arena, HInvoke* invoke) {
232 LocationSummary* locations = new (arena) LocationSummary(invoke,
233 LocationSummary::kNoCall,
234 kIntrinsified);
235 locations->SetInAt(0, Location::RequiresRegister());
236 locations->SetOut(Location::SameAsFirstInput());
237 locations->AddTemp(Location::RequiresRegister());
238}
239
240static void GenAbsInteger(LocationSummary* locations, bool is64bit, X86_64Assembler* assembler) {
241 Location output = locations->Out();
242 CpuRegister out = output.AsRegister<CpuRegister>();
243 CpuRegister mask = locations->GetTemp(0).AsRegister<CpuRegister>();
244
245 if (is64bit) {
246 // Create mask.
247 __ movq(mask, out);
248 __ sarq(mask, Immediate(63));
249 // Add mask.
250 __ addq(out, mask);
251 __ xorq(out, mask);
252 } else {
253 // Create mask.
254 __ movl(mask, out);
255 __ sarl(mask, Immediate(31));
256 // Add mask.
257 __ addl(out, mask);
258 __ xorl(out, mask);
259 }
260}
261
262void IntrinsicLocationsBuilderX86_64::VisitMathAbsInt(HInvoke* invoke) {
263 CreateIntToIntPlusTemp(arena_, invoke);
264}
265
266void IntrinsicCodeGeneratorX86_64::VisitMathAbsInt(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000267 GenAbsInteger(invoke->GetLocations(), /* is64bit */ false, GetAssembler());
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800268}
269
270void IntrinsicLocationsBuilderX86_64::VisitMathAbsLong(HInvoke* invoke) {
271 CreateIntToIntPlusTemp(arena_, invoke);
272}
273
274void IntrinsicCodeGeneratorX86_64::VisitMathAbsLong(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000275 GenAbsInteger(invoke->GetLocations(), /* is64bit */ true, GetAssembler());
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800276}
277
Mark Mendell39dcf552015-04-09 20:42:42 -0400278static void GenMinMaxFP(LocationSummary* locations,
279 bool is_min,
280 bool is_double,
281 X86_64Assembler* assembler,
282 CodeGeneratorX86_64* codegen) {
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800283 Location op1_loc = locations->InAt(0);
284 Location op2_loc = locations->InAt(1);
285 Location out_loc = locations->Out();
286 XmmRegister out = out_loc.AsFpuRegister<XmmRegister>();
287
288 // Shortcut for same input locations.
289 if (op1_loc.Equals(op2_loc)) {
290 DCHECK(out_loc.Equals(op1_loc));
291 return;
292 }
293
294 // (out := op1)
295 // out <=? op2
296 // if Nan jmp Nan_label
297 // if out is min jmp done
298 // if op2 is min jmp op2_label
299 // handle -0/+0
300 // jmp done
301 // Nan_label:
302 // out := NaN
303 // op2_label:
304 // out := op2
305 // done:
306 //
307 // This removes one jmp, but needs to copy one input (op1) to out.
308 //
Mark Mendellf55c3e02015-03-26 21:07:46 -0400309 // TODO: This is straight from Quick. Make NaN an out-of-line slowpath?
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800310
311 XmmRegister op2 = op2_loc.AsFpuRegister<XmmRegister>();
312
Mark Mendell0c9497d2015-08-21 09:30:05 -0400313 NearLabel nan, done, op2_label;
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800314 if (is_double) {
315 __ ucomisd(out, op2);
316 } else {
317 __ ucomiss(out, op2);
318 }
319
320 __ j(Condition::kParityEven, &nan);
321
322 __ j(is_min ? Condition::kAbove : Condition::kBelow, &op2_label);
323 __ j(is_min ? Condition::kBelow : Condition::kAbove, &done);
324
325 // Handle 0.0/-0.0.
326 if (is_min) {
327 if (is_double) {
328 __ orpd(out, op2);
329 } else {
330 __ orps(out, op2);
331 }
332 } else {
333 if (is_double) {
334 __ andpd(out, op2);
335 } else {
336 __ andps(out, op2);
337 }
338 }
339 __ jmp(&done);
340
341 // NaN handling.
342 __ Bind(&nan);
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800343 if (is_double) {
Mark Mendellf55c3e02015-03-26 21:07:46 -0400344 __ movsd(out, codegen->LiteralInt64Address(INT64_C(0x7FF8000000000000)));
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800345 } else {
Mark Mendellf55c3e02015-03-26 21:07:46 -0400346 __ movss(out, codegen->LiteralInt32Address(INT32_C(0x7FC00000)));
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800347 }
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800348 __ jmp(&done);
349
350 // out := op2;
351 __ Bind(&op2_label);
352 if (is_double) {
353 __ movsd(out, op2);
354 } else {
355 __ movss(out, op2);
356 }
357
358 // Done.
359 __ Bind(&done);
360}
361
Mark Mendellf55c3e02015-03-26 21:07:46 -0400362static void CreateFPFPToFP(ArenaAllocator* arena, HInvoke* invoke) {
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800363 LocationSummary* locations = new (arena) LocationSummary(invoke,
364 LocationSummary::kNoCall,
365 kIntrinsified);
366 locations->SetInAt(0, Location::RequiresFpuRegister());
367 locations->SetInAt(1, Location::RequiresFpuRegister());
368 // The following is sub-optimal, but all we can do for now. It would be fine to also accept
369 // the second input to be the output (we can simply swap inputs).
370 locations->SetOut(Location::SameAsFirstInput());
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800371}
372
373void IntrinsicLocationsBuilderX86_64::VisitMathMinDoubleDouble(HInvoke* invoke) {
Mark Mendellf55c3e02015-03-26 21:07:46 -0400374 CreateFPFPToFP(arena_, invoke);
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800375}
376
377void IntrinsicCodeGeneratorX86_64::VisitMathMinDoubleDouble(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000378 GenMinMaxFP(
379 invoke->GetLocations(), /* is_min */ true, /* is_double */ true, GetAssembler(), codegen_);
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800380}
381
382void IntrinsicLocationsBuilderX86_64::VisitMathMinFloatFloat(HInvoke* invoke) {
Mark Mendellf55c3e02015-03-26 21:07:46 -0400383 CreateFPFPToFP(arena_, invoke);
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800384}
385
386void IntrinsicCodeGeneratorX86_64::VisitMathMinFloatFloat(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000387 GenMinMaxFP(
388 invoke->GetLocations(), /* is_min */ true, /* is_double */ false, GetAssembler(), codegen_);
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800389}
390
391void IntrinsicLocationsBuilderX86_64::VisitMathMaxDoubleDouble(HInvoke* invoke) {
Mark Mendellf55c3e02015-03-26 21:07:46 -0400392 CreateFPFPToFP(arena_, invoke);
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800393}
394
395void IntrinsicCodeGeneratorX86_64::VisitMathMaxDoubleDouble(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000396 GenMinMaxFP(
397 invoke->GetLocations(), /* is_min */ false, /* is_double */ true, GetAssembler(), codegen_);
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800398}
399
400void IntrinsicLocationsBuilderX86_64::VisitMathMaxFloatFloat(HInvoke* invoke) {
Mark Mendellf55c3e02015-03-26 21:07:46 -0400401 CreateFPFPToFP(arena_, invoke);
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800402}
403
404void IntrinsicCodeGeneratorX86_64::VisitMathMaxFloatFloat(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000405 GenMinMaxFP(
406 invoke->GetLocations(), /* is_min */ false, /* is_double */ false, GetAssembler(), codegen_);
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800407}
408
409static void GenMinMax(LocationSummary* locations, bool is_min, bool is_long,
410 X86_64Assembler* assembler) {
411 Location op1_loc = locations->InAt(0);
412 Location op2_loc = locations->InAt(1);
413
414 // Shortcut for same input locations.
415 if (op1_loc.Equals(op2_loc)) {
416 // Can return immediately, as op1_loc == out_loc.
417 // Note: if we ever support separate registers, e.g., output into memory, we need to check for
418 // a copy here.
419 DCHECK(locations->Out().Equals(op1_loc));
420 return;
421 }
422
423 CpuRegister out = locations->Out().AsRegister<CpuRegister>();
424 CpuRegister op2 = op2_loc.AsRegister<CpuRegister>();
425
426 // (out := op1)
427 // out <=? op2
428 // if out is min jmp done
429 // out := op2
430 // done:
431
432 if (is_long) {
433 __ cmpq(out, op2);
434 } else {
435 __ cmpl(out, op2);
436 }
437
438 __ cmov(is_min ? Condition::kGreater : Condition::kLess, out, op2, is_long);
439}
440
441static void CreateIntIntToIntLocations(ArenaAllocator* arena, HInvoke* invoke) {
442 LocationSummary* locations = new (arena) LocationSummary(invoke,
443 LocationSummary::kNoCall,
444 kIntrinsified);
445 locations->SetInAt(0, Location::RequiresRegister());
446 locations->SetInAt(1, Location::RequiresRegister());
447 locations->SetOut(Location::SameAsFirstInput());
448}
449
450void IntrinsicLocationsBuilderX86_64::VisitMathMinIntInt(HInvoke* invoke) {
451 CreateIntIntToIntLocations(arena_, invoke);
452}
453
454void IntrinsicCodeGeneratorX86_64::VisitMathMinIntInt(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000455 GenMinMax(invoke->GetLocations(), /* is_min */ true, /* is_long */ false, GetAssembler());
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800456}
457
458void IntrinsicLocationsBuilderX86_64::VisitMathMinLongLong(HInvoke* invoke) {
459 CreateIntIntToIntLocations(arena_, invoke);
460}
461
462void IntrinsicCodeGeneratorX86_64::VisitMathMinLongLong(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000463 GenMinMax(invoke->GetLocations(), /* is_min */ true, /* is_long */ true, GetAssembler());
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800464}
465
466void IntrinsicLocationsBuilderX86_64::VisitMathMaxIntInt(HInvoke* invoke) {
467 CreateIntIntToIntLocations(arena_, invoke);
468}
469
470void IntrinsicCodeGeneratorX86_64::VisitMathMaxIntInt(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000471 GenMinMax(invoke->GetLocations(), /* is_min */ false, /* is_long */ false, GetAssembler());
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800472}
473
474void IntrinsicLocationsBuilderX86_64::VisitMathMaxLongLong(HInvoke* invoke) {
475 CreateIntIntToIntLocations(arena_, invoke);
476}
477
478void IntrinsicCodeGeneratorX86_64::VisitMathMaxLongLong(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000479 GenMinMax(invoke->GetLocations(), /* is_min */ false, /* is_long */ true, GetAssembler());
Andreas Gampe71fb52f2014-12-29 17:43:08 -0800480}
481
482static void CreateFPToFPLocations(ArenaAllocator* arena, HInvoke* invoke) {
483 LocationSummary* locations = new (arena) LocationSummary(invoke,
484 LocationSummary::kNoCall,
485 kIntrinsified);
486 locations->SetInAt(0, Location::RequiresFpuRegister());
487 locations->SetOut(Location::RequiresFpuRegister());
488}
489
490void IntrinsicLocationsBuilderX86_64::VisitMathSqrt(HInvoke* invoke) {
491 CreateFPToFPLocations(arena_, invoke);
492}
493
494void IntrinsicCodeGeneratorX86_64::VisitMathSqrt(HInvoke* invoke) {
495 LocationSummary* locations = invoke->GetLocations();
496 XmmRegister in = locations->InAt(0).AsFpuRegister<XmmRegister>();
497 XmmRegister out = locations->Out().AsFpuRegister<XmmRegister>();
498
499 GetAssembler()->sqrtsd(out, in);
500}
501
Mark Mendellfb8d2792015-03-31 22:16:59 -0400502static void InvokeOutOfLineIntrinsic(CodeGeneratorX86_64* codegen, HInvoke* invoke) {
Roland Levillainec525fc2015-04-28 15:50:20 +0100503 MoveArguments(invoke, codegen);
Mark Mendellfb8d2792015-03-31 22:16:59 -0400504
505 DCHECK(invoke->IsInvokeStaticOrDirect());
Nicolas Geoffray94015b92015-06-04 18:21:04 +0100506 codegen->GenerateStaticOrDirectCall(
507 invoke->AsInvokeStaticOrDirect(), Location::RegisterLocation(RDI));
Mark Mendellfb8d2792015-03-31 22:16:59 -0400508 codegen->RecordPcInfo(invoke, invoke->GetDexPc());
509
510 // Copy the result back to the expected output.
511 Location out = invoke->GetLocations()->Out();
512 if (out.IsValid()) {
513 DCHECK(out.IsRegister());
Andreas Gampe85b62f22015-09-09 13:15:38 -0700514 codegen->MoveFromReturnRegister(out, invoke->GetType());
Mark Mendellfb8d2792015-03-31 22:16:59 -0400515 }
516}
517
518static void CreateSSE41FPToFPLocations(ArenaAllocator* arena,
519 HInvoke* invoke,
520 CodeGeneratorX86_64* codegen) {
521 // Do we have instruction support?
522 if (codegen->GetInstructionSetFeatures().HasSSE4_1()) {
523 CreateFPToFPLocations(arena, invoke);
524 return;
525 }
526
527 // We have to fall back to a call to the intrinsic.
528 LocationSummary* locations = new (arena) LocationSummary(invoke,
Serban Constantinescu54ff4822016-07-07 18:03:19 +0100529 LocationSummary::kCallOnMainOnly);
Mark Mendellfb8d2792015-03-31 22:16:59 -0400530 InvokeRuntimeCallingConvention calling_convention;
531 locations->SetInAt(0, Location::RegisterLocation(calling_convention.GetFpuRegisterAt(0)));
532 locations->SetOut(Location::FpuRegisterLocation(XMM0));
533 // Needs to be RDI for the invoke.
534 locations->AddTemp(Location::RegisterLocation(RDI));
535}
536
537static void GenSSE41FPToFPIntrinsic(CodeGeneratorX86_64* codegen,
538 HInvoke* invoke,
539 X86_64Assembler* assembler,
540 int round_mode) {
541 LocationSummary* locations = invoke->GetLocations();
542 if (locations->WillCall()) {
543 InvokeOutOfLineIntrinsic(codegen, invoke);
544 } else {
545 XmmRegister in = locations->InAt(0).AsFpuRegister<XmmRegister>();
546 XmmRegister out = locations->Out().AsFpuRegister<XmmRegister>();
547 __ roundsd(out, in, Immediate(round_mode));
548 }
549}
550
551void IntrinsicLocationsBuilderX86_64::VisitMathCeil(HInvoke* invoke) {
552 CreateSSE41FPToFPLocations(arena_, invoke, codegen_);
553}
554
555void IntrinsicCodeGeneratorX86_64::VisitMathCeil(HInvoke* invoke) {
556 GenSSE41FPToFPIntrinsic(codegen_, invoke, GetAssembler(), 2);
557}
558
559void IntrinsicLocationsBuilderX86_64::VisitMathFloor(HInvoke* invoke) {
560 CreateSSE41FPToFPLocations(arena_, invoke, codegen_);
561}
562
563void IntrinsicCodeGeneratorX86_64::VisitMathFloor(HInvoke* invoke) {
564 GenSSE41FPToFPIntrinsic(codegen_, invoke, GetAssembler(), 1);
565}
566
567void IntrinsicLocationsBuilderX86_64::VisitMathRint(HInvoke* invoke) {
568 CreateSSE41FPToFPLocations(arena_, invoke, codegen_);
569}
570
571void IntrinsicCodeGeneratorX86_64::VisitMathRint(HInvoke* invoke) {
572 GenSSE41FPToFPIntrinsic(codegen_, invoke, GetAssembler(), 0);
573}
574
575static void CreateSSE41FPToIntLocations(ArenaAllocator* arena,
576 HInvoke* invoke,
577 CodeGeneratorX86_64* codegen) {
578 // Do we have instruction support?
579 if (codegen->GetInstructionSetFeatures().HasSSE4_1()) {
580 LocationSummary* locations = new (arena) LocationSummary(invoke,
581 LocationSummary::kNoCall,
582 kIntrinsified);
583 locations->SetInAt(0, Location::RequiresFpuRegister());
Pavel Vyssotski9ca25712015-07-31 13:03:17 +0600584 locations->SetOut(Location::RequiresRegister());
Mark Mendellfb8d2792015-03-31 22:16:59 -0400585 locations->AddTemp(Location::RequiresFpuRegister());
Mark Mendellfb8d2792015-03-31 22:16:59 -0400586 return;
587 }
588
589 // We have to fall back to a call to the intrinsic.
590 LocationSummary* locations = new (arena) LocationSummary(invoke,
Serban Constantinescu54ff4822016-07-07 18:03:19 +0100591 LocationSummary::kCallOnMainOnly);
Mark Mendellfb8d2792015-03-31 22:16:59 -0400592 InvokeRuntimeCallingConvention calling_convention;
593 locations->SetInAt(0, Location::RegisterLocation(calling_convention.GetFpuRegisterAt(0)));
594 locations->SetOut(Location::RegisterLocation(RAX));
595 // Needs to be RDI for the invoke.
596 locations->AddTemp(Location::RegisterLocation(RDI));
597}
598
599void IntrinsicLocationsBuilderX86_64::VisitMathRoundFloat(HInvoke* invoke) {
Andreas Gampee6d0d8d2015-12-28 09:54:29 -0800600 // See intrinsics.h.
601 if (kRoundIsPlusPointFive) {
602 CreateSSE41FPToIntLocations(arena_, invoke, codegen_);
603 }
Mark Mendellfb8d2792015-03-31 22:16:59 -0400604}
605
606void IntrinsicCodeGeneratorX86_64::VisitMathRoundFloat(HInvoke* invoke) {
607 LocationSummary* locations = invoke->GetLocations();
608 if (locations->WillCall()) {
609 InvokeOutOfLineIntrinsic(codegen_, invoke);
610 return;
611 }
612
613 // Implement RoundFloat as t1 = floor(input + 0.5f); convert to int.
614 XmmRegister in = locations->InAt(0).AsFpuRegister<XmmRegister>();
615 CpuRegister out = locations->Out().AsRegister<CpuRegister>();
Mark Mendell40741f32015-04-20 22:10:34 -0400616 XmmRegister inPlusPointFive = locations->GetTemp(0).AsFpuRegister<XmmRegister>();
Mark Mendell0c9497d2015-08-21 09:30:05 -0400617 NearLabel done, nan;
Mark Mendellfb8d2792015-03-31 22:16:59 -0400618 X86_64Assembler* assembler = GetAssembler();
619
Mark Mendell40741f32015-04-20 22:10:34 -0400620 // Load 0.5 into inPlusPointFive.
621 __ movss(inPlusPointFive, codegen_->LiteralFloatAddress(0.5f));
Mark Mendellfb8d2792015-03-31 22:16:59 -0400622
623 // Add in the input.
624 __ addss(inPlusPointFive, in);
625
626 // And truncate to an integer.
627 __ roundss(inPlusPointFive, inPlusPointFive, Immediate(1));
628
Pavel Vyssotski9ca25712015-07-31 13:03:17 +0600629 // Load maxInt into out.
630 codegen_->Load64BitValue(out, kPrimIntMax);
631
Mark Mendellfb8d2792015-03-31 22:16:59 -0400632 // if inPlusPointFive >= maxInt goto done
Mark Mendell40741f32015-04-20 22:10:34 -0400633 __ comiss(inPlusPointFive, codegen_->LiteralFloatAddress(static_cast<float>(kPrimIntMax)));
Mark Mendellfb8d2792015-03-31 22:16:59 -0400634 __ j(kAboveEqual, &done);
635
636 // if input == NaN goto nan
637 __ j(kUnordered, &nan);
638
639 // output = float-to-int-truncate(input)
640 __ cvttss2si(out, inPlusPointFive);
641 __ jmp(&done);
642 __ Bind(&nan);
643
644 // output = 0
645 __ xorl(out, out);
646 __ Bind(&done);
647}
648
649void IntrinsicLocationsBuilderX86_64::VisitMathRoundDouble(HInvoke* invoke) {
Andreas Gampee6d0d8d2015-12-28 09:54:29 -0800650 // See intrinsics.h.
651 if (kRoundIsPlusPointFive) {
652 CreateSSE41FPToIntLocations(arena_, invoke, codegen_);
653 }
Mark Mendellfb8d2792015-03-31 22:16:59 -0400654}
655
656void IntrinsicCodeGeneratorX86_64::VisitMathRoundDouble(HInvoke* invoke) {
657 LocationSummary* locations = invoke->GetLocations();
658 if (locations->WillCall()) {
659 InvokeOutOfLineIntrinsic(codegen_, invoke);
660 return;
661 }
662
663 // Implement RoundDouble as t1 = floor(input + 0.5); convert to long.
664 XmmRegister in = locations->InAt(0).AsFpuRegister<XmmRegister>();
665 CpuRegister out = locations->Out().AsRegister<CpuRegister>();
Mark Mendell40741f32015-04-20 22:10:34 -0400666 XmmRegister inPlusPointFive = locations->GetTemp(0).AsFpuRegister<XmmRegister>();
Mark Mendell0c9497d2015-08-21 09:30:05 -0400667 NearLabel done, nan;
Mark Mendellfb8d2792015-03-31 22:16:59 -0400668 X86_64Assembler* assembler = GetAssembler();
669
Mark Mendell40741f32015-04-20 22:10:34 -0400670 // Load 0.5 into inPlusPointFive.
671 __ movsd(inPlusPointFive, codegen_->LiteralDoubleAddress(0.5));
Mark Mendellfb8d2792015-03-31 22:16:59 -0400672
673 // Add in the input.
674 __ addsd(inPlusPointFive, in);
675
676 // And truncate to an integer.
677 __ roundsd(inPlusPointFive, inPlusPointFive, Immediate(1));
678
Pavel Vyssotski9ca25712015-07-31 13:03:17 +0600679 // Load maxLong into out.
680 codegen_->Load64BitValue(out, kPrimLongMax);
681
Mark Mendellfb8d2792015-03-31 22:16:59 -0400682 // if inPlusPointFive >= maxLong goto done
Mark Mendell40741f32015-04-20 22:10:34 -0400683 __ comisd(inPlusPointFive, codegen_->LiteralDoubleAddress(static_cast<double>(kPrimLongMax)));
Mark Mendellfb8d2792015-03-31 22:16:59 -0400684 __ j(kAboveEqual, &done);
685
686 // if input == NaN goto nan
687 __ j(kUnordered, &nan);
688
689 // output = double-to-long-truncate(input)
Roland Levillainbf84a3d2015-12-04 14:33:02 +0000690 __ cvttsd2si(out, inPlusPointFive, /* is64bit */ true);
Mark Mendellfb8d2792015-03-31 22:16:59 -0400691 __ jmp(&done);
692 __ Bind(&nan);
693
694 // output = 0
Mark Mendell92e83bf2015-05-07 11:25:03 -0400695 __ xorl(out, out);
Mark Mendellfb8d2792015-03-31 22:16:59 -0400696 __ Bind(&done);
697}
698
Mark Mendella4f12202015-08-06 15:23:34 -0400699static void CreateFPToFPCallLocations(ArenaAllocator* arena,
700 HInvoke* invoke) {
701 LocationSummary* locations = new (arena) LocationSummary(invoke,
Serban Constantinescu54ff4822016-07-07 18:03:19 +0100702 LocationSummary::kCallOnMainOnly,
Mark Mendella4f12202015-08-06 15:23:34 -0400703 kIntrinsified);
704 InvokeRuntimeCallingConvention calling_convention;
705 locations->SetInAt(0, Location::FpuRegisterLocation(calling_convention.GetFpuRegisterAt(0)));
706 locations->SetOut(Location::FpuRegisterLocation(XMM0));
707
708 // We have to ensure that the native code doesn't clobber the XMM registers which are
709 // non-volatile for ART, but volatile for Native calls. This will ensure that they are
710 // saved in the prologue and properly restored.
711 for (auto fp_reg : non_volatile_xmm_regs) {
712 locations->AddTemp(Location::FpuRegisterLocation(fp_reg));
713 }
714}
715
716static void GenFPToFPCall(HInvoke* invoke, CodeGeneratorX86_64* codegen,
717 QuickEntrypointEnum entry) {
718 LocationSummary* locations = invoke->GetLocations();
719 DCHECK(locations->WillCall());
720 DCHECK(invoke->IsInvokeStaticOrDirect());
721 X86_64Assembler* assembler = codegen->GetAssembler();
722
Andreas Gampe542451c2016-07-26 09:02:02 -0700723 __ gs()->call(Address::Absolute(GetThreadOffset<kX86_64PointerSize>(entry), true));
Mark Mendella4f12202015-08-06 15:23:34 -0400724 codegen->RecordPcInfo(invoke, invoke->GetDexPc());
725}
726
727void IntrinsicLocationsBuilderX86_64::VisitMathCos(HInvoke* invoke) {
728 CreateFPToFPCallLocations(arena_, invoke);
729}
730
731void IntrinsicCodeGeneratorX86_64::VisitMathCos(HInvoke* invoke) {
732 GenFPToFPCall(invoke, codegen_, kQuickCos);
733}
734
735void IntrinsicLocationsBuilderX86_64::VisitMathSin(HInvoke* invoke) {
736 CreateFPToFPCallLocations(arena_, invoke);
737}
738
739void IntrinsicCodeGeneratorX86_64::VisitMathSin(HInvoke* invoke) {
740 GenFPToFPCall(invoke, codegen_, kQuickSin);
741}
742
743void IntrinsicLocationsBuilderX86_64::VisitMathAcos(HInvoke* invoke) {
744 CreateFPToFPCallLocations(arena_, invoke);
745}
746
747void IntrinsicCodeGeneratorX86_64::VisitMathAcos(HInvoke* invoke) {
748 GenFPToFPCall(invoke, codegen_, kQuickAcos);
749}
750
751void IntrinsicLocationsBuilderX86_64::VisitMathAsin(HInvoke* invoke) {
752 CreateFPToFPCallLocations(arena_, invoke);
753}
754
755void IntrinsicCodeGeneratorX86_64::VisitMathAsin(HInvoke* invoke) {
756 GenFPToFPCall(invoke, codegen_, kQuickAsin);
757}
758
759void IntrinsicLocationsBuilderX86_64::VisitMathAtan(HInvoke* invoke) {
760 CreateFPToFPCallLocations(arena_, invoke);
761}
762
763void IntrinsicCodeGeneratorX86_64::VisitMathAtan(HInvoke* invoke) {
764 GenFPToFPCall(invoke, codegen_, kQuickAtan);
765}
766
767void IntrinsicLocationsBuilderX86_64::VisitMathCbrt(HInvoke* invoke) {
768 CreateFPToFPCallLocations(arena_, invoke);
769}
770
771void IntrinsicCodeGeneratorX86_64::VisitMathCbrt(HInvoke* invoke) {
772 GenFPToFPCall(invoke, codegen_, kQuickCbrt);
773}
774
775void IntrinsicLocationsBuilderX86_64::VisitMathCosh(HInvoke* invoke) {
776 CreateFPToFPCallLocations(arena_, invoke);
777}
778
779void IntrinsicCodeGeneratorX86_64::VisitMathCosh(HInvoke* invoke) {
780 GenFPToFPCall(invoke, codegen_, kQuickCosh);
781}
782
783void IntrinsicLocationsBuilderX86_64::VisitMathExp(HInvoke* invoke) {
784 CreateFPToFPCallLocations(arena_, invoke);
785}
786
787void IntrinsicCodeGeneratorX86_64::VisitMathExp(HInvoke* invoke) {
788 GenFPToFPCall(invoke, codegen_, kQuickExp);
789}
790
791void IntrinsicLocationsBuilderX86_64::VisitMathExpm1(HInvoke* invoke) {
792 CreateFPToFPCallLocations(arena_, invoke);
793}
794
795void IntrinsicCodeGeneratorX86_64::VisitMathExpm1(HInvoke* invoke) {
796 GenFPToFPCall(invoke, codegen_, kQuickExpm1);
797}
798
799void IntrinsicLocationsBuilderX86_64::VisitMathLog(HInvoke* invoke) {
800 CreateFPToFPCallLocations(arena_, invoke);
801}
802
803void IntrinsicCodeGeneratorX86_64::VisitMathLog(HInvoke* invoke) {
804 GenFPToFPCall(invoke, codegen_, kQuickLog);
805}
806
807void IntrinsicLocationsBuilderX86_64::VisitMathLog10(HInvoke* invoke) {
808 CreateFPToFPCallLocations(arena_, invoke);
809}
810
811void IntrinsicCodeGeneratorX86_64::VisitMathLog10(HInvoke* invoke) {
812 GenFPToFPCall(invoke, codegen_, kQuickLog10);
813}
814
815void IntrinsicLocationsBuilderX86_64::VisitMathSinh(HInvoke* invoke) {
816 CreateFPToFPCallLocations(arena_, invoke);
817}
818
819void IntrinsicCodeGeneratorX86_64::VisitMathSinh(HInvoke* invoke) {
820 GenFPToFPCall(invoke, codegen_, kQuickSinh);
821}
822
823void IntrinsicLocationsBuilderX86_64::VisitMathTan(HInvoke* invoke) {
824 CreateFPToFPCallLocations(arena_, invoke);
825}
826
827void IntrinsicCodeGeneratorX86_64::VisitMathTan(HInvoke* invoke) {
828 GenFPToFPCall(invoke, codegen_, kQuickTan);
829}
830
831void IntrinsicLocationsBuilderX86_64::VisitMathTanh(HInvoke* invoke) {
832 CreateFPToFPCallLocations(arena_, invoke);
833}
834
835void IntrinsicCodeGeneratorX86_64::VisitMathTanh(HInvoke* invoke) {
836 GenFPToFPCall(invoke, codegen_, kQuickTanh);
837}
838
839static void CreateFPFPToFPCallLocations(ArenaAllocator* arena,
840 HInvoke* invoke) {
841 LocationSummary* locations = new (arena) LocationSummary(invoke,
Serban Constantinescu54ff4822016-07-07 18:03:19 +0100842 LocationSummary::kCallOnMainOnly,
Mark Mendella4f12202015-08-06 15:23:34 -0400843 kIntrinsified);
844 InvokeRuntimeCallingConvention calling_convention;
845 locations->SetInAt(0, Location::FpuRegisterLocation(calling_convention.GetFpuRegisterAt(0)));
846 locations->SetInAt(1, Location::FpuRegisterLocation(calling_convention.GetFpuRegisterAt(1)));
847 locations->SetOut(Location::FpuRegisterLocation(XMM0));
848
849 // We have to ensure that the native code doesn't clobber the XMM registers which are
850 // non-volatile for ART, but volatile for Native calls. This will ensure that they are
851 // saved in the prologue and properly restored.
852 for (auto fp_reg : non_volatile_xmm_regs) {
853 locations->AddTemp(Location::FpuRegisterLocation(fp_reg));
854 }
855}
856
857void IntrinsicLocationsBuilderX86_64::VisitMathAtan2(HInvoke* invoke) {
858 CreateFPFPToFPCallLocations(arena_, invoke);
859}
860
861void IntrinsicCodeGeneratorX86_64::VisitMathAtan2(HInvoke* invoke) {
862 GenFPToFPCall(invoke, codegen_, kQuickAtan2);
863}
864
865void IntrinsicLocationsBuilderX86_64::VisitMathHypot(HInvoke* invoke) {
866 CreateFPFPToFPCallLocations(arena_, invoke);
867}
868
869void IntrinsicCodeGeneratorX86_64::VisitMathHypot(HInvoke* invoke) {
870 GenFPToFPCall(invoke, codegen_, kQuickHypot);
871}
872
873void IntrinsicLocationsBuilderX86_64::VisitMathNextAfter(HInvoke* invoke) {
874 CreateFPFPToFPCallLocations(arena_, invoke);
875}
876
877void IntrinsicCodeGeneratorX86_64::VisitMathNextAfter(HInvoke* invoke) {
878 GenFPToFPCall(invoke, codegen_, kQuickNextAfter);
879}
880
Mark Mendell6bc53a92015-07-01 14:26:52 -0400881void IntrinsicLocationsBuilderX86_64::VisitSystemArrayCopyChar(HInvoke* invoke) {
882 // Check to see if we have known failures that will cause us to have to bail out
883 // to the runtime, and just generate the runtime call directly.
884 HIntConstant* src_pos = invoke->InputAt(1)->AsIntConstant();
885 HIntConstant* dest_pos = invoke->InputAt(3)->AsIntConstant();
886
887 // The positions must be non-negative.
888 if ((src_pos != nullptr && src_pos->GetValue() < 0) ||
889 (dest_pos != nullptr && dest_pos->GetValue() < 0)) {
890 // We will have to fail anyways.
891 return;
892 }
893
894 // The length must be > 0.
895 HIntConstant* length = invoke->InputAt(4)->AsIntConstant();
896 if (length != nullptr) {
897 int32_t len = length->GetValue();
898 if (len < 0) {
899 // Just call as normal.
900 return;
901 }
902 }
903
904 LocationSummary* locations = new (arena_) LocationSummary(invoke,
905 LocationSummary::kCallOnSlowPath,
906 kIntrinsified);
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +0100907 // arraycopy(Object src, int src_pos, Object dest, int dest_pos, int length).
Mark Mendell6bc53a92015-07-01 14:26:52 -0400908 locations->SetInAt(0, Location::RequiresRegister());
909 locations->SetInAt(1, Location::RegisterOrConstant(invoke->InputAt(1)));
910 locations->SetInAt(2, Location::RequiresRegister());
911 locations->SetInAt(3, Location::RegisterOrConstant(invoke->InputAt(3)));
912 locations->SetInAt(4, Location::RegisterOrConstant(invoke->InputAt(4)));
913
914 // And we need some temporaries. We will use REP MOVSW, so we need fixed registers.
915 locations->AddTemp(Location::RegisterLocation(RSI));
916 locations->AddTemp(Location::RegisterLocation(RDI));
917 locations->AddTemp(Location::RegisterLocation(RCX));
918}
919
920static void CheckPosition(X86_64Assembler* assembler,
921 Location pos,
922 CpuRegister input,
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +0100923 Location length,
Andreas Gampe85b62f22015-09-09 13:15:38 -0700924 SlowPathCode* slow_path,
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +0100925 CpuRegister temp,
926 bool length_is_input_length = false) {
927 // Where is the length in the Array?
Mark Mendell6bc53a92015-07-01 14:26:52 -0400928 const uint32_t length_offset = mirror::Array::LengthOffset().Uint32Value();
929
930 if (pos.IsConstant()) {
931 int32_t pos_const = pos.GetConstant()->AsIntConstant()->GetValue();
932 if (pos_const == 0) {
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +0100933 if (!length_is_input_length) {
934 // Check that length(input) >= length.
935 if (length.IsConstant()) {
936 __ cmpl(Address(input, length_offset),
937 Immediate(length.GetConstant()->AsIntConstant()->GetValue()));
938 } else {
939 __ cmpl(Address(input, length_offset), length.AsRegister<CpuRegister>());
940 }
941 __ j(kLess, slow_path->GetEntryLabel());
942 }
Mark Mendell6bc53a92015-07-01 14:26:52 -0400943 } else {
944 // Check that length(input) >= pos.
Nicolas Geoffrayfea1abd2016-07-06 12:09:12 +0100945 __ movl(temp, Address(input, length_offset));
946 __ subl(temp, Immediate(pos_const));
Mark Mendell6bc53a92015-07-01 14:26:52 -0400947 __ j(kLess, slow_path->GetEntryLabel());
948
949 // Check that (length(input) - pos) >= length.
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +0100950 if (length.IsConstant()) {
951 __ cmpl(temp, Immediate(length.GetConstant()->AsIntConstant()->GetValue()));
952 } else {
953 __ cmpl(temp, length.AsRegister<CpuRegister>());
954 }
Mark Mendell6bc53a92015-07-01 14:26:52 -0400955 __ j(kLess, slow_path->GetEntryLabel());
956 }
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +0100957 } else if (length_is_input_length) {
958 // The only way the copy can succeed is if pos is zero.
959 CpuRegister pos_reg = pos.AsRegister<CpuRegister>();
960 __ testl(pos_reg, pos_reg);
961 __ j(kNotEqual, slow_path->GetEntryLabel());
Mark Mendell6bc53a92015-07-01 14:26:52 -0400962 } else {
963 // Check that pos >= 0.
964 CpuRegister pos_reg = pos.AsRegister<CpuRegister>();
965 __ testl(pos_reg, pos_reg);
966 __ j(kLess, slow_path->GetEntryLabel());
967
968 // Check that pos <= length(input).
969 __ cmpl(Address(input, length_offset), pos_reg);
970 __ j(kLess, slow_path->GetEntryLabel());
971
972 // Check that (length(input) - pos) >= length.
973 __ movl(temp, Address(input, length_offset));
974 __ subl(temp, pos_reg);
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +0100975 if (length.IsConstant()) {
976 __ cmpl(temp, Immediate(length.GetConstant()->AsIntConstant()->GetValue()));
977 } else {
978 __ cmpl(temp, length.AsRegister<CpuRegister>());
979 }
Mark Mendell6bc53a92015-07-01 14:26:52 -0400980 __ j(kLess, slow_path->GetEntryLabel());
981 }
982}
983
984void IntrinsicCodeGeneratorX86_64::VisitSystemArrayCopyChar(HInvoke* invoke) {
985 X86_64Assembler* assembler = GetAssembler();
986 LocationSummary* locations = invoke->GetLocations();
987
988 CpuRegister src = locations->InAt(0).AsRegister<CpuRegister>();
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +0100989 Location src_pos = locations->InAt(1);
Mark Mendell6bc53a92015-07-01 14:26:52 -0400990 CpuRegister dest = locations->InAt(2).AsRegister<CpuRegister>();
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +0100991 Location dest_pos = locations->InAt(3);
Mark Mendell6bc53a92015-07-01 14:26:52 -0400992 Location length = locations->InAt(4);
993
994 // Temporaries that we need for MOVSW.
995 CpuRegister src_base = locations->GetTemp(0).AsRegister<CpuRegister>();
996 DCHECK_EQ(src_base.AsRegister(), RSI);
997 CpuRegister dest_base = locations->GetTemp(1).AsRegister<CpuRegister>();
998 DCHECK_EQ(dest_base.AsRegister(), RDI);
999 CpuRegister count = locations->GetTemp(2).AsRegister<CpuRegister>();
1000 DCHECK_EQ(count.AsRegister(), RCX);
1001
Andreas Gampe85b62f22015-09-09 13:15:38 -07001002 SlowPathCode* slow_path = new (GetAllocator()) IntrinsicSlowPathX86_64(invoke);
Mark Mendell6bc53a92015-07-01 14:26:52 -04001003 codegen_->AddSlowPath(slow_path);
1004
1005 // Bail out if the source and destination are the same.
1006 __ cmpl(src, dest);
1007 __ j(kEqual, slow_path->GetEntryLabel());
1008
1009 // Bail out if the source is null.
1010 __ testl(src, src);
1011 __ j(kEqual, slow_path->GetEntryLabel());
1012
1013 // Bail out if the destination is null.
1014 __ testl(dest, dest);
1015 __ j(kEqual, slow_path->GetEntryLabel());
1016
1017 // If the length is negative, bail out.
1018 // We have already checked in the LocationsBuilder for the constant case.
1019 if (!length.IsConstant()) {
1020 __ testl(length.AsRegister<CpuRegister>(), length.AsRegister<CpuRegister>());
1021 __ j(kLess, slow_path->GetEntryLabel());
1022 }
1023
Nicolas Geoffrayfea1abd2016-07-06 12:09:12 +01001024 // Validity checks: source. Use src_base as a temporary register.
1025 CheckPosition(assembler, src_pos, src, length, slow_path, src_base);
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001026
Nicolas Geoffrayfea1abd2016-07-06 12:09:12 +01001027 // Validity checks: dest. Use src_base as a temporary register.
1028 CheckPosition(assembler, dest_pos, dest, length, slow_path, src_base);
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001029
Mark Mendell6bc53a92015-07-01 14:26:52 -04001030 // We need the count in RCX.
1031 if (length.IsConstant()) {
1032 __ movl(count, Immediate(length.GetConstant()->AsIntConstant()->GetValue()));
1033 } else {
1034 __ movl(count, length.AsRegister<CpuRegister>());
1035 }
1036
Mark Mendell6bc53a92015-07-01 14:26:52 -04001037 // Okay, everything checks out. Finally time to do the copy.
1038 // Check assumption that sizeof(Char) is 2 (used in scaling below).
1039 const size_t char_size = Primitive::ComponentSize(Primitive::kPrimChar);
1040 DCHECK_EQ(char_size, 2u);
1041
1042 const uint32_t data_offset = mirror::Array::DataOffset(char_size).Uint32Value();
1043
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001044 if (src_pos.IsConstant()) {
1045 int32_t src_pos_const = src_pos.GetConstant()->AsIntConstant()->GetValue();
1046 __ leal(src_base, Address(src, char_size * src_pos_const + data_offset));
Mark Mendell6bc53a92015-07-01 14:26:52 -04001047 } else {
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001048 __ leal(src_base, Address(src, src_pos.AsRegister<CpuRegister>(),
Mark Mendell6bc53a92015-07-01 14:26:52 -04001049 ScaleFactor::TIMES_2, data_offset));
1050 }
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001051 if (dest_pos.IsConstant()) {
1052 int32_t dest_pos_const = dest_pos.GetConstant()->AsIntConstant()->GetValue();
1053 __ leal(dest_base, Address(dest, char_size * dest_pos_const + data_offset));
Mark Mendell6bc53a92015-07-01 14:26:52 -04001054 } else {
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001055 __ leal(dest_base, Address(dest, dest_pos.AsRegister<CpuRegister>(),
Mark Mendell6bc53a92015-07-01 14:26:52 -04001056 ScaleFactor::TIMES_2, data_offset));
1057 }
1058
1059 // Do the move.
1060 __ rep_movsw();
1061
1062 __ Bind(slow_path->GetExitLabel());
1063}
1064
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001065
1066void IntrinsicLocationsBuilderX86_64::VisitSystemArrayCopy(HInvoke* invoke) {
Roland Levillain3d312422016-06-23 13:53:42 +01001067 // TODO(rpl): Implement read barriers in the SystemArrayCopy
1068 // intrinsic and re-enable it (b/29516905).
1069 if (kEmitCompilerReadBarrier) {
1070 return;
1071 }
1072
Nicolas Geoffray5bd05a52015-10-13 09:48:30 +01001073 CodeGenerator::CreateSystemArrayCopyLocationSummary(invoke);
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001074}
1075
1076void IntrinsicCodeGeneratorX86_64::VisitSystemArrayCopy(HInvoke* invoke) {
Roland Levillain3d312422016-06-23 13:53:42 +01001077 // TODO(rpl): Implement read barriers in the SystemArrayCopy
1078 // intrinsic and re-enable it (b/29516905).
1079 DCHECK(!kEmitCompilerReadBarrier);
1080
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001081 X86_64Assembler* assembler = GetAssembler();
1082 LocationSummary* locations = invoke->GetLocations();
1083
1084 uint32_t class_offset = mirror::Object::ClassOffset().Int32Value();
1085 uint32_t super_offset = mirror::Class::SuperClassOffset().Int32Value();
1086 uint32_t component_offset = mirror::Class::ComponentTypeOffset().Int32Value();
1087 uint32_t primitive_offset = mirror::Class::PrimitiveTypeOffset().Int32Value();
1088
1089 CpuRegister src = locations->InAt(0).AsRegister<CpuRegister>();
1090 Location src_pos = locations->InAt(1);
1091 CpuRegister dest = locations->InAt(2).AsRegister<CpuRegister>();
1092 Location dest_pos = locations->InAt(3);
1093 Location length = locations->InAt(4);
1094 CpuRegister temp1 = locations->GetTemp(0).AsRegister<CpuRegister>();
1095 CpuRegister temp2 = locations->GetTemp(1).AsRegister<CpuRegister>();
1096 CpuRegister temp3 = locations->GetTemp(2).AsRegister<CpuRegister>();
1097
1098 SlowPathCode* slow_path = new (GetAllocator()) IntrinsicSlowPathX86_64(invoke);
1099 codegen_->AddSlowPath(slow_path);
1100
Roland Levillainebea3d22016-04-12 15:42:57 +01001101 NearLabel conditions_on_positions_validated;
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001102 SystemArrayCopyOptimizations optimizations(invoke);
1103
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001104 // If source and destination are the same, we go to slow path if we need to do
1105 // forward copying.
1106 if (src_pos.IsConstant()) {
1107 int32_t src_pos_constant = src_pos.GetConstant()->AsIntConstant()->GetValue();
1108 if (dest_pos.IsConstant()) {
Nicolas Geoffray9f65db82016-07-07 12:07:42 +01001109 int32_t dest_pos_constant = dest_pos.GetConstant()->AsIntConstant()->GetValue();
1110 if (optimizations.GetDestinationIsSource()) {
1111 // Checked when building locations.
1112 DCHECK_GE(src_pos_constant, dest_pos_constant);
1113 } else if (src_pos_constant < dest_pos_constant) {
1114 __ cmpl(src, dest);
1115 __ j(kEqual, slow_path->GetEntryLabel());
1116 }
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001117 } else {
1118 if (!optimizations.GetDestinationIsSource()) {
Nicolas Geoffray9f65db82016-07-07 12:07:42 +01001119 __ cmpl(src, dest);
Roland Levillainebea3d22016-04-12 15:42:57 +01001120 __ j(kNotEqual, &conditions_on_positions_validated);
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001121 }
1122 __ cmpl(dest_pos.AsRegister<CpuRegister>(), Immediate(src_pos_constant));
1123 __ j(kGreater, slow_path->GetEntryLabel());
1124 }
1125 } else {
1126 if (!optimizations.GetDestinationIsSource()) {
Nicolas Geoffray9f65db82016-07-07 12:07:42 +01001127 __ cmpl(src, dest);
Roland Levillainebea3d22016-04-12 15:42:57 +01001128 __ j(kNotEqual, &conditions_on_positions_validated);
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001129 }
1130 if (dest_pos.IsConstant()) {
1131 int32_t dest_pos_constant = dest_pos.GetConstant()->AsIntConstant()->GetValue();
1132 __ cmpl(src_pos.AsRegister<CpuRegister>(), Immediate(dest_pos_constant));
1133 __ j(kLess, slow_path->GetEntryLabel());
1134 } else {
1135 __ cmpl(src_pos.AsRegister<CpuRegister>(), dest_pos.AsRegister<CpuRegister>());
1136 __ j(kLess, slow_path->GetEntryLabel());
1137 }
1138 }
1139
Roland Levillainebea3d22016-04-12 15:42:57 +01001140 __ Bind(&conditions_on_positions_validated);
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001141
1142 if (!optimizations.GetSourceIsNotNull()) {
1143 // Bail out if the source is null.
1144 __ testl(src, src);
1145 __ j(kEqual, slow_path->GetEntryLabel());
1146 }
1147
1148 if (!optimizations.GetDestinationIsNotNull() && !optimizations.GetDestinationIsSource()) {
1149 // Bail out if the destination is null.
1150 __ testl(dest, dest);
1151 __ j(kEqual, slow_path->GetEntryLabel());
1152 }
1153
1154 // If the length is negative, bail out.
1155 // We have already checked in the LocationsBuilder for the constant case.
1156 if (!length.IsConstant() &&
1157 !optimizations.GetCountIsSourceLength() &&
1158 !optimizations.GetCountIsDestinationLength()) {
1159 __ testl(length.AsRegister<CpuRegister>(), length.AsRegister<CpuRegister>());
1160 __ j(kLess, slow_path->GetEntryLabel());
1161 }
1162
1163 // Validity checks: source.
1164 CheckPosition(assembler,
1165 src_pos,
1166 src,
1167 length,
1168 slow_path,
1169 temp1,
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001170 optimizations.GetCountIsSourceLength());
1171
1172 // Validity checks: dest.
1173 CheckPosition(assembler,
1174 dest_pos,
1175 dest,
1176 length,
1177 slow_path,
1178 temp1,
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001179 optimizations.GetCountIsDestinationLength());
1180
1181 if (!optimizations.GetDoesNotNeedTypeCheck()) {
1182 // Check whether all elements of the source array are assignable to the component
1183 // type of the destination array. We do two checks: the classes are the same,
1184 // or the destination is Object[]. If none of these checks succeed, we go to the
1185 // slow path.
1186 __ movl(temp1, Address(dest, class_offset));
1187 __ movl(temp2, Address(src, class_offset));
1188 bool did_unpoison = false;
1189 if (!optimizations.GetDestinationIsNonPrimitiveArray() ||
1190 !optimizations.GetSourceIsNonPrimitiveArray()) {
Roland Levillainebea3d22016-04-12 15:42:57 +01001191 // One or two of the references need to be unpoisoned. Unpoison them
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001192 // both to make the identity check valid.
1193 __ MaybeUnpoisonHeapReference(temp1);
1194 __ MaybeUnpoisonHeapReference(temp2);
1195 did_unpoison = true;
1196 }
1197
1198 if (!optimizations.GetDestinationIsNonPrimitiveArray()) {
1199 // Bail out if the destination is not a non primitive array.
Roland Levillainebea3d22016-04-12 15:42:57 +01001200 // /* HeapReference<Class> */ TMP = temp1->component_type_
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001201 __ movl(CpuRegister(TMP), Address(temp1, component_offset));
1202 __ testl(CpuRegister(TMP), CpuRegister(TMP));
1203 __ j(kEqual, slow_path->GetEntryLabel());
1204 __ MaybeUnpoisonHeapReference(CpuRegister(TMP));
1205 __ cmpw(Address(CpuRegister(TMP), primitive_offset), Immediate(Primitive::kPrimNot));
1206 __ j(kNotEqual, slow_path->GetEntryLabel());
1207 }
1208
1209 if (!optimizations.GetSourceIsNonPrimitiveArray()) {
1210 // Bail out if the source is not a non primitive array.
Roland Levillainebea3d22016-04-12 15:42:57 +01001211 // /* HeapReference<Class> */ TMP = temp2->component_type_
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001212 __ movl(CpuRegister(TMP), Address(temp2, component_offset));
1213 __ testl(CpuRegister(TMP), CpuRegister(TMP));
1214 __ j(kEqual, slow_path->GetEntryLabel());
1215 __ MaybeUnpoisonHeapReference(CpuRegister(TMP));
1216 __ cmpw(Address(CpuRegister(TMP), primitive_offset), Immediate(Primitive::kPrimNot));
1217 __ j(kNotEqual, slow_path->GetEntryLabel());
1218 }
1219
1220 __ cmpl(temp1, temp2);
1221
1222 if (optimizations.GetDestinationIsTypedObjectArray()) {
1223 NearLabel do_copy;
1224 __ j(kEqual, &do_copy);
1225 if (!did_unpoison) {
1226 __ MaybeUnpoisonHeapReference(temp1);
1227 }
Roland Levillainebea3d22016-04-12 15:42:57 +01001228 // /* HeapReference<Class> */ temp1 = temp1->component_type_
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001229 __ movl(temp1, Address(temp1, component_offset));
1230 __ MaybeUnpoisonHeapReference(temp1);
Roland Levillainebea3d22016-04-12 15:42:57 +01001231 // /* HeapReference<Class> */ temp1 = temp1->super_class_
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001232 __ movl(temp1, Address(temp1, super_offset));
1233 // No need to unpoison the result, we're comparing against null.
1234 __ testl(temp1, temp1);
1235 __ j(kNotEqual, slow_path->GetEntryLabel());
1236 __ Bind(&do_copy);
1237 } else {
1238 __ j(kNotEqual, slow_path->GetEntryLabel());
1239 }
1240 } else if (!optimizations.GetSourceIsNonPrimitiveArray()) {
1241 DCHECK(optimizations.GetDestinationIsNonPrimitiveArray());
1242 // Bail out if the source is not a non primitive array.
Roland Levillainebea3d22016-04-12 15:42:57 +01001243 // /* HeapReference<Class> */ temp1 = src->klass_
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001244 __ movl(temp1, Address(src, class_offset));
1245 __ MaybeUnpoisonHeapReference(temp1);
Roland Levillainebea3d22016-04-12 15:42:57 +01001246 // /* HeapReference<Class> */ TMP = temp1->component_type_
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001247 __ movl(CpuRegister(TMP), Address(temp1, component_offset));
1248 __ testl(CpuRegister(TMP), CpuRegister(TMP));
1249 __ j(kEqual, slow_path->GetEntryLabel());
1250 __ MaybeUnpoisonHeapReference(CpuRegister(TMP));
1251 __ cmpw(Address(CpuRegister(TMP), primitive_offset), Immediate(Primitive::kPrimNot));
1252 __ j(kNotEqual, slow_path->GetEntryLabel());
1253 }
1254
1255 // Compute base source address, base destination address, and end source address.
1256
Nicolas Geoffrayfea1abd2016-07-06 12:09:12 +01001257 int32_t element_size = Primitive::ComponentSize(Primitive::kPrimNot);
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001258 uint32_t offset = mirror::Array::DataOffset(element_size).Uint32Value();
1259 if (src_pos.IsConstant()) {
1260 int32_t constant = src_pos.GetConstant()->AsIntConstant()->GetValue();
1261 __ leal(temp1, Address(src, element_size * constant + offset));
1262 } else {
1263 __ leal(temp1, Address(src, src_pos.AsRegister<CpuRegister>(), ScaleFactor::TIMES_4, offset));
1264 }
1265
1266 if (dest_pos.IsConstant()) {
1267 int32_t constant = dest_pos.GetConstant()->AsIntConstant()->GetValue();
1268 __ leal(temp2, Address(dest, element_size * constant + offset));
1269 } else {
1270 __ leal(temp2, Address(dest, dest_pos.AsRegister<CpuRegister>(), ScaleFactor::TIMES_4, offset));
1271 }
1272
1273 if (length.IsConstant()) {
1274 int32_t constant = length.GetConstant()->AsIntConstant()->GetValue();
1275 __ leal(temp3, Address(temp1, element_size * constant));
1276 } else {
1277 __ leal(temp3, Address(temp1, length.AsRegister<CpuRegister>(), ScaleFactor::TIMES_4, 0));
1278 }
1279
1280 // Iterate over the arrays and do a raw copy of the objects. We don't need to
Nicolas Geoffrayfea1abd2016-07-06 12:09:12 +01001281 // poison/unpoison.
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001282 NearLabel loop, done;
1283 __ cmpl(temp1, temp3);
1284 __ j(kEqual, &done);
1285 __ Bind(&loop);
1286 __ movl(CpuRegister(TMP), Address(temp1, 0));
1287 __ movl(Address(temp2, 0), CpuRegister(TMP));
1288 __ addl(temp1, Immediate(element_size));
1289 __ addl(temp2, Immediate(element_size));
1290 __ cmpl(temp1, temp3);
1291 __ j(kNotEqual, &loop);
1292 __ Bind(&done);
1293
1294 // We only need one card marking on the destination array.
1295 codegen_->MarkGCCard(temp1,
1296 temp2,
1297 dest,
1298 CpuRegister(kNoRegister),
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001299 /* value_can_be_null */ false);
Nicolas Geoffrayee3cf072015-10-06 11:45:02 +01001300
1301 __ Bind(slow_path->GetExitLabel());
1302}
1303
Nicolas Geoffrayd75948a2015-03-27 09:53:16 +00001304void IntrinsicLocationsBuilderX86_64::VisitStringCompareTo(HInvoke* invoke) {
1305 LocationSummary* locations = new (arena_) LocationSummary(invoke,
Serban Constantinescu54ff4822016-07-07 18:03:19 +01001306 LocationSummary::kCallOnMainOnly,
Nicolas Geoffrayd75948a2015-03-27 09:53:16 +00001307 kIntrinsified);
1308 InvokeRuntimeCallingConvention calling_convention;
1309 locations->SetInAt(0, Location::RegisterLocation(calling_convention.GetRegisterAt(0)));
1310 locations->SetInAt(1, Location::RegisterLocation(calling_convention.GetRegisterAt(1)));
1311 locations->SetOut(Location::RegisterLocation(RAX));
1312}
1313
1314void IntrinsicCodeGeneratorX86_64::VisitStringCompareTo(HInvoke* invoke) {
1315 X86_64Assembler* assembler = GetAssembler();
1316 LocationSummary* locations = invoke->GetLocations();
1317
Nicolas Geoffray512e04d2015-03-27 17:21:24 +00001318 // Note that the null check must have been done earlier.
Calin Juravle641547a2015-04-21 22:08:51 +01001319 DCHECK(!invoke->CanDoImplicitNullCheckOn(invoke->InputAt(0)));
Nicolas Geoffrayd75948a2015-03-27 09:53:16 +00001320
1321 CpuRegister argument = locations->InAt(1).AsRegister<CpuRegister>();
1322 __ testl(argument, argument);
Andreas Gampe85b62f22015-09-09 13:15:38 -07001323 SlowPathCode* slow_path = new (GetAllocator()) IntrinsicSlowPathX86_64(invoke);
Nicolas Geoffrayd75948a2015-03-27 09:53:16 +00001324 codegen_->AddSlowPath(slow_path);
1325 __ j(kEqual, slow_path->GetEntryLabel());
1326
Andreas Gampe542451c2016-07-26 09:02:02 -07001327 __ gs()->call(Address::Absolute(QUICK_ENTRYPOINT_OFFSET(kX86_64PointerSize, pStringCompareTo),
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001328 /* no_rip */ true));
Nicolas Geoffrayd75948a2015-03-27 09:53:16 +00001329 __ Bind(slow_path->GetExitLabel());
1330}
1331
Agi Csakif8cfb202015-08-13 17:54:54 -07001332void IntrinsicLocationsBuilderX86_64::VisitStringEquals(HInvoke* invoke) {
1333 LocationSummary* locations = new (arena_) LocationSummary(invoke,
1334 LocationSummary::kNoCall,
1335 kIntrinsified);
1336 locations->SetInAt(0, Location::RequiresRegister());
1337 locations->SetInAt(1, Location::RequiresRegister());
1338
1339 // Request temporary registers, RCX and RDI needed for repe_cmpsq instruction.
1340 locations->AddTemp(Location::RegisterLocation(RCX));
1341 locations->AddTemp(Location::RegisterLocation(RDI));
1342
1343 // Set output, RSI needed for repe_cmpsq instruction anyways.
1344 locations->SetOut(Location::RegisterLocation(RSI), Location::kOutputOverlap);
1345}
1346
1347void IntrinsicCodeGeneratorX86_64::VisitStringEquals(HInvoke* invoke) {
1348 X86_64Assembler* assembler = GetAssembler();
1349 LocationSummary* locations = invoke->GetLocations();
1350
1351 CpuRegister str = locations->InAt(0).AsRegister<CpuRegister>();
1352 CpuRegister arg = locations->InAt(1).AsRegister<CpuRegister>();
1353 CpuRegister rcx = locations->GetTemp(0).AsRegister<CpuRegister>();
1354 CpuRegister rdi = locations->GetTemp(1).AsRegister<CpuRegister>();
1355 CpuRegister rsi = locations->Out().AsRegister<CpuRegister>();
1356
Mark Mendell0c9497d2015-08-21 09:30:05 -04001357 NearLabel end, return_true, return_false;
Agi Csakif8cfb202015-08-13 17:54:54 -07001358
1359 // Get offsets of count, value, and class fields within a string object.
1360 const uint32_t count_offset = mirror::String::CountOffset().Uint32Value();
1361 const uint32_t value_offset = mirror::String::ValueOffset().Uint32Value();
1362 const uint32_t class_offset = mirror::Object::ClassOffset().Uint32Value();
1363
1364 // Note that the null check must have been done earlier.
1365 DCHECK(!invoke->CanDoImplicitNullCheckOn(invoke->InputAt(0)));
1366
Vladimir Marko53b52002016-05-24 19:30:45 +01001367 StringEqualsOptimizations optimizations(invoke);
1368 if (!optimizations.GetArgumentNotNull()) {
1369 // Check if input is null, return false if it is.
1370 __ testl(arg, arg);
1371 __ j(kEqual, &return_false);
1372 }
Agi Csakif8cfb202015-08-13 17:54:54 -07001373
Vladimir Marko53b52002016-05-24 19:30:45 +01001374 if (!optimizations.GetArgumentIsString()) {
1375 // Instanceof check for the argument by comparing class fields.
1376 // All string objects must have the same type since String cannot be subclassed.
1377 // Receiver must be a string object, so its class field is equal to all strings' class fields.
1378 // If the argument is a string object, its class field must be equal to receiver's class field.
1379 __ movl(rcx, Address(str, class_offset));
1380 __ cmpl(rcx, Address(arg, class_offset));
1381 __ j(kNotEqual, &return_false);
1382 }
Agi Csakif8cfb202015-08-13 17:54:54 -07001383
1384 // Reference equality check, return true if same reference.
1385 __ cmpl(str, arg);
1386 __ j(kEqual, &return_true);
1387
1388 // Load length of receiver string.
1389 __ movl(rcx, Address(str, count_offset));
1390 // Check if lengths are equal, return false if they're not.
1391 __ cmpl(rcx, Address(arg, count_offset));
1392 __ j(kNotEqual, &return_false);
1393 // Return true if both strings are empty.
Mark Mendell0c9497d2015-08-21 09:30:05 -04001394 __ jrcxz(&return_true);
Agi Csakif8cfb202015-08-13 17:54:54 -07001395
1396 // Load starting addresses of string values into RSI/RDI as required for repe_cmpsq instruction.
1397 __ leal(rsi, Address(str, value_offset));
1398 __ leal(rdi, Address(arg, value_offset));
1399
1400 // Divide string length by 4 and adjust for lengths not divisible by 4.
1401 __ addl(rcx, Immediate(3));
1402 __ shrl(rcx, Immediate(2));
1403
1404 // Assertions that must hold in order to compare strings 4 characters at a time.
1405 DCHECK_ALIGNED(value_offset, 8);
1406 static_assert(IsAligned<8>(kObjectAlignment), "String is not zero padded");
1407
1408 // Loop to compare strings four characters at a time starting at the beginning of the string.
1409 __ repe_cmpsq();
1410 // If strings are not equal, zero flag will be cleared.
1411 __ j(kNotEqual, &return_false);
1412
1413 // Return true and exit the function.
1414 // If loop does not result in returning false, we return true.
1415 __ Bind(&return_true);
1416 __ movl(rsi, Immediate(1));
1417 __ jmp(&end);
1418
1419 // Return false and exit the function.
1420 __ Bind(&return_false);
1421 __ xorl(rsi, rsi);
1422 __ Bind(&end);
1423}
1424
Andreas Gampe21030dd2015-05-07 14:46:15 -07001425static void CreateStringIndexOfLocations(HInvoke* invoke,
1426 ArenaAllocator* allocator,
1427 bool start_at_zero) {
1428 LocationSummary* locations = new (allocator) LocationSummary(invoke,
1429 LocationSummary::kCallOnSlowPath,
1430 kIntrinsified);
1431 // The data needs to be in RDI for scasw. So request that the string is there, anyways.
1432 locations->SetInAt(0, Location::RegisterLocation(RDI));
1433 // If we look for a constant char, we'll still have to copy it into RAX. So just request the
1434 // allocator to do that, anyways. We can still do the constant check by checking the parameter
1435 // of the instruction explicitly.
1436 // Note: This works as we don't clobber RAX anywhere.
1437 locations->SetInAt(1, Location::RegisterLocation(RAX));
1438 if (!start_at_zero) {
1439 locations->SetInAt(2, Location::RequiresRegister()); // The starting index.
1440 }
1441 // As we clobber RDI during execution anyways, also use it as the output.
1442 locations->SetOut(Location::SameAsFirstInput());
1443
1444 // repne scasw uses RCX as the counter.
1445 locations->AddTemp(Location::RegisterLocation(RCX));
1446 // Need another temporary to be able to compute the result.
1447 locations->AddTemp(Location::RequiresRegister());
1448}
1449
1450static void GenerateStringIndexOf(HInvoke* invoke,
1451 X86_64Assembler* assembler,
1452 CodeGeneratorX86_64* codegen,
1453 ArenaAllocator* allocator,
1454 bool start_at_zero) {
1455 LocationSummary* locations = invoke->GetLocations();
1456
1457 // Note that the null check must have been done earlier.
1458 DCHECK(!invoke->CanDoImplicitNullCheckOn(invoke->InputAt(0)));
1459
1460 CpuRegister string_obj = locations->InAt(0).AsRegister<CpuRegister>();
1461 CpuRegister search_value = locations->InAt(1).AsRegister<CpuRegister>();
1462 CpuRegister counter = locations->GetTemp(0).AsRegister<CpuRegister>();
1463 CpuRegister string_length = locations->GetTemp(1).AsRegister<CpuRegister>();
1464 CpuRegister out = locations->Out().AsRegister<CpuRegister>();
1465
1466 // Check our assumptions for registers.
1467 DCHECK_EQ(string_obj.AsRegister(), RDI);
1468 DCHECK_EQ(search_value.AsRegister(), RAX);
1469 DCHECK_EQ(counter.AsRegister(), RCX);
1470 DCHECK_EQ(out.AsRegister(), RDI);
1471
1472 // Check for code points > 0xFFFF. Either a slow-path check when we don't know statically,
Vladimir Markofb6c90a2016-05-06 15:52:12 +01001473 // 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 -07001474 SlowPathCode* slow_path = nullptr;
Vladimir Markofb6c90a2016-05-06 15:52:12 +01001475 HInstruction* code_point = invoke->InputAt(1);
1476 if (code_point->IsIntConstant()) {
Vladimir Markoda051082016-05-17 16:10:20 +01001477 if (static_cast<uint32_t>(code_point->AsIntConstant()->GetValue()) >
Andreas Gampe21030dd2015-05-07 14:46:15 -07001478 std::numeric_limits<uint16_t>::max()) {
1479 // Always needs the slow-path. We could directly dispatch to it, but this case should be
1480 // rare, so for simplicity just put the full slow-path down and branch unconditionally.
1481 slow_path = new (allocator) IntrinsicSlowPathX86_64(invoke);
1482 codegen->AddSlowPath(slow_path);
1483 __ jmp(slow_path->GetEntryLabel());
1484 __ Bind(slow_path->GetExitLabel());
1485 return;
1486 }
Vladimir Markofb6c90a2016-05-06 15:52:12 +01001487 } else if (code_point->GetType() != Primitive::kPrimChar) {
Andreas Gampe21030dd2015-05-07 14:46:15 -07001488 __ cmpl(search_value, Immediate(std::numeric_limits<uint16_t>::max()));
1489 slow_path = new (allocator) IntrinsicSlowPathX86_64(invoke);
1490 codegen->AddSlowPath(slow_path);
1491 __ j(kAbove, slow_path->GetEntryLabel());
1492 }
1493
1494 // From here down, we know that we are looking for a char that fits in 16 bits.
1495 // Location of reference to data array within the String object.
1496 int32_t value_offset = mirror::String::ValueOffset().Int32Value();
1497 // Location of count within the String object.
1498 int32_t count_offset = mirror::String::CountOffset().Int32Value();
1499
1500 // Load string length, i.e., the count field of the string.
1501 __ movl(string_length, Address(string_obj, count_offset));
1502
1503 // Do a length check.
1504 // TODO: Support jecxz.
Mark Mendell0c9497d2015-08-21 09:30:05 -04001505 NearLabel not_found_label;
Andreas Gampe21030dd2015-05-07 14:46:15 -07001506 __ testl(string_length, string_length);
1507 __ j(kEqual, &not_found_label);
1508
1509 if (start_at_zero) {
1510 // Number of chars to scan is the same as the string length.
1511 __ movl(counter, string_length);
1512
1513 // Move to the start of the string.
1514 __ addq(string_obj, Immediate(value_offset));
1515 } else {
1516 CpuRegister start_index = locations->InAt(2).AsRegister<CpuRegister>();
1517
1518 // Do a start_index check.
1519 __ cmpl(start_index, string_length);
1520 __ j(kGreaterEqual, &not_found_label);
1521
1522 // Ensure we have a start index >= 0;
1523 __ xorl(counter, counter);
1524 __ cmpl(start_index, Immediate(0));
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001525 __ cmov(kGreater, counter, start_index, /* is64bit */ false); // 32-bit copy is enough.
Andreas Gampe21030dd2015-05-07 14:46:15 -07001526
1527 // Move to the start of the string: string_obj + value_offset + 2 * start_index.
1528 __ leaq(string_obj, Address(string_obj, counter, ScaleFactor::TIMES_2, value_offset));
1529
1530 // Now update ecx, the work counter: it's gonna be string.length - start_index.
1531 __ negq(counter); // Needs to be 64-bit negation, as the address computation is 64-bit.
1532 __ leaq(counter, Address(string_length, counter, ScaleFactor::TIMES_1, 0));
1533 }
1534
1535 // Everything is set up for repne scasw:
1536 // * Comparison address in RDI.
1537 // * Counter in ECX.
1538 __ repne_scasw();
1539
1540 // Did we find a match?
1541 __ j(kNotEqual, &not_found_label);
1542
1543 // Yes, we matched. Compute the index of the result.
1544 __ subl(string_length, counter);
1545 __ leal(out, Address(string_length, -1));
1546
Mark Mendell0c9497d2015-08-21 09:30:05 -04001547 NearLabel done;
Andreas Gampe21030dd2015-05-07 14:46:15 -07001548 __ jmp(&done);
1549
1550 // Failed to match; return -1.
1551 __ Bind(&not_found_label);
1552 __ movl(out, Immediate(-1));
1553
1554 // And join up at the end.
1555 __ Bind(&done);
1556 if (slow_path != nullptr) {
1557 __ Bind(slow_path->GetExitLabel());
1558 }
1559}
1560
1561void IntrinsicLocationsBuilderX86_64::VisitStringIndexOf(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001562 CreateStringIndexOfLocations(invoke, arena_, /* start_at_zero */ true);
Andreas Gampe21030dd2015-05-07 14:46:15 -07001563}
1564
1565void IntrinsicCodeGeneratorX86_64::VisitStringIndexOf(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001566 GenerateStringIndexOf(invoke, GetAssembler(), codegen_, GetAllocator(), /* start_at_zero */ true);
Andreas Gampe21030dd2015-05-07 14:46:15 -07001567}
1568
1569void IntrinsicLocationsBuilderX86_64::VisitStringIndexOfAfter(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001570 CreateStringIndexOfLocations(invoke, arena_, /* start_at_zero */ false);
Andreas Gampe21030dd2015-05-07 14:46:15 -07001571}
1572
1573void IntrinsicCodeGeneratorX86_64::VisitStringIndexOfAfter(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001574 GenerateStringIndexOf(
1575 invoke, GetAssembler(), codegen_, GetAllocator(), /* start_at_zero */ false);
Andreas Gampe21030dd2015-05-07 14:46:15 -07001576}
1577
Jeff Hao848f70a2014-01-15 13:49:50 -08001578void IntrinsicLocationsBuilderX86_64::VisitStringNewStringFromBytes(HInvoke* invoke) {
1579 LocationSummary* locations = new (arena_) LocationSummary(invoke,
Serban Constantinescu54ff4822016-07-07 18:03:19 +01001580 LocationSummary::kCallOnMainOnly,
Jeff Hao848f70a2014-01-15 13:49:50 -08001581 kIntrinsified);
1582 InvokeRuntimeCallingConvention calling_convention;
1583 locations->SetInAt(0, Location::RegisterLocation(calling_convention.GetRegisterAt(0)));
1584 locations->SetInAt(1, Location::RegisterLocation(calling_convention.GetRegisterAt(1)));
1585 locations->SetInAt(2, Location::RegisterLocation(calling_convention.GetRegisterAt(2)));
1586 locations->SetInAt(3, Location::RegisterLocation(calling_convention.GetRegisterAt(3)));
1587 locations->SetOut(Location::RegisterLocation(RAX));
1588}
1589
1590void IntrinsicCodeGeneratorX86_64::VisitStringNewStringFromBytes(HInvoke* invoke) {
1591 X86_64Assembler* assembler = GetAssembler();
1592 LocationSummary* locations = invoke->GetLocations();
1593
1594 CpuRegister byte_array = locations->InAt(0).AsRegister<CpuRegister>();
1595 __ testl(byte_array, byte_array);
Andreas Gampe85b62f22015-09-09 13:15:38 -07001596 SlowPathCode* slow_path = new (GetAllocator()) IntrinsicSlowPathX86_64(invoke);
Jeff Hao848f70a2014-01-15 13:49:50 -08001597 codegen_->AddSlowPath(slow_path);
1598 __ j(kEqual, slow_path->GetEntryLabel());
1599
Andreas Gampe542451c2016-07-26 09:02:02 -07001600 __ gs()->call(Address::Absolute(QUICK_ENTRYPOINT_OFFSET(kX86_64PointerSize,
1601 pAllocStringFromBytes),
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001602 /* no_rip */ true));
Roland Levillainf969a202016-03-09 16:14:00 +00001603 CheckEntrypointTypes<kQuickAllocStringFromBytes, void*, void*, int32_t, int32_t, int32_t>();
Jeff Hao848f70a2014-01-15 13:49:50 -08001604 codegen_->RecordPcInfo(invoke, invoke->GetDexPc());
1605 __ Bind(slow_path->GetExitLabel());
1606}
1607
1608void IntrinsicLocationsBuilderX86_64::VisitStringNewStringFromChars(HInvoke* invoke) {
1609 LocationSummary* locations = new (arena_) LocationSummary(invoke,
Serban Constantinescu54ff4822016-07-07 18:03:19 +01001610 LocationSummary::kCallOnMainOnly,
Jeff Hao848f70a2014-01-15 13:49:50 -08001611 kIntrinsified);
1612 InvokeRuntimeCallingConvention calling_convention;
1613 locations->SetInAt(0, Location::RegisterLocation(calling_convention.GetRegisterAt(0)));
1614 locations->SetInAt(1, Location::RegisterLocation(calling_convention.GetRegisterAt(1)));
1615 locations->SetInAt(2, Location::RegisterLocation(calling_convention.GetRegisterAt(2)));
1616 locations->SetOut(Location::RegisterLocation(RAX));
1617}
1618
1619void IntrinsicCodeGeneratorX86_64::VisitStringNewStringFromChars(HInvoke* invoke) {
1620 X86_64Assembler* assembler = GetAssembler();
1621
Roland Levillaincc3839c2016-02-29 16:23:48 +00001622 // No need to emit code checking whether `locations->InAt(2)` is a null
1623 // pointer, as callers of the native method
1624 //
1625 // java.lang.StringFactory.newStringFromChars(int offset, int charCount, char[] data)
1626 //
1627 // all include a null check on `data` before calling that method.
Andreas Gampe542451c2016-07-26 09:02:02 -07001628 __ gs()->call(Address::Absolute(QUICK_ENTRYPOINT_OFFSET(kX86_64PointerSize,
1629 pAllocStringFromChars),
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001630 /* no_rip */ true));
Roland Levillainf969a202016-03-09 16:14:00 +00001631 CheckEntrypointTypes<kQuickAllocStringFromChars, void*, int32_t, int32_t, void*>();
Jeff Hao848f70a2014-01-15 13:49:50 -08001632 codegen_->RecordPcInfo(invoke, invoke->GetDexPc());
1633}
1634
1635void IntrinsicLocationsBuilderX86_64::VisitStringNewStringFromString(HInvoke* invoke) {
1636 LocationSummary* locations = new (arena_) LocationSummary(invoke,
Serban Constantinescu54ff4822016-07-07 18:03:19 +01001637 LocationSummary::kCallOnMainOnly,
Jeff Hao848f70a2014-01-15 13:49:50 -08001638 kIntrinsified);
1639 InvokeRuntimeCallingConvention calling_convention;
1640 locations->SetInAt(0, Location::RegisterLocation(calling_convention.GetRegisterAt(0)));
1641 locations->SetOut(Location::RegisterLocation(RAX));
1642}
1643
1644void IntrinsicCodeGeneratorX86_64::VisitStringNewStringFromString(HInvoke* invoke) {
1645 X86_64Assembler* assembler = GetAssembler();
1646 LocationSummary* locations = invoke->GetLocations();
1647
1648 CpuRegister string_to_copy = locations->InAt(0).AsRegister<CpuRegister>();
1649 __ testl(string_to_copy, string_to_copy);
Andreas Gampe85b62f22015-09-09 13:15:38 -07001650 SlowPathCode* slow_path = new (GetAllocator()) IntrinsicSlowPathX86_64(invoke);
Jeff Hao848f70a2014-01-15 13:49:50 -08001651 codegen_->AddSlowPath(slow_path);
1652 __ j(kEqual, slow_path->GetEntryLabel());
1653
Andreas Gampe542451c2016-07-26 09:02:02 -07001654 __ gs()->call(Address::Absolute(QUICK_ENTRYPOINT_OFFSET(kX86_64PointerSize,
1655 pAllocStringFromString),
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001656 /* no_rip */ true));
Roland Levillainf969a202016-03-09 16:14:00 +00001657 CheckEntrypointTypes<kQuickAllocStringFromString, void*, void*>();
Jeff Hao848f70a2014-01-15 13:49:50 -08001658 codegen_->RecordPcInfo(invoke, invoke->GetDexPc());
1659 __ Bind(slow_path->GetExitLabel());
1660}
1661
Mark Mendell8f8926a2015-08-17 11:39:06 -04001662void IntrinsicLocationsBuilderX86_64::VisitStringGetCharsNoCheck(HInvoke* invoke) {
1663 // public void getChars(int srcBegin, int srcEnd, char[] dst, int dstBegin);
1664 LocationSummary* locations = new (arena_) LocationSummary(invoke,
1665 LocationSummary::kNoCall,
1666 kIntrinsified);
1667 locations->SetInAt(0, Location::RequiresRegister());
1668 locations->SetInAt(1, Location::RegisterOrConstant(invoke->InputAt(1)));
1669 locations->SetInAt(2, Location::RequiresRegister());
1670 locations->SetInAt(3, Location::RequiresRegister());
1671 locations->SetInAt(4, Location::RequiresRegister());
1672
1673 // And we need some temporaries. We will use REP MOVSW, so we need fixed registers.
1674 locations->AddTemp(Location::RegisterLocation(RSI));
1675 locations->AddTemp(Location::RegisterLocation(RDI));
1676 locations->AddTemp(Location::RegisterLocation(RCX));
1677}
1678
1679void IntrinsicCodeGeneratorX86_64::VisitStringGetCharsNoCheck(HInvoke* invoke) {
1680 X86_64Assembler* assembler = GetAssembler();
1681 LocationSummary* locations = invoke->GetLocations();
1682
1683 size_t char_component_size = Primitive::ComponentSize(Primitive::kPrimChar);
1684 // Location of data in char array buffer.
1685 const uint32_t data_offset = mirror::Array::DataOffset(char_component_size).Uint32Value();
1686 // Location of char array data in string.
1687 const uint32_t value_offset = mirror::String::ValueOffset().Uint32Value();
1688
1689 // public void getChars(int srcBegin, int srcEnd, char[] dst, int dstBegin);
1690 CpuRegister obj = locations->InAt(0).AsRegister<CpuRegister>();
1691 Location srcBegin = locations->InAt(1);
1692 int srcBegin_value =
1693 srcBegin.IsConstant() ? srcBegin.GetConstant()->AsIntConstant()->GetValue() : 0;
1694 CpuRegister srcEnd = locations->InAt(2).AsRegister<CpuRegister>();
1695 CpuRegister dst = locations->InAt(3).AsRegister<CpuRegister>();
1696 CpuRegister dstBegin = locations->InAt(4).AsRegister<CpuRegister>();
1697
1698 // Check assumption that sizeof(Char) is 2 (used in scaling below).
1699 const size_t char_size = Primitive::ComponentSize(Primitive::kPrimChar);
1700 DCHECK_EQ(char_size, 2u);
1701
1702 // Compute the address of the destination buffer.
1703 __ leaq(CpuRegister(RDI), Address(dst, dstBegin, ScaleFactor::TIMES_2, data_offset));
1704
1705 // Compute the address of the source string.
1706 if (srcBegin.IsConstant()) {
1707 // Compute the address of the source string by adding the number of chars from
1708 // the source beginning to the value offset of a string.
1709 __ leaq(CpuRegister(RSI), Address(obj, srcBegin_value * char_size + value_offset));
1710 } else {
1711 __ leaq(CpuRegister(RSI), Address(obj, srcBegin.AsRegister<CpuRegister>(),
1712 ScaleFactor::TIMES_2, value_offset));
1713 }
1714
1715 // Compute the number of chars (words) to move.
1716 __ movl(CpuRegister(RCX), srcEnd);
1717 if (srcBegin.IsConstant()) {
1718 if (srcBegin_value != 0) {
1719 __ subl(CpuRegister(RCX), Immediate(srcBegin_value));
1720 }
1721 } else {
1722 DCHECK(srcBegin.IsRegister());
1723 __ subl(CpuRegister(RCX), srcBegin.AsRegister<CpuRegister>());
1724 }
1725
1726 // Do the move.
1727 __ rep_movsw();
1728}
1729
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001730static void GenPeek(LocationSummary* locations, Primitive::Type size, X86_64Assembler* assembler) {
1731 CpuRegister address = locations->InAt(0).AsRegister<CpuRegister>();
1732 CpuRegister out = locations->Out().AsRegister<CpuRegister>(); // == address, here for clarity.
1733 // x86 allows unaligned access. We do not have to check the input or use specific instructions
1734 // to avoid a SIGBUS.
1735 switch (size) {
1736 case Primitive::kPrimByte:
1737 __ movsxb(out, Address(address, 0));
1738 break;
1739 case Primitive::kPrimShort:
1740 __ movsxw(out, Address(address, 0));
1741 break;
1742 case Primitive::kPrimInt:
1743 __ movl(out, Address(address, 0));
1744 break;
1745 case Primitive::kPrimLong:
1746 __ movq(out, Address(address, 0));
1747 break;
1748 default:
1749 LOG(FATAL) << "Type not recognized for peek: " << size;
1750 UNREACHABLE();
1751 }
1752}
1753
1754void IntrinsicLocationsBuilderX86_64::VisitMemoryPeekByte(HInvoke* invoke) {
1755 CreateIntToIntLocations(arena_, invoke);
1756}
1757
1758void IntrinsicCodeGeneratorX86_64::VisitMemoryPeekByte(HInvoke* invoke) {
1759 GenPeek(invoke->GetLocations(), Primitive::kPrimByte, GetAssembler());
1760}
1761
1762void IntrinsicLocationsBuilderX86_64::VisitMemoryPeekIntNative(HInvoke* invoke) {
1763 CreateIntToIntLocations(arena_, invoke);
1764}
1765
1766void IntrinsicCodeGeneratorX86_64::VisitMemoryPeekIntNative(HInvoke* invoke) {
1767 GenPeek(invoke->GetLocations(), Primitive::kPrimInt, GetAssembler());
1768}
1769
1770void IntrinsicLocationsBuilderX86_64::VisitMemoryPeekLongNative(HInvoke* invoke) {
1771 CreateIntToIntLocations(arena_, invoke);
1772}
1773
1774void IntrinsicCodeGeneratorX86_64::VisitMemoryPeekLongNative(HInvoke* invoke) {
1775 GenPeek(invoke->GetLocations(), Primitive::kPrimLong, GetAssembler());
1776}
1777
1778void IntrinsicLocationsBuilderX86_64::VisitMemoryPeekShortNative(HInvoke* invoke) {
1779 CreateIntToIntLocations(arena_, invoke);
1780}
1781
1782void IntrinsicCodeGeneratorX86_64::VisitMemoryPeekShortNative(HInvoke* invoke) {
1783 GenPeek(invoke->GetLocations(), Primitive::kPrimShort, GetAssembler());
1784}
1785
1786static void CreateIntIntToVoidLocations(ArenaAllocator* arena, HInvoke* invoke) {
1787 LocationSummary* locations = new (arena) LocationSummary(invoke,
1788 LocationSummary::kNoCall,
1789 kIntrinsified);
1790 locations->SetInAt(0, Location::RequiresRegister());
Mark Mendellea5af682015-10-22 17:35:49 -04001791 locations->SetInAt(1, Location::RegisterOrInt32Constant(invoke->InputAt(1)));
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001792}
1793
1794static void GenPoke(LocationSummary* locations, Primitive::Type size, X86_64Assembler* assembler) {
1795 CpuRegister address = locations->InAt(0).AsRegister<CpuRegister>();
Mark Mendell40741f32015-04-20 22:10:34 -04001796 Location value = locations->InAt(1);
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001797 // x86 allows unaligned access. We do not have to check the input or use specific instructions
1798 // to avoid a SIGBUS.
1799 switch (size) {
1800 case Primitive::kPrimByte:
Mark Mendell40741f32015-04-20 22:10:34 -04001801 if (value.IsConstant()) {
1802 __ movb(Address(address, 0),
1803 Immediate(CodeGenerator::GetInt32ValueOf(value.GetConstant())));
1804 } else {
1805 __ movb(Address(address, 0), value.AsRegister<CpuRegister>());
1806 }
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001807 break;
1808 case Primitive::kPrimShort:
Mark Mendell40741f32015-04-20 22:10:34 -04001809 if (value.IsConstant()) {
1810 __ movw(Address(address, 0),
1811 Immediate(CodeGenerator::GetInt32ValueOf(value.GetConstant())));
1812 } else {
1813 __ movw(Address(address, 0), value.AsRegister<CpuRegister>());
1814 }
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001815 break;
1816 case Primitive::kPrimInt:
Mark Mendell40741f32015-04-20 22:10:34 -04001817 if (value.IsConstant()) {
1818 __ movl(Address(address, 0),
1819 Immediate(CodeGenerator::GetInt32ValueOf(value.GetConstant())));
1820 } else {
1821 __ movl(Address(address, 0), value.AsRegister<CpuRegister>());
1822 }
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001823 break;
1824 case Primitive::kPrimLong:
Mark Mendell40741f32015-04-20 22:10:34 -04001825 if (value.IsConstant()) {
1826 int64_t v = value.GetConstant()->AsLongConstant()->GetValue();
1827 DCHECK(IsInt<32>(v));
1828 int32_t v_32 = v;
1829 __ movq(Address(address, 0), Immediate(v_32));
1830 } else {
1831 __ movq(Address(address, 0), value.AsRegister<CpuRegister>());
1832 }
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001833 break;
1834 default:
1835 LOG(FATAL) << "Type not recognized for poke: " << size;
1836 UNREACHABLE();
1837 }
1838}
1839
1840void IntrinsicLocationsBuilderX86_64::VisitMemoryPokeByte(HInvoke* invoke) {
1841 CreateIntIntToVoidLocations(arena_, invoke);
1842}
1843
1844void IntrinsicCodeGeneratorX86_64::VisitMemoryPokeByte(HInvoke* invoke) {
1845 GenPoke(invoke->GetLocations(), Primitive::kPrimByte, GetAssembler());
1846}
1847
1848void IntrinsicLocationsBuilderX86_64::VisitMemoryPokeIntNative(HInvoke* invoke) {
1849 CreateIntIntToVoidLocations(arena_, invoke);
1850}
1851
1852void IntrinsicCodeGeneratorX86_64::VisitMemoryPokeIntNative(HInvoke* invoke) {
1853 GenPoke(invoke->GetLocations(), Primitive::kPrimInt, GetAssembler());
1854}
1855
1856void IntrinsicLocationsBuilderX86_64::VisitMemoryPokeLongNative(HInvoke* invoke) {
1857 CreateIntIntToVoidLocations(arena_, invoke);
1858}
1859
1860void IntrinsicCodeGeneratorX86_64::VisitMemoryPokeLongNative(HInvoke* invoke) {
1861 GenPoke(invoke->GetLocations(), Primitive::kPrimLong, GetAssembler());
1862}
1863
1864void IntrinsicLocationsBuilderX86_64::VisitMemoryPokeShortNative(HInvoke* invoke) {
1865 CreateIntIntToVoidLocations(arena_, invoke);
1866}
1867
1868void IntrinsicCodeGeneratorX86_64::VisitMemoryPokeShortNative(HInvoke* invoke) {
1869 GenPoke(invoke->GetLocations(), Primitive::kPrimShort, GetAssembler());
1870}
1871
1872void IntrinsicLocationsBuilderX86_64::VisitThreadCurrentThread(HInvoke* invoke) {
1873 LocationSummary* locations = new (arena_) LocationSummary(invoke,
1874 LocationSummary::kNoCall,
1875 kIntrinsified);
1876 locations->SetOut(Location::RequiresRegister());
1877}
1878
1879void IntrinsicCodeGeneratorX86_64::VisitThreadCurrentThread(HInvoke* invoke) {
1880 CpuRegister out = invoke->GetLocations()->Out().AsRegister<CpuRegister>();
Andreas Gampe542451c2016-07-26 09:02:02 -07001881 GetAssembler()->gs()->movl(out, Address::Absolute(Thread::PeerOffset<kX86_64PointerSize>(),
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001882 /* no_rip */ true));
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001883}
1884
Roland Levillain0d5a2812015-11-13 10:07:31 +00001885static void GenUnsafeGet(HInvoke* invoke,
1886 Primitive::Type type,
1887 bool is_volatile ATTRIBUTE_UNUSED,
1888 CodeGeneratorX86_64* codegen) {
1889 X86_64Assembler* assembler = down_cast<X86_64Assembler*>(codegen->GetAssembler());
1890 LocationSummary* locations = invoke->GetLocations();
1891 Location base_loc = locations->InAt(1);
1892 CpuRegister base = base_loc.AsRegister<CpuRegister>();
1893 Location offset_loc = locations->InAt(2);
1894 CpuRegister offset = offset_loc.AsRegister<CpuRegister>();
1895 Location output_loc = locations->Out();
Roland Levillain1e7f8db2015-12-15 10:54:19 +00001896 CpuRegister output = output_loc.AsRegister<CpuRegister>();
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001897
Andreas Gampe878d58c2015-01-15 23:24:00 -08001898 switch (type) {
1899 case Primitive::kPrimInt:
Roland Levillain0d5a2812015-11-13 10:07:31 +00001900 __ movl(output, Address(base, offset, ScaleFactor::TIMES_1, 0));
Roland Levillain1e7f8db2015-12-15 10:54:19 +00001901 break;
1902
1903 case Primitive::kPrimNot: {
1904 if (kEmitCompilerReadBarrier) {
1905 if (kUseBakerReadBarrier) {
1906 Location temp = locations->GetTemp(0);
Sang, Chunlei0fcd2b82016-04-05 17:12:59 +08001907 Address src(base, offset, ScaleFactor::TIMES_1, 0);
1908 codegen->GenerateReferenceLoadWithBakerReadBarrier(
1909 invoke, output_loc, base, src, temp, /* needs_null_check */ false);
Roland Levillain1e7f8db2015-12-15 10:54:19 +00001910 } else {
1911 __ movl(output, Address(base, offset, ScaleFactor::TIMES_1, 0));
1912 codegen->GenerateReadBarrierSlow(
1913 invoke, output_loc, output_loc, base_loc, 0U, offset_loc);
1914 }
1915 } else {
1916 __ movl(output, Address(base, offset, ScaleFactor::TIMES_1, 0));
1917 __ MaybeUnpoisonHeapReference(output);
Roland Levillain4d027112015-07-01 15:41:14 +01001918 }
Andreas Gampe878d58c2015-01-15 23:24:00 -08001919 break;
Roland Levillain1e7f8db2015-12-15 10:54:19 +00001920 }
Andreas Gampe878d58c2015-01-15 23:24:00 -08001921
1922 case Primitive::kPrimLong:
Roland Levillain0d5a2812015-11-13 10:07:31 +00001923 __ movq(output, Address(base, offset, ScaleFactor::TIMES_1, 0));
Andreas Gampe878d58c2015-01-15 23:24:00 -08001924 break;
1925
1926 default:
1927 LOG(FATAL) << "Unsupported op size " << type;
1928 UNREACHABLE();
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001929 }
1930}
1931
Roland Levillain1e7f8db2015-12-15 10:54:19 +00001932static void CreateIntIntIntToIntLocations(ArenaAllocator* arena,
1933 HInvoke* invoke,
1934 Primitive::Type type) {
Roland Levillain0d5a2812015-11-13 10:07:31 +00001935 bool can_call = kEmitCompilerReadBarrier &&
1936 (invoke->GetIntrinsic() == Intrinsics::kUnsafeGetObject ||
1937 invoke->GetIntrinsic() == Intrinsics::kUnsafeGetObjectVolatile);
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001938 LocationSummary* locations = new (arena) LocationSummary(invoke,
Roland Levillain0d5a2812015-11-13 10:07:31 +00001939 can_call ?
1940 LocationSummary::kCallOnSlowPath :
1941 LocationSummary::kNoCall,
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001942 kIntrinsified);
Andreas Gampe878d58c2015-01-15 23:24:00 -08001943 locations->SetInAt(0, Location::NoLocation()); // Unused receiver.
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001944 locations->SetInAt(1, Location::RequiresRegister());
1945 locations->SetInAt(2, Location::RequiresRegister());
Roland Levillain3d312422016-06-23 13:53:42 +01001946 locations->SetOut(Location::RequiresRegister(),
1947 can_call ? Location::kOutputOverlap : Location::kNoOutputOverlap);
Roland Levillain1e7f8db2015-12-15 10:54:19 +00001948 if (type == Primitive::kPrimNot && kEmitCompilerReadBarrier && kUseBakerReadBarrier) {
1949 // We need a temporary register for the read barrier marking slow
Sang, Chunlei0fcd2b82016-04-05 17:12:59 +08001950 // path in InstructionCodeGeneratorX86_64::GenerateReferenceLoadWithBakerReadBarrier.
Roland Levillain1e7f8db2015-12-15 10:54:19 +00001951 locations->AddTemp(Location::RequiresRegister());
1952 }
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001953}
1954
1955void IntrinsicLocationsBuilderX86_64::VisitUnsafeGet(HInvoke* invoke) {
Roland Levillain1e7f8db2015-12-15 10:54:19 +00001956 CreateIntIntIntToIntLocations(arena_, invoke, Primitive::kPrimInt);
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001957}
1958void IntrinsicLocationsBuilderX86_64::VisitUnsafeGetVolatile(HInvoke* invoke) {
Roland Levillain1e7f8db2015-12-15 10:54:19 +00001959 CreateIntIntIntToIntLocations(arena_, invoke, Primitive::kPrimInt);
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001960}
1961void IntrinsicLocationsBuilderX86_64::VisitUnsafeGetLong(HInvoke* invoke) {
Roland Levillain1e7f8db2015-12-15 10:54:19 +00001962 CreateIntIntIntToIntLocations(arena_, invoke, Primitive::kPrimLong);
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001963}
1964void IntrinsicLocationsBuilderX86_64::VisitUnsafeGetLongVolatile(HInvoke* invoke) {
Roland Levillain1e7f8db2015-12-15 10:54:19 +00001965 CreateIntIntIntToIntLocations(arena_, invoke, Primitive::kPrimLong);
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001966}
Andreas Gampe878d58c2015-01-15 23:24:00 -08001967void IntrinsicLocationsBuilderX86_64::VisitUnsafeGetObject(HInvoke* invoke) {
Roland Levillain1e7f8db2015-12-15 10:54:19 +00001968 CreateIntIntIntToIntLocations(arena_, invoke, Primitive::kPrimNot);
Andreas Gampe878d58c2015-01-15 23:24:00 -08001969}
1970void IntrinsicLocationsBuilderX86_64::VisitUnsafeGetObjectVolatile(HInvoke* invoke) {
Roland Levillain1e7f8db2015-12-15 10:54:19 +00001971 CreateIntIntIntToIntLocations(arena_, invoke, Primitive::kPrimNot);
Andreas Gampe878d58c2015-01-15 23:24:00 -08001972}
1973
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001974
1975void IntrinsicCodeGeneratorX86_64::VisitUnsafeGet(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001976 GenUnsafeGet(invoke, Primitive::kPrimInt, /* is_volatile */ false, codegen_);
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001977}
1978void IntrinsicCodeGeneratorX86_64::VisitUnsafeGetVolatile(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001979 GenUnsafeGet(invoke, Primitive::kPrimInt, /* is_volatile */ true, codegen_);
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001980}
1981void IntrinsicCodeGeneratorX86_64::VisitUnsafeGetLong(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001982 GenUnsafeGet(invoke, Primitive::kPrimLong, /* is_volatile */ false, codegen_);
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001983}
1984void IntrinsicCodeGeneratorX86_64::VisitUnsafeGetLongVolatile(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001985 GenUnsafeGet(invoke, Primitive::kPrimLong, /* is_volatile */ true, codegen_);
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001986}
Andreas Gampe878d58c2015-01-15 23:24:00 -08001987void IntrinsicCodeGeneratorX86_64::VisitUnsafeGetObject(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001988 GenUnsafeGet(invoke, Primitive::kPrimNot, /* is_volatile */ false, codegen_);
Andreas Gampe878d58c2015-01-15 23:24:00 -08001989}
1990void IntrinsicCodeGeneratorX86_64::VisitUnsafeGetObjectVolatile(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00001991 GenUnsafeGet(invoke, Primitive::kPrimNot, /* is_volatile */ true, codegen_);
Andreas Gampe878d58c2015-01-15 23:24:00 -08001992}
1993
Andreas Gampe71fb52f2014-12-29 17:43:08 -08001994
1995static void CreateIntIntIntIntToVoidPlusTempsLocations(ArenaAllocator* arena,
1996 Primitive::Type type,
1997 HInvoke* invoke) {
1998 LocationSummary* locations = new (arena) LocationSummary(invoke,
1999 LocationSummary::kNoCall,
2000 kIntrinsified);
Andreas Gampe878d58c2015-01-15 23:24:00 -08002001 locations->SetInAt(0, Location::NoLocation()); // Unused receiver.
Andreas Gampe71fb52f2014-12-29 17:43:08 -08002002 locations->SetInAt(1, Location::RequiresRegister());
2003 locations->SetInAt(2, Location::RequiresRegister());
2004 locations->SetInAt(3, Location::RequiresRegister());
2005 if (type == Primitive::kPrimNot) {
2006 // Need temp registers for card-marking.
Roland Levillain4d027112015-07-01 15:41:14 +01002007 locations->AddTemp(Location::RequiresRegister()); // Possibly used for reference poisoning too.
Andreas Gampe71fb52f2014-12-29 17:43:08 -08002008 locations->AddTemp(Location::RequiresRegister());
2009 }
2010}
2011
2012void IntrinsicLocationsBuilderX86_64::VisitUnsafePut(HInvoke* invoke) {
2013 CreateIntIntIntIntToVoidPlusTempsLocations(arena_, Primitive::kPrimInt, invoke);
2014}
2015void IntrinsicLocationsBuilderX86_64::VisitUnsafePutOrdered(HInvoke* invoke) {
2016 CreateIntIntIntIntToVoidPlusTempsLocations(arena_, Primitive::kPrimInt, invoke);
2017}
2018void IntrinsicLocationsBuilderX86_64::VisitUnsafePutVolatile(HInvoke* invoke) {
2019 CreateIntIntIntIntToVoidPlusTempsLocations(arena_, Primitive::kPrimInt, invoke);
2020}
2021void IntrinsicLocationsBuilderX86_64::VisitUnsafePutObject(HInvoke* invoke) {
2022 CreateIntIntIntIntToVoidPlusTempsLocations(arena_, Primitive::kPrimNot, invoke);
2023}
2024void IntrinsicLocationsBuilderX86_64::VisitUnsafePutObjectOrdered(HInvoke* invoke) {
2025 CreateIntIntIntIntToVoidPlusTempsLocations(arena_, Primitive::kPrimNot, invoke);
2026}
2027void IntrinsicLocationsBuilderX86_64::VisitUnsafePutObjectVolatile(HInvoke* invoke) {
2028 CreateIntIntIntIntToVoidPlusTempsLocations(arena_, Primitive::kPrimNot, invoke);
2029}
2030void IntrinsicLocationsBuilderX86_64::VisitUnsafePutLong(HInvoke* invoke) {
2031 CreateIntIntIntIntToVoidPlusTempsLocations(arena_, Primitive::kPrimLong, invoke);
2032}
2033void IntrinsicLocationsBuilderX86_64::VisitUnsafePutLongOrdered(HInvoke* invoke) {
2034 CreateIntIntIntIntToVoidPlusTempsLocations(arena_, Primitive::kPrimLong, invoke);
2035}
2036void IntrinsicLocationsBuilderX86_64::VisitUnsafePutLongVolatile(HInvoke* invoke) {
2037 CreateIntIntIntIntToVoidPlusTempsLocations(arena_, Primitive::kPrimLong, invoke);
2038}
2039
2040// We don't care for ordered: it requires an AnyStore barrier, which is already given by the x86
2041// memory model.
2042static void GenUnsafePut(LocationSummary* locations, Primitive::Type type, bool is_volatile,
2043 CodeGeneratorX86_64* codegen) {
Roland Levillainb488b782015-10-22 11:38:49 +01002044 X86_64Assembler* assembler = down_cast<X86_64Assembler*>(codegen->GetAssembler());
Andreas Gampe71fb52f2014-12-29 17:43:08 -08002045 CpuRegister base = locations->InAt(1).AsRegister<CpuRegister>();
2046 CpuRegister offset = locations->InAt(2).AsRegister<CpuRegister>();
2047 CpuRegister value = locations->InAt(3).AsRegister<CpuRegister>();
2048
2049 if (type == Primitive::kPrimLong) {
2050 __ movq(Address(base, offset, ScaleFactor::TIMES_1, 0), value);
Roland Levillain4d027112015-07-01 15:41:14 +01002051 } else if (kPoisonHeapReferences && type == Primitive::kPrimNot) {
2052 CpuRegister temp = locations->GetTemp(0).AsRegister<CpuRegister>();
2053 __ movl(temp, value);
2054 __ PoisonHeapReference(temp);
2055 __ movl(Address(base, offset, ScaleFactor::TIMES_1, 0), temp);
Andreas Gampe71fb52f2014-12-29 17:43:08 -08002056 } else {
2057 __ movl(Address(base, offset, ScaleFactor::TIMES_1, 0), value);
2058 }
2059
2060 if (is_volatile) {
Mark P Mendell17077d82015-12-16 19:15:59 +00002061 codegen->MemoryFence();
Andreas Gampe71fb52f2014-12-29 17:43:08 -08002062 }
2063
2064 if (type == Primitive::kPrimNot) {
Nicolas Geoffray07276db2015-05-18 14:22:09 +01002065 bool value_can_be_null = true; // TODO: Worth finding out this information?
Andreas Gampe71fb52f2014-12-29 17:43:08 -08002066 codegen->MarkGCCard(locations->GetTemp(0).AsRegister<CpuRegister>(),
2067 locations->GetTemp(1).AsRegister<CpuRegister>(),
2068 base,
Nicolas Geoffray07276db2015-05-18 14:22:09 +01002069 value,
2070 value_can_be_null);
Andreas Gampe71fb52f2014-12-29 17:43:08 -08002071 }
2072}
2073
2074void IntrinsicCodeGeneratorX86_64::VisitUnsafePut(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00002075 GenUnsafePut(invoke->GetLocations(), Primitive::kPrimInt, /* is_volatile */ false, codegen_);
Andreas Gampe71fb52f2014-12-29 17:43:08 -08002076}
2077void IntrinsicCodeGeneratorX86_64::VisitUnsafePutOrdered(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00002078 GenUnsafePut(invoke->GetLocations(), Primitive::kPrimInt, /* is_volatile */ false, codegen_);
Andreas Gampe71fb52f2014-12-29 17:43:08 -08002079}
2080void IntrinsicCodeGeneratorX86_64::VisitUnsafePutVolatile(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00002081 GenUnsafePut(invoke->GetLocations(), Primitive::kPrimInt, /* is_volatile */ true, codegen_);
Andreas Gampe71fb52f2014-12-29 17:43:08 -08002082}
2083void IntrinsicCodeGeneratorX86_64::VisitUnsafePutObject(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00002084 GenUnsafePut(invoke->GetLocations(), Primitive::kPrimNot, /* is_volatile */ false, codegen_);
Andreas Gampe71fb52f2014-12-29 17:43:08 -08002085}
2086void IntrinsicCodeGeneratorX86_64::VisitUnsafePutObjectOrdered(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00002087 GenUnsafePut(invoke->GetLocations(), Primitive::kPrimNot, /* is_volatile */ false, codegen_);
Andreas Gampe71fb52f2014-12-29 17:43:08 -08002088}
2089void IntrinsicCodeGeneratorX86_64::VisitUnsafePutObjectVolatile(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00002090 GenUnsafePut(invoke->GetLocations(), Primitive::kPrimNot, /* is_volatile */ true, codegen_);
Andreas Gampe71fb52f2014-12-29 17:43:08 -08002091}
2092void IntrinsicCodeGeneratorX86_64::VisitUnsafePutLong(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00002093 GenUnsafePut(invoke->GetLocations(), Primitive::kPrimLong, /* is_volatile */ false, codegen_);
Andreas Gampe71fb52f2014-12-29 17:43:08 -08002094}
2095void IntrinsicCodeGeneratorX86_64::VisitUnsafePutLongOrdered(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00002096 GenUnsafePut(invoke->GetLocations(), Primitive::kPrimLong, /* is_volatile */ false, codegen_);
Andreas Gampe71fb52f2014-12-29 17:43:08 -08002097}
2098void IntrinsicCodeGeneratorX86_64::VisitUnsafePutLongVolatile(HInvoke* invoke) {
Roland Levillainbf84a3d2015-12-04 14:33:02 +00002099 GenUnsafePut(invoke->GetLocations(), Primitive::kPrimLong, /* is_volatile */ true, codegen_);
Andreas Gampe71fb52f2014-12-29 17:43:08 -08002100}
2101
Mark Mendell58d25fd2015-04-03 14:52:31 -04002102static void CreateIntIntIntIntIntToInt(ArenaAllocator* arena, Primitive::Type type,
2103 HInvoke* invoke) {
2104 LocationSummary* locations = new (arena) LocationSummary(invoke,
2105 LocationSummary::kNoCall,
2106 kIntrinsified);
2107 locations->SetInAt(0, Location::NoLocation()); // Unused receiver.
2108 locations->SetInAt(1, Location::RequiresRegister());
2109 locations->SetInAt(2, Location::RequiresRegister());
2110 // expected value must be in EAX/RAX.
2111 locations->SetInAt(3, Location::RegisterLocation(RAX));
2112 locations->SetInAt(4, Location::RequiresRegister());
2113
2114 locations->SetOut(Location::RequiresRegister());
2115 if (type == Primitive::kPrimNot) {
2116 // Need temp registers for card-marking.
Roland Levillainb488b782015-10-22 11:38:49 +01002117 locations->AddTemp(Location::RequiresRegister()); // Possibly used for reference poisoning too.
Mark Mendell58d25fd2015-04-03 14:52:31 -04002118 locations->AddTemp(Location::RequiresRegister());
2119 }
2120}
2121
2122void IntrinsicLocationsBuilderX86_64::VisitUnsafeCASInt(HInvoke* invoke) {
2123 CreateIntIntIntIntIntToInt(arena_, Primitive::kPrimInt, invoke);
2124}
2125
2126void IntrinsicLocationsBuilderX86_64::VisitUnsafeCASLong(HInvoke* invoke) {
2127 CreateIntIntIntIntIntToInt(arena_, Primitive::kPrimLong, invoke);
2128}
2129
2130void IntrinsicLocationsBuilderX86_64::VisitUnsafeCASObject(HInvoke* invoke) {
Roland Levillain391b8662015-12-18 11:43:38 +00002131 // The UnsafeCASObject intrinsic is missing a read barrier, and
2132 // therefore sometimes does not work as expected (b/25883050).
2133 // Turn it off temporarily as a quick fix, until the read barrier is
Roland Levillain3d312422016-06-23 13:53:42 +01002134 // implemented (see TODO in GenCAS).
Roland Levillain391b8662015-12-18 11:43:38 +00002135 //
Roland Levillain3d312422016-06-23 13:53:42 +01002136 // TODO(rpl): Implement read barrier support in GenCAS and re-enable
Roland Levillain391b8662015-12-18 11:43:38 +00002137 // this intrinsic.
2138 if (kEmitCompilerReadBarrier) {
2139 return;
2140 }
2141
Mark Mendell58d25fd2015-04-03 14:52:31 -04002142 CreateIntIntIntIntIntToInt(arena_, Primitive::kPrimNot, invoke);
2143}
2144
2145static void GenCAS(Primitive::Type type, HInvoke* invoke, CodeGeneratorX86_64* codegen) {
Roland Levillainb488b782015-10-22 11:38:49 +01002146 X86_64Assembler* assembler = down_cast<X86_64Assembler*>(codegen->GetAssembler());
Mark Mendell58d25fd2015-04-03 14:52:31 -04002147 LocationSummary* locations = invoke->GetLocations();
2148
2149 CpuRegister base = locations->InAt(1).AsRegister<CpuRegister>();
2150 CpuRegister offset = locations->InAt(2).AsRegister<CpuRegister>();
2151 CpuRegister expected = locations->InAt(3).AsRegister<CpuRegister>();
Roland Levillainb488b782015-10-22 11:38:49 +01002152 // Ensure `expected` is in RAX (required by the CMPXCHG instruction).
Mark Mendell58d25fd2015-04-03 14:52:31 -04002153 DCHECK_EQ(expected.AsRegister(), RAX);
2154 CpuRegister value = locations->InAt(4).AsRegister<CpuRegister>();
2155 CpuRegister out = locations->Out().AsRegister<CpuRegister>();
2156
Roland Levillainb488b782015-10-22 11:38:49 +01002157 if (type == Primitive::kPrimNot) {
2158 // Mark card for object assuming new value is stored.
2159 bool value_can_be_null = true; // TODO: Worth finding out this information?
2160 codegen->MarkGCCard(locations->GetTemp(0).AsRegister<CpuRegister>(),
2161 locations->GetTemp(1).AsRegister<CpuRegister>(),
2162 base,
2163 value,
2164 value_can_be_null);
Roland Levillain4d027112015-07-01 15:41:14 +01002165
Roland Levillainb488b782015-10-22 11:38:49 +01002166 bool base_equals_value = (base.AsRegister() == value.AsRegister());
2167 Register value_reg = value.AsRegister();
2168 if (kPoisonHeapReferences) {
2169 if (base_equals_value) {
2170 // If `base` and `value` are the same register location, move
2171 // `value_reg` to a temporary register. This way, poisoning
2172 // `value_reg` won't invalidate `base`.
2173 value_reg = locations->GetTemp(0).AsRegister<CpuRegister>().AsRegister();
2174 __ movl(CpuRegister(value_reg), base);
Roland Levillain4d027112015-07-01 15:41:14 +01002175 }
Roland Levillainb488b782015-10-22 11:38:49 +01002176
2177 // Check that the register allocator did not assign the location
2178 // of `expected` (RAX) to `value` nor to `base`, so that heap
2179 // poisoning (when enabled) works as intended below.
2180 // - If `value` were equal to `expected`, both references would
2181 // be poisoned twice, meaning they would not be poisoned at
2182 // all, as heap poisoning uses address negation.
2183 // - If `base` were equal to `expected`, poisoning `expected`
2184 // would invalidate `base`.
2185 DCHECK_NE(value_reg, expected.AsRegister());
2186 DCHECK_NE(base.AsRegister(), expected.AsRegister());
2187
2188 __ PoisonHeapReference(expected);
2189 __ PoisonHeapReference(CpuRegister(value_reg));
Mark Mendell58d25fd2015-04-03 14:52:31 -04002190 }
2191
Roland Levillain391b8662015-12-18 11:43:38 +00002192 // TODO: Add a read barrier for the reference stored in the object
2193 // before attempting the CAS, similar to the one in the
2194 // art::Unsafe_compareAndSwapObject JNI implementation.
2195 //
2196 // Note that this code is not (yet) used when read barriers are
2197 // enabled (see IntrinsicLocationsBuilderX86_64::VisitUnsafeCASObject).
2198 DCHECK(!kEmitCompilerReadBarrier);
Roland Levillainb488b782015-10-22 11:38:49 +01002199 __ LockCmpxchgl(Address(base, offset, TIMES_1, 0), CpuRegister(value_reg));
Mark Mendell58d25fd2015-04-03 14:52:31 -04002200
Roland Levillain0d5a2812015-11-13 10:07:31 +00002201 // LOCK CMPXCHG has full barrier semantics, and we don't need
Roland Levillainb488b782015-10-22 11:38:49 +01002202 // scheduling barriers at this time.
Mark Mendell58d25fd2015-04-03 14:52:31 -04002203
Roland Levillainb488b782015-10-22 11:38:49 +01002204 // Convert ZF into the boolean result.
2205 __ setcc(kZero, out);
2206 __ movzxb(out, out);
Roland Levillain4d027112015-07-01 15:41:14 +01002207
Roland Levillain391b8662015-12-18 11:43:38 +00002208 // If heap poisoning is enabled, we need to unpoison the values
2209 // that were poisoned earlier.
Roland Levillainb488b782015-10-22 11:38:49 +01002210 if (kPoisonHeapReferences) {
2211 if (base_equals_value) {
2212 // `value_reg` has been moved to a temporary register, no need
2213 // to unpoison it.
2214 } else {
2215 // Ensure `value` is different from `out`, so that unpoisoning
2216 // the former does not invalidate the latter.
2217 DCHECK_NE(value_reg, out.AsRegister());
2218 __ UnpoisonHeapReference(CpuRegister(value_reg));
2219 }
2220 // Ensure `expected` is different from `out`, so that unpoisoning
2221 // the former does not invalidate the latter.
2222 DCHECK_NE(expected.AsRegister(), out.AsRegister());
2223 __ UnpoisonHeapReference(expected);
2224 }
2225 } else {
2226 if (type == Primitive::kPrimInt) {
2227 __ LockCmpxchgl(Address(base, offset, TIMES_1, 0), value);
2228 } else if (type == Primitive::kPrimLong) {
2229 __ LockCmpxchgq(Address(base, offset, TIMES_1, 0), value);
2230 } else {
2231 LOG(FATAL) << "Unexpected CAS type " << type;
2232 }
2233
Roland Levillain0d5a2812015-11-13 10:07:31 +00002234 // LOCK CMPXCHG has full barrier semantics, and we don't need
Roland Levillainb488b782015-10-22 11:38:49 +01002235 // scheduling barriers at this time.
2236
2237 // Convert ZF into the boolean result.
2238 __ setcc(kZero, out);
2239 __ movzxb(out, out);
Roland Levillain4d027112015-07-01 15:41:14 +01002240 }
Mark Mendell58d25fd2015-04-03 14:52:31 -04002241}
2242
2243void IntrinsicCodeGeneratorX86_64::VisitUnsafeCASInt(HInvoke* invoke) {
2244 GenCAS(Primitive::kPrimInt, invoke, codegen_);
2245}
2246
2247void IntrinsicCodeGeneratorX86_64::VisitUnsafeCASLong(HInvoke* invoke) {
2248 GenCAS(Primitive::kPrimLong, invoke, codegen_);
2249}
2250
2251void IntrinsicCodeGeneratorX86_64::VisitUnsafeCASObject(HInvoke* invoke) {
Roland Levillain3d312422016-06-23 13:53:42 +01002252 // The UnsafeCASObject intrinsic is missing a read barrier, and
2253 // therefore sometimes does not work as expected (b/25883050).
2254 // Turn it off temporarily as a quick fix, until the read barrier is
2255 // implemented (see TODO in GenCAS).
2256 //
2257 // TODO(rpl): Implement read barrier support in GenCAS and re-enable
2258 // this intrinsic.
2259 DCHECK(!kEmitCompilerReadBarrier);
2260
Mark Mendell58d25fd2015-04-03 14:52:31 -04002261 GenCAS(Primitive::kPrimNot, invoke, codegen_);
2262}
2263
2264void IntrinsicLocationsBuilderX86_64::VisitIntegerReverse(HInvoke* invoke) {
2265 LocationSummary* locations = new (arena_) LocationSummary(invoke,
2266 LocationSummary::kNoCall,
2267 kIntrinsified);
2268 locations->SetInAt(0, Location::RequiresRegister());
2269 locations->SetOut(Location::SameAsFirstInput());
2270 locations->AddTemp(Location::RequiresRegister());
2271}
2272
2273static void SwapBits(CpuRegister reg, CpuRegister temp, int32_t shift, int32_t mask,
2274 X86_64Assembler* assembler) {
2275 Immediate imm_shift(shift);
2276 Immediate imm_mask(mask);
2277 __ movl(temp, reg);
2278 __ shrl(reg, imm_shift);
2279 __ andl(temp, imm_mask);
2280 __ andl(reg, imm_mask);
2281 __ shll(temp, imm_shift);
2282 __ orl(reg, temp);
2283}
2284
2285void IntrinsicCodeGeneratorX86_64::VisitIntegerReverse(HInvoke* invoke) {
Aart Bikc5d47542016-01-27 17:00:35 -08002286 X86_64Assembler* assembler = GetAssembler();
Mark Mendell58d25fd2015-04-03 14:52:31 -04002287 LocationSummary* locations = invoke->GetLocations();
2288
2289 CpuRegister reg = locations->InAt(0).AsRegister<CpuRegister>();
2290 CpuRegister temp = locations->GetTemp(0).AsRegister<CpuRegister>();
2291
2292 /*
2293 * Use one bswap instruction to reverse byte order first and then use 3 rounds of
2294 * swapping bits to reverse bits in a number x. Using bswap to save instructions
2295 * compared to generic luni implementation which has 5 rounds of swapping bits.
2296 * x = bswap x
2297 * x = (x & 0x55555555) << 1 | (x >> 1) & 0x55555555;
2298 * x = (x & 0x33333333) << 2 | (x >> 2) & 0x33333333;
2299 * x = (x & 0x0F0F0F0F) << 4 | (x >> 4) & 0x0F0F0F0F;
2300 */
2301 __ bswapl(reg);
2302 SwapBits(reg, temp, 1, 0x55555555, assembler);
2303 SwapBits(reg, temp, 2, 0x33333333, assembler);
2304 SwapBits(reg, temp, 4, 0x0f0f0f0f, assembler);
2305}
2306
2307void IntrinsicLocationsBuilderX86_64::VisitLongReverse(HInvoke* invoke) {
2308 LocationSummary* locations = new (arena_) LocationSummary(invoke,
2309 LocationSummary::kNoCall,
2310 kIntrinsified);
2311 locations->SetInAt(0, Location::RequiresRegister());
2312 locations->SetOut(Location::SameAsFirstInput());
2313 locations->AddTemp(Location::RequiresRegister());
2314 locations->AddTemp(Location::RequiresRegister());
2315}
2316
2317static void SwapBits64(CpuRegister reg, CpuRegister temp, CpuRegister temp_mask,
2318 int32_t shift, int64_t mask, X86_64Assembler* assembler) {
2319 Immediate imm_shift(shift);
2320 __ movq(temp_mask, Immediate(mask));
2321 __ movq(temp, reg);
2322 __ shrq(reg, imm_shift);
2323 __ andq(temp, temp_mask);
2324 __ andq(reg, temp_mask);
2325 __ shlq(temp, imm_shift);
2326 __ orq(reg, temp);
2327}
2328
2329void IntrinsicCodeGeneratorX86_64::VisitLongReverse(HInvoke* invoke) {
Aart Bikc5d47542016-01-27 17:00:35 -08002330 X86_64Assembler* assembler = GetAssembler();
Mark Mendell58d25fd2015-04-03 14:52:31 -04002331 LocationSummary* locations = invoke->GetLocations();
2332
2333 CpuRegister reg = locations->InAt(0).AsRegister<CpuRegister>();
2334 CpuRegister temp1 = locations->GetTemp(0).AsRegister<CpuRegister>();
2335 CpuRegister temp2 = locations->GetTemp(1).AsRegister<CpuRegister>();
2336
2337 /*
2338 * Use one bswap instruction to reverse byte order first and then use 3 rounds of
2339 * swapping bits to reverse bits in a long number x. Using bswap to save instructions
2340 * compared to generic luni implementation which has 5 rounds of swapping bits.
2341 * x = bswap x
2342 * x = (x & 0x5555555555555555) << 1 | (x >> 1) & 0x5555555555555555;
2343 * x = (x & 0x3333333333333333) << 2 | (x >> 2) & 0x3333333333333333;
2344 * x = (x & 0x0F0F0F0F0F0F0F0F) << 4 | (x >> 4) & 0x0F0F0F0F0F0F0F0F;
2345 */
2346 __ bswapq(reg);
2347 SwapBits64(reg, temp1, temp2, 1, INT64_C(0x5555555555555555), assembler);
2348 SwapBits64(reg, temp1, temp2, 2, INT64_C(0x3333333333333333), assembler);
2349 SwapBits64(reg, temp1, temp2, 4, INT64_C(0x0f0f0f0f0f0f0f0f), assembler);
2350}
2351
Aart Bik3f67e692016-01-15 14:35:12 -08002352static void CreateBitCountLocations(
2353 ArenaAllocator* arena, CodeGeneratorX86_64* codegen, HInvoke* invoke) {
2354 if (!codegen->GetInstructionSetFeatures().HasPopCnt()) {
2355 // Do nothing if there is no popcnt support. This results in generating
2356 // a call for the intrinsic rather than direct code.
2357 return;
2358 }
2359 LocationSummary* locations = new (arena) LocationSummary(invoke,
2360 LocationSummary::kNoCall,
2361 kIntrinsified);
2362 locations->SetInAt(0, Location::Any());
2363 locations->SetOut(Location::RequiresRegister());
2364}
2365
Aart Bikc5d47542016-01-27 17:00:35 -08002366static void GenBitCount(X86_64Assembler* assembler,
2367 CodeGeneratorX86_64* codegen,
2368 HInvoke* invoke,
2369 bool is_long) {
Aart Bik3f67e692016-01-15 14:35:12 -08002370 LocationSummary* locations = invoke->GetLocations();
2371 Location src = locations->InAt(0);
2372 CpuRegister out = locations->Out().AsRegister<CpuRegister>();
2373
2374 if (invoke->InputAt(0)->IsConstant()) {
2375 // Evaluate this at compile time.
2376 int64_t value = Int64FromConstant(invoke->InputAt(0)->AsConstant());
Roland Levillainfa3912e2016-04-01 18:21:55 +01002377 int32_t result = is_long
Aart Bik3f67e692016-01-15 14:35:12 -08002378 ? POPCOUNT(static_cast<uint64_t>(value))
2379 : POPCOUNT(static_cast<uint32_t>(value));
Roland Levillainfa3912e2016-04-01 18:21:55 +01002380 codegen->Load32BitValue(out, result);
Aart Bik3f67e692016-01-15 14:35:12 -08002381 return;
2382 }
2383
2384 if (src.IsRegister()) {
2385 if (is_long) {
2386 __ popcntq(out, src.AsRegister<CpuRegister>());
2387 } else {
2388 __ popcntl(out, src.AsRegister<CpuRegister>());
2389 }
2390 } else if (is_long) {
2391 DCHECK(src.IsDoubleStackSlot());
2392 __ popcntq(out, Address(CpuRegister(RSP), src.GetStackIndex()));
2393 } else {
2394 DCHECK(src.IsStackSlot());
2395 __ popcntl(out, Address(CpuRegister(RSP), src.GetStackIndex()));
2396 }
2397}
2398
2399void IntrinsicLocationsBuilderX86_64::VisitIntegerBitCount(HInvoke* invoke) {
2400 CreateBitCountLocations(arena_, codegen_, invoke);
2401}
2402
2403void IntrinsicCodeGeneratorX86_64::VisitIntegerBitCount(HInvoke* invoke) {
Aart Bikc5d47542016-01-27 17:00:35 -08002404 GenBitCount(GetAssembler(), codegen_, invoke, /* is_long */ false);
Aart Bik3f67e692016-01-15 14:35:12 -08002405}
2406
2407void IntrinsicLocationsBuilderX86_64::VisitLongBitCount(HInvoke* invoke) {
2408 CreateBitCountLocations(arena_, codegen_, invoke);
2409}
2410
2411void IntrinsicCodeGeneratorX86_64::VisitLongBitCount(HInvoke* invoke) {
Aart Bikc5d47542016-01-27 17:00:35 -08002412 GenBitCount(GetAssembler(), codegen_, invoke, /* is_long */ true);
2413}
2414
Aart Bikc5d47542016-01-27 17:00:35 -08002415static void CreateOneBitLocations(ArenaAllocator* arena, HInvoke* invoke, bool is_high) {
2416 LocationSummary* locations = new (arena) LocationSummary(invoke,
2417 LocationSummary::kNoCall,
2418 kIntrinsified);
2419 locations->SetInAt(0, Location::Any());
2420 locations->SetOut(Location::RequiresRegister());
2421 locations->AddTemp(is_high ? Location::RegisterLocation(RCX) // needs CL
2422 : Location::RequiresRegister()); // any will do
2423}
2424
2425static void GenOneBit(X86_64Assembler* assembler,
2426 CodeGeneratorX86_64* codegen,
2427 HInvoke* invoke,
2428 bool is_high, bool is_long) {
2429 LocationSummary* locations = invoke->GetLocations();
2430 Location src = locations->InAt(0);
2431 CpuRegister out = locations->Out().AsRegister<CpuRegister>();
2432
2433 if (invoke->InputAt(0)->IsConstant()) {
2434 // Evaluate this at compile time.
2435 int64_t value = Int64FromConstant(invoke->InputAt(0)->AsConstant());
2436 if (value == 0) {
2437 __ xorl(out, out); // Clears upper bits too.
2438 return;
2439 }
2440 // Nonzero value.
2441 if (is_high) {
2442 value = is_long ? 63 - CLZ(static_cast<uint64_t>(value))
2443 : 31 - CLZ(static_cast<uint32_t>(value));
2444 } else {
2445 value = is_long ? CTZ(static_cast<uint64_t>(value))
2446 : CTZ(static_cast<uint32_t>(value));
2447 }
2448 if (is_long) {
Pavel Vyssotski7f7f6da2016-06-22 12:36:10 +06002449 codegen->Load64BitValue(out, 1ULL << value);
Aart Bikc5d47542016-01-27 17:00:35 -08002450 } else {
2451 codegen->Load32BitValue(out, 1 << value);
2452 }
2453 return;
2454 }
2455
2456 // Handle the non-constant cases.
2457 CpuRegister tmp = locations->GetTemp(0).AsRegister<CpuRegister>();
2458 if (is_high) {
2459 // Use architectural support: basically 1 << bsr.
2460 if (src.IsRegister()) {
2461 if (is_long) {
2462 __ bsrq(tmp, src.AsRegister<CpuRegister>());
2463 } else {
2464 __ bsrl(tmp, src.AsRegister<CpuRegister>());
2465 }
2466 } else if (is_long) {
2467 DCHECK(src.IsDoubleStackSlot());
2468 __ bsrq(tmp, Address(CpuRegister(RSP), src.GetStackIndex()));
2469 } else {
2470 DCHECK(src.IsStackSlot());
2471 __ bsrl(tmp, Address(CpuRegister(RSP), src.GetStackIndex()));
2472 }
2473 // BSR sets ZF if the input was zero.
2474 NearLabel is_zero, done;
2475 __ j(kEqual, &is_zero);
2476 __ movl(out, Immediate(1)); // Clears upper bits too.
2477 if (is_long) {
2478 __ shlq(out, tmp);
2479 } else {
2480 __ shll(out, tmp);
2481 }
2482 __ jmp(&done);
2483 __ Bind(&is_zero);
2484 __ xorl(out, out); // Clears upper bits too.
2485 __ Bind(&done);
2486 } else {
2487 // Copy input into temporary.
2488 if (src.IsRegister()) {
2489 if (is_long) {
2490 __ movq(tmp, src.AsRegister<CpuRegister>());
2491 } else {
2492 __ movl(tmp, src.AsRegister<CpuRegister>());
2493 }
2494 } else if (is_long) {
2495 DCHECK(src.IsDoubleStackSlot());
2496 __ movq(tmp, Address(CpuRegister(RSP), src.GetStackIndex()));
2497 } else {
2498 DCHECK(src.IsStackSlot());
2499 __ movl(tmp, Address(CpuRegister(RSP), src.GetStackIndex()));
2500 }
2501 // Do the bit twiddling: basically tmp & -tmp;
2502 if (is_long) {
2503 __ movq(out, tmp);
2504 __ negq(tmp);
2505 __ andq(out, tmp);
2506 } else {
2507 __ movl(out, tmp);
2508 __ negl(tmp);
2509 __ andl(out, tmp);
2510 }
2511 }
2512}
2513
2514void IntrinsicLocationsBuilderX86_64::VisitIntegerHighestOneBit(HInvoke* invoke) {
2515 CreateOneBitLocations(arena_, invoke, /* is_high */ true);
2516}
2517
2518void IntrinsicCodeGeneratorX86_64::VisitIntegerHighestOneBit(HInvoke* invoke) {
2519 GenOneBit(GetAssembler(), codegen_, invoke, /* is_high */ true, /* is_long */ false);
2520}
2521
2522void IntrinsicLocationsBuilderX86_64::VisitLongHighestOneBit(HInvoke* invoke) {
2523 CreateOneBitLocations(arena_, invoke, /* is_high */ true);
2524}
2525
2526void IntrinsicCodeGeneratorX86_64::VisitLongHighestOneBit(HInvoke* invoke) {
2527 GenOneBit(GetAssembler(), codegen_, invoke, /* is_high */ true, /* is_long */ true);
2528}
2529
2530void IntrinsicLocationsBuilderX86_64::VisitIntegerLowestOneBit(HInvoke* invoke) {
2531 CreateOneBitLocations(arena_, invoke, /* is_high */ false);
2532}
2533
2534void IntrinsicCodeGeneratorX86_64::VisitIntegerLowestOneBit(HInvoke* invoke) {
2535 GenOneBit(GetAssembler(), codegen_, invoke, /* is_high */ false, /* is_long */ false);
2536}
2537
2538void IntrinsicLocationsBuilderX86_64::VisitLongLowestOneBit(HInvoke* invoke) {
2539 CreateOneBitLocations(arena_, invoke, /* is_high */ false);
2540}
2541
2542void IntrinsicCodeGeneratorX86_64::VisitLongLowestOneBit(HInvoke* invoke) {
2543 GenOneBit(GetAssembler(), codegen_, invoke, /* is_high */ false, /* is_long */ true);
Aart Bik3f67e692016-01-15 14:35:12 -08002544}
2545
Mark Mendelld5897672015-08-12 21:16:41 -04002546static void CreateLeadingZeroLocations(ArenaAllocator* arena, HInvoke* invoke) {
2547 LocationSummary* locations = new (arena) LocationSummary(invoke,
2548 LocationSummary::kNoCall,
2549 kIntrinsified);
2550 locations->SetInAt(0, Location::Any());
2551 locations->SetOut(Location::RequiresRegister());
2552}
2553
Aart Bikc5d47542016-01-27 17:00:35 -08002554static void GenLeadingZeros(X86_64Assembler* assembler,
2555 CodeGeneratorX86_64* codegen,
2556 HInvoke* invoke, bool is_long) {
Mark Mendelld5897672015-08-12 21:16:41 -04002557 LocationSummary* locations = invoke->GetLocations();
2558 Location src = locations->InAt(0);
2559 CpuRegister out = locations->Out().AsRegister<CpuRegister>();
2560
2561 int zero_value_result = is_long ? 64 : 32;
2562 if (invoke->InputAt(0)->IsConstant()) {
2563 // Evaluate this at compile time.
2564 int64_t value = Int64FromConstant(invoke->InputAt(0)->AsConstant());
2565 if (value == 0) {
2566 value = zero_value_result;
2567 } else {
2568 value = is_long ? CLZ(static_cast<uint64_t>(value)) : CLZ(static_cast<uint32_t>(value));
2569 }
Aart Bikc5d47542016-01-27 17:00:35 -08002570 codegen->Load32BitValue(out, value);
Mark Mendelld5897672015-08-12 21:16:41 -04002571 return;
2572 }
2573
2574 // Handle the non-constant cases.
2575 if (src.IsRegister()) {
2576 if (is_long) {
2577 __ bsrq(out, src.AsRegister<CpuRegister>());
2578 } else {
2579 __ bsrl(out, src.AsRegister<CpuRegister>());
2580 }
2581 } else if (is_long) {
2582 DCHECK(src.IsDoubleStackSlot());
2583 __ bsrq(out, Address(CpuRegister(RSP), src.GetStackIndex()));
2584 } else {
2585 DCHECK(src.IsStackSlot());
2586 __ bsrl(out, Address(CpuRegister(RSP), src.GetStackIndex()));
2587 }
2588
2589 // BSR sets ZF if the input was zero, and the output is undefined.
Mark Mendell0c9497d2015-08-21 09:30:05 -04002590 NearLabel is_zero, done;
Mark Mendelld5897672015-08-12 21:16:41 -04002591 __ j(kEqual, &is_zero);
2592
2593 // Correct the result from BSR to get the CLZ result.
2594 __ xorl(out, Immediate(zero_value_result - 1));
2595 __ jmp(&done);
2596
2597 // Fix the zero case with the expected result.
2598 __ Bind(&is_zero);
2599 __ movl(out, Immediate(zero_value_result));
2600
2601 __ Bind(&done);
2602}
2603
2604void IntrinsicLocationsBuilderX86_64::VisitIntegerNumberOfLeadingZeros(HInvoke* invoke) {
2605 CreateLeadingZeroLocations(arena_, invoke);
2606}
2607
2608void IntrinsicCodeGeneratorX86_64::VisitIntegerNumberOfLeadingZeros(HInvoke* invoke) {
Aart Bikc5d47542016-01-27 17:00:35 -08002609 GenLeadingZeros(GetAssembler(), codegen_, invoke, /* is_long */ false);
Mark Mendelld5897672015-08-12 21:16:41 -04002610}
2611
2612void IntrinsicLocationsBuilderX86_64::VisitLongNumberOfLeadingZeros(HInvoke* invoke) {
2613 CreateLeadingZeroLocations(arena_, invoke);
2614}
2615
2616void IntrinsicCodeGeneratorX86_64::VisitLongNumberOfLeadingZeros(HInvoke* invoke) {
Aart Bikc5d47542016-01-27 17:00:35 -08002617 GenLeadingZeros(GetAssembler(), codegen_, invoke, /* is_long */ true);
Mark Mendelld5897672015-08-12 21:16:41 -04002618}
2619
Mark Mendell2d554792015-09-15 21:45:18 -04002620static void CreateTrailingZeroLocations(ArenaAllocator* arena, HInvoke* invoke) {
2621 LocationSummary* locations = new (arena) LocationSummary(invoke,
2622 LocationSummary::kNoCall,
2623 kIntrinsified);
2624 locations->SetInAt(0, Location::Any());
2625 locations->SetOut(Location::RequiresRegister());
2626}
2627
Aart Bikc5d47542016-01-27 17:00:35 -08002628static void GenTrailingZeros(X86_64Assembler* assembler,
2629 CodeGeneratorX86_64* codegen,
2630 HInvoke* invoke, bool is_long) {
Mark Mendell2d554792015-09-15 21:45:18 -04002631 LocationSummary* locations = invoke->GetLocations();
2632 Location src = locations->InAt(0);
2633 CpuRegister out = locations->Out().AsRegister<CpuRegister>();
2634
2635 int zero_value_result = is_long ? 64 : 32;
2636 if (invoke->InputAt(0)->IsConstant()) {
2637 // Evaluate this at compile time.
2638 int64_t value = Int64FromConstant(invoke->InputAt(0)->AsConstant());
2639 if (value == 0) {
2640 value = zero_value_result;
2641 } else {
2642 value = is_long ? CTZ(static_cast<uint64_t>(value)) : CTZ(static_cast<uint32_t>(value));
2643 }
Aart Bikc5d47542016-01-27 17:00:35 -08002644 codegen->Load32BitValue(out, value);
Mark Mendell2d554792015-09-15 21:45:18 -04002645 return;
2646 }
2647
2648 // Handle the non-constant cases.
2649 if (src.IsRegister()) {
2650 if (is_long) {
2651 __ bsfq(out, src.AsRegister<CpuRegister>());
2652 } else {
2653 __ bsfl(out, src.AsRegister<CpuRegister>());
2654 }
2655 } else if (is_long) {
2656 DCHECK(src.IsDoubleStackSlot());
2657 __ bsfq(out, Address(CpuRegister(RSP), src.GetStackIndex()));
2658 } else {
2659 DCHECK(src.IsStackSlot());
2660 __ bsfl(out, Address(CpuRegister(RSP), src.GetStackIndex()));
2661 }
2662
2663 // BSF sets ZF if the input was zero, and the output is undefined.
2664 NearLabel done;
2665 __ j(kNotEqual, &done);
2666
2667 // Fix the zero case with the expected result.
2668 __ movl(out, Immediate(zero_value_result));
2669
2670 __ Bind(&done);
2671}
2672
2673void IntrinsicLocationsBuilderX86_64::VisitIntegerNumberOfTrailingZeros(HInvoke* invoke) {
2674 CreateTrailingZeroLocations(arena_, invoke);
2675}
2676
2677void IntrinsicCodeGeneratorX86_64::VisitIntegerNumberOfTrailingZeros(HInvoke* invoke) {
Aart Bikc5d47542016-01-27 17:00:35 -08002678 GenTrailingZeros(GetAssembler(), codegen_, invoke, /* is_long */ false);
Mark Mendell2d554792015-09-15 21:45:18 -04002679}
2680
2681void IntrinsicLocationsBuilderX86_64::VisitLongNumberOfTrailingZeros(HInvoke* invoke) {
2682 CreateTrailingZeroLocations(arena_, invoke);
2683}
2684
2685void IntrinsicCodeGeneratorX86_64::VisitLongNumberOfTrailingZeros(HInvoke* invoke) {
Aart Bikc5d47542016-01-27 17:00:35 -08002686 GenTrailingZeros(GetAssembler(), codegen_, invoke, /* is_long */ true);
2687}
2688
Serguei Katkov288c7a82016-05-16 11:53:15 +06002689void IntrinsicLocationsBuilderX86_64::VisitReferenceGetReferent(HInvoke* invoke) {
2690 if (kEmitCompilerReadBarrier) {
2691 // Do not intrinsify this call with the read barrier configuration.
2692 return;
2693 }
2694 LocationSummary* locations = new (arena_) LocationSummary(invoke,
2695 LocationSummary::kCallOnSlowPath,
2696 kIntrinsified);
2697 locations->SetInAt(0, Location::RequiresRegister());
2698 locations->SetOut(Location::SameAsFirstInput());
2699 locations->AddTemp(Location::RequiresRegister());
2700}
2701
2702void IntrinsicCodeGeneratorX86_64::VisitReferenceGetReferent(HInvoke* invoke) {
2703 DCHECK(!kEmitCompilerReadBarrier);
2704 LocationSummary* locations = invoke->GetLocations();
2705 X86_64Assembler* assembler = GetAssembler();
2706
2707 CpuRegister obj = locations->InAt(0).AsRegister<CpuRegister>();
2708 CpuRegister out = locations->Out().AsRegister<CpuRegister>();
2709
2710 SlowPathCode* slow_path = new (GetAllocator()) IntrinsicSlowPathX86_64(invoke);
2711 codegen_->AddSlowPath(slow_path);
2712
2713 // Load ArtMethod first.
2714 HInvokeStaticOrDirect* invoke_direct = invoke->AsInvokeStaticOrDirect();
2715 DCHECK(invoke_direct != nullptr);
2716 Location temp_loc = codegen_->GenerateCalleeMethodStaticOrDirectCall(
2717 invoke_direct, locations->GetTemp(0));
2718 DCHECK(temp_loc.Equals(locations->GetTemp(0)));
2719 CpuRegister temp = temp_loc.AsRegister<CpuRegister>();
2720
2721 // Now get declaring class.
2722 __ movl(temp, Address(temp, ArtMethod::DeclaringClassOffset().Int32Value()));
2723
2724 uint32_t slow_path_flag_offset = codegen_->GetReferenceSlowFlagOffset();
2725 uint32_t disable_flag_offset = codegen_->GetReferenceDisableFlagOffset();
2726 DCHECK_NE(slow_path_flag_offset, 0u);
2727 DCHECK_NE(disable_flag_offset, 0u);
2728 DCHECK_NE(slow_path_flag_offset, disable_flag_offset);
2729
2730 // Check static flags preventing us for using intrinsic.
2731 if (slow_path_flag_offset == disable_flag_offset + 1) {
2732 __ cmpw(Address(temp, disable_flag_offset), Immediate(0));
2733 __ j(kNotEqual, slow_path->GetEntryLabel());
2734 } else {
2735 __ cmpb(Address(temp, disable_flag_offset), Immediate(0));
2736 __ j(kNotEqual, slow_path->GetEntryLabel());
2737 __ cmpb(Address(temp, slow_path_flag_offset), Immediate(0));
2738 __ j(kNotEqual, slow_path->GetEntryLabel());
2739 }
2740
2741 // Fast path.
2742 __ movl(out, Address(obj, mirror::Reference::ReferentOffset().Int32Value()));
2743 codegen_->MaybeRecordImplicitNullCheck(invoke);
2744 __ MaybeUnpoisonHeapReference(out);
2745 __ Bind(slow_path->GetExitLabel());
2746}
2747
Aart Bik2f9fcc92016-03-01 15:16:54 -08002748UNIMPLEMENTED_INTRINSIC(X86_64, FloatIsInfinite)
2749UNIMPLEMENTED_INTRINSIC(X86_64, DoubleIsInfinite)
Andreas Gampe71fb52f2014-12-29 17:43:08 -08002750
Aart Bik0e54c012016-03-04 12:08:31 -08002751// 1.8.
2752UNIMPLEMENTED_INTRINSIC(X86_64, UnsafeGetAndAddInt)
2753UNIMPLEMENTED_INTRINSIC(X86_64, UnsafeGetAndAddLong)
2754UNIMPLEMENTED_INTRINSIC(X86_64, UnsafeGetAndSetInt)
2755UNIMPLEMENTED_INTRINSIC(X86_64, UnsafeGetAndSetLong)
2756UNIMPLEMENTED_INTRINSIC(X86_64, UnsafeGetAndSetObject)
Aart Bik0e54c012016-03-04 12:08:31 -08002757
Aart Bik2f9fcc92016-03-01 15:16:54 -08002758UNREACHABLE_INTRINSICS(X86_64)
Roland Levillain4d027112015-07-01 15:41:14 +01002759
2760#undef __
2761
Andreas Gampe71fb52f2014-12-29 17:43:08 -08002762} // namespace x86_64
2763} // namespace art