blob: 1912ad01bf8589b9a8ac3cc25f42c33be1ad4e3a [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>
36
Logan Chien83426162011-12-09 09:29:50 +080037namespace art {
38namespace compiler_llvm {
Shih-wei Liaod1fec812012-02-13 09:51:10 -080039
Logan Chien42e0e152012-01-13 15:42:36 +080040using namespace runtime_support;
41
Shih-wei Liaod1fec812012-02-13 09:51:10 -080042
Logan Chien83426162011-12-09 09:29:50 +080043MethodCompiler::MethodCompiler(InstructionSet insn_set,
44 Compiler* compiler,
45 ClassLinker* class_linker,
46 ClassLoader const* class_loader,
47 DexFile const* dex_file,
48 DexCache* dex_cache,
49 DexFile::CodeItem const* code_item,
Shih-wei Liaod1fec812012-02-13 09:51:10 -080050 uint32_t method_idx,
51 uint32_t access_flags)
52: insn_set_(insn_set),
53 compiler_(compiler), compiler_llvm_(compiler->GetCompilerLLVM()),
54 class_linker_(class_linker), class_loader_(class_loader),
55 dex_file_(dex_file), dex_cache_(dex_cache), code_item_(code_item),
56 method_(dex_cache->GetResolvedMethod(method_idx)),
57 method_helper_(method_), method_idx_(method_idx),
58 access_flags_(access_flags), module_(compiler_llvm_->GetModule()),
59 context_(compiler_llvm_->GetLLVMContext()),
Logan Chienc670a8d2011-12-20 21:25:56 +080060 irb_(*compiler_llvm_->GetIRBuilder()), func_(NULL), retval_reg_(NULL),
Logan Chiend6ececa2011-12-27 16:20:15 +080061 basic_block_reg_alloca_(NULL),
62 basic_block_reg_zero_init_(NULL), basic_block_reg_arg_init_(NULL),
Logan Chien5bcc04e2012-01-30 14:15:12 +080063 basic_blocks_(code_item->insns_size_in_code_units_),
64 basic_block_landing_pads_(code_item->tries_size_, NULL),
65 basic_block_unwind_(NULL), basic_block_unreachable_(NULL) {
Shih-wei Liaod1fec812012-02-13 09:51:10 -080066}
67
68
69MethodCompiler::~MethodCompiler() {
Logan Chienc670a8d2011-12-20 21:25:56 +080070 STLDeleteElements(&regs_);
Shih-wei Liaod1fec812012-02-13 09:51:10 -080071}
72
73
Logan Chien0b827102011-12-20 19:46:14 +080074void MethodCompiler::CreateFunction() {
75 // LLVM function name
76 std::string func_name(LLVMLongName(method_));
77
78 // Get function type
79 llvm::FunctionType* func_type =
80 GetFunctionType(method_idx_, method_->IsStatic());
81
82 // Create function
83 func_ = llvm::Function::Create(func_type, llvm::Function::ExternalLinkage,
84 func_name, module_);
85
86 // Set argument name
87 llvm::Function::arg_iterator arg_iter(func_->arg_begin());
88 llvm::Function::arg_iterator arg_end(func_->arg_end());
89
90 DCHECK_NE(arg_iter, arg_end);
91 arg_iter->setName("method");
92 ++arg_iter;
93
94 if (!method_->IsStatic()) {
95 DCHECK_NE(arg_iter, arg_end);
96 arg_iter->setName("this");
97 ++arg_iter;
98 }
99
100 for (unsigned i = 0; arg_iter != arg_end; ++i, ++arg_iter) {
101 arg_iter->setName(StringPrintf("a%u", i));
102 }
103}
104
105
106llvm::FunctionType* MethodCompiler::GetFunctionType(uint32_t method_idx,
107 bool is_static) {
108 // Get method signature
109 DexFile::MethodId const& method_id = dex_file_->GetMethodId(method_idx);
110
111 int32_t shorty_size;
112 char const* shorty = dex_file_->GetMethodShorty(method_id, &shorty_size);
113 CHECK_GE(shorty_size, 1);
114
115 // Get return type
116 llvm::Type* ret_type = irb_.getJType(shorty[0], kAccurate);
117
118 // Get argument type
119 std::vector<llvm::Type*> args_type;
120
121 args_type.push_back(irb_.getJObjectTy()); // method object pointer
122
123 if (!is_static) {
124 args_type.push_back(irb_.getJType('L', kAccurate)); // "this" object pointer
125 }
126
127 for (int32_t i = 1; i < shorty_size; ++i) {
128 args_type.push_back(irb_.getJType(shorty[i], kAccurate));
129 }
130
131 return llvm::FunctionType::get(ret_type, args_type, false);
132}
133
134
Shih-wei Liaod1fec812012-02-13 09:51:10 -0800135void MethodCompiler::EmitPrologue() {
Logan Chienc670a8d2011-12-20 21:25:56 +0800136 // Create basic blocks for prologue
137 basic_block_reg_alloca_ =
138 llvm::BasicBlock::Create(*context_, "prologue.alloca", func_);
139
140 basic_block_reg_zero_init_ =
141 llvm::BasicBlock::Create(*context_, "prologue.zeroinit", func_);
142
Logan Chiend6ececa2011-12-27 16:20:15 +0800143 basic_block_reg_arg_init_ =
144 llvm::BasicBlock::Create(*context_, "prologue.arginit", func_);
145
Logan Chienc670a8d2011-12-20 21:25:56 +0800146 // Create register array
147 for (uint16_t r = 0; r < code_item_->registers_size_; ++r) {
148 regs_.push_back(DalvikReg::CreateLocalVarReg(*this, r));
149 }
150
151 retval_reg_.reset(DalvikReg::CreateRetValReg(*this));
Logan Chiend6ececa2011-12-27 16:20:15 +0800152
153 // Store argument to dalvik register
154 irb_.SetInsertPoint(basic_block_reg_arg_init_);
155 EmitPrologueAssignArgRegister();
156
157 // Branch to start address
158 irb_.CreateBr(GetBasicBlock(0));
Logan Chienc670a8d2011-12-20 21:25:56 +0800159}
160
161
162void MethodCompiler::EmitPrologueLastBranch() {
163 irb_.SetInsertPoint(basic_block_reg_alloca_);
164 irb_.CreateBr(basic_block_reg_zero_init_);
165
166 irb_.SetInsertPoint(basic_block_reg_zero_init_);
Logan Chiend6ececa2011-12-27 16:20:15 +0800167 irb_.CreateBr(basic_block_reg_arg_init_);
168}
169
170
171void MethodCompiler::EmitPrologueAssignArgRegister() {
172 uint16_t arg_reg = code_item_->registers_size_ - code_item_->ins_size_;
173
174 llvm::Function::arg_iterator arg_iter(func_->arg_begin());
175 llvm::Function::arg_iterator arg_end(func_->arg_end());
176
177 char const* shorty = method_helper_.GetShorty();
178 int32_t shorty_size = method_helper_.GetShortyLength();
179 CHECK_LE(1, shorty_size);
180
181 ++arg_iter; // skip method object
182
183 if (!method_->IsStatic()) {
184 EmitStoreDalvikReg(arg_reg, kObject, kAccurate, arg_iter);
185 ++arg_iter;
186 ++arg_reg;
187 }
188
189 for (int32_t i = 1; i < shorty_size; ++i, ++arg_iter) {
190 EmitStoreDalvikReg(arg_reg, shorty[i], kAccurate, arg_iter);
191
192 ++arg_reg;
193 if (shorty[i] == 'J' || shorty[i] == 'D') {
194 // Wide types, such as long and double, are using a pair of registers
195 // to store the value, so we have to increase arg_reg again.
196 ++arg_reg;
197 }
198 }
199
200 DCHECK_EQ(arg_end, arg_iter);
Shih-wei Liaod1fec812012-02-13 09:51:10 -0800201}
202
203
Logan Chien83426162011-12-09 09:29:50 +0800204void MethodCompiler::EmitInstructions() {
Logan Chiend6c239a2011-12-23 15:11:45 +0800205 uint32_t dex_pc = 0;
206 while (dex_pc < code_item_->insns_size_in_code_units_) {
207 Instruction const* insn = Instruction::At(code_item_->insns_ + dex_pc);
208 EmitInstruction(dex_pc, insn);
209 dex_pc += insn->SizeInCodeUnits();
210 }
Shih-wei Liaod1fec812012-02-13 09:51:10 -0800211}
212
213
Logan Chien83426162011-12-09 09:29:50 +0800214void MethodCompiler::EmitInstruction(uint32_t dex_pc,
215 Instruction const* insn) {
Logan Chiend6c239a2011-12-23 15:11:45 +0800216
217 // Set the IRBuilder insertion point
218 irb_.SetInsertPoint(GetBasicBlock(dex_pc));
219
Logan Chien70f94b42011-12-27 17:49:11 +0800220#define ARGS dex_pc, insn
221
222 // Dispatch the instruction
223 switch (insn->Opcode()) {
224 case Instruction::NOP:
225 EmitInsn_Nop(ARGS);
226 break;
227
228 case Instruction::MOVE:
229 case Instruction::MOVE_FROM16:
230 case Instruction::MOVE_16:
231 EmitInsn_Move(ARGS, kInt);
232 break;
233
234 case Instruction::MOVE_WIDE:
235 case Instruction::MOVE_WIDE_FROM16:
236 case Instruction::MOVE_WIDE_16:
237 EmitInsn_Move(ARGS, kLong);
238 break;
239
240 case Instruction::MOVE_OBJECT:
241 case Instruction::MOVE_OBJECT_FROM16:
242 case Instruction::MOVE_OBJECT_16:
243 EmitInsn_Move(ARGS, kObject);
244 break;
245
246 case Instruction::MOVE_RESULT:
247 EmitInsn_MoveResult(ARGS, kInt);
248 break;
249
250 case Instruction::MOVE_RESULT_WIDE:
251 EmitInsn_MoveResult(ARGS, kLong);
252 break;
253
254 case Instruction::MOVE_RESULT_OBJECT:
255 EmitInsn_MoveResult(ARGS, kObject);
256 break;
257
258 case Instruction::MOVE_EXCEPTION:
259 EmitInsn_MoveException(ARGS);
260 break;
261
262 case Instruction::RETURN_VOID:
263 EmitInsn_ReturnVoid(ARGS);
264 break;
265
266 case Instruction::RETURN:
267 case Instruction::RETURN_WIDE:
268 case Instruction::RETURN_OBJECT:
269 EmitInsn_Return(ARGS);
270 break;
271
272 case Instruction::CONST_4:
273 case Instruction::CONST_16:
274 case Instruction::CONST:
275 case Instruction::CONST_HIGH16:
276 EmitInsn_LoadConstant(ARGS, kInt);
277 break;
278
279 case Instruction::CONST_WIDE_16:
280 case Instruction::CONST_WIDE_32:
281 case Instruction::CONST_WIDE:
282 case Instruction::CONST_WIDE_HIGH16:
283 EmitInsn_LoadConstant(ARGS, kLong);
284 break;
285
286 case Instruction::CONST_STRING:
287 case Instruction::CONST_STRING_JUMBO:
288 EmitInsn_LoadConstantString(ARGS);
289 break;
290
291 case Instruction::CONST_CLASS:
292 EmitInsn_LoadConstantClass(ARGS);
293 break;
294
295 case Instruction::MONITOR_ENTER:
296 EmitInsn_MonitorEnter(ARGS);
297 break;
298
299 case Instruction::MONITOR_EXIT:
300 EmitInsn_MonitorExit(ARGS);
301 break;
302
303 case Instruction::CHECK_CAST:
304 EmitInsn_CheckCast(ARGS);
305 break;
306
307 case Instruction::INSTANCE_OF:
308 EmitInsn_InstanceOf(ARGS);
309 break;
310
311 case Instruction::ARRAY_LENGTH:
312 EmitInsn_ArrayLength(ARGS);
313 break;
314
315 case Instruction::NEW_INSTANCE:
316 EmitInsn_NewInstance(ARGS);
317 break;
318
319 case Instruction::NEW_ARRAY:
320 EmitInsn_NewArray(ARGS);
321 break;
322
323 case Instruction::FILLED_NEW_ARRAY:
324 EmitInsn_FilledNewArray(ARGS, false);
325 break;
326
327 case Instruction::FILLED_NEW_ARRAY_RANGE:
328 EmitInsn_FilledNewArray(ARGS, true);
329 break;
330
331 case Instruction::FILL_ARRAY_DATA:
332 EmitInsn_FillArrayData(ARGS);
333 break;
334
335 case Instruction::THROW:
336 EmitInsn_ThrowException(ARGS);
337 break;
338
339 case Instruction::GOTO:
340 case Instruction::GOTO_16:
341 case Instruction::GOTO_32:
342 EmitInsn_UnconditionalBranch(ARGS);
343 break;
344
345 case Instruction::PACKED_SWITCH:
346 EmitInsn_PackedSwitch(ARGS);
347 break;
348
349 case Instruction::SPARSE_SWITCH:
350 EmitInsn_SparseSwitch(ARGS);
351 break;
352
353 case Instruction::CMPL_FLOAT:
354 EmitInsn_FPCompare(ARGS, kFloat, false);
355 break;
356
357 case Instruction::CMPG_FLOAT:
358 EmitInsn_FPCompare(ARGS, kFloat, true);
359 break;
360
361 case Instruction::CMPL_DOUBLE:
362 EmitInsn_FPCompare(ARGS, kDouble, false);
363 break;
364
365 case Instruction::CMPG_DOUBLE:
366 EmitInsn_FPCompare(ARGS, kDouble, true);
367 break;
368
369 case Instruction::CMP_LONG:
370 EmitInsn_LongCompare(ARGS);
371 break;
372
373 case Instruction::IF_EQ:
374 EmitInsn_BinaryConditionalBranch(ARGS, kCondBranch_EQ);
375 break;
376
377 case Instruction::IF_NE:
378 EmitInsn_BinaryConditionalBranch(ARGS, kCondBranch_NE);
379 break;
380
381 case Instruction::IF_LT:
382 EmitInsn_BinaryConditionalBranch(ARGS, kCondBranch_LT);
383 break;
384
385 case Instruction::IF_GE:
386 EmitInsn_BinaryConditionalBranch(ARGS, kCondBranch_GE);
387 break;
388
389 case Instruction::IF_GT:
390 EmitInsn_BinaryConditionalBranch(ARGS, kCondBranch_GT);
391 break;
392
393 case Instruction::IF_LE:
394 EmitInsn_BinaryConditionalBranch(ARGS, kCondBranch_LE);
395 break;
396
397 case Instruction::IF_EQZ:
398 EmitInsn_UnaryConditionalBranch(ARGS, kCondBranch_EQ);
399 break;
400
401 case Instruction::IF_NEZ:
402 EmitInsn_UnaryConditionalBranch(ARGS, kCondBranch_NE);
403 break;
404
405 case Instruction::IF_LTZ:
406 EmitInsn_UnaryConditionalBranch(ARGS, kCondBranch_LT);
407 break;
408
409 case Instruction::IF_GEZ:
410 EmitInsn_UnaryConditionalBranch(ARGS, kCondBranch_GE);
411 break;
412
413 case Instruction::IF_GTZ:
414 EmitInsn_UnaryConditionalBranch(ARGS, kCondBranch_GT);
415 break;
416
417 case Instruction::IF_LEZ:
418 EmitInsn_UnaryConditionalBranch(ARGS, kCondBranch_LE);
419 break;
420
421 case Instruction::AGET:
422 EmitInsn_AGet(ARGS, kInt);
423 break;
424
425 case Instruction::AGET_WIDE:
426 EmitInsn_AGet(ARGS, kLong);
427 break;
428
429 case Instruction::AGET_OBJECT:
430 EmitInsn_AGet(ARGS, kObject);
431 break;
432
433 case Instruction::AGET_BOOLEAN:
434 EmitInsn_AGet(ARGS, kBoolean);
435 break;
436
437 case Instruction::AGET_BYTE:
438 EmitInsn_AGet(ARGS, kByte);
439 break;
440
441 case Instruction::AGET_CHAR:
442 EmitInsn_AGet(ARGS, kChar);
443 break;
444
445 case Instruction::AGET_SHORT:
446 EmitInsn_AGet(ARGS, kShort);
447 break;
448
449 case Instruction::APUT:
450 EmitInsn_APut(ARGS, kInt);
451 break;
452
453 case Instruction::APUT_WIDE:
454 EmitInsn_APut(ARGS, kLong);
455 break;
456
457 case Instruction::APUT_OBJECT:
458 EmitInsn_APut(ARGS, kObject);
459 break;
460
461 case Instruction::APUT_BOOLEAN:
462 EmitInsn_APut(ARGS, kBoolean);
463 break;
464
465 case Instruction::APUT_BYTE:
466 EmitInsn_APut(ARGS, kByte);
467 break;
468
469 case Instruction::APUT_CHAR:
470 EmitInsn_APut(ARGS, kChar);
471 break;
472
473 case Instruction::APUT_SHORT:
474 EmitInsn_APut(ARGS, kShort);
475 break;
476
477 case Instruction::IGET:
478 EmitInsn_IGet(ARGS, kInt);
479 break;
480
481 case Instruction::IGET_WIDE:
482 EmitInsn_IGet(ARGS, kLong);
483 break;
484
485 case Instruction::IGET_OBJECT:
486 EmitInsn_IGet(ARGS, kObject);
487 break;
488
489 case Instruction::IGET_BOOLEAN:
490 EmitInsn_IGet(ARGS, kBoolean);
491 break;
492
493 case Instruction::IGET_BYTE:
494 EmitInsn_IGet(ARGS, kByte);
495 break;
496
497 case Instruction::IGET_CHAR:
498 EmitInsn_IGet(ARGS, kChar);
499 break;
500
501 case Instruction::IGET_SHORT:
502 EmitInsn_IGet(ARGS, kShort);
503 break;
504
505 case Instruction::IPUT:
506 EmitInsn_IPut(ARGS, kInt);
507 break;
508
509 case Instruction::IPUT_WIDE:
510 EmitInsn_IPut(ARGS, kLong);
511 break;
512
513 case Instruction::IPUT_OBJECT:
514 EmitInsn_IPut(ARGS, kObject);
515 break;
516
517 case Instruction::IPUT_BOOLEAN:
518 EmitInsn_IPut(ARGS, kBoolean);
519 break;
520
521 case Instruction::IPUT_BYTE:
522 EmitInsn_IPut(ARGS, kByte);
523 break;
524
525 case Instruction::IPUT_CHAR:
526 EmitInsn_IPut(ARGS, kChar);
527 break;
528
529 case Instruction::IPUT_SHORT:
530 EmitInsn_IPut(ARGS, kShort);
531 break;
532
533 case Instruction::SGET:
534 EmitInsn_SGet(ARGS, kInt);
535 break;
536
537 case Instruction::SGET_WIDE:
538 EmitInsn_SGet(ARGS, kLong);
539 break;
540
541 case Instruction::SGET_OBJECT:
542 EmitInsn_SGet(ARGS, kObject);
543 break;
544
545 case Instruction::SGET_BOOLEAN:
546 EmitInsn_SGet(ARGS, kBoolean);
547 break;
548
549 case Instruction::SGET_BYTE:
550 EmitInsn_SGet(ARGS, kByte);
551 break;
552
553 case Instruction::SGET_CHAR:
554 EmitInsn_SGet(ARGS, kChar);
555 break;
556
557 case Instruction::SGET_SHORT:
558 EmitInsn_SGet(ARGS, kShort);
559 break;
560
561 case Instruction::SPUT:
562 EmitInsn_SPut(ARGS, kInt);
563 break;
564
565 case Instruction::SPUT_WIDE:
566 EmitInsn_SPut(ARGS, kLong);
567 break;
568
569 case Instruction::SPUT_OBJECT:
570 EmitInsn_SPut(ARGS, kObject);
571 break;
572
573 case Instruction::SPUT_BOOLEAN:
574 EmitInsn_SPut(ARGS, kBoolean);
575 break;
576
577 case Instruction::SPUT_BYTE:
578 EmitInsn_SPut(ARGS, kByte);
579 break;
580
581 case Instruction::SPUT_CHAR:
582 EmitInsn_SPut(ARGS, kChar);
583 break;
584
585 case Instruction::SPUT_SHORT:
586 EmitInsn_SPut(ARGS, kShort);
587 break;
588
589
590 case Instruction::INVOKE_VIRTUAL:
591 EmitInsn_InvokeVirtual(ARGS, false);
592 break;
593
594 case Instruction::INVOKE_SUPER:
595 EmitInsn_InvokeSuper(ARGS, false);
596 break;
597
598 case Instruction::INVOKE_DIRECT:
599 EmitInsn_InvokeDirect(ARGS, false);
600 break;
601
602 case Instruction::INVOKE_STATIC:
603 EmitInsn_InvokeStatic(ARGS, false);
604 break;
605
606 case Instruction::INVOKE_INTERFACE:
607 EmitInsn_InvokeInterface(ARGS, false);
608 break;
609
610 case Instruction::INVOKE_VIRTUAL_RANGE:
611 EmitInsn_InvokeVirtual(ARGS, true);
612 break;
613
614 case Instruction::INVOKE_SUPER_RANGE:
615 EmitInsn_InvokeSuper(ARGS, true);
616 break;
617
618 case Instruction::INVOKE_DIRECT_RANGE:
619 EmitInsn_InvokeDirect(ARGS, true);
620 break;
621
622 case Instruction::INVOKE_STATIC_RANGE:
623 EmitInsn_InvokeStatic(ARGS, true);
624 break;
625
626 case Instruction::INVOKE_INTERFACE_RANGE:
627 EmitInsn_InvokeInterface(ARGS, true);
628 break;
629
630 case Instruction::NEG_INT:
631 EmitInsn_Neg(ARGS, kInt);
632 break;
633
634 case Instruction::NOT_INT:
635 EmitInsn_Not(ARGS, kInt);
636 break;
637
638 case Instruction::NEG_LONG:
639 EmitInsn_Neg(ARGS, kLong);
640 break;
641
642 case Instruction::NOT_LONG:
643 EmitInsn_Not(ARGS, kLong);
644 break;
645
646 case Instruction::NEG_FLOAT:
647 EmitInsn_FNeg(ARGS, kFloat);
648 break;
649
650 case Instruction::NEG_DOUBLE:
651 EmitInsn_FNeg(ARGS, kDouble);
652 break;
653
654 case Instruction::INT_TO_LONG:
655 EmitInsn_SExt(ARGS);
656 break;
657
658 case Instruction::INT_TO_FLOAT:
659 EmitInsn_IntToFP(ARGS, kInt, kFloat);
660 break;
661
662 case Instruction::INT_TO_DOUBLE:
663 EmitInsn_IntToFP(ARGS, kInt, kDouble);
664 break;
665
666 case Instruction::LONG_TO_INT:
667 EmitInsn_Trunc(ARGS);
668 break;
669
670 case Instruction::LONG_TO_FLOAT:
671 EmitInsn_IntToFP(ARGS, kLong, kFloat);
672 break;
673
674 case Instruction::LONG_TO_DOUBLE:
675 EmitInsn_IntToFP(ARGS, kLong, kDouble);
676 break;
677
678 case Instruction::FLOAT_TO_INT:
679 EmitInsn_FPToInt(ARGS, kFloat, kInt);
680 break;
681
682 case Instruction::FLOAT_TO_LONG:
683 EmitInsn_FPToInt(ARGS, kFloat, kLong);
684 break;
685
686 case Instruction::FLOAT_TO_DOUBLE:
687 EmitInsn_FExt(ARGS);
688 break;
689
690 case Instruction::DOUBLE_TO_INT:
691 EmitInsn_FPToInt(ARGS, kDouble, kInt);
692 break;
693
694 case Instruction::DOUBLE_TO_LONG:
695 EmitInsn_FPToInt(ARGS, kDouble, kLong);
696 break;
697
698 case Instruction::DOUBLE_TO_FLOAT:
699 EmitInsn_FTrunc(ARGS);
700 break;
701
702 case Instruction::INT_TO_BYTE:
703 EmitInsn_TruncAndSExt(ARGS, 8);
704 break;
705
706 case Instruction::INT_TO_CHAR:
707 EmitInsn_TruncAndZExt(ARGS, 16);
708 break;
709
710 case Instruction::INT_TO_SHORT:
711 EmitInsn_TruncAndSExt(ARGS, 16);
712 break;
713
714 case Instruction::ADD_INT:
715 EmitInsn_IntArithm(ARGS, kIntArithm_Add, kInt, false);
716 break;
717
718 case Instruction::SUB_INT:
719 EmitInsn_IntArithm(ARGS, kIntArithm_Sub, kInt, false);
720 break;
721
722 case Instruction::MUL_INT:
723 EmitInsn_IntArithm(ARGS, kIntArithm_Mul, kInt, false);
724 break;
725
726 case Instruction::DIV_INT:
727 EmitInsn_IntArithm(ARGS, kIntArithm_Div, kInt, false);
728 break;
729
730 case Instruction::REM_INT:
731 EmitInsn_IntArithm(ARGS, kIntArithm_Rem, kInt, false);
732 break;
733
734 case Instruction::AND_INT:
735 EmitInsn_IntArithm(ARGS, kIntArithm_And, kInt, false);
736 break;
737
738 case Instruction::OR_INT:
739 EmitInsn_IntArithm(ARGS, kIntArithm_Or, kInt, false);
740 break;
741
742 case Instruction::XOR_INT:
743 EmitInsn_IntArithm(ARGS, kIntArithm_Xor, kInt, false);
744 break;
745
746 case Instruction::SHL_INT:
747 EmitInsn_IntArithm(ARGS, kIntArithm_Shl, kInt, false);
748 break;
749
750 case Instruction::SHR_INT:
751 EmitInsn_IntArithm(ARGS, kIntArithm_Shr, kInt, false);
752 break;
753
754 case Instruction::USHR_INT:
755 EmitInsn_IntArithm(ARGS, kIntArithm_UShr, kInt, false);
756 break;
757
758 case Instruction::ADD_LONG:
759 EmitInsn_IntArithm(ARGS, kIntArithm_Add, kLong, false);
760 break;
761
762 case Instruction::SUB_LONG:
763 EmitInsn_IntArithm(ARGS, kIntArithm_Sub, kLong, false);
764 break;
765
766 case Instruction::MUL_LONG:
767 EmitInsn_IntArithm(ARGS, kIntArithm_Mul, kLong, false);
768 break;
769
770 case Instruction::DIV_LONG:
771 EmitInsn_IntArithm(ARGS, kIntArithm_Div, kLong, false);
772 break;
773
774 case Instruction::REM_LONG:
775 EmitInsn_IntArithm(ARGS, kIntArithm_Rem, kLong, false);
776 break;
777
778 case Instruction::AND_LONG:
779 EmitInsn_IntArithm(ARGS, kIntArithm_And, kLong, false);
780 break;
781
782 case Instruction::OR_LONG:
783 EmitInsn_IntArithm(ARGS, kIntArithm_Or, kLong, false);
784 break;
785
786 case Instruction::XOR_LONG:
787 EmitInsn_IntArithm(ARGS, kIntArithm_Xor, kLong, false);
788 break;
789
790 case Instruction::SHL_LONG:
791 EmitInsn_IntArithm(ARGS, kIntArithm_Shl, kLong, false);
792 break;
793
794 case Instruction::SHR_LONG:
795 EmitInsn_IntArithm(ARGS, kIntArithm_Shr, kLong, false);
796 break;
797
798 case Instruction::USHR_LONG:
799 EmitInsn_IntArithm(ARGS, kIntArithm_UShr, kLong, false);
800 break;
801
802 case Instruction::ADD_FLOAT:
803 EmitInsn_FPArithm(ARGS, kFPArithm_Add, kFloat, false);
804 break;
805
806 case Instruction::SUB_FLOAT:
807 EmitInsn_FPArithm(ARGS, kFPArithm_Sub, kFloat, false);
808 break;
809
810 case Instruction::MUL_FLOAT:
811 EmitInsn_FPArithm(ARGS, kFPArithm_Mul, kFloat, false);
812 break;
813
814 case Instruction::DIV_FLOAT:
815 EmitInsn_FPArithm(ARGS, kFPArithm_Div, kFloat, false);
816 break;
817
818 case Instruction::REM_FLOAT:
819 EmitInsn_FPArithm(ARGS, kFPArithm_Rem, kFloat, false);
820 break;
821
822 case Instruction::ADD_DOUBLE:
823 EmitInsn_FPArithm(ARGS, kFPArithm_Add, kDouble, false);
824 break;
825
826 case Instruction::SUB_DOUBLE:
827 EmitInsn_FPArithm(ARGS, kFPArithm_Sub, kDouble, false);
828 break;
829
830 case Instruction::MUL_DOUBLE:
831 EmitInsn_FPArithm(ARGS, kFPArithm_Mul, kDouble, false);
832 break;
833
834 case Instruction::DIV_DOUBLE:
835 EmitInsn_FPArithm(ARGS, kFPArithm_Div, kDouble, false);
836 break;
837
838 case Instruction::REM_DOUBLE:
839 EmitInsn_FPArithm(ARGS, kFPArithm_Rem, kDouble, false);
840 break;
841
842 case Instruction::ADD_INT_2ADDR:
843 EmitInsn_IntArithm(ARGS, kIntArithm_Add, kInt, true);
844 break;
845
846 case Instruction::SUB_INT_2ADDR:
847 EmitInsn_IntArithm(ARGS, kIntArithm_Sub, kInt, true);
848 break;
849
850 case Instruction::MUL_INT_2ADDR:
851 EmitInsn_IntArithm(ARGS, kIntArithm_Mul, kInt, true);
852 break;
853
854 case Instruction::DIV_INT_2ADDR:
855 EmitInsn_IntArithm(ARGS, kIntArithm_Div, kInt, true);
856 break;
857
858 case Instruction::REM_INT_2ADDR:
859 EmitInsn_IntArithm(ARGS, kIntArithm_Rem, kInt, true);
860 break;
861
862 case Instruction::AND_INT_2ADDR:
863 EmitInsn_IntArithm(ARGS, kIntArithm_And, kInt, true);
864 break;
865
866 case Instruction::OR_INT_2ADDR:
867 EmitInsn_IntArithm(ARGS, kIntArithm_Or, kInt, true);
868 break;
869
870 case Instruction::XOR_INT_2ADDR:
871 EmitInsn_IntArithm(ARGS, kIntArithm_Xor, kInt, true);
872 break;
873
874 case Instruction::SHL_INT_2ADDR:
875 EmitInsn_IntArithm(ARGS, kIntArithm_Shl, kInt, true);
876 break;
877
878 case Instruction::SHR_INT_2ADDR:
879 EmitInsn_IntArithm(ARGS, kIntArithm_Shr, kInt, true);
880 break;
881
882 case Instruction::USHR_INT_2ADDR:
883 EmitInsn_IntArithm(ARGS, kIntArithm_UShr, kInt, true);
884 break;
885
886 case Instruction::ADD_LONG_2ADDR:
887 EmitInsn_IntArithm(ARGS, kIntArithm_Add, kLong, true);
888 break;
889
890 case Instruction::SUB_LONG_2ADDR:
891 EmitInsn_IntArithm(ARGS, kIntArithm_Sub, kLong, true);
892 break;
893
894 case Instruction::MUL_LONG_2ADDR:
895 EmitInsn_IntArithm(ARGS, kIntArithm_Mul, kLong, true);
896 break;
897
898 case Instruction::DIV_LONG_2ADDR:
899 EmitInsn_IntArithm(ARGS, kIntArithm_Div, kLong, true);
900 break;
901
902 case Instruction::REM_LONG_2ADDR:
903 EmitInsn_IntArithm(ARGS, kIntArithm_Rem, kLong, true);
904 break;
905
906 case Instruction::AND_LONG_2ADDR:
907 EmitInsn_IntArithm(ARGS, kIntArithm_And, kLong, true);
908 break;
909
910 case Instruction::OR_LONG_2ADDR:
911 EmitInsn_IntArithm(ARGS, kIntArithm_Or, kLong, true);
912 break;
913
914 case Instruction::XOR_LONG_2ADDR:
915 EmitInsn_IntArithm(ARGS, kIntArithm_Xor, kLong, true);
916 break;
917
918 case Instruction::SHL_LONG_2ADDR:
919 EmitInsn_IntArithm(ARGS, kIntArithm_Shl, kLong, true);
920 break;
921
922 case Instruction::SHR_LONG_2ADDR:
923 EmitInsn_IntArithm(ARGS, kIntArithm_Shr, kLong, true);
924 break;
925
926 case Instruction::USHR_LONG_2ADDR:
927 EmitInsn_IntArithm(ARGS, kIntArithm_UShr, kLong, true);
928 break;
929
930 case Instruction::ADD_FLOAT_2ADDR:
931 EmitInsn_FPArithm(ARGS, kFPArithm_Add, kFloat, true);
932 break;
933
934 case Instruction::SUB_FLOAT_2ADDR:
935 EmitInsn_FPArithm(ARGS, kFPArithm_Sub, kFloat, true);
936 break;
937
938 case Instruction::MUL_FLOAT_2ADDR:
939 EmitInsn_FPArithm(ARGS, kFPArithm_Mul, kFloat, true);
940 break;
941
942 case Instruction::DIV_FLOAT_2ADDR:
943 EmitInsn_FPArithm(ARGS, kFPArithm_Div, kFloat, true);
944 break;
945
946 case Instruction::REM_FLOAT_2ADDR:
947 EmitInsn_FPArithm(ARGS, kFPArithm_Rem, kFloat, true);
948 break;
949
950 case Instruction::ADD_DOUBLE_2ADDR:
951 EmitInsn_FPArithm(ARGS, kFPArithm_Add, kDouble, true);
952 break;
953
954 case Instruction::SUB_DOUBLE_2ADDR:
955 EmitInsn_FPArithm(ARGS, kFPArithm_Sub, kDouble, true);
956 break;
957
958 case Instruction::MUL_DOUBLE_2ADDR:
959 EmitInsn_FPArithm(ARGS, kFPArithm_Mul, kDouble, true);
960 break;
961
962 case Instruction::DIV_DOUBLE_2ADDR:
963 EmitInsn_FPArithm(ARGS, kFPArithm_Div, kDouble, true);
964 break;
965
966 case Instruction::REM_DOUBLE_2ADDR:
967 EmitInsn_FPArithm(ARGS, kFPArithm_Rem, kDouble, true);
968 break;
969
970 case Instruction::ADD_INT_LIT16:
971 case Instruction::ADD_INT_LIT8:
972 EmitInsn_IntArithmImmediate(ARGS, kIntArithm_Add);
973 break;
974
975 case Instruction::RSUB_INT:
976 case Instruction::RSUB_INT_LIT8:
977 EmitInsn_RSubImmediate(ARGS);
978 break;
979
980 case Instruction::MUL_INT_LIT16:
981 case Instruction::MUL_INT_LIT8:
982 EmitInsn_IntArithmImmediate(ARGS, kIntArithm_Mul);
983 break;
984
985 case Instruction::DIV_INT_LIT16:
986 case Instruction::DIV_INT_LIT8:
987 EmitInsn_IntArithmImmediate(ARGS, kIntArithm_Div);
988 break;
989
990 case Instruction::REM_INT_LIT16:
991 case Instruction::REM_INT_LIT8:
992 EmitInsn_IntArithmImmediate(ARGS, kIntArithm_Rem);
993 break;
994
995 case Instruction::AND_INT_LIT16:
996 case Instruction::AND_INT_LIT8:
997 EmitInsn_IntArithmImmediate(ARGS, kIntArithm_And);
998 break;
999
1000 case Instruction::OR_INT_LIT16:
1001 case Instruction::OR_INT_LIT8:
1002 EmitInsn_IntArithmImmediate(ARGS, kIntArithm_Or);
1003 break;
1004
1005 case Instruction::XOR_INT_LIT16:
1006 case Instruction::XOR_INT_LIT8:
1007 EmitInsn_IntArithmImmediate(ARGS, kIntArithm_Xor);
1008 break;
1009
1010 case Instruction::SHL_INT_LIT8:
1011 EmitInsn_IntArithmImmediate(ARGS, kIntArithm_Shl);
1012 break;
1013
1014 case Instruction::SHR_INT_LIT8:
1015 EmitInsn_IntArithmImmediate(ARGS, kIntArithm_Shr);
1016 break;
1017
1018 case Instruction::USHR_INT_LIT8:
1019 EmitInsn_IntArithmImmediate(ARGS, kIntArithm_UShr);
1020 break;
1021
1022 case Instruction::UNUSED_3E:
1023 case Instruction::UNUSED_3F:
1024 case Instruction::UNUSED_40:
1025 case Instruction::UNUSED_41:
1026 case Instruction::UNUSED_42:
1027 case Instruction::UNUSED_43:
1028 case Instruction::UNUSED_73:
1029 case Instruction::UNUSED_79:
1030 case Instruction::UNUSED_7A:
1031 case Instruction::UNUSED_E3:
1032 case Instruction::UNUSED_E4:
1033 case Instruction::UNUSED_E5:
1034 case Instruction::UNUSED_E6:
1035 case Instruction::UNUSED_E7:
1036 case Instruction::UNUSED_E8:
1037 case Instruction::UNUSED_E9:
1038 case Instruction::UNUSED_EA:
1039 case Instruction::UNUSED_EB:
1040 case Instruction::UNUSED_EC:
1041 case Instruction::THROW_VERIFICATION_ERROR:
1042 case Instruction::UNUSED_EE:
1043 case Instruction::UNUSED_EF:
1044 case Instruction::UNUSED_F0:
1045 case Instruction::UNUSED_F1:
1046 case Instruction::UNUSED_F2:
1047 case Instruction::UNUSED_F3:
1048 case Instruction::UNUSED_F4:
1049 case Instruction::UNUSED_F5:
1050 case Instruction::UNUSED_F6:
1051 case Instruction::UNUSED_F7:
1052 case Instruction::UNUSED_F8:
1053 case Instruction::UNUSED_F9:
1054 case Instruction::UNUSED_FA:
1055 case Instruction::UNUSED_FB:
1056 case Instruction::UNUSED_FC:
1057 case Instruction::UNUSED_FD:
1058 case Instruction::UNUSED_FE:
1059 case Instruction::UNUSED_FF:
1060 LOG(FATAL) << "Dex file contains UNUSED bytecode: " << insn->Opcode();
1061 break;
1062 }
1063
1064#undef ARGS
1065}
1066
1067
1068void MethodCompiler::EmitInsn_Nop(uint32_t dex_pc,
1069 Instruction const* insn) {
Logan Chiene09a6b72011-12-27 17:50:21 +08001070
1071 uint16_t insn_signature = code_item_->insns_[dex_pc];
1072
1073 if (insn_signature == Instruction::kPackedSwitchSignature ||
1074 insn_signature == Instruction::kSparseSwitchSignature ||
1075 insn_signature == Instruction::kArrayDataSignature) {
1076 irb_.CreateUnreachable();
1077 } else{
1078 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1079 }
Shih-wei Liaod1fec812012-02-13 09:51:10 -08001080}
1081
1082
Logan Chien70f94b42011-12-27 17:49:11 +08001083void MethodCompiler::EmitInsn_Move(uint32_t dex_pc,
1084 Instruction const* insn,
1085 JType jty) {
Logan Chien48173132011-12-27 17:51:13 +08001086
1087 Instruction::DecodedInstruction dec_insn(insn);
1088
1089 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, jty, kReg);
1090 EmitStoreDalvikReg(dec_insn.vA_, jty, kReg, src_value);
1091
Logan Chien70f94b42011-12-27 17:49:11 +08001092 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1093}
1094
1095
1096void MethodCompiler::EmitInsn_MoveResult(uint32_t dex_pc,
1097 Instruction const* insn,
1098 JType jty) {
Logan Chien48173132011-12-27 17:51:13 +08001099
1100 Instruction::DecodedInstruction dec_insn(insn);
1101
1102 llvm::Value* src_value = EmitLoadDalvikRetValReg(jty, kReg);
1103 EmitStoreDalvikReg(dec_insn.vA_, jty, kReg, src_value);
1104
Logan Chien70f94b42011-12-27 17:49:11 +08001105 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1106}
1107
1108
1109void MethodCompiler::EmitInsn_MoveException(uint32_t dex_pc,
1110 Instruction const* insn) {
Logan Chien3354cec2012-01-13 14:29:03 +08001111
1112 Instruction::DecodedInstruction dec_insn(insn);
1113
1114 // Get thread-local exception field address
1115 llvm::Constant* exception_field_offset =
1116 irb_.getPtrEquivInt(Thread::ExceptionOffset().Int32Value());
1117
1118 llvm::Value* thread_object_addr =
1119 irb_.CreateCall(irb_.GetRuntime(GetCurrentThread));
1120
1121 llvm::Value* exception_field_addr =
1122 irb_.CreatePtrDisp(thread_object_addr, exception_field_offset,
1123 irb_.getJObjectTy()->getPointerTo());
1124
1125 // Get exception object address
1126 llvm::Value* exception_object_addr = irb_.CreateLoad(exception_field_addr);
1127
1128 // Set thread-local exception field address to NULL
1129 irb_.CreateStore(irb_.getJNull(), exception_field_addr);
1130
1131 // Keep the exception object in the Dalvik register
1132 EmitStoreDalvikReg(dec_insn.vA_, kObject, kAccurate, exception_object_addr);
1133
Logan Chien70f94b42011-12-27 17:49:11 +08001134 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1135}
1136
1137
1138void MethodCompiler::EmitInsn_ThrowException(uint32_t dex_pc,
1139 Instruction const* insn) {
Logan Chien6c6f12d2012-01-13 19:26:27 +08001140
1141 Instruction::DecodedInstruction dec_insn(insn);
1142
1143 llvm::Value* exception_addr =
1144 EmitLoadDalvikReg(dec_insn.vA_, kObject, kAccurate);
1145
1146 irb_.CreateCall(irb_.GetRuntime(ThrowException), exception_addr);
1147
1148 EmitBranchExceptionLandingPad(dex_pc);
Logan Chien70f94b42011-12-27 17:49:11 +08001149}
1150
1151
1152void MethodCompiler::EmitInsn_ReturnVoid(uint32_t dex_pc,
1153 Instruction const* insn) {
Logan Chien8898a272011-12-27 17:51:56 +08001154 // Garbage collection safe-point
1155 EmitGuard_GarbageCollectionSuspend(dex_pc);
1156
1157 // Return!
1158 irb_.CreateRetVoid();
Logan Chien70f94b42011-12-27 17:49:11 +08001159}
1160
1161
1162void MethodCompiler::EmitInsn_Return(uint32_t dex_pc,
1163 Instruction const* insn) {
Logan Chien8898a272011-12-27 17:51:56 +08001164
1165 Instruction::DecodedInstruction dec_insn(insn);
1166
1167 // Garbage collection safe-point
1168 EmitGuard_GarbageCollectionSuspend(dex_pc);
1169
1170 // Return!
1171 char ret_shorty = method_helper_.GetShorty()[0];
1172 llvm::Value* retval = EmitLoadDalvikReg(dec_insn.vA_, ret_shorty, kAccurate);
1173
1174 irb_.CreateRet(retval);
Logan Chien70f94b42011-12-27 17:49:11 +08001175}
1176
1177
1178void MethodCompiler::EmitInsn_LoadConstant(uint32_t dex_pc,
1179 Instruction const* insn,
1180 JType imm_jty) {
Shih-wei Liao798366e2012-02-16 09:25:33 -08001181
1182 Instruction::DecodedInstruction dec_insn(insn);
1183
1184 DCHECK(imm_jty == kInt || imm_jty == kLong) << imm_jty;
1185
1186 int64_t imm = 0;
1187
1188 switch (insn->Opcode()) {
1189 // 32-bit Immediate
1190 case Instruction::CONST_4:
1191 case Instruction::CONST_16:
1192 case Instruction::CONST:
1193 case Instruction::CONST_WIDE_16:
1194 case Instruction::CONST_WIDE_32:
1195 imm = static_cast<int64_t>(static_cast<int32_t>(dec_insn.vB_));
1196 break;
1197
1198 case Instruction::CONST_HIGH16:
1199 imm = static_cast<int64_t>(static_cast<int32_t>(
1200 static_cast<uint32_t>(static_cast<uint16_t>(dec_insn.vB_)) << 16));
1201 break;
1202
1203 // 64-bit Immediate
1204 case Instruction::CONST_WIDE:
1205 imm = static_cast<int64_t>(dec_insn.vB_wide_);
1206 break;
1207
1208 case Instruction::CONST_WIDE_HIGH16:
1209 imm = static_cast<int64_t>(
1210 static_cast<uint64_t>(static_cast<uint16_t>(dec_insn.vB_)) << 48);
1211 break;
1212
1213 // Unknown opcode for load constant (unreachable)
1214 default:
1215 LOG(FATAL) << "Unknown opcode for load constant: " << insn->Opcode();
1216 break;
1217 }
1218
1219 // Store the non-object register
1220 llvm::Type* imm_type = irb_.getJType(imm_jty, kAccurate);
1221 llvm::Constant* imm_value = llvm::ConstantInt::getSigned(imm_type, imm);
1222 EmitStoreDalvikReg(dec_insn.vA_, imm_jty, kAccurate, imm_value);
1223
1224 // Store the object register if it is possible to be null.
1225 if (imm_jty == kInt && imm == 0) {
1226 EmitStoreDalvikReg(dec_insn.vA_, kObject, kAccurate, irb_.getJNull());
1227 }
1228
Logan Chien70f94b42011-12-27 17:49:11 +08001229 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1230}
1231
1232
1233void MethodCompiler::EmitInsn_LoadConstantString(uint32_t dex_pc,
1234 Instruction const* insn) {
1235 // UNIMPLEMENTED(WARNING);
1236 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1237}
1238
1239
Logan Chien27b30252012-01-14 03:43:35 +08001240llvm::Value* MethodCompiler::EmitLoadConstantClass(uint32_t dex_pc,
1241 uint32_t type_idx) {
1242 if (!compiler_->CanAccessTypeWithoutChecks(method_idx_, dex_cache_,
1243 *dex_file_, type_idx)) {
1244 llvm::Value* type_idx_value = irb_.getInt32(type_idx);
1245
1246 llvm::Value* method_object_addr = EmitLoadMethodObjectAddr();
1247
1248 llvm::Function* runtime_func =
1249 irb_.GetRuntime(InitializeTypeAndVerifyAccess);
1250
1251 llvm::Value* type_object_addr =
1252 irb_.CreateCall2(runtime_func, type_idx_value, method_object_addr);
1253
1254 EmitGuard_ExceptionLandingPad(dex_pc);
1255
1256 return type_object_addr;
1257
1258 } else {
1259 // Try to load the class (type) object from the test cache.
1260 llvm::Value* type_field_addr =
1261 EmitLoadDexCacheResolvedTypeFieldAddr(type_idx);
1262
1263 llvm::Value* type_object_addr = irb_.CreateLoad(type_field_addr);
1264
1265 if (compiler_->CanAssumeTypeIsPresentInDexCache(dex_cache_, type_idx)) {
1266 return type_object_addr;
1267 }
1268
1269 llvm::BasicBlock* block_original = irb_.GetInsertBlock();
1270
1271 // Test whether class (type) object is in the dex cache or not
1272 llvm::Value* equal_null =
1273 irb_.CreateICmpEQ(type_object_addr, irb_.getJNull());
1274
1275 llvm::BasicBlock* block_cont =
1276 CreateBasicBlockWithDexPC(dex_pc, "cont");
1277
1278 llvm::BasicBlock* block_load_class =
1279 CreateBasicBlockWithDexPC(dex_pc, "load_class");
1280
1281 irb_.CreateCondBr(equal_null, block_load_class, block_cont);
1282
1283 // Failback routine to load the class object
1284 irb_.SetInsertPoint(block_load_class);
1285
1286 llvm::Function* runtime_func = irb_.GetRuntime(InitializeType);
1287
1288 llvm::Constant* type_idx_value = irb_.getInt32(type_idx);
1289
1290 llvm::Value* method_object_addr = EmitLoadMethodObjectAddr();
1291
1292 llvm::Value* loaded_type_object_addr =
1293 irb_.CreateCall2(runtime_func, type_idx_value, method_object_addr);
1294
1295 EmitGuard_ExceptionLandingPad(dex_pc);
1296
1297 llvm::BasicBlock* block_after_load_class = irb_.GetInsertBlock();
1298
1299 irb_.CreateBr(block_cont);
1300
1301 // Now the class object must be loaded
1302 irb_.SetInsertPoint(block_cont);
1303
1304 llvm::PHINode* phi = irb_.CreatePHI(irb_.getJObjectTy(), 2);
1305
1306 phi->addIncoming(type_object_addr, block_original);
1307 phi->addIncoming(loaded_type_object_addr, block_after_load_class);
1308
1309 return phi;
1310 }
1311}
1312
1313
Logan Chien70f94b42011-12-27 17:49:11 +08001314void MethodCompiler::EmitInsn_LoadConstantClass(uint32_t dex_pc,
1315 Instruction const* insn) {
Logan Chien27b30252012-01-14 03:43:35 +08001316
1317 Instruction::DecodedInstruction dec_insn(insn);
1318
1319 llvm::Value* type_object_addr = EmitLoadConstantClass(dex_pc, dec_insn.vB_);
1320 EmitStoreDalvikReg(dec_insn.vA_, kObject, kAccurate, type_object_addr);
1321
Logan Chien70f94b42011-12-27 17:49:11 +08001322 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1323}
1324
1325
1326void MethodCompiler::EmitInsn_MonitorEnter(uint32_t dex_pc,
1327 Instruction const* insn) {
Logan Chien9e0dbe42012-01-13 12:11:37 +08001328
1329 Instruction::DecodedInstruction dec_insn(insn);
1330
1331 llvm::Value* object_addr =
1332 EmitLoadDalvikReg(dec_insn.vA_, kObject, kAccurate);
1333
1334 // TODO: Slow path always. May not need NullPointerException check.
1335 EmitGuard_NullPointerException(dex_pc, object_addr);
1336
1337 irb_.CreateCall(irb_.GetRuntime(LockObject), object_addr);
1338 EmitGuard_ExceptionLandingPad(dex_pc);
1339
Logan Chien70f94b42011-12-27 17:49:11 +08001340 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1341}
1342
1343
1344void MethodCompiler::EmitInsn_MonitorExit(uint32_t dex_pc,
1345 Instruction const* insn) {
Logan Chien9e0dbe42012-01-13 12:11:37 +08001346
1347 Instruction::DecodedInstruction dec_insn(insn);
1348
1349 llvm::Value* object_addr =
1350 EmitLoadDalvikReg(dec_insn.vA_, kObject, kAccurate);
1351
1352 EmitGuard_NullPointerException(dex_pc, object_addr);
1353
1354 irb_.CreateCall(irb_.GetRuntime(UnlockObject), object_addr);
1355 EmitGuard_ExceptionLandingPad(dex_pc);
1356
Logan Chien70f94b42011-12-27 17:49:11 +08001357 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1358}
1359
1360
1361void MethodCompiler::EmitInsn_CheckCast(uint32_t dex_pc,
1362 Instruction const* insn) {
Logan Chienfc880952012-01-15 23:53:10 +08001363
1364 Instruction::DecodedInstruction dec_insn(insn);
1365
1366 llvm::BasicBlock* block_test_class =
1367 CreateBasicBlockWithDexPC(dex_pc, "test_class");
1368
1369 llvm::BasicBlock* block_test_sub_class =
1370 CreateBasicBlockWithDexPC(dex_pc, "test_sub_class");
1371
1372 llvm::Value* object_addr =
1373 EmitLoadDalvikReg(dec_insn.vA_, kObject, kAccurate);
1374
1375 // Test: Is the reference equal to null? Act as no-op when it is null.
1376 llvm::Value* equal_null = irb_.CreateICmpEQ(object_addr, irb_.getJNull());
1377
1378 irb_.CreateCondBr(equal_null,
1379 GetNextBasicBlock(dex_pc),
1380 block_test_class);
1381
1382 // Test: Is the object instantiated from the given class?
1383 irb_.SetInsertPoint(block_test_class);
1384 llvm::Value* type_object_addr = EmitLoadConstantClass(dex_pc, dec_insn.vB_);
1385 DCHECK_EQ(Object::ClassOffset().Int32Value(), 0);
1386
1387 llvm::PointerType* jobject_ptr_ty = irb_.getJObjectTy();
1388
1389 llvm::Value* object_type_field_addr =
1390 irb_.CreateBitCast(object_addr, jobject_ptr_ty->getPointerTo());
1391
1392 llvm::Value* object_type_object_addr =
1393 irb_.CreateLoad(object_type_field_addr);
1394
1395 llvm::Value* equal_class =
1396 irb_.CreateICmpEQ(type_object_addr, object_type_object_addr);
1397
1398 irb_.CreateCondBr(equal_class,
1399 GetNextBasicBlock(dex_pc),
1400 block_test_sub_class);
1401
1402 // Test: Is the object instantiated from the subclass of the given class?
1403 irb_.SetInsertPoint(block_test_sub_class);
1404
1405 irb_.CreateCall2(irb_.GetRuntime(CheckCast),
1406 type_object_addr, object_type_object_addr);
1407
1408 EmitGuard_ExceptionLandingPad(dex_pc);
1409
Logan Chien70f94b42011-12-27 17:49:11 +08001410 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1411}
1412
1413
1414void MethodCompiler::EmitInsn_InstanceOf(uint32_t dex_pc,
1415 Instruction const* insn) {
Logan Chien68725e22012-01-15 22:25:34 +08001416
1417 Instruction::DecodedInstruction dec_insn(insn);
1418
1419 llvm::Constant* zero = irb_.getJInt(0);
1420 llvm::Constant* one = irb_.getJInt(1);
1421
1422 llvm::BasicBlock* block_nullp = CreateBasicBlockWithDexPC(dex_pc, "nullp");
1423
1424 llvm::BasicBlock* block_test_class =
1425 CreateBasicBlockWithDexPC(dex_pc, "test_class");
1426
1427 llvm::BasicBlock* block_class_equals =
1428 CreateBasicBlockWithDexPC(dex_pc, "class_eq");
1429
1430 llvm::BasicBlock* block_test_sub_class =
1431 CreateBasicBlockWithDexPC(dex_pc, "test_sub_class");
1432
1433 llvm::Value* object_addr =
1434 EmitLoadDalvikReg(dec_insn.vB_, kObject, kAccurate);
1435
1436 // Overview of the following code :
1437 // We check for null, if so, then false, otherwise check for class == . If so
1438 // then true, otherwise do callout slowpath.
1439 //
1440 // Test: Is the reference equal to null? Set 0 when it is null.
1441 llvm::Value* equal_null = irb_.CreateICmpEQ(object_addr, irb_.getJNull());
1442
1443 irb_.CreateCondBr(equal_null, block_nullp, block_test_class);
1444
1445 irb_.SetInsertPoint(block_nullp);
1446 EmitStoreDalvikReg(dec_insn.vA_, kInt, kAccurate, zero);
1447 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1448
1449 // Test: Is the object instantiated from the given class?
1450 irb_.SetInsertPoint(block_test_class);
1451 llvm::Value* type_object_addr = EmitLoadConstantClass(dex_pc, dec_insn.vC_);
1452 DCHECK_EQ(Object::ClassOffset().Int32Value(), 0);
1453
1454 llvm::PointerType* jobject_ptr_ty = irb_.getJObjectTy();
1455
1456 llvm::Value* object_type_field_addr =
1457 irb_.CreateBitCast(object_addr, jobject_ptr_ty->getPointerTo());
1458
1459 llvm::Value* object_type_object_addr =
1460 irb_.CreateLoad(object_type_field_addr);
1461
1462 llvm::Value* equal_class =
1463 irb_.CreateICmpEQ(type_object_addr, object_type_object_addr);
1464
1465 irb_.CreateCondBr(equal_class, block_class_equals, block_test_sub_class);
1466
1467 irb_.SetInsertPoint(block_class_equals);
1468 EmitStoreDalvikReg(dec_insn.vA_, kInt, kAccurate, one);
1469 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1470
1471 // Test: Is the object instantiated from the subclass of the given class?
1472 irb_.SetInsertPoint(block_test_sub_class);
1473
1474 llvm::Value* result =
1475 irb_.CreateCall2(irb_.GetRuntime(IsAssignable),
1476 type_object_addr, object_type_object_addr);
1477
1478 EmitStoreDalvikReg(dec_insn.vA_, kInt, kAccurate, result);
1479
Logan Chien70f94b42011-12-27 17:49:11 +08001480 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1481}
1482
1483
Logan Chien61bb6142012-02-03 15:34:53 +08001484llvm::Value* MethodCompiler::EmitLoadArrayLength(llvm::Value* array) {
1485 // Load array length field address
1486 llvm::Constant* array_len_field_offset =
1487 irb_.getPtrEquivInt(Array::LengthOffset().Int32Value());
1488
1489 llvm::Value* array_len_field_addr =
1490 irb_.CreatePtrDisp(array, array_len_field_offset,
1491 irb_.getJIntTy()->getPointerTo());
1492
1493 // Load array length
1494 return irb_.CreateLoad(array_len_field_addr);
1495}
1496
1497
Logan Chien70f94b42011-12-27 17:49:11 +08001498void MethodCompiler::EmitInsn_ArrayLength(uint32_t dex_pc,
1499 Instruction const* insn) {
Logan Chien61bb6142012-02-03 15:34:53 +08001500
1501 Instruction::DecodedInstruction dec_insn(insn);
1502
1503 // Get the array object address
1504 llvm::Value* array_addr = EmitLoadDalvikReg(dec_insn.vB_, kObject, kAccurate);
1505 EmitGuard_NullPointerException(dex_pc, array_addr);
1506
1507 // Get the array length and store it to the register
1508 llvm::Value* array_len = EmitLoadArrayLength(array_addr);
1509 EmitStoreDalvikReg(dec_insn.vA_, kInt, kAccurate, array_len);
1510
Logan Chien70f94b42011-12-27 17:49:11 +08001511 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1512}
1513
1514
1515void MethodCompiler::EmitInsn_NewInstance(uint32_t dex_pc,
1516 Instruction const* insn) {
Logan Chien032bdad2012-01-16 09:59:23 +08001517
1518 Instruction::DecodedInstruction dec_insn(insn);
1519
1520 llvm::Function* runtime_func;
1521 if (compiler_->CanAccessTypeWithoutChecks(method_idx_, dex_cache_,
1522 *dex_file_, dec_insn.vB_)) {
1523 runtime_func = irb_.GetRuntime(AllocObject);
1524 } else {
1525 runtime_func = irb_.GetRuntime(AllocObjectWithAccessCheck);
1526 }
1527
1528 llvm::Constant* type_index_value = irb_.getInt32(dec_insn.vB_);
1529
1530 llvm::Value* method_object_addr = EmitLoadMethodObjectAddr();
1531
1532 llvm::Value* object_addr =
1533 irb_.CreateCall2(runtime_func, type_index_value, method_object_addr);
1534
1535 EmitGuard_ExceptionLandingPad(dex_pc);
1536
1537 EmitStoreDalvikReg(dec_insn.vA_, kObject, kAccurate, object_addr);
1538
Logan Chien70f94b42011-12-27 17:49:11 +08001539 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1540}
1541
1542
1543void MethodCompiler::EmitInsn_NewArray(uint32_t dex_pc,
1544 Instruction const* insn) {
1545 // UNIMPLEMENTED(WARNING);
1546 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1547}
1548
1549
1550void MethodCompiler::EmitInsn_FilledNewArray(uint32_t dex_pc,
1551 Instruction const* insn,
1552 bool is_range) {
1553 // UNIMPLEMENTED(WARNING);
1554 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1555}
1556
1557
1558void MethodCompiler::EmitInsn_FillArrayData(uint32_t dex_pc,
1559 Instruction const* insn) {
1560 // UNIMPLEMENTED(WARNING);
1561 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1562}
1563
1564
1565void MethodCompiler::EmitInsn_UnconditionalBranch(uint32_t dex_pc,
1566 Instruction const* insn) {
Logan Chiena466c162011-12-27 17:55:46 +08001567
1568 Instruction::DecodedInstruction dec_insn(insn);
1569
1570 int32_t branch_offset = dec_insn.vA_;
1571
1572 if (branch_offset <= 0) {
1573 // Garbage collection safe-point on backward branch
1574 EmitGuard_GarbageCollectionSuspend(dex_pc);
1575 }
1576
1577 irb_.CreateBr(GetBasicBlock(dex_pc + branch_offset));
Logan Chien70f94b42011-12-27 17:49:11 +08001578}
1579
1580
1581void MethodCompiler::EmitInsn_PackedSwitch(uint32_t dex_pc,
1582 Instruction const* insn) {
Logan Chien7a89b6d2011-12-27 17:56:56 +08001583
1584 Instruction::DecodedInstruction dec_insn(insn);
1585
1586 struct PACKED Payload {
1587 uint16_t ident_;
1588 uint16_t num_cases_;
1589 int32_t first_key_;
1590 int32_t targets_[];
1591 };
1592
1593 int32_t payload_offset = static_cast<int32_t>(dex_pc) +
1594 static_cast<int32_t>(dec_insn.vB_);
1595
1596 Payload const* payload =
1597 reinterpret_cast<Payload const*>(code_item_->insns_ + payload_offset);
1598
1599 llvm::Value* value = EmitLoadDalvikReg(dec_insn.vA_, kInt, kAccurate);
1600
1601 llvm::SwitchInst* sw =
1602 irb_.CreateSwitch(value, GetNextBasicBlock(dex_pc), payload->num_cases_);
1603
1604 for (uint16_t i = 0; i < payload->num_cases_; ++i) {
1605 sw->addCase(irb_.getInt32(payload->first_key_ + i),
1606 GetBasicBlock(dex_pc + payload->targets_[i]));
1607 }
Logan Chien70f94b42011-12-27 17:49:11 +08001608}
1609
1610
1611void MethodCompiler::EmitInsn_SparseSwitch(uint32_t dex_pc,
1612 Instruction const* insn) {
Logan Chien7a89b6d2011-12-27 17:56:56 +08001613
1614 Instruction::DecodedInstruction dec_insn(insn);
1615
1616 struct PACKED Payload {
1617 uint16_t ident_;
1618 uint16_t num_cases_;
1619 int32_t keys_and_targets_[];
1620 };
1621
1622 int32_t payload_offset = static_cast<int32_t>(dex_pc) +
1623 static_cast<int32_t>(dec_insn.vB_);
1624
1625 Payload const* payload =
1626 reinterpret_cast<Payload const*>(code_item_->insns_ + payload_offset);
1627
1628 int32_t const* keys = payload->keys_and_targets_;
1629 int32_t const* targets = payload->keys_and_targets_ + payload->num_cases_;
1630
1631 llvm::Value* value = EmitLoadDalvikReg(dec_insn.vA_, kInt, kAccurate);
1632
1633 llvm::SwitchInst* sw =
1634 irb_.CreateSwitch(value, GetNextBasicBlock(dex_pc), payload->num_cases_);
1635
1636 for (size_t i = 0; i < payload->num_cases_; ++i) {
1637 sw->addCase(irb_.getInt32(keys[i]), GetBasicBlock(dex_pc + targets[i]));
1638 }
Logan Chien70f94b42011-12-27 17:49:11 +08001639}
1640
1641
1642void MethodCompiler::EmitInsn_FPCompare(uint32_t dex_pc,
1643 Instruction const* insn,
1644 JType fp_jty,
1645 bool gt_bias) {
Logan Chien2c37e8e2011-12-27 17:58:46 +08001646
1647 Instruction::DecodedInstruction dec_insn(insn);
1648
1649 DCHECK(fp_jty == kFloat || fp_jty == kDouble) << "JType: " << fp_jty;
1650
1651 llvm::Value* src1_value = EmitLoadDalvikReg(dec_insn.vB_, fp_jty, kAccurate);
1652 llvm::Value* src2_value = EmitLoadDalvikReg(dec_insn.vC_, fp_jty, kAccurate);
1653
1654 llvm::Value* cmp_eq = irb_.CreateFCmpOEQ(src1_value, src2_value);
1655 llvm::Value* cmp_lt;
1656
1657 if (gt_bias) {
1658 cmp_lt = irb_.CreateFCmpOLT(src1_value, src2_value);
1659 } else {
1660 cmp_lt = irb_.CreateFCmpULT(src1_value, src2_value);
1661 }
1662
1663 llvm::Value* result = EmitCompareResultSelection(cmp_eq, cmp_lt);
1664 EmitStoreDalvikReg(dec_insn.vA_, kInt, kAccurate, result);
1665
Logan Chien70f94b42011-12-27 17:49:11 +08001666 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1667}
1668
1669
1670void MethodCompiler::EmitInsn_LongCompare(uint32_t dex_pc,
1671 Instruction const* insn) {
Logan Chien2c37e8e2011-12-27 17:58:46 +08001672
1673 Instruction::DecodedInstruction dec_insn(insn);
1674
1675 llvm::Value* src1_value = EmitLoadDalvikReg(dec_insn.vB_, kLong, kAccurate);
1676 llvm::Value* src2_value = EmitLoadDalvikReg(dec_insn.vC_, kLong, kAccurate);
1677
1678 llvm::Value* cmp_eq = irb_.CreateICmpEQ(src1_value, src2_value);
1679 llvm::Value* cmp_lt = irb_.CreateICmpSLT(src1_value, src2_value);
1680
1681 llvm::Value* result = EmitCompareResultSelection(cmp_eq, cmp_lt);
1682 EmitStoreDalvikReg(dec_insn.vA_, kInt, kAccurate, result);
1683
Logan Chien70f94b42011-12-27 17:49:11 +08001684 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1685}
1686
1687
Logan Chien2c37e8e2011-12-27 17:58:46 +08001688llvm::Value* MethodCompiler::EmitCompareResultSelection(llvm::Value* cmp_eq,
1689 llvm::Value* cmp_lt) {
1690
1691 llvm::Constant* zero = irb_.getJInt(0);
1692 llvm::Constant* pos1 = irb_.getJInt(1);
1693 llvm::Constant* neg1 = irb_.getJInt(-1);
1694
1695 llvm::Value* result_lt = irb_.CreateSelect(cmp_lt, neg1, pos1);
1696 llvm::Value* result_eq = irb_.CreateSelect(cmp_eq, zero, result_lt);
1697
1698 return result_eq;
1699}
1700
1701
Logan Chien70f94b42011-12-27 17:49:11 +08001702void MethodCompiler::EmitInsn_BinaryConditionalBranch(uint32_t dex_pc,
1703 Instruction const* insn,
1704 CondBranchKind cond) {
Logan Chiena78e3c82011-12-27 17:59:35 +08001705
1706 Instruction::DecodedInstruction dec_insn(insn);
1707
1708 int8_t src1_reg_cat = GetInferredRegCategory(dex_pc, dec_insn.vA_);
1709 int8_t src2_reg_cat = GetInferredRegCategory(dex_pc, dec_insn.vB_);
1710
1711 DCHECK_NE(kRegUnknown, src1_reg_cat);
1712 DCHECK_NE(kRegUnknown, src2_reg_cat);
1713 DCHECK_NE(kRegCat2, src1_reg_cat);
1714 DCHECK_NE(kRegCat2, src2_reg_cat);
1715
1716 int32_t branch_offset = dec_insn.vC_;
1717
1718 if (branch_offset <= 0) {
1719 // Garbage collection safe-point on backward branch
1720 EmitGuard_GarbageCollectionSuspend(dex_pc);
1721 }
1722
1723 if (src1_reg_cat == kRegZero && src2_reg_cat == kRegZero) {
1724 irb_.CreateBr(GetBasicBlock(dex_pc + branch_offset));
1725 return;
1726 }
1727
1728 llvm::Value* src1_value;
1729 llvm::Value* src2_value;
1730
1731 if (src1_reg_cat != kRegZero && src2_reg_cat != kRegZero) {
1732 CHECK_EQ(src1_reg_cat, src2_reg_cat);
1733
1734 if (src1_reg_cat == kRegCat1nr) {
1735 src1_value = EmitLoadDalvikReg(dec_insn.vA_, kInt, kAccurate);
1736 src2_value = EmitLoadDalvikReg(dec_insn.vB_, kInt, kAccurate);
1737 } else {
1738 src1_value = EmitLoadDalvikReg(dec_insn.vA_, kObject, kAccurate);
1739 src2_value = EmitLoadDalvikReg(dec_insn.vB_, kObject, kAccurate);
1740 }
1741 } else {
1742 DCHECK(src1_reg_cat == kRegZero ||
1743 src2_reg_cat == kRegZero);
1744
1745 if (src1_reg_cat == kRegZero) {
1746 if (src2_reg_cat == kRegCat1nr) {
1747 src1_value = irb_.getJInt(0);
1748 src2_value = EmitLoadDalvikReg(dec_insn.vA_, kInt, kAccurate);
1749 } else {
1750 src1_value = irb_.getJNull();
1751 src2_value = EmitLoadDalvikReg(dec_insn.vA_, kObject, kAccurate);
1752 }
1753 } else { // src2_reg_cat == kRegZero
1754 if (src2_reg_cat == kRegCat1nr) {
1755 src1_value = EmitLoadDalvikReg(dec_insn.vA_, kInt, kAccurate);
1756 src2_value = irb_.getJInt(0);
1757 } else {
1758 src1_value = EmitLoadDalvikReg(dec_insn.vA_, kObject, kAccurate);
1759 src2_value = irb_.getJNull();
1760 }
1761 }
1762 }
1763
1764 llvm::Value* cond_value =
1765 EmitConditionResult(src1_value, src2_value, cond);
1766
1767 irb_.CreateCondBr(cond_value,
1768 GetBasicBlock(dex_pc + branch_offset),
1769 GetNextBasicBlock(dex_pc));
Logan Chien70f94b42011-12-27 17:49:11 +08001770}
1771
1772
1773void MethodCompiler::EmitInsn_UnaryConditionalBranch(uint32_t dex_pc,
1774 Instruction const* insn,
1775 CondBranchKind cond) {
Logan Chiena78e3c82011-12-27 17:59:35 +08001776
1777 Instruction::DecodedInstruction dec_insn(insn);
1778
1779 int8_t src_reg_cat = GetInferredRegCategory(dex_pc, dec_insn.vA_);
1780
1781 DCHECK_NE(kRegUnknown, src_reg_cat);
1782 DCHECK_NE(kRegCat2, src_reg_cat);
1783
1784 int32_t branch_offset = dec_insn.vB_;
1785
1786 if (branch_offset <= 0) {
1787 // Garbage collection safe-point on backward branch
1788 EmitGuard_GarbageCollectionSuspend(dex_pc);
1789 }
1790
1791 if (src_reg_cat == kRegZero) {
1792 irb_.CreateBr(GetBasicBlock(dex_pc + branch_offset));
1793 return;
1794 }
1795
1796 llvm::Value* src1_value;
1797 llvm::Value* src2_value;
1798
1799 if (src_reg_cat == kRegCat1nr) {
1800 src1_value = EmitLoadDalvikReg(dec_insn.vA_, kInt, kAccurate);
1801 src2_value = irb_.getInt32(0);
1802 } else {
1803 src1_value = EmitLoadDalvikReg(dec_insn.vA_, kObject, kAccurate);
1804 src2_value = irb_.getJNull();
1805 }
1806
1807 llvm::Value* cond_value =
1808 EmitConditionResult(src1_value, src2_value, cond);
1809
1810 irb_.CreateCondBr(cond_value,
1811 GetBasicBlock(dex_pc + branch_offset),
1812 GetNextBasicBlock(dex_pc));
1813}
1814
1815
1816RegCategory MethodCompiler::GetInferredRegCategory(uint32_t dex_pc,
1817 uint16_t reg_idx) {
1818 InferredRegCategoryMap const* map = method_->GetInferredRegCategoryMap();
1819 CHECK_NE(map, static_cast<InferredRegCategoryMap*>(NULL));
1820
1821 return map->GetRegCategory(dex_pc, reg_idx);
1822}
1823
1824
1825llvm::Value* MethodCompiler::EmitConditionResult(llvm::Value* lhs,
1826 llvm::Value* rhs,
1827 CondBranchKind cond) {
1828 switch (cond) {
1829 case kCondBranch_EQ:
1830 return irb_.CreateICmpEQ(lhs, rhs);
1831
1832 case kCondBranch_NE:
1833 return irb_.CreateICmpNE(lhs, rhs);
1834
1835 case kCondBranch_LT:
1836 return irb_.CreateICmpSLT(lhs, rhs);
1837
1838 case kCondBranch_GE:
1839 return irb_.CreateICmpSGE(lhs, rhs);
1840
1841 case kCondBranch_GT:
1842 return irb_.CreateICmpSGT(lhs, rhs);
1843
1844 case kCondBranch_LE:
1845 return irb_.CreateICmpSLE(lhs, rhs);
1846
1847 default: // Unreachable
1848 LOG(FATAL) << "Unknown conditional branch kind: " << cond;
1849 return NULL;
1850 }
Logan Chien70f94b42011-12-27 17:49:11 +08001851}
1852
1853
Logan Chiene27fdbb2012-01-02 23:27:26 +08001854void
1855MethodCompiler::EmitGuard_ArrayIndexOutOfBoundsException(uint32_t dex_pc,
1856 llvm::Value* array,
1857 llvm::Value* index) {
1858 llvm::Value* array_len = EmitLoadArrayLength(array);
1859
1860 llvm::Value* cmp = irb_.CreateICmpUGE(index, array_len);
1861
1862 llvm::BasicBlock* block_exception =
1863 CreateBasicBlockWithDexPC(dex_pc, "overflow");
1864
1865 llvm::BasicBlock* block_continue =
1866 CreateBasicBlockWithDexPC(dex_pc, "cont");
1867
1868 irb_.CreateCondBr(cmp, block_exception, block_continue);
1869
1870 irb_.SetInsertPoint(block_exception);
1871 irb_.CreateCall2(irb_.GetRuntime(ThrowIndexOutOfBounds), index, array_len);
1872 EmitBranchExceptionLandingPad(dex_pc);
1873
1874 irb_.SetInsertPoint(block_continue);
1875}
1876
1877
1878void MethodCompiler::EmitGuard_ArrayException(uint32_t dex_pc,
1879 llvm::Value* array,
1880 llvm::Value* index) {
1881 EmitGuard_NullPointerException(dex_pc, array);
1882 EmitGuard_ArrayIndexOutOfBoundsException(dex_pc, array, index);
1883}
1884
1885
1886// Emit Array GetElementPtr
1887llvm::Value* MethodCompiler::EmitArrayGEP(llvm::Value* array_addr,
1888 llvm::Value* index_value,
1889 llvm::Type* elem_type) {
1890
1891 llvm::Constant* data_offset_value =
1892 irb_.getPtrEquivInt(Array::DataOffset().Int32Value());
1893
1894 llvm::Value* array_data_addr =
1895 irb_.CreatePtrDisp(array_addr, data_offset_value,
1896 elem_type->getPointerTo());
1897
1898 return irb_.CreateGEP(array_data_addr, index_value);
1899}
1900
1901
Logan Chien70f94b42011-12-27 17:49:11 +08001902void MethodCompiler::EmitInsn_AGet(uint32_t dex_pc,
1903 Instruction const* insn,
1904 JType elem_jty) {
Logan Chiene27fdbb2012-01-02 23:27:26 +08001905
1906 Instruction::DecodedInstruction dec_insn(insn);
1907
1908 llvm::Value* array_addr = EmitLoadDalvikReg(dec_insn.vB_, kObject, kAccurate);
1909 llvm::Value* index_value = EmitLoadDalvikReg(dec_insn.vC_, kInt, kAccurate);
1910
1911 EmitGuard_ArrayException(dex_pc, array_addr, index_value);
1912
1913 llvm::Type* elem_type = irb_.getJType(elem_jty, kArray);
1914
1915 llvm::Value* array_elem_addr =
1916 EmitArrayGEP(array_addr, index_value, elem_type);
1917
1918 llvm::Value* array_elem_value = irb_.CreateLoad(array_elem_addr);
1919
1920 EmitStoreDalvikReg(dec_insn.vA_, elem_jty, kArray, array_elem_value);
1921
Logan Chien70f94b42011-12-27 17:49:11 +08001922 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1923}
1924
1925
1926void MethodCompiler::EmitInsn_APut(uint32_t dex_pc,
1927 Instruction const* insn,
1928 JType elem_jty) {
Logan Chien8dabb432012-01-02 23:29:32 +08001929
1930 Instruction::DecodedInstruction dec_insn(insn);
1931
1932 llvm::Value* array_addr = EmitLoadDalvikReg(dec_insn.vB_, kObject, kAccurate);
1933 llvm::Value* index_value = EmitLoadDalvikReg(dec_insn.vC_, kInt, kAccurate);
1934
1935 EmitGuard_ArrayException(dex_pc, array_addr, index_value);
1936
1937 llvm::Type* elem_type = irb_.getJType(elem_jty, kArray);
1938
1939 llvm::Value* array_elem_addr =
1940 EmitArrayGEP(array_addr, index_value, elem_type);
1941
1942 llvm::Value* new_value = EmitLoadDalvikReg(dec_insn.vA_, elem_jty, kArray);
1943
1944 irb_.CreateStore(new_value, array_elem_addr);
1945
Logan Chien70f94b42011-12-27 17:49:11 +08001946 irb_.CreateBr(GetNextBasicBlock(dex_pc));
1947}
1948
1949
Logan Chien48f1d2a2012-01-02 22:49:53 +08001950void MethodCompiler::PrintUnresolvedFieldWarning(int32_t field_idx) {
1951 DexFile const& dex_file = method_helper_.GetDexFile();
1952 DexFile::FieldId const& field_id = dex_file.GetFieldId(field_idx);
1953
1954 LOG(WARNING) << "unable to resolve static field " << field_idx << " ("
1955 << dex_file.GetFieldName(field_id) << ") in "
1956 << dex_file.GetFieldDeclaringClassDescriptor(field_id);
1957}
1958
1959
Logan Chien70f94b42011-12-27 17:49:11 +08001960void MethodCompiler::EmitInsn_IGet(uint32_t dex_pc,
1961 Instruction const* insn,
1962 JType field_jty) {
Logan Chien48f1d2a2012-01-02 22:49:53 +08001963
1964 Instruction::DecodedInstruction dec_insn(insn);
1965
1966 uint32_t reg_idx = dec_insn.vB_;
1967 uint32_t field_idx = dec_insn.vC_;
1968
1969 Field* field = dex_cache_->GetResolvedField(field_idx);
1970
1971 llvm::Value* object_addr = EmitLoadDalvikReg(reg_idx, kObject, kAccurate);
1972
1973 EmitGuard_NullPointerException(dex_pc, object_addr);
1974
1975 llvm::Value* field_value;
1976
1977 if (field == NULL) {
1978 PrintUnresolvedFieldWarning(field_idx);
1979
1980 llvm::Function* runtime_func;
1981
1982 if (field_jty == kObject) {
1983 runtime_func = irb_.GetRuntime(SetObjectInstance);
1984 } else if (field_jty == kLong || field_jty == kDouble) {
1985 runtime_func = irb_.GetRuntime(Set64Instance);
1986 } else {
1987 runtime_func = irb_.GetRuntime(Set32Instance);
1988 }
1989
1990 llvm::ConstantInt* field_idx_value = irb_.getInt32(field_idx);
1991
1992 llvm::Value* method_object_addr = EmitLoadMethodObjectAddr();
1993
1994 field_value = irb_.CreateCall2(runtime_func, field_idx_value,
1995 method_object_addr);
1996
1997 EmitGuard_ExceptionLandingPad(dex_pc);
1998
1999 } else {
2000 llvm::PointerType* field_type =
2001 irb_.getJType(field_jty, kField)->getPointerTo();
2002
2003 llvm::ConstantInt* field_offset =
2004 irb_.getPtrEquivInt(field->GetOffset().Int32Value());
2005
2006 llvm::Value* field_addr =
2007 irb_.CreatePtrDisp(object_addr, field_offset, field_type);
2008
2009 field_value = irb_.CreateLoad(field_addr);
2010 }
2011
2012 EmitStoreDalvikReg(dec_insn.vA_, field_jty, kField, field_value);
2013
Logan Chien70f94b42011-12-27 17:49:11 +08002014 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2015}
2016
2017
2018void MethodCompiler::EmitInsn_IPut(uint32_t dex_pc,
2019 Instruction const* insn,
2020 JType field_jty) {
Logan Chiendd6aa872012-01-03 16:06:32 +08002021
2022 Instruction::DecodedInstruction dec_insn(insn);
2023
2024 uint32_t reg_idx = dec_insn.vB_;
2025 uint32_t field_idx = dec_insn.vC_;
2026
2027 Field* field = dex_cache_->GetResolvedField(field_idx);
2028
2029 llvm::Value* object_addr = EmitLoadDalvikReg(reg_idx, kObject, kAccurate);
2030
2031 EmitGuard_NullPointerException(dex_pc, object_addr);
2032
2033 llvm::Value* new_value = EmitLoadDalvikReg(dec_insn.vA_, field_jty, kField);
2034
2035 if (field == NULL) {
2036 PrintUnresolvedFieldWarning(field_idx);
2037
2038 llvm::Function* runtime_func;
2039
2040 if (field_jty == kObject) {
2041 runtime_func = irb_.GetRuntime(SetObjectInstance);
2042 } else if (field_jty == kLong || field_jty == kDouble) {
2043 runtime_func = irb_.GetRuntime(Set64Instance);
2044 } else {
2045 runtime_func = irb_.GetRuntime(Set32Instance);
2046 }
2047
2048 llvm::Value* field_idx_value = irb_.getInt32(field_idx);
2049
2050 llvm::Value* method_object_addr = EmitLoadMethodObjectAddr();
2051
2052 irb_.CreateCall3(runtime_func, field_idx_value,
2053 method_object_addr, new_value);
2054
2055 EmitGuard_ExceptionLandingPad(dex_pc);
2056
2057 } else {
2058 llvm::PointerType* field_type =
2059 irb_.getJType(field_jty, kField)->getPointerTo();
2060
2061 llvm::Value* field_offset =
2062 irb_.getPtrEquivInt(field->GetOffset().Int32Value());
2063
2064 llvm::Value* field_addr =
2065 irb_.CreatePtrDisp(object_addr, field_offset, field_type);
2066
2067 irb_.CreateStore(new_value, field_addr);
2068 }
2069
Logan Chien70f94b42011-12-27 17:49:11 +08002070 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2071}
2072
2073
2074void MethodCompiler::EmitInsn_SGet(uint32_t dex_pc,
2075 Instruction const* insn,
2076 JType field_jty) {
2077 // UNIMPLEMENTED(WARNING);
2078 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2079}
2080
2081
2082void MethodCompiler::EmitInsn_SPut(uint32_t dex_pc,
2083 Instruction const* insn,
2084 JType field_jty) {
2085 // UNIMPLEMENTED(WARNING);
2086 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2087}
2088
2089
2090void MethodCompiler::EmitInsn_InvokeVirtual(uint32_t dex_pc,
2091 Instruction const* insn,
2092 bool is_range) {
2093 // UNIMPLEMENTED(WARNING);
2094 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2095}
2096
2097
2098void MethodCompiler::EmitInsn_InvokeSuper(uint32_t dex_pc,
2099 Instruction const* insn,
2100 bool is_range) {
2101 // UNIMPLEMENTED(WARNING);
2102 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2103}
2104
2105
2106void MethodCompiler::EmitInsn_InvokeDirect(uint32_t dex_pc,
2107 Instruction const* insn,
2108 bool is_range) {
2109 // UNIMPLEMENTED(WARNING);
2110 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2111}
2112
2113
2114void MethodCompiler::EmitInsn_InvokeStatic(uint32_t dex_pc,
2115 Instruction const* insn,
2116 bool is_range) {
2117 // UNIMPLEMENTED(WARNING);
2118 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2119}
2120
2121
2122void MethodCompiler::EmitInsn_InvokeInterface(uint32_t dex_pc,
2123 Instruction const* insn,
2124 bool is_range) {
2125 // UNIMPLEMENTED(WARNING);
2126 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2127}
2128
2129
2130void MethodCompiler::EmitInsn_Neg(uint32_t dex_pc,
2131 Instruction const* insn,
2132 JType op_jty) {
Logan Chien1b5685f2011-12-27 18:01:14 +08002133
2134 Instruction::DecodedInstruction dec_insn(insn);
2135
2136 DCHECK(op_jty == kInt || op_jty == kLong) << op_jty;
2137
2138 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, op_jty, kAccurate);
2139 llvm::Value* result_value = irb_.CreateNeg(src_value);
2140 EmitStoreDalvikReg(dec_insn.vA_, op_jty, kAccurate, result_value);
2141
Logan Chien70f94b42011-12-27 17:49:11 +08002142 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2143}
2144
2145
2146void MethodCompiler::EmitInsn_Not(uint32_t dex_pc,
2147 Instruction const* insn,
2148 JType op_jty) {
Logan Chiene53750d2011-12-27 18:02:27 +08002149
2150 Instruction::DecodedInstruction dec_insn(insn);
2151
2152 DCHECK(op_jty == kInt || op_jty == kLong) << op_jty;
2153
2154 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, op_jty, kAccurate);
2155 llvm::Value* result_value =
2156 irb_.CreateXor(src_value, static_cast<uint64_t>(-1));
2157
2158 EmitStoreDalvikReg(dec_insn.vA_, op_jty, kAccurate, result_value);
2159
Logan Chien70f94b42011-12-27 17:49:11 +08002160 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2161}
2162
2163
2164void MethodCompiler::EmitInsn_SExt(uint32_t dex_pc,
2165 Instruction const* insn) {
Logan Chien61752ad2011-12-27 18:03:51 +08002166
2167 Instruction::DecodedInstruction dec_insn(insn);
2168
2169 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, kInt, kAccurate);
2170 llvm::Value* result_value = irb_.CreateSExt(src_value, irb_.getJLongTy());
2171 EmitStoreDalvikReg(dec_insn.vA_, kLong, kAccurate, result_value);
2172
Logan Chien70f94b42011-12-27 17:49:11 +08002173 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2174}
2175
2176
2177void MethodCompiler::EmitInsn_Trunc(uint32_t dex_pc,
2178 Instruction const* insn) {
Logan Chien17a57662011-12-27 18:05:14 +08002179
2180 Instruction::DecodedInstruction dec_insn(insn);
2181
2182 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, kLong, kAccurate);
2183 llvm::Value* result_value = irb_.CreateTrunc(src_value, irb_.getJIntTy());
2184 EmitStoreDalvikReg(dec_insn.vA_, kInt, kAccurate, result_value);
2185
Logan Chien70f94b42011-12-27 17:49:11 +08002186 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2187}
2188
2189
2190void MethodCompiler::EmitInsn_TruncAndSExt(uint32_t dex_pc,
2191 Instruction const* insn,
2192 unsigned N) {
Logan Chienb6744c52011-12-27 18:06:26 +08002193
2194 Instruction::DecodedInstruction dec_insn(insn);
2195
2196 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, kInt, kAccurate);
2197
2198 llvm::Value* trunc_value =
2199 irb_.CreateTrunc(src_value, llvm::Type::getIntNTy(*context_, N));
2200
2201 llvm::Value* result_value = irb_.CreateSExt(trunc_value, irb_.getJIntTy());
2202
2203 EmitStoreDalvikReg(dec_insn.vA_, kInt, kAccurate, result_value);
2204
Logan Chien70f94b42011-12-27 17:49:11 +08002205 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2206}
2207
2208
2209void MethodCompiler::EmitInsn_TruncAndZExt(uint32_t dex_pc,
2210 Instruction const* insn,
2211 unsigned N) {
Logan Chienb6744c52011-12-27 18:06:26 +08002212
2213 Instruction::DecodedInstruction dec_insn(insn);
2214
2215 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, kInt, kAccurate);
2216
2217 llvm::Value* trunc_value =
2218 irb_.CreateTrunc(src_value, llvm::Type::getIntNTy(*context_, N));
2219
2220 llvm::Value* result_value = irb_.CreateZExt(trunc_value, irb_.getJIntTy());
2221
2222 EmitStoreDalvikReg(dec_insn.vA_, kInt, kAccurate, result_value);
2223
Logan Chien70f94b42011-12-27 17:49:11 +08002224 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2225}
2226
2227
2228void MethodCompiler::EmitInsn_FNeg(uint32_t dex_pc,
2229 Instruction const* insn,
2230 JType op_jty) {
Logan Chien7a48b092011-12-27 18:07:45 +08002231
2232 Instruction::DecodedInstruction dec_insn(insn);
2233
2234 DCHECK(op_jty == kFloat || op_jty == kDouble) << op_jty;
2235
2236 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, op_jty, kAccurate);
2237 llvm::Value* result_value = irb_.CreateFNeg(src_value);
2238 EmitStoreDalvikReg(dec_insn.vA_, op_jty, kAccurate, result_value);
2239
Logan Chien70f94b42011-12-27 17:49:11 +08002240 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2241}
2242
2243
2244void MethodCompiler::EmitInsn_IntToFP(uint32_t dex_pc,
2245 Instruction const* insn,
2246 JType src_jty,
2247 JType dest_jty) {
Logan Chien62dd4532011-12-27 18:09:00 +08002248
2249 Instruction::DecodedInstruction dec_insn(insn);
2250
2251 DCHECK(src_jty == kInt || src_jty == kLong) << src_jty;
2252 DCHECK(dest_jty == kFloat || dest_jty == kDouble) << dest_jty;
2253
2254 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, src_jty, kAccurate);
2255 llvm::Type* dest_type = irb_.getJType(dest_jty, kAccurate);
2256 llvm::Value* dest_value = irb_.CreateSIToFP(src_value, dest_type);
2257 EmitStoreDalvikReg(dec_insn.vA_, dest_jty, kAccurate, dest_value);
2258
Logan Chien70f94b42011-12-27 17:49:11 +08002259 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2260}
2261
2262
2263void MethodCompiler::EmitInsn_FPToInt(uint32_t dex_pc,
2264 Instruction const* insn,
2265 JType src_jty,
2266 JType dest_jty) {
Logan Chien12dc1752011-12-27 18:10:15 +08002267
2268 Instruction::DecodedInstruction dec_insn(insn);
2269
2270 DCHECK(src_jty == kFloat || src_jty == kDouble) << src_jty;
2271 DCHECK(dest_jty == kInt || dest_jty == kLong) << dest_jty;
2272
2273 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, src_jty, kAccurate);
2274 llvm::Type* dest_type = irb_.getJType(dest_jty, kAccurate);
2275 llvm::Value* dest_value = irb_.CreateFPToSI(src_value, dest_type);
2276 EmitStoreDalvikReg(dec_insn.vA_, dest_jty, kAccurate, dest_value);
2277
Logan Chien70f94b42011-12-27 17:49:11 +08002278 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2279}
2280
2281
2282void MethodCompiler::EmitInsn_FExt(uint32_t dex_pc,
2283 Instruction const* insn) {
Logan Chienc56ded92011-12-27 18:10:57 +08002284
2285 Instruction::DecodedInstruction dec_insn(insn);
2286
2287 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, kFloat, kAccurate);
2288 llvm::Value* result_value = irb_.CreateFPExt(src_value, irb_.getJDoubleTy());
2289 EmitStoreDalvikReg(dec_insn.vA_, kDouble, kAccurate, result_value);
2290
Logan Chien70f94b42011-12-27 17:49:11 +08002291 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2292}
2293
2294
2295void MethodCompiler::EmitInsn_FTrunc(uint32_t dex_pc,
2296 Instruction const* insn) {
Logan Chien927744f2011-12-27 18:11:52 +08002297
2298 Instruction::DecodedInstruction dec_insn(insn);
2299
2300 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, kDouble, kAccurate);
2301 llvm::Value* result_value = irb_.CreateFPTrunc(src_value, irb_.getJFloatTy());
2302 EmitStoreDalvikReg(dec_insn.vA_, kFloat, kAccurate, result_value);
2303
Logan Chien70f94b42011-12-27 17:49:11 +08002304 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2305}
2306
2307
2308void MethodCompiler::EmitInsn_IntArithm(uint32_t dex_pc,
2309 Instruction const* insn,
2310 IntArithmKind arithm,
2311 JType op_jty,
2312 bool is_2addr) {
Logan Chienc3f7d962011-12-27 18:13:18 +08002313
2314 Instruction::DecodedInstruction dec_insn(insn);
2315
2316 DCHECK(op_jty == kInt || op_jty == kLong) << op_jty;
2317
2318 llvm::Value* src1_value;
2319 llvm::Value* src2_value;
2320
2321 if (is_2addr) {
2322 src1_value = EmitLoadDalvikReg(dec_insn.vA_, op_jty, kAccurate);
2323 src2_value = EmitLoadDalvikReg(dec_insn.vB_, op_jty, kAccurate);
2324 } else {
2325 src1_value = EmitLoadDalvikReg(dec_insn.vB_, op_jty, kAccurate);
2326 src2_value = EmitLoadDalvikReg(dec_insn.vC_, op_jty, kAccurate);
2327 }
2328
2329 llvm::Value* result_value =
2330 EmitIntArithmResultComputation(dex_pc, src1_value, src2_value,
2331 arithm, op_jty);
2332
2333 EmitStoreDalvikReg(dec_insn.vA_, op_jty, kAccurate, result_value);
2334
Logan Chien70f94b42011-12-27 17:49:11 +08002335 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2336}
2337
2338
2339void MethodCompiler::EmitInsn_IntArithmImmediate(uint32_t dex_pc,
2340 Instruction const* insn,
2341 IntArithmKind arithm) {
Logan Chienc3f7d962011-12-27 18:13:18 +08002342
2343 Instruction::DecodedInstruction dec_insn(insn);
2344
2345 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, kInt, kAccurate);
2346
2347 llvm::Value* imm_value = irb_.getInt32(dec_insn.vC_);
2348
2349 llvm::Value* result_value =
2350 EmitIntArithmResultComputation(dex_pc, src_value, imm_value, arithm, kInt);
2351
2352 EmitStoreDalvikReg(dec_insn.vA_, kInt, kAccurate, result_value);
2353
Logan Chien70f94b42011-12-27 17:49:11 +08002354 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2355}
2356
2357
Logan Chienc3f7d962011-12-27 18:13:18 +08002358llvm::Value*
2359MethodCompiler::EmitIntArithmResultComputation(uint32_t dex_pc,
2360 llvm::Value* lhs,
2361 llvm::Value* rhs,
2362 IntArithmKind arithm,
2363 JType op_jty) {
2364 DCHECK(op_jty == kInt || op_jty == kLong) << op_jty;
2365
2366 switch (arithm) {
2367 case kIntArithm_Add:
2368 return irb_.CreateAdd(lhs, rhs);
2369
2370 case kIntArithm_Sub:
2371 return irb_.CreateSub(lhs, rhs);
2372
2373 case kIntArithm_Mul:
2374 return irb_.CreateMul(lhs, rhs);
2375
2376 case kIntArithm_Div:
2377 EmitGuard_DivZeroException(dex_pc, rhs, op_jty);
2378 return irb_.CreateSDiv(lhs, rhs);
2379
2380 case kIntArithm_Rem:
2381 EmitGuard_DivZeroException(dex_pc, rhs, op_jty);
2382 return irb_.CreateSRem(lhs, rhs);
2383
2384 case kIntArithm_And:
2385 return irb_.CreateAnd(lhs, rhs);
2386
2387 case kIntArithm_Or:
2388 return irb_.CreateOr(lhs, rhs);
2389
2390 case kIntArithm_Xor:
2391 return irb_.CreateXor(lhs, rhs);
2392
2393 case kIntArithm_Shl:
2394 if (op_jty == kLong) {
2395 return irb_.CreateShl(lhs, irb_.CreateAnd(rhs, 0x3f));
2396 } else {
2397 return irb_.CreateShl(lhs, irb_.CreateAnd(rhs, 0x1f));
2398 }
2399
2400 case kIntArithm_Shr:
2401 if (op_jty == kLong) {
2402 return irb_.CreateAShr(lhs, irb_.CreateAnd(rhs, 0x3f));
2403 } else {
2404 return irb_.CreateAShr(lhs, irb_.CreateAnd(rhs, 0x1f));
2405 }
2406
2407 case kIntArithm_UShr:
2408 if (op_jty == kLong) {
2409 return irb_.CreateLShr(lhs, irb_.CreateAnd(rhs, 0x3f));
2410 } else {
2411 return irb_.CreateLShr(lhs, irb_.CreateAnd(rhs, 0x1f));
2412 }
2413
2414 default:
2415 LOG(FATAL) << "Unknown integer arithmetic kind: " << arithm;
2416 return NULL;
2417 }
2418}
2419
2420
Logan Chien70f94b42011-12-27 17:49:11 +08002421void MethodCompiler::EmitInsn_RSubImmediate(uint32_t dex_pc,
2422 Instruction const* insn) {
Logan Chien65c62d42011-12-27 18:14:18 +08002423
2424 Instruction::DecodedInstruction dec_insn(insn);
2425
2426 llvm::Value* src_value = EmitLoadDalvikReg(dec_insn.vB_, kInt, kAccurate);
2427 llvm::Value* imm_value = irb_.getInt32(dec_insn.vC_);
2428 llvm::Value* result_value = irb_.CreateSub(imm_value, src_value);
2429 EmitStoreDalvikReg(dec_insn.vA_, kInt, kAccurate, result_value);
2430
Logan Chien70f94b42011-12-27 17:49:11 +08002431 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2432}
2433
2434
2435void MethodCompiler::EmitInsn_FPArithm(uint32_t dex_pc,
2436 Instruction const* insn,
2437 FPArithmKind arithm,
2438 JType op_jty,
2439 bool is_2addr) {
Logan Chien76e1c792011-12-27 18:15:01 +08002440
2441 Instruction::DecodedInstruction dec_insn(insn);
2442
2443 DCHECK(op_jty == kFloat || op_jty == kDouble) << op_jty;
2444
2445 llvm::Value* src1_value;
2446 llvm::Value* src2_value;
2447
2448 if (is_2addr) {
2449 src1_value = EmitLoadDalvikReg(dec_insn.vA_, op_jty, kAccurate);
2450 src2_value = EmitLoadDalvikReg(dec_insn.vB_, op_jty, kAccurate);
2451 } else {
2452 src1_value = EmitLoadDalvikReg(dec_insn.vB_, op_jty, kAccurate);
2453 src2_value = EmitLoadDalvikReg(dec_insn.vC_, op_jty, kAccurate);
2454 }
2455
2456 llvm::Value* result_value =
2457 EmitFPArithmResultComputation(dex_pc, src1_value, src2_value, arithm);
2458
2459 EmitStoreDalvikReg(dec_insn.vA_, op_jty, kAccurate, result_value);
2460
Logan Chien70f94b42011-12-27 17:49:11 +08002461 irb_.CreateBr(GetNextBasicBlock(dex_pc));
2462}
2463
2464
Logan Chien76e1c792011-12-27 18:15:01 +08002465llvm::Value*
2466MethodCompiler::EmitFPArithmResultComputation(uint32_t dex_pc,
2467 llvm::Value *lhs,
2468 llvm::Value *rhs,
2469 FPArithmKind arithm) {
2470 switch (arithm) {
2471 case kFPArithm_Add:
2472 return irb_.CreateFAdd(lhs, rhs);
2473
2474 case kFPArithm_Sub:
2475 return irb_.CreateFSub(lhs, rhs);
2476
2477 case kFPArithm_Mul:
2478 return irb_.CreateFMul(lhs, rhs);
2479
2480 case kFPArithm_Div:
2481 return irb_.CreateFDiv(lhs, rhs);
2482
2483 case kFPArithm_Rem:
2484 return irb_.CreateFRem(lhs, rhs);
2485
2486 default:
2487 LOG(FATAL) << "Unknown floating-point arithmetic kind: " << arithm;
2488 return NULL;
2489 }
2490}
2491
2492
Logan Chienc3f7d962011-12-27 18:13:18 +08002493void MethodCompiler::EmitGuard_DivZeroException(uint32_t dex_pc,
2494 llvm::Value* denominator,
2495 JType op_jty) {
2496 DCHECK(op_jty == kInt || op_jty == kLong) << op_jty;
2497
2498 llvm::Constant* zero = irb_.getJZero(op_jty);
2499
2500 llvm::Value* equal_zero = irb_.CreateICmpEQ(denominator, zero);
2501
2502 llvm::BasicBlock* block_exception = CreateBasicBlockWithDexPC(dex_pc, "div0");
2503
2504 llvm::BasicBlock* block_continue = CreateBasicBlockWithDexPC(dex_pc, "cont");
2505
2506 irb_.CreateCondBr(equal_zero, block_exception, block_continue);
2507
2508 irb_.SetInsertPoint(block_exception);
2509 irb_.CreateCall(irb_.GetRuntime(ThrowDivZeroException));
2510 EmitBranchExceptionLandingPad(dex_pc);
2511
2512 irb_.SetInsertPoint(block_continue);
2513}
2514
2515
Logan Chien61bb6142012-02-03 15:34:53 +08002516void MethodCompiler::EmitGuard_NullPointerException(uint32_t dex_pc,
2517 llvm::Value* object) {
2518 llvm::Value* equal_null = irb_.CreateICmpEQ(object, irb_.getJNull());
2519
2520 llvm::BasicBlock* block_exception =
2521 CreateBasicBlockWithDexPC(dex_pc, "nullp");
2522
2523 llvm::BasicBlock* block_continue =
2524 CreateBasicBlockWithDexPC(dex_pc, "cont");
2525
2526 irb_.CreateCondBr(equal_null, block_exception, block_continue);
2527
2528 irb_.SetInsertPoint(block_exception);
2529 irb_.CreateCall(irb_.GetRuntime(ThrowNullPointerException));
2530 EmitBranchExceptionLandingPad(dex_pc);
2531
2532 irb_.SetInsertPoint(block_continue);
2533}
2534
2535
Logan Chienbb4d12a2012-02-17 14:10:01 +08002536llvm::Value* MethodCompiler::EmitLoadDexCacheAddr(MemberOffset offset) {
2537 llvm::Value* method_object_addr = EmitLoadMethodObjectAddr();
2538
2539 llvm::Value* dex_cache_offset_value =
2540 irb_.getPtrEquivInt(offset.Int32Value());
2541
2542 llvm::Value* dex_cache_field_addr =
2543 irb_.CreatePtrDisp(method_object_addr, dex_cache_offset_value,
2544 irb_.getJObjectTy()->getPointerTo());
2545
2546 return irb_.CreateLoad(dex_cache_field_addr);
2547}
2548
2549
2550void MethodCompiler::
2551EmitLoadDexCacheCodeAndDirectMethodFieldAddr(llvm::Value*& code_field_addr,
2552 llvm::Value*& method_field_addr,
2553 uint32_t method_idx) {
2554 llvm::Value* cadms_dex_cache_addr =
2555 EmitLoadDexCacheAddr(Method::GetDexCacheCodeAndDirectMethodsOffset());
2556
2557 llvm::Value* code_index_value =
2558 irb_.getPtrEquivInt(CodeAndDirectMethods::CodeIndex(method_idx));
2559
2560 llvm::Value* method_index_value =
2561 irb_.getPtrEquivInt(CodeAndDirectMethods::MethodIndex(method_idx));
2562
2563 // Return the field address
2564 code_field_addr = EmitArrayGEP(cadms_dex_cache_addr, code_index_value,
2565 irb_.getJIntTy());
2566
2567 method_field_addr = EmitArrayGEP(cadms_dex_cache_addr, method_index_value,
2568 irb_.getJIntTy());
2569}
2570
2571
2572llvm::Value* MethodCompiler::
2573EmitLoadDexCacheStaticStorageFieldAddr(uint32_t type_idx) {
2574 llvm::Value* static_storage_dex_cache_addr =
2575 EmitLoadDexCacheAddr(Method::DexCacheInitializedStaticStorageOffset());
2576
2577 llvm::Value* type_idx_value = irb_.getPtrEquivInt(type_idx);
2578
2579 return EmitArrayGEP(static_storage_dex_cache_addr, type_idx_value,
2580 irb_.getJObjectTy());
2581}
2582
2583
2584llvm::Value* MethodCompiler::
2585EmitLoadDexCacheResolvedTypeFieldAddr(uint32_t type_idx) {
2586 llvm::Value* resolved_type_dex_cache_addr =
2587 EmitLoadDexCacheAddr(Method::DexCacheResolvedTypesOffset());
2588
2589 llvm::Value* type_idx_value = irb_.getPtrEquivInt(type_idx);
2590
2591 return EmitArrayGEP(resolved_type_dex_cache_addr, type_idx_value,
2592 irb_.getJObjectTy());
2593}
2594
2595
2596llvm::Value* MethodCompiler::
2597EmitLoadDexCacheStringFieldAddr(uint32_t string_idx) {
2598 llvm::Value* string_dex_cache_addr =
2599 EmitLoadDexCacheAddr(Method::DexCacheStringsOffset());
2600
2601 llvm::Value* string_idx_value = irb_.getPtrEquivInt(string_idx);
2602
2603 return EmitArrayGEP(string_dex_cache_addr, string_idx_value,
2604 irb_.getJObjectTy());
2605}
2606
2607
Logan Chien83426162011-12-09 09:29:50 +08002608CompiledMethod *MethodCompiler::Compile() {
Logan Chien0b827102011-12-20 19:46:14 +08002609 // Code generation
2610 CreateFunction();
2611
2612 EmitPrologue();
2613 EmitInstructions();
Logan Chienc670a8d2011-12-20 21:25:56 +08002614 EmitPrologueLastBranch();
Logan Chien0b827102011-12-20 19:46:14 +08002615
Logan Chiend6c239a2011-12-23 15:11:45 +08002616 // Verify the generated bitcode
2617 llvm::verifyFunction(*func_, llvm::PrintMessageAction);
2618
Logan Chien0b827102011-12-20 19:46:14 +08002619 // Delete the inferred register category map (won't be used anymore)
2620 method_->ResetInferredRegCategoryMap();
2621
2622 return new CompiledMethod(insn_set_, func_);
2623}
2624
2625
2626llvm::Value* MethodCompiler::EmitLoadMethodObjectAddr() {
2627 return func_->arg_begin();
Shih-wei Liaod1fec812012-02-13 09:51:10 -08002628}
Logan Chien83426162011-12-09 09:29:50 +08002629
2630
Logan Chien5bcc04e2012-01-30 14:15:12 +08002631void MethodCompiler::EmitBranchExceptionLandingPad(uint32_t dex_pc) {
2632 if (llvm::BasicBlock* lpad = GetLandingPadBasicBlock(dex_pc)) {
2633 irb_.CreateBr(lpad);
2634 } else {
2635 irb_.CreateBr(GetUnwindBasicBlock());
2636 }
2637}
2638
2639
2640void MethodCompiler::EmitGuard_ExceptionLandingPad(uint32_t dex_pc) {
2641 llvm::Value* exception_pending =
2642 irb_.CreateCall(irb_.GetRuntime(IsExceptionPending));
2643
2644 llvm::BasicBlock* block_cont = CreateBasicBlockWithDexPC(dex_pc, "cont");
2645
2646 if (llvm::BasicBlock* lpad = GetLandingPadBasicBlock(dex_pc)) {
2647 irb_.CreateCondBr(exception_pending, lpad, block_cont);
2648 } else {
2649 irb_.CreateCondBr(exception_pending, GetUnwindBasicBlock(), block_cont);
2650 }
2651
2652 irb_.SetInsertPoint(block_cont);
2653}
2654
2655
Logan Chien924072f2012-01-30 15:07:24 +08002656void MethodCompiler::EmitGuard_GarbageCollectionSuspend(uint32_t dex_pc) {
2657 llvm::Value* runtime_func = irb_.GetRuntime(TestSuspend);
2658 irb_.CreateCall(runtime_func);
2659
2660 EmitGuard_ExceptionLandingPad(dex_pc);
2661}
2662
2663
Logan Chiend6c239a2011-12-23 15:11:45 +08002664llvm::BasicBlock* MethodCompiler::
2665CreateBasicBlockWithDexPC(uint32_t dex_pc, char const* postfix) {
2666 std::string name;
2667
2668 if (postfix) {
2669 StringAppendF(&name, "B%u.%s", dex_pc, postfix);
2670 } else {
2671 StringAppendF(&name, "B%u", dex_pc);
2672 }
2673
2674 return llvm::BasicBlock::Create(*context_, name, func_);
2675}
2676
2677
2678llvm::BasicBlock* MethodCompiler::GetBasicBlock(uint32_t dex_pc) {
2679 DCHECK(dex_pc < code_item_->insns_size_in_code_units_);
2680
2681 llvm::BasicBlock* basic_block = basic_blocks_[dex_pc];
2682
2683 if (!basic_block) {
2684 basic_block = CreateBasicBlockWithDexPC(dex_pc);
2685 basic_blocks_[dex_pc] = basic_block;
2686 }
2687
2688 return basic_block;
2689}
2690
2691
2692llvm::BasicBlock*
2693MethodCompiler::GetNextBasicBlock(uint32_t dex_pc) {
2694 Instruction const* insn = Instruction::At(code_item_->insns_ + dex_pc);
2695 return GetBasicBlock(dex_pc + insn->SizeInCodeUnits());
2696}
2697
2698
Logan Chien5bcc04e2012-01-30 14:15:12 +08002699int32_t MethodCompiler::GetTryItemOffset(uint32_t dex_pc) {
2700 // TODO: Since we are emitting the dex instructions in ascending order
2701 // w.r.t. address, we can cache the lastest try item offset so that we
2702 // don't have to do binary search for every query.
2703
2704 int32_t min = 0;
2705 int32_t max = code_item_->tries_size_ - 1;
2706
2707 while (min <= max) {
2708 int32_t mid = min + (max - min) / 2;
2709
2710 DexFile::TryItem const* ti = DexFile::GetTryItems(*code_item_, mid);
2711 uint32_t start = ti->start_addr_;
2712 uint32_t end = start + ti->insn_count_;
2713
2714 if (dex_pc < start) {
2715 max = mid - 1;
2716 } else if (dex_pc >= end) {
2717 min = mid + 1;
2718 } else {
2719 return mid; // found
2720 }
2721 }
2722
2723 return -1; // not found
2724}
2725
2726
2727llvm::BasicBlock* MethodCompiler::GetLandingPadBasicBlock(uint32_t dex_pc) {
2728 // Find the try item for this address in this method
2729 int32_t ti_offset = GetTryItemOffset(dex_pc);
2730
2731 if (ti_offset == -1) {
2732 return NULL; // No landing pad is available for this address.
2733 }
2734
2735 // Check for the existing landing pad basic block
2736 DCHECK_GT(basic_block_landing_pads_.size(), static_cast<size_t>(ti_offset));
2737 llvm::BasicBlock* block_lpad = basic_block_landing_pads_[ti_offset];
2738
2739 if (block_lpad) {
2740 // We have generated landing pad for this try item already. Return the
2741 // same basic block.
2742 return block_lpad;
2743 }
2744
2745 // Get try item from code item
2746 DexFile::TryItem const* ti = DexFile::GetTryItems(*code_item_, ti_offset);
2747
2748 // Create landing pad basic block
2749 block_lpad = llvm::BasicBlock::Create(*context_,
2750 StringPrintf("lpad%d", ti_offset),
2751 func_);
2752
2753 // Change IRBuilder insert point
2754 llvm::IRBuilderBase::InsertPoint irb_ip_original = irb_.saveIP();
2755 irb_.SetInsertPoint(block_lpad);
2756
2757 // Find catch block with matching type
2758 llvm::Value* method_object_addr = EmitLoadMethodObjectAddr();
2759
2760 // TODO: Maybe passing try item offset will be a better idea? For now,
2761 // we are passing dex_pc, so that we can use existing runtime support
2762 // function directly. However, in the runtime supporting function we
2763 // have to search for try item with binary search which can be
2764 // eliminated.
2765 llvm::Value* dex_pc_value = irb_.getInt32(ti->start_addr_);
2766
2767 llvm::Value* catch_handler_index_value =
2768 irb_.CreateCall2(irb_.GetRuntime(FindCatchBlock),
2769 method_object_addr, dex_pc_value);
2770
2771 // Switch instruction (Go to unwind basic block by default)
2772 llvm::SwitchInst* sw =
2773 irb_.CreateSwitch(catch_handler_index_value, GetUnwindBasicBlock());
2774
2775 // Cases with matched catch block
2776 CatchHandlerIterator iter(*code_item_, ti->start_addr_);
2777
2778 for (uint32_t c = 0; iter.HasNext(); iter.Next(), ++c) {
2779 sw->addCase(irb_.getInt32(c), GetBasicBlock(iter.GetHandlerAddress()));
2780 }
2781
2782 // Restore the orignal insert point for IRBuilder
2783 irb_.restoreIP(irb_ip_original);
2784
2785 // Cache this landing pad
2786 DCHECK_GT(basic_block_landing_pads_.size(), static_cast<size_t>(ti_offset));
2787 basic_block_landing_pads_[ti_offset] = block_lpad;
2788
2789 return block_lpad;
2790}
2791
2792
2793llvm::BasicBlock* MethodCompiler::GetUnwindBasicBlock() {
2794 // Check the existing unwinding baisc block block
2795 if (basic_block_unwind_ != NULL) {
2796 return basic_block_unwind_;
2797 }
2798
2799 // Create new basic block for unwinding
2800 basic_block_unwind_ =
2801 llvm::BasicBlock::Create(*context_, "exception_unwind", func_);
2802
2803 // Change IRBuilder insert point
2804 llvm::IRBuilderBase::InsertPoint irb_ip_original = irb_.saveIP();
2805 irb_.SetInsertPoint(basic_block_unwind_);
2806
2807 // Emit the code to return default value (zero) for the given return type.
2808 char ret_shorty = method_helper_.GetShorty()[0];
2809 if (ret_shorty == 'V') {
2810 irb_.CreateRetVoid();
2811 } else {
2812 irb_.CreateRet(irb_.getJZero(ret_shorty));
2813 }
2814
2815 // Restore the orignal insert point for IRBuilder
2816 irb_.restoreIP(irb_ip_original);
2817
2818 return basic_block_unwind_;
2819}
2820
2821
Logan Chienc670a8d2011-12-20 21:25:56 +08002822llvm::Value* MethodCompiler::AllocDalvikLocalVarReg(RegCategory cat,
2823 uint32_t reg_idx) {
2824
2825 // Save current IR builder insert point
2826 llvm::IRBuilderBase::InsertPoint irb_ip_original = irb_.saveIP();
2827
2828 // Alloca
2829 llvm::Value* reg_addr = NULL;
2830
2831 switch (cat) {
2832 case kRegCat1nr:
2833 irb_.SetInsertPoint(basic_block_reg_alloca_);
2834 reg_addr = irb_.CreateAlloca(irb_.getJIntTy(), 0,
2835 StringPrintf("r%u", reg_idx));
2836
2837 irb_.SetInsertPoint(basic_block_reg_zero_init_);
2838 irb_.CreateStore(irb_.getJInt(0), reg_addr);
2839 break;
2840
2841 case kRegCat2:
2842 irb_.SetInsertPoint(basic_block_reg_alloca_);
2843 reg_addr = irb_.CreateAlloca(irb_.getJLongTy(), 0,
2844 StringPrintf("w%u", reg_idx));
2845
2846 irb_.SetInsertPoint(basic_block_reg_zero_init_);
2847 irb_.CreateStore(irb_.getJLong(0), reg_addr);
2848 break;
2849
2850 case kRegObject:
2851 irb_.SetInsertPoint(basic_block_reg_alloca_);
2852 reg_addr = irb_.CreateAlloca(irb_.getJObjectTy(), 0,
2853 StringPrintf("p%u", reg_idx));
2854
2855 irb_.SetInsertPoint(basic_block_reg_zero_init_);
2856 irb_.CreateStore(irb_.getJNull(), reg_addr);
2857 break;
2858
2859 default:
2860 LOG(FATAL) << "Unknown register category for allocation: " << cat;
2861 }
2862
2863 // Restore IRBuilder insert point
2864 irb_.restoreIP(irb_ip_original);
2865
2866 DCHECK_NE(reg_addr, static_cast<llvm::Value*>(NULL));
2867 return reg_addr;
2868}
2869
2870
2871llvm::Value* MethodCompiler::AllocDalvikRetValReg(RegCategory cat) {
2872 // Save current IR builder insert point
2873 llvm::IRBuilderBase::InsertPoint irb_ip_original = irb_.saveIP();
2874
2875 // Alloca
2876 llvm::Value* reg_addr = NULL;
2877
2878 switch (cat) {
2879 case kRegCat1nr:
2880 irb_.SetInsertPoint(basic_block_reg_alloca_);
2881 reg_addr = irb_.CreateAlloca(irb_.getJIntTy(), 0, "r_res");
2882 break;
2883
2884 case kRegCat2:
2885 irb_.SetInsertPoint(basic_block_reg_alloca_);
2886 reg_addr = irb_.CreateAlloca(irb_.getJLongTy(), 0, "w_res");
2887 break;
2888
2889 case kRegObject:
2890 irb_.SetInsertPoint(basic_block_reg_alloca_);
2891 reg_addr = irb_.CreateAlloca(irb_.getJObjectTy(), 0, "p_res");
2892 break;
2893
2894 default:
2895 LOG(FATAL) << "Unknown register category for allocation: " << cat;
2896 }
2897
2898 // Restore IRBuilder insert point
2899 irb_.restoreIP(irb_ip_original);
2900
2901 DCHECK_NE(reg_addr, static_cast<llvm::Value*>(NULL));
2902 return reg_addr;
2903}
2904
2905
Logan Chien83426162011-12-09 09:29:50 +08002906} // namespace compiler_llvm
2907} // namespace art