1 /* Copyright (C) 2015 Red Hat, Inc.
2    This file is part of elfutils.
3 
4    This file is free software; you can redistribute it and/or modify
5    it under the terms of the GNU General Public License as published by
6    the Free Software Foundation; either version 3 of the License, or
7    (at your option) any later version.
8 
9    elfutils is distributed in the hope that it will be useful, but
10    WITHOUT ANY WARRANTY; without even the implied warranty of
11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12    GNU General Public License for more details.
13 
14    You should have received a copy of the GNU General Public License
15    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
16 
17 #ifdef HAVE_CONFIG_H
18 # include <config.h>
19 #endif
20 
21 #include <assert.h>
22 #include <sys/types.h>
23 #include <sys/stat.h>
24 #include <fcntl.h>
25 #include <inttypes.h>
26 
27 #include ELFUTILS_HEADER(elf)
28 #include ELFUTILS_HEADER(dwelf)
29 #include <gelf.h>
30 
31 #include <stdio.h>
32 #include <unistd.h>
33 #include <string.h>
34 
35 int
main(int argc,char * argv[])36 main (int argc, char *argv[])
37 {
38   int result = 0;
39   int cnt;
40 
41   elf_version (EV_CURRENT);
42 
43   for (cnt = 1; cnt < argc; ++cnt)
44     {
45       int fd = open (argv[cnt], O_RDONLY);
46 
47       Elf *elf = elf_begin (fd, ELF_C_READ, NULL);
48       if (elf == NULL)
49 	{
50 	  printf ("%s not usable %s\n", argv[cnt], elf_errmsg (-1));
51 	  result = 1;
52 	  close (fd);
53 	  continue;
54 	}
55 
56       size_t shdrstrndx;
57       if (elf_getshdrstrndx (elf, &shdrstrndx) == -1)
58 	{
59 	  printf ("elf_getshdrstrnd failed %s\n", elf_errmsg (-1));
60 	  result = 1;
61 	  close (fd);
62 	  continue;
63 	}
64 
65       Elf_Scn *scn = NULL;
66       while ((scn = elf_nextscn (elf, scn)) != NULL)
67 	{
68 	  int idx = elf_ndxscn (scn);
69 	  GElf_Shdr shdr;
70 	  if (gelf_getshdr (scn, &shdr) == NULL)
71 	    {
72 	      printf ("gelf_getshdr failed: %s\n", elf_errmsg (-1));
73 	      result = 1;
74 	      break;
75 	    }
76 
77 	  if ((shdr.sh_flags & SHF_COMPRESSED) != 0)
78 	    {
79 	      GElf_Chdr chdr;
80 	      if (gelf_getchdr (scn, &chdr) == NULL)
81 		{
82 		  printf ("gelf_getchdr failed: %s\n", elf_errmsg (-1));
83 		  result = 1;
84 		  break;
85 		}
86 
87 	      printf ("section %d: ELF Compressed ch_type: %" PRId32
88 		      ", ch_size: %" PRIx64 ", ch_addralign: %" PRIx64 "\n",
89 		      idx, chdr.ch_type, chdr.ch_size, chdr.ch_addralign);
90 	    }
91 	  else
92 	    {
93 	      const char *sname = elf_strptr (elf, shdrstrndx, shdr.sh_name);
94 	      if (sname == NULL)
95 		{
96 		  printf ("couldn't get section name: %s\n", elf_errmsg (-1));
97 		  result = 1;
98 		  break;
99 		}
100 
101 	      /* This duplicates what the dwelfgnucompressed testcase does.  */
102 	      if (strncmp(".zdebug", sname, strlen (".zdebug")) == 0)
103 		{
104 		  ssize_t size;
105 		  if ((size = dwelf_scn_gnu_compressed_size (scn)) == -1)
106 		    {
107 		      printf ("dwelf_scn_gnu_compressed_size failed: %s\n",
108 			      elf_errmsg (-1));
109 		      result = 1;
110 		      break;
111 		    }
112 		  printf ("section %d: GNU Compressed size: %zx\n", idx, size);
113 		}
114 	      else
115 		printf ("section %d: NOT Compressed\n", idx);
116 	    }
117 	}
118 
119       elf_end (elf);
120       close (fd);
121     }
122 
123   return result;
124 }
125