1 /* 2 * Copyright (c) 1983, 1993, 2001 3 * The Regents of the University of California. All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 3. Neither the name of the University nor the names of its contributors 14 * may be used to endorse or promote products derived from this software 15 * without specific prior written permission. 16 * 17 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 20 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 27 * SUCH DAMAGE. 28 */ 29 #include "gprof.h" 30 #include "search_list.h" 31 #include "source.h" 32 #include "symtab.h" 33 #include "cg_arcs.h" 34 #include "corefile.h" 35 #include "hist.h" 36 37 static int i386_iscall (unsigned char *); 38 void i386_find_call (Sym *, bfd_vma, bfd_vma); 39 40 static int 41 i386_iscall (unsigned char *ip) 42 { 43 if (*ip == 0xe8) 44 return 1; 45 return 0; 46 } 47 48 49 void 50 i386_find_call (Sym *parent, bfd_vma p_lowpc, bfd_vma p_highpc) 51 { 52 unsigned char *instructp; 53 Sym *child; 54 bfd_vma pc, destpc; 55 56 DBG (CALLDEBUG, printf ("[findcall] %s: 0x%lx to 0x%lx\n", 57 parent->name, (unsigned long) p_lowpc, 58 (unsigned long) p_highpc)); 59 60 if (p_highpc < 5) 61 return; 62 p_highpc -= 5; 63 for (pc = p_lowpc; pc < p_highpc; ++pc) 64 { 65 instructp = (unsigned char *) core_text_space + pc - core_text_sect->vma; 66 if (i386_iscall (instructp)) 67 { 68 DBG (CALLDEBUG, 69 printf ("[findcall]\t0x%lx:call", (unsigned long) pc)); 70 /* 71 * regular pc relative addressing 72 * check that this is the address of 73 * a function. 74 */ 75 76 destpc = bfd_get_32 (core_bfd, instructp + 1) + pc + 5; 77 if (hist_check_address (destpc)) 78 { 79 child = sym_lookup (&symtab, destpc); 80 if (child && child->addr == destpc) 81 { 82 /* 83 * a hit 84 */ 85 DBG (CALLDEBUG, 86 printf ("\tdestpc 0x%lx (%s)\n", 87 (unsigned long) destpc, child->name)); 88 arc_add (parent, child, (unsigned long) 0); 89 instructp += 4; /* call is a 5 byte instruction */ 90 continue; 91 } 92 } 93 /* 94 * else: 95 * it looked like a callf, but it: 96 * a) wasn't actually a callf, or 97 * b) didn't point to a known function in the symtab, or 98 * c) something funny is going on. 99 */ 100 DBG (CALLDEBUG, printf ("\tbut it's a botch\n")); 101 } 102 } 103 } 104