blob: 10bcdb977195549762cd272175ef5728ec45bcaf [file] [log] [blame]
buzbee311ca162013-02-28 15:56:43 -08001/*
2 * Copyright (C) 2013 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
Ian Rogers6282dc12013-04-18 15:54:02 -070017#include "base/stl_util.h"
buzbee311ca162013-02-28 15:56:43 -080018#include "compiler_internals.h"
buzbee311ca162013-02-28 15:56:43 -080019#include "dex_file-inl.h"
Ian Rogers6282dc12013-04-18 15:54:02 -070020#include "leb128.h"
21#include "mir_graph.h"
buzbee311ca162013-02-28 15:56:43 -080022
Vladimir Marko5816ed42013-11-27 17:04:20 +000023#include "dex/quick/dex_file_to_method_inliner_map.h"
24#include "dex/quick/dex_file_method_inliner.h"
25
buzbee311ca162013-02-28 15:56:43 -080026namespace art {
27
28#define MAX_PATTERN_LEN 5
29
buzbee1fd33462013-03-25 13:40:45 -070030const char* MIRGraph::extended_mir_op_names_[kMirOpLast - kMirOpFirst] = {
31 "Phi",
32 "Copy",
33 "FusedCmplFloat",
34 "FusedCmpgFloat",
35 "FusedCmplDouble",
36 "FusedCmpgDouble",
37 "FusedCmpLong",
38 "Nop",
39 "OpNullCheck",
40 "OpRangeCheck",
41 "OpDivZeroCheck",
42 "Check1",
43 "Check2",
44 "Select",
45};
46
buzbee862a7602013-04-05 10:58:54 -070047MIRGraph::MIRGraph(CompilationUnit* cu, ArenaAllocator* arena)
buzbee1fd33462013-03-25 13:40:45 -070048 : reg_location_(NULL),
49 cu_(cu),
buzbee311ca162013-02-28 15:56:43 -080050 ssa_base_vregs_(NULL),
51 ssa_subscripts_(NULL),
buzbee311ca162013-02-28 15:56:43 -080052 vreg_to_ssa_map_(NULL),
53 ssa_last_defs_(NULL),
54 is_constant_v_(NULL),
55 constant_values_(NULL),
buzbee862a7602013-04-05 10:58:54 -070056 use_counts_(arena, 256, kGrowableArrayMisc),
57 raw_use_counts_(arena, 256, kGrowableArrayMisc),
buzbee311ca162013-02-28 15:56:43 -080058 num_reachable_blocks_(0),
buzbee862a7602013-04-05 10:58:54 -070059 dfs_order_(NULL),
60 dfs_post_order_(NULL),
61 dom_post_order_traversal_(NULL),
buzbee311ca162013-02-28 15:56:43 -080062 i_dom_list_(NULL),
63 def_block_matrix_(NULL),
64 temp_block_v_(NULL),
65 temp_dalvik_register_v_(NULL),
66 temp_ssa_register_v_(NULL),
buzbee862a7602013-04-05 10:58:54 -070067 block_list_(arena, 100, kGrowableArrayBlockList),
buzbee311ca162013-02-28 15:56:43 -080068 try_block_addr_(NULL),
69 entry_block_(NULL),
70 exit_block_(NULL),
buzbee311ca162013-02-28 15:56:43 -080071 num_blocks_(0),
72 current_code_item_(NULL),
buzbeeb48819d2013-09-14 16:15:25 -070073 dex_pc_to_block_map_(arena, 0, kGrowableArrayMisc),
buzbee311ca162013-02-28 15:56:43 -080074 current_method_(kInvalidEntry),
75 current_offset_(kInvalidEntry),
76 def_count_(0),
77 opcode_count_(NULL),
buzbee1fd33462013-03-25 13:40:45 -070078 num_ssa_regs_(0),
79 method_sreg_(0),
buzbee862a7602013-04-05 10:58:54 -070080 attributes_(METHOD_IS_LEAF), // Start with leaf assumption, change on encountering invoke.
81 checkstats_(NULL),
buzbeeb48819d2013-09-14 16:15:25 -070082 arena_(arena),
83 backward_branches_(0),
Razvan A Lupusoruda7a69b2014-01-08 15:09:50 -080084 forward_branches_(0),
85 compiler_temps_(arena, 6, kGrowableArrayMisc),
86 num_non_special_compiler_temps_(0),
87 max_available_non_special_compiler_temps_(0) {
buzbee862a7602013-04-05 10:58:54 -070088 try_block_addr_ = new (arena_) ArenaBitVector(arena_, 0, true /* expandable */);
Razvan A Lupusoruda7a69b2014-01-08 15:09:50 -080089 max_available_special_compiler_temps_ = std::abs(static_cast<int>(kVRegNonSpecialTempBaseReg))
90 - std::abs(static_cast<int>(kVRegTempBaseReg));
buzbee311ca162013-02-28 15:56:43 -080091}
92
Ian Rogers6282dc12013-04-18 15:54:02 -070093MIRGraph::~MIRGraph() {
94 STLDeleteElements(&m_units_);
95}
96
buzbee311ca162013-02-28 15:56:43 -080097/*
98 * Parse an instruction, return the length of the instruction
99 */
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700100int MIRGraph::ParseInsn(const uint16_t* code_ptr, DecodedInstruction* decoded_instruction) {
buzbee311ca162013-02-28 15:56:43 -0800101 const Instruction* instruction = Instruction::At(code_ptr);
102 *decoded_instruction = DecodedInstruction(instruction);
103
104 return instruction->SizeInCodeUnits();
105}
106
107
108/* Split an existing block from the specified code offset into two */
buzbee0d829482013-10-11 15:24:55 -0700109BasicBlock* MIRGraph::SplitBlock(DexOffset code_offset,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700110 BasicBlock* orig_block, BasicBlock** immed_pred_block_p) {
buzbee0d829482013-10-11 15:24:55 -0700111 DCHECK_GT(code_offset, orig_block->start_offset);
buzbee311ca162013-02-28 15:56:43 -0800112 MIR* insn = orig_block->first_mir_insn;
buzbee0d829482013-10-11 15:24:55 -0700113 MIR* prev = NULL;
buzbee311ca162013-02-28 15:56:43 -0800114 while (insn) {
115 if (insn->offset == code_offset) break;
buzbee0d829482013-10-11 15:24:55 -0700116 prev = insn;
buzbee311ca162013-02-28 15:56:43 -0800117 insn = insn->next;
118 }
119 if (insn == NULL) {
120 LOG(FATAL) << "Break split failed";
121 }
buzbee862a7602013-04-05 10:58:54 -0700122 BasicBlock *bottom_block = NewMemBB(kDalvikByteCode, num_blocks_++);
123 block_list_.Insert(bottom_block);
buzbee311ca162013-02-28 15:56:43 -0800124
125 bottom_block->start_offset = code_offset;
126 bottom_block->first_mir_insn = insn;
127 bottom_block->last_mir_insn = orig_block->last_mir_insn;
128
129 /* If this block was terminated by a return, the flag needs to go with the bottom block */
130 bottom_block->terminated_by_return = orig_block->terminated_by_return;
131 orig_block->terminated_by_return = false;
132
buzbee311ca162013-02-28 15:56:43 -0800133 /* Handle the taken path */
134 bottom_block->taken = orig_block->taken;
buzbee0d829482013-10-11 15:24:55 -0700135 if (bottom_block->taken != NullBasicBlockId) {
136 orig_block->taken = NullBasicBlockId;
137 BasicBlock* bb_taken = GetBasicBlock(bottom_block->taken);
138 bb_taken->predecessors->Delete(orig_block->id);
139 bb_taken->predecessors->Insert(bottom_block->id);
buzbee311ca162013-02-28 15:56:43 -0800140 }
141
142 /* Handle the fallthrough path */
143 bottom_block->fall_through = orig_block->fall_through;
buzbee0d829482013-10-11 15:24:55 -0700144 orig_block->fall_through = bottom_block->id;
145 bottom_block->predecessors->Insert(orig_block->id);
146 if (bottom_block->fall_through != NullBasicBlockId) {
147 BasicBlock* bb_fall_through = GetBasicBlock(bottom_block->fall_through);
148 bb_fall_through->predecessors->Delete(orig_block->id);
149 bb_fall_through->predecessors->Insert(bottom_block->id);
buzbee311ca162013-02-28 15:56:43 -0800150 }
151
152 /* Handle the successor list */
buzbee0d829482013-10-11 15:24:55 -0700153 if (orig_block->successor_block_list_type != kNotUsed) {
154 bottom_block->successor_block_list_type = orig_block->successor_block_list_type;
155 bottom_block->successor_blocks = orig_block->successor_blocks;
156 orig_block->successor_block_list_type = kNotUsed;
157 orig_block->successor_blocks = NULL;
158 GrowableArray<SuccessorBlockInfo*>::Iterator iterator(bottom_block->successor_blocks);
buzbee311ca162013-02-28 15:56:43 -0800159 while (true) {
buzbee862a7602013-04-05 10:58:54 -0700160 SuccessorBlockInfo *successor_block_info = iterator.Next();
buzbee311ca162013-02-28 15:56:43 -0800161 if (successor_block_info == NULL) break;
buzbee0d829482013-10-11 15:24:55 -0700162 BasicBlock *bb = GetBasicBlock(successor_block_info->block);
163 bb->predecessors->Delete(orig_block->id);
164 bb->predecessors->Insert(bottom_block->id);
buzbee311ca162013-02-28 15:56:43 -0800165 }
166 }
167
buzbee0d829482013-10-11 15:24:55 -0700168 orig_block->last_mir_insn = prev;
169 prev->next = NULL;
buzbee311ca162013-02-28 15:56:43 -0800170
buzbee311ca162013-02-28 15:56:43 -0800171 /*
172 * Update the immediate predecessor block pointer so that outgoing edges
173 * can be applied to the proper block.
174 */
175 if (immed_pred_block_p) {
176 DCHECK_EQ(*immed_pred_block_p, orig_block);
177 *immed_pred_block_p = bottom_block;
178 }
buzbeeb48819d2013-09-14 16:15:25 -0700179
180 // Associate dex instructions in the bottom block with the new container.
Vladimir Marko4376c872014-01-23 12:39:29 +0000181 DCHECK(insn != nullptr);
182 DCHECK(insn != orig_block->first_mir_insn);
183 DCHECK(insn == bottom_block->first_mir_insn);
184 DCHECK_EQ(insn->offset, bottom_block->start_offset);
185 DCHECK(static_cast<int>(insn->dalvikInsn.opcode) == kMirOpCheck ||
186 !IsPseudoMirOp(insn->dalvikInsn.opcode));
187 DCHECK_EQ(dex_pc_to_block_map_.Get(insn->offset), orig_block->id);
188 MIR* p = insn;
189 dex_pc_to_block_map_.Put(p->offset, bottom_block->id);
190 while (p != bottom_block->last_mir_insn) {
191 p = p->next;
192 DCHECK(p != nullptr);
buzbeeb48819d2013-09-14 16:15:25 -0700193 int opcode = p->dalvikInsn.opcode;
194 /*
195 * Some messiness here to ensure that we only enter real opcodes and only the
196 * first half of a potentially throwing instruction that has been split into
Vladimir Marko4376c872014-01-23 12:39:29 +0000197 * CHECK and work portions. Since the 2nd half of a split operation is always
198 * the first in a BasicBlock, we can't hit it here.
buzbeeb48819d2013-09-14 16:15:25 -0700199 */
Vladimir Marko4376c872014-01-23 12:39:29 +0000200 if ((opcode == kMirOpCheck) || !IsPseudoMirOp(opcode)) {
201 DCHECK_EQ(dex_pc_to_block_map_.Get(p->offset), orig_block->id);
buzbeeb48819d2013-09-14 16:15:25 -0700202 dex_pc_to_block_map_.Put(p->offset, bottom_block->id);
203 }
buzbeeb48819d2013-09-14 16:15:25 -0700204 }
205
buzbee311ca162013-02-28 15:56:43 -0800206 return bottom_block;
207}
208
209/*
210 * Given a code offset, find out the block that starts with it. If the offset
211 * is in the middle of an existing block, split it into two. If immed_pred_block_p
212 * is not non-null and is the block being split, update *immed_pred_block_p to
213 * point to the bottom block so that outgoing edges can be set up properly
214 * (by the caller)
215 * Utilizes a map for fast lookup of the typical cases.
216 */
buzbee0d829482013-10-11 15:24:55 -0700217BasicBlock* MIRGraph::FindBlock(DexOffset code_offset, bool split, bool create,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700218 BasicBlock** immed_pred_block_p) {
buzbeebd663de2013-09-10 15:41:31 -0700219 if (code_offset >= cu_->code_item->insns_size_in_code_units_) {
buzbee311ca162013-02-28 15:56:43 -0800220 return NULL;
221 }
buzbeeb48819d2013-09-14 16:15:25 -0700222
223 int block_id = dex_pc_to_block_map_.Get(code_offset);
224 BasicBlock* bb = (block_id == 0) ? NULL : block_list_.Get(block_id);
225
226 if ((bb != NULL) && (bb->start_offset == code_offset)) {
227 // Does this containing block start with the desired instruction?
buzbeebd663de2013-09-10 15:41:31 -0700228 return bb;
229 }
buzbee311ca162013-02-28 15:56:43 -0800230
buzbeeb48819d2013-09-14 16:15:25 -0700231 // No direct hit.
232 if (!create) {
233 return NULL;
buzbee311ca162013-02-28 15:56:43 -0800234 }
235
buzbeeb48819d2013-09-14 16:15:25 -0700236 if (bb != NULL) {
237 // The target exists somewhere in an existing block.
238 return SplitBlock(code_offset, bb, bb == *immed_pred_block_p ? immed_pred_block_p : NULL);
239 }
240
241 // Create a new block.
buzbee862a7602013-04-05 10:58:54 -0700242 bb = NewMemBB(kDalvikByteCode, num_blocks_++);
243 block_list_.Insert(bb);
buzbee311ca162013-02-28 15:56:43 -0800244 bb->start_offset = code_offset;
buzbeeb48819d2013-09-14 16:15:25 -0700245 dex_pc_to_block_map_.Put(bb->start_offset, bb->id);
buzbee311ca162013-02-28 15:56:43 -0800246 return bb;
247}
248
buzbeeb48819d2013-09-14 16:15:25 -0700249
buzbee311ca162013-02-28 15:56:43 -0800250/* Identify code range in try blocks and set up the empty catch blocks */
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700251void MIRGraph::ProcessTryCatchBlocks() {
buzbee311ca162013-02-28 15:56:43 -0800252 int tries_size = current_code_item_->tries_size_;
buzbee0d829482013-10-11 15:24:55 -0700253 DexOffset offset;
buzbee311ca162013-02-28 15:56:43 -0800254
255 if (tries_size == 0) {
256 return;
257 }
258
259 for (int i = 0; i < tries_size; i++) {
260 const DexFile::TryItem* pTry =
261 DexFile::GetTryItems(*current_code_item_, i);
buzbee0d829482013-10-11 15:24:55 -0700262 DexOffset start_offset = pTry->start_addr_;
263 DexOffset end_offset = start_offset + pTry->insn_count_;
buzbee311ca162013-02-28 15:56:43 -0800264 for (offset = start_offset; offset < end_offset; offset++) {
buzbee862a7602013-04-05 10:58:54 -0700265 try_block_addr_->SetBit(offset);
buzbee311ca162013-02-28 15:56:43 -0800266 }
267 }
268
269 // Iterate over each of the handlers to enqueue the empty Catch blocks
270 const byte* handlers_ptr = DexFile::GetCatchHandlerData(*current_code_item_, 0);
271 uint32_t handlers_size = DecodeUnsignedLeb128(&handlers_ptr);
272 for (uint32_t idx = 0; idx < handlers_size; idx++) {
273 CatchHandlerIterator iterator(handlers_ptr);
274 for (; iterator.HasNext(); iterator.Next()) {
275 uint32_t address = iterator.GetHandlerAddress();
276 FindBlock(address, false /* split */, true /*create*/,
277 /* immed_pred_block_p */ NULL);
278 }
279 handlers_ptr = iterator.EndDataPointer();
280 }
281}
282
283/* Process instructions with the kBranch flag */
buzbee0d829482013-10-11 15:24:55 -0700284BasicBlock* MIRGraph::ProcessCanBranch(BasicBlock* cur_block, MIR* insn, DexOffset cur_offset,
285 int width, int flags, const uint16_t* code_ptr,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700286 const uint16_t* code_end) {
buzbee0d829482013-10-11 15:24:55 -0700287 DexOffset target = cur_offset;
buzbee311ca162013-02-28 15:56:43 -0800288 switch (insn->dalvikInsn.opcode) {
289 case Instruction::GOTO:
290 case Instruction::GOTO_16:
291 case Instruction::GOTO_32:
292 target += insn->dalvikInsn.vA;
293 break;
294 case Instruction::IF_EQ:
295 case Instruction::IF_NE:
296 case Instruction::IF_LT:
297 case Instruction::IF_GE:
298 case Instruction::IF_GT:
299 case Instruction::IF_LE:
300 cur_block->conditional_branch = true;
301 target += insn->dalvikInsn.vC;
302 break;
303 case Instruction::IF_EQZ:
304 case Instruction::IF_NEZ:
305 case Instruction::IF_LTZ:
306 case Instruction::IF_GEZ:
307 case Instruction::IF_GTZ:
308 case Instruction::IF_LEZ:
309 cur_block->conditional_branch = true;
310 target += insn->dalvikInsn.vB;
311 break;
312 default:
313 LOG(FATAL) << "Unexpected opcode(" << insn->dalvikInsn.opcode << ") with kBranch set";
314 }
buzbeeb48819d2013-09-14 16:15:25 -0700315 CountBranch(target);
buzbee311ca162013-02-28 15:56:43 -0800316 BasicBlock *taken_block = FindBlock(target, /* split */ true, /* create */ true,
317 /* immed_pred_block_p */ &cur_block);
buzbee0d829482013-10-11 15:24:55 -0700318 cur_block->taken = taken_block->id;
319 taken_block->predecessors->Insert(cur_block->id);
buzbee311ca162013-02-28 15:56:43 -0800320
321 /* Always terminate the current block for conditional branches */
322 if (flags & Instruction::kContinue) {
323 BasicBlock *fallthrough_block = FindBlock(cur_offset + width,
324 /*
325 * If the method is processed
326 * in sequential order from the
327 * beginning, we don't need to
328 * specify split for continue
329 * blocks. However, this
330 * routine can be called by
331 * compileLoop, which starts
332 * parsing the method from an
333 * arbitrary address in the
334 * method body.
335 */
336 true,
337 /* create */
338 true,
339 /* immed_pred_block_p */
340 &cur_block);
buzbee0d829482013-10-11 15:24:55 -0700341 cur_block->fall_through = fallthrough_block->id;
342 fallthrough_block->predecessors->Insert(cur_block->id);
buzbee311ca162013-02-28 15:56:43 -0800343 } else if (code_ptr < code_end) {
buzbee27247762013-07-28 12:03:58 -0700344 FindBlock(cur_offset + width, /* split */ false, /* create */ true,
buzbee311ca162013-02-28 15:56:43 -0800345 /* immed_pred_block_p */ NULL);
buzbee311ca162013-02-28 15:56:43 -0800346 }
347 return cur_block;
348}
349
350/* Process instructions with the kSwitch flag */
buzbee17189ac2013-11-08 11:07:02 -0800351BasicBlock* MIRGraph::ProcessCanSwitch(BasicBlock* cur_block, MIR* insn, DexOffset cur_offset,
352 int width, int flags) {
buzbee311ca162013-02-28 15:56:43 -0800353 const uint16_t* switch_data =
354 reinterpret_cast<const uint16_t*>(GetCurrentInsns() + cur_offset + insn->dalvikInsn.vB);
355 int size;
356 const int* keyTable;
357 const int* target_table;
358 int i;
359 int first_key;
360
361 /*
362 * Packed switch data format:
363 * ushort ident = 0x0100 magic value
364 * ushort size number of entries in the table
365 * int first_key first (and lowest) switch case value
366 * int targets[size] branch targets, relative to switch opcode
367 *
368 * Total size is (4+size*2) 16-bit code units.
369 */
370 if (insn->dalvikInsn.opcode == Instruction::PACKED_SWITCH) {
371 DCHECK_EQ(static_cast<int>(switch_data[0]),
372 static_cast<int>(Instruction::kPackedSwitchSignature));
373 size = switch_data[1];
374 first_key = switch_data[2] | (switch_data[3] << 16);
375 target_table = reinterpret_cast<const int*>(&switch_data[4]);
376 keyTable = NULL; // Make the compiler happy
377 /*
378 * Sparse switch data format:
379 * ushort ident = 0x0200 magic value
380 * ushort size number of entries in the table; > 0
381 * int keys[size] keys, sorted low-to-high; 32-bit aligned
382 * int targets[size] branch targets, relative to switch opcode
383 *
384 * Total size is (2+size*4) 16-bit code units.
385 */
386 } else {
387 DCHECK_EQ(static_cast<int>(switch_data[0]),
388 static_cast<int>(Instruction::kSparseSwitchSignature));
389 size = switch_data[1];
390 keyTable = reinterpret_cast<const int*>(&switch_data[2]);
391 target_table = reinterpret_cast<const int*>(&switch_data[2 + size*2]);
392 first_key = 0; // To make the compiler happy
393 }
394
buzbee0d829482013-10-11 15:24:55 -0700395 if (cur_block->successor_block_list_type != kNotUsed) {
buzbee311ca162013-02-28 15:56:43 -0800396 LOG(FATAL) << "Successor block list already in use: "
buzbee0d829482013-10-11 15:24:55 -0700397 << static_cast<int>(cur_block->successor_block_list_type);
buzbee311ca162013-02-28 15:56:43 -0800398 }
buzbee0d829482013-10-11 15:24:55 -0700399 cur_block->successor_block_list_type =
400 (insn->dalvikInsn.opcode == Instruction::PACKED_SWITCH) ? kPackedSwitch : kSparseSwitch;
401 cur_block->successor_blocks =
Brian Carlstromdf629502013-07-17 22:39:56 -0700402 new (arena_) GrowableArray<SuccessorBlockInfo*>(arena_, size, kGrowableArraySuccessorBlocks);
buzbee311ca162013-02-28 15:56:43 -0800403
404 for (i = 0; i < size; i++) {
405 BasicBlock *case_block = FindBlock(cur_offset + target_table[i], /* split */ true,
406 /* create */ true, /* immed_pred_block_p */ &cur_block);
407 SuccessorBlockInfo *successor_block_info =
Mathieu Chartierf6c4b3b2013-08-24 16:11:37 -0700408 static_cast<SuccessorBlockInfo*>(arena_->Alloc(sizeof(SuccessorBlockInfo),
409 ArenaAllocator::kAllocSuccessor));
buzbee0d829482013-10-11 15:24:55 -0700410 successor_block_info->block = case_block->id;
buzbee311ca162013-02-28 15:56:43 -0800411 successor_block_info->key =
412 (insn->dalvikInsn.opcode == Instruction::PACKED_SWITCH) ?
413 first_key + i : keyTable[i];
buzbee0d829482013-10-11 15:24:55 -0700414 cur_block->successor_blocks->Insert(successor_block_info);
415 case_block->predecessors->Insert(cur_block->id);
buzbee311ca162013-02-28 15:56:43 -0800416 }
417
418 /* Fall-through case */
Brian Carlstromdf629502013-07-17 22:39:56 -0700419 BasicBlock* fallthrough_block = FindBlock(cur_offset + width, /* split */ false,
420 /* create */ true, /* immed_pred_block_p */ NULL);
buzbee0d829482013-10-11 15:24:55 -0700421 cur_block->fall_through = fallthrough_block->id;
422 fallthrough_block->predecessors->Insert(cur_block->id);
buzbee17189ac2013-11-08 11:07:02 -0800423 return cur_block;
buzbee311ca162013-02-28 15:56:43 -0800424}
425
426/* Process instructions with the kThrow flag */
buzbee0d829482013-10-11 15:24:55 -0700427BasicBlock* MIRGraph::ProcessCanThrow(BasicBlock* cur_block, MIR* insn, DexOffset cur_offset,
428 int width, int flags, ArenaBitVector* try_block_addr,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700429 const uint16_t* code_ptr, const uint16_t* code_end) {
buzbee862a7602013-04-05 10:58:54 -0700430 bool in_try_block = try_block_addr->IsBitSet(cur_offset);
buzbee17189ac2013-11-08 11:07:02 -0800431 bool is_throw = (insn->dalvikInsn.opcode == Instruction::THROW);
432 bool build_all_edges =
433 (cu_->disable_opt & (1 << kSuppressExceptionEdges)) || is_throw || in_try_block;
buzbee311ca162013-02-28 15:56:43 -0800434
435 /* In try block */
436 if (in_try_block) {
437 CatchHandlerIterator iterator(*current_code_item_, cur_offset);
438
buzbee0d829482013-10-11 15:24:55 -0700439 if (cur_block->successor_block_list_type != kNotUsed) {
buzbee311ca162013-02-28 15:56:43 -0800440 LOG(INFO) << PrettyMethod(cu_->method_idx, *cu_->dex_file);
441 LOG(FATAL) << "Successor block list already in use: "
buzbee0d829482013-10-11 15:24:55 -0700442 << static_cast<int>(cur_block->successor_block_list_type);
buzbee311ca162013-02-28 15:56:43 -0800443 }
444
buzbee0d829482013-10-11 15:24:55 -0700445 cur_block->successor_block_list_type = kCatch;
446 cur_block->successor_blocks =
buzbee862a7602013-04-05 10:58:54 -0700447 new (arena_) GrowableArray<SuccessorBlockInfo*>(arena_, 2, kGrowableArraySuccessorBlocks);
buzbee311ca162013-02-28 15:56:43 -0800448
Brian Carlstrom02c8cc62013-07-18 15:54:44 -0700449 for (; iterator.HasNext(); iterator.Next()) {
buzbee311ca162013-02-28 15:56:43 -0800450 BasicBlock *catch_block = FindBlock(iterator.GetHandlerAddress(), false /* split*/,
451 false /* creat */, NULL /* immed_pred_block_p */);
452 catch_block->catch_entry = true;
453 if (kIsDebugBuild) {
454 catches_.insert(catch_block->start_offset);
455 }
456 SuccessorBlockInfo *successor_block_info = reinterpret_cast<SuccessorBlockInfo*>
Mathieu Chartierf6c4b3b2013-08-24 16:11:37 -0700457 (arena_->Alloc(sizeof(SuccessorBlockInfo), ArenaAllocator::kAllocSuccessor));
buzbee0d829482013-10-11 15:24:55 -0700458 successor_block_info->block = catch_block->id;
buzbee311ca162013-02-28 15:56:43 -0800459 successor_block_info->key = iterator.GetHandlerTypeIndex();
buzbee0d829482013-10-11 15:24:55 -0700460 cur_block->successor_blocks->Insert(successor_block_info);
461 catch_block->predecessors->Insert(cur_block->id);
buzbee311ca162013-02-28 15:56:43 -0800462 }
buzbee17189ac2013-11-08 11:07:02 -0800463 } else if (build_all_edges) {
buzbee862a7602013-04-05 10:58:54 -0700464 BasicBlock *eh_block = NewMemBB(kExceptionHandling, num_blocks_++);
buzbee0d829482013-10-11 15:24:55 -0700465 cur_block->taken = eh_block->id;
buzbee862a7602013-04-05 10:58:54 -0700466 block_list_.Insert(eh_block);
buzbee311ca162013-02-28 15:56:43 -0800467 eh_block->start_offset = cur_offset;
buzbee0d829482013-10-11 15:24:55 -0700468 eh_block->predecessors->Insert(cur_block->id);
buzbee311ca162013-02-28 15:56:43 -0800469 }
470
buzbee17189ac2013-11-08 11:07:02 -0800471 if (is_throw) {
buzbee311ca162013-02-28 15:56:43 -0800472 cur_block->explicit_throw = true;
buzbee27247762013-07-28 12:03:58 -0700473 if (code_ptr < code_end) {
buzbee311ca162013-02-28 15:56:43 -0800474 // Force creation of new block following THROW via side-effect
475 FindBlock(cur_offset + width, /* split */ false, /* create */ true,
476 /* immed_pred_block_p */ NULL);
477 }
478 if (!in_try_block) {
479 // Don't split a THROW that can't rethrow - we're done.
480 return cur_block;
481 }
482 }
483
buzbee17189ac2013-11-08 11:07:02 -0800484 if (!build_all_edges) {
485 /*
486 * Even though there is an exception edge here, control cannot return to this
487 * method. Thus, for the purposes of dataflow analysis and optimization, we can
488 * ignore the edge. Doing this reduces compile time, and increases the scope
489 * of the basic-block level optimization pass.
490 */
491 return cur_block;
492 }
493
buzbee311ca162013-02-28 15:56:43 -0800494 /*
495 * Split the potentially-throwing instruction into two parts.
496 * The first half will be a pseudo-op that captures the exception
497 * edges and terminates the basic block. It always falls through.
498 * Then, create a new basic block that begins with the throwing instruction
499 * (minus exceptions). Note: this new basic block must NOT be entered into
500 * the block_map. If the potentially-throwing instruction is the target of a
501 * future branch, we need to find the check psuedo half. The new
502 * basic block containing the work portion of the instruction should
503 * only be entered via fallthrough from the block containing the
504 * pseudo exception edge MIR. Note also that this new block is
505 * not automatically terminated after the work portion, and may
506 * contain following instructions.
buzbeeb48819d2013-09-14 16:15:25 -0700507 *
508 * Note also that the dex_pc_to_block_map_ entry for the potentially
509 * throwing instruction will refer to the original basic block.
buzbee311ca162013-02-28 15:56:43 -0800510 */
buzbee862a7602013-04-05 10:58:54 -0700511 BasicBlock *new_block = NewMemBB(kDalvikByteCode, num_blocks_++);
512 block_list_.Insert(new_block);
buzbee311ca162013-02-28 15:56:43 -0800513 new_block->start_offset = insn->offset;
buzbee0d829482013-10-11 15:24:55 -0700514 cur_block->fall_through = new_block->id;
515 new_block->predecessors->Insert(cur_block->id);
Mathieu Chartierf6c4b3b2013-08-24 16:11:37 -0700516 MIR* new_insn = static_cast<MIR*>(arena_->Alloc(sizeof(MIR), ArenaAllocator::kAllocMIR));
buzbee311ca162013-02-28 15:56:43 -0800517 *new_insn = *insn;
518 insn->dalvikInsn.opcode =
519 static_cast<Instruction::Code>(kMirOpCheck);
520 // Associate the two halves
521 insn->meta.throw_insn = new_insn;
buzbee311ca162013-02-28 15:56:43 -0800522 AppendMIR(new_block, new_insn);
523 return new_block;
524}
525
526/* Parse a Dex method and insert it into the MIRGraph at the current insert point. */
527void MIRGraph::InlineMethod(const DexFile::CodeItem* code_item, uint32_t access_flags,
Ian Rogers8b2c0b92013-09-19 02:56:49 -0700528 InvokeType invoke_type, uint16_t class_def_idx,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700529 uint32_t method_idx, jobject class_loader, const DexFile& dex_file) {
buzbee311ca162013-02-28 15:56:43 -0800530 current_code_item_ = code_item;
531 method_stack_.push_back(std::make_pair(current_method_, current_offset_));
532 current_method_ = m_units_.size();
533 current_offset_ = 0;
534 // TODO: will need to snapshot stack image and use that as the mir context identification.
535 m_units_.push_back(new DexCompilationUnit(cu_, class_loader, Runtime::Current()->GetClassLinker(),
Vladimir Marko2730db02014-01-27 11:15:17 +0000536 dex_file, current_code_item_, class_def_idx, method_idx, access_flags,
537 cu_->compiler_driver->GetVerifiedMethod(&dex_file, method_idx)));
buzbee311ca162013-02-28 15:56:43 -0800538 const uint16_t* code_ptr = current_code_item_->insns_;
539 const uint16_t* code_end =
540 current_code_item_->insns_ + current_code_item_->insns_size_in_code_units_;
541
542 // TODO: need to rework expansion of block list & try_block_addr when inlining activated.
buzbeeb48819d2013-09-14 16:15:25 -0700543 // TUNING: use better estimate of basic blocks for following resize.
buzbee862a7602013-04-05 10:58:54 -0700544 block_list_.Resize(block_list_.Size() + current_code_item_->insns_size_in_code_units_);
buzbeeb48819d2013-09-14 16:15:25 -0700545 dex_pc_to_block_map_.SetSize(dex_pc_to_block_map_.Size() + current_code_item_->insns_size_in_code_units_);
buzbeebd663de2013-09-10 15:41:31 -0700546
buzbee311ca162013-02-28 15:56:43 -0800547 // TODO: replace with explicit resize routine. Using automatic extension side effect for now.
buzbee862a7602013-04-05 10:58:54 -0700548 try_block_addr_->SetBit(current_code_item_->insns_size_in_code_units_);
549 try_block_addr_->ClearBit(current_code_item_->insns_size_in_code_units_);
buzbee311ca162013-02-28 15:56:43 -0800550
551 // If this is the first method, set up default entry and exit blocks.
552 if (current_method_ == 0) {
553 DCHECK(entry_block_ == NULL);
554 DCHECK(exit_block_ == NULL);
Brian Carlstrom42748892013-07-18 18:04:08 -0700555 DCHECK_EQ(num_blocks_, 0);
buzbee0d829482013-10-11 15:24:55 -0700556 // Use id 0 to represent a null block.
557 BasicBlock* null_block = NewMemBB(kNullBlock, num_blocks_++);
558 DCHECK_EQ(null_block->id, NullBasicBlockId);
559 null_block->hidden = true;
560 block_list_.Insert(null_block);
buzbee862a7602013-04-05 10:58:54 -0700561 entry_block_ = NewMemBB(kEntryBlock, num_blocks_++);
buzbee862a7602013-04-05 10:58:54 -0700562 block_list_.Insert(entry_block_);
buzbee0d829482013-10-11 15:24:55 -0700563 exit_block_ = NewMemBB(kExitBlock, num_blocks_++);
buzbee862a7602013-04-05 10:58:54 -0700564 block_list_.Insert(exit_block_);
buzbee311ca162013-02-28 15:56:43 -0800565 // TODO: deprecate all "cu->" fields; move what's left to wherever CompilationUnit is allocated.
566 cu_->dex_file = &dex_file;
567 cu_->class_def_idx = class_def_idx;
568 cu_->method_idx = method_idx;
569 cu_->access_flags = access_flags;
570 cu_->invoke_type = invoke_type;
571 cu_->shorty = dex_file.GetMethodShorty(dex_file.GetMethodId(method_idx));
572 cu_->num_ins = current_code_item_->ins_size_;
573 cu_->num_regs = current_code_item_->registers_size_ - cu_->num_ins;
574 cu_->num_outs = current_code_item_->outs_size_;
575 cu_->num_dalvik_registers = current_code_item_->registers_size_;
576 cu_->insns = current_code_item_->insns_;
577 cu_->code_item = current_code_item_;
578 } else {
579 UNIMPLEMENTED(FATAL) << "Nested inlining not implemented.";
580 /*
581 * Will need to manage storage for ins & outs, push prevous state and update
582 * insert point.
583 */
584 }
585
586 /* Current block to record parsed instructions */
buzbee862a7602013-04-05 10:58:54 -0700587 BasicBlock *cur_block = NewMemBB(kDalvikByteCode, num_blocks_++);
buzbee0d829482013-10-11 15:24:55 -0700588 DCHECK_EQ(current_offset_, 0U);
buzbee311ca162013-02-28 15:56:43 -0800589 cur_block->start_offset = current_offset_;
buzbee862a7602013-04-05 10:58:54 -0700590 block_list_.Insert(cur_block);
buzbee0d829482013-10-11 15:24:55 -0700591 // TODO: for inlining support, insert at the insert point rather than entry block.
592 entry_block_->fall_through = cur_block->id;
593 cur_block->predecessors->Insert(entry_block_->id);
buzbee311ca162013-02-28 15:56:43 -0800594
595 /* Identify code range in try blocks and set up the empty catch blocks */
596 ProcessTryCatchBlocks();
597
buzbee311ca162013-02-28 15:56:43 -0800598 /* Parse all instructions and put them into containing basic blocks */
599 while (code_ptr < code_end) {
Mathieu Chartierf6c4b3b2013-08-24 16:11:37 -0700600 MIR *insn = static_cast<MIR *>(arena_->Alloc(sizeof(MIR), ArenaAllocator::kAllocMIR));
buzbee311ca162013-02-28 15:56:43 -0800601 insn->offset = current_offset_;
602 insn->m_unit_index = current_method_;
603 int width = ParseInsn(code_ptr, &insn->dalvikInsn);
604 insn->width = width;
605 Instruction::Code opcode = insn->dalvikInsn.opcode;
606 if (opcode_count_ != NULL) {
607 opcode_count_[static_cast<int>(opcode)]++;
608 }
609
buzbee311ca162013-02-28 15:56:43 -0800610 int flags = Instruction::FlagsOf(insn->dalvikInsn.opcode);
611
buzbee1da1e2f2013-11-15 13:37:01 -0800612 uint64_t df_flags = oat_data_flow_attributes_[insn->dalvikInsn.opcode];
buzbee311ca162013-02-28 15:56:43 -0800613
614 if (df_flags & DF_HAS_DEFS) {
615 def_count_ += (df_flags & DF_A_WIDE) ? 2 : 1;
616 }
617
buzbee1da1e2f2013-11-15 13:37:01 -0800618 if (df_flags & DF_LVN) {
619 cur_block->use_lvn = true; // Run local value numbering on this basic block.
620 }
621
buzbee27247762013-07-28 12:03:58 -0700622 // Check for inline data block signatures
623 if (opcode == Instruction::NOP) {
624 // A simple NOP will have a width of 1 at this point, embedded data NOP > 1.
625 if ((width == 1) && ((current_offset_ & 0x1) == 0x1) && ((code_end - code_ptr) > 1)) {
626 // Could be an aligning nop. If an embedded data NOP follows, treat pair as single unit.
627 uint16_t following_raw_instruction = code_ptr[1];
628 if ((following_raw_instruction == Instruction::kSparseSwitchSignature) ||
629 (following_raw_instruction == Instruction::kPackedSwitchSignature) ||
630 (following_raw_instruction == Instruction::kArrayDataSignature)) {
631 width += Instruction::At(code_ptr + 1)->SizeInCodeUnits();
632 }
633 }
634 if (width == 1) {
635 // It is a simple nop - treat normally.
636 AppendMIR(cur_block, insn);
637 } else {
buzbee0d829482013-10-11 15:24:55 -0700638 DCHECK(cur_block->fall_through == NullBasicBlockId);
639 DCHECK(cur_block->taken == NullBasicBlockId);
buzbee27247762013-07-28 12:03:58 -0700640 // Unreachable instruction, mark for no continuation.
641 flags &= ~Instruction::kContinue;
642 }
643 } else {
644 AppendMIR(cur_block, insn);
645 }
646
buzbeeb48819d2013-09-14 16:15:25 -0700647 // Associate the starting dex_pc for this opcode with its containing basic block.
648 dex_pc_to_block_map_.Put(insn->offset, cur_block->id);
649
buzbee27247762013-07-28 12:03:58 -0700650 code_ptr += width;
651
buzbee311ca162013-02-28 15:56:43 -0800652 if (flags & Instruction::kBranch) {
653 cur_block = ProcessCanBranch(cur_block, insn, current_offset_,
654 width, flags, code_ptr, code_end);
655 } else if (flags & Instruction::kReturn) {
656 cur_block->terminated_by_return = true;
buzbee0d829482013-10-11 15:24:55 -0700657 cur_block->fall_through = exit_block_->id;
658 exit_block_->predecessors->Insert(cur_block->id);
buzbee311ca162013-02-28 15:56:43 -0800659 /*
660 * Terminate the current block if there are instructions
661 * afterwards.
662 */
663 if (code_ptr < code_end) {
664 /*
665 * Create a fallthrough block for real instructions
666 * (incl. NOP).
667 */
buzbee27247762013-07-28 12:03:58 -0700668 FindBlock(current_offset_ + width, /* split */ false, /* create */ true,
669 /* immed_pred_block_p */ NULL);
buzbee311ca162013-02-28 15:56:43 -0800670 }
671 } else if (flags & Instruction::kThrow) {
672 cur_block = ProcessCanThrow(cur_block, insn, current_offset_, width, flags, try_block_addr_,
673 code_ptr, code_end);
674 } else if (flags & Instruction::kSwitch) {
buzbee17189ac2013-11-08 11:07:02 -0800675 cur_block = ProcessCanSwitch(cur_block, insn, current_offset_, width, flags);
buzbee311ca162013-02-28 15:56:43 -0800676 }
677 current_offset_ += width;
678 BasicBlock *next_block = FindBlock(current_offset_, /* split */ false, /* create */
679 false, /* immed_pred_block_p */ NULL);
680 if (next_block) {
681 /*
682 * The next instruction could be the target of a previously parsed
683 * forward branch so a block is already created. If the current
684 * instruction is not an unconditional branch, connect them through
685 * the fall-through link.
686 */
buzbee0d829482013-10-11 15:24:55 -0700687 DCHECK(cur_block->fall_through == NullBasicBlockId ||
688 GetBasicBlock(cur_block->fall_through) == next_block ||
689 GetBasicBlock(cur_block->fall_through) == exit_block_);
buzbee311ca162013-02-28 15:56:43 -0800690
buzbee0d829482013-10-11 15:24:55 -0700691 if ((cur_block->fall_through == NullBasicBlockId) && (flags & Instruction::kContinue)) {
692 cur_block->fall_through = next_block->id;
693 next_block->predecessors->Insert(cur_block->id);
buzbee311ca162013-02-28 15:56:43 -0800694 }
695 cur_block = next_block;
696 }
697 }
Vladimir Marko5816ed42013-11-27 17:04:20 +0000698
buzbee311ca162013-02-28 15:56:43 -0800699 if (cu_->enable_debug & (1 << kDebugDumpCFG)) {
700 DumpCFG("/sdcard/1_post_parse_cfg/", true);
701 }
702
703 if (cu_->verbose) {
buzbee1fd33462013-03-25 13:40:45 -0700704 DumpMIRGraph();
buzbee311ca162013-02-28 15:56:43 -0800705 }
706}
707
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700708void MIRGraph::ShowOpcodeStats() {
buzbee311ca162013-02-28 15:56:43 -0800709 DCHECK(opcode_count_ != NULL);
710 LOG(INFO) << "Opcode Count";
711 for (int i = 0; i < kNumPackedOpcodes; i++) {
712 if (opcode_count_[i] != 0) {
713 LOG(INFO) << "-C- " << Instruction::Name(static_cast<Instruction::Code>(i))
714 << " " << opcode_count_[i];
715 }
716 }
717}
718
719// TODO: use a configurable base prefix, and adjust callers to supply pass name.
720/* Dump the CFG into a DOT graph */
Jean Christophe Beylerd0a51552014-01-10 14:18:31 -0800721void MIRGraph::DumpCFG(const char* dir_prefix, bool all_blocks, const char *suffix) {
buzbee311ca162013-02-28 15:56:43 -0800722 FILE* file;
723 std::string fname(PrettyMethod(cu_->method_idx, *cu_->dex_file));
724 ReplaceSpecialChars(fname);
Jean Christophe Beylerd0a51552014-01-10 14:18:31 -0800725 fname = StringPrintf("%s%s%x%s.dot", dir_prefix, fname.c_str(),
726 GetBasicBlock(GetEntryBlock()->fall_through)->start_offset,
727 suffix == nullptr ? "" : suffix);
buzbee311ca162013-02-28 15:56:43 -0800728 file = fopen(fname.c_str(), "w");
729 if (file == NULL) {
730 return;
731 }
732 fprintf(file, "digraph G {\n");
733
734 fprintf(file, " rankdir=TB\n");
735
736 int num_blocks = all_blocks ? GetNumBlocks() : num_reachable_blocks_;
737 int idx;
738
739 for (idx = 0; idx < num_blocks; idx++) {
buzbee862a7602013-04-05 10:58:54 -0700740 int block_idx = all_blocks ? idx : dfs_order_->Get(idx);
buzbee311ca162013-02-28 15:56:43 -0800741 BasicBlock *bb = GetBasicBlock(block_idx);
742 if (bb == NULL) break;
743 if (bb->block_type == kDead) continue;
744 if (bb->block_type == kEntryBlock) {
745 fprintf(file, " entry_%d [shape=Mdiamond];\n", bb->id);
746 } else if (bb->block_type == kExitBlock) {
747 fprintf(file, " exit_%d [shape=Mdiamond];\n", bb->id);
748 } else if (bb->block_type == kDalvikByteCode) {
749 fprintf(file, " block%04x_%d [shape=record,label = \"{ \\\n",
750 bb->start_offset, bb->id);
751 const MIR *mir;
752 fprintf(file, " {block id %d\\l}%s\\\n", bb->id,
753 bb->first_mir_insn ? " | " : " ");
754 for (mir = bb->first_mir_insn; mir; mir = mir->next) {
755 int opcode = mir->dalvikInsn.opcode;
756 fprintf(file, " {%04x %s %s %s\\l}%s\\\n", mir->offset,
buzbee1fd33462013-03-25 13:40:45 -0700757 mir->ssa_rep ? GetDalvikDisassembly(mir) :
buzbee311ca162013-02-28 15:56:43 -0800758 (opcode < kMirOpFirst) ? Instruction::Name(mir->dalvikInsn.opcode) :
buzbee1fd33462013-03-25 13:40:45 -0700759 extended_mir_op_names_[opcode - kMirOpFirst],
buzbee311ca162013-02-28 15:56:43 -0800760 (mir->optimization_flags & MIR_IGNORE_RANGE_CHECK) != 0 ? " no_rangecheck" : " ",
761 (mir->optimization_flags & MIR_IGNORE_NULL_CHECK) != 0 ? " no_nullcheck" : " ",
762 mir->next ? " | " : " ");
763 }
764 fprintf(file, " }\"];\n\n");
765 } else if (bb->block_type == kExceptionHandling) {
766 char block_name[BLOCK_NAME_LEN];
767
768 GetBlockName(bb, block_name);
769 fprintf(file, " %s [shape=invhouse];\n", block_name);
770 }
771
772 char block_name1[BLOCK_NAME_LEN], block_name2[BLOCK_NAME_LEN];
773
buzbee0d829482013-10-11 15:24:55 -0700774 if (bb->taken != NullBasicBlockId) {
buzbee311ca162013-02-28 15:56:43 -0800775 GetBlockName(bb, block_name1);
buzbee0d829482013-10-11 15:24:55 -0700776 GetBlockName(GetBasicBlock(bb->taken), block_name2);
buzbee311ca162013-02-28 15:56:43 -0800777 fprintf(file, " %s:s -> %s:n [style=dotted]\n",
778 block_name1, block_name2);
779 }
buzbee0d829482013-10-11 15:24:55 -0700780 if (bb->fall_through != NullBasicBlockId) {
buzbee311ca162013-02-28 15:56:43 -0800781 GetBlockName(bb, block_name1);
buzbee0d829482013-10-11 15:24:55 -0700782 GetBlockName(GetBasicBlock(bb->fall_through), block_name2);
buzbee311ca162013-02-28 15:56:43 -0800783 fprintf(file, " %s:s -> %s:n\n", block_name1, block_name2);
784 }
785
buzbee0d829482013-10-11 15:24:55 -0700786 if (bb->successor_block_list_type != kNotUsed) {
buzbee311ca162013-02-28 15:56:43 -0800787 fprintf(file, " succ%04x_%d [shape=%s,label = \"{ \\\n",
788 bb->start_offset, bb->id,
buzbee0d829482013-10-11 15:24:55 -0700789 (bb->successor_block_list_type == kCatch) ? "Mrecord" : "record");
790 GrowableArray<SuccessorBlockInfo*>::Iterator iterator(bb->successor_blocks);
buzbee862a7602013-04-05 10:58:54 -0700791 SuccessorBlockInfo *successor_block_info = iterator.Next();
buzbee311ca162013-02-28 15:56:43 -0800792
793 int succ_id = 0;
794 while (true) {
795 if (successor_block_info == NULL) break;
796
buzbee0d829482013-10-11 15:24:55 -0700797 BasicBlock *dest_block = GetBasicBlock(successor_block_info->block);
buzbee862a7602013-04-05 10:58:54 -0700798 SuccessorBlockInfo *next_successor_block_info = iterator.Next();
buzbee311ca162013-02-28 15:56:43 -0800799
800 fprintf(file, " {<f%d> %04x: %04x\\l}%s\\\n",
801 succ_id++,
802 successor_block_info->key,
803 dest_block->start_offset,
804 (next_successor_block_info != NULL) ? " | " : " ");
805
806 successor_block_info = next_successor_block_info;
807 }
808 fprintf(file, " }\"];\n\n");
809
810 GetBlockName(bb, block_name1);
811 fprintf(file, " %s:s -> succ%04x_%d:n [style=dashed]\n",
812 block_name1, bb->start_offset, bb->id);
813
buzbee0d829482013-10-11 15:24:55 -0700814 if (bb->successor_block_list_type == kPackedSwitch ||
815 bb->successor_block_list_type == kSparseSwitch) {
816 GrowableArray<SuccessorBlockInfo*>::Iterator iter(bb->successor_blocks);
buzbee311ca162013-02-28 15:56:43 -0800817
818 succ_id = 0;
819 while (true) {
buzbee862a7602013-04-05 10:58:54 -0700820 SuccessorBlockInfo *successor_block_info = iter.Next();
buzbee311ca162013-02-28 15:56:43 -0800821 if (successor_block_info == NULL) break;
822
buzbee0d829482013-10-11 15:24:55 -0700823 BasicBlock* dest_block = GetBasicBlock(successor_block_info->block);
buzbee311ca162013-02-28 15:56:43 -0800824
825 GetBlockName(dest_block, block_name2);
826 fprintf(file, " succ%04x_%d:f%d:e -> %s:n\n", bb->start_offset,
827 bb->id, succ_id++, block_name2);
828 }
829 }
830 }
831 fprintf(file, "\n");
832
833 if (cu_->verbose) {
834 /* Display the dominator tree */
835 GetBlockName(bb, block_name1);
836 fprintf(file, " cfg%s [label=\"%s\", shape=none];\n",
837 block_name1, block_name1);
838 if (bb->i_dom) {
buzbee0d829482013-10-11 15:24:55 -0700839 GetBlockName(GetBasicBlock(bb->i_dom), block_name2);
buzbee311ca162013-02-28 15:56:43 -0800840 fprintf(file, " cfg%s:s -> cfg%s:n\n\n", block_name2, block_name1);
841 }
842 }
843 }
844 fprintf(file, "}\n");
845 fclose(file);
846}
847
buzbee1fd33462013-03-25 13:40:45 -0700848/* Insert an MIR instruction to the end of a basic block */
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700849void MIRGraph::AppendMIR(BasicBlock* bb, MIR* mir) {
buzbee1fd33462013-03-25 13:40:45 -0700850 if (bb->first_mir_insn == NULL) {
851 DCHECK(bb->last_mir_insn == NULL);
852 bb->last_mir_insn = bb->first_mir_insn = mir;
buzbee0d829482013-10-11 15:24:55 -0700853 mir->next = NULL;
buzbee1fd33462013-03-25 13:40:45 -0700854 } else {
855 bb->last_mir_insn->next = mir;
buzbee1fd33462013-03-25 13:40:45 -0700856 mir->next = NULL;
857 bb->last_mir_insn = mir;
858 }
859}
860
861/* Insert an MIR instruction to the head of a basic block */
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700862void MIRGraph::PrependMIR(BasicBlock* bb, MIR* mir) {
buzbee1fd33462013-03-25 13:40:45 -0700863 if (bb->first_mir_insn == NULL) {
864 DCHECK(bb->last_mir_insn == NULL);
865 bb->last_mir_insn = bb->first_mir_insn = mir;
buzbee0d829482013-10-11 15:24:55 -0700866 mir->next = NULL;
buzbee1fd33462013-03-25 13:40:45 -0700867 } else {
buzbee1fd33462013-03-25 13:40:45 -0700868 mir->next = bb->first_mir_insn;
buzbee1fd33462013-03-25 13:40:45 -0700869 bb->first_mir_insn = mir;
870 }
871}
872
873/* Insert a MIR instruction after the specified MIR */
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700874void MIRGraph::InsertMIRAfter(BasicBlock* bb, MIR* current_mir, MIR* new_mir) {
buzbee1fd33462013-03-25 13:40:45 -0700875 new_mir->next = current_mir->next;
876 current_mir->next = new_mir;
877
buzbee0d829482013-10-11 15:24:55 -0700878 if (bb->last_mir_insn == current_mir) {
buzbee1fd33462013-03-25 13:40:45 -0700879 /* Is the last MIR in the block */
880 bb->last_mir_insn = new_mir;
881 }
882}
883
Brian Carlstrom2ce745c2013-07-17 17:44:30 -0700884char* MIRGraph::GetDalvikDisassembly(const MIR* mir) {
buzbee1fd33462013-03-25 13:40:45 -0700885 DecodedInstruction insn = mir->dalvikInsn;
886 std::string str;
887 int flags = 0;
888 int opcode = insn.opcode;
889 char* ret;
890 bool nop = false;
891 SSARepresentation* ssa_rep = mir->ssa_rep;
892 Instruction::Format dalvik_format = Instruction::k10x; // Default to no-operand format
893 int defs = (ssa_rep != NULL) ? ssa_rep->num_defs : 0;
894 int uses = (ssa_rep != NULL) ? ssa_rep->num_uses : 0;
895
896 // Handle special cases.
897 if ((opcode == kMirOpCheck) || (opcode == kMirOpCheckPart2)) {
898 str.append(extended_mir_op_names_[opcode - kMirOpFirst]);
899 str.append(": ");
900 // Recover the original Dex instruction
901 insn = mir->meta.throw_insn->dalvikInsn;
902 ssa_rep = mir->meta.throw_insn->ssa_rep;
903 defs = ssa_rep->num_defs;
904 uses = ssa_rep->num_uses;
905 opcode = insn.opcode;
906 } else if (opcode == kMirOpNop) {
907 str.append("[");
buzbee0d829482013-10-11 15:24:55 -0700908 // Recover original opcode.
909 insn.opcode = Instruction::At(current_code_item_->insns_ + mir->offset)->Opcode();
910 opcode = insn.opcode;
buzbee1fd33462013-03-25 13:40:45 -0700911 nop = true;
912 }
913
914 if (opcode >= kMirOpFirst) {
915 str.append(extended_mir_op_names_[opcode - kMirOpFirst]);
916 } else {
917 dalvik_format = Instruction::FormatOf(insn.opcode);
918 flags = Instruction::FlagsOf(insn.opcode);
919 str.append(Instruction::Name(insn.opcode));
920 }
921
922 if (opcode == kMirOpPhi) {
buzbee0d829482013-10-11 15:24:55 -0700923 BasicBlockId* incoming = mir->meta.phi_incoming;
buzbee1fd33462013-03-25 13:40:45 -0700924 str.append(StringPrintf(" %s = (%s",
925 GetSSANameWithConst(ssa_rep->defs[0], true).c_str(),
926 GetSSANameWithConst(ssa_rep->uses[0], true).c_str()));
Brian Carlstromb1eba212013-07-17 18:07:19 -0700927 str.append(StringPrintf(":%d", incoming[0]));
buzbee1fd33462013-03-25 13:40:45 -0700928 int i;
929 for (i = 1; i < uses; i++) {
930 str.append(StringPrintf(", %s:%d",
931 GetSSANameWithConst(ssa_rep->uses[i], true).c_str(),
932 incoming[i]));
933 }
934 str.append(")");
935 } else if ((flags & Instruction::kBranch) != 0) {
936 // For branches, decode the instructions to print out the branch targets.
937 int offset = 0;
938 switch (dalvik_format) {
939 case Instruction::k21t:
940 str.append(StringPrintf(" %s,", GetSSANameWithConst(ssa_rep->uses[0], false).c_str()));
941 offset = insn.vB;
942 break;
943 case Instruction::k22t:
944 str.append(StringPrintf(" %s, %s,", GetSSANameWithConst(ssa_rep->uses[0], false).c_str(),
945 GetSSANameWithConst(ssa_rep->uses[1], false).c_str()));
946 offset = insn.vC;
947 break;
948 case Instruction::k10t:
949 case Instruction::k20t:
950 case Instruction::k30t:
951 offset = insn.vA;
952 break;
953 default:
954 LOG(FATAL) << "Unexpected branch format " << dalvik_format << " from " << insn.opcode;
955 }
956 str.append(StringPrintf(" 0x%x (%c%x)", mir->offset + offset,
957 offset > 0 ? '+' : '-', offset > 0 ? offset : -offset));
958 } else {
959 // For invokes-style formats, treat wide regs as a pair of singles
960 bool show_singles = ((dalvik_format == Instruction::k35c) ||
961 (dalvik_format == Instruction::k3rc));
962 if (defs != 0) {
963 str.append(StringPrintf(" %s", GetSSANameWithConst(ssa_rep->defs[0], false).c_str()));
964 if (uses != 0) {
965 str.append(", ");
966 }
967 }
968 for (int i = 0; i < uses; i++) {
969 str.append(
970 StringPrintf(" %s", GetSSANameWithConst(ssa_rep->uses[i], show_singles).c_str()));
971 if (!show_singles && (reg_location_ != NULL) && reg_location_[i].wide) {
972 // For the listing, skip the high sreg.
973 i++;
974 }
975 if (i != (uses -1)) {
976 str.append(",");
977 }
978 }
979 switch (dalvik_format) {
Brian Carlstrom7934ac22013-07-26 10:54:15 -0700980 case Instruction::k11n: // Add one immediate from vB
buzbee1fd33462013-03-25 13:40:45 -0700981 case Instruction::k21s:
982 case Instruction::k31i:
983 case Instruction::k21h:
984 str.append(StringPrintf(", #%d", insn.vB));
985 break;
Brian Carlstrom7934ac22013-07-26 10:54:15 -0700986 case Instruction::k51l: // Add one wide immediate
Ian Rogers23b03b52014-01-24 11:10:03 -0800987 str.append(StringPrintf(", #%" PRId64, insn.vB_wide));
buzbee1fd33462013-03-25 13:40:45 -0700988 break;
Brian Carlstrom7934ac22013-07-26 10:54:15 -0700989 case Instruction::k21c: // One register, one string/type/method index
buzbee1fd33462013-03-25 13:40:45 -0700990 case Instruction::k31c:
991 str.append(StringPrintf(", index #%d", insn.vB));
992 break;
Brian Carlstrom7934ac22013-07-26 10:54:15 -0700993 case Instruction::k22c: // Two registers, one string/type/method index
buzbee1fd33462013-03-25 13:40:45 -0700994 str.append(StringPrintf(", index #%d", insn.vC));
995 break;
Brian Carlstrom7934ac22013-07-26 10:54:15 -0700996 case Instruction::k22s: // Add one immediate from vC
buzbee1fd33462013-03-25 13:40:45 -0700997 case Instruction::k22b:
998 str.append(StringPrintf(", #%d", insn.vC));
999 break;
Brian Carlstrom02c8cc62013-07-18 15:54:44 -07001000 default: {
1001 // Nothing left to print
buzbee1fd33462013-03-25 13:40:45 -07001002 }
Brian Carlstrom02c8cc62013-07-18 15:54:44 -07001003 }
buzbee1fd33462013-03-25 13:40:45 -07001004 }
1005 if (nop) {
1006 str.append("]--optimized away");
1007 }
1008 int length = str.length() + 1;
Mathieu Chartierf6c4b3b2013-08-24 16:11:37 -07001009 ret = static_cast<char*>(arena_->Alloc(length, ArenaAllocator::kAllocDFInfo));
buzbee1fd33462013-03-25 13:40:45 -07001010 strncpy(ret, str.c_str(), length);
1011 return ret;
1012}
1013
1014/* Turn method name into a legal Linux file name */
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001015void MIRGraph::ReplaceSpecialChars(std::string& str) {
Brian Carlstrom9b7085a2013-07-18 15:15:21 -07001016 static const struct { const char before; const char after; } match[] = {
1017 {'/', '-'}, {';', '#'}, {' ', '#'}, {'$', '+'},
1018 {'(', '@'}, {')', '@'}, {'<', '='}, {'>', '='}
1019 };
buzbee1fd33462013-03-25 13:40:45 -07001020 for (unsigned int i = 0; i < sizeof(match)/sizeof(match[0]); i++) {
1021 std::replace(str.begin(), str.end(), match[i].before, match[i].after);
1022 }
1023}
1024
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001025std::string MIRGraph::GetSSAName(int ssa_reg) {
Ian Rogers39ebcb82013-05-30 16:57:23 -07001026 // TODO: This value is needed for LLVM and debugging. Currently, we compute this and then copy to
1027 // the arena. We should be smarter and just place straight into the arena, or compute the
1028 // value more lazily.
buzbee1fd33462013-03-25 13:40:45 -07001029 return StringPrintf("v%d_%d", SRegToVReg(ssa_reg), GetSSASubscript(ssa_reg));
1030}
1031
1032// Similar to GetSSAName, but if ssa name represents an immediate show that as well.
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001033std::string MIRGraph::GetSSANameWithConst(int ssa_reg, bool singles_only) {
buzbee1fd33462013-03-25 13:40:45 -07001034 if (reg_location_ == NULL) {
1035 // Pre-SSA - just use the standard name
1036 return GetSSAName(ssa_reg);
1037 }
1038 if (IsConst(reg_location_[ssa_reg])) {
1039 if (!singles_only && reg_location_[ssa_reg].wide) {
Ian Rogers23b03b52014-01-24 11:10:03 -08001040 return StringPrintf("v%d_%d#0x%" PRIx64, SRegToVReg(ssa_reg), GetSSASubscript(ssa_reg),
buzbee1fd33462013-03-25 13:40:45 -07001041 ConstantValueWide(reg_location_[ssa_reg]));
1042 } else {
Brian Carlstromb1eba212013-07-17 18:07:19 -07001043 return StringPrintf("v%d_%d#0x%x", SRegToVReg(ssa_reg), GetSSASubscript(ssa_reg),
buzbee1fd33462013-03-25 13:40:45 -07001044 ConstantValue(reg_location_[ssa_reg]));
1045 }
1046 } else {
1047 return StringPrintf("v%d_%d", SRegToVReg(ssa_reg), GetSSASubscript(ssa_reg));
1048 }
1049}
1050
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001051void MIRGraph::GetBlockName(BasicBlock* bb, char* name) {
buzbee1fd33462013-03-25 13:40:45 -07001052 switch (bb->block_type) {
1053 case kEntryBlock:
1054 snprintf(name, BLOCK_NAME_LEN, "entry_%d", bb->id);
1055 break;
1056 case kExitBlock:
1057 snprintf(name, BLOCK_NAME_LEN, "exit_%d", bb->id);
1058 break;
1059 case kDalvikByteCode:
1060 snprintf(name, BLOCK_NAME_LEN, "block%04x_%d", bb->start_offset, bb->id);
1061 break;
1062 case kExceptionHandling:
1063 snprintf(name, BLOCK_NAME_LEN, "exception%04x_%d", bb->start_offset,
1064 bb->id);
1065 break;
1066 default:
1067 snprintf(name, BLOCK_NAME_LEN, "_%d", bb->id);
1068 break;
1069 }
1070}
1071
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001072const char* MIRGraph::GetShortyFromTargetIdx(int target_idx) {
buzbee0d829482013-10-11 15:24:55 -07001073 // TODO: for inlining support, use current code unit.
buzbee1fd33462013-03-25 13:40:45 -07001074 const DexFile::MethodId& method_id = cu_->dex_file->GetMethodId(target_idx);
1075 return cu_->dex_file->GetShorty(method_id.proto_idx_);
1076}
1077
1078/* Debug Utility - dump a compilation unit */
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001079void MIRGraph::DumpMIRGraph() {
buzbee1fd33462013-03-25 13:40:45 -07001080 BasicBlock* bb;
1081 const char* block_type_names[] = {
buzbee17189ac2013-11-08 11:07:02 -08001082 "Null Block",
buzbee1fd33462013-03-25 13:40:45 -07001083 "Entry Block",
1084 "Code Block",
1085 "Exit Block",
1086 "Exception Handling",
1087 "Catch Block"
1088 };
1089
1090 LOG(INFO) << "Compiling " << PrettyMethod(cu_->method_idx, *cu_->dex_file);
1091 LOG(INFO) << cu_->insns << " insns";
1092 LOG(INFO) << GetNumBlocks() << " blocks in total";
buzbee862a7602013-04-05 10:58:54 -07001093 GrowableArray<BasicBlock*>::Iterator iterator(&block_list_);
buzbee1fd33462013-03-25 13:40:45 -07001094
1095 while (true) {
buzbee862a7602013-04-05 10:58:54 -07001096 bb = iterator.Next();
buzbee1fd33462013-03-25 13:40:45 -07001097 if (bb == NULL) break;
1098 LOG(INFO) << StringPrintf("Block %d (%s) (insn %04x - %04x%s)",
1099 bb->id,
1100 block_type_names[bb->block_type],
1101 bb->start_offset,
1102 bb->last_mir_insn ? bb->last_mir_insn->offset : bb->start_offset,
1103 bb->last_mir_insn ? "" : " empty");
buzbee0d829482013-10-11 15:24:55 -07001104 if (bb->taken != NullBasicBlockId) {
1105 LOG(INFO) << " Taken branch: block " << bb->taken
1106 << "(0x" << std::hex << GetBasicBlock(bb->taken)->start_offset << ")";
buzbee1fd33462013-03-25 13:40:45 -07001107 }
buzbee0d829482013-10-11 15:24:55 -07001108 if (bb->fall_through != NullBasicBlockId) {
1109 LOG(INFO) << " Fallthrough : block " << bb->fall_through
1110 << " (0x" << std::hex << GetBasicBlock(bb->fall_through)->start_offset << ")";
buzbee1fd33462013-03-25 13:40:45 -07001111 }
1112 }
1113}
1114
1115/*
1116 * Build an array of location records for the incoming arguments.
1117 * Note: one location record per word of arguments, with dummy
1118 * high-word loc for wide arguments. Also pull up any following
1119 * MOVE_RESULT and incorporate it into the invoke.
1120 */
1121CallInfo* MIRGraph::NewMemCallInfo(BasicBlock* bb, MIR* mir, InvokeType type,
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001122 bool is_range) {
Mathieu Chartierf6c4b3b2013-08-24 16:11:37 -07001123 CallInfo* info = static_cast<CallInfo*>(arena_->Alloc(sizeof(CallInfo),
1124 ArenaAllocator::kAllocMisc));
buzbee1fd33462013-03-25 13:40:45 -07001125 MIR* move_result_mir = FindMoveResult(bb, mir);
1126 if (move_result_mir == NULL) {
1127 info->result.location = kLocInvalid;
1128 } else {
1129 info->result = GetRawDest(move_result_mir);
buzbee1fd33462013-03-25 13:40:45 -07001130 move_result_mir->dalvikInsn.opcode = static_cast<Instruction::Code>(kMirOpNop);
1131 }
1132 info->num_arg_words = mir->ssa_rep->num_uses;
1133 info->args = (info->num_arg_words == 0) ? NULL : static_cast<RegLocation*>
Mathieu Chartierf6c4b3b2013-08-24 16:11:37 -07001134 (arena_->Alloc(sizeof(RegLocation) * info->num_arg_words, ArenaAllocator::kAllocMisc));
buzbee1fd33462013-03-25 13:40:45 -07001135 for (int i = 0; i < info->num_arg_words; i++) {
1136 info->args[i] = GetRawSrc(mir, i);
1137 }
1138 info->opt_flags = mir->optimization_flags;
1139 info->type = type;
1140 info->is_range = is_range;
1141 info->index = mir->dalvikInsn.vB;
1142 info->offset = mir->offset;
1143 return info;
1144}
1145
buzbee862a7602013-04-05 10:58:54 -07001146// Allocate a new basic block.
Brian Carlstrom2ce745c2013-07-17 17:44:30 -07001147BasicBlock* MIRGraph::NewMemBB(BBType block_type, int block_id) {
Mathieu Chartierf6c4b3b2013-08-24 16:11:37 -07001148 BasicBlock* bb = static_cast<BasicBlock*>(arena_->Alloc(sizeof(BasicBlock),
1149 ArenaAllocator::kAllocBB));
buzbee862a7602013-04-05 10:58:54 -07001150 bb->block_type = block_type;
1151 bb->id = block_id;
1152 // TUNING: better estimate of the exit block predecessors?
buzbee0d829482013-10-11 15:24:55 -07001153 bb->predecessors = new (arena_) GrowableArray<BasicBlockId>(arena_,
Brian Carlstromdf629502013-07-17 22:39:56 -07001154 (block_type == kExitBlock) ? 2048 : 2,
1155 kGrowableArrayPredecessors);
buzbee0d829482013-10-11 15:24:55 -07001156 bb->successor_block_list_type = kNotUsed;
buzbee862a7602013-04-05 10:58:54 -07001157 block_id_map_.Put(block_id, block_id);
1158 return bb;
1159}
buzbee1fd33462013-03-25 13:40:45 -07001160
Jean Christophe Beyler4e97c532014-01-07 10:07:18 -08001161void MIRGraph::InitializeConstantPropagation() {
1162 is_constant_v_ = new (arena_) ArenaBitVector(arena_, GetNumSSARegs(), false);
1163 constant_values_ = static_cast<int*>(arena_->Alloc(sizeof(int) * GetNumSSARegs(), ArenaAllocator::kAllocDFInfo));
1164}
1165
1166void MIRGraph::InitializeMethodUses() {
1167 // The gate starts by initializing the use counts
1168 int num_ssa_regs = GetNumSSARegs();
1169 use_counts_.Resize(num_ssa_regs + 32);
1170 raw_use_counts_.Resize(num_ssa_regs + 32);
1171 // Initialize list
1172 for (int i = 0; i < num_ssa_regs; i++) {
1173 use_counts_.Insert(0);
1174 raw_use_counts_.Insert(0);
1175 }
1176}
1177
1178void MIRGraph::InitializeSSATransformation() {
1179 /* Compute the DFS order */
1180 ComputeDFSOrders();
1181
1182 /* Compute the dominator info */
1183 ComputeDominators();
1184
1185 /* Allocate data structures in preparation for SSA conversion */
1186 CompilerInitializeSSAConversion();
1187
1188 /* Find out the "Dalvik reg def x block" relation */
1189 ComputeDefBlockMatrix();
1190
1191 /* Insert phi nodes to dominance frontiers for all variables */
1192 InsertPhiNodes();
1193
1194 /* Rename register names by local defs and phi nodes */
1195 ClearAllVisitedFlags();
1196 DoDFSPreOrderSSARename(GetEntryBlock());
1197
1198 /*
1199 * Shared temp bit vector used by each block to count the number of defs
1200 * from all the predecessor blocks.
1201 */
1202 temp_ssa_register_v_ =
1203 new (arena_) ArenaBitVector(arena_, GetNumSSARegs(), false, kBitMapTempSSARegisterV);
1204}
1205
1206void MIRGraph::CheckSSARegisterVector() {
1207 DCHECK(temp_ssa_register_v_ != nullptr);
1208}
1209
Brian Carlstrom7934ac22013-07-26 10:54:15 -07001210} // namespace art