Initial revision
[etherboot.git] / contrib / 3c90xutil / bromutil.c
1 /* 
2  * readutil.c - perform various control ops on the 3c509b bios rom
3  *
4  */
5
6 #ifndef __i386__
7 #  error "This program can't compile or run on non-intel computers"
8 #else
9
10 #include <stdio.h>
11 #include <stdlib.h>
12 #include <unistd.h>
13
14 #ifdef __FreeBSD__
15
16 #include <fcntl.h>
17 #include <machine/cpufunc.h>
18
19 #define OUTB(data, port)        outb(port, data)
20 #define OUTW(data, port)        outw(port, data)
21 #define OUTL(data, port)        outl(port, data)
22
23 #else
24
25 #include <sys/io.h>
26
27 #define OUTB(data, port)        outb(data, port)
28 #define OUTW(data, port)        outw(data, port)
29 #define OUTL(data, port)        outl(data, port)
30
31 #endif
32
33 int main(int argc, char **argv)
34 {
35     unsigned int i, j, n;
36     unsigned int ioaddr;
37     unsigned long recvrstat;
38     unsigned char buf[128];
39     unsigned char b;
40
41     if (argc != 3) {
42       printf("Usage: romid ioaddr [erase|protect|unprotect|id|read >file|prog <file]\n");
43       exit(-1);
44     }
45
46 #ifdef __FreeBSD__
47     /* get permissions for in/out{blw} */
48     open("/dev/io",O_RDONLY,0);
49 #else
50     setuid(0); /* if we're setuid, do it really */
51     if (iopl(3)) {
52       perror("iopl()");
53       exit(1);
54     }
55 #endif
56
57     sscanf(argv[1],"%x",&ioaddr);
58     /* Set the register window to 3 for the 3c905b */
59     OUTW(0x803, ioaddr+0xe);
60     recvrstat = inl(ioaddr);    /* save the receiver status */
61     /* set the receiver type to MII so the full bios rom address space
62        can be accessed */
63     OUTL((recvrstat & 0xf00fffff)|0x00600000, ioaddr);
64
65     /* Set the register window to 0 for the 3c905b */
66     OUTW(0x800, ioaddr+0xe);
67
68     if (strcmp(argv[2], "erase") == 0) {
69       /* do the funky chicken to erase the rom contents */
70       OUTL(0x5555, ioaddr+0x4);
71       OUTB(0xaa, ioaddr+0x8);
72       OUTL(0x2aaa, ioaddr+0x4);
73       OUTB(0x55, ioaddr+0x8);
74       OUTL(0x5555, ioaddr+0x4);
75       OUTB(0x80, ioaddr+0x8);
76       OUTL(0x5555, ioaddr+0x4);
77       OUTB(0xaa, ioaddr+0x8);
78       OUTL(0x2aaa, ioaddr+0x4);
79       OUTB(0x55, ioaddr+0x8);
80       OUTL(0x5555, ioaddr+0x4);
81       OUTB(0x10, ioaddr+0x8);
82       printf("Bios ROM at %04x has been erased\n", ioaddr);
83     } else if (strcmp(argv[2], "protect") == 0) {
84       OUTL(0x5555, ioaddr+0x4);
85       OUTB(0xaa, ioaddr+0x8);
86       OUTL(0x2aaa, ioaddr+0x4);
87       OUTB(0x55, ioaddr+0x8);
88       OUTL(0x5555, ioaddr+0x4);
89       OUTB(0xa0, ioaddr+0x8);
90       printf("Software Data Protection for Bios ROM at %04x has been enabled\n",
91              ioaddr);
92     } else if (strcmp(argv[2], "unprotect") == 0) {
93       OUTL(0x5555, ioaddr+0x4);
94       OUTB(0xaa, ioaddr+0x8);
95       OUTL(0x2aaa, ioaddr+0x4);
96       OUTB(0x55, ioaddr+0x8);
97       OUTL(0x5555, ioaddr+0x4);
98       OUTB(0x80, ioaddr+0x8);
99       OUTL(0x5555, ioaddr+0x4);
100       OUTB(0xaa, ioaddr+0x8);
101       OUTL(0x2aaa, ioaddr+0x4);
102       OUTB(0x55, ioaddr+0x8);
103       OUTL(0x5555, ioaddr+0x4);
104       OUTB(0x20, ioaddr+0x8);
105       printf("Software Data Protection for Bios ROM at %04x has been disabled\n",
106              ioaddr);
107     } else if (strcmp(argv[2], "id") == 0) {
108       OUTL(0x5555, ioaddr+0x4);
109       OUTB(0xaa, ioaddr+0x8);
110       OUTL(0x2aaa, ioaddr+0x4);
111       OUTB(0x55, ioaddr+0x8);
112       OUTL(0x5555, ioaddr+0x4);
113       OUTB(0x90, ioaddr+0x8);
114       /* 10ms delay needed */
115       printf("Manufacturer ID - ");
116       /* manuf. id */
117       OUTL(0x0000, ioaddr+0x4);
118       printf("%02x\n", inb(ioaddr+0x8));
119       /* device id */
120       OUTL(0x0001, ioaddr+0x4);
121       printf("Device ID - %02x\n", inb(ioaddr+0x8));
122       /* undo the funky chicken */
123       OUTL(0x5555, ioaddr+0x4);
124       OUTB(0xaa, ioaddr+0x8);
125       OUTL(0x2aaa, ioaddr+0x4);
126       OUTB(0x55, ioaddr+0x8);
127       OUTL(0x5555, ioaddr+0x4);
128       OUTB(0xf0, ioaddr+0x8);
129     } else if (strcmp(argv[2], "read") == 0) {
130       for (i = 0; i < 65536; i++) {
131         OUTL(i, ioaddr+0x4);
132         b = inb(ioaddr+0x8);
133         write(1, &b, 1);
134       }
135     } else if (strcmp(argv[2], "prog") == 0) {
136       /* program the rom in 128 bute chunks */
137       for (i = 0, n = 0; i < 65536; i += n) {
138         n = read(0, buf, 128);
139         if (n == 0)
140           break;
141         if (n < 0) {
142           perror("File Error");
143           exit(-3);
144         }
145         /* disable SDP temporarily for programming a sector */
146         OUTL(0x5555, ioaddr+0x4);
147         OUTB(0xaa, ioaddr+0x8);
148         OUTL(0x2aaa, ioaddr+0x4);
149         OUTB(0x55, ioaddr+0x8);
150         OUTL(0x5555, ioaddr+0x4);
151         OUTB(0xa0, ioaddr+0x8);
152         for (j = 0; j < n; j++) {
153           OUTL(i+j, ioaddr+0x4);
154           OUTB(buf[j], ioaddr+0x8);
155         }
156         /* wait for the programming of this sector to coomplete */
157         while (inb(ioaddr+0x8) != buf[j-1])
158           ;
159       }
160     }
161
162     /* Set the register window to 3 for the 3c905b */
163     OUTW(0x803, ioaddr+0xe);
164     /* restore the receiver status */
165     OUTL(recvrstat, ioaddr);
166     return 0;
167 }
168
169 #endif /* __i386__ */