initial import of NetBSD tree

1 files changed, 214 insertions, 0 deletions

diff --git a/sys/arch/pmax/stand/mkboot.c b/sys/arch/pmax/stand/mkboot.c
new file mode 100644
index 00000000000..ee5b71675c3
--- /dev/null
+++ b/sys/arch/pmax/stand/mkboot.c
@@ -0,0 +1,214 @@
+/*	$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;
+}