2000-07-25 04:59:04 +08:00
|
|
|
|
/* call_graph.c - Create call graphs.
|
|
|
|
|
|
2017-01-02 11:36:43 +08:00
|
|
|
|
Copyright (C) 1999-2017 Free Software Foundation, Inc.
|
2000-07-25 04:59:04 +08:00
|
|
|
|
|
|
|
|
|
This file is part of GNU Binutils.
|
|
|
|
|
|
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
|
|
|
it under the terms of the GNU General Public License as published by
|
2007-07-06 18:40:34 +08:00
|
|
|
|
the Free Software Foundation; either version 3 of the License, or
|
2000-07-25 04:59:04 +08:00
|
|
|
|
(at your option) any later version.
|
|
|
|
|
|
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
|
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
|
GNU General Public License for more details.
|
|
|
|
|
|
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
|
|
|
along with this program; if not, write to the Free Software
|
2005-05-09 14:55:25 +08:00
|
|
|
|
Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA
|
|
|
|
|
02110-1301, USA. */
|
2000-07-25 04:59:04 +08:00
|
|
|
|
|
2002-01-31 20:56:08 +08:00
|
|
|
|
#include "gprof.h"
|
|
|
|
|
#include "search_list.h"
|
|
|
|
|
#include "source.h"
|
|
|
|
|
#include "symtab.h"
|
1999-05-03 15:29:11 +08:00
|
|
|
|
#include "cg_arcs.h"
|
|
|
|
|
#include "call_graph.h"
|
|
|
|
|
#include "corefile.h"
|
|
|
|
|
#include "gmon_io.h"
|
|
|
|
|
#include "gmon_out.h"
|
|
|
|
|
#include "sym_ids.h"
|
|
|
|
|
|
2002-02-01 16:24:16 +08:00
|
|
|
|
void
|
* alpha.c, basic_blocks.c, basic_blocks.h, bb_exit_func.c,
call_graph.c, call_graph.h, cg_arcs.c, cg_arcs.h, cg_dfn.c,
cg_dfn.h, cg_print.c, cg_print.h, corefile.c, corefile.h,
gmon_io.c, gmon_io.h, gprof.c, gprof.h, hertz.h, hist.c, hist.h,
i386.c, mips.c, search_list.c, search_list.h, source.c, source.h,
sparc.c, sym_ids.c, sym_ids.h, symtab.c, symtab.h, tahoe.c,
utils.c, utils.h, vax.c, gen-c-prog.awk: Convert K&R C to ANSI C.
2004-05-26 12:55:55 +08:00
|
|
|
|
cg_tally (bfd_vma from_pc, bfd_vma self_pc, unsigned long count)
|
1999-05-03 15:29:11 +08:00
|
|
|
|
{
|
|
|
|
|
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.
|
2001-03-14 11:14:56 +08:00
|
|
|
|
|
1999-05-03 15:29:11 +08:00
|
|
|
|
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;
|
|
|
|
|
|
2000-07-25 04:59:04 +08:00
|
|
|
|
/* 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. */
|
1999-05-03 15:29:11 +08:00
|
|
|
|
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);
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
2000-07-25 04:59:04 +08:00
|
|
|
|
/* 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. */
|
1999-05-03 15:29:11 +08:00
|
|
|
|
|
|
|
|
|
void
|
* alpha.c, basic_blocks.c, basic_blocks.h, bb_exit_func.c,
call_graph.c, call_graph.h, cg_arcs.c, cg_arcs.h, cg_dfn.c,
cg_dfn.h, cg_print.c, cg_print.h, corefile.c, corefile.h,
gmon_io.c, gmon_io.h, gprof.c, gprof.h, hertz.h, hist.c, hist.h,
i386.c, mips.c, search_list.c, search_list.h, source.c, source.h,
sparc.c, sym_ids.c, sym_ids.h, symtab.c, symtab.h, tahoe.c,
utils.c, utils.h, vax.c, gen-c-prog.awk: Convert K&R C to ANSI C.
2004-05-26 12:55:55 +08:00
|
|
|
|
cg_read_rec (FILE *ifp, const char *filename)
|
1999-05-03 15:29:11 +08:00
|
|
|
|
{
|
|
|
|
|
bfd_vma from_pc, self_pc;
|
2001-03-14 11:14:56 +08:00
|
|
|
|
unsigned int count;
|
1999-05-03 15:29:11 +08:00
|
|
|
|
|
2001-03-14 11:14:56 +08:00
|
|
|
|
if (gmon_io_read_vma (ifp, &from_pc)
|
|
|
|
|
|| gmon_io_read_vma (ifp, &self_pc)
|
|
|
|
|
|| gmon_io_read_32 (ifp, &count))
|
1999-05-03 15:29:11 +08:00
|
|
|
|
{
|
|
|
|
|
fprintf (stderr, _("%s: %s: unexpected end of file\n"),
|
|
|
|
|
whoami, filename);
|
|
|
|
|
done (1);
|
|
|
|
|
}
|
2001-03-14 11:14:56 +08:00
|
|
|
|
|
1999-05-03 15:29:11 +08:00
|
|
|
|
DBG (SAMPLEDEBUG,
|
|
|
|
|
printf ("[cg_read_rec] frompc 0x%lx selfpc 0x%lx count %lu\n",
|
2001-03-14 11:14:56 +08:00
|
|
|
|
(unsigned long) from_pc, (unsigned long) self_pc,
|
|
|
|
|
(unsigned long) count));
|
2000-07-25 04:59:04 +08:00
|
|
|
|
/* Add this arc: */
|
1999-05-03 15:29:11 +08:00
|
|
|
|
cg_tally (from_pc, self_pc, count);
|
|
|
|
|
}
|
|
|
|
|
|
2000-07-25 04:59:04 +08:00
|
|
|
|
/* 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. */
|
1999-05-03 15:29:11 +08:00
|
|
|
|
|
|
|
|
|
void
|
* alpha.c, basic_blocks.c, basic_blocks.h, bb_exit_func.c,
call_graph.c, call_graph.h, cg_arcs.c, cg_arcs.h, cg_dfn.c,
cg_dfn.h, cg_print.c, cg_print.h, corefile.c, corefile.h,
gmon_io.c, gmon_io.h, gprof.c, gprof.h, hertz.h, hist.c, hist.h,
i386.c, mips.c, search_list.c, search_list.h, source.c, source.h,
sparc.c, sym_ids.c, sym_ids.h, symtab.c, symtab.h, tahoe.c,
utils.c, utils.h, vax.c, gen-c-prog.awk: Convert K&R C to ANSI C.
2004-05-26 12:55:55 +08:00
|
|
|
|
cg_write_arcs (FILE *ofp, const char *filename)
|
1999-05-03 15:29:11 +08:00
|
|
|
|
{
|
|
|
|
|
Arc *arc;
|
|
|
|
|
Sym *sym;
|
|
|
|
|
|
|
|
|
|
for (sym = symtab.base; sym < symtab.limit; sym++)
|
|
|
|
|
{
|
|
|
|
|
for (arc = sym->cg.children; arc; arc = arc->next_child)
|
|
|
|
|
{
|
2001-03-14 11:14:56 +08:00
|
|
|
|
if (gmon_io_write_8 (ofp, GMON_TAG_CG_ARC)
|
|
|
|
|
|| gmon_io_write_vma (ofp, arc->parent->addr)
|
|
|
|
|
|| gmon_io_write_vma (ofp, arc->child->addr)
|
|
|
|
|
|| gmon_io_write_32 (ofp, arc->count))
|
1999-05-03 15:29:11 +08:00
|
|
|
|
{
|
|
|
|
|
perror (filename);
|
|
|
|
|
done (1);
|
|
|
|
|
}
|
|
|
|
|
DBG (SAMPLEDEBUG,
|
|
|
|
|
printf ("[cg_write_arcs] frompc 0x%lx selfpc 0x%lx count %lu\n",
|
1999-07-01 06:38:30 +08:00
|
|
|
|
(unsigned long) arc->parent->addr,
|
|
|
|
|
(unsigned long) arc->child->addr, arc->count));
|
1999-05-03 15:29:11 +08:00
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|