1 #define _POSIX_C_SOURCE 200112L
12 #define RELOCATABLE 0x1
13 #define EXECUTABLE 0x2
18 int readline(FILE *f, char *fn);
19 int checkfile(char *fn, unsigned int want, int perr, int quiet);
24 int main(int ac, char **av) {
26 unsigned int want = 0;
35 while ((option = getopt(ac, av, "vtnredclaqp0f:")) != -1) {
37 case 'r': want |= RELOCATABLE; break;
38 case 'e': want |= EXECUTABLE; break;
39 case 'd': want |= DYNAMIC; break;
40 case 'c': want |= CORE; break;
41 case 'l': want |= SYMLINKS; break;
42 case 'a': want = (RELOCATABLE|EXECUTABLE|DYNAMIC|CORE); break;
43 case 'q': quiet++; break;
44 case 't': printtype++; break;
45 case 'n': printname++; break;
46 case 'v': verbose++; break;
47 case 'p': perr++; break;
48 case '0': zeroterm = 1; break;
50 if (optarg[0] == '-' && optarg[1] == 0) {
53 list = fopen(optarg, "r");
62 if (!want) want = (RELOCATABLE|EXECUTABLE|DYNAMIC|CORE);
67 while (readline(list, fn)) {
68 if (checkfile(fn, want,perr,quiet)) {
77 if (verbose) fprintf(stderr, "checking %s\n", av[optind]);
78 type = checkfile(fn,want,perr,quiet);
83 printf("relocatable"); break;
85 printf("executable"); break;
87 printf("dynamic"); break;
89 printf("core"); break;
91 printf("notelf"); break;
96 printf("%s%s", printtype ? " " : "", fn);
98 if (printtype || printname) printf("\n");
100 return type & want ? 0 : 1;
102 return errors ? 1 : 0;
105 int readline(FILE *f, char *fn) {
114 if (i == 0) continue;
118 if (i == 0) continue;
126 /* TODO print an error */
135 int checkfile(char *fn, unsigned int want, int perr, int quiet) {
141 if (want & SYMLINKS) {
146 if (!S_ISREG(st.st_mode)) {
150 fd = open(fn, O_RDONLY);
156 bytes = read(fd, &hdr, sizeof hdr);
158 if (bytes < sizeof hdr) {
159 if (perr) fprintf(stderr, "could not read full elf header (wanted %zu got %d bytes)\n", sizeof hdr, bytes);
162 if (hdr.e_ident[EI_MAG0] != ELFMAG0
163 || hdr.e_ident[EI_MAG1] != ELFMAG1
164 || hdr.e_ident[EI_MAG2] != ELFMAG2
165 || hdr.e_ident[EI_MAG3] != ELFMAG3
167 if (perr) fprintf(stderr, "elf header magic wrong\n");
170 switch (hdr.e_ident[EI_CLASS]) {
176 if (perr) fprintf(stderr, "elf header unknown class\n");
180 endian = hdr.e_ident[EI_DATA];
182 case ELFDATA2LSB: break;
183 case ELFDATA2MSB: break;
184 /* TODO swap endian if needed */
186 if (perr) fprintf(stderr, "elf header unknown endian\n");
190 switch (hdr.e_type) {
191 case ET_REL: return RELOCATABLE;
192 case ET_EXEC: return EXECUTABLE;
193 case ET_DYN: return DYNAMIC;
194 case ET_CORE: return CORE;
197 if (perr) fprintf(stderr, "unknown %s\n", fn);