stmt1: __gcov_indirect_call_counters = get_relevant_counter_ptr ();
stmt2: tmp1 = (void *) (indirect call argument value)
stmt3: __gcov_indirect_call_callee = tmp1;
+
+ Example:
+ f_1 = foo;
+ __gcov_indirect_call_counters = &__gcov4.main[0];
+ PROF_9 = f_1;
+ __gcov_indirect_call_callee = PROF_9;
+ _4 = f_1 ();
*/
stmt1 = gimple_build_assign (ic_gcov_type_ptr_var, ref_ptr);
gimple_gen_ic_func_profiler (void)
{
struct cgraph_node * c_node = cgraph_node::get (current_function_decl);
- gimple_stmt_iterator gsi;
gcall *stmt1;
- gassign *stmt2;
tree tree_uid, cur_func, void0;
if (c_node->only_called_directly_p ())
gimple_init_gcov_profiler ();
+ basic_block entry = ENTRY_BLOCK_PTR_FOR_FN (cfun);
+ basic_block cond_bb = split_edge (single_succ_edge (entry));
+ basic_block update_bb = split_edge (single_succ_edge (cond_bb));
+
+ edge true_edge = single_succ_edge (cond_bb);
+ true_edge->flags = EDGE_TRUE_VALUE;
+
+ int probability;
+ if (DECL_VIRTUAL_P (current_function_decl))
+ probability = PROB_VERY_LIKELY;
+ else
+ probability = PROB_UNLIKELY;
+
+ true_edge->probability = probability;
+ edge e = make_edge (cond_bb, single_succ_edge (update_bb)->dest,
+ EDGE_FALSE_VALUE);
+ e->probability = REG_BR_PROB_BASE - true_edge->probability;
+
/* Insert code:
- stmt1: __gcov_indirect_call_profiler_v2 (profile_id,
- ¤t_function_decl)
- */
- gsi = gsi_after_labels (split_edge (single_succ_edge
- (ENTRY_BLOCK_PTR_FOR_FN (cfun))));
+ if (__gcov_indirect_call_callee != NULL)
+ __gcov_indirect_call_profiler_v2 (profile_id, ¤t_function_decl);
+
+ The function __gcov_indirect_call_profiler_v2 is responsible for
+ resetting __gcov_indirect_call_callee to NULL. */
+
+ gimple_stmt_iterator gsi = gsi_start_bb (cond_bb);
+ void0 = build_int_cst (build_pointer_type (void_type_node), 0);
+
+ tree ref = force_gimple_operand_gsi (&gsi, ic_void_ptr_var, true, NULL_TREE,
+ true, GSI_SAME_STMT);
+
+ gcond *cond = gimple_build_cond (NE_EXPR, ref,
+ void0, NULL, NULL);
+ gsi_insert_before (&gsi, cond, GSI_NEW_STMT);
+
+ gsi = gsi_after_labels (update_bb);
cur_func = force_gimple_operand_gsi (&gsi,
build_addr (current_function_decl),
stmt1 = gimple_build_call (tree_indirect_call_profiler_fn, 2,
tree_uid, cur_func);
gsi_insert_before (&gsi, stmt1, GSI_SAME_STMT);
-
- /* Set __gcov_indirect_call_callee to 0,
- so that calls from other modules won't get misattributed
- to the last caller of the current callee. */
- void0 = build_int_cst (build_pointer_type (void_type_node), 0);
- stmt2 = gimple_build_assign (ic_void_ptr_var, void0);
- gsi_insert_before (&gsi, stmt2, GSI_SAME_STMT);
}
/* Output instructions as GIMPLE tree at the beginning for each function.
basic_block entry = ENTRY_BLOCK_PTR_FOR_FN (cfun);
basic_block cond_bb = split_edge (single_succ_edge (entry));
basic_block update_bb = split_edge (single_succ_edge (cond_bb));
- split_edge (single_succ_edge (update_bb));
edge true_edge = single_succ_edge (cond_bb);
true_edge->flags = EDGE_TRUE_VALUE;
- true_edge->probability = PROB_VERY_UNLIKELY;
+ true_edge->probability = PROB_UNLIKELY;
edge e
= make_edge (cond_bb, single_succ_edge (update_bb)->dest, EDGE_FALSE_VALUE);
e->probability = REG_BR_PROB_BASE - true_edge->probability;