tests/showptable.c

   1 /* Copyright (C) 1998, 1999, 2000, 2001, 2002, 2005 Red Hat, Inc.
   2    This file is part of elfutils.
   3    Written by Ulrich Drepper <drepper@redhat.com>, 1998.
   4
   5    This file is free software; you can redistribute it and/or modify
   6    it under the terms of the GNU General Public License as published by
   7    the Free Software Foundation; either version 3 of the License, or
   8    (at your option) any later version.
   9
  10    elfutils is distributed in the hope that it will be useful, but
  11    WITHOUT ANY WARRANTY; without even the implied warranty of
  12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13    GNU General Public License for more details.
  14
  15    You should have received a copy of the GNU General Public License
  16    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
  17
  18 #include <config.h>
  19
  20 #include <errno.h>
  21 #include <fcntl.h>
  22 #include <gelf.h>
  23 #include <stdio.h>
  24 #include <stdlib.h>
  25 #include <string.h>
  26
  27 int
  28 main (int argc, char *argv[])
  29 {
  30   Elf *elf;
  31   int fd;
  32   GElf_Ehdr ehdr;
  33   int cnt;
  34
  35   if (argc < 2)
  36     {
  37       puts ("missing parameter");
  38       exit (1);
  39     }
  40
  41   fd = open (argv[1], O_RDONLY);
  42   if (fd == -1)
  43     {
  44       printf ("cannot open \"%s\": %s\n", argv[1], strerror (errno));
  45       exit (1);
  46     }
  47
  48   elf_version (EV_CURRENT);
  49
  50   elf = elf_begin (fd, ELF_C_READ, NULL);
  51   if (elf == NULL)
  52     {
  53       printf ("cannot open ELF file: %s\n", elf_errmsg (-1));
  54       exit (1);
  55     }
  56
  57   if (elf_kind (elf) != ELF_K_ELF)
  58     {
  59       printf ("\"%s\" is not an ELF file\n", argv[1]);
  60       exit (1);
  61     }
  62
  63   if (gelf_getehdr (elf, &ehdr) == NULL)
  64     {
  65       printf ("cannot get the ELF header: %s\n", elf_errmsg (-1));
  66       exit (1);
  67     }
  68
  69   printf ("idx type    %*s %*s %*s %*s %*s  align flags\n",
  70           gelf_getclass (elf) == ELFCLASS32 ? 9 : 17, "offset",
  71           gelf_getclass (elf) == ELFCLASS32 ? 10 : 18, "vaddr",
  72           gelf_getclass (elf) == ELFCLASS32 ? 10 : 18, "paddr",
  73           gelf_getclass (elf) == ELFCLASS32 ? 9 : 12, "filesz",
  74           gelf_getclass (elf) == ELFCLASS32 ? 9 : 12, "memsz");
  75
  76   for (cnt = 0; cnt < ehdr.e_phnum; ++cnt)
  77     {
  78       static const char *typenames[] =
  79       {
  80         [PT_NULL] = "NULL",
  81         [PT_LOAD] = "LOAD",
  82         [PT_DYNAMIC] = "DYNAMIC",
  83         [PT_INTERP] = "INTERP",
  84         [PT_NOTE] = "NOTE",
  85         [PT_SHLIB] = "SHLIB",
  86         [PT_PHDR] = "PHDR"
  87       };
  88       GElf_Phdr mem;
  89       GElf_Phdr *phdr = gelf_getphdr (elf, cnt, &mem);
  90       char buf[19];
  91       const char *p_type = typenames[phdr->p_type];
  92
  93       /* If we don't know the name of the type we use the number value.  */
  94       if (phdr->p_type >= PT_NUM)
  95         {
  96           snprintf (buf, sizeof (buf), "%x", phdr->p_type);
  97           p_type = buf;
  98         }
  99
 100       printf ("%3d %-7s %#0*llx %#0*llx %#0*llx %#0*llx %#0*llx %#6llx ",
 101               cnt, p_type,
 102               gelf_getclass (elf) == ELFCLASS32 ? 9 : 17,
 103               (unsigned long long int) phdr->p_offset,
 104               gelf_getclass (elf) == ELFCLASS32 ? 10 : 18,
 105               (unsigned long long int) phdr->p_vaddr,
 106               gelf_getclass (elf) == ELFCLASS32 ? 10 : 18,
 107               (unsigned long long int) phdr->p_paddr,
 108               gelf_getclass (elf) == ELFCLASS32 ? 9 : 12,
 109               (unsigned long long int) phdr->p_filesz,
 110               gelf_getclass (elf) == ELFCLASS32 ? 9 : 12,
 111               (unsigned long long int) phdr->p_memsz,
 112               (unsigned long long int) phdr->p_align);
 113
 114       putc_unlocked ((phdr->p_flags & PF_X) ? 'X' : ' ', stdout);
 115       putc_unlocked ((phdr->p_flags & PF_W) ? 'W' : ' ', stdout);
 116       putc_unlocked ((phdr->p_flags & PF_R) ? 'R' : ' ', stdout);
 117
 118       putc_unlocked ('\n', stdout);
 119
 120       if (phdr->p_type == PT_INTERP)
 121         {
 122           /* We can show the user the name of the interpreter.  */
 123           size_t maxsize;
 124           char *filedata = elf_rawfile (elf, &maxsize);
 125
 126           if (filedata != NULL && phdr->p_offset < maxsize)
 127             printf ("\t[Requesting program interpreter: %s]\n",
 128                     filedata + phdr->p_offset);
 129         }
 130     }
 131
 132   if (elf_end (elf) != 0)
 133     {
 134       printf ("error while freeing ELF descriptor: %s\n", elf_errmsg (-1));
 135       exit (1);
 136     }
 137
 138   return 0;
 139 }