From 3446b6771c60182ea7d95b87423de72a73a3919c Mon Sep 17 00:00:00 2001
From: Sam Leffler <sam@ucbvax.Berkeley.EDU>
Date: Thu, 30 Apr 1987 03:37:26 -0800
Subject: [PATCH] date and time created 87/04/29 20:37:26 by sam

SCCS-vsn: old/enpload/enpload.c 5.1
---
 usr/src/old/enpload/enpload.c | 120 ++++++++++++++++++++++++++++++++++
 1 file changed, 120 insertions(+)
 create mode 100644 usr/src/old/enpload/enpload.c

diff --git a/usr/src/old/enpload/enpload.c b/usr/src/old/enpload/enpload.c
new file mode 100644
index 0000000000..12f891d1c2
--- /dev/null
+++ b/usr/src/old/enpload/enpload.c
@@ -0,0 +1,120 @@
+#ifndef lint
+static char sccsid[] = "@(#)enpload.c	5.1 (Berkeley from CCI) %G%";
+#endif
+
+/*
+ * CMC Ethernet ``Microcode'' Loader.
+ */
+#include <stdio.h>
+#include <a.out.h>
+
+#include <sys/types.h>
+#include <sys/file.h>
+#include <sys/ioctl.h>
+#include <tahoeif/if_enpreg.h>
+
+char	*dev;
+
+main(argc, argv)
+	int argc;
+	char *argv[];
+{
+	int enp = -1, fd, first = 1, nostart = 0;
+
+	argc--, argv++;
+	if (argc > 0) {
+		enp = open(dev = argv[0], O_RDWR);
+		if (enp < 0) {
+			fprintf(stderr, "enpload: ");
+			perror(dev);
+			exit(-1);
+		}
+		argc--, argv++;
+	}
+	for (; argc > 0; argc--, argv++) {
+		if (strcmp(argv[0], "-s") == 0 || strcmp(argv[0], "-S") == 0) {
+			nostart++;
+			continue;
+		}
+		if (first) {
+			/*
+			 * Reset device before first file is loaded.
+			 */
+			if (ioctl(enp, ENPIORESET) < 0) {
+				fprintf(stderr, "enpload: %s: ", dev);
+				perror("ioctl (ENPIORESET)");
+				exit(-1);
+			}
+			first = !first;
+		}
+		if ((fd = open(argv[0], O_RDONLY)) < 0) {
+			fprintf(stderr, "enpload: "), perror(argv[0]);
+			exit(1);
+		}
+		enpload(enp, fd, argv[0]);
+		close(fd);
+	}
+	if (enp != -1 && !nostart && ioctl(enp, ENPIOGO) < 0) {
+		fprintf(stderr, "enpload: ");
+		perror("ioctl (ENPIOGO)");
+		exit(-1);
+	}
+	exit(0);
+}
+
+#define	RELO		0x03FFFF	/* relocation offset */
+#define	ENPMSTART	0x0		/* start of memory */
+#define	BSIZE		512		/* buffer size */
+char	buff[BSIZE];
+char	zbuf[BSIZE];
+
+enpload(enp, fd, filename)
+	int enp, fd;
+	char *filename;
+{
+	int cnt, size, lstart;
+	struct exec hdr;
+
+	if (read(fd, &hdr, sizeof (hdr)) != sizeof (hdr)) {
+		fprintf(stderr, "enpload: %s: Read short (header).\n",
+		   filename);
+		exit(1);
+	}
+	if (N_BADMAG(hdr)) {
+		fprintf(stderr, "enpload: %s: Bad magic number.\n", filename);
+		exit(1);
+	}
+	size = hdr.a_text + hdr.a_data;
+	lstart = (ENPMSTART + (hdr.a_entry & RELO)) - 0x1000;
+
+	printf("%s: Loading %s...", dev, filename);
+	(void) lseek(enp, lstart + size, L_SET);
+	while (hdr.a_bss >= BSIZE) {
+		if (write(enp, zbuf, BSIZE) != BSIZE) {
+			fprintf(stderr, "enpload: Bss write error.\n");
+			exit(-1);
+		}
+		hdr.a_bss -= BSIZE;
+	}
+	if (hdr.a_bss > 0 && write(enp, zbuf, hdr.a_bss) != hdr.a_bss) {
+		fprintf(stderr, "enpload: Bss write error.\n");
+		exit(-1);
+	}
+	(void) lseek(enp, lstart, L_SET);
+	while (size > BSIZE) {
+		cnt = read(fd, buff, BSIZE);
+		size -= cnt;
+		if (write(enp, buff, cnt) != cnt) {
+			fprintf(stderr, "enpload: Write error.\n");
+			exit(-1);
+		}
+	}
+	if (size > 0) {
+		cnt = read(fd, buff, size);
+		if (write(enp, buff, cnt) != cnt) {
+			fprintf(stderr, "enpload: Write error.\n");
+			exit(-1);
+		}
+	}
+	printf("done.\n");
+}
-- 
2.20.1