blob: caf67c6939d2c077024bc08ba33270ea158dc401 [file] [log] [blame]
Shih-wei Liaod1fec812012-02-13 09:51:10 -08001/*
2 * Copyright (C) 2012 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#include "method_compiler.h"
18
Logan Chienfca7e872011-12-20 20:08:22 +080019#include "backend_types.h"
Shih-wei Liaod1fec812012-02-13 09:51:10 -080020#include "compiler.h"
Logan Chiena78e3c82011-12-27 17:59:35 +080021#include "inferred_reg_category_map.h"
Shih-wei Liaod1fec812012-02-13 09:51:10 -080022#include "ir_builder.h"
23#include "logging.h"
24#include "object.h"
25#include "object_utils.h"
Logan Chien42e0e152012-01-13 15:42:36 +080026#include "runtime_support_func.h"
Shih-wei Liaod1fec812012-02-13 09:51:10 -080027#include "stl_util.h"
Logan Chien0b827102011-12-20 19:46:14 +080028#include "stringprintf.h"
29#include "utils_llvm.h"
Shih-wei Liaod1fec812012-02-13 09:51:10 -080030
31#include <iomanip>
32
33#include <llvm/Analysis/Verifier.h>
Logan Chienc670a8d2011-12-20 21:25:56 +080034#include <llvm/BasicBlock.h>
Shih-wei Liaod1fec812012-02-13 09:51:10 -080035#include <llvm/Function.h>
Logan Chiena85fb2f2012-01-16 12:52:56 +080036#include <llvm/GlobalVariable.h>
37#include <llvm/Intrinsics.h>
Shih-wei Liaod1fec812012-02-13 09:51:10 -080038
Logan Chien83426162011-12-09 09:29:50 +080039namespace art {
40namespace compiler_llvm {
Shih-wei Liaod1fec812012-02-13 09:51:10 -080041
Logan Chien42e0e152012-01-13 15:42:36 +080042using namespace runtime_support;
43
Shih-wei Liaod1fec812012-02-13 09:51:10 -080044
Logan Chien83426162011-12-09 09:29:50 +080045MethodCompiler::MethodCompiler(InstructionSet insn_set,
46 Compiler* compiler,
47 ClassLinker* class_linker,
48 ClassLoader const* class_loader,
49 DexFile const* dex_file,
50 DexCache* dex_cache,
51 DexFile::CodeItem const* code_item,
Shih-wei Liaod1fec812012-02-13 09:51:10 -080052 uint32_t method_idx,
53 uint32_t access_flags)
54: insn_set_(insn_set),
55 compiler_(compiler), compiler_llvm_(compiler->GetCompilerLLVM()),
56 class_linker_(class_linker), class_loader_(class_loader),
57 dex_file_(dex_file), dex_cache_(dex_cache), code_item_(code_item),
58 method_(dex_cache->GetResolvedMethod(method_idx)),
59 method_helper_(method_), method_idx_(method_idx),
60 access_flags_(access_flags), module_(compiler_llvm_->GetModule()),
61 context_(compiler_llvm_->GetLLVMContext()),
Logan Chienc670a8d2011-12-20 21:25:56 +080062 irb_(*compiler_llvm_->GetIRBuilder()), func_(NULL), retval_reg_(NULL),
Logan Chiend6ececa2011-12-27 16:20:15 +080063 basic_block_reg_alloca_(NULL),
64 basic_block_reg_zero_init_(NULL), basic_block_reg_arg_init_(NULL),
Logan Chien5bcc04e2012-01-30 14:15:12 +080065 basic_blocks_(code_item->insns_size_in_code_units_),
66 basic_block_landing_pads_(code_item->tries_size_, NULL),
67 basic_block_unwind_(NULL), basic_block_unreachable_(NULL) {
Shih-wei Liaod1fec812012-02-13 09:51:10 -080068}
69
70
71MethodCompiler::~MethodCompiler() {
Logan Chienc670a8d2011-12-20 21:25:56 +080072 STLDeleteElements(&regs_);
Shih-wei Liaod1fec812012-02-13 09:51:10 -080073}
74
75
Logan Chien0b827102011-12-20 19:46:14 +080076void MethodCompiler::CreateFunction() {
77 // LLVM function name
78 std::string func_name(LLVMLongName(method_));
79
80 // Get function type
81 llvm::FunctionType* func_type =
82 GetFunctionType(method_idx_, method_->IsStatic());
83
84 // Create function
85 func_ = llvm::Function::Create(func_type, llvm::Function::ExternalLinkage,
86 func_name, module_);
87
88 // Set argument name
89 llvm::Function::arg_iterator arg_iter(func_->arg_begin());
90 llvm::Function::arg_iterator arg_end(func_->arg_end());
91
92 DCHECK_NE(arg_iter, arg_end);
93 arg_iter->setName("method");
94 ++arg_iter;
95
96 if (!method_->IsStatic()) {
97 DCHECK_NE(arg_iter, arg_end);
98 arg_iter->setName("this");
99 ++arg_iter;
100 }
101
102 for (unsigned i = 0; arg_iter != arg_end; ++i, ++arg_iter) {
103 arg_iter->setName(StringPrintf("a%u", i));
104 }
105}
106
107
108llvm::FunctionType* MethodCompiler::GetFunctionType(uint32_t method_idx,
109 bool is_static) {
110 // Get method signature
111 DexFile::MethodId const& method_id = dex_file_->GetMethodId(method_idx);
112
113 int32_t shorty_size;
114 char const* shorty = dex_file_->GetMethodShorty(method_id, &shorty_size);
115 CHECK_GE(shorty_size, 1);
116
117 // Get return type
118 llvm::Type* ret_type = irb_.getJType(shorty[0], kAccurate);
119
120 // Get argument type
121 std::vector<llvm::Type*> args_type;
122
123 args_type.push_back(irb_.getJObjectTy()); // method object pointer
124
125 if (!is_static) {
126 args_type.push_back(irb_.getJType('L', kAccurate)); // "this" object pointer
127 }
128
129 for (int32_t i = 1; i < shorty_size; ++i) {
130 args_type.push_back(irb_.getJType(shorty[i], kAccurate));
131 }
132
133 return llvm::FunctionType::get(ret_type, args_type, false);
134}
135
136
Shih-wei Liaod1fec812012-02-13 09:51:10 -0800137void MethodCompiler::EmitPrologue() {
Logan Chienc670a8d2011-12-20 21:25:56 +0800138 // Create basic blocks for prologue
139 basic_block_reg_alloca_ =
140 llvm::BasicBlock::Create(*context_, "prologue.alloca", func_);
141
142 basic_block_reg_zero_init_ =
143 llvm::BasicBlock::Create(*context_, "prologue.zeroinit", func_);
144
Logan Chiend6ececa2011-12-27 16:20:15 +0800145 basic_block_reg_arg_init_ =
146 llvm::BasicBlock::Create(*context_, "prologue.arginit", func_);
147
Logan Chienc670a8d2011-12-20 21:25:56 +0800148 // Create register array
149 for (uint16_t r = 0; r < code_item_->registers_size_; ++r) {
150 regs_.push_back(DalvikReg::CreateLocalVarReg(*this, r));
151 }
152
153 retval_reg_.reset(DalvikReg::CreateRetValReg(*this));
Logan Chiend6ececa2011-12-27 16:20:15 +0800154
155 // Store argument to dalvik register
156 irb_.SetInsertPoint(basic_block_reg_arg_init_);
157 EmitPrologueAssignArgRegister();
158
159 // Branch to start address
160 irb_.CreateBr(GetBasicBlock(0));
Logan Chienc670a8d2011-12-20 21:25:56 +0800161}
162
163
164void MethodCompiler::EmitPrologueLastBranch() {
165 irb_.SetInsertPoint(basic_block_reg_alloca_);
166 irb_.CreateBr(basic_block_reg_zero_init_);
167
168 irb_.SetInsertPoint(basic_block_reg_zero_init_);
Logan Chiend6ececa2011-12-27 16:20:15 +0800169 irb_.CreateBr(basic_block_reg_arg_init_);
170}
171
172
173void MethodCompiler::EmitPrologueAssignArgRegister() {
174 uint16_t arg_reg = code_item_->registers_size_ - code_item_->ins_size_;
175
176 llvm::Function::arg_iterator arg_iter(func_->arg_begin());
177 llvm::Function::arg_iterator arg_end(func_->arg_end());
178
179 char const* shorty = method_helper_.GetShorty();
180 int32_t shorty_size = method_helper_.GetShortyLength();
181 CHECK_LE(1, shorty_size);
182
183 ++arg_iter; // skip method object
184
185 if (!method_->IsStatic()) {
186 EmitStoreDalvikReg(arg_reg, kObject, kAccurate, arg_iter);
187 ++arg_iter;
188 ++arg_reg;
189 }
190
191 for (int32_t i = 1; i < shorty_size; ++i, ++arg_iter) {
192 EmitStoreDalvikReg(arg_reg, shorty[i], kAccurate, arg_iter);
193
194 ++arg_reg;
195 if (shorty[i] == 'J' || shorty[i] == 'D') {
196 // Wide types, such as long and double, are using a pair of registers
197 // to store the value, so we have to increase arg_reg again.
198 ++arg_reg;
199 }
200 }
201
202 DCHECK_EQ(arg_end, arg_iter);
Shih-wei Liaod1fec812012-02-13 09:51:10 -0800203}
204
205
Logan Chien83426162011-12-09 09:29:50 +0800206void MethodCompiler::EmitInstructions() {
Logan Chiend6c239a2011-12-23 15:11:45 +0800207 uint32_t dex_pc = 0;
208 while (dex_pc < code_item_->insns_size_in_code_units_) {
209 Instruction const* insn = Instruction::At(code_item_->insns_ + dex_pc);
210 EmitInstruction(dex_pc, insn);
211 dex_pc += insn->SizeInCodeUnits();
212 }
Shih-wei Liaod1fec812012-02-13 09:51:10 -0800213}
214
215
Logan Chien83426162011-12-09 09:29:50 +0800216void MethodCompiler::EmitInstruction(uint32_t dex_pc,
217 Instruction const* insn) {
Logan Chiend6c239a2011-12-23 15:11:45 +0800218
219 // Set the IRBuilder insertion point
220 irb_.SetInsertPoint(GetBasicBlock(dex_pc));
221
Logan Chien70f94b42011-12-27 17:49:11 +0800222#define ARGS dex_pc, insn
223
224 // Dispatch the instruction
225 switch (insn->Opcode()) {
226 case Instruction::NOP:
227 EmitInsn_Nop(ARGS);
228 break;
229
230 case Instruction::MOVE:
231 case Instruction::MOVE_FROM16:
232 case Instruction::MOVE_16:
233 EmitInsn_Move(ARGS, kInt);
234 break;
235
236 case Instruction::MOVE_WIDE:
237 case Instruction::MOVE_WIDE_FROM16:
238 case Instruction::MOVE_WIDE_16:
239 EmitInsn_Move(ARGS, kLong);
240 break;
241
242 case Instruction::MOVE_OBJECT:
243 case Instruction::MOVE_OBJECT_FROM16:
244 case Instruction::MOVE_OBJECT_16:
245 EmitInsn_Move(ARGS, kObject);
246 break;
247
248 case Instruction::MOVE_RESULT:
249 EmitInsn_MoveResult(ARGS, kInt);
250 break;
251
252 case Instruction::MOVE_RESULT_WIDE:
253 EmitInsn_MoveResult(ARGS, kLong);
254 break;
255
256 case Instruction::MOVE_RESULT_OBJECT:
257 EmitInsn_MoveResult(ARGS, kObject);
258 break;
259
260 case Instruction::MOVE_EXCEPTION:
261 EmitInsn_MoveException(ARGS);
262 break;
263
264 case Instruction::RETURN_VOID:
265 EmitInsn_ReturnVoid(ARGS);
266 break;
267
268 case Instruction::RETURN:
269 case Instruction::RETURN_WIDE:
270 case Instruction::RETURN_OBJECT:
271 EmitInsn_Return(ARGS);
272 break;
273
274 case Instruction::CONST_4:
275 case Instruction::CONST_16:
276 case Instruction::CONST:
277 case Instruction::CONST_HIGH16:
278 EmitInsn_LoadConstant(ARGS, kInt);
279 break;
280
281 case Instruction::CONST_WIDE_16:
282 case Instruction::CONST_WIDE_32:
283 case Instruction::CONST_WIDE:
284 case Instruction::CONST_WIDE_HIGH16:
285 EmitInsn_LoadConstant(ARGS, kLong);
286 break;
287
288 case Instruction::CONST_STRING:
289 case Instruction::CONST_STRING_JUMBO:
290 EmitInsn_LoadConstantString(ARGS);
291 break;
292
293 case Instruction::CONST_CLASS:
294 EmitInsn_LoadConstantClass(ARGS);
295 break;
296
297 case Instruction::MONITOR_ENTER:
298 EmitInsn_MonitorEnter(ARGS);
299 break;
300
301 case Instruction::MONITOR_EXIT:
302 EmitInsn_MonitorExit(ARGS);
303 break;
304
305 case Instruction::CHECK_CAST:
306 EmitInsn_CheckCast(ARGS);
307 break;
308
309 case Instruction::INSTANCE_OF:
310 EmitInsn_InstanceOf(ARGS);
311 break;
312
313 case Instruction::ARRAY_LENGTH:
314 EmitInsn_ArrayLength(ARGS);
315 break;
316
317 case Instruction::NEW_INSTANCE:
318 EmitInsn_NewInstance(ARGS);
319 break;
320
321 case Instruction::NEW_ARRAY:
322 EmitInsn_NewArray(ARGS);
323 break;
324
325 case Instruction::FILLED_NEW_ARRAY:
326 EmitInsn_FilledNewArray(ARGS, false);
327 break;
328
329 case Instruction::FILLED_NEW_ARRAY_RANGE:
330 EmitInsn_FilledNewArray(ARGS, true);
331 break;
332
333 case Instruction::FILL_ARRAY_DATA:
334 EmitInsn_FillArrayData(ARGS);
335 break;
336
337 case Instruction::THROW:
338 EmitInsn_ThrowException(ARGS);
339 break;
340
341 case Instruction::GOTO:
342 case Instruction::GOTO_16:
343 case Instruction::GOTO_32:
344 EmitInsn_UnconditionalBranch(ARGS);
345 break;
346
347 case Instruction::PACKED_SWITCH:
348 EmitInsn_PackedSwitch(ARGS);
349 break;
350
351 case Instruction::SPARSE_SWITCH:
352 EmitInsn_SparseSwitch(ARGS);
353 break;
354
355 case Instruction::CMPL_FLOAT:
356 EmitInsn_FPCompare(ARGS, kFloat, false);
357 break;
358
359 case Instruction::CMPG_FLOAT:
360 EmitInsn_FPCompare(ARGS, kFloat, true);
361 break;
362
363 case Instruction::CMPL_DOUBLE:
364 EmitInsn_FPCompare(ARGS, kDouble, false);
365 break;
366
367 case Instruction::CMPG_DOUBLE:
368 EmitInsn_FPCompare(ARGS, kDouble, true);
369 break;
370
371 case Instruction::CMP_LONG:
372 EmitInsn_LongCompare(ARGS);
373 break;
374
375 case Instruction::IF_EQ:
376 EmitInsn_BinaryConditionalBranch(ARGS, kCondBranch_EQ);
377 break;
378
379 case Instruction::IF_NE:
380 EmitInsn_BinaryConditionalBranch(ARGS, kCondBranch_NE);
381 break;
382
383 case Instruction::IF_LT:
384 EmitInsn_BinaryConditionalBranch(ARGS, kCondBranch_LT);
385 break;
386
387 case Instruction::IF_GE:
388 EmitInsn_BinaryConditionalBranch(ARGS, kCondBranch_GE);
389 break;
390
391 case Instruction::IF_GT:
392 EmitInsn_BinaryConditionalBranch(ARGS, kCondBranch_GT);
393 break;
394
395 case Instruction::IF_LE:
396 EmitInsn_BinaryConditionalBranch(ARGS, kCondBranch_LE);
397 break;
398
399 case Instruction::IF_EQZ:
400 EmitInsn_UnaryConditionalBranch(ARGS, kCondBranch_EQ);
401 break;
402
403 case Instruction::IF_NEZ:
404 EmitInsn_UnaryConditionalBranch(ARGS, kCondBranch_NE);
405 break;
406
407 case Instruction::IF_LTZ:
408 EmitInsn_UnaryConditionalBranch(ARGS, kCondBranch_LT);
409 break;
410
411 case Instruction::IF_GEZ:
412 EmitInsn_UnaryConditionalBranch(ARGS, kCondBranch_GE);
413 break;
414
415 case Instruction::IF_GTZ:
416 EmitInsn_UnaryConditionalBranch(ARGS, kCondBranch_GT);
417 break;
418
419 case Instruction::IF_LEZ:
420 EmitInsn_UnaryConditionalBranch(ARGS, kCondBranch_LE);
421 break;
422
423 case Instruction::AGET:
424 EmitInsn_AGet(ARGS, kInt);
425 break;
426
427 case Instruction::AGET_WIDE:
428 EmitInsn_AGet(ARGS, kLong);
429 break;
430
431 case Instruction::AGET_OBJECT:
432 EmitInsn_AGet(ARGS, kObject);
433 break;
434
435 case Instruction::AGET_BOOLEAN:
436 EmitInsn_AGet(ARGS, kBoolean);
437 break;
438
439 case Instruction::AGET_BYTE:
440 EmitInsn_AGet(ARGS, kByte);
441 break;
442
443 case Instruction::AGET_CHAR:
444 EmitInsn_AGet(ARGS, kChar);
445 break;
446
447 case Instruction::AGET_SHORT:
448 EmitInsn_AGet(ARGS, kShort);
449 break;
450
451 case Instruction::APUT:
452 EmitInsn_APut(ARGS, kInt);
453 break;
454
455 case Instruction::APUT_WIDE:
456 EmitInsn_APut(ARGS, kLong);
457 break;
458
459 case Instruction::APUT_OBJECT:
460 EmitInsn_APut(ARGS, kObject);
461 break;
462
463 case Instruction::APUT_BOOLEAN:
464 EmitInsn_APut(ARGS, kBoolean);
465 break;
466
467 case Instruction::APUT_BYTE:
468 EmitInsn_APut(ARGS, kByte);
469 break;
470
471 case Instruction::APUT_CHAR:
472 EmitInsn_APut(ARGS, kChar);
473 break;
474
475 case Instruction::APUT_SHORT:
476 EmitInsn_APut(ARGS, kShort);
477 break;
478
479 case Instruction::IGET:
480 EmitInsn_IGet(ARGS, kInt);
481 break;
482
483 case Instruction::IGET_WIDE:
484 EmitInsn_IGet(ARGS, kLong);
485 break;
486
487 case Instruction::IGET_OBJECT:
488 EmitInsn_IGet(ARGS, kObject);
489 break;
490
491 case Instruction::IGET_BOOLEAN:
492 EmitInsn_IGet(ARGS, kBoolean);
493 break;
494
495 case Instruction::IGET_BYTE:
496 EmitInsn_IGet(ARGS, kByte);
497 break;
498
499 case Instruction::IGET_CHAR:
500 EmitInsn_IGet(ARGS, kChar);
501 break;
502
503 case Instruction::IGET_SHORT:
504 EmitInsn_IGet(ARGS, kShort);
505 break;
506
507 case Instruction::IPUT:
508 EmitInsn_IPut(ARGS, kInt);
509 break;
510
511 case Instruction::IPUT_WIDE:
512 EmitInsn_IPut(ARGS, kLong);
513 break;
514
515 case Instruction::IPUT_OBJECT:
516 EmitInsn_IPut(ARGS, kObject);
517 break;
518
519 case Instruction::IPUT_BOOLEAN:
520 EmitInsn_IPut(ARGS, kBoolean);
521 break;
522
523 case Instruction::IPUT_BYTE:
524 EmitInsn_IPut(ARGS, kByte);
525 break;
526
527 case Instruction::IPUT_CHAR:
528 EmitInsn_IPut(ARGS, kChar);
529 break;
530
531 case Instruction::IPUT_SHORT:
532 EmitInsn_IPut(ARGS, kShort);
533 break;
534
535 case Instruction::SGET:
536 EmitInsn_SGet(ARGS, kInt);
537 break;
538
539 case Instruction::SGET_WIDE:
540 EmitInsn_SGet(ARGS, kLong);
541 break;
542
543 case Instruction::SGET_OBJECT:
544 EmitInsn_SGet(ARGS, kObject);
545 break;
546
547 case Instruction::SGET_BOOLEAN:
548 EmitInsn_SGet(ARGS, kBoolean);
549 break;
550
551 case Instruction::SGET_BYTE:
552 EmitInsn_SGet(ARGS, kByte);
553 break;
554
555 case Instruction::SGET_CHAR:
556 EmitInsn_SGet(ARGS, kChar);
557 break;
558
559 case Instruction::SGET_SHORT:
560 EmitInsn_SGet(ARGS, kShort);
561 break;
562
563 case Instruction::SPUT:
564 EmitInsn_SPut(ARGS, kInt);
565 break;
566
567 case Instruction::SPUT_WIDE:
568 EmitInsn_SPut(ARGS, kLong);
569 break;
570
571 case Instruction::SPUT_OBJECT:
572 EmitInsn_SPut(ARGS, kObject);
573 break;
574
575 case Instruction::SPUT_BOOLEAN:
576 EmitInsn_SPut(ARGS, kBoolean);
577 break;
578
579 case Instruction::SPUT_BYTE:
580 EmitInsn_SPut(ARGS, kByte);
581 break;
582
583 case Instruction::SPUT_CHAR:
584 EmitInsn_SPut(ARGS, kChar);
585 break;
586
587 case Instruction::SPUT_SHORT:
588 EmitInsn_SPut(ARGS, kShort);
589 break;
590
591
592 case Instruction::INVOKE_VIRTUAL:
593 EmitInsn_InvokeVirtual(ARGS, false);
594 break;
595
596 case Instruction::INVOKE_SUPER:
597 EmitInsn_InvokeSuper(ARGS, false);
598 break;
599
600 case Instruction::INVOKE_DIRECT:
Logan Chien1a121b92012-02-15 22:23:42 +0800601 EmitInsn_InvokeStaticDirect(ARGS, /* is_range */ false, /* is_static */ false);
Logan Chien70f94b42011-12-27 17:49:11 +0800602 break;
603
604 case Instruction::INVOKE_STATIC:
Logan Chien1a121b92012-02-15 22:23:42 +0800605 EmitInsn_InvokeStaticDirect(ARGS, /* is_range */ false, /* is_static */ true);
Logan Chien70f94b42011-12-27 17:49:11 +0800606 break;
607
608 case Instruction::INVOKE_INTERFACE:
609 EmitInsn_InvokeInterface(ARGS, false);
610 break;
611
612 case Instruction::INVOKE_VIRTUAL_RANGE:
613 EmitInsn_InvokeVirtual(ARGS, true);
614 break;
615
616 case Instruction::INVOKE_SUPER_RANGE:
617 EmitInsn_InvokeSuper(ARGS, true);
618 break;
619
620 case Instruction::INVOKE_DIRECT_RANGE:
Logan Chien1a121b92012-02-15 22:23:42 +0800621 EmitInsn_InvokeStaticDirect(ARGS, /* is_range */ true, /* is_static */ false);
Logan Chien70f94b42011-12-27 17:49:11 +0800622 break;
623
624 case Instruction::INVOKE_STATIC_RANGE:
Logan Chien1a121b92012-02-15 22:23:42 +0800625 EmitInsn_InvokeStaticDirect(ARGS, /* is_range */ true, /* is_static */ true);
Logan Chien70f94b42011-12-27 17:49:11 +0800626 break;
627
628 case Instruction::INVOKE_INTERFACE_RANGE:
629 EmitInsn_InvokeInterface(ARGS, true);
630 break;
631
632 case Instruction::NEG_INT:
633 EmitInsn_Neg(ARGS, kInt);
634 break;
635
636 case Instruction::NOT_INT:
637 EmitInsn_Not(ARGS, kInt);
638 break;
639
640 case Instruction::NEG_LONG:
641 EmitInsn_Neg(ARGS, kLong);
642 break;
643
644 case Instruction::NOT_LONG:
645 EmitInsn_Not(ARGS, kLong);
646 break;
647
648 case Instruction::NEG_FLOAT:
649 EmitInsn_FNeg(ARGS, kFloat);
650 break;
651
652 case Instruction::NEG_DOUBLE:
653 EmitInsn_FNeg(ARGS, kDouble);
654 break;
655
656 case Instruction::INT_TO_LONG:
657 EmitInsn_SExt(ARGS);
658 break;
659
660 case Instruction::INT_TO_FLOAT:
661 EmitInsn_IntToFP(ARGS, kInt, kFloat);
662 break;
663
664 case Instruction::INT_TO_DOUBLE:
665 EmitInsn_IntToFP(ARGS, kInt, kDouble);
666 break;
667
668 case Instruction::LONG_TO_INT:
669 EmitInsn_Trunc(ARGS);
670 break;
671
672 case Instruction::LONG_TO_FLOAT:
673 EmitInsn_IntToFP(ARGS, kLong, kFloat);
674 break;
675
676 case Instruction::LONG_TO_DOUBLE:
677 EmitInsn_IntToFP(ARGS, kLong, kDouble);
678 break;
679
680 case Instruction::FLOAT_TO_INT:
681 EmitInsn_FPToInt(ARGS, kFloat, kInt);
682 break;
683
684 case Instruction::FLOAT_TO_LONG:
685 EmitInsn_FPToInt(ARGS, kFloat, kLong);
686 break;
687
688 case Instruction::FLOAT_TO_DOUBLE:
689 EmitInsn_FExt(ARGS);
690 break;
691
692 case Instruction::DOUBLE_TO_INT:
693 EmitInsn_FPToInt(ARGS, kDouble, kInt);
694 break;
695
696 case Instruction::DOUBLE_TO_LONG:
697 EmitInsn_FPToInt(ARGS, kDouble, kLong);
698 break;
699
700 case Instruction::DOUBLE_TO_FLOAT:
701 EmitInsn_FTrunc(ARGS);
702 break;
703
704 case Instruction::INT_TO_BYTE:
705 EmitInsn_TruncAndSExt(ARGS, 8);
706 break;
707
708 case Instruction::INT_TO_CHAR:
709 EmitInsn_TruncAndZExt(ARGS, 16);
710 break;
711
712 case Instruction::INT_TO_SHORT:
713 EmitInsn_TruncAndSExt(ARGS, 16);
714 break;
715
716 case Instruction::ADD_INT:
717 EmitInsn_IntArithm(ARGS, kIntArithm_Add, kInt, false);
718 break;
719
720 case Instruction::SUB_INT:
721 EmitInsn_IntArithm(ARGS, kIntArithm_Sub, kInt, false);
722 break;
723
724 case Instruction::MUL_INT:
725 EmitInsn_IntArithm(ARGS, kIntArithm_Mul, kInt, false);
726 break;
727
728 case Instruction::DIV_INT:
729 EmitInsn_IntArithm(ARGS, kIntArithm_Div, kInt, false);
730 break;
731
732 case Instruction::REM_INT:
733 EmitInsn_IntArithm(ARGS, kIntArithm_Rem, kInt, false);
734 break;
735
736 case Instruction::AND_INT:
737 EmitInsn_IntArithm(ARGS, kIntArithm_And, kInt, false);
738 break;
739
740 case Instruction::OR_INT:
741 EmitInsn_IntArithm(ARGS, kIntArithm_Or, kInt, false);
742 break;
743
744 case Instruction::XOR_INT:
745 EmitInsn_IntArithm(ARGS, kIntArithm_Xor, kInt, false);
746 break;
747
748 case Instruction::SHL_INT:
749 EmitInsn_IntArithm(ARGS, kIntArithm_Shl, kInt, false);
750 break;
751
752 case Instruction::SHR_INT:
753 EmitInsn_IntArithm(ARGS, kIntArithm_Shr, kInt, false);
754 break;
755
756 case Instruction::USHR_INT:
757 EmitInsn_IntArithm(ARGS, kIntArithm_UShr, kInt, false);
758 break;
759
760 case Instruction::ADD_LONG:
761 EmitInsn_IntArithm(ARGS, kIntArithm_Add, kLong, false);
762 break;
763
764 case Instruction::SUB_LONG:
765 EmitInsn_IntArithm(ARGS, kIntArithm_Sub, kLong, false);
766 break;
767
768 case Instruction::MUL_LONG:
769 EmitInsn_IntArithm(ARGS, kIntArithm_Mul, kLong, false);
770 break;
771
772 case Instruction::DIV_LONG:
773 EmitInsn_IntArithm(ARGS, kIntArithm_Div, kLong, false);
774 break;
775
776 case Instruction::REM_LONG:
777 EmitInsn_IntArithm(ARGS, kIntArithm_Rem, kLong, false);
778 break;
779
780 case Instruction::AND_LONG:
781 EmitInsn_IntArithm(ARGS, kIntArithm_And, kLong, false);
782 break;
783
784 case Instruction::OR_LONG:
785 EmitInsn_IntArithm(ARGS, kIntArithm_Or, kLong, false);
786 break;
787
788 case Instruction::XOR_LONG:
789 EmitInsn_IntArithm(ARGS, kIntArithm_Xor, kLong, false);
790 break;
791
792 case Instruction::SHL_LONG:
793 EmitInsn_IntArithm(ARGS, kIntArithm_Shl, kLong, false);
794 break;
795
796 case Instruction::SHR_LONG:
797 EmitInsn_IntArithm(ARGS, kIntArithm_Shr, kLong, false);
798 break;
799
800 case Instruction::USHR_LONG:
801 EmitInsn_IntArithm(ARGS, kIntArithm_UShr, kLong, false);
802 break;
803
804 case Instruction::ADD_FLOAT:
805 EmitInsn_FPArithm(ARGS, kFPArithm_Add, kFloat, false);
806 break;
807
808 case Instruction::SUB_FLOAT:
809 EmitInsn_FPArithm(ARGS, kFPArithm_Sub, kFloat, false);
810 break;
811
812 case Instruction::MUL_FLOAT:
813 EmitInsn_FPArithm(ARGS, kFPArithm_Mul, kFloat, false);
814 break;
815
816 case Instruction::DIV_FLOAT:
817 EmitInsn_FPArithm(ARGS, kFPArithm_Div, kFloat, false);
818 break;
819
820 case Instruction::REM_FLOAT:
821 EmitInsn_FPArithm(ARGS, kFPArithm_Rem, kFloat, false);
822 break;
823
824 case Instruction::ADD_DOUBLE:
825 EmitInsn_FPArithm(ARGS, kFPArithm_Add, kDouble, false);
826 break;
827
828 case Instruction::SUB_DOUBLE:
829 EmitInsn_FPArithm(ARGS, kFPArithm_Sub, kDouble, false);
830 break;
831
832 case Instruction::MUL_DOUBLE:
833 EmitInsn_FPArithm(ARGS, kFPArithm_Mul, kDouble, false);
834 break;
835
836 case Instruction::DIV_DOUBLE:
837 EmitInsn_FPArithm(ARGS, kFPArithm_Div, kDouble, false);
838 break;
839
840 case Instruction::REM_DOUBLE:
841 EmitInsn_FPArithm(ARGS, kFPArithm_Rem, kDouble, false);
842 break;
843
844 case Instruction::ADD_INT_2ADDR:
845 EmitInsn_IntArithm(ARGS, kIntArithm_Add, kInt, true);
846 break;
847
848 case Instruction::SUB_INT_2ADDR:
849 EmitInsn_IntArithm(ARGS, kIntArithm_Sub, kInt, true);
850 break;
851
852 case Instruction::MUL_INT_2ADDR:
853 EmitInsn_IntArithm(ARGS, kIntArithm_Mul, kInt, true);
854 break;
855
856 case Instruction::DIV_INT_2ADDR:
857 EmitInsn_IntArithm(ARGS, kIntArithm_Div, kInt, true);
858 break;
859
860 case Instruction::REM_INT_2ADDR:
861 EmitInsn_IntArithm(ARGS, kIntArithm_Rem, kInt, true);
862 break;
863
864 case Instruction::AND_INT_2ADDR:
865 EmitInsn_IntArithm(ARGS, kIntArithm_And, kInt, true);
866 break;
867
868 case Instruction::OR_INT_2ADDR:
869 EmitInsn_IntArithm(ARGS, kIntArithm_Or, kInt, true);
870 break;
871
872 case Instruction::XOR_INT_2ADDR:
873 EmitInsn_IntArithm(ARGS, kIntArithm_Xor, kInt, true);
874 break;
875
876 case Instruction::SHL_INT_2ADDR:
877 EmitInsn_IntArithm(ARGS, kIntArithm_Shl, kInt, true);
878 break;
879
880 case Instruction::SHR_INT_2ADDR:
881 EmitInsn_IntArithm(ARGS, kIntArithm_Shr, kInt, true);
882 break;
883
884 case Instruction::USHR_INT_2ADDR:
885 EmitInsn_IntArithm(ARGS, kIntArithm_UShr, kInt, true);
886 break;
887
888 case Instruction::ADD_LONG_2ADDR:
889 EmitInsn_IntArithm(ARGS, kIntArithm_Add, kLong, true);
890 break;
891
892 case Instruction::SUB_LONG_2ADDR:
893 EmitInsn_IntArithm(ARGS, kIntArithm_Sub, kLong, true);
894 break;
895
896 case Instruction::MUL_LONG_2ADDR:
897 EmitInsn_IntArithm(ARGS, kIntArithm_Mul, kLong, true);
898 break;
899
900 case Instruction::DIV_LONG_2ADDR:
901 EmitInsn_IntArithm(ARGS, kIntArithm_Div, kLong, true);
902 break;
903
904 case Instruction::REM_LONG_2ADDR:
905 EmitInsn_IntArithm(ARGS, kIntArithm_Rem, kLong, true);
906 break;
907
908 case Instruction::AND_LONG_2ADDR:
909 EmitInsn_IntArithm(ARGS, kIntArithm_And, kLong, true);
910 break;
911
912 case Instruction::OR_LONG_2ADDR:
913 EmitInsn_IntArithm(ARGS, kIntArithm_Or, kLong, true);
914 break;
915
916 case Instruction::XOR_LONG_2ADDR:
917 EmitInsn_IntArithm(ARGS, kIntArithm_Xor, kLong, true);
918 break;
919
920 case Instruction::SHL_LONG_2ADDR:
921 EmitInsn_IntArithm(ARGS, kIntArithm_Shl, kLong, true);
922 break;
923
924 case Instruction::SHR_LONG_2ADDR:
925 EmitInsn_IntArithm(ARGS, kIntArithm_Shr, kLong, true);
926 break;
927
928 case Instruction::USHR_LONG_2ADDR:
929 EmitInsn_IntArithm(ARGS, kIntArithm_UShr, kLong, true);
930 break;
931
932 case Instruction::ADD_FLOAT_2ADDR:
933 EmitInsn_FPArithm(ARGS, kFPArithm_Add, kFloat, true);
934 break;
935
936 case Instruction::SUB_FLOAT_2ADDR:
937 EmitInsn_FPArithm(ARGS, kFPArithm_Sub, kFloat, true);
938 break;
939
940 case Instruction::MUL_FLOAT_2ADDR:
941 EmitInsn_FPArithm(ARGS, kFPArithm_Mul, kFloat, true);
942 break;
943
944 case Instruction::DIV_FLOAT_2ADDR:
945 EmitInsn_FPArithm(ARGS, kFPArithm_Div, kFloat, true);
946 break;
947
948 case Instruction::REM_FLOAT_2ADDR:
949 EmitInsn_FPArithm(ARGS, kFPArithm_Rem, kFloat, true);
950 break;
951
952 case Instruction::ADD_DOUBLE_2ADDR:
953 EmitInsn_FPArithm(ARGS, kFPArithm_Add, kDouble, true);
954 break;
955
956 case Instruction::SUB_DOUBLE_2ADDR:
957 EmitInsn_FPArithm(ARGS, kFPArithm_Sub, kDouble, true);
958 break;
959
960 case Instruction::MUL_DOUBLE_2ADDR:
961 EmitInsn_FPArithm(ARGS, kFPArithm_Mul, kDouble, true);
962 break;
963
964 case Instruction::DIV_DOUBLE_2ADDR:
965 EmitInsn_FPArithm(ARGS, kFPArithm_Div, kDouble, true);
966 break;
967
968 case Instruction::REM_DOUBLE_2ADDR:
969 EmitInsn_FPArithm(ARGS, kFPArithm_Rem, kDouble, true);
970 break;
971
972 case Instruction::ADD_INT_LIT16:
973 case Instruction::ADD_INT_LIT8:
974 EmitInsn_IntArithmImmediate(ARGS, kIntArithm_Add);
975 break;
976
977 case Instruction::RSUB_INT:
978 case Instruction::RSUB_INT_LIT8:
979 EmitInsn_RSubImmediate(ARGS);
980 break;
981
982 case Instruction::MUL_INT_LIT16:
983 case Instruction::MUL_INT_LIT8:
984 EmitInsn_IntArithmImmediate(ARGS, kIntArithm_Mul);
985 break;
986
987 case Instruction::DIV_INT_LIT16:
988 case Instruction::DIV_INT_LIT8:
989 EmitInsn_IntArithmImmediate(ARGS, kIntArithm_Div);
990 break;
991
992 case Instruction::REM_INT_LIT16:
993 case Instruction::REM_INT_LIT8:
994 EmitInsn_IntArithmImmediate(ARGS, kIntArithm_Rem);
995 break;
996
997 case Instruction::AND_INT_LIT16:
998 case Instruction::AND_INT_LIT8:
999 EmitInsn_IntArithmImmediate(ARGS, kIntArithm_And);
1000 break;
1001
1002 case Instruction::OR_INT_LIT16:
1003 case Instruction::OR_INT_LIT8:
1004 EmitInsn_IntArithmImmediate(ARGS, kIntArithm_Or);
1005 break;
1006
1007 case Instruction::XOR_INT_LIT16:
1008 case Instruction::XOR_INT_LIT8:
1009 EmitInsn_IntArithmImmediate(ARGS, kIntArithm_Xor);
1010 break;
1011
1012 case Instruction::SHL_INT_LIT8:
1013 EmitInsn_IntArithmImmediate(ARGS, kIntArithm_Shl);
1014 break;
1015
1016 case Instruction::SHR_INT_LIT8:
1017 EmitInsn_IntArithmImmediate(ARGS, kIntArithm_Shr);
1018 break;
1019
1020 case Instruction::USHR_INT_LIT8:
1021 EmitInsn_IntArithmImmediate(ARGS, kIntArithm_UShr);
1022 break;
1023
1024 case Instruction::UNUSED_3E:
1025 case Instruction::UNUSED_3F:
1026 case Instruction::UNUSED_40:
1027 case Instruction::UNUSED_41:
1028 case Instruction::UNUSED_42:
1029 case Instruction::UNUSED_43:
1030 case Instruction::UNUSED_73:
1031 case Instruction::UNUSED_79:
1032 case Instruction::UNUSED_7A:
1033 case Instruction::UNUSED_E3:
1034 case Instruction::UNUSED_E4:
1035 case Instruction::UNUSED_E5:
1036 case Instruction::UNUSED_E6:
1037 case Instruction::UNUSED_E7:
1038 case Instruction::UNUSED_E8:
1039 case Instruction::UNUSED_E9:
1040 case Instruction::UNUSED_EA:
1041 case Instruction::UNUSED_EB:
1042 case Instruction::UNUSED_EC:
1043 case Instruction::THROW_VERIFICATION_ERROR:
1044 case Instruction::UNUSED_EE:
1045 case Instruction::UNUSED_EF:
1046 case Instruction::UNUSED_F0:
1047 case Instruction::UNUSED_F1:
1048 case Instruction::UNUSED_F2:
1049 case Instruction::UNUSED_F3:
1050 case Instruction::UNUSED_F4:
1051 case Instruction::UNUSED_F5:
1052 case Instruction::UNUSED_F6:
1053 case Instruction::UNUSED_F7:
1054 case Instruction::UNUSED_F8:
1055 case Instruction::UNUSED_F9:
1056 case Instruction::UNUSED_FA:
1057 case Instruction::UNUSED_FB:
1058 case Instruction::UNUSED_FC:
1059 case Instruction::UNUSED_FD:
1060 case Instruction::UNUSED_FE:
1061 case Instruction::UNUSED_FF:
1062 LOG(FATAL) << "Dex file contains UNUSED bytecode: " << insn->Opcode();
1063 break;
1064 }
1065
1066#undef ARGS
1067}
1068
1069
1070void MethodCompiler::EmitInsn_Nop(uint32_t dex_pc,
1071 Instruction const* insn) {
Logan Chiene09a6b72011-12-27 17:50:21 +08001072
1073 uint16_t insn_signature = code_item_->insns_[dex_pc];
1074
1075 if (insn_signature == Instruction::kPackedSwitchSignature ||
1076 insn_signature == Instruction::kSparseSwitchSignature ||
1077 insn_signature == Instruction::kArrayDataSignature) {
1078 irb_.CreateUnreachable();
1079 } else{
1080 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1081 }
Shih-wei Liaod1fec812012-02-13 09:51:10 -08001082}
1083
1084
Logan Chien70f94b42011-12-27 17:49:11 +08001085void MethodCompiler::EmitInsn_Move(uint32_t dex_pc,
1086 Instruction const* insn,
1087 JType jty) {
Logan Chien48173132011-12-27 17:51:13 +08001088
1089 Instruction::DecodedInstruction dec_insn(insn);
1090
1091 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, jty, kReg);
1092 EmitStoreDalvikReg(dec_insn.vA_, jty, kReg, src_value);
1093
Logan Chien70f94b42011-12-27 17:49:11 +08001094 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1095}
1096
1097
1098void MethodCompiler::EmitInsn_MoveResult(uint32_t dex_pc,
1099 Instruction const* insn,
1100 JType jty) {
Logan Chien48173132011-12-27 17:51:13 +08001101
1102 Instruction::DecodedInstruction dec_insn(insn);
1103
1104 llvm::Value* src_value = EmitLoadDalvikRetValReg(jty, kReg);
1105 EmitStoreDalvikReg(dec_insn.vA_, jty, kReg, src_value);
1106
Logan Chien70f94b42011-12-27 17:49:11 +08001107 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1108}
1109
1110
1111void MethodCompiler::EmitInsn_MoveException(uint32_t dex_pc,
1112 Instruction const* insn) {
Logan Chien3354cec2012-01-13 14:29:03 +08001113
1114 Instruction::DecodedInstruction dec_insn(insn);
1115
1116 // Get thread-local exception field address
1117 llvm::Constant* exception_field_offset =
1118 irb_.getPtrEquivInt(Thread::ExceptionOffset().Int32Value());
1119
1120 llvm::Value* thread_object_addr =
1121 irb_.CreateCall(irb_.GetRuntime(GetCurrentThread));
1122
1123 llvm::Value* exception_field_addr =
1124 irb_.CreatePtrDisp(thread_object_addr, exception_field_offset,
1125 irb_.getJObjectTy()->getPointerTo());
1126
1127 // Get exception object address
1128 llvm::Value* exception_object_addr = irb_.CreateLoad(exception_field_addr);
1129
1130 // Set thread-local exception field address to NULL
1131 irb_.CreateStore(irb_.getJNull(), exception_field_addr);
1132
1133 // Keep the exception object in the Dalvik register
1134 EmitStoreDalvikReg(dec_insn.vA_, kObject, kAccurate, exception_object_addr);
1135
Logan Chien70f94b42011-12-27 17:49:11 +08001136 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1137}
1138
1139
1140void MethodCompiler::EmitInsn_ThrowException(uint32_t dex_pc,
1141 Instruction const* insn) {
Logan Chien6c6f12d2012-01-13 19:26:27 +08001142
1143 Instruction::DecodedInstruction dec_insn(insn);
1144
1145 llvm::Value* exception_addr =
1146 EmitLoadDalvikReg(dec_insn.vA_, kObject, kAccurate);
1147
1148 irb_.CreateCall(irb_.GetRuntime(ThrowException), exception_addr);
1149
1150 EmitBranchExceptionLandingPad(dex_pc);
Logan Chien70f94b42011-12-27 17:49:11 +08001151}
1152
1153
1154void MethodCompiler::EmitInsn_ReturnVoid(uint32_t dex_pc,
1155 Instruction const* insn) {
Logan Chien8898a272011-12-27 17:51:56 +08001156 // Garbage collection safe-point
1157 EmitGuard_GarbageCollectionSuspend(dex_pc);
1158
1159 // Return!
1160 irb_.CreateRetVoid();
Logan Chien70f94b42011-12-27 17:49:11 +08001161}
1162
1163
1164void MethodCompiler::EmitInsn_Return(uint32_t dex_pc,
1165 Instruction const* insn) {
Logan Chien8898a272011-12-27 17:51:56 +08001166
1167 Instruction::DecodedInstruction dec_insn(insn);
1168
1169 // Garbage collection safe-point
1170 EmitGuard_GarbageCollectionSuspend(dex_pc);
1171
1172 // Return!
1173 char ret_shorty = method_helper_.GetShorty()[0];
1174 llvm::Value* retval = EmitLoadDalvikReg(dec_insn.vA_, ret_shorty, kAccurate);
1175
1176 irb_.CreateRet(retval);
Logan Chien70f94b42011-12-27 17:49:11 +08001177}
1178
1179
1180void MethodCompiler::EmitInsn_LoadConstant(uint32_t dex_pc,
1181 Instruction const* insn,
1182 JType imm_jty) {
Shih-wei Liao798366e2012-02-16 09:25:33 -08001183
1184 Instruction::DecodedInstruction dec_insn(insn);
1185
1186 DCHECK(imm_jty == kInt || imm_jty == kLong) << imm_jty;
1187
1188 int64_t imm = 0;
1189
1190 switch (insn->Opcode()) {
1191 // 32-bit Immediate
1192 case Instruction::CONST_4:
1193 case Instruction::CONST_16:
1194 case Instruction::CONST:
1195 case Instruction::CONST_WIDE_16:
1196 case Instruction::CONST_WIDE_32:
1197 imm = static_cast<int64_t>(static_cast<int32_t>(dec_insn.vB_));
1198 break;
1199
1200 case Instruction::CONST_HIGH16:
1201 imm = static_cast<int64_t>(static_cast<int32_t>(
1202 static_cast<uint32_t>(static_cast<uint16_t>(dec_insn.vB_)) << 16));
1203 break;
1204
1205 // 64-bit Immediate
1206 case Instruction::CONST_WIDE:
1207 imm = static_cast<int64_t>(dec_insn.vB_wide_);
1208 break;
1209
1210 case Instruction::CONST_WIDE_HIGH16:
1211 imm = static_cast<int64_t>(
1212 static_cast<uint64_t>(static_cast<uint16_t>(dec_insn.vB_)) << 48);
1213 break;
1214
1215 // Unknown opcode for load constant (unreachable)
1216 default:
1217 LOG(FATAL) << "Unknown opcode for load constant: " << insn->Opcode();
1218 break;
1219 }
1220
1221 // Store the non-object register
1222 llvm::Type* imm_type = irb_.getJType(imm_jty, kAccurate);
1223 llvm::Constant* imm_value = llvm::ConstantInt::getSigned(imm_type, imm);
1224 EmitStoreDalvikReg(dec_insn.vA_, imm_jty, kAccurate, imm_value);
1225
1226 // Store the object register if it is possible to be null.
1227 if (imm_jty == kInt && imm == 0) {
1228 EmitStoreDalvikReg(dec_insn.vA_, kObject, kAccurate, irb_.getJNull());
1229 }
1230
Logan Chien70f94b42011-12-27 17:49:11 +08001231 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1232}
1233
1234
1235void MethodCompiler::EmitInsn_LoadConstantString(uint32_t dex_pc,
1236 Instruction const* insn) {
Logan Chienc3b4ba12012-01-16 19:52:53 +08001237
1238 Instruction::DecodedInstruction dec_insn(insn);
1239
1240 uint32_t string_idx = dec_insn.vB_;
1241
1242 llvm::Value* string_field_addr = EmitLoadDexCacheStringFieldAddr(string_idx);
1243
1244 llvm::Value* string_addr = irb_.CreateLoad(string_field_addr);
1245
1246 if (!compiler_->CanAssumeStringIsPresentInDexCache(dex_cache_, string_idx)) {
1247 llvm::BasicBlock* block_str_exist =
1248 CreateBasicBlockWithDexPC(dex_pc, "str_exist");
1249
1250 llvm::BasicBlock* block_str_resolve =
1251 CreateBasicBlockWithDexPC(dex_pc, "str_resolve");
1252
1253 // Test: Is the string resolved and in the dex cache?
1254 llvm::Value* equal_null = irb_.CreateICmpEQ(string_addr, irb_.getJNull());
1255
1256 irb_.CreateCondBr(equal_null, block_str_exist, block_str_resolve);
1257
1258 // String is resolved, go to next basic block.
1259 irb_.SetInsertPoint(block_str_exist);
1260 EmitStoreDalvikReg(dec_insn.vA_, kObject, kAccurate, string_addr);
1261 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1262
1263 // String is not resolved yet, resolve it now.
1264 irb_.SetInsertPoint(block_str_resolve);
1265
1266 llvm::Function* runtime_func = irb_.GetRuntime(ResolveString);
1267
1268 llvm::Value* method_object_addr = EmitLoadMethodObjectAddr();
1269
1270 llvm::Value* string_idx_value = irb_.getInt32(string_idx);
1271
1272 string_addr = irb_.CreateCall2(runtime_func,
1273 method_object_addr, string_idx_value);
1274
1275 EmitGuard_ExceptionLandingPad(dex_pc);
1276 }
1277
1278 // Store the string object to the Dalvik register
1279 EmitStoreDalvikReg(dec_insn.vA_, kObject, kAccurate, string_addr);
1280
Logan Chien70f94b42011-12-27 17:49:11 +08001281 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1282}
1283
1284
Logan Chien27b30252012-01-14 03:43:35 +08001285llvm::Value* MethodCompiler::EmitLoadConstantClass(uint32_t dex_pc,
1286 uint32_t type_idx) {
1287 if (!compiler_->CanAccessTypeWithoutChecks(method_idx_, dex_cache_,
1288 *dex_file_, type_idx)) {
1289 llvm::Value* type_idx_value = irb_.getInt32(type_idx);
1290
1291 llvm::Value* method_object_addr = EmitLoadMethodObjectAddr();
1292
1293 llvm::Function* runtime_func =
1294 irb_.GetRuntime(InitializeTypeAndVerifyAccess);
1295
1296 llvm::Value* type_object_addr =
1297 irb_.CreateCall2(runtime_func, type_idx_value, method_object_addr);
1298
1299 EmitGuard_ExceptionLandingPad(dex_pc);
1300
1301 return type_object_addr;
1302
1303 } else {
1304 // Try to load the class (type) object from the test cache.
1305 llvm::Value* type_field_addr =
1306 EmitLoadDexCacheResolvedTypeFieldAddr(type_idx);
1307
1308 llvm::Value* type_object_addr = irb_.CreateLoad(type_field_addr);
1309
1310 if (compiler_->CanAssumeTypeIsPresentInDexCache(dex_cache_, type_idx)) {
1311 return type_object_addr;
1312 }
1313
1314 llvm::BasicBlock* block_original = irb_.GetInsertBlock();
1315
1316 // Test whether class (type) object is in the dex cache or not
1317 llvm::Value* equal_null =
1318 irb_.CreateICmpEQ(type_object_addr, irb_.getJNull());
1319
1320 llvm::BasicBlock* block_cont =
1321 CreateBasicBlockWithDexPC(dex_pc, "cont");
1322
1323 llvm::BasicBlock* block_load_class =
1324 CreateBasicBlockWithDexPC(dex_pc, "load_class");
1325
1326 irb_.CreateCondBr(equal_null, block_load_class, block_cont);
1327
1328 // Failback routine to load the class object
1329 irb_.SetInsertPoint(block_load_class);
1330
1331 llvm::Function* runtime_func = irb_.GetRuntime(InitializeType);
1332
1333 llvm::Constant* type_idx_value = irb_.getInt32(type_idx);
1334
1335 llvm::Value* method_object_addr = EmitLoadMethodObjectAddr();
1336
1337 llvm::Value* loaded_type_object_addr =
1338 irb_.CreateCall2(runtime_func, type_idx_value, method_object_addr);
1339
1340 EmitGuard_ExceptionLandingPad(dex_pc);
1341
1342 llvm::BasicBlock* block_after_load_class = irb_.GetInsertBlock();
1343
1344 irb_.CreateBr(block_cont);
1345
1346 // Now the class object must be loaded
1347 irb_.SetInsertPoint(block_cont);
1348
1349 llvm::PHINode* phi = irb_.CreatePHI(irb_.getJObjectTy(), 2);
1350
1351 phi->addIncoming(type_object_addr, block_original);
1352 phi->addIncoming(loaded_type_object_addr, block_after_load_class);
1353
1354 return phi;
1355 }
1356}
1357
1358
Logan Chien70f94b42011-12-27 17:49:11 +08001359void MethodCompiler::EmitInsn_LoadConstantClass(uint32_t dex_pc,
1360 Instruction const* insn) {
Logan Chien27b30252012-01-14 03:43:35 +08001361
1362 Instruction::DecodedInstruction dec_insn(insn);
1363
1364 llvm::Value* type_object_addr = EmitLoadConstantClass(dex_pc, dec_insn.vB_);
1365 EmitStoreDalvikReg(dec_insn.vA_, kObject, kAccurate, type_object_addr);
1366
Logan Chien70f94b42011-12-27 17:49:11 +08001367 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1368}
1369
1370
1371void MethodCompiler::EmitInsn_MonitorEnter(uint32_t dex_pc,
1372 Instruction const* insn) {
Logan Chien9e0dbe42012-01-13 12:11:37 +08001373
1374 Instruction::DecodedInstruction dec_insn(insn);
1375
1376 llvm::Value* object_addr =
1377 EmitLoadDalvikReg(dec_insn.vA_, kObject, kAccurate);
1378
1379 // TODO: Slow path always. May not need NullPointerException check.
1380 EmitGuard_NullPointerException(dex_pc, object_addr);
1381
1382 irb_.CreateCall(irb_.GetRuntime(LockObject), object_addr);
1383 EmitGuard_ExceptionLandingPad(dex_pc);
1384
Logan Chien70f94b42011-12-27 17:49:11 +08001385 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1386}
1387
1388
1389void MethodCompiler::EmitInsn_MonitorExit(uint32_t dex_pc,
1390 Instruction const* insn) {
Logan Chien9e0dbe42012-01-13 12:11:37 +08001391
1392 Instruction::DecodedInstruction dec_insn(insn);
1393
1394 llvm::Value* object_addr =
1395 EmitLoadDalvikReg(dec_insn.vA_, kObject, kAccurate);
1396
1397 EmitGuard_NullPointerException(dex_pc, object_addr);
1398
1399 irb_.CreateCall(irb_.GetRuntime(UnlockObject), object_addr);
1400 EmitGuard_ExceptionLandingPad(dex_pc);
1401
Logan Chien70f94b42011-12-27 17:49:11 +08001402 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1403}
1404
1405
1406void MethodCompiler::EmitInsn_CheckCast(uint32_t dex_pc,
1407 Instruction const* insn) {
Logan Chienfc880952012-01-15 23:53:10 +08001408
1409 Instruction::DecodedInstruction dec_insn(insn);
1410
1411 llvm::BasicBlock* block_test_class =
1412 CreateBasicBlockWithDexPC(dex_pc, "test_class");
1413
1414 llvm::BasicBlock* block_test_sub_class =
1415 CreateBasicBlockWithDexPC(dex_pc, "test_sub_class");
1416
1417 llvm::Value* object_addr =
1418 EmitLoadDalvikReg(dec_insn.vA_, kObject, kAccurate);
1419
1420 // Test: Is the reference equal to null? Act as no-op when it is null.
1421 llvm::Value* equal_null = irb_.CreateICmpEQ(object_addr, irb_.getJNull());
1422
1423 irb_.CreateCondBr(equal_null,
1424 GetNextBasicBlock(dex_pc),
1425 block_test_class);
1426
1427 // Test: Is the object instantiated from the given class?
1428 irb_.SetInsertPoint(block_test_class);
1429 llvm::Value* type_object_addr = EmitLoadConstantClass(dex_pc, dec_insn.vB_);
1430 DCHECK_EQ(Object::ClassOffset().Int32Value(), 0);
1431
1432 llvm::PointerType* jobject_ptr_ty = irb_.getJObjectTy();
1433
1434 llvm::Value* object_type_field_addr =
1435 irb_.CreateBitCast(object_addr, jobject_ptr_ty->getPointerTo());
1436
1437 llvm::Value* object_type_object_addr =
1438 irb_.CreateLoad(object_type_field_addr);
1439
1440 llvm::Value* equal_class =
1441 irb_.CreateICmpEQ(type_object_addr, object_type_object_addr);
1442
1443 irb_.CreateCondBr(equal_class,
1444 GetNextBasicBlock(dex_pc),
1445 block_test_sub_class);
1446
1447 // Test: Is the object instantiated from the subclass of the given class?
1448 irb_.SetInsertPoint(block_test_sub_class);
1449
1450 irb_.CreateCall2(irb_.GetRuntime(CheckCast),
1451 type_object_addr, object_type_object_addr);
1452
1453 EmitGuard_ExceptionLandingPad(dex_pc);
1454
Logan Chien70f94b42011-12-27 17:49:11 +08001455 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1456}
1457
1458
1459void MethodCompiler::EmitInsn_InstanceOf(uint32_t dex_pc,
1460 Instruction const* insn) {
Logan Chien68725e22012-01-15 22:25:34 +08001461
1462 Instruction::DecodedInstruction dec_insn(insn);
1463
1464 llvm::Constant* zero = irb_.getJInt(0);
1465 llvm::Constant* one = irb_.getJInt(1);
1466
1467 llvm::BasicBlock* block_nullp = CreateBasicBlockWithDexPC(dex_pc, "nullp");
1468
1469 llvm::BasicBlock* block_test_class =
1470 CreateBasicBlockWithDexPC(dex_pc, "test_class");
1471
1472 llvm::BasicBlock* block_class_equals =
1473 CreateBasicBlockWithDexPC(dex_pc, "class_eq");
1474
1475 llvm::BasicBlock* block_test_sub_class =
1476 CreateBasicBlockWithDexPC(dex_pc, "test_sub_class");
1477
1478 llvm::Value* object_addr =
1479 EmitLoadDalvikReg(dec_insn.vB_, kObject, kAccurate);
1480
1481 // Overview of the following code :
1482 // We check for null, if so, then false, otherwise check for class == . If so
1483 // then true, otherwise do callout slowpath.
1484 //
1485 // Test: Is the reference equal to null? Set 0 when it is null.
1486 llvm::Value* equal_null = irb_.CreateICmpEQ(object_addr, irb_.getJNull());
1487
1488 irb_.CreateCondBr(equal_null, block_nullp, block_test_class);
1489
1490 irb_.SetInsertPoint(block_nullp);
1491 EmitStoreDalvikReg(dec_insn.vA_, kInt, kAccurate, zero);
1492 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1493
1494 // Test: Is the object instantiated from the given class?
1495 irb_.SetInsertPoint(block_test_class);
1496 llvm::Value* type_object_addr = EmitLoadConstantClass(dex_pc, dec_insn.vC_);
1497 DCHECK_EQ(Object::ClassOffset().Int32Value(), 0);
1498
1499 llvm::PointerType* jobject_ptr_ty = irb_.getJObjectTy();
1500
1501 llvm::Value* object_type_field_addr =
1502 irb_.CreateBitCast(object_addr, jobject_ptr_ty->getPointerTo());
1503
1504 llvm::Value* object_type_object_addr =
1505 irb_.CreateLoad(object_type_field_addr);
1506
1507 llvm::Value* equal_class =
1508 irb_.CreateICmpEQ(type_object_addr, object_type_object_addr);
1509
1510 irb_.CreateCondBr(equal_class, block_class_equals, block_test_sub_class);
1511
1512 irb_.SetInsertPoint(block_class_equals);
1513 EmitStoreDalvikReg(dec_insn.vA_, kInt, kAccurate, one);
1514 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1515
1516 // Test: Is the object instantiated from the subclass of the given class?
1517 irb_.SetInsertPoint(block_test_sub_class);
1518
1519 llvm::Value* result =
1520 irb_.CreateCall2(irb_.GetRuntime(IsAssignable),
1521 type_object_addr, object_type_object_addr);
1522
1523 EmitStoreDalvikReg(dec_insn.vA_, kInt, kAccurate, result);
1524
Logan Chien70f94b42011-12-27 17:49:11 +08001525 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1526}
1527
1528
Logan Chien61bb6142012-02-03 15:34:53 +08001529llvm::Value* MethodCompiler::EmitLoadArrayLength(llvm::Value* array) {
1530 // Load array length field address
1531 llvm::Constant* array_len_field_offset =
1532 irb_.getPtrEquivInt(Array::LengthOffset().Int32Value());
1533
1534 llvm::Value* array_len_field_addr =
1535 irb_.CreatePtrDisp(array, array_len_field_offset,
1536 irb_.getJIntTy()->getPointerTo());
1537
1538 // Load array length
1539 return irb_.CreateLoad(array_len_field_addr);
1540}
1541
1542
Logan Chien70f94b42011-12-27 17:49:11 +08001543void MethodCompiler::EmitInsn_ArrayLength(uint32_t dex_pc,
1544 Instruction const* insn) {
Logan Chien61bb6142012-02-03 15:34:53 +08001545
1546 Instruction::DecodedInstruction dec_insn(insn);
1547
1548 // Get the array object address
1549 llvm::Value* array_addr = EmitLoadDalvikReg(dec_insn.vB_, kObject, kAccurate);
1550 EmitGuard_NullPointerException(dex_pc, array_addr);
1551
1552 // Get the array length and store it to the register
1553 llvm::Value* array_len = EmitLoadArrayLength(array_addr);
1554 EmitStoreDalvikReg(dec_insn.vA_, kInt, kAccurate, array_len);
1555
Logan Chien70f94b42011-12-27 17:49:11 +08001556 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1557}
1558
1559
1560void MethodCompiler::EmitInsn_NewInstance(uint32_t dex_pc,
1561 Instruction const* insn) {
Logan Chien032bdad2012-01-16 09:59:23 +08001562
1563 Instruction::DecodedInstruction dec_insn(insn);
1564
1565 llvm::Function* runtime_func;
1566 if (compiler_->CanAccessTypeWithoutChecks(method_idx_, dex_cache_,
1567 *dex_file_, dec_insn.vB_)) {
1568 runtime_func = irb_.GetRuntime(AllocObject);
1569 } else {
1570 runtime_func = irb_.GetRuntime(AllocObjectWithAccessCheck);
1571 }
1572
1573 llvm::Constant* type_index_value = irb_.getInt32(dec_insn.vB_);
1574
1575 llvm::Value* method_object_addr = EmitLoadMethodObjectAddr();
1576
1577 llvm::Value* object_addr =
1578 irb_.CreateCall2(runtime_func, type_index_value, method_object_addr);
1579
1580 EmitGuard_ExceptionLandingPad(dex_pc);
1581
1582 EmitStoreDalvikReg(dec_insn.vA_, kObject, kAccurate, object_addr);
1583
Logan Chien70f94b42011-12-27 17:49:11 +08001584 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1585}
1586
1587
Logan Chiena2cc6a32012-01-16 10:38:41 +08001588llvm::Value* MethodCompiler::EmitAllocNewArray(uint32_t dex_pc,
1589 int32_t length,
1590 uint32_t type_idx,
1591 bool is_filled_new_array) {
1592 llvm::Function* runtime_func;
1593
1594 bool skip_access_check =
1595 compiler_->CanAccessTypeWithoutChecks(method_idx_, dex_cache_,
1596 *dex_file_, type_idx);
1597
1598 if (is_filled_new_array) {
1599 runtime_func = skip_access_check ?
1600 irb_.GetRuntime(CheckAndAllocArray) :
1601 irb_.GetRuntime(CheckAndAllocArrayWithAccessCheck);
1602 } else {
1603 runtime_func = skip_access_check ?
1604 irb_.GetRuntime(AllocArray) :
1605 irb_.GetRuntime(AllocArrayWithAccessCheck);
1606 }
1607
1608 llvm::Constant* type_index_value = irb_.getInt32(type_idx);
1609
1610 llvm::Value* method_object_addr = EmitLoadMethodObjectAddr();
1611
1612 llvm::Value* array_length_value = irb_.getInt32(length);
1613
1614 llvm::Value* object_addr =
1615 irb_.CreateCall3(runtime_func, type_index_value, method_object_addr,
1616 array_length_value);
1617
1618 EmitGuard_ExceptionLandingPad(dex_pc);
1619
1620 return object_addr;
1621}
1622
1623
Logan Chien70f94b42011-12-27 17:49:11 +08001624void MethodCompiler::EmitInsn_NewArray(uint32_t dex_pc,
1625 Instruction const* insn) {
Logan Chiena2cc6a32012-01-16 10:38:41 +08001626
1627 Instruction::DecodedInstruction dec_insn(insn);
1628
1629 llvm::Value* object_addr =
1630 EmitAllocNewArray(dex_pc, dec_insn.vB_, dec_insn.vC_, false);
1631
1632 EmitStoreDalvikReg(dec_insn.vA_, kObject, kAccurate, object_addr);
1633
Logan Chien70f94b42011-12-27 17:49:11 +08001634 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1635}
1636
1637
1638void MethodCompiler::EmitInsn_FilledNewArray(uint32_t dex_pc,
1639 Instruction const* insn,
1640 bool is_range) {
Logan Chiena85fb2f2012-01-16 12:52:56 +08001641
1642 Instruction::DecodedInstruction dec_insn(insn);
1643
1644 llvm::Value* object_addr =
1645 EmitAllocNewArray(dex_pc, dec_insn.vA_, dec_insn.vB_, true);
1646
1647 if (dec_insn.vA_ > 0) {
1648 llvm::Value* object_addr_int =
1649 irb_.CreatePtrToInt(object_addr, irb_.getPtrEquivIntTy());
1650
1651 llvm::Value* data_field_offset =
1652 irb_.getPtrEquivInt(Array::DataOffset().Int32Value());
1653
1654 llvm::Value* data_field_addr_int =
1655 irb_.CreateAdd(object_addr_int, data_field_offset);
1656
1657 Class* klass = method_->GetDexCacheResolvedTypes()->Get(dec_insn.vB_);
1658 CHECK_NE(klass, static_cast<Class*>(NULL));
1659 // Moved this below already: CHECK(!klass->IsPrimitive() || klass->IsPrimitiveInt());
1660
1661 llvm::Constant* word_size = irb_.getSizeOfPtrEquivIntValue();
1662
1663 llvm::Type* field_type;
1664 if (klass->IsPrimitiveInt()) {
1665 field_type = irb_.getJIntTy()->getPointerTo();
1666 } else {
1667 CHECK(!klass->IsPrimitive());
1668 field_type = irb_.getJObjectTy()->getPointerTo();
1669 }
1670
1671 // TODO: Tune this code. Currently we are generating one instruction for
1672 // one element which may be very space consuming. Maybe changing to use
1673 // memcpy may help; however, since we can't guarantee that the alloca of
1674 // dalvik register are continuous, we can't perform such optimization yet.
1675 for (uint32_t i = 0; i < dec_insn.vA_; ++i) {
1676 llvm::Value* data_field_addr =
1677 irb_.CreateIntToPtr(data_field_addr_int, field_type);
1678
1679 int reg_index;
1680 if (is_range) {
1681 reg_index = dec_insn.vC_ + i;
1682 } else {
1683 reg_index = dec_insn.arg_[i];
1684 }
1685
1686 llvm::Value* reg_value;
1687 if (klass->IsPrimitiveInt()) {
1688 reg_value = EmitLoadDalvikReg(reg_index, kInt, kAccurate);
1689 } else {
1690 reg_value = EmitLoadDalvikReg(reg_index, kObject, kAccurate);
1691 }
1692
1693 irb_.CreateStore(reg_value, data_field_addr);
1694
1695 data_field_addr_int = irb_.CreateAdd(data_field_addr_int, word_size);
1696 }
1697 }
1698
1699 EmitStoreDalvikRetValReg(kObject, kAccurate, object_addr);
1700
Logan Chien70f94b42011-12-27 17:49:11 +08001701 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1702}
1703
1704
1705void MethodCompiler::EmitInsn_FillArrayData(uint32_t dex_pc,
1706 Instruction const* insn) {
Logan Chiene58b6582012-01-16 17:13:13 +08001707
1708 Instruction::DecodedInstruction dec_insn(insn);
1709
1710 // Read the payload
1711 struct PACKED Payload {
1712 uint16_t ident_;
1713 uint16_t elem_width_;
1714 uint32_t num_elems_;
1715 uint8_t data_[];
1716 };
1717
1718 int32_t payload_offset = static_cast<int32_t>(dex_pc) +
1719 static_cast<int32_t>(dec_insn.vB_);
1720
1721 Payload const* payload =
1722 reinterpret_cast<Payload const*>(code_item_->insns_ + payload_offset);
1723
1724 uint32_t size_in_bytes = payload->elem_width_ * payload->num_elems_;
1725
1726 // Load and check the array
1727 llvm::Value* array_addr = EmitLoadDalvikReg(dec_insn.vA_, kObject, kAccurate);
1728
1729 EmitGuard_NullPointerException(dex_pc, array_addr);
1730
1731 if (payload->num_elems_ > 0) {
1732 // Test: Is array length big enough?
1733 llvm::Constant* last_index = irb_.getJInt(payload->num_elems_ - 1);
1734
1735 EmitGuard_ArrayIndexOutOfBoundsException(dex_pc, array_addr, last_index);
1736
1737 // Get array data field
1738 llvm::Value* data_field_offset_value =
1739 irb_.getPtrEquivInt(Array::DataOffset().Int32Value());
1740
1741 llvm::Value* data_field_addr =
1742 irb_.CreatePtrDisp(array_addr, data_field_offset_value,
1743 irb_.getInt8Ty()->getPointerTo());
1744
1745 // Emit payload to bitcode constant pool
1746 std::vector<llvm::Constant*> const_pool_data;
1747 for (uint32_t i = 0; i < size_in_bytes; ++i) {
1748 const_pool_data.push_back(irb_.getInt8(payload->data_[i]));
1749 }
1750
1751 llvm::Constant* const_pool_data_array_value = llvm::ConstantArray::get(
1752 llvm::ArrayType::get(irb_.getInt8Ty(), size_in_bytes), const_pool_data);
1753
1754 llvm::Value* const_pool_data_array_addr =
1755 new llvm::GlobalVariable(*module_,
1756 const_pool_data_array_value->getType(),
1757 false, llvm::GlobalVariable::InternalLinkage,
1758 const_pool_data_array_value,
1759 "array_data_payload");
1760
1761 // Find the memcpy intrinsic
1762 llvm::Type* memcpy_arg_types[] = {
1763 llvm::Type::getInt8Ty(*context_)->getPointerTo(),
1764 llvm::Type::getInt8Ty(*context_)->getPointerTo(),
1765 llvm::Type::getInt32Ty(*context_)
1766 };
1767
1768 llvm::Function* memcpy_intrinsic =
1769 llvm::Intrinsic::getDeclaration(module_,
1770 llvm::Intrinsic::memcpy,
1771 memcpy_arg_types);
1772
1773 // Copy now!
1774 llvm::Value *args[] = {
1775 data_field_addr,
1776 irb_.CreateConstGEP2_32(const_pool_data_array_addr, 0, 0),
1777 irb_.getInt32(size_in_bytes),
1778 irb_.getInt32(0), // alignment: no guarantee
1779 irb_.getFalse() // is_volatile: false
1780 };
1781
1782 irb_.CreateCall(memcpy_intrinsic, args);
1783 }
1784
Logan Chien70f94b42011-12-27 17:49:11 +08001785 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1786}
1787
1788
1789void MethodCompiler::EmitInsn_UnconditionalBranch(uint32_t dex_pc,
1790 Instruction const* insn) {
Logan Chiena466c162011-12-27 17:55:46 +08001791
1792 Instruction::DecodedInstruction dec_insn(insn);
1793
1794 int32_t branch_offset = dec_insn.vA_;
1795
1796 if (branch_offset <= 0) {
1797 // Garbage collection safe-point on backward branch
1798 EmitGuard_GarbageCollectionSuspend(dex_pc);
1799 }
1800
1801 irb_.CreateBr(GetBasicBlock(dex_pc + branch_offset));
Logan Chien70f94b42011-12-27 17:49:11 +08001802}
1803
1804
1805void MethodCompiler::EmitInsn_PackedSwitch(uint32_t dex_pc,
1806 Instruction const* insn) {
Logan Chien7a89b6d2011-12-27 17:56:56 +08001807
1808 Instruction::DecodedInstruction dec_insn(insn);
1809
1810 struct PACKED Payload {
1811 uint16_t ident_;
1812 uint16_t num_cases_;
1813 int32_t first_key_;
1814 int32_t targets_[];
1815 };
1816
1817 int32_t payload_offset = static_cast<int32_t>(dex_pc) +
1818 static_cast<int32_t>(dec_insn.vB_);
1819
1820 Payload const* payload =
1821 reinterpret_cast<Payload const*>(code_item_->insns_ + payload_offset);
1822
1823 llvm::Value* value = EmitLoadDalvikReg(dec_insn.vA_, kInt, kAccurate);
1824
1825 llvm::SwitchInst* sw =
1826 irb_.CreateSwitch(value, GetNextBasicBlock(dex_pc), payload->num_cases_);
1827
1828 for (uint16_t i = 0; i < payload->num_cases_; ++i) {
1829 sw->addCase(irb_.getInt32(payload->first_key_ + i),
1830 GetBasicBlock(dex_pc + payload->targets_[i]));
1831 }
Logan Chien70f94b42011-12-27 17:49:11 +08001832}
1833
1834
1835void MethodCompiler::EmitInsn_SparseSwitch(uint32_t dex_pc,
1836 Instruction const* insn) {
Logan Chien7a89b6d2011-12-27 17:56:56 +08001837
1838 Instruction::DecodedInstruction dec_insn(insn);
1839
1840 struct PACKED Payload {
1841 uint16_t ident_;
1842 uint16_t num_cases_;
1843 int32_t keys_and_targets_[];
1844 };
1845
1846 int32_t payload_offset = static_cast<int32_t>(dex_pc) +
1847 static_cast<int32_t>(dec_insn.vB_);
1848
1849 Payload const* payload =
1850 reinterpret_cast<Payload const*>(code_item_->insns_ + payload_offset);
1851
1852 int32_t const* keys = payload->keys_and_targets_;
1853 int32_t const* targets = payload->keys_and_targets_ + payload->num_cases_;
1854
1855 llvm::Value* value = EmitLoadDalvikReg(dec_insn.vA_, kInt, kAccurate);
1856
1857 llvm::SwitchInst* sw =
1858 irb_.CreateSwitch(value, GetNextBasicBlock(dex_pc), payload->num_cases_);
1859
1860 for (size_t i = 0; i < payload->num_cases_; ++i) {
1861 sw->addCase(irb_.getInt32(keys[i]), GetBasicBlock(dex_pc + targets[i]));
1862 }
Logan Chien70f94b42011-12-27 17:49:11 +08001863}
1864
1865
1866void MethodCompiler::EmitInsn_FPCompare(uint32_t dex_pc,
1867 Instruction const* insn,
1868 JType fp_jty,
1869 bool gt_bias) {
Logan Chien2c37e8e2011-12-27 17:58:46 +08001870
1871 Instruction::DecodedInstruction dec_insn(insn);
1872
1873 DCHECK(fp_jty == kFloat || fp_jty == kDouble) << "JType: " << fp_jty;
1874
1875 llvm::Value* src1_value = EmitLoadDalvikReg(dec_insn.vB_, fp_jty, kAccurate);
1876 llvm::Value* src2_value = EmitLoadDalvikReg(dec_insn.vC_, fp_jty, kAccurate);
1877
1878 llvm::Value* cmp_eq = irb_.CreateFCmpOEQ(src1_value, src2_value);
1879 llvm::Value* cmp_lt;
1880
1881 if (gt_bias) {
1882 cmp_lt = irb_.CreateFCmpOLT(src1_value, src2_value);
1883 } else {
1884 cmp_lt = irb_.CreateFCmpULT(src1_value, src2_value);
1885 }
1886
1887 llvm::Value* result = EmitCompareResultSelection(cmp_eq, cmp_lt);
1888 EmitStoreDalvikReg(dec_insn.vA_, kInt, kAccurate, result);
1889
Logan Chien70f94b42011-12-27 17:49:11 +08001890 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1891}
1892
1893
1894void MethodCompiler::EmitInsn_LongCompare(uint32_t dex_pc,
1895 Instruction const* insn) {
Logan Chien2c37e8e2011-12-27 17:58:46 +08001896
1897 Instruction::DecodedInstruction dec_insn(insn);
1898
1899 llvm::Value* src1_value = EmitLoadDalvikReg(dec_insn.vB_, kLong, kAccurate);
1900 llvm::Value* src2_value = EmitLoadDalvikReg(dec_insn.vC_, kLong, kAccurate);
1901
1902 llvm::Value* cmp_eq = irb_.CreateICmpEQ(src1_value, src2_value);
1903 llvm::Value* cmp_lt = irb_.CreateICmpSLT(src1_value, src2_value);
1904
1905 llvm::Value* result = EmitCompareResultSelection(cmp_eq, cmp_lt);
1906 EmitStoreDalvikReg(dec_insn.vA_, kInt, kAccurate, result);
1907
Logan Chien70f94b42011-12-27 17:49:11 +08001908 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1909}
1910
1911
Logan Chien2c37e8e2011-12-27 17:58:46 +08001912llvm::Value* MethodCompiler::EmitCompareResultSelection(llvm::Value* cmp_eq,
1913 llvm::Value* cmp_lt) {
1914
1915 llvm::Constant* zero = irb_.getJInt(0);
1916 llvm::Constant* pos1 = irb_.getJInt(1);
1917 llvm::Constant* neg1 = irb_.getJInt(-1);
1918
1919 llvm::Value* result_lt = irb_.CreateSelect(cmp_lt, neg1, pos1);
1920 llvm::Value* result_eq = irb_.CreateSelect(cmp_eq, zero, result_lt);
1921
1922 return result_eq;
1923}
1924
1925
Logan Chien70f94b42011-12-27 17:49:11 +08001926void MethodCompiler::EmitInsn_BinaryConditionalBranch(uint32_t dex_pc,
1927 Instruction const* insn,
1928 CondBranchKind cond) {
Logan Chiena78e3c82011-12-27 17:59:35 +08001929
1930 Instruction::DecodedInstruction dec_insn(insn);
1931
1932 int8_t src1_reg_cat = GetInferredRegCategory(dex_pc, dec_insn.vA_);
1933 int8_t src2_reg_cat = GetInferredRegCategory(dex_pc, dec_insn.vB_);
1934
1935 DCHECK_NE(kRegUnknown, src1_reg_cat);
1936 DCHECK_NE(kRegUnknown, src2_reg_cat);
1937 DCHECK_NE(kRegCat2, src1_reg_cat);
1938 DCHECK_NE(kRegCat2, src2_reg_cat);
1939
1940 int32_t branch_offset = dec_insn.vC_;
1941
1942 if (branch_offset <= 0) {
1943 // Garbage collection safe-point on backward branch
1944 EmitGuard_GarbageCollectionSuspend(dex_pc);
1945 }
1946
1947 if (src1_reg_cat == kRegZero && src2_reg_cat == kRegZero) {
1948 irb_.CreateBr(GetBasicBlock(dex_pc + branch_offset));
1949 return;
1950 }
1951
1952 llvm::Value* src1_value;
1953 llvm::Value* src2_value;
1954
1955 if (src1_reg_cat != kRegZero && src2_reg_cat != kRegZero) {
1956 CHECK_EQ(src1_reg_cat, src2_reg_cat);
1957
1958 if (src1_reg_cat == kRegCat1nr) {
1959 src1_value = EmitLoadDalvikReg(dec_insn.vA_, kInt, kAccurate);
1960 src2_value = EmitLoadDalvikReg(dec_insn.vB_, kInt, kAccurate);
1961 } else {
1962 src1_value = EmitLoadDalvikReg(dec_insn.vA_, kObject, kAccurate);
1963 src2_value = EmitLoadDalvikReg(dec_insn.vB_, kObject, kAccurate);
1964 }
1965 } else {
1966 DCHECK(src1_reg_cat == kRegZero ||
1967 src2_reg_cat == kRegZero);
1968
1969 if (src1_reg_cat == kRegZero) {
1970 if (src2_reg_cat == kRegCat1nr) {
1971 src1_value = irb_.getJInt(0);
1972 src2_value = EmitLoadDalvikReg(dec_insn.vA_, kInt, kAccurate);
1973 } else {
1974 src1_value = irb_.getJNull();
1975 src2_value = EmitLoadDalvikReg(dec_insn.vA_, kObject, kAccurate);
1976 }
1977 } else { // src2_reg_cat == kRegZero
1978 if (src2_reg_cat == kRegCat1nr) {
1979 src1_value = EmitLoadDalvikReg(dec_insn.vA_, kInt, kAccurate);
1980 src2_value = irb_.getJInt(0);
1981 } else {
1982 src1_value = EmitLoadDalvikReg(dec_insn.vA_, kObject, kAccurate);
1983 src2_value = irb_.getJNull();
1984 }
1985 }
1986 }
1987
1988 llvm::Value* cond_value =
1989 EmitConditionResult(src1_value, src2_value, cond);
1990
1991 irb_.CreateCondBr(cond_value,
1992 GetBasicBlock(dex_pc + branch_offset),
1993 GetNextBasicBlock(dex_pc));
Logan Chien70f94b42011-12-27 17:49:11 +08001994}
1995
1996
1997void MethodCompiler::EmitInsn_UnaryConditionalBranch(uint32_t dex_pc,
1998 Instruction const* insn,
1999 CondBranchKind cond) {
Logan Chiena78e3c82011-12-27 17:59:35 +08002000
2001 Instruction::DecodedInstruction dec_insn(insn);
2002
2003 int8_t src_reg_cat = GetInferredRegCategory(dex_pc, dec_insn.vA_);
2004
2005 DCHECK_NE(kRegUnknown, src_reg_cat);
2006 DCHECK_NE(kRegCat2, src_reg_cat);
2007
2008 int32_t branch_offset = dec_insn.vB_;
2009
2010 if (branch_offset <= 0) {
2011 // Garbage collection safe-point on backward branch
2012 EmitGuard_GarbageCollectionSuspend(dex_pc);
2013 }
2014
2015 if (src_reg_cat == kRegZero) {
2016 irb_.CreateBr(GetBasicBlock(dex_pc + branch_offset));
2017 return;
2018 }
2019
2020 llvm::Value* src1_value;
2021 llvm::Value* src2_value;
2022
2023 if (src_reg_cat == kRegCat1nr) {
2024 src1_value = EmitLoadDalvikReg(dec_insn.vA_, kInt, kAccurate);
2025 src2_value = irb_.getInt32(0);
2026 } else {
2027 src1_value = EmitLoadDalvikReg(dec_insn.vA_, kObject, kAccurate);
2028 src2_value = irb_.getJNull();
2029 }
2030
2031 llvm::Value* cond_value =
2032 EmitConditionResult(src1_value, src2_value, cond);
2033
2034 irb_.CreateCondBr(cond_value,
2035 GetBasicBlock(dex_pc + branch_offset),
2036 GetNextBasicBlock(dex_pc));
2037}
2038
2039
2040RegCategory MethodCompiler::GetInferredRegCategory(uint32_t dex_pc,
2041 uint16_t reg_idx) {
2042 InferredRegCategoryMap const* map = method_->GetInferredRegCategoryMap();
2043 CHECK_NE(map, static_cast<InferredRegCategoryMap*>(NULL));
2044
2045 return map->GetRegCategory(dex_pc, reg_idx);
2046}
2047
2048
2049llvm::Value* MethodCompiler::EmitConditionResult(llvm::Value* lhs,
2050 llvm::Value* rhs,
2051 CondBranchKind cond) {
2052 switch (cond) {
2053 case kCondBranch_EQ:
2054 return irb_.CreateICmpEQ(lhs, rhs);
2055
2056 case kCondBranch_NE:
2057 return irb_.CreateICmpNE(lhs, rhs);
2058
2059 case kCondBranch_LT:
2060 return irb_.CreateICmpSLT(lhs, rhs);
2061
2062 case kCondBranch_GE:
2063 return irb_.CreateICmpSGE(lhs, rhs);
2064
2065 case kCondBranch_GT:
2066 return irb_.CreateICmpSGT(lhs, rhs);
2067
2068 case kCondBranch_LE:
2069 return irb_.CreateICmpSLE(lhs, rhs);
2070
2071 default: // Unreachable
2072 LOG(FATAL) << "Unknown conditional branch kind: " << cond;
2073 return NULL;
2074 }
Logan Chien70f94b42011-12-27 17:49:11 +08002075}
2076
2077
Logan Chiene27fdbb2012-01-02 23:27:26 +08002078void
2079MethodCompiler::EmitGuard_ArrayIndexOutOfBoundsException(uint32_t dex_pc,
2080 llvm::Value* array,
2081 llvm::Value* index) {
2082 llvm::Value* array_len = EmitLoadArrayLength(array);
2083
2084 llvm::Value* cmp = irb_.CreateICmpUGE(index, array_len);
2085
2086 llvm::BasicBlock* block_exception =
2087 CreateBasicBlockWithDexPC(dex_pc, "overflow");
2088
2089 llvm::BasicBlock* block_continue =
2090 CreateBasicBlockWithDexPC(dex_pc, "cont");
2091
2092 irb_.CreateCondBr(cmp, block_exception, block_continue);
2093
2094 irb_.SetInsertPoint(block_exception);
2095 irb_.CreateCall2(irb_.GetRuntime(ThrowIndexOutOfBounds), index, array_len);
2096 EmitBranchExceptionLandingPad(dex_pc);
2097
2098 irb_.SetInsertPoint(block_continue);
2099}
2100
2101
2102void MethodCompiler::EmitGuard_ArrayException(uint32_t dex_pc,
2103 llvm::Value* array,
2104 llvm::Value* index) {
2105 EmitGuard_NullPointerException(dex_pc, array);
2106 EmitGuard_ArrayIndexOutOfBoundsException(dex_pc, array, index);
2107}
2108
2109
2110// Emit Array GetElementPtr
2111llvm::Value* MethodCompiler::EmitArrayGEP(llvm::Value* array_addr,
2112 llvm::Value* index_value,
2113 llvm::Type* elem_type) {
2114
2115 llvm::Constant* data_offset_value =
2116 irb_.getPtrEquivInt(Array::DataOffset().Int32Value());
2117
2118 llvm::Value* array_data_addr =
2119 irb_.CreatePtrDisp(array_addr, data_offset_value,
2120 elem_type->getPointerTo());
2121
2122 return irb_.CreateGEP(array_data_addr, index_value);
2123}
2124
2125
Logan Chien70f94b42011-12-27 17:49:11 +08002126void MethodCompiler::EmitInsn_AGet(uint32_t dex_pc,
2127 Instruction const* insn,
2128 JType elem_jty) {
Logan Chiene27fdbb2012-01-02 23:27:26 +08002129
2130 Instruction::DecodedInstruction dec_insn(insn);
2131
2132 llvm::Value* array_addr = EmitLoadDalvikReg(dec_insn.vB_, kObject, kAccurate);
2133 llvm::Value* index_value = EmitLoadDalvikReg(dec_insn.vC_, kInt, kAccurate);
2134
2135 EmitGuard_ArrayException(dex_pc, array_addr, index_value);
2136
2137 llvm::Type* elem_type = irb_.getJType(elem_jty, kArray);
2138
2139 llvm::Value* array_elem_addr =
2140 EmitArrayGEP(array_addr, index_value, elem_type);
2141
2142 llvm::Value* array_elem_value = irb_.CreateLoad(array_elem_addr);
2143
2144 EmitStoreDalvikReg(dec_insn.vA_, elem_jty, kArray, array_elem_value);
2145
Logan Chien70f94b42011-12-27 17:49:11 +08002146 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2147}
2148
2149
2150void MethodCompiler::EmitInsn_APut(uint32_t dex_pc,
2151 Instruction const* insn,
2152 JType elem_jty) {
Logan Chien8dabb432012-01-02 23:29:32 +08002153
2154 Instruction::DecodedInstruction dec_insn(insn);
2155
2156 llvm::Value* array_addr = EmitLoadDalvikReg(dec_insn.vB_, kObject, kAccurate);
2157 llvm::Value* index_value = EmitLoadDalvikReg(dec_insn.vC_, kInt, kAccurate);
2158
2159 EmitGuard_ArrayException(dex_pc, array_addr, index_value);
2160
2161 llvm::Type* elem_type = irb_.getJType(elem_jty, kArray);
2162
2163 llvm::Value* array_elem_addr =
2164 EmitArrayGEP(array_addr, index_value, elem_type);
2165
2166 llvm::Value* new_value = EmitLoadDalvikReg(dec_insn.vA_, elem_jty, kArray);
2167
2168 irb_.CreateStore(new_value, array_elem_addr);
2169
Logan Chien70f94b42011-12-27 17:49:11 +08002170 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2171}
2172
2173
Logan Chien48f1d2a2012-01-02 22:49:53 +08002174void MethodCompiler::PrintUnresolvedFieldWarning(int32_t field_idx) {
2175 DexFile const& dex_file = method_helper_.GetDexFile();
2176 DexFile::FieldId const& field_id = dex_file.GetFieldId(field_idx);
2177
2178 LOG(WARNING) << "unable to resolve static field " << field_idx << " ("
2179 << dex_file.GetFieldName(field_id) << ") in "
2180 << dex_file.GetFieldDeclaringClassDescriptor(field_id);
2181}
2182
2183
Logan Chien70f94b42011-12-27 17:49:11 +08002184void MethodCompiler::EmitInsn_IGet(uint32_t dex_pc,
2185 Instruction const* insn,
2186 JType field_jty) {
Logan Chien48f1d2a2012-01-02 22:49:53 +08002187
2188 Instruction::DecodedInstruction dec_insn(insn);
2189
2190 uint32_t reg_idx = dec_insn.vB_;
2191 uint32_t field_idx = dec_insn.vC_;
2192
2193 Field* field = dex_cache_->GetResolvedField(field_idx);
2194
2195 llvm::Value* object_addr = EmitLoadDalvikReg(reg_idx, kObject, kAccurate);
2196
2197 EmitGuard_NullPointerException(dex_pc, object_addr);
2198
2199 llvm::Value* field_value;
2200
2201 if (field == NULL) {
2202 PrintUnresolvedFieldWarning(field_idx);
2203
2204 llvm::Function* runtime_func;
2205
2206 if (field_jty == kObject) {
2207 runtime_func = irb_.GetRuntime(SetObjectInstance);
2208 } else if (field_jty == kLong || field_jty == kDouble) {
2209 runtime_func = irb_.GetRuntime(Set64Instance);
2210 } else {
2211 runtime_func = irb_.GetRuntime(Set32Instance);
2212 }
2213
2214 llvm::ConstantInt* field_idx_value = irb_.getInt32(field_idx);
2215
2216 llvm::Value* method_object_addr = EmitLoadMethodObjectAddr();
2217
2218 field_value = irb_.CreateCall2(runtime_func, field_idx_value,
2219 method_object_addr);
2220
2221 EmitGuard_ExceptionLandingPad(dex_pc);
2222
2223 } else {
2224 llvm::PointerType* field_type =
2225 irb_.getJType(field_jty, kField)->getPointerTo();
2226
2227 llvm::ConstantInt* field_offset =
2228 irb_.getPtrEquivInt(field->GetOffset().Int32Value());
2229
2230 llvm::Value* field_addr =
2231 irb_.CreatePtrDisp(object_addr, field_offset, field_type);
2232
2233 field_value = irb_.CreateLoad(field_addr);
2234 }
2235
2236 EmitStoreDalvikReg(dec_insn.vA_, field_jty, kField, field_value);
2237
Logan Chien70f94b42011-12-27 17:49:11 +08002238 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2239}
2240
2241
2242void MethodCompiler::EmitInsn_IPut(uint32_t dex_pc,
2243 Instruction const* insn,
2244 JType field_jty) {
Logan Chiendd6aa872012-01-03 16:06:32 +08002245
2246 Instruction::DecodedInstruction dec_insn(insn);
2247
2248 uint32_t reg_idx = dec_insn.vB_;
2249 uint32_t field_idx = dec_insn.vC_;
2250
2251 Field* field = dex_cache_->GetResolvedField(field_idx);
2252
2253 llvm::Value* object_addr = EmitLoadDalvikReg(reg_idx, kObject, kAccurate);
2254
2255 EmitGuard_NullPointerException(dex_pc, object_addr);
2256
2257 llvm::Value* new_value = EmitLoadDalvikReg(dec_insn.vA_, field_jty, kField);
2258
2259 if (field == NULL) {
2260 PrintUnresolvedFieldWarning(field_idx);
2261
2262 llvm::Function* runtime_func;
2263
2264 if (field_jty == kObject) {
2265 runtime_func = irb_.GetRuntime(SetObjectInstance);
2266 } else if (field_jty == kLong || field_jty == kDouble) {
2267 runtime_func = irb_.GetRuntime(Set64Instance);
2268 } else {
2269 runtime_func = irb_.GetRuntime(Set32Instance);
2270 }
2271
2272 llvm::Value* field_idx_value = irb_.getInt32(field_idx);
2273
2274 llvm::Value* method_object_addr = EmitLoadMethodObjectAddr();
2275
2276 irb_.CreateCall3(runtime_func, field_idx_value,
2277 method_object_addr, new_value);
2278
2279 EmitGuard_ExceptionLandingPad(dex_pc);
2280
2281 } else {
2282 llvm::PointerType* field_type =
2283 irb_.getJType(field_jty, kField)->getPointerTo();
2284
2285 llvm::Value* field_offset =
2286 irb_.getPtrEquivInt(field->GetOffset().Int32Value());
2287
2288 llvm::Value* field_addr =
2289 irb_.CreatePtrDisp(object_addr, field_offset, field_type);
2290
2291 irb_.CreateStore(new_value, field_addr);
2292 }
2293
Logan Chien70f94b42011-12-27 17:49:11 +08002294 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2295}
2296
2297
Logan Chien2aeca0b2012-02-03 22:55:46 +08002298Method* MethodCompiler::ResolveMethod(uint32_t method_idx) {
2299 Thread* thread = Thread::Current();
2300
2301 // Save the exception state
2302 Throwable* old_exception = NULL;
2303 if (thread->IsExceptionPending()) {
2304 old_exception = thread->GetException();
2305 thread->ClearException();
2306 }
2307
2308 // Resolve the method through the class linker
2309 Method* method = class_linker_->ResolveMethod(*dex_file_, method_idx,
2310 dex_cache_, class_loader_,
2311 /* is_direct= */ false);
2312
2313 if (method == NULL) {
2314 // Ignore the exception raised during the method resolution
2315 thread->ClearException();
2316 }
2317
2318 // Restore the exception state
2319 if (old_exception != NULL) {
2320 thread->SetException(old_exception);
2321 }
2322
2323 return method;
2324}
2325
2326
Logan Chien438c4b62012-01-17 16:06:00 +08002327Field* MethodCompiler::ResolveField(uint32_t field_idx) {
2328 Thread* thread = Thread::Current();
2329
2330 // Save the exception state
2331 Throwable* old_exception = NULL;
2332 if (thread->IsExceptionPending()) {
2333 old_exception = thread->GetException();
2334 thread->ClearException();
2335 }
2336
2337 // Resolve the fields through the class linker
2338 Field* field = class_linker_->ResolveField(*dex_file_, field_idx,
2339 dex_cache_, class_loader_,
2340 /* is_static= */ true);
2341
2342 if (field == NULL) {
2343 // Ignore the exception raised during the field resolution
2344 thread->ClearException();
2345 }
2346
2347 // Restore the exception state
2348 if (old_exception != NULL) {
2349 thread->SetException(old_exception);
2350 }
2351
2352 return field;
2353}
2354
2355
2356Field* MethodCompiler::
2357FindFieldAndDeclaringTypeIdx(uint32_t field_idx,
2358 uint32_t &resolved_type_idx) {
2359
2360 // Resolve the field through the class linker
2361 Field* field = ResolveField(field_idx);
2362 if (field == NULL) {
2363 return NULL;
2364 }
2365
2366 DexFile::FieldId const& field_id = dex_file_->GetFieldId(field_idx);
2367
2368 // Search for the type_idx of the declaring class
2369 uint16_t type_idx = field_id.class_idx_;
2370 Class* klass = dex_cache_->GetResolvedTypes()->Get(type_idx);
2371
2372 // Test: Is referring_class equal to declaring_class?
2373
2374 // If true, then return the type_idx; otherwise, this field must be declared
2375 // in super class or interfaces, we have to search for declaring class.
2376
2377 if (field->GetDeclaringClass() == klass) {
2378 resolved_type_idx = type_idx;
2379 return field;
2380 }
2381
2382 // Search for the type_idx of the super class or interfaces
2383 std::string desc(FieldHelper(field).GetDeclaringClassDescriptor());
2384
2385 DexFile::StringId const* string_id = dex_file_->FindStringId(desc);
2386
2387 if (string_id == NULL) {
2388 return NULL;
2389 }
2390
2391 DexFile::TypeId const* type_id =
2392 dex_file_->FindTypeId(dex_file_->GetIndexForStringId(*string_id));
2393
2394 if (type_id == NULL) {
2395 return NULL;
2396 }
2397
2398 resolved_type_idx = dex_file_->GetIndexForTypeId(*type_id);
2399 return field;
2400}
2401
2402
2403llvm::Value* MethodCompiler::EmitLoadStaticStorage(uint32_t dex_pc,
2404 uint32_t type_idx) {
2405 llvm::BasicBlock* block_load_static =
2406 CreateBasicBlockWithDexPC(dex_pc, "load_static");
2407
2408 llvm::BasicBlock* block_cont = CreateBasicBlockWithDexPC(dex_pc, "cont");
2409
2410 // Load static storage from dex cache
2411 llvm::Value* storage_field_addr =
2412 EmitLoadDexCacheStaticStorageFieldAddr(type_idx);
2413
2414 llvm::Value* storage_object_addr = irb_.CreateLoad(storage_field_addr);
2415
2416 llvm::BasicBlock* block_original = irb_.GetInsertBlock();
2417
2418 // Test: Is the static storage of this class initialized?
2419 llvm::Value* equal_null =
2420 irb_.CreateICmpEQ(storage_object_addr, irb_.getJNull());
2421
2422 irb_.CreateCondBr(equal_null, block_load_static, block_cont);
2423
2424 // Failback routine to load the class object
2425 irb_.SetInsertPoint(block_load_static);
2426
2427 llvm::Function* runtime_func =
2428 irb_.GetRuntime(InitializeStaticStorage);
2429
2430 llvm::Constant* type_idx_value = irb_.getInt32(type_idx);
2431
2432 llvm::Value* method_object_addr = EmitLoadMethodObjectAddr();
2433
2434 llvm::Value* loaded_storage_object_addr =
2435 irb_.CreateCall2(runtime_func, type_idx_value, method_object_addr);
2436
2437 EmitGuard_ExceptionLandingPad(dex_pc);
2438
2439 llvm::BasicBlock* block_after_load_static = irb_.GetInsertBlock();
2440
2441 irb_.CreateBr(block_cont);
2442
2443 // Now the class object must be loaded
2444 irb_.SetInsertPoint(block_cont);
2445
2446 llvm::PHINode* phi = irb_.CreatePHI(irb_.getJObjectTy(), 2);
2447
2448 phi->addIncoming(storage_object_addr, block_original);
2449 phi->addIncoming(loaded_storage_object_addr, block_after_load_static);
2450
2451 return phi;
2452}
2453
2454
Logan Chien70f94b42011-12-27 17:49:11 +08002455void MethodCompiler::EmitInsn_SGet(uint32_t dex_pc,
2456 Instruction const* insn,
2457 JType field_jty) {
Logan Chien438c4b62012-01-17 16:06:00 +08002458
2459 Instruction::DecodedInstruction dec_insn(insn);
2460
2461 uint32_t declaring_type_idx = DexFile::kDexNoIndex;
2462
2463 Field* field = FindFieldAndDeclaringTypeIdx(dec_insn.vB_, declaring_type_idx);
2464
2465 llvm::Value* static_field_value;
2466
2467 if (field == NULL) {
2468 llvm::Function* runtime_func;
2469
2470 if (field_jty == kObject) {
2471 runtime_func = irb_.GetRuntime(GetObjectStatic);
2472 } else if (field_jty == kLong || field_jty == kDouble) {
2473 runtime_func = irb_.GetRuntime(Get64Static);
2474 } else {
2475 runtime_func = irb_.GetRuntime(Get32Static);
2476 }
2477
2478 llvm::Constant* field_idx_value = irb_.getInt32(dec_insn.vB_);
2479
2480 llvm::Value* method_object_addr = EmitLoadMethodObjectAddr();
2481
2482 static_field_value =
2483 irb_.CreateCall2(runtime_func, field_idx_value, method_object_addr);
2484
2485 EmitGuard_ExceptionLandingPad(dex_pc);
2486
2487 } else {
2488 llvm::Value* static_storage_addr =
2489 EmitLoadStaticStorage(dex_pc, declaring_type_idx);
2490
2491 llvm::Value* static_field_offset_value =
2492 irb_.getPtrEquivInt(field->GetOffset().Int32Value());
2493
2494 llvm::Value* static_field_addr =
2495 irb_.CreatePtrDisp(static_storage_addr, static_field_offset_value,
2496 irb_.getJType(field_jty, kField)->getPointerTo());
2497
2498 static_field_value = irb_.CreateLoad(static_field_addr);
2499 }
2500
2501 EmitStoreDalvikReg(dec_insn.vA_, field_jty, kField, static_field_value);
2502
Logan Chien70f94b42011-12-27 17:49:11 +08002503 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2504}
2505
2506
2507void MethodCompiler::EmitInsn_SPut(uint32_t dex_pc,
2508 Instruction const* insn,
2509 JType field_jty) {
Logan Chien14179c82012-01-17 17:06:34 +08002510
2511 Instruction::DecodedInstruction dec_insn(insn);
2512
2513 uint32_t declaring_type_idx = DexFile::kDexNoIndex;
2514
2515 Field* field = FindFieldAndDeclaringTypeIdx(dec_insn.vB_, declaring_type_idx);
2516
2517 llvm::Value* new_value = EmitLoadDalvikReg(dec_insn.vA_, field_jty, kField);
2518
2519 if (field == NULL) {
2520 llvm::Function* runtime_func;
2521
2522 if (field_jty == kObject) {
2523 runtime_func = irb_.GetRuntime(SetObjectStatic);
2524 } else if (field_jty == kLong || field_jty == kDouble) {
2525 runtime_func = irb_.GetRuntime(Set64Static);
2526 } else {
2527 runtime_func = irb_.GetRuntime(Set32Static);
2528 }
2529
2530 llvm::Constant* field_idx_value = irb_.getInt32(dec_insn.vB_);
2531
2532 llvm::Value* method_object_addr = EmitLoadMethodObjectAddr();
2533
2534 irb_.CreateCall3(runtime_func, field_idx_value,
2535 method_object_addr, new_value);
2536
2537 EmitGuard_ExceptionLandingPad(dex_pc);
2538
2539 } else {
2540 llvm::Value* static_storage_addr =
2541 EmitLoadStaticStorage(dex_pc, declaring_type_idx);
2542
2543 llvm::Value* static_field_offset_value =
2544 irb_.getPtrEquivInt(field->GetOffset().Int32Value());
2545
2546 llvm::Value* static_field_addr =
2547 irb_.CreatePtrDisp(static_storage_addr, static_field_offset_value,
2548 irb_.getJType(field_jty, kField)->getPointerTo());
2549
2550 irb_.CreateStore(new_value, static_field_addr);
2551 }
2552
Logan Chien70f94b42011-12-27 17:49:11 +08002553 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2554}
2555
2556
Logan Chien1a121b92012-02-15 22:23:42 +08002557llvm::Value* MethodCompiler::
2558EmitLoadCalleeThis(Instruction::DecodedInstruction const& dec_insn,
2559 bool is_range) {
2560 if (is_range) {
2561 return EmitLoadDalvikReg(dec_insn.vC_, kObject, kAccurate);
2562 } else {
2563 return EmitLoadDalvikReg(dec_insn.arg_[0], kObject, kAccurate);
2564 }
2565}
2566
2567
2568void MethodCompiler::
2569EmitLoadActualParameters(std::vector<llvm::Value*>& args,
2570 uint32_t callee_method_idx,
2571 Instruction::DecodedInstruction const& dec_insn,
2572 bool is_range,
2573 bool is_static) {
2574
2575 // Get method signature
2576 DexFile::MethodId const& method_id =
2577 dex_file_->GetMethodId(callee_method_idx);
2578
2579 int32_t shorty_size;
2580 char const* shorty = dex_file_->GetMethodShorty(method_id, &shorty_size);
2581 CHECK_GE(shorty_size, 1);
2582
2583 // Load argument values according to the shorty (without "this")
2584 uint16_t reg_count = 0;
2585
2586 if (!is_static) {
2587 ++reg_count; // skip the "this" pointer
2588 }
2589
2590 for (int32_t i = 1; i < shorty_size; ++i) {
2591 uint32_t reg_idx = (is_range) ? (dec_insn.vC_ + reg_count)
2592 : (dec_insn.arg_[reg_count]);
2593
2594 args.push_back(EmitLoadDalvikReg(reg_idx, shorty[i], kAccurate));
2595
2596 ++reg_count;
2597 if (shorty[i] == 'J' || shorty[i] == 'D') {
2598 // Wide types, such as long and double, are using a pair of registers
2599 // to store the value, so we have to increase arg_reg again.
2600 ++reg_count;
2601 }
2602 }
2603
2604 DCHECK_EQ(reg_count, dec_insn.vA_)
2605 << "Actual argument mismatch for callee: "
2606 << PrettyMethod(callee_method_idx, *dex_file_);
2607}
2608
2609
2610
Logan Chien70f94b42011-12-27 17:49:11 +08002611void MethodCompiler::EmitInsn_InvokeVirtual(uint32_t dex_pc,
2612 Instruction const* insn,
2613 bool is_range) {
Logan Chien46fbb412012-02-15 22:29:08 +08002614
2615 Instruction::DecodedInstruction dec_insn(insn);
2616
2617 uint32_t callee_method_idx = dec_insn.vB_;
2618
2619 // Find the method object at compile time
2620 Method* callee_method = ResolveMethod(callee_method_idx);
2621
2622 if (callee_method == NULL) {
2623 // Callee method can't be resolved at compile time. Emit the runtime
2624 // method resolution code.
2625
2626 UNIMPLEMENTED(FATAL) << "Method index " << callee_method_idx
2627 << " can't be resolved";
2628
2629 } else {
2630 // Test: Is *this* parameter equal to null?
2631 llvm::Value* this_addr = EmitLoadCalleeThis(dec_insn, is_range);
2632 EmitGuard_NullPointerException(dex_pc, this_addr);
2633
2634 // Load class object of *this* pointer
2635 llvm::Value* class_object_addr = EmitLoadClassObjectAddr(this_addr);
2636
2637 // Load callee method code address (branch destination)
2638 llvm::Value* vtable_addr = EmitLoadVTableAddr(class_object_addr);
2639
2640 llvm::Value* method_object_addr =
2641 EmitLoadMethodObjectAddrFromVTable(vtable_addr,
2642 callee_method->GetMethodIndex());
2643
2644 llvm::Value* code_addr =
2645 EmitLoadCodeAddr(method_object_addr, callee_method_idx, false);
2646
2647 // Load actual parameters
2648 std::vector<llvm::Value*> args;
2649 args.push_back(method_object_addr);
2650 args.push_back(this_addr);
2651 EmitLoadActualParameters(args, callee_method_idx, dec_insn,
2652 is_range, false);
2653
2654 // Invoke callee
2655 llvm::Value* retval = irb_.CreateCall(code_addr, args);
2656
2657 EmitGuard_ExceptionLandingPad(dex_pc);
2658
2659 MethodHelper method_helper(callee_method);
2660 char ret_shorty = method_helper.GetShorty()[0];
2661 if (ret_shorty != 'V') {
2662 EmitStoreDalvikRetValReg(ret_shorty, kAccurate, retval);
2663 }
2664 }
2665
Logan Chien70f94b42011-12-27 17:49:11 +08002666 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2667}
2668
2669
2670void MethodCompiler::EmitInsn_InvokeSuper(uint32_t dex_pc,
2671 Instruction const* insn,
2672 bool is_range) {
Logan Chiene73b6212012-01-27 01:47:29 +08002673
2674 Instruction::DecodedInstruction dec_insn(insn);
2675
2676 uint32_t callee_method_idx = dec_insn.vB_;
2677
2678 // Find the method object at compile time
2679 Method* callee_overiding_method = ResolveMethod(callee_method_idx);
2680
2681 if (callee_overiding_method == NULL) {
2682 // Callee method can't be resolved at compile time. Emit the runtime
2683 // method resolution code.
2684
2685 UNIMPLEMENTED(FATAL) << "Method index " << callee_method_idx
2686 << " can't be resolved";
2687
2688 } else {
2689 // CHECK: Is the instruction well-encoded or is the class hierarchy correct?
2690 Class* declaring_class = method_->GetDeclaringClass();
2691 CHECK_NE(declaring_class, static_cast<Class*>(NULL));
2692
2693 Class* super_class = declaring_class->GetSuperClass();
2694 CHECK_NE(super_class, static_cast<Class*>(NULL));
2695
2696 uint16_t callee_method_index = callee_overiding_method->GetMethodIndex();
2697 CHECK_GT(super_class->GetVTable()->GetLength(), callee_method_index);
2698
2699 Method* callee_method = super_class->GetVTable()->Get(callee_method_index);
2700 CHECK_NE(callee_method, static_cast<Method*>(NULL));
2701
2702 // Test: Is *this* parameter equal to null?
2703 llvm::Value* this_addr = EmitLoadCalleeThis(dec_insn, is_range);
2704 EmitGuard_NullPointerException(dex_pc, this_addr);
2705
2706 // Load declaring class of the caller method
2707 llvm::Value* method_object_addr = EmitLoadMethodObjectAddr();
2708
2709 llvm::ConstantInt* declaring_class_offset_value =
2710 irb_.getPtrEquivInt(Method::DeclaringClassOffset().Int32Value());
2711
2712 llvm::Value* declaring_class_field_addr =
2713 irb_.CreatePtrDisp(method_object_addr, declaring_class_offset_value,
2714 irb_.getJObjectTy()->getPointerTo());
2715
2716 llvm::Value* declaring_class_addr =
2717 irb_.CreateLoad(declaring_class_field_addr);
2718
2719 // Load the super class of the declaring class
2720 llvm::Value* super_class_offset_value =
2721 irb_.getPtrEquivInt(Class::SuperClassOffset().Int32Value());
2722
2723 llvm::Value* super_class_field_addr =
2724 irb_.CreatePtrDisp(declaring_class_addr, super_class_offset_value,
2725 irb_.getJObjectTy()->getPointerTo());
2726
2727 llvm::Value* super_class_addr =
2728 irb_.CreateLoad(super_class_field_addr);
2729
2730 // Load method object from virtual table
2731 llvm::Value* vtable_addr = EmitLoadVTableAddr(super_class_addr);
2732
2733 llvm::Value* callee_method_object_addr =
2734 EmitLoadMethodObjectAddrFromVTable(vtable_addr,
2735 callee_method->GetMethodIndex());
2736
2737 llvm::Value* code_addr =
2738 EmitLoadCodeAddr(callee_method_object_addr,
2739 callee_method_idx, false);
2740
2741 // Load actual parameters
2742 std::vector<llvm::Value*> args;
2743 args.push_back(callee_method_object_addr);
2744 args.push_back(this_addr);
2745 EmitLoadActualParameters(args, callee_method_idx, dec_insn,
2746 is_range, false);
2747
2748 // Invoke callee
2749 llvm::Value* retval = irb_.CreateCall(code_addr, args);
2750
2751 EmitGuard_ExceptionLandingPad(dex_pc);
2752
2753 MethodHelper method_helper(callee_method);
2754 char ret_shorty = method_helper.GetShorty()[0];
2755 if (ret_shorty != 'V') {
2756 EmitStoreDalvikRetValReg(ret_shorty, kAccurate, retval);
2757 }
2758 }
2759
Logan Chien70f94b42011-12-27 17:49:11 +08002760 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2761}
2762
2763
Logan Chien1a121b92012-02-15 22:23:42 +08002764void MethodCompiler::EmitInsn_InvokeStaticDirect(uint32_t dex_pc,
2765 Instruction const* insn,
2766 bool is_range,
2767 bool is_static) {
Logan Chien70f94b42011-12-27 17:49:11 +08002768
Logan Chien1a121b92012-02-15 22:23:42 +08002769 Instruction::DecodedInstruction dec_insn(insn);
Logan Chien70f94b42011-12-27 17:49:11 +08002770
Logan Chien1a121b92012-02-15 22:23:42 +08002771 uint32_t callee_method_idx = dec_insn.vB_;
2772
2773 // Find the method object at compile time
2774 Method* callee_method = dex_cache_->GetResolvedMethod(callee_method_idx);
2775 CHECK_NE(callee_method, static_cast<Method*>(NULL));
2776
2777 llvm::Value* this_addr = NULL;
2778
2779 if (!is_static) {
2780 // Test: Is *this* parameter equal to null?
2781 this_addr = EmitLoadCalleeThis(dec_insn, is_range);
2782 EmitGuard_NullPointerException(dex_pc, this_addr);
2783 }
2784
2785 // Load method function pointers
2786
2787 // TODO: Besides finding the callee function address through Code and
2788 // Direct Methods (CADMS) at runtime, try to find the callee function
2789 // through something like compiler_llvm_->GetCompiledMethod(...)
2790 // so that we can perform inlining.
2791
2792 llvm::Value* code_addr_field_addr = NULL;
2793 llvm::Value* method_field_addr = NULL;
2794
2795 EmitLoadDexCacheCodeAndDirectMethodFieldAddr(
2796 code_addr_field_addr, method_field_addr, callee_method_idx);
2797
2798 // NOTE: Since CADMS are mixing int type with pointer type, we have to
2799 // cast the integer type to pointer type. Following code must be refined
2800 // when we are going to port to 64bit architecture.
2801
2802 llvm::Value* code_addr_int = irb_.CreateLoad(code_addr_field_addr);
2803
2804 llvm::FunctionType* callee_type =
2805 GetFunctionType(callee_method_idx, is_static);
2806
2807 llvm::Value* code_addr =
2808 irb_.CreateIntToPtr(code_addr_int, callee_type->getPointerTo());
2809
2810 llvm::Value* callee_method_value_int = irb_.CreateLoad(method_field_addr);
2811
2812 llvm::Value* callee_method_object_addr =
2813 irb_.CreateIntToPtr(callee_method_value_int, irb_.getJObjectTy());
2814
2815 // Load the actual parameter
2816 std::vector<llvm::Value*> args;
2817
2818 args.push_back(callee_method_object_addr); // method object for callee
2819
2820 if (!is_static) {
2821 args.push_back(this_addr); // "this" object for callee
2822 }
2823
2824 EmitLoadActualParameters(args, callee_method_idx, dec_insn,
2825 is_range, is_static);
2826
2827 llvm::Value* retval = irb_.CreateCall(code_addr, args);
2828 EmitGuard_ExceptionLandingPad(dex_pc);
2829
2830 MethodHelper method_helper(callee_method);
Shih-wei Liao90d50992012-02-19 03:32:05 -08002831 char ret_shorty = method_helper.GetShorty()[0];
2832 if (ret_shorty != 'V') {
Logan Chien1a121b92012-02-15 22:23:42 +08002833 EmitStoreDalvikRetValReg(ret_shorty, kAccurate, retval);
2834 }
2835
Logan Chien70f94b42011-12-27 17:49:11 +08002836 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2837}
2838
2839
2840void MethodCompiler::EmitInsn_InvokeInterface(uint32_t dex_pc,
2841 Instruction const* insn,
2842 bool is_range) {
Logan Chien7caf37e2012-02-03 22:56:04 +08002843
2844 Instruction::DecodedInstruction dec_insn(insn);
2845
2846 uint32_t callee_method_idx = dec_insn.vB_;
2847
2848 // Resolve callee method
2849 Method* callee_method = ResolveMethod(callee_method_idx);
2850
2851 // Test: Is "this" pointer equal to null?
2852 llvm::Value* this_addr = EmitLoadCalleeThis(dec_insn, is_range);
2853 EmitGuard_NullPointerException(dex_pc, this_addr);
2854
2855 // Resolve the callee method object address at runtime
2856 llvm::Value* runtime_func = irb_.GetRuntime(FindInterfaceMethod);
2857
2858 llvm::Value* method_object_addr = EmitLoadMethodObjectAddr();
2859
2860 llvm::Value* callee_method_idx_value = irb_.getInt32(callee_method_idx);
2861
2862 llvm::Value* callee_method_object_addr =
2863 irb_.CreateCall2(runtime_func, callee_method_idx_value, method_object_addr);
2864
2865 EmitGuard_ExceptionLandingPad(dex_pc);
2866
2867 llvm::Value* code_addr =
2868 EmitLoadCodeAddr(callee_method_object_addr, callee_method_idx, false);
2869
2870 // Load the actual parameter
2871 std::vector<llvm::Value*> args;
2872 args.push_back(callee_method_object_addr);
2873 args.push_back(this_addr);
2874 EmitLoadActualParameters(args, callee_method_idx, dec_insn, is_range, false);
2875
2876 // Emit the code to invoke callee
2877 llvm::Value* retval = irb_.CreateCall(code_addr, args);
2878 EmitGuard_ExceptionLandingPad(dex_pc);
2879
2880 MethodHelper method_helper(callee_method);
2881 char ret_shorty = method_helper.GetShorty()[0];
2882 if (ret_shorty != 'V') {
2883 EmitStoreDalvikRetValReg(ret_shorty, kAccurate, retval);
2884 }
2885
Logan Chien70f94b42011-12-27 17:49:11 +08002886 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2887}
2888
2889
2890void MethodCompiler::EmitInsn_Neg(uint32_t dex_pc,
2891 Instruction const* insn,
2892 JType op_jty) {
Logan Chien1b5685f2011-12-27 18:01:14 +08002893
2894 Instruction::DecodedInstruction dec_insn(insn);
2895
2896 DCHECK(op_jty == kInt || op_jty == kLong) << op_jty;
2897
2898 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, op_jty, kAccurate);
2899 llvm::Value* result_value = irb_.CreateNeg(src_value);
2900 EmitStoreDalvikReg(dec_insn.vA_, op_jty, kAccurate, result_value);
2901
Logan Chien70f94b42011-12-27 17:49:11 +08002902 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2903}
2904
2905
2906void MethodCompiler::EmitInsn_Not(uint32_t dex_pc,
2907 Instruction const* insn,
2908 JType op_jty) {
Logan Chiene53750d2011-12-27 18:02:27 +08002909
2910 Instruction::DecodedInstruction dec_insn(insn);
2911
2912 DCHECK(op_jty == kInt || op_jty == kLong) << op_jty;
2913
2914 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, op_jty, kAccurate);
2915 llvm::Value* result_value =
2916 irb_.CreateXor(src_value, static_cast<uint64_t>(-1));
2917
2918 EmitStoreDalvikReg(dec_insn.vA_, op_jty, kAccurate, result_value);
2919
Logan Chien70f94b42011-12-27 17:49:11 +08002920 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2921}
2922
2923
2924void MethodCompiler::EmitInsn_SExt(uint32_t dex_pc,
2925 Instruction const* insn) {
Logan Chien61752ad2011-12-27 18:03:51 +08002926
2927 Instruction::DecodedInstruction dec_insn(insn);
2928
2929 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, kInt, kAccurate);
2930 llvm::Value* result_value = irb_.CreateSExt(src_value, irb_.getJLongTy());
2931 EmitStoreDalvikReg(dec_insn.vA_, kLong, kAccurate, result_value);
2932
Logan Chien70f94b42011-12-27 17:49:11 +08002933 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2934}
2935
2936
2937void MethodCompiler::EmitInsn_Trunc(uint32_t dex_pc,
2938 Instruction const* insn) {
Logan Chien17a57662011-12-27 18:05:14 +08002939
2940 Instruction::DecodedInstruction dec_insn(insn);
2941
2942 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, kLong, kAccurate);
2943 llvm::Value* result_value = irb_.CreateTrunc(src_value, irb_.getJIntTy());
2944 EmitStoreDalvikReg(dec_insn.vA_, kInt, kAccurate, result_value);
2945
Logan Chien70f94b42011-12-27 17:49:11 +08002946 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2947}
2948
2949
2950void MethodCompiler::EmitInsn_TruncAndSExt(uint32_t dex_pc,
2951 Instruction const* insn,
2952 unsigned N) {
Logan Chienb6744c52011-12-27 18:06:26 +08002953
2954 Instruction::DecodedInstruction dec_insn(insn);
2955
2956 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, kInt, kAccurate);
2957
2958 llvm::Value* trunc_value =
2959 irb_.CreateTrunc(src_value, llvm::Type::getIntNTy(*context_, N));
2960
2961 llvm::Value* result_value = irb_.CreateSExt(trunc_value, irb_.getJIntTy());
2962
2963 EmitStoreDalvikReg(dec_insn.vA_, kInt, kAccurate, result_value);
2964
Logan Chien70f94b42011-12-27 17:49:11 +08002965 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2966}
2967
2968
2969void MethodCompiler::EmitInsn_TruncAndZExt(uint32_t dex_pc,
2970 Instruction const* insn,
2971 unsigned N) {
Logan Chienb6744c52011-12-27 18:06:26 +08002972
2973 Instruction::DecodedInstruction dec_insn(insn);
2974
2975 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, kInt, kAccurate);
2976
2977 llvm::Value* trunc_value =
2978 irb_.CreateTrunc(src_value, llvm::Type::getIntNTy(*context_, N));
2979
2980 llvm::Value* result_value = irb_.CreateZExt(trunc_value, irb_.getJIntTy());
2981
2982 EmitStoreDalvikReg(dec_insn.vA_, kInt, kAccurate, result_value);
2983
Logan Chien70f94b42011-12-27 17:49:11 +08002984 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2985}
2986
2987
2988void MethodCompiler::EmitInsn_FNeg(uint32_t dex_pc,
2989 Instruction const* insn,
2990 JType op_jty) {
Logan Chien7a48b092011-12-27 18:07:45 +08002991
2992 Instruction::DecodedInstruction dec_insn(insn);
2993
2994 DCHECK(op_jty == kFloat || op_jty == kDouble) << op_jty;
2995
2996 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, op_jty, kAccurate);
2997 llvm::Value* result_value = irb_.CreateFNeg(src_value);
2998 EmitStoreDalvikReg(dec_insn.vA_, op_jty, kAccurate, result_value);
2999
Logan Chien70f94b42011-12-27 17:49:11 +08003000 irb_.CreateBr(GetNextBasicBlock(dex_pc));
3001}
3002
3003
3004void MethodCompiler::EmitInsn_IntToFP(uint32_t dex_pc,
3005 Instruction const* insn,
3006 JType src_jty,
3007 JType dest_jty) {
Logan Chien62dd4532011-12-27 18:09:00 +08003008
3009 Instruction::DecodedInstruction dec_insn(insn);
3010
3011 DCHECK(src_jty == kInt || src_jty == kLong) << src_jty;
3012 DCHECK(dest_jty == kFloat || dest_jty == kDouble) << dest_jty;
3013
3014 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, src_jty, kAccurate);
3015 llvm::Type* dest_type = irb_.getJType(dest_jty, kAccurate);
3016 llvm::Value* dest_value = irb_.CreateSIToFP(src_value, dest_type);
3017 EmitStoreDalvikReg(dec_insn.vA_, dest_jty, kAccurate, dest_value);
3018
Logan Chien70f94b42011-12-27 17:49:11 +08003019 irb_.CreateBr(GetNextBasicBlock(dex_pc));
3020}
3021
3022
3023void MethodCompiler::EmitInsn_FPToInt(uint32_t dex_pc,
3024 Instruction const* insn,
3025 JType src_jty,
3026 JType dest_jty) {
Logan Chien12dc1752011-12-27 18:10:15 +08003027
3028 Instruction::DecodedInstruction dec_insn(insn);
3029
3030 DCHECK(src_jty == kFloat || src_jty == kDouble) << src_jty;
3031 DCHECK(dest_jty == kInt || dest_jty == kLong) << dest_jty;
3032
3033 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, src_jty, kAccurate);
3034 llvm::Type* dest_type = irb_.getJType(dest_jty, kAccurate);
3035 llvm::Value* dest_value = irb_.CreateFPToSI(src_value, dest_type);
3036 EmitStoreDalvikReg(dec_insn.vA_, dest_jty, kAccurate, dest_value);
3037
Logan Chien70f94b42011-12-27 17:49:11 +08003038 irb_.CreateBr(GetNextBasicBlock(dex_pc));
3039}
3040
3041
3042void MethodCompiler::EmitInsn_FExt(uint32_t dex_pc,
3043 Instruction const* insn) {
Logan Chienc56ded92011-12-27 18:10:57 +08003044
3045 Instruction::DecodedInstruction dec_insn(insn);
3046
3047 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, kFloat, kAccurate);
3048 llvm::Value* result_value = irb_.CreateFPExt(src_value, irb_.getJDoubleTy());
3049 EmitStoreDalvikReg(dec_insn.vA_, kDouble, kAccurate, result_value);
3050
Logan Chien70f94b42011-12-27 17:49:11 +08003051 irb_.CreateBr(GetNextBasicBlock(dex_pc));
3052}
3053
3054
3055void MethodCompiler::EmitInsn_FTrunc(uint32_t dex_pc,
3056 Instruction const* insn) {
Logan Chien927744f2011-12-27 18:11:52 +08003057
3058 Instruction::DecodedInstruction dec_insn(insn);
3059
3060 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, kDouble, kAccurate);
3061 llvm::Value* result_value = irb_.CreateFPTrunc(src_value, irb_.getJFloatTy());
3062 EmitStoreDalvikReg(dec_insn.vA_, kFloat, kAccurate, result_value);
3063
Logan Chien70f94b42011-12-27 17:49:11 +08003064 irb_.CreateBr(GetNextBasicBlock(dex_pc));
3065}
3066
3067
3068void MethodCompiler::EmitInsn_IntArithm(uint32_t dex_pc,
3069 Instruction const* insn,
3070 IntArithmKind arithm,
3071 JType op_jty,
3072 bool is_2addr) {
Logan Chienc3f7d962011-12-27 18:13:18 +08003073
3074 Instruction::DecodedInstruction dec_insn(insn);
3075
3076 DCHECK(op_jty == kInt || op_jty == kLong) << op_jty;
3077
3078 llvm::Value* src1_value;
3079 llvm::Value* src2_value;
3080
3081 if (is_2addr) {
3082 src1_value = EmitLoadDalvikReg(dec_insn.vA_, op_jty, kAccurate);
3083 src2_value = EmitLoadDalvikReg(dec_insn.vB_, op_jty, kAccurate);
3084 } else {
3085 src1_value = EmitLoadDalvikReg(dec_insn.vB_, op_jty, kAccurate);
3086 src2_value = EmitLoadDalvikReg(dec_insn.vC_, op_jty, kAccurate);
3087 }
3088
3089 llvm::Value* result_value =
3090 EmitIntArithmResultComputation(dex_pc, src1_value, src2_value,
3091 arithm, op_jty);
3092
3093 EmitStoreDalvikReg(dec_insn.vA_, op_jty, kAccurate, result_value);
3094
Logan Chien70f94b42011-12-27 17:49:11 +08003095 irb_.CreateBr(GetNextBasicBlock(dex_pc));
3096}
3097
3098
3099void MethodCompiler::EmitInsn_IntArithmImmediate(uint32_t dex_pc,
3100 Instruction const* insn,
3101 IntArithmKind arithm) {
Logan Chienc3f7d962011-12-27 18:13:18 +08003102
3103 Instruction::DecodedInstruction dec_insn(insn);
3104
3105 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, kInt, kAccurate);
3106
3107 llvm::Value* imm_value = irb_.getInt32(dec_insn.vC_);
3108
3109 llvm::Value* result_value =
3110 EmitIntArithmResultComputation(dex_pc, src_value, imm_value, arithm, kInt);
3111
3112 EmitStoreDalvikReg(dec_insn.vA_, kInt, kAccurate, result_value);
3113
Logan Chien70f94b42011-12-27 17:49:11 +08003114 irb_.CreateBr(GetNextBasicBlock(dex_pc));
3115}
3116
3117
Logan Chienc3f7d962011-12-27 18:13:18 +08003118llvm::Value*
3119MethodCompiler::EmitIntArithmResultComputation(uint32_t dex_pc,
3120 llvm::Value* lhs,
3121 llvm::Value* rhs,
3122 IntArithmKind arithm,
3123 JType op_jty) {
3124 DCHECK(op_jty == kInt || op_jty == kLong) << op_jty;
3125
3126 switch (arithm) {
3127 case kIntArithm_Add:
3128 return irb_.CreateAdd(lhs, rhs);
3129
3130 case kIntArithm_Sub:
3131 return irb_.CreateSub(lhs, rhs);
3132
3133 case kIntArithm_Mul:
3134 return irb_.CreateMul(lhs, rhs);
3135
3136 case kIntArithm_Div:
3137 EmitGuard_DivZeroException(dex_pc, rhs, op_jty);
3138 return irb_.CreateSDiv(lhs, rhs);
3139
3140 case kIntArithm_Rem:
3141 EmitGuard_DivZeroException(dex_pc, rhs, op_jty);
3142 return irb_.CreateSRem(lhs, rhs);
3143
3144 case kIntArithm_And:
3145 return irb_.CreateAnd(lhs, rhs);
3146
3147 case kIntArithm_Or:
3148 return irb_.CreateOr(lhs, rhs);
3149
3150 case kIntArithm_Xor:
3151 return irb_.CreateXor(lhs, rhs);
3152
3153 case kIntArithm_Shl:
3154 if (op_jty == kLong) {
3155 return irb_.CreateShl(lhs, irb_.CreateAnd(rhs, 0x3f));
3156 } else {
3157 return irb_.CreateShl(lhs, irb_.CreateAnd(rhs, 0x1f));
3158 }
3159
3160 case kIntArithm_Shr:
3161 if (op_jty == kLong) {
3162 return irb_.CreateAShr(lhs, irb_.CreateAnd(rhs, 0x3f));
3163 } else {
3164 return irb_.CreateAShr(lhs, irb_.CreateAnd(rhs, 0x1f));
3165 }
3166
3167 case kIntArithm_UShr:
3168 if (op_jty == kLong) {
3169 return irb_.CreateLShr(lhs, irb_.CreateAnd(rhs, 0x3f));
3170 } else {
3171 return irb_.CreateLShr(lhs, irb_.CreateAnd(rhs, 0x1f));
3172 }
3173
3174 default:
3175 LOG(FATAL) << "Unknown integer arithmetic kind: " << arithm;
3176 return NULL;
3177 }
3178}
3179
3180
Logan Chien70f94b42011-12-27 17:49:11 +08003181void MethodCompiler::EmitInsn_RSubImmediate(uint32_t dex_pc,
3182 Instruction const* insn) {
Logan Chien65c62d42011-12-27 18:14:18 +08003183
3184 Instruction::DecodedInstruction dec_insn(insn);
3185
3186 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, kInt, kAccurate);
3187 llvm::Value* imm_value = irb_.getInt32(dec_insn.vC_);
3188 llvm::Value* result_value = irb_.CreateSub(imm_value, src_value);
3189 EmitStoreDalvikReg(dec_insn.vA_, kInt, kAccurate, result_value);
3190
Logan Chien70f94b42011-12-27 17:49:11 +08003191 irb_.CreateBr(GetNextBasicBlock(dex_pc));
3192}
3193
3194
3195void MethodCompiler::EmitInsn_FPArithm(uint32_t dex_pc,
3196 Instruction const* insn,
3197 FPArithmKind arithm,
3198 JType op_jty,
3199 bool is_2addr) {
Logan Chien76e1c792011-12-27 18:15:01 +08003200
3201 Instruction::DecodedInstruction dec_insn(insn);
3202
3203 DCHECK(op_jty == kFloat || op_jty == kDouble) << op_jty;
3204
3205 llvm::Value* src1_value;
3206 llvm::Value* src2_value;
3207
3208 if (is_2addr) {
3209 src1_value = EmitLoadDalvikReg(dec_insn.vA_, op_jty, kAccurate);
3210 src2_value = EmitLoadDalvikReg(dec_insn.vB_, op_jty, kAccurate);
3211 } else {
3212 src1_value = EmitLoadDalvikReg(dec_insn.vB_, op_jty, kAccurate);
3213 src2_value = EmitLoadDalvikReg(dec_insn.vC_, op_jty, kAccurate);
3214 }
3215
3216 llvm::Value* result_value =
3217 EmitFPArithmResultComputation(dex_pc, src1_value, src2_value, arithm);
3218
3219 EmitStoreDalvikReg(dec_insn.vA_, op_jty, kAccurate, result_value);
3220
Logan Chien70f94b42011-12-27 17:49:11 +08003221 irb_.CreateBr(GetNextBasicBlock(dex_pc));
3222}
3223
3224
Logan Chien76e1c792011-12-27 18:15:01 +08003225llvm::Value*
3226MethodCompiler::EmitFPArithmResultComputation(uint32_t dex_pc,
3227 llvm::Value *lhs,
3228 llvm::Value *rhs,
3229 FPArithmKind arithm) {
3230 switch (arithm) {
3231 case kFPArithm_Add:
3232 return irb_.CreateFAdd(lhs, rhs);
3233
3234 case kFPArithm_Sub:
3235 return irb_.CreateFSub(lhs, rhs);
3236
3237 case kFPArithm_Mul:
3238 return irb_.CreateFMul(lhs, rhs);
3239
3240 case kFPArithm_Div:
3241 return irb_.CreateFDiv(lhs, rhs);
3242
3243 case kFPArithm_Rem:
3244 return irb_.CreateFRem(lhs, rhs);
3245
3246 default:
3247 LOG(FATAL) << "Unknown floating-point arithmetic kind: " << arithm;
3248 return NULL;
3249 }
3250}
3251
3252
Logan Chienc3f7d962011-12-27 18:13:18 +08003253void MethodCompiler::EmitGuard_DivZeroException(uint32_t dex_pc,
3254 llvm::Value* denominator,
3255 JType op_jty) {
3256 DCHECK(op_jty == kInt || op_jty == kLong) << op_jty;
3257
3258 llvm::Constant* zero = irb_.getJZero(op_jty);
3259
3260 llvm::Value* equal_zero = irb_.CreateICmpEQ(denominator, zero);
3261
3262 llvm::BasicBlock* block_exception = CreateBasicBlockWithDexPC(dex_pc, "div0");
3263
3264 llvm::BasicBlock* block_continue = CreateBasicBlockWithDexPC(dex_pc, "cont");
3265
3266 irb_.CreateCondBr(equal_zero, block_exception, block_continue);
3267
3268 irb_.SetInsertPoint(block_exception);
3269 irb_.CreateCall(irb_.GetRuntime(ThrowDivZeroException));
3270 EmitBranchExceptionLandingPad(dex_pc);
3271
3272 irb_.SetInsertPoint(block_continue);
3273}
3274
3275
Logan Chien46fbb412012-02-15 22:29:08 +08003276llvm::Value* MethodCompiler::EmitLoadClassObjectAddr(llvm::Value* this_addr) {
3277 llvm::Constant* class_field_offset_value =
3278 irb_.getPtrEquivInt(Object::ClassOffset().Int32Value());
3279
3280 llvm::Value* class_field_addr =
3281 irb_.CreatePtrDisp(this_addr, class_field_offset_value,
3282 irb_.getJObjectTy()->getPointerTo());
3283
3284 return irb_.CreateLoad(class_field_addr);
3285}
3286
3287
3288llvm::Value*
3289MethodCompiler::EmitLoadVTableAddr(llvm::Value* class_object_addr) {
3290 llvm::Constant* vtable_offset_value =
3291 irb_.getPtrEquivInt(Class::VTableOffset().Int32Value());
3292
3293 llvm::Value* vtable_field_addr =
3294 irb_.CreatePtrDisp(class_object_addr, vtable_offset_value,
3295 irb_.getJObjectTy()->getPointerTo());
3296
3297 return irb_.CreateLoad(vtable_field_addr);
3298}
3299
3300
3301llvm::Value* MethodCompiler::
3302EmitLoadMethodObjectAddrFromVTable(llvm::Value* vtable_addr,
3303 uint16_t vtable_index) {
3304 llvm::Value* vtable_index_value =
3305 irb_.getPtrEquivInt(static_cast<uint64_t>(vtable_index));
3306
3307 llvm::Value* method_field_addr =
3308 EmitArrayGEP(vtable_addr, vtable_index_value, irb_.getJObjectTy());
3309
3310 return irb_.CreateLoad(method_field_addr);
3311}
3312
3313
3314llvm::Value* MethodCompiler::EmitLoadCodeAddr(llvm::Value* method_object_addr,
3315 uint32_t method_idx,
3316 bool is_static) {
3317
3318 llvm::Value* code_field_offset_value =
3319 irb_.getPtrEquivInt(Method::GetCodeOffset().Int32Value());
3320
3321 llvm::FunctionType* method_type = GetFunctionType(method_idx, is_static);
3322
3323 llvm::Value* code_field_addr =
3324 irb_.CreatePtrDisp(method_object_addr, code_field_offset_value,
3325 method_type->getPointerTo()->getPointerTo());
3326
3327 return irb_.CreateLoad(code_field_addr);
3328}
3329
3330
Logan Chien61bb6142012-02-03 15:34:53 +08003331void MethodCompiler::EmitGuard_NullPointerException(uint32_t dex_pc,
3332 llvm::Value* object) {
3333 llvm::Value* equal_null = irb_.CreateICmpEQ(object, irb_.getJNull());
3334
3335 llvm::BasicBlock* block_exception =
3336 CreateBasicBlockWithDexPC(dex_pc, "nullp");
3337
3338 llvm::BasicBlock* block_continue =
3339 CreateBasicBlockWithDexPC(dex_pc, "cont");
3340
3341 irb_.CreateCondBr(equal_null, block_exception, block_continue);
3342
3343 irb_.SetInsertPoint(block_exception);
3344 irb_.CreateCall(irb_.GetRuntime(ThrowNullPointerException));
3345 EmitBranchExceptionLandingPad(dex_pc);
3346
3347 irb_.SetInsertPoint(block_continue);
3348}
3349
3350
Logan Chienbb4d12a2012-02-17 14:10:01 +08003351llvm::Value* MethodCompiler::EmitLoadDexCacheAddr(MemberOffset offset) {
3352 llvm::Value* method_object_addr = EmitLoadMethodObjectAddr();
3353
3354 llvm::Value* dex_cache_offset_value =
3355 irb_.getPtrEquivInt(offset.Int32Value());
3356
3357 llvm::Value* dex_cache_field_addr =
3358 irb_.CreatePtrDisp(method_object_addr, dex_cache_offset_value,
3359 irb_.getJObjectTy()->getPointerTo());
3360
3361 return irb_.CreateLoad(dex_cache_field_addr);
3362}
3363
3364
3365void MethodCompiler::
3366EmitLoadDexCacheCodeAndDirectMethodFieldAddr(llvm::Value*& code_field_addr,
3367 llvm::Value*& method_field_addr,
3368 uint32_t method_idx) {
3369 llvm::Value* cadms_dex_cache_addr =
3370 EmitLoadDexCacheAddr(Method::GetDexCacheCodeAndDirectMethodsOffset());
3371
3372 llvm::Value* code_index_value =
3373 irb_.getPtrEquivInt(CodeAndDirectMethods::CodeIndex(method_idx));
3374
3375 llvm::Value* method_index_value =
3376 irb_.getPtrEquivInt(CodeAndDirectMethods::MethodIndex(method_idx));
3377
3378 // Return the field address
3379 code_field_addr = EmitArrayGEP(cadms_dex_cache_addr, code_index_value,
3380 irb_.getJIntTy());
3381
3382 method_field_addr = EmitArrayGEP(cadms_dex_cache_addr, method_index_value,
3383 irb_.getJIntTy());
3384}
3385
3386
3387llvm::Value* MethodCompiler::
3388EmitLoadDexCacheStaticStorageFieldAddr(uint32_t type_idx) {
3389 llvm::Value* static_storage_dex_cache_addr =
3390 EmitLoadDexCacheAddr(Method::DexCacheInitializedStaticStorageOffset());
3391
3392 llvm::Value* type_idx_value = irb_.getPtrEquivInt(type_idx);
3393
3394 return EmitArrayGEP(static_storage_dex_cache_addr, type_idx_value,
3395 irb_.getJObjectTy());
3396}
3397
3398
3399llvm::Value* MethodCompiler::
3400EmitLoadDexCacheResolvedTypeFieldAddr(uint32_t type_idx) {
3401 llvm::Value* resolved_type_dex_cache_addr =
3402 EmitLoadDexCacheAddr(Method::DexCacheResolvedTypesOffset());
3403
3404 llvm::Value* type_idx_value = irb_.getPtrEquivInt(type_idx);
3405
3406 return EmitArrayGEP(resolved_type_dex_cache_addr, type_idx_value,
3407 irb_.getJObjectTy());
3408}
3409
3410
3411llvm::Value* MethodCompiler::
3412EmitLoadDexCacheStringFieldAddr(uint32_t string_idx) {
3413 llvm::Value* string_dex_cache_addr =
3414 EmitLoadDexCacheAddr(Method::DexCacheStringsOffset());
3415
3416 llvm::Value* string_idx_value = irb_.getPtrEquivInt(string_idx);
3417
3418 return EmitArrayGEP(string_dex_cache_addr, string_idx_value,
3419 irb_.getJObjectTy());
3420}
3421
3422
Logan Chien83426162011-12-09 09:29:50 +08003423CompiledMethod *MethodCompiler::Compile() {
Logan Chien0b827102011-12-20 19:46:14 +08003424 // Code generation
3425 CreateFunction();
3426
3427 EmitPrologue();
3428 EmitInstructions();
Logan Chienc670a8d2011-12-20 21:25:56 +08003429 EmitPrologueLastBranch();
Logan Chien0b827102011-12-20 19:46:14 +08003430
Logan Chiend6c239a2011-12-23 15:11:45 +08003431 // Verify the generated bitcode
3432 llvm::verifyFunction(*func_, llvm::PrintMessageAction);
3433
Logan Chien0b827102011-12-20 19:46:14 +08003434 // Delete the inferred register category map (won't be used anymore)
3435 method_->ResetInferredRegCategoryMap();
3436
3437 return new CompiledMethod(insn_set_, func_);
3438}
3439
3440
3441llvm::Value* MethodCompiler::EmitLoadMethodObjectAddr() {
3442 return func_->arg_begin();
Shih-wei Liaod1fec812012-02-13 09:51:10 -08003443}
Logan Chien83426162011-12-09 09:29:50 +08003444
3445
Logan Chien5bcc04e2012-01-30 14:15:12 +08003446void MethodCompiler::EmitBranchExceptionLandingPad(uint32_t dex_pc) {
3447 if (llvm::BasicBlock* lpad = GetLandingPadBasicBlock(dex_pc)) {
3448 irb_.CreateBr(lpad);
3449 } else {
3450 irb_.CreateBr(GetUnwindBasicBlock());
3451 }
3452}
3453
3454
3455void MethodCompiler::EmitGuard_ExceptionLandingPad(uint32_t dex_pc) {
3456 llvm::Value* exception_pending =
3457 irb_.CreateCall(irb_.GetRuntime(IsExceptionPending));
3458
3459 llvm::BasicBlock* block_cont = CreateBasicBlockWithDexPC(dex_pc, "cont");
3460
3461 if (llvm::BasicBlock* lpad = GetLandingPadBasicBlock(dex_pc)) {
3462 irb_.CreateCondBr(exception_pending, lpad, block_cont);
3463 } else {
3464 irb_.CreateCondBr(exception_pending, GetUnwindBasicBlock(), block_cont);
3465 }
3466
3467 irb_.SetInsertPoint(block_cont);
3468}
3469
3470
Logan Chien924072f2012-01-30 15:07:24 +08003471void MethodCompiler::EmitGuard_GarbageCollectionSuspend(uint32_t dex_pc) {
3472 llvm::Value* runtime_func = irb_.GetRuntime(TestSuspend);
3473 irb_.CreateCall(runtime_func);
3474
3475 EmitGuard_ExceptionLandingPad(dex_pc);
3476}
3477
3478
Logan Chiend6c239a2011-12-23 15:11:45 +08003479llvm::BasicBlock* MethodCompiler::
3480CreateBasicBlockWithDexPC(uint32_t dex_pc, char const* postfix) {
3481 std::string name;
3482
3483 if (postfix) {
3484 StringAppendF(&name, "B%u.%s", dex_pc, postfix);
3485 } else {
3486 StringAppendF(&name, "B%u", dex_pc);
3487 }
3488
3489 return llvm::BasicBlock::Create(*context_, name, func_);
3490}
3491
3492
3493llvm::BasicBlock* MethodCompiler::GetBasicBlock(uint32_t dex_pc) {
3494 DCHECK(dex_pc < code_item_->insns_size_in_code_units_);
3495
3496 llvm::BasicBlock* basic_block = basic_blocks_[dex_pc];
3497
3498 if (!basic_block) {
3499 basic_block = CreateBasicBlockWithDexPC(dex_pc);
3500 basic_blocks_[dex_pc] = basic_block;
3501 }
3502
3503 return basic_block;
3504}
3505
3506
3507llvm::BasicBlock*
3508MethodCompiler::GetNextBasicBlock(uint32_t dex_pc) {
3509 Instruction const* insn = Instruction::At(code_item_->insns_ + dex_pc);
3510 return GetBasicBlock(dex_pc + insn->SizeInCodeUnits());
3511}
3512
3513
Logan Chien5bcc04e2012-01-30 14:15:12 +08003514int32_t MethodCompiler::GetTryItemOffset(uint32_t dex_pc) {
3515 // TODO: Since we are emitting the dex instructions in ascending order
3516 // w.r.t. address, we can cache the lastest try item offset so that we
3517 // don't have to do binary search for every query.
3518
3519 int32_t min = 0;
3520 int32_t max = code_item_->tries_size_ - 1;
3521
3522 while (min <= max) {
3523 int32_t mid = min + (max - min) / 2;
3524
3525 DexFile::TryItem const* ti = DexFile::GetTryItems(*code_item_, mid);
3526 uint32_t start = ti->start_addr_;
3527 uint32_t end = start + ti->insn_count_;
3528
3529 if (dex_pc < start) {
3530 max = mid - 1;
3531 } else if (dex_pc >= end) {
3532 min = mid + 1;
3533 } else {
3534 return mid; // found
3535 }
3536 }
3537
3538 return -1; // not found
3539}
3540
3541
3542llvm::BasicBlock* MethodCompiler::GetLandingPadBasicBlock(uint32_t dex_pc) {
3543 // Find the try item for this address in this method
3544 int32_t ti_offset = GetTryItemOffset(dex_pc);
3545
3546 if (ti_offset == -1) {
3547 return NULL; // No landing pad is available for this address.
3548 }
3549
3550 // Check for the existing landing pad basic block
3551 DCHECK_GT(basic_block_landing_pads_.size(), static_cast<size_t>(ti_offset));
3552 llvm::BasicBlock* block_lpad = basic_block_landing_pads_[ti_offset];
3553
3554 if (block_lpad) {
3555 // We have generated landing pad for this try item already. Return the
3556 // same basic block.
3557 return block_lpad;
3558 }
3559
3560 // Get try item from code item
3561 DexFile::TryItem const* ti = DexFile::GetTryItems(*code_item_, ti_offset);
3562
3563 // Create landing pad basic block
3564 block_lpad = llvm::BasicBlock::Create(*context_,
3565 StringPrintf("lpad%d", ti_offset),
3566 func_);
3567
3568 // Change IRBuilder insert point
3569 llvm::IRBuilderBase::InsertPoint irb_ip_original = irb_.saveIP();
3570 irb_.SetInsertPoint(block_lpad);
3571
3572 // Find catch block with matching type
3573 llvm::Value* method_object_addr = EmitLoadMethodObjectAddr();
3574
3575 // TODO: Maybe passing try item offset will be a better idea? For now,
3576 // we are passing dex_pc, so that we can use existing runtime support
3577 // function directly. However, in the runtime supporting function we
3578 // have to search for try item with binary search which can be
3579 // eliminated.
3580 llvm::Value* dex_pc_value = irb_.getInt32(ti->start_addr_);
3581
3582 llvm::Value* catch_handler_index_value =
3583 irb_.CreateCall2(irb_.GetRuntime(FindCatchBlock),
3584 method_object_addr, dex_pc_value);
3585
3586 // Switch instruction (Go to unwind basic block by default)
3587 llvm::SwitchInst* sw =
3588 irb_.CreateSwitch(catch_handler_index_value, GetUnwindBasicBlock());
3589
3590 // Cases with matched catch block
3591 CatchHandlerIterator iter(*code_item_, ti->start_addr_);
3592
3593 for (uint32_t c = 0; iter.HasNext(); iter.Next(), ++c) {
3594 sw->addCase(irb_.getInt32(c), GetBasicBlock(iter.GetHandlerAddress()));
3595 }
3596
3597 // Restore the orignal insert point for IRBuilder
3598 irb_.restoreIP(irb_ip_original);
3599
3600 // Cache this landing pad
3601 DCHECK_GT(basic_block_landing_pads_.size(), static_cast<size_t>(ti_offset));
3602 basic_block_landing_pads_[ti_offset] = block_lpad;
3603
3604 return block_lpad;
3605}
3606
3607
3608llvm::BasicBlock* MethodCompiler::GetUnwindBasicBlock() {
3609 // Check the existing unwinding baisc block block
3610 if (basic_block_unwind_ != NULL) {
3611 return basic_block_unwind_;
3612 }
3613
3614 // Create new basic block for unwinding
3615 basic_block_unwind_ =
3616 llvm::BasicBlock::Create(*context_, "exception_unwind", func_);
3617
3618 // Change IRBuilder insert point
3619 llvm::IRBuilderBase::InsertPoint irb_ip_original = irb_.saveIP();
3620 irb_.SetInsertPoint(basic_block_unwind_);
3621
3622 // Emit the code to return default value (zero) for the given return type.
3623 char ret_shorty = method_helper_.GetShorty()[0];
3624 if (ret_shorty == 'V') {
3625 irb_.CreateRetVoid();
3626 } else {
3627 irb_.CreateRet(irb_.getJZero(ret_shorty));
3628 }
3629
3630 // Restore the orignal insert point for IRBuilder
3631 irb_.restoreIP(irb_ip_original);
3632
3633 return basic_block_unwind_;
3634}
3635
3636
Logan Chienc670a8d2011-12-20 21:25:56 +08003637llvm::Value* MethodCompiler::AllocDalvikLocalVarReg(RegCategory cat,
3638 uint32_t reg_idx) {
3639
3640 // Save current IR builder insert point
3641 llvm::IRBuilderBase::InsertPoint irb_ip_original = irb_.saveIP();
3642
3643 // Alloca
3644 llvm::Value* reg_addr = NULL;
3645
3646 switch (cat) {
3647 case kRegCat1nr:
3648 irb_.SetInsertPoint(basic_block_reg_alloca_);
3649 reg_addr = irb_.CreateAlloca(irb_.getJIntTy(), 0,
3650 StringPrintf("r%u", reg_idx));
3651
3652 irb_.SetInsertPoint(basic_block_reg_zero_init_);
3653 irb_.CreateStore(irb_.getJInt(0), reg_addr);
3654 break;
3655
3656 case kRegCat2:
3657 irb_.SetInsertPoint(basic_block_reg_alloca_);
3658 reg_addr = irb_.CreateAlloca(irb_.getJLongTy(), 0,
3659 StringPrintf("w%u", reg_idx));
3660
3661 irb_.SetInsertPoint(basic_block_reg_zero_init_);
3662 irb_.CreateStore(irb_.getJLong(0), reg_addr);
3663 break;
3664
3665 case kRegObject:
3666 irb_.SetInsertPoint(basic_block_reg_alloca_);
3667 reg_addr = irb_.CreateAlloca(irb_.getJObjectTy(), 0,
3668 StringPrintf("p%u", reg_idx));
3669
3670 irb_.SetInsertPoint(basic_block_reg_zero_init_);
3671 irb_.CreateStore(irb_.getJNull(), reg_addr);
3672 break;
3673
3674 default:
3675 LOG(FATAL) << "Unknown register category for allocation: " << cat;
3676 }
3677
3678 // Restore IRBuilder insert point
3679 irb_.restoreIP(irb_ip_original);
3680
3681 DCHECK_NE(reg_addr, static_cast<llvm::Value*>(NULL));
3682 return reg_addr;
3683}
3684
3685
3686llvm::Value* MethodCompiler::AllocDalvikRetValReg(RegCategory cat) {
3687 // Save current IR builder insert point
3688 llvm::IRBuilderBase::InsertPoint irb_ip_original = irb_.saveIP();
3689
3690 // Alloca
3691 llvm::Value* reg_addr = NULL;
3692
3693 switch (cat) {
3694 case kRegCat1nr:
3695 irb_.SetInsertPoint(basic_block_reg_alloca_);
3696 reg_addr = irb_.CreateAlloca(irb_.getJIntTy(), 0, "r_res");
3697 break;
3698
3699 case kRegCat2:
3700 irb_.SetInsertPoint(basic_block_reg_alloca_);
3701 reg_addr = irb_.CreateAlloca(irb_.getJLongTy(), 0, "w_res");
3702 break;
3703
3704 case kRegObject:
3705 irb_.SetInsertPoint(basic_block_reg_alloca_);
3706 reg_addr = irb_.CreateAlloca(irb_.getJObjectTy(), 0, "p_res");
3707 break;
3708
3709 default:
3710 LOG(FATAL) << "Unknown register category for allocation: " << cat;
3711 }
3712
3713 // Restore IRBuilder insert point
3714 irb_.restoreIP(irb_ip_original);
3715
3716 DCHECK_NE(reg_addr, static_cast<llvm::Value*>(NULL));
3717 return reg_addr;
3718}
3719
3720
Logan Chien83426162011-12-09 09:29:50 +08003721} // namespace compiler_llvm
3722} // namespace art