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) {
51 fprintf(stderr, "opening stdin\n");
54 list = fopen(optarg, "r");
63 if (!want) want = (RELOCATABLE|EXECUTABLE|DYNAMIC|CORE);
68 while (readline(list, fn)) {
69 if (checkfile(fn, want,perr,quiet)) {
78 if (verbose) fprintf(stderr, "checking %s\n", av[optind]);
79 type = checkfile(fn,want,perr,quiet);
84 printf("relocatable"); break;
86 printf("executable"); break;
88 printf("dynamic"); break;
90 printf("core"); break;
92 printf("notelf"); break;
97 printf("%s%s", printtype ? " " : "", fn);
99 if (printtype || printname) printf("\n");
101 return type & want ? 0 : 1;
103 return errors ? 1 : 0;
106 int readline(FILE *f, char *fn) {
115 if (i == 0) continue;
119 if (i == 0) continue;
127 /* TODO print an error */
136 int checkfile(char *fn, unsigned int want, int perr, int quiet) {
142 if (want & SYMLINKS) {
147 if (!S_ISREG(st.st_mode)) {
151 fd = open(fn, O_RDONLY);
157 bytes = read(fd, &hdr, sizeof hdr);
159 if (bytes < sizeof hdr) {
160 if (perr) fprintf(stderr, "could not read full elf header (wanted %zu got %d bytes)\n", sizeof hdr, bytes);
163 if (hdr.e_ident[EI_MAG0] != ELFMAG0
164 || hdr.e_ident[EI_MAG1] != ELFMAG1
165 || hdr.e_ident[EI_MAG2] != ELFMAG2
166 || hdr.e_ident[EI_MAG3] != ELFMAG3
168 if (perr) fprintf(stderr, "elf header magic wrong\n");
171 switch (hdr.e_ident[EI_CLASS]) {
177 if (perr) fprintf(stderr, "elf header unknown class\n");
181 endian = hdr.e_ident[EI_DATA];
183 case ELFDATA2LSB: break;
184 case ELFDATA2MSB: break;
185 /* TODO swap endian if needed */
187 if (perr) fprintf(stderr, "elf header unknown endian\n");
191 switch (hdr.e_type) {
192 case ET_REL: return RELOCATABLE;
193 case ET_EXEC: return EXECUTABLE;
194 case ET_DYN: return DYNAMIC;
195 case ET_CORE: return CORE;
198 if (perr) fprintf(stderr, "unknown %s\n", fn);