compiler/dex/quick/mips/utility_mips.cc - platform/art - Git at Google

 /*
  * 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 "dex/quick/mir_to_lir-inl.h"
 #include "mips_lir.h"

 namespace art {

 /* This file contains codegen for the MIPS32 ISA. */
 LIR* MipsMir2Lir::OpFpRegCopy(int r_dest, int r_src) {
   int opcode;
   /* must be both DOUBLE or both not DOUBLE */
   DCHECK_EQ(MIPS_DOUBLEREG(r_dest), MIPS_DOUBLEREG(r_src));
   if (MIPS_DOUBLEREG(r_dest)) {
     opcode = kMipsFmovd;
   } else {
     if (MIPS_SINGLEREG(r_dest)) {
       if (MIPS_SINGLEREG(r_src)) {
         opcode = kMipsFmovs;
       } else {
         /* note the operands are swapped for the mtc1 instr */
         int t_opnd = r_src;
         r_src = r_dest;
         r_dest = t_opnd;
         opcode = kMipsMtc1;
       }
     } else {
       DCHECK(MIPS_SINGLEREG(r_src));
       opcode = kMipsMfc1;
     }
   }
   LIR* res = RawLIR(current_dalvik_offset_, opcode, r_src, r_dest);
   if (!(cu_->disable_opt & (1 << kSafeOptimizations)) && r_dest == r_src) {
     res->flags.is_nop = true;
   }
   return res;
 }

 bool MipsMir2Lir::InexpensiveConstantInt(int32_t value) {
   return ((value == 0) || IsUint(16, value) || ((value < 0) && (value >= -32768)));
 }

 bool MipsMir2Lir::InexpensiveConstantFloat(int32_t value) {
   return false;  // TUNING
 }

 bool MipsMir2Lir::InexpensiveConstantLong(int64_t value) {
   return false;  // TUNING
 }

 bool MipsMir2Lir::InexpensiveConstantDouble(int64_t value) {
   return false; // TUNING
 }

 /*
  * Load a immediate using a shortcut if possible; otherwise
  * grab from the per-translation literal pool.  If target is
  * a high register, build constant into a low register and copy.
  *
  * No additional register clobbering operation performed. Use this version when
  * 1) r_dest is freshly returned from AllocTemp or
  * 2) The codegen is under fixed register usage
  */
 LIR* MipsMir2Lir::LoadConstantNoClobber(int r_dest, int value) {
   LIR *res;

   int r_dest_save = r_dest;
   int is_fp_reg = MIPS_FPREG(r_dest);
   if (is_fp_reg) {
     DCHECK(MIPS_SINGLEREG(r_dest));
     r_dest = AllocTemp();
   }

   /* See if the value can be constructed cheaply */
   if (value == 0) {
     res = NewLIR2(kMipsMove, r_dest, r_ZERO);
   } else if ((value > 0) && (value <= 65535)) {
     res = NewLIR3(kMipsOri, r_dest, r_ZERO, value);
   } else if ((value < 0) && (value >= -32768)) {
     res = NewLIR3(kMipsAddiu, r_dest, r_ZERO, value);
   } else {
     res = NewLIR2(kMipsLui, r_dest, value>>16);
     if (value & 0xffff)
       NewLIR3(kMipsOri, r_dest, r_dest, value);
   }

   if (is_fp_reg) {
     NewLIR2(kMipsMtc1, r_dest, r_dest_save);
     FreeTemp(r_dest);
   }

   return res;
 }

 LIR* MipsMir2Lir::OpUnconditionalBranch(LIR* target) {
   LIR* res = NewLIR1(kMipsB, 0 /* offset to be patched during assembly*/);
   res->target = target;
   return res;
 }

 LIR* MipsMir2Lir::OpReg(OpKind op, int r_dest_src) {
   MipsOpCode opcode = kMipsNop;
   switch (op) {
     case kOpBlx:
       opcode = kMipsJalr;
       break;
     case kOpBx:
       return NewLIR1(kMipsJr, r_dest_src);
       break;
     default:
       LOG(FATAL) << "Bad case in OpReg";
   }
   return NewLIR2(opcode, r_RA, r_dest_src);
 }

 LIR* MipsMir2Lir::OpRegImm(OpKind op, int r_dest_src1,
           int value) {
   LIR *res;
   bool neg = (value < 0);
   int abs_value = (neg) ? -value : value;
   bool short_form = (abs_value & 0xff) == abs_value;
   MipsOpCode opcode = kMipsNop;
   switch (op) {
     case kOpAdd:
       return OpRegRegImm(op, r_dest_src1, r_dest_src1, value);
       break;
     case kOpSub:
       return OpRegRegImm(op, r_dest_src1, r_dest_src1, value);
       break;
     default:
       LOG(FATAL) << "Bad case in OpRegImm";
       break;
   }
   if (short_form)
     res = NewLIR2(opcode, r_dest_src1, abs_value);
   else {
     int r_scratch = AllocTemp();
     res = LoadConstant(r_scratch, value);
     if (op == kOpCmp)
       NewLIR2(opcode, r_dest_src1, r_scratch);
     else
       NewLIR3(opcode, r_dest_src1, r_dest_src1, r_scratch);
   }
   return res;
 }

 LIR* MipsMir2Lir::OpRegRegReg(OpKind op, int r_dest, int r_src1, int r_src2) {
   MipsOpCode opcode = kMipsNop;
   switch (op) {
     case kOpAdd:
       opcode = kMipsAddu;
       break;
     case kOpSub:
       opcode = kMipsSubu;
       break;
     case kOpAnd:
       opcode = kMipsAnd;
       break;
     case kOpMul:
       opcode = kMipsMul;
       break;
     case kOpOr:
       opcode = kMipsOr;
       break;
     case kOpXor:
       opcode = kMipsXor;
       break;
     case kOpLsl:
       opcode = kMipsSllv;
       break;
     case kOpLsr:
       opcode = kMipsSrlv;
       break;
     case kOpAsr:
       opcode = kMipsSrav;
       break;
     case kOpAdc:
     case kOpSbc:
       LOG(FATAL) << "No carry bit on MIPS";
       break;
     default:
       LOG(FATAL) << "bad case in OpRegRegReg";
       break;
   }
   return NewLIR3(opcode, r_dest, r_src1, r_src2);
 }

 LIR* MipsMir2Lir::OpRegRegImm(OpKind op, int r_dest, int r_src1, int value) {
   LIR *res;
   MipsOpCode opcode = kMipsNop;
   bool short_form = true;

   switch (op) {
     case kOpAdd:
       if (IS_SIMM16(value)) {
         opcode = kMipsAddiu;
       } else {
         short_form = false;
         opcode = kMipsAddu;
       }
       break;
     case kOpSub:
       if (IS_SIMM16((-value))) {
         value = -value;
         opcode = kMipsAddiu;
       } else {
         short_form = false;
         opcode = kMipsSubu;
       }
       break;
     case kOpLsl:
         DCHECK(value >= 0 && value <= 31);
         opcode = kMipsSll;
         break;
     case kOpLsr:
         DCHECK(value >= 0 && value <= 31);
         opcode = kMipsSrl;
         break;
     case kOpAsr:
         DCHECK(value >= 0 && value <= 31);
         opcode = kMipsSra;
         break;
     case kOpAnd:
       if (IS_UIMM16((value))) {
         opcode = kMipsAndi;
       } else {
         short_form = false;
         opcode = kMipsAnd;
       }
       break;
     case kOpOr:
       if (IS_UIMM16((value))) {
         opcode = kMipsOri;
       } else {
         short_form = false;
         opcode = kMipsOr;
       }
       break;
     case kOpXor:
       if (IS_UIMM16((value))) {
         opcode = kMipsXori;
       } else {
         short_form = false;
         opcode = kMipsXor;
       }
       break;
     case kOpMul:
       short_form = false;
       opcode = kMipsMul;
       break;
     default:
       LOG(FATAL) << "Bad case in OpRegRegImm";
       break;
   }

   if (short_form)
     res = NewLIR3(opcode, r_dest, r_src1, value);
   else {
     if (r_dest != r_src1) {
       res = LoadConstant(r_dest, value);
       NewLIR3(opcode, r_dest, r_src1, r_dest);
     } else {
       int r_scratch = AllocTemp();
       res = LoadConstant(r_scratch, value);
       NewLIR3(opcode, r_dest, r_src1, r_scratch);
     }
   }
   return res;
 }

 LIR* MipsMir2Lir::OpRegReg(OpKind op, int r_dest_src1, int r_src2) {
   MipsOpCode opcode = kMipsNop;
   LIR *res;
   switch (op) {
     case kOpMov:
       opcode = kMipsMove;
       break;
     case kOpMvn:
       return NewLIR3(kMipsNor, r_dest_src1, r_src2, r_ZERO);
     case kOpNeg:
       return NewLIR3(kMipsSubu, r_dest_src1, r_ZERO, r_src2);
     case kOpAdd:
     case kOpAnd:
     case kOpMul:
     case kOpOr:
     case kOpSub:
     case kOpXor:
       return OpRegRegReg(op, r_dest_src1, r_dest_src1, r_src2);
     case kOp2Byte:
 #if __mips_isa_rev >= 2
       res = NewLIR2(kMipsSeb, r_dest_src1, r_src2);
 #else
       res = OpRegRegImm(kOpLsl, r_dest_src1, r_src2, 24);
       OpRegRegImm(kOpAsr, r_dest_src1, r_dest_src1, 24);
 #endif
       return res;
     case kOp2Short:
 #if __mips_isa_rev >= 2
       res = NewLIR2(kMipsSeh, r_dest_src1, r_src2);
 #else
       res = OpRegRegImm(kOpLsl, r_dest_src1, r_src2, 16);
       OpRegRegImm(kOpAsr, r_dest_src1, r_dest_src1, 16);
 #endif
       return res;
     case kOp2Char:
        return NewLIR3(kMipsAndi, r_dest_src1, r_src2, 0xFFFF);
     default:
       LOG(FATAL) << "Bad case in OpRegReg";
       break;
   }
   return NewLIR2(opcode, r_dest_src1, r_src2);
 }

 LIR* MipsMir2Lir::LoadConstantWide(int r_dest_lo, int r_dest_hi, int64_t value) {
   LIR *res;
   res = LoadConstantNoClobber(r_dest_lo, Low32Bits(value));
   LoadConstantNoClobber(r_dest_hi, High32Bits(value));
   return res;
 }

 /* Load value from base + scaled index. */
 LIR* MipsMir2Lir::LoadBaseIndexed(int rBase, int r_index, int r_dest,
                                   int scale, OpSize size) {
   LIR *first = NULL;
   LIR *res;
   MipsOpCode opcode = kMipsNop;
   int t_reg = AllocTemp();

   if (MIPS_FPREG(r_dest)) {
     DCHECK(MIPS_SINGLEREG(r_dest));
     DCHECK((size == kWord) || (size == kSingle));
     size = kSingle;
   } else {
     if (size == kSingle)
       size = kWord;
   }

   if (!scale) {
     first = NewLIR3(kMipsAddu, t_reg , rBase, r_index);
   } else {
     first = OpRegRegImm(kOpLsl, t_reg, r_index, scale);
     NewLIR3(kMipsAddu, t_reg , rBase, t_reg);
   }

   switch (size) {
     case kSingle:
       opcode = kMipsFlwc1;
       break;
     case kWord:
       opcode = kMipsLw;
       break;
     case kUnsignedHalf:
       opcode = kMipsLhu;
       break;
     case kSignedHalf:
       opcode = kMipsLh;
       break;
     case kUnsignedByte:
       opcode = kMipsLbu;
       break;
     case kSignedByte:
       opcode = kMipsLb;
       break;
     default:
       LOG(FATAL) << "Bad case in LoadBaseIndexed";
   }

   res = NewLIR3(opcode, r_dest, 0, t_reg);
   FreeTemp(t_reg);
   return (first) ? first : res;
 }

 /* store value base base + scaled index. */
 LIR* MipsMir2Lir::StoreBaseIndexed(int rBase, int r_index, int r_src,
                                    int scale, OpSize size) {
   LIR *first = NULL;
   MipsOpCode opcode = kMipsNop;
   int r_new_index = r_index;
   int t_reg = AllocTemp();

   if (MIPS_FPREG(r_src)) {
     DCHECK(MIPS_SINGLEREG(r_src));
     DCHECK((size == kWord) || (size == kSingle));
     size = kSingle;
   } else {
     if (size == kSingle)
       size = kWord;
   }

   if (!scale) {
     first = NewLIR3(kMipsAddu, t_reg , rBase, r_index);
   } else {
     first = OpRegRegImm(kOpLsl, t_reg, r_index, scale);
     NewLIR3(kMipsAddu, t_reg , rBase, t_reg);
   }

   switch (size) {
     case kSingle:
       opcode = kMipsFswc1;
       break;
     case kWord:
       opcode = kMipsSw;
       break;
     case kUnsignedHalf:
     case kSignedHalf:
       opcode = kMipsSh;
       break;
     case kUnsignedByte:
     case kSignedByte:
       opcode = kMipsSb;
       break;
     default:
       LOG(FATAL) << "Bad case in StoreBaseIndexed";
   }
   NewLIR3(opcode, r_src, 0, t_reg);
   FreeTemp(r_new_index);
   return first;
 }

 LIR* MipsMir2Lir::LoadBaseDispBody(int rBase, int displacement, int r_dest,
                                    int r_dest_hi, OpSize size, int s_reg) {
 /*
  * Load value from base + displacement.  Optionally perform null check
  * on base (which must have an associated s_reg and MIR).  If not
  * performing null check, incoming MIR can be null. IMPORTANT: this
  * code must not allocate any new temps.  If a new register is needed
  * and base and dest are the same, spill some other register to
  * rlp and then restore.
  */
   LIR *res;
   LIR *load = NULL;
   LIR *load2 = NULL;
   MipsOpCode opcode = kMipsNop;
   bool short_form = IS_SIMM16(displacement);
   bool pair = false;

   switch (size) {
     case kLong:
     case kDouble:
       pair = true;
       opcode = kMipsLw;
       if (MIPS_FPREG(r_dest)) {
         opcode = kMipsFlwc1;
         if (MIPS_DOUBLEREG(r_dest)) {
           r_dest = r_dest - MIPS_FP_DOUBLE;
         } else {
           DCHECK(MIPS_FPREG(r_dest_hi));
           DCHECK(r_dest == (r_dest_hi - 1));
         }
         r_dest_hi = r_dest + 1;
       }
       short_form = IS_SIMM16_2WORD(displacement);
       DCHECK_EQ((displacement & 0x3), 0);
       break;
     case kWord:
     case kSingle:
       opcode = kMipsLw;
       if (MIPS_FPREG(r_dest)) {
         opcode = kMipsFlwc1;
         DCHECK(MIPS_SINGLEREG(r_dest));
       }
       DCHECK_EQ((displacement & 0x3), 0);
       break;
     case kUnsignedHalf:
       opcode = kMipsLhu;
       DCHECK_EQ((displacement & 0x1), 0);
       break;
     case kSignedHalf:
       opcode = kMipsLh;
       DCHECK_EQ((displacement & 0x1), 0);
       break;
     case kUnsignedByte:
       opcode = kMipsLbu;
       break;
     case kSignedByte:
       opcode = kMipsLb;
       break;
     default:
       LOG(FATAL) << "Bad case in LoadBaseIndexedBody";
   }

   if (short_form) {
     if (!pair) {
       load = res = NewLIR3(opcode, r_dest, displacement, rBase);
     } else {
       load = res = NewLIR3(opcode, r_dest,
                            displacement + LOWORD_OFFSET, rBase);
       load2 = NewLIR3(opcode, r_dest_hi,
                       displacement + HIWORD_OFFSET, rBase);
     }
   } else {
     if (pair) {
       int r_tmp = AllocFreeTemp();
       res = OpRegRegImm(kOpAdd, r_tmp, rBase, displacement);
       load = NewLIR3(opcode, r_dest, LOWORD_OFFSET, r_tmp);
       load2 = NewLIR3(opcode, r_dest_hi, HIWORD_OFFSET, r_tmp);
       FreeTemp(r_tmp);
     } else {
       int r_tmp = (rBase == r_dest) ? AllocFreeTemp() : r_dest;
       res = OpRegRegImm(kOpAdd, r_tmp, rBase, displacement);
       load = NewLIR3(opcode, r_dest, 0, r_tmp);
       if (r_tmp != r_dest)
         FreeTemp(r_tmp);
     }
   }

   if (rBase == rMIPS_SP) {
     AnnotateDalvikRegAccess(load, (displacement + (pair ? LOWORD_OFFSET : 0)) >> 2,
                             true /* is_load */, pair /* is64bit */);
     if (pair) {
       AnnotateDalvikRegAccess(load2, (displacement + HIWORD_OFFSET) >> 2,
                               true /* is_load */, pair /* is64bit */);
     }
   }
   return load;
 }

 LIR* MipsMir2Lir::LoadBaseDisp(int rBase, int displacement, int r_dest,
                                OpSize size, int s_reg) {
   return LoadBaseDispBody(rBase, displacement, r_dest, -1,
                           size, s_reg);
 }

 LIR* MipsMir2Lir::LoadBaseDispWide(int rBase, int displacement,
                                    int r_dest_lo, int r_dest_hi, int s_reg) {
   return LoadBaseDispBody(rBase, displacement, r_dest_lo, r_dest_hi, kLong, s_reg);
 }

 LIR* MipsMir2Lir::StoreBaseDispBody(int rBase, int displacement,
                                     int r_src, int r_src_hi, OpSize size) {
   LIR *res;
   LIR *store = NULL;
   LIR *store2 = NULL;
   MipsOpCode opcode = kMipsNop;
   bool short_form = IS_SIMM16(displacement);
   bool pair = false;

   switch (size) {
     case kLong:
     case kDouble:
       pair = true;
       opcode = kMipsSw;
       if (MIPS_FPREG(r_src)) {
         opcode = kMipsFswc1;
         if (MIPS_DOUBLEREG(r_src)) {
           r_src = r_src - MIPS_FP_DOUBLE;
         } else {
           DCHECK(MIPS_FPREG(r_src_hi));
           DCHECK_EQ(r_src, (r_src_hi - 1));
         }
         r_src_hi = r_src + 1;
       }
       short_form = IS_SIMM16_2WORD(displacement);
       DCHECK_EQ((displacement & 0x3), 0);
       break;
     case kWord:
     case kSingle:
       opcode = kMipsSw;
       if (MIPS_FPREG(r_src)) {
         opcode = kMipsFswc1;
         DCHECK(MIPS_SINGLEREG(r_src));
       }
       DCHECK_EQ((displacement & 0x3), 0);
       break;
     case kUnsignedHalf:
     case kSignedHalf:
       opcode = kMipsSh;
       DCHECK_EQ((displacement & 0x1), 0);
       break;
     case kUnsignedByte:
     case kSignedByte:
       opcode = kMipsSb;
       break;
     default:
       LOG(FATAL) << "Bad case in StoreBaseIndexedBody";
   }

   if (short_form) {
     if (!pair) {
       store = res = NewLIR3(opcode, r_src, displacement, rBase);
     } else {
       store = res = NewLIR3(opcode, r_src, displacement + LOWORD_OFFSET,
                             rBase);
       store2 = NewLIR3(opcode, r_src_hi, displacement + HIWORD_OFFSET,
                        rBase);
     }
   } else {
     int r_scratch = AllocTemp();
     res = OpRegRegImm(kOpAdd, r_scratch, rBase, displacement);
     if (!pair) {
       store =  NewLIR3(opcode, r_src, 0, r_scratch);
     } else {
       store =  NewLIR3(opcode, r_src, LOWORD_OFFSET, r_scratch);
       store2 = NewLIR3(opcode, r_src_hi, HIWORD_OFFSET, r_scratch);
     }
     FreeTemp(r_scratch);
   }

   if (rBase == rMIPS_SP) {
     AnnotateDalvikRegAccess(store, (displacement + (pair ? LOWORD_OFFSET : 0)) >> 2,
                             false /* is_load */, pair /* is64bit */);
     if (pair) {
       AnnotateDalvikRegAccess(store2, (displacement + HIWORD_OFFSET) >> 2,
                               false /* is_load */, pair /* is64bit */);
     }
   }

   return res;
 }

 LIR* MipsMir2Lir::StoreBaseDisp(int rBase, int displacement, int r_src,
                                 OpSize size) {
   return StoreBaseDispBody(rBase, displacement, r_src, -1, size);
 }

 LIR* MipsMir2Lir::StoreBaseDispWide(int rBase, int displacement,
                                     int r_src_lo, int r_src_hi) {
   return StoreBaseDispBody(rBase, displacement, r_src_lo, r_src_hi, kLong);
 }

 LIR* MipsMir2Lir::OpThreadMem(OpKind op, int thread_offset) {
   LOG(FATAL) << "Unexpected use of OpThreadMem for MIPS";
   return NULL;
 }

 LIR* MipsMir2Lir::OpMem(OpKind op, int rBase, int disp) {
   LOG(FATAL) << "Unexpected use of OpMem for MIPS";
   return NULL;
 }

 LIR* MipsMir2Lir::StoreBaseIndexedDisp(int rBase, int r_index, int scale, int displacement,
                                        int r_src, int r_src_hi, OpSize size, int s_reg) {
   LOG(FATAL) << "Unexpected use of StoreBaseIndexedDisp for MIPS";
   return NULL;
 }

 LIR* MipsMir2Lir::OpRegMem(OpKind op, int r_dest, int rBase,
               int offset) {
   LOG(FATAL) << "Unexpected use of OpRegMem for MIPS";
   return NULL;
 }

 LIR* MipsMir2Lir::LoadBaseIndexedDisp(int rBase, int r_index, int scale, int displacement,
                                       int r_dest, int r_dest_hi, OpSize size, int s_reg) {
   LOG(FATAL) << "Unexpected use of LoadBaseIndexedDisp for MIPS";
   return NULL;
 }

 LIR* MipsMir2Lir::OpCondBranch(ConditionCode cc, LIR* target) {
   LOG(FATAL) << "Unexpected use of OpCondBranch for MIPS";
   return NULL;
 }

 }  // namespace art
	/*
	* 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 "dex/quick/mir_to_lir-inl.h"
	#include "mips_lir.h"

	namespace art {

	/* This file contains codegen for the MIPS32 ISA. */
	LIR* MipsMir2Lir::OpFpRegCopy(int r_dest, int r_src) {
	int opcode;
	/* must be both DOUBLE or both not DOUBLE */
	DCHECK_EQ(MIPS_DOUBLEREG(r_dest), MIPS_DOUBLEREG(r_src));
	if (MIPS_DOUBLEREG(r_dest)) {
	opcode = kMipsFmovd;
	} else {
	if (MIPS_SINGLEREG(r_dest)) {
	if (MIPS_SINGLEREG(r_src)) {
	opcode = kMipsFmovs;
	} else {
	/* note the operands are swapped for the mtc1 instr */
	int t_opnd = r_src;
	r_src = r_dest;
	r_dest = t_opnd;
	opcode = kMipsMtc1;
	}
	} else {
	DCHECK(MIPS_SINGLEREG(r_src));
	opcode = kMipsMfc1;
	}
	}
	LIR* res = RawLIR(current_dalvik_offset_, opcode, r_src, r_dest);
	if (!(cu_->disable_opt & (1 << kSafeOptimizations)) && r_dest == r_src) {
	res->flags.is_nop = true;
	}
	return res;
	}

	bool MipsMir2Lir::InexpensiveConstantInt(int32_t value) {
	return ((value == 0) \|\| IsUint(16, value) \|\| ((value < 0) && (value >= -32768)));
	}

	bool MipsMir2Lir::InexpensiveConstantFloat(int32_t value) {
	return false; // TUNING
	}

	bool MipsMir2Lir::InexpensiveConstantLong(int64_t value) {
	return false; // TUNING
	}

	bool MipsMir2Lir::InexpensiveConstantDouble(int64_t value) {
	return false; // TUNING
	}

	/*
	* Load a immediate using a shortcut if possible; otherwise
	* grab from the per-translation literal pool. If target is
	* a high register, build constant into a low register and copy.
	*
	* No additional register clobbering operation performed. Use this version when
	* 1) r_dest is freshly returned from AllocTemp or
	* 2) The codegen is under fixed register usage
	*/
	LIR* MipsMir2Lir::LoadConstantNoClobber(int r_dest, int value) {
	LIR *res;

	int r_dest_save = r_dest;
	int is_fp_reg = MIPS_FPREG(r_dest);
	if (is_fp_reg) {
	DCHECK(MIPS_SINGLEREG(r_dest));
	r_dest = AllocTemp();
	}

	/* See if the value can be constructed cheaply */
	if (value == 0) {
	res = NewLIR2(kMipsMove, r_dest, r_ZERO);
	} else if ((value > 0) && (value <= 65535)) {
	res = NewLIR3(kMipsOri, r_dest, r_ZERO, value);
	} else if ((value < 0) && (value >= -32768)) {
	res = NewLIR3(kMipsAddiu, r_dest, r_ZERO, value);
	} else {
	res = NewLIR2(kMipsLui, r_dest, value>>16);
	if (value & 0xffff)
	NewLIR3(kMipsOri, r_dest, r_dest, value);
	}

	if (is_fp_reg) {
	NewLIR2(kMipsMtc1, r_dest, r_dest_save);
	FreeTemp(r_dest);
	}

	return res;
	}

	LIR* MipsMir2Lir::OpUnconditionalBranch(LIR* target) {
	LIR* res = NewLIR1(kMipsB, 0 /* offset to be patched during assembly*/);
	res->target = target;
	return res;
	}

	LIR* MipsMir2Lir::OpReg(OpKind op, int r_dest_src) {
	MipsOpCode opcode = kMipsNop;
	switch (op) {
	case kOpBlx:
	opcode = kMipsJalr;
	break;
	case kOpBx:
	return NewLIR1(kMipsJr, r_dest_src);
	break;
	default:
	LOG(FATAL) << "Bad case in OpReg";
	}
	return NewLIR2(opcode, r_RA, r_dest_src);
	}

	LIR* MipsMir2Lir::OpRegImm(OpKind op, int r_dest_src1,
	int value) {
	LIR *res;
	bool neg = (value < 0);
	int abs_value = (neg) ? -value : value;
	bool short_form = (abs_value & 0xff) == abs_value;
	MipsOpCode opcode = kMipsNop;
	switch (op) {
	case kOpAdd:
	return OpRegRegImm(op, r_dest_src1, r_dest_src1, value);
	break;
	case kOpSub:
	return OpRegRegImm(op, r_dest_src1, r_dest_src1, value);
	break;
	default:
	LOG(FATAL) << "Bad case in OpRegImm";
	break;
	}
	if (short_form)
	res = NewLIR2(opcode, r_dest_src1, abs_value);
	else {
	int r_scratch = AllocTemp();
	res = LoadConstant(r_scratch, value);
	if (op == kOpCmp)
	NewLIR2(opcode, r_dest_src1, r_scratch);
	else
	NewLIR3(opcode, r_dest_src1, r_dest_src1, r_scratch);
	}
	return res;
	}

	LIR* MipsMir2Lir::OpRegRegReg(OpKind op, int r_dest, int r_src1, int r_src2) {
	MipsOpCode opcode = kMipsNop;
	switch (op) {
	case kOpAdd:
	opcode = kMipsAddu;
	break;
	case kOpSub:
	opcode = kMipsSubu;
	break;
	case kOpAnd:
	opcode = kMipsAnd;
	break;
	case kOpMul:
	opcode = kMipsMul;
	break;
	case kOpOr:
	opcode = kMipsOr;
	break;
	case kOpXor:
	opcode = kMipsXor;
	break;
	case kOpLsl:
	opcode = kMipsSllv;
	break;
	case kOpLsr:
	opcode = kMipsSrlv;
	break;
	case kOpAsr:
	opcode = kMipsSrav;
	break;
	case kOpAdc:
	case kOpSbc:
	LOG(FATAL) << "No carry bit on MIPS";
	break;
	default:
	LOG(FATAL) << "bad case in OpRegRegReg";
	break;
	}
	return NewLIR3(opcode, r_dest, r_src1, r_src2);
	}

	LIR* MipsMir2Lir::OpRegRegImm(OpKind op, int r_dest, int r_src1, int value) {
	LIR *res;
	MipsOpCode opcode = kMipsNop;
	bool short_form = true;

	switch (op) {
	case kOpAdd:
	if (IS_SIMM16(value)) {
	opcode = kMipsAddiu;
	} else {
	short_form = false;
	opcode = kMipsAddu;
	}
	break;
	case kOpSub:
	if (IS_SIMM16((-value))) {
	value = -value;
	opcode = kMipsAddiu;
	} else {
	short_form = false;
	opcode = kMipsSubu;
	}
	break;
	case kOpLsl:
	DCHECK(value >= 0 && value <= 31);
	opcode = kMipsSll;
	break;
	case kOpLsr:
	DCHECK(value >= 0 && value <= 31);
	opcode = kMipsSrl;
	break;
	case kOpAsr:
	DCHECK(value >= 0 && value <= 31);
	opcode = kMipsSra;
	break;
	case kOpAnd:
	if (IS_UIMM16((value))) {
	opcode = kMipsAndi;
	} else {
	short_form = false;
	opcode = kMipsAnd;
	}
	break;
	case kOpOr:
	if (IS_UIMM16((value))) {
	opcode = kMipsOri;
	} else {
	short_form = false;
	opcode = kMipsOr;
	}
	break;
	case kOpXor:
	if (IS_UIMM16((value))) {
	opcode = kMipsXori;
	} else {
	short_form = false;
	opcode = kMipsXor;
	}
	break;
	case kOpMul:
	short_form = false;
	opcode = kMipsMul;
	break;
	default:
	LOG(FATAL) << "Bad case in OpRegRegImm";
	break;
	}

	if (short_form)
	res = NewLIR3(opcode, r_dest, r_src1, value);
	else {
	if (r_dest != r_src1) {
	res = LoadConstant(r_dest, value);
	NewLIR3(opcode, r_dest, r_src1, r_dest);
	} else {
	int r_scratch = AllocTemp();
	res = LoadConstant(r_scratch, value);
	NewLIR3(opcode, r_dest, r_src1, r_scratch);
	}
	}
	return res;
	}

	LIR* MipsMir2Lir::OpRegReg(OpKind op, int r_dest_src1, int r_src2) {
	MipsOpCode opcode = kMipsNop;
	LIR *res;
	switch (op) {
	case kOpMov:
	opcode = kMipsMove;
	break;
	case kOpMvn:
	return NewLIR3(kMipsNor, r_dest_src1, r_src2, r_ZERO);
	case kOpNeg:
	return NewLIR3(kMipsSubu, r_dest_src1, r_ZERO, r_src2);
	case kOpAdd:
	case kOpAnd:
	case kOpMul:
	case kOpOr:
	case kOpSub:
	case kOpXor:
	return OpRegRegReg(op, r_dest_src1, r_dest_src1, r_src2);
	case kOp2Byte:
	#if __mips_isa_rev >= 2
	res = NewLIR2(kMipsSeb, r_dest_src1, r_src2);
	#else
	res = OpRegRegImm(kOpLsl, r_dest_src1, r_src2, 24);
	OpRegRegImm(kOpAsr, r_dest_src1, r_dest_src1, 24);
	#endif
	return res;
	case kOp2Short:
	#if __mips_isa_rev >= 2
	res = NewLIR2(kMipsSeh, r_dest_src1, r_src2);
	#else
	res = OpRegRegImm(kOpLsl, r_dest_src1, r_src2, 16);
	OpRegRegImm(kOpAsr, r_dest_src1, r_dest_src1, 16);
	#endif
	return res;
	case kOp2Char:
	return NewLIR3(kMipsAndi, r_dest_src1, r_src2, 0xFFFF);
	default:
	LOG(FATAL) << "Bad case in OpRegReg";
	break;
	}
	return NewLIR2(opcode, r_dest_src1, r_src2);
	}

	LIR* MipsMir2Lir::LoadConstantWide(int r_dest_lo, int r_dest_hi, int64_t value) {
	LIR *res;
	res = LoadConstantNoClobber(r_dest_lo, Low32Bits(value));
	LoadConstantNoClobber(r_dest_hi, High32Bits(value));
	return res;
	}

	/* Load value from base + scaled index. */
	LIR* MipsMir2Lir::LoadBaseIndexed(int rBase, int r_index, int r_dest,
	int scale, OpSize size) {
	LIR *first = NULL;
	LIR *res;
	MipsOpCode opcode = kMipsNop;
	int t_reg = AllocTemp();

	if (MIPS_FPREG(r_dest)) {
	DCHECK(MIPS_SINGLEREG(r_dest));
	DCHECK((size == kWord) \|\| (size == kSingle));
	size = kSingle;
	} else {
	if (size == kSingle)
	size = kWord;
	}

	if (!scale) {
	first = NewLIR3(kMipsAddu, t_reg , rBase, r_index);
	} else {
	first = OpRegRegImm(kOpLsl, t_reg, r_index, scale);
	NewLIR3(kMipsAddu, t_reg , rBase, t_reg);
	}

	switch (size) {
	case kSingle:
	opcode = kMipsFlwc1;
	break;
	case kWord:
	opcode = kMipsLw;
	break;
	case kUnsignedHalf:
	opcode = kMipsLhu;
	break;
	case kSignedHalf:
	opcode = kMipsLh;
	break;
	case kUnsignedByte:
	opcode = kMipsLbu;
	break;
	case kSignedByte:
	opcode = kMipsLb;
	break;
	default:
	LOG(FATAL) << "Bad case in LoadBaseIndexed";
	}

	res = NewLIR3(opcode, r_dest, 0, t_reg);
	FreeTemp(t_reg);
	return (first) ? first : res;
	}

	/* store value base base + scaled index. */
	LIR* MipsMir2Lir::StoreBaseIndexed(int rBase, int r_index, int r_src,
	int scale, OpSize size) {
	LIR *first = NULL;
	MipsOpCode opcode = kMipsNop;
	int r_new_index = r_index;
	int t_reg = AllocTemp();

	if (MIPS_FPREG(r_src)) {
	DCHECK(MIPS_SINGLEREG(r_src));
	DCHECK((size == kWord) \|\| (size == kSingle));
	size = kSingle;
	} else {
	if (size == kSingle)
	size = kWord;
	}

	if (!scale) {
	first = NewLIR3(kMipsAddu, t_reg , rBase, r_index);
	} else {
	first = OpRegRegImm(kOpLsl, t_reg, r_index, scale);
	NewLIR3(kMipsAddu, t_reg , rBase, t_reg);
	}

	switch (size) {
	case kSingle:
	opcode = kMipsFswc1;
	break;
	case kWord:
	opcode = kMipsSw;
	break;
	case kUnsignedHalf:
	case kSignedHalf:
	opcode = kMipsSh;
	break;
	case kUnsignedByte:
	case kSignedByte:
	opcode = kMipsSb;
	break;
	default:
	LOG(FATAL) << "Bad case in StoreBaseIndexed";
	}
	NewLIR3(opcode, r_src, 0, t_reg);
	FreeTemp(r_new_index);
	return first;
	}

	LIR* MipsMir2Lir::LoadBaseDispBody(int rBase, int displacement, int r_dest,
	int r_dest_hi, OpSize size, int s_reg) {
	/*
	* Load value from base + displacement. Optionally perform null check
	* on base (which must have an associated s_reg and MIR). If not
	* performing null check, incoming MIR can be null. IMPORTANT: this
	* code must not allocate any new temps. If a new register is needed
	* and base and dest are the same, spill some other register to
	* rlp and then restore.
	*/
	LIR *res;
	LIR *load = NULL;
	LIR *load2 = NULL;
	MipsOpCode opcode = kMipsNop;
	bool short_form = IS_SIMM16(displacement);
	bool pair = false;

	switch (size) {
	case kLong:
	case kDouble:
	pair = true;
	opcode = kMipsLw;
	if (MIPS_FPREG(r_dest)) {
	opcode = kMipsFlwc1;
	if (MIPS_DOUBLEREG(r_dest)) {
	r_dest = r_dest - MIPS_FP_DOUBLE;
	} else {
	DCHECK(MIPS_FPREG(r_dest_hi));
	DCHECK(r_dest == (r_dest_hi - 1));
	}
	r_dest_hi = r_dest + 1;
	}
	short_form = IS_SIMM16_2WORD(displacement);
	DCHECK_EQ((displacement & 0x3), 0);
	break;
	case kWord:
	case kSingle:
	opcode = kMipsLw;
	if (MIPS_FPREG(r_dest)) {
	opcode = kMipsFlwc1;
	DCHECK(MIPS_SINGLEREG(r_dest));
	}
	DCHECK_EQ((displacement & 0x3), 0);
	break;
	case kUnsignedHalf:
	opcode = kMipsLhu;
	DCHECK_EQ((displacement & 0x1), 0);
	break;
	case kSignedHalf:
	opcode = kMipsLh;
	DCHECK_EQ((displacement & 0x1), 0);
	break;
	case kUnsignedByte:
	opcode = kMipsLbu;
	break;
	case kSignedByte:
	opcode = kMipsLb;
	break;
	default:
	LOG(FATAL) << "Bad case in LoadBaseIndexedBody";
	}

	if (short_form) {
	if (!pair) {
	load = res = NewLIR3(opcode, r_dest, displacement, rBase);
	} else {
	load = res = NewLIR3(opcode, r_dest,
	displacement + LOWORD_OFFSET, rBase);
	load2 = NewLIR3(opcode, r_dest_hi,
	displacement + HIWORD_OFFSET, rBase);
	}
	} else {
	if (pair) {
	int r_tmp = AllocFreeTemp();
	res = OpRegRegImm(kOpAdd, r_tmp, rBase, displacement);
	load = NewLIR3(opcode, r_dest, LOWORD_OFFSET, r_tmp);
	load2 = NewLIR3(opcode, r_dest_hi, HIWORD_OFFSET, r_tmp);
	FreeTemp(r_tmp);
	} else {
	int r_tmp = (rBase == r_dest) ? AllocFreeTemp() : r_dest;
	res = OpRegRegImm(kOpAdd, r_tmp, rBase, displacement);
	load = NewLIR3(opcode, r_dest, 0, r_tmp);
	if (r_tmp != r_dest)
	FreeTemp(r_tmp);
	}
	}

	if (rBase == rMIPS_SP) {
	AnnotateDalvikRegAccess(load, (displacement + (pair ? LOWORD_OFFSET : 0)) >> 2,
	true /* is_load /, pair / is64bit */);
	if (pair) {
	AnnotateDalvikRegAccess(load2, (displacement + HIWORD_OFFSET) >> 2,
	true /* is_load /, pair / is64bit */);
	}
	}
	return load;
	}

	LIR* MipsMir2Lir::LoadBaseDisp(int rBase, int displacement, int r_dest,
	OpSize size, int s_reg) {
	return LoadBaseDispBody(rBase, displacement, r_dest, -1,
	size, s_reg);
	}

	LIR* MipsMir2Lir::LoadBaseDispWide(int rBase, int displacement,
	int r_dest_lo, int r_dest_hi, int s_reg) {
	return LoadBaseDispBody(rBase, displacement, r_dest_lo, r_dest_hi, kLong, s_reg);
	}

	LIR* MipsMir2Lir::StoreBaseDispBody(int rBase, int displacement,
	int r_src, int r_src_hi, OpSize size) {
	LIR *res;
	LIR *store = NULL;
	LIR *store2 = NULL;
	MipsOpCode opcode = kMipsNop;
	bool short_form = IS_SIMM16(displacement);
	bool pair = false;

	switch (size) {
	case kLong:
	case kDouble:
	pair = true;
	opcode = kMipsSw;
	if (MIPS_FPREG(r_src)) {
	opcode = kMipsFswc1;
	if (MIPS_DOUBLEREG(r_src)) {
	r_src = r_src - MIPS_FP_DOUBLE;
	} else {
	DCHECK(MIPS_FPREG(r_src_hi));
	DCHECK_EQ(r_src, (r_src_hi - 1));
	}
	r_src_hi = r_src + 1;
	}
	short_form = IS_SIMM16_2WORD(displacement);
	DCHECK_EQ((displacement & 0x3), 0);
	break;
	case kWord:
	case kSingle:
	opcode = kMipsSw;
	if (MIPS_FPREG(r_src)) {
	opcode = kMipsFswc1;
	DCHECK(MIPS_SINGLEREG(r_src));
	}
	DCHECK_EQ((displacement & 0x3), 0);
	break;
	case kUnsignedHalf:
	case kSignedHalf:
	opcode = kMipsSh;
	DCHECK_EQ((displacement & 0x1), 0);
	break;
	case kUnsignedByte:
	case kSignedByte:
	opcode = kMipsSb;
	break;
	default:
	LOG(FATAL) << "Bad case in StoreBaseIndexedBody";
	}

	if (short_form) {
	if (!pair) {
	store = res = NewLIR3(opcode, r_src, displacement, rBase);
	} else {
	store = res = NewLIR3(opcode, r_src, displacement + LOWORD_OFFSET,
	rBase);
	store2 = NewLIR3(opcode, r_src_hi, displacement + HIWORD_OFFSET,
	rBase);
	}
	} else {
	int r_scratch = AllocTemp();
	res = OpRegRegImm(kOpAdd, r_scratch, rBase, displacement);
	if (!pair) {
	store = NewLIR3(opcode, r_src, 0, r_scratch);
	} else {
	store = NewLIR3(opcode, r_src, LOWORD_OFFSET, r_scratch);
	store2 = NewLIR3(opcode, r_src_hi, HIWORD_OFFSET, r_scratch);
	}
	FreeTemp(r_scratch);
	}

	if (rBase == rMIPS_SP) {
	AnnotateDalvikRegAccess(store, (displacement + (pair ? LOWORD_OFFSET : 0)) >> 2,
	false /* is_load /, pair / is64bit */);
	if (pair) {
	AnnotateDalvikRegAccess(store2, (displacement + HIWORD_OFFSET) >> 2,
	false /* is_load /, pair / is64bit */);
	}
	}

	return res;
	}

	LIR* MipsMir2Lir::StoreBaseDisp(int rBase, int displacement, int r_src,
	OpSize size) {
	return StoreBaseDispBody(rBase, displacement, r_src, -1, size);
	}

	LIR* MipsMir2Lir::StoreBaseDispWide(int rBase, int displacement,
	int r_src_lo, int r_src_hi) {
	return StoreBaseDispBody(rBase, displacement, r_src_lo, r_src_hi, kLong);
	}

	LIR* MipsMir2Lir::OpThreadMem(OpKind op, int thread_offset) {
	LOG(FATAL) << "Unexpected use of OpThreadMem for MIPS";
	return NULL;
	}

	LIR* MipsMir2Lir::OpMem(OpKind op, int rBase, int disp) {
	LOG(FATAL) << "Unexpected use of OpMem for MIPS";
	return NULL;
	}

	LIR* MipsMir2Lir::StoreBaseIndexedDisp(int rBase, int r_index, int scale, int displacement,
	int r_src, int r_src_hi, OpSize size, int s_reg) {
	LOG(FATAL) << "Unexpected use of StoreBaseIndexedDisp for MIPS";
	return NULL;
	}

	LIR* MipsMir2Lir::OpRegMem(OpKind op, int r_dest, int rBase,
	int offset) {
	LOG(FATAL) << "Unexpected use of OpRegMem for MIPS";
	return NULL;
	}

	LIR* MipsMir2Lir::LoadBaseIndexedDisp(int rBase, int r_index, int scale, int displacement,
	int r_dest, int r_dest_hi, OpSize size, int s_reg) {
	LOG(FATAL) << "Unexpected use of LoadBaseIndexedDisp for MIPS";
	return NULL;
	}

	LIR* MipsMir2Lir::OpCondBranch(ConditionCode cc, LIR* target) {
	LOG(FATAL) << "Unexpected use of OpCondBranch for MIPS";
	return NULL;
	}

	} // namespace art