1 /*--------------------------------------------------------------------*/
2 /*--- Callgrind data structures, functions. global.h ---*/
3 /*--------------------------------------------------------------------*/
4
5 /*
6 This file is part of Valgrind, a dynamic binary instrumentation
7 framework.
8
9 Copyright (C) 2004-2017 Josef Weidendorfer
10 josef.weidendorfer@gmx.de
11
12 This program is free software; you can redistribute it and/or
13 modify it under the terms of the GNU General Public License as
14 published by the Free Software Foundation; either version 2 of the
15 License, or (at your option) any later version.
16
17 This program is distributed in the hope that it will be useful, but
18 WITHOUT ANY WARRANTY; without even the implied warranty of
19 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
20 General Public License for more details.
21
22 You should have received a copy of the GNU General Public License
23 along with this program; if not, write to the Free Software
24 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
25 02111-1307, USA.
26
27 The GNU General Public License is contained in the file COPYING.
28 */
29
30 #ifndef CLG_GLOBAL
31 #define CLG_GLOBAL
32
33 #include "pub_tool_basics.h"
34 #include "pub_tool_vki.h"
35 #include "pub_tool_debuginfo.h"
36 #include "pub_tool_libcbase.h"
37 #include "pub_tool_libcassert.h"
38 #include "pub_tool_libcfile.h"
39 #include "pub_tool_libcprint.h"
40 #include "pub_tool_libcproc.h"
41 #include "pub_tool_machine.h"
42 #include "pub_tool_mallocfree.h"
43 #include "pub_tool_options.h"
44 #include "pub_tool_tooliface.h"
45 #include "pub_tool_xarray.h"
46 #include "pub_tool_clientstate.h"
47 #include "pub_tool_machine.h" // VG_(fnptr_to_fnentry)
48
49 #include "events.h" // defines CLG_ macro
50 #include "costs.h"
51
52
53 /*------------------------------------------------------------*/
54 /*--- Callgrind compile options --- */
55 /*------------------------------------------------------------*/
56
57 /* Enable debug output */
58 #define CLG_ENABLE_DEBUG 1
59
60 /* Enable experimental features? */
61 #define CLG_EXPERIMENTAL 0
62
63 /* Syscall Timing in microseconds?
64 * (define to 0 if you get compile errors) */
65 #define CLG_MICROSYSTIME 0
66
67
68
69 /*------------------------------------------------------------*/
70 /*--- Command line options ---*/
71 /*------------------------------------------------------------*/
72
73 #define DEFAULT_OUTFORMAT "callgrind.out.%p"
74
75 typedef struct _CommandLineOptions CommandLineOptions;
76 struct _CommandLineOptions {
77
78 /* Dump format options */
79 const HChar* out_format; /* Format string for callgrind output file name */
80 Bool combine_dumps; /* Dump trace parts into same file? */
81 Bool compress_strings;
82 Bool compress_events;
83 Bool compress_pos;
84 Bool mangle_names;
85 Bool compress_mangled;
86 Bool dump_line;
87 Bool dump_instr;
88 Bool dump_bb;
89 Bool dump_bbs; /* Dump basic block information? */
90
91 /* Dump generation options */
92 ULong dump_every_bb; /* Dump every xxx BBs. */
93
94 /* Collection options */
95 Bool separate_threads; /* Separate threads in dump? */
96 Int separate_callers; /* Separate dependent on how many callers? */
97 Int separate_recursions; /* Max level of recursions to separate */
98 Bool skip_plt; /* Skip functions in PLT section? */
99 Bool skip_direct_recursion; /* Increment direct recursions the level? */
100
101 Bool collect_atstart; /* Start in collecting state ? */
102 Bool collect_jumps; /* Collect (cond.) jumps in functions ? */
103
104 Bool collect_alloc; /* Collect size of allocated memory */
105 Bool collect_systime; /* Collect time for system calls */
106
107 Bool collect_bus; /* Collect global bus events */
108
109 /* Instrument options */
110 Bool instrument_atstart; /* Instrument at start? */
111 Bool simulate_cache; /* Call into cache simulator ? */
112 Bool simulate_branch; /* Call into branch prediction simulator ? */
113
114 /* Call graph generation */
115 Bool pop_on_jump; /* Handle a jump between functions as ret+call */
116
117 #if CLG_ENABLE_DEBUG
118 Int verbose;
119 ULong verbose_start;
120 #endif
121 };
122
123 /*------------------------------------------------------------*/
124 /*--- Constants ---*/
125 /*------------------------------------------------------------*/
126
127 /* Minimum cache line size allowed */
128 #define MIN_LINE_SIZE 16
129
130
131 /*------------------------------------------------------------*/
132 /*--- Statistics ---*/
133 /*------------------------------------------------------------*/
134
135 typedef struct _Statistics Statistics;
136 struct _Statistics {
137 ULong call_counter;
138 ULong jcnd_counter;
139 ULong jump_counter;
140 ULong rec_call_counter;
141 ULong ret_counter;
142 ULong bb_executions;
143
144 Int context_counter;
145 Int bb_retranslations;
146
147 Int distinct_objs;
148 Int distinct_files;
149 Int distinct_fns;
150 Int distinct_contexts;
151 Int distinct_bbs;
152 Int distinct_jccs;
153 Int distinct_bbccs;
154 Int distinct_instrs;
155 Int distinct_skips;
156
157 Int bb_hash_resizes;
158 Int bbcc_hash_resizes;
159 Int jcc_hash_resizes;
160 Int cxt_hash_resizes;
161 Int fn_array_resizes;
162 Int call_stack_resizes;
163 Int fn_stack_resizes;
164
165 Int full_debug_BBs;
166 Int file_line_debug_BBs;
167 Int fn_name_debug_BBs;
168 Int no_debug_BBs;
169 Int bbcc_lru_misses;
170 Int jcc_lru_misses;
171 Int cxt_lru_misses;
172 Int bbcc_clones;
173 };
174
175
176 /*------------------------------------------------------------*/
177 /*--- Structure declarations ---*/
178 /*------------------------------------------------------------*/
179
180 typedef struct _Context Context;
181 typedef struct _CC CC;
182 typedef struct _BB BB;
183 typedef struct _BBCC BBCC;
184 typedef struct _jCC jCC;
185 typedef struct _fCC fCC;
186 typedef struct _fn_node fn_node;
187 typedef struct _file_node file_node;
188 typedef struct _obj_node obj_node;
189 typedef struct _fn_config fn_config;
190 typedef struct _call_entry call_entry;
191 typedef struct _thread_info thread_info;
192
193 /* Costs of event sets. Aliases to arrays of 64-bit values */
194 typedef ULong* SimCost; /* All events the simulator can produce */
195 typedef ULong* UserCost;
196 typedef ULong* FullCost; /* Simulator + User */
197
198
199 /* The types of control flow changes that can happen between
200 * execution of two BBs in a thread.
201 */
202 typedef enum {
203 jk_None = 0, /* no explicit change by a guest instruction */
204 jk_Jump, /* regular jump */
205 jk_Call,
206 jk_Return,
207 jk_CondJump /* conditional jump taken (only used as jCC type) */
208 } ClgJumpKind;
209
210
211 /* JmpCall cost center
212 * for subroutine call (from->bb->jmp_addr => to->bb->addr)
213 *
214 * Each BB has at most one CALL instruction. The list of JCC from
215 * this call is a pointer to the list head (stored in BBCC), and
216 * <next_from> in the JCC struct.
217 *
218 * For fast lookup, JCCs are reachable with a hash table, keyed by
219 * the (from_bbcc,to) pair. <next_hash> is used for the JCC chain
220 * of one hash table entry.
221 *
222 * Cost <sum> holds event counts for already returned executions.
223 * <last> are the event counters at last enter of the subroutine.
224 * <sum> is updated on returning from the subroutine by
225 * adding the diff of <last> and current event counters to <sum>.
226 *
227 * After updating, <last> is set to current event counters. Thus,
228 * events are not counted twice for recursive calls (TODO: True?)
229 */
230
231 struct _jCC {
232 ClgJumpKind jmpkind; /* jk_Call, jk_Jump, jk_CondJump */
233 jCC* next_hash; /* for hash entry chain */
234 jCC* next_from; /* next JCC from a BBCC */
235 BBCC *from, *to; /* call arc from/to this BBCC */
236 UInt jmp; /* jump no. in source */
237
238 ULong call_counter; /* no wraparound with 64 bit */
239
240 FullCost cost; /* simulator + user counters */
241 };
242
243
244 /*
245 * Info for one instruction of a basic block.
246 */
247 typedef struct _InstrInfo InstrInfo;
248 struct _InstrInfo {
249 UInt instr_offset;
250 UInt instr_size;
251 UInt cost_offset;
252 EventSet* eventset;
253 };
254
255
256
257 /*
258 * Info for a side exit in a BB
259 */
260 typedef struct _CJmpInfo CJmpInfo;
261 struct _CJmpInfo {
262 UInt instr; /* instruction index for BB.instr array */
263 ClgJumpKind jmpkind; /* jump kind when leaving BB at this side exit */
264 };
265
266
267 /**
268 * An instrumented basic block (BB).
269 *
270 * BBs are put into a resizable hash to allow for fast detection if a
271 * BB is to be retranslated but cost info is already available.
272 * The key for a BB is a (object, offset) tupel making it independent
273 * from possibly multiple mappings of the same ELF object.
274 *
275 * At the beginning of each instrumented BB,
276 * a call to setup_bbcc(), specifying a pointer to the
277 * according BB structure, is added.
278 *
279 * As cost of a BB has to be distinguished depending on the context,
280 * multiple cost centers for one BB (struct BBCC) exist and the according
281 * BBCC is set by setup_bbcc.
282 */
283 struct _BB {
284 obj_node* obj; /* ELF object of BB */
285 PtrdiffT offset; /* offset of BB in ELF object file */
286 BB* next; /* chaining for a hash entry */
287
288 VgSectKind sect_kind; /* section of this BB, e.g. PLT */
289 UInt instr_count;
290
291 /* filled by CLG_(get_fn_node) if debug info is available */
292 fn_node* fn; /* debug info for this BB */
293 UInt line;
294 Bool is_entry; /* True if this BB is a function entry */
295
296 BBCC* bbcc_list; /* BBCCs for same BB (see next_bbcc in BBCC) */
297 BBCC* last_bbcc; /* Temporary: Cached for faster access (LRU) */
298
299 /* filled by CLG_(instrument) if not seen before */
300 UInt cjmp_count; /* number of side exits */
301 CJmpInfo* jmp; /* array of info for condition jumps,
302 * allocated directly after this struct */
303 Bool cjmp_inverted; /* is last side exit actually fall through? */
304
305 UInt instr_len;
306 UInt cost_count;
307 InstrInfo instr[0]; /* info on instruction sizes and costs */
308 };
309
310
311
312 /**
313 * Function context
314 *
315 * Basic blocks are always executed in the scope of a context.
316 * A function context is a list of function nodes representing
317 * the call chain to the current context: I.e. fn[0] is the
318 * function we are currently in, fn[1] has called fn[0], and so on.
319 * Recursion levels are used for fn[0].
320 *
321 * To get a unique number for a full execution context, use
322 * rec_index = min(<fn->rec_separation>,<active>) - 1;
323 * unique_no = <number> + rec_index
324 *
325 * For each Context, recursion index and BB, there can be a BBCC.
326 */
327 struct _Context {
328 UInt size; // number of function dependencies
329 UInt base_number; // for context compression & dump array
330 Context* next; // entry chaining for hash
331 UWord hash; // for faster lookup...
332 fn_node* fn[0];
333 };
334
335
336 /*
337 * Cost info for a side exits from a BB
338 */
339 typedef struct _JmpData JmpData;
340 struct _JmpData {
341 ULong ecounter; /* number of times the BB was left at this exit */
342 jCC* jcc_list; /* JCCs used for this exit */
343 };
344
345
346 /*
347 * Basic Block Cost Center
348 *
349 * On demand, multiple BBCCs will be created for the same BB
350 * dependent on command line options and:
351 * - current function (it's possible that a BB is executed in the
352 * context of different functions, e.g. in manual assembler/PLT)
353 * - current thread ID
354 * - position where current function is called from
355 * - recursion level of current function
356 *
357 * The cost centres for the instructions of a basic block are
358 * stored in a contiguous array.
359 * They are distinguishable by their tag field.
360 */
361 struct _BBCC {
362 BB* bb; /* BB for this cost center */
363
364 Context* cxt; /* execution context of this BBCC */
365 ThreadId tid; /* only for assertion check purpose */
366 UInt rec_index; /* Recursion index in rec->bbcc for this bbcc */
367 BBCC** rec_array; /* Variable sized array of pointers to
368 * recursion BBCCs. Shared. */
369 ULong ret_counter; /* how often returned from jccs of this bbcc;
370 * used to check if a dump for this BBCC is needed */
371
372 BBCC* next_bbcc; /* Chain of BBCCs for same BB */
373 BBCC* lru_next_bbcc; /* BBCC executed next the last time */
374
375 jCC* lru_from_jcc; /* Temporary: Cached for faster access (LRU) */
376 jCC* lru_to_jcc; /* Temporary: Cached for faster access (LRU) */
377 FullCost skipped; /* cost for skipped functions called from
378 * jmp_addr. Allocated lazy */
379
380 BBCC* next; /* entry chain in hash */
381 ULong* cost; /* start of 64bit costs for this BBCC */
382 ULong ecounter_sum; /* execution counter for first instruction of BB */
383 JmpData jmp[0];
384 };
385
386
387 /* the <number> of fn_node, file_node and obj_node are for compressed dumping
388 * and a index into the dump boolean table and fn_info_table
389 */
390
391 struct _fn_node {
392 HChar* name;
393 UInt number;
394 Context* last_cxt; /* LRU info */
395 Context* pure_cxt; /* the context with only the function itself */
396 file_node* file; /* reverse mapping for 2nd hash */
397 fn_node* next;
398
399 Bool dump_before :1;
400 Bool dump_after :1;
401 Bool zero_before :1;
402 Bool toggle_collect :1;
403 Bool skip :1;
404 Bool pop_on_jump : 1;
405
406 Bool is_malloc :1;
407 Bool is_realloc :1;
408 Bool is_free :1;
409
410 Int group;
411 Int separate_callers;
412 Int separate_recursions;
413 #if CLG_ENABLE_DEBUG
414 Int verbosity; /* Stores old verbosity level while in function */
415 #endif
416 };
417
418 /* Quite arbitrary fixed hash sizes */
419
420 #define N_OBJ_ENTRIES 47
421 #define N_FILE_ENTRIES 53
422 #define N_FN_ENTRIES 87
423
424 struct _file_node {
425 HChar* name;
426 fn_node* fns[N_FN_ENTRIES];
427 UInt number;
428 obj_node* obj;
429 file_node* next;
430 };
431
432 /* If an object is dlopened multiple times, we hope that <name> is unique;
433 * <start> and <offset> can change with each dlopen, and <start> is
434 * zero when object is unmapped (possible at dump time).
435 */
436 struct _obj_node {
437 const HChar* name;
438 UInt last_slash_pos;
439
440 Addr start; /* Start address of text segment mapping */
441 SizeT size; /* Length of mapping */
442 PtrdiffT offset; /* Offset between symbol address and file offset */
443
444 file_node* files[N_FILE_ENTRIES];
445 UInt number;
446 obj_node* next;
447 };
448
449 /* an entry in the callstack
450 *
451 * <nonskipped> is 0 if the function called is not skipped (usual case).
452 * Otherwise, it is the last non-skipped BBCC. This one gets all
453 * the calls to non-skipped functions and all costs in skipped
454 * instructions.
455 */
456 struct _call_entry {
457 jCC* jcc; /* jCC for this call */
458 FullCost enter_cost; /* cost event counters at entering frame */
459 Addr sp; /* stack pointer directly after call */
460 Addr ret_addr; /* address to which to return to
461 * is 0 on a simulated call */
462 BBCC* nonskipped; /* see above */
463 Context* cxt; /* context before call */
464 Int fn_sp; /* function stack index before call */
465 };
466
467
468 /*
469 * Execution state of main thread or a running signal handler in
470 * a thread while interrupted by another signal handler.
471 * As there's no scheduling among running signal handlers of one thread,
472 * we only need a subset of a full thread state:
473 * - event counter
474 * - collect state
475 * - last BB, last jump kind, last nonskipped BB
476 * - callstack pointer for sanity checking and correct unwinding
477 * after exit
478 */
479 typedef struct _exec_state exec_state;
480 struct _exec_state {
481
482 /* the signum of the handler, 0 for main thread context
483 */
484 Int sig;
485
486 /* the old call stack pointer at entering the signal handler */
487 Int orig_sp;
488
489 FullCost cost;
490 Bool collect;
491 Context* cxt;
492
493 /* number of conditional jumps passed in last BB */
494 Int jmps_passed;
495 BBCC* bbcc; /* last BB executed */
496 BBCC* nonskipped;
497
498 Int call_stack_bottom; /* Index into fn_stack */
499 };
500
501 /* Global state structures */
502 typedef struct _bb_hash bb_hash;
503 struct _bb_hash {
504 UInt size, entries;
505 BB** table;
506 };
507
508 typedef struct _cxt_hash cxt_hash;
509 struct _cxt_hash {
510 UInt size, entries;
511 Context** table;
512 };
513
514 /* Thread specific state structures, i.e. parts of a thread state.
515 * There are variables for the current state of each part,
516 * on which a thread state is copied at thread switch.
517 */
518 typedef struct _bbcc_hash bbcc_hash;
519 struct _bbcc_hash {
520 UInt size, entries;
521 BBCC** table;
522 };
523
524 typedef struct _jcc_hash jcc_hash;
525 struct _jcc_hash {
526 UInt size, entries;
527 jCC** table;
528 jCC* spontaneous;
529 };
530
531 typedef struct _fn_array fn_array;
532 struct _fn_array {
533 UInt size;
534 UInt* array;
535 };
536
537 typedef struct _call_stack call_stack;
538 struct _call_stack {
539 UInt size;
540 Int sp;
541 call_entry* entry;
542 };
543
544 typedef struct _fn_stack fn_stack;
545 struct _fn_stack {
546 UInt size;
547 fn_node **bottom, **top;
548 };
549
550 /* The maximum number of simultaneous running signal handlers per thread.
551 * This is the number of execution states storable in a thread.
552 */
553 #define MAX_SIGHANDLERS 10
554
555 typedef struct _exec_stack exec_stack;
556 struct _exec_stack {
557 Int sp; /* > 0 if a handler is running */
558 exec_state* entry[MAX_SIGHANDLERS];
559 };
560
561 /* Thread State
562 *
563 * This structure stores thread specific info while a thread is *not*
564 * running. See function switch_thread() for save/restore on thread switch.
565 *
566 * If --separate-threads=no, BBCCs and JCCs can be shared by all threads, i.e.
567 * only structures of thread 1 are used.
568 * This involves variables fn_info_table, bbcc_table and jcc_table.
569 */
570 struct _thread_info {
571
572 /* state */
573 fn_stack fns; /* function stack */
574 call_stack calls; /* context call arc stack */
575 exec_stack states; /* execution states interrupted by signals */
576
577 /* dump statistics */
578 FullCost lastdump_cost; /* Cost at last dump */
579 FullCost sighandler_cost;
580
581 /* thread specific data structure containers */
582 fn_array fn_active;
583 jcc_hash jccs;
584 bbcc_hash bbccs;
585 };
586
587 /* Structs used for dumping */
588
589 /* Address position inside of a BBCC:
590 * This includes
591 * - the address offset from the BB start address
592 * - file/line from debug info for that address (can change inside a BB)
593 */
594 typedef struct _AddrPos AddrPos;
595 struct _AddrPos {
596 Addr addr;
597 Addr bb_addr;
598 file_node* file;
599 UInt line;
600 };
601
602 /* a simulator cost entity that can be written out in one line */
603 typedef struct _AddrCost AddrCost;
604 struct _AddrCost {
605 AddrPos p;
606 SimCost cost;
607 };
608
609 /* A function in an execution context */
610 typedef struct _FnPos FnPos;
611 struct _FnPos {
612 file_node* file;
613 fn_node* fn;
614 obj_node* obj;
615 Context* cxt;
616 int rec_index;
617 UInt line;
618 };
619
620 /*------------------------------------------------------------*/
621 /*--- Cache simulator interface ---*/
622 /*------------------------------------------------------------*/
623
624 struct cachesim_if
625 {
626 void (*print_opts)(void);
627 Bool (*parse_opt)(const HChar* arg);
628 void (*post_clo_init)(void);
629 void (*clear)(void);
630 void (*dump_desc)(VgFile *fp);
631 void (*printstat)(Int,Int,Int);
632 void (*add_icost)(SimCost, BBCC*, InstrInfo*, ULong);
633 void (*finish)(void);
634
635 void (*log_1I0D)(InstrInfo*) VG_REGPARM(1);
636 void (*log_2I0D)(InstrInfo*, InstrInfo*) VG_REGPARM(2);
637 void (*log_3I0D)(InstrInfo*, InstrInfo*, InstrInfo*) VG_REGPARM(3);
638
639 void (*log_1I1Dr)(InstrInfo*, Addr, Word) VG_REGPARM(3);
640 void (*log_1I1Dw)(InstrInfo*, Addr, Word) VG_REGPARM(3);
641
642 void (*log_0I1Dr)(InstrInfo*, Addr, Word) VG_REGPARM(3);
643 void (*log_0I1Dw)(InstrInfo*, Addr, Word) VG_REGPARM(3);
644
645 // function names of helpers (for debugging generated code)
646 const HChar *log_1I0D_name, *log_2I0D_name, *log_3I0D_name;
647 const HChar *log_1I1Dr_name, *log_1I1Dw_name;
648 const HChar *log_0I1Dr_name, *log_0I1Dw_name;
649 };
650
651 // Event groups
652 #define EG_USE 0
653 #define EG_IR 1
654 #define EG_DR 2
655 #define EG_DW 3
656 #define EG_BC 4
657 #define EG_BI 5
658 #define EG_BUS 6
659 #define EG_ALLOC 7
660 #define EG_SYS 8
661
662 struct event_sets {
663 EventSet *base, *full;
664 };
665
666 #define fullOffset(group) (CLG_(sets).full->offset[group])
667
668
669 /*------------------------------------------------------------*/
670 /*--- Functions ---*/
671 /*------------------------------------------------------------*/
672
673 /* from clo.c */
674
675 void CLG_(set_clo_defaults)(void);
676 void CLG_(update_fn_config)(fn_node*);
677 Bool CLG_(process_cmd_line_option)(const HChar*);
678 void CLG_(print_usage)(void);
679 void CLG_(print_debug_usage)(void);
680
681 /* from sim.c */
682 void CLG_(init_eventsets)(void);
683
684 /* from main.c */
685 Bool CLG_(get_debug_info)(Addr, const HChar **dirname,
686 const HChar **filename,
687 const HChar **fn_name, UInt*, DebugInfo**);
688 void CLG_(collectBlockInfo)(IRSB* bbIn, UInt*, UInt*, Bool*);
689 void CLG_(set_instrument_state)(const HChar*,Bool);
690 void CLG_(dump_profile)(const HChar* trigger,Bool only_current_thread);
691 void CLG_(zero_all_cost)(Bool only_current_thread);
692 Int CLG_(get_dump_counter)(void);
693 void CLG_(fini)(Int exitcode);
694
695 /* from bb.c */
696 void CLG_(init_bb_hash)(void);
697 bb_hash* CLG_(get_bb_hash)(void);
698 BB* CLG_(get_bb)(Addr addr, IRSB* bb_in, Bool *seen_before);
699 void CLG_(delete_bb)(Addr addr);
700
bb_addr(BB * bb)701 static __inline__ Addr bb_addr(BB* bb)
702 { return bb->offset + bb->obj->offset; }
bb_jmpaddr(BB * bb)703 static __inline__ Addr bb_jmpaddr(BB* bb)
704 { UInt off = (bb->instr_count > 0) ? bb->instr[bb->instr_count-1].instr_offset : 0;
705 return off + bb->offset + bb->obj->offset; }
706
707 /* from fn.c */
708 void CLG_(init_fn_array)(fn_array*);
709 void CLG_(copy_current_fn_array)(fn_array* dst);
710 fn_array* CLG_(get_current_fn_array)(void);
711 void CLG_(set_current_fn_array)(fn_array*);
712 UInt* CLG_(get_fn_entry)(Int n);
713
714 void CLG_(init_obj_table)(void);
715 obj_node* CLG_(get_obj_node)(DebugInfo* si);
716 file_node* CLG_(get_file_node)(obj_node*, const HChar *dirname,
717 const HChar* filename);
718 fn_node* CLG_(get_fn_node)(BB* bb);
719
720 /* from bbcc.c */
721 void CLG_(init_bbcc_hash)(bbcc_hash* bbccs);
722 void CLG_(copy_current_bbcc_hash)(bbcc_hash* dst);
723 bbcc_hash* CLG_(get_current_bbcc_hash)(void);
724 void CLG_(set_current_bbcc_hash)(bbcc_hash*);
725 void CLG_(forall_bbccs)(void (*func)(BBCC*));
726 void CLG_(zero_bbcc)(BBCC* bbcc);
727 BBCC* CLG_(get_bbcc)(BB* bb);
728 BBCC* CLG_(clone_bbcc)(BBCC* orig, Context* cxt, Int rec_index);
729 void CLG_(setup_bbcc)(BB* bb) VG_REGPARM(1);
730
731
732 /* from jumps.c */
733 void CLG_(init_jcc_hash)(jcc_hash*);
734 void CLG_(copy_current_jcc_hash)(jcc_hash* dst);
735 void CLG_(set_current_jcc_hash)(jcc_hash*);
736 jCC* CLG_(get_jcc)(BBCC* from, UInt, BBCC* to);
737
738 /* from callstack.c */
739 void CLG_(init_call_stack)(call_stack*);
740 void CLG_(copy_current_call_stack)(call_stack* dst);
741 void CLG_(set_current_call_stack)(call_stack*);
742 call_entry* CLG_(get_call_entry)(Int n);
743
744 void CLG_(push_call_stack)(BBCC* from, UInt jmp, BBCC* to, Addr sp, Bool skip);
745 void CLG_(pop_call_stack)(void);
746 Int CLG_(unwind_call_stack)(Addr sp, Int);
747
748 /* from context.c */
749 void CLG_(init_fn_stack)(fn_stack*);
750 void CLG_(copy_current_fn_stack)(fn_stack*);
751 void CLG_(set_current_fn_stack)(fn_stack*);
752
753 void CLG_(init_cxt_table)(void);
754 Context* CLG_(get_cxt)(fn_node** fn);
755 void CLG_(push_cxt)(fn_node* fn);
756
757 /* from threads.c */
758 void CLG_(init_threads)(void);
759 thread_info** CLG_(get_threads)(void);
760 thread_info* CLG_(get_current_thread)(void);
761 void CLG_(switch_thread)(ThreadId tid);
762 void CLG_(forall_threads)(void (*func)(thread_info*));
763 void CLG_(run_thread)(ThreadId tid);
764
765 void CLG_(init_exec_state)(exec_state* es);
766 void CLG_(init_exec_stack)(exec_stack*);
767 void CLG_(copy_current_exec_stack)(exec_stack*);
768 void CLG_(set_current_exec_stack)(exec_stack*);
769 void CLG_(pre_signal)(ThreadId tid, Int sigNum, Bool alt_stack);
770 void CLG_(post_signal)(ThreadId tid, Int sigNum);
771 void CLG_(run_post_signal_on_call_stack_bottom)(void);
772
773 /* from dump.c */
774 void CLG_(init_dumps)(void);
775
776 /*------------------------------------------------------------*/
777 /*--- Exported global variables ---*/
778 /*------------------------------------------------------------*/
779
780 extern CommandLineOptions CLG_(clo);
781 extern Statistics CLG_(stat);
782 extern EventMapping* CLG_(dumpmap);
783
784 /* Function active counter array, indexed by function number */
785 extern UInt* CLG_(fn_active_array);
786 extern Bool CLG_(instrument_state);
787 /* min of L1 and LL cache line sizes */
788 extern Int CLG_(min_line_size);
789 extern call_stack CLG_(current_call_stack);
790 extern fn_stack CLG_(current_fn_stack);
791 extern exec_state CLG_(current_state);
792 extern ThreadId CLG_(current_tid);
793 extern FullCost CLG_(total_cost);
794 extern struct cachesim_if CLG_(cachesim);
795 extern struct event_sets CLG_(sets);
796
797 // set by setup_bbcc at start of every BB, and needed by log_* helpers
798 extern Addr CLG_(bb_base);
799 extern ULong* CLG_(cost_base);
800
801
802 /*------------------------------------------------------------*/
803 /*--- Debug output ---*/
804 /*------------------------------------------------------------*/
805
806 #if CLG_ENABLE_DEBUG
807
808 #define CLG_DEBUGIF(x) \
809 if (UNLIKELY( (CLG_(clo).verbose >x) && \
810 (CLG_(stat).bb_executions >= CLG_(clo).verbose_start)))
811
812 #define CLG_DEBUG(x,format,args...) \
813 CLG_DEBUGIF(x) { \
814 CLG_(print_bbno)(); \
815 VG_(printf)(format,##args); \
816 }
817
818 #define CLG_ASSERT(cond) \
819 if (UNLIKELY(!(cond))) { \
820 CLG_(print_context)(); \
821 CLG_(print_bbno)(); \
822 tl_assert(cond); \
823 }
824
825 #else
826 #define CLG_DEBUGIF(x) if (0)
827 #define CLG_DEBUG(x...) {}
828 #define CLG_ASSERT(cond) tl_assert(cond);
829 #endif
830
831 /* from debug.c */
832 void CLG_(print_bbno)(void);
833 void CLG_(print_context)(void);
834 void CLG_(print_jcc)(int s, jCC* jcc);
835 void CLG_(print_bbcc)(int s, BBCC* bbcc);
836 void CLG_(print_bbcc_fn)(BBCC* bbcc);
837 void CLG_(print_execstate)(int s, exec_state* es);
838 void CLG_(print_eventset)(int s, EventSet* es);
839 void CLG_(print_cost)(int s, EventSet*, ULong* cost);
840 void CLG_(print_bb)(int s, BB* bb);
841 void CLG_(print_bbcc_cost)(int s, BBCC*);
842 void CLG_(print_cxt)(int s, Context* cxt, int rec_index);
843 void CLG_(print_short_jcc)(jCC* jcc);
844 void CLG_(print_stackentry)(int s, int sp);
845 void CLG_(print_addr)(Addr addr);
846 void CLG_(print_addr_ln)(Addr addr);
847
848 void* CLG_(malloc)(const HChar* cc, UWord s, const HChar* f);
849 void* CLG_(free)(void* p, const HChar* f);
850 #if 0
851 #define CLG_MALLOC(_cc,x) CLG_(malloc)((_cc),x,__FUNCTION__)
852 #define CLG_FREE(p) CLG_(free)(p,__FUNCTION__)
853 #else
854 #define CLG_MALLOC(_cc,x) VG_(malloc)((_cc),x)
855 #define CLG_FREE(p) VG_(free)(p)
856 #endif
857
858 #endif /* CLG_GLOBAL */
859