#ifdef BUILTIN_FAT
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/types.h>
#include <sys/param.h>
#include <sys/file.h>
#include <unistd.h>
#include <mach-o/fat.h>
#include <mach-o/arch.h>
#include <mach-o/swap.h>
#include "file.h"
static void print_arch_name_for_file(
struct magic_set *ms,
cpu_type_t cputype,
cpu_subtype_t cpusubtype);
void
tryfat(
struct magic_set *ms,
const char *inname,
int fd,
char *buf,
size_t nbytes)
{
struct fat_header fat_header;
struct fat_arch *fat_archs;
unsigned long i, arch_size, tbytes;
char *arch_buf;
unsigned char tmpbuf[HOWMANY+1];
if(nbytes < sizeof(struct fat_header)){
return;
}
memcpy(&fat_header, buf, sizeof(struct fat_header));
#ifdef __LITTLE_ENDIAN__
swap_fat_header(&fat_header, NX_LittleEndian);
#endif
arch_size = fat_header.nfat_arch * sizeof(struct fat_arch);
if(arch_size + sizeof(struct fat_header) > nbytes){
return;
}
arch_buf = malloc(nbytes);
if(arch_buf == NULL)
return;
memcpy(arch_buf, buf + sizeof(struct fat_header), arch_size);
fat_archs = (struct fat_arch *)(arch_buf);
#ifdef __LITTLE_ENDIAN__
swap_fat_arch(fat_archs, fat_header.nfat_arch, NX_LittleEndian);
#endif
for(i = 0; i < fat_header.nfat_arch; i++){
file_printf(ms, "\n%s", inname);
print_arch_name_for_file(ms,
fat_archs[i].cputype,
fat_archs[i].cpusubtype);
file_printf(ms, ":\t");
lseek(fd, fat_archs[i].offset, L_SET);
if ((tbytes = read(fd, (char *)tmpbuf, HOWMANY)) == -1) {
file_error(ms, "read failed (%s).\n", strerror(errno));
}
file_buffer(ms, tmpbuf, tbytes);
}
}
static
void
print_arch_name_for_file(
struct magic_set *ms,
cpu_type_t cputype,
cpu_subtype_t cpusubtype)
{
const NXArchInfo *ArchInfoTable, *ai;
ArchInfoTable = NXGetAllArchInfos();
for(ai = ArchInfoTable; ai->name != NULL; ai++){
if(ai->cputype == cputype &&
ai->cpusubtype == cpusubtype){
file_printf(ms, " (for architecture %s)", ai->name);
return;
}
}
file_printf(ms, " (for architecture cputype (%d) cpusubtype (%d))",
cputype, cpusubtype);
}
#endif