blob: a04371ea175d7401ee21008c09e7fbb901fa5ed2 [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);
34 opRegImm(cUnit, kOpCmp, valReg, 0); /* storing null? */
35 ArmLIR *branchOver = opCondBranch(cUnit, kArmCondEq);
36 loadWordDisp(cUnit, rGLUE, offsetof(InterpState, cardTable),
37 regCardBase);
38 opRegRegImm(cUnit, kOpLsr, regCardNo, tgtAddrReg, GC_CARD_SHIFT);
39 storeBaseIndexed(cUnit, regCardBase, regCardNo, regCardBase, 0,
40 kUnsignedByte);
41 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
42 target->defMask = ENCODE_ALL;
43 branchOver->generic.target = (LIR *)target;
buzbeebaf196a2010-08-04 10:13:15 -070044 dvmCompilerFreeTemp(cUnit, regCardBase);
45 dvmCompilerFreeTemp(cUnit, regCardNo);
buzbee919eb062010-07-12 12:59:22 -070046}
47
Ben Cheng5d90c202009-11-22 23:31:11 -080048static bool genConversionCall(CompilationUnit *cUnit, MIR *mir, void *funct,
49 int srcSize, int tgtSize)
50{
51 /*
52 * Don't optimize the register usage since it calls out to template
53 * functions
54 */
55 RegLocation rlSrc;
56 RegLocation rlDest;
Bill Buzbeec6f10662010-02-09 11:16:15 -080057 dvmCompilerFlushAllRegs(cUnit); /* Send everything to home location */
Ben Cheng5d90c202009-11-22 23:31:11 -080058 if (srcSize == 1) {
Bill Buzbeec6f10662010-02-09 11:16:15 -080059 rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
Ben Cheng5d90c202009-11-22 23:31:11 -080060 loadValueDirectFixed(cUnit, rlSrc, r0);
61 } else {
Bill Buzbeec6f10662010-02-09 11:16:15 -080062 rlSrc = dvmCompilerGetSrcWide(cUnit, mir, 0, 1);
Ben Cheng5d90c202009-11-22 23:31:11 -080063 loadValueDirectWideFixed(cUnit, rlSrc, r0, r1);
64 }
Ben Chengbd1326d2010-04-02 15:04:53 -070065 LOAD_FUNC_ADDR(cUnit, r2, (int)funct);
Ben Cheng5d90c202009-11-22 23:31:11 -080066 opReg(cUnit, kOpBlx, r2);
Elliott Hughes6a555132010-02-25 15:41:42 -080067 dvmCompilerClobberCallRegs(cUnit);
Ben Cheng5d90c202009-11-22 23:31:11 -080068 if (tgtSize == 1) {
69 RegLocation rlResult;
Bill Buzbeec6f10662010-02-09 11:16:15 -080070 rlDest = dvmCompilerGetDest(cUnit, mir, 0);
71 rlResult = dvmCompilerGetReturn(cUnit);
Ben Cheng5d90c202009-11-22 23:31:11 -080072 storeValue(cUnit, rlDest, rlResult);
73 } else {
74 RegLocation rlResult;
Bill Buzbeec6f10662010-02-09 11:16:15 -080075 rlDest = dvmCompilerGetDestWide(cUnit, mir, 0, 1);
76 rlResult = dvmCompilerGetReturnWide(cUnit);
Ben Cheng5d90c202009-11-22 23:31:11 -080077 storeValueWide(cUnit, rlDest, rlResult);
78 }
79 return false;
80}
Ben Chengba4fc8b2009-06-01 13:00:29 -070081
Ben Cheng5d90c202009-11-22 23:31:11 -080082static bool genArithOpFloatPortable(CompilationUnit *cUnit, MIR *mir,
83 RegLocation rlDest, RegLocation rlSrc1,
84 RegLocation rlSrc2)
85{
86 RegLocation rlResult;
87 void* funct;
88
Ben Cheng5d90c202009-11-22 23:31:11 -080089 switch (mir->dalvikInsn.opCode) {
90 case OP_ADD_FLOAT_2ADDR:
91 case OP_ADD_FLOAT:
92 funct = (void*) __aeabi_fadd;
93 break;
94 case OP_SUB_FLOAT_2ADDR:
95 case OP_SUB_FLOAT:
96 funct = (void*) __aeabi_fsub;
97 break;
98 case OP_DIV_FLOAT_2ADDR:
99 case OP_DIV_FLOAT:
100 funct = (void*) __aeabi_fdiv;
101 break;
102 case OP_MUL_FLOAT_2ADDR:
103 case OP_MUL_FLOAT:
104 funct = (void*) __aeabi_fmul;
105 break;
106 case OP_REM_FLOAT_2ADDR:
107 case OP_REM_FLOAT:
108 funct = (void*) fmodf;
109 break;
110 case OP_NEG_FLOAT: {
111 genNegFloat(cUnit, rlDest, rlSrc1);
112 return false;
113 }
114 default:
115 return true;
116 }
Bill Buzbeec6f10662010-02-09 11:16:15 -0800117 dvmCompilerFlushAllRegs(cUnit); /* Send everything to home location */
Ben Cheng5d90c202009-11-22 23:31:11 -0800118 loadValueDirectFixed(cUnit, rlSrc1, r0);
119 loadValueDirectFixed(cUnit, rlSrc2, r1);
Ben Chengbd1326d2010-04-02 15:04:53 -0700120 LOAD_FUNC_ADDR(cUnit, r2, (int)funct);
Ben Cheng5d90c202009-11-22 23:31:11 -0800121 opReg(cUnit, kOpBlx, r2);
Elliott Hughes6a555132010-02-25 15:41:42 -0800122 dvmCompilerClobberCallRegs(cUnit);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800123 rlResult = dvmCompilerGetReturn(cUnit);
Ben Cheng5d90c202009-11-22 23:31:11 -0800124 storeValue(cUnit, rlDest, rlResult);
125 return false;
126}
127
128static bool genArithOpDoublePortable(CompilationUnit *cUnit, MIR *mir,
129 RegLocation rlDest, RegLocation rlSrc1,
130 RegLocation rlSrc2)
131{
132 RegLocation rlResult;
133 void* funct;
134
Ben Cheng5d90c202009-11-22 23:31:11 -0800135 switch (mir->dalvikInsn.opCode) {
136 case OP_ADD_DOUBLE_2ADDR:
137 case OP_ADD_DOUBLE:
138 funct = (void*) __aeabi_dadd;
139 break;
140 case OP_SUB_DOUBLE_2ADDR:
141 case OP_SUB_DOUBLE:
142 funct = (void*) __aeabi_dsub;
143 break;
144 case OP_DIV_DOUBLE_2ADDR:
145 case OP_DIV_DOUBLE:
146 funct = (void*) __aeabi_ddiv;
147 break;
148 case OP_MUL_DOUBLE_2ADDR:
149 case OP_MUL_DOUBLE:
150 funct = (void*) __aeabi_dmul;
151 break;
152 case OP_REM_DOUBLE_2ADDR:
153 case OP_REM_DOUBLE:
154 funct = (void*) fmod;
155 break;
156 case OP_NEG_DOUBLE: {
157 genNegDouble(cUnit, rlDest, rlSrc1);
158 return false;
159 }
160 default:
161 return true;
162 }
Bill Buzbeec6f10662010-02-09 11:16:15 -0800163 dvmCompilerFlushAllRegs(cUnit); /* Send everything to home location */
Ben Chengbd1326d2010-04-02 15:04:53 -0700164 LOAD_FUNC_ADDR(cUnit, rlr, (int)funct);
Ben Cheng5d90c202009-11-22 23:31:11 -0800165 loadValueDirectWideFixed(cUnit, rlSrc1, r0, r1);
166 loadValueDirectWideFixed(cUnit, rlSrc2, r2, r3);
167 opReg(cUnit, kOpBlx, rlr);
Elliott Hughes6a555132010-02-25 15:41:42 -0800168 dvmCompilerClobberCallRegs(cUnit);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800169 rlResult = dvmCompilerGetReturnWide(cUnit);
Ben Cheng5d90c202009-11-22 23:31:11 -0800170 storeValueWide(cUnit, rlDest, rlResult);
171 return false;
172}
173
174static bool genConversionPortable(CompilationUnit *cUnit, MIR *mir)
175{
176 OpCode opCode = mir->dalvikInsn.opCode;
177
Ben Cheng5d90c202009-11-22 23:31:11 -0800178 switch (opCode) {
179 case OP_INT_TO_FLOAT:
180 return genConversionCall(cUnit, mir, (void*)__aeabi_i2f, 1, 1);
181 case OP_FLOAT_TO_INT:
182 return genConversionCall(cUnit, mir, (void*)__aeabi_f2iz, 1, 1);
183 case OP_DOUBLE_TO_FLOAT:
184 return genConversionCall(cUnit, mir, (void*)__aeabi_d2f, 2, 1);
185 case OP_FLOAT_TO_DOUBLE:
186 return genConversionCall(cUnit, mir, (void*)__aeabi_f2d, 1, 2);
187 case OP_INT_TO_DOUBLE:
188 return genConversionCall(cUnit, mir, (void*)__aeabi_i2d, 1, 2);
189 case OP_DOUBLE_TO_INT:
190 return genConversionCall(cUnit, mir, (void*)__aeabi_d2iz, 2, 1);
191 case OP_FLOAT_TO_LONG:
192 return genConversionCall(cUnit, mir, (void*)dvmJitf2l, 1, 2);
193 case OP_LONG_TO_FLOAT:
194 return genConversionCall(cUnit, mir, (void*)__aeabi_l2f, 2, 1);
195 case OP_DOUBLE_TO_LONG:
196 return genConversionCall(cUnit, mir, (void*)dvmJitd2l, 2, 2);
197 case OP_LONG_TO_DOUBLE:
198 return genConversionCall(cUnit, mir, (void*)__aeabi_l2d, 2, 2);
199 default:
200 return true;
201 }
202 return false;
203}
Ben Chengba4fc8b2009-06-01 13:00:29 -0700204
Jeff Hao97319a82009-08-12 16:57:15 -0700205#if defined(WITH_SELF_VERIFICATION)
jeffhao9e45c0b2010-02-03 10:24:05 -0800206static void selfVerificationBranchInsert(LIR *currentLIR, ArmOpCode opCode,
207 int dest, int src1)
Jeff Hao97319a82009-08-12 16:57:15 -0700208{
jeffhao9e45c0b2010-02-03 10:24:05 -0800209 ArmLIR *insn = dvmCompilerNew(sizeof(ArmLIR), true);
210 insn->opCode = opCode;
211 insn->operands[0] = dest;
212 insn->operands[1] = src1;
213 setupResourceMasks(insn);
214 dvmCompilerInsertLIRBefore(currentLIR, (LIR *) insn);
Jeff Hao97319a82009-08-12 16:57:15 -0700215}
216
jeffhao9e45c0b2010-02-03 10:24:05 -0800217static void selfVerificationBranchInsertPass(CompilationUnit *cUnit)
Jeff Hao97319a82009-08-12 16:57:15 -0700218{
jeffhao9e45c0b2010-02-03 10:24:05 -0800219 ArmLIR *thisLIR;
jeffhao9e45c0b2010-02-03 10:24:05 -0800220 TemplateOpCode opCode = TEMPLATE_MEM_OP_DECODE;
Jeff Hao97319a82009-08-12 16:57:15 -0700221
jeffhao9e45c0b2010-02-03 10:24:05 -0800222 for (thisLIR = (ArmLIR *) cUnit->firstLIRInsn;
223 thisLIR != (ArmLIR *) cUnit->lastLIRInsn;
224 thisLIR = NEXT_LIR(thisLIR)) {
225 if (thisLIR->branchInsertSV) {
226 /* Branch to mem op decode template */
227 selfVerificationBranchInsert((LIR *) thisLIR, kThumbBlx1,
228 (int) gDvmJit.codeCache + templateEntryOffsets[opCode],
229 (int) gDvmJit.codeCache + templateEntryOffsets[opCode]);
230 selfVerificationBranchInsert((LIR *) thisLIR, kThumbBlx2,
231 (int) gDvmJit.codeCache + templateEntryOffsets[opCode],
232 (int) gDvmJit.codeCache + templateEntryOffsets[opCode]);
Jeff Hao97319a82009-08-12 16:57:15 -0700233 }
234 }
Jeff Hao97319a82009-08-12 16:57:15 -0700235}
Jeff Hao97319a82009-08-12 16:57:15 -0700236#endif
237
Bill Buzbeebe6534f2010-03-12 16:01:35 -0800238/* Generate conditional branch instructions */
239static ArmLIR *genConditionalBranch(CompilationUnit *cUnit,
240 ArmConditionCode cond,
241 ArmLIR *target)
242{
243 ArmLIR *branch = opCondBranch(cUnit, cond);
244 branch->generic.target = (LIR *) target;
245 return branch;
246}
247
Ben Chengba4fc8b2009-06-01 13:00:29 -0700248/* Generate a unconditional branch to go to the interpreter */
Bill Buzbee89efc3d2009-07-28 11:22:22 -0700249static inline ArmLIR *genTrap(CompilationUnit *cUnit, int dOffset,
250 ArmLIR *pcrLabel)
Ben Chengba4fc8b2009-06-01 13:00:29 -0700251{
Bill Buzbee1465db52009-09-23 17:17:35 -0700252 ArmLIR *branch = opNone(cUnit, kOpUncondBr);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700253 return genCheckCommon(cUnit, dOffset, branch, pcrLabel);
254}
255
256/* Load a wide field from an object instance */
257static void genIGetWide(CompilationUnit *cUnit, MIR *mir, int fieldOffset)
258{
Bill Buzbeec6f10662010-02-09 11:16:15 -0800259 RegLocation rlObj = dvmCompilerGetSrc(cUnit, mir, 0);
260 RegLocation rlDest = dvmCompilerGetDestWide(cUnit, mir, 0, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -0700261 RegLocation rlResult;
262 rlObj = loadValue(cUnit, rlObj, kCoreReg);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800263 int regPtr = dvmCompilerAllocTemp(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700264
Bill Buzbee1465db52009-09-23 17:17:35 -0700265 assert(rlDest.wide);
Ben Chenge9695e52009-06-16 16:11:47 -0700266
Bill Buzbee1465db52009-09-23 17:17:35 -0700267 genNullCheck(cUnit, rlObj.sRegLow, rlObj.lowReg, mir->offset,
268 NULL);/* null object? */
269 opRegRegImm(cUnit, kOpAdd, regPtr, rlObj.lowReg, fieldOffset);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800270 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kAnyReg, true);
Ben Cheng11d8f142010-03-24 15:24:19 -0700271
272 HEAP_ACCESS_SHADOW(true);
Bill Buzbee1465db52009-09-23 17:17:35 -0700273 loadPair(cUnit, regPtr, rlResult.lowReg, rlResult.highReg);
Ben Cheng11d8f142010-03-24 15:24:19 -0700274 HEAP_ACCESS_SHADOW(false);
275
Bill Buzbeec6f10662010-02-09 11:16:15 -0800276 dvmCompilerFreeTemp(cUnit, regPtr);
Bill Buzbee1465db52009-09-23 17:17:35 -0700277 storeValueWide(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700278}
279
280/* Store a wide field to an object instance */
281static void genIPutWide(CompilationUnit *cUnit, MIR *mir, int fieldOffset)
282{
Bill Buzbeec6f10662010-02-09 11:16:15 -0800283 RegLocation rlSrc = dvmCompilerGetSrcWide(cUnit, mir, 0, 1);
284 RegLocation rlObj = dvmCompilerGetSrc(cUnit, mir, 2);
Bill Buzbee1465db52009-09-23 17:17:35 -0700285 rlObj = loadValue(cUnit, rlObj, kCoreReg);
286 int regPtr;
287 rlSrc = loadValueWide(cUnit, rlSrc, kAnyReg);
288 genNullCheck(cUnit, rlObj.sRegLow, rlObj.lowReg, mir->offset,
289 NULL);/* null object? */
Bill Buzbeec6f10662010-02-09 11:16:15 -0800290 regPtr = dvmCompilerAllocTemp(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700291 opRegRegImm(cUnit, kOpAdd, regPtr, rlObj.lowReg, fieldOffset);
Ben Cheng11d8f142010-03-24 15:24:19 -0700292
293 HEAP_ACCESS_SHADOW(true);
Bill Buzbee1465db52009-09-23 17:17:35 -0700294 storePair(cUnit, regPtr, rlSrc.lowReg, rlSrc.highReg);
Ben Cheng11d8f142010-03-24 15:24:19 -0700295 HEAP_ACCESS_SHADOW(false);
296
Bill Buzbeec6f10662010-02-09 11:16:15 -0800297 dvmCompilerFreeTemp(cUnit, regPtr);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700298}
299
300/*
301 * Load a field from an object instance
302 *
Ben Chengba4fc8b2009-06-01 13:00:29 -0700303 */
Bill Buzbee270c1d62009-08-13 16:58:07 -0700304static void genIGet(CompilationUnit *cUnit, MIR *mir, OpSize size,
buzbeeecf8f6e2010-07-20 14:53:42 -0700305 int fieldOffset, bool isVolatile)
Ben Chengba4fc8b2009-06-01 13:00:29 -0700306{
Bill Buzbee1465db52009-09-23 17:17:35 -0700307 RegLocation rlResult;
Bill Buzbee749e8162010-07-07 06:55:56 -0700308 RegisterClass regClass = dvmCompilerRegClassBySize(size);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800309 RegLocation rlObj = dvmCompilerGetSrc(cUnit, mir, 0);
310 RegLocation rlDest = dvmCompilerGetDest(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -0700311 rlObj = loadValue(cUnit, rlObj, kCoreReg);
Bill Buzbee749e8162010-07-07 06:55:56 -0700312 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, regClass, true);
Bill Buzbee1465db52009-09-23 17:17:35 -0700313 genNullCheck(cUnit, rlObj.sRegLow, rlObj.lowReg, mir->offset,
314 NULL);/* null object? */
Ben Cheng11d8f142010-03-24 15:24:19 -0700315
316 HEAP_ACCESS_SHADOW(true);
Ben Cheng5d90c202009-11-22 23:31:11 -0800317 loadBaseDisp(cUnit, mir, rlObj.lowReg, fieldOffset, rlResult.lowReg,
318 size, rlObj.sRegLow);
Ben Cheng11d8f142010-03-24 15:24:19 -0700319 HEAP_ACCESS_SHADOW(false);
buzbeeecf8f6e2010-07-20 14:53:42 -0700320 if (isVolatile) {
321 dvmCompilerGenMemBarrier(cUnit);
322 }
Ben Cheng11d8f142010-03-24 15:24:19 -0700323
Bill Buzbee1465db52009-09-23 17:17:35 -0700324 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700325}
326
327/*
328 * Store a field to an object instance
329 *
Ben Chengba4fc8b2009-06-01 13:00:29 -0700330 */
Bill Buzbee270c1d62009-08-13 16:58:07 -0700331static void genIPut(CompilationUnit *cUnit, MIR *mir, OpSize size,
buzbeeecf8f6e2010-07-20 14:53:42 -0700332 int fieldOffset, bool isObject, bool isVolatile)
Ben Chengba4fc8b2009-06-01 13:00:29 -0700333{
Bill Buzbee749e8162010-07-07 06:55:56 -0700334 RegisterClass regClass = dvmCompilerRegClassBySize(size);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800335 RegLocation rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
336 RegLocation rlObj = dvmCompilerGetSrc(cUnit, mir, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -0700337 rlObj = loadValue(cUnit, rlObj, kCoreReg);
Bill Buzbee749e8162010-07-07 06:55:56 -0700338 rlSrc = loadValue(cUnit, rlSrc, regClass);
Bill Buzbee1465db52009-09-23 17:17:35 -0700339 genNullCheck(cUnit, rlObj.sRegLow, rlObj.lowReg, mir->offset,
340 NULL);/* null object? */
Ben Cheng11d8f142010-03-24 15:24:19 -0700341
buzbeeecf8f6e2010-07-20 14:53:42 -0700342 if (isVolatile) {
343 dvmCompilerGenMemBarrier(cUnit);
344 }
Ben Cheng11d8f142010-03-24 15:24:19 -0700345 HEAP_ACCESS_SHADOW(true);
Bill Buzbee1465db52009-09-23 17:17:35 -0700346 storeBaseDisp(cUnit, rlObj.lowReg, fieldOffset, rlSrc.lowReg, size);
Ben Cheng11d8f142010-03-24 15:24:19 -0700347 HEAP_ACCESS_SHADOW(false);
buzbee919eb062010-07-12 12:59:22 -0700348 if (isObject) {
349 /* NOTE: marking card based on object head */
350 markCard(cUnit, rlSrc.lowReg, rlObj.lowReg);
351 }
Ben Chengba4fc8b2009-06-01 13:00:29 -0700352}
353
354
Ben Chengba4fc8b2009-06-01 13:00:29 -0700355/*
356 * Generate array load
Ben Chengba4fc8b2009-06-01 13:00:29 -0700357 */
Bill Buzbee270c1d62009-08-13 16:58:07 -0700358static void genArrayGet(CompilationUnit *cUnit, MIR *mir, OpSize size,
Bill Buzbee1465db52009-09-23 17:17:35 -0700359 RegLocation rlArray, RegLocation rlIndex,
360 RegLocation rlDest, int scale)
Ben Chengba4fc8b2009-06-01 13:00:29 -0700361{
Bill Buzbee749e8162010-07-07 06:55:56 -0700362 RegisterClass regClass = dvmCompilerRegClassBySize(size);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700363 int lenOffset = offsetof(ArrayObject, length);
364 int dataOffset = offsetof(ArrayObject, contents);
Bill Buzbee1465db52009-09-23 17:17:35 -0700365 RegLocation rlResult;
366 rlArray = loadValue(cUnit, rlArray, kCoreReg);
367 rlIndex = loadValue(cUnit, rlIndex, kCoreReg);
368 int regPtr;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700369
370 /* null object? */
Ben Cheng4238ec22009-08-24 16:32:22 -0700371 ArmLIR * pcrLabel = NULL;
372
373 if (!(mir->OptimizationFlags & MIR_IGNORE_NULL_CHECK)) {
Bill Buzbee1465db52009-09-23 17:17:35 -0700374 pcrLabel = genNullCheck(cUnit, rlArray.sRegLow,
375 rlArray.lowReg, mir->offset, NULL);
Ben Cheng4238ec22009-08-24 16:32:22 -0700376 }
377
Bill Buzbeec6f10662010-02-09 11:16:15 -0800378 regPtr = dvmCompilerAllocTemp(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700379
Ben Cheng4238ec22009-08-24 16:32:22 -0700380 if (!(mir->OptimizationFlags & MIR_IGNORE_RANGE_CHECK)) {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800381 int regLen = dvmCompilerAllocTemp(cUnit);
Ben Cheng4238ec22009-08-24 16:32:22 -0700382 /* Get len */
Bill Buzbee1465db52009-09-23 17:17:35 -0700383 loadWordDisp(cUnit, rlArray.lowReg, lenOffset, regLen);
384 /* regPtr -> array data */
385 opRegRegImm(cUnit, kOpAdd, regPtr, rlArray.lowReg, dataOffset);
386 genBoundsCheck(cUnit, rlIndex.lowReg, regLen, mir->offset,
387 pcrLabel);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800388 dvmCompilerFreeTemp(cUnit, regLen);
Ben Cheng4238ec22009-08-24 16:32:22 -0700389 } else {
Bill Buzbee1465db52009-09-23 17:17:35 -0700390 /* regPtr -> array data */
391 opRegRegImm(cUnit, kOpAdd, regPtr, rlArray.lowReg, dataOffset);
Ben Cheng4238ec22009-08-24 16:32:22 -0700392 }
Bill Buzbee1465db52009-09-23 17:17:35 -0700393 if ((size == kLong) || (size == kDouble)) {
394 if (scale) {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800395 int rNewIndex = dvmCompilerAllocTemp(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700396 opRegRegImm(cUnit, kOpLsl, rNewIndex, rlIndex.lowReg, scale);
397 opRegReg(cUnit, kOpAdd, regPtr, rNewIndex);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800398 dvmCompilerFreeTemp(cUnit, rNewIndex);
Bill Buzbee1465db52009-09-23 17:17:35 -0700399 } else {
400 opRegReg(cUnit, kOpAdd, regPtr, rlIndex.lowReg);
401 }
Bill Buzbee749e8162010-07-07 06:55:56 -0700402 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, regClass, true);
Ben Cheng11d8f142010-03-24 15:24:19 -0700403
404 HEAP_ACCESS_SHADOW(true);
Bill Buzbee1465db52009-09-23 17:17:35 -0700405 loadPair(cUnit, regPtr, rlResult.lowReg, rlResult.highReg);
Ben Cheng11d8f142010-03-24 15:24:19 -0700406 HEAP_ACCESS_SHADOW(false);
407
Bill Buzbeec6f10662010-02-09 11:16:15 -0800408 dvmCompilerFreeTemp(cUnit, regPtr);
Bill Buzbee1465db52009-09-23 17:17:35 -0700409 storeValueWide(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700410 } else {
Bill Buzbee749e8162010-07-07 06:55:56 -0700411 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, regClass, true);
Ben Cheng11d8f142010-03-24 15:24:19 -0700412
413 HEAP_ACCESS_SHADOW(true);
Bill Buzbee1465db52009-09-23 17:17:35 -0700414 loadBaseIndexed(cUnit, regPtr, rlIndex.lowReg, rlResult.lowReg,
415 scale, size);
Ben Cheng11d8f142010-03-24 15:24:19 -0700416 HEAP_ACCESS_SHADOW(false);
417
Bill Buzbeec6f10662010-02-09 11:16:15 -0800418 dvmCompilerFreeTemp(cUnit, regPtr);
Bill Buzbee1465db52009-09-23 17:17:35 -0700419 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700420 }
421}
422
Ben Chengba4fc8b2009-06-01 13:00:29 -0700423/*
424 * Generate array store
425 *
Ben Chengba4fc8b2009-06-01 13:00:29 -0700426 */
Bill Buzbee270c1d62009-08-13 16:58:07 -0700427static void genArrayPut(CompilationUnit *cUnit, MIR *mir, OpSize size,
Bill Buzbee1465db52009-09-23 17:17:35 -0700428 RegLocation rlArray, RegLocation rlIndex,
429 RegLocation rlSrc, int scale)
Ben Chengba4fc8b2009-06-01 13:00:29 -0700430{
Bill Buzbee749e8162010-07-07 06:55:56 -0700431 RegisterClass regClass = dvmCompilerRegClassBySize(size);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700432 int lenOffset = offsetof(ArrayObject, length);
433 int dataOffset = offsetof(ArrayObject, contents);
434
Bill Buzbee1465db52009-09-23 17:17:35 -0700435 int regPtr;
436 rlArray = loadValue(cUnit, rlArray, kCoreReg);
437 rlIndex = loadValue(cUnit, rlIndex, kCoreReg);
Ben Chenge9695e52009-06-16 16:11:47 -0700438
Bill Buzbeec6f10662010-02-09 11:16:15 -0800439 if (dvmCompilerIsTemp(cUnit, rlArray.lowReg)) {
440 dvmCompilerClobber(cUnit, rlArray.lowReg);
Bill Buzbee1465db52009-09-23 17:17:35 -0700441 regPtr = rlArray.lowReg;
442 } else {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800443 regPtr = dvmCompilerAllocTemp(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700444 genRegCopy(cUnit, regPtr, rlArray.lowReg);
445 }
Ben Chenge9695e52009-06-16 16:11:47 -0700446
Ben Cheng1efc9c52009-06-08 18:25:27 -0700447 /* null object? */
Ben Cheng4238ec22009-08-24 16:32:22 -0700448 ArmLIR * pcrLabel = NULL;
449
450 if (!(mir->OptimizationFlags & MIR_IGNORE_NULL_CHECK)) {
Bill Buzbee1465db52009-09-23 17:17:35 -0700451 pcrLabel = genNullCheck(cUnit, rlArray.sRegLow, rlArray.lowReg,
452 mir->offset, NULL);
Ben Cheng4238ec22009-08-24 16:32:22 -0700453 }
454
455 if (!(mir->OptimizationFlags & MIR_IGNORE_RANGE_CHECK)) {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800456 int regLen = dvmCompilerAllocTemp(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700457 //NOTE: max live temps(4) here.
Ben Cheng4238ec22009-08-24 16:32:22 -0700458 /* Get len */
Bill Buzbee1465db52009-09-23 17:17:35 -0700459 loadWordDisp(cUnit, rlArray.lowReg, lenOffset, regLen);
460 /* regPtr -> array data */
461 opRegImm(cUnit, kOpAdd, regPtr, dataOffset);
462 genBoundsCheck(cUnit, rlIndex.lowReg, regLen, mir->offset,
463 pcrLabel);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800464 dvmCompilerFreeTemp(cUnit, regLen);
Ben Cheng4238ec22009-08-24 16:32:22 -0700465 } else {
Bill Buzbee1465db52009-09-23 17:17:35 -0700466 /* regPtr -> array data */
467 opRegImm(cUnit, kOpAdd, regPtr, dataOffset);
Ben Cheng4238ec22009-08-24 16:32:22 -0700468 }
Bill Buzbee1465db52009-09-23 17:17:35 -0700469 /* at this point, regPtr points to array, 2 live temps */
Bill Buzbee1465db52009-09-23 17:17:35 -0700470 if ((size == kLong) || (size == kDouble)) {
471 //TODO: need specific wide routine that can handle fp regs
472 if (scale) {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800473 int rNewIndex = dvmCompilerAllocTemp(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700474 opRegRegImm(cUnit, kOpLsl, rNewIndex, rlIndex.lowReg, scale);
475 opRegReg(cUnit, kOpAdd, regPtr, rNewIndex);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800476 dvmCompilerFreeTemp(cUnit, rNewIndex);
Bill Buzbee1465db52009-09-23 17:17:35 -0700477 } else {
478 opRegReg(cUnit, kOpAdd, regPtr, rlIndex.lowReg);
479 }
Bill Buzbee749e8162010-07-07 06:55:56 -0700480 rlSrc = loadValueWide(cUnit, rlSrc, regClass);
Ben Cheng11d8f142010-03-24 15:24:19 -0700481
482 HEAP_ACCESS_SHADOW(true);
Bill Buzbee1465db52009-09-23 17:17:35 -0700483 storePair(cUnit, regPtr, rlSrc.lowReg, rlSrc.highReg);
Ben Cheng11d8f142010-03-24 15:24:19 -0700484 HEAP_ACCESS_SHADOW(false);
485
Bill Buzbeec6f10662010-02-09 11:16:15 -0800486 dvmCompilerFreeTemp(cUnit, regPtr);
Bill Buzbee270c1d62009-08-13 16:58:07 -0700487 } else {
Bill Buzbee749e8162010-07-07 06:55:56 -0700488 rlSrc = loadValue(cUnit, rlSrc, regClass);
Ben Cheng11d8f142010-03-24 15:24:19 -0700489
490 HEAP_ACCESS_SHADOW(true);
Bill Buzbee1465db52009-09-23 17:17:35 -0700491 storeBaseIndexed(cUnit, regPtr, rlIndex.lowReg, rlSrc.lowReg,
492 scale, size);
Ben Cheng11d8f142010-03-24 15:24:19 -0700493 HEAP_ACCESS_SHADOW(false);
jeffhao9e45c0b2010-02-03 10:24:05 -0800494 }
Ben Chengba4fc8b2009-06-01 13:00:29 -0700495}
496
Bill Buzbeebe6534f2010-03-12 16:01:35 -0800497/*
498 * Generate array object store
499 * Must use explicit register allocation here because of
500 * call-out to dvmCanPutArrayElement
501 */
502static void genArrayObjectPut(CompilationUnit *cUnit, MIR *mir,
503 RegLocation rlArray, RegLocation rlIndex,
504 RegLocation rlSrc, int scale)
505{
506 int lenOffset = offsetof(ArrayObject, length);
507 int dataOffset = offsetof(ArrayObject, contents);
508
509 dvmCompilerFlushAllRegs(cUnit);
510
511 int regLen = r0;
512 int regPtr = r4PC; /* Preserved across call */
513 int regArray = r1;
514 int regIndex = r7; /* Preserved across call */
515
516 loadValueDirectFixed(cUnit, rlArray, regArray);
517 loadValueDirectFixed(cUnit, rlIndex, regIndex);
518
519 /* null object? */
520 ArmLIR * pcrLabel = NULL;
521
522 if (!(mir->OptimizationFlags & MIR_IGNORE_NULL_CHECK)) {
523 pcrLabel = genNullCheck(cUnit, rlArray.sRegLow, regArray,
524 mir->offset, NULL);
525 }
526
527 if (!(mir->OptimizationFlags & MIR_IGNORE_RANGE_CHECK)) {
528 /* Get len */
529 loadWordDisp(cUnit, regArray, lenOffset, regLen);
530 /* regPtr -> array data */
531 opRegRegImm(cUnit, kOpAdd, regPtr, regArray, dataOffset);
532 genBoundsCheck(cUnit, regIndex, regLen, mir->offset,
533 pcrLabel);
534 } else {
535 /* regPtr -> array data */
536 opRegRegImm(cUnit, kOpAdd, regPtr, regArray, dataOffset);
537 }
538
539 /* Get object to store */
540 loadValueDirectFixed(cUnit, rlSrc, r0);
Ben Chengbd1326d2010-04-02 15:04:53 -0700541 LOAD_FUNC_ADDR(cUnit, r2, (int)dvmCanPutArrayElement);
Bill Buzbeebe6534f2010-03-12 16:01:35 -0800542
543 /* Are we storing null? If so, avoid check */
544 opRegImm(cUnit, kOpCmp, r0, 0);
545 ArmLIR *branchOver = opCondBranch(cUnit, kArmCondEq);
546
547 /* Make sure the types are compatible */
548 loadWordDisp(cUnit, regArray, offsetof(Object, clazz), r1);
549 loadWordDisp(cUnit, r0, offsetof(Object, clazz), r0);
550 opReg(cUnit, kOpBlx, r2);
551 dvmCompilerClobberCallRegs(cUnit);
Bill Buzbee900a3af2010-03-16 12:41:43 -0700552
553 /*
554 * Using fixed registers here, and counting on r4 and r7 being
555 * preserved across the above call. Tell the register allocation
556 * utilities about the regs we are using directly
557 */
558 dvmCompilerLockTemp(cUnit, regPtr); // r4PC
559 dvmCompilerLockTemp(cUnit, regIndex); // r7
560 dvmCompilerLockTemp(cUnit, r0);
buzbee919eb062010-07-12 12:59:22 -0700561 dvmCompilerLockTemp(cUnit, r1);
Bill Buzbee900a3af2010-03-16 12:41:43 -0700562
Bill Buzbeebe6534f2010-03-12 16:01:35 -0800563 /* Bad? - roll back and re-execute if so */
564 genRegImmCheck(cUnit, kArmCondEq, r0, 0, mir->offset, pcrLabel);
565
buzbee919eb062010-07-12 12:59:22 -0700566 /* Resume here - must reload element & array, regPtr & index preserved */
Bill Buzbeebe6534f2010-03-12 16:01:35 -0800567 loadValueDirectFixed(cUnit, rlSrc, r0);
buzbee919eb062010-07-12 12:59:22 -0700568 loadValueDirectFixed(cUnit, rlArray, r1);
Bill Buzbeebe6534f2010-03-12 16:01:35 -0800569
570 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
571 target->defMask = ENCODE_ALL;
572 branchOver->generic.target = (LIR *) target;
573
Ben Cheng11d8f142010-03-24 15:24:19 -0700574 HEAP_ACCESS_SHADOW(true);
Bill Buzbeebe6534f2010-03-12 16:01:35 -0800575 storeBaseIndexed(cUnit, regPtr, regIndex, r0,
576 scale, kWord);
Ben Cheng11d8f142010-03-24 15:24:19 -0700577 HEAP_ACCESS_SHADOW(false);
buzbee919eb062010-07-12 12:59:22 -0700578
buzbeebaf196a2010-08-04 10:13:15 -0700579 dvmCompilerFreeTemp(cUnit, regPtr);
580 dvmCompilerFreeTemp(cUnit, regIndex);
581
buzbee919eb062010-07-12 12:59:22 -0700582 /* NOTE: marking card here based on object head */
583 markCard(cUnit, r0, r1);
Bill Buzbeebe6534f2010-03-12 16:01:35 -0800584}
585
Ben Cheng5d90c202009-11-22 23:31:11 -0800586static bool genShiftOpLong(CompilationUnit *cUnit, MIR *mir,
587 RegLocation rlDest, RegLocation rlSrc1,
588 RegLocation rlShift)
Ben Chengba4fc8b2009-06-01 13:00:29 -0700589{
Ben Chenge9695e52009-06-16 16:11:47 -0700590 /*
591 * Don't mess with the regsiters here as there is a particular calling
592 * convention to the out-of-line handler.
593 */
Bill Buzbee1465db52009-09-23 17:17:35 -0700594 RegLocation rlResult;
595
596 loadValueDirectWideFixed(cUnit, rlSrc1, r0, r1);
597 loadValueDirect(cUnit, rlShift, r2);
Ben Chenge9695e52009-06-16 16:11:47 -0700598 switch( mir->dalvikInsn.opCode) {
599 case OP_SHL_LONG:
600 case OP_SHL_LONG_2ADDR:
601 genDispatchToHandler(cUnit, TEMPLATE_SHL_LONG);
602 break;
603 case OP_SHR_LONG:
604 case OP_SHR_LONG_2ADDR:
605 genDispatchToHandler(cUnit, TEMPLATE_SHR_LONG);
606 break;
607 case OP_USHR_LONG:
608 case OP_USHR_LONG_2ADDR:
609 genDispatchToHandler(cUnit, TEMPLATE_USHR_LONG);
610 break;
611 default:
612 return true;
613 }
Bill Buzbeec6f10662010-02-09 11:16:15 -0800614 rlResult = dvmCompilerGetReturnWide(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700615 storeValueWide(cUnit, rlDest, rlResult);
Ben Chenge9695e52009-06-16 16:11:47 -0700616 return false;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700617}
Ben Chenge9695e52009-06-16 16:11:47 -0700618
Ben Cheng5d90c202009-11-22 23:31:11 -0800619static bool genArithOpLong(CompilationUnit *cUnit, MIR *mir,
620 RegLocation rlDest, RegLocation rlSrc1,
621 RegLocation rlSrc2)
Ben Chengba4fc8b2009-06-01 13:00:29 -0700622{
Bill Buzbee1465db52009-09-23 17:17:35 -0700623 RegLocation rlResult;
624 OpKind firstOp = kOpBkpt;
625 OpKind secondOp = kOpBkpt;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700626 bool callOut = false;
627 void *callTgt;
628 int retReg = r0;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700629
630 switch (mir->dalvikInsn.opCode) {
631 case OP_NOT_LONG:
Bill Buzbee1465db52009-09-23 17:17:35 -0700632 rlSrc2 = loadValueWide(cUnit, rlSrc2, kCoreReg);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800633 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee1465db52009-09-23 17:17:35 -0700634 opRegReg(cUnit, kOpMvn, rlResult.lowReg, rlSrc2.lowReg);
635 opRegReg(cUnit, kOpMvn, rlResult.highReg, rlSrc2.highReg);
636 storeValueWide(cUnit, rlDest, rlResult);
637 return false;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700638 break;
639 case OP_ADD_LONG:
640 case OP_ADD_LONG_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700641 firstOp = kOpAdd;
642 secondOp = kOpAdc;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700643 break;
644 case OP_SUB_LONG:
645 case OP_SUB_LONG_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700646 firstOp = kOpSub;
647 secondOp = kOpSbc;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700648 break;
649 case OP_MUL_LONG:
650 case OP_MUL_LONG_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700651 genMulLong(cUnit, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700652 return false;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700653 case OP_DIV_LONG:
654 case OP_DIV_LONG_2ADDR:
655 callOut = true;
656 retReg = r0;
657 callTgt = (void*)__aeabi_ldivmod;
658 break;
659 /* NOTE - result is in r2/r3 instead of r0/r1 */
660 case OP_REM_LONG:
661 case OP_REM_LONG_2ADDR:
662 callOut = true;
663 callTgt = (void*)__aeabi_ldivmod;
664 retReg = r2;
665 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700666 case OP_AND_LONG_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700667 case OP_AND_LONG:
668 firstOp = kOpAnd;
669 secondOp = kOpAnd;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700670 break;
671 case OP_OR_LONG:
672 case OP_OR_LONG_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700673 firstOp = kOpOr;
674 secondOp = kOpOr;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700675 break;
676 case OP_XOR_LONG:
677 case OP_XOR_LONG_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700678 firstOp = kOpXor;
679 secondOp = kOpXor;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700680 break;
Ben Chenge9695e52009-06-16 16:11:47 -0700681 case OP_NEG_LONG: {
Bill Buzbee51ecf602010-01-14 14:27:52 -0800682 //TUNING: can improve this using Thumb2 code
Bill Buzbeec6f10662010-02-09 11:16:15 -0800683 int tReg = dvmCompilerAllocTemp(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700684 rlSrc2 = loadValueWide(cUnit, rlSrc2, kCoreReg);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800685 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Ben Chengbd1326d2010-04-02 15:04:53 -0700686 loadConstantNoClobber(cUnit, tReg, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -0700687 opRegRegReg(cUnit, kOpSub, rlResult.lowReg,
Bill Buzbee51ecf602010-01-14 14:27:52 -0800688 tReg, rlSrc2.lowReg);
689 opRegReg(cUnit, kOpSbc, tReg, rlSrc2.highReg);
690 genRegCopy(cUnit, rlResult.highReg, tReg);
Bill Buzbee1465db52009-09-23 17:17:35 -0700691 storeValueWide(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700692 return false;
Ben Chenge9695e52009-06-16 16:11:47 -0700693 }
Ben Chengba4fc8b2009-06-01 13:00:29 -0700694 default:
695 LOGE("Invalid long arith op");
Bill Buzbeefc519dc2010-03-06 23:30:57 -0800696 dvmCompilerAbort(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700697 }
698 if (!callOut) {
Bill Buzbee80cef862010-03-25 10:38:34 -0700699 genLong3Addr(cUnit, mir, firstOp, secondOp, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700700 } else {
Bill Buzbee1465db52009-09-23 17:17:35 -0700701 // Adjust return regs in to handle case of rem returning r2/r3
Bill Buzbeec6f10662010-02-09 11:16:15 -0800702 dvmCompilerFlushAllRegs(cUnit); /* Send everything to home location */
Bill Buzbee1465db52009-09-23 17:17:35 -0700703 loadValueDirectWideFixed(cUnit, rlSrc1, r0, r1);
Ben Chengbd1326d2010-04-02 15:04:53 -0700704 LOAD_FUNC_ADDR(cUnit, rlr, (int) callTgt);
Bill Buzbee1465db52009-09-23 17:17:35 -0700705 loadValueDirectWideFixed(cUnit, rlSrc2, r2, r3);
706 opReg(cUnit, kOpBlx, rlr);
Elliott Hughes6a555132010-02-25 15:41:42 -0800707 dvmCompilerClobberCallRegs(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700708 if (retReg == r0)
Bill Buzbeec6f10662010-02-09 11:16:15 -0800709 rlResult = dvmCompilerGetReturnWide(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700710 else
Bill Buzbeec6f10662010-02-09 11:16:15 -0800711 rlResult = dvmCompilerGetReturnWideAlt(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700712 storeValueWide(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700713 }
714 return false;
715}
716
Ben Cheng5d90c202009-11-22 23:31:11 -0800717static bool genArithOpInt(CompilationUnit *cUnit, MIR *mir,
718 RegLocation rlDest, RegLocation rlSrc1,
719 RegLocation rlSrc2)
Ben Chengba4fc8b2009-06-01 13:00:29 -0700720{
Bill Buzbee1465db52009-09-23 17:17:35 -0700721 OpKind op = kOpBkpt;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700722 bool callOut = false;
723 bool checkZero = false;
Bill Buzbee1465db52009-09-23 17:17:35 -0700724 bool unary = false;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700725 int retReg = r0;
726 void *callTgt;
Bill Buzbee1465db52009-09-23 17:17:35 -0700727 RegLocation rlResult;
Bill Buzbee0e605272009-12-01 14:28:05 -0800728 bool shiftOp = false;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700729
Ben Chengba4fc8b2009-06-01 13:00:29 -0700730 switch (mir->dalvikInsn.opCode) {
731 case OP_NEG_INT:
Bill Buzbee1465db52009-09-23 17:17:35 -0700732 op = kOpNeg;
733 unary = true;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700734 break;
735 case OP_NOT_INT:
Bill Buzbee1465db52009-09-23 17:17:35 -0700736 op = kOpMvn;
737 unary = true;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700738 break;
739 case OP_ADD_INT:
740 case OP_ADD_INT_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700741 op = kOpAdd;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700742 break;
743 case OP_SUB_INT:
744 case OP_SUB_INT_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700745 op = kOpSub;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700746 break;
747 case OP_MUL_INT:
748 case OP_MUL_INT_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700749 op = kOpMul;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700750 break;
751 case OP_DIV_INT:
752 case OP_DIV_INT_2ADDR:
753 callOut = true;
754 checkZero = true;
755 callTgt = __aeabi_idiv;
756 retReg = r0;
757 break;
758 /* NOTE: returns in r1 */
759 case OP_REM_INT:
760 case OP_REM_INT_2ADDR:
761 callOut = true;
762 checkZero = true;
763 callTgt = __aeabi_idivmod;
764 retReg = r1;
765 break;
766 case OP_AND_INT:
767 case OP_AND_INT_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700768 op = kOpAnd;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700769 break;
770 case OP_OR_INT:
771 case OP_OR_INT_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700772 op = kOpOr;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700773 break;
774 case OP_XOR_INT:
775 case OP_XOR_INT_2ADDR:
Bill Buzbee1465db52009-09-23 17:17:35 -0700776 op = kOpXor;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700777 break;
778 case OP_SHL_INT:
779 case OP_SHL_INT_2ADDR:
Bill Buzbee0e605272009-12-01 14:28:05 -0800780 shiftOp = true;
Bill Buzbee1465db52009-09-23 17:17:35 -0700781 op = kOpLsl;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700782 break;
783 case OP_SHR_INT:
784 case OP_SHR_INT_2ADDR:
Bill Buzbee0e605272009-12-01 14:28:05 -0800785 shiftOp = true;
Bill Buzbee1465db52009-09-23 17:17:35 -0700786 op = kOpAsr;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700787 break;
788 case OP_USHR_INT:
789 case OP_USHR_INT_2ADDR:
Bill Buzbee0e605272009-12-01 14:28:05 -0800790 shiftOp = true;
Bill Buzbee1465db52009-09-23 17:17:35 -0700791 op = kOpLsr;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700792 break;
793 default:
794 LOGE("Invalid word arith op: 0x%x(%d)",
795 mir->dalvikInsn.opCode, mir->dalvikInsn.opCode);
Bill Buzbeefc519dc2010-03-06 23:30:57 -0800796 dvmCompilerAbort(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700797 }
798 if (!callOut) {
Bill Buzbee1465db52009-09-23 17:17:35 -0700799 rlSrc1 = loadValue(cUnit, rlSrc1, kCoreReg);
800 if (unary) {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800801 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee1465db52009-09-23 17:17:35 -0700802 opRegReg(cUnit, op, rlResult.lowReg,
803 rlSrc1.lowReg);
Ben Chenge9695e52009-06-16 16:11:47 -0700804 } else {
Bill Buzbee1465db52009-09-23 17:17:35 -0700805 rlSrc2 = loadValue(cUnit, rlSrc2, kCoreReg);
Bill Buzbee0e605272009-12-01 14:28:05 -0800806 if (shiftOp) {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800807 int tReg = dvmCompilerAllocTemp(cUnit);
Bill Buzbee0e605272009-12-01 14:28:05 -0800808 opRegRegImm(cUnit, kOpAnd, tReg, rlSrc2.lowReg, 31);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800809 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee0e605272009-12-01 14:28:05 -0800810 opRegRegReg(cUnit, op, rlResult.lowReg,
811 rlSrc1.lowReg, tReg);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800812 dvmCompilerFreeTemp(cUnit, tReg);
Bill Buzbee0e605272009-12-01 14:28:05 -0800813 } else {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800814 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee0e605272009-12-01 14:28:05 -0800815 opRegRegReg(cUnit, op, rlResult.lowReg,
816 rlSrc1.lowReg, rlSrc2.lowReg);
817 }
Ben Chenge9695e52009-06-16 16:11:47 -0700818 }
Bill Buzbee1465db52009-09-23 17:17:35 -0700819 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700820 } else {
Bill Buzbee1465db52009-09-23 17:17:35 -0700821 RegLocation rlResult;
Bill Buzbeec6f10662010-02-09 11:16:15 -0800822 dvmCompilerFlushAllRegs(cUnit); /* Send everything to home location */
Bill Buzbee1465db52009-09-23 17:17:35 -0700823 loadValueDirectFixed(cUnit, rlSrc2, r1);
Ben Chengbd1326d2010-04-02 15:04:53 -0700824 LOAD_FUNC_ADDR(cUnit, r2, (int) callTgt);
Bill Buzbee1465db52009-09-23 17:17:35 -0700825 loadValueDirectFixed(cUnit, rlSrc1, r0);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700826 if (checkZero) {
Bill Buzbee1465db52009-09-23 17:17:35 -0700827 genNullCheck(cUnit, rlSrc2.sRegLow, r1, mir->offset, NULL);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700828 }
Bill Buzbee1465db52009-09-23 17:17:35 -0700829 opReg(cUnit, kOpBlx, r2);
Elliott Hughes6a555132010-02-25 15:41:42 -0800830 dvmCompilerClobberCallRegs(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700831 if (retReg == r0)
Bill Buzbeec6f10662010-02-09 11:16:15 -0800832 rlResult = dvmCompilerGetReturn(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700833 else
Bill Buzbeec6f10662010-02-09 11:16:15 -0800834 rlResult = dvmCompilerGetReturnAlt(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700835 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700836 }
837 return false;
838}
839
Ben Cheng5d90c202009-11-22 23:31:11 -0800840static bool genArithOp(CompilationUnit *cUnit, MIR *mir)
Ben Chengba4fc8b2009-06-01 13:00:29 -0700841{
842 OpCode opCode = mir->dalvikInsn.opCode;
Bill Buzbee1465db52009-09-23 17:17:35 -0700843 RegLocation rlDest;
844 RegLocation rlSrc1;
845 RegLocation rlSrc2;
846 /* Deduce sizes of operands */
847 if (mir->ssaRep->numUses == 2) {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800848 rlSrc1 = dvmCompilerGetSrc(cUnit, mir, 0);
849 rlSrc2 = dvmCompilerGetSrc(cUnit, mir, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -0700850 } else if (mir->ssaRep->numUses == 3) {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800851 rlSrc1 = dvmCompilerGetSrcWide(cUnit, mir, 0, 1);
852 rlSrc2 = dvmCompilerGetSrc(cUnit, mir, 2);
Bill Buzbee1465db52009-09-23 17:17:35 -0700853 } else {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800854 rlSrc1 = dvmCompilerGetSrcWide(cUnit, mir, 0, 1);
855 rlSrc2 = dvmCompilerGetSrcWide(cUnit, mir, 2, 3);
Bill Buzbee1465db52009-09-23 17:17:35 -0700856 assert(mir->ssaRep->numUses == 4);
857 }
858 if (mir->ssaRep->numDefs == 1) {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800859 rlDest = dvmCompilerGetDest(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -0700860 } else {
861 assert(mir->ssaRep->numDefs == 2);
Bill Buzbeec6f10662010-02-09 11:16:15 -0800862 rlDest = dvmCompilerGetDestWide(cUnit, mir, 0, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -0700863 }
Ben Chengba4fc8b2009-06-01 13:00:29 -0700864
865 if ((opCode >= OP_ADD_LONG_2ADDR) && (opCode <= OP_XOR_LONG_2ADDR)) {
Ben Cheng5d90c202009-11-22 23:31:11 -0800866 return genArithOpLong(cUnit,mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700867 }
868 if ((opCode >= OP_ADD_LONG) && (opCode <= OP_XOR_LONG)) {
Ben Cheng5d90c202009-11-22 23:31:11 -0800869 return genArithOpLong(cUnit,mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700870 }
871 if ((opCode >= OP_SHL_LONG_2ADDR) && (opCode <= OP_USHR_LONG_2ADDR)) {
Ben Cheng5d90c202009-11-22 23:31:11 -0800872 return genShiftOpLong(cUnit,mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700873 }
874 if ((opCode >= OP_SHL_LONG) && (opCode <= OP_USHR_LONG)) {
Ben Cheng5d90c202009-11-22 23:31:11 -0800875 return genShiftOpLong(cUnit,mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700876 }
877 if ((opCode >= OP_ADD_INT_2ADDR) && (opCode <= OP_USHR_INT_2ADDR)) {
Ben Cheng5d90c202009-11-22 23:31:11 -0800878 return genArithOpInt(cUnit,mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700879 }
880 if ((opCode >= OP_ADD_INT) && (opCode <= OP_USHR_INT)) {
Ben Cheng5d90c202009-11-22 23:31:11 -0800881 return genArithOpInt(cUnit,mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700882 }
883 if ((opCode >= OP_ADD_FLOAT_2ADDR) && (opCode <= OP_REM_FLOAT_2ADDR)) {
Ben Cheng5d90c202009-11-22 23:31:11 -0800884 return genArithOpFloat(cUnit,mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700885 }
886 if ((opCode >= OP_ADD_FLOAT) && (opCode <= OP_REM_FLOAT)) {
Ben Cheng5d90c202009-11-22 23:31:11 -0800887 return genArithOpFloat(cUnit, mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700888 }
889 if ((opCode >= OP_ADD_DOUBLE_2ADDR) && (opCode <= OP_REM_DOUBLE_2ADDR)) {
Ben Cheng5d90c202009-11-22 23:31:11 -0800890 return genArithOpDouble(cUnit,mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700891 }
892 if ((opCode >= OP_ADD_DOUBLE) && (opCode <= OP_REM_DOUBLE)) {
Ben Cheng5d90c202009-11-22 23:31:11 -0800893 return genArithOpDouble(cUnit,mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700894 }
895 return true;
896}
897
Bill Buzbee1465db52009-09-23 17:17:35 -0700898/* Generate unconditional branch instructions */
899static ArmLIR *genUnconditionalBranch(CompilationUnit *cUnit, ArmLIR *target)
900{
901 ArmLIR *branch = opNone(cUnit, kOpUncondBr);
902 branch->generic.target = (LIR *) target;
903 return branch;
904}
905
Bill Buzbee1465db52009-09-23 17:17:35 -0700906/* Perform the actual operation for OP_RETURN_* */
907static void genReturnCommon(CompilationUnit *cUnit, MIR *mir)
908{
909 genDispatchToHandler(cUnit, TEMPLATE_RETURN);
Ben Cheng978738d2010-05-13 13:45:57 -0700910#if defined(WITH_JIT_TUNING)
Bill Buzbee1465db52009-09-23 17:17:35 -0700911 gDvmJit.returnOp++;
912#endif
913 int dPC = (int) (cUnit->method->insns + mir->offset);
914 /* Insert branch, but defer setting of target */
915 ArmLIR *branch = genUnconditionalBranch(cUnit, NULL);
916 /* Set up the place holder to reconstruct this Dalvik PC */
917 ArmLIR *pcrLabel = dvmCompilerNew(sizeof(ArmLIR), true);
Ben Chenga4973592010-03-31 11:59:18 -0700918 pcrLabel->opCode = kArmPseudoPCReconstructionCell;
Bill Buzbee1465db52009-09-23 17:17:35 -0700919 pcrLabel->operands[0] = dPC;
920 pcrLabel->operands[1] = mir->offset;
921 /* Insert the place holder to the growable list */
922 dvmInsertGrowableList(&cUnit->pcReconstructionList, pcrLabel);
923 /* Branch to the PC reconstruction code */
924 branch->generic.target = (LIR *) pcrLabel;
925}
926
Ben Chengba4fc8b2009-06-01 13:00:29 -0700927static void genProcessArgsNoRange(CompilationUnit *cUnit, MIR *mir,
928 DecodedInstruction *dInsn,
Bill Buzbee89efc3d2009-07-28 11:22:22 -0700929 ArmLIR **pcrLabel)
Ben Chengba4fc8b2009-06-01 13:00:29 -0700930{
931 unsigned int i;
932 unsigned int regMask = 0;
Bill Buzbee1465db52009-09-23 17:17:35 -0700933 RegLocation rlArg;
934 int numDone = 0;
Ben Chengba4fc8b2009-06-01 13:00:29 -0700935
Bill Buzbee1465db52009-09-23 17:17:35 -0700936 /*
937 * Load arguments to r0..r4. Note that these registers may contain
938 * live values, so we clobber them immediately after loading to prevent
939 * them from being used as sources for subsequent loads.
940 */
Bill Buzbeec6f10662010-02-09 11:16:15 -0800941 dvmCompilerLockAllTemps(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700942 for (i = 0; i < dInsn->vA; i++) {
943 regMask |= 1 << i;
Bill Buzbeec6f10662010-02-09 11:16:15 -0800944 rlArg = dvmCompilerGetSrc(cUnit, mir, numDone++);
Bill Buzbee1465db52009-09-23 17:17:35 -0700945 loadValueDirectFixed(cUnit, rlArg, i);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700946 }
947 if (regMask) {
948 /* Up to 5 args are pushed on top of FP - sizeofStackSaveArea */
Bill Buzbee1465db52009-09-23 17:17:35 -0700949 opRegRegImm(cUnit, kOpSub, r7, rFP,
950 sizeof(StackSaveArea) + (dInsn->vA << 2));
Ben Chengba4fc8b2009-06-01 13:00:29 -0700951 /* generate null check */
952 if (pcrLabel) {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800953 *pcrLabel = genNullCheck(cUnit, dvmCompilerSSASrc(mir, 0), r0,
Bill Buzbee1465db52009-09-23 17:17:35 -0700954 mir->offset, NULL);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700955 }
Bill Buzbee270c1d62009-08-13 16:58:07 -0700956 storeMultiple(cUnit, r7, regMask);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700957 }
958}
959
960static void genProcessArgsRange(CompilationUnit *cUnit, MIR *mir,
961 DecodedInstruction *dInsn,
Bill Buzbee89efc3d2009-07-28 11:22:22 -0700962 ArmLIR **pcrLabel)
Ben Chengba4fc8b2009-06-01 13:00:29 -0700963{
964 int srcOffset = dInsn->vC << 2;
965 int numArgs = dInsn->vA;
966 int regMask;
Bill Buzbee1465db52009-09-23 17:17:35 -0700967
968 /*
969 * Note: here, all promoted registers will have been flushed
970 * back to the Dalvik base locations, so register usage restrictins
971 * are lifted. All parms loaded from original Dalvik register
972 * region - even though some might conceivably have valid copies
973 * cached in a preserved register.
974 */
Bill Buzbeec6f10662010-02-09 11:16:15 -0800975 dvmCompilerLockAllTemps(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -0700976
Ben Chengba4fc8b2009-06-01 13:00:29 -0700977 /*
978 * r4PC : &rFP[vC]
979 * r7: &newFP[0]
980 */
Bill Buzbee1465db52009-09-23 17:17:35 -0700981 opRegRegImm(cUnit, kOpAdd, r4PC, rFP, srcOffset);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700982 /* load [r0 .. min(numArgs,4)] */
983 regMask = (1 << ((numArgs < 4) ? numArgs : 4)) - 1;
Ben Chengd7d426a2009-09-22 11:23:36 -0700984 /*
985 * Protect the loadMultiple instruction from being reordered with other
986 * Dalvik stack accesses.
987 */
Bill Buzbee270c1d62009-08-13 16:58:07 -0700988 loadMultiple(cUnit, r4PC, regMask);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700989
Bill Buzbee1465db52009-09-23 17:17:35 -0700990 opRegRegImm(cUnit, kOpSub, r7, rFP,
991 sizeof(StackSaveArea) + (numArgs << 2));
Ben Chengba4fc8b2009-06-01 13:00:29 -0700992 /* generate null check */
993 if (pcrLabel) {
Bill Buzbeec6f10662010-02-09 11:16:15 -0800994 *pcrLabel = genNullCheck(cUnit, dvmCompilerSSASrc(mir, 0), r0,
Bill Buzbee1465db52009-09-23 17:17:35 -0700995 mir->offset, NULL);
Ben Chengba4fc8b2009-06-01 13:00:29 -0700996 }
997
998 /*
999 * Handle remaining 4n arguments:
1000 * store previously loaded 4 values and load the next 4 values
1001 */
1002 if (numArgs >= 8) {
Bill Buzbee89efc3d2009-07-28 11:22:22 -07001003 ArmLIR *loopLabel = NULL;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001004 /*
1005 * r0 contains "this" and it will be used later, so push it to the stack
Bill Buzbee270c1d62009-08-13 16:58:07 -07001006 * first. Pushing r5 (rFP) is just for stack alignment purposes.
Ben Chengba4fc8b2009-06-01 13:00:29 -07001007 */
Bill Buzbee1465db52009-09-23 17:17:35 -07001008 opImm(cUnit, kOpPush, (1 << r0 | 1 << rFP));
Ben Chengba4fc8b2009-06-01 13:00:29 -07001009 /* No need to generate the loop structure if numArgs <= 11 */
1010 if (numArgs > 11) {
1011 loadConstant(cUnit, 5, ((numArgs - 4) >> 2) << 2);
Bill Buzbee1465db52009-09-23 17:17:35 -07001012 loopLabel = newLIR0(cUnit, kArmPseudoTargetLabel);
Ben Chengd7d426a2009-09-22 11:23:36 -07001013 loopLabel->defMask = ENCODE_ALL;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001014 }
Bill Buzbee270c1d62009-08-13 16:58:07 -07001015 storeMultiple(cUnit, r7, regMask);
Ben Chengd7d426a2009-09-22 11:23:36 -07001016 /*
1017 * Protect the loadMultiple instruction from being reordered with other
1018 * Dalvik stack accesses.
1019 */
Bill Buzbee270c1d62009-08-13 16:58:07 -07001020 loadMultiple(cUnit, r4PC, regMask);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001021 /* No need to generate the loop structure if numArgs <= 11 */
1022 if (numArgs > 11) {
Bill Buzbee1465db52009-09-23 17:17:35 -07001023 opRegImm(cUnit, kOpSub, rFP, 4);
1024 genConditionalBranch(cUnit, kArmCondNe, loopLabel);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001025 }
1026 }
1027
1028 /* Save the last batch of loaded values */
Bill Buzbee270c1d62009-08-13 16:58:07 -07001029 storeMultiple(cUnit, r7, regMask);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001030
1031 /* Generate the loop epilogue - don't use r0 */
1032 if ((numArgs > 4) && (numArgs % 4)) {
1033 regMask = ((1 << (numArgs & 0x3)) - 1) << 1;
Ben Chengd7d426a2009-09-22 11:23:36 -07001034 /*
1035 * Protect the loadMultiple instruction from being reordered with other
1036 * Dalvik stack accesses.
1037 */
Bill Buzbee270c1d62009-08-13 16:58:07 -07001038 loadMultiple(cUnit, r4PC, regMask);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001039 }
1040 if (numArgs >= 8)
Bill Buzbee1465db52009-09-23 17:17:35 -07001041 opImm(cUnit, kOpPop, (1 << r0 | 1 << rFP));
Ben Chengba4fc8b2009-06-01 13:00:29 -07001042
1043 /* Save the modulo 4 arguments */
1044 if ((numArgs > 4) && (numArgs % 4)) {
Bill Buzbee270c1d62009-08-13 16:58:07 -07001045 storeMultiple(cUnit, r7, regMask);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001046 }
1047}
1048
Ben Cheng38329f52009-07-07 14:19:20 -07001049/*
1050 * Generate code to setup the call stack then jump to the chaining cell if it
1051 * is not a native method.
1052 */
1053static void genInvokeSingletonCommon(CompilationUnit *cUnit, MIR *mir,
Bill Buzbee89efc3d2009-07-28 11:22:22 -07001054 BasicBlock *bb, ArmLIR *labelList,
1055 ArmLIR *pcrLabel,
Ben Cheng38329f52009-07-07 14:19:20 -07001056 const Method *calleeMethod)
Ben Chengba4fc8b2009-06-01 13:00:29 -07001057{
Bill Buzbee1465db52009-09-23 17:17:35 -07001058 /*
1059 * Note: all Dalvik register state should be flushed to
1060 * memory by the point, so register usage restrictions no
1061 * longer apply. All temp & preserved registers may be used.
1062 */
Bill Buzbeec6f10662010-02-09 11:16:15 -08001063 dvmCompilerLockAllTemps(cUnit);
Bill Buzbee89efc3d2009-07-28 11:22:22 -07001064 ArmLIR *retChainingCell = &labelList[bb->fallThrough->id];
Ben Chengba4fc8b2009-06-01 13:00:29 -07001065
1066 /* r1 = &retChainingCell */
Bill Buzbeec6f10662010-02-09 11:16:15 -08001067 dvmCompilerLockTemp(cUnit, r1);
Bill Buzbee1465db52009-09-23 17:17:35 -07001068 ArmLIR *addrRetChain = opRegRegImm(cUnit, kOpAdd, r1, rpc, 0);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001069 /* r4PC = dalvikCallsite */
1070 loadConstant(cUnit, r4PC,
1071 (int) (cUnit->method->insns + mir->offset));
1072 addrRetChain->generic.target = (LIR *) retChainingCell;
1073 /*
Ben Cheng38329f52009-07-07 14:19:20 -07001074 * r0 = calleeMethod (loaded upon calling genInvokeSingletonCommon)
Ben Chengba4fc8b2009-06-01 13:00:29 -07001075 * r1 = &ChainingCell
1076 * r4PC = callsiteDPC
1077 */
1078 if (dvmIsNativeMethod(calleeMethod)) {
Ben Cheng38329f52009-07-07 14:19:20 -07001079 genDispatchToHandler(cUnit, TEMPLATE_INVOKE_METHOD_NATIVE);
Ben Cheng978738d2010-05-13 13:45:57 -07001080#if defined(WITH_JIT_TUNING)
Ben Cheng38329f52009-07-07 14:19:20 -07001081 gDvmJit.invokeNative++;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001082#endif
1083 } else {
1084 genDispatchToHandler(cUnit, TEMPLATE_INVOKE_METHOD_CHAIN);
Ben Cheng978738d2010-05-13 13:45:57 -07001085#if defined(WITH_JIT_TUNING)
Ben Cheng86717f72010-03-05 15:27:21 -08001086 gDvmJit.invokeMonomorphic++;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001087#endif
Ben Cheng38329f52009-07-07 14:19:20 -07001088 /* Branch to the chaining cell */
Ben Chengba4fc8b2009-06-01 13:00:29 -07001089 genUnconditionalBranch(cUnit, &labelList[bb->taken->id]);
1090 }
1091 /* Handle exceptions using the interpreter */
1092 genTrap(cUnit, mir->offset, pcrLabel);
1093}
1094
Ben Cheng38329f52009-07-07 14:19:20 -07001095/*
1096 * Generate code to check the validity of a predicted chain and take actions
1097 * based on the result.
1098 *
1099 * 0x426a99aa : ldr r4, [pc, #72] --> r4 <- dalvikPC of this invoke
1100 * 0x426a99ac : add r1, pc, #32 --> r1 <- &retChainingCell
1101 * 0x426a99ae : add r2, pc, #40 --> r2 <- &predictedChainingCell
1102 * 0x426a99b0 : blx_1 0x426a918c --+ TEMPLATE_INVOKE_METHOD_PREDICTED_CHAIN
1103 * 0x426a99b2 : blx_2 see above --+
1104 * 0x426a99b4 : b 0x426a99d8 --> off to the predicted chain
1105 * 0x426a99b6 : b 0x426a99c8 --> punt to the interpreter
1106 * 0x426a99b8 : ldr r0, [r7, #44] --> r0 <- this->class->vtable[methodIdx]
1107 * 0x426a99ba : cmp r1, #0 --> compare r1 (rechain count) against 0
1108 * 0x426a99bc : bgt 0x426a99c2 --> >=0? don't rechain
1109 * 0x426a99be : ldr r7, [r6, #96] --+ dvmJitToPatchPredictedChain
1110 * 0x426a99c0 : blx r7 --+
1111 * 0x426a99c2 : add r1, pc, #12 --> r1 <- &retChainingCell
1112 * 0x426a99c4 : blx_1 0x426a9098 --+ TEMPLATE_INVOKE_METHOD_NO_OPT
1113 * 0x426a99c6 : blx_2 see above --+
1114 */
1115static void genInvokeVirtualCommon(CompilationUnit *cUnit, MIR *mir,
1116 int methodIndex,
Bill Buzbee89efc3d2009-07-28 11:22:22 -07001117 ArmLIR *retChainingCell,
1118 ArmLIR *predChainingCell,
1119 ArmLIR *pcrLabel)
Ben Cheng38329f52009-07-07 14:19:20 -07001120{
Bill Buzbee1465db52009-09-23 17:17:35 -07001121 /*
1122 * Note: all Dalvik register state should be flushed to
1123 * memory by the point, so register usage restrictions no
1124 * longer apply. Lock temps to prevent them from being
1125 * allocated by utility routines.
1126 */
Bill Buzbeec6f10662010-02-09 11:16:15 -08001127 dvmCompilerLockAllTemps(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07001128
Ben Cheng38329f52009-07-07 14:19:20 -07001129 /* "this" is already left in r0 by genProcessArgs* */
1130
1131 /* r4PC = dalvikCallsite */
1132 loadConstant(cUnit, r4PC,
1133 (int) (cUnit->method->insns + mir->offset));
1134
1135 /* r1 = &retChainingCell */
Bill Buzbee1465db52009-09-23 17:17:35 -07001136 ArmLIR *addrRetChain = opRegRegImm(cUnit, kOpAdd, r1, rpc, 0);
Ben Cheng38329f52009-07-07 14:19:20 -07001137 addrRetChain->generic.target = (LIR *) retChainingCell;
1138
1139 /* r2 = &predictedChainingCell */
Bill Buzbee1465db52009-09-23 17:17:35 -07001140 ArmLIR *predictedChainingCell = opRegRegImm(cUnit, kOpAdd, r2, rpc, 0);
Ben Cheng38329f52009-07-07 14:19:20 -07001141 predictedChainingCell->generic.target = (LIR *) predChainingCell;
1142
1143 genDispatchToHandler(cUnit, TEMPLATE_INVOKE_METHOD_PREDICTED_CHAIN);
1144
1145 /* return through lr - jump to the chaining cell */
1146 genUnconditionalBranch(cUnit, predChainingCell);
1147
1148 /*
1149 * null-check on "this" may have been eliminated, but we still need a PC-
1150 * reconstruction label for stack overflow bailout.
1151 */
1152 if (pcrLabel == NULL) {
1153 int dPC = (int) (cUnit->method->insns + mir->offset);
Bill Buzbee89efc3d2009-07-28 11:22:22 -07001154 pcrLabel = dvmCompilerNew(sizeof(ArmLIR), true);
Ben Chenga4973592010-03-31 11:59:18 -07001155 pcrLabel->opCode = kArmPseudoPCReconstructionCell;
Ben Cheng38329f52009-07-07 14:19:20 -07001156 pcrLabel->operands[0] = dPC;
1157 pcrLabel->operands[1] = mir->offset;
1158 /* Insert the place holder to the growable list */
1159 dvmInsertGrowableList(&cUnit->pcReconstructionList, pcrLabel);
1160 }
1161
1162 /* return through lr+2 - punt to the interpreter */
1163 genUnconditionalBranch(cUnit, pcrLabel);
1164
1165 /*
1166 * return through lr+4 - fully resolve the callee method.
1167 * r1 <- count
1168 * r2 <- &predictedChainCell
1169 * r3 <- this->class
1170 * r4 <- dPC
1171 * r7 <- this->class->vtable
1172 */
1173
1174 /* r0 <- calleeMethod */
Bill Buzbee270c1d62009-08-13 16:58:07 -07001175 loadWordDisp(cUnit, r7, methodIndex * 4, r0);
Ben Cheng38329f52009-07-07 14:19:20 -07001176
1177 /* Check if rechain limit is reached */
Bill Buzbee1465db52009-09-23 17:17:35 -07001178 opRegImm(cUnit, kOpCmp, r1, 0);
Ben Cheng38329f52009-07-07 14:19:20 -07001179
Bill Buzbee1465db52009-09-23 17:17:35 -07001180 ArmLIR *bypassRechaining = opCondBranch(cUnit, kArmCondGt);
Ben Cheng38329f52009-07-07 14:19:20 -07001181
Bill Buzbee270c1d62009-08-13 16:58:07 -07001182 loadWordDisp(cUnit, rGLUE, offsetof(InterpState,
1183 jitToInterpEntries.dvmJitToPatchPredictedChain), r7);
Ben Cheng38329f52009-07-07 14:19:20 -07001184
Ben Chengb88ec3c2010-05-17 12:50:33 -07001185 genRegCopy(cUnit, r1, rGLUE);
1186
Ben Cheng38329f52009-07-07 14:19:20 -07001187 /*
1188 * r0 = calleeMethod
1189 * r2 = &predictedChainingCell
1190 * r3 = class
1191 *
1192 * &returnChainingCell has been loaded into r1 but is not needed
1193 * when patching the chaining cell and will be clobbered upon
1194 * returning so it will be reconstructed again.
1195 */
Bill Buzbee1465db52009-09-23 17:17:35 -07001196 opReg(cUnit, kOpBlx, r7);
Ben Cheng38329f52009-07-07 14:19:20 -07001197
1198 /* r1 = &retChainingCell */
Bill Buzbee1465db52009-09-23 17:17:35 -07001199 addrRetChain = opRegRegImm(cUnit, kOpAdd, r1, rpc, 0);
Ben Cheng38329f52009-07-07 14:19:20 -07001200 addrRetChain->generic.target = (LIR *) retChainingCell;
1201
1202 bypassRechaining->generic.target = (LIR *) addrRetChain;
1203 /*
1204 * r0 = calleeMethod,
1205 * r1 = &ChainingCell,
1206 * r4PC = callsiteDPC,
1207 */
1208 genDispatchToHandler(cUnit, TEMPLATE_INVOKE_METHOD_NO_OPT);
Ben Cheng978738d2010-05-13 13:45:57 -07001209#if defined(WITH_JIT_TUNING)
Ben Cheng86717f72010-03-05 15:27:21 -08001210 gDvmJit.invokePolymorphic++;
Ben Cheng38329f52009-07-07 14:19:20 -07001211#endif
1212 /* Handle exceptions using the interpreter */
1213 genTrap(cUnit, mir->offset, pcrLabel);
1214}
1215
Ben Chengba4fc8b2009-06-01 13:00:29 -07001216/* Geneate a branch to go back to the interpreter */
1217static void genPuntToInterp(CompilationUnit *cUnit, unsigned int offset)
1218{
1219 /* r0 = dalvik pc */
Bill Buzbeec6f10662010-02-09 11:16:15 -08001220 dvmCompilerFlushAllRegs(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001221 loadConstant(cUnit, r0, (int) (cUnit->method->insns + offset));
Bill Buzbee270c1d62009-08-13 16:58:07 -07001222 loadWordDisp(cUnit, r0, offsetof(Object, clazz), r3);
1223 loadWordDisp(cUnit, rGLUE, offsetof(InterpState,
1224 jitToInterpEntries.dvmJitToInterpPunt), r1);
Bill Buzbee1465db52009-09-23 17:17:35 -07001225 opReg(cUnit, kOpBlx, r1);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001226}
1227
1228/*
1229 * Attempt to single step one instruction using the interpreter and return
1230 * to the compiled code for the next Dalvik instruction
1231 */
1232static void genInterpSingleStep(CompilationUnit *cUnit, MIR *mir)
1233{
1234 int flags = dexGetInstrFlags(gDvm.instrFlags, mir->dalvikInsn.opCode);
1235 int flagsToCheck = kInstrCanBranch | kInstrCanSwitch | kInstrCanReturn |
1236 kInstrCanThrow;
Bill Buzbee1465db52009-09-23 17:17:35 -07001237
Bill Buzbee45273872010-03-11 11:12:15 -08001238 //If already optimized out, just ignore
1239 if (mir->dalvikInsn.opCode == OP_NOP)
1240 return;
1241
Bill Buzbee1465db52009-09-23 17:17:35 -07001242 //Ugly, but necessary. Flush all Dalvik regs so Interp can find them
Bill Buzbeec6f10662010-02-09 11:16:15 -08001243 dvmCompilerFlushAllRegs(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07001244
Ben Chengba4fc8b2009-06-01 13:00:29 -07001245 if ((mir->next == NULL) || (flags & flagsToCheck)) {
1246 genPuntToInterp(cUnit, mir->offset);
1247 return;
1248 }
1249 int entryAddr = offsetof(InterpState,
1250 jitToInterpEntries.dvmJitToInterpSingleStep);
Bill Buzbee270c1d62009-08-13 16:58:07 -07001251 loadWordDisp(cUnit, rGLUE, entryAddr, r2);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001252 /* r0 = dalvik pc */
1253 loadConstant(cUnit, r0, (int) (cUnit->method->insns + mir->offset));
1254 /* r1 = dalvik pc of following instruction */
1255 loadConstant(cUnit, r1, (int) (cUnit->method->insns + mir->next->offset));
Bill Buzbee1465db52009-09-23 17:17:35 -07001256 opReg(cUnit, kOpBlx, r2);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001257}
1258
Ben Chengfc075c22010-05-28 15:20:08 -07001259#if defined(WITH_DEADLOCK_PREDICTION) || defined(WITH_MONITOR_TRACKING) || \
1260 defined(_ARMV5TE) || defined(_ARMV5TE_VFP)
Bill Buzbeec1d9ed42010-02-02 11:04:33 -08001261/*
1262 * To prevent a thread in a monitor wait from blocking the Jit from
1263 * resetting the code cache, heavyweight monitor lock will not
1264 * be allowed to return to an existing translation. Instead, we will
1265 * handle them by branching to a handler, which will in turn call the
1266 * runtime lock routine and then branch directly back to the
1267 * interpreter main loop. Given the high cost of the heavyweight
1268 * lock operation, this additional cost should be slight (especially when
1269 * considering that we expect the vast majority of lock operations to
1270 * use the fast-path thin lock bypass).
1271 */
Ben Cheng5d90c202009-11-22 23:31:11 -08001272static void genMonitorPortable(CompilationUnit *cUnit, MIR *mir)
Bill Buzbee270c1d62009-08-13 16:58:07 -07001273{
Bill Buzbeeefbd3c52009-11-04 22:18:40 -08001274 bool isEnter = (mir->dalvikInsn.opCode == OP_MONITOR_ENTER);
Bill Buzbee1465db52009-09-23 17:17:35 -07001275 genExportPC(cUnit, mir);
Bill Buzbeec6f10662010-02-09 11:16:15 -08001276 dvmCompilerFlushAllRegs(cUnit); /* Send everything to home location */
1277 RegLocation rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07001278 loadValueDirectFixed(cUnit, rlSrc, r1);
1279 loadWordDisp(cUnit, rGLUE, offsetof(InterpState, self), r0);
Bill Buzbeec1d9ed42010-02-02 11:04:33 -08001280 genNullCheck(cUnit, rlSrc.sRegLow, r1, mir->offset, NULL);
Bill Buzbeeefbd3c52009-11-04 22:18:40 -08001281 if (isEnter) {
Bill Buzbeec1d9ed42010-02-02 11:04:33 -08001282 /* Get dPC of next insn */
1283 loadConstant(cUnit, r4PC, (int)(cUnit->method->insns + mir->offset +
1284 dexGetInstrWidthAbs(gDvm.instrWidth, OP_MONITOR_ENTER)));
1285#if defined(WITH_DEADLOCK_PREDICTION)
1286 genDispatchToHandler(cUnit, TEMPLATE_MONITOR_ENTER_DEBUG);
1287#else
1288 genDispatchToHandler(cUnit, TEMPLATE_MONITOR_ENTER);
1289#endif
Bill Buzbee1465db52009-09-23 17:17:35 -07001290 } else {
Ben Chengbd1326d2010-04-02 15:04:53 -07001291 LOAD_FUNC_ADDR(cUnit, r2, (int)dvmUnlockObject);
Bill Buzbeec1d9ed42010-02-02 11:04:33 -08001292 /* Do the call */
1293 opReg(cUnit, kOpBlx, r2);
Bill Buzbee6bbdd6b2010-02-16 14:40:01 -08001294 opRegImm(cUnit, kOpCmp, r0, 0); /* Did we throw? */
1295 ArmLIR *branchOver = opCondBranch(cUnit, kArmCondNe);
1296 loadConstant(cUnit, r0,
1297 (int) (cUnit->method->insns + mir->offset +
1298 dexGetInstrWidthAbs(gDvm.instrWidth, OP_MONITOR_EXIT)));
1299 genDispatchToHandler(cUnit, TEMPLATE_THROW_EXCEPTION_COMMON);
1300 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
1301 target->defMask = ENCODE_ALL;
1302 branchOver->generic.target = (LIR *) target;
Elliott Hughes6a555132010-02-25 15:41:42 -08001303 dvmCompilerClobberCallRegs(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07001304 }
Bill Buzbee270c1d62009-08-13 16:58:07 -07001305}
Ben Chengfc075c22010-05-28 15:20:08 -07001306#endif
Bill Buzbee270c1d62009-08-13 16:58:07 -07001307
Ben Chengba4fc8b2009-06-01 13:00:29 -07001308/*
1309 * The following are the first-level codegen routines that analyze the format
1310 * of each bytecode then either dispatch special purpose codegen routines
1311 * or produce corresponding Thumb instructions directly.
1312 */
1313
1314static bool handleFmt10t_Fmt20t_Fmt30t(CompilationUnit *cUnit, MIR *mir,
Bill Buzbee89efc3d2009-07-28 11:22:22 -07001315 BasicBlock *bb, ArmLIR *labelList)
Ben Chengba4fc8b2009-06-01 13:00:29 -07001316{
1317 /* For OP_GOTO, OP_GOTO_16, and OP_GOTO_32 */
1318 genUnconditionalBranch(cUnit, &labelList[bb->taken->id]);
1319 return false;
1320}
1321
1322static bool handleFmt10x(CompilationUnit *cUnit, MIR *mir)
1323{
1324 OpCode dalvikOpCode = mir->dalvikInsn.opCode;
Andy McFaddenc35a2ef2010-06-17 12:36:00 -07001325 if ((dalvikOpCode >= OP_UNUSED_3E) && (dalvikOpCode <= OP_UNUSED_43)) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07001326 LOGE("Codegen: got unused opcode 0x%x\n",dalvikOpCode);
1327 return true;
1328 }
1329 switch (dalvikOpCode) {
1330 case OP_RETURN_VOID:
1331 genReturnCommon(cUnit,mir);
1332 break;
1333 case OP_UNUSED_73:
1334 case OP_UNUSED_79:
1335 case OP_UNUSED_7A:
Andy McFaddenc35a2ef2010-06-17 12:36:00 -07001336 case OP_UNUSED_F1:
1337 case OP_UNUSED_FF:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001338 LOGE("Codegen: got unused opcode 0x%x\n",dalvikOpCode);
1339 return true;
1340 case OP_NOP:
1341 break;
1342 default:
1343 return true;
1344 }
1345 return false;
1346}
1347
1348static bool handleFmt11n_Fmt31i(CompilationUnit *cUnit, MIR *mir)
1349{
Bill Buzbee1465db52009-09-23 17:17:35 -07001350 RegLocation rlDest;
1351 RegLocation rlResult;
1352 if (mir->ssaRep->numDefs == 2) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08001353 rlDest = dvmCompilerGetDestWide(cUnit, mir, 0, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -07001354 } else {
Bill Buzbeec6f10662010-02-09 11:16:15 -08001355 rlDest = dvmCompilerGetDest(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07001356 }
Ben Chenge9695e52009-06-16 16:11:47 -07001357
Ben Chengba4fc8b2009-06-01 13:00:29 -07001358 switch (mir->dalvikInsn.opCode) {
1359 case OP_CONST:
Ben Chenge9695e52009-06-16 16:11:47 -07001360 case OP_CONST_4: {
Bill Buzbeec6f10662010-02-09 11:16:15 -08001361 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kAnyReg, true);
Ben Chengbd1326d2010-04-02 15:04:53 -07001362 loadConstantNoClobber(cUnit, rlResult.lowReg, mir->dalvikInsn.vB);
Bill Buzbee1465db52009-09-23 17:17:35 -07001363 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001364 break;
Ben Chenge9695e52009-06-16 16:11:47 -07001365 }
1366 case OP_CONST_WIDE_32: {
Bill Buzbee1465db52009-09-23 17:17:35 -07001367 //TUNING: single routine to load constant pair for support doubles
Bill Buzbee964a7b02010-01-28 12:54:19 -08001368 //TUNING: load 0/-1 separately to avoid load dependency
Bill Buzbeec6f10662010-02-09 11:16:15 -08001369 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Ben Chengbd1326d2010-04-02 15:04:53 -07001370 loadConstantNoClobber(cUnit, rlResult.lowReg, mir->dalvikInsn.vB);
Bill Buzbee1465db52009-09-23 17:17:35 -07001371 opRegRegImm(cUnit, kOpAsr, rlResult.highReg,
1372 rlResult.lowReg, 31);
1373 storeValueWide(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001374 break;
Ben Chenge9695e52009-06-16 16:11:47 -07001375 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07001376 default:
1377 return true;
1378 }
1379 return false;
1380}
1381
1382static bool handleFmt21h(CompilationUnit *cUnit, MIR *mir)
1383{
Bill Buzbee1465db52009-09-23 17:17:35 -07001384 RegLocation rlDest;
1385 RegLocation rlResult;
1386 if (mir->ssaRep->numDefs == 2) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08001387 rlDest = dvmCompilerGetDestWide(cUnit, mir, 0, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -07001388 } else {
Bill Buzbeec6f10662010-02-09 11:16:15 -08001389 rlDest = dvmCompilerGetDest(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07001390 }
Bill Buzbeec6f10662010-02-09 11:16:15 -08001391 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kAnyReg, true);
Ben Chenge9695e52009-06-16 16:11:47 -07001392
Ben Chengba4fc8b2009-06-01 13:00:29 -07001393 switch (mir->dalvikInsn.opCode) {
Ben Chenge9695e52009-06-16 16:11:47 -07001394 case OP_CONST_HIGH16: {
Ben Chengbd1326d2010-04-02 15:04:53 -07001395 loadConstantNoClobber(cUnit, rlResult.lowReg,
1396 mir->dalvikInsn.vB << 16);
Bill Buzbee1465db52009-09-23 17:17:35 -07001397 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001398 break;
Ben Chenge9695e52009-06-16 16:11:47 -07001399 }
1400 case OP_CONST_WIDE_HIGH16: {
Bill Buzbee1465db52009-09-23 17:17:35 -07001401 loadConstantValueWide(cUnit, rlResult.lowReg, rlResult.highReg,
1402 0, mir->dalvikInsn.vB << 16);
1403 storeValueWide(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001404 break;
Ben Chenge9695e52009-06-16 16:11:47 -07001405 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07001406 default:
1407 return true;
1408 }
1409 return false;
1410}
1411
1412static bool handleFmt20bc(CompilationUnit *cUnit, MIR *mir)
1413{
1414 /* For OP_THROW_VERIFICATION_ERROR */
1415 genInterpSingleStep(cUnit, mir);
1416 return false;
1417}
1418
1419static bool handleFmt21c_Fmt31c(CompilationUnit *cUnit, MIR *mir)
1420{
Bill Buzbee1465db52009-09-23 17:17:35 -07001421 RegLocation rlResult;
1422 RegLocation rlDest;
1423 RegLocation rlSrc;
Ben Chenge9695e52009-06-16 16:11:47 -07001424
Ben Chengba4fc8b2009-06-01 13:00:29 -07001425 switch (mir->dalvikInsn.opCode) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07001426 case OP_CONST_STRING_JUMBO:
1427 case OP_CONST_STRING: {
1428 void *strPtr = (void*)
1429 (cUnit->method->clazz->pDvmDex->pResStrings[mir->dalvikInsn.vB]);
Ben Chengdd6e8702010-05-07 13:05:47 -07001430
1431 if (strPtr == NULL) {
1432 LOGE("Unexpected null string");
1433 dvmAbort();
1434 }
1435
Bill Buzbeec6f10662010-02-09 11:16:15 -08001436 rlDest = dvmCompilerGetDest(cUnit, mir, 0);
1437 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Ben Chengbd1326d2010-04-02 15:04:53 -07001438 loadConstantNoClobber(cUnit, rlResult.lowReg, (int) strPtr );
Bill Buzbee1465db52009-09-23 17:17:35 -07001439 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001440 break;
1441 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07001442 case OP_CONST_CLASS: {
1443 void *classPtr = (void*)
1444 (cUnit->method->clazz->pDvmDex->pResClasses[mir->dalvikInsn.vB]);
Ben Chengdd6e8702010-05-07 13:05:47 -07001445
1446 if (classPtr == NULL) {
1447 LOGE("Unexpected null class");
1448 dvmAbort();
1449 }
1450
Bill Buzbeec6f10662010-02-09 11:16:15 -08001451 rlDest = dvmCompilerGetDest(cUnit, mir, 0);
1452 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Ben Chengbd1326d2010-04-02 15:04:53 -07001453 loadConstantNoClobber(cUnit, rlResult.lowReg, (int) classPtr );
Bill Buzbee1465db52009-09-23 17:17:35 -07001454 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001455 break;
1456 }
buzbeeecf8f6e2010-07-20 14:53:42 -07001457 case OP_SGET_VOLATILE:
1458 case OP_SGET_OBJECT_VOLATILE:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001459 case OP_SGET_OBJECT:
1460 case OP_SGET_BOOLEAN:
1461 case OP_SGET_CHAR:
1462 case OP_SGET_BYTE:
1463 case OP_SGET_SHORT:
1464 case OP_SGET: {
Bill Buzbee50a6bf22009-07-08 13:08:04 -07001465 int valOffset = offsetof(StaticField, value);
Bill Buzbeec6f10662010-02-09 11:16:15 -08001466 int tReg = dvmCompilerAllocTemp(cUnit);
buzbeeecf8f6e2010-07-20 14:53:42 -07001467 bool isVolatile;
Ben Cheng7a2697d2010-06-07 13:44:23 -07001468 const Method *method = (mir->OptimizationFlags & MIR_CALLEE) ?
1469 mir->meta.calleeMethod : cUnit->method;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001470 void *fieldPtr = (void*)
Ben Cheng7a2697d2010-06-07 13:44:23 -07001471 (method->clazz->pDvmDex->pResFields[mir->dalvikInsn.vB]);
Ben Chengdd6e8702010-05-07 13:05:47 -07001472
1473 if (fieldPtr == NULL) {
1474 LOGE("Unexpected null static field");
1475 dvmAbort();
1476 }
1477
buzbeeecf8f6e2010-07-20 14:53:42 -07001478 isVolatile = (mir->dalvikInsn.opCode == OP_SGET_VOLATILE) ||
1479 (mir->dalvikInsn.opCode == OP_SGET_OBJECT_VOLATILE) ||
1480 dvmIsVolatileField(fieldPtr);
1481
Bill Buzbeec6f10662010-02-09 11:16:15 -08001482 rlDest = dvmCompilerGetDest(cUnit, mir, 0);
1483 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kAnyReg, true);
Bill Buzbee1465db52009-09-23 17:17:35 -07001484 loadConstant(cUnit, tReg, (int) fieldPtr + valOffset);
Ben Cheng11d8f142010-03-24 15:24:19 -07001485
buzbeeecf8f6e2010-07-20 14:53:42 -07001486 if (isVolatile) {
1487 dvmCompilerGenMemBarrier(cUnit);
1488 }
Ben Cheng11d8f142010-03-24 15:24:19 -07001489 HEAP_ACCESS_SHADOW(true);
Bill Buzbee1465db52009-09-23 17:17:35 -07001490 loadWordDisp(cUnit, tReg, 0, rlResult.lowReg);
Ben Cheng11d8f142010-03-24 15:24:19 -07001491 HEAP_ACCESS_SHADOW(false);
1492
Bill Buzbee1465db52009-09-23 17:17:35 -07001493 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001494 break;
1495 }
1496 case OP_SGET_WIDE: {
Bill Buzbee50a6bf22009-07-08 13:08:04 -07001497 int valOffset = offsetof(StaticField, value);
Ben Cheng7a2697d2010-06-07 13:44:23 -07001498 const Method *method = (mir->OptimizationFlags & MIR_CALLEE) ?
1499 mir->meta.calleeMethod : cUnit->method;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001500 void *fieldPtr = (void*)
Ben Cheng7a2697d2010-06-07 13:44:23 -07001501 (method->clazz->pDvmDex->pResFields[mir->dalvikInsn.vB]);
Ben Chengdd6e8702010-05-07 13:05:47 -07001502
1503 if (fieldPtr == NULL) {
1504 LOGE("Unexpected null static field");
1505 dvmAbort();
1506 }
1507
Bill Buzbeec6f10662010-02-09 11:16:15 -08001508 int tReg = dvmCompilerAllocTemp(cUnit);
Bill Buzbeec6f10662010-02-09 11:16:15 -08001509 rlDest = dvmCompilerGetDestWide(cUnit, mir, 0, 1);
1510 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kAnyReg, true);
Bill Buzbee1465db52009-09-23 17:17:35 -07001511 loadConstant(cUnit, tReg, (int) fieldPtr + valOffset);
Ben Cheng11d8f142010-03-24 15:24:19 -07001512
1513 HEAP_ACCESS_SHADOW(true);
Bill Buzbee1465db52009-09-23 17:17:35 -07001514 loadPair(cUnit, tReg, rlResult.lowReg, rlResult.highReg);
Ben Cheng11d8f142010-03-24 15:24:19 -07001515 HEAP_ACCESS_SHADOW(false);
1516
Bill Buzbee1465db52009-09-23 17:17:35 -07001517 storeValueWide(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001518 break;
1519 }
1520 case OP_SPUT_OBJECT:
buzbeeddc7d292010-09-02 17:16:24 -07001521 case OP_SPUT_OBJECT_VOLATILE:
1522 case OP_SPUT_VOLATILE:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001523 case OP_SPUT_BOOLEAN:
1524 case OP_SPUT_CHAR:
1525 case OP_SPUT_BYTE:
1526 case OP_SPUT_SHORT:
1527 case OP_SPUT: {
Bill Buzbee50a6bf22009-07-08 13:08:04 -07001528 int valOffset = offsetof(StaticField, value);
Bill Buzbeec6f10662010-02-09 11:16:15 -08001529 int tReg = dvmCompilerAllocTemp(cUnit);
buzbeeecf8f6e2010-07-20 14:53:42 -07001530 bool isVolatile;
Ben Cheng7a2697d2010-06-07 13:44:23 -07001531 const Method *method = (mir->OptimizationFlags & MIR_CALLEE) ?
1532 mir->meta.calleeMethod : cUnit->method;
1533 void *fieldPtr = (void*)
1534 (method->clazz->pDvmDex->pResFields[mir->dalvikInsn.vB]);
Ben Chenge9695e52009-06-16 16:11:47 -07001535
buzbeeecf8f6e2010-07-20 14:53:42 -07001536 isVolatile = (mir->dalvikInsn.opCode == OP_SPUT_VOLATILE) ||
1537 (mir->dalvikInsn.opCode == OP_SPUT_OBJECT_VOLATILE) ||
1538 dvmIsVolatileField(fieldPtr);
1539
Ben Chengdd6e8702010-05-07 13:05:47 -07001540 if (fieldPtr == NULL) {
1541 LOGE("Unexpected null static field");
1542 dvmAbort();
1543 }
1544
Bill Buzbeec6f10662010-02-09 11:16:15 -08001545 rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07001546 rlSrc = loadValue(cUnit, rlSrc, kAnyReg);
1547 loadConstant(cUnit, tReg, (int) fieldPtr + valOffset);
Ben Cheng11d8f142010-03-24 15:24:19 -07001548
1549 HEAP_ACCESS_SHADOW(true);
Bill Buzbee1465db52009-09-23 17:17:35 -07001550 storeWordDisp(cUnit, tReg, 0 ,rlSrc.lowReg);
Ben Cheng11d8f142010-03-24 15:24:19 -07001551 HEAP_ACCESS_SHADOW(false);
buzbeeecf8f6e2010-07-20 14:53:42 -07001552 if (isVolatile) {
1553 dvmCompilerGenMemBarrier(cUnit);
1554 }
buzbee919eb062010-07-12 12:59:22 -07001555 if (mir->dalvikInsn.opCode == OP_SPUT_OBJECT) {
1556 /* NOTE: marking card based on field address */
1557 markCard(cUnit, rlSrc.lowReg, tReg);
1558 }
buzbeebaf196a2010-08-04 10:13:15 -07001559 dvmCompilerFreeTemp(cUnit, tReg);
Ben Cheng11d8f142010-03-24 15:24:19 -07001560
Ben Chengba4fc8b2009-06-01 13:00:29 -07001561 break;
1562 }
1563 case OP_SPUT_WIDE: {
Bill Buzbeec6f10662010-02-09 11:16:15 -08001564 int tReg = dvmCompilerAllocTemp(cUnit);
Bill Buzbee50a6bf22009-07-08 13:08:04 -07001565 int valOffset = offsetof(StaticField, value);
Ben Cheng7a2697d2010-06-07 13:44:23 -07001566 const Method *method = (mir->OptimizationFlags & MIR_CALLEE) ?
1567 mir->meta.calleeMethod : cUnit->method;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001568 void *fieldPtr = (void*)
Ben Cheng7a2697d2010-06-07 13:44:23 -07001569 (method->clazz->pDvmDex->pResFields[mir->dalvikInsn.vB]);
Ben Chenge9695e52009-06-16 16:11:47 -07001570
Ben Chengdd6e8702010-05-07 13:05:47 -07001571 if (fieldPtr == NULL) {
1572 LOGE("Unexpected null static field");
1573 dvmAbort();
1574 }
1575
Bill Buzbeec6f10662010-02-09 11:16:15 -08001576 rlSrc = dvmCompilerGetSrcWide(cUnit, mir, 0, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -07001577 rlSrc = loadValueWide(cUnit, rlSrc, kAnyReg);
1578 loadConstant(cUnit, tReg, (int) fieldPtr + valOffset);
Ben Cheng11d8f142010-03-24 15:24:19 -07001579
1580 HEAP_ACCESS_SHADOW(true);
Bill Buzbee1465db52009-09-23 17:17:35 -07001581 storePair(cUnit, tReg, rlSrc.lowReg, rlSrc.highReg);
Ben Cheng11d8f142010-03-24 15:24:19 -07001582 HEAP_ACCESS_SHADOW(false);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001583 break;
1584 }
1585 case OP_NEW_INSTANCE: {
Ben Chenge9695e52009-06-16 16:11:47 -07001586 /*
1587 * Obey the calling convention and don't mess with the register
1588 * usage.
1589 */
Ben Chengba4fc8b2009-06-01 13:00:29 -07001590 ClassObject *classPtr = (void*)
1591 (cUnit->method->clazz->pDvmDex->pResClasses[mir->dalvikInsn.vB]);
Ben Chengdd6e8702010-05-07 13:05:47 -07001592
1593 if (classPtr == NULL) {
1594 LOGE("Unexpected null class");
1595 dvmAbort();
1596 }
1597
Ben Cheng79d173c2009-09-29 16:12:51 -07001598 /*
1599 * If it is going to throw, it should not make to the trace to begin
Bill Buzbee1465db52009-09-23 17:17:35 -07001600 * with. However, Alloc might throw, so we need to genExportPC()
Ben Cheng79d173c2009-09-29 16:12:51 -07001601 */
1602 assert((classPtr->accessFlags & (ACC_INTERFACE|ACC_ABSTRACT)) == 0);
Bill Buzbeec6f10662010-02-09 11:16:15 -08001603 dvmCompilerFlushAllRegs(cUnit); /* Everything to home location */
Bill Buzbee1465db52009-09-23 17:17:35 -07001604 genExportPC(cUnit, mir);
Ben Chengbd1326d2010-04-02 15:04:53 -07001605 LOAD_FUNC_ADDR(cUnit, r2, (int)dvmAllocObject);
Ben Chenge9695e52009-06-16 16:11:47 -07001606 loadConstant(cUnit, r0, (int) classPtr);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001607 loadConstant(cUnit, r1, ALLOC_DONT_TRACK);
Bill Buzbee1465db52009-09-23 17:17:35 -07001608 opReg(cUnit, kOpBlx, r2);
Elliott Hughes6a555132010-02-25 15:41:42 -08001609 dvmCompilerClobberCallRegs(cUnit);
Ben Cheng4f489172009-09-27 17:08:35 -07001610 /* generate a branch over if allocation is successful */
Bill Buzbee1465db52009-09-23 17:17:35 -07001611 opRegImm(cUnit, kOpCmp, r0, 0); /* NULL? */
1612 ArmLIR *branchOver = opCondBranch(cUnit, kArmCondNe);
Ben Cheng4f489172009-09-27 17:08:35 -07001613 /*
1614 * OOM exception needs to be thrown here and cannot re-execute
1615 */
1616 loadConstant(cUnit, r0,
1617 (int) (cUnit->method->insns + mir->offset));
1618 genDispatchToHandler(cUnit, TEMPLATE_THROW_EXCEPTION_COMMON);
1619 /* noreturn */
1620
Bill Buzbee1465db52009-09-23 17:17:35 -07001621 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
Ben Cheng4f489172009-09-27 17:08:35 -07001622 target->defMask = ENCODE_ALL;
1623 branchOver->generic.target = (LIR *) target;
Bill Buzbeec6f10662010-02-09 11:16:15 -08001624 rlDest = dvmCompilerGetDest(cUnit, mir, 0);
1625 rlResult = dvmCompilerGetReturn(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07001626 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001627 break;
1628 }
1629 case OP_CHECK_CAST: {
Ben Chenge9695e52009-06-16 16:11:47 -07001630 /*
1631 * Obey the calling convention and don't mess with the register
1632 * usage.
1633 */
Ben Chengba4fc8b2009-06-01 13:00:29 -07001634 ClassObject *classPtr =
1635 (cUnit->method->clazz->pDvmDex->pResClasses[mir->dalvikInsn.vB]);
Bill Buzbee4df41a52009-11-12 17:07:16 -08001636 /*
1637 * Note: It is possible that classPtr is NULL at this point,
1638 * even though this instruction has been successfully interpreted.
1639 * If the previous interpretation had a null source, the
1640 * interpreter would not have bothered to resolve the clazz.
1641 * Bail out to the interpreter in this case, and log it
1642 * so that we can tell if it happens frequently.
1643 */
1644 if (classPtr == NULL) {
Ben Cheng11d8f142010-03-24 15:24:19 -07001645 LOGVV("null clazz in OP_CHECK_CAST, single-stepping");
Bill Buzbee4df41a52009-11-12 17:07:16 -08001646 genInterpSingleStep(cUnit, mir);
1647 return false;
1648 }
Bill Buzbeec6f10662010-02-09 11:16:15 -08001649 dvmCompilerFlushAllRegs(cUnit); /* Everything to home location */
Ben Chengba4fc8b2009-06-01 13:00:29 -07001650 loadConstant(cUnit, r1, (int) classPtr );
Bill Buzbeec6f10662010-02-09 11:16:15 -08001651 rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07001652 rlSrc = loadValue(cUnit, rlSrc, kCoreReg);
1653 opRegImm(cUnit, kOpCmp, rlSrc.lowReg, 0); /* Null? */
1654 ArmLIR *branch1 = opCondBranch(cUnit, kArmCondEq);
1655 /*
1656 * rlSrc.lowReg now contains object->clazz. Note that
1657 * it could have been allocated r0, but we're okay so long
1658 * as we don't do anything desctructive until r0 is loaded
1659 * with clazz.
1660 */
Ben Chengba4fc8b2009-06-01 13:00:29 -07001661 /* r0 now contains object->clazz */
Bill Buzbee1465db52009-09-23 17:17:35 -07001662 loadWordDisp(cUnit, rlSrc.lowReg, offsetof(Object, clazz), r0);
Ben Chengbd1326d2010-04-02 15:04:53 -07001663 LOAD_FUNC_ADDR(cUnit, r2, (int)dvmInstanceofNonTrivial);
Bill Buzbee1465db52009-09-23 17:17:35 -07001664 opRegReg(cUnit, kOpCmp, r0, r1);
1665 ArmLIR *branch2 = opCondBranch(cUnit, kArmCondEq);
1666 opReg(cUnit, kOpBlx, r2);
Elliott Hughes6a555132010-02-25 15:41:42 -08001667 dvmCompilerClobberCallRegs(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07001668 /*
1669 * If null, check cast failed - punt to the interpreter. Because
1670 * interpreter will be the one throwing, we don't need to
1671 * genExportPC() here.
1672 */
Bill Buzbee270c1d62009-08-13 16:58:07 -07001673 genZeroCheck(cUnit, r0, mir->offset, NULL);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001674 /* check cast passed - branch target here */
Bill Buzbee1465db52009-09-23 17:17:35 -07001675 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
Ben Chengd7d426a2009-09-22 11:23:36 -07001676 target->defMask = ENCODE_ALL;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001677 branch1->generic.target = (LIR *)target;
1678 branch2->generic.target = (LIR *)target;
1679 break;
1680 }
buzbee4d92e682010-07-29 15:24:14 -07001681 case OP_SGET_WIDE_VOLATILE:
1682 case OP_SPUT_WIDE_VOLATILE:
1683 genInterpSingleStep(cUnit, mir);
1684 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001685 default:
1686 return true;
1687 }
1688 return false;
1689}
1690
Ben Cheng7a2697d2010-06-07 13:44:23 -07001691/*
1692 * A typical example of inlined getter/setter from a monomorphic callsite:
1693 *
1694 * D/dalvikvm( 289): -------- dalvik offset: 0x0000 @ invoke-static (I)
1695 * D/dalvikvm( 289): -------- dalvik offset: 0x0000 @ sget-object (C) v0, ...
1696 * D/dalvikvm( 289): 0x4427fc22 (0002): ldr r0, [pc, #56]
1697 * D/dalvikvm( 289): 0x4427fc24 (0004): ldr r1, [r0, #0]
1698 * D/dalvikvm( 289): 0x4427fc26 (0006): str r1, [r5, #0]
1699 * D/dalvikvm( 289): 0x4427fc28 (0008): .align4
1700 * D/dalvikvm( 289): L0x0003:
1701 * D/dalvikvm( 289): -------- dalvik offset: 0x0003 @ move-result-object (I) v0
1702 *
1703 * Note the invoke-static and move-result-object with the (I) notation are
1704 * turned into no-op.
1705 */
Ben Chengba4fc8b2009-06-01 13:00:29 -07001706static bool handleFmt11x(CompilationUnit *cUnit, MIR *mir)
1707{
1708 OpCode dalvikOpCode = mir->dalvikInsn.opCode;
Bill Buzbee1465db52009-09-23 17:17:35 -07001709 RegLocation rlResult;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001710 switch (dalvikOpCode) {
1711 case OP_MOVE_EXCEPTION: {
1712 int offset = offsetof(InterpState, self);
1713 int exOffset = offsetof(Thread, exception);
Bill Buzbeec6f10662010-02-09 11:16:15 -08001714 int selfReg = dvmCompilerAllocTemp(cUnit);
1715 int resetReg = dvmCompilerAllocTemp(cUnit);
1716 RegLocation rlDest = dvmCompilerGetDest(cUnit, mir, 0);
1717 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee1465db52009-09-23 17:17:35 -07001718 loadWordDisp(cUnit, rGLUE, offset, selfReg);
Bill Buzbeef9f33282009-11-22 12:45:30 -08001719 loadConstant(cUnit, resetReg, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07001720 loadWordDisp(cUnit, selfReg, exOffset, rlResult.lowReg);
Bill Buzbeef9f33282009-11-22 12:45:30 -08001721 storeWordDisp(cUnit, selfReg, exOffset, resetReg);
Bill Buzbee1465db52009-09-23 17:17:35 -07001722 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001723 break;
1724 }
1725 case OP_MOVE_RESULT:
1726 case OP_MOVE_RESULT_OBJECT: {
Ben Cheng7a2697d2010-06-07 13:44:23 -07001727 /* An inlined move result is effectively no-op */
1728 if (mir->OptimizationFlags & MIR_INLINED)
1729 break;
Bill Buzbeec6f10662010-02-09 11:16:15 -08001730 RegLocation rlDest = dvmCompilerGetDest(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07001731 RegLocation rlSrc = LOC_DALVIK_RETURN_VAL;
1732 rlSrc.fp = rlDest.fp;
1733 storeValue(cUnit, rlDest, rlSrc);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001734 break;
1735 }
1736 case OP_MOVE_RESULT_WIDE: {
Ben Cheng7a2697d2010-06-07 13:44:23 -07001737 /* An inlined move result is effectively no-op */
1738 if (mir->OptimizationFlags & MIR_INLINED)
1739 break;
Bill Buzbeec6f10662010-02-09 11:16:15 -08001740 RegLocation rlDest = dvmCompilerGetDestWide(cUnit, mir, 0, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -07001741 RegLocation rlSrc = LOC_DALVIK_RETURN_VAL_WIDE;
1742 rlSrc.fp = rlDest.fp;
1743 storeValueWide(cUnit, rlDest, rlSrc);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001744 break;
1745 }
1746 case OP_RETURN_WIDE: {
Bill Buzbeec6f10662010-02-09 11:16:15 -08001747 RegLocation rlSrc = dvmCompilerGetSrcWide(cUnit, mir, 0, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -07001748 RegLocation rlDest = LOC_DALVIK_RETURN_VAL_WIDE;
1749 rlDest.fp = rlSrc.fp;
1750 storeValueWide(cUnit, rlDest, rlSrc);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001751 genReturnCommon(cUnit,mir);
1752 break;
1753 }
1754 case OP_RETURN:
1755 case OP_RETURN_OBJECT: {
Bill Buzbeec6f10662010-02-09 11:16:15 -08001756 RegLocation rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07001757 RegLocation rlDest = LOC_DALVIK_RETURN_VAL;
1758 rlDest.fp = rlSrc.fp;
1759 storeValue(cUnit, rlDest, rlSrc);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001760 genReturnCommon(cUnit,mir);
1761 break;
1762 }
Bill Buzbee1465db52009-09-23 17:17:35 -07001763 case OP_MONITOR_EXIT:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001764 case OP_MONITOR_ENTER:
Bill Buzbeed0937ef2009-12-22 16:15:39 -08001765#if defined(WITH_DEADLOCK_PREDICTION) || defined(WITH_MONITOR_TRACKING)
Ben Cheng5d90c202009-11-22 23:31:11 -08001766 genMonitorPortable(cUnit, mir);
Bill Buzbee1465db52009-09-23 17:17:35 -07001767#else
Ben Cheng5d90c202009-11-22 23:31:11 -08001768 genMonitor(cUnit, mir);
Bill Buzbee1465db52009-09-23 17:17:35 -07001769#endif
Ben Chengba4fc8b2009-06-01 13:00:29 -07001770 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001771 case OP_THROW: {
1772 genInterpSingleStep(cUnit, mir);
1773 break;
1774 }
1775 default:
1776 return true;
1777 }
1778 return false;
1779}
1780
Bill Buzbeed45ba372009-06-15 17:00:57 -07001781static bool handleFmt12x(CompilationUnit *cUnit, MIR *mir)
1782{
1783 OpCode opCode = mir->dalvikInsn.opCode;
Bill Buzbee1465db52009-09-23 17:17:35 -07001784 RegLocation rlDest;
1785 RegLocation rlSrc;
1786 RegLocation rlResult;
Bill Buzbeed45ba372009-06-15 17:00:57 -07001787
Ben Chengba4fc8b2009-06-01 13:00:29 -07001788 if ( (opCode >= OP_ADD_INT_2ADDR) && (opCode <= OP_REM_DOUBLE_2ADDR)) {
Ben Cheng5d90c202009-11-22 23:31:11 -08001789 return genArithOp( cUnit, mir );
Ben Chengba4fc8b2009-06-01 13:00:29 -07001790 }
1791
Bill Buzbee1465db52009-09-23 17:17:35 -07001792 if (mir->ssaRep->numUses == 2)
Bill Buzbeec6f10662010-02-09 11:16:15 -08001793 rlSrc = dvmCompilerGetSrcWide(cUnit, mir, 0, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -07001794 else
Bill Buzbeec6f10662010-02-09 11:16:15 -08001795 rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07001796 if (mir->ssaRep->numDefs == 2)
Bill Buzbeec6f10662010-02-09 11:16:15 -08001797 rlDest = dvmCompilerGetDestWide(cUnit, mir, 0, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -07001798 else
Bill Buzbeec6f10662010-02-09 11:16:15 -08001799 rlDest = dvmCompilerGetDest(cUnit, mir, 0);
Ben Chenge9695e52009-06-16 16:11:47 -07001800
Ben Chengba4fc8b2009-06-01 13:00:29 -07001801 switch (opCode) {
Bill Buzbee1465db52009-09-23 17:17:35 -07001802 case OP_DOUBLE_TO_INT:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001803 case OP_INT_TO_FLOAT:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001804 case OP_FLOAT_TO_INT:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001805 case OP_DOUBLE_TO_FLOAT:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001806 case OP_FLOAT_TO_DOUBLE:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001807 case OP_INT_TO_DOUBLE:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001808 case OP_FLOAT_TO_LONG:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001809 case OP_LONG_TO_FLOAT:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001810 case OP_DOUBLE_TO_LONG:
Ben Chengba4fc8b2009-06-01 13:00:29 -07001811 case OP_LONG_TO_DOUBLE:
Ben Cheng5d90c202009-11-22 23:31:11 -08001812 return genConversion(cUnit, mir);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001813 case OP_NEG_INT:
1814 case OP_NOT_INT:
Ben Cheng5d90c202009-11-22 23:31:11 -08001815 return genArithOpInt(cUnit, mir, rlDest, rlSrc, rlSrc);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001816 case OP_NEG_LONG:
1817 case OP_NOT_LONG:
Ben Cheng5d90c202009-11-22 23:31:11 -08001818 return genArithOpLong(cUnit, mir, rlDest, rlSrc, rlSrc);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001819 case OP_NEG_FLOAT:
Ben Cheng5d90c202009-11-22 23:31:11 -08001820 return genArithOpFloat(cUnit, mir, rlDest, rlSrc, rlSrc);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001821 case OP_NEG_DOUBLE:
Ben Cheng5d90c202009-11-22 23:31:11 -08001822 return genArithOpDouble(cUnit, mir, rlDest, rlSrc, rlSrc);
Bill Buzbee1465db52009-09-23 17:17:35 -07001823 case OP_MOVE_WIDE:
1824 storeValueWide(cUnit, rlDest, rlSrc);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001825 break;
Bill Buzbee1465db52009-09-23 17:17:35 -07001826 case OP_INT_TO_LONG:
Bill Buzbeec6f10662010-02-09 11:16:15 -08001827 rlSrc = dvmCompilerUpdateLoc(cUnit, rlSrc);
1828 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee964a7b02010-01-28 12:54:19 -08001829 //TUNING: shouldn't loadValueDirect already check for phys reg?
Bill Buzbee1465db52009-09-23 17:17:35 -07001830 if (rlSrc.location == kLocPhysReg) {
1831 genRegCopy(cUnit, rlResult.lowReg, rlSrc.lowReg);
1832 } else {
1833 loadValueDirect(cUnit, rlSrc, rlResult.lowReg);
1834 }
1835 opRegRegImm(cUnit, kOpAsr, rlResult.highReg,
1836 rlResult.lowReg, 31);
1837 storeValueWide(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001838 break;
Bill Buzbee1465db52009-09-23 17:17:35 -07001839 case OP_LONG_TO_INT:
Bill Buzbeec6f10662010-02-09 11:16:15 -08001840 rlSrc = dvmCompilerUpdateLocWide(cUnit, rlSrc);
1841 rlSrc = dvmCompilerWideToNarrow(cUnit, rlSrc);
Bill Buzbee1465db52009-09-23 17:17:35 -07001842 // Intentional fallthrough
Ben Chengba4fc8b2009-06-01 13:00:29 -07001843 case OP_MOVE:
1844 case OP_MOVE_OBJECT:
Bill Buzbee1465db52009-09-23 17:17:35 -07001845 storeValue(cUnit, rlDest, rlSrc);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001846 break;
1847 case OP_INT_TO_BYTE:
Bill Buzbee1465db52009-09-23 17:17:35 -07001848 rlSrc = loadValue(cUnit, rlSrc, kCoreReg);
Bill Buzbeec6f10662010-02-09 11:16:15 -08001849 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee1465db52009-09-23 17:17:35 -07001850 opRegReg(cUnit, kOp2Byte, rlResult.lowReg, rlSrc.lowReg);
1851 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001852 break;
1853 case OP_INT_TO_SHORT:
Bill Buzbee1465db52009-09-23 17:17:35 -07001854 rlSrc = loadValue(cUnit, rlSrc, kCoreReg);
Bill Buzbeec6f10662010-02-09 11:16:15 -08001855 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee1465db52009-09-23 17:17:35 -07001856 opRegReg(cUnit, kOp2Short, rlResult.lowReg, rlSrc.lowReg);
1857 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001858 break;
1859 case OP_INT_TO_CHAR:
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, kOp2Char, rlResult.lowReg, rlSrc.lowReg);
1863 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001864 break;
1865 case OP_ARRAY_LENGTH: {
1866 int lenOffset = offsetof(ArrayObject, length);
Bill Buzbee1465db52009-09-23 17:17:35 -07001867 rlSrc = loadValue(cUnit, rlSrc, kCoreReg);
1868 genNullCheck(cUnit, rlSrc.sRegLow, rlSrc.lowReg,
1869 mir->offset, NULL);
Bill Buzbeec6f10662010-02-09 11:16:15 -08001870 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee1465db52009-09-23 17:17:35 -07001871 loadWordDisp(cUnit, rlSrc.lowReg, lenOffset,
1872 rlResult.lowReg);
1873 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001874 break;
1875 }
1876 default:
1877 return true;
1878 }
1879 return false;
1880}
1881
1882static bool handleFmt21s(CompilationUnit *cUnit, MIR *mir)
1883{
1884 OpCode dalvikOpCode = mir->dalvikInsn.opCode;
Bill Buzbee1465db52009-09-23 17:17:35 -07001885 RegLocation rlDest;
1886 RegLocation rlResult;
1887 int BBBB = mir->dalvikInsn.vB;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001888 if (dalvikOpCode == OP_CONST_WIDE_16) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08001889 rlDest = dvmCompilerGetDestWide(cUnit, mir, 0, 1);
1890 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Ben Chengbd1326d2010-04-02 15:04:53 -07001891 loadConstantNoClobber(cUnit, rlResult.lowReg, BBBB);
Bill Buzbee964a7b02010-01-28 12:54:19 -08001892 //TUNING: do high separately to avoid load dependency
Bill Buzbee1465db52009-09-23 17:17:35 -07001893 opRegRegImm(cUnit, kOpAsr, rlResult.highReg, rlResult.lowReg, 31);
1894 storeValueWide(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001895 } else if (dalvikOpCode == OP_CONST_16) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08001896 rlDest = dvmCompilerGetDest(cUnit, mir, 0);
1897 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kAnyReg, true);
Ben Chengbd1326d2010-04-02 15:04:53 -07001898 loadConstantNoClobber(cUnit, rlResult.lowReg, BBBB);
Bill Buzbee1465db52009-09-23 17:17:35 -07001899 storeValue(cUnit, rlDest, rlResult);
1900 } else
Ben Chengba4fc8b2009-06-01 13:00:29 -07001901 return true;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001902 return false;
1903}
1904
1905/* Compare agaist zero */
1906static bool handleFmt21t(CompilationUnit *cUnit, MIR *mir, BasicBlock *bb,
Bill Buzbee89efc3d2009-07-28 11:22:22 -07001907 ArmLIR *labelList)
Ben Chengba4fc8b2009-06-01 13:00:29 -07001908{
1909 OpCode dalvikOpCode = mir->dalvikInsn.opCode;
Bill Buzbee89efc3d2009-07-28 11:22:22 -07001910 ArmConditionCode cond;
Bill Buzbeec6f10662010-02-09 11:16:15 -08001911 RegLocation rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07001912 rlSrc = loadValue(cUnit, rlSrc, kCoreReg);
1913 opRegImm(cUnit, kOpCmp, rlSrc.lowReg, 0);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001914
Bill Buzbee270c1d62009-08-13 16:58:07 -07001915//TUNING: break this out to allow use of Thumb2 CB[N]Z
Ben Chengba4fc8b2009-06-01 13:00:29 -07001916 switch (dalvikOpCode) {
1917 case OP_IF_EQZ:
Bill Buzbee1465db52009-09-23 17:17:35 -07001918 cond = kArmCondEq;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001919 break;
1920 case OP_IF_NEZ:
Bill Buzbee1465db52009-09-23 17:17:35 -07001921 cond = kArmCondNe;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001922 break;
1923 case OP_IF_LTZ:
Bill Buzbee1465db52009-09-23 17:17:35 -07001924 cond = kArmCondLt;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001925 break;
1926 case OP_IF_GEZ:
Bill Buzbee1465db52009-09-23 17:17:35 -07001927 cond = kArmCondGe;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001928 break;
1929 case OP_IF_GTZ:
Bill Buzbee1465db52009-09-23 17:17:35 -07001930 cond = kArmCondGt;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001931 break;
1932 case OP_IF_LEZ:
Bill Buzbee1465db52009-09-23 17:17:35 -07001933 cond = kArmCondLe;
Ben Chengba4fc8b2009-06-01 13:00:29 -07001934 break;
1935 default:
1936 cond = 0;
1937 LOGE("Unexpected opcode (%d) for Fmt21t\n", dalvikOpCode);
Bill Buzbeefc519dc2010-03-06 23:30:57 -08001938 dvmCompilerAbort(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -07001939 }
1940 genConditionalBranch(cUnit, cond, &labelList[bb->taken->id]);
1941 /* This mostly likely will be optimized away in a later phase */
1942 genUnconditionalBranch(cUnit, &labelList[bb->fallThrough->id]);
1943 return false;
1944}
1945
Elliott Hughesb4c05972010-02-24 16:36:18 -08001946static bool isPowerOfTwo(int x)
1947{
1948 return (x & (x - 1)) == 0;
1949}
1950
1951// Returns true if no more than two bits are set in 'x'.
1952static bool isPopCountLE2(unsigned int x)
1953{
1954 x &= x - 1;
1955 return (x & (x - 1)) == 0;
1956}
1957
1958// Returns the index of the lowest set bit in 'x'.
1959static int lowestSetBit(unsigned int x) {
1960 int bit_posn = 0;
1961 while ((x & 0xf) == 0) {
1962 bit_posn += 4;
1963 x >>= 4;
Bill Buzbee78cb0e22010-02-11 14:04:53 -08001964 }
Elliott Hughesb4c05972010-02-24 16:36:18 -08001965 while ((x & 1) == 0) {
1966 bit_posn++;
1967 x >>= 1;
1968 }
1969 return bit_posn;
1970}
1971
Elliott Hughes672511b2010-04-26 17:40:13 -07001972// Returns true if it added instructions to 'cUnit' to divide 'rlSrc' by 'lit'
1973// and store the result in 'rlDest'.
Elliott Hughesc7ad9b22010-04-28 13:52:02 -07001974static bool handleEasyDivide(CompilationUnit *cUnit, OpCode dalvikOpCode,
Elliott Hughes672511b2010-04-26 17:40:13 -07001975 RegLocation rlSrc, RegLocation rlDest, int lit)
1976{
1977 if (lit < 2 || !isPowerOfTwo(lit)) {
1978 return false;
1979 }
1980 int k = lowestSetBit(lit);
1981 if (k >= 30) {
1982 // Avoid special cases.
1983 return false;
1984 }
Elliott Hughes9c457022010-04-28 16:15:38 -07001985 bool div = (dalvikOpCode == OP_DIV_INT_LIT8 || dalvikOpCode == OP_DIV_INT_LIT16);
Elliott Hughes672511b2010-04-26 17:40:13 -07001986 rlSrc = loadValue(cUnit, rlSrc, kCoreReg);
1987 RegLocation rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Elliott Hughes9c457022010-04-28 16:15:38 -07001988 if (div) {
1989 int tReg = dvmCompilerAllocTemp(cUnit);
1990 if (lit == 2) {
1991 // Division by 2 is by far the most common division by constant.
1992 opRegRegImm(cUnit, kOpLsr, tReg, rlSrc.lowReg, 32 - k);
1993 opRegRegReg(cUnit, kOpAdd, tReg, tReg, rlSrc.lowReg);
1994 opRegRegImm(cUnit, kOpAsr, rlResult.lowReg, tReg, k);
1995 } else {
1996 opRegRegImm(cUnit, kOpAsr, tReg, rlSrc.lowReg, 31);
1997 opRegRegImm(cUnit, kOpLsr, tReg, tReg, 32 - k);
1998 opRegRegReg(cUnit, kOpAdd, tReg, tReg, rlSrc.lowReg);
1999 opRegRegImm(cUnit, kOpAsr, rlResult.lowReg, tReg, k);
2000 }
Elliott Hughes672511b2010-04-26 17:40:13 -07002001 } else {
Elliott Hughes9c457022010-04-28 16:15:38 -07002002 int cReg = dvmCompilerAllocTemp(cUnit);
2003 loadConstant(cUnit, cReg, lit - 1);
2004 int tReg1 = dvmCompilerAllocTemp(cUnit);
2005 int tReg2 = dvmCompilerAllocTemp(cUnit);
2006 if (lit == 2) {
2007 opRegRegImm(cUnit, kOpLsr, tReg1, rlSrc.lowReg, 32 - k);
2008 opRegRegReg(cUnit, kOpAdd, tReg2, tReg1, rlSrc.lowReg);
2009 opRegRegReg(cUnit, kOpAnd, tReg2, tReg2, cReg);
2010 opRegRegReg(cUnit, kOpSub, rlResult.lowReg, tReg2, tReg1);
2011 } else {
2012 opRegRegImm(cUnit, kOpAsr, tReg1, rlSrc.lowReg, 31);
2013 opRegRegImm(cUnit, kOpLsr, tReg1, tReg1, 32 - k);
2014 opRegRegReg(cUnit, kOpAdd, tReg2, tReg1, rlSrc.lowReg);
2015 opRegRegReg(cUnit, kOpAnd, tReg2, tReg2, cReg);
2016 opRegRegReg(cUnit, kOpSub, rlResult.lowReg, tReg2, tReg1);
2017 }
Elliott Hughes672511b2010-04-26 17:40:13 -07002018 }
2019 storeValue(cUnit, rlDest, rlResult);
2020 return true;
2021}
2022
Elliott Hughesb4c05972010-02-24 16:36:18 -08002023// Returns true if it added instructions to 'cUnit' to multiply 'rlSrc' by 'lit'
2024// and store the result in 'rlDest'.
2025static bool handleEasyMultiply(CompilationUnit *cUnit,
2026 RegLocation rlSrc, RegLocation rlDest, int lit)
2027{
2028 // Can we simplify this multiplication?
2029 bool powerOfTwo = false;
2030 bool popCountLE2 = false;
2031 bool powerOfTwoMinusOne = false;
2032 if (lit < 2) {
2033 // Avoid special cases.
2034 return false;
2035 } else if (isPowerOfTwo(lit)) {
2036 powerOfTwo = true;
2037 } else if (isPopCountLE2(lit)) {
2038 popCountLE2 = true;
2039 } else if (isPowerOfTwo(lit + 1)) {
2040 powerOfTwoMinusOne = true;
2041 } else {
2042 return false;
2043 }
2044 rlSrc = loadValue(cUnit, rlSrc, kCoreReg);
2045 RegLocation rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
2046 if (powerOfTwo) {
2047 // Shift.
2048 opRegRegImm(cUnit, kOpLsl, rlResult.lowReg, rlSrc.lowReg,
2049 lowestSetBit(lit));
2050 } else if (popCountLE2) {
2051 // Shift and add and shift.
2052 int firstBit = lowestSetBit(lit);
2053 int secondBit = lowestSetBit(lit ^ (1 << firstBit));
2054 genMultiplyByTwoBitMultiplier(cUnit, rlSrc, rlResult, lit,
2055 firstBit, secondBit);
2056 } else {
2057 // Reverse subtract: (src << (shift + 1)) - src.
2058 assert(powerOfTwoMinusOne);
2059 // TODO: rsb dst, src, src lsl#lowestSetBit(lit + 1)
2060 int tReg = dvmCompilerAllocTemp(cUnit);
2061 opRegRegImm(cUnit, kOpLsl, tReg, rlSrc.lowReg, lowestSetBit(lit + 1));
2062 opRegRegReg(cUnit, kOpSub, rlResult.lowReg, tReg, rlSrc.lowReg);
2063 }
2064 storeValue(cUnit, rlDest, rlResult);
2065 return true;
Bill Buzbee78cb0e22010-02-11 14:04:53 -08002066}
2067
Ben Chengba4fc8b2009-06-01 13:00:29 -07002068static bool handleFmt22b_Fmt22s(CompilationUnit *cUnit, MIR *mir)
2069{
2070 OpCode dalvikOpCode = mir->dalvikInsn.opCode;
Bill Buzbeec6f10662010-02-09 11:16:15 -08002071 RegLocation rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
2072 RegLocation rlDest = dvmCompilerGetDest(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07002073 RegLocation rlResult;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002074 int lit = mir->dalvikInsn.vC;
Ben Cheng4f489172009-09-27 17:08:35 -07002075 OpKind op = 0; /* Make gcc happy */
Bill Buzbee1465db52009-09-23 17:17:35 -07002076 int shiftOp = false;
2077 bool isDiv = false;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002078
Ben Chengba4fc8b2009-06-01 13:00:29 -07002079 switch (dalvikOpCode) {
Bill Buzbee1465db52009-09-23 17:17:35 -07002080 case OP_RSUB_INT_LIT8:
2081 case OP_RSUB_INT: {
2082 int tReg;
2083 //TUNING: add support for use of Arm rsub op
2084 rlSrc = loadValue(cUnit, rlSrc, kCoreReg);
Bill Buzbeec6f10662010-02-09 11:16:15 -08002085 tReg = dvmCompilerAllocTemp(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07002086 loadConstant(cUnit, tReg, lit);
Bill Buzbeec6f10662010-02-09 11:16:15 -08002087 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee1465db52009-09-23 17:17:35 -07002088 opRegRegReg(cUnit, kOpSub, rlResult.lowReg,
2089 tReg, rlSrc.lowReg);
2090 storeValue(cUnit, rlDest, rlResult);
2091 return false;
2092 break;
2093 }
2094
Ben Chengba4fc8b2009-06-01 13:00:29 -07002095 case OP_ADD_INT_LIT8:
2096 case OP_ADD_INT_LIT16:
Bill Buzbee1465db52009-09-23 17:17:35 -07002097 op = kOpAdd;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002098 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002099 case OP_MUL_INT_LIT8:
Bill Buzbee78cb0e22010-02-11 14:04:53 -08002100 case OP_MUL_INT_LIT16: {
Elliott Hughesb4c05972010-02-24 16:36:18 -08002101 if (handleEasyMultiply(cUnit, rlSrc, rlDest, lit)) {
2102 return false;
Bill Buzbee78cb0e22010-02-11 14:04:53 -08002103 }
Elliott Hughesb4c05972010-02-24 16:36:18 -08002104 op = kOpMul;
Bill Buzbee1465db52009-09-23 17:17:35 -07002105 break;
Bill Buzbee78cb0e22010-02-11 14:04:53 -08002106 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07002107 case OP_AND_INT_LIT8:
2108 case OP_AND_INT_LIT16:
Bill Buzbee1465db52009-09-23 17:17:35 -07002109 op = kOpAnd;
2110 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002111 case OP_OR_INT_LIT8:
2112 case OP_OR_INT_LIT16:
Bill Buzbee1465db52009-09-23 17:17:35 -07002113 op = kOpOr;
2114 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002115 case OP_XOR_INT_LIT8:
2116 case OP_XOR_INT_LIT16:
Bill Buzbee1465db52009-09-23 17:17:35 -07002117 op = kOpXor;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002118 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002119 case OP_SHL_INT_LIT8:
Bill Buzbee0e605272009-12-01 14:28:05 -08002120 lit &= 31;
Bill Buzbee1465db52009-09-23 17:17:35 -07002121 shiftOp = true;
2122 op = kOpLsl;
2123 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002124 case OP_SHR_INT_LIT8:
Bill Buzbee0e605272009-12-01 14:28:05 -08002125 lit &= 31;
Bill Buzbee1465db52009-09-23 17:17:35 -07002126 shiftOp = true;
2127 op = kOpAsr;
2128 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002129 case OP_USHR_INT_LIT8:
Bill Buzbee0e605272009-12-01 14:28:05 -08002130 lit &= 31;
Bill Buzbee1465db52009-09-23 17:17:35 -07002131 shiftOp = true;
2132 op = kOpLsr;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002133 break;
2134
2135 case OP_DIV_INT_LIT8:
2136 case OP_DIV_INT_LIT16:
Ben Chengba4fc8b2009-06-01 13:00:29 -07002137 case OP_REM_INT_LIT8:
2138 case OP_REM_INT_LIT16:
2139 if (lit == 0) {
2140 /* Let the interpreter deal with div by 0 */
2141 genInterpSingleStep(cUnit, mir);
2142 return false;
2143 }
Elliott Hughesc7ad9b22010-04-28 13:52:02 -07002144 if (handleEasyDivide(cUnit, dalvikOpCode, rlSrc, rlDest, lit)) {
Elliott Hughes672511b2010-04-26 17:40:13 -07002145 return false;
2146 }
Bill Buzbeec6f10662010-02-09 11:16:15 -08002147 dvmCompilerFlushAllRegs(cUnit); /* Everything to home location */
Bill Buzbee1465db52009-09-23 17:17:35 -07002148 loadValueDirectFixed(cUnit, rlSrc, r0);
Bill Buzbeec6f10662010-02-09 11:16:15 -08002149 dvmCompilerClobber(cUnit, r0);
Bill Buzbee1465db52009-09-23 17:17:35 -07002150 if ((dalvikOpCode == OP_DIV_INT_LIT8) ||
2151 (dalvikOpCode == OP_DIV_INT_LIT16)) {
Ben Chengbd1326d2010-04-02 15:04:53 -07002152 LOAD_FUNC_ADDR(cUnit, r2, (int)__aeabi_idiv);
Bill Buzbee1465db52009-09-23 17:17:35 -07002153 isDiv = true;
2154 } else {
Ben Chengbd1326d2010-04-02 15:04:53 -07002155 LOAD_FUNC_ADDR(cUnit, r2, (int)__aeabi_idivmod);
Bill Buzbee1465db52009-09-23 17:17:35 -07002156 isDiv = false;
2157 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07002158 loadConstant(cUnit, r1, lit);
Bill Buzbee1465db52009-09-23 17:17:35 -07002159 opReg(cUnit, kOpBlx, r2);
Elliott Hughes6a555132010-02-25 15:41:42 -08002160 dvmCompilerClobberCallRegs(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07002161 if (isDiv)
Bill Buzbeec6f10662010-02-09 11:16:15 -08002162 rlResult = dvmCompilerGetReturn(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07002163 else
Bill Buzbeec6f10662010-02-09 11:16:15 -08002164 rlResult = dvmCompilerGetReturnAlt(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07002165 storeValue(cUnit, rlDest, rlResult);
2166 return false;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002167 break;
2168 default:
2169 return true;
2170 }
Bill Buzbee1465db52009-09-23 17:17:35 -07002171 rlSrc = loadValue(cUnit, rlSrc, kCoreReg);
Bill Buzbeec6f10662010-02-09 11:16:15 -08002172 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Bill Buzbee1465db52009-09-23 17:17:35 -07002173 // Avoid shifts by literal 0 - no support in Thumb. Change to copy
2174 if (shiftOp && (lit == 0)) {
2175 genRegCopy(cUnit, rlResult.lowReg, rlSrc.lowReg);
2176 } else {
2177 opRegRegImm(cUnit, op, rlResult.lowReg, rlSrc.lowReg, lit);
2178 }
2179 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002180 return false;
2181}
2182
2183static bool handleFmt22c(CompilationUnit *cUnit, MIR *mir)
2184{
2185 OpCode dalvikOpCode = mir->dalvikInsn.opCode;
buzbee4d92e682010-07-29 15:24:14 -07002186 int fieldOffset = -1;
buzbeeecf8f6e2010-07-20 14:53:42 -07002187 bool isVolatile = false;
buzbee4d92e682010-07-29 15:24:14 -07002188 switch (dalvikOpCode) {
2189 /*
2190 * Wide volatiles currently handled via single step.
2191 * Add them here if generating in-line code.
2192 * case OP_IGET_WIDE_VOLATILE:
2193 * case OP_IPUT_WIDE_VOLATILE:
2194 */
2195 case OP_IGET:
2196 case OP_IGET_VOLATILE:
2197 case OP_IGET_WIDE:
2198 case OP_IGET_OBJECT:
2199 case OP_IGET_OBJECT_VOLATILE:
2200 case OP_IGET_BOOLEAN:
2201 case OP_IGET_BYTE:
2202 case OP_IGET_CHAR:
2203 case OP_IGET_SHORT:
2204 case OP_IPUT:
2205 case OP_IPUT_VOLATILE:
2206 case OP_IPUT_WIDE:
2207 case OP_IPUT_OBJECT:
2208 case OP_IPUT_OBJECT_VOLATILE:
2209 case OP_IPUT_BOOLEAN:
2210 case OP_IPUT_BYTE:
2211 case OP_IPUT_CHAR:
2212 case OP_IPUT_SHORT: {
Ben Cheng7a2697d2010-06-07 13:44:23 -07002213 const Method *method = (mir->OptimizationFlags & MIR_CALLEE) ?
2214 mir->meta.calleeMethod : cUnit->method;
buzbee4d92e682010-07-29 15:24:14 -07002215 Field *fieldPtr =
Ben Cheng7a2697d2010-06-07 13:44:23 -07002216 method->clazz->pDvmDex->pResFields[mir->dalvikInsn.vC];
Ben Chengba4fc8b2009-06-01 13:00:29 -07002217
buzbee4d92e682010-07-29 15:24:14 -07002218 if (fieldPtr == NULL) {
2219 LOGE("Unexpected null instance field");
2220 dvmAbort();
2221 }
2222 isVolatile = dvmIsVolatileField(fieldPtr);
2223 fieldOffset = ((InstField *)fieldPtr)->byteOffset;
2224 break;
Ben Chengdd6e8702010-05-07 13:05:47 -07002225 }
buzbee4d92e682010-07-29 15:24:14 -07002226 default:
2227 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002228 }
buzbee4d92e682010-07-29 15:24:14 -07002229
Ben Chengba4fc8b2009-06-01 13:00:29 -07002230 switch (dalvikOpCode) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07002231 case OP_NEW_ARRAY: {
Bill Buzbee1465db52009-09-23 17:17:35 -07002232 // Generates a call - use explicit registers
Bill Buzbeec6f10662010-02-09 11:16:15 -08002233 RegLocation rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
2234 RegLocation rlDest = dvmCompilerGetDest(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07002235 RegLocation rlResult;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002236 void *classPtr = (void*)
2237 (cUnit->method->clazz->pDvmDex->pResClasses[mir->dalvikInsn.vC]);
Ben Chengdd6e8702010-05-07 13:05:47 -07002238
2239 if (classPtr == NULL) {
2240 LOGE("Unexpected null class");
2241 dvmAbort();
2242 }
2243
Bill Buzbeec6f10662010-02-09 11:16:15 -08002244 dvmCompilerFlushAllRegs(cUnit); /* Everything to home location */
Bill Buzbee1465db52009-09-23 17:17:35 -07002245 genExportPC(cUnit, mir);
2246 loadValueDirectFixed(cUnit, rlSrc, r1); /* Len */
Ben Chengba4fc8b2009-06-01 13:00:29 -07002247 loadConstant(cUnit, r0, (int) classPtr );
Ben Chengbd1326d2010-04-02 15:04:53 -07002248 LOAD_FUNC_ADDR(cUnit, r3, (int)dvmAllocArrayByClass);
Ben Cheng4f489172009-09-27 17:08:35 -07002249 /*
2250 * "len < 0": bail to the interpreter to re-execute the
2251 * instruction
2252 */
Carl Shapiroe3c01da2010-05-20 22:54:18 -07002253 genRegImmCheck(cUnit, kArmCondMi, r1, 0, mir->offset, NULL);
Bill Buzbee270c1d62009-08-13 16:58:07 -07002254 loadConstant(cUnit, r2, ALLOC_DONT_TRACK);
Bill Buzbee1465db52009-09-23 17:17:35 -07002255 opReg(cUnit, kOpBlx, r3);
Elliott Hughes6a555132010-02-25 15:41:42 -08002256 dvmCompilerClobberCallRegs(cUnit);
Ben Cheng4f489172009-09-27 17:08:35 -07002257 /* generate a branch over if allocation is successful */
Bill Buzbee1465db52009-09-23 17:17:35 -07002258 opRegImm(cUnit, kOpCmp, r0, 0); /* NULL? */
2259 ArmLIR *branchOver = opCondBranch(cUnit, kArmCondNe);
Ben Cheng4f489172009-09-27 17:08:35 -07002260 /*
2261 * OOM exception needs to be thrown here and cannot re-execute
2262 */
2263 loadConstant(cUnit, r0,
2264 (int) (cUnit->method->insns + mir->offset));
2265 genDispatchToHandler(cUnit, TEMPLATE_THROW_EXCEPTION_COMMON);
2266 /* noreturn */
2267
Bill Buzbee1465db52009-09-23 17:17:35 -07002268 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
Ben Cheng4f489172009-09-27 17:08:35 -07002269 target->defMask = ENCODE_ALL;
2270 branchOver->generic.target = (LIR *) target;
Bill Buzbeec6f10662010-02-09 11:16:15 -08002271 rlResult = dvmCompilerGetReturn(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07002272 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002273 break;
2274 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07002275 case OP_INSTANCE_OF: {
Bill Buzbee1465db52009-09-23 17:17:35 -07002276 // May generate a call - use explicit registers
Bill Buzbeec6f10662010-02-09 11:16:15 -08002277 RegLocation rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
2278 RegLocation rlDest = dvmCompilerGetDest(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07002279 RegLocation rlResult;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002280 ClassObject *classPtr =
2281 (cUnit->method->clazz->pDvmDex->pResClasses[mir->dalvikInsn.vC]);
Bill Buzbee480e6782010-01-27 15:43:08 -08002282 /*
2283 * Note: It is possible that classPtr is NULL at this point,
2284 * even though this instruction has been successfully interpreted.
2285 * If the previous interpretation had a null source, the
2286 * interpreter would not have bothered to resolve the clazz.
2287 * Bail out to the interpreter in this case, and log it
2288 * so that we can tell if it happens frequently.
2289 */
2290 if (classPtr == NULL) {
2291 LOGD("null clazz in OP_INSTANCE_OF, single-stepping");
2292 genInterpSingleStep(cUnit, mir);
2293 break;
2294 }
Bill Buzbeec6f10662010-02-09 11:16:15 -08002295 dvmCompilerFlushAllRegs(cUnit); /* Everything to home location */
Bill Buzbee1465db52009-09-23 17:17:35 -07002296 loadValueDirectFixed(cUnit, rlSrc, r0); /* Ref */
Ben Chengba4fc8b2009-06-01 13:00:29 -07002297 loadConstant(cUnit, r2, (int) classPtr );
Bill Buzbee270c1d62009-08-13 16:58:07 -07002298//TUNING: compare to 0 primative to allow use of CB[N]Z
Bill Buzbee1465db52009-09-23 17:17:35 -07002299 opRegImm(cUnit, kOpCmp, r0, 0); /* NULL? */
Ben Cheng752c7942009-06-22 10:50:07 -07002300 /* When taken r0 has NULL which can be used for store directly */
Bill Buzbee1465db52009-09-23 17:17:35 -07002301 ArmLIR *branch1 = opCondBranch(cUnit, kArmCondEq);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002302 /* r1 now contains object->clazz */
Bill Buzbee270c1d62009-08-13 16:58:07 -07002303 loadWordDisp(cUnit, r0, offsetof(Object, clazz), r1);
Bill Buzbee1465db52009-09-23 17:17:35 -07002304 /* r1 now contains object->clazz */
Ben Chengbd1326d2010-04-02 15:04:53 -07002305 LOAD_FUNC_ADDR(cUnit, r3, (int)dvmInstanceofNonTrivial);
Ben Cheng752c7942009-06-22 10:50:07 -07002306 loadConstant(cUnit, r0, 1); /* Assume true */
Bill Buzbee1465db52009-09-23 17:17:35 -07002307 opRegReg(cUnit, kOpCmp, r1, r2);
2308 ArmLIR *branch2 = opCondBranch(cUnit, kArmCondEq);
2309 genRegCopy(cUnit, r0, r1);
2310 genRegCopy(cUnit, r1, r2);
2311 opReg(cUnit, kOpBlx, r3);
Elliott Hughes6a555132010-02-25 15:41:42 -08002312 dvmCompilerClobberCallRegs(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002313 /* branch target here */
Bill Buzbee1465db52009-09-23 17:17:35 -07002314 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
Ben Chengd7d426a2009-09-22 11:23:36 -07002315 target->defMask = ENCODE_ALL;
Bill Buzbeec6f10662010-02-09 11:16:15 -08002316 rlResult = dvmCompilerGetReturn(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07002317 storeValue(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002318 branch1->generic.target = (LIR *)target;
2319 branch2->generic.target = (LIR *)target;
2320 break;
2321 }
2322 case OP_IGET_WIDE:
2323 genIGetWide(cUnit, mir, fieldOffset);
2324 break;
buzbeeecf8f6e2010-07-20 14:53:42 -07002325 case OP_IGET_VOLATILE:
2326 case OP_IGET_OBJECT_VOLATILE:
2327 isVolatile = true;
2328 // NOTE: intentional fallthrough
Ben Chengba4fc8b2009-06-01 13:00:29 -07002329 case OP_IGET:
2330 case OP_IGET_OBJECT:
buzbeeecf8f6e2010-07-20 14:53:42 -07002331 genIGet(cUnit, mir, kWord, fieldOffset, isVolatile);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002332 break;
2333 case OP_IGET_BOOLEAN:
buzbeeecf8f6e2010-07-20 14:53:42 -07002334 genIGet(cUnit, mir, kUnsignedByte, fieldOffset, isVolatile);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002335 break;
2336 case OP_IGET_BYTE:
buzbeeecf8f6e2010-07-20 14:53:42 -07002337 genIGet(cUnit, mir, kSignedByte, fieldOffset, isVolatile);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002338 break;
2339 case OP_IGET_CHAR:
buzbeeecf8f6e2010-07-20 14:53:42 -07002340 genIGet(cUnit, mir, kUnsignedHalf, fieldOffset, isVolatile);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002341 break;
2342 case OP_IGET_SHORT:
buzbeeecf8f6e2010-07-20 14:53:42 -07002343 genIGet(cUnit, mir, kSignedHalf, fieldOffset, isVolatile);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002344 break;
2345 case OP_IPUT_WIDE:
2346 genIPutWide(cUnit, mir, fieldOffset);
2347 break;
2348 case OP_IPUT:
buzbeeecf8f6e2010-07-20 14:53:42 -07002349 genIPut(cUnit, mir, kWord, fieldOffset, false, isVolatile);
buzbee919eb062010-07-12 12:59:22 -07002350 break;
buzbee4d92e682010-07-29 15:24:14 -07002351 case OP_IPUT_VOLATILE:
buzbeeecf8f6e2010-07-20 14:53:42 -07002352 case OP_IPUT_OBJECT_VOLATILE:
2353 isVolatile = true;
2354 // NOTE: intentional fallthrough
Ben Chengba4fc8b2009-06-01 13:00:29 -07002355 case OP_IPUT_OBJECT:
buzbeeecf8f6e2010-07-20 14:53:42 -07002356 genIPut(cUnit, mir, kWord, fieldOffset, true, isVolatile);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002357 break;
2358 case OP_IPUT_SHORT:
2359 case OP_IPUT_CHAR:
buzbeeecf8f6e2010-07-20 14:53:42 -07002360 genIPut(cUnit, mir, kUnsignedHalf, fieldOffset, false, isVolatile);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002361 break;
2362 case OP_IPUT_BYTE:
buzbeeecf8f6e2010-07-20 14:53:42 -07002363 genIPut(cUnit, mir, kSignedByte, fieldOffset, false, isVolatile);
2364 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002365 case OP_IPUT_BOOLEAN:
buzbeeecf8f6e2010-07-20 14:53:42 -07002366 genIPut(cUnit, mir, kUnsignedByte, fieldOffset, false, isVolatile);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002367 break;
Bill Buzbeeb16344a2010-03-15 17:19:12 -07002368 case OP_IGET_WIDE_VOLATILE:
2369 case OP_IPUT_WIDE_VOLATILE:
Bill Buzbeeb16344a2010-03-15 17:19:12 -07002370 genInterpSingleStep(cUnit, mir);
2371 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002372 default:
2373 return true;
2374 }
2375 return false;
2376}
2377
2378static bool handleFmt22cs(CompilationUnit *cUnit, MIR *mir)
2379{
2380 OpCode dalvikOpCode = mir->dalvikInsn.opCode;
2381 int fieldOffset = mir->dalvikInsn.vC;
2382 switch (dalvikOpCode) {
2383 case OP_IGET_QUICK:
2384 case OP_IGET_OBJECT_QUICK:
buzbeeecf8f6e2010-07-20 14:53:42 -07002385 genIGet(cUnit, mir, kWord, fieldOffset, false);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002386 break;
2387 case OP_IPUT_QUICK:
buzbeeecf8f6e2010-07-20 14:53:42 -07002388 genIPut(cUnit, mir, kWord, fieldOffset, false, false);
buzbee919eb062010-07-12 12:59:22 -07002389 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002390 case OP_IPUT_OBJECT_QUICK:
buzbeeecf8f6e2010-07-20 14:53:42 -07002391 genIPut(cUnit, mir, kWord, fieldOffset, true, false);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002392 break;
2393 case OP_IGET_WIDE_QUICK:
2394 genIGetWide(cUnit, mir, fieldOffset);
2395 break;
2396 case OP_IPUT_WIDE_QUICK:
2397 genIPutWide(cUnit, mir, fieldOffset);
2398 break;
2399 default:
2400 return true;
2401 }
2402 return false;
2403
2404}
2405
2406/* Compare agaist zero */
2407static bool handleFmt22t(CompilationUnit *cUnit, MIR *mir, BasicBlock *bb,
Bill Buzbee89efc3d2009-07-28 11:22:22 -07002408 ArmLIR *labelList)
Ben Chengba4fc8b2009-06-01 13:00:29 -07002409{
2410 OpCode dalvikOpCode = mir->dalvikInsn.opCode;
Bill Buzbee89efc3d2009-07-28 11:22:22 -07002411 ArmConditionCode cond;
Bill Buzbeec6f10662010-02-09 11:16:15 -08002412 RegLocation rlSrc1 = dvmCompilerGetSrc(cUnit, mir, 0);
2413 RegLocation rlSrc2 = dvmCompilerGetSrc(cUnit, mir, 1);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002414
Bill Buzbee1465db52009-09-23 17:17:35 -07002415 rlSrc1 = loadValue(cUnit, rlSrc1, kCoreReg);
2416 rlSrc2 = loadValue(cUnit, rlSrc2, kCoreReg);
2417 opRegReg(cUnit, kOpCmp, rlSrc1.lowReg, rlSrc2.lowReg);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002418
2419 switch (dalvikOpCode) {
2420 case OP_IF_EQ:
Bill Buzbee1465db52009-09-23 17:17:35 -07002421 cond = kArmCondEq;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002422 break;
2423 case OP_IF_NE:
Bill Buzbee1465db52009-09-23 17:17:35 -07002424 cond = kArmCondNe;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002425 break;
2426 case OP_IF_LT:
Bill Buzbee1465db52009-09-23 17:17:35 -07002427 cond = kArmCondLt;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002428 break;
2429 case OP_IF_GE:
Bill Buzbee1465db52009-09-23 17:17:35 -07002430 cond = kArmCondGe;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002431 break;
2432 case OP_IF_GT:
Bill Buzbee1465db52009-09-23 17:17:35 -07002433 cond = kArmCondGt;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002434 break;
2435 case OP_IF_LE:
Bill Buzbee1465db52009-09-23 17:17:35 -07002436 cond = kArmCondLe;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002437 break;
2438 default:
2439 cond = 0;
2440 LOGE("Unexpected opcode (%d) for Fmt22t\n", dalvikOpCode);
Bill Buzbeefc519dc2010-03-06 23:30:57 -08002441 dvmCompilerAbort(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002442 }
2443 genConditionalBranch(cUnit, cond, &labelList[bb->taken->id]);
2444 /* This mostly likely will be optimized away in a later phase */
2445 genUnconditionalBranch(cUnit, &labelList[bb->fallThrough->id]);
2446 return false;
2447}
2448
2449static bool handleFmt22x_Fmt32x(CompilationUnit *cUnit, MIR *mir)
2450{
2451 OpCode opCode = mir->dalvikInsn.opCode;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002452
2453 switch (opCode) {
2454 case OP_MOVE_16:
2455 case OP_MOVE_OBJECT_16:
2456 case OP_MOVE_FROM16:
Ben Chenge9695e52009-06-16 16:11:47 -07002457 case OP_MOVE_OBJECT_FROM16: {
Bill Buzbeec6f10662010-02-09 11:16:15 -08002458 storeValue(cUnit, dvmCompilerGetDest(cUnit, mir, 0),
2459 dvmCompilerGetSrc(cUnit, mir, 0));
Ben Chengba4fc8b2009-06-01 13:00:29 -07002460 break;
Ben Chenge9695e52009-06-16 16:11:47 -07002461 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07002462 case OP_MOVE_WIDE_16:
Ben Chenge9695e52009-06-16 16:11:47 -07002463 case OP_MOVE_WIDE_FROM16: {
Bill Buzbeec6f10662010-02-09 11:16:15 -08002464 storeValueWide(cUnit, dvmCompilerGetDestWide(cUnit, mir, 0, 1),
2465 dvmCompilerGetSrcWide(cUnit, mir, 0, 1));
Ben Chengba4fc8b2009-06-01 13:00:29 -07002466 break;
Ben Chenge9695e52009-06-16 16:11:47 -07002467 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07002468 default:
2469 return true;
2470 }
2471 return false;
2472}
2473
2474static bool handleFmt23x(CompilationUnit *cUnit, MIR *mir)
2475{
2476 OpCode opCode = mir->dalvikInsn.opCode;
Bill Buzbee1465db52009-09-23 17:17:35 -07002477 RegLocation rlSrc1;
2478 RegLocation rlSrc2;
2479 RegLocation rlDest;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002480
2481 if ( (opCode >= OP_ADD_INT) && (opCode <= OP_REM_DOUBLE)) {
Ben Cheng5d90c202009-11-22 23:31:11 -08002482 return genArithOp( cUnit, mir );
Ben Chengba4fc8b2009-06-01 13:00:29 -07002483 }
2484
Bill Buzbee1465db52009-09-23 17:17:35 -07002485 /* APUTs have 3 sources and no targets */
2486 if (mir->ssaRep->numDefs == 0) {
2487 if (mir->ssaRep->numUses == 3) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08002488 rlDest = dvmCompilerGetSrc(cUnit, mir, 0);
2489 rlSrc1 = dvmCompilerGetSrc(cUnit, mir, 1);
2490 rlSrc2 = dvmCompilerGetSrc(cUnit, mir, 2);
Bill Buzbee1465db52009-09-23 17:17:35 -07002491 } else {
2492 assert(mir->ssaRep->numUses == 4);
Bill Buzbeec6f10662010-02-09 11:16:15 -08002493 rlDest = dvmCompilerGetSrcWide(cUnit, mir, 0, 1);
2494 rlSrc1 = dvmCompilerGetSrc(cUnit, mir, 2);
2495 rlSrc2 = dvmCompilerGetSrc(cUnit, mir, 3);
Bill Buzbee1465db52009-09-23 17:17:35 -07002496 }
2497 } else {
2498 /* Two sources and 1 dest. Deduce the operand sizes */
2499 if (mir->ssaRep->numUses == 4) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08002500 rlSrc1 = dvmCompilerGetSrcWide(cUnit, mir, 0, 1);
2501 rlSrc2 = dvmCompilerGetSrcWide(cUnit, mir, 2, 3);
Bill Buzbee1465db52009-09-23 17:17:35 -07002502 } else {
2503 assert(mir->ssaRep->numUses == 2);
Bill Buzbeec6f10662010-02-09 11:16:15 -08002504 rlSrc1 = dvmCompilerGetSrc(cUnit, mir, 0);
2505 rlSrc2 = dvmCompilerGetSrc(cUnit, mir, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -07002506 }
2507 if (mir->ssaRep->numDefs == 2) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08002508 rlDest = dvmCompilerGetDestWide(cUnit, mir, 0, 1);
Bill Buzbee1465db52009-09-23 17:17:35 -07002509 } else {
2510 assert(mir->ssaRep->numDefs == 1);
Bill Buzbeec6f10662010-02-09 11:16:15 -08002511 rlDest = dvmCompilerGetDest(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07002512 }
2513 }
2514
2515
Ben Chengba4fc8b2009-06-01 13:00:29 -07002516 switch (opCode) {
Bill Buzbeed45ba372009-06-15 17:00:57 -07002517 case OP_CMPL_FLOAT:
2518 case OP_CMPG_FLOAT:
2519 case OP_CMPL_DOUBLE:
2520 case OP_CMPG_DOUBLE:
Ben Cheng5d90c202009-11-22 23:31:11 -08002521 return genCmpFP(cUnit, mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002522 case OP_CMP_LONG:
Bill Buzbee1465db52009-09-23 17:17:35 -07002523 genCmpLong(cUnit, mir, rlDest, rlSrc1, rlSrc2);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002524 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002525 case OP_AGET_WIDE:
Bill Buzbee1465db52009-09-23 17:17:35 -07002526 genArrayGet(cUnit, mir, kLong, rlSrc1, rlSrc2, rlDest, 3);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002527 break;
2528 case OP_AGET:
2529 case OP_AGET_OBJECT:
Bill Buzbee1465db52009-09-23 17:17:35 -07002530 genArrayGet(cUnit, mir, kWord, rlSrc1, rlSrc2, rlDest, 2);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002531 break;
2532 case OP_AGET_BOOLEAN:
Bill Buzbee1465db52009-09-23 17:17:35 -07002533 genArrayGet(cUnit, mir, kUnsignedByte, rlSrc1, rlSrc2, rlDest, 0);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002534 break;
2535 case OP_AGET_BYTE:
Bill Buzbee1465db52009-09-23 17:17:35 -07002536 genArrayGet(cUnit, mir, kSignedByte, rlSrc1, rlSrc2, rlDest, 0);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002537 break;
2538 case OP_AGET_CHAR:
Bill Buzbee1465db52009-09-23 17:17:35 -07002539 genArrayGet(cUnit, mir, kUnsignedHalf, rlSrc1, rlSrc2, rlDest, 1);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002540 break;
2541 case OP_AGET_SHORT:
Bill Buzbee1465db52009-09-23 17:17:35 -07002542 genArrayGet(cUnit, mir, kSignedHalf, rlSrc1, rlSrc2, rlDest, 1);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002543 break;
2544 case OP_APUT_WIDE:
Bill Buzbee1465db52009-09-23 17:17:35 -07002545 genArrayPut(cUnit, mir, kLong, rlSrc1, rlSrc2, rlDest, 3);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002546 break;
2547 case OP_APUT:
Bill Buzbee1465db52009-09-23 17:17:35 -07002548 genArrayPut(cUnit, mir, kWord, rlSrc1, rlSrc2, rlDest, 2);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002549 break;
Bill Buzbeebe6534f2010-03-12 16:01:35 -08002550 case OP_APUT_OBJECT:
2551 genArrayObjectPut(cUnit, mir, rlSrc1, rlSrc2, rlDest, 2);
2552 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002553 case OP_APUT_SHORT:
2554 case OP_APUT_CHAR:
Bill Buzbee1465db52009-09-23 17:17:35 -07002555 genArrayPut(cUnit, mir, kUnsignedHalf, rlSrc1, rlSrc2, rlDest, 1);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002556 break;
2557 case OP_APUT_BYTE:
2558 case OP_APUT_BOOLEAN:
Bill Buzbee1465db52009-09-23 17:17:35 -07002559 genArrayPut(cUnit, mir, kUnsignedByte, rlSrc1, rlSrc2, rlDest, 0);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002560 break;
2561 default:
2562 return true;
2563 }
2564 return false;
2565}
2566
Ben Cheng6c10a972009-10-29 14:39:18 -07002567/*
2568 * Find the matching case.
2569 *
2570 * return values:
2571 * r0 (low 32-bit): pc of the chaining cell corresponding to the resolved case,
2572 * including default which is placed at MIN(size, MAX_CHAINED_SWITCH_CASES).
2573 * r1 (high 32-bit): the branch offset of the matching case (only for indexes
2574 * above MAX_CHAINED_SWITCH_CASES).
2575 *
2576 * Instructions around the call are:
2577 *
2578 * mov r2, pc
2579 * blx &findPackedSwitchIndex
2580 * mov pc, r0
2581 * .align4
Bill Buzbeebd047242010-05-13 13:02:53 -07002582 * chaining cell for case 0 [12 bytes]
2583 * chaining cell for case 1 [12 bytes]
Ben Cheng6c10a972009-10-29 14:39:18 -07002584 * :
Bill Buzbeebd047242010-05-13 13:02:53 -07002585 * chaining cell for case MIN(size, MAX_CHAINED_SWITCH_CASES)-1 [12 bytes]
Ben Cheng6c10a972009-10-29 14:39:18 -07002586 * chaining cell for case default [8 bytes]
2587 * noChain exit
2588 */
Ben Chengbd1326d2010-04-02 15:04:53 -07002589static s8 findPackedSwitchIndex(const u2* switchData, int testVal, int pc)
Ben Cheng6c10a972009-10-29 14:39:18 -07002590{
2591 int size;
2592 int firstKey;
2593 const int *entries;
2594 int index;
2595 int jumpIndex;
2596 int caseDPCOffset = 0;
2597 /* In Thumb mode pc is 4 ahead of the "mov r2, pc" instruction */
2598 int chainingPC = (pc + 4) & ~3;
2599
2600 /*
2601 * Packed switch data format:
2602 * ushort ident = 0x0100 magic value
2603 * ushort size number of entries in the table
2604 * int first_key first (and lowest) switch case value
2605 * int targets[size] branch targets, relative to switch opcode
2606 *
2607 * Total size is (4+size*2) 16-bit code units.
2608 */
2609 size = switchData[1];
2610 assert(size > 0);
2611
2612 firstKey = switchData[2];
2613 firstKey |= switchData[3] << 16;
2614
2615
2616 /* The entries are guaranteed to be aligned on a 32-bit boundary;
2617 * we can treat them as a native int array.
2618 */
2619 entries = (const int*) &switchData[4];
2620 assert(((u4)entries & 0x3) == 0);
2621
2622 index = testVal - firstKey;
2623
2624 /* Jump to the default cell */
2625 if (index < 0 || index >= size) {
2626 jumpIndex = MIN(size, MAX_CHAINED_SWITCH_CASES);
2627 /* Jump to the non-chaining exit point */
2628 } else if (index >= MAX_CHAINED_SWITCH_CASES) {
2629 jumpIndex = MAX_CHAINED_SWITCH_CASES + 1;
2630 caseDPCOffset = entries[index];
2631 /* Jump to the inline chaining cell */
2632 } else {
2633 jumpIndex = index;
2634 }
2635
Bill Buzbeebd047242010-05-13 13:02:53 -07002636 chainingPC += jumpIndex * CHAIN_CELL_NORMAL_SIZE;
Ben Cheng6c10a972009-10-29 14:39:18 -07002637 return (((s8) caseDPCOffset) << 32) | (u8) chainingPC;
2638}
2639
2640/* See comments for findPackedSwitchIndex */
Ben Chengbd1326d2010-04-02 15:04:53 -07002641static s8 findSparseSwitchIndex(const u2* switchData, int testVal, int pc)
Ben Cheng6c10a972009-10-29 14:39:18 -07002642{
2643 int size;
2644 const int *keys;
2645 const int *entries;
2646 int chainingPC = (pc + 4) & ~3;
2647 int i;
2648
2649 /*
2650 * Sparse switch data format:
2651 * ushort ident = 0x0200 magic value
2652 * ushort size number of entries in the table; > 0
2653 * int keys[size] keys, sorted low-to-high; 32-bit aligned
2654 * int targets[size] branch targets, relative to switch opcode
2655 *
2656 * Total size is (2+size*4) 16-bit code units.
2657 */
2658
2659 size = switchData[1];
2660 assert(size > 0);
2661
2662 /* The keys are guaranteed to be aligned on a 32-bit boundary;
2663 * we can treat them as a native int array.
2664 */
2665 keys = (const int*) &switchData[2];
2666 assert(((u4)keys & 0x3) == 0);
2667
2668 /* The entries are guaranteed to be aligned on a 32-bit boundary;
2669 * we can treat them as a native int array.
2670 */
2671 entries = keys + size;
2672 assert(((u4)entries & 0x3) == 0);
2673
2674 /*
2675 * Run through the list of keys, which are guaranteed to
2676 * be sorted low-to-high.
2677 *
2678 * Most tables have 3-4 entries. Few have more than 10. A binary
2679 * search here is probably not useful.
2680 */
2681 for (i = 0; i < size; i++) {
2682 int k = keys[i];
2683 if (k == testVal) {
2684 /* MAX_CHAINED_SWITCH_CASES + 1 is the start of the overflow case */
2685 int jumpIndex = (i < MAX_CHAINED_SWITCH_CASES) ?
2686 i : MAX_CHAINED_SWITCH_CASES + 1;
Bill Buzbeebd047242010-05-13 13:02:53 -07002687 chainingPC += jumpIndex * CHAIN_CELL_NORMAL_SIZE;
Ben Cheng6c10a972009-10-29 14:39:18 -07002688 return (((s8) entries[i]) << 32) | (u8) chainingPC;
2689 } else if (k > testVal) {
2690 break;
2691 }
2692 }
Bill Buzbeebd047242010-05-13 13:02:53 -07002693 return chainingPC + MIN(size, MAX_CHAINED_SWITCH_CASES) *
2694 CHAIN_CELL_NORMAL_SIZE;
Ben Cheng6c10a972009-10-29 14:39:18 -07002695}
2696
Ben Chengba4fc8b2009-06-01 13:00:29 -07002697static bool handleFmt31t(CompilationUnit *cUnit, MIR *mir)
2698{
2699 OpCode dalvikOpCode = mir->dalvikInsn.opCode;
2700 switch (dalvikOpCode) {
2701 case OP_FILL_ARRAY_DATA: {
Bill Buzbeec6f10662010-02-09 11:16:15 -08002702 RegLocation rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
Bill Buzbee1465db52009-09-23 17:17:35 -07002703 // Making a call - use explicit registers
Bill Buzbeec6f10662010-02-09 11:16:15 -08002704 dvmCompilerFlushAllRegs(cUnit); /* Everything to home location */
Bill Buzbee1465db52009-09-23 17:17:35 -07002705 genExportPC(cUnit, mir);
2706 loadValueDirectFixed(cUnit, rlSrc, r0);
Ben Chengbd1326d2010-04-02 15:04:53 -07002707 LOAD_FUNC_ADDR(cUnit, r2, (int)dvmInterpHandleFillArrayData);
Ben Cheng6c10a972009-10-29 14:39:18 -07002708 loadConstant(cUnit, r1,
2709 (int) (cUnit->method->insns + mir->offset + mir->dalvikInsn.vB));
Bill Buzbee1465db52009-09-23 17:17:35 -07002710 opReg(cUnit, kOpBlx, r2);
Elliott Hughes6a555132010-02-25 15:41:42 -08002711 dvmCompilerClobberCallRegs(cUnit);
Bill Buzbeefd023aa2009-11-02 09:23:49 -08002712 /* generate a branch over if successful */
2713 opRegImm(cUnit, kOpCmp, r0, 0); /* NULL? */
2714 ArmLIR *branchOver = opCondBranch(cUnit, kArmCondNe);
2715 loadConstant(cUnit, r0,
2716 (int) (cUnit->method->insns + mir->offset));
2717 genDispatchToHandler(cUnit, TEMPLATE_THROW_EXCEPTION_COMMON);
2718 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
2719 target->defMask = ENCODE_ALL;
2720 branchOver->generic.target = (LIR *) target;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002721 break;
2722 }
2723 /*
Ben Cheng6c10a972009-10-29 14:39:18 -07002724 * Compute the goto target of up to
2725 * MIN(switchSize, MAX_CHAINED_SWITCH_CASES) + 1 chaining cells.
2726 * See the comment before findPackedSwitchIndex for the code layout.
Ben Chengba4fc8b2009-06-01 13:00:29 -07002727 */
2728 case OP_PACKED_SWITCH:
2729 case OP_SPARSE_SWITCH: {
Bill Buzbeec6f10662010-02-09 11:16:15 -08002730 RegLocation rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
2731 dvmCompilerFlushAllRegs(cUnit); /* Everything to home location */
Bill Buzbee1465db52009-09-23 17:17:35 -07002732 loadValueDirectFixed(cUnit, rlSrc, r1);
Bill Buzbeec6f10662010-02-09 11:16:15 -08002733 dvmCompilerLockAllTemps(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002734 if (dalvikOpCode == OP_PACKED_SWITCH) {
Ben Chengbd1326d2010-04-02 15:04:53 -07002735 LOAD_FUNC_ADDR(cUnit, r4PC, (int)findPackedSwitchIndex);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002736 } else {
Ben Chengbd1326d2010-04-02 15:04:53 -07002737 LOAD_FUNC_ADDR(cUnit, r4PC, (int)findSparseSwitchIndex);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002738 }
Ben Cheng6c10a972009-10-29 14:39:18 -07002739 /* r0 <- Addr of the switch data */
2740 loadConstant(cUnit, r0,
2741 (int) (cUnit->method->insns + mir->offset + mir->dalvikInsn.vB));
2742 /* r2 <- pc of the instruction following the blx */
2743 opRegReg(cUnit, kOpMov, r2, rpc);
Bill Buzbee1465db52009-09-23 17:17:35 -07002744 opReg(cUnit, kOpBlx, r4PC);
Elliott Hughes6a555132010-02-25 15:41:42 -08002745 dvmCompilerClobberCallRegs(cUnit);
Ben Cheng6c10a972009-10-29 14:39:18 -07002746 /* pc <- computed goto target */
2747 opRegReg(cUnit, kOpMov, rpc, r0);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002748 break;
2749 }
2750 default:
2751 return true;
2752 }
2753 return false;
2754}
2755
Ben Cheng7a2697d2010-06-07 13:44:23 -07002756/*
2757 * See the example of predicted inlining listed before the
2758 * genValidationForPredictedInline function. The function here takes care the
2759 * branch over at 0x4858de78 and the misprediction target at 0x4858de7a.
2760 */
2761static void genLandingPadForMispredictedCallee(CompilationUnit *cUnit, MIR *mir,
2762 BasicBlock *bb,
2763 ArmLIR *labelList)
2764{
2765 BasicBlock *fallThrough = bb->fallThrough;
2766
2767 /* Bypass the move-result block if there is one */
2768 if (fallThrough->firstMIRInsn) {
2769 assert(fallThrough->firstMIRInsn->OptimizationFlags & MIR_INLINED_PRED);
2770 fallThrough = fallThrough->fallThrough;
2771 }
2772 /* Generate a branch over if the predicted inlining is correct */
2773 genUnconditionalBranch(cUnit, &labelList[fallThrough->id]);
2774
2775 /* Reset the register state */
2776 dvmCompilerResetRegPool(cUnit);
2777 dvmCompilerClobberAllRegs(cUnit);
2778 dvmCompilerResetNullCheck(cUnit);
2779
2780 /* Target for the slow invoke path */
2781 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
2782 target->defMask = ENCODE_ALL;
2783 /* Hook up the target to the verification branch */
2784 mir->meta.callsiteInfo->misPredBranchOver->target = (LIR *) target;
2785}
2786
Ben Chengba4fc8b2009-06-01 13:00:29 -07002787static bool handleFmt35c_3rc(CompilationUnit *cUnit, MIR *mir, BasicBlock *bb,
Bill Buzbee89efc3d2009-07-28 11:22:22 -07002788 ArmLIR *labelList)
Ben Chengba4fc8b2009-06-01 13:00:29 -07002789{
Bill Buzbee9bc3df32009-07-30 10:52:29 -07002790 ArmLIR *retChainingCell = NULL;
Bill Buzbee89efc3d2009-07-28 11:22:22 -07002791 ArmLIR *pcrLabel = NULL;
Ben Chengba4fc8b2009-06-01 13:00:29 -07002792
Ben Cheng7a2697d2010-06-07 13:44:23 -07002793 /* An invoke with the MIR_INLINED is effectively a no-op */
2794 if (mir->OptimizationFlags & MIR_INLINED)
2795 return false;
2796
Bill Buzbeef4ce16f2009-07-28 13:28:25 -07002797 if (bb->fallThrough != NULL)
2798 retChainingCell = &labelList[bb->fallThrough->id];
2799
Ben Chengba4fc8b2009-06-01 13:00:29 -07002800 DecodedInstruction *dInsn = &mir->dalvikInsn;
2801 switch (mir->dalvikInsn.opCode) {
2802 /*
2803 * calleeMethod = this->clazz->vtable[
2804 * method->clazz->pDvmDex->pResMethods[BBBB]->methodIndex
2805 * ]
2806 */
2807 case OP_INVOKE_VIRTUAL:
2808 case OP_INVOKE_VIRTUAL_RANGE: {
Bill Buzbee89efc3d2009-07-28 11:22:22 -07002809 ArmLIR *predChainingCell = &labelList[bb->taken->id];
Ben Chengba4fc8b2009-06-01 13:00:29 -07002810 int methodIndex =
2811 cUnit->method->clazz->pDvmDex->pResMethods[dInsn->vB]->
2812 methodIndex;
2813
Ben Cheng7a2697d2010-06-07 13:44:23 -07002814 /*
2815 * If the invoke has non-null misPredBranchOver, we need to generate
2816 * the non-inlined version of the invoke here to handle the
2817 * mispredicted case.
2818 */
2819 if (mir->meta.callsiteInfo->misPredBranchOver) {
2820 genLandingPadForMispredictedCallee(cUnit, mir, bb, labelList);
2821 }
2822
Ben Chengba4fc8b2009-06-01 13:00:29 -07002823 if (mir->dalvikInsn.opCode == OP_INVOKE_VIRTUAL)
2824 genProcessArgsNoRange(cUnit, mir, dInsn, &pcrLabel);
2825 else
2826 genProcessArgsRange(cUnit, mir, dInsn, &pcrLabel);
2827
Ben Cheng38329f52009-07-07 14:19:20 -07002828 genInvokeVirtualCommon(cUnit, mir, methodIndex,
2829 retChainingCell,
2830 predChainingCell,
2831 pcrLabel);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002832 break;
2833 }
2834 /*
2835 * calleeMethod = method->clazz->super->vtable[method->clazz->pDvmDex
2836 * ->pResMethods[BBBB]->methodIndex]
2837 */
Ben Chengba4fc8b2009-06-01 13:00:29 -07002838 case OP_INVOKE_SUPER:
2839 case OP_INVOKE_SUPER_RANGE: {
Ben Cheng7a2697d2010-06-07 13:44:23 -07002840 /* Grab the method ptr directly from what the interpreter sees */
2841 const Method *calleeMethod = mir->meta.callsiteInfo->method;
2842 assert(calleeMethod == cUnit->method->clazz->super->vtable[
2843 cUnit->method->clazz->pDvmDex->
2844 pResMethods[dInsn->vB]->methodIndex]);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002845
2846 if (mir->dalvikInsn.opCode == OP_INVOKE_SUPER)
2847 genProcessArgsNoRange(cUnit, mir, dInsn, &pcrLabel);
2848 else
2849 genProcessArgsRange(cUnit, mir, dInsn, &pcrLabel);
2850
2851 /* r0 = calleeMethod */
2852 loadConstant(cUnit, r0, (int) calleeMethod);
2853
Ben Cheng38329f52009-07-07 14:19:20 -07002854 genInvokeSingletonCommon(cUnit, mir, bb, labelList, pcrLabel,
2855 calleeMethod);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002856 break;
2857 }
2858 /* calleeMethod = method->clazz->pDvmDex->pResMethods[BBBB] */
2859 case OP_INVOKE_DIRECT:
2860 case OP_INVOKE_DIRECT_RANGE: {
Ben Cheng7a2697d2010-06-07 13:44:23 -07002861 /* Grab the method ptr directly from what the interpreter sees */
2862 const Method *calleeMethod = mir->meta.callsiteInfo->method;
2863 assert(calleeMethod ==
2864 cUnit->method->clazz->pDvmDex->pResMethods[dInsn->vB]);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002865
2866 if (mir->dalvikInsn.opCode == OP_INVOKE_DIRECT)
2867 genProcessArgsNoRange(cUnit, mir, dInsn, &pcrLabel);
2868 else
2869 genProcessArgsRange(cUnit, mir, dInsn, &pcrLabel);
2870
2871 /* r0 = calleeMethod */
2872 loadConstant(cUnit, r0, (int) calleeMethod);
2873
Ben Cheng38329f52009-07-07 14:19:20 -07002874 genInvokeSingletonCommon(cUnit, mir, bb, labelList, pcrLabel,
2875 calleeMethod);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002876 break;
2877 }
2878 /* calleeMethod = method->clazz->pDvmDex->pResMethods[BBBB] */
2879 case OP_INVOKE_STATIC:
2880 case OP_INVOKE_STATIC_RANGE: {
Ben Cheng7a2697d2010-06-07 13:44:23 -07002881 /* Grab the method ptr directly from what the interpreter sees */
2882 const Method *calleeMethod = mir->meta.callsiteInfo->method;
2883 assert(calleeMethod ==
2884 cUnit->method->clazz->pDvmDex->pResMethods[dInsn->vB]);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002885
2886 if (mir->dalvikInsn.opCode == OP_INVOKE_STATIC)
2887 genProcessArgsNoRange(cUnit, mir, dInsn,
2888 NULL /* no null check */);
2889 else
2890 genProcessArgsRange(cUnit, mir, dInsn,
2891 NULL /* no null check */);
2892
2893 /* r0 = calleeMethod */
2894 loadConstant(cUnit, r0, (int) calleeMethod);
2895
Ben Cheng38329f52009-07-07 14:19:20 -07002896 genInvokeSingletonCommon(cUnit, mir, bb, labelList, pcrLabel,
2897 calleeMethod);
Ben Chengba4fc8b2009-06-01 13:00:29 -07002898 break;
2899 }
Ben Cheng09e50c92010-05-02 10:45:32 -07002900 /*
Ben Chengba4fc8b2009-06-01 13:00:29 -07002901 * calleeMethod = dvmFindInterfaceMethodInCache(this->clazz,
2902 * BBBB, method, method->clazz->pDvmDex)
Ben Cheng38329f52009-07-07 14:19:20 -07002903 *
Ben Cheng09e50c92010-05-02 10:45:32 -07002904 * The following is an example of generated code for
2905 * "invoke-interface v0"
Ben Cheng38329f52009-07-07 14:19:20 -07002906 *
Ben Cheng09e50c92010-05-02 10:45:32 -07002907 * -------- dalvik offset: 0x0008 @ invoke-interface v0
2908 * 0x47357e36 : ldr r0, [r5, #0] --+
2909 * 0x47357e38 : sub r7,r5,#24 |
2910 * 0x47357e3c : cmp r0, #0 | genProcessArgsNoRange
2911 * 0x47357e3e : beq 0x47357e82 |
2912 * 0x47357e40 : stmia r7, <r0> --+
2913 * 0x47357e42 : ldr r4, [pc, #120] --> r4 <- dalvikPC of this invoke
2914 * 0x47357e44 : add r1, pc, #64 --> r1 <- &retChainingCell
2915 * 0x47357e46 : add r2, pc, #72 --> r2 <- &predictedChainingCell
2916 * 0x47357e48 : blx_1 0x47348190 --+ TEMPLATE_INVOKE_METHOD_
2917 * 0x47357e4a : blx_2 see above --+ PREDICTED_CHAIN
2918 * 0x47357e4c : b 0x47357e90 --> off to the predicted chain
2919 * 0x47357e4e : b 0x47357e82 --> punt to the interpreter
2920 * 0x47357e50 : mov r8, r1 --+
2921 * 0x47357e52 : mov r9, r2 |
2922 * 0x47357e54 : ldr r2, [pc, #96] |
2923 * 0x47357e56 : mov r10, r3 |
2924 * 0x47357e58 : movs r0, r3 | dvmFindInterfaceMethodInCache
2925 * 0x47357e5a : ldr r3, [pc, #88] |
2926 * 0x47357e5c : ldr r7, [pc, #80] |
2927 * 0x47357e5e : mov r1, #1452 |
2928 * 0x47357e62 : blx r7 --+
2929 * 0x47357e64 : cmp r0, #0 --> calleeMethod == NULL?
2930 * 0x47357e66 : bne 0x47357e6e --> branch over the throw if !r0
2931 * 0x47357e68 : ldr r0, [pc, #80] --> load Dalvik PC of the invoke
2932 * 0x47357e6a : blx_1 0x47348494 --+ TEMPLATE_THROW_EXCEPTION_
2933 * 0x47357e6c : blx_2 see above --+ COMMON
2934 * 0x47357e6e : mov r1, r8 --> r1 <- &retChainingCell
2935 * 0x47357e70 : cmp r1, #0 --> compare against 0
2936 * 0x47357e72 : bgt 0x47357e7c --> >=0? don't rechain
2937 * 0x47357e74 : ldr r7, [r6, #108] --+
2938 * 0x47357e76 : mov r2, r9 | dvmJitToPatchPredictedChain
2939 * 0x47357e78 : mov r3, r10 |
2940 * 0x47357e7a : blx r7 --+
2941 * 0x47357e7c : add r1, pc, #8 --> r1 <- &retChainingCell
2942 * 0x47357e7e : blx_1 0x4734809c --+ TEMPLATE_INVOKE_METHOD_NO_OPT
2943 * 0x47357e80 : blx_2 see above --+
2944 * -------- reconstruct dalvik PC : 0x425719dc @ +0x0008
2945 * 0x47357e82 : ldr r0, [pc, #56]
Ben Cheng38329f52009-07-07 14:19:20 -07002946 * Exception_Handling:
Ben Cheng09e50c92010-05-02 10:45:32 -07002947 * 0x47357e84 : ldr r1, [r6, #92]
2948 * 0x47357e86 : blx r1
2949 * 0x47357e88 : .align4
2950 * -------- chaining cell (hot): 0x000b
2951 * 0x47357e88 : ldr r0, [r6, #104]
2952 * 0x47357e8a : blx r0
2953 * 0x47357e8c : data 0x19e2(6626)
2954 * 0x47357e8e : data 0x4257(16983)
2955 * 0x47357e90 : .align4
Ben Cheng38329f52009-07-07 14:19:20 -07002956 * -------- chaining cell (predicted)
Ben Cheng09e50c92010-05-02 10:45:32 -07002957 * 0x47357e90 : data 0xe7fe(59390) --> will be patched into bx
2958 * 0x47357e92 : data 0x0000(0)
2959 * 0x47357e94 : data 0x0000(0) --> class
2960 * 0x47357e96 : data 0x0000(0)
2961 * 0x47357e98 : data 0x0000(0) --> method
2962 * 0x47357e9a : data 0x0000(0)
2963 * 0x47357e9c : data 0x0000(0) --> rechain count
2964 * 0x47357e9e : data 0x0000(0)
2965 * -------- end of chaining cells (0x006c)
2966 * 0x47357eb0 : .word (0xad03e369)
2967 * 0x47357eb4 : .word (0x28a90)
2968 * 0x47357eb8 : .word (0x41a63394)
2969 * 0x47357ebc : .word (0x425719dc)
Ben Chengba4fc8b2009-06-01 13:00:29 -07002970 */
2971 case OP_INVOKE_INTERFACE:
2972 case OP_INVOKE_INTERFACE_RANGE: {
Bill Buzbee89efc3d2009-07-28 11:22:22 -07002973 ArmLIR *predChainingCell = &labelList[bb->taken->id];
Ben Chengba4fc8b2009-06-01 13:00:29 -07002974
Ben Cheng7a2697d2010-06-07 13:44:23 -07002975 /*
2976 * If the invoke has non-null misPredBranchOver, we need to generate
2977 * the non-inlined version of the invoke here to handle the
2978 * mispredicted case.
2979 */
2980 if (mir->meta.callsiteInfo->misPredBranchOver) {
2981 genLandingPadForMispredictedCallee(cUnit, mir, bb, labelList);
2982 }
Bill Buzbee1465db52009-09-23 17:17:35 -07002983
Ben Chengba4fc8b2009-06-01 13:00:29 -07002984 if (mir->dalvikInsn.opCode == OP_INVOKE_INTERFACE)
2985 genProcessArgsNoRange(cUnit, mir, dInsn, &pcrLabel);
2986 else
2987 genProcessArgsRange(cUnit, mir, dInsn, &pcrLabel);
2988
Ben Cheng38329f52009-07-07 14:19:20 -07002989 /* "this" is already left in r0 by genProcessArgs* */
2990
2991 /* r4PC = dalvikCallsite */
2992 loadConstant(cUnit, r4PC,
2993 (int) (cUnit->method->insns + mir->offset));
2994
2995 /* r1 = &retChainingCell */
Bill Buzbee270c1d62009-08-13 16:58:07 -07002996 ArmLIR *addrRetChain =
Bill Buzbee1465db52009-09-23 17:17:35 -07002997 opRegRegImm(cUnit, kOpAdd, r1, rpc, 0);
Ben Cheng38329f52009-07-07 14:19:20 -07002998 addrRetChain->generic.target = (LIR *) retChainingCell;
2999
3000 /* r2 = &predictedChainingCell */
Bill Buzbee89efc3d2009-07-28 11:22:22 -07003001 ArmLIR *predictedChainingCell =
Bill Buzbee1465db52009-09-23 17:17:35 -07003002 opRegRegImm(cUnit, kOpAdd, r2, rpc, 0);
Ben Cheng38329f52009-07-07 14:19:20 -07003003 predictedChainingCell->generic.target = (LIR *) predChainingCell;
3004
3005 genDispatchToHandler(cUnit, TEMPLATE_INVOKE_METHOD_PREDICTED_CHAIN);
3006
3007 /* return through lr - jump to the chaining cell */
3008 genUnconditionalBranch(cUnit, predChainingCell);
3009
3010 /*
3011 * null-check on "this" may have been eliminated, but we still need
3012 * a PC-reconstruction label for stack overflow bailout.
3013 */
3014 if (pcrLabel == NULL) {
3015 int dPC = (int) (cUnit->method->insns + mir->offset);
Bill Buzbee89efc3d2009-07-28 11:22:22 -07003016 pcrLabel = dvmCompilerNew(sizeof(ArmLIR), true);
Ben Chenga4973592010-03-31 11:59:18 -07003017 pcrLabel->opCode = kArmPseudoPCReconstructionCell;
Ben Cheng38329f52009-07-07 14:19:20 -07003018 pcrLabel->operands[0] = dPC;
3019 pcrLabel->operands[1] = mir->offset;
3020 /* Insert the place holder to the growable list */
3021 dvmInsertGrowableList(&cUnit->pcReconstructionList, pcrLabel);
3022 }
3023
3024 /* return through lr+2 - punt to the interpreter */
3025 genUnconditionalBranch(cUnit, pcrLabel);
3026
3027 /*
3028 * return through lr+4 - fully resolve the callee method.
3029 * r1 <- count
3030 * r2 <- &predictedChainCell
3031 * r3 <- this->class
3032 * r4 <- dPC
3033 * r7 <- this->class->vtable
3034 */
3035
3036 /* Save count, &predictedChainCell, and class to high regs first */
Bill Buzbee1465db52009-09-23 17:17:35 -07003037 genRegCopy(cUnit, r8, r1);
3038 genRegCopy(cUnit, r9, r2);
3039 genRegCopy(cUnit, r10, r3);
Ben Cheng38329f52009-07-07 14:19:20 -07003040
Ben Chengba4fc8b2009-06-01 13:00:29 -07003041 /* r0 now contains this->clazz */
Bill Buzbee1465db52009-09-23 17:17:35 -07003042 genRegCopy(cUnit, r0, r3);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003043
3044 /* r1 = BBBB */
3045 loadConstant(cUnit, r1, dInsn->vB);
3046
3047 /* r2 = method (caller) */
3048 loadConstant(cUnit, r2, (int) cUnit->method);
3049
3050 /* r3 = pDvmDex */
3051 loadConstant(cUnit, r3, (int) cUnit->method->clazz->pDvmDex);
3052
Ben Chengbd1326d2010-04-02 15:04:53 -07003053 LOAD_FUNC_ADDR(cUnit, r7,
3054 (intptr_t) dvmFindInterfaceMethodInCache);
Bill Buzbee1465db52009-09-23 17:17:35 -07003055 opReg(cUnit, kOpBlx, r7);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003056 /* r0 = calleeMethod (returned from dvmFindInterfaceMethodInCache */
3057
Ben Cheng09e50c92010-05-02 10:45:32 -07003058 dvmCompilerClobberCallRegs(cUnit);
3059 /* generate a branch over if the interface method is resolved */
3060 opRegImm(cUnit, kOpCmp, r0, 0); /* NULL? */
3061 ArmLIR *branchOver = opCondBranch(cUnit, kArmCondNe);
3062 /*
3063 * calleeMethod == NULL -> throw
3064 */
3065 loadConstant(cUnit, r0,
3066 (int) (cUnit->method->insns + mir->offset));
3067 genDispatchToHandler(cUnit, TEMPLATE_THROW_EXCEPTION_COMMON);
3068 /* noreturn */
3069
3070 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
3071 target->defMask = ENCODE_ALL;
3072 branchOver->generic.target = (LIR *) target;
3073
Bill Buzbee1465db52009-09-23 17:17:35 -07003074 genRegCopy(cUnit, r1, r8);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003075
Ben Cheng38329f52009-07-07 14:19:20 -07003076 /* Check if rechain limit is reached */
Bill Buzbee1465db52009-09-23 17:17:35 -07003077 opRegImm(cUnit, kOpCmp, r1, 0);
Ben Cheng38329f52009-07-07 14:19:20 -07003078
Bill Buzbee1465db52009-09-23 17:17:35 -07003079 ArmLIR *bypassRechaining = opCondBranch(cUnit, kArmCondGt);
Ben Cheng38329f52009-07-07 14:19:20 -07003080
Bill Buzbee270c1d62009-08-13 16:58:07 -07003081 loadWordDisp(cUnit, rGLUE, offsetof(InterpState,
3082 jitToInterpEntries.dvmJitToPatchPredictedChain), r7);
Ben Cheng38329f52009-07-07 14:19:20 -07003083
Ben Chengb88ec3c2010-05-17 12:50:33 -07003084 genRegCopy(cUnit, r1, rGLUE);
Bill Buzbee1465db52009-09-23 17:17:35 -07003085 genRegCopy(cUnit, r2, r9);
3086 genRegCopy(cUnit, r3, r10);
Ben Cheng38329f52009-07-07 14:19:20 -07003087
3088 /*
3089 * r0 = calleeMethod
3090 * r2 = &predictedChainingCell
3091 * r3 = class
3092 *
3093 * &returnChainingCell has been loaded into r1 but is not needed
3094 * when patching the chaining cell and will be clobbered upon
3095 * returning so it will be reconstructed again.
3096 */
Bill Buzbee1465db52009-09-23 17:17:35 -07003097 opReg(cUnit, kOpBlx, r7);
Ben Cheng38329f52009-07-07 14:19:20 -07003098
3099 /* r1 = &retChainingCell */
Bill Buzbee1465db52009-09-23 17:17:35 -07003100 addrRetChain = opRegRegImm(cUnit, kOpAdd, r1, rpc, 0);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003101 addrRetChain->generic.target = (LIR *) retChainingCell;
Ben Cheng38329f52009-07-07 14:19:20 -07003102
3103 bypassRechaining->generic.target = (LIR *) addrRetChain;
3104
Ben Chengba4fc8b2009-06-01 13:00:29 -07003105 /*
3106 * r0 = this, r1 = calleeMethod,
3107 * r1 = &ChainingCell,
3108 * r4PC = callsiteDPC,
3109 */
3110 genDispatchToHandler(cUnit, TEMPLATE_INVOKE_METHOD_NO_OPT);
Ben Cheng978738d2010-05-13 13:45:57 -07003111#if defined(WITH_JIT_TUNING)
Ben Cheng86717f72010-03-05 15:27:21 -08003112 gDvmJit.invokePolymorphic++;
Ben Chengba4fc8b2009-06-01 13:00:29 -07003113#endif
3114 /* Handle exceptions using the interpreter */
3115 genTrap(cUnit, mir->offset, pcrLabel);
3116 break;
3117 }
3118 /* NOP */
3119 case OP_INVOKE_DIRECT_EMPTY: {
3120 return false;
3121 }
3122 case OP_FILLED_NEW_ARRAY:
3123 case OP_FILLED_NEW_ARRAY_RANGE: {
3124 /* Just let the interpreter deal with these */
3125 genInterpSingleStep(cUnit, mir);
3126 break;
3127 }
3128 default:
3129 return true;
3130 }
3131 return false;
3132}
3133
3134static bool handleFmt35ms_3rms(CompilationUnit *cUnit, MIR *mir,
Bill Buzbee89efc3d2009-07-28 11:22:22 -07003135 BasicBlock *bb, ArmLIR *labelList)
Ben Chengba4fc8b2009-06-01 13:00:29 -07003136{
Bill Buzbee89efc3d2009-07-28 11:22:22 -07003137 ArmLIR *retChainingCell = &labelList[bb->fallThrough->id];
3138 ArmLIR *predChainingCell = &labelList[bb->taken->id];
3139 ArmLIR *pcrLabel = NULL;
Ben Chengba4fc8b2009-06-01 13:00:29 -07003140
Ben Cheng7a2697d2010-06-07 13:44:23 -07003141 /* An invoke with the MIR_INLINED is effectively a no-op */
3142 if (mir->OptimizationFlags & MIR_INLINED)
3143 return false;
3144
Ben Chengba4fc8b2009-06-01 13:00:29 -07003145 DecodedInstruction *dInsn = &mir->dalvikInsn;
3146 switch (mir->dalvikInsn.opCode) {
3147 /* calleeMethod = this->clazz->vtable[BBBB] */
3148 case OP_INVOKE_VIRTUAL_QUICK_RANGE:
3149 case OP_INVOKE_VIRTUAL_QUICK: {
3150 int methodIndex = dInsn->vB;
Ben Cheng7a2697d2010-06-07 13:44:23 -07003151
3152 /*
3153 * If the invoke has non-null misPredBranchOver, we need to generate
3154 * the non-inlined version of the invoke here to handle the
3155 * mispredicted case.
3156 */
3157 if (mir->meta.callsiteInfo->misPredBranchOver) {
3158 genLandingPadForMispredictedCallee(cUnit, mir, bb, labelList);
3159 }
3160
Ben Chengba4fc8b2009-06-01 13:00:29 -07003161 if (mir->dalvikInsn.opCode == OP_INVOKE_VIRTUAL_QUICK)
3162 genProcessArgsNoRange(cUnit, mir, dInsn, &pcrLabel);
3163 else
3164 genProcessArgsRange(cUnit, mir, dInsn, &pcrLabel);
3165
Ben Cheng38329f52009-07-07 14:19:20 -07003166 genInvokeVirtualCommon(cUnit, mir, methodIndex,
3167 retChainingCell,
3168 predChainingCell,
3169 pcrLabel);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003170 break;
3171 }
3172 /* calleeMethod = method->clazz->super->vtable[BBBB] */
3173 case OP_INVOKE_SUPER_QUICK:
3174 case OP_INVOKE_SUPER_QUICK_RANGE: {
Ben Cheng7a2697d2010-06-07 13:44:23 -07003175 /* Grab the method ptr directly from what the interpreter sees */
3176 const Method *calleeMethod = mir->meta.callsiteInfo->method;
3177 assert(calleeMethod ==
3178 cUnit->method->clazz->super->vtable[dInsn->vB]);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003179
3180 if (mir->dalvikInsn.opCode == OP_INVOKE_SUPER_QUICK)
3181 genProcessArgsNoRange(cUnit, mir, dInsn, &pcrLabel);
3182 else
3183 genProcessArgsRange(cUnit, mir, dInsn, &pcrLabel);
3184
3185 /* r0 = calleeMethod */
3186 loadConstant(cUnit, r0, (int) calleeMethod);
3187
Ben Cheng38329f52009-07-07 14:19:20 -07003188 genInvokeSingletonCommon(cUnit, mir, bb, labelList, pcrLabel,
3189 calleeMethod);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003190 break;
3191 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07003192 default:
3193 return true;
3194 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07003195 return false;
3196}
3197
3198/*
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003199 * This operation is complex enough that we'll do it partly inline
3200 * and partly with a handler. NOTE: the handler uses hardcoded
3201 * values for string object offsets and must be revisitied if the
3202 * layout changes.
3203 */
3204static bool genInlinedCompareTo(CompilationUnit *cUnit, MIR *mir)
3205{
3206#if defined(USE_GLOBAL_STRING_DEFS)
3207 return false;
3208#else
3209 ArmLIR *rollback;
Bill Buzbeec6f10662010-02-09 11:16:15 -08003210 RegLocation rlThis = dvmCompilerGetSrc(cUnit, mir, 0);
3211 RegLocation rlComp = dvmCompilerGetSrc(cUnit, mir, 1);
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003212
3213 loadValueDirectFixed(cUnit, rlThis, r0);
3214 loadValueDirectFixed(cUnit, rlComp, r1);
3215 /* Test objects for NULL */
3216 rollback = genNullCheck(cUnit, rlThis.sRegLow, r0, mir->offset, NULL);
3217 genNullCheck(cUnit, rlComp.sRegLow, r1, mir->offset, rollback);
3218 /*
3219 * TUNING: we could check for object pointer equality before invoking
3220 * handler. Unclear whether the gain would be worth the added code size
3221 * expansion.
3222 */
3223 genDispatchToHandler(cUnit, TEMPLATE_STRING_COMPARETO);
Bill Buzbeec6f10662010-02-09 11:16:15 -08003224 storeValue(cUnit, inlinedTarget(cUnit, mir, false),
3225 dvmCompilerGetReturn(cUnit));
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003226 return true;
3227#endif
3228}
3229
Elliott Hughes2bdbcb62010-04-12 14:29:37 -07003230static bool genInlinedFastIndexOf(CompilationUnit *cUnit, MIR *mir)
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003231{
3232#if defined(USE_GLOBAL_STRING_DEFS)
3233 return false;
3234#else
Bill Buzbeec6f10662010-02-09 11:16:15 -08003235 RegLocation rlThis = dvmCompilerGetSrc(cUnit, mir, 0);
3236 RegLocation rlChar = dvmCompilerGetSrc(cUnit, mir, 1);
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003237
3238 loadValueDirectFixed(cUnit, rlThis, r0);
3239 loadValueDirectFixed(cUnit, rlChar, r1);
Elliott Hughes2bdbcb62010-04-12 14:29:37 -07003240 RegLocation rlStart = dvmCompilerGetSrc(cUnit, mir, 2);
3241 loadValueDirectFixed(cUnit, rlStart, r2);
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003242 /* Test objects for NULL */
3243 genNullCheck(cUnit, rlThis.sRegLow, r0, mir->offset, NULL);
3244 genDispatchToHandler(cUnit, TEMPLATE_STRING_INDEXOF);
Bill Buzbeec6f10662010-02-09 11:16:15 -08003245 storeValue(cUnit, inlinedTarget(cUnit, mir, false),
3246 dvmCompilerGetReturn(cUnit));
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003247 return true;
3248#endif
3249}
3250
Elliott Hughesee34f592010-04-05 18:13:52 -07003251// Generates an inlined String.isEmpty or String.length.
3252static bool genInlinedStringIsEmptyOrLength(CompilationUnit *cUnit, MIR *mir,
3253 bool isEmpty)
Bill Buzbee1f748632010-03-02 16:14:41 -08003254{
Elliott Hughesee34f592010-04-05 18:13:52 -07003255 // dst = src.length();
Bill Buzbee1f748632010-03-02 16:14:41 -08003256 RegLocation rlObj = dvmCompilerGetSrc(cUnit, mir, 0);
3257 RegLocation rlDest = inlinedTarget(cUnit, mir, false);
3258 rlObj = loadValue(cUnit, rlObj, kCoreReg);
3259 RegLocation rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
3260 genNullCheck(cUnit, rlObj.sRegLow, rlObj.lowReg, mir->offset, NULL);
3261 loadWordDisp(cUnit, rlObj.lowReg, gDvm.offJavaLangString_count,
3262 rlResult.lowReg);
Elliott Hughesee34f592010-04-05 18:13:52 -07003263 if (isEmpty) {
3264 // dst = (dst == 0);
3265 int tReg = dvmCompilerAllocTemp(cUnit);
3266 opRegReg(cUnit, kOpNeg, tReg, rlResult.lowReg);
3267 opRegRegReg(cUnit, kOpAdc, rlResult.lowReg, rlResult.lowReg, tReg);
3268 }
Bill Buzbee1f748632010-03-02 16:14:41 -08003269 storeValue(cUnit, rlDest, rlResult);
3270 return false;
3271}
3272
Elliott Hughesee34f592010-04-05 18:13:52 -07003273static bool genInlinedStringLength(CompilationUnit *cUnit, MIR *mir)
3274{
3275 return genInlinedStringIsEmptyOrLength(cUnit, mir, false);
3276}
3277
3278static bool genInlinedStringIsEmpty(CompilationUnit *cUnit, MIR *mir)
3279{
3280 return genInlinedStringIsEmptyOrLength(cUnit, mir, true);
3281}
3282
Bill Buzbee1f748632010-03-02 16:14:41 -08003283static bool genInlinedStringCharAt(CompilationUnit *cUnit, MIR *mir)
3284{
3285 int contents = offsetof(ArrayObject, contents);
3286 RegLocation rlObj = dvmCompilerGetSrc(cUnit, mir, 0);
3287 RegLocation rlIdx = dvmCompilerGetSrc(cUnit, mir, 1);
3288 RegLocation rlDest = inlinedTarget(cUnit, mir, false);
3289 RegLocation rlResult;
3290 rlObj = loadValue(cUnit, rlObj, kCoreReg);
3291 rlIdx = loadValue(cUnit, rlIdx, kCoreReg);
3292 int regMax = dvmCompilerAllocTemp(cUnit);
3293 int regOff = dvmCompilerAllocTemp(cUnit);
3294 int regPtr = dvmCompilerAllocTemp(cUnit);
3295 ArmLIR *pcrLabel = genNullCheck(cUnit, rlObj.sRegLow, rlObj.lowReg,
3296 mir->offset, NULL);
3297 loadWordDisp(cUnit, rlObj.lowReg, gDvm.offJavaLangString_count, regMax);
3298 loadWordDisp(cUnit, rlObj.lowReg, gDvm.offJavaLangString_offset, regOff);
3299 loadWordDisp(cUnit, rlObj.lowReg, gDvm.offJavaLangString_value, regPtr);
3300 genBoundsCheck(cUnit, rlIdx.lowReg, regMax, mir->offset, pcrLabel);
3301 dvmCompilerFreeTemp(cUnit, regMax);
3302 opRegImm(cUnit, kOpAdd, regPtr, contents);
3303 opRegReg(cUnit, kOpAdd, regOff, rlIdx.lowReg);
3304 rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
3305 loadBaseIndexed(cUnit, regPtr, regOff, rlResult.lowReg, 1, kUnsignedHalf);
3306 storeValue(cUnit, rlDest, rlResult);
3307 return false;
3308}
3309
3310static bool genInlinedAbsInt(CompilationUnit *cUnit, MIR *mir)
3311{
3312 RegLocation rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
3313 rlSrc = loadValue(cUnit, rlSrc, kCoreReg);
Elliott Hughesa1227402010-08-20 18:47:36 -07003314 RegLocation rlDest = inlinedTarget(cUnit, mir, false);
Bill Buzbee1f748632010-03-02 16:14:41 -08003315 RegLocation rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
3316 int signReg = dvmCompilerAllocTemp(cUnit);
3317 /*
3318 * abs(x) = y<=x>>31, (x+y)^y.
3319 * Thumb2's IT block also yields 3 instructions, but imposes
3320 * scheduling constraints.
3321 */
3322 opRegRegImm(cUnit, kOpAsr, signReg, rlSrc.lowReg, 31);
3323 opRegRegReg(cUnit, kOpAdd, rlResult.lowReg, rlSrc.lowReg, signReg);
3324 opRegReg(cUnit, kOpXor, rlResult.lowReg, signReg);
3325 storeValue(cUnit, rlDest, rlResult);
3326 return false;
3327}
3328
3329static bool genInlinedAbsLong(CompilationUnit *cUnit, MIR *mir)
3330{
3331 RegLocation rlSrc = dvmCompilerGetSrcWide(cUnit, mir, 0, 1);
3332 RegLocation rlDest = inlinedTargetWide(cUnit, mir, false);
3333 rlSrc = loadValueWide(cUnit, rlSrc, kCoreReg);
3334 RegLocation rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
3335 int signReg = dvmCompilerAllocTemp(cUnit);
3336 /*
3337 * abs(x) = y<=x>>31, (x+y)^y.
3338 * Thumb2 IT block allows slightly shorter sequence,
3339 * but introduces a scheduling barrier. Stick with this
3340 * mechanism for now.
3341 */
3342 opRegRegImm(cUnit, kOpAsr, signReg, rlSrc.highReg, 31);
3343 opRegRegReg(cUnit, kOpAdd, rlResult.lowReg, rlSrc.lowReg, signReg);
3344 opRegRegReg(cUnit, kOpAdc, rlResult.highReg, rlSrc.highReg, signReg);
3345 opRegReg(cUnit, kOpXor, rlResult.lowReg, signReg);
3346 opRegReg(cUnit, kOpXor, rlResult.highReg, signReg);
3347 storeValueWide(cUnit, rlDest, rlResult);
3348 return false;
3349}
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003350
Elliott Hughesa1227402010-08-20 18:47:36 -07003351static bool genInlinedIntFloatConversion(CompilationUnit *cUnit, MIR *mir)
3352{
3353 // Just move from source to destination...
3354 RegLocation rlSrc = dvmCompilerGetSrc(cUnit, mir, 0);
3355 RegLocation rlDest = inlinedTarget(cUnit, mir, false);
3356 storeValue(cUnit, rlDest, rlSrc);
3357 return false;
3358}
3359
3360static bool genInlinedLongDoubleConversion(CompilationUnit *cUnit, MIR *mir)
3361{
3362 // Just move from source to destination...
3363 RegLocation rlSrc = dvmCompilerGetSrcWide(cUnit, mir, 0, 1);
3364 RegLocation rlDest = inlinedTargetWide(cUnit, mir, false);
3365 storeValueWide(cUnit, rlDest, rlSrc);
3366 return false;
3367}
3368
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003369/*
Bill Buzbeece46c942009-11-20 15:41:34 -08003370 * NOTE: Handles both range and non-range versions (arguments
3371 * have already been normalized by this point).
Ben Chengba4fc8b2009-06-01 13:00:29 -07003372 */
Bill Buzbeece46c942009-11-20 15:41:34 -08003373static bool handleExecuteInline(CompilationUnit *cUnit, MIR *mir)
Ben Chengba4fc8b2009-06-01 13:00:29 -07003374{
3375 DecodedInstruction *dInsn = &mir->dalvikInsn;
3376 switch( mir->dalvikInsn.opCode) {
Bill Buzbeece46c942009-11-20 15:41:34 -08003377 case OP_EXECUTE_INLINE_RANGE:
Ben Chengba4fc8b2009-06-01 13:00:29 -07003378 case OP_EXECUTE_INLINE: {
3379 unsigned int i;
3380 const InlineOperation* inLineTable = dvmGetInlineOpsTable();
Bill Buzbee50a6bf22009-07-08 13:08:04 -07003381 int offset = offsetof(InterpState, retval);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003382 int operation = dInsn->vB;
Bill Buzbee50a6bf22009-07-08 13:08:04 -07003383 switch (operation) {
3384 case INLINE_EMPTYINLINEMETHOD:
3385 return false; /* Nop */
3386 case INLINE_STRING_LENGTH:
3387 return genInlinedStringLength(cUnit, mir);
Elliott Hughesee34f592010-04-05 18:13:52 -07003388 case INLINE_STRING_IS_EMPTY:
3389 return genInlinedStringIsEmpty(cUnit, mir);
Bill Buzbee50a6bf22009-07-08 13:08:04 -07003390 case INLINE_MATH_ABS_INT:
3391 return genInlinedAbsInt(cUnit, mir);
3392 case INLINE_MATH_ABS_LONG:
3393 return genInlinedAbsLong(cUnit, mir);
3394 case INLINE_MATH_MIN_INT:
3395 return genInlinedMinMaxInt(cUnit, mir, true);
3396 case INLINE_MATH_MAX_INT:
3397 return genInlinedMinMaxInt(cUnit, mir, false);
3398 case INLINE_STRING_CHARAT:
3399 return genInlinedStringCharAt(cUnit, mir);
3400 case INLINE_MATH_SQRT:
3401 if (genInlineSqrt(cUnit, mir))
Bill Buzbee9727c3d2009-08-01 11:32:36 -07003402 return false;
Bill Buzbee50a6bf22009-07-08 13:08:04 -07003403 else
3404 break; /* Handle with C routine */
Bill Buzbee50a6bf22009-07-08 13:08:04 -07003405 case INLINE_MATH_ABS_FLOAT:
Bill Buzbee1465db52009-09-23 17:17:35 -07003406 if (genInlinedAbsFloat(cUnit, mir))
3407 return false;
3408 else
3409 break;
Bill Buzbee50a6bf22009-07-08 13:08:04 -07003410 case INLINE_MATH_ABS_DOUBLE:
Bill Buzbee1465db52009-09-23 17:17:35 -07003411 if (genInlinedAbsDouble(cUnit, mir))
3412 return false;
3413 else
3414 break;
Bill Buzbee50a6bf22009-07-08 13:08:04 -07003415 case INLINE_STRING_COMPARETO:
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003416 if (genInlinedCompareTo(cUnit, mir))
3417 return false;
3418 else
3419 break;
Elliott Hughes2bdbcb62010-04-12 14:29:37 -07003420 case INLINE_STRING_FASTINDEXOF_II:
3421 if (genInlinedFastIndexOf(cUnit, mir))
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003422 return false;
3423 else
3424 break;
Elliott Hughesa1227402010-08-20 18:47:36 -07003425 case INLINE_FLOAT_TO_RAW_INT_BITS:
3426 case INLINE_INT_BITS_TO_FLOAT:
3427 return genInlinedIntFloatConversion(cUnit, mir);
3428 case INLINE_DOUBLE_TO_RAW_LONG_BITS:
3429 case INLINE_LONG_BITS_TO_DOUBLE:
3430 return genInlinedLongDoubleConversion(cUnit, mir);
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003431 case INLINE_STRING_EQUALS:
3432 case INLINE_MATH_COS:
3433 case INLINE_MATH_SIN:
Elliott Hughesa1227402010-08-20 18:47:36 -07003434 case INLINE_FLOAT_TO_INT_BITS:
3435 case INLINE_DOUBLE_TO_LONG_BITS:
Bill Buzbeefd023aa2009-11-02 09:23:49 -08003436 break; /* Handle with C routine */
Bill Buzbee50a6bf22009-07-08 13:08:04 -07003437 default:
Bill Buzbeefc519dc2010-03-06 23:30:57 -08003438 dvmCompilerAbort(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003439 }
Bill Buzbeec6f10662010-02-09 11:16:15 -08003440 dvmCompilerFlushAllRegs(cUnit); /* Everything to home location */
Elliott Hughes6a555132010-02-25 15:41:42 -08003441 dvmCompilerClobberCallRegs(cUnit);
Bill Buzbeec6f10662010-02-09 11:16:15 -08003442 dvmCompilerClobber(cUnit, r4PC);
3443 dvmCompilerClobber(cUnit, r7);
Bill Buzbee1465db52009-09-23 17:17:35 -07003444 opRegRegImm(cUnit, kOpAdd, r4PC, rGLUE, offset);
3445 opImm(cUnit, kOpPush, (1<<r4PC) | (1<<r7));
Ben Chengbd1326d2010-04-02 15:04:53 -07003446 LOAD_FUNC_ADDR(cUnit, r4PC, (int)inLineTable[operation].func);
Bill Buzbee1465db52009-09-23 17:17:35 -07003447 genExportPC(cUnit, mir);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003448 for (i=0; i < dInsn->vA; i++) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08003449 loadValueDirect(cUnit, dvmCompilerGetSrc(cUnit, mir, i), i);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003450 }
Bill Buzbee1465db52009-09-23 17:17:35 -07003451 opReg(cUnit, kOpBlx, r4PC);
3452 opRegImm(cUnit, kOpAdd, r13, 8);
Bill Buzbeece46c942009-11-20 15:41:34 -08003453 opRegImm(cUnit, kOpCmp, r0, 0); /* NULL? */
3454 ArmLIR *branchOver = opCondBranch(cUnit, kArmCondNe);
3455 loadConstant(cUnit, r0,
3456 (int) (cUnit->method->insns + mir->offset));
3457 genDispatchToHandler(cUnit, TEMPLATE_THROW_EXCEPTION_COMMON);
3458 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
3459 target->defMask = ENCODE_ALL;
3460 branchOver->generic.target = (LIR *) target;
Ben Chengba4fc8b2009-06-01 13:00:29 -07003461 break;
3462 }
3463 default:
3464 return true;
3465 }
3466 return false;
3467}
3468
3469static bool handleFmt51l(CompilationUnit *cUnit, MIR *mir)
3470{
Bill Buzbee1465db52009-09-23 17:17:35 -07003471 //TUNING: We're using core regs here - not optimal when target is a double
Bill Buzbeec6f10662010-02-09 11:16:15 -08003472 RegLocation rlDest = dvmCompilerGetDestWide(cUnit, mir, 0, 1);
3473 RegLocation rlResult = dvmCompilerEvalLoc(cUnit, rlDest, kCoreReg, true);
Ben Chengbd1326d2010-04-02 15:04:53 -07003474 loadConstantNoClobber(cUnit, rlResult.lowReg,
3475 mir->dalvikInsn.vB_wide & 0xFFFFFFFFUL);
3476 loadConstantNoClobber(cUnit, rlResult.highReg,
3477 (mir->dalvikInsn.vB_wide>>32) & 0xFFFFFFFFUL);
Bill Buzbee1465db52009-09-23 17:17:35 -07003478 storeValueWide(cUnit, rlDest, rlResult);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003479 return false;
3480}
3481
Ben Chengba4fc8b2009-06-01 13:00:29 -07003482/*
3483 * The following are special processing routines that handle transfer of
3484 * controls between compiled code and the interpreter. Certain VM states like
3485 * Dalvik PC and special-purpose registers are reconstructed here.
3486 */
3487
Bill Buzbeebd047242010-05-13 13:02:53 -07003488/*
3489 * Insert a
3490 * b .+4
3491 * nop
3492 * pair at the beginning of a chaining cell. This serves as the
3493 * switch branch that selects between reverting to the interpreter or
3494 * not. Once the cell is chained to a translation, the cell will
3495 * contain a 32-bit branch. Subsequent chain/unchain operations will
3496 * then only alter that first 16-bits - the "b .+4" for unchaining,
3497 * and the restoration of the first half of the 32-bit branch for
3498 * rechaining.
3499 */
3500static void insertChainingSwitch(CompilationUnit *cUnit)
3501{
3502 ArmLIR *branch = newLIR0(cUnit, kThumbBUncond);
3503 newLIR2(cUnit, kThumbOrr, r0, r0);
3504 ArmLIR *target = newLIR0(cUnit, kArmPseudoTargetLabel);
3505 target->defMask = ENCODE_ALL;
3506 branch->generic.target = (LIR *) target;
3507}
3508
Ben Cheng1efc9c52009-06-08 18:25:27 -07003509/* Chaining cell for code that may need warmup. */
3510static void handleNormalChainingCell(CompilationUnit *cUnit,
3511 unsigned int offset)
Ben Chengba4fc8b2009-06-01 13:00:29 -07003512{
Ben Cheng11d8f142010-03-24 15:24:19 -07003513 /*
3514 * Use raw instruction constructors to guarantee that the generated
3515 * instructions fit the predefined cell size.
3516 */
Bill Buzbeebd047242010-05-13 13:02:53 -07003517 insertChainingSwitch(cUnit);
Ben Cheng11d8f142010-03-24 15:24:19 -07003518 newLIR3(cUnit, kThumbLdrRRI5, r0, rGLUE,
3519 offsetof(InterpState,
3520 jitToInterpEntries.dvmJitToInterpNormal) >> 2);
3521 newLIR1(cUnit, kThumbBlxR, r0);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003522 addWordData(cUnit, (int) (cUnit->method->insns + offset), true);
3523}
3524
3525/*
Ben Cheng1efc9c52009-06-08 18:25:27 -07003526 * Chaining cell for instructions that immediately following already translated
3527 * code.
Ben Chengba4fc8b2009-06-01 13:00:29 -07003528 */
Ben Cheng1efc9c52009-06-08 18:25:27 -07003529static void handleHotChainingCell(CompilationUnit *cUnit,
3530 unsigned int offset)
Ben Chengba4fc8b2009-06-01 13:00:29 -07003531{
Ben Cheng11d8f142010-03-24 15:24:19 -07003532 /*
3533 * Use raw instruction constructors to guarantee that the generated
3534 * instructions fit the predefined cell size.
3535 */
Bill Buzbeebd047242010-05-13 13:02:53 -07003536 insertChainingSwitch(cUnit);
Ben Cheng11d8f142010-03-24 15:24:19 -07003537 newLIR3(cUnit, kThumbLdrRRI5, r0, rGLUE,
3538 offsetof(InterpState,
3539 jitToInterpEntries.dvmJitToInterpTraceSelect) >> 2);
3540 newLIR1(cUnit, kThumbBlxR, r0);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003541 addWordData(cUnit, (int) (cUnit->method->insns + offset), true);
3542}
3543
Bill Buzbee9c4b7c82009-09-10 10:10:38 -07003544#if defined(WITH_SELF_VERIFICATION) || defined(WITH_JIT_TUNING)
Jeff Hao97319a82009-08-12 16:57:15 -07003545/* Chaining cell for branches that branch back into the same basic block */
3546static void handleBackwardBranchChainingCell(CompilationUnit *cUnit,
3547 unsigned int offset)
3548{
Ben Cheng11d8f142010-03-24 15:24:19 -07003549 /*
3550 * Use raw instruction constructors to guarantee that the generated
3551 * instructions fit the predefined cell size.
3552 */
Bill Buzbeebd047242010-05-13 13:02:53 -07003553 insertChainingSwitch(cUnit);
Bill Buzbee9c4b7c82009-09-10 10:10:38 -07003554#if defined(WITH_SELF_VERIFICATION)
Bill Buzbee1465db52009-09-23 17:17:35 -07003555 newLIR3(cUnit, kThumbLdrRRI5, r0, rGLUE,
Ben Cheng40094c12010-02-24 20:58:44 -08003556 offsetof(InterpState,
3557 jitToInterpEntries.dvmJitToInterpBackwardBranch) >> 2);
Bill Buzbee9c4b7c82009-09-10 10:10:38 -07003558#else
Bill Buzbee1465db52009-09-23 17:17:35 -07003559 newLIR3(cUnit, kThumbLdrRRI5, r0, rGLUE,
Bill Buzbee9c4b7c82009-09-10 10:10:38 -07003560 offsetof(InterpState, jitToInterpEntries.dvmJitToInterpNormal) >> 2);
3561#endif
Bill Buzbee1465db52009-09-23 17:17:35 -07003562 newLIR1(cUnit, kThumbBlxR, r0);
Jeff Hao97319a82009-08-12 16:57:15 -07003563 addWordData(cUnit, (int) (cUnit->method->insns + offset), true);
3564}
3565
3566#endif
Ben Chengba4fc8b2009-06-01 13:00:29 -07003567/* Chaining cell for monomorphic method invocations. */
Ben Cheng38329f52009-07-07 14:19:20 -07003568static void handleInvokeSingletonChainingCell(CompilationUnit *cUnit,
3569 const Method *callee)
Ben Chengba4fc8b2009-06-01 13:00:29 -07003570{
Ben Cheng11d8f142010-03-24 15:24:19 -07003571 /*
3572 * Use raw instruction constructors to guarantee that the generated
3573 * instructions fit the predefined cell size.
3574 */
Bill Buzbeebd047242010-05-13 13:02:53 -07003575 insertChainingSwitch(cUnit);
Ben Cheng11d8f142010-03-24 15:24:19 -07003576 newLIR3(cUnit, kThumbLdrRRI5, r0, rGLUE,
3577 offsetof(InterpState,
3578 jitToInterpEntries.dvmJitToInterpTraceSelect) >> 2);
3579 newLIR1(cUnit, kThumbBlxR, r0);
Ben Chengba4fc8b2009-06-01 13:00:29 -07003580 addWordData(cUnit, (int) (callee->insns), true);
3581}
3582
Ben Cheng38329f52009-07-07 14:19:20 -07003583/* Chaining cell for monomorphic method invocations. */
3584static void handleInvokePredictedChainingCell(CompilationUnit *cUnit)
3585{
3586
3587 /* Should not be executed in the initial state */
3588 addWordData(cUnit, PREDICTED_CHAIN_BX_PAIR_INIT, true);
3589 /* To be filled: class */
3590 addWordData(cUnit, PREDICTED_CHAIN_CLAZZ_INIT, true);
3591 /* To be filled: method */
3592 addWordData(cUnit, PREDICTED_CHAIN_METHOD_INIT, true);
3593 /*
3594 * Rechain count. The initial value of 0 here will trigger chaining upon
3595 * the first invocation of this callsite.
3596 */
3597 addWordData(cUnit, PREDICTED_CHAIN_COUNTER_INIT, true);
3598}
3599
Ben Chengba4fc8b2009-06-01 13:00:29 -07003600/* Load the Dalvik PC into r0 and jump to the specified target */
3601static void handlePCReconstruction(CompilationUnit *cUnit,
Bill Buzbee89efc3d2009-07-28 11:22:22 -07003602 ArmLIR *targetLabel)
Ben Chengba4fc8b2009-06-01 13:00:29 -07003603{
Bill Buzbee89efc3d2009-07-28 11:22:22 -07003604 ArmLIR **pcrLabel =
3605 (ArmLIR **) cUnit->pcReconstructionList.elemList;
Ben Chengba4fc8b2009-06-01 13:00:29 -07003606 int numElems = cUnit->pcReconstructionList.numUsed;
3607 int i;
3608 for (i = 0; i < numElems; i++) {
3609 dvmCompilerAppendLIR(cUnit, (LIR *) pcrLabel[i]);
3610 /* r0 = dalvik PC */
3611 loadConstant(cUnit, r0, pcrLabel[i]->operands[0]);
3612 genUnconditionalBranch(cUnit, targetLabel);
3613 }
3614}
3615
Bill Buzbee1465db52009-09-23 17:17:35 -07003616static char *extendedMIROpNames[kMirOpLast - kMirOpFirst] = {
3617 "kMirOpPhi",
3618 "kMirOpNullNRangeUpCheck",
3619 "kMirOpNullNRangeDownCheck",
3620 "kMirOpLowerBound",
3621 "kMirOpPunt",
Ben Cheng7a2697d2010-06-07 13:44:23 -07003622 "kMirOpCheckInlinePrediction",
Ben Cheng4238ec22009-08-24 16:32:22 -07003623};
3624
3625/*
3626 * vA = arrayReg;
3627 * vB = idxReg;
3628 * vC = endConditionReg;
3629 * arg[0] = maxC
3630 * arg[1] = minC
3631 * arg[2] = loopBranchConditionCode
3632 */
3633static void genHoistedChecksForCountUpLoop(CompilationUnit *cUnit, MIR *mir)
3634{
Bill Buzbee1465db52009-09-23 17:17:35 -07003635 /*
3636 * NOTE: these synthesized blocks don't have ssa names assigned
3637 * for Dalvik registers. However, because they dominate the following
3638 * blocks we can simply use the Dalvik name w/ subscript 0 as the
3639 * ssa name.
3640 */
Ben Cheng4238ec22009-08-24 16:32:22 -07003641 DecodedInstruction *dInsn = &mir->dalvikInsn;
3642 const int lenOffset = offsetof(ArrayObject, length);
Ben Cheng4238ec22009-08-24 16:32:22 -07003643 const int maxC = dInsn->arg[0];
Bill Buzbee1465db52009-09-23 17:17:35 -07003644 int regLength;
3645 RegLocation rlArray = cUnit->regLocation[mir->dalvikInsn.vA];
3646 RegLocation rlIdxEnd = cUnit->regLocation[mir->dalvikInsn.vC];
Ben Cheng4238ec22009-08-24 16:32:22 -07003647
3648 /* regArray <- arrayRef */
Bill Buzbee1465db52009-09-23 17:17:35 -07003649 rlArray = loadValue(cUnit, rlArray, kCoreReg);
3650 rlIdxEnd = loadValue(cUnit, rlIdxEnd, kCoreReg);
3651 genRegImmCheck(cUnit, kArmCondEq, rlArray.lowReg, 0, 0,
Ben Cheng4238ec22009-08-24 16:32:22 -07003652 (ArmLIR *) cUnit->loopAnalysis->branchToPCR);
3653
3654 /* regLength <- len(arrayRef) */
Bill Buzbeec6f10662010-02-09 11:16:15 -08003655 regLength = dvmCompilerAllocTemp(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07003656 loadWordDisp(cUnit, rlArray.lowReg, lenOffset, regLength);
Ben Cheng4238ec22009-08-24 16:32:22 -07003657
3658 int delta = maxC;
3659 /*
3660 * If the loop end condition is ">=" instead of ">", then the largest value
3661 * of the index is "endCondition - 1".
3662 */
3663 if (dInsn->arg[2] == OP_IF_GE) {
3664 delta--;
3665 }
3666
3667 if (delta) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08003668 int tReg = dvmCompilerAllocTemp(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07003669 opRegRegImm(cUnit, kOpAdd, tReg, rlIdxEnd.lowReg, delta);
3670 rlIdxEnd.lowReg = tReg;
Bill Buzbeec6f10662010-02-09 11:16:15 -08003671 dvmCompilerFreeTemp(cUnit, tReg);
Ben Cheng4238ec22009-08-24 16:32:22 -07003672 }
3673 /* Punt if "regIdxEnd < len(Array)" is false */
Bill Buzbee1465db52009-09-23 17:17:35 -07003674 genRegRegCheck(cUnit, kArmCondGe, rlIdxEnd.lowReg, regLength, 0,
Ben Cheng0fd31e42009-09-03 14:40:16 -07003675 (ArmLIR *) cUnit->loopAnalysis->branchToPCR);
Ben Cheng4238ec22009-08-24 16:32:22 -07003676}
3677
3678/*
3679 * vA = arrayReg;
3680 * vB = idxReg;
3681 * vC = endConditionReg;
3682 * arg[0] = maxC
3683 * arg[1] = minC
3684 * arg[2] = loopBranchConditionCode
3685 */
3686static void genHoistedChecksForCountDownLoop(CompilationUnit *cUnit, MIR *mir)
3687{
3688 DecodedInstruction *dInsn = &mir->dalvikInsn;
3689 const int lenOffset = offsetof(ArrayObject, length);
Bill Buzbeec6f10662010-02-09 11:16:15 -08003690 const int regLength = dvmCompilerAllocTemp(cUnit);
Ben Cheng4238ec22009-08-24 16:32:22 -07003691 const int maxC = dInsn->arg[0];
Bill Buzbee1465db52009-09-23 17:17:35 -07003692 RegLocation rlArray = cUnit->regLocation[mir->dalvikInsn.vA];
3693 RegLocation rlIdxInit = cUnit->regLocation[mir->dalvikInsn.vB];
Ben Cheng4238ec22009-08-24 16:32:22 -07003694
3695 /* regArray <- arrayRef */
Bill Buzbee1465db52009-09-23 17:17:35 -07003696 rlArray = loadValue(cUnit, rlArray, kCoreReg);
3697 rlIdxInit = loadValue(cUnit, rlIdxInit, kCoreReg);
3698 genRegImmCheck(cUnit, kArmCondEq, rlArray.lowReg, 0, 0,
Ben Cheng4238ec22009-08-24 16:32:22 -07003699 (ArmLIR *) cUnit->loopAnalysis->branchToPCR);
3700
3701 /* regLength <- len(arrayRef) */
Bill Buzbee1465db52009-09-23 17:17:35 -07003702 loadWordDisp(cUnit, rlArray.lowReg, lenOffset, regLength);
Ben Cheng4238ec22009-08-24 16:32:22 -07003703
3704 if (maxC) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08003705 int tReg = dvmCompilerAllocTemp(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07003706 opRegRegImm(cUnit, kOpAdd, tReg, rlIdxInit.lowReg, maxC);
3707 rlIdxInit.lowReg = tReg;
Bill Buzbeec6f10662010-02-09 11:16:15 -08003708 dvmCompilerFreeTemp(cUnit, tReg);
Ben Cheng4238ec22009-08-24 16:32:22 -07003709 }
3710
3711 /* Punt if "regIdxInit < len(Array)" is false */
Bill Buzbee1465db52009-09-23 17:17:35 -07003712 genRegRegCheck(cUnit, kArmCondGe, rlIdxInit.lowReg, regLength, 0,
Ben Cheng0fd31e42009-09-03 14:40:16 -07003713 (ArmLIR *) cUnit->loopAnalysis->branchToPCR);
Ben Cheng4238ec22009-08-24 16:32:22 -07003714}
3715
3716/*
3717 * vA = idxReg;
3718 * vB = minC;
3719 */
3720static void genHoistedLowerBoundCheck(CompilationUnit *cUnit, MIR *mir)
3721{
3722 DecodedInstruction *dInsn = &mir->dalvikInsn;
Ben Cheng4238ec22009-08-24 16:32:22 -07003723 const int minC = dInsn->vB;
Bill Buzbee1465db52009-09-23 17:17:35 -07003724 RegLocation rlIdx = cUnit->regLocation[mir->dalvikInsn.vA];
Ben Cheng4238ec22009-08-24 16:32:22 -07003725
3726 /* regIdx <- initial index value */
Bill Buzbee1465db52009-09-23 17:17:35 -07003727 rlIdx = loadValue(cUnit, rlIdx, kCoreReg);
Ben Cheng4238ec22009-08-24 16:32:22 -07003728
3729 /* Punt if "regIdxInit + minC >= 0" is false */
Bill Buzbee1465db52009-09-23 17:17:35 -07003730 genRegImmCheck(cUnit, kArmCondLt, rlIdx.lowReg, -minC, 0,
Ben Cheng4238ec22009-08-24 16:32:22 -07003731 (ArmLIR *) cUnit->loopAnalysis->branchToPCR);
3732}
3733
Ben Cheng7a2697d2010-06-07 13:44:23 -07003734/*
3735 * vC = this
3736 *
3737 * A predicted inlining target looks like the following, where instructions
3738 * between 0x4858de66 and 0x4858de72 are checking if the predicted class
3739 * matches "this", and the verificaion code is generated by this routine.
3740 *
3741 * (C) means the instruction is inlined from the callee, and (PI) means the
3742 * instruction is the predicted inlined invoke, whose corresponding
3743 * instructions are still generated to handle the mispredicted case.
3744 *
3745 * D/dalvikvm( 86): -------- kMirOpCheckInlinePrediction
3746 * D/dalvikvm( 86): 0x4858de66 (0002): ldr r0, [r5, #68]
3747 * D/dalvikvm( 86): 0x4858de68 (0004): ldr r1, [pc, #140]
3748 * D/dalvikvm( 86): 0x4858de6a (0006): cmp r0, #0
3749 * D/dalvikvm( 86): 0x4858de6c (0008): beq 0x4858deb2
3750 * D/dalvikvm( 86): 0x4858de6e (000a): ldr r2, [r0, #0]
3751 * D/dalvikvm( 86): 0x4858de70 (000c): cmp r1, r2
3752 * D/dalvikvm( 86): 0x4858de72 (000e): bne 0x4858de7a
3753 * D/dalvikvm( 86): -------- dalvik offset: 0x004c @ +iget-object-quick (C)
3754 * v4, v17, (#8)
3755 * D/dalvikvm( 86): 0x4858de74 (0010): ldr r3, [r0, #8]
3756 * D/dalvikvm( 86): 0x4858de76 (0012): str r3, [r5, #16]
3757 * D/dalvikvm( 86): -------- dalvik offset: 0x004c @
3758 * +invoke-virtual-quick/range (PI) v17..v17
3759 * D/dalvikvm( 86): 0x4858de78 (0014): b 0x4858debc
3760 * D/dalvikvm( 86): 0x4858de7a (0016): add r4,r5,#68
3761 * D/dalvikvm( 86): -------- BARRIER
3762 * D/dalvikvm( 86): 0x4858de7e (001a): ldmia r4, <r0>
3763 * D/dalvikvm( 86): -------- BARRIER
3764 * D/dalvikvm( 86): 0x4858de80 (001c): sub r7,r5,#24
3765 * D/dalvikvm( 86): 0x4858de84 (0020): cmp r0, #0
3766 * D/dalvikvm( 86): 0x4858de86 (0022): beq 0x4858deb6
3767 * D/dalvikvm( 86): -------- BARRIER
3768 * D/dalvikvm( 86): 0x4858de88 (0024): stmia r7, <r0>
3769 * D/dalvikvm( 86): -------- BARRIER
3770 * D/dalvikvm( 86): 0x4858de8a (0026): ldr r4, [pc, #104]
3771 * D/dalvikvm( 86): 0x4858de8c (0028): add r1, pc, #28
3772 * D/dalvikvm( 86): 0x4858de8e (002a): add r2, pc, #56
3773 * D/dalvikvm( 86): 0x4858de90 (002c): blx_1 0x48589198
3774 * D/dalvikvm( 86): 0x4858de92 (002e): blx_2 see above
3775 * D/dalvikvm( 86): 0x4858de94 (0030): b 0x4858dec8
3776 * D/dalvikvm( 86): 0x4858de96 (0032): b 0x4858deb6
3777 * D/dalvikvm( 86): 0x4858de98 (0034): ldr r0, [r7, #72]
3778 * D/dalvikvm( 86): 0x4858de9a (0036): cmp r1, #0
3779 * D/dalvikvm( 86): 0x4858de9c (0038): bgt 0x4858dea4
3780 * D/dalvikvm( 86): 0x4858de9e (003a): ldr r7, [r6, #116]
3781 * D/dalvikvm( 86): 0x4858dea0 (003c): movs r1, r6
3782 * D/dalvikvm( 86): 0x4858dea2 (003e): blx r7
3783 * D/dalvikvm( 86): 0x4858dea4 (0040): add r1, pc, #4
3784 * D/dalvikvm( 86): 0x4858dea6 (0042): blx_1 0x485890a0
3785 * D/dalvikvm( 86): 0x4858dea8 (0044): blx_2 see above
3786 * D/dalvikvm( 86): 0x4858deaa (0046): b 0x4858deb6
3787 * D/dalvikvm( 86): 0x4858deac (0048): .align4
3788 * D/dalvikvm( 86): L0x004f:
3789 * D/dalvikvm( 86): -------- dalvik offset: 0x004f @ move-result-object (PI)
3790 * v4, (#0), (#0)
3791 * D/dalvikvm( 86): 0x4858deac (0048): ldr r4, [r6, #8]
3792 * D/dalvikvm( 86): 0x4858deae (004a): str r4, [r5, #16]
3793 * D/dalvikvm( 86): 0x4858deb0 (004c): b 0x4858debc
3794 * D/dalvikvm( 86): -------- reconstruct dalvik PC : 0x42beefcc @ +0x004c
3795 * D/dalvikvm( 86): 0x4858deb2 (004e): ldr r0, [pc, #64]
3796 * D/dalvikvm( 86): 0x4858deb4 (0050): b 0x4858deb8
3797 * D/dalvikvm( 86): -------- reconstruct dalvik PC : 0x42beefcc @ +0x004c
3798 * D/dalvikvm( 86): 0x4858deb6 (0052): ldr r0, [pc, #60]
3799 * D/dalvikvm( 86): Exception_Handling:
3800 * D/dalvikvm( 86): 0x4858deb8 (0054): ldr r1, [r6, #100]
3801 * D/dalvikvm( 86): 0x4858deba (0056): blx r1
3802 * D/dalvikvm( 86): 0x4858debc (0058): .align4
3803 * D/dalvikvm( 86): -------- chaining cell (hot): 0x0050
3804 * D/dalvikvm( 86): 0x4858debc (0058): b 0x4858dec0
3805 * D/dalvikvm( 86): 0x4858debe (005a): orrs r0, r0
3806 * D/dalvikvm( 86): 0x4858dec0 (005c): ldr r0, [r6, #112]
3807 * D/dalvikvm( 86): 0x4858dec2 (005e): blx r0
3808 * D/dalvikvm( 86): 0x4858dec4 (0060): data 0xefd4(61396)
3809 * D/dalvikvm( 86): 0x4858dec6 (0062): data 0x42be(17086)
3810 * D/dalvikvm( 86): 0x4858dec8 (0064): .align4
3811 * D/dalvikvm( 86): -------- chaining cell (predicted)
3812 * D/dalvikvm( 86): 0x4858dec8 (0064): data 0xe7fe(59390)
3813 * D/dalvikvm( 86): 0x4858deca (0066): data 0x0000(0)
3814 * D/dalvikvm( 86): 0x4858decc (0068): data 0x0000(0)
3815 * D/dalvikvm( 86): 0x4858dece (006a): data 0x0000(0)
3816 * :
3817 */
3818static void genValidationForPredictedInline(CompilationUnit *cUnit, MIR *mir)
3819{
3820 CallsiteInfo *callsiteInfo = mir->meta.callsiteInfo;
3821 RegLocation rlThis = cUnit->regLocation[mir->dalvikInsn.vC];
3822
3823 rlThis = loadValue(cUnit, rlThis, kCoreReg);
3824 int regPredictedClass = dvmCompilerAllocTemp(cUnit);
3825 loadConstant(cUnit, regPredictedClass, (int) callsiteInfo->clazz);
3826 genNullCheck(cUnit, rlThis.sRegLow, rlThis.lowReg, mir->offset,
3827 NULL);/* null object? */
3828 int regActualClass = dvmCompilerAllocTemp(cUnit);
3829 loadWordDisp(cUnit, rlThis.lowReg, offsetof(Object, clazz), regActualClass);
3830 opRegReg(cUnit, kOpCmp, regPredictedClass, regActualClass);
3831 /*
3832 * Set the misPredBranchOver target so that it will be generated when the
3833 * code for the non-optimized invoke is generated.
3834 */
3835 callsiteInfo->misPredBranchOver = (LIR *) opCondBranch(cUnit, kArmCondNe);
3836}
3837
Ben Cheng4238ec22009-08-24 16:32:22 -07003838/* Extended MIR instructions like PHI */
3839static void handleExtendedMIR(CompilationUnit *cUnit, MIR *mir)
3840{
Bill Buzbee1465db52009-09-23 17:17:35 -07003841 int opOffset = mir->dalvikInsn.opCode - kMirOpFirst;
Ben Cheng4238ec22009-08-24 16:32:22 -07003842 char *msg = dvmCompilerNew(strlen(extendedMIROpNames[opOffset]) + 1,
3843 false);
3844 strcpy(msg, extendedMIROpNames[opOffset]);
Bill Buzbee1465db52009-09-23 17:17:35 -07003845 newLIR1(cUnit, kArmPseudoExtended, (int) msg);
Ben Cheng4238ec22009-08-24 16:32:22 -07003846
3847 switch (mir->dalvikInsn.opCode) {
Bill Buzbee1465db52009-09-23 17:17:35 -07003848 case kMirOpPhi: {
Ben Cheng4238ec22009-08-24 16:32:22 -07003849 char *ssaString = dvmCompilerGetSSAString(cUnit, mir->ssaRep);
Bill Buzbee1465db52009-09-23 17:17:35 -07003850 newLIR1(cUnit, kArmPseudoSSARep, (int) ssaString);
Ben Cheng4238ec22009-08-24 16:32:22 -07003851 break;
3852 }
Bill Buzbee1465db52009-09-23 17:17:35 -07003853 case kMirOpNullNRangeUpCheck: {
Ben Cheng4238ec22009-08-24 16:32:22 -07003854 genHoistedChecksForCountUpLoop(cUnit, mir);
3855 break;
3856 }
Bill Buzbee1465db52009-09-23 17:17:35 -07003857 case kMirOpNullNRangeDownCheck: {
Ben Cheng4238ec22009-08-24 16:32:22 -07003858 genHoistedChecksForCountDownLoop(cUnit, mir);
3859 break;
3860 }
Bill Buzbee1465db52009-09-23 17:17:35 -07003861 case kMirOpLowerBound: {
Ben Cheng4238ec22009-08-24 16:32:22 -07003862 genHoistedLowerBoundCheck(cUnit, mir);
3863 break;
3864 }
Bill Buzbee1465db52009-09-23 17:17:35 -07003865 case kMirOpPunt: {
Ben Cheng4238ec22009-08-24 16:32:22 -07003866 genUnconditionalBranch(cUnit,
3867 (ArmLIR *) cUnit->loopAnalysis->branchToPCR);
3868 break;
3869 }
Ben Cheng7a2697d2010-06-07 13:44:23 -07003870 case kMirOpCheckInlinePrediction: {
3871 genValidationForPredictedInline(cUnit, mir);
3872 break;
3873 }
Ben Cheng4238ec22009-08-24 16:32:22 -07003874 default:
3875 break;
3876 }
3877}
3878
3879/*
3880 * Create a PC-reconstruction cell for the starting offset of this trace.
3881 * Since the PCR cell is placed near the end of the compiled code which is
3882 * usually out of range for a conditional branch, we put two branches (one
3883 * branch over to the loop body and one layover branch to the actual PCR) at the
3884 * end of the entry block.
3885 */
3886static void setupLoopEntryBlock(CompilationUnit *cUnit, BasicBlock *entry,
3887 ArmLIR *bodyLabel)
3888{
3889 /* Set up the place holder to reconstruct this Dalvik PC */
3890 ArmLIR *pcrLabel = dvmCompilerNew(sizeof(ArmLIR), true);
Ben Chenga4973592010-03-31 11:59:18 -07003891 pcrLabel->opCode = kArmPseudoPCReconstructionCell;
Ben Cheng4238ec22009-08-24 16:32:22 -07003892 pcrLabel->operands[0] =
3893 (int) (cUnit->method->insns + entry->startOffset);
3894 pcrLabel->operands[1] = entry->startOffset;
3895 /* Insert the place holder to the growable list */
3896 dvmInsertGrowableList(&cUnit->pcReconstructionList, pcrLabel);
3897
3898 /*
3899 * Next, create two branches - one branch over to the loop body and the
3900 * other branch to the PCR cell to punt.
3901 */
3902 ArmLIR *branchToBody = dvmCompilerNew(sizeof(ArmLIR), true);
Bill Buzbee1465db52009-09-23 17:17:35 -07003903 branchToBody->opCode = kThumbBUncond;
Ben Cheng4238ec22009-08-24 16:32:22 -07003904 branchToBody->generic.target = (LIR *) bodyLabel;
Ben Chengdcf3e5d2009-09-11 13:42:05 -07003905 setupResourceMasks(branchToBody);
Ben Cheng4238ec22009-08-24 16:32:22 -07003906 cUnit->loopAnalysis->branchToBody = (LIR *) branchToBody;
3907
3908 ArmLIR *branchToPCR = dvmCompilerNew(sizeof(ArmLIR), true);
Bill Buzbee1465db52009-09-23 17:17:35 -07003909 branchToPCR->opCode = kThumbBUncond;
Ben Cheng4238ec22009-08-24 16:32:22 -07003910 branchToPCR->generic.target = (LIR *) pcrLabel;
Ben Chengdcf3e5d2009-09-11 13:42:05 -07003911 setupResourceMasks(branchToPCR);
Ben Cheng4238ec22009-08-24 16:32:22 -07003912 cUnit->loopAnalysis->branchToPCR = (LIR *) branchToPCR;
3913}
3914
Ben Chengd5adae12010-03-26 17:45:28 -07003915#if defined(WITH_SELF_VERIFICATION)
3916static bool selfVerificationPuntOps(MIR *mir)
3917{
3918 DecodedInstruction *decInsn = &mir->dalvikInsn;
3919 OpCode op = decInsn->opCode;
Ben Cheng7a2697d2010-06-07 13:44:23 -07003920
Ben Chengd5adae12010-03-26 17:45:28 -07003921 /*
3922 * All opcodes that can throw exceptions and use the
3923 * TEMPLATE_THROW_EXCEPTION_COMMON template should be excluded in the trace
3924 * under self-verification mode.
3925 */
3926 return (op == OP_MONITOR_ENTER || op == OP_MONITOR_EXIT ||
3927 op == OP_NEW_INSTANCE || op == OP_NEW_ARRAY ||
3928 op == OP_CHECK_CAST || op == OP_MOVE_EXCEPTION ||
3929 op == OP_FILL_ARRAY_DATA || op == OP_EXECUTE_INLINE ||
Ben Cheng7a2697d2010-06-07 13:44:23 -07003930 op == OP_EXECUTE_INLINE_RANGE);
Ben Chengd5adae12010-03-26 17:45:28 -07003931}
3932#endif
3933
Ben Chengba4fc8b2009-06-01 13:00:29 -07003934void dvmCompilerMIR2LIR(CompilationUnit *cUnit)
3935{
3936 /* Used to hold the labels of each block */
Bill Buzbee89efc3d2009-07-28 11:22:22 -07003937 ArmLIR *labelList =
3938 dvmCompilerNew(sizeof(ArmLIR) * cUnit->numBlocks, true);
Ben Chengcec26f62010-01-15 15:29:33 -08003939 GrowableList chainingListByType[kChainingCellGap];
Ben Chengba4fc8b2009-06-01 13:00:29 -07003940 int i;
3941
3942 /*
Ben Cheng38329f52009-07-07 14:19:20 -07003943 * Initialize various types chaining lists.
Ben Chengba4fc8b2009-06-01 13:00:29 -07003944 */
Ben Chengcec26f62010-01-15 15:29:33 -08003945 for (i = 0; i < kChainingCellGap; i++) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07003946 dvmInitGrowableList(&chainingListByType[i], 2);
3947 }
3948
3949 BasicBlock **blockList = cUnit->blockList;
3950
Bill Buzbee6e963e12009-06-17 16:56:19 -07003951 if (cUnit->executionCount) {
3952 /*
3953 * Reserve 6 bytes at the beginning of the trace
3954 * +----------------------------+
3955 * | execution count (4 bytes) |
3956 * +----------------------------+
3957 * | chain cell offset (2 bytes)|
3958 * +----------------------------+
3959 * ...and then code to increment the execution
3960 * count:
3961 * mov r0, pc @ move adr of "mov r0,pc" + 4 to r0
3962 * sub r0, #10 @ back up to addr of executionCount
3963 * ldr r1, [r0]
3964 * add r1, #1
3965 * str r1, [r0]
3966 */
Bill Buzbee1465db52009-09-23 17:17:35 -07003967 newLIR1(cUnit, kArm16BitData, 0);
3968 newLIR1(cUnit, kArm16BitData, 0);
Ben Chengcc6600c2009-06-22 14:45:16 -07003969 cUnit->chainCellOffsetLIR =
Bill Buzbee1465db52009-09-23 17:17:35 -07003970 (LIR *) newLIR1(cUnit, kArm16BitData, CHAIN_CELL_OFFSET_TAG);
Bill Buzbee6e963e12009-06-17 16:56:19 -07003971 cUnit->headerSize = 6;
Bill Buzbee270c1d62009-08-13 16:58:07 -07003972 /* Thumb instruction used directly here to ensure correct size */
Bill Buzbee1465db52009-09-23 17:17:35 -07003973 newLIR2(cUnit, kThumbMovRR_H2L, r0, rpc);
3974 newLIR2(cUnit, kThumbSubRI8, r0, 10);
3975 newLIR3(cUnit, kThumbLdrRRI5, r1, r0, 0);
3976 newLIR2(cUnit, kThumbAddRI8, r1, 1);
3977 newLIR3(cUnit, kThumbStrRRI5, r1, r0, 0);
Bill Buzbee6e963e12009-06-17 16:56:19 -07003978 } else {
3979 /* Just reserve 2 bytes for the chain cell offset */
Ben Chengcc6600c2009-06-22 14:45:16 -07003980 cUnit->chainCellOffsetLIR =
Bill Buzbee1465db52009-09-23 17:17:35 -07003981 (LIR *) newLIR1(cUnit, kArm16BitData, CHAIN_CELL_OFFSET_TAG);
Bill Buzbee6e963e12009-06-17 16:56:19 -07003982 cUnit->headerSize = 2;
3983 }
Ben Cheng1efc9c52009-06-08 18:25:27 -07003984
Ben Chengba4fc8b2009-06-01 13:00:29 -07003985 /* Handle the content in each basic block */
3986 for (i = 0; i < cUnit->numBlocks; i++) {
3987 blockList[i]->visited = true;
3988 MIR *mir;
3989
3990 labelList[i].operands[0] = blockList[i]->startOffset;
3991
Ben Chengcec26f62010-01-15 15:29:33 -08003992 if (blockList[i]->blockType >= kChainingCellGap) {
Ben Cheng7a2697d2010-06-07 13:44:23 -07003993 if (blockList[i]->isFallThroughFromInvoke == true) {
Ben Chengd44faf52010-06-02 15:33:51 -07003994 /* Align this block first since it is a return chaining cell */
3995 newLIR0(cUnit, kArmPseudoPseudoAlign4);
3996 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07003997 /*
3998 * Append the label pseudo LIR first. Chaining cells will be handled
3999 * separately afterwards.
4000 */
4001 dvmCompilerAppendLIR(cUnit, (LIR *) &labelList[i]);
4002 }
4003
Ben Cheng7a2697d2010-06-07 13:44:23 -07004004 if (blockList[i]->blockType == kTraceEntryBlock) {
Ben Chenga4973592010-03-31 11:59:18 -07004005 labelList[i].opCode = kArmPseudoEntryBlock;
Ben Cheng4238ec22009-08-24 16:32:22 -07004006 if (blockList[i]->firstMIRInsn == NULL) {
4007 continue;
4008 } else {
4009 setupLoopEntryBlock(cUnit, blockList[i],
4010 &labelList[blockList[i]->fallThrough->id]);
4011 }
Ben Cheng7a2697d2010-06-07 13:44:23 -07004012 } else if (blockList[i]->blockType == kTraceExitBlock) {
Ben Chenga4973592010-03-31 11:59:18 -07004013 labelList[i].opCode = kArmPseudoExitBlock;
Ben Cheng4238ec22009-08-24 16:32:22 -07004014 goto gen_fallthrough;
Bill Buzbee1465db52009-09-23 17:17:35 -07004015 } else if (blockList[i]->blockType == kDalvikByteCode) {
4016 labelList[i].opCode = kArmPseudoNormalBlockLabel;
Ben Chenge9695e52009-06-16 16:11:47 -07004017 /* Reset the register state */
Bill Buzbeec6f10662010-02-09 11:16:15 -08004018 dvmCompilerResetRegPool(cUnit);
4019 dvmCompilerClobberAllRegs(cUnit);
4020 dvmCompilerResetNullCheck(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -07004021 } else {
4022 switch (blockList[i]->blockType) {
Bill Buzbee1465db52009-09-23 17:17:35 -07004023 case kChainingCellNormal:
Ben Chenga4973592010-03-31 11:59:18 -07004024 labelList[i].opCode = kArmPseudoChainingCellNormal;
Ben Chengba4fc8b2009-06-01 13:00:29 -07004025 /* handle the codegen later */
4026 dvmInsertGrowableList(
Bill Buzbee1465db52009-09-23 17:17:35 -07004027 &chainingListByType[kChainingCellNormal], (void *) i);
Ben Chengba4fc8b2009-06-01 13:00:29 -07004028 break;
Bill Buzbee1465db52009-09-23 17:17:35 -07004029 case kChainingCellInvokeSingleton:
Ben Cheng38329f52009-07-07 14:19:20 -07004030 labelList[i].opCode =
Ben Chenga4973592010-03-31 11:59:18 -07004031 kArmPseudoChainingCellInvokeSingleton;
Ben Chengba4fc8b2009-06-01 13:00:29 -07004032 labelList[i].operands[0] =
4033 (int) blockList[i]->containingMethod;
4034 /* handle the codegen later */
4035 dvmInsertGrowableList(
Bill Buzbee1465db52009-09-23 17:17:35 -07004036 &chainingListByType[kChainingCellInvokeSingleton],
Ben Cheng38329f52009-07-07 14:19:20 -07004037 (void *) i);
4038 break;
Bill Buzbee1465db52009-09-23 17:17:35 -07004039 case kChainingCellInvokePredicted:
Ben Cheng38329f52009-07-07 14:19:20 -07004040 labelList[i].opCode =
Ben Chenga4973592010-03-31 11:59:18 -07004041 kArmPseudoChainingCellInvokePredicted;
Ben Cheng38329f52009-07-07 14:19:20 -07004042 /* handle the codegen later */
4043 dvmInsertGrowableList(
Bill Buzbee1465db52009-09-23 17:17:35 -07004044 &chainingListByType[kChainingCellInvokePredicted],
Ben Cheng38329f52009-07-07 14:19:20 -07004045 (void *) i);
Ben Chengba4fc8b2009-06-01 13:00:29 -07004046 break;
Bill Buzbee1465db52009-09-23 17:17:35 -07004047 case kChainingCellHot:
Ben Chengba4fc8b2009-06-01 13:00:29 -07004048 labelList[i].opCode =
Ben Chenga4973592010-03-31 11:59:18 -07004049 kArmPseudoChainingCellHot;
Ben Chengba4fc8b2009-06-01 13:00:29 -07004050 /* handle the codegen later */
4051 dvmInsertGrowableList(
Bill Buzbee1465db52009-09-23 17:17:35 -07004052 &chainingListByType[kChainingCellHot],
Ben Chengba4fc8b2009-06-01 13:00:29 -07004053 (void *) i);
4054 break;
Bill Buzbee1465db52009-09-23 17:17:35 -07004055 case kPCReconstruction:
Ben Chengba4fc8b2009-06-01 13:00:29 -07004056 /* Make sure exception handling block is next */
4057 labelList[i].opCode =
Ben Chenga4973592010-03-31 11:59:18 -07004058 kArmPseudoPCReconstructionBlockLabel;
Ben Chengba4fc8b2009-06-01 13:00:29 -07004059 assert (i == cUnit->numBlocks - 2);
4060 handlePCReconstruction(cUnit, &labelList[i+1]);
4061 break;
Bill Buzbee1465db52009-09-23 17:17:35 -07004062 case kExceptionHandling:
4063 labelList[i].opCode = kArmPseudoEHBlockLabel;
Ben Chengba4fc8b2009-06-01 13:00:29 -07004064 if (cUnit->pcReconstructionList.numUsed) {
Bill Buzbee270c1d62009-08-13 16:58:07 -07004065 loadWordDisp(cUnit, rGLUE, offsetof(InterpState,
4066 jitToInterpEntries.dvmJitToInterpPunt),
4067 r1);
Bill Buzbee1465db52009-09-23 17:17:35 -07004068 opReg(cUnit, kOpBlx, r1);
Ben Chengba4fc8b2009-06-01 13:00:29 -07004069 }
4070 break;
Bill Buzbee9c4b7c82009-09-10 10:10:38 -07004071#if defined(WITH_SELF_VERIFICATION) || defined(WITH_JIT_TUNING)
Bill Buzbee1465db52009-09-23 17:17:35 -07004072 case kChainingCellBackwardBranch:
Jeff Hao97319a82009-08-12 16:57:15 -07004073 labelList[i].opCode =
Ben Chenga4973592010-03-31 11:59:18 -07004074 kArmPseudoChainingCellBackwardBranch;
Jeff Hao97319a82009-08-12 16:57:15 -07004075 /* handle the codegen later */
4076 dvmInsertGrowableList(
Bill Buzbee1465db52009-09-23 17:17:35 -07004077 &chainingListByType[kChainingCellBackwardBranch],
Jeff Hao97319a82009-08-12 16:57:15 -07004078 (void *) i);
4079 break;
4080#endif
Ben Chengba4fc8b2009-06-01 13:00:29 -07004081 default:
4082 break;
4083 }
4084 continue;
4085 }
Ben Chenge9695e52009-06-16 16:11:47 -07004086
Bill Buzbee89efc3d2009-07-28 11:22:22 -07004087 ArmLIR *headLIR = NULL;
Ben Chenge9695e52009-06-16 16:11:47 -07004088
Ben Chengba4fc8b2009-06-01 13:00:29 -07004089 for (mir = blockList[i]->firstMIRInsn; mir; mir = mir->next) {
Bill Buzbee1465db52009-09-23 17:17:35 -07004090
Bill Buzbeec6f10662010-02-09 11:16:15 -08004091 dvmCompilerResetRegPool(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07004092 if (gDvmJit.disableOpt & (1 << kTrackLiveTemps)) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08004093 dvmCompilerClobberAllRegs(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07004094 }
4095
4096 if (gDvmJit.disableOpt & (1 << kSuppressLoads)) {
Bill Buzbeec6f10662010-02-09 11:16:15 -08004097 dvmCompilerResetDefTracking(cUnit);
Bill Buzbee1465db52009-09-23 17:17:35 -07004098 }
4099
4100 if (mir->dalvikInsn.opCode >= kMirOpFirst) {
Ben Cheng4238ec22009-08-24 16:32:22 -07004101 handleExtendedMIR(cUnit, mir);
4102 continue;
4103 }
4104
Bill Buzbee1465db52009-09-23 17:17:35 -07004105
Ben Chengba4fc8b2009-06-01 13:00:29 -07004106 OpCode dalvikOpCode = mir->dalvikInsn.opCode;
4107 InstructionFormat dalvikFormat =
4108 dexGetInstrFormat(gDvm.instrFormat, dalvikOpCode);
Ben Cheng7a2697d2010-06-07 13:44:23 -07004109 char *note;
4110 if (mir->OptimizationFlags & MIR_INLINED) {
4111 note = " (I)";
4112 } else if (mir->OptimizationFlags & MIR_INLINED_PRED) {
4113 note = " (PI)";
4114 } else if (mir->OptimizationFlags & MIR_CALLEE) {
4115 note = " (C)";
4116 } else {
4117 note = NULL;
4118 }
4119
Bill Buzbee89efc3d2009-07-28 11:22:22 -07004120 ArmLIR *boundaryLIR =
Ben Chenga4973592010-03-31 11:59:18 -07004121 newLIR2(cUnit, kArmPseudoDalvikByteCodeBoundary,
Ben Chengccd6c012009-10-15 14:52:45 -07004122 mir->offset,
Ben Cheng7a2697d2010-06-07 13:44:23 -07004123 (int) dvmCompilerGetDalvikDisassembly(&mir->dalvikInsn,
4124 note));
Ben Cheng4238ec22009-08-24 16:32:22 -07004125 if (mir->ssaRep) {
4126 char *ssaString = dvmCompilerGetSSAString(cUnit, mir->ssaRep);
Bill Buzbee1465db52009-09-23 17:17:35 -07004127 newLIR1(cUnit, kArmPseudoSSARep, (int) ssaString);
Ben Cheng4238ec22009-08-24 16:32:22 -07004128 }
4129
Ben Chenge9695e52009-06-16 16:11:47 -07004130 /* Remember the first LIR for this block */
4131 if (headLIR == NULL) {
4132 headLIR = boundaryLIR;
Ben Chengd7d426a2009-09-22 11:23:36 -07004133 /* Set the first boundaryLIR as a scheduling barrier */
4134 headLIR->defMask = ENCODE_ALL;
Ben Chenge9695e52009-06-16 16:11:47 -07004135 }
Ben Cheng4238ec22009-08-24 16:32:22 -07004136
Ben Chengba4fc8b2009-06-01 13:00:29 -07004137 bool notHandled;
4138 /*
4139 * Debugging: screen the opcode first to see if it is in the
4140 * do[-not]-compile list
4141 */
Ben Cheng7eb3f7a2010-08-26 14:56:31 -07004142 bool singleStepMe = SINGLE_STEP_OP(dalvikOpCode);
Ben Chengd5adae12010-03-26 17:45:28 -07004143#if defined(WITH_SELF_VERIFICATION)
4144 if (singleStepMe == false) {
4145 singleStepMe = selfVerificationPuntOps(mir);
4146 }
4147#endif
Ben Chengba4fc8b2009-06-01 13:00:29 -07004148 if (singleStepMe || cUnit->allSingleStep) {
4149 notHandled = false;
4150 genInterpSingleStep(cUnit, mir);
4151 } else {
4152 opcodeCoverage[dalvikOpCode]++;
4153 switch (dalvikFormat) {
4154 case kFmt10t:
4155 case kFmt20t:
4156 case kFmt30t:
4157 notHandled = handleFmt10t_Fmt20t_Fmt30t(cUnit,
4158 mir, blockList[i], labelList);
4159 break;
4160 case kFmt10x:
4161 notHandled = handleFmt10x(cUnit, mir);
4162 break;
4163 case kFmt11n:
4164 case kFmt31i:
4165 notHandled = handleFmt11n_Fmt31i(cUnit, mir);
4166 break;
4167 case kFmt11x:
4168 notHandled = handleFmt11x(cUnit, mir);
4169 break;
4170 case kFmt12x:
4171 notHandled = handleFmt12x(cUnit, mir);
4172 break;
4173 case kFmt20bc:
4174 notHandled = handleFmt20bc(cUnit, mir);
4175 break;
4176 case kFmt21c:
4177 case kFmt31c:
4178 notHandled = handleFmt21c_Fmt31c(cUnit, mir);
4179 break;
4180 case kFmt21h:
4181 notHandled = handleFmt21h(cUnit, mir);
4182 break;
4183 case kFmt21s:
4184 notHandled = handleFmt21s(cUnit, mir);
4185 break;
4186 case kFmt21t:
4187 notHandled = handleFmt21t(cUnit, mir, blockList[i],
4188 labelList);
4189 break;
4190 case kFmt22b:
4191 case kFmt22s:
4192 notHandled = handleFmt22b_Fmt22s(cUnit, mir);
4193 break;
4194 case kFmt22c:
4195 notHandled = handleFmt22c(cUnit, mir);
4196 break;
4197 case kFmt22cs:
4198 notHandled = handleFmt22cs(cUnit, mir);
4199 break;
4200 case kFmt22t:
4201 notHandled = handleFmt22t(cUnit, mir, blockList[i],
4202 labelList);
4203 break;
4204 case kFmt22x:
4205 case kFmt32x:
4206 notHandled = handleFmt22x_Fmt32x(cUnit, mir);
4207 break;
4208 case kFmt23x:
4209 notHandled = handleFmt23x(cUnit, mir);
4210 break;
4211 case kFmt31t:
4212 notHandled = handleFmt31t(cUnit, mir);
4213 break;
4214 case kFmt3rc:
4215 case kFmt35c:
4216 notHandled = handleFmt35c_3rc(cUnit, mir, blockList[i],
4217 labelList);
4218 break;
4219 case kFmt3rms:
4220 case kFmt35ms:
4221 notHandled = handleFmt35ms_3rms(cUnit, mir,blockList[i],
4222 labelList);
4223 break;
4224 case kFmt3inline:
Andy McFaddenb0a05412009-11-19 10:23:41 -08004225 case kFmt3rinline:
Bill Buzbeece46c942009-11-20 15:41:34 -08004226 notHandled = handleExecuteInline(cUnit, mir);
Andy McFaddenb0a05412009-11-19 10:23:41 -08004227 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07004228 case kFmt51l:
4229 notHandled = handleFmt51l(cUnit, mir);
4230 break;
4231 default:
4232 notHandled = true;
4233 break;
4234 }
4235 }
4236 if (notHandled) {
4237 LOGE("%#06x: Opcode 0x%x (%s) / Fmt %d not handled\n",
4238 mir->offset,
Andy McFaddenc6b25c72010-06-22 11:01:20 -07004239 dalvikOpCode, dexGetOpcodeName(dalvikOpCode),
Ben Chengba4fc8b2009-06-01 13:00:29 -07004240 dalvikFormat);
Bill Buzbeefc519dc2010-03-06 23:30:57 -08004241 dvmCompilerAbort(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -07004242 break;
Ben Chengba4fc8b2009-06-01 13:00:29 -07004243 }
4244 }
Ben Cheng4238ec22009-08-24 16:32:22 -07004245
Ben Cheng7a2697d2010-06-07 13:44:23 -07004246 if (blockList[i]->blockType == kTraceEntryBlock) {
Ben Cheng4238ec22009-08-24 16:32:22 -07004247 dvmCompilerAppendLIR(cUnit,
4248 (LIR *) cUnit->loopAnalysis->branchToBody);
4249 dvmCompilerAppendLIR(cUnit,
4250 (LIR *) cUnit->loopAnalysis->branchToPCR);
4251 }
4252
4253 if (headLIR) {
4254 /*
4255 * Eliminate redundant loads/stores and delay stores into later
4256 * slots
4257 */
4258 dvmCompilerApplyLocalOptimizations(cUnit, (LIR *) headLIR,
4259 cUnit->lastLIRInsn);
4260 }
4261
4262gen_fallthrough:
Ben Cheng1efc9c52009-06-08 18:25:27 -07004263 /*
4264 * Check if the block is terminated due to trace length constraint -
4265 * insert an unconditional branch to the chaining cell.
4266 */
4267 if (blockList[i]->needFallThroughBranch) {
4268 genUnconditionalBranch(cUnit,
4269 &labelList[blockList[i]->fallThrough->id]);
4270 }
4271
Ben Chengba4fc8b2009-06-01 13:00:29 -07004272 }
4273
Ben Chenge9695e52009-06-16 16:11:47 -07004274 /* Handle the chaining cells in predefined order */
Ben Chengcec26f62010-01-15 15:29:33 -08004275 for (i = 0; i < kChainingCellGap; i++) {
Ben Chengba4fc8b2009-06-01 13:00:29 -07004276 size_t j;
4277 int *blockIdList = (int *) chainingListByType[i].elemList;
4278
4279 cUnit->numChainingCells[i] = chainingListByType[i].numUsed;
4280
4281 /* No chaining cells of this type */
4282 if (cUnit->numChainingCells[i] == 0)
4283 continue;
4284
4285 /* Record the first LIR for a new type of chaining cell */
4286 cUnit->firstChainingLIR[i] = (LIR *) &labelList[blockIdList[0]];
4287
4288 for (j = 0; j < chainingListByType[i].numUsed; j++) {
4289 int blockId = blockIdList[j];
4290
4291 /* Align this chaining cell first */
Bill Buzbee1465db52009-09-23 17:17:35 -07004292 newLIR0(cUnit, kArmPseudoPseudoAlign4);
Ben Chengba4fc8b2009-06-01 13:00:29 -07004293
4294 /* Insert the pseudo chaining instruction */
4295 dvmCompilerAppendLIR(cUnit, (LIR *) &labelList[blockId]);
4296
4297
4298 switch (blockList[blockId]->blockType) {
Bill Buzbee1465db52009-09-23 17:17:35 -07004299 case kChainingCellNormal:
Ben Cheng1efc9c52009-06-08 18:25:27 -07004300 handleNormalChainingCell(cUnit,
Ben Chengba4fc8b2009-06-01 13:00:29 -07004301 blockList[blockId]->startOffset);
4302 break;
Bill Buzbee1465db52009-09-23 17:17:35 -07004303 case kChainingCellInvokeSingleton:
Ben Cheng38329f52009-07-07 14:19:20 -07004304 handleInvokeSingletonChainingCell(cUnit,
Ben Chengba4fc8b2009-06-01 13:00:29 -07004305 blockList[blockId]->containingMethod);
4306 break;
Bill Buzbee1465db52009-09-23 17:17:35 -07004307 case kChainingCellInvokePredicted:
Ben Cheng38329f52009-07-07 14:19:20 -07004308 handleInvokePredictedChainingCell(cUnit);
4309 break;
Bill Buzbee1465db52009-09-23 17:17:35 -07004310 case kChainingCellHot:
Ben Cheng1efc9c52009-06-08 18:25:27 -07004311 handleHotChainingCell(cUnit,
Ben Chengba4fc8b2009-06-01 13:00:29 -07004312 blockList[blockId]->startOffset);
4313 break;
Bill Buzbee9c4b7c82009-09-10 10:10:38 -07004314#if defined(WITH_SELF_VERIFICATION) || defined(WITH_JIT_TUNING)
Bill Buzbee1465db52009-09-23 17:17:35 -07004315 case kChainingCellBackwardBranch:
Jeff Hao97319a82009-08-12 16:57:15 -07004316 handleBackwardBranchChainingCell(cUnit,
4317 blockList[blockId]->startOffset);
4318 break;
4319#endif
Ben Chengba4fc8b2009-06-01 13:00:29 -07004320 default:
Bill Buzbee1465db52009-09-23 17:17:35 -07004321 LOGE("Bad blocktype %d", blockList[blockId]->blockType);
Bill Buzbeefc519dc2010-03-06 23:30:57 -08004322 dvmCompilerAbort(cUnit);
Ben Chengba4fc8b2009-06-01 13:00:29 -07004323 }
4324 }
4325 }
Ben Chenge9695e52009-06-16 16:11:47 -07004326
Ben Chengcec26f62010-01-15 15:29:33 -08004327 /* Mark the bottom of chaining cells */
4328 cUnit->chainingCellBottom = (LIR *) newLIR0(cUnit, kArmChainingCellBottom);
4329
Ben Cheng6c10a972009-10-29 14:39:18 -07004330 /*
4331 * Generate the branch to the dvmJitToInterpNoChain entry point at the end
4332 * of all chaining cells for the overflow cases.
4333 */
4334 if (cUnit->switchOverflowPad) {
4335 loadConstant(cUnit, r0, (int) cUnit->switchOverflowPad);
4336 loadWordDisp(cUnit, rGLUE, offsetof(InterpState,
4337 jitToInterpEntries.dvmJitToInterpNoChain), r2);
4338 opRegReg(cUnit, kOpAdd, r1, r1);
4339 opRegRegReg(cUnit, kOpAdd, r4PC, r0, r1);
Ben Cheng978738d2010-05-13 13:45:57 -07004340#if defined(WITH_JIT_TUNING)
Ben Cheng6c10a972009-10-29 14:39:18 -07004341 loadConstant(cUnit, r0, kSwitchOverflow);
4342#endif
4343 opReg(cUnit, kOpBlx, r2);
4344 }
4345
Ben Chenge9695e52009-06-16 16:11:47 -07004346 dvmCompilerApplyGlobalOptimizations(cUnit);
jeffhao9e45c0b2010-02-03 10:24:05 -08004347
4348#if defined(WITH_SELF_VERIFICATION)
4349 selfVerificationBranchInsertPass(cUnit);
4350#endif
Ben Chengba4fc8b2009-06-01 13:00:29 -07004351}
4352
4353/* Accept the work and start compiling */
Bill Buzbee716f1202009-07-23 13:22:09 -07004354bool dvmCompilerDoWork(CompilerWorkOrder *work)
Ben Chengba4fc8b2009-06-01 13:00:29 -07004355{
Ben Chengccd6c012009-10-15 14:52:45 -07004356 bool res;
Ben Chengba4fc8b2009-06-01 13:00:29 -07004357
Ben Cheng6999d842010-01-26 16:46:15 -08004358 if (gDvmJit.codeCacheFull) {
Ben Chengccd6c012009-10-15 14:52:45 -07004359 return false;
4360 }
Ben Chengba4fc8b2009-06-01 13:00:29 -07004361
Ben Chengccd6c012009-10-15 14:52:45 -07004362 switch (work->kind) {
Ben Chengccd6c012009-10-15 14:52:45 -07004363 case kWorkOrderTrace:
4364 /* Start compilation with maximally allowed trace length */
Bill Buzbeefc519dc2010-03-06 23:30:57 -08004365 res = dvmCompileTrace(work->info, JIT_MAX_TRACE_LEN, &work->result,
Ben Cheng4a419582010-08-04 13:23:09 -07004366 work->bailPtr, 0 /* no hints */);
Ben Chengccd6c012009-10-15 14:52:45 -07004367 break;
4368 case kWorkOrderTraceDebug: {
4369 bool oldPrintMe = gDvmJit.printMe;
4370 gDvmJit.printMe = true;
4371 /* Start compilation with maximally allowed trace length */
Bill Buzbeefc519dc2010-03-06 23:30:57 -08004372 res = dvmCompileTrace(work->info, JIT_MAX_TRACE_LEN, &work->result,
Ben Cheng4a419582010-08-04 13:23:09 -07004373 work->bailPtr, 0 /* no hints */);
Elliott Hughes672511b2010-04-26 17:40:13 -07004374 gDvmJit.printMe = oldPrintMe;
Ben Chengccd6c012009-10-15 14:52:45 -07004375 break;
4376 }
4377 default:
4378 res = false;
Bill Buzbeefc519dc2010-03-06 23:30:57 -08004379 LOGE("Jit: unknown work order type");
Elliott Hughes672511b2010-04-26 17:40:13 -07004380 assert(0); // Bail if debug build, discard otherwise
Ben Chengccd6c012009-10-15 14:52:45 -07004381 }
4382 return res;
Ben Chengba4fc8b2009-06-01 13:00:29 -07004383}
4384
Ben Chengba4fc8b2009-06-01 13:00:29 -07004385/* Architectural-specific debugging helpers go here */
4386void dvmCompilerArchDump(void)
4387{
4388 /* Print compiled opcode in this VM instance */
4389 int i, start, streak;
4390 char buf[1024];
4391
4392 streak = i = 0;
4393 buf[0] = 0;
4394 while (opcodeCoverage[i] == 0 && i < 256) {
4395 i++;
4396 }
4397 if (i == 256) {
4398 return;
4399 }
4400 for (start = i++, streak = 1; i < 256; i++) {
4401 if (opcodeCoverage[i]) {
4402 streak++;
4403 } else {
4404 if (streak == 1) {
4405 sprintf(buf+strlen(buf), "%x,", start);
4406 } else {
4407 sprintf(buf+strlen(buf), "%x-%x,", start, start + streak - 1);
4408 }
4409 streak = 0;
4410 while (opcodeCoverage[i] == 0 && i < 256) {
4411 i++;
4412 }
4413 if (i < 256) {
4414 streak = 1;
4415 start = i;
4416 }
4417 }
4418 }
4419 if (streak) {
4420 if (streak == 1) {
4421 sprintf(buf+strlen(buf), "%x", start);
4422 } else {
4423 sprintf(buf+strlen(buf), "%x-%x", start, start + streak - 1);
4424 }
4425 }
4426 if (strlen(buf)) {
Ben Cheng8b258bf2009-06-24 17:27:07 -07004427 LOGD("dalvik.vm.jit.op = %s", buf);
Ben Chengba4fc8b2009-06-01 13:00:29 -07004428 }
4429}
Ben Chengd7d426a2009-09-22 11:23:36 -07004430
4431/* Common initialization routine for an architecture family */
4432bool dvmCompilerArchInit()
4433{
4434 int i;
4435
Bill Buzbee1465db52009-09-23 17:17:35 -07004436 for (i = 0; i < kArmLast; i++) {
Ben Chengd7d426a2009-09-22 11:23:36 -07004437 if (EncodingMap[i].opCode != i) {
4438 LOGE("Encoding order for %s is wrong: expecting %d, seeing %d",
4439 EncodingMap[i].name, i, EncodingMap[i].opCode);
Bill Buzbeefc519dc2010-03-06 23:30:57 -08004440 dvmAbort(); // OK to dvmAbort - build error
Ben Chengd7d426a2009-09-22 11:23:36 -07004441 }
4442 }
4443
Ben Cheng5d90c202009-11-22 23:31:11 -08004444 return dvmCompilerArchVariantInit();
4445}
4446
4447void *dvmCompilerGetInterpretTemplate()
4448{
4449 return (void*) ((int)gDvmJit.codeCache +
4450 templateEntryOffsets[TEMPLATE_INTERPRET]);
4451}
4452
buzbeebff121a2010-08-04 15:25:06 -07004453/* Needed by the Assembler */
4454void dvmCompilerSetupResourceMasks(ArmLIR *lir)
4455{
4456 setupResourceMasks(lir);
4457}
4458
Ben Cheng5d90c202009-11-22 23:31:11 -08004459/* Needed by the ld/st optmizatons */
4460ArmLIR* dvmCompilerRegCopyNoInsert(CompilationUnit *cUnit, int rDest, int rSrc)
4461{
4462 return genRegCopyNoInsert(cUnit, rDest, rSrc);
4463}
4464
4465/* Needed by the register allocator */
4466ArmLIR* dvmCompilerRegCopy(CompilationUnit *cUnit, int rDest, int rSrc)
4467{
4468 return genRegCopy(cUnit, rDest, rSrc);
4469}
4470
4471/* Needed by the register allocator */
4472void dvmCompilerRegCopyWide(CompilationUnit *cUnit, int destLo, int destHi,
4473 int srcLo, int srcHi)
4474{
4475 genRegCopyWide(cUnit, destLo, destHi, srcLo, srcHi);
4476}
4477
4478void dvmCompilerFlushRegImpl(CompilationUnit *cUnit, int rBase,
4479 int displacement, int rSrc, OpSize size)
4480{
4481 storeBaseDisp(cUnit, rBase, displacement, rSrc, size);
4482}
4483
4484void dvmCompilerFlushRegWideImpl(CompilationUnit *cUnit, int rBase,
4485 int displacement, int rSrcLo, int rSrcHi)
4486{
4487 storeBaseDispWide(cUnit, rBase, displacement, rSrcLo, rSrcHi);
Ben Chengd7d426a2009-09-22 11:23:36 -07004488}