BSD 4_3_Net_2 release
[unix-history] / usr / src / sbin / enpload / enpload.c
/*
* Copyright (c) 1988 The Regents of the University of California.
* All rights reserved.
*
* This code is derived from software contributed to Berkeley by
* Computer Consoles Inc.
*
* 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.
*/
#ifndef lint
char copyright[] =
"@(#) Copyright (c) 1988 The Regents of the University of California.\n\
All rights reserved.\n";
#endif /* not lint */
#ifndef lint
static char sccsid[] = "@(#)enpload.c 5.4 (Berkeley) 1/14/91";
#endif /* not lint */
/*
* CMC Ethernet ``Microcode'' Loader.
*/
#include <sys/types.h>
#include <sys/file.h>
#include <sys/ioctl.h>
#include <tahoe/if/if_enpreg.h>
#include <stdio.h>
#include <a.out.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");
}