Home | History | Annotate | Line # | Download | only in libsa
loadfile.c revision 1.10.4.2
      1  1.10.4.2   thorpej /* $NetBSD: loadfile.c,v 1.10.4.2 2002/01/10 20:00:37 thorpej Exp $ */
      2       1.1  christos 
      3       1.1  christos /*-
      4       1.1  christos  * Copyright (c) 1997 The NetBSD Foundation, Inc.
      5       1.1  christos  * All rights reserved.
      6       1.1  christos  *
      7       1.1  christos  * This code is derived from software contributed to The NetBSD Foundation
      8       1.1  christos  * by Jason R. Thorpe of the Numerical Aerospace Simulation Facility,
      9       1.1  christos  * NASA Ames Research Center and by Christos Zoulas.
     10       1.1  christos  *
     11       1.1  christos  * Redistribution and use in source and binary forms, with or without
     12       1.1  christos  * modification, are permitted provided that the following conditions
     13       1.1  christos  * are met:
     14       1.1  christos  * 1. Redistributions of source code must retain the above copyright
     15       1.1  christos  *    notice, this list of conditions and the following disclaimer.
     16       1.1  christos  * 2. Redistributions in binary form must reproduce the above copyright
     17       1.1  christos  *    notice, this list of conditions and the following disclaimer in the
     18       1.1  christos  *    documentation and/or other materials provided with the distribution.
     19       1.1  christos  * 3. All advertising materials mentioning features or use of this software
     20       1.1  christos  *    must display the following acknowledgement:
     21       1.1  christos  *	This product includes software developed by the NetBSD
     22       1.1  christos  *	Foundation, Inc. and its contributors.
     23       1.1  christos  * 4. Neither the name of The NetBSD Foundation nor the names of its
     24       1.1  christos  *    contributors may be used to endorse or promote products derived
     25       1.1  christos  *    from this software without specific prior written permission.
     26       1.1  christos  *
     27       1.1  christos  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     28       1.1  christos  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     29       1.1  christos  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     30       1.1  christos  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     31       1.1  christos  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     32       1.1  christos  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     33       1.1  christos  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     34       1.1  christos  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     35       1.1  christos  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     36       1.1  christos  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     37       1.1  christos  * POSSIBILITY OF SUCH DAMAGE.
     38       1.1  christos  */
     39       1.1  christos 
     40       1.1  christos /*
     41       1.1  christos  * Copyright (c) 1992, 1993
     42       1.1  christos  *	The Regents of the University of California.  All rights reserved.
     43       1.1  christos  *
     44       1.1  christos  * This code is derived from software contributed to Berkeley by
     45       1.1  christos  * Ralph Campbell.
     46       1.1  christos  *
     47       1.1  christos  * Redistribution and use in source and binary forms, with or without
     48       1.1  christos  * modification, are permitted provided that the following conditions
     49       1.1  christos  * are met:
     50       1.1  christos  * 1. Redistributions of source code must retain the above copyright
     51       1.1  christos  *    notice, this list of conditions and the following disclaimer.
     52       1.1  christos  * 2. Redistributions in binary form must reproduce the above copyright
     53       1.1  christos  *    notice, this list of conditions and the following disclaimer in the
     54       1.1  christos  *    documentation and/or other materials provided with the distribution.
     55       1.1  christos  * 3. All advertising materials mentioning features or use of this software
     56       1.1  christos  *    must display the following acknowledgement:
     57       1.1  christos  *	This product includes software developed by the University of
     58       1.1  christos  *	California, Berkeley and its contributors.
     59       1.1  christos  * 4. Neither the name of the University nor the names of its contributors
     60       1.1  christos  *    may be used to endorse or promote products derived from this software
     61       1.1  christos  *    without specific prior written permission.
     62       1.1  christos  *
     63       1.1  christos  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     64       1.1  christos  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     65       1.1  christos  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     66       1.1  christos  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     67       1.1  christos  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     68       1.1  christos  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     69       1.1  christos  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     70       1.1  christos  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     71       1.1  christos  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     72       1.1  christos  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     73       1.1  christos  * SUCH DAMAGE.
     74       1.1  christos  *
     75       1.1  christos  *	@(#)boot.c	8.1 (Berkeley) 6/10/93
     76       1.1  christos  */
     77       1.1  christos 
     78       1.1  christos #ifdef _STANDALONE
     79       1.1  christos #include <lib/libsa/stand.h>
     80       1.6   thorpej #include <lib/libkern/libkern.h>
     81       1.1  christos #else
     82       1.1  christos #include <stdio.h>
     83       1.1  christos #include <string.h>
     84       1.1  christos #include <errno.h>
     85       1.1  christos #include <stdlib.h>
     86       1.1  christos #include <unistd.h>
     87       1.1  christos #include <fcntl.h>
     88       1.1  christos #include <err.h>
     89       1.1  christos #endif
     90       1.1  christos 
     91       1.1  christos #include <sys/param.h>
     92       1.1  christos #include <sys/exec.h>
     93       1.1  christos 
     94       1.1  christos #include "loadfile.h"
     95       1.1  christos 
     96       1.1  christos /*
     97       1.1  christos  * Open 'filename', read in program and and return 0 if ok 1 on error.
     98       1.1  christos  * Fill in marks
     99       1.1  christos  */
    100       1.1  christos int
    101       1.1  christos loadfile(fname, marks, flags)
    102       1.1  christos 	const char *fname;
    103       1.1  christos 	u_long *marks;
    104       1.1  christos 	int flags;
    105       1.1  christos {
    106       1.1  christos 	union {
    107       1.1  christos #ifdef BOOT_ECOFF
    108       1.1  christos 		struct ecoff_exechdr coff;
    109       1.1  christos #endif
    110  1.10.4.2   thorpej #ifdef BOOT_ELF32
    111  1.10.4.2   thorpej 		Elf32_Ehdr elf32;
    112  1.10.4.2   thorpej #endif
    113  1.10.4.2   thorpej #ifdef BOOT_ELF64
    114  1.10.4.2   thorpej 		Elf64_Ehdr elf64;
    115       1.1  christos #endif
    116       1.1  christos #ifdef BOOT_AOUT
    117       1.1  christos 		struct exec aout;
    118       1.1  christos #endif
    119       1.1  christos 	} hdr;
    120       1.1  christos 	ssize_t nr;
    121       1.1  christos 	int fd, rval;
    122       1.1  christos 
    123       1.1  christos 	/* Open the file. */
    124       1.1  christos 	if ((fd = open(fname, 0)) < 0) {
    125       1.1  christos 		WARN(("open %s", fname ? fname : "<default>"));
    126       1.1  christos 		return -1;
    127       1.1  christos 	}
    128       1.1  christos 
    129       1.1  christos 	/* Read the exec header. */
    130       1.1  christos 	if ((nr = read(fd, &hdr, sizeof(hdr))) != sizeof(hdr)) {
    131       1.1  christos 		WARN(("read header"));
    132       1.1  christos 		goto err;
    133       1.1  christos 	}
    134       1.1  christos 
    135       1.1  christos #ifdef BOOT_ECOFF
    136       1.1  christos 	if (!ECOFF_BADMAG(&hdr.coff)) {
    137  1.10.4.2   thorpej 		rval = loadfile_coff(fd, &hdr.coff, marks, flags);
    138  1.10.4.2   thorpej 	} else
    139  1.10.4.2   thorpej #endif
    140  1.10.4.2   thorpej #ifdef BOOT_ELF32
    141  1.10.4.2   thorpej 	if (memcmp(hdr.elf32.e_ident, ELFMAG, SELFMAG) == 0 &&
    142  1.10.4.2   thorpej 	    hdr.elf32.e_ident[EI_CLASS] == ELFCLASS32) {
    143  1.10.4.2   thorpej 		rval = loadfile_elf32(fd, &hdr.elf32, marks, flags);
    144       1.1  christos 	} else
    145       1.1  christos #endif
    146  1.10.4.2   thorpej #ifdef BOOT_ELF64
    147  1.10.4.2   thorpej 	if (memcmp(hdr.elf64.e_ident, ELFMAG, SELFMAG) == 0 &&
    148  1.10.4.2   thorpej 	    hdr.elf64.e_ident[EI_CLASS] == ELFCLASS64) {
    149  1.10.4.2   thorpej 		rval = loadfile_elf64(fd, &hdr.elf64, marks, flags);
    150       1.1  christos 	} else
    151       1.1  christos #endif
    152       1.1  christos #ifdef BOOT_AOUT
    153       1.8     ragge 	if (OKMAGIC(N_GETMAGIC(hdr.aout))
    154       1.8     ragge #ifndef NO_MID_CHECK
    155       1.8     ragge 	    && N_GETMID(hdr.aout) == MID_MACHINE
    156       1.8     ragge #endif
    157       1.8     ragge 	    ) {
    158  1.10.4.2   thorpej 		rval = loadfile_aout(fd, &hdr.aout, marks, flags);
    159       1.1  christos 	} else
    160       1.1  christos #endif
    161       1.1  christos 	{
    162       1.1  christos 		rval = 1;
    163       1.1  christos 		errno = EFTYPE;
    164       1.1  christos 		WARN(("%s", fname ? fname : "<default>"));
    165       1.1  christos 	}
    166       1.1  christos 
    167       1.1  christos 	if (rval == 0) {
    168       1.1  christos 		PROGRESS(("=0x%lx\n", marks[MARK_END] - marks[MARK_START]));
    169       1.1  christos 		return fd;
    170       1.1  christos 	}
    171       1.1  christos err:
    172       1.1  christos 	(void)close(fd);
    173       1.1  christos 	return -1;
    174       1.1  christos }
    175