Annotation of src/usr.bin/nm/nm.c, Revision 1.40
1.40 ! deraadt 1: /* $OpenBSD: nm.c,v 1.39 2013/11/12 19:37:39 deraadt Exp $ */
1.2 deraadt 2: /* $NetBSD: nm.c,v 1.7 1996/01/14 23:04:03 pk Exp $ */
1.1 deraadt 3:
4: /*
5: * Copyright (c) 1989, 1993
6: * The Regents of the University of California. All rights reserved.
7: *
8: * This code is derived from software contributed to Berkeley by
9: * Hans Huebner.
10: *
11: * Redistribution and use in source and binary forms, with or without
12: * modification, are permitted provided that the following conditions
13: * are met:
14: * 1. Redistributions of source code must retain the above copyright
15: * notice, this list of conditions and the following disclaimer.
16: * 2. Redistributions in binary form must reproduce the above copyright
17: * notice, this list of conditions and the following disclaimer in the
18: * documentation and/or other materials provided with the distribution.
1.18 millert 19: * 3. Neither the name of the University nor the names of its contributors
1.1 deraadt 20: * may be used to endorse or promote products derived from this software
21: * without specific prior written permission.
22: *
23: * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24: * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25: * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26: * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27: * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28: * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29: * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30: * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31: * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32: * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33: * SUCH DAMAGE.
34: */
35:
1.5 deraadt 36: #include <sys/param.h>
1.20 mickey 37: #include <sys/mman.h>
1.1 deraadt 38: #include <a.out.h>
1.20 mickey 39: #include <elf_abi.h>
1.1 deraadt 40: #include <ar.h>
41: #include <ranlib.h>
42: #include <unistd.h>
1.2 deraadt 43: #include <err.h>
1.23 millert 44: #include <errno.h>
1.1 deraadt 45: #include <ctype.h>
1.14 espie 46: #include <link.h>
1.37 miod 47:
1.1 deraadt 48: #include <stdio.h>
49: #include <stdlib.h>
50: #include <string.h>
1.20 mickey 51: #include <getopt.h>
1.27 mickey 52: #include "elfuncs.h"
53: #include "util.h"
1.1 deraadt 54:
1.20 mickey 55: #define SYMTABMAG "/ "
56: #define STRTABMAG "//"
57:
58: union hdr {
1.27 mickey 59: Elf32_Ehdr elf32;
60: Elf64_Ehdr elf64;
1.20 mickey 61: };
62:
1.27 mickey 63: /* a funky nlist overload for reading 32bit a.out on 64bit toys */
64: struct nlist32 {
65: u_int32_t strx;
66: u_int8_t type;
67: u_int8_t other;
68: u_int16_t desc;
69: u_int32_t value;
70: } __packed;
71:
1.20 mickey 72: int armap;
73: int demangle;
74: int non_object_warning;
1.1 deraadt 75: int print_only_external_symbols;
76: int print_only_undefined_symbols;
77: int print_all_symbols;
78: int print_file_each_line;
1.20 mickey 79: int show_extensions;
80: int issize;
1.23 millert 81: int usemmap = 1;
1.20 mickey 82:
83: /* size vars */
84: unsigned long total_text, total_data, total_bss, total_total;
85: int non_object_warning, print_totals;
1.1 deraadt 86:
87: int rev;
1.16 millert 88: int fname(const void *, const void *);
89: int rname(const void *, const void *);
90: int value(const void *, const void *);
1.37 miod 91: char *otherstring(struct nlist *);
1.36 deraadt 92: int (*sfunc)(const void *, const void *) = fname;
1.37 miod 93: char typeletter(struct nlist *);
1.39 deraadt 94: int mmbr_name(struct ar_hdr *, char **, int, int *, FILE *);
95: int show_symtab(off_t, u_long, const char *, FILE *);
96: int show_symdef(off_t, u_long, const char *, FILE *);
1.8 espie 97:
1.1 deraadt 98: /* some macros for symbol type (nlist.n_type) handling */
99: #define IS_EXTERNAL(x) ((x) & N_EXT)
100: #define SYMBOL_TYPE(x) ((x) & (N_TYPE | N_STAB))
101:
1.16 millert 102: void pipe2cppfilt(void);
103: void usage(void);
1.37 miod 104: char *symname(struct nlist *);
1.20 mickey 105: int process_file(int, const char *);
106: int show_archive(int, const char *, FILE *);
107: int show_file(int, int, const char *, FILE *fp, off_t, union hdr *);
1.37 miod 108: void print_symbol(const char *, struct nlist *);
1.20 mickey 109:
1.32 deraadt 110: #define OPTSTRING_NM "aABCegnoprsuvw"
1.20 mickey 111: const struct option longopts_nm[] = {
112: { "debug-syms", no_argument, 0, 'a' },
113: { "demangle", no_argument, 0, 'C' },
114: /* { "dynamic", no_argument, 0, 'D' }, */
115: { "extern-only", no_argument, 0, 'g' },
116: /* { "line-numbers", no_argument, 0, 'l' }, */
117: { "no-sort", no_argument, 0, 'p' },
118: { "numeric-sort", no_argument, 0, 'n' },
119: { "print-armap", no_argument, 0, 's' },
120: { "print-file-name", no_argument, 0, 'o' },
121: { "reverse-sort", no_argument, 0, 'r' },
122: /* { "size-sort", no_argument, &szval, 1 }, */
123: { "undefined-only", no_argument, 0, 'u' },
124: { "help", no_argument, 0, '?' },
125: { NULL }
126: };
1.10 espie 127:
1.1 deraadt 128: /*
129: * main()
130: * parse command line, execute process_file() for each file
131: * specified on the command line.
132: */
1.20 mickey 133: int
1.19 deraadt 134: main(int argc, char *argv[])
1.1 deraadt 135: {
1.20 mickey 136: extern char *__progname;
1.1 deraadt 137: extern int optind;
1.20 mickey 138: const char *optstr;
139: const struct option *lopts;
140: int ch, eval;
141:
142: optstr = OPTSTRING_NM;
143: lopts = longopts_nm;
144: if (!strcmp(__progname, "size")) {
145: issize++;
146: optstr = "tw";
147: lopts = NULL;
148: }
1.1 deraadt 149:
1.20 mickey 150: while ((ch = getopt_long(argc, argv, optstr, lopts, NULL)) != -1) {
1.1 deraadt 151: switch (ch) {
152: case 'a':
153: print_all_symbols = 1;
154: break;
1.10 espie 155: case 'B':
156: /* no-op, compat with gnu-nm */
157: break;
158: case 'C':
159: demangle = 1;
160: break;
1.12 espie 161: case 'e':
162: show_extensions = 1;
163: break;
1.1 deraadt 164: case 'g':
165: print_only_external_symbols = 1;
166: break;
167: case 'n':
1.20 mickey 168: case 'v':
1.1 deraadt 169: sfunc = value;
170: break;
1.20 mickey 171: case 'A':
1.1 deraadt 172: case 'o':
173: print_file_each_line = 1;
174: break;
175: case 'p':
176: sfunc = NULL;
177: break;
178: case 'r':
179: rev = 1;
180: break;
1.20 mickey 181: case 's':
182: armap = 1;
183: break;
1.1 deraadt 184: case 'u':
185: print_only_undefined_symbols = 1;
186: break;
187: case 'w':
1.20 mickey 188: non_object_warning = 1;
1.1 deraadt 189: break;
1.20 mickey 190: case 't':
191: if (issize) {
192: print_totals = 1;
193: break;
194: }
1.1 deraadt 195: case '?':
196: default:
197: usage();
198: }
199: }
1.10 espie 200:
201: if (demangle)
202: pipe2cppfilt();
1.1 deraadt 203: argv += optind;
1.20 mickey 204: argc -= optind;
1.1 deraadt 205:
206: if (rev && sfunc == fname)
207: sfunc = rname;
208:
1.20 mickey 209: eval = 0;
210: if (*argv)
1.1 deraadt 211: do {
1.20 mickey 212: eval |= process_file(argc, *argv);
1.1 deraadt 213: } while (*++argv);
1.20 mickey 214: else
215: eval |= process_file(1, "a.out");
216:
217: if (issize && print_totals)
218: printf("\n%lu\t%lu\t%lu\t%lu\t%lx\tTOTAL\n",
219: total_text, total_data, total_bss,
220: total_total, total_total);
221: exit(eval);
1.1 deraadt 222: }
223:
224: /*
225: * process_file()
226: * show symbols in the file given as an argument. Accepts archive and
227: * object files as input.
228: */
1.20 mickey 229: int
230: process_file(int count, const char *fname)
1.1 deraadt 231: {
1.20 mickey 232: union hdr exec_head;
1.1 deraadt 233: FILE *fp;
234: int retval;
1.24 miod 235: size_t bytes;
1.1 deraadt 236: char magic[SARMAG];
1.25 deraadt 237:
1.1 deraadt 238: if (!(fp = fopen(fname, "r"))) {
1.6 deraadt 239: warn("cannot read %s", fname);
1.1 deraadt 240: return(1);
241: }
242:
1.20 mickey 243: if (!issize && count > 1)
1.1 deraadt 244: (void)printf("\n%s:\n", fname);
1.25 deraadt 245:
1.1 deraadt 246: /*
247: * first check whether this is an object file - read a object
248: * header, and skip back to the beginning
249: */
1.24 miod 250: bzero(&exec_head, sizeof(exec_head));
251: bytes = fread((char *)&exec_head, 1, sizeof(exec_head), fp);
252: if (bytes < sizeof(exec_head)) {
1.37 miod 253: if (bytes < sizeof(exec_head.elf32) || IS_ELF(exec_head.elf32)) {
1.24 miod 254: warnx("%s: bad format", fname);
255: (void)fclose(fp);
256: return(1);
257: }
1.1 deraadt 258: }
259: rewind(fp);
260:
261: /* this could be an archive */
1.37 miod 262: if (!IS_ELF(exec_head.elf32)) {
1.1 deraadt 263: if (fread(magic, sizeof(magic), (size_t)1, fp) != 1 ||
264: strncmp(magic, ARMAG, SARMAG)) {
1.2 deraadt 265: warnx("%s: not object file or archive", fname);
1.1 deraadt 266: (void)fclose(fp);
267: return(1);
268: }
1.20 mickey 269: retval = show_archive(count, fname, fp);
1.1 deraadt 270: } else
1.20 mickey 271: retval = show_file(count, 1, fname, fp, 0, &exec_head);
1.1 deraadt 272: (void)fclose(fp);
273: return(retval);
274: }
275:
1.20 mickey 276: char *nametab;
277:
278: /*
279: *
280: * given the archive member header -- produce member name
281: */
282: int
283: mmbr_name(struct ar_hdr *arh, char **name, int baselen, int *namelen, FILE *fp)
284: {
285: char *p = *name + strlen(*name);
286: long i;
287:
288: if (nametab && arh->ar_name[0] == '/') {
289: int len;
290:
291: i = atol(&arh->ar_name[1]);
292: len = strlen(&nametab[i]);
293: if (len > *namelen) {
294: p -= (long)*name;
295: if ((*name = realloc(*name, baselen+len)) == NULL)
296: err(1, NULL);
297: *namelen = len;
298: p += (long)*name;
299: }
300: strlcpy(p, &nametab[i], len);
301: p += len;
302: } else
303: #ifdef AR_EFMT1
304: /*
305: * BSD 4.4 extended AR format: #1/<namelen>, with name as the
306: * first <namelen> bytes of the file
307: */
308: if ((arh->ar_name[0] == '#') &&
309: (arh->ar_name[1] == '1') &&
1.25 deraadt 310: (arh->ar_name[2] == '/') &&
1.40 ! deraadt 311: (isdigit((unsigned char)arh->ar_name[3]))) {
1.20 mickey 312: int len = atoi(&arh->ar_name[3]);
313:
314: if (len > *namelen) {
315: p -= (long)*name;
316: if ((*name = realloc(*name, baselen+len)) == NULL)
317: err(1, NULL);
318: *namelen = len;
319: p += (long)*name;
320: }
321: if (fread(p, len, 1, fp) != 1) {
322: warnx("%s: premature EOF", *name);
323: free(*name);
324: return(1);
325: }
326: p += len;
327: } else
328: #endif
329: for (i = 0; i < sizeof(arh->ar_name); ++i)
330: if (arh->ar_name[i] && arh->ar_name[i] != ' ')
331: *p++ = arh->ar_name[i];
332: *p = '\0';
333: if (p[-1] == '/')
334: *--p = '\0';
335:
336: return (0);
337: }
338:
339: /*
340: * show_symtab()
341: * show archive ranlib index (fs5)
342: */
343: int
344: show_symtab(off_t off, u_long len, const char *name, FILE *fp)
345: {
346: struct ar_hdr ar_head;
347: int *symtab, *ps;
348: char *strtab, *p;
349: int num, rval = 0;
1.23 millert 350: int namelen;
1.33 jasper 351: off_t restore;
352:
353: restore = ftello(fp);
1.20 mickey 354:
1.22 millert 355: MMAP(symtab, len, PROT_READ, MAP_PRIVATE|MAP_FILE, fileno(fp), off);
356: if (symtab == MAP_FAILED)
1.20 mickey 357: return (1);
358:
359: namelen = sizeof(ar_head.ar_name);
360: if ((p = malloc(sizeof(ar_head.ar_name))) == NULL) {
361: warn("%s: malloc", name);
1.22 millert 362: MUNMAP(symtab, len);
1.20 mickey 363: }
364:
365: printf("\nArchive index:\n");
366: num = betoh32(*symtab);
367: strtab = (char *)(symtab + num + 1);
368: for (ps = symtab + 1; num--; ps++, strtab += strlen(strtab) + 1) {
369: if (fseeko(fp, betoh32(*ps), SEEK_SET)) {
370: warn("%s: fseeko", name);
371: rval = 1;
372: break;
373: }
374:
375: if (fread(&ar_head, sizeof(ar_head), 1, fp) != 1 ||
376: memcmp(ar_head.ar_fmag, ARFMAG, sizeof(ar_head.ar_fmag))) {
377: warnx("%s: member fseeko", name);
378: rval = 1;
379: break;
380: }
381:
382: *p = '\0';
383: if (mmbr_name(&ar_head, &p, 0, &namelen, fp)) {
384: rval = 1;
385: break;
386: }
387:
388: printf("%s in %s\n", strtab, p);
389: }
390:
1.33 jasper 391: fseeko(fp, restore, SEEK_SET);
392:
1.20 mickey 393: free(p);
1.22 millert 394: MUNMAP(symtab, len);
1.20 mickey 395: return (rval);
396: }
397:
398: /*
399: * show_symdef()
400: * show archive ranlib index (gob)
401: */
402: int
403: show_symdef(off_t off, u_long len, const char *name, FILE *fp)
404: {
405: struct ranlib *prn, *eprn;
406: struct ar_hdr ar_head;
1.39 deraadt 407: char *symdef;
1.20 mickey 408: char *strtab, *p;
409: u_long size;
1.23 millert 410: int namelen, rval = 0;
1.20 mickey 411:
1.22 millert 412: MMAP(symdef, len, PROT_READ, MAP_PRIVATE|MAP_FILE, fileno(fp), off);
413: if (symdef == MAP_FAILED)
1.20 mickey 414: return (1);
1.23 millert 415: if (usemmap)
1.22 millert 416: (void)madvise(symdef, len, MADV_SEQUENTIAL);
1.20 mickey 417:
418: namelen = sizeof(ar_head.ar_name);
419: if ((p = malloc(sizeof(ar_head.ar_name))) == NULL) {
420: warn("%s: malloc", name);
1.22 millert 421: MUNMAP(symdef, len);
1.20 mickey 422: return (1);
423: }
424:
425: size = *(u_long *)symdef;
1.39 deraadt 426: prn = (struct ranlib *)(symdef + sizeof(u_long));
1.20 mickey 427: eprn = prn + size / sizeof(*prn);
428: strtab = symdef + sizeof(u_long) + size + sizeof(u_long);
429:
430: printf("\nArchive index:\n");
431: for (; prn < eprn; prn++) {
432: if (fseeko(fp, prn->ran_off, SEEK_SET)) {
433: warn("%s: fseeko", name);
434: rval = 1;
435: break;
436: }
437:
438: if (fread(&ar_head, sizeof(ar_head), 1, fp) != 1 ||
439: memcmp(ar_head.ar_fmag, ARFMAG, sizeof(ar_head.ar_fmag))) {
440: warnx("%s: member fseeko", name);
441: rval = 1;
442: break;
443: }
444:
445: *p = '\0';
446: if (mmbr_name(&ar_head, &p, 0, &namelen, fp)) {
447: rval = 1;
448: break;
449: }
450:
451: printf("%s in %s\n", strtab + prn->ran_un.ran_strx, p);
452: }
453:
454: free(p);
1.22 millert 455: MUNMAP(symdef, len);
1.20 mickey 456: return (rval);
457: }
458:
1.1 deraadt 459: /*
460: * show_archive()
461: * show symbols in the given archive file
462: */
1.20 mickey 463: int
464: show_archive(int count, const char *fname, FILE *fp)
1.1 deraadt 465: {
466: struct ar_hdr ar_head;
1.20 mickey 467: union hdr exec_head;
1.1 deraadt 468: int i, rval;
1.20 mickey 469: off_t last_ar_off, foff, symtaboff;
470: char *name;
1.1 deraadt 471: int baselen, namelen;
1.20 mickey 472: u_long mmbrlen, symtablen;
1.1 deraadt 473:
474: baselen = strlen(fname) + 3;
475: namelen = sizeof(ar_head.ar_name);
1.20 mickey 476: if ((name = malloc(baselen + namelen)) == NULL)
477: err(1, NULL);
1.1 deraadt 478:
479: rval = 0;
1.20 mickey 480: nametab = NULL;
481: symtaboff = 0;
482: symtablen = 0;
1.1 deraadt 483:
484: /* while there are more entries in the archive */
1.20 mickey 485: while (fread(&ar_head, sizeof(ar_head), 1, fp) == 1) {
1.1 deraadt 486: /* bad archive entry - stop processing this archive */
1.20 mickey 487: if (memcmp(ar_head.ar_fmag, ARFMAG, sizeof(ar_head.ar_fmag))) {
1.2 deraadt 488: warnx("%s: bad format archive header", fname);
1.20 mickey 489: rval = 1;
490: break;
1.1 deraadt 491: }
492:
493: /* remember start position of current archive object */
1.20 mickey 494: last_ar_off = ftello(fp);
495: mmbrlen = atol(ar_head.ar_size);
1.1 deraadt 496:
1.20 mickey 497: if (strncmp(ar_head.ar_name, RANLIBMAG,
498: sizeof(RANLIBMAG) - 1) == 0) {
499: if (!issize && armap &&
500: show_symdef(last_ar_off, mmbrlen, fname, fp)) {
501: rval = 1;
502: break;
503: }
1.1 deraadt 504: goto skip;
1.20 mickey 505: } else if (strncmp(ar_head.ar_name, SYMTABMAG,
506: sizeof(SYMTABMAG) - 1) == 0) {
507: /* if nametab hasn't been seen yet -- doit later */
508: if (!nametab) {
509: symtablen = mmbrlen;
510: symtaboff = last_ar_off;
511: goto skip;
512: }
513:
514: /* load the Sys5 long names table */
515: } else if (strncmp(ar_head.ar_name, STRTABMAG,
516: sizeof(STRTABMAG) - 1) == 0) {
517: char *p;
518:
519: if ((nametab = malloc(mmbrlen)) == NULL) {
520: warn("%s: nametab", fname);
521: rval = 1;
522: break;
523: }
524:
525: if (fread(nametab, mmbrlen, (size_t)1, fp) != 1) {
526: warnx("%s: premature EOF", fname);
527: rval = 1;
528: break;
529: }
530:
531: for (p = nametab, i = mmbrlen; i--; p++)
532: if (*p == '\n')
533: *p = '\0';
534:
535: if (issize || !armap || !symtablen || !symtaboff)
536: goto skip;
537: }
538:
539: if (!issize && armap && symtablen && symtaboff) {
540: if (show_symtab(symtaboff, symtablen, fname, fp)) {
541: rval = 1;
542: break;
543: } else {
544: symtaboff = 0;
545: symtablen = 0;
546: }
547: }
1.1 deraadt 548:
549: /*
550: * construct a name of the form "archive.a:obj.o:" for the
551: * current archive entry if the object name is to be printed
552: * on each output line
553: */
1.20 mickey 554: *name = '\0';
555: if (count > 1)
556: snprintf(name, baselen - 1, "%s:", fname);
557:
558: if (mmbr_name(&ar_head, &name, baselen, &namelen, fp)) {
559: rval = 1;
560: break;
1.17 deraadt 561: }
1.20 mickey 562:
563: foff = ftello(fp);
1.1 deraadt 564:
565: /* get and check current object's header */
566: if (fread((char *)&exec_head, sizeof(exec_head),
567: (size_t)1, fp) != 1) {
1.20 mickey 568: warnx("%s: premature EOF", fname);
569: rval = 1;
570: break;
1.1 deraadt 571: }
572:
1.20 mickey 573: rval |= show_file(2, non_object_warning, name, fp, foff, &exec_head);
1.1 deraadt 574: /*
575: * skip to next archive object - it starts at the next
1.25 deraadt 576: * even byte boundary
1.1 deraadt 577: */
578: #define even(x) (((x) + 1) & ~1)
1.20 mickey 579: skip: if (fseeko(fp, last_ar_off + even(mmbrlen), SEEK_SET)) {
1.2 deraadt 580: warn("%s", fname);
1.20 mickey 581: rval = 1;
582: break;
1.1 deraadt 583: }
584: }
1.20 mickey 585: if (nametab) {
586: free(nametab);
587: nametab = NULL;
588: }
589: free(name);
1.1 deraadt 590: return(rval);
591: }
592:
1.20 mickey 593: char *stab;
594:
1.1 deraadt 595: /*
1.20 mickey 596: * show_file()
1.1 deraadt 597: * show symbols from the object file pointed to by fp. The current
1.29 espie 598: * file pointer for fp is expected to be at the beginning of an object
599: * file header.
1.1 deraadt 600: */
1.20 mickey 601: int
602: show_file(int count, int warn_fmt, const char *name, FILE *fp, off_t foff, union hdr *head)
1.1 deraadt 603: {
1.20 mickey 604: u_long text, data, bss, total;
1.27 mickey 605: struct nlist *np, *names, **snames;
1.37 miod 606: int i, nrawnames, nnames;
1.27 mickey 607: size_t stabsize;
1.20 mickey 608:
1.27 mickey 609: if (IS_ELF(head->elf32) &&
610: head->elf32.e_ident[EI_CLASS] == ELFCLASS32 &&
611: head->elf32.e_ident[EI_VERSION] == ELF_TARG_VER) {
612: void *shdr;
1.20 mickey 613:
1.27 mickey 614: if (!(shdr = elf32_load_shdrs(name, fp, foff, &head->elf32)))
1.20 mickey 615: return (1);
616:
1.27 mickey 617: i = issize?
618: elf32_size(&head->elf32, shdr, &text, &data, &bss) :
619: elf32_symload(name, fp, foff, &head->elf32, shdr,
620: &names, &snames, &stabsize, &nrawnames);
621: free(shdr);
622: if (i)
623: return (i);
624:
625: } else if (IS_ELF(head->elf64) &&
626: head->elf64.e_ident[EI_CLASS] == ELFCLASS64 &&
627: head->elf64.e_ident[EI_VERSION] == ELF_TARG_VER) {
628: void *shdr;
1.20 mickey 629:
1.27 mickey 630: if (!(shdr = elf64_load_shdrs(name, fp, foff, &head->elf64)))
631: return (1);
1.20 mickey 632:
1.27 mickey 633: i = issize?
634: elf64_size(&head->elf64, shdr, &text, &data, &bss) :
635: elf64_symload(name, fp, foff, &head->elf64, shdr,
636: &names, &snames, &stabsize, &nrawnames);
637: free(shdr);
638: if (i)
639: return (i);
1.37 miod 640: } else {
1.36 deraadt 641: if (warn_fmt)
642: warnx("%s: bad format", name);
643: return (1);
1.37 miod 644: }
1.8 espie 645:
1.20 mickey 646: if (issize) {
647: static int first = 1;
1.1 deraadt 648:
1.20 mickey 649: if (first) {
650: first = 0;
651: printf("text\tdata\tbss\tdec\thex\n");
652: }
1.1 deraadt 653:
1.20 mickey 654: total = text + data + bss;
655: printf("%lu\t%lu\t%lu\t%lu\t%lx",
656: text, data, bss, total, total);
657: if (count > 1)
658: (void)printf("\t%s", name);
659:
660: total_text += text;
661: total_data += data;
662: total_bss += bss;
663: total_total += total;
1.1 deraadt 664:
1.20 mickey 665: printf("\n");
666: return (0);
1.1 deraadt 667: }
1.20 mickey 668: /* else we are nm */
1.1 deraadt 669:
670: /*
1.20 mickey 671: * it seems that string table is sequential
672: * relative to the symbol table order
1.1 deraadt 673: */
1.23 millert 674: if (sfunc == NULL && usemmap)
675: (void)madvise(stab, stabsize, MADV_SEQUENTIAL);
1.1 deraadt 676:
677: /*
678: * fix up the symbol table and filter out unwanted entries
679: *
680: * common symbols are characterized by a n_type of N_UNDF and a
681: * non-zero n_value -- change n_type to N_COMM for all such
682: * symbols to make life easier later.
683: *
684: * filter out all entries which we don't want to print anyway
685: */
686: for (np = names, i = nnames = 0; i < nrawnames; np++, i++) {
1.13 espie 687: /*
688: * make n_un.n_name a character pointer by adding the string
689: * table's base to n_un.n_strx
690: *
691: * don't mess with zero offsets
692: */
693: if (np->n_un.n_strx)
694: np->n_un.n_name = stab + np->n_un.n_strx;
695: else
696: np->n_un.n_name = "";
1.1 deraadt 697: if (print_only_external_symbols && !IS_EXTERNAL(np->n_type))
698: continue;
699: if (print_only_undefined_symbols &&
700: SYMBOL_TYPE(np->n_type) != N_UNDF)
701: continue;
702:
1.13 espie 703: snames[nnames++] = np;
1.1 deraadt 704: }
705:
706: /* sort the symbol table if applicable */
707: if (sfunc)
1.13 espie 708: qsort(snames, (size_t)nnames, sizeof(*snames), sfunc);
1.1 deraadt 709:
1.20 mickey 710: if (count > 1)
711: (void)printf("\n%s:\n", name);
712:
1.1 deraadt 713: /* print out symbols */
1.13 espie 714: for (i = 0; i < nnames; i++) {
715: if (show_extensions && snames[i] != names &&
716: SYMBOL_TYPE((snames[i] -1)->n_type) == N_INDR)
717: continue;
1.37 miod 718: print_symbol(name, snames[i]);
1.13 espie 719: }
1.1 deraadt 720:
1.20 mickey 721: free(snames);
722: free(names);
1.22 millert 723: MUNMAP(stab, stabsize);
1.1 deraadt 724: return(0);
1.20 mickey 725: }
726:
1.13 espie 727: char *
1.37 miod 728: symname(struct nlist *sym)
1.13 espie 729: {
1.37 miod 730: return sym->n_un.n_name;
1.13 espie 731: }
732:
1.1 deraadt 733: /*
734: * print_symbol()
735: * show one symbol
736: */
1.13 espie 737: void
1.37 miod 738: print_symbol(const char *name, struct nlist *sym)
1.1 deraadt 739: {
740: if (print_file_each_line)
1.20 mickey 741: (void)printf("%s:", name);
1.1 deraadt 742:
743: /*
1.10 espie 744: * handle undefined-only format especially (no space is
1.1 deraadt 745: * left for symbol values, no type field is printed)
746: */
1.10 espie 747: if (!print_only_undefined_symbols) {
748: /* print symbol's value */
1.25 deraadt 749: if (SYMBOL_TYPE(sym->n_type) == N_UNDF ||
750: (show_extensions && SYMBOL_TYPE(sym->n_type) == N_INDR &&
751: sym->n_value == 0))
1.10 espie 752: (void)printf(" ");
753: else
754: (void)printf("%08lx", sym->n_value);
755:
756: /* print type information */
1.37 miod 757: if (show_extensions)
758: (void)printf(" %c ", typeletter(sym));
1.10 espie 759: else
1.37 miod 760: (void)printf(" %c ", typeletter(sym));
1.1 deraadt 761: }
762:
1.37 miod 763: if (SYMBOL_TYPE(sym->n_type) == N_INDR && show_extensions)
764: printf("%s -> %s\n", symname(sym), symname(sym+1));
1.1 deraadt 765: else
1.37 miod 766: (void)puts(symname(sym));
1.1 deraadt 767: }
768:
769: /*
770: * typeletter()
771: * return a description letter for the given basic type code of an
772: * symbol table entry. The return value will be upper case for
773: * external, lower case for internal symbols.
774: */
775: char
1.37 miod 776: typeletter(struct nlist *np)
1.1 deraadt 777: {
1.20 mickey 778: int ext = IS_EXTERNAL(np->n_type);
779:
1.37 miod 780: if (np->n_other)
1.20 mickey 781: return np->n_other;
782:
783: switch(SYMBOL_TYPE(np->n_type)) {
1.1 deraadt 784: case N_ABS:
1.20 mickey 785: return(ext? 'A' : 'a');
1.1 deraadt 786: case N_BSS:
1.20 mickey 787: return(ext? 'B' : 'b');
1.1 deraadt 788: case N_COMM:
1.20 mickey 789: return(ext? 'C' : 'c');
1.1 deraadt 790: case N_DATA:
1.20 mickey 791: return(ext? 'D' : 'd');
1.1 deraadt 792: case N_FN:
793: /* NOTE: N_FN == N_WARNING,
794: * in this case, the N_EXT bit is to considered as
795: * part of the symbol's type itself.
796: */
1.20 mickey 797: return(ext? 'F' : 'W');
1.1 deraadt 798: case N_TEXT:
1.20 mickey 799: return(ext? 'T' : 't');
1.1 deraadt 800: case N_INDR:
1.20 mickey 801: return(ext? 'I' : 'i');
1.1 deraadt 802: case N_SIZE:
1.20 mickey 803: return(ext? 'S' : 's');
1.1 deraadt 804: case N_UNDF:
1.20 mickey 805: return(ext? 'U' : 'u');
1.1 deraadt 806: }
807: return('?');
808: }
809:
1.13 espie 810: int
1.19 deraadt 811: fname(const void *a0, const void *b0)
1.1 deraadt 812: {
1.13 espie 813: struct nlist * const *a = a0, * const *b = b0;
1.1 deraadt 814:
1.13 espie 815: return(strcmp((*a)->n_un.n_name, (*b)->n_un.n_name));
1.1 deraadt 816: }
817:
1.13 espie 818: int
1.19 deraadt 819: rname(const void *a0, const void *b0)
1.1 deraadt 820: {
1.13 espie 821: struct nlist * const *a = a0, * const *b = b0;
1.1 deraadt 822:
1.13 espie 823: return(strcmp((*b)->n_un.n_name, (*a)->n_un.n_name));
1.1 deraadt 824: }
825:
1.13 espie 826: int
1.19 deraadt 827: value(const void *a0, const void *b0)
1.1 deraadt 828: {
1.13 espie 829: struct nlist * const *a = a0, * const *b = b0;
1.1 deraadt 830:
1.13 espie 831: if (SYMBOL_TYPE((*a)->n_type) == N_UNDF)
832: if (SYMBOL_TYPE((*b)->n_type) == N_UNDF)
1.1 deraadt 833: return(0);
834: else
835: return(-1);
1.13 espie 836: else if (SYMBOL_TYPE((*b)->n_type) == N_UNDF)
1.1 deraadt 837: return(1);
838: if (rev) {
1.13 espie 839: if ((*a)->n_value == (*b)->n_value)
1.1 deraadt 840: return(rname(a0, b0));
1.13 espie 841: return((*b)->n_value > (*a)->n_value ? 1 : -1);
1.1 deraadt 842: } else {
1.13 espie 843: if ((*a)->n_value == (*b)->n_value)
1.1 deraadt 844: return(fname(a0, b0));
1.13 espie 845: return((*a)->n_value > (*b)->n_value ? 1 : -1);
1.1 deraadt 846: }
847: }
848:
1.10 espie 849: #define CPPFILT "/usr/bin/c++filt"
850:
851: void
1.19 deraadt 852: pipe2cppfilt(void)
1.10 espie 853: {
854: int pip[2];
855: char *argv[2];
856:
857: argv[0] = "c++filt";
858: argv[1] = NULL;
859:
860: if (pipe(pip) == -1)
861: err(1, "pipe");
862: switch(fork()) {
863: case -1:
864: err(1, "fork");
865: default:
866: dup2(pip[0], 0);
867: close(pip[0]);
868: close(pip[1]);
869: execve(CPPFILT, argv, NULL);
870: err(1, "execve");
871: case 0:
872: dup2(pip[1], 1);
873: close(pip[1]);
874: close(pip[0]);
875: }
876: }
877:
1.11 smart 878: void
1.19 deraadt 879: usage(void)
1.1 deraadt 880: {
1.20 mickey 881: extern char *__progname;
882:
883: if (issize)
884: fprintf(stderr, "usage: %s [-tw] [file ...]\n", __progname);
885: else
1.32 deraadt 886: fprintf(stderr, "usage: %s [-aCegnoprsuw] [file ...]\n",
1.20 mickey 887: __progname);
1.1 deraadt 888: exit(1);
889: }