Commit | Line | Data |
---|---|---|
252b5132 | 1 | /* nm.c -- Describe symbol table of a rel file. |
8c2bc687 | 2 | Copyright 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, |
0873df2a | 3 | 2001, 2002, 2003, 2004 |
252b5132 RH |
4 | Free Software Foundation, Inc. |
5 | ||
6 | This file is part of GNU Binutils. | |
7 | ||
8 | This program is free software; you can redistribute it and/or modify | |
9 | it under the terms of the GNU General Public License as published by | |
10 | the Free Software Foundation; either version 2 of the License, or | |
11 | (at your option) any later version. | |
12 | ||
13 | This program is distributed in the hope that it will be useful, | |
14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
15 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
16 | GNU General Public License for more details. | |
17 | ||
18 | You should have received a copy of the GNU General Public License | |
19 | along with this program; if not, write to the Free Software | |
20 | Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA | |
21 | 02111-1307, USA. */ | |
22 | ||
23 | #include "bfd.h" | |
24 | #include "progress.h" | |
25 | #include "bucomm.h" | |
a6637ec0 | 26 | #include "budemang.h" |
252b5132 RH |
27 | #include "getopt.h" |
28 | #include "aout/stab_gnu.h" | |
29 | #include "aout/ranlib.h" | |
30 | #include "demangle.h" | |
31 | #include "libiberty.h" | |
6ab6b380 | 32 | #include "elf-bfd.h" |
33f5f537 | 33 | #include "elf/common.h" |
252b5132 RH |
34 | |
35 | /* When sorting by size, we use this structure to hold the size and a | |
36 | pointer to the minisymbol. */ | |
37 | ||
38 | struct size_sym | |
39 | { | |
2da42df6 | 40 | const void *minisym; |
252b5132 RH |
41 | bfd_vma size; |
42 | }; | |
43 | ||
44 | /* When fetching relocs, we use this structure to pass information to | |
45 | get_relocs. */ | |
46 | ||
47 | struct get_relocs_info | |
48 | { | |
49 | asection **secs; | |
50 | arelent ***relocs; | |
51 | long *relcount; | |
52 | asymbol **syms; | |
53 | }; | |
54 | ||
9710509e | 55 | struct extended_symbol_info |
977f7911 NC |
56 | { |
57 | symbol_info *sinfo; | |
58 | bfd_vma ssize; | |
33f5f537 | 59 | elf_symbol_type *elfinfo; |
977f7911 NC |
60 | /* FIXME: We should add more fields for Type, Line, Section. */ |
61 | }; | |
62 | #define SYM_NAME(sym) (sym->sinfo->name) | |
63 | #define SYM_VALUE(sym) (sym->sinfo->value) | |
64 | #define SYM_TYPE(sym) (sym->sinfo->type) | |
65 | #define SYM_STAB_NAME(sym) (sym->sinfo->stab_name) | |
66 | #define SYM_STAB_DESC(sym) (sym->sinfo->stab_desc) | |
67 | #define SYM_STAB_OTHER(sym) (sym->sinfo->stab_other) | |
33f5f537 L |
68 | #define SYM_SIZE(sym) \ |
69 | (sym->elfinfo ? sym->elfinfo->internal_elf_sym.st_size: sym->ssize) | |
977f7911 | 70 | |
252b5132 | 71 | /* The output formatting functions. */ |
2da42df6 AJ |
72 | static void print_object_filename_bsd (char *); |
73 | static void print_object_filename_sysv (char *); | |
74 | static void print_object_filename_posix (char *); | |
75 | static void print_archive_filename_bsd (char *); | |
76 | static void print_archive_filename_sysv (char *); | |
77 | static void print_archive_filename_posix (char *); | |
78 | static void print_archive_member_bsd (char *, const char *); | |
79 | static void print_archive_member_sysv (char *, const char *); | |
80 | static void print_archive_member_posix (char *, const char *); | |
81 | static void print_symbol_filename_bsd (bfd *, bfd *); | |
82 | static void print_symbol_filename_sysv (bfd *, bfd *); | |
83 | static void print_symbol_filename_posix (bfd *, bfd *); | |
84 | static void print_value (bfd *, bfd_vma); | |
85 | static void print_symbol_info_bsd (struct extended_symbol_info *, bfd *); | |
86 | static void print_symbol_info_sysv (struct extended_symbol_info *, bfd *); | |
87 | static void print_symbol_info_posix (struct extended_symbol_info *, bfd *); | |
252b5132 RH |
88 | |
89 | /* Support for different output formats. */ | |
90 | struct output_fns | |
91 | { | |
92 | /* Print the name of an object file given on the command line. */ | |
2da42df6 | 93 | void (*print_object_filename) (char *); |
252b5132 RH |
94 | |
95 | /* Print the name of an archive file given on the command line. */ | |
2da42df6 | 96 | void (*print_archive_filename) (char *); |
252b5132 RH |
97 | |
98 | /* Print the name of an archive member file. */ | |
2da42df6 | 99 | void (*print_archive_member) (char *, const char *); |
252b5132 RH |
100 | |
101 | /* Print the name of the file (and archive, if there is one) | |
102 | containing a symbol. */ | |
2da42df6 | 103 | void (*print_symbol_filename) (bfd *, bfd *); |
252b5132 RH |
104 | |
105 | /* Print a line of information about a symbol. */ | |
2da42df6 | 106 | void (*print_symbol_info) (struct extended_symbol_info *, bfd *); |
252b5132 | 107 | }; |
977f7911 | 108 | |
252b5132 RH |
109 | static struct output_fns formats[] = |
110 | { | |
111 | {print_object_filename_bsd, | |
112 | print_archive_filename_bsd, | |
113 | print_archive_member_bsd, | |
114 | print_symbol_filename_bsd, | |
115 | print_symbol_info_bsd}, | |
116 | {print_object_filename_sysv, | |
117 | print_archive_filename_sysv, | |
118 | print_archive_member_sysv, | |
119 | print_symbol_filename_sysv, | |
120 | print_symbol_info_sysv}, | |
121 | {print_object_filename_posix, | |
122 | print_archive_filename_posix, | |
123 | print_archive_member_posix, | |
124 | print_symbol_filename_posix, | |
125 | print_symbol_info_posix} | |
126 | }; | |
127 | ||
128 | /* Indices in `formats'. */ | |
129 | #define FORMAT_BSD 0 | |
130 | #define FORMAT_SYSV 1 | |
131 | #define FORMAT_POSIX 2 | |
132 | #define FORMAT_DEFAULT FORMAT_BSD | |
133 | ||
134 | /* The output format to use. */ | |
135 | static struct output_fns *format = &formats[FORMAT_DEFAULT]; | |
136 | ||
252b5132 RH |
137 | /* Command options. */ |
138 | ||
139 | static int do_demangle = 0; /* Pretty print C++ symbol names. */ | |
977f7911 NC |
140 | static int external_only = 0; /* Print external symbols only. */ |
141 | static int defined_only = 0; /* Print defined symbols only. */ | |
142 | static int no_sort = 0; /* Don't sort; print syms in order found. */ | |
143 | static int print_debug_syms = 0;/* Print debugger-only symbols too. */ | |
144 | static int print_armap = 0; /* Describe __.SYMDEF data in archive files. */ | |
72797995 | 145 | static int print_size = 0; /* Print size of defined symbols. */ |
977f7911 NC |
146 | static int reverse_sort = 0; /* Sort in downward(alpha or numeric) order. */ |
147 | static int sort_numerically = 0;/* Sort in numeric rather than alpha order. */ | |
148 | static int sort_by_size = 0; /* Sort by size of symbol. */ | |
149 | static int undefined_only = 0; /* Print undefined symbols only. */ | |
150 | static int dynamic = 0; /* Print dynamic symbols. */ | |
151 | static int show_version = 0; /* Show the version number. */ | |
152 | static int show_stats = 0; /* Show statistics. */ | |
0873df2a | 153 | static int show_synthetic = 0; /* Display synthesized symbols too. */ |
977f7911 | 154 | static int line_numbers = 0; /* Print line numbers for symbols. */ |
3c9458e9 | 155 | static int allow_special_symbols = 0; /* Allow special symbols. */ |
252b5132 RH |
156 | |
157 | /* When to print the names of files. Not mutually exclusive in SYSV format. */ | |
158 | static int filename_per_file = 0; /* Once per file, on its own line. */ | |
159 | static int filename_per_symbol = 0; /* Once per symbol, at start of line. */ | |
160 | ||
161 | /* Print formats for printing a symbol value. */ | |
162 | #ifndef BFD64 | |
163 | static char value_format[] = "%08lx"; | |
164 | #else | |
165 | #if BFD_HOST_64BIT_LONG | |
166 | static char value_format[] = "%016lx"; | |
167 | #else | |
168 | /* We don't use value_format for this case. */ | |
169 | #endif | |
170 | #endif | |
62a5a82d L |
171 | #ifdef BFD64 |
172 | static int print_width = 16; | |
173 | #else | |
174 | static int print_width = 8; | |
175 | #endif | |
252b5132 RH |
176 | static int print_radix = 16; |
177 | /* Print formats for printing stab info. */ | |
178 | static char other_format[] = "%02x"; | |
179 | static char desc_format[] = "%04x"; | |
180 | ||
181 | static char *target = NULL; | |
182 | ||
183 | /* Used to cache the line numbers for a BFD. */ | |
184 | static bfd *lineno_cache_bfd; | |
185 | static bfd *lineno_cache_rel_bfd; | |
186 | ||
c20f4f8c AM |
187 | #define OPTION_TARGET 200 |
188 | ||
252b5132 RH |
189 | static struct option long_options[] = |
190 | { | |
191 | {"debug-syms", no_argument, &print_debug_syms, 1}, | |
28c309a2 | 192 | {"demangle", optional_argument, 0, 'C'}, |
252b5132 RH |
193 | {"dynamic", no_argument, &dynamic, 1}, |
194 | {"extern-only", no_argument, &external_only, 1}, | |
195 | {"format", required_argument, 0, 'f'}, | |
196 | {"help", no_argument, 0, 'h'}, | |
197 | {"line-numbers", no_argument, 0, 'l'}, | |
198 | {"no-cplus", no_argument, &do_demangle, 0}, /* Linux compatibility. */ | |
199 | {"no-demangle", no_argument, &do_demangle, 0}, | |
200 | {"no-sort", no_argument, &no_sort, 1}, | |
201 | {"numeric-sort", no_argument, &sort_numerically, 1}, | |
202 | {"portability", no_argument, 0, 'P'}, | |
203 | {"print-armap", no_argument, &print_armap, 1}, | |
204 | {"print-file-name", no_argument, 0, 'o'}, | |
72797995 | 205 | {"print-size", no_argument, 0, 'S'}, |
252b5132 RH |
206 | {"radix", required_argument, 0, 't'}, |
207 | {"reverse-sort", no_argument, &reverse_sort, 1}, | |
208 | {"size-sort", no_argument, &sort_by_size, 1}, | |
3c9458e9 | 209 | {"special-syms", no_argument, &allow_special_symbols, 1}, |
252b5132 | 210 | {"stats", no_argument, &show_stats, 1}, |
0873df2a | 211 | {"synthetic", no_argument, &show_synthetic, 1}, |
c20f4f8c | 212 | {"target", required_argument, 0, OPTION_TARGET}, |
252b5132 RH |
213 | {"defined-only", no_argument, &defined_only, 1}, |
214 | {"undefined-only", no_argument, &undefined_only, 1}, | |
215 | {"version", no_argument, &show_version, 1}, | |
216 | {0, no_argument, 0, 0} | |
217 | }; | |
218 | \f | |
977f7911 | 219 | /* Some error-reporting functions. */ |
252b5132 RH |
220 | |
221 | static void | |
2da42df6 | 222 | usage (FILE *stream, int status) |
252b5132 | 223 | { |
8b53311e NC |
224 | fprintf (stream, _("Usage: %s [option(s)] [file(s)]\n"), program_name); |
225 | fprintf (stream, _(" List symbols in [file(s)] (a.out by default).\n")); | |
226 | fprintf (stream, _(" The options are:\n\ | |
b56f55ce NC |
227 | -a, --debug-syms Display debugger-only symbols\n\ |
228 | -A, --print-file-name Print name of the input file before every symbol\n\ | |
229 | -B Same as --format=bsd\n\ | |
28c309a2 NC |
230 | -C, --demangle[=STYLE] Decode low-level symbol names into user-level names\n\ |
231 | The STYLE, if specified, can be `auto' (the default),\n\ | |
f0c8c24a NC |
232 | `gnu', `lucid', `arm', `hp', `edg', `gnu-v3', `java'\n\ |
233 | or `gnat'\n\ | |
b56f55ce NC |
234 | --no-demangle Do not demangle low-level symbol names\n\ |
235 | -D, --dynamic Display dynamic symbols instead of normal symbols\n\ | |
236 | --defined-only Display only defined symbols\n\ | |
237 | -e (ignored)\n\ | |
238 | -f, --format=FORMAT Use the output format FORMAT. FORMAT can be `bsd',\n\ | |
239 | `sysv' or `posix'. The default is `bsd'\n\ | |
240 | -g, --extern-only Display only external symbols\n\ | |
b56f55ce NC |
241 | -l, --line-numbers Use debugging information to find a filename and\n\ |
242 | line number for each symbol\n\ | |
243 | -n, --numeric-sort Sort symbols numerically by address\n\ | |
244 | -o Same as -A\n\ | |
245 | -p, --no-sort Do not sort the symbols\n\ | |
246 | -P, --portability Same as --format=posix\n\ | |
247 | -r, --reverse-sort Reverse the sense of the sort\n\ | |
72797995 | 248 | -S, --print-size Print size of defined symbols\n\ |
b56f55ce NC |
249 | -s, --print-armap Include index for symbols from archive members\n\ |
250 | --size-sort Sort symbols by size\n\ | |
61bbd35b | 251 | --special-syms Include special symbols in the output\n\ |
0873df2a | 252 | --synthetic Display synthetic symbols as well\n\ |
b56f55ce NC |
253 | -t, --radix=RADIX Use RADIX for printing symbol values\n\ |
254 | --target=BFDNAME Specify the target object format as BFDNAME\n\ | |
255 | -u, --undefined-only Display only undefined symbols\n\ | |
6e800839 | 256 | -X 32_64 (ignored)\n\ |
8b53311e NC |
257 | -h, --help Display this information\n\ |
258 | -V, --version Display this program's version number\n\ | |
b56f55ce | 259 | \n")); |
252b5132 RH |
260 | list_supported_targets (program_name, stream); |
261 | if (status == 0) | |
b56f55ce | 262 | fprintf (stream, _("Report bugs to %s.\n"), REPORT_BUGS_TO); |
252b5132 RH |
263 | exit (status); |
264 | } | |
265 | ||
266 | /* Set the radix for the symbol value and size according to RADIX. */ | |
267 | ||
268 | static void | |
2da42df6 | 269 | set_print_radix (char *radix) |
252b5132 RH |
270 | { |
271 | switch (*radix) | |
272 | { | |
273 | case 'x': | |
274 | break; | |
275 | case 'd': | |
276 | case 'o': | |
277 | if (*radix == 'd') | |
278 | print_radix = 10; | |
279 | else | |
280 | print_radix = 8; | |
281 | #ifndef BFD64 | |
282 | value_format[4] = *radix; | |
283 | #else | |
284 | #if BFD_HOST_64BIT_LONG | |
285 | value_format[5] = *radix; | |
286 | #else | |
287 | /* This case requires special handling for octal and decimal | |
288 | printing. */ | |
289 | #endif | |
290 | #endif | |
291 | other_format[3] = desc_format[3] = *radix; | |
292 | break; | |
293 | default: | |
37cc8ec1 | 294 | fatal (_("%s: invalid radix"), radix); |
252b5132 RH |
295 | } |
296 | } | |
297 | ||
298 | static void | |
2da42df6 | 299 | set_output_format (char *f) |
252b5132 RH |
300 | { |
301 | int i; | |
302 | ||
303 | switch (*f) | |
304 | { | |
305 | case 'b': | |
306 | case 'B': | |
307 | i = FORMAT_BSD; | |
308 | break; | |
309 | case 'p': | |
310 | case 'P': | |
311 | i = FORMAT_POSIX; | |
312 | break; | |
313 | case 's': | |
314 | case 'S': | |
315 | i = FORMAT_SYSV; | |
316 | break; | |
317 | default: | |
37cc8ec1 | 318 | fatal (_("%s: invalid output format"), f); |
252b5132 RH |
319 | } |
320 | format = &formats[i]; | |
321 | } | |
322 | \f | |
33f5f537 | 323 | static const char * |
2da42df6 | 324 | get_symbol_type (unsigned int type) |
33f5f537 L |
325 | { |
326 | static char buff [32]; | |
327 | ||
328 | switch (type) | |
329 | { | |
330 | case STT_NOTYPE: return "NOTYPE"; | |
331 | case STT_OBJECT: return "OBJECT"; | |
332 | case STT_FUNC: return "FUNC"; | |
333 | case STT_SECTION: return "SECTION"; | |
334 | case STT_FILE: return "FILE"; | |
335 | case STT_COMMON: return "COMMON"; | |
336 | case STT_TLS: return "TLS"; | |
337 | default: | |
338 | if (type >= STT_LOPROC && type <= STT_HIPROC) | |
339 | sprintf (buff, _("<processor specific>: %d"), type); | |
340 | else if (type >= STT_LOOS && type <= STT_HIOS) | |
341 | sprintf (buff, _("<OS specific>: %d"), type); | |
342 | else | |
343 | sprintf (buff, _("<unknown>: %d"), type); | |
344 | return buff; | |
345 | } | |
346 | } | |
382c1116 NC |
347 | \f |
348 | /* Print symbol name NAME, read from ABFD, with printf format FORMAT, | |
349 | demangling it if requested. */ | |
33f5f537 | 350 | |
252b5132 | 351 | static void |
382c1116 | 352 | print_symname (const char *format, const char *name, bfd *abfd) |
252b5132 | 353 | { |
382c1116 | 354 | if (do_demangle && *name) |
252b5132 | 355 | { |
382c1116 | 356 | char *res = demangle (abfd, name); |
252b5132 | 357 | |
382c1116 NC |
358 | printf (format, res); |
359 | free (res); | |
360 | return; | |
361 | } | |
252b5132 | 362 | |
382c1116 NC |
363 | printf (format, name); |
364 | } | |
252b5132 | 365 | |
382c1116 NC |
366 | static void |
367 | print_symdef_entry (bfd *abfd) | |
368 | { | |
369 | symindex idx = BFD_NO_MORE_SYMBOLS; | |
370 | carsym *thesym; | |
371 | bfd_boolean everprinted = FALSE; | |
33f5f537 | 372 | |
382c1116 NC |
373 | for (idx = bfd_get_next_mapent (abfd, idx, &thesym); |
374 | idx != BFD_NO_MORE_SYMBOLS; | |
375 | idx = bfd_get_next_mapent (abfd, idx, &thesym)) | |
376 | { | |
377 | bfd *elt; | |
378 | if (!everprinted) | |
252b5132 | 379 | { |
382c1116 NC |
380 | printf (_("\nArchive index:\n")); |
381 | everprinted = TRUE; | |
252b5132 | 382 | } |
382c1116 NC |
383 | elt = bfd_get_elt_at_index (abfd, idx); |
384 | if (elt == NULL) | |
385 | bfd_fatal ("bfd_get_elt_at_index"); | |
386 | if (thesym->name != (char *) NULL) | |
252b5132 | 387 | { |
382c1116 NC |
388 | print_symname ("%s", thesym->name, abfd); |
389 | printf (" in %s\n", bfd_get_filename (elt)); | |
252b5132 | 390 | } |
252b5132 RH |
391 | } |
392 | } | |
382c1116 NC |
393 | \f |
394 | /* Choose which symbol entries to print; | |
395 | compact them downward to get rid of the rest. | |
396 | Return the number of symbols to be printed. */ | |
252b5132 | 397 | |
382c1116 NC |
398 | static long |
399 | filter_symbols (bfd *abfd, bfd_boolean dynamic, void *minisyms, | |
400 | long symcount, unsigned int size) | |
252b5132 | 401 | { |
382c1116 NC |
402 | bfd_byte *from, *fromend, *to; |
403 | asymbol *store; | |
252b5132 | 404 | |
382c1116 NC |
405 | store = bfd_make_empty_symbol (abfd); |
406 | if (store == NULL) | |
407 | bfd_fatal (bfd_get_filename (abfd)); | |
f24ddbdd | 408 | |
382c1116 NC |
409 | from = (bfd_byte *) minisyms; |
410 | fromend = from + symcount * size; | |
411 | to = (bfd_byte *) minisyms; | |
252b5132 | 412 | |
382c1116 | 413 | for (; from < fromend; from += size) |
252b5132 | 414 | { |
382c1116 NC |
415 | int keep = 0; |
416 | asymbol *sym; | |
33f5f537 | 417 | |
382c1116 NC |
418 | PROGRESS (1); |
419 | ||
420 | sym = bfd_minisymbol_to_symbol (abfd, dynamic, (const void *) from, store); | |
421 | if (sym == NULL) | |
422 | bfd_fatal (bfd_get_filename (abfd)); | |
423 | ||
424 | if (undefined_only) | |
425 | keep = bfd_is_und_section (sym->section); | |
426 | else if (external_only) | |
427 | keep = ((sym->flags & BSF_GLOBAL) != 0 | |
428 | || (sym->flags & BSF_WEAK) != 0 | |
429 | || bfd_is_und_section (sym->section) | |
430 | || bfd_is_com_section (sym->section)); | |
431 | else | |
432 | keep = 1; | |
433 | ||
434 | if (keep | |
435 | && ! print_debug_syms | |
436 | && (sym->flags & BSF_DEBUGGING) != 0) | |
437 | keep = 0; | |
438 | ||
439 | if (keep | |
440 | && sort_by_size | |
441 | && (bfd_is_abs_section (sym->section) | |
442 | || bfd_is_und_section (sym->section))) | |
443 | keep = 0; | |
444 | ||
445 | if (keep | |
446 | && defined_only) | |
252b5132 | 447 | { |
382c1116 NC |
448 | if (bfd_is_und_section (sym->section)) |
449 | keep = 0; | |
252b5132 | 450 | } |
252b5132 | 451 | |
3c9458e9 NC |
452 | if (keep |
453 | && bfd_is_target_special_symbol (abfd, sym) | |
454 | && ! allow_special_symbols) | |
455 | keep = 0; | |
456 | ||
382c1116 NC |
457 | if (keep) |
458 | { | |
459 | memcpy (to, from, size); | |
460 | to += size; | |
461 | } | |
462 | } | |
252b5132 | 463 | |
382c1116 | 464 | return (to - (bfd_byte *) minisyms) / size; |
252b5132 RH |
465 | } |
466 | \f | |
467 | /* These globals are used to pass information into the sorting | |
468 | routines. */ | |
469 | static bfd *sort_bfd; | |
b34976b6 | 470 | static bfd_boolean sort_dynamic; |
252b5132 RH |
471 | static asymbol *sort_x; |
472 | static asymbol *sort_y; | |
473 | ||
474 | /* Symbol-sorting predicates */ | |
475 | #define valueof(x) ((x)->section->vma + (x)->value) | |
476 | ||
477 | /* Numeric sorts. Undefined symbols are always considered "less than" | |
478 | defined symbols with zero values. Common symbols are not treated | |
479 | specially -- i.e., their sizes are used as their "values". */ | |
480 | ||
252b5132 | 481 | static int |
2da42df6 | 482 | non_numeric_forward (const void *P_x, const void *P_y) |
252b5132 RH |
483 | { |
484 | asymbol *x, *y; | |
485 | const char *xn, *yn; | |
486 | ||
487 | x = bfd_minisymbol_to_symbol (sort_bfd, sort_dynamic, P_x, sort_x); | |
488 | y = bfd_minisymbol_to_symbol (sort_bfd, sort_dynamic, P_y, sort_y); | |
489 | if (x == NULL || y == NULL) | |
490 | bfd_fatal (bfd_get_filename (sort_bfd)); | |
491 | ||
492 | xn = bfd_asymbol_name (x); | |
493 | yn = bfd_asymbol_name (y); | |
494 | ||
9710509e AM |
495 | if (yn == NULL) |
496 | return xn != NULL; | |
497 | if (xn == NULL) | |
498 | return -1; | |
499 | ||
500 | #ifdef HAVE_STRCOLL | |
501 | /* Solaris 2.5 has a bug in strcoll. | |
502 | strcoll returns invalid values when confronted with empty strings. */ | |
503 | if (*yn == '\0') | |
504 | return *xn != '\0'; | |
505 | if (*xn == '\0') | |
506 | return -1; | |
507 | ||
508 | return strcoll (xn, yn); | |
509 | #else | |
510 | return strcmp (xn, yn); | |
511 | #endif | |
252b5132 RH |
512 | } |
513 | ||
514 | static int | |
2da42df6 | 515 | non_numeric_reverse (const void *x, const void *y) |
252b5132 RH |
516 | { |
517 | return - non_numeric_forward (x, y); | |
518 | } | |
519 | ||
382c1116 NC |
520 | static int |
521 | numeric_forward (const void *P_x, const void *P_y) | |
522 | { | |
523 | asymbol *x, *y; | |
524 | asection *xs, *ys; | |
525 | ||
526 | x = bfd_minisymbol_to_symbol (sort_bfd, sort_dynamic, P_x, sort_x); | |
527 | y = bfd_minisymbol_to_symbol (sort_bfd, sort_dynamic, P_y, sort_y); | |
528 | if (x == NULL || y == NULL) | |
529 | bfd_fatal (bfd_get_filename (sort_bfd)); | |
530 | ||
531 | xs = bfd_get_section (x); | |
532 | ys = bfd_get_section (y); | |
533 | ||
534 | if (bfd_is_und_section (xs)) | |
535 | { | |
536 | if (! bfd_is_und_section (ys)) | |
537 | return -1; | |
538 | } | |
539 | else if (bfd_is_und_section (ys)) | |
540 | return 1; | |
541 | else if (valueof (x) != valueof (y)) | |
542 | return valueof (x) < valueof (y) ? -1 : 1; | |
543 | ||
544 | return non_numeric_forward (P_x, P_y); | |
545 | } | |
546 | ||
547 | static int | |
548 | numeric_reverse (const void *x, const void *y) | |
549 | { | |
550 | return - numeric_forward (x, y); | |
551 | } | |
552 | ||
2da42df6 | 553 | static int (*(sorters[2][2])) (const void *, const void *) = |
252b5132 RH |
554 | { |
555 | { non_numeric_forward, non_numeric_reverse }, | |
556 | { numeric_forward, numeric_reverse } | |
557 | }; | |
558 | ||
559 | /* This sort routine is used by sort_symbols_by_size. It is similar | |
560 | to numeric_forward, but when symbols have the same value it sorts | |
561 | by section VMA. This simplifies the sort_symbols_by_size code | |
562 | which handles symbols at the end of sections. Also, this routine | |
563 | tries to sort file names before other symbols with the same value. | |
564 | That will make the file name have a zero size, which will make | |
565 | sort_symbols_by_size choose the non file name symbol, leading to | |
566 | more meaningful output. For similar reasons, this code sorts | |
567 | gnu_compiled_* and gcc2_compiled before other symbols with the same | |
568 | value. */ | |
569 | ||
570 | static int | |
2da42df6 | 571 | size_forward1 (const void *P_x, const void *P_y) |
252b5132 RH |
572 | { |
573 | asymbol *x, *y; | |
574 | asection *xs, *ys; | |
575 | const char *xn, *yn; | |
576 | size_t xnl, ynl; | |
577 | int xf, yf; | |
578 | ||
579 | x = bfd_minisymbol_to_symbol (sort_bfd, sort_dynamic, P_x, sort_x); | |
580 | y = bfd_minisymbol_to_symbol (sort_bfd, sort_dynamic, P_y, sort_y); | |
581 | if (x == NULL || y == NULL) | |
582 | bfd_fatal (bfd_get_filename (sort_bfd)); | |
583 | ||
584 | xs = bfd_get_section (x); | |
585 | ys = bfd_get_section (y); | |
586 | ||
587 | if (bfd_is_und_section (xs)) | |
588 | abort (); | |
589 | if (bfd_is_und_section (ys)) | |
590 | abort (); | |
591 | ||
592 | if (valueof (x) != valueof (y)) | |
593 | return valueof (x) < valueof (y) ? -1 : 1; | |
594 | ||
595 | if (xs->vma != ys->vma) | |
596 | return xs->vma < ys->vma ? -1 : 1; | |
597 | ||
598 | xn = bfd_asymbol_name (x); | |
599 | yn = bfd_asymbol_name (y); | |
600 | xnl = strlen (xn); | |
601 | ynl = strlen (yn); | |
602 | ||
603 | /* The symbols gnu_compiled and gcc2_compiled convey even less | |
604 | information than the file name, so sort them out first. */ | |
605 | ||
606 | xf = (strstr (xn, "gnu_compiled") != NULL | |
607 | || strstr (xn, "gcc2_compiled") != NULL); | |
608 | yf = (strstr (yn, "gnu_compiled") != NULL | |
609 | || strstr (yn, "gcc2_compiled") != NULL); | |
610 | ||
611 | if (xf && ! yf) | |
612 | return -1; | |
613 | if (! xf && yf) | |
614 | return 1; | |
615 | ||
616 | /* We use a heuristic for the file name. It may not work on non | |
617 | Unix systems, but it doesn't really matter; the only difference | |
618 | is precisely which symbol names get printed. */ | |
619 | ||
620 | #define file_symbol(s, sn, snl) \ | |
621 | (((s)->flags & BSF_FILE) != 0 \ | |
622 | || ((sn)[(snl) - 2] == '.' \ | |
623 | && ((sn)[(snl) - 1] == 'o' \ | |
624 | || (sn)[(snl) - 1] == 'a'))) | |
625 | ||
626 | xf = file_symbol (x, xn, xnl); | |
627 | yf = file_symbol (y, yn, ynl); | |
628 | ||
629 | if (xf && ! yf) | |
630 | return -1; | |
631 | if (! xf && yf) | |
632 | return 1; | |
633 | ||
634 | return non_numeric_forward (P_x, P_y); | |
635 | } | |
636 | ||
637 | /* This sort routine is used by sort_symbols_by_size. It is sorting | |
638 | an array of size_sym structures into size order. */ | |
639 | ||
640 | static int | |
2da42df6 | 641 | size_forward2 (const void *P_x, const void *P_y) |
252b5132 RH |
642 | { |
643 | const struct size_sym *x = (const struct size_sym *) P_x; | |
644 | const struct size_sym *y = (const struct size_sym *) P_y; | |
645 | ||
646 | if (x->size < y->size) | |
647 | return reverse_sort ? 1 : -1; | |
648 | else if (x->size > y->size) | |
649 | return reverse_sort ? -1 : 1; | |
650 | else | |
651 | return sorters[0][reverse_sort] (x->minisym, y->minisym); | |
652 | } | |
653 | ||
6ab6b380 NC |
654 | /* Sort the symbols by size. ELF provides a size but for other formats |
655 | we have to make a guess by assuming that the difference between the | |
656 | address of a symbol and the address of the next higher symbol is the | |
657 | size. */ | |
252b5132 RH |
658 | |
659 | static long | |
2da42df6 AJ |
660 | sort_symbols_by_size (bfd *abfd, bfd_boolean dynamic, void *minisyms, |
661 | long symcount, unsigned int size, | |
662 | struct size_sym **symsizesp) | |
252b5132 RH |
663 | { |
664 | struct size_sym *symsizes; | |
665 | bfd_byte *from, *fromend; | |
666 | asymbol *sym = NULL; | |
667 | asymbol *store_sym, *store_next; | |
668 | ||
669 | qsort (minisyms, symcount, size, size_forward1); | |
670 | ||
671 | /* We are going to return a special set of symbols and sizes to | |
672 | print. */ | |
382c1116 | 673 | symsizes = xmalloc (symcount * sizeof (struct size_sym)); |
252b5132 RH |
674 | *symsizesp = symsizes; |
675 | ||
676 | /* Note that filter_symbols has already removed all absolute and | |
677 | undefined symbols. Here we remove all symbols whose size winds | |
678 | up as zero. */ | |
252b5132 RH |
679 | from = (bfd_byte *) minisyms; |
680 | fromend = from + symcount * size; | |
681 | ||
682 | store_sym = sort_x; | |
683 | store_next = sort_y; | |
684 | ||
685 | if (from < fromend) | |
686 | { | |
2da42df6 | 687 | sym = bfd_minisymbol_to_symbol (abfd, dynamic, (const void *) from, |
252b5132 RH |
688 | store_sym); |
689 | if (sym == NULL) | |
690 | bfd_fatal (bfd_get_filename (abfd)); | |
691 | } | |
692 | ||
693 | for (; from < fromend; from += size) | |
694 | { | |
695 | asymbol *next; | |
696 | asection *sec; | |
697 | bfd_vma sz; | |
698 | asymbol *temp; | |
699 | ||
700 | if (from + size < fromend) | |
701 | { | |
702 | next = bfd_minisymbol_to_symbol (abfd, | |
703 | dynamic, | |
2da42df6 | 704 | (const void *) (from + size), |
252b5132 RH |
705 | store_next); |
706 | if (next == NULL) | |
707 | bfd_fatal (bfd_get_filename (abfd)); | |
708 | } | |
709 | else | |
710 | next = NULL; | |
711 | ||
712 | sec = bfd_get_section (sym); | |
713 | ||
9710509e | 714 | if (bfd_get_flavour (abfd) == bfd_target_elf_flavour) |
6ab6b380 NC |
715 | sz = ((elf_symbol_type *) sym)->internal_elf_sym.st_size; |
716 | else if (bfd_is_com_section (sec)) | |
252b5132 RH |
717 | sz = sym->value; |
718 | else | |
719 | { | |
720 | if (from + size < fromend | |
721 | && sec == bfd_get_section (next)) | |
722 | sz = valueof (next) - valueof (sym); | |
723 | else | |
724 | sz = (bfd_get_section_vma (abfd, sec) | |
725 | + bfd_section_size (abfd, sec) | |
726 | - valueof (sym)); | |
727 | } | |
728 | ||
729 | if (sz != 0) | |
730 | { | |
2da42df6 | 731 | symsizes->minisym = (const void *) from; |
252b5132 RH |
732 | symsizes->size = sz; |
733 | ++symsizes; | |
734 | } | |
735 | ||
736 | sym = next; | |
737 | ||
738 | temp = store_sym; | |
739 | store_sym = store_next; | |
740 | store_next = temp; | |
741 | } | |
742 | ||
743 | symcount = symsizes - *symsizesp; | |
744 | ||
745 | /* We must now sort again by size. */ | |
2da42df6 | 746 | qsort ((void *) *symsizesp, symcount, sizeof (struct size_sym), size_forward2); |
252b5132 RH |
747 | |
748 | return symcount; | |
749 | } | |
382c1116 NC |
750 | |
751 | /* This function is used to get the relocs for a particular section. | |
752 | It is called via bfd_map_over_sections. */ | |
252b5132 RH |
753 | |
754 | static void | |
382c1116 | 755 | get_relocs (bfd *abfd, asection *sec, void *dataarg) |
252b5132 | 756 | { |
382c1116 | 757 | struct get_relocs_info *data = (struct get_relocs_info *) dataarg; |
252b5132 | 758 | |
382c1116 NC |
759 | *data->secs = sec; |
760 | ||
761 | if ((sec->flags & SEC_RELOC) == 0) | |
252b5132 | 762 | { |
382c1116 NC |
763 | *data->relocs = NULL; |
764 | *data->relcount = 0; | |
252b5132 | 765 | } |
382c1116 NC |
766 | else |
767 | { | |
768 | long relsize; | |
252b5132 | 769 | |
382c1116 NC |
770 | relsize = bfd_get_reloc_upper_bound (abfd, sec); |
771 | if (relsize < 0) | |
772 | bfd_fatal (bfd_get_filename (abfd)); | |
252b5132 | 773 | |
382c1116 NC |
774 | *data->relocs = xmalloc (relsize); |
775 | *data->relcount = bfd_canonicalize_reloc (abfd, sec, *data->relocs, | |
776 | data->syms); | |
777 | if (*data->relcount < 0) | |
778 | bfd_fatal (bfd_get_filename (abfd)); | |
68a4c073 | 779 | } |
252b5132 | 780 | |
382c1116 NC |
781 | ++data->secs; |
782 | ++data->relocs; | |
783 | ++data->relcount; | |
784 | } | |
785 | ||
786 | /* Print a single symbol. */ | |
787 | ||
788 | static void | |
789 | print_symbol (bfd *abfd, asymbol *sym, bfd_vma ssize, bfd *archive_bfd) | |
790 | { | |
791 | symbol_info syminfo; | |
792 | struct extended_symbol_info info; | |
793 | ||
794 | PROGRESS (1); | |
795 | ||
796 | format->print_symbol_filename (archive_bfd, abfd); | |
797 | ||
798 | bfd_get_symbol_info (abfd, sym, &syminfo); | |
799 | info.sinfo = &syminfo; | |
800 | info.ssize = ssize; | |
801 | if (bfd_get_flavour (abfd) == bfd_target_elf_flavour) | |
802 | info.elfinfo = (elf_symbol_type *) sym; | |
803 | else | |
804 | info.elfinfo = NULL; | |
805 | format->print_symbol_info (&info, abfd); | |
806 | ||
807 | if (line_numbers) | |
0873df2a | 808 | { |
382c1116 NC |
809 | static asymbol **syms; |
810 | static long symcount; | |
811 | const char *filename, *functionname; | |
812 | unsigned int lineno; | |
0873df2a | 813 | |
382c1116 NC |
814 | /* We need to get the canonical symbols in order to call |
815 | bfd_find_nearest_line. This is inefficient, but, then, you | |
816 | don't have to use --line-numbers. */ | |
817 | if (abfd != lineno_cache_bfd && syms != NULL) | |
0873df2a | 818 | { |
382c1116 NC |
819 | free (syms); |
820 | syms = NULL; | |
0873df2a | 821 | } |
382c1116 | 822 | if (syms == NULL) |
0873df2a | 823 | { |
382c1116 NC |
824 | long symsize; |
825 | ||
826 | symsize = bfd_get_symtab_upper_bound (abfd); | |
827 | if (symsize < 0) | |
828 | bfd_fatal (bfd_get_filename (abfd)); | |
829 | syms = xmalloc (symsize); | |
830 | symcount = bfd_canonicalize_symtab (abfd, syms); | |
831 | if (symcount < 0) | |
832 | bfd_fatal (bfd_get_filename (abfd)); | |
833 | lineno_cache_bfd = abfd; | |
0873df2a | 834 | } |
0873df2a | 835 | |
382c1116 NC |
836 | if (bfd_is_und_section (bfd_get_section (sym))) |
837 | { | |
838 | static asection **secs; | |
839 | static arelent ***relocs; | |
840 | static long *relcount; | |
841 | static unsigned int seccount; | |
842 | unsigned int i; | |
843 | const char *symname; | |
0873df2a | 844 | |
382c1116 NC |
845 | /* For an undefined symbol, we try to find a reloc for the |
846 | symbol, and print the line number of the reloc. */ | |
847 | if (abfd != lineno_cache_rel_bfd && relocs != NULL) | |
848 | { | |
849 | for (i = 0; i < seccount; i++) | |
850 | if (relocs[i] != NULL) | |
851 | free (relocs[i]); | |
852 | free (secs); | |
853 | free (relocs); | |
854 | free (relcount); | |
855 | secs = NULL; | |
856 | relocs = NULL; | |
857 | relcount = NULL; | |
858 | } | |
252b5132 | 859 | |
382c1116 NC |
860 | if (relocs == NULL) |
861 | { | |
862 | struct get_relocs_info info; | |
252b5132 | 863 | |
382c1116 | 864 | seccount = bfd_count_sections (abfd); |
252b5132 | 865 | |
382c1116 NC |
866 | secs = xmalloc (seccount * sizeof *secs); |
867 | relocs = xmalloc (seccount * sizeof *relocs); | |
868 | relcount = xmalloc (seccount * sizeof *relcount); | |
252b5132 | 869 | |
382c1116 NC |
870 | info.secs = secs; |
871 | info.relocs = relocs; | |
872 | info.relcount = relcount; | |
873 | info.syms = syms; | |
874 | bfd_map_over_sections (abfd, get_relocs, (void *) &info); | |
875 | lineno_cache_rel_bfd = abfd; | |
876 | } | |
252b5132 | 877 | |
382c1116 NC |
878 | symname = bfd_asymbol_name (sym); |
879 | for (i = 0; i < seccount; i++) | |
880 | { | |
881 | long j; | |
882 | ||
883 | for (j = 0; j < relcount[i]; j++) | |
884 | { | |
885 | arelent *r; | |
886 | ||
887 | r = relocs[i][j]; | |
888 | if (r->sym_ptr_ptr != NULL | |
889 | && (*r->sym_ptr_ptr)->section == sym->section | |
890 | && (*r->sym_ptr_ptr)->value == sym->value | |
891 | && strcmp (symname, | |
892 | bfd_asymbol_name (*r->sym_ptr_ptr)) == 0 | |
893 | && bfd_find_nearest_line (abfd, secs[i], syms, | |
894 | r->address, &filename, | |
895 | &functionname, &lineno) | |
896 | && filename != NULL) | |
897 | { | |
898 | /* We only print the first one we find. */ | |
899 | printf ("\t%s:%u", filename, lineno); | |
900 | i = seccount; | |
901 | break; | |
902 | } | |
903 | } | |
904 | } | |
905 | } | |
906 | else if (bfd_get_section (sym)->owner == abfd) | |
907 | { | |
908 | if (bfd_find_nearest_line (abfd, bfd_get_section (sym), syms, | |
909 | sym->value, &filename, &functionname, | |
910 | &lineno) | |
911 | && filename != NULL | |
912 | && lineno != 0) | |
913 | printf ("\t%s:%u", filename, lineno); | |
914 | } | |
915 | } | |
916 | ||
917 | putchar ('\n'); | |
252b5132 RH |
918 | } |
919 | \f | |
382c1116 | 920 | /* Print the symbols when sorting by size. */ |
252b5132 | 921 | |
382c1116 NC |
922 | static void |
923 | print_size_symbols (bfd *abfd, bfd_boolean dynamic, | |
924 | struct size_sym *symsizes, long symcount, | |
925 | bfd *archive_bfd) | |
252b5132 | 926 | { |
252b5132 | 927 | asymbol *store; |
382c1116 | 928 | struct size_sym *from, *fromend; |
252b5132 RH |
929 | |
930 | store = bfd_make_empty_symbol (abfd); | |
931 | if (store == NULL) | |
932 | bfd_fatal (bfd_get_filename (abfd)); | |
933 | ||
382c1116 NC |
934 | from = symsizes; |
935 | fromend = from + symcount; | |
936 | for (; from < fromend; from++) | |
252b5132 | 937 | { |
252b5132 | 938 | asymbol *sym; |
382c1116 | 939 | bfd_vma ssize; |
252b5132 | 940 | |
382c1116 | 941 | sym = bfd_minisymbol_to_symbol (abfd, dynamic, from->minisym, store); |
252b5132 RH |
942 | if (sym == NULL) |
943 | bfd_fatal (bfd_get_filename (abfd)); | |
944 | ||
382c1116 NC |
945 | /* For elf we have already computed the correct symbol size. */ |
946 | if (bfd_get_flavour (abfd) == bfd_target_elf_flavour) | |
947 | ssize = from->size; | |
252b5132 | 948 | else |
382c1116 | 949 | ssize = from->size - bfd_section_vma (abfd, bfd_get_section (sym)); |
eb3f2f5c | 950 | |
382c1116 | 951 | print_symbol (abfd, sym, ssize, archive_bfd); |
252b5132 | 952 | } |
252b5132 RH |
953 | } |
954 | ||
382c1116 | 955 | \f |
252b5132 RH |
956 | /* Print the symbols. If ARCHIVE_BFD is non-NULL, it is the archive |
957 | containing ABFD. */ | |
958 | ||
959 | static void | |
2da42df6 AJ |
960 | print_symbols (bfd *abfd, bfd_boolean dynamic, void *minisyms, long symcount, |
961 | unsigned int size, bfd *archive_bfd) | |
252b5132 RH |
962 | { |
963 | asymbol *store; | |
964 | bfd_byte *from, *fromend; | |
965 | ||
966 | store = bfd_make_empty_symbol (abfd); | |
967 | if (store == NULL) | |
968 | bfd_fatal (bfd_get_filename (abfd)); | |
969 | ||
970 | from = (bfd_byte *) minisyms; | |
971 | fromend = from + symcount * size; | |
972 | for (; from < fromend; from += size) | |
973 | { | |
974 | asymbol *sym; | |
975 | ||
976 | sym = bfd_minisymbol_to_symbol (abfd, dynamic, from, store); | |
977 | if (sym == NULL) | |
978 | bfd_fatal (bfd_get_filename (abfd)); | |
979 | ||
33f5f537 | 980 | print_symbol (abfd, sym, (bfd_vma) 0, archive_bfd); |
252b5132 RH |
981 | } |
982 | } | |
983 | ||
382c1116 | 984 | /* If ARCHIVE_BFD is non-NULL, it is the archive containing ABFD. */ |
252b5132 | 985 | |
0af11b59 | 986 | static void |
382c1116 | 987 | display_rel_file (bfd *abfd, bfd *archive_bfd) |
252b5132 | 988 | { |
382c1116 NC |
989 | long symcount; |
990 | void *minisyms; | |
991 | unsigned int size; | |
992 | struct size_sym *symsizes; | |
252b5132 | 993 | |
382c1116 NC |
994 | if (! dynamic) |
995 | { | |
996 | if (!(bfd_get_file_flags (abfd) & HAS_SYMS)) | |
997 | { | |
998 | non_fatal (_("%s: no symbols"), bfd_get_filename (abfd)); | |
999 | return; | |
1000 | } | |
1001 | } | |
1002 | ||
1003 | symcount = bfd_read_minisymbols (abfd, dynamic, &minisyms, &size); | |
1004 | if (symcount < 0) | |
252b5132 RH |
1005 | bfd_fatal (bfd_get_filename (abfd)); |
1006 | ||
382c1116 | 1007 | if (symcount == 0) |
252b5132 | 1008 | { |
382c1116 NC |
1009 | non_fatal (_("%s: no symbols"), bfd_get_filename (abfd)); |
1010 | return; | |
1011 | } | |
252b5132 | 1012 | |
382c1116 NC |
1013 | if (show_synthetic && size == sizeof (asymbol *)) |
1014 | { | |
1015 | asymbol *synthsyms; | |
1016 | long synth_count; | |
1017 | asymbol **static_syms = NULL; | |
1018 | asymbol **dyn_syms = NULL; | |
1019 | long static_count = 0; | |
1020 | long dyn_count = 0; | |
252b5132 | 1021 | |
382c1116 NC |
1022 | if (dynamic) |
1023 | { | |
1024 | dyn_count = symcount; | |
1025 | dyn_syms = minisyms; | |
1026 | } | |
977f7911 | 1027 | else |
382c1116 NC |
1028 | { |
1029 | static_count = symcount; | |
1030 | static_syms = minisyms; | |
1031 | } | |
1032 | synth_count = bfd_get_synthetic_symtab (abfd, static_count, static_syms, | |
1033 | dyn_count, dyn_syms, &synthsyms); | |
1034 | if (synth_count > 0) | |
1035 | { | |
1036 | asymbol **symp; | |
1037 | void *new_mini; | |
1038 | long i; | |
977f7911 | 1039 | |
382c1116 NC |
1040 | new_mini = xmalloc ((symcount + synth_count + 1) * sizeof (*symp)); |
1041 | symp = new_mini; | |
1042 | memcpy (symp, minisyms, symcount * sizeof (*symp)); | |
1043 | symp += symcount; | |
1044 | for (i = 0; i < synth_count; i++) | |
1045 | *symp++ = synthsyms + i; | |
1046 | *symp = 0; | |
1047 | minisyms = new_mini; | |
1048 | symcount += synth_count; | |
1049 | } | |
252b5132 | 1050 | } |
252b5132 | 1051 | |
382c1116 NC |
1052 | /* Discard the symbols we don't want to print. |
1053 | It's OK to do this in place; we'll free the storage anyway | |
1054 | (after printing). */ | |
252b5132 | 1055 | |
382c1116 | 1056 | symcount = filter_symbols (abfd, dynamic, minisyms, symcount, size); |
2da42df6 | 1057 | |
382c1116 NC |
1058 | symsizes = NULL; |
1059 | if (! no_sort) | |
1060 | { | |
1061 | sort_bfd = abfd; | |
1062 | sort_dynamic = dynamic; | |
1063 | sort_x = bfd_make_empty_symbol (abfd); | |
1064 | sort_y = bfd_make_empty_symbol (abfd); | |
1065 | if (sort_x == NULL || sort_y == NULL) | |
1066 | bfd_fatal (bfd_get_filename (abfd)); | |
252b5132 | 1067 | |
382c1116 NC |
1068 | if (! sort_by_size) |
1069 | qsort (minisyms, symcount, size, | |
1070 | sorters[sort_numerically][reverse_sort]); | |
1071 | else | |
1072 | symcount = sort_symbols_by_size (abfd, dynamic, minisyms, symcount, | |
1073 | size, &symsizes); | |
1074 | } | |
252b5132 | 1075 | |
382c1116 NC |
1076 | if (! sort_by_size) |
1077 | print_symbols (abfd, dynamic, minisyms, symcount, size, archive_bfd); | |
252b5132 | 1078 | else |
382c1116 | 1079 | print_size_symbols (abfd, dynamic, symsizes, symcount, archive_bfd); |
252b5132 | 1080 | |
382c1116 NC |
1081 | free (minisyms); |
1082 | } | |
1083 | ||
1084 | static void | |
1085 | display_archive (bfd *file) | |
1086 | { | |
1087 | bfd *arfile = NULL; | |
1088 | bfd *last_arfile = NULL; | |
1089 | char **matching; | |
1090 | ||
1091 | format->print_archive_filename (bfd_get_filename (file)); | |
1092 | ||
1093 | if (print_armap) | |
1094 | print_symdef_entry (file); | |
1095 | ||
1096 | for (;;) | |
252b5132 | 1097 | { |
382c1116 | 1098 | PROGRESS (1); |
252b5132 | 1099 | |
382c1116 NC |
1100 | arfile = bfd_openr_next_archived_file (file, arfile); |
1101 | ||
1102 | if (arfile == NULL) | |
252b5132 | 1103 | { |
382c1116 NC |
1104 | if (bfd_get_error () != bfd_error_no_more_archived_files) |
1105 | bfd_fatal (bfd_get_filename (file)); | |
1106 | break; | |
252b5132 | 1107 | } |
382c1116 NC |
1108 | |
1109 | if (bfd_check_format_matches (arfile, bfd_object, &matching)) | |
252b5132 | 1110 | { |
382c1116 | 1111 | char buf[30]; |
252b5132 | 1112 | |
382c1116 NC |
1113 | bfd_sprintf_vma (arfile, buf, (bfd_vma) -1); |
1114 | print_width = strlen (buf); | |
1115 | format->print_archive_member (bfd_get_filename (file), | |
1116 | bfd_get_filename (arfile)); | |
1117 | display_rel_file (arfile, file); | |
252b5132 | 1118 | } |
382c1116 | 1119 | else |
252b5132 | 1120 | { |
382c1116 NC |
1121 | bfd_nonfatal (bfd_get_filename (arfile)); |
1122 | if (bfd_get_error () == bfd_error_file_ambiguously_recognized) | |
252b5132 | 1123 | { |
382c1116 NC |
1124 | list_matching_formats (matching); |
1125 | free (matching); | |
252b5132 | 1126 | } |
382c1116 | 1127 | } |
252b5132 | 1128 | |
382c1116 NC |
1129 | if (last_arfile != NULL) |
1130 | { | |
1131 | bfd_close (last_arfile); | |
1132 | lineno_cache_bfd = NULL; | |
1133 | lineno_cache_rel_bfd = NULL; | |
1134 | } | |
1135 | last_arfile = arfile; | |
1136 | } | |
252b5132 | 1137 | |
382c1116 NC |
1138 | if (last_arfile != NULL) |
1139 | { | |
1140 | bfd_close (last_arfile); | |
1141 | lineno_cache_bfd = NULL; | |
1142 | lineno_cache_rel_bfd = NULL; | |
1143 | } | |
1144 | } | |
252b5132 | 1145 | |
382c1116 NC |
1146 | static bfd_boolean |
1147 | display_file (char *filename) | |
1148 | { | |
1149 | bfd_boolean retval = TRUE; | |
1150 | bfd *file; | |
1151 | char **matching; | |
252b5132 | 1152 | |
382c1116 NC |
1153 | if (get_file_size (filename) < 1) |
1154 | return FALSE; | |
252b5132 | 1155 | |
382c1116 NC |
1156 | file = bfd_openr (filename, target); |
1157 | if (file == NULL) | |
1158 | { | |
1159 | bfd_nonfatal (filename); | |
1160 | return FALSE; | |
1161 | } | |
252b5132 | 1162 | |
382c1116 NC |
1163 | if (bfd_check_format (file, bfd_archive)) |
1164 | { | |
1165 | display_archive (file); | |
1166 | } | |
1167 | else if (bfd_check_format_matches (file, bfd_object, &matching)) | |
1168 | { | |
1169 | char buf[30]; | |
1170 | ||
1171 | bfd_sprintf_vma (file, buf, (bfd_vma) -1); | |
1172 | print_width = strlen (buf); | |
1173 | format->print_object_filename (filename); | |
1174 | display_rel_file (file, NULL); | |
1175 | } | |
1176 | else | |
1177 | { | |
1178 | bfd_nonfatal (filename); | |
1179 | if (bfd_get_error () == bfd_error_file_ambiguously_recognized) | |
252b5132 | 1180 | { |
382c1116 NC |
1181 | list_matching_formats (matching); |
1182 | free (matching); | |
252b5132 | 1183 | } |
382c1116 | 1184 | retval = FALSE; |
252b5132 RH |
1185 | } |
1186 | ||
382c1116 NC |
1187 | if (!bfd_close (file)) |
1188 | bfd_fatal (filename); | |
1189 | ||
1190 | lineno_cache_bfd = NULL; | |
1191 | lineno_cache_rel_bfd = NULL; | |
1192 | ||
1193 | return retval; | |
252b5132 RH |
1194 | } |
1195 | \f | |
1196 | /* The following 3 groups of functions are called unconditionally, | |
1197 | once at the start of processing each file of the appropriate type. | |
1198 | They should check `filename_per_file' and `filename_per_symbol', | |
1199 | as appropriate for their output format, to determine whether to | |
1200 | print anything. */ | |
1201 | \f | |
1202 | /* Print the name of an object file given on the command line. */ | |
1203 | ||
1204 | static void | |
2da42df6 | 1205 | print_object_filename_bsd (char *filename) |
252b5132 RH |
1206 | { |
1207 | if (filename_per_file && !filename_per_symbol) | |
1208 | printf ("\n%s:\n", filename); | |
1209 | } | |
1210 | ||
1211 | static void | |
2da42df6 | 1212 | print_object_filename_sysv (char *filename) |
252b5132 RH |
1213 | { |
1214 | if (undefined_only) | |
1215 | printf (_("\n\nUndefined symbols from %s:\n\n"), filename); | |
1216 | else | |
1217 | printf (_("\n\nSymbols from %s:\n\n"), filename); | |
33f5f537 L |
1218 | if (print_width == 8) |
1219 | printf (_("\ | |
1220 | Name Value Class Type Size Line Section\n\n")); | |
1221 | else | |
1222 | printf (_("\ | |
1223 | Name Value Class Type Size Line Section\n\n")); | |
252b5132 RH |
1224 | } |
1225 | ||
1226 | static void | |
2da42df6 | 1227 | print_object_filename_posix (char *filename) |
252b5132 RH |
1228 | { |
1229 | if (filename_per_file && !filename_per_symbol) | |
1230 | printf ("%s:\n", filename); | |
1231 | } | |
1232 | \f | |
1233 | /* Print the name of an archive file given on the command line. */ | |
1234 | ||
1235 | static void | |
2da42df6 | 1236 | print_archive_filename_bsd (char *filename) |
252b5132 RH |
1237 | { |
1238 | if (filename_per_file) | |
1239 | printf ("\n%s:\n", filename); | |
1240 | } | |
1241 | ||
1242 | static void | |
2da42df6 | 1243 | print_archive_filename_sysv (char *filename ATTRIBUTE_UNUSED) |
252b5132 RH |
1244 | { |
1245 | } | |
1246 | ||
1247 | static void | |
2da42df6 | 1248 | print_archive_filename_posix (char *filename ATTRIBUTE_UNUSED) |
252b5132 RH |
1249 | { |
1250 | } | |
1251 | \f | |
1252 | /* Print the name of an archive member file. */ | |
1253 | ||
1254 | static void | |
2da42df6 AJ |
1255 | print_archive_member_bsd (char *archive ATTRIBUTE_UNUSED, |
1256 | const char *filename) | |
252b5132 RH |
1257 | { |
1258 | if (!filename_per_symbol) | |
1259 | printf ("\n%s:\n", filename); | |
1260 | } | |
1261 | ||
1262 | static void | |
2da42df6 | 1263 | print_archive_member_sysv (char *archive, const char *filename) |
252b5132 RH |
1264 | { |
1265 | if (undefined_only) | |
1266 | printf (_("\n\nUndefined symbols from %s[%s]:\n\n"), archive, filename); | |
1267 | else | |
1268 | printf (_("\n\nSymbols from %s[%s]:\n\n"), archive, filename); | |
33f5f537 L |
1269 | if (print_width == 8) |
1270 | printf (_("\ | |
1271 | Name Value Class Type Size Line Section\n\n")); | |
1272 | else | |
1273 | printf (_("\ | |
1274 | Name Value Class Type Size Line Section\n\n")); | |
252b5132 RH |
1275 | } |
1276 | ||
1277 | static void | |
2da42df6 | 1278 | print_archive_member_posix (char *archive, const char *filename) |
252b5132 RH |
1279 | { |
1280 | if (!filename_per_symbol) | |
1281 | printf ("%s[%s]:\n", archive, filename); | |
1282 | } | |
1283 | \f | |
1284 | /* Print the name of the file (and archive, if there is one) | |
1285 | containing a symbol. */ | |
1286 | ||
1287 | static void | |
2da42df6 | 1288 | print_symbol_filename_bsd (bfd *archive_bfd, bfd *abfd) |
252b5132 RH |
1289 | { |
1290 | if (filename_per_symbol) | |
1291 | { | |
1292 | if (archive_bfd) | |
1293 | printf ("%s:", bfd_get_filename (archive_bfd)); | |
1294 | printf ("%s:", bfd_get_filename (abfd)); | |
1295 | } | |
1296 | } | |
1297 | ||
1298 | static void | |
2da42df6 | 1299 | print_symbol_filename_sysv (bfd *archive_bfd, bfd *abfd) |
252b5132 RH |
1300 | { |
1301 | if (filename_per_symbol) | |
1302 | { | |
1303 | if (archive_bfd) | |
1304 | printf ("%s:", bfd_get_filename (archive_bfd)); | |
1305 | printf ("%s:", bfd_get_filename (abfd)); | |
1306 | } | |
1307 | } | |
1308 | ||
1309 | static void | |
2da42df6 | 1310 | print_symbol_filename_posix (bfd *archive_bfd, bfd *abfd) |
252b5132 RH |
1311 | { |
1312 | if (filename_per_symbol) | |
1313 | { | |
1314 | if (archive_bfd) | |
1315 | printf ("%s[%s]: ", bfd_get_filename (archive_bfd), | |
1316 | bfd_get_filename (abfd)); | |
1317 | else | |
1318 | printf ("%s: ", bfd_get_filename (abfd)); | |
1319 | } | |
1320 | } | |
1321 | \f | |
1322 | /* Print a symbol value. */ | |
1323 | ||
1324 | static void | |
2da42df6 | 1325 | print_value (bfd *abfd ATTRIBUTE_UNUSED, bfd_vma val) |
252b5132 RH |
1326 | { |
1327 | #if ! defined (BFD64) || BFD_HOST_64BIT_LONG | |
1328 | printf (value_format, val); | |
1329 | #else | |
1330 | /* We have a 64 bit value to print, but the host is only 32 bit. */ | |
1331 | if (print_radix == 16) | |
d8180c76 | 1332 | bfd_fprintf_vma (abfd, stdout, val); |
252b5132 RH |
1333 | else |
1334 | { | |
1335 | char buf[30]; | |
1336 | char *s; | |
1337 | ||
1338 | s = buf + sizeof buf; | |
1339 | *--s = '\0'; | |
1340 | while (val > 0) | |
1341 | { | |
1342 | *--s = (val % print_radix) + '0'; | |
1343 | val /= print_radix; | |
1344 | } | |
1345 | while ((buf + sizeof buf - 1) - s < 16) | |
1346 | *--s = '0'; | |
1347 | printf ("%s", s); | |
1348 | } | |
1349 | #endif | |
1350 | } | |
1351 | ||
1352 | /* Print a line of information about a symbol. */ | |
1353 | ||
1354 | static void | |
2da42df6 | 1355 | print_symbol_info_bsd (struct extended_symbol_info *info, bfd *abfd) |
252b5132 | 1356 | { |
977f7911 | 1357 | if (bfd_is_undefined_symclass (SYM_TYPE (info))) |
252b5132 | 1358 | { |
62a5a82d L |
1359 | if (print_width == 16) |
1360 | printf (" "); | |
21211521 | 1361 | printf (" "); |
252b5132 RH |
1362 | } |
1363 | else | |
977f7911 | 1364 | { |
06a30c77 | 1365 | /* Normally we print the value of the symbol. If we are printing the |
50c2245b | 1366 | size or sorting by size then we print its size, except for the |
06a30c77 NC |
1367 | (weird) special case where both flags are defined, in which case we |
1368 | print both values. This conforms to documented behaviour. */ | |
1369 | if (sort_by_size && !print_size) | |
1370 | print_value (abfd, SYM_SIZE (info)); | |
1371 | else | |
1372 | print_value (abfd, SYM_VALUE (info)); | |
977f7911 | 1373 | |
72797995 | 1374 | if (print_size && SYM_SIZE (info)) |
977f7911 | 1375 | { |
06a30c77 | 1376 | printf (" "); |
977f7911 NC |
1377 | print_value (abfd, SYM_SIZE (info)); |
1378 | } | |
1379 | } | |
1380 | ||
1381 | printf (" %c", SYM_TYPE (info)); | |
1382 | ||
1383 | if (SYM_TYPE (info) == '-') | |
252b5132 RH |
1384 | { |
1385 | /* A stab. */ | |
1386 | printf (" "); | |
977f7911 | 1387 | printf (other_format, SYM_STAB_OTHER (info)); |
252b5132 | 1388 | printf (" "); |
977f7911 NC |
1389 | printf (desc_format, SYM_STAB_DESC (info)); |
1390 | printf (" %5s", SYM_STAB_NAME (info)); | |
252b5132 | 1391 | } |
977f7911 | 1392 | print_symname (" %s", SYM_NAME (info), abfd); |
252b5132 RH |
1393 | } |
1394 | ||
1395 | static void | |
2da42df6 | 1396 | print_symbol_info_sysv (struct extended_symbol_info *info, bfd *abfd) |
252b5132 | 1397 | { |
977f7911 NC |
1398 | print_symname ("%-20s|", SYM_NAME (info), abfd); |
1399 | ||
1400 | if (bfd_is_undefined_symclass (SYM_TYPE (info))) | |
33f5f537 L |
1401 | { |
1402 | if (print_width == 8) | |
1403 | printf (" "); | |
1404 | else | |
1405 | printf (" "); | |
1406 | } | |
252b5132 | 1407 | else |
977f7911 NC |
1408 | print_value (abfd, SYM_VALUE (info)); |
1409 | ||
1410 | printf ("| %c |", SYM_TYPE (info)); | |
1411 | ||
1412 | if (SYM_TYPE (info) == '-') | |
252b5132 RH |
1413 | { |
1414 | /* A stab. */ | |
e3b83c8f NC |
1415 | printf ("%18s| ", SYM_STAB_NAME (info)); /* (C) Type. */ |
1416 | printf (desc_format, SYM_STAB_DESC (info)); /* Size. */ | |
1417 | printf ("| |"); /* Line, Section. */ | |
252b5132 RH |
1418 | } |
1419 | else | |
9710509e | 1420 | { |
977f7911 | 1421 | /* Type, Size, Line, Section */ |
33f5f537 L |
1422 | if (info->elfinfo) |
1423 | printf ("%18s|", | |
1424 | get_symbol_type (ELF_ST_TYPE (info->elfinfo->internal_elf_sym.st_info))); | |
1425 | else | |
1426 | printf (" |"); | |
977f7911 NC |
1427 | |
1428 | if (SYM_SIZE (info)) | |
1429 | print_value (abfd, SYM_SIZE (info)); | |
1430 | else | |
33f5f537 L |
1431 | { |
1432 | if (print_width == 8) | |
1433 | printf (" "); | |
1434 | else | |
1435 | printf (" "); | |
1436 | } | |
977f7911 | 1437 | |
33f5f537 L |
1438 | if (info->elfinfo) |
1439 | printf("| |%s", info->elfinfo->symbol.section->name); | |
1440 | else | |
1441 | printf("| |"); | |
977f7911 | 1442 | } |
252b5132 RH |
1443 | } |
1444 | ||
1445 | static void | |
2da42df6 | 1446 | print_symbol_info_posix (struct extended_symbol_info *info, bfd *abfd) |
252b5132 | 1447 | { |
977f7911 NC |
1448 | print_symname ("%s ", SYM_NAME (info), abfd); |
1449 | printf ("%c ", SYM_TYPE (info)); | |
1450 | ||
1451 | if (bfd_is_undefined_symclass (SYM_TYPE (info))) | |
252b5132 RH |
1452 | printf (" "); |
1453 | else | |
977f7911 NC |
1454 | { |
1455 | print_value (abfd, SYM_VALUE (info)); | |
1456 | printf (" "); | |
1457 | if (SYM_SIZE (info)) | |
1458 | print_value (abfd, SYM_SIZE (info)); | |
1459 | } | |
252b5132 RH |
1460 | } |
1461 | \f | |
382c1116 NC |
1462 | int |
1463 | main (int argc, char **argv) | |
252b5132 | 1464 | { |
382c1116 NC |
1465 | int c; |
1466 | int retval; | |
252b5132 | 1467 | |
382c1116 NC |
1468 | #if defined (HAVE_SETLOCALE) && defined (HAVE_LC_MESSAGES) |
1469 | setlocale (LC_MESSAGES, ""); | |
1470 | #endif | |
1471 | #if defined (HAVE_SETLOCALE) | |
1472 | setlocale (LC_CTYPE, ""); | |
1473 | setlocale (LC_COLLATE, ""); | |
1474 | #endif | |
1475 | bindtextdomain (PACKAGE, LOCALEDIR); | |
1476 | textdomain (PACKAGE); | |
1477 | ||
1478 | program_name = *argv; | |
1479 | xmalloc_set_program_name (program_name); | |
1480 | ||
1481 | START_PROGRESS (program_name, 0); | |
1482 | ||
1483 | bfd_init (); | |
1484 | set_default_bfd_target (); | |
1485 | ||
1486 | while ((c = getopt_long (argc, argv, "aABCDef:gHhlnopPrSst:uvVvX:", | |
1487 | long_options, (int *) 0)) != EOF) | |
252b5132 | 1488 | { |
382c1116 | 1489 | switch (c) |
252b5132 | 1490 | { |
382c1116 NC |
1491 | case 'a': |
1492 | print_debug_syms = 1; | |
1493 | break; | |
1494 | case 'A': | |
1495 | case 'o': | |
1496 | filename_per_symbol = 1; | |
1497 | break; | |
1498 | case 'B': /* For MIPS compatibility. */ | |
1499 | set_output_format ("bsd"); | |
1500 | break; | |
1501 | case 'C': | |
1502 | do_demangle = 1; | |
1503 | if (optarg != NULL) | |
1504 | { | |
1505 | enum demangling_styles style; | |
1506 | ||
1507 | style = cplus_demangle_name_to_style (optarg); | |
1508 | if (style == unknown_demangling) | |
1509 | fatal (_("unknown demangling style `%s'"), | |
1510 | optarg); | |
1511 | ||
1512 | cplus_demangle_set_style (style); | |
1513 | } | |
1514 | break; | |
1515 | case 'D': | |
1516 | dynamic = 1; | |
1517 | break; | |
1518 | case 'e': | |
1519 | /* Ignored for HP/UX compatibility. */ | |
1520 | break; | |
1521 | case 'f': | |
1522 | set_output_format (optarg); | |
1523 | break; | |
1524 | case 'g': | |
1525 | external_only = 1; | |
1526 | break; | |
1527 | case 'H': | |
1528 | case 'h': | |
1529 | usage (stdout, 0); | |
1530 | case 'l': | |
1531 | line_numbers = 1; | |
1532 | break; | |
1533 | case 'n': | |
1534 | case 'v': | |
1535 | sort_numerically = 1; | |
1536 | break; | |
1537 | case 'p': | |
1538 | no_sort = 1; | |
1539 | break; | |
1540 | case 'P': | |
1541 | set_output_format ("posix"); | |
1542 | break; | |
1543 | case 'r': | |
1544 | reverse_sort = 1; | |
1545 | break; | |
1546 | case 's': | |
1547 | print_armap = 1; | |
1548 | break; | |
1549 | case 'S': | |
1550 | print_size = 1; | |
1551 | break; | |
1552 | case 't': | |
1553 | set_print_radix (optarg); | |
1554 | break; | |
1555 | case 'u': | |
1556 | undefined_only = 1; | |
1557 | break; | |
1558 | case 'V': | |
1559 | show_version = 1; | |
1560 | break; | |
1561 | case 'X': | |
1562 | /* Ignored for (partial) AIX compatibility. On AIX, the | |
1563 | argument has values 32, 64, or 32_64, and specifies that | |
1564 | only 32-bit, only 64-bit, or both kinds of objects should | |
1565 | be examined. The default is 32. So plain AIX nm on a | |
1566 | library archive with both kinds of objects will ignore | |
1567 | the 64-bit ones. For GNU nm, the default is and always | |
1568 | has been -X 32_64, and other options are not supported. */ | |
1569 | if (strcmp (optarg, "32_64") != 0) | |
1570 | fatal (_("Only -X 32_64 is supported")); | |
1571 | break; | |
1572 | ||
1573 | case OPTION_TARGET: /* --target */ | |
1574 | target = optarg; | |
1575 | break; | |
1576 | ||
1577 | case 0: /* A long option that just sets a flag. */ | |
1578 | break; | |
1579 | ||
1580 | default: | |
1581 | usage (stderr, 1); | |
252b5132 RH |
1582 | } |
1583 | } | |
252b5132 | 1584 | |
382c1116 NC |
1585 | if (show_version) |
1586 | print_version ("nm"); | |
252b5132 | 1587 | |
382c1116 | 1588 | if (sort_by_size && undefined_only) |
252b5132 | 1589 | { |
382c1116 NC |
1590 | non_fatal (_("Using the --size-sort and --undefined-only options together")); |
1591 | non_fatal (_("will produce no output, since undefined symbols have no size.")); | |
1592 | return 0; | |
252b5132 | 1593 | } |
382c1116 NC |
1594 | |
1595 | /* OK, all options now parsed. If no filename specified, do a.out. */ | |
1596 | if (optind == argc) | |
1597 | return !display_file ("a.out"); | |
1598 | ||
1599 | retval = 0; | |
1600 | ||
1601 | if (argc - optind > 1) | |
1602 | filename_per_file = 1; | |
1603 | ||
1604 | /* We were given several filenames to do. */ | |
1605 | while (optind < argc) | |
252b5132 | 1606 | { |
382c1116 NC |
1607 | PROGRESS (1); |
1608 | if (!display_file (argv[optind++])) | |
1609 | retval++; | |
1610 | } | |
252b5132 | 1611 | |
382c1116 | 1612 | END_PROGRESS (program_name); |
252b5132 | 1613 | |
382c1116 NC |
1614 | #ifdef HAVE_SBRK |
1615 | if (show_stats) | |
1616 | { | |
1617 | char *lim = (char *) sbrk (0); | |
1618 | ||
1619 | non_fatal (_("data size %ld"), (long) (lim - (char *) &environ)); | |
252b5132 | 1620 | } |
382c1116 | 1621 | #endif |
252b5132 | 1622 | |
382c1116 NC |
1623 | exit (retval); |
1624 | return retval; | |
252b5132 | 1625 | } |