1*0Sstevel@tonic-gate /*
2*0Sstevel@tonic-gate * CDDL HEADER START
3*0Sstevel@tonic-gate *
4*0Sstevel@tonic-gate * The contents of this file are subject to the terms of the
5*0Sstevel@tonic-gate * Common Development and Distribution License, Version 1.0 only
6*0Sstevel@tonic-gate * (the "License"). You may not use this file except in compliance
7*0Sstevel@tonic-gate * with the License.
8*0Sstevel@tonic-gate *
9*0Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10*0Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing.
11*0Sstevel@tonic-gate * See the License for the specific language governing permissions
12*0Sstevel@tonic-gate * and limitations under the License.
13*0Sstevel@tonic-gate *
14*0Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each
15*0Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16*0Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the
17*0Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying
18*0Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner]
19*0Sstevel@tonic-gate *
20*0Sstevel@tonic-gate * CDDL HEADER END
21*0Sstevel@tonic-gate */
22*0Sstevel@tonic-gate /*
23*0Sstevel@tonic-gate * Copyright 2004 Sun Microsystems, Inc. All rights reserved.
24*0Sstevel@tonic-gate * Use is subject to license terms.
25*0Sstevel@tonic-gate */
26*0Sstevel@tonic-gate
27*0Sstevel@tonic-gate #pragma ident "%Z%%M% %I% %E% SMI"
28*0Sstevel@tonic-gate
29*0Sstevel@tonic-gate #include <stdio.h>
30*0Sstevel@tonic-gate #include <stdlib.h>
31*0Sstevel@tonic-gate #include <stdarg.h>
32*0Sstevel@tonic-gate #include <string.h>
33*0Sstevel@tonic-gate #include <libgen.h>
34*0Sstevel@tonic-gate #include <errno.h>
35*0Sstevel@tonic-gate #include <libelf.h>
36*0Sstevel@tonic-gate #include <gelf.h>
37*0Sstevel@tonic-gate #include <fcntl.h>
38*0Sstevel@tonic-gate #include <unistd.h>
39*0Sstevel@tonic-gate #include <sys/stat.h>
40*0Sstevel@tonic-gate #include <sys/types.h>
41*0Sstevel@tonic-gate
42*0Sstevel@tonic-gate #include <findfp.h>
43*0Sstevel@tonic-gate #include <util.h>
44*0Sstevel@tonic-gate
45*0Sstevel@tonic-gate #define OP(x) ((unsigned)(0x3 & x) << 30) /* general opcode */
46*0Sstevel@tonic-gate #define OP2(x) ((0x7 & x) << 22) /* op2 opcode */
47*0Sstevel@tonic-gate #define OP3(x) ((0x3f & x) << 19) /* op3 opcode */
48*0Sstevel@tonic-gate
49*0Sstevel@tonic-gate #define OPMSK 0xC0000000
50*0Sstevel@tonic-gate #define OP2MSK 0x01C00000
51*0Sstevel@tonic-gate #define OP3MSK 0x01F80000
52*0Sstevel@tonic-gate
53*0Sstevel@tonic-gate #define MAXEXCLUDES 5
54*0Sstevel@tonic-gate
55*0Sstevel@tonic-gate typedef struct mask {
56*0Sstevel@tonic-gate uint32_t m_mask;
57*0Sstevel@tonic-gate uint32_t m_val;
58*0Sstevel@tonic-gate const char *m_name;
59*0Sstevel@tonic-gate } mask_t;
60*0Sstevel@tonic-gate
61*0Sstevel@tonic-gate static const mask_t masks[] = {
62*0Sstevel@tonic-gate { OPMSK|OP2MSK, OP(0) | OP2(5), "FBPfcc" },
63*0Sstevel@tonic-gate { OPMSK|OP2MSK, OP(0) | OP2(6), "FBfcc" },
64*0Sstevel@tonic-gate { OPMSK|OP3MSK, OP(2) | OP3(0x34), "FPop1" },
65*0Sstevel@tonic-gate { OPMSK|OP3MSK, OP(2) | OP3(0x35), "FPop2" },
66*0Sstevel@tonic-gate { OPMSK|OP3(0x38), OP(3) | OP3(0x20), "FPldst1" },
67*0Sstevel@tonic-gate { OPMSK|OP3(0x38), OP(3) | OP3(0x30), "FPldst2" }
68*0Sstevel@tonic-gate };
69*0Sstevel@tonic-gate
70*0Sstevel@tonic-gate const char *progname;
71*0Sstevel@tonic-gate
72*0Sstevel@tonic-gate static void
usage(void)73*0Sstevel@tonic-gate usage(void)
74*0Sstevel@tonic-gate {
75*0Sstevel@tonic-gate (void) fprintf(stderr, "Usage: %s infile\n", progname);
76*0Sstevel@tonic-gate exit(2);
77*0Sstevel@tonic-gate }
78*0Sstevel@tonic-gate
79*0Sstevel@tonic-gate int
main(int argc,char ** argv)80*0Sstevel@tonic-gate main(int argc, char **argv)
81*0Sstevel@tonic-gate {
82*0Sstevel@tonic-gate Elf *elf;
83*0Sstevel@tonic-gate Elf_Scn *scn;
84*0Sstevel@tonic-gate GElf_Shdr shdr;
85*0Sstevel@tonic-gate Elf_Data *text;
86*0Sstevel@tonic-gate uint32_t *instrs;
87*0Sstevel@tonic-gate char *excludes[MAXEXCLUDES];
88*0Sstevel@tonic-gate int fd, textidx, i, j, c;
89*0Sstevel@tonic-gate int shownames = 1;
90*0Sstevel@tonic-gate int nexcludes = 0;
91*0Sstevel@tonic-gate int found = 0;
92*0Sstevel@tonic-gate char *filename;
93*0Sstevel@tonic-gate
94*0Sstevel@tonic-gate progname = basename(argv[0]);
95*0Sstevel@tonic-gate
96*0Sstevel@tonic-gate while ((c = getopt(argc, argv, ":nx:")) != EOF) {
97*0Sstevel@tonic-gate switch (c) {
98*0Sstevel@tonic-gate case 'n':
99*0Sstevel@tonic-gate shownames = 0;
100*0Sstevel@tonic-gate break;
101*0Sstevel@tonic-gate case 'x':
102*0Sstevel@tonic-gate if (nexcludes == MAXEXCLUDES - 1)
103*0Sstevel@tonic-gate die("exclusion limit is %d", MAXEXCLUDES);
104*0Sstevel@tonic-gate excludes[nexcludes++] = optarg;
105*0Sstevel@tonic-gate break;
106*0Sstevel@tonic-gate default:
107*0Sstevel@tonic-gate usage();
108*0Sstevel@tonic-gate }
109*0Sstevel@tonic-gate }
110*0Sstevel@tonic-gate
111*0Sstevel@tonic-gate if (argc - optind != 1)
112*0Sstevel@tonic-gate usage();
113*0Sstevel@tonic-gate filename = argv[optind];
114*0Sstevel@tonic-gate
115*0Sstevel@tonic-gate if ((fd = open(filename, O_RDONLY)) < 0)
116*0Sstevel@tonic-gate die("failed to open %s", filename);
117*0Sstevel@tonic-gate
118*0Sstevel@tonic-gate (void) elf_version(EV_CURRENT);
119*0Sstevel@tonic-gate if ((elf = elf_begin(fd, ELF_C_READ, NULL)) == NULL)
120*0Sstevel@tonic-gate elfdie("failed to open %s as ELF", filename);
121*0Sstevel@tonic-gate
122*0Sstevel@tonic-gate if ((textidx = findelfsecidx(elf, ".text")) < 0)
123*0Sstevel@tonic-gate die("failed to find .text section in %s\n", filename);
124*0Sstevel@tonic-gate
125*0Sstevel@tonic-gate if ((scn = elf_getscn(elf, textidx)) == NULL ||
126*0Sstevel@tonic-gate gelf_getshdr(scn, &shdr) == NULL ||
127*0Sstevel@tonic-gate (text = elf_rawdata(scn, NULL)) == NULL)
128*0Sstevel@tonic-gate elfdie("failed to read .text");
129*0Sstevel@tonic-gate
130*0Sstevel@tonic-gate instrs = text->d_buf;
131*0Sstevel@tonic-gate
132*0Sstevel@tonic-gate for (i = 0; i < shdr.sh_size / 4; i++) {
133*0Sstevel@tonic-gate for (j = 0; j < sizeof (masks) / sizeof (mask_t); j++) {
134*0Sstevel@tonic-gate char *symname = NULL;
135*0Sstevel@tonic-gate offset_t off;
136*0Sstevel@tonic-gate int len = 35;
137*0Sstevel@tonic-gate int xcl;
138*0Sstevel@tonic-gate
139*0Sstevel@tonic-gate if ((instrs[i] & masks[j].m_mask) != masks[j].m_val)
140*0Sstevel@tonic-gate continue;
141*0Sstevel@tonic-gate
142*0Sstevel@tonic-gate if (findelfsym(elf, i * 4, &symname, &off)) {
143*0Sstevel@tonic-gate if (nexcludes > 0) {
144*0Sstevel@tonic-gate for (xcl = 0; xcl < nexcludes; xcl++) {
145*0Sstevel@tonic-gate if (strcmp(symname,
146*0Sstevel@tonic-gate excludes[xcl]) == 0)
147*0Sstevel@tonic-gate break;
148*0Sstevel@tonic-gate }
149*0Sstevel@tonic-gate
150*0Sstevel@tonic-gate if (xcl < nexcludes)
151*0Sstevel@tonic-gate continue; /* exclude matched */
152*0Sstevel@tonic-gate }
153*0Sstevel@tonic-gate }
154*0Sstevel@tonic-gate
155*0Sstevel@tonic-gate found++;
156*0Sstevel@tonic-gate
157*0Sstevel@tonic-gate if (!shownames || symname == NULL) {
158*0Sstevel@tonic-gate (void) printf("%-*x", len, i * 4);
159*0Sstevel@tonic-gate } else {
160*0Sstevel@tonic-gate len -= printf("%s+%llx", symname, off);
161*0Sstevel@tonic-gate (void) printf("%*s", (len > 0 ? len : 0), "");
162*0Sstevel@tonic-gate }
163*0Sstevel@tonic-gate
164*0Sstevel@tonic-gate (void) printf(" %08x %s\n", instrs[i],
165*0Sstevel@tonic-gate masks[j].m_name);
166*0Sstevel@tonic-gate }
167*0Sstevel@tonic-gate }
168*0Sstevel@tonic-gate
169*0Sstevel@tonic-gate (void) elf_end(elf);
170*0Sstevel@tonic-gate (void) close(fd);
171*0Sstevel@tonic-gate
172*0Sstevel@tonic-gate return (found > 0);
173*0Sstevel@tonic-gate }
174