NetBSD/sys/arch/pmax/stand/mkboot.c

215 lines
6.1 KiB
C

/* $NetBSD: mkboot.c,v 1.5 1995/01/18 06:53:42 mellon Exp $ */
/*
* Copyright (c) 1992, 1993
* The Regents of the University of California. All rights reserved.
*
* This code is derived from software contributed to Berkeley by
* Ralph Campbell.
*
* 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.
* 3. All advertising materials mentioning features or use of this software
* must display the following acknowledgement:
* This product includes software developed by the University of
* California, Berkeley and its contributors.
* 4. Neither the name of the University nor the names of its contributors
* may be used to endorse or promote products derived from this software
* without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE REGENTS 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 REGENTS 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.
*
* @(#)mkboot.c 8.1 (Berkeley) 6/10/93
*/
#ifndef lint
static char copyright[] =
"@(#) Copyright (c) 1992, 1993\n\
The Regents of the University of California. All rights reserved.\n";
#endif not lint
#ifndef lint
#ifdef notdef
static char sccsid[] = "@(#)mkboot.c 8.1 (Berkeley) 6/10/93";
#endif
static char rcsid[] = "$NetBSD: mkboot.c,v 1.5 1995/01/18 06:53:42 mellon Exp $";
#endif not lint
#include <sys/param.h>
#include <sys/exec.h>
#include <sys/disklabel.h>
#include <stdio.h>
#include <pmax/stand/dec_boot.h>
struct Dec_DiskBoot decBootInfo;
char block[DEV_BSIZE];
char *bootfname, *xxboot, *bootxx;
/*
* This program takes a boot program and splits it into xxboot and bootxx
* files for the disklabel program. The disklabel program should be used to
* label and install the boot program onto a new disk.
*
* mkboot bootprog xxboot bootxx
*/
main(argc, argv)
int argc;
char *argv[];
{
register int i, n;
int ifd, ofd1, ofd2;
int nsectors;
long loadAddr;
long execAddr;
long length;
if (argc != 4)
usage();
bootfname = argv[1];
xxboot = argv[2];
bootxx = argv[3];
ifd = open(bootfname, 0, 0);
if (ifd < 0) {
perror(bootfname);
exit(1);
}
ofd1 = creat(xxboot, 0666);
if (ofd1 < 0) {
xxboot_err:
perror(xxboot);
exit(1);
}
ofd2 = creat(bootxx, 0666);
if (ofd2 < 0) {
bootxx_err:
perror(bootxx);
exit(1);
}
/*
* Check for exec header and skip to code segment.
*/
if (!GetHeader(ifd, &loadAddr, &execAddr, &length)) {
fprintf(stderr, "Need impure text format (OMAGIC) file\n");
exit(1);
}
/*
* Write the boot information block.
*/
decBootInfo.magic = DEC_BOOT_MAGIC;
decBootInfo.mode = 0;
decBootInfo.loadAddr = loadAddr;
decBootInfo.execAddr = execAddr;
decBootInfo.map[0].numBlocks = nsectors =
(length + DEV_BSIZE - 1) >> DEV_BSHIFT;
decBootInfo.map[0].startBlock = 1;
decBootInfo.map[1].numBlocks = 0;
if (write(ofd1, (char *)&decBootInfo, sizeof(decBootInfo)) !=
sizeof(decBootInfo) || close(ofd1) != 0)
goto xxboot_err;
printf("load %x, start %x, len %d, nsectors %d\n", loadAddr, execAddr,
length, nsectors);
/*
* Write the boot code to the bootxx file.
*/
for (i = 0; i < nsectors && length > 0; i++) {
if (length < DEV_BSIZE) {
n = length;
bzero(block, DEV_BSIZE);
} else
n = DEV_BSIZE;
if (read(ifd, block, n) != n) {
perror(bootfname);
break;
}
length -= n;
if (write(ofd2, block, DEV_BSIZE) != DEV_BSIZE) {
perror(bootxx);
break;
}
}
if (length > 0)
printf("Warning: didn't reach end of boot program!\n");
exit(0);
}
usage()
{
printf("Usage: mkboot bootprog xxboot bootxx\n");
printf("where:\n");
printf("\t\"bootprog\" is a -N format file\n");
printf("\t\"xxboot\" is the file name for the first boot block\n");
printf("\t\"bootxx\" is the file name for the remaining boot blocks.\n");
exit(1);
}
/*
*----------------------------------------------------------------------
*
* GetHeader -
*
* Check if the header is an a.out file.
*
* Results:
* Return true if all went ok.
*
* Side effects:
* bootFID is left ready to read the text & data sections.
* length is set to the size of the text + data sections.
*
*----------------------------------------------------------------------
*/
GetHeader(bootFID, loadAddr, execAddr, length)
int bootFID; /* Handle on the boot program */
long *loadAddr; /* Address to start loading boot program. */
long *execAddr; /* Address to start executing boot program. */
long *length; /* Length of the boot program. */
{
struct exec aout;
int bytesRead;
if (lseek(bootFID, 0, 0) < 0) {
perror(bootfname);
return 0;
}
bytesRead = read(bootFID, (char *)&aout, sizeof(aout));
if (bytesRead != sizeof(aout)
|| (N_GETMAGIC(aout) != OMAGIC &&
(aout.a_midmag & 0xffff) != OMAGIC))
return 0;
*loadAddr = aout.a_entry;
*execAddr = aout.a_entry;
*length = aout.a_text + aout.a_data;
#if 0 /* N_TXTOFF(aout) on an OMAGIC file is where we are now. */
if (lseek(bootFID, N_TXTOFF(aout), 0) < 0) {
perror(bootfname);
return 0;
}
#endif
if (N_GETMAGIC (aout) == OMAGIC)
printf("Input file is in NetBSD a.out format.\n");
else
printf ("Input file is in 4.4BSD mips a.out format.\n");
return 1;
}