blob: 02c39f6d0adb1c5a503daf36ac800820e6c7908b [file] [log] [blame]
Ben Chengba4fc8b2009-06-01 13:00:29 -07001/*
2 * Copyright (C) 2009 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
Bill Buzbee50a6bf22009-07-08 13:08:04 -070017/*
18 * This file contains codegen and support common to all supported
19 * ARM variants. It is included by:
20 *
21 * Codegen-$(TARGET_ARCH_VARIANT).c
22 *
23 * which combines this common code with specific support found in the
24 * applicable directory below this one.
25 */
26
buzbee919eb062010-07-12 12:59:22 -070027/*
28 * Mark garbage collection card. Skip if the value we're storing is null.
29 */
30static void markCard(CompilationUnit *cUnit, int valReg, int tgtAddrReg)
31{
32 int regCardBase = dvmCompilerAllocTemp(cUnit);
33 int regCardNo = dvmCompilerAllocTemp(cUnit);
buzbee8f8109a2010-08-31 10:16:35 -070034 ArmLIR *branchOver = genCmpImmBranch(cUnit, kArmCondEq, valReg, 0);
buzbee919eb062010-07-12 12:59:22 -070035 loadWordDisp(cUnit, rGLUE, offsetof(InterpState, cardTable),
36 regCardBase);
37 opRegRegImm(cUnit, kOpLsr, regCardNo, tgtAddrReg, GC_CARD_SHIFT);
38 storeBaseIndexed(cUnit, regCardBase, regCardNo, regCardBase, 0,
39 kUnsignedByte);
40 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
41 target->defMask = ENCODE_ALL;
42 branchOver->generic.target = (LIR *)target;
buzbeebaf196a2010-08-04 10:13:15 -070043 dvmCompilerFreeTemp(cUnit, regCardBase);
44 dvmCompilerFreeTemp(cUnit, regCardNo);
buzbee919eb062010-07-12 12:59:22 -070045}
46
Ben Cheng5d90c202009-11-22 23:31:11 -080047static bool genConversionCall(CompilationUnit *cUnit, MIR *mir, void *funct,
48 int srcSize, int tgtSize)
49{
50 /*
51 * Don't optimize the register usage since it calls out to template
52 * functions
53 */
54 RegLocation rlSrc;
55 RegLocation rlDest;
Bill Buzbeec6f10662010-02-09 11:16:15 -080056 dvmCompilerFlushAllRegs(cUnit); /* Send everything to home location */
Ben Cheng5d90c202009-11-22 23:31:11 -080057 if (srcSize == 1) {
Bill Buzbeec6f10662010-02-09 11:16:15 -080058 rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
Ben Cheng5d90c202009-11-22 23:31:11 -080059 loadValueDirectFixed(cUnit, rlSrc, r0);
60 } else {
Bill Buzbeec6f10662010-02-09 11:16:15 -080061 rlSrc = dvmCompilerGetSrcWide(cUnit, mir, 0, 1);
Ben Cheng5d90c202009-11-22 23:31:11 -080062 loadValueDirectWideFixed(cUnit, rlSrc, r0, r1);
63 }
Ben Chengbd1326d2010-04-02 15:04:53 -070064 LOAD_FUNC_ADDR(cUnit, r2, (int)funct);
Ben Cheng5d90c202009-11-22 23:31:11 -080065 opReg(cUnit, kOpBlx, r2);
Elliott Hughes6a555132010-02-25 15:41:42 -080066 dvmCompilerClobberCallRegs(cUnit);
Ben Cheng5d90c202009-11-22 23:31:11 -080067 if (tgtSize == 1) {
68 RegLocation rlResult;
Bill Buzbeec6f10662010-02-09 11:16:15 -080069 rlDest = dvmCompilerGetDest(cUnit, mir, 0);
70 rlResult = dvmCompilerGetReturn(cUnit);
Ben Cheng5d90c202009-11-22 23:31:11 -080071 storeValue(cUnit, rlDest, rlResult);
72 } else {
73 RegLocation rlResult;
Bill Buzbeec6f10662010-02-09 11:16:15 -080074 rlDest = dvmCompilerGetDestWide(cUnit, mir, 0, 1);
75 rlResult = dvmCompilerGetReturnWide(cUnit);
Ben Cheng5d90c202009-11-22 23:31:11 -080076 storeValueWide(cUnit, rlDest, rlResult);
77 }
78 return false;
79}
Ben Chengba4fc8b2009-06-01 13:00:29 -070080
Ben Cheng5d90c202009-11-22 23:31:11 -080081static bool genArithOpFloatPortable(CompilationUnit *cUnit, MIR *mir,
82 RegLocation rlDest, RegLocation rlSrc1,
83 RegLocation rlSrc2)
84{
85 RegLocation rlResult;
86 void* funct;
87
Dan Bornstein9a1f8162010-12-01 17:02:26 -080088 switch (mir->dalvikInsn.opcode) {
Ben Cheng5d90c202009-11-22 23:31:11 -080089 case OP_ADD_FLOAT_2ADDR:
90 case OP_ADD_FLOAT:
91 funct = (void*) __aeabi_fadd;
92 break;
93 case OP_SUB_FLOAT_2ADDR:
94 case OP_SUB_FLOAT:
95 funct = (void*) __aeabi_fsub;
96 break;
97 case OP_DIV_FLOAT_2ADDR:
98 case OP_DIV_FLOAT:
99 funct = (void*) __aeabi_fdiv;
100 break;
101 case OP_MUL_FLOAT_2ADDR:
102 case OP_MUL_FLOAT:
103 funct = (void*) __aeabi_fmul;
104 break;
105 case OP_REM_FLOAT_2ADDR:
106 case OP_REM_FLOAT:
107 funct = (void*) fmodf;
108 break;
109 case OP_NEG_FLOAT: {
110 genNegFloat(cUnit, rlDest, rlSrc1);
111 return false;
112 }
113 default:
114 return true;
115 }
Bill Buzbeec6f10662010-02-09 11:16:15 -0800116 dvmCompilerFlushAllRegs(cUnit); /* Send everything to home location */
Ben Cheng5d90c202009-11-22 23:31:11 -0800117 loadValueDirectFixed(cUnit, rlSrc1, r0);
118 loadValueDirectFixed(cUnit, rlSrc2, r1);
Ben Chengbd1326d2010-04-02 15:04:53 -0700119 LOAD_FUNC_ADDR(cUnit, r2, (int)funct);
Ben Cheng5d90c202009-11-22 23:31:11 -0800120 opReg(cUnit, kOpBlx, r2);
Elliott Hughes6a555132010-02-25 15:41:42 -0800121 dvmCompilerClobberCallRegs(cUnit);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800122 rlResult = dvmCompilerGetReturn(cUnit);
Ben Cheng5d90c202009-11-22 23:31:11 -0800123 storeValue(cUnit, rlDest, rlResult);
124 return false;
125}
126
127static bool genArithOpDoublePortable(CompilationUnit *cUnit, MIR *mir,
128 RegLocation rlDest, RegLocation rlSrc1,
129 RegLocation rlSrc2)
130{
131 RegLocation rlResult;
132 void* funct;
133
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800134 switch (mir->dalvikInsn.opcode) {
Ben Cheng5d90c202009-11-22 23:31:11 -0800135 case OP_ADD_DOUBLE_2ADDR:
136 case OP_ADD_DOUBLE:
137 funct = (void*) __aeabi_dadd;
138 break;
139 case OP_SUB_DOUBLE_2ADDR:
140 case OP_SUB_DOUBLE:
141 funct = (void*) __aeabi_dsub;
142 break;
143 case OP_DIV_DOUBLE_2ADDR:
144 case OP_DIV_DOUBLE:
145 funct = (void*) __aeabi_ddiv;
146 break;
147 case OP_MUL_DOUBLE_2ADDR:
148 case OP_MUL_DOUBLE:
149 funct = (void*) __aeabi_dmul;
150 break;
151 case OP_REM_DOUBLE_2ADDR:
152 case OP_REM_DOUBLE:
153 funct = (void*) fmod;
154 break;
155 case OP_NEG_DOUBLE: {
156 genNegDouble(cUnit, rlDest, rlSrc1);
157 return false;
158 }
159 default:
160 return true;
161 }
Bill Buzbeec6f10662010-02-09 11:16:15 -0800162 dvmCompilerFlushAllRegs(cUnit); /* Send everything to home location */
Ben Chengbd1326d2010-04-02 15:04:53 -0700163 LOAD_FUNC_ADDR(cUnit, rlr, (int)funct);
Ben Cheng5d90c202009-11-22 23:31:11 -0800164 loadValueDirectWideFixed(cUnit, rlSrc1, r0, r1);
165 loadValueDirectWideFixed(cUnit, rlSrc2, r2, r3);
166 opReg(cUnit, kOpBlx, rlr);
Elliott Hughes6a555132010-02-25 15:41:42 -0800167 dvmCompilerClobberCallRegs(cUnit);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800168 rlResult = dvmCompilerGetReturnWide(cUnit);
Ben Cheng5d90c202009-11-22 23:31:11 -0800169 storeValueWide(cUnit, rlDest, rlResult);
170 return false;
171}
172
173static bool genConversionPortable(CompilationUnit *cUnit, MIR *mir)
174{
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800175 Opcode opcode = mir->dalvikInsn.opcode;
Ben Cheng5d90c202009-11-22 23:31:11 -0800176
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800177 switch (opcode) {
Ben Cheng5d90c202009-11-22 23:31:11 -0800178 case OP_INT_TO_FLOAT:
179 return genConversionCall(cUnit, mir, (void*)__aeabi_i2f, 1, 1);
180 case OP_FLOAT_TO_INT:
181 return genConversionCall(cUnit, mir, (void*)__aeabi_f2iz, 1, 1);
182 case OP_DOUBLE_TO_FLOAT:
183 return genConversionCall(cUnit, mir, (void*)__aeabi_d2f, 2, 1);
184 case OP_FLOAT_TO_DOUBLE:
185 return genConversionCall(cUnit, mir, (void*)__aeabi_f2d, 1, 2);
186 case OP_INT_TO_DOUBLE:
187 return genConversionCall(cUnit, mir, (void*)__aeabi_i2d, 1, 2);
188 case OP_DOUBLE_TO_INT:
189 return genConversionCall(cUnit, mir, (void*)__aeabi_d2iz, 2, 1);
190 case OP_FLOAT_TO_LONG:
191 return genConversionCall(cUnit, mir, (void*)dvmJitf2l, 1, 2);
192 case OP_LONG_TO_FLOAT:
193 return genConversionCall(cUnit, mir, (void*)__aeabi_l2f, 2, 1);
194 case OP_DOUBLE_TO_LONG:
195 return genConversionCall(cUnit, mir, (void*)dvmJitd2l, 2, 2);
196 case OP_LONG_TO_DOUBLE:
197 return genConversionCall(cUnit, mir, (void*)__aeabi_l2d, 2, 2);
198 default:
199 return true;
200 }
201 return false;
202}
Ben Chengba4fc8b2009-06-01 13:00:29 -0700203
Jeff Hao97319a82009-08-12 16:57:15 -0700204#if defined(WITH_SELF_VERIFICATION)
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800205static void selfVerificationBranchInsert(LIR *currentLIR, ArmOpcode opcode,
jeffhao9e45c0b2010-02-03 10:24:05 -0800206 int dest, int src1)
Jeff Hao97319a82009-08-12 16:57:15 -0700207{
jeffhao9e45c0b2010-02-03 10:24:05 -0800208 ArmLIR *insn = dvmCompilerNew(sizeof(ArmLIR), true);
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800209 insn->opcode = opcode;
jeffhao9e45c0b2010-02-03 10:24:05 -0800210 insn->operands[0] = dest;
211 insn->operands[1] = src1;
212 setupResourceMasks(insn);
213 dvmCompilerInsertLIRBefore(currentLIR, (LIR *) insn);
Jeff Hao97319a82009-08-12 16:57:15 -0700214}
215
jeffhao9e45c0b2010-02-03 10:24:05 -0800216static void selfVerificationBranchInsertPass(CompilationUnit *cUnit)
Jeff Hao97319a82009-08-12 16:57:15 -0700217{
jeffhao9e45c0b2010-02-03 10:24:05 -0800218 ArmLIR *thisLIR;
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800219 TemplateOpcode opcode = TEMPLATE_MEM_OP_DECODE;
Jeff Hao97319a82009-08-12 16:57:15 -0700220
jeffhao9e45c0b2010-02-03 10:24:05 -0800221 for (thisLIR = (ArmLIR *) cUnit->firstLIRInsn;
222 thisLIR != (ArmLIR *) cUnit->lastLIRInsn;
223 thisLIR = NEXT_LIR(thisLIR)) {
224 if (thisLIR->branchInsertSV) {
225 /* Branch to mem op decode template */
226 selfVerificationBranchInsert((LIR *) thisLIR, kThumbBlx1,
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800227 (int) gDvmJit.codeCache + templateEntryOffsets[opcode],
228 (int) gDvmJit.codeCache + templateEntryOffsets[opcode]);
jeffhao9e45c0b2010-02-03 10:24:05 -0800229 selfVerificationBranchInsert((LIR *) thisLIR, kThumbBlx2,
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800230 (int) gDvmJit.codeCache + templateEntryOffsets[opcode],
231 (int) gDvmJit.codeCache + templateEntryOffsets[opcode]);
Jeff Hao97319a82009-08-12 16:57:15 -0700232 }
233 }
Jeff Hao97319a82009-08-12 16:57:15 -0700234}
Jeff Hao97319a82009-08-12 16:57:15 -0700235#endif
236
Bill Buzbeebe6534f2010-03-12 16:01:35 -0800237/* Generate conditional branch instructions */
238static ArmLIR *genConditionalBranch(CompilationUnit *cUnit,
239 ArmConditionCode cond,
240 ArmLIR *target)
241{
242 ArmLIR *branch = opCondBranch(cUnit, cond);
243 branch->generic.target = (LIR *) target;
244 return branch;
245}
246
Ben Chengba4fc8b2009-06-01 13:00:29 -0700247/* Generate a unconditional branch to go to the interpreter */
Bill Buzbee89efc3d2009-07-28 11:22:22 -0700248static inline ArmLIR *genTrap(CompilationUnit *cUnit, int dOffset,
249 ArmLIR *pcrLabel)
Ben Chengba4fc8b2009-06-01 13:00:29 -0700250{
Bill Buzbee1465db52009-09-23 17:17:35 -0700251 ArmLIR *branch = opNone(cUnit, kOpUncondBr);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700252 return genCheckCommon(cUnit, dOffset, branch, pcrLabel);
253}
254
255/* Load a wide field from an object instance */
256static void genIGetWide(CompilationUnit *cUnit, MIR *mir, int fieldOffset)
257{
Bill Buzbeec6f10662010-02-09 11:16:15 -0800258 RegLocation rlObj = dvmCompilerGetSrc(cUnit, mir, 0);
259 RegLocation rlDest = dvmCompilerGetDestWide(cUnit, mir, 0, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -0700260 RegLocation rlResult;
261 rlObj = loadValue(cUnit, rlObj, kCoreReg);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800262 int regPtr = dvmCompilerAllocTemp(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700263
Bill Buzbee1465db52009-09-23 17:17:35 -0700264 assert(rlDest.wide);
Ben Chenge9695e52009-06-16 16:11:47 -0700265
Bill Buzbee1465db52009-09-23 17:17:35 -0700266 genNullCheck(cUnit, rlObj.sRegLow, rlObj.lowReg, mir->offset,
267 NULL);/* null object? */
268 opRegRegImm(cUnit, kOpAdd, regPtr, rlObj.lowReg, fieldOffset);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800269 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kAnyReg, true);
Ben Cheng11d8f142010-03-24 15:24:19 -0700270
271 HEAP_ACCESS_SHADOW(true);
Bill Buzbee1465db52009-09-23 17:17:35 -0700272 loadPair(cUnit, regPtr, rlResult.lowReg, rlResult.highReg);
Ben Cheng11d8f142010-03-24 15:24:19 -0700273 HEAP_ACCESS_SHADOW(false);
274
Bill Buzbeec6f10662010-02-09 11:16:15 -0800275 dvmCompilerFreeTemp(cUnit, regPtr);
Bill Buzbee1465db52009-09-23 17:17:35 -0700276 storeValueWide(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700277}
278
279/* Store a wide field to an object instance */
280static void genIPutWide(CompilationUnit *cUnit, MIR *mir, int fieldOffset)
281{
Bill Buzbeec6f10662010-02-09 11:16:15 -0800282 RegLocation rlSrc = dvmCompilerGetSrcWide(cUnit, mir, 0, 1);
283 RegLocation rlObj = dvmCompilerGetSrc(cUnit, mir, 2);
Bill Buzbee1465db52009-09-23 17:17:35 -0700284 rlObj = loadValue(cUnit, rlObj, kCoreReg);
285 int regPtr;
286 rlSrc = loadValueWide(cUnit, rlSrc, kAnyReg);
287 genNullCheck(cUnit, rlObj.sRegLow, rlObj.lowReg, mir->offset,
288 NULL);/* null object? */
Bill Buzbeec6f10662010-02-09 11:16:15 -0800289 regPtr = dvmCompilerAllocTemp(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700290 opRegRegImm(cUnit, kOpAdd, regPtr, rlObj.lowReg, fieldOffset);
Ben Cheng11d8f142010-03-24 15:24:19 -0700291
292 HEAP_ACCESS_SHADOW(true);
Bill Buzbee1465db52009-09-23 17:17:35 -0700293 storePair(cUnit, regPtr, rlSrc.lowReg, rlSrc.highReg);
Ben Cheng11d8f142010-03-24 15:24:19 -0700294 HEAP_ACCESS_SHADOW(false);
295
Bill Buzbeec6f10662010-02-09 11:16:15 -0800296 dvmCompilerFreeTemp(cUnit, regPtr);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700297}
298
299/*
300 * Load a field from an object instance
301 *
Ben Chengba4fc8b2009-06-01 13:00:29 -0700302 */
Bill Buzbee270c1d62009-08-13 16:58:07 -0700303static void genIGet(CompilationUnit *cUnit, MIR *mir, OpSize size,
buzbeeecf8f6e2010-07-20 14:53:42 -0700304 int fieldOffset, bool isVolatile)
Ben Chengba4fc8b2009-06-01 13:00:29 -0700305{
Bill Buzbee1465db52009-09-23 17:17:35 -0700306 RegLocation rlResult;
Bill Buzbee749e8162010-07-07 06:55:56 -0700307 RegisterClass regClass = dvmCompilerRegClassBySize(size);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800308 RegLocation rlObj = dvmCompilerGetSrc(cUnit, mir, 0);
309 RegLocation rlDest = dvmCompilerGetDest(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -0700310 rlObj = loadValue(cUnit, rlObj, kCoreReg);
Bill Buzbee749e8162010-07-07 06:55:56 -0700311 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, regClass, true);
Bill Buzbee1465db52009-09-23 17:17:35 -0700312 genNullCheck(cUnit, rlObj.sRegLow, rlObj.lowReg, mir->offset,
313 NULL);/* null object? */
Ben Cheng11d8f142010-03-24 15:24:19 -0700314
315 HEAP_ACCESS_SHADOW(true);
Ben Cheng5d90c202009-11-22 23:31:11 -0800316 loadBaseDisp(cUnit, mir, rlObj.lowReg, fieldOffset, rlResult.lowReg,
317 size, rlObj.sRegLow);
Ben Cheng11d8f142010-03-24 15:24:19 -0700318 HEAP_ACCESS_SHADOW(false);
buzbeeecf8f6e2010-07-20 14:53:42 -0700319 if (isVolatile) {
buzbee2ce33c92010-11-01 15:53:27 -0700320 dvmCompilerGenMemBarrier(cUnit, kSY);
buzbeeecf8f6e2010-07-20 14:53:42 -0700321 }
Ben Cheng11d8f142010-03-24 15:24:19 -0700322
Bill Buzbee1465db52009-09-23 17:17:35 -0700323 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700324}
325
326/*
327 * Store a field to an object instance
328 *
Ben Chengba4fc8b2009-06-01 13:00:29 -0700329 */
Bill Buzbee270c1d62009-08-13 16:58:07 -0700330static void genIPut(CompilationUnit *cUnit, MIR *mir, OpSize size,
buzbeeecf8f6e2010-07-20 14:53:42 -0700331 int fieldOffset, bool isObject, bool isVolatile)
Ben Chengba4fc8b2009-06-01 13:00:29 -0700332{
Bill Buzbee749e8162010-07-07 06:55:56 -0700333 RegisterClass regClass = dvmCompilerRegClassBySize(size);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800334 RegLocation rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
335 RegLocation rlObj = dvmCompilerGetSrc(cUnit, mir, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -0700336 rlObj = loadValue(cUnit, rlObj, kCoreReg);
Bill Buzbee749e8162010-07-07 06:55:56 -0700337 rlSrc = loadValue(cUnit, rlSrc, regClass);
Bill Buzbee1465db52009-09-23 17:17:35 -0700338 genNullCheck(cUnit, rlObj.sRegLow, rlObj.lowReg, mir->offset,
339 NULL);/* null object? */
Ben Cheng11d8f142010-03-24 15:24:19 -0700340
buzbeeecf8f6e2010-07-20 14:53:42 -0700341 if (isVolatile) {
buzbee2ce33c92010-11-01 15:53:27 -0700342 dvmCompilerGenMemBarrier(cUnit, kSY);
buzbeeecf8f6e2010-07-20 14:53:42 -0700343 }
Ben Cheng11d8f142010-03-24 15:24:19 -0700344 HEAP_ACCESS_SHADOW(true);
Bill Buzbee1465db52009-09-23 17:17:35 -0700345 storeBaseDisp(cUnit, rlObj.lowReg, fieldOffset, rlSrc.lowReg, size);
Ben Cheng11d8f142010-03-24 15:24:19 -0700346 HEAP_ACCESS_SHADOW(false);
buzbee919eb062010-07-12 12:59:22 -0700347 if (isObject) {
348 /* NOTE: marking card based on object head */
349 markCard(cUnit, rlSrc.lowReg, rlObj.lowReg);
350 }
Ben Chengba4fc8b2009-06-01 13:00:29 -0700351}
352
353
Ben Chengba4fc8b2009-06-01 13:00:29 -0700354/*
355 * Generate array load
Ben Chengba4fc8b2009-06-01 13:00:29 -0700356 */
Bill Buzbee270c1d62009-08-13 16:58:07 -0700357static void genArrayGet(CompilationUnit *cUnit, MIR *mir, OpSize size,
Bill Buzbee1465db52009-09-23 17:17:35 -0700358 RegLocation rlArray, RegLocation rlIndex,
359 RegLocation rlDest, int scale)
Ben Chengba4fc8b2009-06-01 13:00:29 -0700360{
Bill Buzbee749e8162010-07-07 06:55:56 -0700361 RegisterClass regClass = dvmCompilerRegClassBySize(size);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700362 int lenOffset = offsetof(ArrayObject, length);
363 int dataOffset = offsetof(ArrayObject, contents);
Bill Buzbee1465db52009-09-23 17:17:35 -0700364 RegLocation rlResult;
365 rlArray = loadValue(cUnit, rlArray, kCoreReg);
366 rlIndex = loadValue(cUnit, rlIndex, kCoreReg);
367 int regPtr;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700368
369 /* null object? */
Ben Cheng4238ec22009-08-24 16:32:22 -0700370 ArmLIR * pcrLabel = NULL;
371
372 if (!(mir->OptimizationFlags & MIR_IGNORE_NULL_CHECK)) {
Bill Buzbee1465db52009-09-23 17:17:35 -0700373 pcrLabel = genNullCheck(cUnit, rlArray.sRegLow,
374 rlArray.lowReg, mir->offset, NULL);
Ben Cheng4238ec22009-08-24 16:32:22 -0700375 }
376
Bill Buzbeec6f10662010-02-09 11:16:15 -0800377 regPtr = dvmCompilerAllocTemp(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700378
Ben Cheng4238ec22009-08-24 16:32:22 -0700379 if (!(mir->OptimizationFlags & MIR_IGNORE_RANGE_CHECK)) {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800380 int regLen = dvmCompilerAllocTemp(cUnit);
Ben Cheng4238ec22009-08-24 16:32:22 -0700381 /* Get len */
Bill Buzbee1465db52009-09-23 17:17:35 -0700382 loadWordDisp(cUnit, rlArray.lowReg, lenOffset, regLen);
383 /* regPtr -> array data */
384 opRegRegImm(cUnit, kOpAdd, regPtr, rlArray.lowReg, dataOffset);
385 genBoundsCheck(cUnit, rlIndex.lowReg, regLen, mir->offset,
386 pcrLabel);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800387 dvmCompilerFreeTemp(cUnit, regLen);
Ben Cheng4238ec22009-08-24 16:32:22 -0700388 } else {
Bill Buzbee1465db52009-09-23 17:17:35 -0700389 /* regPtr -> array data */
390 opRegRegImm(cUnit, kOpAdd, regPtr, rlArray.lowReg, dataOffset);
Ben Cheng4238ec22009-08-24 16:32:22 -0700391 }
Bill Buzbee1465db52009-09-23 17:17:35 -0700392 if ((size == kLong) || (size == kDouble)) {
393 if (scale) {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800394 int rNewIndex = dvmCompilerAllocTemp(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700395 opRegRegImm(cUnit, kOpLsl, rNewIndex, rlIndex.lowReg, scale);
396 opRegReg(cUnit, kOpAdd, regPtr, rNewIndex);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800397 dvmCompilerFreeTemp(cUnit, rNewIndex);
Bill Buzbee1465db52009-09-23 17:17:35 -0700398 } else {
399 opRegReg(cUnit, kOpAdd, regPtr, rlIndex.lowReg);
400 }
Bill Buzbee749e8162010-07-07 06:55:56 -0700401 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, regClass, true);
Ben Cheng11d8f142010-03-24 15:24:19 -0700402
403 HEAP_ACCESS_SHADOW(true);
Bill Buzbee1465db52009-09-23 17:17:35 -0700404 loadPair(cUnit, regPtr, rlResult.lowReg, rlResult.highReg);
Ben Cheng11d8f142010-03-24 15:24:19 -0700405 HEAP_ACCESS_SHADOW(false);
406
Bill Buzbeec6f10662010-02-09 11:16:15 -0800407 dvmCompilerFreeTemp(cUnit, regPtr);
Bill Buzbee1465db52009-09-23 17:17:35 -0700408 storeValueWide(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700409 } else {
Bill Buzbee749e8162010-07-07 06:55:56 -0700410 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, regClass, true);
Ben Cheng11d8f142010-03-24 15:24:19 -0700411
412 HEAP_ACCESS_SHADOW(true);
Bill Buzbee1465db52009-09-23 17:17:35 -0700413 loadBaseIndexed(cUnit, regPtr, rlIndex.lowReg, rlResult.lowReg,
414 scale, size);
Ben Cheng11d8f142010-03-24 15:24:19 -0700415 HEAP_ACCESS_SHADOW(false);
416
Bill Buzbeec6f10662010-02-09 11:16:15 -0800417 dvmCompilerFreeTemp(cUnit, regPtr);
Bill Buzbee1465db52009-09-23 17:17:35 -0700418 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700419 }
420}
421
Ben Chengba4fc8b2009-06-01 13:00:29 -0700422/*
423 * Generate array store
424 *
Ben Chengba4fc8b2009-06-01 13:00:29 -0700425 */
Bill Buzbee270c1d62009-08-13 16:58:07 -0700426static void genArrayPut(CompilationUnit *cUnit, MIR *mir, OpSize size,
Bill Buzbee1465db52009-09-23 17:17:35 -0700427 RegLocation rlArray, RegLocation rlIndex,
428 RegLocation rlSrc, int scale)
Ben Chengba4fc8b2009-06-01 13:00:29 -0700429{
Bill Buzbee749e8162010-07-07 06:55:56 -0700430 RegisterClass regClass = dvmCompilerRegClassBySize(size);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700431 int lenOffset = offsetof(ArrayObject, length);
432 int dataOffset = offsetof(ArrayObject, contents);
433
Bill Buzbee1465db52009-09-23 17:17:35 -0700434 int regPtr;
435 rlArray = loadValue(cUnit, rlArray, kCoreReg);
436 rlIndex = loadValue(cUnit, rlIndex, kCoreReg);
Ben Chenge9695e52009-06-16 16:11:47 -0700437
Bill Buzbeec6f10662010-02-09 11:16:15 -0800438 if (dvmCompilerIsTemp(cUnit, rlArray.lowReg)) {
439 dvmCompilerClobber(cUnit, rlArray.lowReg);
Bill Buzbee1465db52009-09-23 17:17:35 -0700440 regPtr = rlArray.lowReg;
441 } else {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800442 regPtr = dvmCompilerAllocTemp(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700443 genRegCopy(cUnit, regPtr, rlArray.lowReg);
444 }
Ben Chenge9695e52009-06-16 16:11:47 -0700445
Ben Cheng1efc9c52009-06-08 18:25:27 -0700446 /* null object? */
Ben Cheng4238ec22009-08-24 16:32:22 -0700447 ArmLIR * pcrLabel = NULL;
448
449 if (!(mir->OptimizationFlags & MIR_IGNORE_NULL_CHECK)) {
Bill Buzbee1465db52009-09-23 17:17:35 -0700450 pcrLabel = genNullCheck(cUnit, rlArray.sRegLow, rlArray.lowReg,
451 mir->offset, NULL);
Ben Cheng4238ec22009-08-24 16:32:22 -0700452 }
453
454 if (!(mir->OptimizationFlags & MIR_IGNORE_RANGE_CHECK)) {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800455 int regLen = dvmCompilerAllocTemp(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700456 //NOTE: max live temps(4) here.
Ben Cheng4238ec22009-08-24 16:32:22 -0700457 /* Get len */
Bill Buzbee1465db52009-09-23 17:17:35 -0700458 loadWordDisp(cUnit, rlArray.lowReg, lenOffset, regLen);
459 /* regPtr -> array data */
460 opRegImm(cUnit, kOpAdd, regPtr, dataOffset);
461 genBoundsCheck(cUnit, rlIndex.lowReg, regLen, mir->offset,
462 pcrLabel);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800463 dvmCompilerFreeTemp(cUnit, regLen);
Ben Cheng4238ec22009-08-24 16:32:22 -0700464 } else {
Bill Buzbee1465db52009-09-23 17:17:35 -0700465 /* regPtr -> array data */
466 opRegImm(cUnit, kOpAdd, regPtr, dataOffset);
Ben Cheng4238ec22009-08-24 16:32:22 -0700467 }
Bill Buzbee1465db52009-09-23 17:17:35 -0700468 /* at this point, regPtr points to array, 2 live temps */
Bill Buzbee1465db52009-09-23 17:17:35 -0700469 if ((size == kLong) || (size == kDouble)) {
470 //TODO: need specific wide routine that can handle fp regs
471 if (scale) {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800472 int rNewIndex = dvmCompilerAllocTemp(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700473 opRegRegImm(cUnit, kOpLsl, rNewIndex, rlIndex.lowReg, scale);
474 opRegReg(cUnit, kOpAdd, regPtr, rNewIndex);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800475 dvmCompilerFreeTemp(cUnit, rNewIndex);
Bill Buzbee1465db52009-09-23 17:17:35 -0700476 } else {
477 opRegReg(cUnit, kOpAdd, regPtr, rlIndex.lowReg);
478 }
Bill Buzbee749e8162010-07-07 06:55:56 -0700479 rlSrc = loadValueWide(cUnit, rlSrc, regClass);
Ben Cheng11d8f142010-03-24 15:24:19 -0700480
481 HEAP_ACCESS_SHADOW(true);
Bill Buzbee1465db52009-09-23 17:17:35 -0700482 storePair(cUnit, regPtr, rlSrc.lowReg, rlSrc.highReg);
Ben Cheng11d8f142010-03-24 15:24:19 -0700483 HEAP_ACCESS_SHADOW(false);
484
Bill Buzbeec6f10662010-02-09 11:16:15 -0800485 dvmCompilerFreeTemp(cUnit, regPtr);
Bill Buzbee270c1d62009-08-13 16:58:07 -0700486 } else {
Bill Buzbee749e8162010-07-07 06:55:56 -0700487 rlSrc = loadValue(cUnit, rlSrc, regClass);
Ben Cheng11d8f142010-03-24 15:24:19 -0700488
489 HEAP_ACCESS_SHADOW(true);
Bill Buzbee1465db52009-09-23 17:17:35 -0700490 storeBaseIndexed(cUnit, regPtr, rlIndex.lowReg, rlSrc.lowReg,
491 scale, size);
Ben Cheng11d8f142010-03-24 15:24:19 -0700492 HEAP_ACCESS_SHADOW(false);
jeffhao9e45c0b2010-02-03 10:24:05 -0800493 }
Ben Chengba4fc8b2009-06-01 13:00:29 -0700494}
495
Bill Buzbeebe6534f2010-03-12 16:01:35 -0800496/*
497 * Generate array object store
498 * Must use explicit register allocation here because of
499 * call-out to dvmCanPutArrayElement
500 */
501static void genArrayObjectPut(CompilationUnit *cUnit, MIR *mir,
502 RegLocation rlArray, RegLocation rlIndex,
503 RegLocation rlSrc, int scale)
504{
505 int lenOffset = offsetof(ArrayObject, length);
506 int dataOffset = offsetof(ArrayObject, contents);
507
508 dvmCompilerFlushAllRegs(cUnit);
509
510 int regLen = r0;
511 int regPtr = r4PC; /* Preserved across call */
512 int regArray = r1;
513 int regIndex = r7; /* Preserved across call */
514
515 loadValueDirectFixed(cUnit, rlArray, regArray);
516 loadValueDirectFixed(cUnit, rlIndex, regIndex);
517
518 /* null object? */
519 ArmLIR * pcrLabel = NULL;
520
521 if (!(mir->OptimizationFlags & MIR_IGNORE_NULL_CHECK)) {
522 pcrLabel = genNullCheck(cUnit, rlArray.sRegLow, regArray,
523 mir->offset, NULL);
524 }
525
526 if (!(mir->OptimizationFlags & MIR_IGNORE_RANGE_CHECK)) {
527 /* Get len */
528 loadWordDisp(cUnit, regArray, lenOffset, regLen);
529 /* regPtr -> array data */
530 opRegRegImm(cUnit, kOpAdd, regPtr, regArray, dataOffset);
531 genBoundsCheck(cUnit, regIndex, regLen, mir->offset,
532 pcrLabel);
533 } else {
534 /* regPtr -> array data */
535 opRegRegImm(cUnit, kOpAdd, regPtr, regArray, dataOffset);
536 }
537
538 /* Get object to store */
539 loadValueDirectFixed(cUnit, rlSrc, r0);
Ben Chengbd1326d2010-04-02 15:04:53 -0700540 LOAD_FUNC_ADDR(cUnit, r2, (int)dvmCanPutArrayElement);
Bill Buzbeebe6534f2010-03-12 16:01:35 -0800541
542 /* Are we storing null? If so, avoid check */
buzbee8f8109a2010-08-31 10:16:35 -0700543 ArmLIR *branchOver = genCmpImmBranch(cUnit, kArmCondEq, r0, 0);
Bill Buzbeebe6534f2010-03-12 16:01:35 -0800544
545 /* Make sure the types are compatible */
546 loadWordDisp(cUnit, regArray, offsetof(Object, clazz), r1);
547 loadWordDisp(cUnit, r0, offsetof(Object, clazz), r0);
548 opReg(cUnit, kOpBlx, r2);
549 dvmCompilerClobberCallRegs(cUnit);
Bill Buzbee900a3af2010-03-16 12:41:43 -0700550
551 /*
552 * Using fixed registers here, and counting on r4 and r7 being
553 * preserved across the above call. Tell the register allocation
554 * utilities about the regs we are using directly
555 */
556 dvmCompilerLockTemp(cUnit, regPtr); // r4PC
557 dvmCompilerLockTemp(cUnit, regIndex); // r7
558 dvmCompilerLockTemp(cUnit, r0);
buzbee919eb062010-07-12 12:59:22 -0700559 dvmCompilerLockTemp(cUnit, r1);
Bill Buzbee900a3af2010-03-16 12:41:43 -0700560
Bill Buzbeebe6534f2010-03-12 16:01:35 -0800561 /* Bad? - roll back and re-execute if so */
562 genRegImmCheck(cUnit, kArmCondEq, r0, 0, mir->offset, pcrLabel);
563
buzbee919eb062010-07-12 12:59:22 -0700564 /* Resume here - must reload element & array, regPtr & index preserved */
Bill Buzbeebe6534f2010-03-12 16:01:35 -0800565 loadValueDirectFixed(cUnit, rlSrc, r0);
buzbee919eb062010-07-12 12:59:22 -0700566 loadValueDirectFixed(cUnit, rlArray, r1);
Bill Buzbeebe6534f2010-03-12 16:01:35 -0800567
568 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
569 target->defMask = ENCODE_ALL;
570 branchOver->generic.target = (LIR *) target;
571
Ben Cheng11d8f142010-03-24 15:24:19 -0700572 HEAP_ACCESS_SHADOW(true);
Bill Buzbeebe6534f2010-03-12 16:01:35 -0800573 storeBaseIndexed(cUnit, regPtr, regIndex, r0,
574 scale, kWord);
Ben Cheng11d8f142010-03-24 15:24:19 -0700575 HEAP_ACCESS_SHADOW(false);
buzbee919eb062010-07-12 12:59:22 -0700576
buzbeebaf196a2010-08-04 10:13:15 -0700577 dvmCompilerFreeTemp(cUnit, regPtr);
578 dvmCompilerFreeTemp(cUnit, regIndex);
579
buzbee919eb062010-07-12 12:59:22 -0700580 /* NOTE: marking card here based on object head */
581 markCard(cUnit, r0, r1);
Bill Buzbeebe6534f2010-03-12 16:01:35 -0800582}
583
Ben Cheng5d90c202009-11-22 23:31:11 -0800584static bool genShiftOpLong(CompilationUnit *cUnit, MIR *mir,
585 RegLocation rlDest, RegLocation rlSrc1,
586 RegLocation rlShift)
Ben Chengba4fc8b2009-06-01 13:00:29 -0700587{
Ben Chenge9695e52009-06-16 16:11:47 -0700588 /*
589 * Don't mess with the regsiters here as there is a particular calling
590 * convention to the out-of-line handler.
591 */
Bill Buzbee1465db52009-09-23 17:17:35 -0700592 RegLocation rlResult;
593
594 loadValueDirectWideFixed(cUnit, rlSrc1, r0, r1);
595 loadValueDirect(cUnit, rlShift, r2);
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800596 switch( mir->dalvikInsn.opcode) {
Ben Chenge9695e52009-06-16 16:11:47 -0700597 case OP_SHL_LONG:
598 case OP_SHL_LONG_2ADDR:
599 genDispatchToHandler(cUnit, TEMPLATE_SHL_LONG);
600 break;
601 case OP_SHR_LONG:
602 case OP_SHR_LONG_2ADDR:
603 genDispatchToHandler(cUnit, TEMPLATE_SHR_LONG);
604 break;
605 case OP_USHR_LONG:
606 case OP_USHR_LONG_2ADDR:
607 genDispatchToHandler(cUnit, TEMPLATE_USHR_LONG);
608 break;
609 default:
610 return true;
611 }
Bill Buzbeec6f10662010-02-09 11:16:15 -0800612 rlResult = dvmCompilerGetReturnWide(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700613 storeValueWide(cUnit, rlDest, rlResult);
Ben Chenge9695e52009-06-16 16:11:47 -0700614 return false;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700615}
Ben Chenge9695e52009-06-16 16:11:47 -0700616
Ben Cheng5d90c202009-11-22 23:31:11 -0800617static bool genArithOpLong(CompilationUnit *cUnit, MIR *mir,
618 RegLocation rlDest, RegLocation rlSrc1,
619 RegLocation rlSrc2)
Ben Chengba4fc8b2009-06-01 13:00:29 -0700620{
Bill Buzbee1465db52009-09-23 17:17:35 -0700621 RegLocation rlResult;
622 OpKind firstOp = kOpBkpt;
623 OpKind secondOp = kOpBkpt;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700624 bool callOut = false;
625 void *callTgt;
626 int retReg = r0;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700627
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800628 switch (mir->dalvikInsn.opcode) {
Ben Chengba4fc8b2009-06-01 13:00:29 -0700629 case OP_NOT_LONG:
Bill Buzbee1465db52009-09-23 17:17:35 -0700630 rlSrc2 = loadValueWide(cUnit, rlSrc2, kCoreReg);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800631 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee1465db52009-09-23 17:17:35 -0700632 opRegReg(cUnit, kOpMvn, rlResult.lowReg, rlSrc2.lowReg);
633 opRegReg(cUnit, kOpMvn, rlResult.highReg, rlSrc2.highReg);
634 storeValueWide(cUnit, rlDest, rlResult);
635 return false;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700636 break;
637 case OP_ADD_LONG:
638 case OP_ADD_LONG_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700639 firstOp = kOpAdd;
640 secondOp = kOpAdc;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700641 break;
642 case OP_SUB_LONG:
643 case OP_SUB_LONG_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700644 firstOp = kOpSub;
645 secondOp = kOpSbc;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700646 break;
647 case OP_MUL_LONG:
648 case OP_MUL_LONG_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700649 genMulLong(cUnit, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700650 return false;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700651 case OP_DIV_LONG:
652 case OP_DIV_LONG_2ADDR:
653 callOut = true;
654 retReg = r0;
655 callTgt = (void*)__aeabi_ldivmod;
656 break;
657 /* NOTE - result is in r2/r3 instead of r0/r1 */
658 case OP_REM_LONG:
659 case OP_REM_LONG_2ADDR:
660 callOut = true;
661 callTgt = (void*)__aeabi_ldivmod;
662 retReg = r2;
663 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700664 case OP_AND_LONG_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700665 case OP_AND_LONG:
666 firstOp = kOpAnd;
667 secondOp = kOpAnd;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700668 break;
669 case OP_OR_LONG:
670 case OP_OR_LONG_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700671 firstOp = kOpOr;
672 secondOp = kOpOr;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700673 break;
674 case OP_XOR_LONG:
675 case OP_XOR_LONG_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700676 firstOp = kOpXor;
677 secondOp = kOpXor;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700678 break;
Ben Chenge9695e52009-06-16 16:11:47 -0700679 case OP_NEG_LONG: {
Bill Buzbee51ecf602010-01-14 14:27:52 -0800680 //TUNING: can improve this using Thumb2 code
Bill Buzbeec6f10662010-02-09 11:16:15 -0800681 int tReg = dvmCompilerAllocTemp(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700682 rlSrc2 = loadValueWide(cUnit, rlSrc2, kCoreReg);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800683 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Ben Chengbd1326d2010-04-02 15:04:53 -0700684 loadConstantNoClobber(cUnit, tReg, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -0700685 opRegRegReg(cUnit, kOpSub, rlResult.lowReg,
Bill Buzbee51ecf602010-01-14 14:27:52 -0800686 tReg, rlSrc2.lowReg);
687 opRegReg(cUnit, kOpSbc, tReg, rlSrc2.highReg);
688 genRegCopy(cUnit, rlResult.highReg, tReg);
Bill Buzbee1465db52009-09-23 17:17:35 -0700689 storeValueWide(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700690 return false;
Ben Chenge9695e52009-06-16 16:11:47 -0700691 }
Ben Chengba4fc8b2009-06-01 13:00:29 -0700692 default:
693 LOGE("Invalid long arith op");
Bill Buzbeefc519dc2010-03-06 23:30:57 -0800694 dvmCompilerAbort(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700695 }
696 if (!callOut) {
Bill Buzbee80cef862010-03-25 10:38:34 -0700697 genLong3Addr(cUnit, mir, firstOp, secondOp, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700698 } else {
Bill Buzbee1465db52009-09-23 17:17:35 -0700699 // Adjust return regs in to handle case of rem returning r2/r3
Bill Buzbeec6f10662010-02-09 11:16:15 -0800700 dvmCompilerFlushAllRegs(cUnit); /* Send everything to home location */
Bill Buzbee1465db52009-09-23 17:17:35 -0700701 loadValueDirectWideFixed(cUnit, rlSrc1, r0, r1);
Ben Chengbd1326d2010-04-02 15:04:53 -0700702 LOAD_FUNC_ADDR(cUnit, rlr, (int) callTgt);
Bill Buzbee1465db52009-09-23 17:17:35 -0700703 loadValueDirectWideFixed(cUnit, rlSrc2, r2, r3);
704 opReg(cUnit, kOpBlx, rlr);
Elliott Hughes6a555132010-02-25 15:41:42 -0800705 dvmCompilerClobberCallRegs(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700706 if (retReg == r0)
Bill Buzbeec6f10662010-02-09 11:16:15 -0800707 rlResult = dvmCompilerGetReturnWide(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700708 else
Bill Buzbeec6f10662010-02-09 11:16:15 -0800709 rlResult = dvmCompilerGetReturnWideAlt(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700710 storeValueWide(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700711 }
712 return false;
713}
714
Ben Cheng5d90c202009-11-22 23:31:11 -0800715static bool genArithOpInt(CompilationUnit *cUnit, MIR *mir,
716 RegLocation rlDest, RegLocation rlSrc1,
717 RegLocation rlSrc2)
Ben Chengba4fc8b2009-06-01 13:00:29 -0700718{
Bill Buzbee1465db52009-09-23 17:17:35 -0700719 OpKind op = kOpBkpt;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700720 bool callOut = false;
721 bool checkZero = false;
Bill Buzbee1465db52009-09-23 17:17:35 -0700722 bool unary = false;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700723 int retReg = r0;
724 void *callTgt;
Bill Buzbee1465db52009-09-23 17:17:35 -0700725 RegLocation rlResult;
Bill Buzbee0e605272009-12-01 14:28:05 -0800726 bool shiftOp = false;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700727
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800728 switch (mir->dalvikInsn.opcode) {
Ben Chengba4fc8b2009-06-01 13:00:29 -0700729 case OP_NEG_INT:
Bill Buzbee1465db52009-09-23 17:17:35 -0700730 op = kOpNeg;
731 unary = true;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700732 break;
733 case OP_NOT_INT:
Bill Buzbee1465db52009-09-23 17:17:35 -0700734 op = kOpMvn;
735 unary = true;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700736 break;
737 case OP_ADD_INT:
738 case OP_ADD_INT_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700739 op = kOpAdd;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700740 break;
741 case OP_SUB_INT:
742 case OP_SUB_INT_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700743 op = kOpSub;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700744 break;
745 case OP_MUL_INT:
746 case OP_MUL_INT_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700747 op = kOpMul;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700748 break;
749 case OP_DIV_INT:
750 case OP_DIV_INT_2ADDR:
751 callOut = true;
752 checkZero = true;
753 callTgt = __aeabi_idiv;
754 retReg = r0;
755 break;
756 /* NOTE: returns in r1 */
757 case OP_REM_INT:
758 case OP_REM_INT_2ADDR:
759 callOut = true;
760 checkZero = true;
761 callTgt = __aeabi_idivmod;
762 retReg = r1;
763 break;
764 case OP_AND_INT:
765 case OP_AND_INT_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700766 op = kOpAnd;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700767 break;
768 case OP_OR_INT:
769 case OP_OR_INT_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700770 op = kOpOr;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700771 break;
772 case OP_XOR_INT:
773 case OP_XOR_INT_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700774 op = kOpXor;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700775 break;
776 case OP_SHL_INT:
777 case OP_SHL_INT_2ADDR:
Bill Buzbee0e605272009-12-01 14:28:05 -0800778 shiftOp = true;
Bill Buzbee1465db52009-09-23 17:17:35 -0700779 op = kOpLsl;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700780 break;
781 case OP_SHR_INT:
782 case OP_SHR_INT_2ADDR:
Bill Buzbee0e605272009-12-01 14:28:05 -0800783 shiftOp = true;
Bill Buzbee1465db52009-09-23 17:17:35 -0700784 op = kOpAsr;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700785 break;
786 case OP_USHR_INT:
787 case OP_USHR_INT_2ADDR:
Bill Buzbee0e605272009-12-01 14:28:05 -0800788 shiftOp = true;
Bill Buzbee1465db52009-09-23 17:17:35 -0700789 op = kOpLsr;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700790 break;
791 default:
792 LOGE("Invalid word arith op: 0x%x(%d)",
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800793 mir->dalvikInsn.opcode, mir->dalvikInsn.opcode);
Bill Buzbeefc519dc2010-03-06 23:30:57 -0800794 dvmCompilerAbort(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700795 }
796 if (!callOut) {
Bill Buzbee1465db52009-09-23 17:17:35 -0700797 rlSrc1 = loadValue(cUnit, rlSrc1, kCoreReg);
798 if (unary) {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800799 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee1465db52009-09-23 17:17:35 -0700800 opRegReg(cUnit, op, rlResult.lowReg,
801 rlSrc1.lowReg);
Ben Chenge9695e52009-06-16 16:11:47 -0700802 } else {
Bill Buzbee1465db52009-09-23 17:17:35 -0700803 rlSrc2 = loadValue(cUnit, rlSrc2, kCoreReg);
Bill Buzbee0e605272009-12-01 14:28:05 -0800804 if (shiftOp) {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800805 int tReg = dvmCompilerAllocTemp(cUnit);
Bill Buzbee0e605272009-12-01 14:28:05 -0800806 opRegRegImm(cUnit, kOpAnd, tReg, rlSrc2.lowReg, 31);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800807 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee0e605272009-12-01 14:28:05 -0800808 opRegRegReg(cUnit, op, rlResult.lowReg,
809 rlSrc1.lowReg, tReg);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800810 dvmCompilerFreeTemp(cUnit, tReg);
Bill Buzbee0e605272009-12-01 14:28:05 -0800811 } else {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800812 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee0e605272009-12-01 14:28:05 -0800813 opRegRegReg(cUnit, op, rlResult.lowReg,
814 rlSrc1.lowReg, rlSrc2.lowReg);
815 }
Ben Chenge9695e52009-06-16 16:11:47 -0700816 }
Bill Buzbee1465db52009-09-23 17:17:35 -0700817 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700818 } else {
Bill Buzbee1465db52009-09-23 17:17:35 -0700819 RegLocation rlResult;
Bill Buzbeec6f10662010-02-09 11:16:15 -0800820 dvmCompilerFlushAllRegs(cUnit); /* Send everything to home location */
Bill Buzbee1465db52009-09-23 17:17:35 -0700821 loadValueDirectFixed(cUnit, rlSrc2, r1);
Ben Chengbd1326d2010-04-02 15:04:53 -0700822 LOAD_FUNC_ADDR(cUnit, r2, (int) callTgt);
Bill Buzbee1465db52009-09-23 17:17:35 -0700823 loadValueDirectFixed(cUnit, rlSrc1, r0);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700824 if (checkZero) {
Bill Buzbee1465db52009-09-23 17:17:35 -0700825 genNullCheck(cUnit, rlSrc2.sRegLow, r1, mir->offset, NULL);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700826 }
Bill Buzbee1465db52009-09-23 17:17:35 -0700827 opReg(cUnit, kOpBlx, r2);
Elliott Hughes6a555132010-02-25 15:41:42 -0800828 dvmCompilerClobberCallRegs(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700829 if (retReg == r0)
Bill Buzbeec6f10662010-02-09 11:16:15 -0800830 rlResult = dvmCompilerGetReturn(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700831 else
Bill Buzbeec6f10662010-02-09 11:16:15 -0800832 rlResult = dvmCompilerGetReturnAlt(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700833 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700834 }
835 return false;
836}
837
Ben Cheng5d90c202009-11-22 23:31:11 -0800838static bool genArithOp(CompilationUnit *cUnit, MIR *mir)
Ben Chengba4fc8b2009-06-01 13:00:29 -0700839{
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800840 Opcode opcode = mir->dalvikInsn.opcode;
Bill Buzbee1465db52009-09-23 17:17:35 -0700841 RegLocation rlDest;
842 RegLocation rlSrc1;
843 RegLocation rlSrc2;
844 /* Deduce sizes of operands */
845 if (mir->ssaRep->numUses == 2) {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800846 rlSrc1 = dvmCompilerGetSrc(cUnit, mir, 0);
847 rlSrc2 = dvmCompilerGetSrc(cUnit, mir, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -0700848 } else if (mir->ssaRep->numUses == 3) {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800849 rlSrc1 = dvmCompilerGetSrcWide(cUnit, mir, 0, 1);
850 rlSrc2 = dvmCompilerGetSrc(cUnit, mir, 2);
Bill Buzbee1465db52009-09-23 17:17:35 -0700851 } else {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800852 rlSrc1 = dvmCompilerGetSrcWide(cUnit, mir, 0, 1);
853 rlSrc2 = dvmCompilerGetSrcWide(cUnit, mir, 2, 3);
Bill Buzbee1465db52009-09-23 17:17:35 -0700854 assert(mir->ssaRep->numUses == 4);
855 }
856 if (mir->ssaRep->numDefs == 1) {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800857 rlDest = dvmCompilerGetDest(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -0700858 } else {
859 assert(mir->ssaRep->numDefs == 2);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800860 rlDest = dvmCompilerGetDestWide(cUnit, mir, 0, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -0700861 }
Ben Chengba4fc8b2009-06-01 13:00:29 -0700862
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800863 if ((opcode >= OP_ADD_LONG_2ADDR) && (opcode <= OP_XOR_LONG_2ADDR)) {
Ben Cheng5d90c202009-11-22 23:31:11 -0800864 return genArithOpLong(cUnit,mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700865 }
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800866 if ((opcode >= OP_ADD_LONG) && (opcode <= OP_XOR_LONG)) {
Ben Cheng5d90c202009-11-22 23:31:11 -0800867 return genArithOpLong(cUnit,mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700868 }
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800869 if ((opcode >= OP_SHL_LONG_2ADDR) && (opcode <= OP_USHR_LONG_2ADDR)) {
Ben Cheng5d90c202009-11-22 23:31:11 -0800870 return genShiftOpLong(cUnit,mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700871 }
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800872 if ((opcode >= OP_SHL_LONG) && (opcode <= OP_USHR_LONG)) {
Ben Cheng5d90c202009-11-22 23:31:11 -0800873 return genShiftOpLong(cUnit,mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700874 }
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800875 if ((opcode >= OP_ADD_INT_2ADDR) && (opcode <= OP_USHR_INT_2ADDR)) {
Ben Cheng5d90c202009-11-22 23:31:11 -0800876 return genArithOpInt(cUnit,mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700877 }
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800878 if ((opcode >= OP_ADD_INT) && (opcode <= OP_USHR_INT)) {
Ben Cheng5d90c202009-11-22 23:31:11 -0800879 return genArithOpInt(cUnit,mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700880 }
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800881 if ((opcode >= OP_ADD_FLOAT_2ADDR) && (opcode <= OP_REM_FLOAT_2ADDR)) {
Ben Cheng5d90c202009-11-22 23:31:11 -0800882 return genArithOpFloat(cUnit,mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700883 }
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800884 if ((opcode >= OP_ADD_FLOAT) && (opcode <= OP_REM_FLOAT)) {
Ben Cheng5d90c202009-11-22 23:31:11 -0800885 return genArithOpFloat(cUnit, mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700886 }
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800887 if ((opcode >= OP_ADD_DOUBLE_2ADDR) && (opcode <= OP_REM_DOUBLE_2ADDR)) {
Ben Cheng5d90c202009-11-22 23:31:11 -0800888 return genArithOpDouble(cUnit,mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700889 }
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800890 if ((opcode >= OP_ADD_DOUBLE) && (opcode <= OP_REM_DOUBLE)) {
Ben Cheng5d90c202009-11-22 23:31:11 -0800891 return genArithOpDouble(cUnit,mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700892 }
893 return true;
894}
895
Bill Buzbee1465db52009-09-23 17:17:35 -0700896/* Generate unconditional branch instructions */
897static ArmLIR *genUnconditionalBranch(CompilationUnit *cUnit, ArmLIR *target)
898{
899 ArmLIR *branch = opNone(cUnit, kOpUncondBr);
900 branch->generic.target = (LIR *) target;
901 return branch;
902}
903
Bill Buzbee1465db52009-09-23 17:17:35 -0700904/* Perform the actual operation for OP_RETURN_* */
905static void genReturnCommon(CompilationUnit *cUnit, MIR *mir)
906{
907 genDispatchToHandler(cUnit, TEMPLATE_RETURN);
Ben Cheng978738d2010-05-13 13:45:57 -0700908#if defined(WITH_JIT_TUNING)
Bill Buzbee1465db52009-09-23 17:17:35 -0700909 gDvmJit.returnOp++;
910#endif
911 int dPC = (int) (cUnit->method->insns + mir->offset);
912 /* Insert branch, but defer setting of target */
913 ArmLIR *branch = genUnconditionalBranch(cUnit, NULL);
914 /* Set up the place holder to reconstruct this Dalvik PC */
915 ArmLIR *pcrLabel = dvmCompilerNew(sizeof(ArmLIR), true);
Dan Bornstein9a1f8162010-12-01 17:02:26 -0800916 pcrLabel->opcode = kArmPseudoPCReconstructionCell;
Bill Buzbee1465db52009-09-23 17:17:35 -0700917 pcrLabel->operands[0] = dPC;
918 pcrLabel->operands[1] = mir->offset;
919 /* Insert the place holder to the growable list */
920 dvmInsertGrowableList(&cUnit->pcReconstructionList, pcrLabel);
921 /* Branch to the PC reconstruction code */
922 branch->generic.target = (LIR *) pcrLabel;
923}
924
Ben Chengba4fc8b2009-06-01 13:00:29 -0700925static void genProcessArgsNoRange(CompilationUnit *cUnit, MIR *mir,
926 DecodedInstruction *dInsn,
Bill Buzbee89efc3d2009-07-28 11:22:22 -0700927 ArmLIR **pcrLabel)
Ben Chengba4fc8b2009-06-01 13:00:29 -0700928{
929 unsigned int i;
930 unsigned int regMask = 0;
Bill Buzbee1465db52009-09-23 17:17:35 -0700931 RegLocation rlArg;
932 int numDone = 0;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700933
Bill Buzbee1465db52009-09-23 17:17:35 -0700934 /*
935 * Load arguments to r0..r4. Note that these registers may contain
936 * live values, so we clobber them immediately after loading to prevent
937 * them from being used as sources for subsequent loads.
938 */
Bill Buzbeec6f10662010-02-09 11:16:15 -0800939 dvmCompilerLockAllTemps(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700940 for (i = 0; i < dInsn->vA; i++) {
941 regMask |= 1 << i;
Bill Buzbeec6f10662010-02-09 11:16:15 -0800942 rlArg = dvmCompilerGetSrc(cUnit, mir, numDone++);
Bill Buzbee1465db52009-09-23 17:17:35 -0700943 loadValueDirectFixed(cUnit, rlArg, i);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700944 }
945 if (regMask) {
946 /* Up to 5 args are pushed on top of FP - sizeofStackSaveArea */
Bill Buzbee1465db52009-09-23 17:17:35 -0700947 opRegRegImm(cUnit, kOpSub, r7, rFP,
948 sizeof(StackSaveArea) + (dInsn->vA << 2));
Ben Chengba4fc8b2009-06-01 13:00:29 -0700949 /* generate null check */
950 if (pcrLabel) {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800951 *pcrLabel = genNullCheck(cUnit, dvmCompilerSSASrc(mir, 0), r0,
Bill Buzbee1465db52009-09-23 17:17:35 -0700952 mir->offset, NULL);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700953 }
Bill Buzbee270c1d62009-08-13 16:58:07 -0700954 storeMultiple(cUnit, r7, regMask);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700955 }
956}
957
958static void genProcessArgsRange(CompilationUnit *cUnit, MIR *mir,
959 DecodedInstruction *dInsn,
Bill Buzbee89efc3d2009-07-28 11:22:22 -0700960 ArmLIR **pcrLabel)
Ben Chengba4fc8b2009-06-01 13:00:29 -0700961{
962 int srcOffset = dInsn->vC << 2;
963 int numArgs = dInsn->vA;
964 int regMask;
Bill Buzbee1465db52009-09-23 17:17:35 -0700965
966 /*
967 * Note: here, all promoted registers will have been flushed
968 * back to the Dalvik base locations, so register usage restrictins
969 * are lifted. All parms loaded from original Dalvik register
970 * region - even though some might conceivably have valid copies
971 * cached in a preserved register.
972 */
Bill Buzbeec6f10662010-02-09 11:16:15 -0800973 dvmCompilerLockAllTemps(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700974
Ben Chengba4fc8b2009-06-01 13:00:29 -0700975 /*
976 * r4PC : &rFP[vC]
977 * r7: &newFP[0]
978 */
Bill Buzbee1465db52009-09-23 17:17:35 -0700979 opRegRegImm(cUnit, kOpAdd, r4PC, rFP, srcOffset);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700980 /* load [r0 .. min(numArgs,4)] */
981 regMask = (1 << ((numArgs < 4) ? numArgs : 4)) - 1;
Ben Chengd7d426a2009-09-22 11:23:36 -0700982 /*
983 * Protect the loadMultiple instruction from being reordered with other
984 * Dalvik stack accesses.
985 */
Bill Buzbee270c1d62009-08-13 16:58:07 -0700986 loadMultiple(cUnit, r4PC, regMask);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700987
Bill Buzbee1465db52009-09-23 17:17:35 -0700988 opRegRegImm(cUnit, kOpSub, r7, rFP,
989 sizeof(StackSaveArea) + (numArgs << 2));
Ben Chengba4fc8b2009-06-01 13:00:29 -0700990 /* generate null check */
991 if (pcrLabel) {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800992 *pcrLabel = genNullCheck(cUnit, dvmCompilerSSASrc(mir, 0), r0,
Bill Buzbee1465db52009-09-23 17:17:35 -0700993 mir->offset, NULL);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700994 }
995
996 /*
997 * Handle remaining 4n arguments:
998 * store previously loaded 4 values and load the next 4 values
999 */
1000 if (numArgs >= 8) {
Bill Buzbee89efc3d2009-07-28 11:22:22 -07001001 ArmLIR *loopLabel = NULL;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001002 /*
1003 * r0 contains "this" and it will be used later, so push it to the stack
Bill Buzbee270c1d62009-08-13 16:58:07 -07001004 * first. Pushing r5 (rFP) is just for stack alignment purposes.
Ben Chengba4fc8b2009-06-01 13:00:29 -07001005 */
Bill Buzbee1465db52009-09-23 17:17:35 -07001006 opImm(cUnit, kOpPush, (1 << r0 | 1 << rFP));
Ben Chengba4fc8b2009-06-01 13:00:29 -07001007 /* No need to generate the loop structure if numArgs <= 11 */
1008 if (numArgs > 11) {
1009 loadConstant(cUnit, 5, ((numArgs - 4) >> 2) << 2);
Bill Buzbee1465db52009-09-23 17:17:35 -07001010 loopLabel = newLIR0(cUnit, kArmPseudoTargetLabel);
Ben Chengd7d426a2009-09-22 11:23:36 -07001011 loopLabel->defMask = ENCODE_ALL;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001012 }
Bill Buzbee270c1d62009-08-13 16:58:07 -07001013 storeMultiple(cUnit, r7, regMask);
Ben Chengd7d426a2009-09-22 11:23:36 -07001014 /*
1015 * Protect the loadMultiple instruction from being reordered with other
1016 * Dalvik stack accesses.
1017 */
Bill Buzbee270c1d62009-08-13 16:58:07 -07001018 loadMultiple(cUnit, r4PC, regMask);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001019 /* No need to generate the loop structure if numArgs <= 11 */
1020 if (numArgs > 11) {
Bill Buzbee1465db52009-09-23 17:17:35 -07001021 opRegImm(cUnit, kOpSub, rFP, 4);
1022 genConditionalBranch(cUnit, kArmCondNe, loopLabel);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001023 }
1024 }
1025
1026 /* Save the last batch of loaded values */
Bill Buzbee270c1d62009-08-13 16:58:07 -07001027 storeMultiple(cUnit, r7, regMask);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001028
1029 /* Generate the loop epilogue - don't use r0 */
1030 if ((numArgs > 4) && (numArgs % 4)) {
1031 regMask = ((1 << (numArgs & 0x3)) - 1) << 1;
Ben Chengd7d426a2009-09-22 11:23:36 -07001032 /*
1033 * Protect the loadMultiple instruction from being reordered with other
1034 * Dalvik stack accesses.
1035 */
Bill Buzbee270c1d62009-08-13 16:58:07 -07001036 loadMultiple(cUnit, r4PC, regMask);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001037 }
1038 if (numArgs >= 8)
Bill Buzbee1465db52009-09-23 17:17:35 -07001039 opImm(cUnit, kOpPop, (1 << r0 | 1 << rFP));
Ben Chengba4fc8b2009-06-01 13:00:29 -07001040
1041 /* Save the modulo 4 arguments */
1042 if ((numArgs > 4) && (numArgs % 4)) {
Bill Buzbee270c1d62009-08-13 16:58:07 -07001043 storeMultiple(cUnit, r7, regMask);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001044 }
1045}
1046
Ben Cheng38329f52009-07-07 14:19:20 -07001047/*
1048 * Generate code to setup the call stack then jump to the chaining cell if it
1049 * is not a native method.
1050 */
1051static void genInvokeSingletonCommon(CompilationUnit *cUnit, MIR *mir,
Bill Buzbee89efc3d2009-07-28 11:22:22 -07001052 BasicBlock *bb, ArmLIR *labelList,
1053 ArmLIR *pcrLabel,
Ben Cheng38329f52009-07-07 14:19:20 -07001054 const Method *calleeMethod)
Ben Chengba4fc8b2009-06-01 13:00:29 -07001055{
Bill Buzbee1465db52009-09-23 17:17:35 -07001056 /*
1057 * Note: all Dalvik register state should be flushed to
1058 * memory by the point, so register usage restrictions no
1059 * longer apply. All temp & preserved registers may be used.
1060 */
Bill Buzbeec6f10662010-02-09 11:16:15 -08001061 dvmCompilerLockAllTemps(cUnit);
Bill Buzbee89efc3d2009-07-28 11:22:22 -07001062 ArmLIR *retChainingCell = &labelList[bb->fallThrough->id];
Ben Chengba4fc8b2009-06-01 13:00:29 -07001063
1064 /* r1 = &retChainingCell */
Bill Buzbee1465db52009-09-23 17:17:35 -07001065 ArmLIR *addrRetChain = opRegRegImm(cUnit, kOpAdd, r1, rpc, 0);
Ben Chengc8293e72010-10-12 11:50:10 -07001066
Ben Chengba4fc8b2009-06-01 13:00:29 -07001067 /* r4PC = dalvikCallsite */
1068 loadConstant(cUnit, r4PC,
1069 (int) (cUnit->method->insns + mir->offset));
1070 addrRetChain->generic.target = (LIR *) retChainingCell;
Ben Chengc8293e72010-10-12 11:50:10 -07001071
1072 /* r7 = calleeMethod->registersSize */
1073 loadConstant(cUnit, r7, calleeMethod->registersSize);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001074 /*
Ben Cheng38329f52009-07-07 14:19:20 -07001075 * r0 = calleeMethod (loaded upon calling genInvokeSingletonCommon)
Ben Chengba4fc8b2009-06-01 13:00:29 -07001076 * r1 = &ChainingCell
Ben Chengc8293e72010-10-12 11:50:10 -07001077 * r2 = calleeMethod->outsSize (to be loaded later for Java callees)
Ben Chengba4fc8b2009-06-01 13:00:29 -07001078 * r4PC = callsiteDPC
Ben Chengc8293e72010-10-12 11:50:10 -07001079 * r7 = calleeMethod->registersSize
Ben Chengba4fc8b2009-06-01 13:00:29 -07001080 */
1081 if (dvmIsNativeMethod(calleeMethod)) {
Ben Cheng38329f52009-07-07 14:19:20 -07001082 genDispatchToHandler(cUnit, TEMPLATE_INVOKE_METHOD_NATIVE);
Ben Cheng978738d2010-05-13 13:45:57 -07001083#if defined(WITH_JIT_TUNING)
Ben Cheng38329f52009-07-07 14:19:20 -07001084 gDvmJit.invokeNative++;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001085#endif
1086 } else {
Ben Chengc8293e72010-10-12 11:50:10 -07001087 /* For Java callees, set up r2 to be calleeMethod->outsSize */
1088 loadConstant(cUnit, r2, calleeMethod->outsSize);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001089 genDispatchToHandler(cUnit, TEMPLATE_INVOKE_METHOD_CHAIN);
Ben Cheng978738d2010-05-13 13:45:57 -07001090#if defined(WITH_JIT_TUNING)
Ben Cheng86717f72010-03-05 15:27:21 -08001091 gDvmJit.invokeMonomorphic++;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001092#endif
Ben Cheng38329f52009-07-07 14:19:20 -07001093 /* Branch to the chaining cell */
Ben Chengba4fc8b2009-06-01 13:00:29 -07001094 genUnconditionalBranch(cUnit, &labelList[bb->taken->id]);
1095 }
1096 /* Handle exceptions using the interpreter */
1097 genTrap(cUnit, mir->offset, pcrLabel);
1098}
1099
Ben Cheng38329f52009-07-07 14:19:20 -07001100/*
1101 * Generate code to check the validity of a predicted chain and take actions
1102 * based on the result.
1103 *
1104 * 0x426a99aa : ldr r4, [pc, #72] --> r4 <- dalvikPC of this invoke
1105 * 0x426a99ac : add r1, pc, #32 --> r1 <- &retChainingCell
1106 * 0x426a99ae : add r2, pc, #40 --> r2 <- &predictedChainingCell
1107 * 0x426a99b0 : blx_1 0x426a918c --+ TEMPLATE_INVOKE_METHOD_PREDICTED_CHAIN
1108 * 0x426a99b2 : blx_2 see above --+
1109 * 0x426a99b4 : b 0x426a99d8 --> off to the predicted chain
1110 * 0x426a99b6 : b 0x426a99c8 --> punt to the interpreter
1111 * 0x426a99b8 : ldr r0, [r7, #44] --> r0 <- this->class->vtable[methodIdx]
1112 * 0x426a99ba : cmp r1, #0 --> compare r1 (rechain count) against 0
1113 * 0x426a99bc : bgt 0x426a99c2 --> >=0? don't rechain
Ben Chengaf5aa1f2011-01-04 15:37:04 -08001114 * 0x426a99be : ldr r7, [pc, #off]--+ dvmJitToPatchPredictedChain
Ben Cheng38329f52009-07-07 14:19:20 -07001115 * 0x426a99c0 : blx r7 --+
1116 * 0x426a99c2 : add r1, pc, #12 --> r1 <- &retChainingCell
1117 * 0x426a99c4 : blx_1 0x426a9098 --+ TEMPLATE_INVOKE_METHOD_NO_OPT
1118 * 0x426a99c6 : blx_2 see above --+
1119 */
1120static void genInvokeVirtualCommon(CompilationUnit *cUnit, MIR *mir,
1121 int methodIndex,
Bill Buzbee89efc3d2009-07-28 11:22:22 -07001122 ArmLIR *retChainingCell,
1123 ArmLIR *predChainingCell,
1124 ArmLIR *pcrLabel)
Ben Cheng38329f52009-07-07 14:19:20 -07001125{
Bill Buzbee1465db52009-09-23 17:17:35 -07001126 /*
1127 * Note: all Dalvik register state should be flushed to
1128 * memory by the point, so register usage restrictions no
1129 * longer apply. Lock temps to prevent them from being
1130 * allocated by utility routines.
1131 */
Bill Buzbeec6f10662010-02-09 11:16:15 -08001132 dvmCompilerLockAllTemps(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07001133
Ben Cheng38329f52009-07-07 14:19:20 -07001134 /* "this" is already left in r0 by genProcessArgs* */
1135
1136 /* r4PC = dalvikCallsite */
1137 loadConstant(cUnit, r4PC,
1138 (int) (cUnit->method->insns + mir->offset));
1139
1140 /* r1 = &retChainingCell */
Bill Buzbee1465db52009-09-23 17:17:35 -07001141 ArmLIR *addrRetChain = opRegRegImm(cUnit, kOpAdd, r1, rpc, 0);
Ben Cheng38329f52009-07-07 14:19:20 -07001142 addrRetChain->generic.target = (LIR *) retChainingCell;
1143
1144 /* r2 = &predictedChainingCell */
Bill Buzbee1465db52009-09-23 17:17:35 -07001145 ArmLIR *predictedChainingCell = opRegRegImm(cUnit, kOpAdd, r2, rpc, 0);
Ben Cheng38329f52009-07-07 14:19:20 -07001146 predictedChainingCell->generic.target = (LIR *) predChainingCell;
1147
1148 genDispatchToHandler(cUnit, TEMPLATE_INVOKE_METHOD_PREDICTED_CHAIN);
1149
1150 /* return through lr - jump to the chaining cell */
1151 genUnconditionalBranch(cUnit, predChainingCell);
1152
1153 /*
1154 * null-check on "this" may have been eliminated, but we still need a PC-
1155 * reconstruction label for stack overflow bailout.
1156 */
1157 if (pcrLabel == NULL) {
1158 int dPC = (int) (cUnit->method->insns + mir->offset);
Bill Buzbee89efc3d2009-07-28 11:22:22 -07001159 pcrLabel = dvmCompilerNew(sizeof(ArmLIR), true);
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001160 pcrLabel->opcode = kArmPseudoPCReconstructionCell;
Ben Cheng38329f52009-07-07 14:19:20 -07001161 pcrLabel->operands[0] = dPC;
1162 pcrLabel->operands[1] = mir->offset;
1163 /* Insert the place holder to the growable list */
1164 dvmInsertGrowableList(&cUnit->pcReconstructionList, pcrLabel);
1165 }
1166
1167 /* return through lr+2 - punt to the interpreter */
1168 genUnconditionalBranch(cUnit, pcrLabel);
1169
1170 /*
1171 * return through lr+4 - fully resolve the callee method.
1172 * r1 <- count
1173 * r2 <- &predictedChainCell
1174 * r3 <- this->class
1175 * r4 <- dPC
1176 * r7 <- this->class->vtable
1177 */
1178
1179 /* r0 <- calleeMethod */
Bill Buzbee270c1d62009-08-13 16:58:07 -07001180 loadWordDisp(cUnit, r7, methodIndex * 4, r0);
Ben Cheng38329f52009-07-07 14:19:20 -07001181
1182 /* Check if rechain limit is reached */
buzbee8f8109a2010-08-31 10:16:35 -07001183 ArmLIR *bypassRechaining = genCmpImmBranch(cUnit, kArmCondGt, r1, 0);
Ben Cheng38329f52009-07-07 14:19:20 -07001184
Ben Chengaf5aa1f2011-01-04 15:37:04 -08001185 LOAD_FUNC_ADDR(cUnit, r7, (int) dvmJitToPatchPredictedChain);
Ben Cheng38329f52009-07-07 14:19:20 -07001186
Ben Chengb88ec3c2010-05-17 12:50:33 -07001187 genRegCopy(cUnit, r1, rGLUE);
1188
Ben Cheng38329f52009-07-07 14:19:20 -07001189 /*
1190 * r0 = calleeMethod
1191 * r2 = &predictedChainingCell
1192 * r3 = class
1193 *
1194 * &returnChainingCell has been loaded into r1 but is not needed
1195 * when patching the chaining cell and will be clobbered upon
1196 * returning so it will be reconstructed again.
1197 */
Bill Buzbee1465db52009-09-23 17:17:35 -07001198 opReg(cUnit, kOpBlx, r7);
Ben Cheng38329f52009-07-07 14:19:20 -07001199
1200 /* r1 = &retChainingCell */
Bill Buzbee1465db52009-09-23 17:17:35 -07001201 addrRetChain = opRegRegImm(cUnit, kOpAdd, r1, rpc, 0);
Ben Cheng38329f52009-07-07 14:19:20 -07001202 addrRetChain->generic.target = (LIR *) retChainingCell;
1203
1204 bypassRechaining->generic.target = (LIR *) addrRetChain;
1205 /*
1206 * r0 = calleeMethod,
1207 * r1 = &ChainingCell,
1208 * r4PC = callsiteDPC,
1209 */
1210 genDispatchToHandler(cUnit, TEMPLATE_INVOKE_METHOD_NO_OPT);
Ben Cheng978738d2010-05-13 13:45:57 -07001211#if defined(WITH_JIT_TUNING)
Ben Cheng86717f72010-03-05 15:27:21 -08001212 gDvmJit.invokePolymorphic++;
Ben Cheng38329f52009-07-07 14:19:20 -07001213#endif
1214 /* Handle exceptions using the interpreter */
1215 genTrap(cUnit, mir->offset, pcrLabel);
1216}
1217
Ben Chengba4fc8b2009-06-01 13:00:29 -07001218/* Geneate a branch to go back to the interpreter */
1219static void genPuntToInterp(CompilationUnit *cUnit, unsigned int offset)
1220{
1221 /* r0 = dalvik pc */
Bill Buzbeec6f10662010-02-09 11:16:15 -08001222 dvmCompilerFlushAllRegs(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001223 loadConstant(cUnit, r0, (int) (cUnit->method->insns + offset));
Bill Buzbee270c1d62009-08-13 16:58:07 -07001224 loadWordDisp(cUnit, rGLUE, offsetof(InterpState,
1225 jitToInterpEntries.dvmJitToInterpPunt), r1);
Bill Buzbee1465db52009-09-23 17:17:35 -07001226 opReg(cUnit, kOpBlx, r1);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001227}
1228
1229/*
1230 * Attempt to single step one instruction using the interpreter and return
1231 * to the compiled code for the next Dalvik instruction
1232 */
1233static void genInterpSingleStep(CompilationUnit *cUnit, MIR *mir)
1234{
Dan Bornsteine4852762010-12-02 12:45:00 -08001235 int flags = dexGetFlagsFromOpcode(mir->dalvikInsn.opcode);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001236 int flagsToCheck = kInstrCanBranch | kInstrCanSwitch | kInstrCanReturn |
1237 kInstrCanThrow;
Bill Buzbee1465db52009-09-23 17:17:35 -07001238
Bill Buzbee45273872010-03-11 11:12:15 -08001239 //If already optimized out, just ignore
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001240 if (mir->dalvikInsn.opcode == OP_NOP)
Bill Buzbee45273872010-03-11 11:12:15 -08001241 return;
1242
Bill Buzbee1465db52009-09-23 17:17:35 -07001243 //Ugly, but necessary. Flush all Dalvik regs so Interp can find them
Bill Buzbeec6f10662010-02-09 11:16:15 -08001244 dvmCompilerFlushAllRegs(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07001245
Ben Chengba4fc8b2009-06-01 13:00:29 -07001246 if ((mir->next == NULL) || (flags & flagsToCheck)) {
1247 genPuntToInterp(cUnit, mir->offset);
1248 return;
1249 }
1250 int entryAddr = offsetof(InterpState,
1251 jitToInterpEntries.dvmJitToInterpSingleStep);
Bill Buzbee270c1d62009-08-13 16:58:07 -07001252 loadWordDisp(cUnit, rGLUE, entryAddr, r2);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001253 /* r0 = dalvik pc */
1254 loadConstant(cUnit, r0, (int) (cUnit->method->insns + mir->offset));
1255 /* r1 = dalvik pc of following instruction */
1256 loadConstant(cUnit, r1, (int) (cUnit->method->insns + mir->next->offset));
Bill Buzbee1465db52009-09-23 17:17:35 -07001257 opReg(cUnit, kOpBlx, r2);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001258}
1259
Ben Chengfc075c22010-05-28 15:20:08 -07001260#if defined(WITH_DEADLOCK_PREDICTION) || defined(WITH_MONITOR_TRACKING) || \
1261 defined(_ARMV5TE) || defined(_ARMV5TE_VFP)
Bill Buzbeec1d9ed42010-02-02 11:04:33 -08001262/*
1263 * To prevent a thread in a monitor wait from blocking the Jit from
1264 * resetting the code cache, heavyweight monitor lock will not
1265 * be allowed to return to an existing translation. Instead, we will
1266 * handle them by branching to a handler, which will in turn call the
1267 * runtime lock routine and then branch directly back to the
1268 * interpreter main loop. Given the high cost of the heavyweight
1269 * lock operation, this additional cost should be slight (especially when
1270 * considering that we expect the vast majority of lock operations to
1271 * use the fast-path thin lock bypass).
1272 */
Ben Cheng5d90c202009-11-22 23:31:11 -08001273static void genMonitorPortable(CompilationUnit *cUnit, MIR *mir)
Bill Buzbee270c1d62009-08-13 16:58:07 -07001274{
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001275 bool isEnter = (mir->dalvikInsn.opcode == OP_MONITOR_ENTER);
Bill Buzbee1465db52009-09-23 17:17:35 -07001276 genExportPC(cUnit, mir);
Bill Buzbeec6f10662010-02-09 11:16:15 -08001277 dvmCompilerFlushAllRegs(cUnit); /* Send everything to home location */
1278 RegLocation rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07001279 loadValueDirectFixed(cUnit, rlSrc, r1);
1280 loadWordDisp(cUnit, rGLUE, offsetof(InterpState, self), r0);
Bill Buzbeec1d9ed42010-02-02 11:04:33 -08001281 genNullCheck(cUnit, rlSrc.sRegLow, r1, mir->offset, NULL);
Bill Buzbeeefbd3c52009-11-04 22:18:40 -08001282 if (isEnter) {
Bill Buzbeec1d9ed42010-02-02 11:04:33 -08001283 /* Get dPC of next insn */
1284 loadConstant(cUnit, r4PC, (int)(cUnit->method->insns + mir->offset +
Dan Bornsteine4852762010-12-02 12:45:00 -08001285 dexGetWidthFromOpcode(OP_MONITOR_ENTER)));
Bill Buzbeec1d9ed42010-02-02 11:04:33 -08001286#if defined(WITH_DEADLOCK_PREDICTION)
1287 genDispatchToHandler(cUnit, TEMPLATE_MONITOR_ENTER_DEBUG);
1288#else
1289 genDispatchToHandler(cUnit, TEMPLATE_MONITOR_ENTER);
1290#endif
Bill Buzbee1465db52009-09-23 17:17:35 -07001291 } else {
Ben Chengbd1326d2010-04-02 15:04:53 -07001292 LOAD_FUNC_ADDR(cUnit, r2, (int)dvmUnlockObject);
Bill Buzbeec1d9ed42010-02-02 11:04:33 -08001293 /* Do the call */
1294 opReg(cUnit, kOpBlx, r2);
buzbee8f8109a2010-08-31 10:16:35 -07001295 /* Did we throw? */
1296 ArmLIR *branchOver = genCmpImmBranch(cUnit, kArmCondNe, r0, 0);
Bill Buzbee6bbdd6b2010-02-16 14:40:01 -08001297 loadConstant(cUnit, r0,
1298 (int) (cUnit->method->insns + mir->offset +
Dan Bornsteine4852762010-12-02 12:45:00 -08001299 dexGetWidthFromOpcode(OP_MONITOR_EXIT)));
Bill Buzbee6bbdd6b2010-02-16 14:40:01 -08001300 genDispatchToHandler(cUnit, TEMPLATE_THROW_EXCEPTION_COMMON);
1301 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
1302 target->defMask = ENCODE_ALL;
1303 branchOver->generic.target = (LIR *) target;
Elliott Hughes6a555132010-02-25 15:41:42 -08001304 dvmCompilerClobberCallRegs(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07001305 }
Bill Buzbee270c1d62009-08-13 16:58:07 -07001306}
Ben Chengfc075c22010-05-28 15:20:08 -07001307#endif
Bill Buzbee270c1d62009-08-13 16:58:07 -07001308
Ben Chengba4fc8b2009-06-01 13:00:29 -07001309/*
1310 * The following are the first-level codegen routines that analyze the format
1311 * of each bytecode then either dispatch special purpose codegen routines
1312 * or produce corresponding Thumb instructions directly.
1313 */
1314
1315static bool handleFmt10t_Fmt20t_Fmt30t(CompilationUnit *cUnit, MIR *mir,
Bill Buzbee89efc3d2009-07-28 11:22:22 -07001316 BasicBlock *bb, ArmLIR *labelList)
Ben Chengba4fc8b2009-06-01 13:00:29 -07001317{
1318 /* For OP_GOTO, OP_GOTO_16, and OP_GOTO_32 */
1319 genUnconditionalBranch(cUnit, &labelList[bb->taken->id]);
1320 return false;
1321}
1322
1323static bool handleFmt10x(CompilationUnit *cUnit, MIR *mir)
1324{
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001325 Opcode dalvikOpcode = mir->dalvikInsn.opcode;
1326 if ((dalvikOpcode >= OP_UNUSED_3E) && (dalvikOpcode <= OP_UNUSED_43)) {
1327 LOGE("Codegen: got unused opcode 0x%x\n",dalvikOpcode);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001328 return true;
1329 }
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001330 switch (dalvikOpcode) {
Andy McFadden291758c2010-09-10 08:04:52 -07001331 case OP_RETURN_VOID_BARRIER:
buzbee2ce33c92010-11-01 15:53:27 -07001332 dvmCompilerGenMemBarrier(cUnit, kST);
1333 // Intentional fallthrough
1334 case OP_RETURN_VOID:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001335 genReturnCommon(cUnit,mir);
1336 break;
1337 case OP_UNUSED_73:
1338 case OP_UNUSED_79:
1339 case OP_UNUSED_7A:
Dan Bornstein90f15432010-12-02 16:46:25 -08001340 case OP_DISPATCH_FF:
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001341 LOGE("Codegen: got unused opcode 0x%x\n",dalvikOpcode);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001342 return true;
1343 case OP_NOP:
1344 break;
1345 default:
1346 return true;
1347 }
1348 return false;
1349}
1350
1351static bool handleFmt11n_Fmt31i(CompilationUnit *cUnit, MIR *mir)
1352{
Bill Buzbee1465db52009-09-23 17:17:35 -07001353 RegLocation rlDest;
1354 RegLocation rlResult;
1355 if (mir->ssaRep->numDefs == 2) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08001356 rlDest = dvmCompilerGetDestWide(cUnit, mir, 0, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -07001357 } else {
Bill Buzbeec6f10662010-02-09 11:16:15 -08001358 rlDest = dvmCompilerGetDest(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07001359 }
Ben Chenge9695e52009-06-16 16:11:47 -07001360
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001361 switch (mir->dalvikInsn.opcode) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07001362 case OP_CONST:
Ben Chenge9695e52009-06-16 16:11:47 -07001363 case OP_CONST_4: {
Bill Buzbeec6f10662010-02-09 11:16:15 -08001364 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kAnyReg, true);
Ben Chengbd1326d2010-04-02 15:04:53 -07001365 loadConstantNoClobber(cUnit, rlResult.lowReg, mir->dalvikInsn.vB);
Bill Buzbee1465db52009-09-23 17:17:35 -07001366 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001367 break;
Ben Chenge9695e52009-06-16 16:11:47 -07001368 }
1369 case OP_CONST_WIDE_32: {
Bill Buzbee1465db52009-09-23 17:17:35 -07001370 //TUNING: single routine to load constant pair for support doubles
Bill Buzbee964a7b02010-01-28 12:54:19 -08001371 //TUNING: load 0/-1 separately to avoid load dependency
Bill Buzbeec6f10662010-02-09 11:16:15 -08001372 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Ben Chengbd1326d2010-04-02 15:04:53 -07001373 loadConstantNoClobber(cUnit, rlResult.lowReg, mir->dalvikInsn.vB);
Bill Buzbee1465db52009-09-23 17:17:35 -07001374 opRegRegImm(cUnit, kOpAsr, rlResult.highReg,
1375 rlResult.lowReg, 31);
1376 storeValueWide(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001377 break;
Ben Chenge9695e52009-06-16 16:11:47 -07001378 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07001379 default:
1380 return true;
1381 }
1382 return false;
1383}
1384
1385static bool handleFmt21h(CompilationUnit *cUnit, MIR *mir)
1386{
Bill Buzbee1465db52009-09-23 17:17:35 -07001387 RegLocation rlDest;
1388 RegLocation rlResult;
1389 if (mir->ssaRep->numDefs == 2) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08001390 rlDest = dvmCompilerGetDestWide(cUnit, mir, 0, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -07001391 } else {
Bill Buzbeec6f10662010-02-09 11:16:15 -08001392 rlDest = dvmCompilerGetDest(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07001393 }
Bill Buzbeec6f10662010-02-09 11:16:15 -08001394 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kAnyReg, true);
Ben Chenge9695e52009-06-16 16:11:47 -07001395
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001396 switch (mir->dalvikInsn.opcode) {
Ben Chenge9695e52009-06-16 16:11:47 -07001397 case OP_CONST_HIGH16: {
Ben Chengbd1326d2010-04-02 15:04:53 -07001398 loadConstantNoClobber(cUnit, rlResult.lowReg,
1399 mir->dalvikInsn.vB << 16);
Bill Buzbee1465db52009-09-23 17:17:35 -07001400 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001401 break;
Ben Chenge9695e52009-06-16 16:11:47 -07001402 }
1403 case OP_CONST_WIDE_HIGH16: {
Bill Buzbee1465db52009-09-23 17:17:35 -07001404 loadConstantValueWide(cUnit, rlResult.lowReg, rlResult.highReg,
1405 0, mir->dalvikInsn.vB << 16);
1406 storeValueWide(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001407 break;
Ben Chenge9695e52009-06-16 16:11:47 -07001408 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07001409 default:
1410 return true;
1411 }
1412 return false;
1413}
1414
1415static bool handleFmt20bc(CompilationUnit *cUnit, MIR *mir)
1416{
1417 /* For OP_THROW_VERIFICATION_ERROR */
1418 genInterpSingleStep(cUnit, mir);
1419 return false;
1420}
1421
1422static bool handleFmt21c_Fmt31c(CompilationUnit *cUnit, MIR *mir)
1423{
Bill Buzbee1465db52009-09-23 17:17:35 -07001424 RegLocation rlResult;
1425 RegLocation rlDest;
1426 RegLocation rlSrc;
Ben Chenge9695e52009-06-16 16:11:47 -07001427
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001428 switch (mir->dalvikInsn.opcode) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07001429 case OP_CONST_STRING_JUMBO:
1430 case OP_CONST_STRING: {
1431 void *strPtr = (void*)
1432 (cUnit->method->clazz->pDvmDex->pResStrings[mir->dalvikInsn.vB]);
Ben Chengdd6e8702010-05-07 13:05:47 -07001433
1434 if (strPtr == NULL) {
1435 LOGE("Unexpected null string");
1436 dvmAbort();
1437 }
1438
Bill Buzbeec6f10662010-02-09 11:16:15 -08001439 rlDest = dvmCompilerGetDest(cUnit, mir, 0);
1440 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Ben Chengbd1326d2010-04-02 15:04:53 -07001441 loadConstantNoClobber(cUnit, rlResult.lowReg, (int) strPtr );
Bill Buzbee1465db52009-09-23 17:17:35 -07001442 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001443 break;
1444 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07001445 case OP_CONST_CLASS: {
1446 void *classPtr = (void*)
1447 (cUnit->method->clazz->pDvmDex->pResClasses[mir->dalvikInsn.vB]);
Ben Chengdd6e8702010-05-07 13:05:47 -07001448
1449 if (classPtr == NULL) {
1450 LOGE("Unexpected null class");
1451 dvmAbort();
1452 }
1453
Bill Buzbeec6f10662010-02-09 11:16:15 -08001454 rlDest = dvmCompilerGetDest(cUnit, mir, 0);
1455 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Ben Chengbd1326d2010-04-02 15:04:53 -07001456 loadConstantNoClobber(cUnit, rlResult.lowReg, (int) classPtr );
Bill Buzbee1465db52009-09-23 17:17:35 -07001457 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001458 break;
1459 }
buzbeeecf8f6e2010-07-20 14:53:42 -07001460 case OP_SGET_VOLATILE:
1461 case OP_SGET_OBJECT_VOLATILE:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001462 case OP_SGET_OBJECT:
1463 case OP_SGET_BOOLEAN:
1464 case OP_SGET_CHAR:
1465 case OP_SGET_BYTE:
1466 case OP_SGET_SHORT:
1467 case OP_SGET: {
Bill Buzbee50a6bf22009-07-08 13:08:04 -07001468 int valOffset = offsetof(StaticField, value);
Bill Buzbeec6f10662010-02-09 11:16:15 -08001469 int tReg = dvmCompilerAllocTemp(cUnit);
buzbeeecf8f6e2010-07-20 14:53:42 -07001470 bool isVolatile;
Ben Cheng7a2697d2010-06-07 13:44:23 -07001471 const Method *method = (mir->OptimizationFlags & MIR_CALLEE) ?
1472 mir->meta.calleeMethod : cUnit->method;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001473 void *fieldPtr = (void*)
Ben Cheng7a2697d2010-06-07 13:44:23 -07001474 (method->clazz->pDvmDex->pResFields[mir->dalvikInsn.vB]);
Ben Chengdd6e8702010-05-07 13:05:47 -07001475
1476 if (fieldPtr == NULL) {
1477 LOGE("Unexpected null static field");
1478 dvmAbort();
1479 }
1480
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001481 isVolatile = (mir->dalvikInsn.opcode == OP_SGET_VOLATILE) ||
1482 (mir->dalvikInsn.opcode == OP_SGET_OBJECT_VOLATILE) ||
buzbeeecf8f6e2010-07-20 14:53:42 -07001483 dvmIsVolatileField(fieldPtr);
1484
Bill Buzbeec6f10662010-02-09 11:16:15 -08001485 rlDest = dvmCompilerGetDest(cUnit, mir, 0);
1486 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kAnyReg, true);
Bill Buzbee1465db52009-09-23 17:17:35 -07001487 loadConstant(cUnit, tReg, (int) fieldPtr + valOffset);
Ben Cheng11d8f142010-03-24 15:24:19 -07001488
buzbeeecf8f6e2010-07-20 14:53:42 -07001489 if (isVolatile) {
buzbee2ce33c92010-11-01 15:53:27 -07001490 dvmCompilerGenMemBarrier(cUnit, kSY);
buzbeeecf8f6e2010-07-20 14:53:42 -07001491 }
Ben Cheng11d8f142010-03-24 15:24:19 -07001492 HEAP_ACCESS_SHADOW(true);
Bill Buzbee1465db52009-09-23 17:17:35 -07001493 loadWordDisp(cUnit, tReg, 0, rlResult.lowReg);
Ben Cheng11d8f142010-03-24 15:24:19 -07001494 HEAP_ACCESS_SHADOW(false);
1495
Bill Buzbee1465db52009-09-23 17:17:35 -07001496 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001497 break;
1498 }
1499 case OP_SGET_WIDE: {
Bill Buzbee50a6bf22009-07-08 13:08:04 -07001500 int valOffset = offsetof(StaticField, value);
Ben Cheng7a2697d2010-06-07 13:44:23 -07001501 const Method *method = (mir->OptimizationFlags & MIR_CALLEE) ?
1502 mir->meta.calleeMethod : cUnit->method;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001503 void *fieldPtr = (void*)
Ben Cheng7a2697d2010-06-07 13:44:23 -07001504 (method->clazz->pDvmDex->pResFields[mir->dalvikInsn.vB]);
Ben Chengdd6e8702010-05-07 13:05:47 -07001505
1506 if (fieldPtr == NULL) {
1507 LOGE("Unexpected null static field");
1508 dvmAbort();
1509 }
1510
Bill Buzbeec6f10662010-02-09 11:16:15 -08001511 int tReg = dvmCompilerAllocTemp(cUnit);
Bill Buzbeec6f10662010-02-09 11:16:15 -08001512 rlDest = dvmCompilerGetDestWide(cUnit, mir, 0, 1);
1513 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kAnyReg, true);
Bill Buzbee1465db52009-09-23 17:17:35 -07001514 loadConstant(cUnit, tReg, (int) fieldPtr + valOffset);
Ben Cheng11d8f142010-03-24 15:24:19 -07001515
1516 HEAP_ACCESS_SHADOW(true);
Bill Buzbee1465db52009-09-23 17:17:35 -07001517 loadPair(cUnit, tReg, rlResult.lowReg, rlResult.highReg);
Ben Cheng11d8f142010-03-24 15:24:19 -07001518 HEAP_ACCESS_SHADOW(false);
1519
Bill Buzbee1465db52009-09-23 17:17:35 -07001520 storeValueWide(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001521 break;
1522 }
1523 case OP_SPUT_OBJECT:
buzbeeddc7d292010-09-02 17:16:24 -07001524 case OP_SPUT_OBJECT_VOLATILE:
1525 case OP_SPUT_VOLATILE:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001526 case OP_SPUT_BOOLEAN:
1527 case OP_SPUT_CHAR:
1528 case OP_SPUT_BYTE:
1529 case OP_SPUT_SHORT:
1530 case OP_SPUT: {
Bill Buzbee50a6bf22009-07-08 13:08:04 -07001531 int valOffset = offsetof(StaticField, value);
Bill Buzbeec6f10662010-02-09 11:16:15 -08001532 int tReg = dvmCompilerAllocTemp(cUnit);
buzbeed3b0a4b2010-09-27 11:30:22 -07001533 int objHead;
buzbeeecf8f6e2010-07-20 14:53:42 -07001534 bool isVolatile;
buzbeed3b0a4b2010-09-27 11:30:22 -07001535 bool isSputObject;
Ben Cheng7a2697d2010-06-07 13:44:23 -07001536 const Method *method = (mir->OptimizationFlags & MIR_CALLEE) ?
1537 mir->meta.calleeMethod : cUnit->method;
1538 void *fieldPtr = (void*)
1539 (method->clazz->pDvmDex->pResFields[mir->dalvikInsn.vB]);
Ben Chenge9695e52009-06-16 16:11:47 -07001540
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001541 isVolatile = (mir->dalvikInsn.opcode == OP_SPUT_VOLATILE) ||
1542 (mir->dalvikInsn.opcode == OP_SPUT_OBJECT_VOLATILE) ||
buzbeeecf8f6e2010-07-20 14:53:42 -07001543 dvmIsVolatileField(fieldPtr);
1544
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001545 isSputObject = (mir->dalvikInsn.opcode == OP_SPUT_OBJECT) ||
1546 (mir->dalvikInsn.opcode == OP_SPUT_OBJECT_VOLATILE);
buzbeed3b0a4b2010-09-27 11:30:22 -07001547
Ben Chengdd6e8702010-05-07 13:05:47 -07001548 if (fieldPtr == NULL) {
1549 LOGE("Unexpected null static field");
1550 dvmAbort();
1551 }
1552
Bill Buzbeec6f10662010-02-09 11:16:15 -08001553 rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07001554 rlSrc = loadValue(cUnit, rlSrc, kAnyReg);
buzbeeb78c76f2010-09-30 19:08:20 -07001555 loadConstant(cUnit, tReg, (int) fieldPtr);
buzbeed3b0a4b2010-09-27 11:30:22 -07001556 if (isSputObject) {
1557 objHead = dvmCompilerAllocTemp(cUnit);
buzbeeb78c76f2010-09-30 19:08:20 -07001558 loadWordDisp(cUnit, tReg, offsetof(Field, clazz), objHead);
buzbeed3b0a4b2010-09-27 11:30:22 -07001559 }
Ben Cheng11d8f142010-03-24 15:24:19 -07001560 HEAP_ACCESS_SHADOW(true);
buzbeeb78c76f2010-09-30 19:08:20 -07001561 storeWordDisp(cUnit, tReg, valOffset ,rlSrc.lowReg);
buzbeed3b0a4b2010-09-27 11:30:22 -07001562 dvmCompilerFreeTemp(cUnit, tReg);
Ben Cheng11d8f142010-03-24 15:24:19 -07001563 HEAP_ACCESS_SHADOW(false);
buzbeeecf8f6e2010-07-20 14:53:42 -07001564 if (isVolatile) {
buzbee2ce33c92010-11-01 15:53:27 -07001565 dvmCompilerGenMemBarrier(cUnit, kSY);
buzbeeecf8f6e2010-07-20 14:53:42 -07001566 }
buzbeed3b0a4b2010-09-27 11:30:22 -07001567 if (isSputObject) {
buzbeeb78c76f2010-09-30 19:08:20 -07001568 /* NOTE: marking card based sfield->clazz */
buzbeed3b0a4b2010-09-27 11:30:22 -07001569 markCard(cUnit, rlSrc.lowReg, objHead);
1570 dvmCompilerFreeTemp(cUnit, objHead);
buzbee919eb062010-07-12 12:59:22 -07001571 }
Ben Cheng11d8f142010-03-24 15:24:19 -07001572
Ben Chengba4fc8b2009-06-01 13:00:29 -07001573 break;
1574 }
1575 case OP_SPUT_WIDE: {
Bill Buzbeec6f10662010-02-09 11:16:15 -08001576 int tReg = dvmCompilerAllocTemp(cUnit);
Bill Buzbee50a6bf22009-07-08 13:08:04 -07001577 int valOffset = offsetof(StaticField, value);
Ben Cheng7a2697d2010-06-07 13:44:23 -07001578 const Method *method = (mir->OptimizationFlags & MIR_CALLEE) ?
1579 mir->meta.calleeMethod : cUnit->method;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001580 void *fieldPtr = (void*)
Ben Cheng7a2697d2010-06-07 13:44:23 -07001581 (method->clazz->pDvmDex->pResFields[mir->dalvikInsn.vB]);
Ben Chenge9695e52009-06-16 16:11:47 -07001582
Ben Chengdd6e8702010-05-07 13:05:47 -07001583 if (fieldPtr == NULL) {
1584 LOGE("Unexpected null static field");
1585 dvmAbort();
1586 }
1587
Bill Buzbeec6f10662010-02-09 11:16:15 -08001588 rlSrc = dvmCompilerGetSrcWide(cUnit, mir, 0, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -07001589 rlSrc = loadValueWide(cUnit, rlSrc, kAnyReg);
1590 loadConstant(cUnit, tReg, (int) fieldPtr + valOffset);
Ben Cheng11d8f142010-03-24 15:24:19 -07001591
1592 HEAP_ACCESS_SHADOW(true);
Bill Buzbee1465db52009-09-23 17:17:35 -07001593 storePair(cUnit, tReg, rlSrc.lowReg, rlSrc.highReg);
Ben Cheng11d8f142010-03-24 15:24:19 -07001594 HEAP_ACCESS_SHADOW(false);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001595 break;
1596 }
1597 case OP_NEW_INSTANCE: {
Ben Chenge9695e52009-06-16 16:11:47 -07001598 /*
1599 * Obey the calling convention and don't mess with the register
1600 * usage.
1601 */
Ben Chengba4fc8b2009-06-01 13:00:29 -07001602 ClassObject *classPtr = (void*)
1603 (cUnit->method->clazz->pDvmDex->pResClasses[mir->dalvikInsn.vB]);
Ben Chengdd6e8702010-05-07 13:05:47 -07001604
1605 if (classPtr == NULL) {
1606 LOGE("Unexpected null class");
1607 dvmAbort();
1608 }
1609
Ben Cheng79d173c2009-09-29 16:12:51 -07001610 /*
1611 * If it is going to throw, it should not make to the trace to begin
Bill Buzbee1465db52009-09-23 17:17:35 -07001612 * with. However, Alloc might throw, so we need to genExportPC()
Ben Cheng79d173c2009-09-29 16:12:51 -07001613 */
1614 assert((classPtr->accessFlags & (ACC_INTERFACE|ACC_ABSTRACT)) == 0);
Bill Buzbeec6f10662010-02-09 11:16:15 -08001615 dvmCompilerFlushAllRegs(cUnit); /* Everything to home location */
Bill Buzbee1465db52009-09-23 17:17:35 -07001616 genExportPC(cUnit, mir);
Ben Chengbd1326d2010-04-02 15:04:53 -07001617 LOAD_FUNC_ADDR(cUnit, r2, (int)dvmAllocObject);
Ben Chenge9695e52009-06-16 16:11:47 -07001618 loadConstant(cUnit, r0, (int) classPtr);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001619 loadConstant(cUnit, r1, ALLOC_DONT_TRACK);
Bill Buzbee1465db52009-09-23 17:17:35 -07001620 opReg(cUnit, kOpBlx, r2);
Elliott Hughes6a555132010-02-25 15:41:42 -08001621 dvmCompilerClobberCallRegs(cUnit);
Ben Cheng4f489172009-09-27 17:08:35 -07001622 /* generate a branch over if allocation is successful */
buzbee8f8109a2010-08-31 10:16:35 -07001623 ArmLIR *branchOver = genCmpImmBranch(cUnit, kArmCondNe, r0, 0);
Ben Cheng4f489172009-09-27 17:08:35 -07001624 /*
1625 * OOM exception needs to be thrown here and cannot re-execute
1626 */
1627 loadConstant(cUnit, r0,
1628 (int) (cUnit->method->insns + mir->offset));
1629 genDispatchToHandler(cUnit, TEMPLATE_THROW_EXCEPTION_COMMON);
1630 /* noreturn */
1631
Bill Buzbee1465db52009-09-23 17:17:35 -07001632 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
Ben Cheng4f489172009-09-27 17:08:35 -07001633 target->defMask = ENCODE_ALL;
1634 branchOver->generic.target = (LIR *) target;
Bill Buzbeec6f10662010-02-09 11:16:15 -08001635 rlDest = dvmCompilerGetDest(cUnit, mir, 0);
1636 rlResult = dvmCompilerGetReturn(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07001637 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001638 break;
1639 }
1640 case OP_CHECK_CAST: {
Ben Chenge9695e52009-06-16 16:11:47 -07001641 /*
1642 * Obey the calling convention and don't mess with the register
1643 * usage.
1644 */
Ben Chengba4fc8b2009-06-01 13:00:29 -07001645 ClassObject *classPtr =
1646 (cUnit->method->clazz->pDvmDex->pResClasses[mir->dalvikInsn.vB]);
Bill Buzbee4df41a52009-11-12 17:07:16 -08001647 /*
1648 * Note: It is possible that classPtr is NULL at this point,
1649 * even though this instruction has been successfully interpreted.
1650 * If the previous interpretation had a null source, the
1651 * interpreter would not have bothered to resolve the clazz.
1652 * Bail out to the interpreter in this case, and log it
1653 * so that we can tell if it happens frequently.
1654 */
1655 if (classPtr == NULL) {
Ben Cheng11d8f142010-03-24 15:24:19 -07001656 LOGVV("null clazz in OP_CHECK_CAST, single-stepping");
Bill Buzbee4df41a52009-11-12 17:07:16 -08001657 genInterpSingleStep(cUnit, mir);
1658 return false;
1659 }
Bill Buzbeec6f10662010-02-09 11:16:15 -08001660 dvmCompilerFlushAllRegs(cUnit); /* Everything to home location */
Ben Chengba4fc8b2009-06-01 13:00:29 -07001661 loadConstant(cUnit, r1, (int) classPtr );
Bill Buzbeec6f10662010-02-09 11:16:15 -08001662 rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07001663 rlSrc = loadValue(cUnit, rlSrc, kCoreReg);
buzbee8f8109a2010-08-31 10:16:35 -07001664 /* Null? */
1665 ArmLIR *branch1 = genCmpImmBranch(cUnit, kArmCondEq,
1666 rlSrc.lowReg, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07001667 /*
1668 * rlSrc.lowReg now contains object->clazz. Note that
1669 * it could have been allocated r0, but we're okay so long
1670 * as we don't do anything desctructive until r0 is loaded
1671 * with clazz.
1672 */
Ben Chengba4fc8b2009-06-01 13:00:29 -07001673 /* r0 now contains object->clazz */
Bill Buzbee1465db52009-09-23 17:17:35 -07001674 loadWordDisp(cUnit, rlSrc.lowReg, offsetof(Object, clazz), r0);
Ben Chengbd1326d2010-04-02 15:04:53 -07001675 LOAD_FUNC_ADDR(cUnit, r2, (int)dvmInstanceofNonTrivial);
Bill Buzbee1465db52009-09-23 17:17:35 -07001676 opRegReg(cUnit, kOpCmp, r0, r1);
1677 ArmLIR *branch2 = opCondBranch(cUnit, kArmCondEq);
1678 opReg(cUnit, kOpBlx, r2);
Elliott Hughes6a555132010-02-25 15:41:42 -08001679 dvmCompilerClobberCallRegs(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07001680 /*
1681 * If null, check cast failed - punt to the interpreter. Because
1682 * interpreter will be the one throwing, we don't need to
1683 * genExportPC() here.
1684 */
Bill Buzbee270c1d62009-08-13 16:58:07 -07001685 genZeroCheck(cUnit, r0, mir->offset, NULL);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001686 /* check cast passed - branch target here */
Bill Buzbee1465db52009-09-23 17:17:35 -07001687 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
Ben Chengd7d426a2009-09-22 11:23:36 -07001688 target->defMask = ENCODE_ALL;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001689 branch1->generic.target = (LIR *)target;
1690 branch2->generic.target = (LIR *)target;
1691 break;
1692 }
buzbee4d92e682010-07-29 15:24:14 -07001693 case OP_SGET_WIDE_VOLATILE:
1694 case OP_SPUT_WIDE_VOLATILE:
1695 genInterpSingleStep(cUnit, mir);
1696 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001697 default:
1698 return true;
1699 }
1700 return false;
1701}
1702
Ben Cheng7a2697d2010-06-07 13:44:23 -07001703/*
1704 * A typical example of inlined getter/setter from a monomorphic callsite:
1705 *
1706 * D/dalvikvm( 289): -------- dalvik offset: 0x0000 @ invoke-static (I)
1707 * D/dalvikvm( 289): -------- dalvik offset: 0x0000 @ sget-object (C) v0, ...
1708 * D/dalvikvm( 289): 0x4427fc22 (0002): ldr r0, [pc, #56]
1709 * D/dalvikvm( 289): 0x4427fc24 (0004): ldr r1, [r0, #0]
1710 * D/dalvikvm( 289): 0x4427fc26 (0006): str r1, [r5, #0]
1711 * D/dalvikvm( 289): 0x4427fc28 (0008): .align4
1712 * D/dalvikvm( 289): L0x0003:
1713 * D/dalvikvm( 289): -------- dalvik offset: 0x0003 @ move-result-object (I) v0
1714 *
1715 * Note the invoke-static and move-result-object with the (I) notation are
1716 * turned into no-op.
1717 */
Ben Chengba4fc8b2009-06-01 13:00:29 -07001718static bool handleFmt11x(CompilationUnit *cUnit, MIR *mir)
1719{
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001720 Opcode dalvikOpcode = mir->dalvikInsn.opcode;
Bill Buzbee1465db52009-09-23 17:17:35 -07001721 RegLocation rlResult;
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001722 switch (dalvikOpcode) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07001723 case OP_MOVE_EXCEPTION: {
1724 int offset = offsetof(InterpState, self);
1725 int exOffset = offsetof(Thread, exception);
Bill Buzbeec6f10662010-02-09 11:16:15 -08001726 int selfReg = dvmCompilerAllocTemp(cUnit);
1727 int resetReg = dvmCompilerAllocTemp(cUnit);
1728 RegLocation rlDest = dvmCompilerGetDest(cUnit, mir, 0);
1729 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee1465db52009-09-23 17:17:35 -07001730 loadWordDisp(cUnit, rGLUE, offset, selfReg);
Bill Buzbeef9f33282009-11-22 12:45:30 -08001731 loadConstant(cUnit, resetReg, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07001732 loadWordDisp(cUnit, selfReg, exOffset, rlResult.lowReg);
Bill Buzbeef9f33282009-11-22 12:45:30 -08001733 storeWordDisp(cUnit, selfReg, exOffset, resetReg);
Bill Buzbee1465db52009-09-23 17:17:35 -07001734 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001735 break;
1736 }
1737 case OP_MOVE_RESULT:
1738 case OP_MOVE_RESULT_OBJECT: {
Ben Cheng7a2697d2010-06-07 13:44:23 -07001739 /* An inlined move result is effectively no-op */
1740 if (mir->OptimizationFlags & MIR_INLINED)
1741 break;
Bill Buzbeec6f10662010-02-09 11:16:15 -08001742 RegLocation rlDest = dvmCompilerGetDest(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07001743 RegLocation rlSrc = LOC_DALVIK_RETURN_VAL;
1744 rlSrc.fp = rlDest.fp;
1745 storeValue(cUnit, rlDest, rlSrc);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001746 break;
1747 }
1748 case OP_MOVE_RESULT_WIDE: {
Ben Cheng7a2697d2010-06-07 13:44:23 -07001749 /* An inlined move result is effectively no-op */
1750 if (mir->OptimizationFlags & MIR_INLINED)
1751 break;
Bill Buzbeec6f10662010-02-09 11:16:15 -08001752 RegLocation rlDest = dvmCompilerGetDestWide(cUnit, mir, 0, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -07001753 RegLocation rlSrc = LOC_DALVIK_RETURN_VAL_WIDE;
1754 rlSrc.fp = rlDest.fp;
1755 storeValueWide(cUnit, rlDest, rlSrc);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001756 break;
1757 }
1758 case OP_RETURN_WIDE: {
Bill Buzbeec6f10662010-02-09 11:16:15 -08001759 RegLocation rlSrc = dvmCompilerGetSrcWide(cUnit, mir, 0, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -07001760 RegLocation rlDest = LOC_DALVIK_RETURN_VAL_WIDE;
1761 rlDest.fp = rlSrc.fp;
1762 storeValueWide(cUnit, rlDest, rlSrc);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001763 genReturnCommon(cUnit,mir);
1764 break;
1765 }
1766 case OP_RETURN:
1767 case OP_RETURN_OBJECT: {
Bill Buzbeec6f10662010-02-09 11:16:15 -08001768 RegLocation rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07001769 RegLocation rlDest = LOC_DALVIK_RETURN_VAL;
1770 rlDest.fp = rlSrc.fp;
1771 storeValue(cUnit, rlDest, rlSrc);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001772 genReturnCommon(cUnit,mir);
1773 break;
1774 }
Bill Buzbee1465db52009-09-23 17:17:35 -07001775 case OP_MONITOR_EXIT:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001776 case OP_MONITOR_ENTER:
Bill Buzbeed0937ef2009-12-22 16:15:39 -08001777#if defined(WITH_DEADLOCK_PREDICTION) || defined(WITH_MONITOR_TRACKING)
Ben Cheng5d90c202009-11-22 23:31:11 -08001778 genMonitorPortable(cUnit, mir);
Bill Buzbee1465db52009-09-23 17:17:35 -07001779#else
Ben Cheng5d90c202009-11-22 23:31:11 -08001780 genMonitor(cUnit, mir);
Bill Buzbee1465db52009-09-23 17:17:35 -07001781#endif
Ben Chengba4fc8b2009-06-01 13:00:29 -07001782 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001783 case OP_THROW: {
1784 genInterpSingleStep(cUnit, mir);
1785 break;
1786 }
1787 default:
1788 return true;
1789 }
1790 return false;
1791}
1792
Bill Buzbeed45ba372009-06-15 17:00:57 -07001793static bool handleFmt12x(CompilationUnit *cUnit, MIR *mir)
1794{
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001795 Opcode opcode = mir->dalvikInsn.opcode;
Bill Buzbee1465db52009-09-23 17:17:35 -07001796 RegLocation rlDest;
1797 RegLocation rlSrc;
1798 RegLocation rlResult;
Bill Buzbeed45ba372009-06-15 17:00:57 -07001799
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001800 if ( (opcode >= OP_ADD_INT_2ADDR) && (opcode <= OP_REM_DOUBLE_2ADDR)) {
Ben Cheng5d90c202009-11-22 23:31:11 -08001801 return genArithOp( cUnit, mir );
Ben Chengba4fc8b2009-06-01 13:00:29 -07001802 }
1803
Bill Buzbee1465db52009-09-23 17:17:35 -07001804 if (mir->ssaRep->numUses == 2)
Bill Buzbeec6f10662010-02-09 11:16:15 -08001805 rlSrc = dvmCompilerGetSrcWide(cUnit, mir, 0, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -07001806 else
Bill Buzbeec6f10662010-02-09 11:16:15 -08001807 rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07001808 if (mir->ssaRep->numDefs == 2)
Bill Buzbeec6f10662010-02-09 11:16:15 -08001809 rlDest = dvmCompilerGetDestWide(cUnit, mir, 0, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -07001810 else
Bill Buzbeec6f10662010-02-09 11:16:15 -08001811 rlDest = dvmCompilerGetDest(cUnit, mir, 0);
Ben Chenge9695e52009-06-16 16:11:47 -07001812
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001813 switch (opcode) {
Bill Buzbee1465db52009-09-23 17:17:35 -07001814 case OP_DOUBLE_TO_INT:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001815 case OP_INT_TO_FLOAT:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001816 case OP_FLOAT_TO_INT:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001817 case OP_DOUBLE_TO_FLOAT:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001818 case OP_FLOAT_TO_DOUBLE:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001819 case OP_INT_TO_DOUBLE:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001820 case OP_FLOAT_TO_LONG:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001821 case OP_LONG_TO_FLOAT:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001822 case OP_DOUBLE_TO_LONG:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001823 case OP_LONG_TO_DOUBLE:
Ben Cheng5d90c202009-11-22 23:31:11 -08001824 return genConversion(cUnit, mir);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001825 case OP_NEG_INT:
1826 case OP_NOT_INT:
Ben Cheng5d90c202009-11-22 23:31:11 -08001827 return genArithOpInt(cUnit, mir, rlDest, rlSrc, rlSrc);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001828 case OP_NEG_LONG:
1829 case OP_NOT_LONG:
Ben Cheng5d90c202009-11-22 23:31:11 -08001830 return genArithOpLong(cUnit, mir, rlDest, rlSrc, rlSrc);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001831 case OP_NEG_FLOAT:
Ben Cheng5d90c202009-11-22 23:31:11 -08001832 return genArithOpFloat(cUnit, mir, rlDest, rlSrc, rlSrc);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001833 case OP_NEG_DOUBLE:
Ben Cheng5d90c202009-11-22 23:31:11 -08001834 return genArithOpDouble(cUnit, mir, rlDest, rlSrc, rlSrc);
Bill Buzbee1465db52009-09-23 17:17:35 -07001835 case OP_MOVE_WIDE:
1836 storeValueWide(cUnit, rlDest, rlSrc);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001837 break;
Bill Buzbee1465db52009-09-23 17:17:35 -07001838 case OP_INT_TO_LONG:
Bill Buzbeec6f10662010-02-09 11:16:15 -08001839 rlSrc = dvmCompilerUpdateLoc(cUnit, rlSrc);
1840 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee964a7b02010-01-28 12:54:19 -08001841 //TUNING: shouldn't loadValueDirect already check for phys reg?
Bill Buzbee1465db52009-09-23 17:17:35 -07001842 if (rlSrc.location == kLocPhysReg) {
1843 genRegCopy(cUnit, rlResult.lowReg, rlSrc.lowReg);
1844 } else {
1845 loadValueDirect(cUnit, rlSrc, rlResult.lowReg);
1846 }
1847 opRegRegImm(cUnit, kOpAsr, rlResult.highReg,
1848 rlResult.lowReg, 31);
1849 storeValueWide(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001850 break;
Bill Buzbee1465db52009-09-23 17:17:35 -07001851 case OP_LONG_TO_INT:
Bill Buzbeec6f10662010-02-09 11:16:15 -08001852 rlSrc = dvmCompilerUpdateLocWide(cUnit, rlSrc);
1853 rlSrc = dvmCompilerWideToNarrow(cUnit, rlSrc);
Bill Buzbee1465db52009-09-23 17:17:35 -07001854 // Intentional fallthrough
Ben Chengba4fc8b2009-06-01 13:00:29 -07001855 case OP_MOVE:
1856 case OP_MOVE_OBJECT:
Bill Buzbee1465db52009-09-23 17:17:35 -07001857 storeValue(cUnit, rlDest, rlSrc);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001858 break;
1859 case OP_INT_TO_BYTE:
Bill Buzbee1465db52009-09-23 17:17:35 -07001860 rlSrc = loadValue(cUnit, rlSrc, kCoreReg);
Bill Buzbeec6f10662010-02-09 11:16:15 -08001861 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee1465db52009-09-23 17:17:35 -07001862 opRegReg(cUnit, kOp2Byte, rlResult.lowReg, rlSrc.lowReg);
1863 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001864 break;
1865 case OP_INT_TO_SHORT:
Bill Buzbee1465db52009-09-23 17:17:35 -07001866 rlSrc = loadValue(cUnit, rlSrc, kCoreReg);
Bill Buzbeec6f10662010-02-09 11:16:15 -08001867 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee1465db52009-09-23 17:17:35 -07001868 opRegReg(cUnit, kOp2Short, rlResult.lowReg, rlSrc.lowReg);
1869 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001870 break;
1871 case OP_INT_TO_CHAR:
Bill Buzbee1465db52009-09-23 17:17:35 -07001872 rlSrc = loadValue(cUnit, rlSrc, kCoreReg);
Bill Buzbeec6f10662010-02-09 11:16:15 -08001873 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee1465db52009-09-23 17:17:35 -07001874 opRegReg(cUnit, kOp2Char, rlResult.lowReg, rlSrc.lowReg);
1875 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001876 break;
1877 case OP_ARRAY_LENGTH: {
1878 int lenOffset = offsetof(ArrayObject, length);
Bill Buzbee1465db52009-09-23 17:17:35 -07001879 rlSrc = loadValue(cUnit, rlSrc, kCoreReg);
1880 genNullCheck(cUnit, rlSrc.sRegLow, rlSrc.lowReg,
1881 mir->offset, NULL);
Bill Buzbeec6f10662010-02-09 11:16:15 -08001882 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee1465db52009-09-23 17:17:35 -07001883 loadWordDisp(cUnit, rlSrc.lowReg, lenOffset,
1884 rlResult.lowReg);
1885 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001886 break;
1887 }
1888 default:
1889 return true;
1890 }
1891 return false;
1892}
1893
1894static bool handleFmt21s(CompilationUnit *cUnit, MIR *mir)
1895{
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001896 Opcode dalvikOpcode = mir->dalvikInsn.opcode;
Bill Buzbee1465db52009-09-23 17:17:35 -07001897 RegLocation rlDest;
1898 RegLocation rlResult;
1899 int BBBB = mir->dalvikInsn.vB;
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001900 if (dalvikOpcode == OP_CONST_WIDE_16) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08001901 rlDest = dvmCompilerGetDestWide(cUnit, mir, 0, 1);
1902 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Ben Chengbd1326d2010-04-02 15:04:53 -07001903 loadConstantNoClobber(cUnit, rlResult.lowReg, BBBB);
Bill Buzbee964a7b02010-01-28 12:54:19 -08001904 //TUNING: do high separately to avoid load dependency
Bill Buzbee1465db52009-09-23 17:17:35 -07001905 opRegRegImm(cUnit, kOpAsr, rlResult.highReg, rlResult.lowReg, 31);
1906 storeValueWide(cUnit, rlDest, rlResult);
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001907 } else if (dalvikOpcode == OP_CONST_16) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08001908 rlDest = dvmCompilerGetDest(cUnit, mir, 0);
1909 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kAnyReg, true);
Ben Chengbd1326d2010-04-02 15:04:53 -07001910 loadConstantNoClobber(cUnit, rlResult.lowReg, BBBB);
Bill Buzbee1465db52009-09-23 17:17:35 -07001911 storeValue(cUnit, rlDest, rlResult);
1912 } else
Ben Chengba4fc8b2009-06-01 13:00:29 -07001913 return true;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001914 return false;
1915}
1916
1917/* Compare agaist zero */
1918static bool handleFmt21t(CompilationUnit *cUnit, MIR *mir, BasicBlock *bb,
Bill Buzbee89efc3d2009-07-28 11:22:22 -07001919 ArmLIR *labelList)
Ben Chengba4fc8b2009-06-01 13:00:29 -07001920{
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001921 Opcode dalvikOpcode = mir->dalvikInsn.opcode;
Bill Buzbee89efc3d2009-07-28 11:22:22 -07001922 ArmConditionCode cond;
Bill Buzbeec6f10662010-02-09 11:16:15 -08001923 RegLocation rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07001924 rlSrc = loadValue(cUnit, rlSrc, kCoreReg);
1925 opRegImm(cUnit, kOpCmp, rlSrc.lowReg, 0);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001926
Bill Buzbee270c1d62009-08-13 16:58:07 -07001927//TUNING: break this out to allow use of Thumb2 CB[N]Z
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001928 switch (dalvikOpcode) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07001929 case OP_IF_EQZ:
Bill Buzbee1465db52009-09-23 17:17:35 -07001930 cond = kArmCondEq;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001931 break;
1932 case OP_IF_NEZ:
Bill Buzbee1465db52009-09-23 17:17:35 -07001933 cond = kArmCondNe;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001934 break;
1935 case OP_IF_LTZ:
Bill Buzbee1465db52009-09-23 17:17:35 -07001936 cond = kArmCondLt;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001937 break;
1938 case OP_IF_GEZ:
Bill Buzbee1465db52009-09-23 17:17:35 -07001939 cond = kArmCondGe;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001940 break;
1941 case OP_IF_GTZ:
Bill Buzbee1465db52009-09-23 17:17:35 -07001942 cond = kArmCondGt;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001943 break;
1944 case OP_IF_LEZ:
Bill Buzbee1465db52009-09-23 17:17:35 -07001945 cond = kArmCondLe;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001946 break;
1947 default:
1948 cond = 0;
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001949 LOGE("Unexpected opcode (%d) for Fmt21t\n", dalvikOpcode);
Bill Buzbeefc519dc2010-03-06 23:30:57 -08001950 dvmCompilerAbort(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001951 }
1952 genConditionalBranch(cUnit, cond, &labelList[bb->taken->id]);
1953 /* This mostly likely will be optimized away in a later phase */
1954 genUnconditionalBranch(cUnit, &labelList[bb->fallThrough->id]);
1955 return false;
1956}
1957
Elliott Hughesb4c05972010-02-24 16:36:18 -08001958static bool isPowerOfTwo(int x)
1959{
1960 return (x & (x - 1)) == 0;
1961}
1962
1963// Returns true if no more than two bits are set in 'x'.
1964static bool isPopCountLE2(unsigned int x)
1965{
1966 x &= x - 1;
1967 return (x & (x - 1)) == 0;
1968}
1969
1970// Returns the index of the lowest set bit in 'x'.
1971static int lowestSetBit(unsigned int x) {
1972 int bit_posn = 0;
1973 while ((x & 0xf) == 0) {
1974 bit_posn += 4;
1975 x >>= 4;
Bill Buzbee78cb0e22010-02-11 14:04:53 -08001976 }
Elliott Hughesb4c05972010-02-24 16:36:18 -08001977 while ((x & 1) == 0) {
1978 bit_posn++;
1979 x >>= 1;
1980 }
1981 return bit_posn;
1982}
1983
Elliott Hughes672511b2010-04-26 17:40:13 -07001984// Returns true if it added instructions to 'cUnit' to divide 'rlSrc' by 'lit'
1985// and store the result in 'rlDest'.
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001986static bool handleEasyDivide(CompilationUnit *cUnit, Opcode dalvikOpcode,
Elliott Hughes672511b2010-04-26 17:40:13 -07001987 RegLocation rlSrc, RegLocation rlDest, int lit)
1988{
1989 if (lit < 2 || !isPowerOfTwo(lit)) {
1990 return false;
1991 }
1992 int k = lowestSetBit(lit);
1993 if (k >= 30) {
1994 // Avoid special cases.
1995 return false;
1996 }
Dan Bornstein9a1f8162010-12-01 17:02:26 -08001997 bool div = (dalvikOpcode == OP_DIV_INT_LIT8 || dalvikOpcode == OP_DIV_INT_LIT16);
Elliott Hughes672511b2010-04-26 17:40:13 -07001998 rlSrc = loadValue(cUnit, rlSrc, kCoreReg);
1999 RegLocation rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Elliott Hughes9c457022010-04-28 16:15:38 -07002000 if (div) {
2001 int tReg = dvmCompilerAllocTemp(cUnit);
2002 if (lit == 2) {
2003 // Division by 2 is by far the most common division by constant.
2004 opRegRegImm(cUnit, kOpLsr, tReg, rlSrc.lowReg, 32 - k);
2005 opRegRegReg(cUnit, kOpAdd, tReg, tReg, rlSrc.lowReg);
2006 opRegRegImm(cUnit, kOpAsr, rlResult.lowReg, tReg, k);
2007 } else {
2008 opRegRegImm(cUnit, kOpAsr, tReg, rlSrc.lowReg, 31);
2009 opRegRegImm(cUnit, kOpLsr, tReg, tReg, 32 - k);
2010 opRegRegReg(cUnit, kOpAdd, tReg, tReg, rlSrc.lowReg);
2011 opRegRegImm(cUnit, kOpAsr, rlResult.lowReg, tReg, k);
2012 }
Elliott Hughes672511b2010-04-26 17:40:13 -07002013 } else {
Elliott Hughes9c457022010-04-28 16:15:38 -07002014 int cReg = dvmCompilerAllocTemp(cUnit);
2015 loadConstant(cUnit, cReg, lit - 1);
2016 int tReg1 = dvmCompilerAllocTemp(cUnit);
2017 int tReg2 = dvmCompilerAllocTemp(cUnit);
2018 if (lit == 2) {
2019 opRegRegImm(cUnit, kOpLsr, tReg1, rlSrc.lowReg, 32 - k);
2020 opRegRegReg(cUnit, kOpAdd, tReg2, tReg1, rlSrc.lowReg);
2021 opRegRegReg(cUnit, kOpAnd, tReg2, tReg2, cReg);
2022 opRegRegReg(cUnit, kOpSub, rlResult.lowReg, tReg2, tReg1);
2023 } else {
2024 opRegRegImm(cUnit, kOpAsr, tReg1, rlSrc.lowReg, 31);
2025 opRegRegImm(cUnit, kOpLsr, tReg1, tReg1, 32 - k);
2026 opRegRegReg(cUnit, kOpAdd, tReg2, tReg1, rlSrc.lowReg);
2027 opRegRegReg(cUnit, kOpAnd, tReg2, tReg2, cReg);
2028 opRegRegReg(cUnit, kOpSub, rlResult.lowReg, tReg2, tReg1);
2029 }
Elliott Hughes672511b2010-04-26 17:40:13 -07002030 }
2031 storeValue(cUnit, rlDest, rlResult);
2032 return true;
2033}
2034
Elliott Hughesb4c05972010-02-24 16:36:18 -08002035// Returns true if it added instructions to 'cUnit' to multiply 'rlSrc' by 'lit'
2036// and store the result in 'rlDest'.
2037static bool handleEasyMultiply(CompilationUnit *cUnit,
2038 RegLocation rlSrc, RegLocation rlDest, int lit)
2039{
2040 // Can we simplify this multiplication?
2041 bool powerOfTwo = false;
2042 bool popCountLE2 = false;
2043 bool powerOfTwoMinusOne = false;
2044 if (lit < 2) {
2045 // Avoid special cases.
2046 return false;
2047 } else if (isPowerOfTwo(lit)) {
2048 powerOfTwo = true;
2049 } else if (isPopCountLE2(lit)) {
2050 popCountLE2 = true;
2051 } else if (isPowerOfTwo(lit + 1)) {
2052 powerOfTwoMinusOne = true;
2053 } else {
2054 return false;
2055 }
2056 rlSrc = loadValue(cUnit, rlSrc, kCoreReg);
2057 RegLocation rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
2058 if (powerOfTwo) {
2059 // Shift.
2060 opRegRegImm(cUnit, kOpLsl, rlResult.lowReg, rlSrc.lowReg,
2061 lowestSetBit(lit));
2062 } else if (popCountLE2) {
2063 // Shift and add and shift.
2064 int firstBit = lowestSetBit(lit);
2065 int secondBit = lowestSetBit(lit ^ (1 << firstBit));
2066 genMultiplyByTwoBitMultiplier(cUnit, rlSrc, rlResult, lit,
2067 firstBit, secondBit);
2068 } else {
2069 // Reverse subtract: (src << (shift + 1)) - src.
2070 assert(powerOfTwoMinusOne);
2071 // TODO: rsb dst, src, src lsl#lowestSetBit(lit + 1)
2072 int tReg = dvmCompilerAllocTemp(cUnit);
2073 opRegRegImm(cUnit, kOpLsl, tReg, rlSrc.lowReg, lowestSetBit(lit + 1));
2074 opRegRegReg(cUnit, kOpSub, rlResult.lowReg, tReg, rlSrc.lowReg);
2075 }
2076 storeValue(cUnit, rlDest, rlResult);
2077 return true;
Bill Buzbee78cb0e22010-02-11 14:04:53 -08002078}
2079
Ben Chengba4fc8b2009-06-01 13:00:29 -07002080static bool handleFmt22b_Fmt22s(CompilationUnit *cUnit, MIR *mir)
2081{
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002082 Opcode dalvikOpcode = mir->dalvikInsn.opcode;
Bill Buzbeec6f10662010-02-09 11:16:15 -08002083 RegLocation rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
2084 RegLocation rlDest = dvmCompilerGetDest(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07002085 RegLocation rlResult;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002086 int lit = mir->dalvikInsn.vC;
Ben Cheng4f489172009-09-27 17:08:35 -07002087 OpKind op = 0; /* Make gcc happy */
Bill Buzbee1465db52009-09-23 17:17:35 -07002088 int shiftOp = false;
2089 bool isDiv = false;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002090
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002091 switch (dalvikOpcode) {
Bill Buzbee1465db52009-09-23 17:17:35 -07002092 case OP_RSUB_INT_LIT8:
2093 case OP_RSUB_INT: {
2094 int tReg;
2095 //TUNING: add support for use of Arm rsub op
2096 rlSrc = loadValue(cUnit, rlSrc, kCoreReg);
Bill Buzbeec6f10662010-02-09 11:16:15 -08002097 tReg = dvmCompilerAllocTemp(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07002098 loadConstant(cUnit, tReg, lit);
Bill Buzbeec6f10662010-02-09 11:16:15 -08002099 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee1465db52009-09-23 17:17:35 -07002100 opRegRegReg(cUnit, kOpSub, rlResult.lowReg,
2101 tReg, rlSrc.lowReg);
2102 storeValue(cUnit, rlDest, rlResult);
2103 return false;
2104 break;
2105 }
2106
Ben Chengba4fc8b2009-06-01 13:00:29 -07002107 case OP_ADD_INT_LIT8:
2108 case OP_ADD_INT_LIT16:
Bill Buzbee1465db52009-09-23 17:17:35 -07002109 op = kOpAdd;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002110 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002111 case OP_MUL_INT_LIT8:
Bill Buzbee78cb0e22010-02-11 14:04:53 -08002112 case OP_MUL_INT_LIT16: {
Elliott Hughesb4c05972010-02-24 16:36:18 -08002113 if (handleEasyMultiply(cUnit, rlSrc, rlDest, lit)) {
2114 return false;
Bill Buzbee78cb0e22010-02-11 14:04:53 -08002115 }
Elliott Hughesb4c05972010-02-24 16:36:18 -08002116 op = kOpMul;
Bill Buzbee1465db52009-09-23 17:17:35 -07002117 break;
Bill Buzbee78cb0e22010-02-11 14:04:53 -08002118 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07002119 case OP_AND_INT_LIT8:
2120 case OP_AND_INT_LIT16:
Bill Buzbee1465db52009-09-23 17:17:35 -07002121 op = kOpAnd;
2122 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002123 case OP_OR_INT_LIT8:
2124 case OP_OR_INT_LIT16:
Bill Buzbee1465db52009-09-23 17:17:35 -07002125 op = kOpOr;
2126 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002127 case OP_XOR_INT_LIT8:
2128 case OP_XOR_INT_LIT16:
Bill Buzbee1465db52009-09-23 17:17:35 -07002129 op = kOpXor;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002130 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002131 case OP_SHL_INT_LIT8:
Bill Buzbee0e605272009-12-01 14:28:05 -08002132 lit &= 31;
Bill Buzbee1465db52009-09-23 17:17:35 -07002133 shiftOp = true;
2134 op = kOpLsl;
2135 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002136 case OP_SHR_INT_LIT8:
Bill Buzbee0e605272009-12-01 14:28:05 -08002137 lit &= 31;
Bill Buzbee1465db52009-09-23 17:17:35 -07002138 shiftOp = true;
2139 op = kOpAsr;
2140 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002141 case OP_USHR_INT_LIT8:
Bill Buzbee0e605272009-12-01 14:28:05 -08002142 lit &= 31;
Bill Buzbee1465db52009-09-23 17:17:35 -07002143 shiftOp = true;
2144 op = kOpLsr;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002145 break;
2146
2147 case OP_DIV_INT_LIT8:
2148 case OP_DIV_INT_LIT16:
Ben Chengba4fc8b2009-06-01 13:00:29 -07002149 case OP_REM_INT_LIT8:
2150 case OP_REM_INT_LIT16:
2151 if (lit == 0) {
2152 /* Let the interpreter deal with div by 0 */
2153 genInterpSingleStep(cUnit, mir);
2154 return false;
2155 }
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002156 if (handleEasyDivide(cUnit, dalvikOpcode, rlSrc, rlDest, lit)) {
Elliott Hughes672511b2010-04-26 17:40:13 -07002157 return false;
2158 }
Bill Buzbeec6f10662010-02-09 11:16:15 -08002159 dvmCompilerFlushAllRegs(cUnit); /* Everything to home location */
Bill Buzbee1465db52009-09-23 17:17:35 -07002160 loadValueDirectFixed(cUnit, rlSrc, r0);
Bill Buzbeec6f10662010-02-09 11:16:15 -08002161 dvmCompilerClobber(cUnit, r0);
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002162 if ((dalvikOpcode == OP_DIV_INT_LIT8) ||
2163 (dalvikOpcode == OP_DIV_INT_LIT16)) {
Ben Chengbd1326d2010-04-02 15:04:53 -07002164 LOAD_FUNC_ADDR(cUnit, r2, (int)__aeabi_idiv);
Bill Buzbee1465db52009-09-23 17:17:35 -07002165 isDiv = true;
2166 } else {
Ben Chengbd1326d2010-04-02 15:04:53 -07002167 LOAD_FUNC_ADDR(cUnit, r2, (int)__aeabi_idivmod);
Bill Buzbee1465db52009-09-23 17:17:35 -07002168 isDiv = false;
2169 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07002170 loadConstant(cUnit, r1, lit);
Bill Buzbee1465db52009-09-23 17:17:35 -07002171 opReg(cUnit, kOpBlx, r2);
Elliott Hughes6a555132010-02-25 15:41:42 -08002172 dvmCompilerClobberCallRegs(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07002173 if (isDiv)
Bill Buzbeec6f10662010-02-09 11:16:15 -08002174 rlResult = dvmCompilerGetReturn(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07002175 else
Bill Buzbeec6f10662010-02-09 11:16:15 -08002176 rlResult = dvmCompilerGetReturnAlt(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07002177 storeValue(cUnit, rlDest, rlResult);
2178 return false;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002179 break;
2180 default:
2181 return true;
2182 }
Bill Buzbee1465db52009-09-23 17:17:35 -07002183 rlSrc = loadValue(cUnit, rlSrc, kCoreReg);
Bill Buzbeec6f10662010-02-09 11:16:15 -08002184 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee1465db52009-09-23 17:17:35 -07002185 // Avoid shifts by literal 0 - no support in Thumb. Change to copy
2186 if (shiftOp && (lit == 0)) {
2187 genRegCopy(cUnit, rlResult.lowReg, rlSrc.lowReg);
2188 } else {
2189 opRegRegImm(cUnit, op, rlResult.lowReg, rlSrc.lowReg, lit);
2190 }
2191 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002192 return false;
2193}
2194
2195static bool handleFmt22c(CompilationUnit *cUnit, MIR *mir)
2196{
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002197 Opcode dalvikOpcode = mir->dalvikInsn.opcode;
buzbee4d92e682010-07-29 15:24:14 -07002198 int fieldOffset = -1;
buzbeeecf8f6e2010-07-20 14:53:42 -07002199 bool isVolatile = false;
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002200 switch (dalvikOpcode) {
buzbee4d92e682010-07-29 15:24:14 -07002201 /*
2202 * Wide volatiles currently handled via single step.
2203 * Add them here if generating in-line code.
2204 * case OP_IGET_WIDE_VOLATILE:
2205 * case OP_IPUT_WIDE_VOLATILE:
2206 */
2207 case OP_IGET:
2208 case OP_IGET_VOLATILE:
2209 case OP_IGET_WIDE:
2210 case OP_IGET_OBJECT:
2211 case OP_IGET_OBJECT_VOLATILE:
2212 case OP_IGET_BOOLEAN:
2213 case OP_IGET_BYTE:
2214 case OP_IGET_CHAR:
2215 case OP_IGET_SHORT:
2216 case OP_IPUT:
2217 case OP_IPUT_VOLATILE:
2218 case OP_IPUT_WIDE:
2219 case OP_IPUT_OBJECT:
2220 case OP_IPUT_OBJECT_VOLATILE:
2221 case OP_IPUT_BOOLEAN:
2222 case OP_IPUT_BYTE:
2223 case OP_IPUT_CHAR:
2224 case OP_IPUT_SHORT: {
Ben Cheng7a2697d2010-06-07 13:44:23 -07002225 const Method *method = (mir->OptimizationFlags & MIR_CALLEE) ?
2226 mir->meta.calleeMethod : cUnit->method;
buzbee4d92e682010-07-29 15:24:14 -07002227 Field *fieldPtr =
Ben Cheng7a2697d2010-06-07 13:44:23 -07002228 method->clazz->pDvmDex->pResFields[mir->dalvikInsn.vC];
Ben Chengba4fc8b2009-06-01 13:00:29 -07002229
buzbee4d92e682010-07-29 15:24:14 -07002230 if (fieldPtr == NULL) {
2231 LOGE("Unexpected null instance field");
2232 dvmAbort();
2233 }
2234 isVolatile = dvmIsVolatileField(fieldPtr);
2235 fieldOffset = ((InstField *)fieldPtr)->byteOffset;
2236 break;
Ben Chengdd6e8702010-05-07 13:05:47 -07002237 }
buzbee4d92e682010-07-29 15:24:14 -07002238 default:
2239 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002240 }
buzbee4d92e682010-07-29 15:24:14 -07002241
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002242 switch (dalvikOpcode) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07002243 case OP_NEW_ARRAY: {
Bill Buzbee1465db52009-09-23 17:17:35 -07002244 // Generates a call - use explicit registers
Bill Buzbeec6f10662010-02-09 11:16:15 -08002245 RegLocation rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
2246 RegLocation rlDest = dvmCompilerGetDest(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07002247 RegLocation rlResult;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002248 void *classPtr = (void*)
2249 (cUnit->method->clazz->pDvmDex->pResClasses[mir->dalvikInsn.vC]);
Ben Chengdd6e8702010-05-07 13:05:47 -07002250
2251 if (classPtr == NULL) {
2252 LOGE("Unexpected null class");
2253 dvmAbort();
2254 }
2255
Bill Buzbeec6f10662010-02-09 11:16:15 -08002256 dvmCompilerFlushAllRegs(cUnit); /* Everything to home location */
Bill Buzbee1465db52009-09-23 17:17:35 -07002257 genExportPC(cUnit, mir);
2258 loadValueDirectFixed(cUnit, rlSrc, r1); /* Len */
Ben Chengba4fc8b2009-06-01 13:00:29 -07002259 loadConstant(cUnit, r0, (int) classPtr );
Ben Chengbd1326d2010-04-02 15:04:53 -07002260 LOAD_FUNC_ADDR(cUnit, r3, (int)dvmAllocArrayByClass);
Ben Cheng4f489172009-09-27 17:08:35 -07002261 /*
2262 * "len < 0": bail to the interpreter to re-execute the
2263 * instruction
2264 */
Carl Shapiroe3c01da2010-05-20 22:54:18 -07002265 genRegImmCheck(cUnit, kArmCondMi, r1, 0, mir->offset, NULL);
Bill Buzbee270c1d62009-08-13 16:58:07 -07002266 loadConstant(cUnit, r2, ALLOC_DONT_TRACK);
Bill Buzbee1465db52009-09-23 17:17:35 -07002267 opReg(cUnit, kOpBlx, r3);
Elliott Hughes6a555132010-02-25 15:41:42 -08002268 dvmCompilerClobberCallRegs(cUnit);
Ben Cheng4f489172009-09-27 17:08:35 -07002269 /* generate a branch over if allocation is successful */
buzbee8f8109a2010-08-31 10:16:35 -07002270 ArmLIR *branchOver = genCmpImmBranch(cUnit, kArmCondNe, r0, 0);
Ben Cheng4f489172009-09-27 17:08:35 -07002271 /*
2272 * OOM exception needs to be thrown here and cannot re-execute
2273 */
2274 loadConstant(cUnit, r0,
2275 (int) (cUnit->method->insns + mir->offset));
2276 genDispatchToHandler(cUnit, TEMPLATE_THROW_EXCEPTION_COMMON);
2277 /* noreturn */
2278
Bill Buzbee1465db52009-09-23 17:17:35 -07002279 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
Ben Cheng4f489172009-09-27 17:08:35 -07002280 target->defMask = ENCODE_ALL;
2281 branchOver->generic.target = (LIR *) target;
Bill Buzbeec6f10662010-02-09 11:16:15 -08002282 rlResult = dvmCompilerGetReturn(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07002283 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002284 break;
2285 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07002286 case OP_INSTANCE_OF: {
Bill Buzbee1465db52009-09-23 17:17:35 -07002287 // May generate a call - use explicit registers
Bill Buzbeec6f10662010-02-09 11:16:15 -08002288 RegLocation rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
2289 RegLocation rlDest = dvmCompilerGetDest(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07002290 RegLocation rlResult;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002291 ClassObject *classPtr =
2292 (cUnit->method->clazz->pDvmDex->pResClasses[mir->dalvikInsn.vC]);
Bill Buzbee480e6782010-01-27 15:43:08 -08002293 /*
2294 * Note: It is possible that classPtr is NULL at this point,
2295 * even though this instruction has been successfully interpreted.
2296 * If the previous interpretation had a null source, the
2297 * interpreter would not have bothered to resolve the clazz.
2298 * Bail out to the interpreter in this case, and log it
2299 * so that we can tell if it happens frequently.
2300 */
2301 if (classPtr == NULL) {
2302 LOGD("null clazz in OP_INSTANCE_OF, single-stepping");
2303 genInterpSingleStep(cUnit, mir);
2304 break;
2305 }
Bill Buzbeec6f10662010-02-09 11:16:15 -08002306 dvmCompilerFlushAllRegs(cUnit); /* Everything to home location */
Bill Buzbee1465db52009-09-23 17:17:35 -07002307 loadValueDirectFixed(cUnit, rlSrc, r0); /* Ref */
Ben Chengba4fc8b2009-06-01 13:00:29 -07002308 loadConstant(cUnit, r2, (int) classPtr );
Ben Cheng752c7942009-06-22 10:50:07 -07002309 /* When taken r0 has NULL which can be used for store directly */
buzbee8f8109a2010-08-31 10:16:35 -07002310 ArmLIR *branch1 = genCmpImmBranch(cUnit, kArmCondEq, r0, 0);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002311 /* r1 now contains object->clazz */
Bill Buzbee270c1d62009-08-13 16:58:07 -07002312 loadWordDisp(cUnit, r0, offsetof(Object, clazz), r1);
Bill Buzbee1465db52009-09-23 17:17:35 -07002313 /* r1 now contains object->clazz */
Ben Chengbd1326d2010-04-02 15:04:53 -07002314 LOAD_FUNC_ADDR(cUnit, r3, (int)dvmInstanceofNonTrivial);
Ben Cheng752c7942009-06-22 10:50:07 -07002315 loadConstant(cUnit, r0, 1); /* Assume true */
Bill Buzbee1465db52009-09-23 17:17:35 -07002316 opRegReg(cUnit, kOpCmp, r1, r2);
2317 ArmLIR *branch2 = opCondBranch(cUnit, kArmCondEq);
2318 genRegCopy(cUnit, r0, r1);
2319 genRegCopy(cUnit, r1, r2);
2320 opReg(cUnit, kOpBlx, r3);
Elliott Hughes6a555132010-02-25 15:41:42 -08002321 dvmCompilerClobberCallRegs(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002322 /* branch target here */
Bill Buzbee1465db52009-09-23 17:17:35 -07002323 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
Ben Chengd7d426a2009-09-22 11:23:36 -07002324 target->defMask = ENCODE_ALL;
Bill Buzbeec6f10662010-02-09 11:16:15 -08002325 rlResult = dvmCompilerGetReturn(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07002326 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002327 branch1->generic.target = (LIR *)target;
2328 branch2->generic.target = (LIR *)target;
2329 break;
2330 }
2331 case OP_IGET_WIDE:
2332 genIGetWide(cUnit, mir, fieldOffset);
2333 break;
buzbeeecf8f6e2010-07-20 14:53:42 -07002334 case OP_IGET_VOLATILE:
2335 case OP_IGET_OBJECT_VOLATILE:
2336 isVolatile = true;
2337 // NOTE: intentional fallthrough
Ben Chengba4fc8b2009-06-01 13:00:29 -07002338 case OP_IGET:
2339 case OP_IGET_OBJECT:
Ben Chengba4fc8b2009-06-01 13:00:29 -07002340 case OP_IGET_BOOLEAN:
Ben Chengba4fc8b2009-06-01 13:00:29 -07002341 case OP_IGET_BYTE:
Ben Chengba4fc8b2009-06-01 13:00:29 -07002342 case OP_IGET_CHAR:
Ben Chengba4fc8b2009-06-01 13:00:29 -07002343 case OP_IGET_SHORT:
buzbee3272e2f2010-09-09 14:07:01 -07002344 genIGet(cUnit, mir, kWord, fieldOffset, isVolatile);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002345 break;
2346 case OP_IPUT_WIDE:
2347 genIPutWide(cUnit, mir, fieldOffset);
2348 break;
2349 case OP_IPUT:
buzbee3272e2f2010-09-09 14:07:01 -07002350 case OP_IPUT_SHORT:
2351 case OP_IPUT_CHAR:
2352 case OP_IPUT_BYTE:
2353 case OP_IPUT_BOOLEAN:
buzbeeecf8f6e2010-07-20 14:53:42 -07002354 genIPut(cUnit, mir, kWord, fieldOffset, false, isVolatile);
buzbee919eb062010-07-12 12:59:22 -07002355 break;
buzbee4d92e682010-07-29 15:24:14 -07002356 case OP_IPUT_VOLATILE:
buzbeeecf8f6e2010-07-20 14:53:42 -07002357 case OP_IPUT_OBJECT_VOLATILE:
2358 isVolatile = true;
2359 // NOTE: intentional fallthrough
Ben Chengba4fc8b2009-06-01 13:00:29 -07002360 case OP_IPUT_OBJECT:
buzbeeecf8f6e2010-07-20 14:53:42 -07002361 genIPut(cUnit, mir, kWord, fieldOffset, true, isVolatile);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002362 break;
Bill Buzbeeb16344a2010-03-15 17:19:12 -07002363 case OP_IGET_WIDE_VOLATILE:
2364 case OP_IPUT_WIDE_VOLATILE:
Bill Buzbeeb16344a2010-03-15 17:19:12 -07002365 genInterpSingleStep(cUnit, mir);
2366 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002367 default:
2368 return true;
2369 }
2370 return false;
2371}
2372
2373static bool handleFmt22cs(CompilationUnit *cUnit, MIR *mir)
2374{
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002375 Opcode dalvikOpcode = mir->dalvikInsn.opcode;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002376 int fieldOffset = mir->dalvikInsn.vC;
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002377 switch (dalvikOpcode) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07002378 case OP_IGET_QUICK:
2379 case OP_IGET_OBJECT_QUICK:
buzbeeecf8f6e2010-07-20 14:53:42 -07002380 genIGet(cUnit, mir, kWord, fieldOffset, false);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002381 break;
2382 case OP_IPUT_QUICK:
buzbeeecf8f6e2010-07-20 14:53:42 -07002383 genIPut(cUnit, mir, kWord, fieldOffset, false, false);
buzbee919eb062010-07-12 12:59:22 -07002384 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002385 case OP_IPUT_OBJECT_QUICK:
buzbeeecf8f6e2010-07-20 14:53:42 -07002386 genIPut(cUnit, mir, kWord, fieldOffset, true, false);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002387 break;
2388 case OP_IGET_WIDE_QUICK:
2389 genIGetWide(cUnit, mir, fieldOffset);
2390 break;
2391 case OP_IPUT_WIDE_QUICK:
2392 genIPutWide(cUnit, mir, fieldOffset);
2393 break;
2394 default:
2395 return true;
2396 }
2397 return false;
2398
2399}
2400
2401/* Compare agaist zero */
2402static bool handleFmt22t(CompilationUnit *cUnit, MIR *mir, BasicBlock *bb,
Bill Buzbee89efc3d2009-07-28 11:22:22 -07002403 ArmLIR *labelList)
Ben Chengba4fc8b2009-06-01 13:00:29 -07002404{
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002405 Opcode dalvikOpcode = mir->dalvikInsn.opcode;
Bill Buzbee89efc3d2009-07-28 11:22:22 -07002406 ArmConditionCode cond;
Bill Buzbeec6f10662010-02-09 11:16:15 -08002407 RegLocation rlSrc1 = dvmCompilerGetSrc(cUnit, mir, 0);
2408 RegLocation rlSrc2 = dvmCompilerGetSrc(cUnit, mir, 1);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002409
Bill Buzbee1465db52009-09-23 17:17:35 -07002410 rlSrc1 = loadValue(cUnit, rlSrc1, kCoreReg);
2411 rlSrc2 = loadValue(cUnit, rlSrc2, kCoreReg);
2412 opRegReg(cUnit, kOpCmp, rlSrc1.lowReg, rlSrc2.lowReg);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002413
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002414 switch (dalvikOpcode) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07002415 case OP_IF_EQ:
Bill Buzbee1465db52009-09-23 17:17:35 -07002416 cond = kArmCondEq;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002417 break;
2418 case OP_IF_NE:
Bill Buzbee1465db52009-09-23 17:17:35 -07002419 cond = kArmCondNe;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002420 break;
2421 case OP_IF_LT:
Bill Buzbee1465db52009-09-23 17:17:35 -07002422 cond = kArmCondLt;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002423 break;
2424 case OP_IF_GE:
Bill Buzbee1465db52009-09-23 17:17:35 -07002425 cond = kArmCondGe;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002426 break;
2427 case OP_IF_GT:
Bill Buzbee1465db52009-09-23 17:17:35 -07002428 cond = kArmCondGt;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002429 break;
2430 case OP_IF_LE:
Bill Buzbee1465db52009-09-23 17:17:35 -07002431 cond = kArmCondLe;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002432 break;
2433 default:
2434 cond = 0;
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002435 LOGE("Unexpected opcode (%d) for Fmt22t\n", dalvikOpcode);
Bill Buzbeefc519dc2010-03-06 23:30:57 -08002436 dvmCompilerAbort(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002437 }
2438 genConditionalBranch(cUnit, cond, &labelList[bb->taken->id]);
2439 /* This mostly likely will be optimized away in a later phase */
2440 genUnconditionalBranch(cUnit, &labelList[bb->fallThrough->id]);
2441 return false;
2442}
2443
2444static bool handleFmt22x_Fmt32x(CompilationUnit *cUnit, MIR *mir)
2445{
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002446 Opcode opcode = mir->dalvikInsn.opcode;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002447
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002448 switch (opcode) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07002449 case OP_MOVE_16:
2450 case OP_MOVE_OBJECT_16:
2451 case OP_MOVE_FROM16:
Ben Chenge9695e52009-06-16 16:11:47 -07002452 case OP_MOVE_OBJECT_FROM16: {
Bill Buzbeec6f10662010-02-09 11:16:15 -08002453 storeValue(cUnit, dvmCompilerGetDest(cUnit, mir, 0),
2454 dvmCompilerGetSrc(cUnit, mir, 0));
Ben Chengba4fc8b2009-06-01 13:00:29 -07002455 break;
Ben Chenge9695e52009-06-16 16:11:47 -07002456 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07002457 case OP_MOVE_WIDE_16:
Ben Chenge9695e52009-06-16 16:11:47 -07002458 case OP_MOVE_WIDE_FROM16: {
Bill Buzbeec6f10662010-02-09 11:16:15 -08002459 storeValueWide(cUnit, dvmCompilerGetDestWide(cUnit, mir, 0, 1),
2460 dvmCompilerGetSrcWide(cUnit, mir, 0, 1));
Ben Chengba4fc8b2009-06-01 13:00:29 -07002461 break;
Ben Chenge9695e52009-06-16 16:11:47 -07002462 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07002463 default:
2464 return true;
2465 }
2466 return false;
2467}
2468
2469static bool handleFmt23x(CompilationUnit *cUnit, MIR *mir)
2470{
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002471 Opcode opcode = mir->dalvikInsn.opcode;
Bill Buzbee1465db52009-09-23 17:17:35 -07002472 RegLocation rlSrc1;
2473 RegLocation rlSrc2;
2474 RegLocation rlDest;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002475
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002476 if ( (opcode >= OP_ADD_INT) && (opcode <= OP_REM_DOUBLE)) {
Ben Cheng5d90c202009-11-22 23:31:11 -08002477 return genArithOp( cUnit, mir );
Ben Chengba4fc8b2009-06-01 13:00:29 -07002478 }
2479
Bill Buzbee1465db52009-09-23 17:17:35 -07002480 /* APUTs have 3 sources and no targets */
2481 if (mir->ssaRep->numDefs == 0) {
2482 if (mir->ssaRep->numUses == 3) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08002483 rlDest = dvmCompilerGetSrc(cUnit, mir, 0);
2484 rlSrc1 = dvmCompilerGetSrc(cUnit, mir, 1);
2485 rlSrc2 = dvmCompilerGetSrc(cUnit, mir, 2);
Bill Buzbee1465db52009-09-23 17:17:35 -07002486 } else {
2487 assert(mir->ssaRep->numUses == 4);
Bill Buzbeec6f10662010-02-09 11:16:15 -08002488 rlDest = dvmCompilerGetSrcWide(cUnit, mir, 0, 1);
2489 rlSrc1 = dvmCompilerGetSrc(cUnit, mir, 2);
2490 rlSrc2 = dvmCompilerGetSrc(cUnit, mir, 3);
Bill Buzbee1465db52009-09-23 17:17:35 -07002491 }
2492 } else {
2493 /* Two sources and 1 dest. Deduce the operand sizes */
2494 if (mir->ssaRep->numUses == 4) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08002495 rlSrc1 = dvmCompilerGetSrcWide(cUnit, mir, 0, 1);
2496 rlSrc2 = dvmCompilerGetSrcWide(cUnit, mir, 2, 3);
Bill Buzbee1465db52009-09-23 17:17:35 -07002497 } else {
2498 assert(mir->ssaRep->numUses == 2);
Bill Buzbeec6f10662010-02-09 11:16:15 -08002499 rlSrc1 = dvmCompilerGetSrc(cUnit, mir, 0);
2500 rlSrc2 = dvmCompilerGetSrc(cUnit, mir, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -07002501 }
2502 if (mir->ssaRep->numDefs == 2) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08002503 rlDest = dvmCompilerGetDestWide(cUnit, mir, 0, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -07002504 } else {
2505 assert(mir->ssaRep->numDefs == 1);
Bill Buzbeec6f10662010-02-09 11:16:15 -08002506 rlDest = dvmCompilerGetDest(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07002507 }
2508 }
2509
2510
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002511 switch (opcode) {
Bill Buzbeed45ba372009-06-15 17:00:57 -07002512 case OP_CMPL_FLOAT:
2513 case OP_CMPG_FLOAT:
2514 case OP_CMPL_DOUBLE:
2515 case OP_CMPG_DOUBLE:
Ben Cheng5d90c202009-11-22 23:31:11 -08002516 return genCmpFP(cUnit, mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002517 case OP_CMP_LONG:
Bill Buzbee1465db52009-09-23 17:17:35 -07002518 genCmpLong(cUnit, mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002519 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002520 case OP_AGET_WIDE:
Bill Buzbee1465db52009-09-23 17:17:35 -07002521 genArrayGet(cUnit, mir, kLong, rlSrc1, rlSrc2, rlDest, 3);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002522 break;
2523 case OP_AGET:
2524 case OP_AGET_OBJECT:
Bill Buzbee1465db52009-09-23 17:17:35 -07002525 genArrayGet(cUnit, mir, kWord, rlSrc1, rlSrc2, rlDest, 2);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002526 break;
2527 case OP_AGET_BOOLEAN:
Bill Buzbee1465db52009-09-23 17:17:35 -07002528 genArrayGet(cUnit, mir, kUnsignedByte, rlSrc1, rlSrc2, rlDest, 0);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002529 break;
2530 case OP_AGET_BYTE:
Bill Buzbee1465db52009-09-23 17:17:35 -07002531 genArrayGet(cUnit, mir, kSignedByte, rlSrc1, rlSrc2, rlDest, 0);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002532 break;
2533 case OP_AGET_CHAR:
Bill Buzbee1465db52009-09-23 17:17:35 -07002534 genArrayGet(cUnit, mir, kUnsignedHalf, rlSrc1, rlSrc2, rlDest, 1);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002535 break;
2536 case OP_AGET_SHORT:
Bill Buzbee1465db52009-09-23 17:17:35 -07002537 genArrayGet(cUnit, mir, kSignedHalf, rlSrc1, rlSrc2, rlDest, 1);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002538 break;
2539 case OP_APUT_WIDE:
Bill Buzbee1465db52009-09-23 17:17:35 -07002540 genArrayPut(cUnit, mir, kLong, rlSrc1, rlSrc2, rlDest, 3);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002541 break;
2542 case OP_APUT:
Bill Buzbee1465db52009-09-23 17:17:35 -07002543 genArrayPut(cUnit, mir, kWord, rlSrc1, rlSrc2, rlDest, 2);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002544 break;
Bill Buzbeebe6534f2010-03-12 16:01:35 -08002545 case OP_APUT_OBJECT:
2546 genArrayObjectPut(cUnit, mir, rlSrc1, rlSrc2, rlDest, 2);
2547 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002548 case OP_APUT_SHORT:
2549 case OP_APUT_CHAR:
Bill Buzbee1465db52009-09-23 17:17:35 -07002550 genArrayPut(cUnit, mir, kUnsignedHalf, rlSrc1, rlSrc2, rlDest, 1);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002551 break;
2552 case OP_APUT_BYTE:
2553 case OP_APUT_BOOLEAN:
Bill Buzbee1465db52009-09-23 17:17:35 -07002554 genArrayPut(cUnit, mir, kUnsignedByte, rlSrc1, rlSrc2, rlDest, 0);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002555 break;
2556 default:
2557 return true;
2558 }
2559 return false;
2560}
2561
Ben Cheng6c10a972009-10-29 14:39:18 -07002562/*
2563 * Find the matching case.
2564 *
2565 * return values:
2566 * r0 (low 32-bit): pc of the chaining cell corresponding to the resolved case,
2567 * including default which is placed at MIN(size, MAX_CHAINED_SWITCH_CASES).
2568 * r1 (high 32-bit): the branch offset of the matching case (only for indexes
2569 * above MAX_CHAINED_SWITCH_CASES).
2570 *
2571 * Instructions around the call are:
2572 *
2573 * mov r2, pc
2574 * blx &findPackedSwitchIndex
2575 * mov pc, r0
2576 * .align4
Bill Buzbeebd047242010-05-13 13:02:53 -07002577 * chaining cell for case 0 [12 bytes]
2578 * chaining cell for case 1 [12 bytes]
Ben Cheng6c10a972009-10-29 14:39:18 -07002579 * :
Bill Buzbeebd047242010-05-13 13:02:53 -07002580 * chaining cell for case MIN(size, MAX_CHAINED_SWITCH_CASES)-1 [12 bytes]
Ben Cheng6c10a972009-10-29 14:39:18 -07002581 * chaining cell for case default [8 bytes]
2582 * noChain exit
2583 */
Ben Chengbd1326d2010-04-02 15:04:53 -07002584static s8 findPackedSwitchIndex(const u2* switchData, int testVal, int pc)
Ben Cheng6c10a972009-10-29 14:39:18 -07002585{
2586 int size;
2587 int firstKey;
2588 const int *entries;
2589 int index;
2590 int jumpIndex;
2591 int caseDPCOffset = 0;
2592 /* In Thumb mode pc is 4 ahead of the "mov r2, pc" instruction */
2593 int chainingPC = (pc + 4) & ~3;
2594
2595 /*
2596 * Packed switch data format:
2597 * ushort ident = 0x0100 magic value
2598 * ushort size number of entries in the table
2599 * int first_key first (and lowest) switch case value
2600 * int targets[size] branch targets, relative to switch opcode
2601 *
2602 * Total size is (4+size*2) 16-bit code units.
2603 */
2604 size = switchData[1];
2605 assert(size > 0);
2606
2607 firstKey = switchData[2];
2608 firstKey |= switchData[3] << 16;
2609
2610
2611 /* The entries are guaranteed to be aligned on a 32-bit boundary;
2612 * we can treat them as a native int array.
2613 */
2614 entries = (const int*) &switchData[4];
2615 assert(((u4)entries & 0x3) == 0);
2616
2617 index = testVal - firstKey;
2618
2619 /* Jump to the default cell */
2620 if (index < 0 || index >= size) {
2621 jumpIndex = MIN(size, MAX_CHAINED_SWITCH_CASES);
2622 /* Jump to the non-chaining exit point */
2623 } else if (index >= MAX_CHAINED_SWITCH_CASES) {
2624 jumpIndex = MAX_CHAINED_SWITCH_CASES + 1;
2625 caseDPCOffset = entries[index];
2626 /* Jump to the inline chaining cell */
2627 } else {
2628 jumpIndex = index;
2629 }
2630
Bill Buzbeebd047242010-05-13 13:02:53 -07002631 chainingPC += jumpIndex * CHAIN_CELL_NORMAL_SIZE;
Ben Cheng6c10a972009-10-29 14:39:18 -07002632 return (((s8) caseDPCOffset) << 32) | (u8) chainingPC;
2633}
2634
2635/* See comments for findPackedSwitchIndex */
Ben Chengbd1326d2010-04-02 15:04:53 -07002636static s8 findSparseSwitchIndex(const u2* switchData, int testVal, int pc)
Ben Cheng6c10a972009-10-29 14:39:18 -07002637{
2638 int size;
2639 const int *keys;
2640 const int *entries;
2641 int chainingPC = (pc + 4) & ~3;
2642 int i;
2643
2644 /*
2645 * Sparse switch data format:
2646 * ushort ident = 0x0200 magic value
2647 * ushort size number of entries in the table; > 0
2648 * int keys[size] keys, sorted low-to-high; 32-bit aligned
2649 * int targets[size] branch targets, relative to switch opcode
2650 *
2651 * Total size is (2+size*4) 16-bit code units.
2652 */
2653
2654 size = switchData[1];
2655 assert(size > 0);
2656
2657 /* The keys are guaranteed to be aligned on a 32-bit boundary;
2658 * we can treat them as a native int array.
2659 */
2660 keys = (const int*) &switchData[2];
2661 assert(((u4)keys & 0x3) == 0);
2662
2663 /* The entries are guaranteed to be aligned on a 32-bit boundary;
2664 * we can treat them as a native int array.
2665 */
2666 entries = keys + size;
2667 assert(((u4)entries & 0x3) == 0);
2668
2669 /*
2670 * Run through the list of keys, which are guaranteed to
2671 * be sorted low-to-high.
2672 *
2673 * Most tables have 3-4 entries. Few have more than 10. A binary
2674 * search here is probably not useful.
2675 */
2676 for (i = 0; i < size; i++) {
2677 int k = keys[i];
2678 if (k == testVal) {
2679 /* MAX_CHAINED_SWITCH_CASES + 1 is the start of the overflow case */
2680 int jumpIndex = (i < MAX_CHAINED_SWITCH_CASES) ?
2681 i : MAX_CHAINED_SWITCH_CASES + 1;
Bill Buzbeebd047242010-05-13 13:02:53 -07002682 chainingPC += jumpIndex * CHAIN_CELL_NORMAL_SIZE;
Ben Cheng6c10a972009-10-29 14:39:18 -07002683 return (((s8) entries[i]) << 32) | (u8) chainingPC;
2684 } else if (k > testVal) {
2685 break;
2686 }
2687 }
Bill Buzbeebd047242010-05-13 13:02:53 -07002688 return chainingPC + MIN(size, MAX_CHAINED_SWITCH_CASES) *
2689 CHAIN_CELL_NORMAL_SIZE;
Ben Cheng6c10a972009-10-29 14:39:18 -07002690}
2691
Ben Chengba4fc8b2009-06-01 13:00:29 -07002692static bool handleFmt31t(CompilationUnit *cUnit, MIR *mir)
2693{
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002694 Opcode dalvikOpcode = mir->dalvikInsn.opcode;
2695 switch (dalvikOpcode) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07002696 case OP_FILL_ARRAY_DATA: {
Bill Buzbeec6f10662010-02-09 11:16:15 -08002697 RegLocation rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07002698 // Making a call - use explicit registers
Bill Buzbeec6f10662010-02-09 11:16:15 -08002699 dvmCompilerFlushAllRegs(cUnit); /* Everything to home location */
Bill Buzbee1465db52009-09-23 17:17:35 -07002700 genExportPC(cUnit, mir);
2701 loadValueDirectFixed(cUnit, rlSrc, r0);
Ben Chengbd1326d2010-04-02 15:04:53 -07002702 LOAD_FUNC_ADDR(cUnit, r2, (int)dvmInterpHandleFillArrayData);
Ben Cheng6c10a972009-10-29 14:39:18 -07002703 loadConstant(cUnit, r1,
2704 (int) (cUnit->method->insns + mir->offset + mir->dalvikInsn.vB));
Bill Buzbee1465db52009-09-23 17:17:35 -07002705 opReg(cUnit, kOpBlx, r2);
Elliott Hughes6a555132010-02-25 15:41:42 -08002706 dvmCompilerClobberCallRegs(cUnit);
Bill Buzbeefd023aa2009-11-02 09:23:49 -08002707 /* generate a branch over if successful */
buzbee8f8109a2010-08-31 10:16:35 -07002708 ArmLIR *branchOver = genCmpImmBranch(cUnit, kArmCondNe, r0, 0);
Bill Buzbeefd023aa2009-11-02 09:23:49 -08002709 loadConstant(cUnit, r0,
2710 (int) (cUnit->method->insns + mir->offset));
2711 genDispatchToHandler(cUnit, TEMPLATE_THROW_EXCEPTION_COMMON);
2712 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
2713 target->defMask = ENCODE_ALL;
2714 branchOver->generic.target = (LIR *) target;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002715 break;
2716 }
2717 /*
Ben Cheng6c10a972009-10-29 14:39:18 -07002718 * Compute the goto target of up to
2719 * MIN(switchSize, MAX_CHAINED_SWITCH_CASES) + 1 chaining cells.
2720 * See the comment before findPackedSwitchIndex for the code layout.
Ben Chengba4fc8b2009-06-01 13:00:29 -07002721 */
2722 case OP_PACKED_SWITCH:
2723 case OP_SPARSE_SWITCH: {
Bill Buzbeec6f10662010-02-09 11:16:15 -08002724 RegLocation rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
2725 dvmCompilerFlushAllRegs(cUnit); /* Everything to home location */
Bill Buzbee1465db52009-09-23 17:17:35 -07002726 loadValueDirectFixed(cUnit, rlSrc, r1);
Bill Buzbeec6f10662010-02-09 11:16:15 -08002727 dvmCompilerLockAllTemps(cUnit);
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002728 if (dalvikOpcode == OP_PACKED_SWITCH) {
Ben Chengbd1326d2010-04-02 15:04:53 -07002729 LOAD_FUNC_ADDR(cUnit, r4PC, (int)findPackedSwitchIndex);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002730 } else {
Ben Chengbd1326d2010-04-02 15:04:53 -07002731 LOAD_FUNC_ADDR(cUnit, r4PC, (int)findSparseSwitchIndex);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002732 }
Ben Cheng6c10a972009-10-29 14:39:18 -07002733 /* r0 <- Addr of the switch data */
2734 loadConstant(cUnit, r0,
2735 (int) (cUnit->method->insns + mir->offset + mir->dalvikInsn.vB));
2736 /* r2 <- pc of the instruction following the blx */
2737 opRegReg(cUnit, kOpMov, r2, rpc);
Bill Buzbee1465db52009-09-23 17:17:35 -07002738 opReg(cUnit, kOpBlx, r4PC);
Elliott Hughes6a555132010-02-25 15:41:42 -08002739 dvmCompilerClobberCallRegs(cUnit);
Ben Cheng6c10a972009-10-29 14:39:18 -07002740 /* pc <- computed goto target */
2741 opRegReg(cUnit, kOpMov, rpc, r0);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002742 break;
2743 }
2744 default:
2745 return true;
2746 }
2747 return false;
2748}
2749
Ben Cheng7a2697d2010-06-07 13:44:23 -07002750/*
2751 * See the example of predicted inlining listed before the
2752 * genValidationForPredictedInline function. The function here takes care the
2753 * branch over at 0x4858de78 and the misprediction target at 0x4858de7a.
2754 */
2755static void genLandingPadForMispredictedCallee(CompilationUnit *cUnit, MIR *mir,
2756 BasicBlock *bb,
2757 ArmLIR *labelList)
2758{
2759 BasicBlock *fallThrough = bb->fallThrough;
2760
2761 /* Bypass the move-result block if there is one */
2762 if (fallThrough->firstMIRInsn) {
2763 assert(fallThrough->firstMIRInsn->OptimizationFlags & MIR_INLINED_PRED);
2764 fallThrough = fallThrough->fallThrough;
2765 }
2766 /* Generate a branch over if the predicted inlining is correct */
2767 genUnconditionalBranch(cUnit, &labelList[fallThrough->id]);
2768
2769 /* Reset the register state */
2770 dvmCompilerResetRegPool(cUnit);
2771 dvmCompilerClobberAllRegs(cUnit);
2772 dvmCompilerResetNullCheck(cUnit);
2773
2774 /* Target for the slow invoke path */
2775 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
2776 target->defMask = ENCODE_ALL;
2777 /* Hook up the target to the verification branch */
2778 mir->meta.callsiteInfo->misPredBranchOver->target = (LIR *) target;
2779}
2780
Ben Chengba4fc8b2009-06-01 13:00:29 -07002781static bool handleFmt35c_3rc(CompilationUnit *cUnit, MIR *mir, BasicBlock *bb,
Bill Buzbee89efc3d2009-07-28 11:22:22 -07002782 ArmLIR *labelList)
Ben Chengba4fc8b2009-06-01 13:00:29 -07002783{
Bill Buzbee9bc3df32009-07-30 10:52:29 -07002784 ArmLIR *retChainingCell = NULL;
Bill Buzbee89efc3d2009-07-28 11:22:22 -07002785 ArmLIR *pcrLabel = NULL;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002786
Ben Cheng7a2697d2010-06-07 13:44:23 -07002787 /* An invoke with the MIR_INLINED is effectively a no-op */
2788 if (mir->OptimizationFlags & MIR_INLINED)
2789 return false;
2790
Bill Buzbeef4ce16f2009-07-28 13:28:25 -07002791 if (bb->fallThrough != NULL)
2792 retChainingCell = &labelList[bb->fallThrough->id];
2793
Ben Chengba4fc8b2009-06-01 13:00:29 -07002794 DecodedInstruction *dInsn = &mir->dalvikInsn;
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002795 switch (mir->dalvikInsn.opcode) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07002796 /*
2797 * calleeMethod = this->clazz->vtable[
2798 * method->clazz->pDvmDex->pResMethods[BBBB]->methodIndex
2799 * ]
2800 */
2801 case OP_INVOKE_VIRTUAL:
2802 case OP_INVOKE_VIRTUAL_RANGE: {
Bill Buzbee89efc3d2009-07-28 11:22:22 -07002803 ArmLIR *predChainingCell = &labelList[bb->taken->id];
Ben Chengba4fc8b2009-06-01 13:00:29 -07002804 int methodIndex =
2805 cUnit->method->clazz->pDvmDex->pResMethods[dInsn->vB]->
2806 methodIndex;
2807
Ben Cheng7a2697d2010-06-07 13:44:23 -07002808 /*
2809 * If the invoke has non-null misPredBranchOver, we need to generate
2810 * the non-inlined version of the invoke here to handle the
2811 * mispredicted case.
2812 */
2813 if (mir->meta.callsiteInfo->misPredBranchOver) {
2814 genLandingPadForMispredictedCallee(cUnit, mir, bb, labelList);
2815 }
2816
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002817 if (mir->dalvikInsn.opcode == OP_INVOKE_VIRTUAL)
Ben Chengba4fc8b2009-06-01 13:00:29 -07002818 genProcessArgsNoRange(cUnit, mir, dInsn, &pcrLabel);
2819 else
2820 genProcessArgsRange(cUnit, mir, dInsn, &pcrLabel);
2821
Ben Cheng38329f52009-07-07 14:19:20 -07002822 genInvokeVirtualCommon(cUnit, mir, methodIndex,
2823 retChainingCell,
2824 predChainingCell,
2825 pcrLabel);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002826 break;
2827 }
2828 /*
2829 * calleeMethod = method->clazz->super->vtable[method->clazz->pDvmDex
2830 * ->pResMethods[BBBB]->methodIndex]
2831 */
Ben Chengba4fc8b2009-06-01 13:00:29 -07002832 case OP_INVOKE_SUPER:
2833 case OP_INVOKE_SUPER_RANGE: {
Ben Cheng7a2697d2010-06-07 13:44:23 -07002834 /* Grab the method ptr directly from what the interpreter sees */
2835 const Method *calleeMethod = mir->meta.callsiteInfo->method;
2836 assert(calleeMethod == cUnit->method->clazz->super->vtable[
2837 cUnit->method->clazz->pDvmDex->
2838 pResMethods[dInsn->vB]->methodIndex]);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002839
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002840 if (mir->dalvikInsn.opcode == OP_INVOKE_SUPER)
Ben Chengba4fc8b2009-06-01 13:00:29 -07002841 genProcessArgsNoRange(cUnit, mir, dInsn, &pcrLabel);
2842 else
2843 genProcessArgsRange(cUnit, mir, dInsn, &pcrLabel);
2844
2845 /* r0 = calleeMethod */
2846 loadConstant(cUnit, r0, (int) calleeMethod);
2847
Ben Cheng38329f52009-07-07 14:19:20 -07002848 genInvokeSingletonCommon(cUnit, mir, bb, labelList, pcrLabel,
2849 calleeMethod);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002850 break;
2851 }
2852 /* calleeMethod = method->clazz->pDvmDex->pResMethods[BBBB] */
2853 case OP_INVOKE_DIRECT:
2854 case OP_INVOKE_DIRECT_RANGE: {
Ben Cheng7a2697d2010-06-07 13:44:23 -07002855 /* Grab the method ptr directly from what the interpreter sees */
2856 const Method *calleeMethod = mir->meta.callsiteInfo->method;
2857 assert(calleeMethod ==
2858 cUnit->method->clazz->pDvmDex->pResMethods[dInsn->vB]);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002859
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002860 if (mir->dalvikInsn.opcode == OP_INVOKE_DIRECT)
Ben Chengba4fc8b2009-06-01 13:00:29 -07002861 genProcessArgsNoRange(cUnit, mir, dInsn, &pcrLabel);
2862 else
2863 genProcessArgsRange(cUnit, mir, dInsn, &pcrLabel);
2864
2865 /* r0 = calleeMethod */
2866 loadConstant(cUnit, r0, (int) calleeMethod);
2867
Ben Cheng38329f52009-07-07 14:19:20 -07002868 genInvokeSingletonCommon(cUnit, mir, bb, labelList, pcrLabel,
2869 calleeMethod);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002870 break;
2871 }
2872 /* calleeMethod = method->clazz->pDvmDex->pResMethods[BBBB] */
2873 case OP_INVOKE_STATIC:
2874 case OP_INVOKE_STATIC_RANGE: {
Ben Cheng7a2697d2010-06-07 13:44:23 -07002875 /* Grab the method ptr directly from what the interpreter sees */
2876 const Method *calleeMethod = mir->meta.callsiteInfo->method;
2877 assert(calleeMethod ==
2878 cUnit->method->clazz->pDvmDex->pResMethods[dInsn->vB]);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002879
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002880 if (mir->dalvikInsn.opcode == OP_INVOKE_STATIC)
Ben Chengba4fc8b2009-06-01 13:00:29 -07002881 genProcessArgsNoRange(cUnit, mir, dInsn,
2882 NULL /* no null check */);
2883 else
2884 genProcessArgsRange(cUnit, mir, dInsn,
2885 NULL /* no null check */);
2886
2887 /* r0 = calleeMethod */
2888 loadConstant(cUnit, r0, (int) calleeMethod);
2889
Ben Cheng38329f52009-07-07 14:19:20 -07002890 genInvokeSingletonCommon(cUnit, mir, bb, labelList, pcrLabel,
2891 calleeMethod);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002892 break;
2893 }
Ben Cheng09e50c92010-05-02 10:45:32 -07002894 /*
Ben Chengba4fc8b2009-06-01 13:00:29 -07002895 * calleeMethod = dvmFindInterfaceMethodInCache(this->clazz,
2896 * BBBB, method, method->clazz->pDvmDex)
Ben Cheng38329f52009-07-07 14:19:20 -07002897 *
Ben Cheng09e50c92010-05-02 10:45:32 -07002898 * The following is an example of generated code for
2899 * "invoke-interface v0"
Ben Cheng38329f52009-07-07 14:19:20 -07002900 *
Ben Cheng09e50c92010-05-02 10:45:32 -07002901 * -------- dalvik offset: 0x0008 @ invoke-interface v0
2902 * 0x47357e36 : ldr r0, [r5, #0] --+
2903 * 0x47357e38 : sub r7,r5,#24 |
2904 * 0x47357e3c : cmp r0, #0 | genProcessArgsNoRange
2905 * 0x47357e3e : beq 0x47357e82 |
2906 * 0x47357e40 : stmia r7, <r0> --+
2907 * 0x47357e42 : ldr r4, [pc, #120] --> r4 <- dalvikPC of this invoke
2908 * 0x47357e44 : add r1, pc, #64 --> r1 <- &retChainingCell
2909 * 0x47357e46 : add r2, pc, #72 --> r2 <- &predictedChainingCell
2910 * 0x47357e48 : blx_1 0x47348190 --+ TEMPLATE_INVOKE_METHOD_
2911 * 0x47357e4a : blx_2 see above --+ PREDICTED_CHAIN
2912 * 0x47357e4c : b 0x47357e90 --> off to the predicted chain
2913 * 0x47357e4e : b 0x47357e82 --> punt to the interpreter
2914 * 0x47357e50 : mov r8, r1 --+
2915 * 0x47357e52 : mov r9, r2 |
2916 * 0x47357e54 : ldr r2, [pc, #96] |
2917 * 0x47357e56 : mov r10, r3 |
2918 * 0x47357e58 : movs r0, r3 | dvmFindInterfaceMethodInCache
2919 * 0x47357e5a : ldr r3, [pc, #88] |
2920 * 0x47357e5c : ldr r7, [pc, #80] |
2921 * 0x47357e5e : mov r1, #1452 |
2922 * 0x47357e62 : blx r7 --+
2923 * 0x47357e64 : cmp r0, #0 --> calleeMethod == NULL?
2924 * 0x47357e66 : bne 0x47357e6e --> branch over the throw if !r0
2925 * 0x47357e68 : ldr r0, [pc, #80] --> load Dalvik PC of the invoke
2926 * 0x47357e6a : blx_1 0x47348494 --+ TEMPLATE_THROW_EXCEPTION_
2927 * 0x47357e6c : blx_2 see above --+ COMMON
2928 * 0x47357e6e : mov r1, r8 --> r1 <- &retChainingCell
2929 * 0x47357e70 : cmp r1, #0 --> compare against 0
2930 * 0x47357e72 : bgt 0x47357e7c --> >=0? don't rechain
Ben Chengaf5aa1f2011-01-04 15:37:04 -08002931 * 0x47357e74 : ldr r7, [pc, #off] --+
Ben Cheng09e50c92010-05-02 10:45:32 -07002932 * 0x47357e76 : mov r2, r9 | dvmJitToPatchPredictedChain
2933 * 0x47357e78 : mov r3, r10 |
2934 * 0x47357e7a : blx r7 --+
2935 * 0x47357e7c : add r1, pc, #8 --> r1 <- &retChainingCell
2936 * 0x47357e7e : blx_1 0x4734809c --+ TEMPLATE_INVOKE_METHOD_NO_OPT
2937 * 0x47357e80 : blx_2 see above --+
2938 * -------- reconstruct dalvik PC : 0x425719dc @ +0x0008
2939 * 0x47357e82 : ldr r0, [pc, #56]
Ben Cheng38329f52009-07-07 14:19:20 -07002940 * Exception_Handling:
Ben Cheng09e50c92010-05-02 10:45:32 -07002941 * 0x47357e84 : ldr r1, [r6, #92]
2942 * 0x47357e86 : blx r1
2943 * 0x47357e88 : .align4
2944 * -------- chaining cell (hot): 0x000b
2945 * 0x47357e88 : ldr r0, [r6, #104]
2946 * 0x47357e8a : blx r0
2947 * 0x47357e8c : data 0x19e2(6626)
2948 * 0x47357e8e : data 0x4257(16983)
2949 * 0x47357e90 : .align4
Ben Cheng38329f52009-07-07 14:19:20 -07002950 * -------- chaining cell (predicted)
Ben Cheng09e50c92010-05-02 10:45:32 -07002951 * 0x47357e90 : data 0xe7fe(59390) --> will be patched into bx
2952 * 0x47357e92 : data 0x0000(0)
2953 * 0x47357e94 : data 0x0000(0) --> class
2954 * 0x47357e96 : data 0x0000(0)
2955 * 0x47357e98 : data 0x0000(0) --> method
2956 * 0x47357e9a : data 0x0000(0)
2957 * 0x47357e9c : data 0x0000(0) --> rechain count
2958 * 0x47357e9e : data 0x0000(0)
2959 * -------- end of chaining cells (0x006c)
2960 * 0x47357eb0 : .word (0xad03e369)
2961 * 0x47357eb4 : .word (0x28a90)
2962 * 0x47357eb8 : .word (0x41a63394)
2963 * 0x47357ebc : .word (0x425719dc)
Ben Chengba4fc8b2009-06-01 13:00:29 -07002964 */
2965 case OP_INVOKE_INTERFACE:
2966 case OP_INVOKE_INTERFACE_RANGE: {
Bill Buzbee89efc3d2009-07-28 11:22:22 -07002967 ArmLIR *predChainingCell = &labelList[bb->taken->id];
Ben Chengba4fc8b2009-06-01 13:00:29 -07002968
Ben Cheng7a2697d2010-06-07 13:44:23 -07002969 /*
2970 * If the invoke has non-null misPredBranchOver, we need to generate
2971 * the non-inlined version of the invoke here to handle the
2972 * mispredicted case.
2973 */
2974 if (mir->meta.callsiteInfo->misPredBranchOver) {
2975 genLandingPadForMispredictedCallee(cUnit, mir, bb, labelList);
2976 }
Bill Buzbee1465db52009-09-23 17:17:35 -07002977
Dan Bornstein9a1f8162010-12-01 17:02:26 -08002978 if (mir->dalvikInsn.opcode == OP_INVOKE_INTERFACE)
Ben Chengba4fc8b2009-06-01 13:00:29 -07002979 genProcessArgsNoRange(cUnit, mir, dInsn, &pcrLabel);
2980 else
2981 genProcessArgsRange(cUnit, mir, dInsn, &pcrLabel);
2982
Ben Cheng38329f52009-07-07 14:19:20 -07002983 /* "this" is already left in r0 by genProcessArgs* */
2984
2985 /* r4PC = dalvikCallsite */
2986 loadConstant(cUnit, r4PC,
2987 (int) (cUnit->method->insns + mir->offset));
2988
2989 /* r1 = &retChainingCell */
Bill Buzbee270c1d62009-08-13 16:58:07 -07002990 ArmLIR *addrRetChain =
Bill Buzbee1465db52009-09-23 17:17:35 -07002991 opRegRegImm(cUnit, kOpAdd, r1, rpc, 0);
Ben Cheng38329f52009-07-07 14:19:20 -07002992 addrRetChain->generic.target = (LIR *) retChainingCell;
2993
2994 /* r2 = &predictedChainingCell */
Bill Buzbee89efc3d2009-07-28 11:22:22 -07002995 ArmLIR *predictedChainingCell =
Bill Buzbee1465db52009-09-23 17:17:35 -07002996 opRegRegImm(cUnit, kOpAdd, r2, rpc, 0);
Ben Cheng38329f52009-07-07 14:19:20 -07002997 predictedChainingCell->generic.target = (LIR *) predChainingCell;
2998
2999 genDispatchToHandler(cUnit, TEMPLATE_INVOKE_METHOD_PREDICTED_CHAIN);
3000
3001 /* return through lr - jump to the chaining cell */
3002 genUnconditionalBranch(cUnit, predChainingCell);
3003
3004 /*
3005 * null-check on "this" may have been eliminated, but we still need
3006 * a PC-reconstruction label for stack overflow bailout.
3007 */
3008 if (pcrLabel == NULL) {
3009 int dPC = (int) (cUnit->method->insns + mir->offset);
Bill Buzbee89efc3d2009-07-28 11:22:22 -07003010 pcrLabel = dvmCompilerNew(sizeof(ArmLIR), true);
Dan Bornstein9a1f8162010-12-01 17:02:26 -08003011 pcrLabel->opcode = kArmPseudoPCReconstructionCell;
Ben Cheng38329f52009-07-07 14:19:20 -07003012 pcrLabel->operands[0] = dPC;
3013 pcrLabel->operands[1] = mir->offset;
3014 /* Insert the place holder to the growable list */
3015 dvmInsertGrowableList(&cUnit->pcReconstructionList, pcrLabel);
3016 }
3017
3018 /* return through lr+2 - punt to the interpreter */
3019 genUnconditionalBranch(cUnit, pcrLabel);
3020
3021 /*
3022 * return through lr+4 - fully resolve the callee method.
3023 * r1 <- count
3024 * r2 <- &predictedChainCell
3025 * r3 <- this->class
3026 * r4 <- dPC
3027 * r7 <- this->class->vtable
3028 */
3029
3030 /* Save count, &predictedChainCell, and class to high regs first */
Bill Buzbee1465db52009-09-23 17:17:35 -07003031 genRegCopy(cUnit, r8, r1);
3032 genRegCopy(cUnit, r9, r2);
3033 genRegCopy(cUnit, r10, r3);
Ben Cheng38329f52009-07-07 14:19:20 -07003034
Ben Chengba4fc8b2009-06-01 13:00:29 -07003035 /* r0 now contains this->clazz */
Bill Buzbee1465db52009-09-23 17:17:35 -07003036 genRegCopy(cUnit, r0, r3);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003037
3038 /* r1 = BBBB */
3039 loadConstant(cUnit, r1, dInsn->vB);
3040
3041 /* r2 = method (caller) */
3042 loadConstant(cUnit, r2, (int) cUnit->method);
3043
3044 /* r3 = pDvmDex */
3045 loadConstant(cUnit, r3, (int) cUnit->method->clazz->pDvmDex);
3046
Ben Chengbd1326d2010-04-02 15:04:53 -07003047 LOAD_FUNC_ADDR(cUnit, r7,
3048 (intptr_t) dvmFindInterfaceMethodInCache);
Bill Buzbee1465db52009-09-23 17:17:35 -07003049 opReg(cUnit, kOpBlx, r7);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003050 /* r0 = calleeMethod (returned from dvmFindInterfaceMethodInCache */
3051
Ben Cheng09e50c92010-05-02 10:45:32 -07003052 dvmCompilerClobberCallRegs(cUnit);
3053 /* generate a branch over if the interface method is resolved */
buzbee8f8109a2010-08-31 10:16:35 -07003054 ArmLIR *branchOver = genCmpImmBranch(cUnit, kArmCondNe, r0, 0);
Ben Cheng09e50c92010-05-02 10:45:32 -07003055 /*
3056 * calleeMethod == NULL -> throw
3057 */
3058 loadConstant(cUnit, r0,
3059 (int) (cUnit->method->insns + mir->offset));
3060 genDispatchToHandler(cUnit, TEMPLATE_THROW_EXCEPTION_COMMON);
3061 /* noreturn */
3062
3063 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
3064 target->defMask = ENCODE_ALL;
3065 branchOver->generic.target = (LIR *) target;
3066
Bill Buzbee1465db52009-09-23 17:17:35 -07003067 genRegCopy(cUnit, r1, r8);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003068
Ben Cheng38329f52009-07-07 14:19:20 -07003069 /* Check if rechain limit is reached */
buzbee8f8109a2010-08-31 10:16:35 -07003070 ArmLIR *bypassRechaining = genCmpImmBranch(cUnit, kArmCondGt,
3071 r1, 0);
Ben Cheng38329f52009-07-07 14:19:20 -07003072
Ben Chengaf5aa1f2011-01-04 15:37:04 -08003073 LOAD_FUNC_ADDR(cUnit, r7, (int) dvmJitToPatchPredictedChain);
Ben Cheng38329f52009-07-07 14:19:20 -07003074
Ben Chengb88ec3c2010-05-17 12:50:33 -07003075 genRegCopy(cUnit, r1, rGLUE);
Bill Buzbee1465db52009-09-23 17:17:35 -07003076 genRegCopy(cUnit, r2, r9);
3077 genRegCopy(cUnit, r3, r10);
Ben Cheng38329f52009-07-07 14:19:20 -07003078
3079 /*
3080 * r0 = calleeMethod
3081 * r2 = &predictedChainingCell
3082 * r3 = class
3083 *
3084 * &returnChainingCell has been loaded into r1 but is not needed
3085 * when patching the chaining cell and will be clobbered upon
3086 * returning so it will be reconstructed again.
3087 */
Bill Buzbee1465db52009-09-23 17:17:35 -07003088 opReg(cUnit, kOpBlx, r7);
Ben Cheng38329f52009-07-07 14:19:20 -07003089
3090 /* r1 = &retChainingCell */
Bill Buzbee1465db52009-09-23 17:17:35 -07003091 addrRetChain = opRegRegImm(cUnit, kOpAdd, r1, rpc, 0);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003092 addrRetChain->generic.target = (LIR *) retChainingCell;
Ben Cheng38329f52009-07-07 14:19:20 -07003093
3094 bypassRechaining->generic.target = (LIR *) addrRetChain;
3095
Ben Chengba4fc8b2009-06-01 13:00:29 -07003096 /*
3097 * r0 = this, r1 = calleeMethod,
3098 * r1 = &ChainingCell,
3099 * r4PC = callsiteDPC,
3100 */
3101 genDispatchToHandler(cUnit, TEMPLATE_INVOKE_METHOD_NO_OPT);
Ben Cheng978738d2010-05-13 13:45:57 -07003102#if defined(WITH_JIT_TUNING)
Ben Cheng86717f72010-03-05 15:27:21 -08003103 gDvmJit.invokePolymorphic++;
Ben Chengba4fc8b2009-06-01 13:00:29 -07003104#endif
3105 /* Handle exceptions using the interpreter */
3106 genTrap(cUnit, mir->offset, pcrLabel);
3107 break;
3108 }
3109 /* NOP */
3110 case OP_INVOKE_DIRECT_EMPTY: {
3111 return false;
3112 }
3113 case OP_FILLED_NEW_ARRAY:
3114 case OP_FILLED_NEW_ARRAY_RANGE: {
3115 /* Just let the interpreter deal with these */
3116 genInterpSingleStep(cUnit, mir);
3117 break;
3118 }
3119 default:
3120 return true;
3121 }
3122 return false;
3123}
3124
3125static bool handleFmt35ms_3rms(CompilationUnit *cUnit, MIR *mir,
Bill Buzbee89efc3d2009-07-28 11:22:22 -07003126 BasicBlock *bb, ArmLIR *labelList)
Ben Chengba4fc8b2009-06-01 13:00:29 -07003127{
Bill Buzbee89efc3d2009-07-28 11:22:22 -07003128 ArmLIR *pcrLabel = NULL;
Ben Chengba4fc8b2009-06-01 13:00:29 -07003129
Ben Cheng7a2697d2010-06-07 13:44:23 -07003130 /* An invoke with the MIR_INLINED is effectively a no-op */
3131 if (mir->OptimizationFlags & MIR_INLINED)
3132 return false;
3133
Ben Chengba4fc8b2009-06-01 13:00:29 -07003134 DecodedInstruction *dInsn = &mir->dalvikInsn;
Dan Bornstein9a1f8162010-12-01 17:02:26 -08003135 switch (mir->dalvikInsn.opcode) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07003136 /* calleeMethod = this->clazz->vtable[BBBB] */
3137 case OP_INVOKE_VIRTUAL_QUICK_RANGE:
3138 case OP_INVOKE_VIRTUAL_QUICK: {
3139 int methodIndex = dInsn->vB;
Bill Buzbeea8589332010-12-27 09:31:21 -08003140 ArmLIR *retChainingCell = &labelList[bb->fallThrough->id];
3141 ArmLIR *predChainingCell = &labelList[bb->taken->id];
Ben Cheng7a2697d2010-06-07 13:44:23 -07003142
3143 /*
3144 * If the invoke has non-null misPredBranchOver, we need to generate
3145 * the non-inlined version of the invoke here to handle the
3146 * mispredicted case.
3147 */
3148 if (mir->meta.callsiteInfo->misPredBranchOver) {
3149 genLandingPadForMispredictedCallee(cUnit, mir, bb, labelList);
3150 }
3151
Dan Bornstein9a1f8162010-12-01 17:02:26 -08003152 if (mir->dalvikInsn.opcode == OP_INVOKE_VIRTUAL_QUICK)
Ben Chengba4fc8b2009-06-01 13:00:29 -07003153 genProcessArgsNoRange(cUnit, mir, dInsn, &pcrLabel);
3154 else
3155 genProcessArgsRange(cUnit, mir, dInsn, &pcrLabel);
3156
Ben Cheng38329f52009-07-07 14:19:20 -07003157 genInvokeVirtualCommon(cUnit, mir, methodIndex,
3158 retChainingCell,
3159 predChainingCell,
3160 pcrLabel);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003161 break;
3162 }
3163 /* calleeMethod = method->clazz->super->vtable[BBBB] */
3164 case OP_INVOKE_SUPER_QUICK:
3165 case OP_INVOKE_SUPER_QUICK_RANGE: {
Ben Cheng7a2697d2010-06-07 13:44:23 -07003166 /* Grab the method ptr directly from what the interpreter sees */
3167 const Method *calleeMethod = mir->meta.callsiteInfo->method;
3168 assert(calleeMethod ==
3169 cUnit->method->clazz->super->vtable[dInsn->vB]);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003170
Dan Bornstein9a1f8162010-12-01 17:02:26 -08003171 if (mir->dalvikInsn.opcode == OP_INVOKE_SUPER_QUICK)
Ben Chengba4fc8b2009-06-01 13:00:29 -07003172 genProcessArgsNoRange(cUnit, mir, dInsn, &pcrLabel);
3173 else
3174 genProcessArgsRange(cUnit, mir, dInsn, &pcrLabel);
3175
3176 /* r0 = calleeMethod */
3177 loadConstant(cUnit, r0, (int) calleeMethod);
3178
Ben Cheng38329f52009-07-07 14:19:20 -07003179 genInvokeSingletonCommon(cUnit, mir, bb, labelList, pcrLabel,
3180 calleeMethod);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003181 break;
3182 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07003183 default:
3184 return true;
3185 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07003186 return false;
3187}
3188
3189/*
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003190 * This operation is complex enough that we'll do it partly inline
3191 * and partly with a handler. NOTE: the handler uses hardcoded
3192 * values for string object offsets and must be revisitied if the
3193 * layout changes.
3194 */
3195static bool genInlinedCompareTo(CompilationUnit *cUnit, MIR *mir)
3196{
3197#if defined(USE_GLOBAL_STRING_DEFS)
3198 return false;
3199#else
3200 ArmLIR *rollback;
Bill Buzbeec6f10662010-02-09 11:16:15 -08003201 RegLocation rlThis = dvmCompilerGetSrc(cUnit, mir, 0);
3202 RegLocation rlComp = dvmCompilerGetSrc(cUnit, mir, 1);
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003203
3204 loadValueDirectFixed(cUnit, rlThis, r0);
3205 loadValueDirectFixed(cUnit, rlComp, r1);
3206 /* Test objects for NULL */
3207 rollback = genNullCheck(cUnit, rlThis.sRegLow, r0, mir->offset, NULL);
3208 genNullCheck(cUnit, rlComp.sRegLow, r1, mir->offset, rollback);
3209 /*
3210 * TUNING: we could check for object pointer equality before invoking
3211 * handler. Unclear whether the gain would be worth the added code size
3212 * expansion.
3213 */
3214 genDispatchToHandler(cUnit, TEMPLATE_STRING_COMPARETO);
Bill Buzbeec6f10662010-02-09 11:16:15 -08003215 storeValue(cUnit, inlinedTarget(cUnit, mir, false),
3216 dvmCompilerGetReturn(cUnit));
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003217 return true;
3218#endif
3219}
3220
Elliott Hughes2bdbcb62010-04-12 14:29:37 -07003221static bool genInlinedFastIndexOf(CompilationUnit *cUnit, MIR *mir)
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003222{
3223#if defined(USE_GLOBAL_STRING_DEFS)
3224 return false;
3225#else
Bill Buzbeec6f10662010-02-09 11:16:15 -08003226 RegLocation rlThis = dvmCompilerGetSrc(cUnit, mir, 0);
3227 RegLocation rlChar = dvmCompilerGetSrc(cUnit, mir, 1);
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003228
3229 loadValueDirectFixed(cUnit, rlThis, r0);
3230 loadValueDirectFixed(cUnit, rlChar, r1);
Elliott Hughes2bdbcb62010-04-12 14:29:37 -07003231 RegLocation rlStart = dvmCompilerGetSrc(cUnit, mir, 2);
3232 loadValueDirectFixed(cUnit, rlStart, r2);
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003233 /* Test objects for NULL */
3234 genNullCheck(cUnit, rlThis.sRegLow, r0, mir->offset, NULL);
3235 genDispatchToHandler(cUnit, TEMPLATE_STRING_INDEXOF);
Bill Buzbeec6f10662010-02-09 11:16:15 -08003236 storeValue(cUnit, inlinedTarget(cUnit, mir, false),
3237 dvmCompilerGetReturn(cUnit));
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003238 return true;
3239#endif
3240}
3241
Elliott Hughesee34f592010-04-05 18:13:52 -07003242// Generates an inlined String.isEmpty or String.length.
3243static bool genInlinedStringIsEmptyOrLength(CompilationUnit *cUnit, MIR *mir,
3244 bool isEmpty)
Bill Buzbee1f748632010-03-02 16:14:41 -08003245{
Elliott Hughesee34f592010-04-05 18:13:52 -07003246 // dst = src.length();
Bill Buzbee1f748632010-03-02 16:14:41 -08003247 RegLocation rlObj = dvmCompilerGetSrc(cUnit, mir, 0);
3248 RegLocation rlDest = inlinedTarget(cUnit, mir, false);
3249 rlObj = loadValue(cUnit, rlObj, kCoreReg);
3250 RegLocation rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
3251 genNullCheck(cUnit, rlObj.sRegLow, rlObj.lowReg, mir->offset, NULL);
3252 loadWordDisp(cUnit, rlObj.lowReg, gDvm.offJavaLangString_count,
3253 rlResult.lowReg);
Elliott Hughesee34f592010-04-05 18:13:52 -07003254 if (isEmpty) {
3255 // dst = (dst == 0);
3256 int tReg = dvmCompilerAllocTemp(cUnit);
3257 opRegReg(cUnit, kOpNeg, tReg, rlResult.lowReg);
3258 opRegRegReg(cUnit, kOpAdc, rlResult.lowReg, rlResult.lowReg, tReg);
3259 }
Bill Buzbee1f748632010-03-02 16:14:41 -08003260 storeValue(cUnit, rlDest, rlResult);
3261 return false;
3262}
3263
Elliott Hughesee34f592010-04-05 18:13:52 -07003264static bool genInlinedStringLength(CompilationUnit *cUnit, MIR *mir)
3265{
3266 return genInlinedStringIsEmptyOrLength(cUnit, mir, false);
3267}
3268
3269static bool genInlinedStringIsEmpty(CompilationUnit *cUnit, MIR *mir)
3270{
3271 return genInlinedStringIsEmptyOrLength(cUnit, mir, true);
3272}
3273
Bill Buzbee1f748632010-03-02 16:14:41 -08003274static bool genInlinedStringCharAt(CompilationUnit *cUnit, MIR *mir)
3275{
3276 int contents = offsetof(ArrayObject, contents);
3277 RegLocation rlObj = dvmCompilerGetSrc(cUnit, mir, 0);
3278 RegLocation rlIdx = dvmCompilerGetSrc(cUnit, mir, 1);
3279 RegLocation rlDest = inlinedTarget(cUnit, mir, false);
3280 RegLocation rlResult;
3281 rlObj = loadValue(cUnit, rlObj, kCoreReg);
3282 rlIdx = loadValue(cUnit, rlIdx, kCoreReg);
3283 int regMax = dvmCompilerAllocTemp(cUnit);
3284 int regOff = dvmCompilerAllocTemp(cUnit);
3285 int regPtr = dvmCompilerAllocTemp(cUnit);
3286 ArmLIR *pcrLabel = genNullCheck(cUnit, rlObj.sRegLow, rlObj.lowReg,
3287 mir->offset, NULL);
3288 loadWordDisp(cUnit, rlObj.lowReg, gDvm.offJavaLangString_count, regMax);
3289 loadWordDisp(cUnit, rlObj.lowReg, gDvm.offJavaLangString_offset, regOff);
3290 loadWordDisp(cUnit, rlObj.lowReg, gDvm.offJavaLangString_value, regPtr);
3291 genBoundsCheck(cUnit, rlIdx.lowReg, regMax, mir->offset, pcrLabel);
3292 dvmCompilerFreeTemp(cUnit, regMax);
3293 opRegImm(cUnit, kOpAdd, regPtr, contents);
3294 opRegReg(cUnit, kOpAdd, regOff, rlIdx.lowReg);
3295 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
3296 loadBaseIndexed(cUnit, regPtr, regOff, rlResult.lowReg, 1, kUnsignedHalf);
3297 storeValue(cUnit, rlDest, rlResult);
3298 return false;
3299}
3300
3301static bool genInlinedAbsInt(CompilationUnit *cUnit, MIR *mir)
3302{
3303 RegLocation rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
3304 rlSrc = loadValue(cUnit, rlSrc, kCoreReg);
Elliott Hughese22bd842010-08-20 18:47:36 -07003305 RegLocation rlDest = inlinedTarget(cUnit, mir, false);
Bill Buzbee1f748632010-03-02 16:14:41 -08003306 RegLocation rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
3307 int signReg = dvmCompilerAllocTemp(cUnit);
3308 /*
3309 * abs(x) = y<=x>>31, (x+y)^y.
3310 * Thumb2's IT block also yields 3 instructions, but imposes
3311 * scheduling constraints.
3312 */
3313 opRegRegImm(cUnit, kOpAsr, signReg, rlSrc.lowReg, 31);
3314 opRegRegReg(cUnit, kOpAdd, rlResult.lowReg, rlSrc.lowReg, signReg);
3315 opRegReg(cUnit, kOpXor, rlResult.lowReg, signReg);
3316 storeValue(cUnit, rlDest, rlResult);
3317 return false;
3318}
3319
3320static bool genInlinedAbsLong(CompilationUnit *cUnit, MIR *mir)
3321{
3322 RegLocation rlSrc = dvmCompilerGetSrcWide(cUnit, mir, 0, 1);
3323 RegLocation rlDest = inlinedTargetWide(cUnit, mir, false);
3324 rlSrc = loadValueWide(cUnit, rlSrc, kCoreReg);
3325 RegLocation rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
3326 int signReg = dvmCompilerAllocTemp(cUnit);
3327 /*
3328 * abs(x) = y<=x>>31, (x+y)^y.
3329 * Thumb2 IT block allows slightly shorter sequence,
3330 * but introduces a scheduling barrier. Stick with this
3331 * mechanism for now.
3332 */
3333 opRegRegImm(cUnit, kOpAsr, signReg, rlSrc.highReg, 31);
3334 opRegRegReg(cUnit, kOpAdd, rlResult.lowReg, rlSrc.lowReg, signReg);
3335 opRegRegReg(cUnit, kOpAdc, rlResult.highReg, rlSrc.highReg, signReg);
3336 opRegReg(cUnit, kOpXor, rlResult.lowReg, signReg);
3337 opRegReg(cUnit, kOpXor, rlResult.highReg, signReg);
3338 storeValueWide(cUnit, rlDest, rlResult);
3339 return false;
3340}
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003341
Elliott Hughese22bd842010-08-20 18:47:36 -07003342static bool genInlinedIntFloatConversion(CompilationUnit *cUnit, MIR *mir)
3343{
3344 // Just move from source to destination...
3345 RegLocation rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
3346 RegLocation rlDest = inlinedTarget(cUnit, mir, false);
3347 storeValue(cUnit, rlDest, rlSrc);
3348 return false;
3349}
3350
3351static bool genInlinedLongDoubleConversion(CompilationUnit *cUnit, MIR *mir)
3352{
3353 // Just move from source to destination...
3354 RegLocation rlSrc = dvmCompilerGetSrcWide(cUnit, mir, 0, 1);
3355 RegLocation rlDest = inlinedTargetWide(cUnit, mir, false);
3356 storeValueWide(cUnit, rlDest, rlSrc);
3357 return false;
3358}
3359
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003360/*
Bill Buzbeece46c942009-11-20 15:41:34 -08003361 * NOTE: Handles both range and non-range versions (arguments
3362 * have already been normalized by this point).
Ben Chengba4fc8b2009-06-01 13:00:29 -07003363 */
Bill Buzbeece46c942009-11-20 15:41:34 -08003364static bool handleExecuteInline(CompilationUnit *cUnit, MIR *mir)
Ben Chengba4fc8b2009-06-01 13:00:29 -07003365{
3366 DecodedInstruction *dInsn = &mir->dalvikInsn;
Dan Bornstein9a1f8162010-12-01 17:02:26 -08003367 switch( mir->dalvikInsn.opcode) {
Bill Buzbeece46c942009-11-20 15:41:34 -08003368 case OP_EXECUTE_INLINE_RANGE:
Ben Chengba4fc8b2009-06-01 13:00:29 -07003369 case OP_EXECUTE_INLINE: {
3370 unsigned int i;
3371 const InlineOperation* inLineTable = dvmGetInlineOpsTable();
Bill Buzbee50a6bf22009-07-08 13:08:04 -07003372 int offset = offsetof(InterpState, retval);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003373 int operation = dInsn->vB;
Bill Buzbee50a6bf22009-07-08 13:08:04 -07003374 switch (operation) {
3375 case INLINE_EMPTYINLINEMETHOD:
3376 return false; /* Nop */
3377 case INLINE_STRING_LENGTH:
3378 return genInlinedStringLength(cUnit, mir);
Elliott Hughesee34f592010-04-05 18:13:52 -07003379 case INLINE_STRING_IS_EMPTY:
3380 return genInlinedStringIsEmpty(cUnit, mir);
Bill Buzbee50a6bf22009-07-08 13:08:04 -07003381 case INLINE_MATH_ABS_INT:
3382 return genInlinedAbsInt(cUnit, mir);
3383 case INLINE_MATH_ABS_LONG:
3384 return genInlinedAbsLong(cUnit, mir);
3385 case INLINE_MATH_MIN_INT:
3386 return genInlinedMinMaxInt(cUnit, mir, true);
3387 case INLINE_MATH_MAX_INT:
3388 return genInlinedMinMaxInt(cUnit, mir, false);
3389 case INLINE_STRING_CHARAT:
3390 return genInlinedStringCharAt(cUnit, mir);
3391 case INLINE_MATH_SQRT:
3392 if (genInlineSqrt(cUnit, mir))
Bill Buzbee9727c3d2009-08-01 11:32:36 -07003393 return false;
Bill Buzbee50a6bf22009-07-08 13:08:04 -07003394 else
3395 break; /* Handle with C routine */
Bill Buzbee50a6bf22009-07-08 13:08:04 -07003396 case INLINE_MATH_ABS_FLOAT:
Bill Buzbee1465db52009-09-23 17:17:35 -07003397 if (genInlinedAbsFloat(cUnit, mir))
3398 return false;
3399 else
3400 break;
Bill Buzbee50a6bf22009-07-08 13:08:04 -07003401 case INLINE_MATH_ABS_DOUBLE:
Bill Buzbee1465db52009-09-23 17:17:35 -07003402 if (genInlinedAbsDouble(cUnit, mir))
3403 return false;
3404 else
3405 break;
Bill Buzbee50a6bf22009-07-08 13:08:04 -07003406 case INLINE_STRING_COMPARETO:
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003407 if (genInlinedCompareTo(cUnit, mir))
3408 return false;
3409 else
3410 break;
Elliott Hughes2bdbcb62010-04-12 14:29:37 -07003411 case INLINE_STRING_FASTINDEXOF_II:
3412 if (genInlinedFastIndexOf(cUnit, mir))
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003413 return false;
3414 else
3415 break;
Elliott Hughese22bd842010-08-20 18:47:36 -07003416 case INLINE_FLOAT_TO_RAW_INT_BITS:
3417 case INLINE_INT_BITS_TO_FLOAT:
3418 return genInlinedIntFloatConversion(cUnit, mir);
3419 case INLINE_DOUBLE_TO_RAW_LONG_BITS:
3420 case INLINE_LONG_BITS_TO_DOUBLE:
3421 return genInlinedLongDoubleConversion(cUnit, mir);
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003422 case INLINE_STRING_EQUALS:
3423 case INLINE_MATH_COS:
3424 case INLINE_MATH_SIN:
Elliott Hughese22bd842010-08-20 18:47:36 -07003425 case INLINE_FLOAT_TO_INT_BITS:
3426 case INLINE_DOUBLE_TO_LONG_BITS:
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003427 break; /* Handle with C routine */
Bill Buzbee50a6bf22009-07-08 13:08:04 -07003428 default:
Bill Buzbeefc519dc2010-03-06 23:30:57 -08003429 dvmCompilerAbort(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003430 }
Bill Buzbeec6f10662010-02-09 11:16:15 -08003431 dvmCompilerFlushAllRegs(cUnit); /* Everything to home location */
Elliott Hughes6a555132010-02-25 15:41:42 -08003432 dvmCompilerClobberCallRegs(cUnit);
Bill Buzbeec6f10662010-02-09 11:16:15 -08003433 dvmCompilerClobber(cUnit, r4PC);
3434 dvmCompilerClobber(cUnit, r7);
Bill Buzbee1465db52009-09-23 17:17:35 -07003435 opRegRegImm(cUnit, kOpAdd, r4PC, rGLUE, offset);
3436 opImm(cUnit, kOpPush, (1<<r4PC) | (1<<r7));
Ben Chengbd1326d2010-04-02 15:04:53 -07003437 LOAD_FUNC_ADDR(cUnit, r4PC, (int)inLineTable[operation].func);
Bill Buzbee1465db52009-09-23 17:17:35 -07003438 genExportPC(cUnit, mir);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003439 for (i=0; i < dInsn->vA; i++) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08003440 loadValueDirect(cUnit, dvmCompilerGetSrc(cUnit, mir, i), i);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003441 }
Bill Buzbee1465db52009-09-23 17:17:35 -07003442 opReg(cUnit, kOpBlx, r4PC);
3443 opRegImm(cUnit, kOpAdd, r13, 8);
buzbee8f8109a2010-08-31 10:16:35 -07003444 /* NULL? */
3445 ArmLIR *branchOver = genCmpImmBranch(cUnit, kArmCondNe, r0, 0);
Bill Buzbeece46c942009-11-20 15:41:34 -08003446 loadConstant(cUnit, r0,
3447 (int) (cUnit->method->insns + mir->offset));
3448 genDispatchToHandler(cUnit, TEMPLATE_THROW_EXCEPTION_COMMON);
3449 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
3450 target->defMask = ENCODE_ALL;
3451 branchOver->generic.target = (LIR *) target;
Ben Chengba4fc8b2009-06-01 13:00:29 -07003452 break;
3453 }
3454 default:
3455 return true;
3456 }
3457 return false;
3458}
3459
3460static bool handleFmt51l(CompilationUnit *cUnit, MIR *mir)
3461{
Bill Buzbee1465db52009-09-23 17:17:35 -07003462 //TUNING: We're using core regs here - not optimal when target is a double
Bill Buzbeec6f10662010-02-09 11:16:15 -08003463 RegLocation rlDest = dvmCompilerGetDestWide(cUnit, mir, 0, 1);
3464 RegLocation rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Ben Chengbd1326d2010-04-02 15:04:53 -07003465 loadConstantNoClobber(cUnit, rlResult.lowReg,
3466 mir->dalvikInsn.vB_wide & 0xFFFFFFFFUL);
3467 loadConstantNoClobber(cUnit, rlResult.highReg,
3468 (mir->dalvikInsn.vB_wide>>32) & 0xFFFFFFFFUL);
Bill Buzbee1465db52009-09-23 17:17:35 -07003469 storeValueWide(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003470 return false;
3471}
3472
Ben Chengba4fc8b2009-06-01 13:00:29 -07003473/*
3474 * The following are special processing routines that handle transfer of
3475 * controls between compiled code and the interpreter. Certain VM states like
3476 * Dalvik PC and special-purpose registers are reconstructed here.
3477 */
3478
Bill Buzbeebd047242010-05-13 13:02:53 -07003479/*
3480 * Insert a
3481 * b .+4
3482 * nop
3483 * pair at the beginning of a chaining cell. This serves as the
3484 * switch branch that selects between reverting to the interpreter or
3485 * not. Once the cell is chained to a translation, the cell will
3486 * contain a 32-bit branch. Subsequent chain/unchain operations will
3487 * then only alter that first 16-bits - the "b .+4" for unchaining,
3488 * and the restoration of the first half of the 32-bit branch for
3489 * rechaining.
3490 */
3491static void insertChainingSwitch(CompilationUnit *cUnit)
3492{
3493 ArmLIR *branch = newLIR0(cUnit, kThumbBUncond);
3494 newLIR2(cUnit, kThumbOrr, r0, r0);
3495 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
3496 target->defMask = ENCODE_ALL;
3497 branch->generic.target = (LIR *) target;
3498}
3499
Ben Cheng1efc9c52009-06-08 18:25:27 -07003500/* Chaining cell for code that may need warmup. */
3501static void handleNormalChainingCell(CompilationUnit *cUnit,
3502 unsigned int offset)
Ben Chengba4fc8b2009-06-01 13:00:29 -07003503{
Ben Cheng11d8f142010-03-24 15:24:19 -07003504 /*
3505 * Use raw instruction constructors to guarantee that the generated
3506 * instructions fit the predefined cell size.
3507 */
Bill Buzbeebd047242010-05-13 13:02:53 -07003508 insertChainingSwitch(cUnit);
Ben Cheng11d8f142010-03-24 15:24:19 -07003509 newLIR3(cUnit, kThumbLdrRRI5, r0, rGLUE,
3510 offsetof(InterpState,
3511 jitToInterpEntries.dvmJitToInterpNormal) >> 2);
3512 newLIR1(cUnit, kThumbBlxR, r0);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003513 addWordData(cUnit, (int) (cUnit->method->insns + offset), true);
3514}
3515
3516/*
Ben Cheng1efc9c52009-06-08 18:25:27 -07003517 * Chaining cell for instructions that immediately following already translated
3518 * code.
Ben Chengba4fc8b2009-06-01 13:00:29 -07003519 */
Ben Cheng1efc9c52009-06-08 18:25:27 -07003520static void handleHotChainingCell(CompilationUnit *cUnit,
3521 unsigned int offset)
Ben Chengba4fc8b2009-06-01 13:00:29 -07003522{
Ben Cheng11d8f142010-03-24 15:24:19 -07003523 /*
3524 * Use raw instruction constructors to guarantee that the generated
3525 * instructions fit the predefined cell size.
3526 */
Bill Buzbeebd047242010-05-13 13:02:53 -07003527 insertChainingSwitch(cUnit);
Ben Cheng11d8f142010-03-24 15:24:19 -07003528 newLIR3(cUnit, kThumbLdrRRI5, r0, rGLUE,
3529 offsetof(InterpState,
3530 jitToInterpEntries.dvmJitToInterpTraceSelect) >> 2);
3531 newLIR1(cUnit, kThumbBlxR, r0);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003532 addWordData(cUnit, (int) (cUnit->method->insns + offset), true);
3533}
3534
Bill Buzbee9c4b7c82009-09-10 10:10:38 -07003535#if defined(WITH_SELF_VERIFICATION) || defined(WITH_JIT_TUNING)
Jeff Hao97319a82009-08-12 16:57:15 -07003536/* Chaining cell for branches that branch back into the same basic block */
3537static void handleBackwardBranchChainingCell(CompilationUnit *cUnit,
3538 unsigned int offset)
3539{
Ben Cheng11d8f142010-03-24 15:24:19 -07003540 /*
3541 * Use raw instruction constructors to guarantee that the generated
3542 * instructions fit the predefined cell size.
3543 */
Bill Buzbeebd047242010-05-13 13:02:53 -07003544 insertChainingSwitch(cUnit);
Bill Buzbee9c4b7c82009-09-10 10:10:38 -07003545#if defined(WITH_SELF_VERIFICATION)
Bill Buzbee1465db52009-09-23 17:17:35 -07003546 newLIR3(cUnit, kThumbLdrRRI5, r0, rGLUE,
Ben Cheng40094c12010-02-24 20:58:44 -08003547 offsetof(InterpState,
3548 jitToInterpEntries.dvmJitToInterpBackwardBranch) >> 2);
Bill Buzbee9c4b7c82009-09-10 10:10:38 -07003549#else
Bill Buzbee1465db52009-09-23 17:17:35 -07003550 newLIR3(cUnit, kThumbLdrRRI5, r0, rGLUE,
Bill Buzbee9c4b7c82009-09-10 10:10:38 -07003551 offsetof(InterpState, jitToInterpEntries.dvmJitToInterpNormal) >> 2);
3552#endif
Bill Buzbee1465db52009-09-23 17:17:35 -07003553 newLIR1(cUnit, kThumbBlxR, r0);
Jeff Hao97319a82009-08-12 16:57:15 -07003554 addWordData(cUnit, (int) (cUnit->method->insns + offset), true);
3555}
3556
3557#endif
Ben Chengba4fc8b2009-06-01 13:00:29 -07003558/* Chaining cell for monomorphic method invocations. */
Ben Cheng38329f52009-07-07 14:19:20 -07003559static void handleInvokeSingletonChainingCell(CompilationUnit *cUnit,
3560 const Method *callee)
Ben Chengba4fc8b2009-06-01 13:00:29 -07003561{
Ben Cheng11d8f142010-03-24 15:24:19 -07003562 /*
3563 * Use raw instruction constructors to guarantee that the generated
3564 * instructions fit the predefined cell size.
3565 */
Bill Buzbeebd047242010-05-13 13:02:53 -07003566 insertChainingSwitch(cUnit);
Ben Cheng11d8f142010-03-24 15:24:19 -07003567 newLIR3(cUnit, kThumbLdrRRI5, r0, rGLUE,
3568 offsetof(InterpState,
3569 jitToInterpEntries.dvmJitToInterpTraceSelect) >> 2);
3570 newLIR1(cUnit, kThumbBlxR, r0);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003571 addWordData(cUnit, (int) (callee->insns), true);
3572}
3573
Ben Cheng38329f52009-07-07 14:19:20 -07003574/* Chaining cell for monomorphic method invocations. */
3575static void handleInvokePredictedChainingCell(CompilationUnit *cUnit)
3576{
3577
3578 /* Should not be executed in the initial state */
3579 addWordData(cUnit, PREDICTED_CHAIN_BX_PAIR_INIT, true);
3580 /* To be filled: class */
3581 addWordData(cUnit, PREDICTED_CHAIN_CLAZZ_INIT, true);
3582 /* To be filled: method */
3583 addWordData(cUnit, PREDICTED_CHAIN_METHOD_INIT, true);
3584 /*
3585 * Rechain count. The initial value of 0 here will trigger chaining upon
3586 * the first invocation of this callsite.
3587 */
3588 addWordData(cUnit, PREDICTED_CHAIN_COUNTER_INIT, true);
3589}
3590
Ben Chengba4fc8b2009-06-01 13:00:29 -07003591/* Load the Dalvik PC into r0 and jump to the specified target */
3592static void handlePCReconstruction(CompilationUnit *cUnit,
Bill Buzbee89efc3d2009-07-28 11:22:22 -07003593 ArmLIR *targetLabel)
Ben Chengba4fc8b2009-06-01 13:00:29 -07003594{
Bill Buzbee89efc3d2009-07-28 11:22:22 -07003595 ArmLIR **pcrLabel =
3596 (ArmLIR **) cUnit->pcReconstructionList.elemList;
Ben Chengba4fc8b2009-06-01 13:00:29 -07003597 int numElems = cUnit->pcReconstructionList.numUsed;
3598 int i;
3599 for (i = 0; i < numElems; i++) {
3600 dvmCompilerAppendLIR(cUnit, (LIR *) pcrLabel[i]);
3601 /* r0 = dalvik PC */
3602 loadConstant(cUnit, r0, pcrLabel[i]->operands[0]);
3603 genUnconditionalBranch(cUnit, targetLabel);
3604 }
3605}
3606
Bill Buzbee1465db52009-09-23 17:17:35 -07003607static char *extendedMIROpNames[kMirOpLast - kMirOpFirst] = {
3608 "kMirOpPhi",
3609 "kMirOpNullNRangeUpCheck",
3610 "kMirOpNullNRangeDownCheck",
3611 "kMirOpLowerBound",
3612 "kMirOpPunt",
Ben Cheng7a2697d2010-06-07 13:44:23 -07003613 "kMirOpCheckInlinePrediction",
Ben Cheng4238ec22009-08-24 16:32:22 -07003614};
3615
3616/*
3617 * vA = arrayReg;
3618 * vB = idxReg;
3619 * vC = endConditionReg;
3620 * arg[0] = maxC
3621 * arg[1] = minC
3622 * arg[2] = loopBranchConditionCode
3623 */
3624static void genHoistedChecksForCountUpLoop(CompilationUnit *cUnit, MIR *mir)
3625{
Bill Buzbee1465db52009-09-23 17:17:35 -07003626 /*
3627 * NOTE: these synthesized blocks don't have ssa names assigned
3628 * for Dalvik registers. However, because they dominate the following
3629 * blocks we can simply use the Dalvik name w/ subscript 0 as the
3630 * ssa name.
3631 */
Ben Cheng4238ec22009-08-24 16:32:22 -07003632 DecodedInstruction *dInsn = &mir->dalvikInsn;
3633 const int lenOffset = offsetof(ArrayObject, length);
Ben Cheng4238ec22009-08-24 16:32:22 -07003634 const int maxC = dInsn->arg[0];
Bill Buzbee1465db52009-09-23 17:17:35 -07003635 int regLength;
3636 RegLocation rlArray = cUnit->regLocation[mir->dalvikInsn.vA];
3637 RegLocation rlIdxEnd = cUnit->regLocation[mir->dalvikInsn.vC];
Ben Cheng4238ec22009-08-24 16:32:22 -07003638
3639 /* regArray <- arrayRef */
Bill Buzbee1465db52009-09-23 17:17:35 -07003640 rlArray = loadValue(cUnit, rlArray, kCoreReg);
3641 rlIdxEnd = loadValue(cUnit, rlIdxEnd, kCoreReg);
3642 genRegImmCheck(cUnit, kArmCondEq, rlArray.lowReg, 0, 0,
Ben Cheng4238ec22009-08-24 16:32:22 -07003643 (ArmLIR *) cUnit->loopAnalysis->branchToPCR);
3644
3645 /* regLength <- len(arrayRef) */
Bill Buzbeec6f10662010-02-09 11:16:15 -08003646 regLength = dvmCompilerAllocTemp(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07003647 loadWordDisp(cUnit, rlArray.lowReg, lenOffset, regLength);
Ben Cheng4238ec22009-08-24 16:32:22 -07003648
3649 int delta = maxC;
3650 /*
3651 * If the loop end condition is ">=" instead of ">", then the largest value
3652 * of the index is "endCondition - 1".
3653 */
3654 if (dInsn->arg[2] == OP_IF_GE) {
3655 delta--;
3656 }
3657
3658 if (delta) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08003659 int tReg = dvmCompilerAllocTemp(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07003660 opRegRegImm(cUnit, kOpAdd, tReg, rlIdxEnd.lowReg, delta);
3661 rlIdxEnd.lowReg = tReg;
Bill Buzbeec6f10662010-02-09 11:16:15 -08003662 dvmCompilerFreeTemp(cUnit, tReg);
Ben Cheng4238ec22009-08-24 16:32:22 -07003663 }
3664 /* Punt if "regIdxEnd < len(Array)" is false */
Bill Buzbee1465db52009-09-23 17:17:35 -07003665 genRegRegCheck(cUnit, kArmCondGe, rlIdxEnd.lowReg, regLength, 0,
Ben Cheng0fd31e42009-09-03 14:40:16 -07003666 (ArmLIR *) cUnit->loopAnalysis->branchToPCR);
Ben Cheng4238ec22009-08-24 16:32:22 -07003667}
3668
3669/*
3670 * vA = arrayReg;
3671 * vB = idxReg;
3672 * vC = endConditionReg;
3673 * arg[0] = maxC
3674 * arg[1] = minC
3675 * arg[2] = loopBranchConditionCode
3676 */
3677static void genHoistedChecksForCountDownLoop(CompilationUnit *cUnit, MIR *mir)
3678{
3679 DecodedInstruction *dInsn = &mir->dalvikInsn;
3680 const int lenOffset = offsetof(ArrayObject, length);
Bill Buzbeec6f10662010-02-09 11:16:15 -08003681 const int regLength = dvmCompilerAllocTemp(cUnit);
Ben Cheng4238ec22009-08-24 16:32:22 -07003682 const int maxC = dInsn->arg[0];
Bill Buzbee1465db52009-09-23 17:17:35 -07003683 RegLocation rlArray = cUnit->regLocation[mir->dalvikInsn.vA];
3684 RegLocation rlIdxInit = cUnit->regLocation[mir->dalvikInsn.vB];
Ben Cheng4238ec22009-08-24 16:32:22 -07003685
3686 /* regArray <- arrayRef */
Bill Buzbee1465db52009-09-23 17:17:35 -07003687 rlArray = loadValue(cUnit, rlArray, kCoreReg);
3688 rlIdxInit = loadValue(cUnit, rlIdxInit, kCoreReg);
3689 genRegImmCheck(cUnit, kArmCondEq, rlArray.lowReg, 0, 0,
Ben Cheng4238ec22009-08-24 16:32:22 -07003690 (ArmLIR *) cUnit->loopAnalysis->branchToPCR);
3691
3692 /* regLength <- len(arrayRef) */
Bill Buzbee1465db52009-09-23 17:17:35 -07003693 loadWordDisp(cUnit, rlArray.lowReg, lenOffset, regLength);
Ben Cheng4238ec22009-08-24 16:32:22 -07003694
3695 if (maxC) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08003696 int tReg = dvmCompilerAllocTemp(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07003697 opRegRegImm(cUnit, kOpAdd, tReg, rlIdxInit.lowReg, maxC);
3698 rlIdxInit.lowReg = tReg;
Bill Buzbeec6f10662010-02-09 11:16:15 -08003699 dvmCompilerFreeTemp(cUnit, tReg);
Ben Cheng4238ec22009-08-24 16:32:22 -07003700 }
3701
3702 /* Punt if "regIdxInit < len(Array)" is false */
Bill Buzbee1465db52009-09-23 17:17:35 -07003703 genRegRegCheck(cUnit, kArmCondGe, rlIdxInit.lowReg, regLength, 0,
Ben Cheng0fd31e42009-09-03 14:40:16 -07003704 (ArmLIR *) cUnit->loopAnalysis->branchToPCR);
Ben Cheng4238ec22009-08-24 16:32:22 -07003705}
3706
3707/*
3708 * vA = idxReg;
3709 * vB = minC;
3710 */
3711static void genHoistedLowerBoundCheck(CompilationUnit *cUnit, MIR *mir)
3712{
3713 DecodedInstruction *dInsn = &mir->dalvikInsn;
Ben Cheng4238ec22009-08-24 16:32:22 -07003714 const int minC = dInsn->vB;
Bill Buzbee1465db52009-09-23 17:17:35 -07003715 RegLocation rlIdx = cUnit->regLocation[mir->dalvikInsn.vA];
Ben Cheng4238ec22009-08-24 16:32:22 -07003716
3717 /* regIdx <- initial index value */
Bill Buzbee1465db52009-09-23 17:17:35 -07003718 rlIdx = loadValue(cUnit, rlIdx, kCoreReg);
Ben Cheng4238ec22009-08-24 16:32:22 -07003719
3720 /* Punt if "regIdxInit + minC >= 0" is false */
Bill Buzbee1465db52009-09-23 17:17:35 -07003721 genRegImmCheck(cUnit, kArmCondLt, rlIdx.lowReg, -minC, 0,
Ben Cheng4238ec22009-08-24 16:32:22 -07003722 (ArmLIR *) cUnit->loopAnalysis->branchToPCR);
3723}
3724
Ben Cheng7a2697d2010-06-07 13:44:23 -07003725/*
3726 * vC = this
3727 *
3728 * A predicted inlining target looks like the following, where instructions
3729 * between 0x4858de66 and 0x4858de72 are checking if the predicted class
3730 * matches "this", and the verificaion code is generated by this routine.
3731 *
3732 * (C) means the instruction is inlined from the callee, and (PI) means the
3733 * instruction is the predicted inlined invoke, whose corresponding
3734 * instructions are still generated to handle the mispredicted case.
3735 *
3736 * D/dalvikvm( 86): -------- kMirOpCheckInlinePrediction
3737 * D/dalvikvm( 86): 0x4858de66 (0002): ldr r0, [r5, #68]
3738 * D/dalvikvm( 86): 0x4858de68 (0004): ldr r1, [pc, #140]
3739 * D/dalvikvm( 86): 0x4858de6a (0006): cmp r0, #0
3740 * D/dalvikvm( 86): 0x4858de6c (0008): beq 0x4858deb2
3741 * D/dalvikvm( 86): 0x4858de6e (000a): ldr r2, [r0, #0]
3742 * D/dalvikvm( 86): 0x4858de70 (000c): cmp r1, r2
3743 * D/dalvikvm( 86): 0x4858de72 (000e): bne 0x4858de7a
3744 * D/dalvikvm( 86): -------- dalvik offset: 0x004c @ +iget-object-quick (C)
3745 * v4, v17, (#8)
3746 * D/dalvikvm( 86): 0x4858de74 (0010): ldr r3, [r0, #8]
3747 * D/dalvikvm( 86): 0x4858de76 (0012): str r3, [r5, #16]
3748 * D/dalvikvm( 86): -------- dalvik offset: 0x004c @
3749 * +invoke-virtual-quick/range (PI) v17..v17
3750 * D/dalvikvm( 86): 0x4858de78 (0014): b 0x4858debc
3751 * D/dalvikvm( 86): 0x4858de7a (0016): add r4,r5,#68
3752 * D/dalvikvm( 86): -------- BARRIER
3753 * D/dalvikvm( 86): 0x4858de7e (001a): ldmia r4, <r0>
3754 * D/dalvikvm( 86): -------- BARRIER
3755 * D/dalvikvm( 86): 0x4858de80 (001c): sub r7,r5,#24
3756 * D/dalvikvm( 86): 0x4858de84 (0020): cmp r0, #0
3757 * D/dalvikvm( 86): 0x4858de86 (0022): beq 0x4858deb6
3758 * D/dalvikvm( 86): -------- BARRIER
3759 * D/dalvikvm( 86): 0x4858de88 (0024): stmia r7, <r0>
3760 * D/dalvikvm( 86): -------- BARRIER
3761 * D/dalvikvm( 86): 0x4858de8a (0026): ldr r4, [pc, #104]
3762 * D/dalvikvm( 86): 0x4858de8c (0028): add r1, pc, #28
3763 * D/dalvikvm( 86): 0x4858de8e (002a): add r2, pc, #56
3764 * D/dalvikvm( 86): 0x4858de90 (002c): blx_1 0x48589198
3765 * D/dalvikvm( 86): 0x4858de92 (002e): blx_2 see above
3766 * D/dalvikvm( 86): 0x4858de94 (0030): b 0x4858dec8
3767 * D/dalvikvm( 86): 0x4858de96 (0032): b 0x4858deb6
3768 * D/dalvikvm( 86): 0x4858de98 (0034): ldr r0, [r7, #72]
3769 * D/dalvikvm( 86): 0x4858de9a (0036): cmp r1, #0
3770 * D/dalvikvm( 86): 0x4858de9c (0038): bgt 0x4858dea4
3771 * D/dalvikvm( 86): 0x4858de9e (003a): ldr r7, [r6, #116]
3772 * D/dalvikvm( 86): 0x4858dea0 (003c): movs r1, r6
3773 * D/dalvikvm( 86): 0x4858dea2 (003e): blx r7
3774 * D/dalvikvm( 86): 0x4858dea4 (0040): add r1, pc, #4
3775 * D/dalvikvm( 86): 0x4858dea6 (0042): blx_1 0x485890a0
3776 * D/dalvikvm( 86): 0x4858dea8 (0044): blx_2 see above
3777 * D/dalvikvm( 86): 0x4858deaa (0046): b 0x4858deb6
3778 * D/dalvikvm( 86): 0x4858deac (0048): .align4
3779 * D/dalvikvm( 86): L0x004f:
3780 * D/dalvikvm( 86): -------- dalvik offset: 0x004f @ move-result-object (PI)
3781 * v4, (#0), (#0)
3782 * D/dalvikvm( 86): 0x4858deac (0048): ldr r4, [r6, #8]
3783 * D/dalvikvm( 86): 0x4858deae (004a): str r4, [r5, #16]
3784 * D/dalvikvm( 86): 0x4858deb0 (004c): b 0x4858debc
3785 * D/dalvikvm( 86): -------- reconstruct dalvik PC : 0x42beefcc @ +0x004c
3786 * D/dalvikvm( 86): 0x4858deb2 (004e): ldr r0, [pc, #64]
3787 * D/dalvikvm( 86): 0x4858deb4 (0050): b 0x4858deb8
3788 * D/dalvikvm( 86): -------- reconstruct dalvik PC : 0x42beefcc @ +0x004c
3789 * D/dalvikvm( 86): 0x4858deb6 (0052): ldr r0, [pc, #60]
3790 * D/dalvikvm( 86): Exception_Handling:
3791 * D/dalvikvm( 86): 0x4858deb8 (0054): ldr r1, [r6, #100]
3792 * D/dalvikvm( 86): 0x4858deba (0056): blx r1
3793 * D/dalvikvm( 86): 0x4858debc (0058): .align4
3794 * D/dalvikvm( 86): -------- chaining cell (hot): 0x0050
3795 * D/dalvikvm( 86): 0x4858debc (0058): b 0x4858dec0
3796 * D/dalvikvm( 86): 0x4858debe (005a): orrs r0, r0
3797 * D/dalvikvm( 86): 0x4858dec0 (005c): ldr r0, [r6, #112]
3798 * D/dalvikvm( 86): 0x4858dec2 (005e): blx r0
3799 * D/dalvikvm( 86): 0x4858dec4 (0060): data 0xefd4(61396)
3800 * D/dalvikvm( 86): 0x4858dec6 (0062): data 0x42be(17086)
3801 * D/dalvikvm( 86): 0x4858dec8 (0064): .align4
3802 * D/dalvikvm( 86): -------- chaining cell (predicted)
3803 * D/dalvikvm( 86): 0x4858dec8 (0064): data 0xe7fe(59390)
3804 * D/dalvikvm( 86): 0x4858deca (0066): data 0x0000(0)
3805 * D/dalvikvm( 86): 0x4858decc (0068): data 0x0000(0)
3806 * D/dalvikvm( 86): 0x4858dece (006a): data 0x0000(0)
3807 * :
3808 */
3809static void genValidationForPredictedInline(CompilationUnit *cUnit, MIR *mir)
3810{
3811 CallsiteInfo *callsiteInfo = mir->meta.callsiteInfo;
3812 RegLocation rlThis = cUnit->regLocation[mir->dalvikInsn.vC];
3813
3814 rlThis = loadValue(cUnit, rlThis, kCoreReg);
3815 int regPredictedClass = dvmCompilerAllocTemp(cUnit);
3816 loadConstant(cUnit, regPredictedClass, (int) callsiteInfo->clazz);
3817 genNullCheck(cUnit, rlThis.sRegLow, rlThis.lowReg, mir->offset,
3818 NULL);/* null object? */
3819 int regActualClass = dvmCompilerAllocTemp(cUnit);
3820 loadWordDisp(cUnit, rlThis.lowReg, offsetof(Object, clazz), regActualClass);
3821 opRegReg(cUnit, kOpCmp, regPredictedClass, regActualClass);
3822 /*
3823 * Set the misPredBranchOver target so that it will be generated when the
3824 * code for the non-optimized invoke is generated.
3825 */
3826 callsiteInfo->misPredBranchOver = (LIR *) opCondBranch(cUnit, kArmCondNe);
3827}
3828
Ben Cheng4238ec22009-08-24 16:32:22 -07003829/* Extended MIR instructions like PHI */
3830static void handleExtendedMIR(CompilationUnit *cUnit, MIR *mir)
3831{
Dan Bornstein9a1f8162010-12-01 17:02:26 -08003832 int opOffset = mir->dalvikInsn.opcode - kMirOpFirst;
Ben Cheng4238ec22009-08-24 16:32:22 -07003833 char *msg = dvmCompilerNew(strlen(extendedMIROpNames[opOffset]) + 1,
3834 false);
3835 strcpy(msg, extendedMIROpNames[opOffset]);
Bill Buzbee1465db52009-09-23 17:17:35 -07003836 newLIR1(cUnit, kArmPseudoExtended, (int) msg);
Ben Cheng4238ec22009-08-24 16:32:22 -07003837
Dan Bornstein9a1f8162010-12-01 17:02:26 -08003838 switch (mir->dalvikInsn.opcode) {
Bill Buzbee1465db52009-09-23 17:17:35 -07003839 case kMirOpPhi: {
Ben Cheng4238ec22009-08-24 16:32:22 -07003840 char *ssaString = dvmCompilerGetSSAString(cUnit, mir->ssaRep);
Bill Buzbee1465db52009-09-23 17:17:35 -07003841 newLIR1(cUnit, kArmPseudoSSARep, (int) ssaString);
Ben Cheng4238ec22009-08-24 16:32:22 -07003842 break;
3843 }
Bill Buzbee1465db52009-09-23 17:17:35 -07003844 case kMirOpNullNRangeUpCheck: {
Ben Cheng4238ec22009-08-24 16:32:22 -07003845 genHoistedChecksForCountUpLoop(cUnit, mir);
3846 break;
3847 }
Bill Buzbee1465db52009-09-23 17:17:35 -07003848 case kMirOpNullNRangeDownCheck: {
Ben Cheng4238ec22009-08-24 16:32:22 -07003849 genHoistedChecksForCountDownLoop(cUnit, mir);
3850 break;
3851 }
Bill Buzbee1465db52009-09-23 17:17:35 -07003852 case kMirOpLowerBound: {
Ben Cheng4238ec22009-08-24 16:32:22 -07003853 genHoistedLowerBoundCheck(cUnit, mir);
3854 break;
3855 }
Bill Buzbee1465db52009-09-23 17:17:35 -07003856 case kMirOpPunt: {
Ben Cheng4238ec22009-08-24 16:32:22 -07003857 genUnconditionalBranch(cUnit,
3858 (ArmLIR *) cUnit->loopAnalysis->branchToPCR);
3859 break;
3860 }
Ben Cheng7a2697d2010-06-07 13:44:23 -07003861 case kMirOpCheckInlinePrediction: {
3862 genValidationForPredictedInline(cUnit, mir);
3863 break;
3864 }
Ben Cheng4238ec22009-08-24 16:32:22 -07003865 default:
3866 break;
3867 }
3868}
3869
3870/*
3871 * Create a PC-reconstruction cell for the starting offset of this trace.
3872 * Since the PCR cell is placed near the end of the compiled code which is
3873 * usually out of range for a conditional branch, we put two branches (one
3874 * branch over to the loop body and one layover branch to the actual PCR) at the
3875 * end of the entry block.
3876 */
3877static void setupLoopEntryBlock(CompilationUnit *cUnit, BasicBlock *entry,
3878 ArmLIR *bodyLabel)
3879{
3880 /* Set up the place holder to reconstruct this Dalvik PC */
3881 ArmLIR *pcrLabel = dvmCompilerNew(sizeof(ArmLIR), true);
Dan Bornstein9a1f8162010-12-01 17:02:26 -08003882 pcrLabel->opcode = kArmPseudoPCReconstructionCell;
Ben Cheng4238ec22009-08-24 16:32:22 -07003883 pcrLabel->operands[0] =
3884 (int) (cUnit->method->insns + entry->startOffset);
3885 pcrLabel->operands[1] = entry->startOffset;
3886 /* Insert the place holder to the growable list */
3887 dvmInsertGrowableList(&cUnit->pcReconstructionList, pcrLabel);
3888
3889 /*
3890 * Next, create two branches - one branch over to the loop body and the
3891 * other branch to the PCR cell to punt.
3892 */
3893 ArmLIR *branchToBody = dvmCompilerNew(sizeof(ArmLIR), true);
Dan Bornstein9a1f8162010-12-01 17:02:26 -08003894 branchToBody->opcode = kThumbBUncond;
Ben Cheng4238ec22009-08-24 16:32:22 -07003895 branchToBody->generic.target = (LIR *) bodyLabel;
Ben Chengdcf3e5d2009-09-11 13:42:05 -07003896 setupResourceMasks(branchToBody);
Ben Cheng4238ec22009-08-24 16:32:22 -07003897 cUnit->loopAnalysis->branchToBody = (LIR *) branchToBody;
3898
3899 ArmLIR *branchToPCR = dvmCompilerNew(sizeof(ArmLIR), true);
Dan Bornstein9a1f8162010-12-01 17:02:26 -08003900 branchToPCR->opcode = kThumbBUncond;
Ben Cheng4238ec22009-08-24 16:32:22 -07003901 branchToPCR->generic.target = (LIR *) pcrLabel;
Ben Chengdcf3e5d2009-09-11 13:42:05 -07003902 setupResourceMasks(branchToPCR);
Ben Cheng4238ec22009-08-24 16:32:22 -07003903 cUnit->loopAnalysis->branchToPCR = (LIR *) branchToPCR;
3904}
3905
Ben Chengd5adae12010-03-26 17:45:28 -07003906#if defined(WITH_SELF_VERIFICATION)
3907static bool selfVerificationPuntOps(MIR *mir)
3908{
3909 DecodedInstruction *decInsn = &mir->dalvikInsn;
Dan Bornstein9a1f8162010-12-01 17:02:26 -08003910 Opcode op = decInsn->opcode;
Ben Cheng7a2697d2010-06-07 13:44:23 -07003911
Ben Chengd5adae12010-03-26 17:45:28 -07003912 /*
3913 * All opcodes that can throw exceptions and use the
3914 * TEMPLATE_THROW_EXCEPTION_COMMON template should be excluded in the trace
3915 * under self-verification mode.
3916 */
3917 return (op == OP_MONITOR_ENTER || op == OP_MONITOR_EXIT ||
3918 op == OP_NEW_INSTANCE || op == OP_NEW_ARRAY ||
3919 op == OP_CHECK_CAST || op == OP_MOVE_EXCEPTION ||
3920 op == OP_FILL_ARRAY_DATA || op == OP_EXECUTE_INLINE ||
Ben Cheng7a2697d2010-06-07 13:44:23 -07003921 op == OP_EXECUTE_INLINE_RANGE);
Ben Chengd5adae12010-03-26 17:45:28 -07003922}
3923#endif
3924
Ben Chengba4fc8b2009-06-01 13:00:29 -07003925void dvmCompilerMIR2LIR(CompilationUnit *cUnit)
3926{
3927 /* Used to hold the labels of each block */
Bill Buzbee89efc3d2009-07-28 11:22:22 -07003928 ArmLIR *labelList =
3929 dvmCompilerNew(sizeof(ArmLIR) * cUnit->numBlocks, true);
Ben Chengcec26f62010-01-15 15:29:33 -08003930 GrowableList chainingListByType[kChainingCellGap];
Ben Chengba4fc8b2009-06-01 13:00:29 -07003931 int i;
3932
3933 /*
Ben Cheng38329f52009-07-07 14:19:20 -07003934 * Initialize various types chaining lists.
Ben Chengba4fc8b2009-06-01 13:00:29 -07003935 */
Ben Chengcec26f62010-01-15 15:29:33 -08003936 for (i = 0; i < kChainingCellGap; i++) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07003937 dvmInitGrowableList(&chainingListByType[i], 2);
3938 }
3939
3940 BasicBlock **blockList = cUnit->blockList;
3941
Bill Buzbee6e963e12009-06-17 16:56:19 -07003942 if (cUnit->executionCount) {
3943 /*
3944 * Reserve 6 bytes at the beginning of the trace
3945 * +----------------------------+
3946 * | execution count (4 bytes) |
3947 * +----------------------------+
3948 * | chain cell offset (2 bytes)|
3949 * +----------------------------+
3950 * ...and then code to increment the execution
3951 * count:
3952 * mov r0, pc @ move adr of "mov r0,pc" + 4 to r0
3953 * sub r0, #10 @ back up to addr of executionCount
3954 * ldr r1, [r0]
3955 * add r1, #1
3956 * str r1, [r0]
3957 */
Bill Buzbee1465db52009-09-23 17:17:35 -07003958 newLIR1(cUnit, kArm16BitData, 0);
3959 newLIR1(cUnit, kArm16BitData, 0);
Ben Chengcc6600c2009-06-22 14:45:16 -07003960 cUnit->chainCellOffsetLIR =
Bill Buzbee1465db52009-09-23 17:17:35 -07003961 (LIR *) newLIR1(cUnit, kArm16BitData, CHAIN_CELL_OFFSET_TAG);
Bill Buzbee6e963e12009-06-17 16:56:19 -07003962 cUnit->headerSize = 6;
Bill Buzbee270c1d62009-08-13 16:58:07 -07003963 /* Thumb instruction used directly here to ensure correct size */
Bill Buzbee1465db52009-09-23 17:17:35 -07003964 newLIR2(cUnit, kThumbMovRR_H2L, r0, rpc);
3965 newLIR2(cUnit, kThumbSubRI8, r0, 10);
3966 newLIR3(cUnit, kThumbLdrRRI5, r1, r0, 0);
3967 newLIR2(cUnit, kThumbAddRI8, r1, 1);
3968 newLIR3(cUnit, kThumbStrRRI5, r1, r0, 0);
Bill Buzbee6e963e12009-06-17 16:56:19 -07003969 } else {
3970 /* Just reserve 2 bytes for the chain cell offset */
Ben Chengcc6600c2009-06-22 14:45:16 -07003971 cUnit->chainCellOffsetLIR =
Bill Buzbee1465db52009-09-23 17:17:35 -07003972 (LIR *) newLIR1(cUnit, kArm16BitData, CHAIN_CELL_OFFSET_TAG);
Bill Buzbee6e963e12009-06-17 16:56:19 -07003973 cUnit->headerSize = 2;
3974 }
Ben Cheng1efc9c52009-06-08 18:25:27 -07003975
Ben Chengba4fc8b2009-06-01 13:00:29 -07003976 /* Handle the content in each basic block */
3977 for (i = 0; i < cUnit->numBlocks; i++) {
3978 blockList[i]->visited = true;
3979 MIR *mir;
3980
3981 labelList[i].operands[0] = blockList[i]->startOffset;
3982
Ben Chengcec26f62010-01-15 15:29:33 -08003983 if (blockList[i]->blockType >= kChainingCellGap) {
Ben Cheng7a2697d2010-06-07 13:44:23 -07003984 if (blockList[i]->isFallThroughFromInvoke == true) {
Ben Chengd44faf52010-06-02 15:33:51 -07003985 /* Align this block first since it is a return chaining cell */
3986 newLIR0(cUnit, kArmPseudoPseudoAlign4);
3987 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07003988 /*
3989 * Append the label pseudo LIR first. Chaining cells will be handled
3990 * separately afterwards.
3991 */
3992 dvmCompilerAppendLIR(cUnit, (LIR *) &labelList[i]);
3993 }
3994
Ben Cheng7a2697d2010-06-07 13:44:23 -07003995 if (blockList[i]->blockType == kTraceEntryBlock) {
Dan Bornstein9a1f8162010-12-01 17:02:26 -08003996 labelList[i].opcode = kArmPseudoEntryBlock;
Ben Cheng4238ec22009-08-24 16:32:22 -07003997 if (blockList[i]->firstMIRInsn == NULL) {
3998 continue;
3999 } else {
4000 setupLoopEntryBlock(cUnit, blockList[i],
4001 &labelList[blockList[i]->fallThrough->id]);
4002 }
Ben Cheng7a2697d2010-06-07 13:44:23 -07004003 } else if (blockList[i]->blockType == kTraceExitBlock) {
Dan Bornstein9a1f8162010-12-01 17:02:26 -08004004 labelList[i].opcode = kArmPseudoExitBlock;
Ben Cheng4238ec22009-08-24 16:32:22 -07004005 goto gen_fallthrough;
Bill Buzbee1465db52009-09-23 17:17:35 -07004006 } else if (blockList[i]->blockType == kDalvikByteCode) {
Dan Bornstein9a1f8162010-12-01 17:02:26 -08004007 labelList[i].opcode = kArmPseudoNormalBlockLabel;
Ben Chenge9695e52009-06-16 16:11:47 -07004008 /* Reset the register state */
Bill Buzbeec6f10662010-02-09 11:16:15 -08004009 dvmCompilerResetRegPool(cUnit);
4010 dvmCompilerClobberAllRegs(cUnit);
4011 dvmCompilerResetNullCheck(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -07004012 } else {
4013 switch (blockList[i]->blockType) {
Bill Buzbee1465db52009-09-23 17:17:35 -07004014 case kChainingCellNormal:
Dan Bornstein9a1f8162010-12-01 17:02:26 -08004015 labelList[i].opcode = kArmPseudoChainingCellNormal;
Ben Chengba4fc8b2009-06-01 13:00:29 -07004016 /* handle the codegen later */
4017 dvmInsertGrowableList(
Bill Buzbee1465db52009-09-23 17:17:35 -07004018 &chainingListByType[kChainingCellNormal], (void *) i);
Ben Chengba4fc8b2009-06-01 13:00:29 -07004019 break;
Bill Buzbee1465db52009-09-23 17:17:35 -07004020 case kChainingCellInvokeSingleton:
Dan Bornstein9a1f8162010-12-01 17:02:26 -08004021 labelList[i].opcode =
Ben Chenga4973592010-03-31 11:59:18 -07004022 kArmPseudoChainingCellInvokeSingleton;
Ben Chengba4fc8b2009-06-01 13:00:29 -07004023 labelList[i].operands[0] =
4024 (int) blockList[i]->containingMethod;
4025 /* handle the codegen later */
4026 dvmInsertGrowableList(
Bill Buzbee1465db52009-09-23 17:17:35 -07004027 &chainingListByType[kChainingCellInvokeSingleton],
Ben Cheng38329f52009-07-07 14:19:20 -07004028 (void *) i);
4029 break;
Bill Buzbee1465db52009-09-23 17:17:35 -07004030 case kChainingCellInvokePredicted:
Dan Bornstein9a1f8162010-12-01 17:02:26 -08004031 labelList[i].opcode =
Ben Chenga4973592010-03-31 11:59:18 -07004032 kArmPseudoChainingCellInvokePredicted;
Ben Cheng38329f52009-07-07 14:19:20 -07004033 /* handle the codegen later */
4034 dvmInsertGrowableList(
Bill Buzbee1465db52009-09-23 17:17:35 -07004035 &chainingListByType[kChainingCellInvokePredicted],
Ben Cheng38329f52009-07-07 14:19:20 -07004036 (void *) i);
Ben Chengba4fc8b2009-06-01 13:00:29 -07004037 break;
Bill Buzbee1465db52009-09-23 17:17:35 -07004038 case kChainingCellHot:
Dan Bornstein9a1f8162010-12-01 17:02:26 -08004039 labelList[i].opcode =
Ben Chenga4973592010-03-31 11:59:18 -07004040 kArmPseudoChainingCellHot;
Ben Chengba4fc8b2009-06-01 13:00:29 -07004041 /* handle the codegen later */
4042 dvmInsertGrowableList(
Bill Buzbee1465db52009-09-23 17:17:35 -07004043 &chainingListByType[kChainingCellHot],
Ben Chengba4fc8b2009-06-01 13:00:29 -07004044 (void *) i);
4045 break;
Bill Buzbee1465db52009-09-23 17:17:35 -07004046 case kPCReconstruction:
Ben Chengba4fc8b2009-06-01 13:00:29 -07004047 /* Make sure exception handling block is next */
Dan Bornstein9a1f8162010-12-01 17:02:26 -08004048 labelList[i].opcode =
Ben Chenga4973592010-03-31 11:59:18 -07004049 kArmPseudoPCReconstructionBlockLabel;
Ben Chengba4fc8b2009-06-01 13:00:29 -07004050 assert (i == cUnit->numBlocks - 2);
4051 handlePCReconstruction(cUnit, &labelList[i+1]);
4052 break;
Bill Buzbee1465db52009-09-23 17:17:35 -07004053 case kExceptionHandling:
Dan Bornstein9a1f8162010-12-01 17:02:26 -08004054 labelList[i].opcode = kArmPseudoEHBlockLabel;
Ben Chengba4fc8b2009-06-01 13:00:29 -07004055 if (cUnit->pcReconstructionList.numUsed) {
Bill Buzbee270c1d62009-08-13 16:58:07 -07004056 loadWordDisp(cUnit, rGLUE, offsetof(InterpState,
4057 jitToInterpEntries.dvmJitToInterpPunt),
4058 r1);
Bill Buzbee1465db52009-09-23 17:17:35 -07004059 opReg(cUnit, kOpBlx, r1);
Ben Chengba4fc8b2009-06-01 13:00:29 -07004060 }
4061 break;
Bill Buzbee9c4b7c82009-09-10 10:10:38 -07004062#if defined(WITH_SELF_VERIFICATION) || defined(WITH_JIT_TUNING)
Bill Buzbee1465db52009-09-23 17:17:35 -07004063 case kChainingCellBackwardBranch:
Dan Bornstein9a1f8162010-12-01 17:02:26 -08004064 labelList[i].opcode =
Ben Chenga4973592010-03-31 11:59:18 -07004065 kArmPseudoChainingCellBackwardBranch;
Jeff Hao97319a82009-08-12 16:57:15 -07004066 /* handle the codegen later */
4067 dvmInsertGrowableList(
Bill Buzbee1465db52009-09-23 17:17:35 -07004068 &chainingListByType[kChainingCellBackwardBranch],
Jeff Hao97319a82009-08-12 16:57:15 -07004069 (void *) i);
4070 break;
4071#endif
Ben Chengba4fc8b2009-06-01 13:00:29 -07004072 default:
4073 break;
4074 }
4075 continue;
4076 }
Ben Chenge9695e52009-06-16 16:11:47 -07004077
Bill Buzbee89efc3d2009-07-28 11:22:22 -07004078 ArmLIR *headLIR = NULL;
Ben Chenge9695e52009-06-16 16:11:47 -07004079
Ben Chengba4fc8b2009-06-01 13:00:29 -07004080 for (mir = blockList[i]->firstMIRInsn; mir; mir = mir->next) {
Bill Buzbee1465db52009-09-23 17:17:35 -07004081
Bill Buzbeec6f10662010-02-09 11:16:15 -08004082 dvmCompilerResetRegPool(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07004083 if (gDvmJit.disableOpt & (1 << kTrackLiveTemps)) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08004084 dvmCompilerClobberAllRegs(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07004085 }
4086
4087 if (gDvmJit.disableOpt & (1 << kSuppressLoads)) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08004088 dvmCompilerResetDefTracking(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07004089 }
4090
Dan Bornstein9a1f8162010-12-01 17:02:26 -08004091 if (mir->dalvikInsn.opcode >= kMirOpFirst) {
Ben Cheng4238ec22009-08-24 16:32:22 -07004092 handleExtendedMIR(cUnit, mir);
4093 continue;
4094 }
4095
Bill Buzbee1465db52009-09-23 17:17:35 -07004096
Dan Bornstein9a1f8162010-12-01 17:02:26 -08004097 Opcode dalvikOpcode = mir->dalvikInsn.opcode;
Dan Bornsteine4852762010-12-02 12:45:00 -08004098 InstructionFormat dalvikFormat = dexGetFormatFromOpcode(dalvikOpcode);
Ben Cheng7a2697d2010-06-07 13:44:23 -07004099 char *note;
4100 if (mir->OptimizationFlags & MIR_INLINED) {
4101 note = " (I)";
4102 } else if (mir->OptimizationFlags & MIR_INLINED_PRED) {
4103 note = " (PI)";
4104 } else if (mir->OptimizationFlags & MIR_CALLEE) {
4105 note = " (C)";
4106 } else {
4107 note = NULL;
4108 }
4109
Bill Buzbee89efc3d2009-07-28 11:22:22 -07004110 ArmLIR *boundaryLIR =
Ben Chenga4973592010-03-31 11:59:18 -07004111 newLIR2(cUnit, kArmPseudoDalvikByteCodeBoundary,
Ben Chengccd6c012009-10-15 14:52:45 -07004112 mir->offset,
Ben Cheng7a2697d2010-06-07 13:44:23 -07004113 (int) dvmCompilerGetDalvikDisassembly(&mir->dalvikInsn,
4114 note));
Ben Cheng4238ec22009-08-24 16:32:22 -07004115 if (mir->ssaRep) {
4116 char *ssaString = dvmCompilerGetSSAString(cUnit, mir->ssaRep);
Bill Buzbee1465db52009-09-23 17:17:35 -07004117 newLIR1(cUnit, kArmPseudoSSARep, (int) ssaString);
Ben Cheng4238ec22009-08-24 16:32:22 -07004118 }
4119
Ben Chenge9695e52009-06-16 16:11:47 -07004120 /* Remember the first LIR for this block */
4121 if (headLIR == NULL) {
4122 headLIR = boundaryLIR;
Ben Chengd7d426a2009-09-22 11:23:36 -07004123 /* Set the first boundaryLIR as a scheduling barrier */
4124 headLIR->defMask = ENCODE_ALL;
Ben Chenge9695e52009-06-16 16:11:47 -07004125 }
Ben Cheng4238ec22009-08-24 16:32:22 -07004126
Ben Chengba4fc8b2009-06-01 13:00:29 -07004127 bool notHandled;
4128 /*
4129 * Debugging: screen the opcode first to see if it is in the
4130 * do[-not]-compile list
4131 */
Dan Bornstein9a1f8162010-12-01 17:02:26 -08004132 bool singleStepMe = SINGLE_STEP_OP(dalvikOpcode);
Ben Chengd5adae12010-03-26 17:45:28 -07004133#if defined(WITH_SELF_VERIFICATION)
4134 if (singleStepMe == false) {
4135 singleStepMe = selfVerificationPuntOps(mir);
4136 }
4137#endif
Ben Chengba4fc8b2009-06-01 13:00:29 -07004138 if (singleStepMe || cUnit->allSingleStep) {
4139 notHandled = false;
4140 genInterpSingleStep(cUnit, mir);
4141 } else {
Dan Bornstein9a1f8162010-12-01 17:02:26 -08004142 opcodeCoverage[dalvikOpcode]++;
Ben Chengba4fc8b2009-06-01 13:00:29 -07004143 switch (dalvikFormat) {
4144 case kFmt10t:
4145 case kFmt20t:
4146 case kFmt30t:
4147 notHandled = handleFmt10t_Fmt20t_Fmt30t(cUnit,
4148 mir, blockList[i], labelList);
4149 break;
4150 case kFmt10x:
4151 notHandled = handleFmt10x(cUnit, mir);
4152 break;
4153 case kFmt11n:
4154 case kFmt31i:
4155 notHandled = handleFmt11n_Fmt31i(cUnit, mir);
4156 break;
4157 case kFmt11x:
4158 notHandled = handleFmt11x(cUnit, mir);
4159 break;
4160 case kFmt12x:
4161 notHandled = handleFmt12x(cUnit, mir);
4162 break;
4163 case kFmt20bc:
4164 notHandled = handleFmt20bc(cUnit, mir);
4165 break;
4166 case kFmt21c:
4167 case kFmt31c:
4168 notHandled = handleFmt21c_Fmt31c(cUnit, mir);
4169 break;
4170 case kFmt21h:
4171 notHandled = handleFmt21h(cUnit, mir);
4172 break;
4173 case kFmt21s:
4174 notHandled = handleFmt21s(cUnit, mir);
4175 break;
4176 case kFmt21t:
4177 notHandled = handleFmt21t(cUnit, mir, blockList[i],
4178 labelList);
4179 break;
4180 case kFmt22b:
4181 case kFmt22s:
4182 notHandled = handleFmt22b_Fmt22s(cUnit, mir);
4183 break;
4184 case kFmt22c:
4185 notHandled = handleFmt22c(cUnit, mir);
4186 break;
4187 case kFmt22cs:
4188 notHandled = handleFmt22cs(cUnit, mir);
4189 break;
4190 case kFmt22t:
4191 notHandled = handleFmt22t(cUnit, mir, blockList[i],
4192 labelList);
4193 break;
4194 case kFmt22x:
4195 case kFmt32x:
4196 notHandled = handleFmt22x_Fmt32x(cUnit, mir);
4197 break;
4198 case kFmt23x:
4199 notHandled = handleFmt23x(cUnit, mir);
4200 break;
4201 case kFmt31t:
4202 notHandled = handleFmt31t(cUnit, mir);
4203 break;
4204 case kFmt3rc:
4205 case kFmt35c:
4206 notHandled = handleFmt35c_3rc(cUnit, mir, blockList[i],
4207 labelList);
4208 break;
4209 case kFmt3rms:
4210 case kFmt35ms:
4211 notHandled = handleFmt35ms_3rms(cUnit, mir,blockList[i],
4212 labelList);
4213 break;
Dan Bornstein7b3e9b02010-11-09 17:15:10 -08004214 case kFmt35mi:
4215 case kFmt3rmi:
Bill Buzbeece46c942009-11-20 15:41:34 -08004216 notHandled = handleExecuteInline(cUnit, mir);
Andy McFaddenb0a05412009-11-19 10:23:41 -08004217 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07004218 case kFmt51l:
4219 notHandled = handleFmt51l(cUnit, mir);
4220 break;
4221 default:
4222 notHandled = true;
4223 break;
4224 }
4225 }
4226 if (notHandled) {
4227 LOGE("%#06x: Opcode 0x%x (%s) / Fmt %d not handled\n",
4228 mir->offset,
Dan Bornstein9a1f8162010-12-01 17:02:26 -08004229 dalvikOpcode, dexGetOpcodeName(dalvikOpcode),
Ben Chengba4fc8b2009-06-01 13:00:29 -07004230 dalvikFormat);
Bill Buzbeefc519dc2010-03-06 23:30:57 -08004231 dvmCompilerAbort(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -07004232 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07004233 }
4234 }
Ben Cheng4238ec22009-08-24 16:32:22 -07004235
Ben Cheng7a2697d2010-06-07 13:44:23 -07004236 if (blockList[i]->blockType == kTraceEntryBlock) {
Ben Cheng4238ec22009-08-24 16:32:22 -07004237 dvmCompilerAppendLIR(cUnit,
4238 (LIR *) cUnit->loopAnalysis->branchToBody);
4239 dvmCompilerAppendLIR(cUnit,
4240 (LIR *) cUnit->loopAnalysis->branchToPCR);
4241 }
4242
4243 if (headLIR) {
4244 /*
4245 * Eliminate redundant loads/stores and delay stores into later
4246 * slots
4247 */
4248 dvmCompilerApplyLocalOptimizations(cUnit, (LIR *) headLIR,
4249 cUnit->lastLIRInsn);
4250 }
4251
4252gen_fallthrough:
Ben Cheng1efc9c52009-06-08 18:25:27 -07004253 /*
4254 * Check if the block is terminated due to trace length constraint -
4255 * insert an unconditional branch to the chaining cell.
4256 */
4257 if (blockList[i]->needFallThroughBranch) {
4258 genUnconditionalBranch(cUnit,
4259 &labelList[blockList[i]->fallThrough->id]);
4260 }
4261
Ben Chengba4fc8b2009-06-01 13:00:29 -07004262 }
4263
Ben Chenge9695e52009-06-16 16:11:47 -07004264 /* Handle the chaining cells in predefined order */
Ben Chengcec26f62010-01-15 15:29:33 -08004265 for (i = 0; i < kChainingCellGap; i++) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07004266 size_t j;
4267 int *blockIdList = (int *) chainingListByType[i].elemList;
4268
4269 cUnit->numChainingCells[i] = chainingListByType[i].numUsed;
4270
4271 /* No chaining cells of this type */
4272 if (cUnit->numChainingCells[i] == 0)
4273 continue;
4274
4275 /* Record the first LIR for a new type of chaining cell */
4276 cUnit->firstChainingLIR[i] = (LIR *) &labelList[blockIdList[0]];
4277
4278 for (j = 0; j < chainingListByType[i].numUsed; j++) {
4279 int blockId = blockIdList[j];
4280
4281 /* Align this chaining cell first */
Bill Buzbee1465db52009-09-23 17:17:35 -07004282 newLIR0(cUnit, kArmPseudoPseudoAlign4);
Ben Chengba4fc8b2009-06-01 13:00:29 -07004283
4284 /* Insert the pseudo chaining instruction */
4285 dvmCompilerAppendLIR(cUnit, (LIR *) &labelList[blockId]);
4286
4287
4288 switch (blockList[blockId]->blockType) {
Bill Buzbee1465db52009-09-23 17:17:35 -07004289 case kChainingCellNormal:
Ben Cheng1efc9c52009-06-08 18:25:27 -07004290 handleNormalChainingCell(cUnit,
Ben Chengba4fc8b2009-06-01 13:00:29 -07004291 blockList[blockId]->startOffset);
4292 break;
Bill Buzbee1465db52009-09-23 17:17:35 -07004293 case kChainingCellInvokeSingleton:
Ben Cheng38329f52009-07-07 14:19:20 -07004294 handleInvokeSingletonChainingCell(cUnit,
Ben Chengba4fc8b2009-06-01 13:00:29 -07004295 blockList[blockId]->containingMethod);
4296 break;
Bill Buzbee1465db52009-09-23 17:17:35 -07004297 case kChainingCellInvokePredicted:
Ben Cheng38329f52009-07-07 14:19:20 -07004298 handleInvokePredictedChainingCell(cUnit);
4299 break;
Bill Buzbee1465db52009-09-23 17:17:35 -07004300 case kChainingCellHot:
Ben Cheng1efc9c52009-06-08 18:25:27 -07004301 handleHotChainingCell(cUnit,
Ben Chengba4fc8b2009-06-01 13:00:29 -07004302 blockList[blockId]->startOffset);
4303 break;
Bill Buzbee9c4b7c82009-09-10 10:10:38 -07004304#if defined(WITH_SELF_VERIFICATION) || defined(WITH_JIT_TUNING)
Bill Buzbee1465db52009-09-23 17:17:35 -07004305 case kChainingCellBackwardBranch:
Jeff Hao97319a82009-08-12 16:57:15 -07004306 handleBackwardBranchChainingCell(cUnit,
4307 blockList[blockId]->startOffset);
4308 break;
4309#endif
Ben Chengba4fc8b2009-06-01 13:00:29 -07004310 default:
Bill Buzbee1465db52009-09-23 17:17:35 -07004311 LOGE("Bad blocktype %d", blockList[blockId]->blockType);
Bill Buzbeefc519dc2010-03-06 23:30:57 -08004312 dvmCompilerAbort(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -07004313 }
4314 }
4315 }
Ben Chenge9695e52009-06-16 16:11:47 -07004316
Ben Chengcec26f62010-01-15 15:29:33 -08004317 /* Mark the bottom of chaining cells */
4318 cUnit->chainingCellBottom = (LIR *) newLIR0(cUnit, kArmChainingCellBottom);
4319
Ben Cheng6c10a972009-10-29 14:39:18 -07004320 /*
4321 * Generate the branch to the dvmJitToInterpNoChain entry point at the end
4322 * of all chaining cells for the overflow cases.
4323 */
4324 if (cUnit->switchOverflowPad) {
4325 loadConstant(cUnit, r0, (int) cUnit->switchOverflowPad);
4326 loadWordDisp(cUnit, rGLUE, offsetof(InterpState,
4327 jitToInterpEntries.dvmJitToInterpNoChain), r2);
4328 opRegReg(cUnit, kOpAdd, r1, r1);
4329 opRegRegReg(cUnit, kOpAdd, r4PC, r0, r1);
Ben Cheng978738d2010-05-13 13:45:57 -07004330#if defined(WITH_JIT_TUNING)
Ben Cheng6c10a972009-10-29 14:39:18 -07004331 loadConstant(cUnit, r0, kSwitchOverflow);
4332#endif
4333 opReg(cUnit, kOpBlx, r2);
4334 }
4335
Ben Chenge9695e52009-06-16 16:11:47 -07004336 dvmCompilerApplyGlobalOptimizations(cUnit);
jeffhao9e45c0b2010-02-03 10:24:05 -08004337
4338#if defined(WITH_SELF_VERIFICATION)
4339 selfVerificationBranchInsertPass(cUnit);
4340#endif
Ben Chengba4fc8b2009-06-01 13:00:29 -07004341}
4342
4343/* Accept the work and start compiling */
Bill Buzbee716f1202009-07-23 13:22:09 -07004344bool dvmCompilerDoWork(CompilerWorkOrder *work)
Ben Chengba4fc8b2009-06-01 13:00:29 -07004345{
Ben Chengccd6c012009-10-15 14:52:45 -07004346 bool res;
Ben Chengba4fc8b2009-06-01 13:00:29 -07004347
Ben Cheng6999d842010-01-26 16:46:15 -08004348 if (gDvmJit.codeCacheFull) {
Ben Chengccd6c012009-10-15 14:52:45 -07004349 return false;
4350 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07004351
Ben Chengccd6c012009-10-15 14:52:45 -07004352 switch (work->kind) {
Ben Chengccd6c012009-10-15 14:52:45 -07004353 case kWorkOrderTrace:
4354 /* Start compilation with maximally allowed trace length */
Bill Buzbeefc519dc2010-03-06 23:30:57 -08004355 res = dvmCompileTrace(work->info, JIT_MAX_TRACE_LEN, &work->result,
Ben Cheng4a419582010-08-04 13:23:09 -07004356 work->bailPtr, 0 /* no hints */);
Ben Chengccd6c012009-10-15 14:52:45 -07004357 break;
4358 case kWorkOrderTraceDebug: {
4359 bool oldPrintMe = gDvmJit.printMe;
4360 gDvmJit.printMe = true;
4361 /* Start compilation with maximally allowed trace length */
Bill Buzbeefc519dc2010-03-06 23:30:57 -08004362 res = dvmCompileTrace(work->info, JIT_MAX_TRACE_LEN, &work->result,
Ben Cheng4a419582010-08-04 13:23:09 -07004363 work->bailPtr, 0 /* no hints */);
Elliott Hughes672511b2010-04-26 17:40:13 -07004364 gDvmJit.printMe = oldPrintMe;
Ben Chengccd6c012009-10-15 14:52:45 -07004365 break;
4366 }
4367 default:
4368 res = false;
Bill Buzbeefc519dc2010-03-06 23:30:57 -08004369 LOGE("Jit: unknown work order type");
Elliott Hughes672511b2010-04-26 17:40:13 -07004370 assert(0); // Bail if debug build, discard otherwise
Ben Chengccd6c012009-10-15 14:52:45 -07004371 }
4372 return res;
Ben Chengba4fc8b2009-06-01 13:00:29 -07004373}
4374
Ben Chengba4fc8b2009-06-01 13:00:29 -07004375/* Architectural-specific debugging helpers go here */
4376void dvmCompilerArchDump(void)
4377{
4378 /* Print compiled opcode in this VM instance */
4379 int i, start, streak;
4380 char buf[1024];
4381
4382 streak = i = 0;
4383 buf[0] = 0;
Dan Bornsteinccaab182010-12-03 15:32:40 -08004384 while (opcodeCoverage[i] == 0 && i < kNumPackedOpcodes) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07004385 i++;
4386 }
Dan Bornsteinccaab182010-12-03 15:32:40 -08004387 if (i == kNumPackedOpcodes) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07004388 return;
4389 }
Dan Bornsteinccaab182010-12-03 15:32:40 -08004390 for (start = i++, streak = 1; i < kNumPackedOpcodes; i++) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07004391 if (opcodeCoverage[i]) {
4392 streak++;
4393 } else {
4394 if (streak == 1) {
4395 sprintf(buf+strlen(buf), "%x,", start);
4396 } else {
4397 sprintf(buf+strlen(buf), "%x-%x,", start, start + streak - 1);
4398 }
4399 streak = 0;
Dan Bornsteinccaab182010-12-03 15:32:40 -08004400 while (opcodeCoverage[i] == 0 && i < kNumPackedOpcodes) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07004401 i++;
4402 }
Dan Bornsteinccaab182010-12-03 15:32:40 -08004403 if (i < kNumPackedOpcodes) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07004404 streak = 1;
4405 start = i;
4406 }
4407 }
4408 }
4409 if (streak) {
4410 if (streak == 1) {
4411 sprintf(buf+strlen(buf), "%x", start);
4412 } else {
4413 sprintf(buf+strlen(buf), "%x-%x", start, start + streak - 1);
4414 }
4415 }
4416 if (strlen(buf)) {
Ben Cheng8b258bf2009-06-24 17:27:07 -07004417 LOGD("dalvik.vm.jit.op = %s", buf);
Ben Chengba4fc8b2009-06-01 13:00:29 -07004418 }
4419}
Ben Chengd7d426a2009-09-22 11:23:36 -07004420
4421/* Common initialization routine for an architecture family */
4422bool dvmCompilerArchInit()
4423{
4424 int i;
4425
Bill Buzbee1465db52009-09-23 17:17:35 -07004426 for (i = 0; i < kArmLast; i++) {
Dan Bornstein9a1f8162010-12-01 17:02:26 -08004427 if (EncodingMap[i].opcode != i) {
Ben Chengd7d426a2009-09-22 11:23:36 -07004428 LOGE("Encoding order for %s is wrong: expecting %d, seeing %d",
Dan Bornstein9a1f8162010-12-01 17:02:26 -08004429 EncodingMap[i].name, i, EncodingMap[i].opcode);
Bill Buzbeefc519dc2010-03-06 23:30:57 -08004430 dvmAbort(); // OK to dvmAbort - build error
Ben Chengd7d426a2009-09-22 11:23:36 -07004431 }
4432 }
4433
Ben Cheng5d90c202009-11-22 23:31:11 -08004434 return dvmCompilerArchVariantInit();
4435}
4436
4437void *dvmCompilerGetInterpretTemplate()
4438{
4439 return (void*) ((int)gDvmJit.codeCache +
4440 templateEntryOffsets[TEMPLATE_INTERPRET]);
4441}
4442
buzbeebff121a2010-08-04 15:25:06 -07004443/* Needed by the Assembler */
4444void dvmCompilerSetupResourceMasks(ArmLIR *lir)
4445{
4446 setupResourceMasks(lir);
4447}
4448
Ben Cheng5d90c202009-11-22 23:31:11 -08004449/* Needed by the ld/st optmizatons */
4450ArmLIR* dvmCompilerRegCopyNoInsert(CompilationUnit *cUnit, int rDest, int rSrc)
4451{
4452 return genRegCopyNoInsert(cUnit, rDest, rSrc);
4453}
4454
4455/* Needed by the register allocator */
4456ArmLIR* dvmCompilerRegCopy(CompilationUnit *cUnit, int rDest, int rSrc)
4457{
4458 return genRegCopy(cUnit, rDest, rSrc);
4459}
4460
4461/* Needed by the register allocator */
4462void dvmCompilerRegCopyWide(CompilationUnit *cUnit, int destLo, int destHi,
4463 int srcLo, int srcHi)
4464{
4465 genRegCopyWide(cUnit, destLo, destHi, srcLo, srcHi);
4466}
4467
4468void dvmCompilerFlushRegImpl(CompilationUnit *cUnit, int rBase,
4469 int displacement, int rSrc, OpSize size)
4470{
4471 storeBaseDisp(cUnit, rBase, displacement, rSrc, size);
4472}
4473
4474void dvmCompilerFlushRegWideImpl(CompilationUnit *cUnit, int rBase,
4475 int displacement, int rSrcLo, int rSrcHi)
4476{
4477 storeBaseDispWide(cUnit, rBase, displacement, rSrcLo, rSrcHi);
Ben Chengd7d426a2009-09-22 11:23:36 -07004478}