1 /*- 2 * Copyright (c) 2007 S.Sam Arun Raj 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 24 * SUCH DAMAGE. 25 */ 26 27 #include <assert.h> 28 #include <err.h> 29 #include <fcntl.h> 30 #include <gelf.h> 31 #include <getopt.h> 32 #include <libelftc.h> 33 #include <stdint.h> 34 #include <stdio.h> 35 #include <stdlib.h> 36 #include <string.h> 37 #include <unistd.h> 38 39 #include "_elftc.h" 40 41 ELFTC_VCSID("$Id: size.c 3183 2015-04-10 16:18:42Z emaste $"); 42 43 #define BUF_SIZE 1024 44 #define ELF_ALIGN(val,x) (((val)+(x)-1) & ~((x)-1)) 45 #define SIZE_VERSION_STRING "size 1.0" 46 47 enum return_code { 48 RETURN_OK, 49 RETURN_NOINPUT, 50 RETURN_DATAERR, 51 RETURN_USAGE 52 }; 53 54 enum output_style { 55 STYLE_BERKELEY, 56 STYLE_SYSV 57 }; 58 59 enum radix_style { 60 RADIX_OCTAL, 61 RADIX_DECIMAL, 62 RADIX_HEX 63 }; 64 65 static uint64_t bss_size, data_size, text_size, total_size; 66 static uint64_t bss_size_total, data_size_total, text_size_total; 67 static int show_totals; 68 static int size_option; 69 static enum radix_style radix = RADIX_DECIMAL; 70 static enum output_style style = STYLE_BERKELEY; 71 static const char *default_args[2] = { "a.out", NULL }; 72 73 static struct { 74 int row; 75 int col; 76 int *width; 77 char ***tbl; 78 } *tb; 79 80 enum { 81 OPT_FORMAT, 82 OPT_RADIX 83 }; 84 85 static struct option size_longopts[] = { 86 { "format", required_argument, &size_option, OPT_FORMAT }, 87 { "help", no_argument, NULL, 'h' }, 88 { "radix", required_argument, &size_option, OPT_RADIX }, 89 { "totals", no_argument, NULL, 't' }, 90 { "version", no_argument, NULL, 'V' }, 91 { NULL, 0, NULL, 0 } 92 }; 93 94 static void berkeley_calc(GElf_Shdr *); 95 static void berkeley_footer(const char *, const char *, const char *); 96 static void berkeley_header(void); 97 static void berkeley_totals(void); 98 static int handle_core(char const *, Elf *elf, GElf_Ehdr *); 99 static void handle_core_note(Elf *, GElf_Ehdr *, GElf_Phdr *, char **); 100 static int handle_elf(char const *); 101 static void handle_phdr(Elf *, GElf_Ehdr *, GElf_Phdr *, uint32_t, 102 const char *); 103 static void show_version(void); 104 static void sysv_header(const char *, Elf_Arhdr *); 105 static void sysv_footer(void); 106 static void sysv_calc(Elf *, GElf_Ehdr *, GElf_Shdr *); 107 static void usage(void); 108 static void tbl_new(int); 109 static void tbl_print(const char *, int); 110 static void tbl_print_num(uint64_t, enum radix_style, int); 111 static void tbl_append(void); 112 static void tbl_flush(void); 113 114 /* 115 * size utility using elf(3) and gelf(3) API to list section sizes and 116 * total in elf files. Supports only elf files (core dumps in elf 117 * included) that can be opened by libelf, other formats are not supported. 118 */ 119 int 120 main(int argc, char **argv) 121 { 122 int ch, r, rc; 123 const char **files, *fn; 124 125 rc = RETURN_OK; 126 127 if (elf_version(EV_CURRENT) == EV_NONE) 128 errx(EXIT_FAILURE, "ELF library initialization failed: %s", 129 elf_errmsg(-1)); 130 131 while ((ch = getopt_long(argc, argv, "ABVdhotx", size_longopts, 132 NULL)) != -1) 133 switch((char)ch) { 134 case 'A': 135 style = STYLE_SYSV; 136 break; 137 case 'B': 138 style = STYLE_BERKELEY; 139 break; 140 case 'V': 141 show_version(); 142 break; 143 case 'd': 144 radix = RADIX_DECIMAL; 145 break; 146 case 'o': 147 radix = RADIX_OCTAL; 148 break; 149 case 't': 150 show_totals = 1; 151 break; 152 case 'x': 153 radix = RADIX_HEX; 154 break; 155 case 0: 156 switch (size_option) { 157 case OPT_FORMAT: 158 if (*optarg == 's' || *optarg == 'S') 159 style = STYLE_SYSV; 160 else if (*optarg == 'b' || *optarg == 'B') 161 style = STYLE_BERKELEY; 162 else { 163 warnx("unrecognized format \"%s\".", 164 optarg); 165 usage(); 166 } 167 break; 168 case OPT_RADIX: 169 r = strtol(optarg, NULL, 10); 170 if (r == 8) 171 radix = RADIX_OCTAL; 172 else if (r == 10) 173 radix = RADIX_DECIMAL; 174 else if (r == 16) 175 radix = RADIX_HEX; 176 else { 177 warnx("unsupported radix \"%s\".", 178 optarg); 179 usage(); 180 } 181 break; 182 default: 183 err(EXIT_FAILURE, "Error in option handling."); 184 /*NOTREACHED*/ 185 } 186 break; 187 case 'h': 188 case '?': 189 default: 190 usage(); 191 /* NOTREACHED */ 192 } 193 argc -= optind; 194 argv += optind; 195 196 files = (argc == 0) ? default_args : (void *) argv; 197 198 while ((fn = *files) != NULL) { 199 rc = handle_elf(fn); 200 if (rc != RETURN_OK) 201 warnx(rc == RETURN_NOINPUT ? 202 "'%s': No such file" : 203 "%s: File format not recognized", fn); 204 files++; 205 } 206 if (style == STYLE_BERKELEY) { 207 if (show_totals) 208 berkeley_totals(); 209 tbl_flush(); 210 } 211 return (rc); 212 } 213 214 static Elf_Data * 215 xlatetom(Elf *elf, GElf_Ehdr *elfhdr, void *_src, void *_dst, 216 Elf_Type type, size_t size) 217 { 218 Elf_Data src, dst; 219 220 src.d_buf = _src; 221 src.d_type = type; 222 src.d_version = elfhdr->e_version; 223 src.d_size = size; 224 dst.d_buf = _dst; 225 dst.d_version = elfhdr->e_version; 226 dst.d_size = size; 227 return (gelf_xlatetom(elf, &dst, &src, elfhdr->e_ident[EI_DATA])); 228 } 229 230 #define NOTE_OFFSET_32(nhdr, namesz, offset) \ 231 ((char *)nhdr + sizeof(Elf32_Nhdr) + \ 232 ELF_ALIGN((int32_t)namesz, 4) + offset) 233 234 #define NOTE_OFFSET_64(nhdr, namesz, offset) \ 235 ((char *)nhdr + sizeof(Elf32_Nhdr) + \ 236 ELF_ALIGN((int32_t)namesz, 8) + offset) 237 238 #define PID32(nhdr, namesz, offset) \ 239 (pid_t)*((int *)((uintptr_t)NOTE_OFFSET_32(nhdr, \ 240 namesz, offset))); 241 242 #define PID64(nhdr, namesz, offset) \ 243 (pid_t)*((int *)((uintptr_t)NOTE_OFFSET_64(nhdr, \ 244 namesz, offset))); 245 246 #define NEXT_NOTE(elfhdr, descsz, namesz, offset) do { \ 247 if (elfhdr->e_ident[EI_CLASS] == ELFCLASS32) { \ 248 offset += ELF_ALIGN((int32_t)descsz, 4) + \ 249 sizeof(Elf32_Nhdr) + \ 250 ELF_ALIGN((int32_t)namesz, 4); \ 251 } else { \ 252 offset += ELF_ALIGN((int32_t)descsz, 8) + \ 253 sizeof(Elf32_Nhdr) + \ 254 ELF_ALIGN((int32_t)namesz, 8); \ 255 } \ 256 } while (0) 257 258 /* 259 * Parse individual note entries inside a PT_NOTE segment. 260 */ 261 static void 262 handle_core_note(Elf *elf, GElf_Ehdr *elfhdr, GElf_Phdr *phdr, 263 char **cmd_line) 264 { 265 size_t max_size; 266 uint64_t raw_size; 267 GElf_Off offset; 268 static pid_t pid; 269 uintptr_t ver; 270 Elf32_Nhdr *nhdr, nhdr_l; 271 static int reg_pseudo = 0, reg2_pseudo = 0 /*, regxfp_pseudo = 0*/; 272 char buf[BUF_SIZE], *data, *name; 273 274 if (elf == NULL || elfhdr == NULL || phdr == NULL) 275 return; 276 277 data = elf_rawfile(elf, &max_size); 278 offset = phdr->p_offset; 279 while (data != NULL && offset < phdr->p_offset + phdr->p_filesz) { 280 nhdr = (Elf32_Nhdr *)(uintptr_t)((char*)data + offset); 281 memset(&nhdr_l, 0, sizeof(Elf32_Nhdr)); 282 if (!xlatetom(elf, elfhdr, &nhdr->n_type, &nhdr_l.n_type, 283 ELF_T_WORD, sizeof(Elf32_Word)) || 284 !xlatetom(elf, elfhdr, &nhdr->n_descsz, &nhdr_l.n_descsz, 285 ELF_T_WORD, sizeof(Elf32_Word)) || 286 !xlatetom(elf, elfhdr, &nhdr->n_namesz, &nhdr_l.n_namesz, 287 ELF_T_WORD, sizeof(Elf32_Word))) 288 break; 289 290 name = (char *)((char *)nhdr + sizeof(Elf32_Nhdr)); 291 switch (nhdr_l.n_type) { 292 case NT_PRSTATUS: { 293 raw_size = 0; 294 if (elfhdr->e_ident[EI_OSABI] == ELFOSABI_FREEBSD && 295 nhdr_l.n_namesz == 0x8 && 296 !strcmp(name,"FreeBSD")) { 297 if (elfhdr->e_ident[EI_CLASS] == ELFCLASS32) { 298 raw_size = (uint64_t)*((uint32_t *) 299 (uintptr_t)(name + 300 ELF_ALIGN((int32_t) 301 nhdr_l.n_namesz, 4) + 8)); 302 ver = (uintptr_t)NOTE_OFFSET_32(nhdr, 303 nhdr_l.n_namesz,0); 304 if (*((int *)ver) == 1) 305 pid = PID32(nhdr, 306 nhdr_l.n_namesz, 24); 307 } else { 308 raw_size = *((uint64_t *)(uintptr_t) 309 (name + ELF_ALIGN((int32_t) 310 nhdr_l.n_namesz, 8) + 16)); 311 ver = (uintptr_t)NOTE_OFFSET_64(nhdr, 312 nhdr_l.n_namesz,0); 313 if (*((int *)ver) == 1) 314 pid = PID64(nhdr, 315 nhdr_l.n_namesz, 40); 316 } 317 xlatetom(elf, elfhdr, &raw_size, &raw_size, 318 ELF_T_WORD, sizeof(uint64_t)); 319 xlatetom(elf, elfhdr, &pid, &pid, ELF_T_WORD, 320 sizeof(pid_t)); 321 } 322 323 if (raw_size != 0 && style == STYLE_SYSV) { 324 (void) snprintf(buf, BUF_SIZE, "%s/%d", 325 ".reg", pid); 326 tbl_append(); 327 tbl_print(buf, 0); 328 tbl_print_num(raw_size, radix, 1); 329 tbl_print_num(0, radix, 2); 330 if (!reg_pseudo) { 331 tbl_append(); 332 tbl_print(".reg", 0); 333 tbl_print_num(raw_size, radix, 1); 334 tbl_print_num(0, radix, 2); 335 reg_pseudo = 1; 336 text_size_total += raw_size; 337 } 338 text_size_total += raw_size; 339 } 340 } 341 break; 342 case NT_FPREGSET: /* same as NT_PRFPREG */ 343 if (style == STYLE_SYSV) { 344 (void) snprintf(buf, BUF_SIZE, 345 "%s/%d", ".reg2", pid); 346 tbl_append(); 347 tbl_print(buf, 0); 348 tbl_print_num(nhdr_l.n_descsz, radix, 1); 349 tbl_print_num(0, radix, 2); 350 if (!reg2_pseudo) { 351 tbl_append(); 352 tbl_print(".reg2", 0); 353 tbl_print_num(nhdr_l.n_descsz, radix, 354 1); 355 tbl_print_num(0, radix, 2); 356 reg2_pseudo = 1; 357 text_size_total += nhdr_l.n_descsz; 358 } 359 text_size_total += nhdr_l.n_descsz; 360 } 361 break; 362 #if 0 363 case NT_AUXV: 364 if (style == STYLE_SYSV) { 365 tbl_append(); 366 tbl_print(".auxv", 0); 367 tbl_print_num(nhdr_l.n_descsz, radix, 1); 368 tbl_print_num(0, radix, 2); 369 text_size_total += nhdr_l.n_descsz; 370 } 371 break; 372 case NT_PRXFPREG: 373 if (style == STYLE_SYSV) { 374 (void) snprintf(buf, BUF_SIZE, "%s/%d", 375 ".reg-xfp", pid); 376 tbl_append(); 377 tbl_print(buf, 0); 378 tbl_print_num(nhdr_l.n_descsz, radix, 1); 379 tbl_print_num(0, radix, 2); 380 if (!regxfp_pseudo) { 381 tbl_append(); 382 tbl_print(".reg-xfp", 0); 383 tbl_print_num(nhdr_l.n_descsz, radix, 384 1); 385 tbl_print_num(0, radix, 2); 386 regxfp_pseudo = 1; 387 text_size_total += nhdr_l.n_descsz; 388 } 389 text_size_total += nhdr_l.n_descsz; 390 } 391 break; 392 case NT_PSINFO: 393 #endif 394 case NT_PRPSINFO: { 395 /* FreeBSD 64-bit */ 396 if (nhdr_l.n_descsz == 0x78 && 397 !strcmp(name,"FreeBSD")) { 398 *cmd_line = strdup(NOTE_OFFSET_64(nhdr, 399 nhdr_l.n_namesz, 33)); 400 /* FreeBSD 32-bit */ 401 } else if (nhdr_l.n_descsz == 0x6c && 402 !strcmp(name,"FreeBSD")) { 403 *cmd_line = strdup(NOTE_OFFSET_32(nhdr, 404 nhdr_l.n_namesz, 25)); 405 } 406 /* Strip any trailing spaces */ 407 if (*cmd_line != NULL) { 408 char *s; 409 410 s = *cmd_line + strlen(*cmd_line); 411 while (s > *cmd_line) { 412 if (*(s-1) != 0x20) break; 413 s--; 414 } 415 *s = 0; 416 } 417 break; 418 } 419 #if 0 420 case NT_PSTATUS: 421 case NT_LWPSTATUS: 422 #endif 423 default: 424 break; 425 } 426 NEXT_NOTE(elfhdr, nhdr_l.n_descsz, nhdr_l.n_namesz, offset); 427 } 428 } 429 430 /* 431 * Handles program headers except for PT_NOTE, when sysv output stlye is 432 * choosen, prints out the segment name and length. For berkely output 433 * style only PT_LOAD segments are handled, and text, 434 * data, bss size is calculated for them. 435 */ 436 static void 437 handle_phdr(Elf *elf, GElf_Ehdr *elfhdr, GElf_Phdr *phdr, 438 uint32_t idx, const char *name) 439 { 440 uint64_t addr, size; 441 int split; 442 char buf[BUF_SIZE]; 443 444 if (elf == NULL || elfhdr == NULL || phdr == NULL) 445 return; 446 447 size = addr = 0; 448 split = (phdr->p_memsz > 0) && (phdr->p_filesz > 0) && 449 (phdr->p_memsz > phdr->p_filesz); 450 451 if (style == STYLE_SYSV) { 452 (void) snprintf(buf, BUF_SIZE, 453 "%s%d%s", name, idx, (split ? "a" : "")); 454 tbl_append(); 455 tbl_print(buf, 0); 456 tbl_print_num(phdr->p_filesz, radix, 1); 457 tbl_print_num(phdr->p_vaddr, radix, 2); 458 text_size_total += phdr->p_filesz; 459 if (split) { 460 size = phdr->p_memsz - phdr->p_filesz; 461 addr = phdr->p_vaddr + phdr->p_filesz; 462 (void) snprintf(buf, BUF_SIZE, "%s%d%s", name, 463 idx, "b"); 464 text_size_total += phdr->p_memsz - phdr->p_filesz; 465 tbl_append(); 466 tbl_print(buf, 0); 467 tbl_print_num(size, radix, 1); 468 tbl_print_num(addr, radix, 2); 469 } 470 } else { 471 if (phdr->p_type != PT_LOAD) 472 return; 473 if ((phdr->p_flags & PF_W) && !(phdr->p_flags & PF_X)) { 474 data_size += phdr->p_filesz; 475 if (split) 476 data_size += phdr->p_memsz - phdr->p_filesz; 477 } else { 478 text_size += phdr->p_filesz; 479 if (split) 480 text_size += phdr->p_memsz - phdr->p_filesz; 481 } 482 } 483 } 484 485 /* 486 * Given a core dump file, this function maps program headers to segments. 487 */ 488 static int 489 handle_core(char const *name, Elf *elf, GElf_Ehdr *elfhdr) 490 { 491 GElf_Phdr phdr; 492 uint32_t i; 493 char *core_cmdline; 494 const char *seg_name; 495 496 if (name == NULL || elf == NULL || elfhdr == NULL) 497 return (RETURN_DATAERR); 498 if (elfhdr->e_shnum != 0 || elfhdr->e_type != ET_CORE) 499 return (RETURN_DATAERR); 500 501 seg_name = core_cmdline = NULL; 502 if (style == STYLE_SYSV) 503 sysv_header(name, NULL); 504 else 505 berkeley_header(); 506 507 for (i = 0; i < elfhdr->e_phnum; i++) { 508 if (gelf_getphdr(elf, i, &phdr) != NULL) { 509 if (phdr.p_type == PT_NOTE) { 510 handle_phdr(elf, elfhdr, &phdr, i, "note"); 511 handle_core_note(elf, elfhdr, &phdr, 512 &core_cmdline); 513 } else { 514 switch(phdr.p_type) { 515 case PT_NULL: 516 seg_name = "null"; 517 break; 518 case PT_LOAD: 519 seg_name = "load"; 520 break; 521 case PT_DYNAMIC: 522 seg_name = "dynamic"; 523 break; 524 case PT_INTERP: 525 seg_name = "interp"; 526 break; 527 case PT_SHLIB: 528 seg_name = "shlib"; 529 break; 530 case PT_PHDR: 531 seg_name = "phdr"; 532 break; 533 case PT_GNU_EH_FRAME: 534 seg_name = "eh_frame_hdr"; 535 break; 536 case PT_GNU_STACK: 537 seg_name = "stack"; 538 break; 539 default: 540 seg_name = "segment"; 541 } 542 handle_phdr(elf, elfhdr, &phdr, i, seg_name); 543 } 544 } 545 } 546 547 if (style == STYLE_BERKELEY) { 548 if (core_cmdline != NULL) { 549 berkeley_footer(core_cmdline, name, 550 "core file invoked as"); 551 } else { 552 berkeley_footer(core_cmdline, name, "core file"); 553 } 554 } else { 555 sysv_footer(); 556 if (core_cmdline != NULL) { 557 (void) printf(" (core file invoked as %s)\n\n", 558 core_cmdline); 559 } else { 560 (void) printf(" (core file)\n\n"); 561 } 562 } 563 free(core_cmdline); 564 return (RETURN_OK); 565 } 566 567 /* 568 * Given an elf object,ar(1) filename, and based on the output style 569 * and radix format the various sections and their length will be printed 570 * or the size of the text, data, bss sections will be printed out. 571 */ 572 static int 573 handle_elf(char const *name) 574 { 575 GElf_Ehdr elfhdr; 576 GElf_Shdr shdr; 577 Elf *elf, *elf1; 578 Elf_Arhdr *arhdr; 579 Elf_Scn *scn; 580 Elf_Cmd elf_cmd; 581 int exit_code, fd; 582 583 if (name == NULL) 584 return (RETURN_NOINPUT); 585 586 if ((fd = open(name, O_RDONLY, 0)) < 0) 587 return (RETURN_NOINPUT); 588 589 elf_cmd = ELF_C_READ; 590 elf1 = elf_begin(fd, elf_cmd, NULL); 591 while ((elf = elf_begin(fd, elf_cmd, elf1)) != NULL) { 592 arhdr = elf_getarhdr(elf); 593 if (elf_kind(elf) == ELF_K_NONE && arhdr == NULL) { 594 (void) elf_end(elf); 595 (void) elf_end(elf1); 596 (void) close(fd); 597 return (RETURN_DATAERR); 598 } 599 if (elf_kind(elf) != ELF_K_ELF || 600 (gelf_getehdr(elf, &elfhdr) == NULL)) { 601 elf_cmd = elf_next(elf); 602 (void) elf_end(elf); 603 warnx("%s: File format not recognized", 604 arhdr->ar_name); 605 continue; 606 } 607 /* Core dumps are handled separately */ 608 if (elfhdr.e_shnum == 0 && elfhdr.e_type == ET_CORE) { 609 exit_code = handle_core(name, elf, &elfhdr); 610 (void) elf_end(elf); 611 (void) elf_end(elf1); 612 (void) close(fd); 613 return (exit_code); 614 } else { 615 scn = NULL; 616 if (style == STYLE_BERKELEY) { 617 berkeley_header(); 618 while ((scn = elf_nextscn(elf, scn)) != NULL) { 619 if (gelf_getshdr(scn, &shdr) != NULL) 620 berkeley_calc(&shdr); 621 } 622 } else { 623 sysv_header(name, arhdr); 624 scn = NULL; 625 while ((scn = elf_nextscn(elf, scn)) != NULL) { 626 if (gelf_getshdr(scn, &shdr) != NULL) 627 sysv_calc(elf, &elfhdr, &shdr); 628 } 629 } 630 if (style == STYLE_BERKELEY) { 631 if (arhdr != NULL) { 632 berkeley_footer(name, arhdr->ar_name, 633 "ex"); 634 } else { 635 berkeley_footer(name, NULL, "ex"); 636 } 637 } else { 638 sysv_footer(); 639 } 640 } 641 elf_cmd = elf_next(elf); 642 (void) elf_end(elf); 643 } 644 (void) elf_end(elf1); 645 (void) close(fd); 646 return (RETURN_OK); 647 } 648 649 /* 650 * Sysv formatting helper functions. 651 */ 652 static void 653 sysv_header(const char *name, Elf_Arhdr *arhdr) 654 { 655 656 text_size_total = 0; 657 if (arhdr != NULL) 658 (void) printf("%s (ex %s):\n", arhdr->ar_name, name); 659 else 660 (void) printf("%s :\n", name); 661 tbl_new(3); 662 tbl_append(); 663 tbl_print("section", 0); 664 tbl_print("size", 1); 665 tbl_print("addr", 2); 666 } 667 668 static void 669 sysv_calc(Elf *elf, GElf_Ehdr *elfhdr, GElf_Shdr *shdr) 670 { 671 char *section_name; 672 673 section_name = elf_strptr(elf, elfhdr->e_shstrndx, 674 (size_t) shdr->sh_name); 675 if ((shdr->sh_type == SHT_SYMTAB || 676 shdr->sh_type == SHT_STRTAB || shdr->sh_type == SHT_RELA || 677 shdr->sh_type == SHT_REL) && shdr->sh_addr == 0) 678 return; 679 tbl_append(); 680 tbl_print(section_name, 0); 681 tbl_print_num(shdr->sh_size, radix, 1); 682 tbl_print_num(shdr->sh_addr, radix, 2); 683 text_size_total += shdr->sh_size; 684 } 685 686 static void 687 sysv_footer(void) 688 { 689 tbl_append(); 690 tbl_print("Total", 0); 691 tbl_print_num(text_size_total, radix, 1); 692 tbl_flush(); 693 putchar('\n'); 694 } 695 696 /* 697 * berkeley style output formatting helper functions. 698 */ 699 static void 700 berkeley_header(void) 701 { 702 static int printed; 703 704 text_size = data_size = bss_size = 0; 705 if (!printed) { 706 tbl_new(6); 707 tbl_append(); 708 tbl_print("text", 0); 709 tbl_print("data", 1); 710 tbl_print("bss", 2); 711 if (radix == RADIX_OCTAL) 712 tbl_print("oct", 3); 713 else 714 tbl_print("dec", 3); 715 tbl_print("hex", 4); 716 tbl_print("filename", 5); 717 printed = 1; 718 } 719 } 720 721 static void 722 berkeley_calc(GElf_Shdr *shdr) 723 { 724 if (shdr != NULL) { 725 if (!(shdr->sh_flags & SHF_ALLOC)) 726 return; 727 if ((shdr->sh_flags & SHF_ALLOC) && 728 ((shdr->sh_flags & SHF_EXECINSTR) || 729 !(shdr->sh_flags & SHF_WRITE))) 730 text_size += shdr->sh_size; 731 else if ((shdr->sh_flags & SHF_ALLOC) && 732 (shdr->sh_flags & SHF_WRITE) && 733 (shdr->sh_type != SHT_NOBITS)) 734 data_size += shdr->sh_size; 735 else 736 bss_size += shdr->sh_size; 737 } 738 } 739 740 static void 741 berkeley_totals(void) 742 { 743 long unsigned int grand_total; 744 745 grand_total = text_size_total + data_size_total + bss_size_total; 746 tbl_append(); 747 tbl_print_num(text_size_total, radix, 0); 748 tbl_print_num(data_size_total, radix, 1); 749 tbl_print_num(bss_size_total, radix, 2); 750 if (radix == RADIX_OCTAL) 751 tbl_print_num(grand_total, RADIX_OCTAL, 3); 752 else 753 tbl_print_num(grand_total, RADIX_DECIMAL, 3); 754 tbl_print_num(grand_total, RADIX_HEX, 4); 755 } 756 757 static void 758 berkeley_footer(const char *name, const char *ar_name, const char *msg) 759 { 760 char buf[BUF_SIZE]; 761 762 total_size = text_size + data_size + bss_size; 763 if (show_totals) { 764 text_size_total += text_size; 765 bss_size_total += bss_size; 766 data_size_total += data_size; 767 } 768 769 tbl_append(); 770 tbl_print_num(text_size, radix, 0); 771 tbl_print_num(data_size, radix, 1); 772 tbl_print_num(bss_size, radix, 2); 773 if (radix == RADIX_OCTAL) 774 tbl_print_num(total_size, RADIX_OCTAL, 3); 775 else 776 tbl_print_num(total_size, RADIX_DECIMAL, 3); 777 tbl_print_num(total_size, RADIX_HEX, 4); 778 if (ar_name != NULL && name != NULL) 779 (void) snprintf(buf, BUF_SIZE, "%s (%s %s)", ar_name, msg, 780 name); 781 else if (ar_name != NULL && name == NULL) 782 (void) snprintf(buf, BUF_SIZE, "%s (%s)", ar_name, msg); 783 else 784 (void) snprintf(buf, BUF_SIZE, "%s", name); 785 tbl_print(buf, 5); 786 } 787 788 789 static void 790 tbl_new(int col) 791 { 792 793 assert(tb == NULL); 794 assert(col > 0); 795 if ((tb = calloc(1, sizeof(*tb))) == NULL) 796 err(EXIT_FAILURE, "calloc"); 797 if ((tb->tbl = calloc(col, sizeof(*tb->tbl))) == NULL) 798 err(EXIT_FAILURE, "calloc"); 799 if ((tb->width = calloc(col, sizeof(*tb->width))) == NULL) 800 err(EXIT_FAILURE, "calloc"); 801 tb->col = col; 802 tb->row = 0; 803 } 804 805 static void 806 tbl_print(const char *s, int col) 807 { 808 int len; 809 810 assert(tb != NULL && tb->col > 0 && tb->row > 0 && col < tb->col); 811 assert(s != NULL && tb->tbl[col][tb->row - 1] == NULL); 812 if ((tb->tbl[col][tb->row - 1] = strdup(s)) == NULL) 813 err(EXIT_FAILURE, "strdup"); 814 len = strlen(s); 815 if (len > tb->width[col]) 816 tb->width[col] = len; 817 } 818 819 static void 820 tbl_print_num(uint64_t num, enum radix_style rad, int col) 821 { 822 char buf[BUF_SIZE]; 823 824 (void) snprintf(buf, BUF_SIZE, (rad == RADIX_DECIMAL ? "%ju" : 825 ((rad == RADIX_OCTAL) ? "0%jo" : "0x%jx")), (uintmax_t) num); 826 tbl_print(buf, col); 827 } 828 829 static void 830 tbl_append(void) 831 { 832 int i; 833 834 assert(tb != NULL && tb->col > 0); 835 tb->row++; 836 for (i = 0; i < tb->col; i++) { 837 tb->tbl[i] = realloc(tb->tbl[i], sizeof(*tb->tbl[i]) * tb->row); 838 if (tb->tbl[i] == NULL) 839 err(EXIT_FAILURE, "realloc"); 840 tb->tbl[i][tb->row - 1] = NULL; 841 } 842 } 843 844 static void 845 tbl_flush(void) 846 { 847 const char *str; 848 int i, j; 849 850 if (tb == NULL) 851 return; 852 853 assert(tb->col > 0); 854 for (i = 0; i < tb->row; i++) { 855 if (style == STYLE_BERKELEY) 856 printf(" "); 857 for (j = 0; j < tb->col; j++) { 858 str = (tb->tbl[j][i] != NULL ? tb->tbl[j][i] : ""); 859 if (style == STYLE_SYSV && j == 0) 860 printf("%-*s", tb->width[j], str); 861 else if (style == STYLE_BERKELEY && j == tb->col - 1) 862 printf("%s", str); 863 else 864 printf("%*s", tb->width[j], str); 865 if (j == tb->col -1) 866 putchar('\n'); 867 else 868 printf(" "); 869 } 870 } 871 872 for (i = 0; i < tb->col; i++) { 873 for (j = 0; j < tb->row; j++) { 874 if (tb->tbl[i][j]) 875 free(tb->tbl[i][j]); 876 } 877 free(tb->tbl[i]); 878 } 879 free(tb->tbl); 880 free(tb->width); 881 free(tb); 882 tb = NULL; 883 } 884 885 #define USAGE_MESSAGE "\ 886 Usage: %s [options] file ...\n\ 887 Display sizes of ELF sections.\n\n\ 888 Options:\n\ 889 --format=format Display output in specified format. Supported\n\ 890 values are `berkeley' and `sysv'.\n\ 891 --help Display this help message and exit.\n\ 892 --radix=radix Display numeric values in the specified radix.\n\ 893 Supported values are: 8, 10 and 16.\n\ 894 --totals Show cumulative totals of section sizes.\n\ 895 --version Display a version identifier and exit.\n\ 896 -A Equivalent to `--format=sysv'.\n\ 897 -B Equivalent to `--format=berkeley'.\n\ 898 -V Equivalent to `--version'.\n\ 899 -d Equivalent to `--radix=10'.\n\ 900 -h Same as option --help.\n\ 901 -o Equivalent to `--radix=8'.\n\ 902 -t Equivalent to option --totals.\n\ 903 -x Equivalent to `--radix=16'.\n" 904 905 static void 906 usage(void) 907 { 908 (void) fprintf(stderr, USAGE_MESSAGE, ELFTC_GETPROGNAME()); 909 exit(EXIT_FAILURE); 910 } 911 912 static void 913 show_version(void) 914 { 915 (void) printf("%s (%s)\n", ELFTC_GETPROGNAME(), elftc_version()); 916 exit(EXIT_SUCCESS); 917 } 918