• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 /* Copyright (C) 1998, 1999, 2000, 2002 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 <fcntl.h>
21 #include <gelf.h>
22 #include <stdio.h>
23 #include <stdlib.h>
24 #include <string.h>
25 #include <time.h>
26 #include <unistd.h>
27 #include "system.h"
28 
29 
30 static const char *machines[] =
31 {
32 #define MACHINE(name) [name] = #name
33   MACHINE (EM_NONE),
34   MACHINE (EM_M32),
35   MACHINE (EM_SPARC),
36   MACHINE (EM_386),
37   MACHINE (EM_68K),
38   MACHINE (EM_88K),
39   MACHINE (EM_860),
40   MACHINE (EM_MIPS),
41   MACHINE (EM_MIPS_RS3_LE),
42   MACHINE (EM_PARISC),
43   MACHINE (EM_VPP500),
44   MACHINE (EM_SPARC32PLUS),
45   MACHINE (EM_960),
46   MACHINE (EM_PPC),
47   MACHINE (EM_PPC64),
48   MACHINE (EM_V800),
49   MACHINE (EM_FR20),
50   MACHINE (EM_RH32),
51   MACHINE (EM_RCE),
52   MACHINE (EM_ARM),
53   MACHINE (EM_FAKE_ALPHA),
54   MACHINE (EM_SH),
55   MACHINE (EM_SPARCV9),
56   MACHINE (EM_TRICORE),
57   MACHINE (EM_ARC),
58   MACHINE (EM_H8_300),
59   MACHINE (EM_H8_300H),
60   MACHINE (EM_H8S),
61   MACHINE (EM_H8_500),
62   MACHINE (EM_IA_64),
63   MACHINE (EM_MIPS_X),
64   MACHINE (EM_COLDFIRE),
65   MACHINE (EM_68HC12),
66   MACHINE (EM_MMA),
67   MACHINE (EM_PCP),
68   MACHINE (EM_NCPU),
69   MACHINE (EM_NDR1),
70   MACHINE (EM_STARCORE),
71   MACHINE (EM_ME16),
72   MACHINE (EM_ST100),
73   MACHINE (EM_TINYJ),
74   MACHINE (EM_FX66),
75   MACHINE (EM_ST9PLUS),
76   MACHINE (EM_ST7),
77   MACHINE (EM_68HC16),
78   MACHINE (EM_68HC11),
79   MACHINE (EM_68HC08),
80   MACHINE (EM_68HC05),
81   MACHINE (EM_SVX),
82   MACHINE (EM_ST19),
83   MACHINE (EM_VAX)
84 };
85 
86 
87 int
main(int argc,char * argv[])88 main (int argc, char *argv[])
89 {
90   int fd;
91   Elf *elf;
92   Elf_Cmd cmd;
93   size_t n;
94   int arg = 1;
95   int verbose = 0;
96 
97   /* Recognize optional verbosity flag.  */
98   if (arg < argc && strcmp (argv[arg], "-v") == 0)
99     {
100       verbose = 1;
101       ++arg;
102     }
103 
104   /* Any more arguments available.  */
105   if (arg >= argc)
106     error (EXIT_FAILURE, 0, "No input file given");
107 
108   /* Open the input file.  */
109   fd = open (argv[arg], O_RDONLY);
110   if (fd == -1)
111     {
112       perror ("cannot open input file");
113       exit (1);
114     }
115 
116   /* Set the ELF version we are using here.  */
117   if (elf_version (EV_CURRENT) == EV_NONE)
118     {
119       puts ("ELF library too old");
120       exit (1);
121     }
122 
123   /* Start reading the file.  */
124   cmd = ELF_C_READ;
125   elf = elf_begin (fd, cmd, NULL);
126   if (elf == NULL)
127     {
128       printf ("elf_begin: %s\n", elf_errmsg (-1));
129       exit (1);
130     }
131 
132   /* If it is no archive punt.  */
133   if (elf_kind (elf) != ELF_K_AR)
134     {
135       printf ("%s is not an archive\n", argv[1]);
136       exit (1);
137     }
138 
139   if (verbose)
140     {
141       /* The verbose variant.  We print a lot of information.  */
142       Elf *subelf;
143       char buf[100];
144       time_t t;
145 
146       /* Get the elements of the archive one after the other.  */
147       while ((subelf = elf_begin (fd, cmd, elf)) != NULL)
148 	{
149 	  /* The the header for this element.  */
150 	  Elf_Arhdr *arhdr = elf_getarhdr (subelf);
151 
152 	  if (arhdr == NULL)
153 	    {
154 	      printf ("cannot get arhdr: %s\n", elf_errmsg (-1));
155 	      break;
156 	    }
157 
158 	  switch (elf_kind (subelf))
159 	    {
160 	    case ELF_K_ELF:
161 	      fputs ("ELF file:\n", stdout);
162 	      break;
163 
164 	    case ELF_K_AR:
165 	      fputs ("archive:\n", stdout);
166 	      break;
167 
168 	    default:
169 	      fputs ("unknown file:\n", stdout);
170 	      break;
171 	    }
172 
173 	  /* Print general information.  */
174 	  t = arhdr->ar_date;
175 	  strftime (buf, sizeof buf, "%Y-%m-%dT%H:%M:%S%z", gmtime (&t));
176 	  printf ("  name         : \"%s\"\n"
177 		  "  time         : %s\n"
178 		  "  uid          : %ld\n"
179 		  "  gid          : %ld\n"
180 		  "  mode         : %o\n"
181 		  "  size         : %ld\n"
182 		  "  rawname      : \"%s\"\n",
183 		  arhdr->ar_name,
184 		  buf,
185 		  (long int) arhdr->ar_uid,
186 		  (long int) arhdr->ar_gid,
187 		  arhdr->ar_mode,
188 		  (long int) arhdr->ar_size,
189 		  arhdr->ar_rawname);
190 
191 	  /* For ELF files we can provide some more information.  */
192 	  if (elf_kind (subelf) == ELF_K_ELF)
193 	    {
194 	      GElf_Ehdr ehdr;
195 
196 	      /* Get the ELF header.  */
197 	      if (gelf_getehdr (subelf, &ehdr) == NULL)
198 		printf ("  *** cannot get ELF header: %s\n", elf_errmsg (-1));
199 	      else
200 		{
201 		  printf ("  binary class : %s\n",
202 			  ehdr.e_ident[EI_CLASS] == ELFCLASS32
203 			  ? "ELFCLASS32" : "ELFCLASS64");
204 		  printf ("  data encoding: %s\n",
205 			  ehdr.e_ident[EI_DATA] == ELFDATA2LSB
206 			  ? "ELFDATA2LSB" : "ELFDATA2MSB");
207 		  printf ("  binary type  : %s\n",
208 			  ehdr.e_type == ET_REL
209 			  ? "relocatable"
210 			  : (ehdr.e_type == ET_EXEC
211 			     ? "executable"
212 			     : (ehdr.e_type == ET_DYN
213 				? "dynamic"
214 				: "core file")));
215 		  printf ("  machine      : %s\n",
216 			  (ehdr.e_machine >= (sizeof (machines)
217 					      / sizeof (machines[0]))
218 			   || machines[ehdr.e_machine] == NULL)
219 			  ? "???"
220 			  : machines[ehdr.e_machine]);
221 		}
222 	    }
223 
224 	  /* Get next archive element.  */
225 	  cmd = elf_next (subelf);
226 	  if (elf_end (subelf) != 0)
227 	    printf ("error while freeing sub-ELF descriptor: %s\n",
228 		    elf_errmsg (-1));
229 	}
230     }
231   else
232     {
233       /* The simple version.  Only print a bit of information.  */
234       Elf_Arsym *arsym = elf_getarsym (elf, &n);
235 
236       if (n == 0)
237 	printf ("no symbol table in archive: %s\n", elf_errmsg (-1));
238       else
239 	{
240 	  --n;
241 
242 	  while (n-- > 0)
243 	    printf ("name = \"%s\", offset = %ld, hash = %lx\n",
244 		    arsym[n].as_name, (long int) arsym[n].as_off,
245 		    arsym[n].as_hash);
246 	}
247     }
248 
249   /* Free the ELF handle.  */
250   if (elf_end (elf) != 0)
251     printf ("error while freeing ELF descriptor: %s\n", elf_errmsg (-1));
252 
253   /* Close the underlying file.  */
254   close (fd);
255 
256   return 0;
257 }
258