Commit | Line | Data |
---|---|---|
252b5132 RH |
1 | /* |
2 | * Copyright (c) 1983 Regents of the University of California. | |
3 | * All rights reserved. | |
4 | * | |
5 | * Redistribution and use in source and binary forms are permitted | |
6 | * provided that: (1) source distributions retain this entire copyright | |
7 | * notice and comment, and (2) distributions including binaries display | |
8 | * the following acknowledgement: ``This product includes software | |
9 | * developed by the University of California, Berkeley and its contributors'' | |
10 | * in the documentation or other materials provided with the distribution | |
11 | * and in all advertising materials mentioning features or use of this | |
12 | * software. Neither the name of the University nor the names of its | |
13 | * contributors may be used to endorse or promote products derived | |
14 | * from this software without specific prior written permission. | |
15 | * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR | |
16 | * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED | |
17 | * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. | |
18 | */ | |
19 | #include "gprof.h" | |
6d9c411a AM |
20 | #include "search_list.h" |
21 | #include "source.h" | |
22 | #include "symtab.h" | |
252b5132 RH |
23 | #include "cg_arcs.h" |
24 | #include "corefile.h" | |
25 | #include "hist.h" | |
252b5132 RH |
26 | |
27 | /* | |
28 | * opcode of the `callf' instruction | |
29 | */ | |
30 | #define CALL (0xc0000000) | |
31 | ||
5789ecea AM |
32 | void sparc_find_call PARAMS ((Sym *, bfd_vma, bfd_vma)); |
33 | ||
252b5132 RH |
34 | void |
35 | sparc_find_call (parent, p_lowpc, p_highpc) | |
36 | Sym *parent; | |
37 | bfd_vma p_lowpc; | |
38 | bfd_vma p_highpc; | |
39 | { | |
6d9c411a | 40 | bfd_vma pc, dest_pc; |
1355568a | 41 | unsigned int insn; |
252b5132 RH |
42 | Sym *child; |
43 | ||
252b5132 RH |
44 | if (core_text_space == 0) |
45 | { | |
46 | return; | |
47 | } | |
48 | if (p_lowpc < s_lowpc) | |
49 | { | |
50 | p_lowpc = s_lowpc; | |
51 | } | |
52 | if (p_highpc > s_highpc) | |
53 | { | |
54 | p_highpc = s_highpc; | |
55 | } | |
56 | DBG (CALLDEBUG, printf ("[find_call] %s: 0x%lx to 0x%lx\n", | |
fdcf7d43 ILT |
57 | parent->name, (unsigned long) p_lowpc, |
58 | (unsigned long) p_highpc)); | |
1355568a | 59 | for (pc = (p_lowpc + 3) & ~(bfd_vma) 3; pc < p_highpc; pc += 4) |
252b5132 | 60 | { |
6d9c411a AM |
61 | insn = bfd_get_32 (core_bfd, ((unsigned char *) core_text_space |
62 | + pc - core_text_sect->vma)); | |
63 | if (insn & CALL) | |
252b5132 RH |
64 | { |
65 | DBG (CALLDEBUG, | |
6d9c411a | 66 | printf ("[find_call] 0x%lx: callf", (unsigned long) pc)); |
252b5132 RH |
67 | /* |
68 | * Regular pc relative addressing check that this is the | |
69 | * address of a function. | |
70 | */ | |
6d9c411a AM |
71 | dest_pc = pc + (((bfd_signed_vma) (insn & 0x3fffffff) |
72 | ^ 0x20000000) - 0x20000000); | |
252b5132 RH |
73 | if (dest_pc >= s_lowpc && dest_pc <= s_highpc) |
74 | { | |
75 | child = sym_lookup (&symtab, dest_pc); | |
76 | DBG (CALLDEBUG, | |
77 | printf ("\tdest_pc=0x%lx, (name=%s, addr=0x%lx)\n", | |
fdcf7d43 ILT |
78 | (unsigned long) dest_pc, child->name, |
79 | (unsigned long) child->addr)); | |
252b5132 RH |
80 | if (child->addr == dest_pc) |
81 | { | |
82 | /* a hit: */ | |
83 | arc_add (parent, child, (unsigned long) 0); | |
84 | continue; | |
85 | } | |
86 | } | |
87 | /* | |
88 | * Something funny going on. | |
89 | */ | |
90 | DBG (CALLDEBUG, printf ("\tbut it's a botch\n")); | |
91 | } | |
92 | } | |
93 | } |