blob: dec81cb2f129e5e5e986a3801d0faa16e1260c74 [file] [log] [blame]
Matteo Franchin43ec8732014-03-31 15:00:14 +01001/*
2 * Copyright (C) 2011 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 "codegen_arm64.h"
18
19#include <inttypes.h>
20
21#include <string>
22
23#include "dex/compiler_internals.h"
24#include "dex/quick/mir_to_lir-inl.h"
buzbeeb5860fb2014-06-21 15:31:01 -070025#include "dex/reg_storage_eq.h"
Matteo Franchin43ec8732014-03-31 15:00:14 +010026
27namespace art {
28
Vladimir Marko089142c2014-06-05 10:57:05 +010029static constexpr RegStorage core_regs_arr[] =
buzbeeb01bf152014-05-13 15:59:07 -070030 {rs_w0, rs_w1, rs_w2, rs_w3, rs_w4, rs_w5, rs_w6, rs_w7,
31 rs_w8, rs_w9, rs_w10, rs_w11, rs_w12, rs_w13, rs_w14, rs_w15,
32 rs_w16, rs_w17, rs_w18, rs_w19, rs_w20, rs_w21, rs_w22, rs_w23,
33 rs_w24, rs_w25, rs_w26, rs_w27, rs_w28, rs_w29, rs_w30, rs_w31,
34 rs_wzr};
Vladimir Marko089142c2014-06-05 10:57:05 +010035static constexpr RegStorage core64_regs_arr[] =
Matteo Franchine45fb9e2014-05-06 10:10:30 +010036 {rs_x0, rs_x1, rs_x2, rs_x3, rs_x4, rs_x5, rs_x6, rs_x7,
37 rs_x8, rs_x9, rs_x10, rs_x11, rs_x12, rs_x13, rs_x14, rs_x15,
38 rs_x16, rs_x17, rs_x18, rs_x19, rs_x20, rs_x21, rs_x22, rs_x23,
Matteo Franchinbc6d1972014-05-13 12:33:28 +010039 rs_x24, rs_x25, rs_x26, rs_x27, rs_x28, rs_x29, rs_x30, rs_x31,
40 rs_xzr};
Vladimir Marko089142c2014-06-05 10:57:05 +010041static constexpr RegStorage sp_regs_arr[] =
Matteo Franchine45fb9e2014-05-06 10:10:30 +010042 {rs_f0, rs_f1, rs_f2, rs_f3, rs_f4, rs_f5, rs_f6, rs_f7,
43 rs_f8, rs_f9, rs_f10, rs_f11, rs_f12, rs_f13, rs_f14, rs_f15,
44 rs_f16, rs_f17, rs_f18, rs_f19, rs_f20, rs_f21, rs_f22, rs_f23,
45 rs_f24, rs_f25, rs_f26, rs_f27, rs_f28, rs_f29, rs_f30, rs_f31};
Vladimir Marko089142c2014-06-05 10:57:05 +010046static constexpr RegStorage dp_regs_arr[] =
Matteo Franchine45fb9e2014-05-06 10:10:30 +010047 {rs_d0, rs_d1, rs_d2, rs_d3, rs_d4, rs_d5, rs_d6, rs_d7,
Zheng Xuc8304302014-05-15 17:21:01 +010048 rs_d8, rs_d9, rs_d10, rs_d11, rs_d12, rs_d13, rs_d14, rs_d15,
49 rs_d16, rs_d17, rs_d18, rs_d19, rs_d20, rs_d21, rs_d22, rs_d23,
50 rs_d24, rs_d25, rs_d26, rs_d27, rs_d28, rs_d29, rs_d30, rs_d31};
Vladimir Marko089142c2014-06-05 10:57:05 +010051static constexpr RegStorage reserved_regs_arr[] =
Zheng Xubaa7c882014-06-30 14:26:50 +080052 {rs_wSUSPEND, rs_wSELF, rs_wsp, rs_wLR, rs_wzr};
Vladimir Marko089142c2014-06-05 10:57:05 +010053static constexpr RegStorage reserved64_regs_arr[] =
Zheng Xubaa7c882014-06-30 14:26:50 +080054 {rs_xSUSPEND, rs_xSELF, rs_sp, rs_xLR, rs_xzr};
Matteo Franchinbc6d1972014-05-13 12:33:28 +010055// TUNING: Are there too many temp registers and too less promote target?
Zheng Xuc8304302014-05-15 17:21:01 +010056// This definition need to be matched with runtime.cc, quick entry assembly and JNI compiler
57// Note: we are not able to call to C function directly if it un-match C ABI.
58// Currently, rs_rA64_SELF is not a callee save register which does not match C ABI.
Vladimir Marko089142c2014-06-05 10:57:05 +010059static constexpr RegStorage core_temps_arr[] =
buzbeeb01bf152014-05-13 15:59:07 -070060 {rs_w0, rs_w1, rs_w2, rs_w3, rs_w4, rs_w5, rs_w6, rs_w7,
61 rs_w8, rs_w9, rs_w10, rs_w11, rs_w12, rs_w13, rs_w14, rs_w15, rs_w16,
62 rs_w17};
Vladimir Marko089142c2014-06-05 10:57:05 +010063static constexpr RegStorage core64_temps_arr[] =
Zheng Xuc8304302014-05-15 17:21:01 +010064 {rs_x0, rs_x1, rs_x2, rs_x3, rs_x4, rs_x5, rs_x6, rs_x7,
65 rs_x8, rs_x9, rs_x10, rs_x11, rs_x12, rs_x13, rs_x14, rs_x15, rs_x16,
66 rs_x17};
Vladimir Marko089142c2014-06-05 10:57:05 +010067static constexpr RegStorage sp_temps_arr[] =
Matteo Franchine45fb9e2014-05-06 10:10:30 +010068 {rs_f0, rs_f1, rs_f2, rs_f3, rs_f4, rs_f5, rs_f6, rs_f7,
Zheng Xuc8304302014-05-15 17:21:01 +010069 rs_f16, rs_f17, rs_f18, rs_f19, rs_f20, rs_f21, rs_f22, rs_f23,
70 rs_f24, rs_f25, rs_f26, rs_f27, rs_f28, rs_f29, rs_f30, rs_f31};
Vladimir Marko089142c2014-06-05 10:57:05 +010071static constexpr RegStorage dp_temps_arr[] =
Zheng Xuc8304302014-05-15 17:21:01 +010072 {rs_d0, rs_d1, rs_d2, rs_d3, rs_d4, rs_d5, rs_d6, rs_d7,
73 rs_d16, rs_d17, rs_d18, rs_d19, rs_d20, rs_d21, rs_d22, rs_d23,
74 rs_d24, rs_d25, rs_d26, rs_d27, rs_d28, rs_d29, rs_d30, rs_d31};
Matteo Franchin43ec8732014-03-31 15:00:14 +010075
Vladimir Marko089142c2014-06-05 10:57:05 +010076static constexpr ArrayRef<const RegStorage> core_regs(core_regs_arr);
77static constexpr ArrayRef<const RegStorage> core64_regs(core64_regs_arr);
78static constexpr ArrayRef<const RegStorage> sp_regs(sp_regs_arr);
79static constexpr ArrayRef<const RegStorage> dp_regs(dp_regs_arr);
80static constexpr ArrayRef<const RegStorage> reserved_regs(reserved_regs_arr);
81static constexpr ArrayRef<const RegStorage> reserved64_regs(reserved64_regs_arr);
82static constexpr ArrayRef<const RegStorage> core_temps(core_temps_arr);
83static constexpr ArrayRef<const RegStorage> core64_temps(core64_temps_arr);
84static constexpr ArrayRef<const RegStorage> sp_temps(sp_temps_arr);
85static constexpr ArrayRef<const RegStorage> dp_temps(dp_temps_arr);
Matteo Franchin43ec8732014-03-31 15:00:14 +010086
87RegLocation Arm64Mir2Lir::LocCReturn() {
88 return arm_loc_c_return;
89}
90
buzbeea0cd2d72014-06-01 09:33:49 -070091RegLocation Arm64Mir2Lir::LocCReturnRef() {
Andreas Gampe4b537a82014-06-30 22:24:53 -070092 return arm_loc_c_return_ref;
buzbeea0cd2d72014-06-01 09:33:49 -070093}
94
Matteo Franchin43ec8732014-03-31 15:00:14 +010095RegLocation Arm64Mir2Lir::LocCReturnWide() {
96 return arm_loc_c_return_wide;
97}
98
99RegLocation Arm64Mir2Lir::LocCReturnFloat() {
100 return arm_loc_c_return_float;
101}
102
103RegLocation Arm64Mir2Lir::LocCReturnDouble() {
104 return arm_loc_c_return_double;
105}
106
107// Return a target-dependent special register.
108RegStorage Arm64Mir2Lir::TargetReg(SpecialTargetRegister reg) {
109 RegStorage res_reg = RegStorage::InvalidReg();
110 switch (reg) {
Matteo Franchined7a0f22014-06-10 19:23:45 +0100111 case kSelf: res_reg = rs_wSELF; break;
112 case kSuspend: res_reg = rs_wSUSPEND; break;
113 case kLr: res_reg = rs_wLR; break;
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100114 case kPc: res_reg = RegStorage::InvalidReg(); break;
Matteo Franchined7a0f22014-06-10 19:23:45 +0100115 case kSp: res_reg = rs_wsp; break;
116 case kArg0: res_reg = rs_w0; break;
117 case kArg1: res_reg = rs_w1; break;
118 case kArg2: res_reg = rs_w2; break;
119 case kArg3: res_reg = rs_w3; break;
120 case kArg4: res_reg = rs_w4; break;
121 case kArg5: res_reg = rs_w5; break;
122 case kArg6: res_reg = rs_w6; break;
123 case kArg7: res_reg = rs_w7; break;
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100124 case kFArg0: res_reg = rs_f0; break;
125 case kFArg1: res_reg = rs_f1; break;
126 case kFArg2: res_reg = rs_f2; break;
127 case kFArg3: res_reg = rs_f3; break;
buzbee33ae5582014-06-12 14:56:32 -0700128 case kFArg4: res_reg = rs_f4; break;
129 case kFArg5: res_reg = rs_f5; break;
130 case kFArg6: res_reg = rs_f6; break;
131 case kFArg7: res_reg = rs_f7; break;
Matteo Franchined7a0f22014-06-10 19:23:45 +0100132 case kRet0: res_reg = rs_w0; break;
133 case kRet1: res_reg = rs_w1; break;
134 case kInvokeTgt: res_reg = rs_wLR; break;
135 case kHiddenArg: res_reg = rs_w12; break;
Matteo Franchin43ec8732014-03-31 15:00:14 +0100136 case kHiddenFpArg: res_reg = RegStorage::InvalidReg(); break;
137 case kCount: res_reg = RegStorage::InvalidReg(); break;
Dmitry Petrochenko58994cd2014-05-17 01:02:18 +0700138 default: res_reg = RegStorage::InvalidReg();
Matteo Franchin43ec8732014-03-31 15:00:14 +0100139 }
140 return res_reg;
141}
142
Matteo Franchin43ec8732014-03-31 15:00:14 +0100143/*
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100144 * Decode the register id. This routine makes assumptions on the encoding made by RegStorage.
Matteo Franchin43ec8732014-03-31 15:00:14 +0100145 */
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100146ResourceMask Arm64Mir2Lir::GetRegMaskCommon(const RegStorage& reg) const {
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100147 // TODO(Arm64): this function depends too much on the internal RegStorage encoding. Refactor.
148
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100149 // Check if the shape mask is zero (i.e. invalid).
150 if (UNLIKELY(reg == rs_wzr || reg == rs_xzr)) {
151 // The zero register is not a true register. It is just an immediate zero.
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100152 return kEncodeNone;
Matteo Franchin43ec8732014-03-31 15:00:14 +0100153 }
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100154
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100155 return ResourceMask::Bit(
156 // FP register starts at bit position 32.
157 (reg.IsFloat() ? kArm64FPReg0 : 0) + reg.GetRegNum());
Matteo Franchin43ec8732014-03-31 15:00:14 +0100158}
159
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100160ResourceMask Arm64Mir2Lir::GetPCUseDefEncoding() const {
Zheng Xu421efca2014-07-11 17:33:59 +0800161 // Note: On arm64, we are not able to set pc except branch instructions, which is regarded as a
162 // kind of barrier. All other instructions only use pc, which has no dependency between any
163 // of them. So it is fine to just return kEncodeNone here.
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100164 return kEncodeNone;
Matteo Franchin43ec8732014-03-31 15:00:14 +0100165}
166
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100167// Arm64 specific setup. TODO: inline?:
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100168void Arm64Mir2Lir::SetupTargetResourceMasks(LIR* lir, uint64_t flags,
169 ResourceMask* use_mask, ResourceMask* def_mask) {
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100170 DCHECK_EQ(cu_->instruction_set, kArm64);
Matteo Franchin43ec8732014-03-31 15:00:14 +0100171 DCHECK(!lir->flags.use_def_invalid);
172
Zheng Xu421efca2014-07-11 17:33:59 +0800173 // Note: REG_USE_PC is ignored, the reason is the same with what we do in GetPCUseDefEncoding().
Matteo Franchin43ec8732014-03-31 15:00:14 +0100174 // These flags are somewhat uncommon - bypass if we can.
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100175 if ((flags & (REG_DEF_SP | REG_USE_SP | REG_DEF_LR)) != 0) {
Matteo Franchin43ec8732014-03-31 15:00:14 +0100176 if (flags & REG_DEF_SP) {
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100177 def_mask->SetBit(kArm64RegSP);
Matteo Franchin43ec8732014-03-31 15:00:14 +0100178 }
179
180 if (flags & REG_USE_SP) {
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100181 use_mask->SetBit(kArm64RegSP);
Matteo Franchin43ec8732014-03-31 15:00:14 +0100182 }
183
Matteo Franchin43ec8732014-03-31 15:00:14 +0100184 if (flags & REG_DEF_LR) {
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100185 def_mask->SetBit(kArm64RegLR);
Matteo Franchin43ec8732014-03-31 15:00:14 +0100186 }
187 }
188}
189
190ArmConditionCode Arm64Mir2Lir::ArmConditionEncoding(ConditionCode ccode) {
191 ArmConditionCode res;
192 switch (ccode) {
193 case kCondEq: res = kArmCondEq; break;
194 case kCondNe: res = kArmCondNe; break;
195 case kCondCs: res = kArmCondCs; break;
196 case kCondCc: res = kArmCondCc; break;
197 case kCondUlt: res = kArmCondCc; break;
198 case kCondUge: res = kArmCondCs; break;
199 case kCondMi: res = kArmCondMi; break;
200 case kCondPl: res = kArmCondPl; break;
201 case kCondVs: res = kArmCondVs; break;
202 case kCondVc: res = kArmCondVc; break;
203 case kCondHi: res = kArmCondHi; break;
204 case kCondLs: res = kArmCondLs; break;
205 case kCondGe: res = kArmCondGe; break;
206 case kCondLt: res = kArmCondLt; break;
207 case kCondGt: res = kArmCondGt; break;
208 case kCondLe: res = kArmCondLe; break;
209 case kCondAl: res = kArmCondAl; break;
210 case kCondNv: res = kArmCondNv; break;
211 default:
212 LOG(FATAL) << "Bad condition code " << ccode;
213 res = static_cast<ArmConditionCode>(0); // Quiet gcc
214 }
215 return res;
216}
217
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100218static const char *shift_names[4] = {
Matteo Franchin43ec8732014-03-31 15:00:14 +0100219 "lsl",
220 "lsr",
221 "asr",
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100222 "ror"
223};
Matteo Franchin43ec8732014-03-31 15:00:14 +0100224
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100225static const char* extend_names[8] = {
226 "uxtb",
227 "uxth",
228 "uxtw",
229 "uxtx",
230 "sxtb",
231 "sxth",
232 "sxtw",
233 "sxtx",
234};
235
236/* Decode and print a register extension (e.g. ", uxtb #1") */
237static void DecodeRegExtendOrShift(int operand, char *buf, size_t buf_size) {
238 if ((operand & (1 << 6)) == 0) {
239 const char *shift_name = shift_names[(operand >> 7) & 0x3];
240 int amount = operand & 0x3f;
241 snprintf(buf, buf_size, ", %s #%d", shift_name, amount);
242 } else {
243 const char *extend_name = extend_names[(operand >> 3) & 0x7];
244 int amount = operand & 0x7;
245 if (amount == 0) {
246 snprintf(buf, buf_size, ", %s", extend_name);
247 } else {
248 snprintf(buf, buf_size, ", %s #%d", extend_name, amount);
249 }
250 }
251}
252
253#define BIT_MASK(w) ((UINT64_C(1) << (w)) - UINT64_C(1))
254
255static uint64_t RotateRight(uint64_t value, unsigned rotate, unsigned width) {
256 DCHECK_LE(width, 64U);
257 rotate &= 63;
258 value = value & BIT_MASK(width);
259 return ((value & BIT_MASK(rotate)) << (width - rotate)) | (value >> rotate);
260}
261
262static uint64_t RepeatBitsAcrossReg(bool is_wide, uint64_t value, unsigned width) {
263 unsigned i;
264 unsigned reg_size = (is_wide) ? 64 : 32;
265 uint64_t result = value & BIT_MASK(width);
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100266 for (i = width; i < reg_size; i *= 2) {
267 result |= (result << i);
268 }
269 DCHECK_EQ(i, reg_size);
270 return result;
271}
272
273/**
274 * @brief Decode an immediate in the form required by logical instructions.
275 *
276 * @param is_wide Whether @p value encodes a 64-bit (as opposed to 32-bit) immediate.
277 * @param value The encoded logical immediates that is to be decoded.
278 * @return The decoded logical immediate.
279 * @note This is the inverse of Arm64Mir2Lir::EncodeLogicalImmediate().
280 */
281uint64_t Arm64Mir2Lir::DecodeLogicalImmediate(bool is_wide, int value) {
282 unsigned n = (value >> 12) & 0x01;
283 unsigned imm_r = (value >> 6) & 0x3f;
284 unsigned imm_s = (value >> 0) & 0x3f;
285
286 // An integer is constructed from the n, imm_s and imm_r bits according to
287 // the following table:
288 //
289 // N imms immr size S R
290 // 1 ssssss rrrrrr 64 UInt(ssssss) UInt(rrrrrr)
291 // 0 0sssss xrrrrr 32 UInt(sssss) UInt(rrrrr)
292 // 0 10ssss xxrrrr 16 UInt(ssss) UInt(rrrr)
293 // 0 110sss xxxrrr 8 UInt(sss) UInt(rrr)
294 // 0 1110ss xxxxrr 4 UInt(ss) UInt(rr)
295 // 0 11110s xxxxxr 2 UInt(s) UInt(r)
296 // (s bits must not be all set)
297 //
298 // A pattern is constructed of size bits, where the least significant S+1
299 // bits are set. The pattern is rotated right by R, and repeated across a
300 // 32 or 64-bit value, depending on destination register width.
301
302 if (n == 1) {
303 DCHECK_NE(imm_s, 0x3fU);
304 uint64_t bits = BIT_MASK(imm_s + 1);
305 return RotateRight(bits, imm_r, 64);
306 } else {
307 DCHECK_NE((imm_s >> 1), 0x1fU);
308 for (unsigned width = 0x20; width >= 0x2; width >>= 1) {
309 if ((imm_s & width) == 0) {
310 unsigned mask = (unsigned)(width - 1);
311 DCHECK_NE((imm_s & mask), mask);
312 uint64_t bits = BIT_MASK((imm_s & mask) + 1);
313 return RepeatBitsAcrossReg(is_wide, RotateRight(bits, imm_r & mask, width), width);
Matteo Franchin43ec8732014-03-31 15:00:14 +0100314 }
315 }
316 }
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100317 return 0;
Matteo Franchin43ec8732014-03-31 15:00:14 +0100318}
319
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100320/**
321 * @brief Decode an 8-bit single point number encoded with EncodeImmSingle().
322 */
323static float DecodeImmSingle(uint8_t small_float) {
324 int mantissa = (small_float & 0x0f) + 0x10;
325 int sign = ((small_float & 0x80) == 0) ? 1 : -1;
326 float signed_mantissa = static_cast<float>(sign*mantissa);
327 int exponent = (((small_float >> 4) & 0x7) + 4) & 0x7;
328 return signed_mantissa*static_cast<float>(1 << exponent)*0.0078125f;
Matteo Franchin43ec8732014-03-31 15:00:14 +0100329}
330
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100331static const char* cc_names[] = {"eq", "ne", "cs", "cc", "mi", "pl", "vs", "vc",
332 "hi", "ls", "ge", "lt", "gt", "le", "al", "nv"};
Matteo Franchin43ec8732014-03-31 15:00:14 +0100333/*
334 * Interpret a format string and build a string no longer than size
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100335 * See format key in assemble_arm64.cc.
Matteo Franchin43ec8732014-03-31 15:00:14 +0100336 */
337std::string Arm64Mir2Lir::BuildInsnString(const char* fmt, LIR* lir, unsigned char* base_addr) {
338 std::string buf;
Matteo Franchin43ec8732014-03-31 15:00:14 +0100339 const char* fmt_end = &fmt[strlen(fmt)];
340 char tbuf[256];
341 const char* name;
342 char nc;
343 while (fmt < fmt_end) {
344 int operand;
345 if (*fmt == '!') {
346 fmt++;
347 DCHECK_LT(fmt, fmt_end);
348 nc = *fmt++;
349 if (nc == '!') {
350 strcpy(tbuf, "!");
351 } else {
352 DCHECK_LT(fmt, fmt_end);
353 DCHECK_LT(static_cast<unsigned>(nc-'0'), 4U);
354 operand = lir->operands[nc-'0'];
355 switch (*fmt++) {
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100356 case 'e': {
357 // Omit ", uxtw #0" in strings like "add w0, w1, w3, uxtw #0" and
358 // ", uxtx #0" in strings like "add x0, x1, x3, uxtx #0"
359 int omittable = ((IS_WIDE(lir->opcode)) ? EncodeExtend(kA64Uxtw, 0) :
360 EncodeExtend(kA64Uxtw, 0));
361 if (LIKELY(operand == omittable)) {
362 strcpy(tbuf, "");
363 } else {
364 DecodeRegExtendOrShift(operand, tbuf, arraysize(tbuf));
365 }
366 }
367 break;
368 case 'o':
369 // Omit ", lsl #0"
370 if (LIKELY(operand == EncodeShift(kA64Lsl, 0))) {
Matteo Franchin43ec8732014-03-31 15:00:14 +0100371 strcpy(tbuf, "");
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100372 } else {
373 DecodeRegExtendOrShift(operand, tbuf, arraysize(tbuf));
Matteo Franchin43ec8732014-03-31 15:00:14 +0100374 }
375 break;
376 case 'B':
377 switch (operand) {
378 case kSY:
379 name = "sy";
380 break;
381 case kST:
382 name = "st";
383 break;
384 case kISH:
385 name = "ish";
386 break;
387 case kISHST:
388 name = "ishst";
389 break;
390 case kNSH:
391 name = "nsh";
392 break;
393 case kNSHST:
394 name = "shst";
395 break;
396 default:
397 name = "DecodeError2";
398 break;
399 }
400 strcpy(tbuf, name);
401 break;
Matteo Franchin43ec8732014-03-31 15:00:14 +0100402 case 's':
Matteo Franchinbc6d1972014-05-13 12:33:28 +0100403 snprintf(tbuf, arraysize(tbuf), "s%d", operand & RegStorage::kRegNumMask);
Matteo Franchin43ec8732014-03-31 15:00:14 +0100404 break;
405 case 'S':
Matteo Franchinbc6d1972014-05-13 12:33:28 +0100406 snprintf(tbuf, arraysize(tbuf), "d%d", operand & RegStorage::kRegNumMask);
Matteo Franchin43ec8732014-03-31 15:00:14 +0100407 break;
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100408 case 'f':
409 snprintf(tbuf, arraysize(tbuf), "%c%d", (IS_FWIDE(lir->opcode)) ? 'd' : 's',
Matteo Franchinbc6d1972014-05-13 12:33:28 +0100410 operand & RegStorage::kRegNumMask);
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100411 break;
412 case 'l': {
413 bool is_wide = IS_WIDE(lir->opcode);
414 uint64_t imm = DecodeLogicalImmediate(is_wide, operand);
415 snprintf(tbuf, arraysize(tbuf), "%" PRId64 " (%#" PRIx64 ")", imm, imm);
416 }
417 break;
418 case 'I':
419 snprintf(tbuf, arraysize(tbuf), "%f", DecodeImmSingle(operand));
Matteo Franchin43ec8732014-03-31 15:00:14 +0100420 break;
421 case 'M':
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100422 if (LIKELY(operand == 0))
423 strcpy(tbuf, "");
424 else
425 snprintf(tbuf, arraysize(tbuf), ", lsl #%d", 16*operand);
426 break;
Matteo Franchin43ec8732014-03-31 15:00:14 +0100427 case 'd':
428 snprintf(tbuf, arraysize(tbuf), "%d", operand);
429 break;
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100430 case 'w':
431 if (LIKELY(operand != rwzr))
432 snprintf(tbuf, arraysize(tbuf), "w%d", operand & RegStorage::kRegNumMask);
433 else
434 strcpy(tbuf, "wzr");
435 break;
436 case 'W':
437 if (LIKELY(operand != rwsp))
438 snprintf(tbuf, arraysize(tbuf), "w%d", operand & RegStorage::kRegNumMask);
439 else
440 strcpy(tbuf, "wsp");
441 break;
442 case 'x':
443 if (LIKELY(operand != rxzr))
444 snprintf(tbuf, arraysize(tbuf), "x%d", operand & RegStorage::kRegNumMask);
445 else
446 strcpy(tbuf, "xzr");
447 break;
448 case 'X':
449 if (LIKELY(operand != rsp))
450 snprintf(tbuf, arraysize(tbuf), "x%d", operand & RegStorage::kRegNumMask);
451 else
452 strcpy(tbuf, "sp");
453 break;
454 case 'D':
455 snprintf(tbuf, arraysize(tbuf), "%d", operand*((IS_WIDE(lir->opcode)) ? 8 : 4));
Matteo Franchin43ec8732014-03-31 15:00:14 +0100456 break;
457 case 'E':
458 snprintf(tbuf, arraysize(tbuf), "%d", operand*4);
459 break;
460 case 'F':
461 snprintf(tbuf, arraysize(tbuf), "%d", operand*2);
462 break;
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100463 case 'G':
464 if (LIKELY(operand == 0))
465 strcpy(tbuf, "");
466 else
467 strcpy(tbuf, (IS_WIDE(lir->opcode)) ? ", lsl #3" : ", lsl #2");
468 break;
Matteo Franchin43ec8732014-03-31 15:00:14 +0100469 case 'c':
470 strcpy(tbuf, cc_names[operand]);
471 break;
472 case 't':
473 snprintf(tbuf, arraysize(tbuf), "0x%08" PRIxPTR " (L%p)",
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100474 reinterpret_cast<uintptr_t>(base_addr) + lir->offset + (operand << 2),
Matteo Franchin43ec8732014-03-31 15:00:14 +0100475 lir->target);
476 break;
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100477 case 'r': {
478 bool is_wide = IS_WIDE(lir->opcode);
479 if (LIKELY(operand != rwzr && operand != rxzr)) {
480 snprintf(tbuf, arraysize(tbuf), "%c%d", (is_wide) ? 'x' : 'w',
481 operand & RegStorage::kRegNumMask);
482 } else {
483 strcpy(tbuf, (is_wide) ? "xzr" : "wzr");
484 }
485 }
Matteo Franchin43ec8732014-03-31 15:00:14 +0100486 break;
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100487 case 'R': {
488 bool is_wide = IS_WIDE(lir->opcode);
Matteo Franchinbc6d1972014-05-13 12:33:28 +0100489 if (LIKELY(operand != rwsp && operand != rsp)) {
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100490 snprintf(tbuf, arraysize(tbuf), "%c%d", (is_wide) ? 'x' : 'w',
491 operand & RegStorage::kRegNumMask);
492 } else {
493 strcpy(tbuf, (is_wide) ? "sp" : "wsp");
494 }
495 }
Matteo Franchin43ec8732014-03-31 15:00:14 +0100496 break;
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100497 case 'p':
498 snprintf(tbuf, arraysize(tbuf), ".+%d (addr %#" PRIxPTR ")", 4*operand,
499 reinterpret_cast<uintptr_t>(base_addr) + lir->offset + 4*operand);
Matteo Franchin43ec8732014-03-31 15:00:14 +0100500 break;
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100501 case 'T':
502 if (LIKELY(operand == 0))
503 strcpy(tbuf, "");
504 else if (operand == 1)
505 strcpy(tbuf, ", lsl #12");
506 else
507 strcpy(tbuf, ", DecodeError3");
Matteo Franchin43ec8732014-03-31 15:00:14 +0100508 break;
509 default:
510 strcpy(tbuf, "DecodeError1");
511 break;
512 }
513 buf += tbuf;
514 }
515 } else {
516 buf += *fmt++;
517 }
518 }
519 return buf;
520}
521
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100522void Arm64Mir2Lir::DumpResourceMask(LIR* arm_lir, const ResourceMask& mask, const char* prefix) {
Matteo Franchin43ec8732014-03-31 15:00:14 +0100523 char buf[256];
524 buf[0] = 0;
525
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100526 if (mask.Equals(kEncodeAll)) {
Matteo Franchin43ec8732014-03-31 15:00:14 +0100527 strcpy(buf, "all");
528 } else {
529 char num[8];
530 int i;
531
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100532 for (i = 0; i < kArm64RegEnd; i++) {
533 if (mask.HasBit(i)) {
Matteo Franchin43ec8732014-03-31 15:00:14 +0100534 snprintf(num, arraysize(num), "%d ", i);
535 strcat(buf, num);
536 }
537 }
538
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100539 if (mask.HasBit(ResourceMask::kCCode)) {
Matteo Franchin43ec8732014-03-31 15:00:14 +0100540 strcat(buf, "cc ");
541 }
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100542 if (mask.HasBit(ResourceMask::kFPStatus)) {
Matteo Franchin43ec8732014-03-31 15:00:14 +0100543 strcat(buf, "fpcc ");
544 }
545
546 /* Memory bits */
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100547 if (arm_lir && (mask.HasBit(ResourceMask::kDalvikReg))) {
Matteo Franchin43ec8732014-03-31 15:00:14 +0100548 snprintf(buf + strlen(buf), arraysize(buf) - strlen(buf), "dr%d%s",
549 DECODE_ALIAS_INFO_REG(arm_lir->flags.alias_info),
550 DECODE_ALIAS_INFO_WIDE(arm_lir->flags.alias_info) ? "(+1)" : "");
551 }
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100552 if (mask.HasBit(ResourceMask::kLiteral)) {
Matteo Franchin43ec8732014-03-31 15:00:14 +0100553 strcat(buf, "lit ");
554 }
555
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100556 if (mask.HasBit(ResourceMask::kHeapRef)) {
Matteo Franchin43ec8732014-03-31 15:00:14 +0100557 strcat(buf, "heap ");
558 }
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100559 if (mask.HasBit(ResourceMask::kMustNotAlias)) {
Matteo Franchin43ec8732014-03-31 15:00:14 +0100560 strcat(buf, "noalias ");
561 }
562 }
563 if (buf[0]) {
564 LOG(INFO) << prefix << ": " << buf;
565 }
566}
567
568bool Arm64Mir2Lir::IsUnconditionalBranch(LIR* lir) {
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100569 return (lir->opcode == kA64B1t);
Matteo Franchin43ec8732014-03-31 15:00:14 +0100570}
571
Vladimir Marko674744e2014-04-24 15:18:26 +0100572RegisterClass Arm64Mir2Lir::RegClassForFieldLoadStore(OpSize size, bool is_volatile) {
573 if (UNLIKELY(is_volatile)) {
574 // On arm64, fp register load/store is atomic only for single bytes.
575 if (size != kSignedByte && size != kUnsignedByte) {
buzbeea0cd2d72014-06-01 09:33:49 -0700576 return (size == kReference) ? kRefReg : kCoreReg;
Vladimir Marko674744e2014-04-24 15:18:26 +0100577 }
578 }
579 return RegClassBySize(size);
580}
581
Matteo Franchin43ec8732014-03-31 15:00:14 +0100582Arm64Mir2Lir::Arm64Mir2Lir(CompilationUnit* cu, MIRGraph* mir_graph, ArenaAllocator* arena)
583 : Mir2Lir(cu, mir_graph, arena) {
584 // Sanity check - make sure encoding map lines up.
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100585 for (int i = 0; i < kA64Last; i++) {
586 if (UNWIDE(Arm64Mir2Lir::EncodingMap[i].opcode) != i) {
Matteo Franchin43ec8732014-03-31 15:00:14 +0100587 LOG(FATAL) << "Encoding order for " << Arm64Mir2Lir::EncodingMap[i].name
588 << " is wrong: expecting " << i << ", seeing "
589 << static_cast<int>(Arm64Mir2Lir::EncodingMap[i].opcode);
590 }
591 }
592}
593
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100594Mir2Lir* Arm64CodeGenerator(CompilationUnit* const cu, MIRGraph* const mir_graph,
595 ArenaAllocator* const arena) {
Matteo Franchin43ec8732014-03-31 15:00:14 +0100596 return new Arm64Mir2Lir(cu, mir_graph, arena);
597}
598
Matteo Franchin43ec8732014-03-31 15:00:14 +0100599void Arm64Mir2Lir::CompilerInitializeRegAlloc() {
buzbeeb01bf152014-05-13 15:59:07 -0700600 reg_pool_ = new (arena_) RegisterPool(this, arena_, core_regs, core64_regs, sp_regs, dp_regs,
601 reserved_regs, reserved64_regs, core_temps, core64_temps,
602 sp_temps, dp_temps);
Matteo Franchin43ec8732014-03-31 15:00:14 +0100603
604 // Target-specific adjustments.
Matteo Franchinbc6d1972014-05-13 12:33:28 +0100605 // Alias single precision float registers to corresponding double registers.
606 GrowableArray<RegisterInfo*>::Iterator fp_it(&reg_pool_->sp_regs_);
607 for (RegisterInfo* info = fp_it.Next(); info != nullptr; info = fp_it.Next()) {
608 int fp_reg_num = info->GetReg().GetRegNum();
Serban Constantinescued65c5e2014-05-22 15:10:18 +0100609 RegStorage dp_reg = RegStorage::FloatSolo64(fp_reg_num);
Matteo Franchin43ec8732014-03-31 15:00:14 +0100610 RegisterInfo* dp_reg_info = GetRegInfo(dp_reg);
611 // Double precision register's master storage should refer to itself.
612 DCHECK_EQ(dp_reg_info, dp_reg_info->Master());
613 // Redirect single precision's master storage to master.
614 info->SetMaster(dp_reg_info);
615 // Singles should show a single 32-bit mask bit, at first referring to the low half.
616 DCHECK_EQ(info->StorageMask(), 0x1U);
Matteo Franchin43ec8732014-03-31 15:00:14 +0100617 }
618
Serban Constantinescued65c5e2014-05-22 15:10:18 +0100619 // Alias 32bit W registers to corresponding 64bit X registers.
620 GrowableArray<RegisterInfo*>::Iterator w_it(&reg_pool_->core_regs_);
621 for (RegisterInfo* info = w_it.Next(); info != nullptr; info = w_it.Next()) {
622 int x_reg_num = info->GetReg().GetRegNum();
623 RegStorage x_reg = RegStorage::Solo64(x_reg_num);
624 RegisterInfo* x_reg_info = GetRegInfo(x_reg);
625 // 64bit X register's master storage should refer to itself.
626 DCHECK_EQ(x_reg_info, x_reg_info->Master());
627 // Redirect 32bit W master storage to 64bit X.
628 info->SetMaster(x_reg_info);
629 // 32bit W should show a single 32-bit mask bit, at first referring to the low half.
630 DCHECK_EQ(info->StorageMask(), 0x1U);
631 }
632
Matteo Franchin43ec8732014-03-31 15:00:14 +0100633 // Don't start allocating temps at r0/s0/d0 or you may clobber return regs in early-exit methods.
634 // TODO: adjust when we roll to hard float calling convention.
635 reg_pool_->next_core_reg_ = 2;
636 reg_pool_->next_sp_reg_ = 0;
637 reg_pool_->next_dp_reg_ = 0;
638}
639
Matteo Franchin43ec8732014-03-31 15:00:14 +0100640/*
641 * TUNING: is true leaf? Can't just use METHOD_IS_LEAF to determine as some
642 * instructions might call out to C/assembly helper functions. Until
643 * machinery is in place, always spill lr.
644 */
645
646void Arm64Mir2Lir::AdjustSpillMask() {
Zheng Xubaa7c882014-06-30 14:26:50 +0800647 core_spill_mask_ |= (1 << rs_xLR.GetRegNum());
Matteo Franchin43ec8732014-03-31 15:00:14 +0100648 num_core_spills_++;
649}
650
Matteo Franchin43ec8732014-03-31 15:00:14 +0100651/* Clobber all regs that might be used by an external C call */
652void Arm64Mir2Lir::ClobberCallerSave() {
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100653 Clobber(rs_x0);
654 Clobber(rs_x1);
655 Clobber(rs_x2);
656 Clobber(rs_x3);
Matteo Franchinbc6d1972014-05-13 12:33:28 +0100657 Clobber(rs_x4);
658 Clobber(rs_x5);
659 Clobber(rs_x6);
660 Clobber(rs_x7);
661 Clobber(rs_x8);
662 Clobber(rs_x9);
663 Clobber(rs_x10);
664 Clobber(rs_x11);
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100665 Clobber(rs_x12);
Matteo Franchinbc6d1972014-05-13 12:33:28 +0100666 Clobber(rs_x13);
667 Clobber(rs_x14);
668 Clobber(rs_x15);
669 Clobber(rs_x16);
670 Clobber(rs_x17);
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100671 Clobber(rs_x30);
Matteo Franchinbc6d1972014-05-13 12:33:28 +0100672
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100673 Clobber(rs_f0);
674 Clobber(rs_f1);
675 Clobber(rs_f2);
676 Clobber(rs_f3);
677 Clobber(rs_f4);
678 Clobber(rs_f5);
679 Clobber(rs_f6);
680 Clobber(rs_f7);
Matteo Franchinbc6d1972014-05-13 12:33:28 +0100681 Clobber(rs_f16);
682 Clobber(rs_f17);
683 Clobber(rs_f18);
684 Clobber(rs_f19);
685 Clobber(rs_f20);
686 Clobber(rs_f21);
687 Clobber(rs_f22);
688 Clobber(rs_f23);
689 Clobber(rs_f24);
690 Clobber(rs_f25);
691 Clobber(rs_f26);
692 Clobber(rs_f27);
693 Clobber(rs_f28);
694 Clobber(rs_f29);
695 Clobber(rs_f30);
696 Clobber(rs_f31);
Matteo Franchin43ec8732014-03-31 15:00:14 +0100697}
698
699RegLocation Arm64Mir2Lir::GetReturnWideAlt() {
700 RegLocation res = LocCReturnWide();
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100701 res.reg.SetReg(rx2);
702 res.reg.SetHighReg(rx3);
703 Clobber(rs_x2);
704 Clobber(rs_x3);
705 MarkInUse(rs_x2);
706 MarkInUse(rs_x3);
Matteo Franchin43ec8732014-03-31 15:00:14 +0100707 MarkWide(res.reg);
708 return res;
709}
710
711RegLocation Arm64Mir2Lir::GetReturnAlt() {
712 RegLocation res = LocCReturn();
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100713 res.reg.SetReg(rx1);
714 Clobber(rs_x1);
715 MarkInUse(rs_x1);
Matteo Franchin43ec8732014-03-31 15:00:14 +0100716 return res;
717}
718
719/* To be used when explicitly managing register use */
720void Arm64Mir2Lir::LockCallTemps() {
buzbee33ae5582014-06-12 14:56:32 -0700721 // TODO: needs cleanup.
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100722 LockTemp(rs_x0);
723 LockTemp(rs_x1);
724 LockTemp(rs_x2);
725 LockTemp(rs_x3);
buzbee33ae5582014-06-12 14:56:32 -0700726 LockTemp(rs_x4);
727 LockTemp(rs_x5);
728 LockTemp(rs_x6);
729 LockTemp(rs_x7);
730 LockTemp(rs_f0);
731 LockTemp(rs_f1);
732 LockTemp(rs_f2);
733 LockTemp(rs_f3);
734 LockTemp(rs_f4);
735 LockTemp(rs_f5);
736 LockTemp(rs_f6);
737 LockTemp(rs_f7);
Matteo Franchin43ec8732014-03-31 15:00:14 +0100738}
739
740/* To be used when explicitly managing register use */
741void Arm64Mir2Lir::FreeCallTemps() {
buzbee33ae5582014-06-12 14:56:32 -0700742 // TODO: needs cleanup.
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100743 FreeTemp(rs_x0);
744 FreeTemp(rs_x1);
745 FreeTemp(rs_x2);
746 FreeTemp(rs_x3);
buzbee33ae5582014-06-12 14:56:32 -0700747 FreeTemp(rs_x4);
748 FreeTemp(rs_x5);
749 FreeTemp(rs_x6);
750 FreeTemp(rs_x7);
751 FreeTemp(rs_f0);
752 FreeTemp(rs_f1);
753 FreeTemp(rs_f2);
754 FreeTemp(rs_f3);
755 FreeTemp(rs_f4);
756 FreeTemp(rs_f5);
757 FreeTemp(rs_f6);
758 FreeTemp(rs_f7);
Matteo Franchin43ec8732014-03-31 15:00:14 +0100759}
760
Andreas Gampe98430592014-07-27 19:44:50 -0700761RegStorage Arm64Mir2Lir::LoadHelper(QuickEntrypointEnum trampoline) {
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100762 // TODO(Arm64): use LoadWordDisp instead.
763 // e.g. LoadWordDisp(rs_rA64_SELF, offset.Int32Value(), rs_rA64_LR);
Andreas Gampe98430592014-07-27 19:44:50 -0700764 LoadBaseDisp(rs_xSELF, GetThreadOffset<8>(trampoline).Int32Value(), rs_xLR, k64, kNotVolatile);
Zheng Xubaa7c882014-06-30 14:26:50 +0800765 return rs_xLR;
Matteo Franchin43ec8732014-03-31 15:00:14 +0100766}
767
768LIR* Arm64Mir2Lir::CheckSuspendUsingLoad() {
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100769 RegStorage tmp = rs_x0;
Zheng Xubaa7c882014-06-30 14:26:50 +0800770 LoadWordDisp(rs_xSELF, Thread::ThreadSuspendTriggerOffset<8>().Int32Value(), tmp);
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100771 LIR* load2 = LoadWordDisp(tmp, 0, tmp);
Matteo Franchin43ec8732014-03-31 15:00:14 +0100772 return load2;
773}
774
775uint64_t Arm64Mir2Lir::GetTargetInstFlags(int opcode) {
776 DCHECK(!IsPseudoLirOp(opcode));
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100777 return Arm64Mir2Lir::EncodingMap[UNWIDE(opcode)].flags;
Matteo Franchin43ec8732014-03-31 15:00:14 +0100778}
779
780const char* Arm64Mir2Lir::GetTargetInstName(int opcode) {
781 DCHECK(!IsPseudoLirOp(opcode));
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100782 return Arm64Mir2Lir::EncodingMap[UNWIDE(opcode)].name;
Matteo Franchin43ec8732014-03-31 15:00:14 +0100783}
784
785const char* Arm64Mir2Lir::GetTargetInstFmt(int opcode) {
786 DCHECK(!IsPseudoLirOp(opcode));
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100787 return Arm64Mir2Lir::EncodingMap[UNWIDE(opcode)].fmt;
Matteo Franchin43ec8732014-03-31 15:00:14 +0100788}
789
buzbee33ae5582014-06-12 14:56:32 -0700790RegStorage Arm64Mir2Lir::InToRegStorageArm64Mapper::GetNextReg(bool is_double_or_float,
Zheng Xu949cd972014-06-23 18:33:08 +0800791 bool is_wide,
792 bool is_ref) {
buzbee33ae5582014-06-12 14:56:32 -0700793 const RegStorage coreArgMappingToPhysicalReg[] =
794 {rs_x1, rs_x2, rs_x3, rs_x4, rs_x5, rs_x6, rs_x7};
795 const int coreArgMappingToPhysicalRegSize =
796 sizeof(coreArgMappingToPhysicalReg) / sizeof(RegStorage);
797 const RegStorage fpArgMappingToPhysicalReg[] =
798 {rs_f0, rs_f1, rs_f2, rs_f3, rs_f4, rs_f5, rs_f6, rs_f7};
799 const int fpArgMappingToPhysicalRegSize =
800 sizeof(fpArgMappingToPhysicalReg) / sizeof(RegStorage);
801
802 RegStorage result = RegStorage::InvalidReg();
803 if (is_double_or_float) {
804 if (cur_fp_reg_ < fpArgMappingToPhysicalRegSize) {
Zheng Xu949cd972014-06-23 18:33:08 +0800805 DCHECK(!is_ref);
buzbee33ae5582014-06-12 14:56:32 -0700806 result = fpArgMappingToPhysicalReg[cur_fp_reg_++];
807 if (result.Valid()) {
808 // TODO: switching between widths remains a bit ugly. Better way?
809 int res_reg = result.GetReg();
810 result = is_wide ? RegStorage::FloatSolo64(res_reg) : RegStorage::FloatSolo32(res_reg);
811 }
812 }
813 } else {
814 if (cur_core_reg_ < coreArgMappingToPhysicalRegSize) {
815 result = coreArgMappingToPhysicalReg[cur_core_reg_++];
816 if (result.Valid()) {
817 // TODO: switching between widths remains a bit ugly. Better way?
818 int res_reg = result.GetReg();
Zheng Xu949cd972014-06-23 18:33:08 +0800819 DCHECK(!(is_wide && is_ref));
820 result = (is_wide || is_ref) ? RegStorage::Solo64(res_reg) : RegStorage::Solo32(res_reg);
buzbee33ae5582014-06-12 14:56:32 -0700821 }
822 }
823 }
824 return result;
825}
826
827RegStorage Arm64Mir2Lir::InToRegStorageMapping::Get(int in_position) {
828 DCHECK(IsInitialized());
829 auto res = mapping_.find(in_position);
830 return res != mapping_.end() ? res->second : RegStorage::InvalidReg();
831}
832
833void Arm64Mir2Lir::InToRegStorageMapping::Initialize(RegLocation* arg_locs, int count,
834 InToRegStorageMapper* mapper) {
835 DCHECK(mapper != nullptr);
836 max_mapped_in_ = -1;
837 is_there_stack_mapped_ = false;
838 for (int in_position = 0; in_position < count; in_position++) {
Zheng Xu949cd972014-06-23 18:33:08 +0800839 RegStorage reg = mapper->GetNextReg(arg_locs[in_position].fp,
840 arg_locs[in_position].wide,
841 arg_locs[in_position].ref);
buzbee33ae5582014-06-12 14:56:32 -0700842 if (reg.Valid()) {
843 mapping_[in_position] = reg;
Zheng Xu949cd972014-06-23 18:33:08 +0800844 if (arg_locs[in_position].wide) {
buzbee33ae5582014-06-12 14:56:32 -0700845 // We covered 2 args, so skip the next one
846 in_position++;
847 }
Zheng Xu949cd972014-06-23 18:33:08 +0800848 max_mapped_in_ = std::max(max_mapped_in_, in_position);
buzbee33ae5582014-06-12 14:56:32 -0700849 } else {
850 is_there_stack_mapped_ = true;
851 }
852 }
853 initialized_ = true;
854}
855
856
857// Deprecate. Use the new mechanism.
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100858// TODO(Arm64): reuse info in QuickArgumentVisitor?
859static RegStorage GetArgPhysicalReg(RegLocation* loc, int* num_gpr_used, int* num_fpr_used,
860 OpSize* op_size) {
861 if (loc->fp) {
862 int n = *num_fpr_used;
863 if (n < 8) {
864 *num_fpr_used = n + 1;
865 RegStorage::RegStorageKind reg_kind;
866 if (loc->wide) {
867 *op_size = kDouble;
868 reg_kind = RegStorage::k64BitSolo;
869 } else {
870 *op_size = kSingle;
871 reg_kind = RegStorage::k32BitSolo;
872 }
873 return RegStorage(RegStorage::kValid | reg_kind | RegStorage::kFloatingPoint | n);
874 }
875 } else {
876 int n = *num_gpr_used;
buzbee33ae5582014-06-12 14:56:32 -0700877 if (n < 8) {
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100878 *num_gpr_used = n + 1;
buzbeeb5860fb2014-06-21 15:31:01 -0700879 if (loc->wide || loc->ref) {
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100880 *op_size = k64;
881 return RegStorage::Solo64(n);
882 } else {
883 *op_size = k32;
884 return RegStorage::Solo32(n);
885 }
886 }
887 }
Ian Rogers54874942014-06-10 16:31:03 -0700888 *op_size = kWord;
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100889 return RegStorage::InvalidReg();
890}
891
buzbee33ae5582014-06-12 14:56:32 -0700892RegStorage Arm64Mir2Lir::GetArgMappingToPhysicalReg(int arg_num) {
893 if (!in_to_reg_storage_mapping_.IsInitialized()) {
894 int start_vreg = cu_->num_dalvik_registers - cu_->num_ins;
895 RegLocation* arg_locs = &mir_graph_->reg_location_[start_vreg];
896
897 InToRegStorageArm64Mapper mapper;
898 in_to_reg_storage_mapping_.Initialize(arg_locs, cu_->num_ins, &mapper);
899 }
900 return in_to_reg_storage_mapping_.Get(arg_num);
901}
902
903
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100904/*
905 * If there are any ins passed in registers that have not been promoted
906 * to a callee-save register, flush them to the frame. Perform initial
907 * assignment of promoted arguments.
908 *
909 * ArgLocs is an array of location records describing the incoming arguments
910 * with one location record per word of argument.
911 */
912void Arm64Mir2Lir::FlushIns(RegLocation* ArgLocs, RegLocation rl_method) {
913 int num_gpr_used = 1;
914 int num_fpr_used = 0;
915
916 /*
Zheng Xu511c8a62014-06-03 16:22:23 +0800917 * Dummy up a RegLocation for the incoming StackReference<mirror::ArtMethod>
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100918 * It will attempt to keep kArg0 live (or copy it to home location
919 * if promoted).
920 */
921 RegLocation rl_src = rl_method;
922 rl_src.location = kLocPhysReg;
Matteo Franchined7a0f22014-06-10 19:23:45 +0100923 rl_src.reg = TargetReg(kArg0, kRef);
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100924 rl_src.home = false;
925 MarkLive(rl_src);
Zheng Xu511c8a62014-06-03 16:22:23 +0800926 StoreValue(rl_method, rl_src);
927 // If Method* has been promoted, explicitly flush
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100928 if (rl_method.location == kLocPhysReg) {
Matteo Franchined7a0f22014-06-10 19:23:45 +0100929 StoreRefDisp(TargetPtrReg(kSp), 0, rl_src.reg, kNotVolatile);
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100930 }
931
932 if (cu_->num_ins == 0) {
933 return;
934 }
935
Vladimir Marko8dea81c2014-06-06 14:50:36 +0100936 // Handle dalvik registers.
937 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100938 int start_vreg = cu_->num_dalvik_registers - cu_->num_ins;
939 for (int i = 0; i < cu_->num_ins; i++) {
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100940 RegLocation* t_loc = &ArgLocs[i];
941 OpSize op_size;
942 RegStorage reg = GetArgPhysicalReg(t_loc, &num_gpr_used, &num_fpr_used, &op_size);
943
944 if (reg.Valid()) {
buzbeeb5860fb2014-06-21 15:31:01 -0700945 // If arriving in register.
946
947 // We have already updated the arg location with promoted info
948 // so we can be based on it.
949 if (t_loc->location == kLocPhysReg) {
950 // Just copy it.
951 OpRegCopy(t_loc->reg, reg);
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100952 } else {
buzbeeb5860fb2014-06-21 15:31:01 -0700953 // Needs flush.
954 if (t_loc->ref) {
Matteo Franchined7a0f22014-06-10 19:23:45 +0100955 StoreRefDisp(TargetPtrReg(kSp), SRegOffset(start_vreg + i), reg, kNotVolatile);
buzbeeb5860fb2014-06-21 15:31:01 -0700956 } else {
Matteo Franchined7a0f22014-06-10 19:23:45 +0100957 StoreBaseDisp(TargetPtrReg(kSp), SRegOffset(start_vreg + i), reg, t_loc->wide ? k64 : k32,
buzbeeb5860fb2014-06-21 15:31:01 -0700958 kNotVolatile);
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100959 }
960 }
961 } else {
buzbeeb5860fb2014-06-21 15:31:01 -0700962 // If arriving in frame & promoted.
963 if (t_loc->location == kLocPhysReg) {
964 if (t_loc->ref) {
Matteo Franchined7a0f22014-06-10 19:23:45 +0100965 LoadRefDisp(TargetPtrReg(kSp), SRegOffset(start_vreg + i), t_loc->reg, kNotVolatile);
buzbeeb5860fb2014-06-21 15:31:01 -0700966 } else {
Matteo Franchined7a0f22014-06-10 19:23:45 +0100967 LoadBaseDisp(TargetPtrReg(kSp), SRegOffset(start_vreg + i), t_loc->reg,
buzbeeb5860fb2014-06-21 15:31:01 -0700968 t_loc->wide ? k64 : k32, kNotVolatile);
969 }
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100970 }
971 }
buzbeeb5860fb2014-06-21 15:31:01 -0700972 if (t_loc->wide) {
973 // Increment i to skip the next one.
974 i++;
975 }
976 // if ((v_map->core_location == kLocPhysReg) && !t_loc->fp) {
977 // OpRegCopy(RegStorage::Solo32(v_map->core_reg), reg);
978 // } else if ((v_map->fp_location == kLocPhysReg) && t_loc->fp) {
979 // OpRegCopy(RegStorage::Solo32(v_map->fp_reg), reg);
980 // } else {
981 // StoreBaseDisp(TargetReg(kSp), SRegOffset(start_vreg + i), reg, op_size, kNotVolatile);
982 // if (reg.Is64Bit()) {
983 // if (SRegOffset(start_vreg + i) + 4 != SRegOffset(start_vreg + i + 1)) {
984 // LOG(FATAL) << "64 bit value stored in non-consecutive 4 bytes slots";
985 // }
986 // i += 1;
987 // }
988 // }
989 // } else {
990 // // If arriving in frame & promoted
991 // if (v_map->core_location == kLocPhysReg) {
992 // LoadWordDisp(TargetReg(kSp), SRegOffset(start_vreg + i),
993 // RegStorage::Solo32(v_map->core_reg));
994 // }
995 // if (v_map->fp_location == kLocPhysReg) {
996 // LoadWordDisp(TargetReg(kSp), SRegOffset(start_vreg + i), RegStorage::Solo32(v_map->fp_reg));
997 // }
Matteo Franchine45fb9e2014-05-06 10:10:30 +0100998 }
999}
1000
buzbee33ae5582014-06-12 14:56:32 -07001001/*
1002 * Load up to 5 arguments, the first three of which will be in
1003 * kArg1 .. kArg3. On entry kArg0 contains the current method pointer,
1004 * and as part of the load sequence, it must be replaced with
1005 * the target method pointer.
1006 */
1007int Arm64Mir2Lir::GenDalvikArgsNoRange(CallInfo* info,
1008 int call_state, LIR** pcrLabel, NextCallInsn next_call_insn,
1009 const MethodReference& target_method,
1010 uint32_t vtable_idx, uintptr_t direct_code,
1011 uintptr_t direct_method, InvokeType type, bool skip_this) {
1012 return GenDalvikArgsRange(info,
1013 call_state, pcrLabel, next_call_insn,
1014 target_method,
1015 vtable_idx, direct_code,
1016 direct_method, type, skip_this);
1017}
1018
1019/*
1020 * May have 0+ arguments (also used for jumbo). Note that
1021 * source virtual registers may be in physical registers, so may
1022 * need to be flushed to home location before copying. This
1023 * applies to arg3 and above (see below).
1024 *
1025 * FIXME: update comments.
1026 *
1027 * Two general strategies:
1028 * If < 20 arguments
1029 * Pass args 3-18 using vldm/vstm block copy
1030 * Pass arg0, arg1 & arg2 in kArg1-kArg3
1031 * If 20+ arguments
1032 * Pass args arg19+ using memcpy block copy
1033 * Pass arg0, arg1 & arg2 in kArg1-kArg3
1034 *
1035 */
1036int Arm64Mir2Lir::GenDalvikArgsRange(CallInfo* info, int call_state,
1037 LIR** pcrLabel, NextCallInsn next_call_insn,
1038 const MethodReference& target_method,
1039 uint32_t vtable_idx, uintptr_t direct_code,
1040 uintptr_t direct_method, InvokeType type, bool skip_this) {
1041 /* If no arguments, just return */
1042 if (info->num_arg_words == 0)
1043 return call_state;
1044
1045 const int start_index = skip_this ? 1 : 0;
1046
1047 InToRegStorageArm64Mapper mapper;
1048 InToRegStorageMapping in_to_reg_storage_mapping;
1049 in_to_reg_storage_mapping.Initialize(info->args, info->num_arg_words, &mapper);
1050 const int last_mapped_in = in_to_reg_storage_mapping.GetMaxMappedIn();
Zheng Xu949cd972014-06-23 18:33:08 +08001051 int regs_left_to_pass_via_stack = info->num_arg_words - (last_mapped_in + 1);
buzbee33ae5582014-06-12 14:56:32 -07001052
Matteo Franchinf1013192014-07-07 13:35:14 +01001053 // First of all, check whether it makes sense to use bulk copying.
1054 // Bulk copying is done only for the range case.
buzbee33ae5582014-06-12 14:56:32 -07001055 // TODO: make a constant instead of 2
1056 if (info->is_range && regs_left_to_pass_via_stack >= 2) {
1057 // Scan the rest of the args - if in phys_reg flush to memory
Zheng Xu949cd972014-06-23 18:33:08 +08001058 for (int next_arg = last_mapped_in + 1; next_arg < info->num_arg_words;) {
buzbee33ae5582014-06-12 14:56:32 -07001059 RegLocation loc = info->args[next_arg];
1060 if (loc.wide) {
1061 loc = UpdateLocWide(loc);
1062 if (loc.location == kLocPhysReg) {
1063 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
Matteo Franchined7a0f22014-06-10 19:23:45 +01001064 StoreBaseDisp(TargetPtrReg(kSp), SRegOffset(loc.s_reg_low), loc.reg, k64, kNotVolatile);
buzbee33ae5582014-06-12 14:56:32 -07001065 }
1066 next_arg += 2;
1067 } else {
1068 loc = UpdateLoc(loc);
1069 if (loc.location == kLocPhysReg) {
1070 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
buzbeeb5860fb2014-06-21 15:31:01 -07001071 if (loc.ref) {
Matteo Franchined7a0f22014-06-10 19:23:45 +01001072 StoreRefDisp(TargetPtrReg(kSp), SRegOffset(loc.s_reg_low), loc.reg, kNotVolatile);
buzbeeb5860fb2014-06-21 15:31:01 -07001073 } else {
Matteo Franchined7a0f22014-06-10 19:23:45 +01001074 StoreBaseDisp(TargetPtrReg(kSp), SRegOffset(loc.s_reg_low), loc.reg, k32,
1075 kNotVolatile);
buzbeeb5860fb2014-06-21 15:31:01 -07001076 }
buzbee33ae5582014-06-12 14:56:32 -07001077 }
1078 next_arg++;
Matteo Franchine45fb9e2014-05-06 10:10:30 +01001079 }
Matteo Franchine45fb9e2014-05-06 10:10:30 +01001080 }
buzbee33ae5582014-06-12 14:56:32 -07001081
1082 // Logic below assumes that Method pointer is at offset zero from SP.
1083 DCHECK_EQ(VRegOffset(static_cast<int>(kVRegMethodPtrBaseReg)), 0);
1084
1085 // The rest can be copied together
Zheng Xu949cd972014-06-23 18:33:08 +08001086 int start_offset = SRegOffset(info->args[last_mapped_in + 1].s_reg_low);
1087 int outs_offset = StackVisitor::GetOutVROffset(last_mapped_in + 1,
buzbee33ae5582014-06-12 14:56:32 -07001088 cu_->instruction_set);
1089
1090 int current_src_offset = start_offset;
1091 int current_dest_offset = outs_offset;
1092
1093 // Only davik regs are accessed in this loop; no next_call_insn() calls.
1094 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
1095 while (regs_left_to_pass_via_stack > 0) {
1096 /*
1097 * TODO: Improve by adding block copy for large number of arguments. This
1098 * should be done, if possible, as a target-depending helper. For now, just
1099 * copy a Dalvik vreg at a time.
1100 */
1101 // Moving 32-bits via general purpose register.
1102 size_t bytes_to_move = sizeof(uint32_t);
1103
1104 // Instead of allocating a new temp, simply reuse one of the registers being used
1105 // for argument passing.
Andreas Gampeccc60262014-07-04 18:02:38 -07001106 RegStorage temp = TargetReg(kArg3, kNotWide);
buzbee33ae5582014-06-12 14:56:32 -07001107
1108 // Now load the argument VR and store to the outs.
Matteo Franchined7a0f22014-06-10 19:23:45 +01001109 Load32Disp(TargetPtrReg(kSp), current_src_offset, temp);
1110 Store32Disp(TargetPtrReg(kSp), current_dest_offset, temp);
buzbee33ae5582014-06-12 14:56:32 -07001111
1112 current_src_offset += bytes_to_move;
1113 current_dest_offset += bytes_to_move;
1114 regs_left_to_pass_via_stack -= (bytes_to_move >> 2);
1115 }
1116 DCHECK_EQ(regs_left_to_pass_via_stack, 0);
1117 }
1118
1119 // Now handle rest not registers if they are
1120 if (in_to_reg_storage_mapping.IsThereStackMapped()) {
Matteo Franchined7a0f22014-06-10 19:23:45 +01001121 RegStorage regWide = TargetReg(kArg3, kWide);
buzbee33ae5582014-06-12 14:56:32 -07001122 for (int i = start_index; i <= last_mapped_in + regs_left_to_pass_via_stack; i++) {
1123 RegLocation rl_arg = info->args[i];
1124 rl_arg = UpdateRawLoc(rl_arg);
1125 RegStorage reg = in_to_reg_storage_mapping.Get(i);
1126 if (!reg.Valid()) {
1127 int out_offset = StackVisitor::GetOutVROffset(i, cu_->instruction_set);
1128
1129 {
1130 ScopedMemRefType mem_ref_type(this, ResourceMask::kDalvikReg);
1131 if (rl_arg.wide) {
1132 if (rl_arg.location == kLocPhysReg) {
Matteo Franchined7a0f22014-06-10 19:23:45 +01001133 StoreBaseDisp(TargetPtrReg(kSp), out_offset, rl_arg.reg, k64, kNotVolatile);
buzbee33ae5582014-06-12 14:56:32 -07001134 } else {
1135 LoadValueDirectWideFixed(rl_arg, regWide);
Matteo Franchined7a0f22014-06-10 19:23:45 +01001136 StoreBaseDisp(TargetPtrReg(kSp), out_offset, regWide, k64, kNotVolatile);
buzbee33ae5582014-06-12 14:56:32 -07001137 }
buzbee33ae5582014-06-12 14:56:32 -07001138 } else {
1139 if (rl_arg.location == kLocPhysReg) {
Andreas Gampe3c12c512014-06-24 18:46:29 +00001140 if (rl_arg.ref) {
Matteo Franchined7a0f22014-06-10 19:23:45 +01001141 StoreRefDisp(TargetPtrReg(kSp), out_offset, rl_arg.reg, kNotVolatile);
Andreas Gampe3c12c512014-06-24 18:46:29 +00001142 } else {
Matteo Franchined7a0f22014-06-10 19:23:45 +01001143 StoreBaseDisp(TargetPtrReg(kSp), out_offset, rl_arg.reg, k32, kNotVolatile);
Andreas Gampe3c12c512014-06-24 18:46:29 +00001144 }
buzbee33ae5582014-06-12 14:56:32 -07001145 } else {
Andreas Gampe3c12c512014-06-24 18:46:29 +00001146 if (rl_arg.ref) {
Matteo Franchined7a0f22014-06-10 19:23:45 +01001147 RegStorage regSingle = TargetReg(kArg2, kRef);
Andreas Gampe3c12c512014-06-24 18:46:29 +00001148 LoadValueDirectFixed(rl_arg, regSingle);
Matteo Franchined7a0f22014-06-10 19:23:45 +01001149 StoreRefDisp(TargetPtrReg(kSp), out_offset, regSingle, kNotVolatile);
Andreas Gampe3c12c512014-06-24 18:46:29 +00001150 } else {
Matteo Franchined7a0f22014-06-10 19:23:45 +01001151 RegStorage regSingle = TargetReg(kArg2, kNotWide);
1152 LoadValueDirectFixed(rl_arg, regSingle);
1153 StoreBaseDisp(TargetPtrReg(kSp), out_offset, regSingle, k32, kNotVolatile);
Andreas Gampe3c12c512014-06-24 18:46:29 +00001154 }
buzbee33ae5582014-06-12 14:56:32 -07001155 }
1156 }
1157 }
1158 call_state = next_call_insn(cu_, info, call_state, target_method,
1159 vtable_idx, direct_code, direct_method, type);
1160 }
Matteo Franchinf1013192014-07-07 13:35:14 +01001161 if (rl_arg.wide) {
1162 i++;
1163 }
buzbee33ae5582014-06-12 14:56:32 -07001164 }
1165 }
1166
1167 // Finish with mapped registers
1168 for (int i = start_index; i <= last_mapped_in; i++) {
1169 RegLocation rl_arg = info->args[i];
1170 rl_arg = UpdateRawLoc(rl_arg);
1171 RegStorage reg = in_to_reg_storage_mapping.Get(i);
1172 if (reg.Valid()) {
1173 if (rl_arg.wide) {
1174 LoadValueDirectWideFixed(rl_arg, reg);
buzbee33ae5582014-06-12 14:56:32 -07001175 } else {
1176 LoadValueDirectFixed(rl_arg, reg);
1177 }
1178 call_state = next_call_insn(cu_, info, call_state, target_method, vtable_idx,
Matteo Franchinf1013192014-07-07 13:35:14 +01001179 direct_code, direct_method, type);
1180 }
1181 if (rl_arg.wide) {
1182 i++;
buzbee33ae5582014-06-12 14:56:32 -07001183 }
1184 }
1185
1186 call_state = next_call_insn(cu_, info, call_state, target_method, vtable_idx,
1187 direct_code, direct_method, type);
1188 if (pcrLabel) {
Dave Allison69dfe512014-07-11 17:11:58 +00001189 if (!cu_->compiler_driver->GetCompilerOptions().GetImplicitNullChecks()) {
Matteo Franchined7a0f22014-06-10 19:23:45 +01001190 *pcrLabel = GenExplicitNullCheck(TargetReg(kArg1, kRef), info->opt_flags);
buzbee33ae5582014-06-12 14:56:32 -07001191 } else {
1192 *pcrLabel = nullptr;
1193 // In lieu of generating a check for kArg1 being null, we need to
1194 // perform a load when doing implicit checks.
1195 RegStorage tmp = AllocTemp();
Matteo Franchined7a0f22014-06-10 19:23:45 +01001196 Load32Disp(TargetReg(kArg1, kRef), 0, tmp);
buzbee33ae5582014-06-12 14:56:32 -07001197 MarkPossibleNullPointerException(info->opt_flags);
1198 FreeTemp(tmp);
1199 }
Matteo Franchine45fb9e2014-05-06 10:10:30 +01001200 }
1201 return call_state;
1202}
1203
Matteo Franchin43ec8732014-03-31 15:00:14 +01001204} // namespace art