Current Path : /compat/linux/proc/self/root/usr/src/usr.bin/elf2aout/ |
FreeBSD hs32.drive.ne.jp 9.1-RELEASE FreeBSD 9.1-RELEASE #1: Wed Jan 14 12:18:08 JST 2015 root@hs32.drive.ne.jp:/sys/amd64/compile/hs32 amd64 |
Current File : //compat/linux/proc/self/root/usr/src/usr.bin/elf2aout/elf2aout.c |
/*- * Copyright (c) 2002 Jake Burkholder * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. */ #include <sys/cdefs.h> __FBSDID("$FreeBSD: release/9.1.0/usr.bin/elf2aout/elf2aout.c 203799 2010-02-12 15:07:24Z ru $"); #include <sys/types.h> #include <sys/elf64.h> #include <sys/endian.h> #include <sys/mman.h> #include <sys/stat.h> #include <err.h> #include <fcntl.h> #include <stdio.h> #include <stdlib.h> #include <string.h> #include <unistd.h> #define xe16toh(x) ((data == ELFDATA2MSB) ? be16toh(x) : le16toh(x)) #define xe32toh(x) ((data == ELFDATA2MSB) ? be32toh(x) : le32toh(x)) #define xe64toh(x) ((data == ELFDATA2MSB) ? be64toh(x) : le64toh(x)) #define htoxe32(x) ((data == ELFDATA2MSB) ? htobe32(x) : htole32(x)) struct exec { u_int32_t a_magic; u_int32_t a_text; u_int32_t a_data; u_int32_t a_bss; u_int32_t a_syms; u_int32_t a_entry; u_int32_t a_trsize; u_int32_t a_drsize; }; #define A_MAGIC 0x01030107 static void usage(void); /* * elf to a.out converter for freebsd/sparc64 bootblocks. */ int main(int ac, char **av) { Elf64_Half phentsize; Elf64_Half machine; Elf64_Half phnum; Elf64_Xword filesz; Elf64_Xword memsz; Elf64_Addr entry; Elf64_Off offset; Elf64_Off phoff; Elf64_Word type; unsigned char data; struct stat sb; struct exec a; Elf64_Phdr *p; Elf64_Ehdr *e; void *v; int efd; int fd; int c; int i; fd = STDIN_FILENO; while ((c = getopt(ac, av, "o:")) != -1) switch (c) { case 'o': if ((fd = open(optarg, O_CREAT|O_RDWR, 0644)) < 0) err(1, "%s", optarg); break; case '?': default: usage(); } ac -= optind; av += optind; if (ac == 0) usage(); if ((efd = open(*av, O_RDONLY)) < 0 || fstat(efd, &sb) < 0) err(1, NULL); v = mmap(NULL, sb.st_size, PROT_READ, MAP_SHARED, efd, 0); if ((e = v) == MAP_FAILED) err(1, NULL); if (!IS_ELF(*e)) errx(1, "not an elf file"); if (e->e_ident[EI_CLASS] != ELFCLASS64) errx(1, "wrong class"); data = e->e_ident[EI_DATA]; if (data != ELFDATA2MSB && data != ELFDATA2LSB) errx(1, "wrong data format"); if (e->e_ident[EI_VERSION] != EV_CURRENT) errx(1, "wrong elf version"); machine = xe16toh(e->e_machine); if (machine != EM_SPARCV9 && machine != EM_ALPHA) errx(1, "wrong machine type"); phentsize = xe16toh(e->e_phentsize); if (phentsize != sizeof(*p)) errx(1, "phdr size mismatch"); entry = xe64toh(e->e_entry); phoff = xe64toh(e->e_phoff); phnum = xe16toh(e->e_phnum); p = (Elf64_Phdr *)((char *)e + phoff); bzero(&a, sizeof(a)); for (i = 0; i < phnum; i++) { type = xe32toh(p[i].p_type); switch (type) { case PT_LOAD: if (a.a_magic != 0) errx(1, "too many loadable segments"); filesz = xe64toh(p[i].p_filesz); memsz = xe64toh(p[i].p_memsz); offset = xe64toh(p[i].p_offset); a.a_magic = htoxe32(A_MAGIC); a.a_text = htoxe32(filesz); a.a_bss = htoxe32(memsz - filesz); a.a_entry = htoxe32(entry); if (write(fd, &a, sizeof(a)) != sizeof(a) || write(fd, (char *)e + offset, filesz) != (ssize_t)filesz) err(1, NULL); break; default: break; } } return (0); } static void usage(void) { fprintf(stderr, "usage: elf2aout [-o outfile] infile\n"); exit(1); }