blob: 864372a5449843c030571f5b259c76fae75eaa97 [file] [log] [blame]
buzbee2cfc6392012-05-07 14:51:40 -07001/*
2 * Copyright (C) 2011 The Android Open Source Project
3 *
4 * Licensed under the Apache License, Version 2.0 (the "License");
5 * you may not use this file except in compliance with the License.
6 * You may obtain a copy of the License at
7 *
8 * http://www.apache.org/licenses/LICENSE-2.0
9 *
10 * Unless required by applicable law or agreed to in writing, software
11 * distributed under the License is distributed on an "AS IS" BASIS,
12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13 * See the License for the specific language governing permissions and
14 * limitations under the License.
15 */
16
17#if defined(ART_USE_QUICK_COMPILER)
18
19#include "object_utils.h"
20
21#include <llvm/Support/ToolOutputFile.h>
22#include <llvm/Bitcode/ReaderWriter.h>
23#include <llvm/Analysis/Verifier.h>
24#include <llvm/Metadata.h>
25#include <llvm/ADT/DepthFirstIterator.h>
26#include <llvm/Instruction.h>
27#include <llvm/Type.h>
28#include <llvm/Instructions.h>
29#include <llvm/Support/Casting.h>
buzbeead8f15e2012-06-18 14:49:45 -070030#include <llvm/Support/InstIterator.h>
buzbee2cfc6392012-05-07 14:51:40 -070031
Elliott Hughes74847412012-06-20 18:10:21 -070032static const char* kLabelFormat = "L0x%x_%d";
buzbee2cfc6392012-05-07 14:51:40 -070033
34namespace art {
35extern const RegLocation badLoc;
buzbeeb03f4872012-06-11 15:22:11 -070036RegLocation getLoc(CompilationUnit* cUnit, llvm::Value* val);
buzbee2cfc6392012-05-07 14:51:40 -070037
38llvm::BasicBlock* getLLVMBlock(CompilationUnit* cUnit, int id)
39{
40 return cUnit->idToBlockMap.Get(id);
41}
42
43llvm::Value* getLLVMValue(CompilationUnit* cUnit, int sReg)
44{
45 return (llvm::Value*)oatGrowableListGetElement(&cUnit->llvmValues, sReg);
46}
47
48// Replace the placeholder value with the real definition
49void defineValue(CompilationUnit* cUnit, llvm::Value* val, int sReg)
50{
51 llvm::Value* placeholder = getLLVMValue(cUnit, sReg);
buzbee9a2487f2012-07-26 14:01:13 -070052 if (placeholder == NULL) {
53 // This can happen on instruction rewrite on verification failure
Brian Carlstrom937b73e2012-08-01 16:09:16 -070054 LOG(WARNING) << "Null placeholder - invalid CFG";
buzbee9a2487f2012-07-26 14:01:13 -070055 return;
56 }
buzbee2cfc6392012-05-07 14:51:40 -070057 placeholder->replaceAllUsesWith(val);
58 val->takeName(placeholder);
59 cUnit->llvmValues.elemList[sReg] = (intptr_t)val;
buzbee4be777b2012-07-12 14:38:18 -070060 llvm::Instruction* inst = llvm::dyn_cast<llvm::Instruction>(placeholder);
61 DCHECK(inst != NULL);
62 inst->eraseFromParent();
buzbee2cfc6392012-05-07 14:51:40 -070063}
64
65llvm::Type* llvmTypeFromLocRec(CompilationUnit* cUnit, RegLocation loc)
66{
67 llvm::Type* res = NULL;
68 if (loc.wide) {
69 if (loc.fp)
buzbee4f1181f2012-06-22 13:52:12 -070070 res = cUnit->irb->getDoubleTy();
buzbee2cfc6392012-05-07 14:51:40 -070071 else
buzbee4f1181f2012-06-22 13:52:12 -070072 res = cUnit->irb->getInt64Ty();
buzbee2cfc6392012-05-07 14:51:40 -070073 } else {
74 if (loc.fp) {
buzbee4f1181f2012-06-22 13:52:12 -070075 res = cUnit->irb->getFloatTy();
buzbee2cfc6392012-05-07 14:51:40 -070076 } else {
77 if (loc.ref)
78 res = cUnit->irb->GetJObjectTy();
79 else
buzbee4f1181f2012-06-22 13:52:12 -070080 res = cUnit->irb->getInt32Ty();
buzbee2cfc6392012-05-07 14:51:40 -070081 }
82 }
83 return res;
84}
85
buzbeead8f15e2012-06-18 14:49:45 -070086/* Create an in-memory RegLocation from an llvm Value. */
87void createLocFromValue(CompilationUnit* cUnit, llvm::Value* val)
88{
89 // NOTE: llvm takes shortcuts with c_str() - get to std::string firstt
90 std::string s(val->getName().str());
91 const char* valName = s.c_str();
buzbeead8f15e2012-06-18 14:49:45 -070092 SafeMap<llvm::Value*, RegLocation>::iterator it = cUnit->locMap.find(val);
93 DCHECK(it == cUnit->locMap.end()) << " - already defined: " << valName;
94 int baseSReg = INVALID_SREG;
95 int subscript = -1;
96 sscanf(valName, "v%d_%d", &baseSReg, &subscript);
97 if ((baseSReg == INVALID_SREG) && (!strcmp(valName, "method"))) {
98 baseSReg = SSA_METHOD_BASEREG;
99 subscript = 0;
100 }
buzbeead8f15e2012-06-18 14:49:45 -0700101 DCHECK_NE(baseSReg, INVALID_SREG);
102 DCHECK_NE(subscript, -1);
103 // TODO: redo during C++'ification
104 RegLocation loc = {kLocDalvikFrame, 0, 0, 0, 0, 0, 0, 0, 0, INVALID_REG,
105 INVALID_REG, INVALID_SREG, INVALID_SREG};
106 llvm::Type* ty = val->getType();
107 loc.wide = ((ty == cUnit->irb->getInt64Ty()) ||
108 (ty == cUnit->irb->getDoubleTy()));
109 loc.defined = true;
110 if ((ty == cUnit->irb->getFloatTy()) ||
111 (ty == cUnit->irb->getDoubleTy())) {
112 loc.fp = true;
113 } else if (ty == cUnit->irb->GetJObjectTy()) {
114 loc.ref = true;
115 } else {
116 loc.core = true;
117 }
118 loc.home = false; // Will change during promotion
119 loc.sRegLow = baseSReg;
120 loc.origSReg = cUnit->locMap.size();
121 cUnit->locMap.Put(val, loc);
122}
123
buzbee2cfc6392012-05-07 14:51:40 -0700124void initIR(CompilationUnit* cUnit)
125{
126 cUnit->context = new llvm::LLVMContext();
127 cUnit->module = new llvm::Module("art", *cUnit->context);
128 llvm::StructType::create(*cUnit->context, "JavaObject");
129 llvm::StructType::create(*cUnit->context, "Method");
130 llvm::StructType::create(*cUnit->context, "Thread");
131 cUnit->intrinsic_helper =
132 new greenland::IntrinsicHelper(*cUnit->context, *cUnit->module);
133 cUnit->irb =
134 new greenland::IRBuilder(*cUnit->context, *cUnit->module,
135 *cUnit->intrinsic_helper);
136}
137
138void freeIR(CompilationUnit* cUnit)
139{
140 delete cUnit->irb;
141 delete cUnit->intrinsic_helper;
142 delete cUnit->module;
143 delete cUnit->context;
144}
145
146const char* llvmSSAName(CompilationUnit* cUnit, int ssaReg) {
147 return GET_ELEM_N(cUnit->ssaStrings, char*, ssaReg);
148}
149
buzbeef58c12c2012-07-03 15:06:29 -0700150llvm::BasicBlock* findCaseTarget(CompilationUnit* cUnit, uint32_t vaddr)
151{
152 BasicBlock* bb = oatFindBlock(cUnit, vaddr);
153 DCHECK(bb != NULL);
154 return getLLVMBlock(cUnit, bb->id);
155}
156
157void convertPackedSwitch(CompilationUnit* cUnit, BasicBlock* bb,
158 int32_t tableOffset, RegLocation rlSrc)
159{
160 const Instruction::PackedSwitchPayload* payload =
161 reinterpret_cast<const Instruction::PackedSwitchPayload*>(
162 cUnit->insns + cUnit->currentDalvikOffset + tableOffset);
163
164 llvm::Value* value = getLLVMValue(cUnit, rlSrc.origSReg);
165
166 llvm::SwitchInst* sw =
167 cUnit->irb->CreateSwitch(value, getLLVMBlock(cUnit, bb->fallThrough->id),
168 payload->case_count);
169
170 for (uint16_t i = 0; i < payload->case_count; ++i) {
171 llvm::BasicBlock* llvmBB =
172 findCaseTarget(cUnit, cUnit->currentDalvikOffset + payload->targets[i]);
173 sw->addCase(cUnit->irb->getInt32(payload->first_key + i), llvmBB);
174 }
175 llvm::MDNode* switchNode =
176 llvm::MDNode::get(*cUnit->context, cUnit->irb->getInt32(tableOffset));
177 sw->setMetadata("SwitchTable", switchNode);
178 bb->taken = NULL;
179 bb->fallThrough = NULL;
180}
181
buzbeea1da8a52012-07-09 14:00:21 -0700182void convertSparseSwitch(CompilationUnit* cUnit, BasicBlock* bb,
183 int32_t tableOffset, RegLocation rlSrc)
184{
185 const Instruction::SparseSwitchPayload* payload =
186 reinterpret_cast<const Instruction::SparseSwitchPayload*>(
187 cUnit->insns + cUnit->currentDalvikOffset + tableOffset);
188
189 const int32_t* keys = payload->GetKeys();
190 const int32_t* targets = payload->GetTargets();
191
192 llvm::Value* value = getLLVMValue(cUnit, rlSrc.origSReg);
193
194 llvm::SwitchInst* sw =
195 cUnit->irb->CreateSwitch(value, getLLVMBlock(cUnit, bb->fallThrough->id),
196 payload->case_count);
197
198 for (size_t i = 0; i < payload->case_count; ++i) {
199 llvm::BasicBlock* llvmBB =
200 findCaseTarget(cUnit, cUnit->currentDalvikOffset + targets[i]);
201 sw->addCase(cUnit->irb->getInt32(keys[i]), llvmBB);
202 }
203 llvm::MDNode* switchNode =
204 llvm::MDNode::get(*cUnit->context, cUnit->irb->getInt32(tableOffset));
205 sw->setMetadata("SwitchTable", switchNode);
206 bb->taken = NULL;
207 bb->fallThrough = NULL;
208}
209
buzbee8fa0fda2012-06-27 15:44:52 -0700210void convertSget(CompilationUnit* cUnit, int32_t fieldIndex,
211 greenland::IntrinsicHelper::IntrinsicId id,
212 RegLocation rlDest)
buzbee4f1181f2012-06-22 13:52:12 -0700213{
buzbee8fa0fda2012-06-27 15:44:52 -0700214 llvm::Constant* fieldIdx = cUnit->irb->getInt32(fieldIndex);
buzbee4f1181f2012-06-22 13:52:12 -0700215 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
buzbee8fa0fda2012-06-27 15:44:52 -0700216 llvm::Value* res = cUnit->irb->CreateCall(intr, fieldIdx);
217 defineValue(cUnit, res, rlDest.origSReg);
218}
219
220void convertSput(CompilationUnit* cUnit, int32_t fieldIndex,
221 greenland::IntrinsicHelper::IntrinsicId id,
222 RegLocation rlSrc)
223{
224 llvm::SmallVector<llvm::Value*, 2> args;
225 args.push_back(cUnit->irb->getInt32(fieldIndex));
226 args.push_back(getLLVMValue(cUnit, rlSrc.origSReg));
227 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
228 cUnit->irb->CreateCall(intr, args);
buzbee4f1181f2012-06-22 13:52:12 -0700229}
230
buzbee101305f2012-06-28 18:00:56 -0700231void convertFillArrayData(CompilationUnit* cUnit, int32_t offset,
232 RegLocation rlArray)
233{
234 greenland::IntrinsicHelper::IntrinsicId id;
235 id = greenland::IntrinsicHelper::FillArrayData;
236 llvm::SmallVector<llvm::Value*, 2> args;
237 args.push_back(cUnit->irb->getInt32(offset));
238 args.push_back(getLLVMValue(cUnit, rlArray.origSReg));
239 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
240 cUnit->irb->CreateCall(intr, args);
241}
242
buzbee2cfc6392012-05-07 14:51:40 -0700243llvm::Value* emitConst(CompilationUnit* cUnit, llvm::ArrayRef<llvm::Value*> src,
244 RegLocation loc)
245{
246 greenland::IntrinsicHelper::IntrinsicId id;
247 if (loc.wide) {
248 if (loc.fp) {
249 id = greenland::IntrinsicHelper::ConstDouble;
250 } else {
251 id = greenland::IntrinsicHelper::ConstLong;
252 }
253 } else {
254 if (loc.fp) {
255 id = greenland::IntrinsicHelper::ConstFloat;
buzbee4f1181f2012-06-22 13:52:12 -0700256 } else if (loc.ref) {
buzbee2cfc6392012-05-07 14:51:40 -0700257 id = greenland::IntrinsicHelper::ConstObj;
258 } else {
259 id = greenland::IntrinsicHelper::ConstInt;
260 }
261 }
262 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
263 return cUnit->irb->CreateCall(intr, src);
264}
buzbeeb03f4872012-06-11 15:22:11 -0700265
266void emitPopShadowFrame(CompilationUnit* cUnit)
267{
268 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(
269 greenland::IntrinsicHelper::PopShadowFrame);
270 cUnit->irb->CreateCall(intr);
271}
272
buzbee2cfc6392012-05-07 14:51:40 -0700273llvm::Value* emitCopy(CompilationUnit* cUnit, llvm::ArrayRef<llvm::Value*> src,
274 RegLocation loc)
275{
276 greenland::IntrinsicHelper::IntrinsicId id;
277 if (loc.wide) {
278 if (loc.fp) {
279 id = greenland::IntrinsicHelper::CopyDouble;
280 } else {
281 id = greenland::IntrinsicHelper::CopyLong;
282 }
283 } else {
284 if (loc.fp) {
285 id = greenland::IntrinsicHelper::CopyFloat;
buzbee4f1181f2012-06-22 13:52:12 -0700286 } else if (loc.ref) {
buzbee2cfc6392012-05-07 14:51:40 -0700287 id = greenland::IntrinsicHelper::CopyObj;
288 } else {
289 id = greenland::IntrinsicHelper::CopyInt;
290 }
291 }
292 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
293 return cUnit->irb->CreateCall(intr, src);
294}
295
buzbee32412962012-06-26 16:27:56 -0700296void convertMoveException(CompilationUnit* cUnit, RegLocation rlDest)
297{
298 llvm::Function* func = cUnit->intrinsic_helper->GetIntrinsicFunction(
299 greenland::IntrinsicHelper::GetException);
300 llvm::Value* res = cUnit->irb->CreateCall(func);
301 defineValue(cUnit, res, rlDest.origSReg);
302}
303
304void convertThrow(CompilationUnit* cUnit, RegLocation rlSrc)
305{
306 llvm::Value* src = getLLVMValue(cUnit, rlSrc.origSReg);
307 llvm::Function* func = cUnit->intrinsic_helper->GetIntrinsicFunction(
308 greenland::IntrinsicHelper::Throw);
309 cUnit->irb->CreateCall(func, src);
Brian Carlstrom937b73e2012-08-01 16:09:16 -0700310 cUnit->irb->CreateUnreachable();
buzbee32412962012-06-26 16:27:56 -0700311}
312
buzbee8fa0fda2012-06-27 15:44:52 -0700313void convertMonitorEnterExit(CompilationUnit* cUnit, int optFlags,
314 greenland::IntrinsicHelper::IntrinsicId id,
315 RegLocation rlSrc)
316{
317 llvm::SmallVector<llvm::Value*, 2> args;
318 args.push_back(cUnit->irb->getInt32(optFlags));
319 args.push_back(getLLVMValue(cUnit, rlSrc.origSReg));
320 llvm::Function* func = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
321 cUnit->irb->CreateCall(func, args);
322}
323
buzbee76592632012-06-29 15:18:35 -0700324void convertArrayLength(CompilationUnit* cUnit, int optFlags,
325 RegLocation rlDest, RegLocation rlSrc)
buzbee8fa0fda2012-06-27 15:44:52 -0700326{
327 llvm::SmallVector<llvm::Value*, 2> args;
328 args.push_back(cUnit->irb->getInt32(optFlags));
329 args.push_back(getLLVMValue(cUnit, rlSrc.origSReg));
330 llvm::Function* func = cUnit->intrinsic_helper->GetIntrinsicFunction(
331 greenland::IntrinsicHelper::ArrayLength);
buzbee76592632012-06-29 15:18:35 -0700332 llvm::Value* res = cUnit->irb->CreateCall(func, args);
333 defineValue(cUnit, res, rlDest.origSReg);
buzbee8fa0fda2012-06-27 15:44:52 -0700334}
335
buzbee32412962012-06-26 16:27:56 -0700336void convertThrowVerificationError(CompilationUnit* cUnit, int info1, int info2)
337{
338 llvm::Function* func = cUnit->intrinsic_helper->GetIntrinsicFunction(
buzbeea1da8a52012-07-09 14:00:21 -0700339 greenland::IntrinsicHelper::ThrowVerificationError);
buzbee32412962012-06-26 16:27:56 -0700340 llvm::SmallVector<llvm::Value*, 2> args;
341 args.push_back(cUnit->irb->getInt32(info1));
342 args.push_back(cUnit->irb->getInt32(info2));
343 cUnit->irb->CreateCall(func, args);
buzbee32412962012-06-26 16:27:56 -0700344}
345
buzbee2cfc6392012-05-07 14:51:40 -0700346void emitSuspendCheck(CompilationUnit* cUnit)
347{
348 greenland::IntrinsicHelper::IntrinsicId id =
349 greenland::IntrinsicHelper::CheckSuspend;
350 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
351 cUnit->irb->CreateCall(intr);
352}
353
354llvm::Value* convertCompare(CompilationUnit* cUnit, ConditionCode cc,
355 llvm::Value* src1, llvm::Value* src2)
356{
357 llvm::Value* res = NULL;
buzbee76592632012-06-29 15:18:35 -0700358 DCHECK_EQ(src1->getType(), src2->getType());
buzbee2cfc6392012-05-07 14:51:40 -0700359 switch(cc) {
360 case kCondEq: res = cUnit->irb->CreateICmpEQ(src1, src2); break;
361 case kCondNe: res = cUnit->irb->CreateICmpNE(src1, src2); break;
362 case kCondLt: res = cUnit->irb->CreateICmpSLT(src1, src2); break;
363 case kCondGe: res = cUnit->irb->CreateICmpSGE(src1, src2); break;
364 case kCondGt: res = cUnit->irb->CreateICmpSGT(src1, src2); break;
365 case kCondLe: res = cUnit->irb->CreateICmpSLE(src1, src2); break;
366 default: LOG(FATAL) << "Unexpected cc value " << cc;
367 }
368 return res;
369}
370
371void convertCompareAndBranch(CompilationUnit* cUnit, BasicBlock* bb, MIR* mir,
372 ConditionCode cc, RegLocation rlSrc1,
373 RegLocation rlSrc2)
374{
375 if (bb->taken->startOffset <= mir->offset) {
376 emitSuspendCheck(cUnit);
377 }
378 llvm::Value* src1 = getLLVMValue(cUnit, rlSrc1.origSReg);
379 llvm::Value* src2 = getLLVMValue(cUnit, rlSrc2.origSReg);
380 llvm::Value* condValue = convertCompare(cUnit, cc, src1, src2);
381 condValue->setName(StringPrintf("t%d", cUnit->tempName++));
382 cUnit->irb->CreateCondBr(condValue, getLLVMBlock(cUnit, bb->taken->id),
383 getLLVMBlock(cUnit, bb->fallThrough->id));
buzbee6969d502012-06-15 16:40:31 -0700384 // Don't redo the fallthrough branch in the BB driver
385 bb->fallThrough = NULL;
buzbee2cfc6392012-05-07 14:51:40 -0700386}
387
388void convertCompareZeroAndBranch(CompilationUnit* cUnit, BasicBlock* bb,
389 MIR* mir, ConditionCode cc, RegLocation rlSrc1)
390{
391 if (bb->taken->startOffset <= mir->offset) {
392 emitSuspendCheck(cUnit);
393 }
394 llvm::Value* src1 = getLLVMValue(cUnit, rlSrc1.origSReg);
395 llvm::Value* src2;
396 if (rlSrc1.ref) {
397 src2 = cUnit->irb->GetJNull();
398 } else {
399 src2 = cUnit->irb->getInt32(0);
400 }
401 llvm::Value* condValue = convertCompare(cUnit, cc, src1, src2);
buzbee2cfc6392012-05-07 14:51:40 -0700402 cUnit->irb->CreateCondBr(condValue, getLLVMBlock(cUnit, bb->taken->id),
403 getLLVMBlock(cUnit, bb->fallThrough->id));
buzbee6969d502012-06-15 16:40:31 -0700404 // Don't redo the fallthrough branch in the BB driver
405 bb->fallThrough = NULL;
buzbee2cfc6392012-05-07 14:51:40 -0700406}
407
408llvm::Value* genDivModOp(CompilationUnit* cUnit, bool isDiv, bool isLong,
409 llvm::Value* src1, llvm::Value* src2)
410{
411 greenland::IntrinsicHelper::IntrinsicId id;
412 if (isLong) {
413 if (isDiv) {
414 id = greenland::IntrinsicHelper::DivLong;
415 } else {
416 id = greenland::IntrinsicHelper::RemLong;
417 }
418 } else if (isDiv) {
419 id = greenland::IntrinsicHelper::DivInt;
420 } else {
421 id = greenland::IntrinsicHelper::RemInt;
422 }
423 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
424 llvm::SmallVector<llvm::Value*, 2>args;
425 args.push_back(src1);
426 args.push_back(src2);
427 return cUnit->irb->CreateCall(intr, args);
428}
429
430llvm::Value* genArithOp(CompilationUnit* cUnit, OpKind op, bool isLong,
431 llvm::Value* src1, llvm::Value* src2)
432{
433 llvm::Value* res = NULL;
434 switch(op) {
435 case kOpAdd: res = cUnit->irb->CreateAdd(src1, src2); break;
436 case kOpSub: res = cUnit->irb->CreateSub(src1, src2); break;
buzbee4f1181f2012-06-22 13:52:12 -0700437 case kOpRsub: res = cUnit->irb->CreateSub(src2, src1); break;
buzbee2cfc6392012-05-07 14:51:40 -0700438 case kOpMul: res = cUnit->irb->CreateMul(src1, src2); break;
439 case kOpOr: res = cUnit->irb->CreateOr(src1, src2); break;
440 case kOpAnd: res = cUnit->irb->CreateAnd(src1, src2); break;
441 case kOpXor: res = cUnit->irb->CreateXor(src1, src2); break;
442 case kOpDiv: res = genDivModOp(cUnit, true, isLong, src1, src2); break;
443 case kOpRem: res = genDivModOp(cUnit, false, isLong, src1, src2); break;
buzbee4f1181f2012-06-22 13:52:12 -0700444 case kOpLsl: res = cUnit->irb->CreateShl(src1, src2); break;
445 case kOpLsr: res = cUnit->irb->CreateLShr(src1, src2); break;
446 case kOpAsr: res = cUnit->irb->CreateAShr(src1, src2); break;
buzbee2cfc6392012-05-07 14:51:40 -0700447 default:
448 LOG(FATAL) << "Invalid op " << op;
449 }
450 return res;
451}
452
453void convertFPArithOp(CompilationUnit* cUnit, OpKind op, RegLocation rlDest,
454 RegLocation rlSrc1, RegLocation rlSrc2)
455{
456 llvm::Value* src1 = getLLVMValue(cUnit, rlSrc1.origSReg);
457 llvm::Value* src2 = getLLVMValue(cUnit, rlSrc2.origSReg);
458 llvm::Value* res = NULL;
459 switch(op) {
460 case kOpAdd: res = cUnit->irb->CreateFAdd(src1, src2); break;
461 case kOpSub: res = cUnit->irb->CreateFSub(src1, src2); break;
462 case kOpMul: res = cUnit->irb->CreateFMul(src1, src2); break;
463 case kOpDiv: res = cUnit->irb->CreateFDiv(src1, src2); break;
464 case kOpRem: res = cUnit->irb->CreateFRem(src1, src2); break;
465 default:
466 LOG(FATAL) << "Invalid op " << op;
467 }
468 defineValue(cUnit, res, rlDest.origSReg);
469}
470
buzbee2a83e8f2012-07-13 16:42:30 -0700471void convertShift(CompilationUnit* cUnit,
472 greenland::IntrinsicHelper::IntrinsicId id,
473 RegLocation rlDest, RegLocation rlSrc1, RegLocation rlSrc2)
buzbee4f1181f2012-06-22 13:52:12 -0700474{
buzbee2a83e8f2012-07-13 16:42:30 -0700475 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
476 llvm::SmallVector<llvm::Value*, 2>args;
477 args.push_back(getLLVMValue(cUnit, rlSrc1.origSReg));
478 args.push_back(getLLVMValue(cUnit, rlSrc2.origSReg));
479 llvm::Value* res = cUnit->irb->CreateCall(intr, args);
480 defineValue(cUnit, res, rlDest.origSReg);
481}
482
483void convertShiftLit(CompilationUnit* cUnit,
484 greenland::IntrinsicHelper::IntrinsicId id,
485 RegLocation rlDest, RegLocation rlSrc, int shiftAmount)
486{
487 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
488 llvm::SmallVector<llvm::Value*, 2>args;
489 args.push_back(getLLVMValue(cUnit, rlSrc.origSReg));
490 args.push_back(cUnit->irb->getInt32(shiftAmount));
491 llvm::Value* res = cUnit->irb->CreateCall(intr, args);
buzbee4f1181f2012-06-22 13:52:12 -0700492 defineValue(cUnit, res, rlDest.origSReg);
493}
494
buzbee2cfc6392012-05-07 14:51:40 -0700495void convertArithOp(CompilationUnit* cUnit, OpKind op, RegLocation rlDest,
496 RegLocation rlSrc1, RegLocation rlSrc2)
497{
498 llvm::Value* src1 = getLLVMValue(cUnit, rlSrc1.origSReg);
499 llvm::Value* src2 = getLLVMValue(cUnit, rlSrc2.origSReg);
buzbee4f4dfc72012-07-02 14:54:44 -0700500 DCHECK_EQ(src1->getType(), src2->getType());
buzbee2cfc6392012-05-07 14:51:40 -0700501 llvm::Value* res = genArithOp(cUnit, op, rlDest.wide, src1, src2);
502 defineValue(cUnit, res, rlDest.origSReg);
503}
504
buzbeeb03f4872012-06-11 15:22:11 -0700505void setShadowFrameEntry(CompilationUnit* cUnit, llvm::Value* newVal)
506{
507 int index = -1;
508 DCHECK(newVal != NULL);
509 int vReg = SRegToVReg(cUnit, getLoc(cUnit, newVal).origSReg);
510 for (int i = 0; i < cUnit->numShadowFrameEntries; i++) {
511 if (cUnit->shadowMap[i] == vReg) {
512 index = i;
513 break;
514 }
515 }
Elliott Hughes74847412012-06-20 18:10:21 -0700516 DCHECK_NE(index, -1) << "Corrupt shadowMap";
buzbeeb03f4872012-06-11 15:22:11 -0700517 greenland::IntrinsicHelper::IntrinsicId id =
518 greenland::IntrinsicHelper::SetShadowFrameEntry;
519 llvm::Function* func = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
520 llvm::Value* tableSlot = cUnit->irb->getInt32(index);
521 llvm::Value* args[] = { newVal, tableSlot };
522 cUnit->irb->CreateCall(func, args);
523}
524
buzbee2cfc6392012-05-07 14:51:40 -0700525void convertArithOpLit(CompilationUnit* cUnit, OpKind op, RegLocation rlDest,
526 RegLocation rlSrc1, int32_t imm)
527{
528 llvm::Value* src1 = getLLVMValue(cUnit, rlSrc1.origSReg);
529 llvm::Value* src2 = cUnit->irb->getInt32(imm);
530 llvm::Value* res = genArithOp(cUnit, op, rlDest.wide, src1, src2);
531 defineValue(cUnit, res, rlDest.origSReg);
532}
533
buzbee101305f2012-06-28 18:00:56 -0700534/*
535 * Process arguments for invoke. Note: this code is also used to
536 * collect and process arguments for NEW_FILLED_ARRAY and NEW_FILLED_ARRAY_RANGE.
537 * The requirements are similar.
538 */
buzbee6969d502012-06-15 16:40:31 -0700539void convertInvoke(CompilationUnit* cUnit, BasicBlock* bb, MIR* mir,
buzbee76592632012-06-29 15:18:35 -0700540 InvokeType invokeType, bool isRange, bool isFilledNewArray)
buzbee6969d502012-06-15 16:40:31 -0700541{
542 CallInfo* info = oatNewCallInfo(cUnit, bb, mir, invokeType, isRange);
543 llvm::SmallVector<llvm::Value*, 10> args;
544 // Insert the invokeType
545 args.push_back(cUnit->irb->getInt32(static_cast<int>(invokeType)));
546 // Insert the method_idx
547 args.push_back(cUnit->irb->getInt32(info->index));
548 // Insert the optimization flags
549 args.push_back(cUnit->irb->getInt32(info->optFlags));
550 // Now, insert the actual arguments
buzbee6969d502012-06-15 16:40:31 -0700551 for (int i = 0; i < info->numArgWords;) {
buzbee6969d502012-06-15 16:40:31 -0700552 llvm::Value* val = getLLVMValue(cUnit, info->args[i].origSReg);
553 args.push_back(val);
554 i += info->args[i].wide ? 2 : 1;
555 }
556 /*
557 * Choose the invoke return type based on actual usage. Note: may
558 * be different than shorty. For example, if a function return value
559 * is not used, we'll treat this as a void invoke.
560 */
561 greenland::IntrinsicHelper::IntrinsicId id;
buzbee76592632012-06-29 15:18:35 -0700562 if (isFilledNewArray) {
563 id = greenland::IntrinsicHelper::FilledNewArray;
buzbee101305f2012-06-28 18:00:56 -0700564 } else if (info->result.location == kLocInvalid) {
buzbee6969d502012-06-15 16:40:31 -0700565 id = greenland::IntrinsicHelper::HLInvokeVoid;
566 } else {
567 if (info->result.wide) {
568 if (info->result.fp) {
569 id = greenland::IntrinsicHelper::HLInvokeDouble;
570 } else {
buzbee8fa0fda2012-06-27 15:44:52 -0700571 id = greenland::IntrinsicHelper::HLInvokeLong;
buzbee6969d502012-06-15 16:40:31 -0700572 }
573 } else if (info->result.ref) {
574 id = greenland::IntrinsicHelper::HLInvokeObj;
575 } else if (info->result.fp) {
576 id = greenland::IntrinsicHelper::HLInvokeFloat;
577 } else {
578 id = greenland::IntrinsicHelper::HLInvokeInt;
579 }
580 }
581 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
582 llvm::Value* res = cUnit->irb->CreateCall(intr, args);
583 if (info->result.location != kLocInvalid) {
584 defineValue(cUnit, res, info->result.origSReg);
585 }
586}
587
buzbee101305f2012-06-28 18:00:56 -0700588void convertConstObject(CompilationUnit* cUnit, uint32_t idx,
589 greenland::IntrinsicHelper::IntrinsicId id,
590 RegLocation rlDest)
buzbee6969d502012-06-15 16:40:31 -0700591{
buzbee6969d502012-06-15 16:40:31 -0700592 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
buzbee101305f2012-06-28 18:00:56 -0700593 llvm::Value* index = cUnit->irb->getInt32(idx);
buzbee6969d502012-06-15 16:40:31 -0700594 llvm::Value* res = cUnit->irb->CreateCall(intr, index);
595 defineValue(cUnit, res, rlDest.origSReg);
596}
597
buzbee101305f2012-06-28 18:00:56 -0700598void convertCheckCast(CompilationUnit* cUnit, uint32_t type_idx,
599 RegLocation rlSrc)
600{
601 greenland::IntrinsicHelper::IntrinsicId id;
602 id = greenland::IntrinsicHelper::CheckCast;
603 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
604 llvm::SmallVector<llvm::Value*, 2> args;
605 args.push_back(cUnit->irb->getInt32(type_idx));
606 args.push_back(getLLVMValue(cUnit, rlSrc.origSReg));
607 cUnit->irb->CreateCall(intr, args);
608}
609
buzbee8fa0fda2012-06-27 15:44:52 -0700610void convertNewInstance(CompilationUnit* cUnit, uint32_t type_idx,
611 RegLocation rlDest)
buzbee4f1181f2012-06-22 13:52:12 -0700612{
613 greenland::IntrinsicHelper::IntrinsicId id;
614 id = greenland::IntrinsicHelper::NewInstance;
615 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
616 llvm::Value* index = cUnit->irb->getInt32(type_idx);
617 llvm::Value* res = cUnit->irb->CreateCall(intr, index);
618 defineValue(cUnit, res, rlDest.origSReg);
619}
620
buzbee8fa0fda2012-06-27 15:44:52 -0700621void convertNewArray(CompilationUnit* cUnit, uint32_t type_idx,
622 RegLocation rlDest, RegLocation rlSrc)
623{
624 greenland::IntrinsicHelper::IntrinsicId id;
625 id = greenland::IntrinsicHelper::NewArray;
626 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
627 llvm::SmallVector<llvm::Value*, 2> args;
628 args.push_back(cUnit->irb->getInt32(type_idx));
629 args.push_back(getLLVMValue(cUnit, rlSrc.origSReg));
630 llvm::Value* res = cUnit->irb->CreateCall(intr, args);
631 defineValue(cUnit, res, rlDest.origSReg);
632}
633
634void convertAget(CompilationUnit* cUnit, int optFlags,
635 greenland::IntrinsicHelper::IntrinsicId id,
636 RegLocation rlDest, RegLocation rlArray, RegLocation rlIndex)
637{
638 llvm::SmallVector<llvm::Value*, 3> args;
639 args.push_back(cUnit->irb->getInt32(optFlags));
640 args.push_back(getLLVMValue(cUnit, rlArray.origSReg));
641 args.push_back(getLLVMValue(cUnit, rlIndex.origSReg));
642 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
643 llvm::Value* res = cUnit->irb->CreateCall(intr, args);
644 defineValue(cUnit, res, rlDest.origSReg);
645}
646
647void convertAput(CompilationUnit* cUnit, int optFlags,
648 greenland::IntrinsicHelper::IntrinsicId id,
649 RegLocation rlSrc, RegLocation rlArray, RegLocation rlIndex)
650{
651 llvm::SmallVector<llvm::Value*, 4> args;
652 args.push_back(cUnit->irb->getInt32(optFlags));
653 args.push_back(getLLVMValue(cUnit, rlSrc.origSReg));
654 args.push_back(getLLVMValue(cUnit, rlArray.origSReg));
655 args.push_back(getLLVMValue(cUnit, rlIndex.origSReg));
656 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
657 cUnit->irb->CreateCall(intr, args);
658}
659
buzbee101305f2012-06-28 18:00:56 -0700660void convertIget(CompilationUnit* cUnit, int optFlags,
661 greenland::IntrinsicHelper::IntrinsicId id,
662 RegLocation rlDest, RegLocation rlObj, int fieldIndex)
663{
664 llvm::SmallVector<llvm::Value*, 3> args;
665 args.push_back(cUnit->irb->getInt32(optFlags));
666 args.push_back(getLLVMValue(cUnit, rlObj.origSReg));
667 args.push_back(cUnit->irb->getInt32(fieldIndex));
668 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
669 llvm::Value* res = cUnit->irb->CreateCall(intr, args);
670 defineValue(cUnit, res, rlDest.origSReg);
671}
672
673void convertIput(CompilationUnit* cUnit, int optFlags,
674 greenland::IntrinsicHelper::IntrinsicId id,
675 RegLocation rlSrc, RegLocation rlObj, int fieldIndex)
676{
677 llvm::SmallVector<llvm::Value*, 4> args;
678 args.push_back(cUnit->irb->getInt32(optFlags));
679 args.push_back(getLLVMValue(cUnit, rlSrc.origSReg));
680 args.push_back(getLLVMValue(cUnit, rlObj.origSReg));
681 args.push_back(cUnit->irb->getInt32(fieldIndex));
682 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
683 cUnit->irb->CreateCall(intr, args);
684}
685
buzbee8fa0fda2012-06-27 15:44:52 -0700686void convertInstanceOf(CompilationUnit* cUnit, uint32_t type_idx,
687 RegLocation rlDest, RegLocation rlSrc)
688{
689 greenland::IntrinsicHelper::IntrinsicId id;
690 id = greenland::IntrinsicHelper::InstanceOf;
691 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
692 llvm::SmallVector<llvm::Value*, 2> args;
693 args.push_back(cUnit->irb->getInt32(type_idx));
694 args.push_back(getLLVMValue(cUnit, rlSrc.origSReg));
695 llvm::Value* res = cUnit->irb->CreateCall(intr, args);
696 defineValue(cUnit, res, rlDest.origSReg);
697}
698
buzbee101305f2012-06-28 18:00:56 -0700699void convertIntToLong(CompilationUnit* cUnit, RegLocation rlDest,
700 RegLocation rlSrc)
701{
702 llvm::Value* res = cUnit->irb->CreateSExt(getLLVMValue(cUnit, rlSrc.origSReg),
703 cUnit->irb->getInt64Ty());
704 defineValue(cUnit, res, rlDest.origSReg);
705}
706
buzbee76592632012-06-29 15:18:35 -0700707void convertLongToInt(CompilationUnit* cUnit, RegLocation rlDest,
708 RegLocation rlSrc)
709{
710 llvm::Value* src = getLLVMValue(cUnit, rlSrc.origSReg);
711 llvm::Value* res = cUnit->irb->CreateTrunc(src, cUnit->irb->getInt32Ty());
712 defineValue(cUnit, res, rlDest.origSReg);
713}
714
715void convertFloatToDouble(CompilationUnit* cUnit, RegLocation rlDest,
716 RegLocation rlSrc)
717{
718 llvm::Value* src = getLLVMValue(cUnit, rlSrc.origSReg);
719 llvm::Value* res = cUnit->irb->CreateFPExt(src, cUnit->irb->getDoubleTy());
720 defineValue(cUnit, res, rlDest.origSReg);
721}
722
723void convertDoubleToFloat(CompilationUnit* cUnit, RegLocation rlDest,
724 RegLocation rlSrc)
725{
726 llvm::Value* src = getLLVMValue(cUnit, rlSrc.origSReg);
727 llvm::Value* res = cUnit->irb->CreateFPTrunc(src, cUnit->irb->getFloatTy());
728 defineValue(cUnit, res, rlDest.origSReg);
729}
730
731void convertWideComparison(CompilationUnit* cUnit,
732 greenland::IntrinsicHelper::IntrinsicId id,
733 RegLocation rlDest, RegLocation rlSrc1,
734 RegLocation rlSrc2)
735{
736 DCHECK_EQ(rlSrc1.fp, rlSrc2.fp);
737 DCHECK_EQ(rlSrc1.wide, rlSrc2.wide);
738 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
739 llvm::SmallVector<llvm::Value*, 2> args;
740 args.push_back(getLLVMValue(cUnit, rlSrc1.origSReg));
741 args.push_back(getLLVMValue(cUnit, rlSrc2.origSReg));
742 llvm::Value* res = cUnit->irb->CreateCall(intr, args);
743 defineValue(cUnit, res, rlDest.origSReg);
744}
745
buzbee101305f2012-06-28 18:00:56 -0700746void convertIntNarrowing(CompilationUnit* cUnit, RegLocation rlDest,
747 RegLocation rlSrc,
748 greenland::IntrinsicHelper::IntrinsicId id)
749{
750 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
buzbee76592632012-06-29 15:18:35 -0700751 llvm::Value* res =
752 cUnit->irb->CreateCall(intr, getLLVMValue(cUnit, rlSrc.origSReg));
753 defineValue(cUnit, res, rlDest.origSReg);
754}
755
756void convertNeg(CompilationUnit* cUnit, RegLocation rlDest,
757 RegLocation rlSrc)
758{
759 llvm::Value* res = cUnit->irb->CreateNeg(getLLVMValue(cUnit, rlSrc.origSReg));
760 defineValue(cUnit, res, rlDest.origSReg);
761}
762
763void convertIntToFP(CompilationUnit* cUnit, llvm::Type* ty, RegLocation rlDest,
764 RegLocation rlSrc)
765{
766 llvm::Value* res =
767 cUnit->irb->CreateSIToFP(getLLVMValue(cUnit, rlSrc.origSReg), ty);
768 defineValue(cUnit, res, rlDest.origSReg);
769}
770
771void convertFPToInt(CompilationUnit* cUnit, llvm::Type* ty, RegLocation rlDest,
772 RegLocation rlSrc)
773{
774 llvm::Value* res =
775 cUnit->irb->CreateFPToSI(getLLVMValue(cUnit, rlSrc.origSReg), ty);
776 defineValue(cUnit, res, rlDest.origSReg);
777}
778
779
780void convertNegFP(CompilationUnit* cUnit, RegLocation rlDest,
781 RegLocation rlSrc)
782{
783 llvm::Value* res =
784 cUnit->irb->CreateFNeg(getLLVMValue(cUnit, rlSrc.origSReg));
785 defineValue(cUnit, res, rlDest.origSReg);
786}
787
788void convertNot(CompilationUnit* cUnit, RegLocation rlDest,
789 RegLocation rlSrc)
790{
791 llvm::Value* src = getLLVMValue(cUnit, rlSrc.origSReg);
792 llvm::Value* res = cUnit->irb->CreateXor(src, static_cast<uint64_t>(-1));
buzbee101305f2012-06-28 18:00:56 -0700793 defineValue(cUnit, res, rlDest.origSReg);
794}
795
buzbee2cfc6392012-05-07 14:51:40 -0700796/*
797 * Target-independent code generation. Use only high-level
798 * load/store utilities here, or target-dependent genXX() handlers
799 * when necessary.
800 */
801bool convertMIRNode(CompilationUnit* cUnit, MIR* mir, BasicBlock* bb,
802 llvm::BasicBlock* llvmBB, LIR* labelList)
803{
804 bool res = false; // Assume success
805 RegLocation rlSrc[3];
806 RegLocation rlDest = badLoc;
buzbee2cfc6392012-05-07 14:51:40 -0700807 Instruction::Code opcode = mir->dalvikInsn.opcode;
buzbee32412962012-06-26 16:27:56 -0700808 uint32_t vA = mir->dalvikInsn.vA;
buzbee6969d502012-06-15 16:40:31 -0700809 uint32_t vB = mir->dalvikInsn.vB;
810 uint32_t vC = mir->dalvikInsn.vC;
buzbee8fa0fda2012-06-27 15:44:52 -0700811 int optFlags = mir->optimizationFlags;
buzbee6969d502012-06-15 16:40:31 -0700812
buzbeeb03f4872012-06-11 15:22:11 -0700813 bool objectDefinition = false;
buzbee2cfc6392012-05-07 14:51:40 -0700814
815 /* Prep Src and Dest locations */
816 int nextSreg = 0;
817 int nextLoc = 0;
818 int attrs = oatDataFlowAttributes[opcode];
819 rlSrc[0] = rlSrc[1] = rlSrc[2] = badLoc;
820 if (attrs & DF_UA) {
821 if (attrs & DF_A_WIDE) {
buzbee15bf9802012-06-12 17:49:27 -0700822 rlSrc[nextLoc++] = oatGetSrcWide(cUnit, mir, nextSreg);
buzbee2cfc6392012-05-07 14:51:40 -0700823 nextSreg+= 2;
824 } else {
825 rlSrc[nextLoc++] = oatGetSrc(cUnit, mir, nextSreg);
826 nextSreg++;
827 }
828 }
829 if (attrs & DF_UB) {
830 if (attrs & DF_B_WIDE) {
buzbee15bf9802012-06-12 17:49:27 -0700831 rlSrc[nextLoc++] = oatGetSrcWide(cUnit, mir, nextSreg);
buzbee2cfc6392012-05-07 14:51:40 -0700832 nextSreg+= 2;
833 } else {
834 rlSrc[nextLoc++] = oatGetSrc(cUnit, mir, nextSreg);
835 nextSreg++;
836 }
837 }
838 if (attrs & DF_UC) {
839 if (attrs & DF_C_WIDE) {
buzbee15bf9802012-06-12 17:49:27 -0700840 rlSrc[nextLoc++] = oatGetSrcWide(cUnit, mir, nextSreg);
buzbee2cfc6392012-05-07 14:51:40 -0700841 } else {
842 rlSrc[nextLoc++] = oatGetSrc(cUnit, mir, nextSreg);
843 }
844 }
845 if (attrs & DF_DA) {
846 if (attrs & DF_A_WIDE) {
buzbee15bf9802012-06-12 17:49:27 -0700847 rlDest = oatGetDestWide(cUnit, mir);
buzbee2cfc6392012-05-07 14:51:40 -0700848 } else {
buzbee15bf9802012-06-12 17:49:27 -0700849 rlDest = oatGetDest(cUnit, mir);
buzbeeb03f4872012-06-11 15:22:11 -0700850 if (rlDest.ref) {
851 objectDefinition = true;
852 }
buzbee2cfc6392012-05-07 14:51:40 -0700853 }
854 }
855
856 switch (opcode) {
857 case Instruction::NOP:
858 break;
859
860 case Instruction::MOVE:
861 case Instruction::MOVE_OBJECT:
862 case Instruction::MOVE_16:
863 case Instruction::MOVE_OBJECT_16:
buzbee76592632012-06-29 15:18:35 -0700864 case Instruction::MOVE_OBJECT_FROM16:
buzbee2cfc6392012-05-07 14:51:40 -0700865 case Instruction::MOVE_FROM16:
866 case Instruction::MOVE_WIDE:
867 case Instruction::MOVE_WIDE_16:
868 case Instruction::MOVE_WIDE_FROM16: {
869 /*
870 * Moves/copies are meaningless in pure SSA register form,
871 * but we need to preserve them for the conversion back into
872 * MIR (at least until we stop using the Dalvik register maps).
873 * Insert a dummy intrinsic copy call, which will be recognized
874 * by the quick path and removed by the portable path.
875 */
876 llvm::Value* src = getLLVMValue(cUnit, rlSrc[0].origSReg);
877 llvm::Value* res = emitCopy(cUnit, src, rlDest);
878 defineValue(cUnit, res, rlDest.origSReg);
879 }
880 break;
881
882 case Instruction::CONST:
883 case Instruction::CONST_4:
884 case Instruction::CONST_16: {
buzbee6969d502012-06-15 16:40:31 -0700885 llvm::Constant* immValue = cUnit->irb->GetJInt(vB);
buzbee2cfc6392012-05-07 14:51:40 -0700886 llvm::Value* res = emitConst(cUnit, immValue, rlDest);
887 defineValue(cUnit, res, rlDest.origSReg);
888 }
889 break;
890
891 case Instruction::CONST_WIDE_16:
892 case Instruction::CONST_WIDE_32: {
buzbee76592632012-06-29 15:18:35 -0700893 // Sign extend to 64 bits
894 int64_t imm = static_cast<int32_t>(vB);
895 llvm::Constant* immValue = cUnit->irb->GetJLong(imm);
buzbee2cfc6392012-05-07 14:51:40 -0700896 llvm::Value* res = emitConst(cUnit, immValue, rlDest);
897 defineValue(cUnit, res, rlDest.origSReg);
898 }
899 break;
900
901 case Instruction::CONST_HIGH16: {
buzbee6969d502012-06-15 16:40:31 -0700902 llvm::Constant* immValue = cUnit->irb->GetJInt(vB << 16);
buzbee2cfc6392012-05-07 14:51:40 -0700903 llvm::Value* res = emitConst(cUnit, immValue, rlDest);
904 defineValue(cUnit, res, rlDest.origSReg);
905 }
906 break;
907
908 case Instruction::CONST_WIDE: {
909 llvm::Constant* immValue =
910 cUnit->irb->GetJLong(mir->dalvikInsn.vB_wide);
911 llvm::Value* res = emitConst(cUnit, immValue, rlDest);
912 defineValue(cUnit, res, rlDest.origSReg);
buzbee4f1181f2012-06-22 13:52:12 -0700913 }
914 break;
buzbee2cfc6392012-05-07 14:51:40 -0700915 case Instruction::CONST_WIDE_HIGH16: {
buzbee6969d502012-06-15 16:40:31 -0700916 int64_t imm = static_cast<int64_t>(vB) << 48;
buzbee2cfc6392012-05-07 14:51:40 -0700917 llvm::Constant* immValue = cUnit->irb->GetJLong(imm);
918 llvm::Value* res = emitConst(cUnit, immValue, rlDest);
919 defineValue(cUnit, res, rlDest.origSReg);
buzbee4f1181f2012-06-22 13:52:12 -0700920 }
921 break;
922
buzbee8fa0fda2012-06-27 15:44:52 -0700923 case Instruction::SPUT_OBJECT:
buzbee76592632012-06-29 15:18:35 -0700924 convertSput(cUnit, vB, greenland::IntrinsicHelper::HLSputObject,
buzbee8fa0fda2012-06-27 15:44:52 -0700925 rlSrc[0]);
926 break;
927 case Instruction::SPUT:
928 if (rlSrc[0].fp) {
buzbee76592632012-06-29 15:18:35 -0700929 convertSput(cUnit, vB, greenland::IntrinsicHelper::HLSputFloat,
buzbee8fa0fda2012-06-27 15:44:52 -0700930 rlSrc[0]);
931 } else {
buzbee76592632012-06-29 15:18:35 -0700932 convertSput(cUnit, vB, greenland::IntrinsicHelper::HLSput, rlSrc[0]);
buzbee8fa0fda2012-06-27 15:44:52 -0700933 }
934 break;
935 case Instruction::SPUT_BOOLEAN:
buzbee76592632012-06-29 15:18:35 -0700936 convertSput(cUnit, vB, greenland::IntrinsicHelper::HLSputBoolean,
buzbee8fa0fda2012-06-27 15:44:52 -0700937 rlSrc[0]);
938 break;
939 case Instruction::SPUT_BYTE:
buzbee76592632012-06-29 15:18:35 -0700940 convertSput(cUnit, vB, greenland::IntrinsicHelper::HLSputByte, rlSrc[0]);
buzbee8fa0fda2012-06-27 15:44:52 -0700941 break;
942 case Instruction::SPUT_CHAR:
buzbee76592632012-06-29 15:18:35 -0700943 convertSput(cUnit, vB, greenland::IntrinsicHelper::HLSputChar, rlSrc[0]);
buzbee8fa0fda2012-06-27 15:44:52 -0700944 break;
945 case Instruction::SPUT_SHORT:
buzbee76592632012-06-29 15:18:35 -0700946 convertSput(cUnit, vB, greenland::IntrinsicHelper::HLSputShort, rlSrc[0]);
buzbee8fa0fda2012-06-27 15:44:52 -0700947 break;
948 case Instruction::SPUT_WIDE:
949 if (rlSrc[0].fp) {
buzbee76592632012-06-29 15:18:35 -0700950 convertSput(cUnit, vB, greenland::IntrinsicHelper::HLSputDouble,
buzbee8fa0fda2012-06-27 15:44:52 -0700951 rlSrc[0]);
952 } else {
buzbee76592632012-06-29 15:18:35 -0700953 convertSput(cUnit, vB, greenland::IntrinsicHelper::HLSputWide,
buzbee8fa0fda2012-06-27 15:44:52 -0700954 rlSrc[0]);
955 }
956 break;
957
958 case Instruction::SGET_OBJECT:
959 convertSget(cUnit, vB, greenland::IntrinsicHelper::HLSgetObject, rlDest);
960 break;
961 case Instruction::SGET:
962 if (rlDest.fp) {
963 convertSget(cUnit, vB, greenland::IntrinsicHelper::HLSgetFloat, rlDest);
964 } else {
965 convertSget(cUnit, vB, greenland::IntrinsicHelper::HLSget, rlDest);
966 }
967 break;
968 case Instruction::SGET_BOOLEAN:
969 convertSget(cUnit, vB, greenland::IntrinsicHelper::HLSgetBoolean, rlDest);
970 break;
971 case Instruction::SGET_BYTE:
972 convertSget(cUnit, vB, greenland::IntrinsicHelper::HLSgetByte, rlDest);
973 break;
974 case Instruction::SGET_CHAR:
975 convertSget(cUnit, vB, greenland::IntrinsicHelper::HLSgetChar, rlDest);
976 break;
977 case Instruction::SGET_SHORT:
978 convertSget(cUnit, vB, greenland::IntrinsicHelper::HLSgetShort, rlDest);
979 break;
980 case Instruction::SGET_WIDE:
981 if (rlDest.fp) {
982 convertSget(cUnit, vB, greenland::IntrinsicHelper::HLSgetDouble,
983 rlDest);
984 } else {
985 convertSget(cUnit, vB, greenland::IntrinsicHelper::HLSgetWide, rlDest);
buzbee4f1181f2012-06-22 13:52:12 -0700986 }
987 break;
buzbee2cfc6392012-05-07 14:51:40 -0700988
989 case Instruction::RETURN_WIDE:
990 case Instruction::RETURN:
991 case Instruction::RETURN_OBJECT: {
TDYa1274f2935e2012-06-22 06:25:03 -0700992 if (!(cUnit->attrs & METHOD_IS_LEAF)) {
buzbee2cfc6392012-05-07 14:51:40 -0700993 emitSuspendCheck(cUnit);
994 }
buzbeeb03f4872012-06-11 15:22:11 -0700995 emitPopShadowFrame(cUnit);
buzbee2cfc6392012-05-07 14:51:40 -0700996 cUnit->irb->CreateRet(getLLVMValue(cUnit, rlSrc[0].origSReg));
997 bb->hasReturn = true;
998 }
999 break;
1000
1001 case Instruction::RETURN_VOID: {
TDYa1274f2935e2012-06-22 06:25:03 -07001002 if (!(cUnit->attrs & METHOD_IS_LEAF)) {
buzbee2cfc6392012-05-07 14:51:40 -07001003 emitSuspendCheck(cUnit);
1004 }
buzbeeb03f4872012-06-11 15:22:11 -07001005 emitPopShadowFrame(cUnit);
buzbee2cfc6392012-05-07 14:51:40 -07001006 cUnit->irb->CreateRetVoid();
1007 bb->hasReturn = true;
1008 }
1009 break;
1010
1011 case Instruction::IF_EQ:
1012 convertCompareAndBranch(cUnit, bb, mir, kCondEq, rlSrc[0], rlSrc[1]);
1013 break;
1014 case Instruction::IF_NE:
1015 convertCompareAndBranch(cUnit, bb, mir, kCondNe, rlSrc[0], rlSrc[1]);
1016 break;
1017 case Instruction::IF_LT:
1018 convertCompareAndBranch(cUnit, bb, mir, kCondLt, rlSrc[0], rlSrc[1]);
1019 break;
1020 case Instruction::IF_GE:
1021 convertCompareAndBranch(cUnit, bb, mir, kCondGe, rlSrc[0], rlSrc[1]);
1022 break;
1023 case Instruction::IF_GT:
1024 convertCompareAndBranch(cUnit, bb, mir, kCondGt, rlSrc[0], rlSrc[1]);
1025 break;
1026 case Instruction::IF_LE:
1027 convertCompareAndBranch(cUnit, bb, mir, kCondLe, rlSrc[0], rlSrc[1]);
1028 break;
1029 case Instruction::IF_EQZ:
1030 convertCompareZeroAndBranch(cUnit, bb, mir, kCondEq, rlSrc[0]);
1031 break;
1032 case Instruction::IF_NEZ:
1033 convertCompareZeroAndBranch(cUnit, bb, mir, kCondNe, rlSrc[0]);
1034 break;
1035 case Instruction::IF_LTZ:
1036 convertCompareZeroAndBranch(cUnit, bb, mir, kCondLt, rlSrc[0]);
1037 break;
1038 case Instruction::IF_GEZ:
1039 convertCompareZeroAndBranch(cUnit, bb, mir, kCondGe, rlSrc[0]);
1040 break;
1041 case Instruction::IF_GTZ:
1042 convertCompareZeroAndBranch(cUnit, bb, mir, kCondGt, rlSrc[0]);
1043 break;
1044 case Instruction::IF_LEZ:
1045 convertCompareZeroAndBranch(cUnit, bb, mir, kCondLe, rlSrc[0]);
1046 break;
1047
1048 case Instruction::GOTO:
1049 case Instruction::GOTO_16:
1050 case Instruction::GOTO_32: {
1051 if (bb->taken->startOffset <= bb->startOffset) {
1052 emitSuspendCheck(cUnit);
1053 }
1054 cUnit->irb->CreateBr(getLLVMBlock(cUnit, bb->taken->id));
1055 }
1056 break;
1057
1058 case Instruction::ADD_LONG:
1059 case Instruction::ADD_LONG_2ADDR:
1060 case Instruction::ADD_INT:
1061 case Instruction::ADD_INT_2ADDR:
1062 convertArithOp(cUnit, kOpAdd, rlDest, rlSrc[0], rlSrc[1]);
1063 break;
1064 case Instruction::SUB_LONG:
1065 case Instruction::SUB_LONG_2ADDR:
1066 case Instruction::SUB_INT:
1067 case Instruction::SUB_INT_2ADDR:
1068 convertArithOp(cUnit, kOpSub, rlDest, rlSrc[0], rlSrc[1]);
1069 break;
1070 case Instruction::MUL_LONG:
1071 case Instruction::MUL_LONG_2ADDR:
1072 case Instruction::MUL_INT:
1073 case Instruction::MUL_INT_2ADDR:
1074 convertArithOp(cUnit, kOpMul, rlDest, rlSrc[0], rlSrc[1]);
1075 break;
1076 case Instruction::DIV_LONG:
1077 case Instruction::DIV_LONG_2ADDR:
1078 case Instruction::DIV_INT:
1079 case Instruction::DIV_INT_2ADDR:
1080 convertArithOp(cUnit, kOpDiv, rlDest, rlSrc[0], rlSrc[1]);
1081 break;
1082 case Instruction::REM_LONG:
1083 case Instruction::REM_LONG_2ADDR:
1084 case Instruction::REM_INT:
1085 case Instruction::REM_INT_2ADDR:
1086 convertArithOp(cUnit, kOpRem, rlDest, rlSrc[0], rlSrc[1]);
1087 break;
1088 case Instruction::AND_LONG:
1089 case Instruction::AND_LONG_2ADDR:
1090 case Instruction::AND_INT:
1091 case Instruction::AND_INT_2ADDR:
1092 convertArithOp(cUnit, kOpAnd, rlDest, rlSrc[0], rlSrc[1]);
1093 break;
1094 case Instruction::OR_LONG:
1095 case Instruction::OR_LONG_2ADDR:
1096 case Instruction::OR_INT:
1097 case Instruction::OR_INT_2ADDR:
1098 convertArithOp(cUnit, kOpOr, rlDest, rlSrc[0], rlSrc[1]);
1099 break;
1100 case Instruction::XOR_LONG:
1101 case Instruction::XOR_LONG_2ADDR:
1102 case Instruction::XOR_INT:
1103 case Instruction::XOR_INT_2ADDR:
1104 convertArithOp(cUnit, kOpXor, rlDest, rlSrc[0], rlSrc[1]);
1105 break;
1106 case Instruction::SHL_LONG:
1107 case Instruction::SHL_LONG_2ADDR:
buzbee2a83e8f2012-07-13 16:42:30 -07001108 convertShift(cUnit, greenland::IntrinsicHelper::SHLLong,
1109 rlDest, rlSrc[0], rlSrc[1]);
buzbee4f1181f2012-06-22 13:52:12 -07001110 break;
buzbee2cfc6392012-05-07 14:51:40 -07001111 case Instruction::SHL_INT:
1112 case Instruction::SHL_INT_2ADDR:
buzbee2a83e8f2012-07-13 16:42:30 -07001113 convertShift(cUnit, greenland::IntrinsicHelper::SHLInt,
1114 rlDest, rlSrc[0], rlSrc[1]);
buzbee2cfc6392012-05-07 14:51:40 -07001115 break;
1116 case Instruction::SHR_LONG:
1117 case Instruction::SHR_LONG_2ADDR:
buzbee2a83e8f2012-07-13 16:42:30 -07001118 convertShift(cUnit, greenland::IntrinsicHelper::SHRLong,
1119 rlDest, rlSrc[0], rlSrc[1]);
buzbee4f1181f2012-06-22 13:52:12 -07001120 break;
buzbee2cfc6392012-05-07 14:51:40 -07001121 case Instruction::SHR_INT:
1122 case Instruction::SHR_INT_2ADDR:
buzbee2a83e8f2012-07-13 16:42:30 -07001123 convertShift(cUnit, greenland::IntrinsicHelper::SHRInt,
1124 rlDest, rlSrc[0], rlSrc[1]);
buzbee2cfc6392012-05-07 14:51:40 -07001125 break;
1126 case Instruction::USHR_LONG:
1127 case Instruction::USHR_LONG_2ADDR:
buzbee2a83e8f2012-07-13 16:42:30 -07001128 convertShift(cUnit, greenland::IntrinsicHelper::USHRLong,
1129 rlDest, rlSrc[0], rlSrc[1]);
buzbee4f1181f2012-06-22 13:52:12 -07001130 break;
buzbee2cfc6392012-05-07 14:51:40 -07001131 case Instruction::USHR_INT:
1132 case Instruction::USHR_INT_2ADDR:
buzbee2a83e8f2012-07-13 16:42:30 -07001133 convertShift(cUnit, greenland::IntrinsicHelper::USHRInt,
1134 rlDest, rlSrc[0], rlSrc[1]);
buzbee2cfc6392012-05-07 14:51:40 -07001135 break;
1136
1137 case Instruction::ADD_INT_LIT16:
1138 case Instruction::ADD_INT_LIT8:
buzbee6969d502012-06-15 16:40:31 -07001139 convertArithOpLit(cUnit, kOpAdd, rlDest, rlSrc[0], vC);
buzbee2cfc6392012-05-07 14:51:40 -07001140 break;
1141 case Instruction::RSUB_INT:
1142 case Instruction::RSUB_INT_LIT8:
buzbee6969d502012-06-15 16:40:31 -07001143 convertArithOpLit(cUnit, kOpRsub, rlDest, rlSrc[0], vC);
buzbee2cfc6392012-05-07 14:51:40 -07001144 break;
1145 case Instruction::MUL_INT_LIT16:
1146 case Instruction::MUL_INT_LIT8:
buzbee6969d502012-06-15 16:40:31 -07001147 convertArithOpLit(cUnit, kOpMul, rlDest, rlSrc[0], vC);
buzbee2cfc6392012-05-07 14:51:40 -07001148 break;
1149 case Instruction::DIV_INT_LIT16:
1150 case Instruction::DIV_INT_LIT8:
buzbee6969d502012-06-15 16:40:31 -07001151 convertArithOpLit(cUnit, kOpDiv, rlDest, rlSrc[0], vC);
buzbee2cfc6392012-05-07 14:51:40 -07001152 break;
1153 case Instruction::REM_INT_LIT16:
1154 case Instruction::REM_INT_LIT8:
buzbee6969d502012-06-15 16:40:31 -07001155 convertArithOpLit(cUnit, kOpRem, rlDest, rlSrc[0], vC);
buzbee2cfc6392012-05-07 14:51:40 -07001156 break;
1157 case Instruction::AND_INT_LIT16:
1158 case Instruction::AND_INT_LIT8:
buzbee6969d502012-06-15 16:40:31 -07001159 convertArithOpLit(cUnit, kOpAnd, rlDest, rlSrc[0], vC);
buzbee2cfc6392012-05-07 14:51:40 -07001160 break;
1161 case Instruction::OR_INT_LIT16:
1162 case Instruction::OR_INT_LIT8:
buzbee6969d502012-06-15 16:40:31 -07001163 convertArithOpLit(cUnit, kOpOr, rlDest, rlSrc[0], vC);
buzbee2cfc6392012-05-07 14:51:40 -07001164 break;
1165 case Instruction::XOR_INT_LIT16:
1166 case Instruction::XOR_INT_LIT8:
buzbee6969d502012-06-15 16:40:31 -07001167 convertArithOpLit(cUnit, kOpXor, rlDest, rlSrc[0], vC);
buzbee2cfc6392012-05-07 14:51:40 -07001168 break;
1169 case Instruction::SHL_INT_LIT8:
buzbee2a83e8f2012-07-13 16:42:30 -07001170 convertShiftLit(cUnit, greenland::IntrinsicHelper::SHLInt,
1171 rlDest, rlSrc[0], vC & 0x1f);
buzbee2cfc6392012-05-07 14:51:40 -07001172 break;
1173 case Instruction::SHR_INT_LIT8:
buzbee2a83e8f2012-07-13 16:42:30 -07001174 convertShiftLit(cUnit, greenland::IntrinsicHelper::SHRInt,
1175 rlDest, rlSrc[0], vC & 0x1f);
buzbee2cfc6392012-05-07 14:51:40 -07001176 break;
1177 case Instruction::USHR_INT_LIT8:
buzbee2a83e8f2012-07-13 16:42:30 -07001178 convertShiftLit(cUnit, greenland::IntrinsicHelper::USHRInt,
1179 rlDest, rlSrc[0], vC & 0x1f);
buzbee2cfc6392012-05-07 14:51:40 -07001180 break;
1181
1182 case Instruction::ADD_FLOAT:
1183 case Instruction::ADD_FLOAT_2ADDR:
1184 case Instruction::ADD_DOUBLE:
1185 case Instruction::ADD_DOUBLE_2ADDR:
1186 convertFPArithOp(cUnit, kOpAdd, rlDest, rlSrc[0], rlSrc[1]);
1187 break;
1188
1189 case Instruction::SUB_FLOAT:
1190 case Instruction::SUB_FLOAT_2ADDR:
1191 case Instruction::SUB_DOUBLE:
1192 case Instruction::SUB_DOUBLE_2ADDR:
1193 convertFPArithOp(cUnit, kOpSub, rlDest, rlSrc[0], rlSrc[1]);
1194 break;
1195
1196 case Instruction::MUL_FLOAT:
1197 case Instruction::MUL_FLOAT_2ADDR:
1198 case Instruction::MUL_DOUBLE:
1199 case Instruction::MUL_DOUBLE_2ADDR:
1200 convertFPArithOp(cUnit, kOpMul, rlDest, rlSrc[0], rlSrc[1]);
1201 break;
1202
1203 case Instruction::DIV_FLOAT:
1204 case Instruction::DIV_FLOAT_2ADDR:
1205 case Instruction::DIV_DOUBLE:
1206 case Instruction::DIV_DOUBLE_2ADDR:
1207 convertFPArithOp(cUnit, kOpDiv, rlDest, rlSrc[0], rlSrc[1]);
1208 break;
1209
1210 case Instruction::REM_FLOAT:
1211 case Instruction::REM_FLOAT_2ADDR:
1212 case Instruction::REM_DOUBLE:
1213 case Instruction::REM_DOUBLE_2ADDR:
1214 convertFPArithOp(cUnit, kOpRem, rlDest, rlSrc[0], rlSrc[1]);
1215 break;
1216
buzbee6969d502012-06-15 16:40:31 -07001217 case Instruction::INVOKE_STATIC:
buzbee101305f2012-06-28 18:00:56 -07001218 convertInvoke(cUnit, bb, mir, kStatic, false /*range*/,
1219 false /* NewFilledArray */);
buzbee6969d502012-06-15 16:40:31 -07001220 break;
1221 case Instruction::INVOKE_STATIC_RANGE:
buzbee101305f2012-06-28 18:00:56 -07001222 convertInvoke(cUnit, bb, mir, kStatic, true /*range*/,
1223 false /* NewFilledArray */);
buzbee6969d502012-06-15 16:40:31 -07001224 break;
1225
1226 case Instruction::INVOKE_DIRECT:
buzbee101305f2012-06-28 18:00:56 -07001227 convertInvoke(cUnit, bb, mir, kDirect, false /*range*/,
1228 false /* NewFilledArray */);
buzbee6969d502012-06-15 16:40:31 -07001229 break;
1230 case Instruction::INVOKE_DIRECT_RANGE:
buzbee101305f2012-06-28 18:00:56 -07001231 convertInvoke(cUnit, bb, mir, kDirect, true /*range*/,
1232 false /* NewFilledArray */);
buzbee6969d502012-06-15 16:40:31 -07001233 break;
1234
1235 case Instruction::INVOKE_VIRTUAL:
buzbee101305f2012-06-28 18:00:56 -07001236 convertInvoke(cUnit, bb, mir, kVirtual, false /*range*/,
1237 false /* NewFilledArray */);
buzbee6969d502012-06-15 16:40:31 -07001238 break;
1239 case Instruction::INVOKE_VIRTUAL_RANGE:
buzbee101305f2012-06-28 18:00:56 -07001240 convertInvoke(cUnit, bb, mir, kVirtual, true /*range*/,
1241 false /* NewFilledArray */);
buzbee6969d502012-06-15 16:40:31 -07001242 break;
1243
1244 case Instruction::INVOKE_SUPER:
buzbee101305f2012-06-28 18:00:56 -07001245 convertInvoke(cUnit, bb, mir, kSuper, false /*range*/,
1246 false /* NewFilledArray */);
buzbee6969d502012-06-15 16:40:31 -07001247 break;
1248 case Instruction::INVOKE_SUPER_RANGE:
buzbee101305f2012-06-28 18:00:56 -07001249 convertInvoke(cUnit, bb, mir, kSuper, true /*range*/,
1250 false /* NewFilledArray */);
buzbee6969d502012-06-15 16:40:31 -07001251 break;
1252
1253 case Instruction::INVOKE_INTERFACE:
buzbee101305f2012-06-28 18:00:56 -07001254 convertInvoke(cUnit, bb, mir, kInterface, false /*range*/,
1255 false /* NewFilledArray */);
buzbee6969d502012-06-15 16:40:31 -07001256 break;
1257 case Instruction::INVOKE_INTERFACE_RANGE:
buzbee101305f2012-06-28 18:00:56 -07001258 convertInvoke(cUnit, bb, mir, kInterface, true /*range*/,
1259 false /* NewFilledArray */);
1260 break;
1261 case Instruction::FILLED_NEW_ARRAY:
1262 convertInvoke(cUnit, bb, mir, kInterface, false /*range*/,
1263 true /* NewFilledArray */);
1264 break;
1265 case Instruction::FILLED_NEW_ARRAY_RANGE:
1266 convertInvoke(cUnit, bb, mir, kInterface, true /*range*/,
1267 true /* NewFilledArray */);
buzbee6969d502012-06-15 16:40:31 -07001268 break;
1269
1270 case Instruction::CONST_STRING:
1271 case Instruction::CONST_STRING_JUMBO:
buzbee101305f2012-06-28 18:00:56 -07001272 convertConstObject(cUnit, vB, greenland::IntrinsicHelper::ConstString,
1273 rlDest);
1274 break;
1275
1276 case Instruction::CONST_CLASS:
1277 convertConstObject(cUnit, vB, greenland::IntrinsicHelper::ConstClass,
1278 rlDest);
1279 break;
1280
1281 case Instruction::CHECK_CAST:
1282 convertCheckCast(cUnit, vB, rlSrc[0]);
buzbee6969d502012-06-15 16:40:31 -07001283 break;
1284
buzbee4f1181f2012-06-22 13:52:12 -07001285 case Instruction::NEW_INSTANCE:
buzbee8fa0fda2012-06-27 15:44:52 -07001286 convertNewInstance(cUnit, vB, rlDest);
buzbee4f1181f2012-06-22 13:52:12 -07001287 break;
1288
buzbee32412962012-06-26 16:27:56 -07001289 case Instruction::MOVE_EXCEPTION:
1290 convertMoveException(cUnit, rlDest);
1291 break;
1292
1293 case Instruction::THROW:
1294 convertThrow(cUnit, rlSrc[0]);
1295 break;
1296
1297 case Instruction::THROW_VERIFICATION_ERROR:
1298 convertThrowVerificationError(cUnit, vA, vB);
1299 break;
buzbee6969d502012-06-15 16:40:31 -07001300
buzbee2cfc6392012-05-07 14:51:40 -07001301 case Instruction::MOVE_RESULT_WIDE:
buzbee2cfc6392012-05-07 14:51:40 -07001302 case Instruction::MOVE_RESULT:
1303 case Instruction::MOVE_RESULT_OBJECT:
buzbee85eee022012-07-16 22:12:38 -07001304#if defined(TARGET_ARM)
buzbee9a2487f2012-07-26 14:01:13 -07001305 /*
1306 * Instruction rewriting on verification failure can eliminate
1307 * the invoke that feeds this move0result. It won't ever be reached,
1308 * so we can ignore it.
Brian Carlstrom937b73e2012-08-01 16:09:16 -07001309 * TODO: verify that previous instruction if THROW_VERIFICATION_ERROR
buzbee9a2487f2012-07-26 14:01:13 -07001310 */
1311 UNIMPLEMENTED(WARNING) << "Need to verify previous inst was rewritten";
buzbee85eee022012-07-16 22:12:38 -07001312#else
1313 UNIMPLEMENTED(WARNING) << "need x86 move-result fusing";
1314#endif
1315
buzbee2cfc6392012-05-07 14:51:40 -07001316 break;
1317
1318 case Instruction::MONITOR_ENTER:
buzbee8fa0fda2012-06-27 15:44:52 -07001319 convertMonitorEnterExit(cUnit, optFlags,
1320 greenland::IntrinsicHelper::MonitorEnter,
1321 rlSrc[0]);
buzbee2cfc6392012-05-07 14:51:40 -07001322 break;
1323
1324 case Instruction::MONITOR_EXIT:
buzbee8fa0fda2012-06-27 15:44:52 -07001325 convertMonitorEnterExit(cUnit, optFlags,
1326 greenland::IntrinsicHelper::MonitorExit,
1327 rlSrc[0]);
buzbee2cfc6392012-05-07 14:51:40 -07001328 break;
1329
1330 case Instruction::ARRAY_LENGTH:
buzbee76592632012-06-29 15:18:35 -07001331 convertArrayLength(cUnit, optFlags, rlDest, rlSrc[0]);
buzbee8fa0fda2012-06-27 15:44:52 -07001332 break;
1333
1334 case Instruction::NEW_ARRAY:
1335 convertNewArray(cUnit, vC, rlDest, rlSrc[0]);
1336 break;
1337
1338 case Instruction::INSTANCE_OF:
1339 convertInstanceOf(cUnit, vC, rlDest, rlSrc[0]);
1340 break;
1341
1342 case Instruction::AGET:
1343 if (rlDest.fp) {
1344 convertAget(cUnit, optFlags,
1345 greenland::IntrinsicHelper::HLArrayGetFloat,
1346 rlDest, rlSrc[0], rlSrc[1]);
1347 } else {
1348 convertAget(cUnit, optFlags, greenland::IntrinsicHelper::HLArrayGet,
1349 rlDest, rlSrc[0], rlSrc[1]);
1350 }
1351 break;
1352 case Instruction::AGET_OBJECT:
1353 convertAget(cUnit, optFlags, greenland::IntrinsicHelper::HLArrayGetObject,
1354 rlDest, rlSrc[0], rlSrc[1]);
1355 break;
1356 case Instruction::AGET_BOOLEAN:
1357 convertAget(cUnit, optFlags,
1358 greenland::IntrinsicHelper::HLArrayGetBoolean,
1359 rlDest, rlSrc[0], rlSrc[1]);
1360 break;
1361 case Instruction::AGET_BYTE:
1362 convertAget(cUnit, optFlags, greenland::IntrinsicHelper::HLArrayGetByte,
1363 rlDest, rlSrc[0], rlSrc[1]);
1364 break;
1365 case Instruction::AGET_CHAR:
1366 convertAget(cUnit, optFlags, greenland::IntrinsicHelper::HLArrayGetChar,
1367 rlDest, rlSrc[0], rlSrc[1]);
1368 break;
1369 case Instruction::AGET_SHORT:
1370 convertAget(cUnit, optFlags, greenland::IntrinsicHelper::HLArrayGetShort,
1371 rlDest, rlSrc[0], rlSrc[1]);
1372 break;
1373 case Instruction::AGET_WIDE:
1374 if (rlDest.fp) {
1375 convertAget(cUnit, optFlags,
1376 greenland::IntrinsicHelper::HLArrayGetDouble,
1377 rlDest, rlSrc[0], rlSrc[1]);
1378 } else {
1379 convertAget(cUnit, optFlags, greenland::IntrinsicHelper::HLArrayGetWide,
1380 rlDest, rlSrc[0], rlSrc[1]);
1381 }
1382 break;
1383
1384 case Instruction::APUT:
1385 if (rlSrc[0].fp) {
1386 convertAput(cUnit, optFlags,
1387 greenland::IntrinsicHelper::HLArrayPutFloat,
1388 rlSrc[0], rlSrc[1], rlSrc[2]);
1389 } else {
1390 convertAput(cUnit, optFlags, greenland::IntrinsicHelper::HLArrayPut,
1391 rlSrc[0], rlSrc[1], rlSrc[2]);
1392 }
1393 break;
1394 case Instruction::APUT_OBJECT:
1395 convertAput(cUnit, optFlags, greenland::IntrinsicHelper::HLArrayPutObject,
1396 rlSrc[0], rlSrc[1], rlSrc[2]);
1397 break;
1398 case Instruction::APUT_BOOLEAN:
1399 convertAput(cUnit, optFlags,
1400 greenland::IntrinsicHelper::HLArrayPutBoolean,
1401 rlSrc[0], rlSrc[1], rlSrc[2]);
1402 break;
1403 case Instruction::APUT_BYTE:
1404 convertAput(cUnit, optFlags, greenland::IntrinsicHelper::HLArrayPutByte,
1405 rlSrc[0], rlSrc[1], rlSrc[2]);
1406 break;
1407 case Instruction::APUT_CHAR:
1408 convertAput(cUnit, optFlags, greenland::IntrinsicHelper::HLArrayPutChar,
1409 rlSrc[0], rlSrc[1], rlSrc[2]);
1410 break;
1411 case Instruction::APUT_SHORT:
1412 convertAput(cUnit, optFlags, greenland::IntrinsicHelper::HLArrayPutShort,
1413 rlSrc[0], rlSrc[1], rlSrc[2]);
1414 break;
1415 case Instruction::APUT_WIDE:
1416 if (rlSrc[0].fp) {
1417 convertAput(cUnit, optFlags,
1418 greenland::IntrinsicHelper::HLArrayPutDouble,
1419 rlSrc[0], rlSrc[1], rlSrc[2]);
1420 } else {
1421 convertAput(cUnit, optFlags, greenland::IntrinsicHelper::HLArrayPutWide,
1422 rlSrc[0], rlSrc[1], rlSrc[2]);
1423 }
1424 break;
1425
buzbee101305f2012-06-28 18:00:56 -07001426 case Instruction::IGET:
1427 if (rlDest.fp) {
1428 convertIget(cUnit, optFlags, greenland::IntrinsicHelper::HLIGetFloat,
buzbee4f4dfc72012-07-02 14:54:44 -07001429 rlDest, rlSrc[0], vC);
buzbee101305f2012-06-28 18:00:56 -07001430 } else {
1431 convertIget(cUnit, optFlags, greenland::IntrinsicHelper::HLIGet,
buzbee4f4dfc72012-07-02 14:54:44 -07001432 rlDest, rlSrc[0], vC);
buzbee101305f2012-06-28 18:00:56 -07001433 }
buzbee2cfc6392012-05-07 14:51:40 -07001434 break;
buzbee101305f2012-06-28 18:00:56 -07001435 case Instruction::IGET_OBJECT:
1436 convertIget(cUnit, optFlags, greenland::IntrinsicHelper::HLIGetObject,
buzbee4f4dfc72012-07-02 14:54:44 -07001437 rlDest, rlSrc[0], vC);
buzbee101305f2012-06-28 18:00:56 -07001438 break;
1439 case Instruction::IGET_BOOLEAN:
1440 convertIget(cUnit, optFlags, greenland::IntrinsicHelper::HLIGetBoolean,
buzbee4f4dfc72012-07-02 14:54:44 -07001441 rlDest, rlSrc[0], vC);
buzbee101305f2012-06-28 18:00:56 -07001442 break;
1443 case Instruction::IGET_BYTE:
1444 convertIget(cUnit, optFlags, greenland::IntrinsicHelper::HLIGetByte,
buzbee4f4dfc72012-07-02 14:54:44 -07001445 rlDest, rlSrc[0], vC);
buzbee101305f2012-06-28 18:00:56 -07001446 break;
1447 case Instruction::IGET_CHAR:
1448 convertIget(cUnit, optFlags, greenland::IntrinsicHelper::HLIGetChar,
buzbee4f4dfc72012-07-02 14:54:44 -07001449 rlDest, rlSrc[0], vC);
buzbee101305f2012-06-28 18:00:56 -07001450 break;
1451 case Instruction::IGET_SHORT:
1452 convertIget(cUnit, optFlags, greenland::IntrinsicHelper::HLIGetShort,
buzbee4f4dfc72012-07-02 14:54:44 -07001453 rlDest, rlSrc[0], vC);
buzbee101305f2012-06-28 18:00:56 -07001454 break;
1455 case Instruction::IGET_WIDE:
1456 if (rlDest.fp) {
1457 convertIget(cUnit, optFlags, greenland::IntrinsicHelper::HLIGetDouble,
buzbee4f4dfc72012-07-02 14:54:44 -07001458 rlDest, rlSrc[0], vC);
buzbee101305f2012-06-28 18:00:56 -07001459 } else {
1460 convertIget(cUnit, optFlags, greenland::IntrinsicHelper::HLIGetWide,
buzbee4f4dfc72012-07-02 14:54:44 -07001461 rlDest, rlSrc[0], vC);
buzbee101305f2012-06-28 18:00:56 -07001462 }
1463 break;
1464 case Instruction::IPUT:
buzbee85eee022012-07-16 22:12:38 -07001465 if (rlSrc[0].fp) {
buzbee101305f2012-06-28 18:00:56 -07001466 convertIput(cUnit, optFlags, greenland::IntrinsicHelper::HLIPutFloat,
1467 rlSrc[0], rlSrc[1], vC);
1468 } else {
1469 convertIput(cUnit, optFlags, greenland::IntrinsicHelper::HLIPut,
1470 rlSrc[0], rlSrc[1], vC);
1471 }
1472 break;
1473 case Instruction::IPUT_OBJECT:
1474 convertIput(cUnit, optFlags, greenland::IntrinsicHelper::HLIPutObject,
1475 rlSrc[0], rlSrc[1], vC);
1476 break;
1477 case Instruction::IPUT_BOOLEAN:
1478 convertIput(cUnit, optFlags, greenland::IntrinsicHelper::HLIPutBoolean,
1479 rlSrc[0], rlSrc[1], vC);
1480 break;
1481 case Instruction::IPUT_BYTE:
1482 convertIput(cUnit, optFlags, greenland::IntrinsicHelper::HLIPutByte,
1483 rlSrc[0], rlSrc[1], vC);
1484 break;
1485 case Instruction::IPUT_CHAR:
1486 convertIput(cUnit, optFlags, greenland::IntrinsicHelper::HLIPutChar,
1487 rlSrc[0], rlSrc[1], vC);
1488 break;
1489 case Instruction::IPUT_SHORT:
1490 convertIput(cUnit, optFlags, greenland::IntrinsicHelper::HLIPutShort,
1491 rlSrc[0], rlSrc[1], vC);
1492 break;
1493 case Instruction::IPUT_WIDE:
buzbee85eee022012-07-16 22:12:38 -07001494 if (rlSrc[0].fp) {
buzbee101305f2012-06-28 18:00:56 -07001495 convertIput(cUnit, optFlags, greenland::IntrinsicHelper::HLIPutDouble,
1496 rlSrc[0], rlSrc[1], vC);
1497 } else {
1498 convertIput(cUnit, optFlags, greenland::IntrinsicHelper::HLIPutWide,
1499 rlSrc[0], rlSrc[1], vC);
1500 }
buzbee2cfc6392012-05-07 14:51:40 -07001501 break;
1502
1503 case Instruction::FILL_ARRAY_DATA:
buzbee101305f2012-06-28 18:00:56 -07001504 convertFillArrayData(cUnit, vB, rlSrc[0]);
buzbee2cfc6392012-05-07 14:51:40 -07001505 break;
1506
buzbee76592632012-06-29 15:18:35 -07001507 case Instruction::LONG_TO_INT:
1508 convertLongToInt(cUnit, rlDest, rlSrc[0]);
1509 break;
1510
buzbee101305f2012-06-28 18:00:56 -07001511 case Instruction::INT_TO_LONG:
1512 convertIntToLong(cUnit, rlDest, rlSrc[0]);
buzbee2cfc6392012-05-07 14:51:40 -07001513 break;
1514
buzbee101305f2012-06-28 18:00:56 -07001515 case Instruction::INT_TO_CHAR:
1516 convertIntNarrowing(cUnit, rlDest, rlSrc[0],
1517 greenland::IntrinsicHelper::IntToChar);
1518 break;
1519 case Instruction::INT_TO_BYTE:
1520 convertIntNarrowing(cUnit, rlDest, rlSrc[0],
1521 greenland::IntrinsicHelper::IntToByte);
1522 break;
1523 case Instruction::INT_TO_SHORT:
1524 convertIntNarrowing(cUnit, rlDest, rlSrc[0],
1525 greenland::IntrinsicHelper::IntToShort);
1526 break;
1527
buzbee76592632012-06-29 15:18:35 -07001528 case Instruction::INT_TO_FLOAT:
1529 case Instruction::LONG_TO_FLOAT:
1530 convertIntToFP(cUnit, cUnit->irb->getFloatTy(), rlDest, rlSrc[0]);
buzbee2cfc6392012-05-07 14:51:40 -07001531 break;
1532
buzbee76592632012-06-29 15:18:35 -07001533 case Instruction::INT_TO_DOUBLE:
1534 case Instruction::LONG_TO_DOUBLE:
1535 convertIntToFP(cUnit, cUnit->irb->getDoubleTy(), rlDest, rlSrc[0]);
buzbee2cfc6392012-05-07 14:51:40 -07001536 break;
1537
buzbee76592632012-06-29 15:18:35 -07001538 case Instruction::FLOAT_TO_DOUBLE:
1539 convertFloatToDouble(cUnit, rlDest, rlSrc[0]);
buzbee2cfc6392012-05-07 14:51:40 -07001540 break;
1541
buzbee76592632012-06-29 15:18:35 -07001542 case Instruction::DOUBLE_TO_FLOAT:
1543 convertDoubleToFloat(cUnit, rlDest, rlSrc[0]);
buzbee2cfc6392012-05-07 14:51:40 -07001544 break;
1545
1546 case Instruction::NEG_LONG:
buzbee76592632012-06-29 15:18:35 -07001547 case Instruction::NEG_INT:
1548 convertNeg(cUnit, rlDest, rlSrc[0]);
buzbee2cfc6392012-05-07 14:51:40 -07001549 break;
1550
1551 case Instruction::NEG_FLOAT:
buzbee2cfc6392012-05-07 14:51:40 -07001552 case Instruction::NEG_DOUBLE:
buzbee76592632012-06-29 15:18:35 -07001553 convertNegFP(cUnit, rlDest, rlSrc[0]);
buzbee2cfc6392012-05-07 14:51:40 -07001554 break;
1555
buzbee76592632012-06-29 15:18:35 -07001556 case Instruction::NOT_LONG:
1557 case Instruction::NOT_INT:
1558 convertNot(cUnit, rlDest, rlSrc[0]);
buzbee2cfc6392012-05-07 14:51:40 -07001559 break;
1560
buzbee2cfc6392012-05-07 14:51:40 -07001561 case Instruction::FLOAT_TO_INT:
buzbee2cfc6392012-05-07 14:51:40 -07001562 case Instruction::DOUBLE_TO_INT:
buzbee76592632012-06-29 15:18:35 -07001563 convertFPToInt(cUnit, cUnit->irb->getInt32Ty(), rlDest, rlSrc[0]);
buzbee2cfc6392012-05-07 14:51:40 -07001564 break;
1565
buzbee76592632012-06-29 15:18:35 -07001566 case Instruction::FLOAT_TO_LONG:
1567 case Instruction::DOUBLE_TO_LONG:
1568 convertFPToInt(cUnit, cUnit->irb->getInt64Ty(), rlDest, rlSrc[0]);
1569 break;
1570
1571 case Instruction::CMPL_FLOAT:
1572 convertWideComparison(cUnit, greenland::IntrinsicHelper::CmplFloat,
1573 rlDest, rlSrc[0], rlSrc[1]);
1574 break;
1575 case Instruction::CMPG_FLOAT:
1576 convertWideComparison(cUnit, greenland::IntrinsicHelper::CmpgFloat,
1577 rlDest, rlSrc[0], rlSrc[1]);
1578 break;
1579 case Instruction::CMPL_DOUBLE:
1580 convertWideComparison(cUnit, greenland::IntrinsicHelper::CmplDouble,
1581 rlDest, rlSrc[0], rlSrc[1]);
1582 break;
1583 case Instruction::CMPG_DOUBLE:
1584 convertWideComparison(cUnit, greenland::IntrinsicHelper::CmpgDouble,
1585 rlDest, rlSrc[0], rlSrc[1]);
1586 break;
1587 case Instruction::CMP_LONG:
1588 convertWideComparison(cUnit, greenland::IntrinsicHelper::CmpLong,
1589 rlDest, rlSrc[0], rlSrc[1]);
1590 break;
1591
buzbee76592632012-06-29 15:18:35 -07001592 case Instruction::PACKED_SWITCH:
buzbeef58c12c2012-07-03 15:06:29 -07001593 convertPackedSwitch(cUnit, bb, vB, rlSrc[0]);
buzbee76592632012-06-29 15:18:35 -07001594 break;
1595
1596 case Instruction::SPARSE_SWITCH:
buzbeea1da8a52012-07-09 14:00:21 -07001597 convertSparseSwitch(cUnit, bb, vB, rlSrc[0]);
buzbee76592632012-06-29 15:18:35 -07001598 break;
buzbee2cfc6392012-05-07 14:51:40 -07001599
1600 default:
buzbee32412962012-06-26 16:27:56 -07001601 UNIMPLEMENTED(FATAL) << "Unsupported Dex opcode 0x" << std::hex << opcode;
buzbee2cfc6392012-05-07 14:51:40 -07001602 res = true;
1603 }
buzbeeb03f4872012-06-11 15:22:11 -07001604 if (objectDefinition) {
1605 setShadowFrameEntry(cUnit, (llvm::Value*)
1606 cUnit->llvmValues.elemList[rlDest.origSReg]);
1607 }
buzbee2cfc6392012-05-07 14:51:40 -07001608 return res;
1609}
1610
1611/* Extended MIR instructions like PHI */
1612void convertExtendedMIR(CompilationUnit* cUnit, BasicBlock* bb, MIR* mir,
1613 llvm::BasicBlock* llvmBB)
1614{
1615
1616 switch ((ExtendedMIROpcode)mir->dalvikInsn.opcode) {
1617 case kMirOpPhi: {
buzbee2cfc6392012-05-07 14:51:40 -07001618 RegLocation rlDest = cUnit->regLocation[mir->ssaRep->defs[0]];
buzbee2a83e8f2012-07-13 16:42:30 -07001619 /*
1620 * The Art compiler's Phi nodes only handle 32-bit operands,
1621 * representing wide values using a matched set of Phi nodes
1622 * for the lower and upper halves. In the llvm world, we only
1623 * want a single Phi for wides. Here we will simply discard
1624 * the Phi node representing the high word.
1625 */
1626 if (rlDest.highWord) {
1627 return; // No Phi node - handled via low word
1628 }
1629 int* incoming = (int*)mir->dalvikInsn.vB;
buzbee2cfc6392012-05-07 14:51:40 -07001630 llvm::Type* phiType =
1631 llvmTypeFromLocRec(cUnit, rlDest);
1632 llvm::PHINode* phi = cUnit->irb->CreatePHI(phiType, mir->ssaRep->numUses);
1633 for (int i = 0; i < mir->ssaRep->numUses; i++) {
1634 RegLocation loc;
buzbee2a83e8f2012-07-13 16:42:30 -07001635 // Don't check width here.
1636 loc = oatGetRawSrc(cUnit, mir, i);
1637 DCHECK_EQ(rlDest.wide, loc.wide);
1638 DCHECK_EQ(rlDest.wide & rlDest.highWord, loc.wide & loc.highWord);
1639 DCHECK_EQ(rlDest.fp, loc.fp);
1640 DCHECK_EQ(rlDest.core, loc.core);
1641 DCHECK_EQ(rlDest.ref, loc.ref);
buzbee2cfc6392012-05-07 14:51:40 -07001642 phi->addIncoming(getLLVMValue(cUnit, loc.origSReg),
1643 getLLVMBlock(cUnit, incoming[i]));
1644 }
1645 defineValue(cUnit, phi, rlDest.origSReg);
1646 break;
1647 }
1648 case kMirOpCopy: {
1649 UNIMPLEMENTED(WARNING) << "unimp kMirOpPhi";
1650 break;
1651 }
1652#if defined(TARGET_ARM)
1653 case kMirOpFusedCmplFloat:
1654 UNIMPLEMENTED(WARNING) << "unimp kMirOpFusedCmpFloat";
1655 break;
1656 case kMirOpFusedCmpgFloat:
1657 UNIMPLEMENTED(WARNING) << "unimp kMirOpFusedCmgFloat";
1658 break;
1659 case kMirOpFusedCmplDouble:
1660 UNIMPLEMENTED(WARNING) << "unimp kMirOpFusedCmplDouble";
1661 break;
1662 case kMirOpFusedCmpgDouble:
1663 UNIMPLEMENTED(WARNING) << "unimp kMirOpFusedCmpgDouble";
1664 break;
1665 case kMirOpFusedCmpLong:
1666 UNIMPLEMENTED(WARNING) << "unimp kMirOpLongCmpBranch";
1667 break;
1668#endif
1669 default:
1670 break;
1671 }
1672}
1673
1674void setDexOffset(CompilationUnit* cUnit, int32_t offset)
1675{
1676 cUnit->currentDalvikOffset = offset;
buzbee76592632012-06-29 15:18:35 -07001677 llvm::SmallVector<llvm::Value*, 1> arrayRef;
buzbee2cfc6392012-05-07 14:51:40 -07001678 arrayRef.push_back(cUnit->irb->getInt32(offset));
1679 llvm::MDNode* node = llvm::MDNode::get(*cUnit->context, arrayRef);
1680 cUnit->irb->SetDexOffset(node);
1681}
1682
1683// Attach method info as metadata to special intrinsic
1684void setMethodInfo(CompilationUnit* cUnit)
1685{
1686 // We don't want dex offset on this
1687 cUnit->irb->SetDexOffset(NULL);
1688 greenland::IntrinsicHelper::IntrinsicId id;
1689 id = greenland::IntrinsicHelper::MethodInfo;
1690 llvm::Function* intr = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
1691 llvm::Instruction* inst = cUnit->irb->CreateCall(intr);
1692 llvm::SmallVector<llvm::Value*, 2> regInfo;
1693 regInfo.push_back(cUnit->irb->getInt32(cUnit->numIns));
1694 regInfo.push_back(cUnit->irb->getInt32(cUnit->numRegs));
1695 regInfo.push_back(cUnit->irb->getInt32(cUnit->numOuts));
1696 regInfo.push_back(cUnit->irb->getInt32(cUnit->numCompilerTemps));
1697 regInfo.push_back(cUnit->irb->getInt32(cUnit->numSSARegs));
1698 llvm::MDNode* regInfoNode = llvm::MDNode::get(*cUnit->context, regInfo);
1699 inst->setMetadata("RegInfo", regInfoNode);
1700 int promoSize = cUnit->numDalvikRegisters + cUnit->numCompilerTemps + 1;
1701 llvm::SmallVector<llvm::Value*, 50> pmap;
1702 for (int i = 0; i < promoSize; i++) {
1703 PromotionMap* p = &cUnit->promotionMap[i];
1704 int32_t mapData = ((p->firstInPair & 0xff) << 24) |
1705 ((p->fpReg & 0xff) << 16) |
1706 ((p->coreReg & 0xff) << 8) |
1707 ((p->fpLocation & 0xf) << 4) |
1708 (p->coreLocation & 0xf);
1709 pmap.push_back(cUnit->irb->getInt32(mapData));
1710 }
1711 llvm::MDNode* mapNode = llvm::MDNode::get(*cUnit->context, pmap);
1712 inst->setMetadata("PromotionMap", mapNode);
1713 setDexOffset(cUnit, cUnit->currentDalvikOffset);
1714}
1715
1716/* Handle the content in each basic block */
1717bool methodBlockBitcodeConversion(CompilationUnit* cUnit, BasicBlock* bb)
1718{
1719 llvm::BasicBlock* llvmBB = getLLVMBlock(cUnit, bb->id);
1720 cUnit->irb->SetInsertPoint(llvmBB);
1721 setDexOffset(cUnit, bb->startOffset);
1722
1723 if (bb->blockType == kEntryBlock) {
1724 setMethodInfo(cUnit);
buzbeeb03f4872012-06-11 15:22:11 -07001725 bool *canBeRef = (bool*) oatNew(cUnit, sizeof(bool) *
1726 cUnit->numDalvikRegisters, true,
1727 kAllocMisc);
1728 for (int i = 0; i < cUnit->numSSARegs; i++) {
1729 canBeRef[SRegToVReg(cUnit, i)] |= cUnit->regLocation[i].ref;
1730 }
1731 for (int i = 0; i < cUnit->numDalvikRegisters; i++) {
1732 if (canBeRef[i]) {
1733 cUnit->numShadowFrameEntries++;
1734 }
1735 }
1736 if (cUnit->numShadowFrameEntries > 0) {
1737 cUnit->shadowMap = (int*) oatNew(cUnit, sizeof(int) *
1738 cUnit->numShadowFrameEntries, true,
1739 kAllocMisc);
1740 for (int i = 0, j = 0; i < cUnit->numDalvikRegisters; i++) {
1741 if (canBeRef[i]) {
1742 cUnit->shadowMap[j++] = i;
1743 }
1744 }
1745 greenland::IntrinsicHelper::IntrinsicId id =
1746 greenland::IntrinsicHelper::AllocaShadowFrame;
1747 llvm::Function* func = cUnit->intrinsic_helper->GetIntrinsicFunction(id);
1748 llvm::Value* entries = cUnit->irb->getInt32(cUnit->numShadowFrameEntries);
1749 cUnit->irb->CreateCall(func, entries);
1750 }
buzbee2cfc6392012-05-07 14:51:40 -07001751 } else if (bb->blockType == kExitBlock) {
1752 /*
1753 * Because of the differences between how MIR/LIR and llvm handle exit
1754 * blocks, we won't explicitly covert them. On the llvm-to-lir
1755 * path, it will need to be regenereated.
1756 */
1757 return false;
buzbee6969d502012-06-15 16:40:31 -07001758 } else if (bb->blockType == kExceptionHandling) {
1759 /*
1760 * Because we're deferring null checking, delete the associated empty
1761 * exception block.
Brian Carlstrom937b73e2012-08-01 16:09:16 -07001762 * TODO: add new block type for exception blocks that we generate
1763 * greenland code for.
buzbee6969d502012-06-15 16:40:31 -07001764 */
1765 llvmBB->eraseFromParent();
1766 return false;
buzbee2cfc6392012-05-07 14:51:40 -07001767 }
1768
1769 for (MIR* mir = bb->firstMIRInsn; mir; mir = mir->next) {
1770
1771 setDexOffset(cUnit, mir->offset);
1772
Brian Carlstrom937b73e2012-08-01 16:09:16 -07001773 Instruction::Code dalvikOpcode = mir->dalvikInsn.opcode;
1774 Instruction::Format dalvikFormat = Instruction::FormatOf(dalvikOpcode);
buzbee2cfc6392012-05-07 14:51:40 -07001775
1776 /* If we're compiling for the debugger, generate an update callout */
1777 if (cUnit->genDebugger) {
1778 UNIMPLEMENTED(FATAL) << "Need debug codegen";
1779 //genDebuggerUpdate(cUnit, mir->offset);
1780 }
1781
Brian Carlstrom937b73e2012-08-01 16:09:16 -07001782 if ((int)mir->dalvikInsn.opcode >= (int)kMirOpFirst) {
buzbee2cfc6392012-05-07 14:51:40 -07001783 convertExtendedMIR(cUnit, bb, mir, llvmBB);
1784 continue;
1785 }
1786
1787 bool notHandled = convertMIRNode(cUnit, mir, bb, llvmBB,
1788 NULL /* labelList */);
1789 if (notHandled) {
1790 LOG(WARNING) << StringPrintf("%#06x: Op %#x (%s) / Fmt %d not handled",
Brian Carlstrom937b73e2012-08-01 16:09:16 -07001791 mir->offset, dalvikOpcode,
buzbee2cfc6392012-05-07 14:51:40 -07001792 Instruction::Name(dalvikOpcode),
1793 dalvikFormat);
1794 }
1795 }
1796
buzbee4be777b2012-07-12 14:38:18 -07001797 if (bb->blockType == kEntryBlock) {
1798 cUnit->entryTargetBB = getLLVMBlock(cUnit, bb->fallThrough->id);
1799 } else if ((bb->fallThrough != NULL) && !bb->hasReturn) {
buzbee2cfc6392012-05-07 14:51:40 -07001800 cUnit->irb->CreateBr(getLLVMBlock(cUnit, bb->fallThrough->id));
1801 }
1802
1803 return false;
1804}
1805
buzbee4f4dfc72012-07-02 14:54:44 -07001806char remapShorty(char shortyType) {
1807 /*
1808 * TODO: might want to revisit this. Dalvik registers are 32-bits wide,
1809 * and longs/doubles are represented as a pair of registers. When sub-word
1810 * arguments (and method results) are passed, they are extended to Dalvik
1811 * virtual register containers. Because llvm is picky about type consistency,
1812 * we must either cast the "real" type to 32-bit container multiple Dalvik
1813 * register types, or always use the expanded values.
1814 * Here, we're doing the latter. We map the shorty signature to container
1815 * types (which is valid so long as we always do a real expansion of passed
1816 * arguments and field loads).
1817 */
1818 switch(shortyType) {
1819 case 'Z' : shortyType = 'I'; break;
1820 case 'B' : shortyType = 'I'; break;
1821 case 'S' : shortyType = 'I'; break;
1822 case 'C' : shortyType = 'I'; break;
1823 default: break;
1824 }
1825 return shortyType;
1826}
1827
buzbee2cfc6392012-05-07 14:51:40 -07001828llvm::FunctionType* getFunctionType(CompilationUnit* cUnit) {
1829
1830 // Get return type
buzbee4f4dfc72012-07-02 14:54:44 -07001831 llvm::Type* ret_type = cUnit->irb->GetJType(remapShorty(cUnit->shorty[0]),
buzbee2cfc6392012-05-07 14:51:40 -07001832 greenland::kAccurate);
1833
1834 // Get argument type
1835 std::vector<llvm::Type*> args_type;
1836
1837 // method object
1838 args_type.push_back(cUnit->irb->GetJMethodTy());
1839
1840 // Do we have a "this"?
1841 if ((cUnit->access_flags & kAccStatic) == 0) {
1842 args_type.push_back(cUnit->irb->GetJObjectTy());
1843 }
1844
1845 for (uint32_t i = 1; i < strlen(cUnit->shorty); ++i) {
buzbee4f4dfc72012-07-02 14:54:44 -07001846 args_type.push_back(cUnit->irb->GetJType(remapShorty(cUnit->shorty[i]),
buzbee2cfc6392012-05-07 14:51:40 -07001847 greenland::kAccurate));
1848 }
1849
1850 return llvm::FunctionType::get(ret_type, args_type, false);
1851}
1852
1853bool createFunction(CompilationUnit* cUnit) {
1854 std::string func_name(PrettyMethod(cUnit->method_idx, *cUnit->dex_file,
1855 /* with_signature */ false));
1856 llvm::FunctionType* func_type = getFunctionType(cUnit);
1857
1858 if (func_type == NULL) {
1859 return false;
1860 }
1861
1862 cUnit->func = llvm::Function::Create(func_type,
1863 llvm::Function::ExternalLinkage,
1864 func_name, cUnit->module);
1865
1866 llvm::Function::arg_iterator arg_iter(cUnit->func->arg_begin());
1867 llvm::Function::arg_iterator arg_end(cUnit->func->arg_end());
1868
1869 arg_iter->setName("method");
1870 ++arg_iter;
1871
1872 int startSReg = cUnit->numRegs;
1873
1874 for (unsigned i = 0; arg_iter != arg_end; ++i, ++arg_iter) {
1875 arg_iter->setName(StringPrintf("v%i_0", startSReg));
1876 startSReg += cUnit->regLocation[startSReg].wide ? 2 : 1;
1877 }
1878
1879 return true;
1880}
1881
1882bool createLLVMBasicBlock(CompilationUnit* cUnit, BasicBlock* bb)
1883{
1884 // Skip the exit block
1885 if (bb->blockType == kExitBlock) {
1886 cUnit->idToBlockMap.Put(bb->id, NULL);
1887 } else {
1888 int offset = bb->startOffset;
1889 bool entryBlock = (bb->blockType == kEntryBlock);
1890 llvm::BasicBlock* llvmBB =
1891 llvm::BasicBlock::Create(*cUnit->context, entryBlock ? "entry" :
Elliott Hughes74847412012-06-20 18:10:21 -07001892 StringPrintf(kLabelFormat, offset, bb->id),
buzbee2cfc6392012-05-07 14:51:40 -07001893 cUnit->func);
1894 if (entryBlock) {
1895 cUnit->entryBB = llvmBB;
1896 cUnit->placeholderBB =
1897 llvm::BasicBlock::Create(*cUnit->context, "placeholder",
1898 cUnit->func);
1899 }
1900 cUnit->idToBlockMap.Put(bb->id, llvmBB);
1901 }
1902 return false;
1903}
1904
1905
1906/*
1907 * Convert MIR to LLVM_IR
1908 * o For each ssa name, create LLVM named value. Type these
1909 * appropriately, and ignore high half of wide and double operands.
1910 * o For each MIR basic block, create an LLVM basic block.
1911 * o Iterate through the MIR a basic block at a time, setting arguments
1912 * to recovered ssa name.
1913 */
1914void oatMethodMIR2Bitcode(CompilationUnit* cUnit)
1915{
1916 initIR(cUnit);
1917 oatInitGrowableList(cUnit, &cUnit->llvmValues, cUnit->numSSARegs);
1918
1919 // Create the function
1920 createFunction(cUnit);
1921
1922 // Create an LLVM basic block for each MIR block in dfs preorder
1923 oatDataFlowAnalysisDispatcher(cUnit, createLLVMBasicBlock,
1924 kPreOrderDFSTraversal, false /* isIterative */);
1925 /*
1926 * Create an llvm named value for each MIR SSA name. Note: we'll use
1927 * placeholders for all non-argument values (because we haven't seen
1928 * the definition yet).
1929 */
1930 cUnit->irb->SetInsertPoint(cUnit->placeholderBB);
1931 llvm::Function::arg_iterator arg_iter(cUnit->func->arg_begin());
1932 arg_iter++; /* Skip path method */
1933 for (int i = 0; i < cUnit->numSSARegs; i++) {
1934 llvm::Value* val;
buzbee85eee022012-07-16 22:12:38 -07001935 RegLocation rlTemp = cUnit->regLocation[i];
1936 if ((SRegToVReg(cUnit, i) < 0) || rlTemp.highWord) {
buzbee2a83e8f2012-07-13 16:42:30 -07001937 oatInsertGrowableList(cUnit, &cUnit->llvmValues, 0);
1938 } else if ((i < cUnit->numRegs) ||
1939 (i >= (cUnit->numRegs + cUnit->numIns))) {
buzbee85eee022012-07-16 22:12:38 -07001940 llvm::Constant* immValue = cUnit->regLocation[i].wide ?
1941 cUnit->irb->GetJLong(0) : cUnit->irb->GetJInt(0);
buzbee2a83e8f2012-07-13 16:42:30 -07001942 val = emitConst(cUnit, immValue, cUnit->regLocation[i]);
1943 val->setName(llvmSSAName(cUnit, i));
buzbee2cfc6392012-05-07 14:51:40 -07001944 oatInsertGrowableList(cUnit, &cUnit->llvmValues, (intptr_t)val);
buzbee2cfc6392012-05-07 14:51:40 -07001945 } else {
1946 // Recover previously-created argument values
1947 llvm::Value* argVal = arg_iter++;
1948 oatInsertGrowableList(cUnit, &cUnit->llvmValues, (intptr_t)argVal);
1949 }
1950 }
buzbee2cfc6392012-05-07 14:51:40 -07001951
1952 oatDataFlowAnalysisDispatcher(cUnit, methodBlockBitcodeConversion,
1953 kPreOrderDFSTraversal, false /* Iterative */);
1954
buzbee4be777b2012-07-12 14:38:18 -07001955 /*
1956 * In a few rare cases of verification failure, the verifier will
1957 * replace one or more Dalvik opcodes with the special
1958 * throw-verification-failure opcode. This can leave the SSA graph
1959 * in an invalid state, as definitions may be lost, while uses retained.
1960 * To work around this problem, we insert placeholder definitions for
1961 * all Dalvik SSA regs in the "placeholder" block. Here, after
1962 * bitcode conversion is complete, we examine those placeholder definitions
1963 * and delete any with no references (which normally is all of them).
1964 *
1965 * If any definitions remain, we link the placeholder block into the
1966 * CFG. Otherwise, it is deleted.
1967 */
1968 for (llvm::BasicBlock::iterator it = cUnit->placeholderBB->begin(),
1969 itEnd = cUnit->placeholderBB->end(); it != itEnd;) {
1970 llvm::Instruction* inst = llvm::dyn_cast<llvm::Instruction>(it++);
1971 DCHECK(inst != NULL);
1972 llvm::Value* val = llvm::dyn_cast<llvm::Value>(inst);
1973 DCHECK(val != NULL);
1974 if (val->getNumUses() == 0) {
1975 inst->eraseFromParent();
1976 }
1977 }
1978 setDexOffset(cUnit, 0);
1979 if (cUnit->placeholderBB->empty()) {
1980 cUnit->placeholderBB->eraseFromParent();
1981 } else {
1982 cUnit->irb->SetInsertPoint(cUnit->placeholderBB);
1983 cUnit->irb->CreateBr(cUnit->entryTargetBB);
1984 cUnit->entryTargetBB = cUnit->placeholderBB;
1985 }
1986 cUnit->irb->SetInsertPoint(cUnit->entryBB);
1987 cUnit->irb->CreateBr(cUnit->entryTargetBB);
buzbee2cfc6392012-05-07 14:51:40 -07001988
Brian Carlstrom937b73e2012-08-01 16:09:16 -07001989 //llvm::verifyFunction(*cUnit->func, llvm::PrintMessageAction);
buzbee2cfc6392012-05-07 14:51:40 -07001990
buzbeead8f15e2012-06-18 14:49:45 -07001991 if (cUnit->enableDebug & (1 << kDebugDumpBitcodeFile)) {
1992 // Write bitcode to file
1993 std::string errmsg;
1994 std::string fname(PrettyMethod(cUnit->method_idx, *cUnit->dex_file));
1995 oatReplaceSpecialChars(fname);
1996 // TODO: make configurable
buzbee4f1181f2012-06-22 13:52:12 -07001997 fname = StringPrintf("/sdcard/Bitcode/%s.bc", fname.c_str());
buzbee2cfc6392012-05-07 14:51:40 -07001998
buzbeead8f15e2012-06-18 14:49:45 -07001999 llvm::OwningPtr<llvm::tool_output_file> out_file(
2000 new llvm::tool_output_file(fname.c_str(), errmsg,
2001 llvm::raw_fd_ostream::F_Binary));
buzbee2cfc6392012-05-07 14:51:40 -07002002
buzbeead8f15e2012-06-18 14:49:45 -07002003 if (!errmsg.empty()) {
2004 LOG(ERROR) << "Failed to create bitcode output file: " << errmsg;
2005 }
2006
2007 llvm::WriteBitcodeToFile(cUnit->module, out_file->os());
2008 out_file->keep();
buzbee6969d502012-06-15 16:40:31 -07002009 }
buzbee2cfc6392012-05-07 14:51:40 -07002010}
2011
2012RegLocation getLoc(CompilationUnit* cUnit, llvm::Value* val) {
2013 RegLocation res;
buzbeeb03f4872012-06-11 15:22:11 -07002014 DCHECK(val != NULL);
buzbee2cfc6392012-05-07 14:51:40 -07002015 SafeMap<llvm::Value*, RegLocation>::iterator it = cUnit->locMap.find(val);
2016 if (it == cUnit->locMap.end()) {
buzbee4f1181f2012-06-22 13:52:12 -07002017 std::string valName = val->getName().str();
buzbee32412962012-06-26 16:27:56 -07002018 if (valName.empty()) {
buzbee101305f2012-06-28 18:00:56 -07002019 // FIXME: need to be more robust, handle FP and be in a position to
2020 // manage unnamed temps whose lifetimes span basic block boundaries
buzbee4f1181f2012-06-22 13:52:12 -07002021 UNIMPLEMENTED(WARNING) << "Need to handle unnamed llvm temps";
2022 memset(&res, 0, sizeof(res));
2023 res.location = kLocPhysReg;
2024 res.lowReg = oatAllocTemp(cUnit);
2025 res.home = true;
2026 res.sRegLow = INVALID_SREG;
2027 res.origSReg = INVALID_SREG;
buzbee101305f2012-06-28 18:00:56 -07002028 llvm::Type* ty = val->getType();
2029 res.wide = ((ty == cUnit->irb->getInt64Ty()) ||
2030 (ty == cUnit->irb->getDoubleTy()));
2031 if (res.wide) {
2032 res.highReg = oatAllocTemp(cUnit);
2033 }
buzbee4f1181f2012-06-22 13:52:12 -07002034 cUnit->locMap.Put(val, res);
buzbee32412962012-06-26 16:27:56 -07002035 } else {
2036 DCHECK_EQ(valName[0], 'v');
2037 int baseSReg = INVALID_SREG;
2038 sscanf(valName.c_str(), "v%d_", &baseSReg);
2039 res = cUnit->regLocation[baseSReg];
2040 cUnit->locMap.Put(val, res);
buzbee2cfc6392012-05-07 14:51:40 -07002041 }
2042 } else {
2043 res = it->second;
2044 }
2045 return res;
2046}
2047
2048Instruction::Code getDalvikOpcode(OpKind op, bool isConst, bool isWide)
2049{
2050 Instruction::Code res = Instruction::NOP;
2051 if (isWide) {
2052 switch(op) {
2053 case kOpAdd: res = Instruction::ADD_LONG; break;
2054 case kOpSub: res = Instruction::SUB_LONG; break;
2055 case kOpMul: res = Instruction::MUL_LONG; break;
2056 case kOpDiv: res = Instruction::DIV_LONG; break;
2057 case kOpRem: res = Instruction::REM_LONG; break;
2058 case kOpAnd: res = Instruction::AND_LONG; break;
2059 case kOpOr: res = Instruction::OR_LONG; break;
2060 case kOpXor: res = Instruction::XOR_LONG; break;
2061 case kOpLsl: res = Instruction::SHL_LONG; break;
2062 case kOpLsr: res = Instruction::USHR_LONG; break;
2063 case kOpAsr: res = Instruction::SHR_LONG; break;
2064 default: LOG(FATAL) << "Unexpected OpKind " << op;
2065 }
2066 } else if (isConst){
2067 switch(op) {
2068 case kOpAdd: res = Instruction::ADD_INT_LIT16; break;
2069 case kOpSub: res = Instruction::RSUB_INT_LIT8; break;
2070 case kOpMul: res = Instruction::MUL_INT_LIT16; break;
2071 case kOpDiv: res = Instruction::DIV_INT_LIT16; break;
2072 case kOpRem: res = Instruction::REM_INT_LIT16; break;
2073 case kOpAnd: res = Instruction::AND_INT_LIT16; break;
2074 case kOpOr: res = Instruction::OR_INT_LIT16; break;
2075 case kOpXor: res = Instruction::XOR_INT_LIT16; break;
2076 case kOpLsl: res = Instruction::SHL_INT_LIT8; break;
2077 case kOpLsr: res = Instruction::USHR_INT_LIT8; break;
2078 case kOpAsr: res = Instruction::SHR_INT_LIT8; break;
2079 default: LOG(FATAL) << "Unexpected OpKind " << op;
2080 }
2081 } else {
2082 switch(op) {
2083 case kOpAdd: res = Instruction::ADD_INT; break;
2084 case kOpSub: res = Instruction::SUB_INT; break;
2085 case kOpMul: res = Instruction::MUL_INT; break;
2086 case kOpDiv: res = Instruction::DIV_INT; break;
2087 case kOpRem: res = Instruction::REM_INT; break;
2088 case kOpAnd: res = Instruction::AND_INT; break;
2089 case kOpOr: res = Instruction::OR_INT; break;
2090 case kOpXor: res = Instruction::XOR_INT; break;
2091 case kOpLsl: res = Instruction::SHL_INT; break;
2092 case kOpLsr: res = Instruction::USHR_INT; break;
2093 case kOpAsr: res = Instruction::SHR_INT; break;
2094 default: LOG(FATAL) << "Unexpected OpKind " << op;
2095 }
2096 }
2097 return res;
2098}
2099
buzbee4f1181f2012-06-22 13:52:12 -07002100Instruction::Code getDalvikFPOpcode(OpKind op, bool isConst, bool isWide)
2101{
2102 Instruction::Code res = Instruction::NOP;
2103 if (isWide) {
2104 switch(op) {
2105 case kOpAdd: res = Instruction::ADD_DOUBLE; break;
2106 case kOpSub: res = Instruction::SUB_DOUBLE; break;
2107 case kOpMul: res = Instruction::MUL_DOUBLE; break;
2108 case kOpDiv: res = Instruction::DIV_DOUBLE; break;
2109 case kOpRem: res = Instruction::REM_DOUBLE; break;
2110 default: LOG(FATAL) << "Unexpected OpKind " << op;
2111 }
2112 } else {
2113 switch(op) {
2114 case kOpAdd: res = Instruction::ADD_FLOAT; break;
2115 case kOpSub: res = Instruction::SUB_FLOAT; break;
2116 case kOpMul: res = Instruction::MUL_FLOAT; break;
2117 case kOpDiv: res = Instruction::DIV_FLOAT; break;
2118 case kOpRem: res = Instruction::REM_FLOAT; break;
2119 default: LOG(FATAL) << "Unexpected OpKind " << op;
2120 }
2121 }
2122 return res;
2123}
2124
2125void cvtBinFPOp(CompilationUnit* cUnit, OpKind op, llvm::Instruction* inst)
2126{
2127 RegLocation rlDest = getLoc(cUnit, inst);
buzbee4f4dfc72012-07-02 14:54:44 -07002128 /*
2129 * Normally, we won't ever generate an FP operation with an immediate
2130 * operand (not supported in Dex instruction set). However, the IR builder
2131 * may insert them - in particular for createNegFP. Recognize this case
2132 * and deal with it.
2133 */
2134 llvm::ConstantFP* op1C = llvm::dyn_cast<llvm::ConstantFP>(inst->getOperand(0));
2135 llvm::ConstantFP* op2C = llvm::dyn_cast<llvm::ConstantFP>(inst->getOperand(1));
2136 DCHECK(op2C == NULL);
2137 if ((op1C != NULL) && (op == kOpSub)) {
2138 RegLocation rlSrc = getLoc(cUnit, inst->getOperand(1));
2139 if (rlDest.wide) {
2140 genArithOpDouble(cUnit, Instruction::NEG_DOUBLE, rlDest, rlSrc, rlSrc);
2141 } else {
2142 genArithOpFloat(cUnit, Instruction::NEG_FLOAT, rlDest, rlSrc, rlSrc);
2143 }
buzbee4f1181f2012-06-22 13:52:12 -07002144 } else {
buzbee4f4dfc72012-07-02 14:54:44 -07002145 DCHECK(op1C == NULL);
2146 RegLocation rlSrc1 = getLoc(cUnit, inst->getOperand(0));
2147 RegLocation rlSrc2 = getLoc(cUnit, inst->getOperand(1));
2148 Instruction::Code dalvikOp = getDalvikFPOpcode(op, false, rlDest.wide);
2149 if (rlDest.wide) {
2150 genArithOpDouble(cUnit, dalvikOp, rlDest, rlSrc1, rlSrc2);
2151 } else {
2152 genArithOpFloat(cUnit, dalvikOp, rlDest, rlSrc1, rlSrc2);
2153 }
buzbee4f1181f2012-06-22 13:52:12 -07002154 }
2155}
2156
buzbee101305f2012-06-28 18:00:56 -07002157void cvtIntNarrowing(CompilationUnit* cUnit, llvm::Instruction* inst,
2158 Instruction::Code opcode)
2159{
2160 RegLocation rlDest = getLoc(cUnit, inst);
2161 RegLocation rlSrc = getLoc(cUnit, inst->getOperand(0));
2162 genIntNarrowing(cUnit, opcode, rlDest, rlSrc);
2163}
2164
buzbee76592632012-06-29 15:18:35 -07002165void cvtIntToFP(CompilationUnit* cUnit, llvm::Instruction* inst)
2166{
2167 RegLocation rlDest = getLoc(cUnit, inst);
2168 RegLocation rlSrc = getLoc(cUnit, inst->getOperand(0));
2169 Instruction::Code opcode;
2170 if (rlDest.wide) {
2171 if (rlSrc.wide) {
2172 opcode = Instruction::LONG_TO_DOUBLE;
2173 } else {
2174 opcode = Instruction::INT_TO_DOUBLE;
2175 }
2176 } else {
2177 if (rlSrc.wide) {
2178 opcode = Instruction::LONG_TO_FLOAT;
2179 } else {
2180 opcode = Instruction::INT_TO_FLOAT;
2181 }
2182 }
2183 genConversion(cUnit, opcode, rlDest, rlSrc);
2184}
2185
2186void cvtFPToInt(CompilationUnit* cUnit, llvm::Instruction* inst)
2187{
2188 RegLocation rlDest = getLoc(cUnit, inst);
2189 RegLocation rlSrc = getLoc(cUnit, inst->getOperand(0));
2190 Instruction::Code opcode;
2191 if (rlDest.wide) {
2192 if (rlSrc.wide) {
2193 opcode = Instruction::DOUBLE_TO_LONG;
2194 } else {
2195 opcode = Instruction::FLOAT_TO_LONG;
2196 }
2197 } else {
2198 if (rlSrc.wide) {
2199 opcode = Instruction::DOUBLE_TO_INT;
2200 } else {
2201 opcode = Instruction::FLOAT_TO_INT;
2202 }
2203 }
2204 genConversion(cUnit, opcode, rlDest, rlSrc);
2205}
2206
2207void cvtFloatToDouble(CompilationUnit* cUnit, llvm::Instruction* inst)
2208{
2209 RegLocation rlDest = getLoc(cUnit, inst);
2210 RegLocation rlSrc = getLoc(cUnit, inst->getOperand(0));
2211 genConversion(cUnit, Instruction::FLOAT_TO_DOUBLE, rlDest, rlSrc);
2212}
2213
2214void cvtTrunc(CompilationUnit* cUnit, llvm::Instruction* inst)
2215{
2216 RegLocation rlDest = getLoc(cUnit, inst);
2217 RegLocation rlSrc = getLoc(cUnit, inst->getOperand(0));
2218 rlSrc = oatUpdateLocWide(cUnit, rlSrc);
2219 rlSrc = oatWideToNarrow(cUnit, rlSrc);
2220 storeValue(cUnit, rlDest, rlSrc);
2221}
2222
2223void cvtDoubleToFloat(CompilationUnit* cUnit, llvm::Instruction* inst)
2224{
2225 RegLocation rlDest = getLoc(cUnit, inst);
2226 RegLocation rlSrc = getLoc(cUnit, inst->getOperand(0));
2227 genConversion(cUnit, Instruction::DOUBLE_TO_FLOAT, rlDest, rlSrc);
2228}
2229
2230
buzbee101305f2012-06-28 18:00:56 -07002231void cvtIntExt(CompilationUnit* cUnit, llvm::Instruction* inst, bool isSigned)
2232{
2233 // TODO: evaluate src/tgt types and add general support for more than int to long
2234 RegLocation rlDest = getLoc(cUnit, inst);
2235 RegLocation rlSrc = getLoc(cUnit, inst->getOperand(0));
2236 DCHECK(rlDest.wide);
2237 DCHECK(!rlSrc.wide);
2238 DCHECK(!rlDest.fp);
2239 DCHECK(!rlSrc.fp);
2240 RegLocation rlResult = oatEvalLoc(cUnit, rlDest, kCoreReg, true);
2241 if (rlSrc.location == kLocPhysReg) {
2242 opRegCopy(cUnit, rlResult.lowReg, rlSrc.lowReg);
2243 } else {
2244 loadValueDirect(cUnit, rlSrc, rlResult.lowReg);
2245 }
2246 if (isSigned) {
2247 opRegRegImm(cUnit, kOpAsr, rlResult.highReg, rlResult.lowReg, 31);
2248 } else {
2249 loadConstant(cUnit, rlResult.highReg, 0);
2250 }
2251 storeValueWide(cUnit, rlDest, rlResult);
2252}
2253
buzbee2cfc6392012-05-07 14:51:40 -07002254void cvtBinOp(CompilationUnit* cUnit, OpKind op, llvm::Instruction* inst)
2255{
2256 RegLocation rlDest = getLoc(cUnit, inst);
2257 llvm::Value* lhs = inst->getOperand(0);
buzbeef58c12c2012-07-03 15:06:29 -07002258 // Special-case RSUB/NEG
buzbee4f1181f2012-06-22 13:52:12 -07002259 llvm::ConstantInt* lhsImm = llvm::dyn_cast<llvm::ConstantInt>(lhs);
2260 if ((op == kOpSub) && (lhsImm != NULL)) {
2261 RegLocation rlSrc1 = getLoc(cUnit, inst->getOperand(1));
buzbeef58c12c2012-07-03 15:06:29 -07002262 if (rlSrc1.wide) {
2263 DCHECK_EQ(lhsImm->getSExtValue(), 0);
2264 genArithOpLong(cUnit, Instruction::NEG_LONG, rlDest, rlSrc1, rlSrc1);
2265 } else {
2266 genArithOpIntLit(cUnit, Instruction::RSUB_INT, rlDest, rlSrc1,
2267 lhsImm->getSExtValue());
2268 }
buzbee4f1181f2012-06-22 13:52:12 -07002269 return;
2270 }
2271 DCHECK(lhsImm == NULL);
buzbee2cfc6392012-05-07 14:51:40 -07002272 RegLocation rlSrc1 = getLoc(cUnit, inst->getOperand(0));
2273 llvm::Value* rhs = inst->getOperand(1);
buzbee9a2487f2012-07-26 14:01:13 -07002274 llvm::ConstantInt* constRhs = llvm::dyn_cast<llvm::ConstantInt>(rhs);
2275 if (!rlDest.wide && (constRhs != NULL)) {
buzbee2cfc6392012-05-07 14:51:40 -07002276 Instruction::Code dalvikOp = getDalvikOpcode(op, true, false);
buzbee9a2487f2012-07-26 14:01:13 -07002277 genArithOpIntLit(cUnit, dalvikOp, rlDest, rlSrc1, constRhs->getSExtValue());
buzbee2cfc6392012-05-07 14:51:40 -07002278 } else {
2279 Instruction::Code dalvikOp = getDalvikOpcode(op, false, rlDest.wide);
buzbee9a2487f2012-07-26 14:01:13 -07002280 RegLocation rlSrc2;
2281 if (constRhs != NULL) {
2282 DCHECK_EQ(dalvikOp, Instruction::NOT_LONG);
2283 rlSrc2 = rlSrc1;
2284 } else {
2285 rlSrc2 = getLoc(cUnit, rhs);
2286 }
buzbee2cfc6392012-05-07 14:51:40 -07002287 if (rlDest.wide) {
2288 genArithOpLong(cUnit, dalvikOp, rlDest, rlSrc1, rlSrc2);
2289 } else {
2290 genArithOpInt(cUnit, dalvikOp, rlDest, rlSrc1, rlSrc2);
2291 }
2292 }
2293}
2294
buzbee2a83e8f2012-07-13 16:42:30 -07002295void cvtShiftOp(CompilationUnit* cUnit, Instruction::Code opcode,
2296 llvm::CallInst* callInst)
buzbee101305f2012-06-28 18:00:56 -07002297{
buzbee2a83e8f2012-07-13 16:42:30 -07002298 DCHECK_EQ(callInst->getNumArgOperands(), 2U);
2299 RegLocation rlDest = getLoc(cUnit, callInst);
2300 RegLocation rlSrc = getLoc(cUnit, callInst->getArgOperand(0));
2301 llvm::Value* rhs = callInst->getArgOperand(1);
2302 if (llvm::ConstantInt* src2 = llvm::dyn_cast<llvm::ConstantInt>(rhs)) {
2303 DCHECK(!rlDest.wide);
2304 genArithOpIntLit(cUnit, opcode, rlDest, rlSrc, src2->getSExtValue());
buzbee101305f2012-06-28 18:00:56 -07002305 } else {
buzbee2a83e8f2012-07-13 16:42:30 -07002306 RegLocation rlShift = getLoc(cUnit, rhs);
2307 if (callInst->getType() == cUnit->irb->getInt64Ty()) {
2308 genShiftOpLong(cUnit, opcode, rlDest, rlSrc, rlShift);
2309 } else {
2310 genArithOpInt(cUnit, opcode, rlDest, rlSrc, rlShift);
2311 }
buzbee101305f2012-06-28 18:00:56 -07002312 }
2313}
2314
buzbee2cfc6392012-05-07 14:51:40 -07002315void cvtBr(CompilationUnit* cUnit, llvm::Instruction* inst)
2316{
2317 llvm::BranchInst* brInst = llvm::dyn_cast<llvm::BranchInst>(inst);
2318 DCHECK(brInst != NULL);
2319 DCHECK(brInst->isUnconditional()); // May change - but this is all we use now
2320 llvm::BasicBlock* targetBB = brInst->getSuccessor(0);
2321 opUnconditionalBranch(cUnit, cUnit->blockToLabelMap.Get(targetBB));
2322}
2323
2324void cvtPhi(CompilationUnit* cUnit, llvm::Instruction* inst)
2325{
2326 // Nop - these have already been processed
2327}
2328
2329void cvtRet(CompilationUnit* cUnit, llvm::Instruction* inst)
2330{
2331 llvm::ReturnInst* retInst = llvm::dyn_cast<llvm::ReturnInst>(inst);
2332 llvm::Value* retVal = retInst->getReturnValue();
2333 if (retVal != NULL) {
2334 RegLocation rlSrc = getLoc(cUnit, retVal);
2335 if (rlSrc.wide) {
2336 storeValueWide(cUnit, oatGetReturnWide(cUnit, rlSrc.fp), rlSrc);
2337 } else {
2338 storeValue(cUnit, oatGetReturn(cUnit, rlSrc.fp), rlSrc);
2339 }
2340 }
2341 genExitSequence(cUnit);
2342}
2343
2344ConditionCode getCond(llvm::ICmpInst::Predicate llvmCond)
2345{
2346 ConditionCode res = kCondAl;
2347 switch(llvmCond) {
buzbee6969d502012-06-15 16:40:31 -07002348 case llvm::ICmpInst::ICMP_EQ: res = kCondEq; break;
buzbee4f1181f2012-06-22 13:52:12 -07002349 case llvm::ICmpInst::ICMP_NE: res = kCondNe; break;
2350 case llvm::ICmpInst::ICMP_SLT: res = kCondLt; break;
2351 case llvm::ICmpInst::ICMP_SGE: res = kCondGe; break;
buzbee2cfc6392012-05-07 14:51:40 -07002352 case llvm::ICmpInst::ICMP_SGT: res = kCondGt; break;
buzbee4f1181f2012-06-22 13:52:12 -07002353 case llvm::ICmpInst::ICMP_SLE: res = kCondLe; break;
buzbee2cfc6392012-05-07 14:51:40 -07002354 default: LOG(FATAL) << "Unexpected llvm condition";
2355 }
2356 return res;
2357}
2358
2359void cvtICmp(CompilationUnit* cUnit, llvm::Instruction* inst)
2360{
2361 // genCmpLong(cUnit, rlDest, rlSrc1, rlSrc2)
2362 UNIMPLEMENTED(FATAL);
2363}
2364
2365void cvtICmpBr(CompilationUnit* cUnit, llvm::Instruction* inst,
2366 llvm::BranchInst* brInst)
2367{
2368 // Get targets
2369 llvm::BasicBlock* takenBB = brInst->getSuccessor(0);
2370 LIR* taken = cUnit->blockToLabelMap.Get(takenBB);
2371 llvm::BasicBlock* fallThroughBB = brInst->getSuccessor(1);
2372 LIR* fallThrough = cUnit->blockToLabelMap.Get(fallThroughBB);
2373 // Get comparison operands
2374 llvm::ICmpInst* iCmpInst = llvm::dyn_cast<llvm::ICmpInst>(inst);
2375 ConditionCode cond = getCond(iCmpInst->getPredicate());
2376 llvm::Value* lhs = iCmpInst->getOperand(0);
2377 // Not expecting a constant as 1st operand
2378 DCHECK(llvm::dyn_cast<llvm::ConstantInt>(lhs) == NULL);
2379 RegLocation rlSrc1 = getLoc(cUnit, inst->getOperand(0));
2380 rlSrc1 = loadValue(cUnit, rlSrc1, kCoreReg);
2381 llvm::Value* rhs = inst->getOperand(1);
2382#if defined(TARGET_MIPS)
2383 // Compare and branch in one shot
2384 (void)taken;
2385 (void)cond;
2386 (void)rhs;
2387 UNIMPLEMENTED(FATAL);
2388#else
2389 //Compare, then branch
2390 // TODO: handle fused CMP_LONG/IF_xxZ case
2391 if (llvm::ConstantInt* src2 = llvm::dyn_cast<llvm::ConstantInt>(rhs)) {
2392 opRegImm(cUnit, kOpCmp, rlSrc1.lowReg, src2->getSExtValue());
buzbeed5018892012-07-11 14:23:40 -07002393 } else if (llvm::dyn_cast<llvm::ConstantPointerNull>(rhs) != NULL) {
2394 opRegImm(cUnit, kOpCmp, rlSrc1.lowReg, 0);
buzbee2cfc6392012-05-07 14:51:40 -07002395 } else {
2396 RegLocation rlSrc2 = getLoc(cUnit, rhs);
2397 rlSrc2 = loadValue(cUnit, rlSrc2, kCoreReg);
2398 opRegReg(cUnit, kOpCmp, rlSrc1.lowReg, rlSrc2.lowReg);
2399 }
2400 opCondBranch(cUnit, cond, taken);
2401#endif
2402 // Fallthrough
2403 opUnconditionalBranch(cUnit, fallThrough);
2404}
2405
2406void cvtCall(CompilationUnit* cUnit, llvm::CallInst* callInst,
2407 llvm::Function* callee)
2408{
2409 UNIMPLEMENTED(FATAL);
2410}
2411
buzbee2cfc6392012-05-07 14:51:40 -07002412void cvtCopy(CompilationUnit* cUnit, llvm::CallInst* callInst)
2413{
buzbee4f1181f2012-06-22 13:52:12 -07002414 DCHECK_EQ(callInst->getNumArgOperands(), 1U);
buzbee2cfc6392012-05-07 14:51:40 -07002415 RegLocation rlSrc = getLoc(cUnit, callInst->getArgOperand(0));
2416 RegLocation rlDest = getLoc(cUnit, callInst);
buzbee76592632012-06-29 15:18:35 -07002417 DCHECK_EQ(rlSrc.wide, rlDest.wide);
2418 DCHECK_EQ(rlSrc.fp, rlDest.fp);
buzbee2cfc6392012-05-07 14:51:40 -07002419 if (rlSrc.wide) {
2420 storeValueWide(cUnit, rlDest, rlSrc);
2421 } else {
2422 storeValue(cUnit, rlDest, rlSrc);
2423 }
2424}
2425
2426// Note: Immediate arg is a ConstantInt regardless of result type
2427void cvtConst(CompilationUnit* cUnit, llvm::CallInst* callInst)
2428{
buzbee4f1181f2012-06-22 13:52:12 -07002429 DCHECK_EQ(callInst->getNumArgOperands(), 1U);
buzbee2cfc6392012-05-07 14:51:40 -07002430 llvm::ConstantInt* src =
2431 llvm::dyn_cast<llvm::ConstantInt>(callInst->getArgOperand(0));
2432 uint64_t immval = src->getZExtValue();
2433 RegLocation rlDest = getLoc(cUnit, callInst);
2434 RegLocation rlResult = oatEvalLoc(cUnit, rlDest, kAnyReg, true);
2435 if (rlDest.wide) {
2436 loadConstantValueWide(cUnit, rlResult.lowReg, rlResult.highReg,
2437 (immval) & 0xffffffff, (immval >> 32) & 0xffffffff);
2438 storeValueWide(cUnit, rlDest, rlResult);
2439 } else {
2440 loadConstantNoClobber(cUnit, rlResult.lowReg, immval & 0xffffffff);
2441 storeValue(cUnit, rlDest, rlResult);
2442 }
2443}
2444
buzbee101305f2012-06-28 18:00:56 -07002445void cvtConstObject(CompilationUnit* cUnit, llvm::CallInst* callInst,
2446 bool isString)
buzbee6969d502012-06-15 16:40:31 -07002447{
buzbee4f1181f2012-06-22 13:52:12 -07002448 DCHECK_EQ(callInst->getNumArgOperands(), 1U);
buzbee101305f2012-06-28 18:00:56 -07002449 llvm::ConstantInt* idxVal =
buzbee6969d502012-06-15 16:40:31 -07002450 llvm::dyn_cast<llvm::ConstantInt>(callInst->getArgOperand(0));
buzbee101305f2012-06-28 18:00:56 -07002451 uint32_t index = idxVal->getZExtValue();
buzbee6969d502012-06-15 16:40:31 -07002452 RegLocation rlDest = getLoc(cUnit, callInst);
buzbee101305f2012-06-28 18:00:56 -07002453 if (isString) {
2454 genConstString(cUnit, index, rlDest);
2455 } else {
2456 genConstClass(cUnit, index, rlDest);
2457 }
2458}
2459
2460void cvtFillArrayData(CompilationUnit* cUnit, llvm::CallInst* callInst)
2461{
2462 DCHECK_EQ(callInst->getNumArgOperands(), 2U);
2463 llvm::ConstantInt* offsetVal =
2464 llvm::dyn_cast<llvm::ConstantInt>(callInst->getArgOperand(0));
2465 RegLocation rlSrc = getLoc(cUnit, callInst->getArgOperand(1));
2466 genFillArrayData(cUnit, offsetVal->getSExtValue(), rlSrc);
buzbee6969d502012-06-15 16:40:31 -07002467}
2468
buzbee4f1181f2012-06-22 13:52:12 -07002469void cvtNewInstance(CompilationUnit* cUnit, llvm::CallInst* callInst)
2470{
buzbee32412962012-06-26 16:27:56 -07002471 DCHECK_EQ(callInst->getNumArgOperands(), 1U);
buzbee4f1181f2012-06-22 13:52:12 -07002472 llvm::ConstantInt* typeIdxVal =
2473 llvm::dyn_cast<llvm::ConstantInt>(callInst->getArgOperand(0));
2474 uint32_t typeIdx = typeIdxVal->getZExtValue();
2475 RegLocation rlDest = getLoc(cUnit, callInst);
2476 genNewInstance(cUnit, typeIdx, rlDest);
2477}
2478
buzbee8fa0fda2012-06-27 15:44:52 -07002479void cvtNewArray(CompilationUnit* cUnit, llvm::CallInst* callInst)
2480{
2481 DCHECK_EQ(callInst->getNumArgOperands(), 2U);
2482 llvm::ConstantInt* typeIdxVal =
2483 llvm::dyn_cast<llvm::ConstantInt>(callInst->getArgOperand(0));
2484 uint32_t typeIdx = typeIdxVal->getZExtValue();
2485 llvm::Value* len = callInst->getArgOperand(1);
2486 RegLocation rlLen = getLoc(cUnit, len);
2487 RegLocation rlDest = getLoc(cUnit, callInst);
2488 genNewArray(cUnit, typeIdx, rlDest, rlLen);
2489}
2490
2491void cvtInstanceOf(CompilationUnit* cUnit, llvm::CallInst* callInst)
2492{
2493 DCHECK_EQ(callInst->getNumArgOperands(), 2U);
2494 llvm::ConstantInt* typeIdxVal =
2495 llvm::dyn_cast<llvm::ConstantInt>(callInst->getArgOperand(0));
2496 uint32_t typeIdx = typeIdxVal->getZExtValue();
2497 llvm::Value* src = callInst->getArgOperand(1);
2498 RegLocation rlSrc = getLoc(cUnit, src);
2499 RegLocation rlDest = getLoc(cUnit, callInst);
2500 genInstanceof(cUnit, typeIdx, rlDest, rlSrc);
2501}
2502
buzbee32412962012-06-26 16:27:56 -07002503void cvtThrowVerificationError(CompilationUnit* cUnit, llvm::CallInst* callInst)
2504{
2505 DCHECK_EQ(callInst->getNumArgOperands(), 2U);
2506 llvm::ConstantInt* info1 =
2507 llvm::dyn_cast<llvm::ConstantInt>(callInst->getArgOperand(0));
2508 llvm::ConstantInt* info2 =
2509 llvm::dyn_cast<llvm::ConstantInt>(callInst->getArgOperand(1));
2510 genThrowVerificationError(cUnit, info1->getZExtValue(), info2->getZExtValue());
2511}
2512
2513void cvtThrow(CompilationUnit* cUnit, llvm::CallInst* callInst)
2514{
2515 DCHECK_EQ(callInst->getNumArgOperands(), 1U);
2516 llvm::Value* src = callInst->getArgOperand(0);
2517 RegLocation rlSrc = getLoc(cUnit, src);
2518 genThrow(cUnit, rlSrc);
2519}
2520
buzbee8fa0fda2012-06-27 15:44:52 -07002521void cvtMonitorEnterExit(CompilationUnit* cUnit, bool isEnter,
2522 llvm::CallInst* callInst)
2523{
2524 DCHECK_EQ(callInst->getNumArgOperands(), 2U);
2525 llvm::ConstantInt* optFlags =
2526 llvm::dyn_cast<llvm::ConstantInt>(callInst->getArgOperand(0));
2527 llvm::Value* src = callInst->getArgOperand(1);
2528 RegLocation rlSrc = getLoc(cUnit, src);
2529 if (isEnter) {
2530 genMonitorEnter(cUnit, optFlags->getZExtValue(), rlSrc);
2531 } else {
2532 genMonitorExit(cUnit, optFlags->getZExtValue(), rlSrc);
2533 }
2534}
2535
buzbee76592632012-06-29 15:18:35 -07002536void cvtArrayLength(CompilationUnit* cUnit, llvm::CallInst* callInst)
buzbee8fa0fda2012-06-27 15:44:52 -07002537{
2538 DCHECK_EQ(callInst->getNumArgOperands(), 2U);
2539 llvm::ConstantInt* optFlags =
2540 llvm::dyn_cast<llvm::ConstantInt>(callInst->getArgOperand(0));
2541 llvm::Value* src = callInst->getArgOperand(1);
2542 RegLocation rlSrc = getLoc(cUnit, src);
2543 rlSrc = loadValue(cUnit, rlSrc, kCoreReg);
2544 genNullCheck(cUnit, rlSrc.sRegLow, rlSrc.lowReg, optFlags->getZExtValue());
2545 RegLocation rlDest = getLoc(cUnit, callInst);
2546 RegLocation rlResult = oatEvalLoc(cUnit, rlDest, kCoreReg, true);
2547 int lenOffset = Array::LengthOffset().Int32Value();
2548 loadWordDisp(cUnit, rlSrc.lowReg, lenOffset, rlResult.lowReg);
2549 storeValue(cUnit, rlDest, rlResult);
2550}
2551
buzbee32412962012-06-26 16:27:56 -07002552void cvtMoveException(CompilationUnit* cUnit, llvm::CallInst* callInst)
2553{
2554 DCHECK_EQ(callInst->getNumArgOperands(), 0U);
2555 int exOffset = Thread::ExceptionOffset().Int32Value();
2556 RegLocation rlDest = getLoc(cUnit, callInst);
2557 RegLocation rlResult = oatEvalLoc(cUnit, rlDest, kCoreReg, true);
2558#if defined(TARGET_X86)
2559 newLIR2(cUnit, kX86Mov32RT, rlResult.lowReg, exOffset);
2560 newLIR2(cUnit, kX86Mov32TI, exOffset, 0);
2561#else
2562 int resetReg = oatAllocTemp(cUnit);
2563 loadWordDisp(cUnit, rSELF, exOffset, rlResult.lowReg);
2564 loadConstant(cUnit, resetReg, 0);
2565 storeWordDisp(cUnit, rSELF, exOffset, resetReg);
2566 oatFreeTemp(cUnit, resetReg);
2567#endif
2568 storeValue(cUnit, rlDest, rlResult);
2569}
2570
buzbee4f1181f2012-06-22 13:52:12 -07002571void cvtSget(CompilationUnit* cUnit, llvm::CallInst* callInst, bool isWide,
2572 bool isObject)
2573{
buzbee32412962012-06-26 16:27:56 -07002574 DCHECK_EQ(callInst->getNumArgOperands(), 1U);
buzbee4f1181f2012-06-22 13:52:12 -07002575 llvm::ConstantInt* typeIdxVal =
2576 llvm::dyn_cast<llvm::ConstantInt>(callInst->getArgOperand(0));
2577 uint32_t typeIdx = typeIdxVal->getZExtValue();
2578 RegLocation rlDest = getLoc(cUnit, callInst);
2579 genSget(cUnit, typeIdx, rlDest, isWide, isObject);
2580}
2581
buzbee8fa0fda2012-06-27 15:44:52 -07002582void cvtSput(CompilationUnit* cUnit, llvm::CallInst* callInst, bool isWide,
2583 bool isObject)
2584{
2585 DCHECK_EQ(callInst->getNumArgOperands(), 2U);
2586 llvm::ConstantInt* typeIdxVal =
2587 llvm::dyn_cast<llvm::ConstantInt>(callInst->getArgOperand(0));
2588 uint32_t typeIdx = typeIdxVal->getZExtValue();
2589 llvm::Value* src = callInst->getArgOperand(1);
2590 RegLocation rlSrc = getLoc(cUnit, src);
2591 genSput(cUnit, typeIdx, rlSrc, isWide, isObject);
2592}
2593
2594void cvtAget(CompilationUnit* cUnit, llvm::CallInst* callInst, OpSize size,
2595 int scale)
2596{
2597 DCHECK_EQ(callInst->getNumArgOperands(), 3U);
2598 llvm::ConstantInt* optFlags =
2599 llvm::dyn_cast<llvm::ConstantInt>(callInst->getArgOperand(0));
2600 RegLocation rlArray = getLoc(cUnit, callInst->getArgOperand(1));
2601 RegLocation rlIndex = getLoc(cUnit, callInst->getArgOperand(2));
2602 RegLocation rlDest = getLoc(cUnit, callInst);
2603 genArrayGet(cUnit, optFlags->getZExtValue(), size, rlArray, rlIndex,
2604 rlDest, scale);
2605}
2606
2607void cvtAput(CompilationUnit* cUnit, llvm::CallInst* callInst, OpSize size,
buzbeef1f86362012-07-10 15:18:31 -07002608 int scale, bool isObject)
buzbee8fa0fda2012-06-27 15:44:52 -07002609{
2610 DCHECK_EQ(callInst->getNumArgOperands(), 4U);
2611 llvm::ConstantInt* optFlags =
2612 llvm::dyn_cast<llvm::ConstantInt>(callInst->getArgOperand(0));
2613 RegLocation rlSrc = getLoc(cUnit, callInst->getArgOperand(1));
2614 RegLocation rlArray = getLoc(cUnit, callInst->getArgOperand(2));
2615 RegLocation rlIndex = getLoc(cUnit, callInst->getArgOperand(3));
buzbeef1f86362012-07-10 15:18:31 -07002616 if (isObject) {
2617 genArrayObjPut(cUnit, optFlags->getZExtValue(), rlArray, rlIndex,
2618 rlSrc, scale);
2619 } else {
2620 genArrayPut(cUnit, optFlags->getZExtValue(), size, rlArray, rlIndex,
2621 rlSrc, scale);
2622 }
2623}
2624
2625void cvtAputObj(CompilationUnit* cUnit, llvm::CallInst* callInst)
2626{
2627 cvtAput(cUnit, callInst, kWord, 2, true /* isObject */);
2628}
2629
2630void cvtAputPrimitive(CompilationUnit* cUnit, llvm::CallInst* callInst,
2631 OpSize size, int scale)
2632{
2633 cvtAput(cUnit, callInst, size, scale, false /* isObject */);
buzbee8fa0fda2012-06-27 15:44:52 -07002634}
2635
buzbee101305f2012-06-28 18:00:56 -07002636void cvtIget(CompilationUnit* cUnit, llvm::CallInst* callInst, OpSize size,
2637 bool isWide, bool isObj)
2638{
2639 DCHECK_EQ(callInst->getNumArgOperands(), 3U);
2640 llvm::ConstantInt* optFlags =
2641 llvm::dyn_cast<llvm::ConstantInt>(callInst->getArgOperand(0));
2642 RegLocation rlObj = getLoc(cUnit, callInst->getArgOperand(1));
2643 llvm::ConstantInt* fieldIdx =
2644 llvm::dyn_cast<llvm::ConstantInt>(callInst->getArgOperand(2));
2645 RegLocation rlDest = getLoc(cUnit, callInst);
2646 genIGet(cUnit, fieldIdx->getZExtValue(), optFlags->getZExtValue(),
2647 size, rlDest, rlObj, isWide, isObj);
2648}
2649
2650void cvtIput(CompilationUnit* cUnit, llvm::CallInst* callInst, OpSize size,
2651 bool isWide, bool isObj)
2652{
2653 DCHECK_EQ(callInst->getNumArgOperands(), 4U);
2654 llvm::ConstantInt* optFlags =
2655 llvm::dyn_cast<llvm::ConstantInt>(callInst->getArgOperand(0));
2656 RegLocation rlSrc = getLoc(cUnit, callInst->getArgOperand(1));
2657 RegLocation rlObj = getLoc(cUnit, callInst->getArgOperand(2));
2658 llvm::ConstantInt* fieldIdx =
buzbee4f4dfc72012-07-02 14:54:44 -07002659 llvm::dyn_cast<llvm::ConstantInt>(callInst->getArgOperand(3));
buzbee101305f2012-06-28 18:00:56 -07002660 genIPut(cUnit, fieldIdx->getZExtValue(), optFlags->getZExtValue(),
2661 size, rlSrc, rlObj, isWide, isObj);
2662}
2663
2664void cvtCheckCast(CompilationUnit* cUnit, llvm::CallInst* callInst)
2665{
2666 DCHECK_EQ(callInst->getNumArgOperands(), 2U);
2667 llvm::ConstantInt* typeIdx =
2668 llvm::dyn_cast<llvm::ConstantInt>(callInst->getArgOperand(0));
2669 RegLocation rlSrc = getLoc(cUnit, callInst->getArgOperand(1));
2670 genCheckCast(cUnit, typeIdx->getZExtValue(), rlSrc);
2671}
2672
buzbee76592632012-06-29 15:18:35 -07002673void cvtFPCompare(CompilationUnit* cUnit, llvm::CallInst* callInst,
2674 Instruction::Code opcode)
2675{
2676 RegLocation rlSrc1 = getLoc(cUnit, callInst->getArgOperand(0));
2677 RegLocation rlSrc2 = getLoc(cUnit, callInst->getArgOperand(1));
2678 RegLocation rlDest = getLoc(cUnit, callInst);
2679 genCmpFP(cUnit, opcode, rlDest, rlSrc1, rlSrc2);
2680}
2681
2682void cvtLongCompare(CompilationUnit* cUnit, llvm::CallInst* callInst)
2683{
2684 RegLocation rlSrc1 = getLoc(cUnit, callInst->getArgOperand(0));
2685 RegLocation rlSrc2 = getLoc(cUnit, callInst->getArgOperand(1));
2686 RegLocation rlDest = getLoc(cUnit, callInst);
2687 genCmpLong(cUnit, rlDest, rlSrc1, rlSrc2);
2688}
2689
buzbeef58c12c2012-07-03 15:06:29 -07002690void cvtSwitch(CompilationUnit* cUnit, llvm::Instruction* inst)
2691{
2692 llvm::SwitchInst* swInst = llvm::dyn_cast<llvm::SwitchInst>(inst);
2693 DCHECK(swInst != NULL);
2694 llvm::Value* testVal = swInst->getCondition();
2695 llvm::MDNode* tableOffsetNode = swInst->getMetadata("SwitchTable");
2696 DCHECK(tableOffsetNode != NULL);
2697 llvm::ConstantInt* tableOffsetValue =
2698 static_cast<llvm::ConstantInt*>(tableOffsetNode->getOperand(0));
2699 int32_t tableOffset = tableOffsetValue->getSExtValue();
2700 RegLocation rlSrc = getLoc(cUnit, testVal);
buzbeea1da8a52012-07-09 14:00:21 -07002701 const u2* table = cUnit->insns + cUnit->currentDalvikOffset + tableOffset;
2702 u2 tableMagic = *table;
2703 if (tableMagic == 0x100) {
2704 genPackedSwitch(cUnit, tableOffset, rlSrc);
2705 } else {
2706 DCHECK_EQ(tableMagic, 0x200);
2707 genSparseSwitch(cUnit, tableOffset, rlSrc);
2708 }
buzbeef58c12c2012-07-03 15:06:29 -07002709}
2710
buzbee6969d502012-06-15 16:40:31 -07002711void cvtInvoke(CompilationUnit* cUnit, llvm::CallInst* callInst,
buzbee76592632012-06-29 15:18:35 -07002712 bool isVoid, bool isFilledNewArray)
buzbee6969d502012-06-15 16:40:31 -07002713{
2714 CallInfo* info = (CallInfo*)oatNew(cUnit, sizeof(CallInfo), true,
2715 kAllocMisc);
buzbee8fa0fda2012-06-27 15:44:52 -07002716 if (isVoid) {
buzbee6969d502012-06-15 16:40:31 -07002717 info->result.location = kLocInvalid;
2718 } else {
2719 info->result = getLoc(cUnit, callInst);
2720 }
2721 llvm::ConstantInt* invokeTypeVal =
2722 llvm::dyn_cast<llvm::ConstantInt>(callInst->getArgOperand(0));
2723 llvm::ConstantInt* methodIndexVal =
2724 llvm::dyn_cast<llvm::ConstantInt>(callInst->getArgOperand(1));
2725 llvm::ConstantInt* optFlagsVal =
2726 llvm::dyn_cast<llvm::ConstantInt>(callInst->getArgOperand(2));
2727 info->type = static_cast<InvokeType>(invokeTypeVal->getZExtValue());
2728 info->index = methodIndexVal->getZExtValue();
2729 info->optFlags = optFlagsVal->getZExtValue();
2730 info->offset = cUnit->currentDalvikOffset;
2731
buzbee6969d502012-06-15 16:40:31 -07002732 // Count the argument words, and then build argument array.
2733 info->numArgWords = 0;
2734 for (unsigned int i = 3; i < callInst->getNumArgOperands(); i++) {
2735 RegLocation tLoc = getLoc(cUnit, callInst->getArgOperand(i));
2736 info->numArgWords += tLoc.wide ? 2 : 1;
2737 }
2738 info->args = (info->numArgWords == 0) ? NULL : (RegLocation*)
2739 oatNew(cUnit, sizeof(RegLocation) * info->numArgWords, false, kAllocMisc);
2740 // Now, fill in the location records, synthesizing high loc of wide vals
2741 for (int i = 3, next = 0; next < info->numArgWords;) {
buzbee4f1181f2012-06-22 13:52:12 -07002742 info->args[next] = getLoc(cUnit, callInst->getArgOperand(i++));
buzbee6969d502012-06-15 16:40:31 -07002743 if (info->args[next].wide) {
2744 next++;
2745 // TODO: Might make sense to mark this as an invalid loc
2746 info->args[next].origSReg = info->args[next-1].origSReg+1;
2747 info->args[next].sRegLow = info->args[next-1].sRegLow+1;
2748 }
2749 next++;
2750 }
buzbee4f4dfc72012-07-02 14:54:44 -07002751 // TODO - rework such that we no longer need isRange
2752 info->isRange = (info->numArgWords > 5);
2753
buzbee76592632012-06-29 15:18:35 -07002754 if (isFilledNewArray) {
buzbee101305f2012-06-28 18:00:56 -07002755 genFilledNewArray(cUnit, info);
2756 } else {
2757 genInvoke(cUnit, info);
2758 }
buzbee6969d502012-06-15 16:40:31 -07002759}
2760
buzbeead8f15e2012-06-18 14:49:45 -07002761/* Look up the RegLocation associated with a Value. Must already be defined */
2762RegLocation valToLoc(CompilationUnit* cUnit, llvm::Value* val)
2763{
2764 SafeMap<llvm::Value*, RegLocation>::iterator it = cUnit->locMap.find(val);
2765 DCHECK(it != cUnit->locMap.end()) << "Missing definition";
2766 return it->second;
2767}
2768
buzbee2cfc6392012-05-07 14:51:40 -07002769bool methodBitcodeBlockCodeGen(CompilationUnit* cUnit, llvm::BasicBlock* bb)
2770{
2771 bool isEntry = (bb == &cUnit->func->getEntryBlock());
2772 // Define the starting label
2773 LIR* blockLabel = cUnit->blockToLabelMap.Get(bb);
2774 // Extract the starting offset from the block's name
2775 if (!isEntry) {
2776 const char* blockName = bb->getName().str().c_str();
2777 int dummy;
Elliott Hughes74847412012-06-20 18:10:21 -07002778 sscanf(blockName, kLabelFormat, &blockLabel->operands[0], &dummy);
buzbee2cfc6392012-05-07 14:51:40 -07002779 }
2780 // Set the label kind
2781 blockLabel->opcode = kPseudoNormalBlockLabel;
2782 // Insert the label
2783 oatAppendLIR(cUnit, blockLabel);
2784
2785 // Free temp registers and reset redundant store tracking */
2786 oatResetRegPool(cUnit);
2787 oatResetDefTracking(cUnit);
2788
2789 //TODO: restore oat incoming liveness optimization
2790 oatClobberAllRegs(cUnit);
2791
buzbee6969d502012-06-15 16:40:31 -07002792 LIR* headLIR = NULL;
buzbee2cfc6392012-05-07 14:51:40 -07002793
2794 if (isEntry) {
2795 cUnit->currentDalvikOffset = 0;
buzbeead8f15e2012-06-18 14:49:45 -07002796 RegLocation* argLocs = (RegLocation*)
2797 oatNew(cUnit, sizeof(RegLocation) * cUnit->numIns, true, kAllocMisc);
2798 llvm::Function::arg_iterator it(cUnit->func->arg_begin());
2799 llvm::Function::arg_iterator it_end(cUnit->func->arg_end());
2800 for (unsigned i = 0; it != it_end; ++it) {
2801 llvm::Value* val = it;
2802 argLocs[i++] = valToLoc(cUnit, val);
2803 llvm::Type* ty = val->getType();
2804 if ((ty == cUnit->irb->getInt64Ty()) || (ty == cUnit->irb->getDoubleTy())) {
2805 argLocs[i++].sRegLow = INVALID_SREG;
2806 }
2807 }
2808 genEntrySequence(cUnit, argLocs, cUnit->methodLoc);
buzbee2cfc6392012-05-07 14:51:40 -07002809 }
2810
2811 // Visit all of the instructions in the block
2812 for (llvm::BasicBlock::iterator it = bb->begin(), e = bb->end(); it != e;) {
2813 llvm::Instruction* inst = it;
2814 llvm::BasicBlock::iterator nextIt = ++it;
2815 // Extract the Dalvik offset from the instruction
2816 uint32_t opcode = inst->getOpcode();
2817 llvm::MDNode* dexOffsetNode = inst->getMetadata("DexOff");
2818 if (dexOffsetNode != NULL) {
2819 llvm::ConstantInt* dexOffsetValue =
2820 static_cast<llvm::ConstantInt*>(dexOffsetNode->getOperand(0));
2821 cUnit->currentDalvikOffset = dexOffsetValue->getZExtValue();
2822 }
2823
buzbee6969d502012-06-15 16:40:31 -07002824 oatResetRegPool(cUnit);
2825 if (cUnit->disableOpt & (1 << kTrackLiveTemps)) {
2826 oatClobberAllRegs(cUnit);
2827 }
2828
2829 if (cUnit->disableOpt & (1 << kSuppressLoads)) {
2830 oatResetDefTracking(cUnit);
2831 }
2832
2833#ifndef NDEBUG
2834 /* Reset temp tracking sanity check */
2835 cUnit->liveSReg = INVALID_SREG;
2836#endif
2837
2838 LIR* boundaryLIR;
2839 const char* instStr = "boundary";
2840 boundaryLIR = newLIR1(cUnit, kPseudoDalvikByteCodeBoundary,
2841 (intptr_t) instStr);
2842 cUnit->boundaryMap.Overwrite(cUnit->currentDalvikOffset, boundaryLIR);
2843
2844 /* Remember the first LIR for thisl block*/
2845 if (headLIR == NULL) {
2846 headLIR = boundaryLIR;
2847 headLIR->defMask = ENCODE_ALL;
2848 }
2849
buzbee2cfc6392012-05-07 14:51:40 -07002850 switch(opcode) {
2851
2852 case llvm::Instruction::ICmp: {
2853 llvm::Instruction* nextInst = nextIt;
2854 llvm::BranchInst* brInst = llvm::dyn_cast<llvm::BranchInst>(nextInst);
2855 if (brInst != NULL /* and... */) {
2856 cvtICmpBr(cUnit, inst, brInst);
2857 ++it;
2858 } else {
2859 cvtICmp(cUnit, inst);
2860 }
2861 }
2862 break;
2863
2864 case llvm::Instruction::Call: {
2865 llvm::CallInst* callInst = llvm::dyn_cast<llvm::CallInst>(inst);
2866 llvm::Function* callee = callInst->getCalledFunction();
2867 greenland::IntrinsicHelper::IntrinsicId id =
2868 cUnit->intrinsic_helper->GetIntrinsicId(callee);
2869 switch (id) {
buzbeeb03f4872012-06-11 15:22:11 -07002870 case greenland::IntrinsicHelper::AllocaShadowFrame:
2871 case greenland::IntrinsicHelper::SetShadowFrameEntry:
buzbee6969d502012-06-15 16:40:31 -07002872 case greenland::IntrinsicHelper::PopShadowFrame:
buzbeeb03f4872012-06-11 15:22:11 -07002873 // Ignore shadow frame stuff for quick compiler
2874 break;
buzbee2cfc6392012-05-07 14:51:40 -07002875 case greenland::IntrinsicHelper::CopyInt:
2876 case greenland::IntrinsicHelper::CopyObj:
2877 case greenland::IntrinsicHelper::CopyFloat:
2878 case greenland::IntrinsicHelper::CopyLong:
2879 case greenland::IntrinsicHelper::CopyDouble:
2880 cvtCopy(cUnit, callInst);
2881 break;
2882 case greenland::IntrinsicHelper::ConstInt:
2883 case greenland::IntrinsicHelper::ConstObj:
2884 case greenland::IntrinsicHelper::ConstLong:
2885 case greenland::IntrinsicHelper::ConstFloat:
2886 case greenland::IntrinsicHelper::ConstDouble:
2887 cvtConst(cUnit, callInst);
2888 break;
buzbee4f1181f2012-06-22 13:52:12 -07002889 case greenland::IntrinsicHelper::DivInt:
2890 case greenland::IntrinsicHelper::DivLong:
2891 cvtBinOp(cUnit, kOpDiv, inst);
2892 break;
2893 case greenland::IntrinsicHelper::RemInt:
2894 case greenland::IntrinsicHelper::RemLong:
2895 cvtBinOp(cUnit, kOpRem, inst);
2896 break;
buzbee2cfc6392012-05-07 14:51:40 -07002897 case greenland::IntrinsicHelper::MethodInfo:
buzbeead8f15e2012-06-18 14:49:45 -07002898 // Already dealt with - just ignore it here.
buzbee2cfc6392012-05-07 14:51:40 -07002899 break;
2900 case greenland::IntrinsicHelper::CheckSuspend:
2901 genSuspendTest(cUnit, 0 /* optFlags already applied */);
2902 break;
buzbee4f1181f2012-06-22 13:52:12 -07002903 case greenland::IntrinsicHelper::HLInvokeObj:
buzbee8fa0fda2012-06-27 15:44:52 -07002904 case greenland::IntrinsicHelper::HLInvokeFloat:
2905 case greenland::IntrinsicHelper::HLInvokeDouble:
2906 case greenland::IntrinsicHelper::HLInvokeLong:
2907 case greenland::IntrinsicHelper::HLInvokeInt:
buzbee101305f2012-06-28 18:00:56 -07002908 cvtInvoke(cUnit, callInst, false /* isVoid */, false /* newArray */);
buzbee4f1181f2012-06-22 13:52:12 -07002909 break;
buzbee6969d502012-06-15 16:40:31 -07002910 case greenland::IntrinsicHelper::HLInvokeVoid:
buzbee101305f2012-06-28 18:00:56 -07002911 cvtInvoke(cUnit, callInst, true /* isVoid */, false /* newArray */);
2912 break;
2913 case greenland::IntrinsicHelper::FilledNewArray:
2914 cvtInvoke(cUnit, callInst, false /* isVoid */, true /* newArray */);
2915 break;
2916 case greenland::IntrinsicHelper::FillArrayData:
2917 cvtFillArrayData(cUnit, callInst);
buzbee6969d502012-06-15 16:40:31 -07002918 break;
2919 case greenland::IntrinsicHelper::ConstString:
buzbee101305f2012-06-28 18:00:56 -07002920 cvtConstObject(cUnit, callInst, true /* isString */);
2921 break;
2922 case greenland::IntrinsicHelper::ConstClass:
2923 cvtConstObject(cUnit, callInst, false /* isString */);
2924 break;
2925 case greenland::IntrinsicHelper::CheckCast:
2926 cvtCheckCast(cUnit, callInst);
buzbee6969d502012-06-15 16:40:31 -07002927 break;
buzbee4f1181f2012-06-22 13:52:12 -07002928 case greenland::IntrinsicHelper::NewInstance:
2929 cvtNewInstance(cUnit, callInst);
2930 break;
buzbee8fa0fda2012-06-27 15:44:52 -07002931 case greenland::IntrinsicHelper::HLSgetObject:
buzbee4f1181f2012-06-22 13:52:12 -07002932 cvtSget(cUnit, callInst, false /* wide */, true /* Object */);
2933 break;
buzbee8fa0fda2012-06-27 15:44:52 -07002934 case greenland::IntrinsicHelper::HLSget:
2935 case greenland::IntrinsicHelper::HLSgetFloat:
2936 case greenland::IntrinsicHelper::HLSgetBoolean:
2937 case greenland::IntrinsicHelper::HLSgetByte:
2938 case greenland::IntrinsicHelper::HLSgetChar:
2939 case greenland::IntrinsicHelper::HLSgetShort:
2940 cvtSget(cUnit, callInst, false /* wide */, false /* Object */);
2941 break;
2942 case greenland::IntrinsicHelper::HLSgetWide:
2943 case greenland::IntrinsicHelper::HLSgetDouble:
2944 cvtSget(cUnit, callInst, true /* wide */, false /* Object */);
2945 break;
buzbee76592632012-06-29 15:18:35 -07002946 case greenland::IntrinsicHelper::HLSput:
2947 case greenland::IntrinsicHelper::HLSputFloat:
2948 case greenland::IntrinsicHelper::HLSputBoolean:
2949 case greenland::IntrinsicHelper::HLSputByte:
2950 case greenland::IntrinsicHelper::HLSputChar:
2951 case greenland::IntrinsicHelper::HLSputShort:
2952 cvtSput(cUnit, callInst, false /* wide */, false /* Object */);
2953 break;
2954 case greenland::IntrinsicHelper::HLSputWide:
2955 case greenland::IntrinsicHelper::HLSputDouble:
2956 cvtSput(cUnit, callInst, true /* wide */, false /* Object */);
2957 break;
buzbeea1da8a52012-07-09 14:00:21 -07002958 case greenland::IntrinsicHelper::HLSputObject:
2959 cvtSput(cUnit, callInst, false /* wide */, true /* Object */);
2960 break;
buzbee32412962012-06-26 16:27:56 -07002961 case greenland::IntrinsicHelper::GetException:
2962 cvtMoveException(cUnit, callInst);
2963 break;
2964 case greenland::IntrinsicHelper::Throw:
2965 cvtThrow(cUnit, callInst);
2966 break;
2967 case greenland::IntrinsicHelper::ThrowVerificationError:
buzbee8fa0fda2012-06-27 15:44:52 -07002968 cvtThrowVerificationError(cUnit, callInst);
buzbee32412962012-06-26 16:27:56 -07002969 break;
buzbee8fa0fda2012-06-27 15:44:52 -07002970 case greenland::IntrinsicHelper::MonitorEnter:
2971 cvtMonitorEnterExit(cUnit, true /* isEnter */, callInst);
2972 break;
2973 case greenland::IntrinsicHelper::MonitorExit:
2974 cvtMonitorEnterExit(cUnit, false /* isEnter */, callInst);
2975 break;
2976 case greenland::IntrinsicHelper::ArrayLength:
buzbee76592632012-06-29 15:18:35 -07002977 cvtArrayLength(cUnit, callInst);
buzbee8fa0fda2012-06-27 15:44:52 -07002978 break;
2979 case greenland::IntrinsicHelper::NewArray:
2980 cvtNewArray(cUnit, callInst);
2981 break;
2982 case greenland::IntrinsicHelper::InstanceOf:
2983 cvtInstanceOf(cUnit, callInst);
2984 break;
2985
2986 case greenland::IntrinsicHelper::HLArrayGet:
2987 case greenland::IntrinsicHelper::HLArrayGetObject:
2988 case greenland::IntrinsicHelper::HLArrayGetFloat:
2989 cvtAget(cUnit, callInst, kWord, 2);
2990 break;
2991 case greenland::IntrinsicHelper::HLArrayGetWide:
2992 case greenland::IntrinsicHelper::HLArrayGetDouble:
2993 cvtAget(cUnit, callInst, kLong, 3);
2994 break;
2995 case greenland::IntrinsicHelper::HLArrayGetBoolean:
2996 cvtAget(cUnit, callInst, kUnsignedByte, 0);
2997 break;
2998 case greenland::IntrinsicHelper::HLArrayGetByte:
2999 cvtAget(cUnit, callInst, kSignedByte, 0);
3000 break;
3001 case greenland::IntrinsicHelper::HLArrayGetChar:
3002 cvtAget(cUnit, callInst, kUnsignedHalf, 1);
3003 break;
3004 case greenland::IntrinsicHelper::HLArrayGetShort:
3005 cvtAget(cUnit, callInst, kSignedHalf, 1);
3006 break;
3007
3008 case greenland::IntrinsicHelper::HLArrayPut:
buzbee8fa0fda2012-06-27 15:44:52 -07003009 case greenland::IntrinsicHelper::HLArrayPutFloat:
buzbeef1f86362012-07-10 15:18:31 -07003010 cvtAputPrimitive(cUnit, callInst, kWord, 2);
3011 break;
3012 case greenland::IntrinsicHelper::HLArrayPutObject:
3013 cvtAputObj(cUnit, callInst);
buzbee8fa0fda2012-06-27 15:44:52 -07003014 break;
3015 case greenland::IntrinsicHelper::HLArrayPutWide:
3016 case greenland::IntrinsicHelper::HLArrayPutDouble:
buzbeef1f86362012-07-10 15:18:31 -07003017 cvtAputPrimitive(cUnit, callInst, kLong, 3);
buzbee8fa0fda2012-06-27 15:44:52 -07003018 break;
3019 case greenland::IntrinsicHelper::HLArrayPutBoolean:
buzbeef1f86362012-07-10 15:18:31 -07003020 cvtAputPrimitive(cUnit, callInst, kUnsignedByte, 0);
buzbee8fa0fda2012-06-27 15:44:52 -07003021 break;
3022 case greenland::IntrinsicHelper::HLArrayPutByte:
buzbeef1f86362012-07-10 15:18:31 -07003023 cvtAputPrimitive(cUnit, callInst, kSignedByte, 0);
buzbee8fa0fda2012-06-27 15:44:52 -07003024 break;
3025 case greenland::IntrinsicHelper::HLArrayPutChar:
buzbeef1f86362012-07-10 15:18:31 -07003026 cvtAputPrimitive(cUnit, callInst, kUnsignedHalf, 1);
buzbee8fa0fda2012-06-27 15:44:52 -07003027 break;
3028 case greenland::IntrinsicHelper::HLArrayPutShort:
buzbeef1f86362012-07-10 15:18:31 -07003029 cvtAputPrimitive(cUnit, callInst, kSignedHalf, 1);
buzbee8fa0fda2012-06-27 15:44:52 -07003030 break;
3031
buzbee101305f2012-06-28 18:00:56 -07003032 case greenland::IntrinsicHelper::HLIGet:
3033 case greenland::IntrinsicHelper::HLIGetFloat:
3034 cvtIget(cUnit, callInst, kWord, false /* isWide */, false /* obj */);
3035 break;
3036 case greenland::IntrinsicHelper::HLIGetObject:
3037 cvtIget(cUnit, callInst, kWord, false /* isWide */, true /* obj */);
3038 break;
3039 case greenland::IntrinsicHelper::HLIGetWide:
3040 case greenland::IntrinsicHelper::HLIGetDouble:
3041 cvtIget(cUnit, callInst, kLong, true /* isWide */, false /* obj */);
3042 break;
3043 case greenland::IntrinsicHelper::HLIGetBoolean:
3044 cvtIget(cUnit, callInst, kUnsignedByte, false /* isWide */,
3045 false /* obj */);
3046 break;
3047 case greenland::IntrinsicHelper::HLIGetByte:
3048 cvtIget(cUnit, callInst, kSignedByte, false /* isWide */,
3049 false /* obj */);
3050 break;
3051 case greenland::IntrinsicHelper::HLIGetChar:
3052 cvtIget(cUnit, callInst, kUnsignedHalf, false /* isWide */,
3053 false /* obj */);
3054 break;
3055 case greenland::IntrinsicHelper::HLIGetShort:
3056 cvtIget(cUnit, callInst, kSignedHalf, false /* isWide */,
3057 false /* obj */);
3058 break;
3059
3060 case greenland::IntrinsicHelper::HLIPut:
3061 case greenland::IntrinsicHelper::HLIPutFloat:
3062 cvtIput(cUnit, callInst, kWord, false /* isWide */, false /* obj */);
3063 break;
3064 case greenland::IntrinsicHelper::HLIPutObject:
3065 cvtIput(cUnit, callInst, kWord, false /* isWide */, true /* obj */);
3066 break;
3067 case greenland::IntrinsicHelper::HLIPutWide:
3068 case greenland::IntrinsicHelper::HLIPutDouble:
3069 cvtIput(cUnit, callInst, kLong, true /* isWide */, false /* obj */);
3070 break;
3071 case greenland::IntrinsicHelper::HLIPutBoolean:
3072 cvtIput(cUnit, callInst, kUnsignedByte, false /* isWide */,
3073 false /* obj */);
3074 break;
3075 case greenland::IntrinsicHelper::HLIPutByte:
3076 cvtIput(cUnit, callInst, kSignedByte, false /* isWide */,
3077 false /* obj */);
3078 break;
3079 case greenland::IntrinsicHelper::HLIPutChar:
3080 cvtIput(cUnit, callInst, kUnsignedHalf, false /* isWide */,
3081 false /* obj */);
3082 break;
3083 case greenland::IntrinsicHelper::HLIPutShort:
3084 cvtIput(cUnit, callInst, kSignedHalf, false /* isWide */,
3085 false /* obj */);
3086 break;
3087
3088 case greenland::IntrinsicHelper::IntToChar:
3089 cvtIntNarrowing(cUnit, callInst, Instruction::INT_TO_CHAR);
3090 break;
3091 case greenland::IntrinsicHelper::IntToShort:
3092 cvtIntNarrowing(cUnit, callInst, Instruction::INT_TO_SHORT);
3093 break;
3094 case greenland::IntrinsicHelper::IntToByte:
3095 cvtIntNarrowing(cUnit, callInst, Instruction::INT_TO_BYTE);
3096 break;
3097
buzbee76592632012-06-29 15:18:35 -07003098 case greenland::IntrinsicHelper::CmplFloat:
3099 cvtFPCompare(cUnit, callInst, Instruction::CMPL_FLOAT);
3100 break;
3101 case greenland::IntrinsicHelper::CmpgFloat:
3102 cvtFPCompare(cUnit, callInst, Instruction::CMPG_FLOAT);
3103 break;
3104 case greenland::IntrinsicHelper::CmplDouble:
3105 cvtFPCompare(cUnit, callInst, Instruction::CMPL_DOUBLE);
3106 break;
3107 case greenland::IntrinsicHelper::CmpgDouble:
3108 cvtFPCompare(cUnit, callInst, Instruction::CMPG_DOUBLE);
3109 break;
3110
3111 case greenland::IntrinsicHelper::CmpLong:
3112 cvtLongCompare(cUnit, callInst);
3113 break;
3114
buzbee2a83e8f2012-07-13 16:42:30 -07003115 case greenland::IntrinsicHelper::SHLLong:
3116 cvtShiftOp(cUnit, Instruction::SHL_LONG, callInst);
buzbee2cfc6392012-05-07 14:51:40 -07003117 break;
buzbee2a83e8f2012-07-13 16:42:30 -07003118 case greenland::IntrinsicHelper::SHRLong:
3119 cvtShiftOp(cUnit, Instruction::SHR_LONG, callInst);
3120 break;
3121 case greenland::IntrinsicHelper::USHRLong:
3122 cvtShiftOp(cUnit, Instruction::USHR_LONG, callInst);
3123 break;
3124 case greenland::IntrinsicHelper::SHLInt:
3125 cvtShiftOp(cUnit, Instruction::SHL_INT, callInst);
3126 break;
3127 case greenland::IntrinsicHelper::SHRInt:
3128 cvtShiftOp(cUnit, Instruction::SHR_INT, callInst);
3129 break;
3130 case greenland::IntrinsicHelper::USHRInt:
3131 cvtShiftOp(cUnit, Instruction::USHR_INT, callInst);
3132 break;
3133
buzbee2cfc6392012-05-07 14:51:40 -07003134 default:
3135 LOG(FATAL) << "Unexpected intrinsic " << (int)id << ", "
3136 << cUnit->intrinsic_helper->GetName(id);
3137 }
3138 }
3139 break;
3140
3141 case llvm::Instruction::Br: cvtBr(cUnit, inst); break;
3142 case llvm::Instruction::Add: cvtBinOp(cUnit, kOpAdd, inst); break;
3143 case llvm::Instruction::Sub: cvtBinOp(cUnit, kOpSub, inst); break;
3144 case llvm::Instruction::Mul: cvtBinOp(cUnit, kOpMul, inst); break;
3145 case llvm::Instruction::SDiv: cvtBinOp(cUnit, kOpDiv, inst); break;
3146 case llvm::Instruction::SRem: cvtBinOp(cUnit, kOpRem, inst); break;
3147 case llvm::Instruction::And: cvtBinOp(cUnit, kOpAnd, inst); break;
3148 case llvm::Instruction::Or: cvtBinOp(cUnit, kOpOr, inst); break;
3149 case llvm::Instruction::Xor: cvtBinOp(cUnit, kOpXor, inst); break;
buzbee2cfc6392012-05-07 14:51:40 -07003150 case llvm::Instruction::PHI: cvtPhi(cUnit, inst); break;
3151 case llvm::Instruction::Ret: cvtRet(cUnit, inst); break;
buzbee4f1181f2012-06-22 13:52:12 -07003152 case llvm::Instruction::FAdd: cvtBinFPOp(cUnit, kOpAdd, inst); break;
3153 case llvm::Instruction::FSub: cvtBinFPOp(cUnit, kOpSub, inst); break;
3154 case llvm::Instruction::FMul: cvtBinFPOp(cUnit, kOpMul, inst); break;
3155 case llvm::Instruction::FDiv: cvtBinFPOp(cUnit, kOpDiv, inst); break;
3156 case llvm::Instruction::FRem: cvtBinFPOp(cUnit, kOpRem, inst); break;
buzbee76592632012-06-29 15:18:35 -07003157 case llvm::Instruction::SIToFP: cvtIntToFP(cUnit, inst); break;
3158 case llvm::Instruction::FPToSI: cvtFPToInt(cUnit, inst); break;
3159 case llvm::Instruction::FPTrunc: cvtDoubleToFloat(cUnit, inst); break;
3160 case llvm::Instruction::FPExt: cvtFloatToDouble(cUnit, inst); break;
3161 case llvm::Instruction::Trunc: cvtTrunc(cUnit, inst); break;
buzbee2cfc6392012-05-07 14:51:40 -07003162
buzbee101305f2012-06-28 18:00:56 -07003163 case llvm::Instruction::ZExt: cvtIntExt(cUnit, inst, false /* signed */);
3164 break;
3165 case llvm::Instruction::SExt: cvtIntExt(cUnit, inst, true /* signed */);
3166 break;
3167
buzbeef58c12c2012-07-03 15:06:29 -07003168 case llvm::Instruction::Switch: cvtSwitch(cUnit, inst); break;
3169
buzbee32412962012-06-26 16:27:56 -07003170 case llvm::Instruction::Unreachable:
3171 break; // FIXME: can we really ignore these?
3172
buzbee2a83e8f2012-07-13 16:42:30 -07003173 case llvm::Instruction::Shl:
3174 case llvm::Instruction::LShr:
3175 case llvm::Instruction::AShr:
buzbee2cfc6392012-05-07 14:51:40 -07003176 case llvm::Instruction::Invoke:
buzbee2cfc6392012-05-07 14:51:40 -07003177 case llvm::Instruction::FPToUI:
buzbee2cfc6392012-05-07 14:51:40 -07003178 case llvm::Instruction::UIToFP:
buzbee2cfc6392012-05-07 14:51:40 -07003179 case llvm::Instruction::PtrToInt:
3180 case llvm::Instruction::IntToPtr:
buzbee2cfc6392012-05-07 14:51:40 -07003181 case llvm::Instruction::FCmp:
buzbee2cfc6392012-05-07 14:51:40 -07003182 case llvm::Instruction::URem:
3183 case llvm::Instruction::UDiv:
3184 case llvm::Instruction::Resume:
buzbee2cfc6392012-05-07 14:51:40 -07003185 case llvm::Instruction::Alloca:
3186 case llvm::Instruction::GetElementPtr:
3187 case llvm::Instruction::Fence:
3188 case llvm::Instruction::AtomicCmpXchg:
3189 case llvm::Instruction::AtomicRMW:
3190 case llvm::Instruction::BitCast:
3191 case llvm::Instruction::VAArg:
3192 case llvm::Instruction::Select:
3193 case llvm::Instruction::UserOp1:
3194 case llvm::Instruction::UserOp2:
3195 case llvm::Instruction::ExtractElement:
3196 case llvm::Instruction::InsertElement:
3197 case llvm::Instruction::ShuffleVector:
3198 case llvm::Instruction::ExtractValue:
3199 case llvm::Instruction::InsertValue:
3200 case llvm::Instruction::LandingPad:
3201 case llvm::Instruction::IndirectBr:
3202 case llvm::Instruction::Load:
3203 case llvm::Instruction::Store:
3204 LOG(FATAL) << "Unexpected llvm opcode: " << opcode; break;
3205
3206 default:
buzbee2a83e8f2012-07-13 16:42:30 -07003207 LOG(FATAL) << "Unknown llvm opcode: " << inst->getOpcodeName();
3208 break;
buzbee2cfc6392012-05-07 14:51:40 -07003209 }
3210 }
buzbee6969d502012-06-15 16:40:31 -07003211
3212 if (headLIR != NULL) {
3213 oatApplyLocalOptimizations(cUnit, headLIR, cUnit->lastLIRInsn);
3214 }
buzbee2cfc6392012-05-07 14:51:40 -07003215 return false;
3216}
3217
3218/*
3219 * Convert LLVM_IR to MIR:
3220 * o Iterate through the LLVM_IR and construct a graph using
3221 * standard MIR building blocks.
3222 * o Perform a basic-block optimization pass to remove unnecessary
3223 * store/load sequences.
3224 * o Convert the LLVM Value operands into RegLocations where applicable.
3225 * o Create ssaRep def/use operand arrays for each converted LLVM opcode
3226 * o Perform register promotion
3227 * o Iterate through the graph a basic block at a time, generating
3228 * LIR.
3229 * o Assemble LIR as usual.
3230 * o Profit.
3231 */
3232void oatMethodBitcode2LIR(CompilationUnit* cUnit)
3233{
buzbeead8f15e2012-06-18 14:49:45 -07003234 llvm::Function* func = cUnit->func;
3235 int numBasicBlocks = func->getBasicBlockList().size();
buzbee2cfc6392012-05-07 14:51:40 -07003236 // Allocate a list for LIR basic block labels
3237 cUnit->blockLabelList =
buzbeea1da8a52012-07-09 14:00:21 -07003238 (LIR*)oatNew(cUnit, sizeof(LIR) * numBasicBlocks, true, kAllocLIR);
3239 LIR* labelList = cUnit->blockLabelList;
buzbee2cfc6392012-05-07 14:51:40 -07003240 int nextLabel = 0;
buzbeead8f15e2012-06-18 14:49:45 -07003241 for (llvm::Function::iterator i = func->begin(),
3242 e = func->end(); i != e; ++i) {
buzbee2cfc6392012-05-07 14:51:40 -07003243 cUnit->blockToLabelMap.Put(static_cast<llvm::BasicBlock*>(i),
3244 &labelList[nextLabel++]);
3245 }
buzbeead8f15e2012-06-18 14:49:45 -07003246
3247 /*
3248 * Keep honest - clear regLocations, Value => RegLocation,
3249 * promotion map and VmapTables.
3250 */
3251 cUnit->locMap.clear(); // Start fresh
3252 cUnit->regLocation = NULL;
3253 for (int i = 0; i < cUnit->numDalvikRegisters + cUnit->numCompilerTemps + 1;
3254 i++) {
3255 cUnit->promotionMap[i].coreLocation = kLocDalvikFrame;
3256 cUnit->promotionMap[i].fpLocation = kLocDalvikFrame;
3257 }
3258 cUnit->coreSpillMask = 0;
3259 cUnit->numCoreSpills = 0;
3260 cUnit->fpSpillMask = 0;
3261 cUnit->numFPSpills = 0;
3262 cUnit->coreVmapTable.clear();
3263 cUnit->fpVmapTable.clear();
3264 oatAdjustSpillMask(cUnit);
3265 cUnit->frameSize = oatComputeFrameSize(cUnit);
3266
3267 /*
3268 * At this point, we've lost all knowledge of register promotion.
3269 * Rebuild that info from the MethodInfo intrinsic (if it
3270 * exists - not required for correctness).
3271 */
3272 // TODO: find and recover MethodInfo.
3273
3274 // Create RegLocations for arguments
3275 llvm::Function::arg_iterator it(cUnit->func->arg_begin());
3276 llvm::Function::arg_iterator it_end(cUnit->func->arg_end());
3277 for (; it != it_end; ++it) {
3278 llvm::Value* val = it;
3279 createLocFromValue(cUnit, val);
3280 }
3281 // Create RegLocations for all non-argument defintions
3282 for (llvm::inst_iterator i = llvm::inst_begin(func),
3283 e = llvm::inst_end(func); i != e; ++i) {
3284 llvm::Value* val = &*i;
3285 if (val->hasName() && (val->getName().str().c_str()[0] == 'v')) {
3286 createLocFromValue(cUnit, val);
3287 }
3288 }
3289
buzbee2cfc6392012-05-07 14:51:40 -07003290 // Walk the blocks, generating code.
3291 for (llvm::Function::iterator i = cUnit->func->begin(),
3292 e = cUnit->func->end(); i != e; ++i) {
3293 methodBitcodeBlockCodeGen(cUnit, static_cast<llvm::BasicBlock*>(i));
3294 }
3295
3296 handleSuspendLaunchpads(cUnit);
3297
3298 handleThrowLaunchpads(cUnit);
3299
3300 handleIntrinsicLaunchpads(cUnit);
3301
3302 freeIR(cUnit);
3303}
3304
3305
3306} // namespace art
3307
3308#endif // ART_USE_QUICK_COMPILER