src__readmacho.c.diff   [plain text]


--- /dev/null	Wed Sep  8 12:48:00 2004
+++ src/readmacho.c	Wed Sep  8 12:47:48 2004
@@ -0,0 +1,133 @@
+/*
+ * Copyright (c) 1999 Apple Computer, Inc. All rights reserved.
+ *
+ * @APPLE_LICENSE_HEADER_START@
+ * 
+ * Portions Copyright (c) 1999 Apple Computer, Inc.  All Rights
+ * Reserved.  This file contains Original Code and/or Modifications of
+ * Original Code as defined in and that are subject to the Apple Public
+ * Source License Version 1.1 (the "License").  You may not use this file
+ * except in compliance with the License.  Please obtain a copy of the
+ * License at http://www.apple.com/publicsource and read it before using
+ * this file.
+ * 
+ * The Original Code and all software distributed under the License are
+ * distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER
+ * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
+ * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE OR NON- INFRINGEMENT.  Please see the
+ * License for the specific language governing rights and limitations
+ * under the License.
+ * 
+ * @APPLE_LICENSE_HEADER_END@
+ */
+
+#ifdef BUILTIN_MACHO
+#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)
+{
+	const NXArchInfo *ArchInfoTable, *ai;
+
+	ArchInfoTable = NXGetAllArchInfos();
+
+	for (ai = ArchInfoTable; ai->name != NULL; ai++) {
+		if(ai->cputype == cputype && ai->cpusubtype == (cpusubtype & ~CPU_SUBTYPE_MASK)) {
+			file_printf(ms, " (for architecture %s)", ai->name);
+			return;
+		}
+	}
+
+	file_printf(ms, " (for architecture cputype (%d) cpusubtype (%d))",
+		cputype, cpusubtype);
+}
+
+protected int
+file_trymacho(struct magic_set *ms, int fd, const unsigned char *buf,
+	size_t nbytes, const char *inname)
+{
+	struct stat stat_buf;
+	unsigned long size;
+	struct fat_header fat_header;
+	struct fat_arch *fat_archs;
+	uint32_t arch_size, i;
+	ssize_t tbytes;
+	unsigned char tmpbuf[HOWMANY];
+
+	if (fstat(fd, &stat_buf) == -1) {
+		return -1;
+	}
+
+	size = stat_buf.st_size;
+
+	if (nbytes < sizeof(struct fat_header)) {
+		return -1;
+	}
+
+	memcpy(&fat_header, buf, sizeof(struct fat_header));
+#ifdef __LITTLE_ENDIAN__
+	swap_fat_header(&fat_header, NX_LittleEndian);
+#endif /* __LITTLE_ENDIAN__ */
+
+	/* Check magic number, plus little hack for Mach-O vs. Java. */
+	if(!(fat_header.magic == FAT_MAGIC && fat_header.nfat_arch < 20)) {
+		return -1;
+	}
+
+	arch_size = fat_header.nfat_arch * sizeof(struct fat_arch);
+
+	if (nbytes < sizeof(struct fat_header) + arch_size) {
+		return -1;
+	}
+
+	if ((fat_archs = (struct fat_arch *)malloc(arch_size)) == NULL) {
+		return -1;
+	}
+
+	memcpy((void *)fat_archs, buf + sizeof(struct fat_header), arch_size);
+#ifdef __LITTLE_ENDIAN__
+	swap_fat_arch(fat_archs, fat_header.nfat_arch, NX_LittleEndian);
+#endif /* __LITTLE_ENDIAN__ */
+
+	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");
+
+		if (fat_archs[i].offset + fat_archs[i].size > size) {
+			free(fat_archs);
+			return -1;
+		}
+
+		if (lseek(fd, fat_archs[i].offset, SEEK_SET) == -1) {
+			free(fat_archs);
+			return -1;
+		}
+
+		if ((tbytes = read(fd, tmpbuf, sizeof(tmpbuf))) == -1) {
+			free(fat_archs);
+			return -1;
+		}
+
+		file_buffer(ms, -1, tmpbuf, (size_t)tbytes);
+	}
+
+	free(fat_archs);
+	return 0;
+}
+#endif /* BUILTIN_MACHO */