255 lines
7.3 KiB
C
255 lines
7.3 KiB
C
/*
|
|
* readutil.c - perform various control ops on the 3c509b bios rom
|
|
*
|
|
*/
|
|
|
|
#ifndef __i386__
|
|
# error "This program can't compile or run on non-intel computers"
|
|
#else
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <unistd.h>
|
|
#include <string.h>
|
|
|
|
#ifdef __FreeBSD__
|
|
|
|
#include <fcntl.h>
|
|
#include <machine/cpufunc.h>
|
|
|
|
#define OUTB(data, port) outb(port, data)
|
|
#define OUTW(data, port) outw(port, data)
|
|
#define OUTL(data, port) outl(port, data)
|
|
|
|
#else
|
|
|
|
#include <sys/io.h>
|
|
|
|
#define OUTB(data, port) outb(data, port)
|
|
#define OUTW(data, port) outw(data, port)
|
|
#define OUTL(data, port) outl(data, port)
|
|
|
|
#endif
|
|
|
|
/*
|
|
* write_eeprom() and enum definitions are copied from vortex-diag.c,
|
|
* Copyright 1997-2004 by Donald Becker.
|
|
* This software may be used and distributed according to the terms of
|
|
* the GNU General Public License (GPL), incorporated herein by reference.
|
|
* Contact the author for use under other terms.
|
|
*/
|
|
|
|
enum vortex_cmd {
|
|
TotalReset = 0<<11, SelectWindow = 1<<11, StartCoax = 2<<11,
|
|
RxDisable = 3<<11, RxEnable = 4<<11, RxReset = 5<<11,
|
|
UpStall = 6<<11, UpUnstall = (6<<11)+1,
|
|
DownStall = (6<<11)+2, DownUnstall = (6<<11)+3,
|
|
RxDiscard = 8<<11, TxEnable = 9<<11, TxDisable = 10<<11, TxReset = 11<<11,
|
|
FakeIntr = 12<<11, AckIntr = 13<<11, SetIntrEnb = 14<<11,
|
|
SetStatusEnb = 15<<11, SetRxFilter = 16<<11, SetRxThreshold = 17<<11,
|
|
SetTxThreshold = 18<<11, SetTxStart = 19<<11,
|
|
StartDMAUp = 20<<11, StartDMADown = (20<<11)+1, StatsEnable = 21<<11,
|
|
StatsDisable = 22<<11, StopCoax = 23<<11, SetFilterBit = 25<<11,
|
|
};
|
|
|
|
enum Window0 {
|
|
Wn0EepromCmd = 10, /* Window 0: EEPROM command register. */
|
|
Wn0EepromData = 12, /* Window 0: EEPROM results register. */
|
|
IntrStatus=0x0E, /* Valid in all windows. */
|
|
};
|
|
|
|
enum Win0_EEPROM_cmds {
|
|
EEPROM_Read = 2, EEPROM_WRITE = 1, EEPROM_ERASE = 3,
|
|
EEPROM_EWENB = 0xC, /* Enable erasing/writing for 10 msec. */
|
|
EEPROM_EWDIS = 0x0, /* Disable EWENB before 10 msec timeout. */
|
|
};
|
|
|
|
#define debug 1
|
|
static void write_eeprom(long ioaddr, int addrlen, int index, int value)
|
|
{
|
|
int timer;
|
|
|
|
/* Verify that the EEPROM is idle. */
|
|
for (timer = 1620; inw(ioaddr + Wn0EepromCmd) & 0x8000;)
|
|
if (--timer < 0)
|
|
goto error_return;
|
|
/* Enable writing: EEPROM_EWENB | 110000.... */
|
|
OUTW(3 << (addrlen-2), ioaddr + Wn0EepromCmd);
|
|
for (timer = 400; inw(ioaddr + Wn0EepromCmd) & 0x8000;) {
|
|
if (--timer < 0)
|
|
goto error_return;
|
|
}
|
|
if (debug)
|
|
fprintf(stderr, "EEPROM write enable took %d ticks!\n", 400 - timer);
|
|
OUTW((EEPROM_ERASE << addrlen) + index, ioaddr + Wn0EepromCmd);
|
|
for (timer = 16000; inw(ioaddr + Wn0EepromCmd) & 0x8000;)
|
|
if (--timer < 0) {
|
|
fprintf(stderr, "EEPROM failed to erase index %d!\n", index);
|
|
return;
|
|
}
|
|
if (debug)
|
|
fprintf(stderr, "EEPROM erased index %d after %d ticks!\n",
|
|
index, 16000-timer);
|
|
OUTW(3 << (addrlen-2), ioaddr + Wn0EepromCmd);
|
|
for (timer = 400; inw(ioaddr + Wn0EepromCmd) & 0x8000;) {
|
|
if (--timer < 0)
|
|
goto error_return;
|
|
}
|
|
if (debug)
|
|
fprintf(stderr, "EEPROM write enable took %d ticks!\n", 400-timer);
|
|
OUTW(value, ioaddr + Wn0EepromData);
|
|
OUTW((EEPROM_WRITE << addrlen) + index, ioaddr + Wn0EepromCmd);
|
|
for (timer = 16000; inw(ioaddr + Wn0EepromCmd) & 0x8000;)
|
|
if (--timer < 0)
|
|
goto error_return;
|
|
if (debug)
|
|
fprintf(stderr, "EEPROM wrote index %d with 0x%4.4x after %d ticks!\n",
|
|
index, value, 16000-timer);
|
|
return;
|
|
error_return:
|
|
fprintf(stderr, "Failed to write EEPROM location %d with 0x%4.4x!\n",
|
|
index, value);
|
|
}
|
|
|
|
int main(int argc, char **argv)
|
|
{
|
|
unsigned int i, j, n;
|
|
unsigned int ioaddr;
|
|
unsigned long recvrstat;
|
|
unsigned char buf[128];
|
|
unsigned char b;
|
|
|
|
if (argc != 3) {
|
|
printf
|
|
("Usage: romid ioaddr [erase|protect|unprotect|id|bootrom|read >file|prog <file]\n");
|
|
exit(-1);
|
|
}
|
|
#ifdef __FreeBSD__
|
|
/* get permissions for in/out{blw} */
|
|
open("/dev/io", O_RDONLY, 0);
|
|
#else
|
|
setuid(0); /* if we're setuid, do it really */
|
|
if (iopl(3)) {
|
|
perror("iopl()");
|
|
exit(1);
|
|
}
|
|
#endif
|
|
|
|
sscanf(argv[1], "%x", &ioaddr);
|
|
/* Set the register window to 3 for the 3c905b */
|
|
OUTW(0x803, ioaddr + 0xe);
|
|
recvrstat = inl(ioaddr); /* save the receiver status */
|
|
/* set the receiver type to MII so the full bios rom address space
|
|
can be accessed */
|
|
OUTL((recvrstat & 0xf00fffff) | 0x00600000, ioaddr);
|
|
|
|
/* Set the register window to 0 for the 3c905b */
|
|
OUTW(0x800, ioaddr + 0xe);
|
|
|
|
if (strcmp(argv[2], "erase") == 0) {
|
|
/* do the funky chicken to erase the rom contents */
|
|
OUTL(0x5555, ioaddr + 0x4);
|
|
OUTB(0xaa, ioaddr + 0x8);
|
|
OUTL(0x2aaa, ioaddr + 0x4);
|
|
OUTB(0x55, ioaddr + 0x8);
|
|
OUTL(0x5555, ioaddr + 0x4);
|
|
OUTB(0x80, ioaddr + 0x8);
|
|
OUTL(0x5555, ioaddr + 0x4);
|
|
OUTB(0xaa, ioaddr + 0x8);
|
|
OUTL(0x2aaa, ioaddr + 0x4);
|
|
OUTB(0x55, ioaddr + 0x8);
|
|
OUTL(0x5555, ioaddr + 0x4);
|
|
OUTB(0x10, ioaddr + 0x8);
|
|
printf("Bios ROM at %04x has been erased\n", ioaddr);
|
|
} else if (strcmp(argv[2], "protect") == 0) {
|
|
OUTL(0x5555, ioaddr + 0x4);
|
|
OUTB(0xaa, ioaddr + 0x8);
|
|
OUTL(0x2aaa, ioaddr + 0x4);
|
|
OUTB(0x55, ioaddr + 0x8);
|
|
OUTL(0x5555, ioaddr + 0x4);
|
|
OUTB(0xa0, ioaddr + 0x8);
|
|
printf
|
|
("Software Data Protection for Bios ROM at %04x has been enabled\n",
|
|
ioaddr);
|
|
} else if (strcmp(argv[2], "unprotect") == 0) {
|
|
OUTL(0x5555, ioaddr + 0x4);
|
|
OUTB(0xaa, ioaddr + 0x8);
|
|
OUTL(0x2aaa, ioaddr + 0x4);
|
|
OUTB(0x55, ioaddr + 0x8);
|
|
OUTL(0x5555, ioaddr + 0x4);
|
|
OUTB(0x80, ioaddr + 0x8);
|
|
OUTL(0x5555, ioaddr + 0x4);
|
|
OUTB(0xaa, ioaddr + 0x8);
|
|
OUTL(0x2aaa, ioaddr + 0x4);
|
|
OUTB(0x55, ioaddr + 0x8);
|
|
OUTL(0x5555, ioaddr + 0x4);
|
|
OUTB(0x20, ioaddr + 0x8);
|
|
printf
|
|
("Software Data Protection for Bios ROM at %04x has been disabled\n",
|
|
ioaddr);
|
|
} else if (strcmp(argv[2], "id") == 0) {
|
|
OUTL(0x5555, ioaddr + 0x4);
|
|
OUTB(0xaa, ioaddr + 0x8);
|
|
OUTL(0x2aaa, ioaddr + 0x4);
|
|
OUTB(0x55, ioaddr + 0x8);
|
|
OUTL(0x5555, ioaddr + 0x4);
|
|
OUTB(0x90, ioaddr + 0x8);
|
|
/* 10ms delay needed */
|
|
printf("Manufacturer ID - ");
|
|
/* manuf. id */
|
|
OUTL(0x0000, ioaddr + 0x4);
|
|
printf("%02x\n", inb(ioaddr + 0x8));
|
|
/* device id */
|
|
OUTL(0x0001, ioaddr + 0x4);
|
|
printf("Device ID - %02x\n", inb(ioaddr + 0x8));
|
|
/* undo the funky chicken */
|
|
OUTL(0x5555, ioaddr + 0x4);
|
|
OUTB(0xaa, ioaddr + 0x8);
|
|
OUTL(0x2aaa, ioaddr + 0x4);
|
|
OUTB(0x55, ioaddr + 0x8);
|
|
OUTL(0x5555, ioaddr + 0x4);
|
|
OUTB(0xf0, ioaddr + 0x8);
|
|
} else if(strcmp(argv[2], "bootrom") == 0) {
|
|
printf("bootrom fix\n");
|
|
write_eeprom(ioaddr, 6, 19, 0x160);
|
|
} else if (strcmp(argv[2], "read") == 0) {
|
|
for (i = 0; i < 65536; i++) {
|
|
OUTL(i, ioaddr + 0x4);
|
|
b = inb(ioaddr + 0x8);
|
|
write(1, &b, 1);
|
|
}
|
|
} else if (strcmp(argv[2], "prog") == 0) {
|
|
/* program the rom in 128 bute chunks */
|
|
for (i = 0, n = 0; i < 65536; i += n) {
|
|
n = read(0, buf, 128);
|
|
if (n == 0)
|
|
break;
|
|
if (n < 0) {
|
|
perror("File Error");
|
|
exit(-3);
|
|
}
|
|
/* disable SDP temporarily for programming a sector */
|
|
OUTL(0x5555, ioaddr + 0x4);
|
|
OUTB(0xaa, ioaddr + 0x8);
|
|
OUTL(0x2aaa, ioaddr + 0x4);
|
|
OUTB(0x55, ioaddr + 0x8);
|
|
OUTL(0x5555, ioaddr + 0x4);
|
|
OUTB(0xa0, ioaddr + 0x8);
|
|
for (j = 0; j < n; j++) {
|
|
OUTL(i + j, ioaddr + 0x4);
|
|
OUTB(buf[j], ioaddr + 0x8);
|
|
}
|
|
/* wait for the programming of this sector to coomplete */
|
|
while (inb(ioaddr + 0x8) != buf[j - 1]);
|
|
}
|
|
}
|
|
|
|
/* Set the register window to 3 for the 3c905b */
|
|
OUTW(0x803, ioaddr + 0xe);
|
|
/* restore the receiver status */
|
|
OUTL(recvrstat, ioaddr);
|
|
return 0;
|
|
}
|
|
|
|
#endif /* __i386__ */
|