| /* |
| * Copyright (C) 2012 The Android Open Source Project |
| * |
| * Licensed under the Apache License, Version 2.0 (the "License"); |
| * you may not use this file except in compliance with the License. |
| * You may obtain a copy of the License at |
| * |
| * http://www.apache.org/licenses/LICENSE-2.0 |
| * |
| * Unless required by applicable law or agreed to in writing, software |
| * distributed under the License is distributed on an "AS IS" BASIS, |
| * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. |
| * See the License for the specific language governing permissions and |
| * limitations under the License. |
| */ |
| |
| #include "codegen_mips.h" |
| |
| #include <inttypes.h> |
| |
| #include <string> |
| |
| #include "arch/mips/instruction_set_features_mips.h" |
| #include "backend_mips.h" |
| #include "dex/compiler_internals.h" |
| #include "dex/quick/mir_to_lir-inl.h" |
| #include "mips_lir.h" |
| |
| namespace art { |
| |
| static constexpr RegStorage core_regs_arr[] = |
| {rs_rZERO, rs_rAT, rs_rV0, rs_rV1, rs_rA0, rs_rA1, rs_rA2, rs_rA3, rs_rT0, rs_rT1, rs_rT2, |
| rs_rT3, rs_rT4, rs_rT5, rs_rT6, rs_rT7, rs_rS0, rs_rS1, rs_rS2, rs_rS3, rs_rS4, rs_rS5, |
| rs_rS6, rs_rS7, rs_rT8, rs_rT9, rs_rK0, rs_rK1, rs_rGP, rs_rSP, rs_rFP, rs_rRA}; |
| static constexpr RegStorage sp_regs_arr[] = |
| {rs_rF0, rs_rF1, rs_rF2, rs_rF3, rs_rF4, rs_rF5, rs_rF6, rs_rF7, rs_rF8, rs_rF9, rs_rF10, |
| rs_rF11, rs_rF12, rs_rF13, rs_rF14, rs_rF15}; |
| static constexpr RegStorage dp_fr0_regs_arr[] = |
| {rs_rD0_fr0, rs_rD1_fr0, rs_rD2_fr0, rs_rD3_fr0, rs_rD4_fr0, rs_rD5_fr0, rs_rD6_fr0, |
| rs_rD7_fr0}; |
| static constexpr RegStorage dp_fr1_regs_arr[] = |
| {rs_rD0_fr1, rs_rD1_fr1, rs_rD2_fr1, rs_rD3_fr1, rs_rD4_fr1, rs_rD5_fr1, rs_rD6_fr1, |
| rs_rD7_fr1}; |
| static constexpr RegStorage reserved_regs_arr[] = |
| {rs_rZERO, rs_rAT, rs_rS0, rs_rS1, rs_rK0, rs_rK1, rs_rGP, rs_rSP, rs_rRA}; |
| static constexpr RegStorage core_temps_arr[] = |
| {rs_rV0, rs_rV1, rs_rA0, rs_rA1, rs_rA2, rs_rA3, rs_rT0, rs_rT1, rs_rT2, rs_rT3, rs_rT4, |
| rs_rT5, rs_rT6, rs_rT7, rs_rT8}; |
| static constexpr RegStorage sp_temps_arr[] = |
| {rs_rF0, rs_rF1, rs_rF2, rs_rF3, rs_rF4, rs_rF5, rs_rF6, rs_rF7, rs_rF8, rs_rF9, rs_rF10, |
| rs_rF11, rs_rF12, rs_rF13, rs_rF14, rs_rF15}; |
| static constexpr RegStorage dp_fr0_temps_arr[] = |
| {rs_rD0_fr0, rs_rD1_fr0, rs_rD2_fr0, rs_rD3_fr0, rs_rD4_fr0, rs_rD5_fr0, rs_rD6_fr0, |
| rs_rD7_fr0}; |
| static constexpr RegStorage dp_fr1_temps_arr[] = |
| {rs_rD0_fr1, rs_rD1_fr1, rs_rD2_fr1, rs_rD3_fr1, rs_rD4_fr1, rs_rD5_fr1, rs_rD6_fr1, |
| rs_rD7_fr1}; |
| |
| static constexpr ArrayRef<const RegStorage> empty_pool; |
| static constexpr ArrayRef<const RegStorage> core_regs(core_regs_arr); |
| static constexpr ArrayRef<const RegStorage> sp_regs(sp_regs_arr); |
| static constexpr ArrayRef<const RegStorage> dp_fr0_regs(dp_fr0_regs_arr); |
| static constexpr ArrayRef<const RegStorage> dp_fr1_regs(dp_fr1_regs_arr); |
| static constexpr ArrayRef<const RegStorage> reserved_regs(reserved_regs_arr); |
| static constexpr ArrayRef<const RegStorage> core_temps(core_temps_arr); |
| static constexpr ArrayRef<const RegStorage> sp_temps(sp_temps_arr); |
| static constexpr ArrayRef<const RegStorage> dp_fr0_temps(dp_fr0_temps_arr); |
| static constexpr ArrayRef<const RegStorage> dp_fr1_temps(dp_fr1_temps_arr); |
| |
| RegLocation MipsMir2Lir::LocCReturn() { |
| return mips_loc_c_return; |
| } |
| |
| RegLocation MipsMir2Lir::LocCReturnRef() { |
| return mips_loc_c_return; |
| } |
| |
| RegLocation MipsMir2Lir::LocCReturnWide() { |
| return mips_loc_c_return_wide; |
| } |
| |
| RegLocation MipsMir2Lir::LocCReturnFloat() { |
| return mips_loc_c_return_float; |
| } |
| |
| RegLocation MipsMir2Lir::LocCReturnDouble() { |
| return mips_loc_c_return_double; |
| } |
| |
| // Convert k64BitSolo into k64BitPair |
| RegStorage MipsMir2Lir::Solo64ToPair64(RegStorage reg) { |
| DCHECK(reg.IsDouble()); |
| int reg_num = (reg.GetRegNum() & ~1) | RegStorage::kFloatingPoint; |
| return RegStorage(RegStorage::k64BitPair, reg_num, reg_num + 1); |
| } |
| |
| // Return a target-dependent special register. |
| RegStorage MipsMir2Lir::TargetReg(SpecialTargetRegister reg) { |
| RegStorage res_reg; |
| switch (reg) { |
| case kSelf: res_reg = rs_rMIPS_SELF; break; |
| case kSuspend: res_reg = rs_rMIPS_SUSPEND; break; |
| case kLr: res_reg = rs_rMIPS_LR; break; |
| case kPc: res_reg = rs_rMIPS_PC; break; |
| case kSp: res_reg = rs_rMIPS_SP; break; |
| case kArg0: res_reg = rs_rMIPS_ARG0; break; |
| case kArg1: res_reg = rs_rMIPS_ARG1; break; |
| case kArg2: res_reg = rs_rMIPS_ARG2; break; |
| case kArg3: res_reg = rs_rMIPS_ARG3; break; |
| case kFArg0: res_reg = rs_rMIPS_FARG0; break; |
| case kFArg1: res_reg = rs_rMIPS_FARG1; break; |
| case kFArg2: res_reg = rs_rMIPS_FARG2; break; |
| case kFArg3: res_reg = rs_rMIPS_FARG3; break; |
| case kRet0: res_reg = rs_rMIPS_RET0; break; |
| case kRet1: res_reg = rs_rMIPS_RET1; break; |
| case kInvokeTgt: res_reg = rs_rMIPS_INVOKE_TGT; break; |
| case kHiddenArg: res_reg = rs_rT0; break; |
| case kHiddenFpArg: res_reg = RegStorage::InvalidReg(); break; |
| case kCount: res_reg = rs_rMIPS_COUNT; break; |
| default: res_reg = RegStorage::InvalidReg(); |
| } |
| return res_reg; |
| } |
| |
| RegStorage MipsMir2Lir::InToRegStorageMipsMapper::GetNextReg(ShortyArg arg) { |
| const SpecialTargetRegister coreArgMappingToPhysicalReg[] = {kArg1, kArg2, kArg3}; |
| const size_t coreArgMappingToPhysicalRegSize = arraysize(coreArgMappingToPhysicalReg); |
| |
| RegStorage result = RegStorage::InvalidReg(); |
| if (cur_core_reg_ < coreArgMappingToPhysicalRegSize) { |
| result = m2l_->TargetReg(coreArgMappingToPhysicalReg[cur_core_reg_++], |
| arg.IsRef() ? kRef : kNotWide); |
| if (arg.IsWide() && cur_core_reg_ < coreArgMappingToPhysicalRegSize) { |
| result = RegStorage::MakeRegPair( |
| result, m2l_->TargetReg(coreArgMappingToPhysicalReg[cur_core_reg_++], kNotWide)); |
| } |
| } |
| return result; |
| } |
| |
| /* |
| * Decode the register id. |
| */ |
| ResourceMask MipsMir2Lir::GetRegMaskCommon(const RegStorage& reg) const { |
| if (reg.IsDouble()) { |
| if (cu_->GetInstructionSetFeatures()->AsMipsInstructionSetFeatures()->Is32BitFloatingPoint()) { |
| return ResourceMask::TwoBits((reg.GetRegNum() & ~1) + kMipsFPReg0); |
| } else { |
| return ResourceMask::TwoBits(reg.GetRegNum() * 2 + kMipsFPReg0); |
| } |
| } else if (reg.IsSingle()) { |
| return ResourceMask::Bit(reg.GetRegNum() + kMipsFPReg0); |
| } else { |
| return ResourceMask::Bit(reg.GetRegNum()); |
| } |
| } |
| |
| ResourceMask MipsMir2Lir::GetPCUseDefEncoding() const { |
| return ResourceMask::Bit(kMipsRegPC); |
| } |
| |
| |
| void MipsMir2Lir::SetupTargetResourceMasks(LIR* lir, uint64_t flags, |
| ResourceMask* use_mask, ResourceMask* def_mask) { |
| DCHECK_EQ(cu_->instruction_set, kMips); |
| DCHECK(!lir->flags.use_def_invalid); |
| |
| // Mips-specific resource map setup here. |
| if (flags & REG_DEF_SP) { |
| def_mask->SetBit(kMipsRegSP); |
| } |
| |
| if (flags & REG_USE_SP) { |
| use_mask->SetBit(kMipsRegSP); |
| } |
| |
| if (flags & REG_DEF_LR) { |
| def_mask->SetBit(kMipsRegLR); |
| } |
| |
| if (flags & REG_DEF_HI) { |
| def_mask->SetBit(kMipsRegHI); |
| } |
| |
| if (flags & REG_DEF_LO) { |
| def_mask->SetBit(kMipsRegLO); |
| } |
| |
| if (flags & REG_USE_HI) { |
| use_mask->SetBit(kMipsRegHI); |
| } |
| |
| if (flags & REG_USE_LO) { |
| use_mask->SetBit(kMipsRegLO); |
| } |
| } |
| |
| /* For dumping instructions */ |
| #define MIPS_REG_COUNT 32 |
| static const char *mips_reg_name[MIPS_REG_COUNT] = { |
| "zero", "at", "v0", "v1", "a0", "a1", "a2", "a3", |
| "t0", "t1", "t2", "t3", "t4", "t5", "t6", "t7", |
| "s0", "s1", "s2", "s3", "s4", "s5", "s6", "s7", |
| "t8", "t9", "k0", "k1", "gp", "sp", "fp", "ra" |
| }; |
| |
| /* |
| * Interpret a format string and build a string no longer than size |
| * See format key in Assemble.c. |
| */ |
| std::string MipsMir2Lir::BuildInsnString(const char *fmt, LIR *lir, unsigned char* base_addr) { |
| std::string buf; |
| int i; |
| const char *fmt_end = &fmt[strlen(fmt)]; |
| char tbuf[256]; |
| char nc; |
| while (fmt < fmt_end) { |
| int operand; |
| if (*fmt == '!') { |
| fmt++; |
| DCHECK_LT(fmt, fmt_end); |
| nc = *fmt++; |
| if (nc == '!') { |
| strcpy(tbuf, "!"); |
| } else { |
| DCHECK_LT(fmt, fmt_end); |
| DCHECK_LT(static_cast<unsigned>(nc-'0'), 4u); |
| operand = lir->operands[nc-'0']; |
| switch (*fmt++) { |
| case 'b': |
| strcpy(tbuf, "0000"); |
| for (i = 3; i >= 0; i--) { |
| tbuf[i] += operand & 1; |
| operand >>= 1; |
| } |
| break; |
| case 's': |
| snprintf(tbuf, arraysize(tbuf), "$f%d", RegStorage::RegNum(operand)); |
| break; |
| case 'S': |
| DCHECK_EQ(RegStorage::RegNum(operand) & 1, 0); |
| snprintf(tbuf, arraysize(tbuf), "$f%d", RegStorage::RegNum(operand)); |
| break; |
| case 'h': |
| snprintf(tbuf, arraysize(tbuf), "%04x", operand); |
| break; |
| case 'M': |
| case 'd': |
| snprintf(tbuf, arraysize(tbuf), "%d", operand); |
| break; |
| case 'D': |
| snprintf(tbuf, arraysize(tbuf), "%d", operand+1); |
| break; |
| case 'E': |
| snprintf(tbuf, arraysize(tbuf), "%d", operand*4); |
| break; |
| case 'F': |
| snprintf(tbuf, arraysize(tbuf), "%d", operand*2); |
| break; |
| case 't': |
| snprintf(tbuf, arraysize(tbuf), "0x%08" PRIxPTR " (L%p)", |
| reinterpret_cast<uintptr_t>(base_addr) + lir->offset + 4 + (operand << 1), |
| lir->target); |
| break; |
| case 'T': |
| snprintf(tbuf, arraysize(tbuf), "0x%08x", operand << 2); |
| break; |
| case 'u': { |
| int offset_1 = lir->operands[0]; |
| int offset_2 = NEXT_LIR(lir)->operands[0]; |
| uintptr_t target = |
| (((reinterpret_cast<uintptr_t>(base_addr) + lir->offset + 4) & ~3) + |
| (offset_1 << 21 >> 9) + (offset_2 << 1)) & 0xfffffffc; |
| snprintf(tbuf, arraysize(tbuf), "%p", reinterpret_cast<void*>(target)); |
| break; |
| } |
| |
| /* Nothing to print for BLX_2 */ |
| case 'v': |
| strcpy(tbuf, "see above"); |
| break; |
| case 'r': |
| DCHECK(operand >= 0 && operand < MIPS_REG_COUNT); |
| strcpy(tbuf, mips_reg_name[operand]); |
| break; |
| case 'N': |
| // Placeholder for delay slot handling |
| strcpy(tbuf, "; nop"); |
| break; |
| default: |
| strcpy(tbuf, "DecodeError"); |
| break; |
| } |
| buf += tbuf; |
| } |
| } else { |
| buf += *fmt++; |
| } |
| } |
| return buf; |
| } |
| |
| // FIXME: need to redo resource maps for MIPS - fix this at that time |
| void MipsMir2Lir::DumpResourceMask(LIR *mips_lir, const ResourceMask& mask, const char *prefix) { |
| char buf[256]; |
| buf[0] = 0; |
| |
| if (mask.Equals(kEncodeAll)) { |
| strcpy(buf, "all"); |
| } else { |
| char num[8]; |
| int i; |
| |
| for (i = 0; i < kMipsRegEnd; i++) { |
| if (mask.HasBit(i)) { |
| snprintf(num, arraysize(num), "%d ", i); |
| strcat(buf, num); |
| } |
| } |
| |
| if (mask.HasBit(ResourceMask::kCCode)) { |
| strcat(buf, "cc "); |
| } |
| if (mask.HasBit(ResourceMask::kFPStatus)) { |
| strcat(buf, "fpcc "); |
| } |
| /* Memory bits */ |
| if (mips_lir && (mask.HasBit(ResourceMask::kDalvikReg))) { |
| snprintf(buf + strlen(buf), arraysize(buf) - strlen(buf), "dr%d%s", |
| DECODE_ALIAS_INFO_REG(mips_lir->flags.alias_info), |
| DECODE_ALIAS_INFO_WIDE(mips_lir->flags.alias_info) ? "(+1)" : ""); |
| } |
| if (mask.HasBit(ResourceMask::kLiteral)) { |
| strcat(buf, "lit "); |
| } |
| |
| if (mask.HasBit(ResourceMask::kHeapRef)) { |
| strcat(buf, "heap "); |
| } |
| if (mask.HasBit(ResourceMask::kMustNotAlias)) { |
| strcat(buf, "noalias "); |
| } |
| } |
| if (buf[0]) { |
| LOG(INFO) << prefix << ": " << buf; |
| } |
| } |
| |
| /* |
| * TUNING: is true leaf? Can't just use METHOD_IS_LEAF to determine as some |
| * instructions might call out to C/assembly helper functions. Until |
| * machinery is in place, always spill lr. |
| */ |
| |
| void MipsMir2Lir::AdjustSpillMask() { |
| core_spill_mask_ |= (1 << rs_rRA.GetRegNum()); |
| num_core_spills_++; |
| } |
| |
| /* Clobber all regs that might be used by an external C call */ |
| void MipsMir2Lir::ClobberCallerSave() { |
| Clobber(rs_rZERO); |
| Clobber(rs_rAT); |
| Clobber(rs_rV0); |
| Clobber(rs_rV1); |
| Clobber(rs_rA0); |
| Clobber(rs_rA1); |
| Clobber(rs_rA2); |
| Clobber(rs_rA3); |
| Clobber(rs_rT0); |
| Clobber(rs_rT1); |
| Clobber(rs_rT2); |
| Clobber(rs_rT3); |
| Clobber(rs_rT4); |
| Clobber(rs_rT5); |
| Clobber(rs_rT6); |
| Clobber(rs_rT7); |
| Clobber(rs_rT8); |
| Clobber(rs_rT9); |
| Clobber(rs_rK0); |
| Clobber(rs_rK1); |
| Clobber(rs_rGP); |
| Clobber(rs_rFP); |
| Clobber(rs_rRA); |
| Clobber(rs_rF0); |
| Clobber(rs_rF1); |
| Clobber(rs_rF2); |
| Clobber(rs_rF3); |
| Clobber(rs_rF4); |
| Clobber(rs_rF5); |
| Clobber(rs_rF6); |
| Clobber(rs_rF7); |
| Clobber(rs_rF8); |
| Clobber(rs_rF9); |
| Clobber(rs_rF10); |
| Clobber(rs_rF11); |
| Clobber(rs_rF12); |
| Clobber(rs_rF13); |
| Clobber(rs_rF14); |
| Clobber(rs_rF15); |
| if (cu_->GetInstructionSetFeatures()->AsMipsInstructionSetFeatures()->Is32BitFloatingPoint()) { |
| Clobber(rs_rD0_fr0); |
| Clobber(rs_rD1_fr0); |
| Clobber(rs_rD2_fr0); |
| Clobber(rs_rD3_fr0); |
| Clobber(rs_rD4_fr0); |
| Clobber(rs_rD5_fr0); |
| Clobber(rs_rD6_fr0); |
| Clobber(rs_rD7_fr0); |
| } else { |
| Clobber(rs_rD0_fr1); |
| Clobber(rs_rD1_fr1); |
| Clobber(rs_rD2_fr1); |
| Clobber(rs_rD3_fr1); |
| Clobber(rs_rD4_fr1); |
| Clobber(rs_rD5_fr1); |
| Clobber(rs_rD6_fr1); |
| Clobber(rs_rD7_fr1); |
| } |
| } |
| |
| RegLocation MipsMir2Lir::GetReturnWideAlt() { |
| UNIMPLEMENTED(FATAL) << "No GetReturnWideAlt for MIPS"; |
| RegLocation res = LocCReturnWide(); |
| return res; |
| } |
| |
| RegLocation MipsMir2Lir::GetReturnAlt() { |
| UNIMPLEMENTED(FATAL) << "No GetReturnAlt for MIPS"; |
| RegLocation res = LocCReturn(); |
| return res; |
| } |
| |
| /* To be used when explicitly managing register use */ |
| void MipsMir2Lir::LockCallTemps() { |
| LockTemp(rs_rMIPS_ARG0); |
| LockTemp(rs_rMIPS_ARG1); |
| LockTemp(rs_rMIPS_ARG2); |
| LockTemp(rs_rMIPS_ARG3); |
| } |
| |
| /* To be used when explicitly managing register use */ |
| void MipsMir2Lir::FreeCallTemps() { |
| FreeTemp(rs_rMIPS_ARG0); |
| FreeTemp(rs_rMIPS_ARG1); |
| FreeTemp(rs_rMIPS_ARG2); |
| FreeTemp(rs_rMIPS_ARG3); |
| } |
| |
| bool MipsMir2Lir::GenMemBarrier(MemBarrierKind barrier_kind ATTRIBUTE_UNUSED) { |
| if (cu_->GetInstructionSetFeatures()->IsSmp()) { |
| NewLIR1(kMipsSync, 0 /* Only stype currently supported */); |
| return true; |
| } else { |
| return false; |
| } |
| } |
| |
| void MipsMir2Lir::CompilerInitializeRegAlloc() { |
| const bool fpu_is_32bit = |
| cu_->GetInstructionSetFeatures()->AsMipsInstructionSetFeatures()->Is32BitFloatingPoint(); |
| reg_pool_.reset(new (arena_) RegisterPool(this, arena_, core_regs, empty_pool /* core64 */, |
| sp_regs, |
| fpu_is_32bit ? dp_fr0_regs : dp_fr1_regs, |
| reserved_regs, empty_pool /* reserved64 */, |
| core_temps, empty_pool /* core64_temps */, |
| sp_temps, |
| fpu_is_32bit ? dp_fr0_temps : dp_fr1_temps)); |
| |
| // Target-specific adjustments. |
| |
| // Alias single precision floats to appropriate half of overlapping double. |
| for (RegisterInfo* info : reg_pool_->sp_regs_) { |
| int sp_reg_num = info->GetReg().GetRegNum(); |
| int dp_reg_num; |
| if (fpu_is_32bit) { |
| dp_reg_num = sp_reg_num & ~1; |
| } else { |
| dp_reg_num = sp_reg_num >> 1; |
| } |
| RegStorage dp_reg = RegStorage::Solo64(RegStorage::kFloatingPoint | dp_reg_num); |
| RegisterInfo* dp_reg_info = GetRegInfo(dp_reg); |
| // Double precision register's master storage should refer to itself. |
| DCHECK_EQ(dp_reg_info, dp_reg_info->Master()); |
| // Redirect single precision's master storage to master. |
| info->SetMaster(dp_reg_info); |
| // Singles should show a single 32-bit mask bit, at first referring to the low half. |
| DCHECK_EQ(info->StorageMask(), 0x1U); |
| if (sp_reg_num & 1) { |
| // For odd singles, change to user the high word of the backing double. |
| info->SetStorageMask(0x2); |
| } |
| } |
| |
| // Don't start allocating temps at r0/s0/d0 or you may clobber return regs in early-exit methods. |
| // TODO: adjust when we roll to hard float calling convention. |
| reg_pool_->next_core_reg_ = 2; |
| reg_pool_->next_sp_reg_ = 2; |
| if (fpu_is_32bit) { |
| reg_pool_->next_dp_reg_ = 2; |
| } else { |
| reg_pool_->next_dp_reg_ = 1; |
| } |
| } |
| |
| /* |
| * In the Arm code a it is typical to use the link register |
| * to hold the target address. However, for Mips we must |
| * ensure that all branch instructions can be restarted if |
| * there is a trap in the shadow. Allocate a temp register. |
| */ |
| RegStorage MipsMir2Lir::LoadHelper(QuickEntrypointEnum trampoline) { |
| // NOTE: native pointer. |
| LoadWordDisp(rs_rMIPS_SELF, GetThreadOffset<4>(trampoline).Int32Value(), rs_rT9); |
| return rs_rT9; |
| } |
| |
| LIR* MipsMir2Lir::CheckSuspendUsingLoad() { |
| RegStorage tmp = AllocTemp(); |
| // NOTE: native pointer. |
| LoadWordDisp(rs_rMIPS_SELF, Thread::ThreadSuspendTriggerOffset<4>().Int32Value(), tmp); |
| LIR *inst = LoadWordDisp(tmp, 0, tmp); |
| FreeTemp(tmp); |
| return inst; |
| } |
| |
| LIR* MipsMir2Lir::GenAtomic64Load(RegStorage r_base, int displacement, RegStorage r_dest) { |
| DCHECK(!r_dest.IsFloat()); // See RegClassForFieldLoadStore(). |
| DCHECK(r_dest.IsPair()); |
| ClobberCallerSave(); |
| LockCallTemps(); // Using fixed registers |
| RegStorage reg_ptr = TargetReg(kArg0); |
| OpRegRegImm(kOpAdd, reg_ptr, r_base, displacement); |
| RegStorage r_tgt = LoadHelper(kQuickA64Load); |
| LIR *ret = OpReg(kOpBlx, r_tgt); |
| RegStorage reg_ret = RegStorage::MakeRegPair(TargetReg(kRet0), TargetReg(kRet1)); |
| OpRegCopyWide(r_dest, reg_ret); |
| return ret; |
| } |
| |
| LIR* MipsMir2Lir::GenAtomic64Store(RegStorage r_base, int displacement, RegStorage r_src) { |
| DCHECK(!r_src.IsFloat()); // See RegClassForFieldLoadStore(). |
| DCHECK(r_src.IsPair()); |
| ClobberCallerSave(); |
| LockCallTemps(); // Using fixed registers |
| RegStorage temp_ptr = AllocTemp(); |
| OpRegRegImm(kOpAdd, temp_ptr, r_base, displacement); |
| RegStorage temp_value = AllocTempWide(); |
| OpRegCopyWide(temp_value, r_src); |
| RegStorage reg_ptr = TargetReg(kArg0); |
| OpRegCopy(reg_ptr, temp_ptr); |
| RegStorage reg_value = RegStorage::MakeRegPair(TargetReg(kArg2), TargetReg(kArg3)); |
| OpRegCopyWide(reg_value, temp_value); |
| FreeTemp(temp_ptr); |
| FreeTemp(temp_value); |
| RegStorage r_tgt = LoadHelper(kQuickA64Store); |
| return OpReg(kOpBlx, r_tgt); |
| } |
| |
| void MipsMir2Lir::SpillCoreRegs() { |
| if (num_core_spills_ == 0) { |
| return; |
| } |
| uint32_t mask = core_spill_mask_; |
| int offset = num_core_spills_ * 4; |
| OpRegImm(kOpSub, rs_rSP, offset); |
| for (int reg = 0; mask; mask >>= 1, reg++) { |
| if (mask & 0x1) { |
| offset -= 4; |
| Store32Disp(rs_rMIPS_SP, offset, RegStorage::Solo32(reg)); |
| } |
| } |
| } |
| |
| void MipsMir2Lir::UnSpillCoreRegs() { |
| if (num_core_spills_ == 0) { |
| return; |
| } |
| uint32_t mask = core_spill_mask_; |
| int offset = frame_size_; |
| for (int reg = 0; mask; mask >>= 1, reg++) { |
| if (mask & 0x1) { |
| offset -= 4; |
| Load32Disp(rs_rMIPS_SP, offset, RegStorage::Solo32(reg)); |
| } |
| } |
| OpRegImm(kOpAdd, rs_rSP, frame_size_); |
| } |
| |
| bool MipsMir2Lir::IsUnconditionalBranch(LIR* lir) { |
| return (lir->opcode == kMipsB); |
| } |
| |
| RegisterClass MipsMir2Lir::RegClassForFieldLoadStore(OpSize size, bool is_volatile) { |
| if (UNLIKELY(is_volatile)) { |
| // On Mips, atomic 64-bit load/store requires a core register. |
| // Smaller aligned load/store is atomic for both core and fp registers. |
| if (size == k64 || size == kDouble) { |
| return kCoreReg; |
| } |
| } |
| // TODO: Verify that both core and fp registers are suitable for smaller sizes. |
| return RegClassBySize(size); |
| } |
| |
| MipsMir2Lir::MipsMir2Lir(CompilationUnit* cu, MIRGraph* mir_graph, ArenaAllocator* arena) |
| : Mir2Lir(cu, mir_graph, arena), in_to_reg_storage_mips_mapper_(this) { |
| for (int i = 0; i < kMipsLast; i++) { |
| DCHECK_EQ(MipsMir2Lir::EncodingMap[i].opcode, i) |
| << "Encoding order for " << MipsMir2Lir::EncodingMap[i].name |
| << " is wrong: expecting " << i << ", seeing " |
| << static_cast<int>(MipsMir2Lir::EncodingMap[i].opcode); |
| } |
| } |
| |
| Mir2Lir* MipsCodeGenerator(CompilationUnit* const cu, MIRGraph* const mir_graph, |
| ArenaAllocator* const arena) { |
| return new MipsMir2Lir(cu, mir_graph, arena); |
| } |
| |
| uint64_t MipsMir2Lir::GetTargetInstFlags(int opcode) { |
| DCHECK(!IsPseudoLirOp(opcode)); |
| return MipsMir2Lir::EncodingMap[opcode].flags; |
| } |
| |
| const char* MipsMir2Lir::GetTargetInstName(int opcode) { |
| DCHECK(!IsPseudoLirOp(opcode)); |
| return MipsMir2Lir::EncodingMap[opcode].name; |
| } |
| |
| const char* MipsMir2Lir::GetTargetInstFmt(int opcode) { |
| DCHECK(!IsPseudoLirOp(opcode)); |
| return MipsMir2Lir::EncodingMap[opcode].fmt; |
| } |
| |
| } // namespace art |