* addr2line.c (main): Likewise.
[external/binutils.git] / binutils / size.c
1 /* size.c -- report size of various sections of an executable file.
2    Copyright 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000,
3    2001, 2002, 2003, 2004, 2005 Free Software Foundation, Inc.
4
5    This file is part of GNU Binutils.
6
7    This program is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 2 of the License, or
10    (at your option) any later version.
11
12    This program is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16
17    You should have received a copy of the GNU General Public License
18    along with this program; if not, write to the Free Software
19    Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA.  */
20 \f
21 /* Extensions/incompatibilities:
22    o - BSD output has filenames at the end.
23    o - BSD output can appear in different radicies.
24    o - SysV output has less redundant whitespace.  Filename comes at end.
25    o - SysV output doesn't show VMA which is always the same as the PMA.
26    o - We also handle core files.
27    o - We also handle archives.
28    If you write shell scripts which manipulate this info then you may be
29    out of luck; there's no --compatibility or --pedantic option.  */
30
31 #include "bfd.h"
32 #include "bucomm.h"
33 #include "libiberty.h"
34 #include "getopt.h"
35
36 #ifndef BSD_DEFAULT
37 #define BSD_DEFAULT 1
38 #endif
39
40 /* Program options.  */
41
42 enum
43   {
44     decimal, octal, hex
45   }
46 radix = decimal;
47
48 /* 0 means use AT&T-style output.  */
49 static int berkeley_format = BSD_DEFAULT;
50
51 int show_version = 0;
52 int show_help = 0;
53 int show_totals = 0;
54
55 static bfd_size_type total_bsssize;
56 static bfd_size_type total_datasize;
57 static bfd_size_type total_textsize;
58
59 /* Program exit status.  */
60 int return_code = 0;
61
62 static char *target = NULL;
63
64 /* Static declarations.  */
65
66 static void usage (FILE *, int);
67 static void display_file (char *);
68 static void display_bfd (bfd *);
69 static void display_archive (bfd *);
70 static int size_number (bfd_size_type);
71 static void rprint_number (int, bfd_size_type);
72 static void print_berkeley_format (bfd *);
73 static void sysv_internal_sizer (bfd *, asection *, void *);
74 static void sysv_internal_printer (bfd *, asection *, void *);
75 static void print_sysv_format (bfd *);
76 static void print_sizes (bfd * file);
77 static void berkeley_sum (bfd *, sec_ptr, void *);
78 \f
79 static void
80 usage (FILE *stream, int status)
81 {
82   fprintf (stream, _("Usage: %s [option(s)] [file(s)]\n"), program_name);
83   fprintf (stream, _(" Displays the sizes of sections inside binary files\n"));
84   fprintf (stream, _(" If no input file(s) are specified, a.out is assumed\n"));
85   fprintf (stream, _(" The options are:\n\
86   -A|-B     --format={sysv|berkeley}  Select output style (default is %s)\n\
87   -o|-d|-x  --radix={8|10|16}         Display numbers in octal, decimal or hex\n\
88   -t        --totals                  Display the total sizes (Berkeley only)\n\
89             --target=<bfdname>        Set the binary file format\n\
90   -h        --help                    Display this information\n\
91   -v        --version                 Display the program's version\n\
92 \n"),
93 #if BSD_DEFAULT
94   "berkeley"
95 #else
96   "sysv"
97 #endif
98 );
99   list_supported_targets (program_name, stream);
100   if (status == 0)
101     fprintf (stream, _("Report bugs to %s\n"), REPORT_BUGS_TO);
102   exit (status);
103 }
104
105 static struct option long_options[] =
106 {
107   {"format", required_argument, 0, 200},
108   {"radix", required_argument, 0, 201},
109   {"target", required_argument, 0, 202},
110   {"totals", no_argument, &show_totals, 1},
111   {"version", no_argument, &show_version, 1},
112   {"help", no_argument, &show_help, 1},
113   {0, no_argument, 0, 0}
114 };
115
116 int main (int, char **);
117
118 int
119 main (int argc, char **argv)
120 {
121   int temp;
122   int c;
123
124 #if defined (HAVE_SETLOCALE) && defined (HAVE_LC_MESSAGES)
125   setlocale (LC_MESSAGES, "");
126 #endif
127 #if defined (HAVE_SETLOCALE)
128   setlocale (LC_CTYPE, "");
129 #endif
130   bindtextdomain (PACKAGE, LOCALEDIR);
131   textdomain (PACKAGE);
132
133   program_name = *argv;
134   xmalloc_set_program_name (program_name);
135
136   expandargv (&argc, &argv);
137
138   bfd_init ();
139   set_default_bfd_target ();
140
141   while ((c = getopt_long (argc, argv, "ABHhVvdfotx", long_options,
142                            (int *) 0)) != EOF)
143     switch (c)
144       {
145       case 200:         /* --format */
146         switch (*optarg)
147           {
148           case 'B':
149           case 'b':
150             berkeley_format = 1;
151             break;
152           case 'S':
153           case 's':
154             berkeley_format = 0;
155             break;
156           default:
157             non_fatal (_("invalid argument to --format: %s"), optarg);
158             usage (stderr, 1);
159           }
160         break;
161
162       case 202:         /* --target */
163         target = optarg;
164         break;
165
166       case 201:         /* --radix */
167 #ifdef ANSI_LIBRARIES
168         temp = strtol (optarg, NULL, 10);
169 #else
170         temp = atol (optarg);
171 #endif
172         switch (temp)
173           {
174           case 10:
175             radix = decimal;
176             break;
177           case 8:
178             radix = octal;
179             break;
180           case 16:
181             radix = hex;
182             break;
183           default:
184             non_fatal (_("Invalid radix: %s\n"), optarg);
185             usage (stderr, 1);
186           }
187         break;
188
189       case 'A':
190         berkeley_format = 0;
191         break;
192       case 'B':
193         berkeley_format = 1;
194         break;
195       case 'v':
196       case 'V':
197         show_version = 1;
198         break;
199       case 'd':
200         radix = decimal;
201         break;
202       case 'x':
203         radix = hex;
204         break;
205       case 'o':
206         radix = octal;
207         break;
208       case 't':
209         show_totals = 1;
210         break;
211       case 'f': /* FIXME : For sysv68, `-f' means `full format', i.e.
212                    `[fname:] M(.text) + N(.data) + O(.bss) + P(.comment) = Q'
213                    where `fname: ' appears only if there are >= 2 input files,
214                    and M, N, O, P, Q are expressed in decimal by default,
215                    hexa or octal if requested by `-x' or `-o'.
216                    Just to make things interesting, Solaris also accepts -f,
217                    which prints out the size of each allocatable section, the
218                    name of the section, and the total of the section sizes.  */
219                 /* For the moment, accept `-f' silently, and ignore it.  */
220         break;
221       case 0:
222         break;
223       case 'h':
224       case 'H':
225       case '?':
226         usage (stderr, 1);
227       }
228
229   if (show_version)
230     print_version ("size");
231   if (show_help)
232     usage (stdout, 0);
233
234   if (optind == argc)
235     display_file ("a.out");
236   else
237     for (; optind < argc;)
238       display_file (argv[optind++]);
239
240   if (show_totals && berkeley_format)
241     {
242       bfd_size_type total = total_textsize + total_datasize + total_bsssize;
243
244       rprint_number (7, total_textsize);
245       putchar('\t');
246       rprint_number (7, total_datasize);
247       putchar('\t');
248       rprint_number (7, total_bsssize);
249       printf (((radix == octal) ? "\t%7lo\t%7lx\t" : "\t%7lu\t%7lx\t"),
250               (unsigned long) total, (unsigned long) total);
251       fputs ("(TOTALS)\n", stdout);
252     }
253
254   return return_code;
255 }
256 \f
257 /* Display stats on file or archive member ABFD.  */
258
259 static void
260 display_bfd (bfd *abfd)
261 {
262   char **matching;
263
264   if (bfd_check_format (abfd, bfd_archive))
265     /* An archive within an archive.  */
266     return;
267
268   if (bfd_check_format_matches (abfd, bfd_object, &matching))
269     {
270       print_sizes (abfd);
271       printf ("\n");
272       return;
273     }
274
275   if (bfd_get_error () == bfd_error_file_ambiguously_recognized)
276     {
277       bfd_nonfatal (bfd_get_filename (abfd));
278       list_matching_formats (matching);
279       free (matching);
280       return_code = 3;
281       return;
282     }
283
284   if (bfd_check_format_matches (abfd, bfd_core, &matching))
285     {
286       const char *core_cmd;
287
288       print_sizes (abfd);
289       fputs (" (core file", stdout);
290
291       core_cmd = bfd_core_file_failing_command (abfd);
292       if (core_cmd)
293         printf (" invoked as %s", core_cmd);
294
295       puts (")\n");
296       return;
297     }
298
299   bfd_nonfatal (bfd_get_filename (abfd));
300
301   if (bfd_get_error () == bfd_error_file_ambiguously_recognized)
302     {
303       list_matching_formats (matching);
304       free (matching);
305     }
306
307   return_code = 3;
308 }
309
310 static void
311 display_archive (bfd *file)
312 {
313   bfd *arfile = (bfd *) NULL;
314   bfd *last_arfile = (bfd *) NULL;
315
316   for (;;)
317     {
318       bfd_set_error (bfd_error_no_error);
319
320       arfile = bfd_openr_next_archived_file (file, arfile);
321       if (arfile == NULL)
322         {
323           if (bfd_get_error () != bfd_error_no_more_archived_files)
324             {
325               bfd_nonfatal (bfd_get_filename (file));
326               return_code = 2;
327             }
328           break;
329         }
330
331       display_bfd (arfile);
332
333       if (last_arfile != NULL)
334         bfd_close (last_arfile);
335       last_arfile = arfile;
336     }
337
338   if (last_arfile != NULL)
339     bfd_close (last_arfile);
340 }
341
342 static void
343 display_file (char *filename)
344 {
345   bfd *file;
346
347   if (get_file_size (filename) < 1)
348     return;
349
350   file = bfd_openr (filename, target);
351   if (file == NULL)
352     {
353       bfd_nonfatal (filename);
354       return_code = 1;
355       return;
356     }
357
358   if (bfd_check_format (file, bfd_archive))
359     display_archive (file);
360   else
361     display_bfd (file);
362
363   if (!bfd_close (file))
364     {
365       bfd_nonfatal (filename);
366       return_code = 1;
367       return;
368     }
369 }
370 \f
371 /* This is what lexical functions are for.  */
372
373 static int
374 size_number (bfd_size_type num)
375 {
376   char buffer[40];
377
378   sprintf (buffer,
379            (radix == decimal ? "%lu" :
380            ((radix == octal) ? "0%lo" : "0x%lx")),
381            (unsigned long) num);
382
383   return strlen (buffer);
384 }
385
386 static void
387 rprint_number (int width, bfd_size_type num)
388 {
389   char buffer[40];
390
391   sprintf (buffer,
392            (radix == decimal ? "%lu" :
393            ((radix == octal) ? "0%lo" : "0x%lx")),
394            (unsigned long) num);
395
396   printf ("%*s", width, buffer);
397 }
398
399 static bfd_size_type bsssize;
400 static bfd_size_type datasize;
401 static bfd_size_type textsize;
402
403 static void
404 berkeley_sum (bfd *abfd ATTRIBUTE_UNUSED, sec_ptr sec,
405               void *ignore ATTRIBUTE_UNUSED)
406 {
407   flagword flags;
408   bfd_size_type size;
409
410   flags = bfd_get_section_flags (abfd, sec);
411   if ((flags & SEC_ALLOC) == 0)
412     return;
413
414   size = bfd_get_section_size (sec);
415   if ((flags & SEC_CODE) != 0 || (flags & SEC_READONLY) != 0)
416     textsize += size;
417   else if ((flags & SEC_HAS_CONTENTS) != 0)
418     datasize += size;
419   else
420     bsssize += size;
421 }
422
423 static void
424 print_berkeley_format (bfd *abfd)
425 {
426   static int files_seen = 0;
427   bfd_size_type total;
428
429   bsssize = 0;
430   datasize = 0;
431   textsize = 0;
432
433   bfd_map_over_sections (abfd, berkeley_sum, NULL);
434
435   if (files_seen++ == 0)
436     puts ((radix == octal) ? "   text\t   data\t    bss\t    oct\t    hex\tfilename" :
437           "   text\t   data\t    bss\t    dec\t    hex\tfilename");
438
439   total = textsize + datasize + bsssize;
440
441   if (show_totals)
442     {
443       total_textsize += textsize;
444       total_datasize += datasize;
445       total_bsssize  += bsssize;
446     }
447
448   rprint_number (7, textsize);
449   putchar ('\t');
450   rprint_number (7, datasize);
451   putchar ('\t');
452   rprint_number (7, bsssize);
453   printf (((radix == octal) ? "\t%7lo\t%7lx\t" : "\t%7lu\t%7lx\t"),
454           (unsigned long) total, (unsigned long) total);
455
456   fputs (bfd_get_filename (abfd), stdout);
457
458   if (bfd_my_archive (abfd))
459     printf (" (ex %s)", bfd_get_filename (bfd_my_archive (abfd)));
460 }
461
462 /* I REALLY miss lexical functions! */
463 bfd_size_type svi_total = 0;
464 bfd_vma svi_maxvma = 0;
465 int svi_namelen = 0;
466 int svi_vmalen = 0;
467 int svi_sizelen = 0;
468
469 static void
470 sysv_internal_sizer (bfd *file ATTRIBUTE_UNUSED, sec_ptr sec,
471                      void *ignore ATTRIBUTE_UNUSED)
472 {
473   bfd_size_type size = bfd_section_size (file, sec);
474
475   if (   ! bfd_is_abs_section (sec)
476       && ! bfd_is_com_section (sec)
477       && ! bfd_is_und_section (sec))
478     {
479       int namelen = strlen (bfd_section_name (file, sec));
480
481       if (namelen > svi_namelen)
482         svi_namelen = namelen;
483
484       svi_total += size;
485
486       if (bfd_section_vma (file, sec) > svi_maxvma)
487         svi_maxvma = bfd_section_vma (file, sec);
488     }
489 }
490
491 static void
492 sysv_internal_printer (bfd *file ATTRIBUTE_UNUSED, sec_ptr sec,
493                        void *ignore ATTRIBUTE_UNUSED)
494 {
495   bfd_size_type size = bfd_section_size (file, sec);
496
497   if (   ! bfd_is_abs_section (sec)
498       && ! bfd_is_com_section (sec)
499       && ! bfd_is_und_section (sec))
500     {
501       svi_total += size;
502
503       printf ("%-*s   ", svi_namelen, bfd_section_name (file, sec));
504       rprint_number (svi_sizelen, size);
505       printf ("   ");
506       rprint_number (svi_vmalen, bfd_section_vma (file, sec));
507       printf ("\n");
508     }
509 }
510
511 static void
512 print_sysv_format (bfd *file)
513 {
514   /* Size all of the columns.  */
515   svi_total = 0;
516   svi_maxvma = 0;
517   svi_namelen = 0;
518   bfd_map_over_sections (file, sysv_internal_sizer, NULL);
519   svi_vmalen = size_number ((bfd_size_type)svi_maxvma);
520
521   if ((size_t) svi_vmalen < sizeof ("addr") - 1)
522     svi_vmalen = sizeof ("addr")-1;
523
524   svi_sizelen = size_number (svi_total);
525   if ((size_t) svi_sizelen < sizeof ("size") - 1)
526     svi_sizelen = sizeof ("size")-1;
527
528   svi_total = 0;
529   printf ("%s  ", bfd_get_filename (file));
530
531   if (bfd_my_archive (file))
532     printf (" (ex %s)", bfd_get_filename (bfd_my_archive (file)));
533
534   printf (":\n%-*s   %*s   %*s\n", svi_namelen, "section",
535           svi_sizelen, "size", svi_vmalen, "addr");
536
537   bfd_map_over_sections (file, sysv_internal_printer, NULL);
538
539   printf ("%-*s   ", svi_namelen, "Total");
540   rprint_number (svi_sizelen, svi_total);
541   printf ("\n\n");
542 }
543
544 static void
545 print_sizes (bfd *file)
546 {
547   if (berkeley_format)
548     print_berkeley_format (file);
549   else
550     print_sysv_format (file);
551 }