aboutsummaryrefslogtreecommitdiff
path: root/gprof
diff options
context:
space:
mode:
authorAlan Modra <amodra@gmail.com>2018-04-16 15:08:40 +0930
committerAlan Modra <amodra@gmail.com>2018-04-16 15:08:40 +0930
commitfceadf09517d8b37a0fa77852e26a789fc160d94 (patch)
tree5fc7c0aebfce6229e4a78d24ee1ae0edccef65a7 /gprof
parent5a48b83f3f41236f56046fd1a1354ebca789278c (diff)
downloadfsf-binutils-gdb-fceadf09517d8b37a0fa77852e26a789fc160d94.zip
fsf-binutils-gdb-fceadf09517d8b37a0fa77852e26a789fc160d94.tar.gz
fsf-binutils-gdb-fceadf09517d8b37a0fa77852e26a789fc160d94.tar.bz2
Remove tahoe support
include/ * opcode/tahoe.h: Delete. bfd/ * archures.c: Remove tahoe support. * config.bfd: Likewise. * configure.ac: Likewise. * hosts/tahoe.h: Delete. * bfd-in2.h: Regenerate. * configure: Regenerate. opcodes/ * configure.ac: Remove tahoe support. * configure: Regenerate. binutils/ * testsuite/binutils-all/objdump.exp: Remove tahoe support. gprof/ * Makefile.am: Remove tahoe support. * corefile.c: Likewise. * tahoe.c: Delete. * Makefile.in: Regenerate. * po/POTFILES.in: Regenerate.
Diffstat (limited to 'gprof')
-rw-r--r--gprof/ChangeLog8
-rw-r--r--gprof/Makefile.am2
-rw-r--r--gprof/Makefile.in6
-rw-r--r--gprof/corefile.c6
-rw-r--r--gprof/po/POTFILES.in1
-rw-r--r--gprof/tahoe.c339
6 files changed, 11 insertions, 351 deletions
diff --git a/gprof/ChangeLog b/gprof/ChangeLog
index da15c98..1476aaa 100644
--- a/gprof/ChangeLog
+++ b/gprof/ChangeLog
@@ -1,3 +1,11 @@
+2018-04-16 Alan Modra <amodra@gmail.com>
+
+ * Makefile.am: Remove tahoe support.
+ * corefile.c: Likewise.
+ * tahoe.c: Delete.
+ * Makefile.in: Regenerate.
+ * po/POTFILES.in: Regenerate.
+
2018-04-05 H.J. Lu <hongjiu.lu@intel.com>
PR gas/22318
diff --git a/gprof/Makefile.am b/gprof/Makefile.am
index adb6405..84837ab 100644
--- a/gprof/Makefile.am
+++ b/gprof/Makefile.am
@@ -43,7 +43,7 @@ bin_PROGRAMS = gprof
sources = basic_blocks.c call_graph.c cg_arcs.c cg_dfn.c \
cg_print.c corefile.c gmon_io.c gprof.c hertz.c hist.c source.c \
search_list.c symtab.c sym_ids.c utils.c \
- i386.c alpha.c vax.c tahoe.c sparc.c mips.c aarch64.c
+ i386.c alpha.c vax.c sparc.c mips.c aarch64.c
gprof_SOURCES = $(sources) flat_bl.c bsd_callg_bl.c fsf_callg_bl.c
gprof_DEPENDENCIES = ../bfd/libbfd.la ../libiberty/libiberty.a $(LIBINTL_DEP)
gprof_LDADD = ../bfd/libbfd.la ../libiberty/libiberty.a $(LIBINTL)
diff --git a/gprof/Makefile.in b/gprof/Makefile.in
index 30d6762..e1131d1 100644
--- a/gprof/Makefile.in
+++ b/gprof/Makefile.in
@@ -110,8 +110,7 @@ am__objects_1 = basic_blocks.$(OBJEXT) call_graph.$(OBJEXT) \
hertz.$(OBJEXT) hist.$(OBJEXT) source.$(OBJEXT) \
search_list.$(OBJEXT) symtab.$(OBJEXT) sym_ids.$(OBJEXT) \
utils.$(OBJEXT) i386.$(OBJEXT) alpha.$(OBJEXT) vax.$(OBJEXT) \
- tahoe.$(OBJEXT) sparc.$(OBJEXT) mips.$(OBJEXT) \
- aarch64.$(OBJEXT)
+ sparc.$(OBJEXT) mips.$(OBJEXT) aarch64.$(OBJEXT)
am_gprof_OBJECTS = $(am__objects_1) flat_bl.$(OBJEXT) \
bsd_callg_bl.$(OBJEXT) fsf_callg_bl.$(OBJEXT)
gprof_OBJECTS = $(am_gprof_OBJECTS)
@@ -341,7 +340,7 @@ AM_CPPFLAGS = -DDEBUG -I../bfd -I$(srcdir)/../include \
sources = basic_blocks.c call_graph.c cg_arcs.c cg_dfn.c \
cg_print.c corefile.c gmon_io.c gprof.c hertz.c hist.c source.c \
search_list.c symtab.c sym_ids.c utils.c \
- i386.c alpha.c vax.c tahoe.c sparc.c mips.c aarch64.c
+ i386.c alpha.c vax.c sparc.c mips.c aarch64.c
gprof_SOURCES = $(sources) flat_bl.c bsd_callg_bl.c fsf_callg_bl.c
gprof_DEPENDENCIES = ../bfd/libbfd.la ../libiberty/libiberty.a $(LIBINTL_DEP)
@@ -505,7 +504,6 @@ distclean-compile:
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/sparc.Po@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/sym_ids.Po@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/symtab.Po@am__quote@
-@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tahoe.Po@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/utils.Po@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/vax.Po@am__quote@
diff --git a/gprof/corefile.c b/gprof/corefile.c
index 8d52a31..a179668 100644
--- a/gprof/corefile.c
+++ b/gprof/corefile.c
@@ -51,7 +51,6 @@ static bfd_boolean get_src_info
extern void i386_find_call (Sym *, bfd_vma, bfd_vma);
extern void alpha_find_call (Sym *, bfd_vma, bfd_vma);
extern void vax_find_call (Sym *, bfd_vma, bfd_vma);
-extern void tahoe_find_call (Sym *, bfd_vma, bfd_vma);
extern void sparc_find_call (Sym *, bfd_vma, bfd_vma);
extern void mips_find_call (Sym *, bfd_vma, bfd_vma);
extern void aarch64_find_call (Sym *, bfd_vma, bfd_vma);
@@ -250,7 +249,6 @@ core_init (const char * aout_name)
switch (bfd_get_arch (core_bfd))
{
case bfd_arch_vax:
- case bfd_arch_tahoe:
offset_to_code = 2;
break;
@@ -319,10 +317,6 @@ find_call (Sym *parent, bfd_vma p_lowpc, bfd_vma p_highpc)
sparc_find_call (parent, p_lowpc, p_highpc);
break;
- case bfd_arch_tahoe:
- tahoe_find_call (parent, p_lowpc, p_highpc);
- break;
-
case bfd_arch_mips:
mips_find_call (parent, p_lowpc, p_highpc);
break;
diff --git a/gprof/po/POTFILES.in b/gprof/po/POTFILES.in
index 47727af..f2c6f01 100644
--- a/gprof/po/POTFILES.in
+++ b/gprof/po/POTFILES.in
@@ -33,7 +33,6 @@ sym_ids.c
sym_ids.h
symtab.c
symtab.h
-tahoe.c
utils.c
utils.h
vax.c
diff --git a/gprof/tahoe.c b/gprof/tahoe.c
deleted file mode 100644
index 93d2997..0000000
--- a/gprof/tahoe.c
+++ /dev/null
@@ -1,339 +0,0 @@
-/*
- * Copyright (c) 1983, 1993, 2001
- * The Regents of the University of California. All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- * 1. Redistributions of source code must retain the above copyright
- * notice, this list of conditions and the following disclaimer.
- * 2. Redistributions in binary form must reproduce the above copyright
- * notice, this list of conditions and the following disclaimer in the
- * documentation and/or other materials provided with the distribution.
- * 3. Neither the name of the University nor the names of its contributors
- * may be used to endorse or promote products derived from this software
- * without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
- * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
- * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
- * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
- * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
- * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
- * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
- * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
- * SUCH DAMAGE.
- */
-#include "gprof.h"
-#include "search_list.h"
-#include "source.h"
-#include "symtab.h"
-#include "cg_arcs.h"
-#include "corefile.h"
-#include "hist.h"
-
- /*
- * opcode of the `callf' instruction
- */
-#define CALLF 0xfe
-
- /*
- * register for pc relative addressing
- */
-#define PC 0xf
-
-enum tahoe_opermodes
- {
- literal, indexed, reg, regdef, autodec, autoinc, autoincdef,
- bytedisp, bytedispdef, worddisp, worddispdef, longdisp, longdispdef,
- immediate, absolute, byterel, bytereldef, wordrel, wordreldef,
- longrel, longreldef
- };
-typedef enum tahoe_opermodes tahoe_operandenum;
-
-/*
- * A symbol to be the child of indirect callf:
- */
-static Sym indirectchild;
-
-static tahoe_operandenum tahoe_operandmode (unsigned char *);
-static char *tahoe_operandname (tahoe_operandenum);
-static long tahoe_operandlength (unsigned char *);
-static bfd_signed_vma tahoe_offset (unsigned char *);
-void tahoe_find_call (Sym *, bfd_vma, bfd_vma);
-
-static tahoe_operandenum
-tahoe_operandmode (unsigned char *modep)
-{
- long usesreg = *modep & 0xf;
-
- switch ((*modep >> 4) & 0xf)
- {
- case 0:
- case 1:
- case 2:
- case 3:
- return literal;
- case 4:
- return indexed;
- case 5:
- return reg;
- case 6:
- return regdef;
- case 7:
- return autodec;
- case 8:
- return usesreg != 0xe ? autoinc : immediate;
- case 9:
- return usesreg != PC ? autoincdef : absolute;
- case 10:
- return usesreg != PC ? bytedisp : byterel;
- case 11:
- return usesreg != PC ? bytedispdef : bytereldef;
- case 12:
- return usesreg != PC ? worddisp : wordrel;
- case 13:
- return usesreg != PC ? worddispdef : wordreldef;
- case 14:
- return usesreg != PC ? longdisp : longrel;
- case 15:
- return usesreg != PC ? longdispdef : longreldef;
- }
- /* NOTREACHED */
- abort ();
-}
-
-static char *
-tahoe_operandname (tahoe_operandenum mode)
-{
-
- switch (mode)
- {
- case literal:
- return "literal";
- case indexed:
- return "indexed";
- case reg:
- return "register";
- case regdef:
- return "register deferred";
- case autodec:
- return "autodecrement";
- case autoinc:
- return "autoincrement";
- case autoincdef:
- return "autoincrement deferred";
- case bytedisp:
- return "byte displacement";
- case bytedispdef:
- return "byte displacement deferred";
- case byterel:
- return "byte relative";
- case bytereldef:
- return "byte relative deferred";
- case worddisp:
- return "word displacement";
- case worddispdef:
- return "word displacement deferred";
- case wordrel:
- return "word relative";
- case wordreldef:
- return "word relative deferred";
- case immediate:
- return "immediate";
- case absolute:
- return "absolute";
- case longdisp:
- return "long displacement";
- case longdispdef:
- return "long displacement deferred";
- case longrel:
- return "long relative";
- case longreldef:
- return "long relative deferred";
- }
- /* NOTREACHED */
- abort ();
-}
-
-static long
-tahoe_operandlength (unsigned char *modep
-)
-{
-
- switch (tahoe_operandmode (modep))
- {
- case literal:
- case reg:
- case regdef:
- case autodec:
- case autoinc:
- case autoincdef:
- return 1;
- case bytedisp:
- case bytedispdef:
- case byterel:
- case bytereldef:
- return 2;
- case worddisp:
- case worddispdef:
- case wordrel:
- case wordreldef:
- return 3;
- case immediate:
- case absolute:
- case longdisp:
- case longdispdef:
- case longrel:
- case longreldef:
- return 5;
- case indexed:
- return 1 + tahoe_operandlength (modep + 1);
- }
- /* NOTREACHED */
- abort ();
-}
-
-static bfd_signed_vma
-tahoe_offset (unsigned char *modep)
-{
- tahoe_operandenum mode = tahoe_operandmode (modep);
-
- ++modep; /* skip over the mode */
- switch (mode)
- {
- default:
- fprintf (stderr, "[reladdr] not relative address\n");
- return 0;
- case byterel:
- return 1 + bfd_get_signed_8 (core_bfd, modep);
- case wordrel:
- return 2 + bfd_get_signed_16 (core_bfd, modep);
- case longrel:
- return 4 + bfd_get_signed_32 (core_bfd, modep);
- }
-}
-
-void
-tahoe_find_call (Sym *parent, bfd_vma p_lowpc, bfd_vma p_highpc)
-{
- unsigned char *instructp;
- long length;
- Sym *child;
- tahoe_operandenum mode;
- tahoe_operandenum firstmode;
- bfd_vma pc, destpc;
- static bfd_boolean inited = FALSE;
-
- if (!inited)
- {
- inited = TRUE;
- sym_init (&indirectchild);
- indirectchild.cg.prop.fract = 1.0;
- indirectchild.cg.cyc.head = &indirectchild;
- }
-
- DBG (CALLDEBUG, printf ("[findcall] %s: 0x%lx to 0x%lx\n",
- parent->name, (unsigned long) p_lowpc,
- (unsigned long) p_highpc));
- for (pc = p_lowpc; pc < p_highpc; pc += length)
- {
- length = 1;
- instructp = ((unsigned char *) core_text_space
- + pc - core_text_sect->vma);
- if ((*instructp & 0xff) == CALLF)
- {
- /*
- * maybe a callf, better check it out.
- * skip the count of the number of arguments.
- */
- DBG (CALLDEBUG, printf ("[findcall]\t0x%lx:callf",
- (unsigned long) pc));
- firstmode = tahoe_operandmode (instructp + length);
- switch (firstmode)
- {
- case literal:
- case immediate:
- break;
- default:
- goto botched;
- }
- length += tahoe_operandlength (instructp + length);
- mode = tahoe_operandmode (instructp + length);
- DBG (CALLDEBUG,
- printf ("\tfirst operand is %s", tahoe_operandname (firstmode));
- printf ("\tsecond operand is %s\n", tahoe_operandname (mode));
- );
- switch (mode)
- {
- case regdef:
- case bytedispdef:
- case worddispdef:
- case longdispdef:
- case bytereldef:
- case wordreldef:
- case longreldef:
- /*
- * indirect call: call through pointer
- * either *d(r) as a parameter or local
- * (r) as a return value
- * *f as a global pointer
- * [are there others that we miss?,
- * e.g. arrays of pointers to functions???]
- */
- arc_add (parent, &indirectchild, (unsigned long) 0);
- length += tahoe_operandlength (instructp + length);
- continue;
- case byterel:
- case wordrel:
- case longrel:
- /*
- * regular pc relative addressing
- * check that this is the address of
- * a function.
- */
- destpc = pc + tahoe_offset (instructp + length);
- if (hist_check_address (destpc))
- {
- child = sym_lookup (&symtab, destpc);
- if (child)
- {
- DBG (CALLDEBUG,
- printf ("[findcall]\tdestpc 0x%lx",
- (unsigned long) destpc);
- printf (" child->name %s", child->name);
- printf (" child->addr 0x%lx\n",
- (unsigned long) child->addr);
- );
- if (child->addr == destpc)
- {
- /*
- * a hit
- */
- arc_add (parent, child, (unsigned long) 0);
- length += tahoe_operandlength (instructp + length);
- continue;
- }
- }
- goto botched;
- }
- /*
- * else:
- * it looked like a callf,
- * but it wasn't to anywhere.
- */
- goto botched;
- default:
- botched:
- /*
- * something funny going on.
- */
- DBG (CALLDEBUG, printf ("[findcall]\tbut it's a botch\n"));
- length = 1;
- continue;
- }
- }
- }
-}