summaryrefslogtreecommitdiff
path: root/gprof/call_graph.c
diff options
context:
space:
mode:
Diffstat (limited to 'gprof/call_graph.c')
-rw-r--r--gprof/call_graph.c117
1 files changed, 0 insertions, 117 deletions
diff --git a/gprof/call_graph.c b/gprof/call_graph.c
deleted file mode 100644
index 6eee251ff08..00000000000
--- a/gprof/call_graph.c
+++ /dev/null
@@ -1,117 +0,0 @@
-#include "cg_arcs.h"
-#include "call_graph.h"
-#include "corefile.h"
-#include "gmon_io.h"
-#include "gmon_out.h"
-#include "symtab.h"
-#include "sym_ids.h"
-
-extern void
-DEFUN (cg_tally, (from_pc, self_pc, count),
- bfd_vma from_pc AND bfd_vma self_pc AND unsigned long count)
-{
- Sym *parent;
- Sym *child;
-
- parent = sym_lookup (&symtab, from_pc);
- child = sym_lookup (&symtab, self_pc);
-
- if (child == NULL || parent == NULL)
- return;
-
- /* If we're doing line-by-line profiling, both the parent and the
- child will probably point to line symbols instead of function
- symbols. For the parent this is fine, since this identifies the
- line number in the calling routing, but the child should always
- point to a function entry point, so we back up in the symbol
- table until we find it.
-
- For normal profiling, is_func will be set on all symbols, so this
- code will do nothing. */
-
- while (child >= symtab.base && ! child->is_func)
- --child;
-
- if (child < symtab.base)
- return;
-
- /*
- * Keep arc if it is on INCL_ARCS table or if the INCL_ARCS table
- * is empty and it is not in the EXCL_ARCS table.
- */
- if (sym_id_arc_is_present (&syms[INCL_ARCS], parent, child)
- || (syms[INCL_ARCS].len == 0
- && !sym_id_arc_is_present (&syms[EXCL_ARCS], parent, child)))
- {
- child->ncalls += count;
- DBG (TALLYDEBUG,
- printf (_("[cg_tally] arc from %s to %s traversed %lu times\n"),
- parent->name, child->name, count));
- arc_add (parent, child, count);
- }
-}
-
-
-/*
- * Read a record from file IFP describing an arc in the function
- * call-graph and the count of how many times the arc has been
- * traversed. FILENAME is the name of file IFP and is provided
- * for formatting error-messages only.
- */
-void
-DEFUN (cg_read_rec, (ifp, filename), FILE * ifp AND CONST char *filename)
-{
- bfd_vma from_pc, self_pc;
- struct gmon_cg_arc_record arc;
- unsigned long count;
-
- if (fread (&arc, sizeof (arc), 1, ifp) != 1)
- {
- fprintf (stderr, _("%s: %s: unexpected end of file\n"),
- whoami, filename);
- done (1);
- }
- from_pc = get_vma (core_bfd, (bfd_byte *) arc.from_pc);
- self_pc = get_vma (core_bfd, (bfd_byte *) arc.self_pc);
- count = bfd_get_32 (core_bfd, (bfd_byte *) arc.count);
- DBG (SAMPLEDEBUG,
- printf ("[cg_read_rec] frompc 0x%lx selfpc 0x%lx count %lu\n",
- (unsigned long) from_pc, (unsigned long) self_pc, count));
- /* add this arc: */
- cg_tally (from_pc, self_pc, count);
-}
-
-
-/*
- * Write all the arcs in the call-graph to file OFP. FILENAME is
- * the name of OFP and is provided for formatting error-messages
- * only.
- */
-void
-DEFUN (cg_write_arcs, (ofp, filename), FILE * ofp AND const char *filename)
-{
- const unsigned char tag = GMON_TAG_CG_ARC;
- struct gmon_cg_arc_record raw_arc;
- Arc *arc;
- Sym *sym;
-
- for (sym = symtab.base; sym < symtab.limit; sym++)
- {
- for (arc = sym->cg.children; arc; arc = arc->next_child)
- {
- put_vma (core_bfd, arc->parent->addr, (bfd_byte *) raw_arc.from_pc);
- put_vma (core_bfd, arc->child->addr, (bfd_byte *) raw_arc.self_pc);
- bfd_put_32 (core_bfd, arc->count, (bfd_byte *) raw_arc.count);
- if (fwrite (&tag, sizeof (tag), 1, ofp) != 1
- || fwrite (&raw_arc, sizeof (raw_arc), 1, ofp) != 1)
- {
- perror (filename);
- done (1);
- }
- DBG (SAMPLEDEBUG,
- printf ("[cg_write_arcs] frompc 0x%lx selfpc 0x%lx count %lu\n",
- (unsigned long) arc->parent->addr,
- (unsigned long) arc->child->addr, arc->count));
- }
- }
-}