Ronald G. Minnich | f4cf2ba | 2002-01-29 18:26:26 +0000 | [diff] [blame] | 1 | /* |
| 2 | * flash_rom.c: Flash programming utility for SiS 630/950 M/Bs |
| 3 | * |
| 4 | * |
| 5 | * Copyright 2000 Silicon Integrated System Corporation |
| 6 | * |
| 7 | * This program is free software; you can redistribute it and/or modify |
| 8 | * it under the terms of the GNU General Public License as published by |
| 9 | * the Free Software Foundation; either version 2 of the License, or |
| 10 | * (at your option) any later version. |
| 11 | * |
| 12 | * This program is distributed in the hope that it will be useful, |
| 13 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
| 14 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| 15 | * GNU General Public License for more details. |
| 16 | * |
| 17 | * You should have received a copy of the GNU General Public License |
| 18 | * along with this program; if not, write to the Free Software |
| 19 | * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. |
| 20 | * |
| 21 | * |
| 22 | * Reference: |
| 23 | * 1. SiS 630 Specification |
| 24 | * 2. SiS 950 Specification |
| 25 | * |
| 26 | * $Id$ |
| 27 | */ |
| 28 | |
| 29 | #include <errno.h> |
| 30 | #include <fcntl.h> |
| 31 | #include <sys/mman.h> |
| 32 | #include <sys/io.h> |
| 33 | #include <unistd.h> |
| 34 | #include <stdio.h> |
Ronald G. Minnich | c73ad98 | 2003-02-11 21:06:09 +0000 | [diff] [blame] | 35 | #include <pci/pci.h> |
Ronald G. Minnich | f4cf2ba | 2002-01-29 18:26:26 +0000 | [diff] [blame] | 36 | |
| 37 | #include "flash.h" |
| 38 | #include "jedec.h" |
Ronald G. Minnich | 3c910ed | 2002-05-28 23:29:17 +0000 | [diff] [blame] | 39 | #include "m29f400bt.h" |
Ronald G. Minnich | 5643942 | 2002-09-06 16:58:14 +0000 | [diff] [blame] | 40 | #include "82802ab.h" |
Ronald G. Minnich | f4cf2ba | 2002-01-29 18:26:26 +0000 | [diff] [blame] | 41 | |
| 42 | struct flashchip flashchips[] = { |
| 43 | {"Am29F040B", AMD_ID, AM_29F040B, NULL, 512, 64*1024, |
| 44 | probe_29f040b, erase_29f040b, write_29f040b}, |
| 45 | {"At29C040A", ATMEL_ID, AT_29C040A, NULL, 512, 256, |
| 46 | probe_jedec, erase_jedec, write_jedec}, |
| 47 | {"Mx29f002", MX_ID, MX_29F002, NULL, 256, 64*1024, |
| 48 | probe_29f002, erase_29f002, write_29f002}, |
| 49 | {"SST29EE020A", SST_ID, SST_29EE020A, NULL, 256, 128, |
| 50 | probe_jedec, erase_jedec, write_jedec}, |
| 51 | {"SST28SF040A", SST_ID, SST_28SF040, NULL, 512, 256, |
| 52 | probe_28sf040, erase_28sf040, write_28sf040}, |
Ronald G. Minnich | c831647 | 2002-03-21 22:40:40 +0000 | [diff] [blame] | 53 | {"SST39SF020A", SST_ID, SST_39SF020, NULL, 256, 4096, |
Ronald G. Minnich | 213ee71 | 2002-04-10 16:01:38 +0000 | [diff] [blame] | 54 | probe_39sf020, erase_39sf020, write_39sf020}, |
Ollie Lho | 6041bcd | 2002-07-18 03:32:00 +0000 | [diff] [blame] | 55 | {"SST39VF020", SST_ID, SST_39VF020, NULL, 256, 4096, |
| 56 | probe_39sf020, erase_39sf020, write_39sf020}, |
Andrew Ip | 973b26d | 2002-12-30 13:10:06 +0000 | [diff] [blame] | 57 | {"W29C011", WINBOND_ID, W_29C011, NULL, 128, 128, |
| 58 | probe_jedec, erase_jedec, write_jedec}, |
Ronald G. Minnich | f4cf2ba | 2002-01-29 18:26:26 +0000 | [diff] [blame] | 59 | {"W29C020C", WINBOND_ID, W_29C020C, NULL, 256, 128, |
| 60 | probe_jedec, erase_jedec, write_jedec}, |
Andrew Ip | f0126ce | 2002-10-16 06:58:05 +0000 | [diff] [blame] | 61 | {"W49F002U", WINBOND_ID, W_49F002U, NULL, 256, 128, |
| 62 | probe_49f002, erase_49f002, write_49f002}, |
Ronald G. Minnich | 3c910ed | 2002-05-28 23:29:17 +0000 | [diff] [blame] | 63 | {"M29F400BT", ST_ID, ST_M29F400BT , NULL, 512, 64*1024, |
| 64 | probe_m29f400bt, erase_m29f400bt, write_linuxbios_m29f400bt}, |
Ronald G. Minnich | 5643942 | 2002-09-06 16:58:14 +0000 | [diff] [blame] | 65 | {"82802ab", 137, 173 , NULL, 512, 64*1024, |
| 66 | probe_82802ab, erase_82802ab, write_82802ab}, |
Ronald G. Minnich | bb0322f | 2003-01-13 23:43:36 +0000 | [diff] [blame] | 67 | {"82802ac", 137, 172 , NULL, 1024, 64*1024, |
| 68 | probe_82802ab, erase_82802ab, write_82802ab}, |
Ronald G. Minnich | f4cf2ba | 2002-01-29 18:26:26 +0000 | [diff] [blame] | 69 | {NULL,} |
| 70 | }; |
| 71 | |
Ronald G. Minnich | c73ad98 | 2003-02-11 21:06:09 +0000 | [diff] [blame] | 72 | int enable_flash_sis630 (struct pci_dev *dev, char *name) |
Ronald G. Minnich | f4cf2ba | 2002-01-29 18:26:26 +0000 | [diff] [blame] | 73 | { |
| 74 | char b; |
| 75 | |
| 76 | /* get io privilege access PCI configuration space */ |
| 77 | if (iopl(3) != 0) { |
| 78 | perror("Can not set io priviliage"); |
| 79 | exit(1); |
| 80 | } |
| 81 | |
| 82 | /* Enable 0xFFF8000~0xFFFF0000 decoding on SiS 540/630 */ |
| 83 | outl(0x80000840, 0x0cf8); |
| 84 | b = inb(0x0cfc) | 0x0b; |
| 85 | outb(b, 0xcfc); |
| 86 | /* Flash write enable on SiS 540/630 */ |
| 87 | outl(0x80000845, 0x0cf8); |
| 88 | b = inb(0x0cfd) | 0x40; |
| 89 | outb(b, 0xcfd); |
| 90 | |
| 91 | /* The same thing on SiS 950 SuperIO side */ |
| 92 | outb(0x87, 0x2e); |
| 93 | outb(0x01, 0x2e); |
| 94 | outb(0x55, 0x2e); |
| 95 | outb(0x55, 0x2e); |
| 96 | |
| 97 | if (inb(0x2f) != 0x87) { |
| 98 | outb(0x87, 0x4e); |
| 99 | outb(0x01, 0x4e); |
| 100 | outb(0x55, 0x4e); |
| 101 | outb(0xaa, 0x4e); |
| 102 | if (inb(0x4f) != 0x87) { |
| 103 | printf("Can not access SiS 950\n"); |
| 104 | return -1; |
| 105 | } |
| 106 | outb(0x24, 0x4e); |
| 107 | b = inb(0x4f) | 0xfc; |
| 108 | outb(0x24, 0x4e); |
| 109 | outb(b, 0x4f); |
| 110 | outb(0x02, 0x4e); |
| 111 | outb(0x02, 0x4f); |
| 112 | } |
| 113 | |
| 114 | outb(0x24, 0x2e); |
| 115 | printf("2f is %#x\n", inb(0x2f)); |
| 116 | b = inb(0x2f) | 0xfc; |
| 117 | outb(0x24, 0x2e); |
| 118 | outb(b, 0x2f); |
| 119 | |
| 120 | outb(0x02, 0x2e); |
| 121 | outb(0x02, 0x2f); |
| 122 | |
| 123 | return 0; |
| 124 | } |
| 125 | |
Ronald G. Minnich | c73ad98 | 2003-02-11 21:06:09 +0000 | [diff] [blame] | 126 | int |
| 127 | enable_flash_e7500(struct pci_dev *dev, char *name) { |
| 128 | /* register 4e.b gets or'ed with one */ |
| 129 | unsigned char old, new; |
| 130 | int ok; |
| 131 | /* if it fails, it fails. There are so many variations of broken mobos |
| 132 | * that it is hard to argue that we should quit at this point. |
| 133 | */ |
| 134 | |
| 135 | old = pci_read_byte(dev, 0x4e); |
| 136 | |
| 137 | new = old | 1; |
| 138 | |
| 139 | ok = pci_write_byte(dev, 0x4e, new); |
| 140 | |
| 141 | if (ok != new) { |
| 142 | printf("tried to set 0x%x to 0x%x on %s failed (WARNING ONLY)\n", |
| 143 | old, new, name); |
| 144 | return -1; |
| 145 | } |
| 146 | return 0; |
| 147 | } |
| 148 | |
Ronald G. Minnich | f4cf2ba | 2002-01-29 18:26:26 +0000 | [diff] [blame] | 149 | struct flashchip * probe_flash(struct flashchip * flash) |
| 150 | { |
| 151 | int fd_mem; |
Ronald G. Minnich | ef5779d | 2002-01-29 20:18:02 +0000 | [diff] [blame] | 152 | volatile char * bios; |
Ronald G. Minnich | f4cf2ba | 2002-01-29 18:26:26 +0000 | [diff] [blame] | 153 | unsigned long size; |
| 154 | |
| 155 | if ((fd_mem = open("/dev/mem", O_RDWR)) < 0) { |
| 156 | perror("Can not open /dev/mem"); |
| 157 | exit(1); |
| 158 | } |
| 159 | |
| 160 | while (flash->name != NULL) { |
Ronald G. Minnich | ef5779d | 2002-01-29 20:18:02 +0000 | [diff] [blame] | 161 | printf("Trying %s, %d KB\n", flash->name, flash->total_size); |
Ronald G. Minnich | f4cf2ba | 2002-01-29 18:26:26 +0000 | [diff] [blame] | 162 | size = flash->total_size * 1024; |
| 163 | bios = mmap (0, size, PROT_WRITE | PROT_READ, MAP_SHARED, |
| 164 | fd_mem, (off_t) (0 - size)); |
| 165 | if (bios == MAP_FAILED) { |
| 166 | perror("Error MMAP /dev/mem"); |
| 167 | exit(1); |
| 168 | } |
| 169 | flash->virt_addr = bios; |
Ronald G. Minnich | 5643942 | 2002-09-06 16:58:14 +0000 | [diff] [blame] | 170 | flash->fd_mem = fd_mem; |
Ronald G. Minnich | f4cf2ba | 2002-01-29 18:26:26 +0000 | [diff] [blame] | 171 | |
| 172 | if (flash->probe(flash) == 1) { |
| 173 | printf ("%s found at physical address: 0x%lx\n", |
| 174 | flash->name, (0 - size), bios); |
| 175 | return flash; |
| 176 | } |
Ronald G. Minnich | ef5779d | 2002-01-29 20:18:02 +0000 | [diff] [blame] | 177 | munmap ((void *) bios, size); |
Ronald G. Minnich | f4cf2ba | 2002-01-29 18:26:26 +0000 | [diff] [blame] | 178 | flash++; |
| 179 | } |
| 180 | return NULL; |
| 181 | } |
| 182 | |
| 183 | int verify_flash (struct flashchip * flash, char * buf) |
| 184 | { |
| 185 | int i = 0; |
| 186 | int total_size = flash->total_size *1024; |
Ronald G. Minnich | ef5779d | 2002-01-29 20:18:02 +0000 | [diff] [blame] | 187 | volatile char * bios = flash->virt_addr; |
Ronald G. Minnich | f4cf2ba | 2002-01-29 18:26:26 +0000 | [diff] [blame] | 188 | |
| 189 | printf("Verifying address: "); |
| 190 | while (i++ < total_size) { |
| 191 | printf("0x%08x", i); |
| 192 | if (*(bios+i) != *(buf+i)) { |
| 193 | return 0; |
| 194 | } |
| 195 | printf("\b\b\b\b\b\b\b\b\b\b"); |
| 196 | } |
| 197 | printf("\n"); |
| 198 | return 1; |
| 199 | } |
| 200 | |
Ronald G. Minnich | ef5779d | 2002-01-29 20:18:02 +0000 | [diff] [blame] | 201 | // count to a billion. Time it. If it's < 1 sec, count to 10B, etc. |
| 202 | |
| 203 | unsigned long micro = 0; |
| 204 | |
| 205 | void |
| 206 | myusec_calibrate_delay() |
| 207 | { |
Ronald G. Minnich | 4d32e78 | 2003-02-12 18:11:42 +0000 | [diff] [blame^] | 208 | unsigned long count = 10 * 1024 * 1024; |
Ronald G. Minnich | ef5779d | 2002-01-29 20:18:02 +0000 | [diff] [blame] | 209 | volatile unsigned long i; |
| 210 | unsigned long timeusec; |
| 211 | struct timeval start, end; |
| 212 | int ok = 0; |
| 213 | |
| 214 | fprintf(stderr, "Setting up microsecond timing loop\n"); |
| 215 | while (! ok) { |
Ronald G. Minnich | 4572a82 | 2003-02-11 16:09:12 +0000 | [diff] [blame] | 216 | //fprintf(stderr, "Try %d\n", count); |
Ronald G. Minnich | ef5779d | 2002-01-29 20:18:02 +0000 | [diff] [blame] | 217 | gettimeofday(&start, 0); |
| 218 | for( i = count; i; i--) |
| 219 | ; |
| 220 | gettimeofday(&end, 0); |
| 221 | timeusec = 1000000 * (end.tv_sec - start.tv_sec ) + |
| 222 | (end.tv_usec - start.tv_usec); |
| 223 | fprintf(stderr, "timeusec is %d\n", timeusec); |
Ronald G. Minnich | 4d32e78 | 2003-02-12 18:11:42 +0000 | [diff] [blame^] | 224 | count *= 100; |
Ronald G. Minnich | ef5779d | 2002-01-29 20:18:02 +0000 | [diff] [blame] | 225 | if (timeusec < 1000000) |
| 226 | continue; |
| 227 | ok = 1; |
| 228 | } |
| 229 | |
| 230 | // compute one microsecond. That will be count / time |
| 231 | micro = count / timeusec; |
| 232 | |
Ronald G. Minnich | 4572a82 | 2003-02-11 16:09:12 +0000 | [diff] [blame] | 233 | //fprintf(stderr, "one us is %d count\n", micro); |
Ronald G. Minnich | ef5779d | 2002-01-29 20:18:02 +0000 | [diff] [blame] | 234 | |
| 235 | |
| 236 | } |
| 237 | |
| 238 | void |
| 239 | myusec_delay(time) |
| 240 | { |
| 241 | volatile unsigned long i; |
| 242 | for(i = 0; i < time * micro; i++) |
| 243 | ; |
| 244 | |
| 245 | } |
| 246 | |
Ronald G. Minnich | c73ad98 | 2003-02-11 21:06:09 +0000 | [diff] [blame] | 247 | typedef struct penable { |
| 248 | unsigned short vendor, device; |
| 249 | char *name; |
| 250 | int (*doit)(struct pci_dev *dev, char *name); |
| 251 | } FLASH_ENABLE; |
| 252 | |
| 253 | FLASH_ENABLE enables[] = { |
| 254 | |
| 255 | {0x1, 0x1, "sis630 -- what's the ID?", enable_flash_sis630}, |
| 256 | {0x8086, 0x2480, "E7500", enable_flash_e7500}, |
| 257 | }; |
| 258 | |
| 259 | int |
| 260 | enable_flash_write() { |
| 261 | int i; |
| 262 | struct pci_access *pacc; |
| 263 | struct pci_dev *dev = 0; |
| 264 | unsigned int c; |
| 265 | FLASH_ENABLE *enable = 0; |
| 266 | |
| 267 | pacc = pci_alloc(); /* Get the pci_access structure */ |
| 268 | /* Set all options you want -- here we stick with the defaults */ |
| 269 | pci_init(pacc); /* Initialize the PCI library */ |
| 270 | pci_scan_bus(pacc); /* We want to get the list of devices */ |
| 271 | |
| 272 | /* now let's try to find the chipset we have ... */ |
| 273 | for(i = 0; i < sizeof(enables)/sizeof(enables[0]) && (! dev); i++) { |
| 274 | struct pci_filter f; |
| 275 | struct pci_dev *z; |
| 276 | /* the first param is unused. */ |
| 277 | pci_filter_init((struct pci_access *) 0, &f); |
| 278 | f.vendor = enables[i].vendor; |
| 279 | f.device = enables[i].device; |
| 280 | for(z=pacc->devices; z; z=z->next) |
| 281 | if (pci_filter_match(&f, z)) { |
| 282 | enable = &enables[i]; |
| 283 | dev = z; |
| 284 | } |
| 285 | } |
| 286 | |
| 287 | /* now do the deed. */ |
| 288 | enable->doit(dev, enable->name); |
| 289 | return 0; |
| 290 | } |
| 291 | |
| 292 | int |
Ronald G. Minnich | f4cf2ba | 2002-01-29 18:26:26 +0000 | [diff] [blame] | 293 | main (int argc, char * argv[]) |
| 294 | { |
| 295 | char * buf; |
| 296 | unsigned long size; |
| 297 | FILE * image; |
| 298 | struct flashchip * flash; |
| 299 | |
| 300 | if (argc > 2){ |
| 301 | printf("usage: %s [romimage]\n", argv[0]); |
| 302 | printf(" If no romimage is specified, then all that happens\n"); |
Ronald G. Minnich | ef5779d | 2002-01-29 20:18:02 +0000 | [diff] [blame] | 303 | printf(" is that flash info is dumped\n"); |
Ronald G. Minnich | f4cf2ba | 2002-01-29 18:26:26 +0000 | [diff] [blame] | 304 | } |
| 305 | |
Ronald G. Minnich | c73ad98 | 2003-02-11 21:06:09 +0000 | [diff] [blame] | 306 | /* try to enable it. Failure IS an option, since not all motherboards |
| 307 | * really need this to be done, etc., etc. It sucks. |
| 308 | */ |
| 309 | (void) enable_flash_write(); |
| 310 | |
Ronald G. Minnich | f4cf2ba | 2002-01-29 18:26:26 +0000 | [diff] [blame] | 311 | if ((flash = probe_flash (flashchips)) == NULL) { |
| 312 | printf("EEPROM not found\n"); |
| 313 | exit(1); |
| 314 | } |
| 315 | |
Ronald G. Minnich | ef5779d | 2002-01-29 20:18:02 +0000 | [diff] [blame] | 316 | printf("Part is %s\n", flash->name); |
Ronald G. Minnich | f4cf2ba | 2002-01-29 18:26:26 +0000 | [diff] [blame] | 317 | if (argc < 2){ |
| 318 | printf("OK, only ENABLING flash write, but NOT FLASHING\n"); |
Ronald G. Minnich | c73ad98 | 2003-02-11 21:06:09 +0000 | [diff] [blame] | 319 | return 0; |
Ronald G. Minnich | f4cf2ba | 2002-01-29 18:26:26 +0000 | [diff] [blame] | 320 | } |
| 321 | size = flash->total_size * 1024; |
| 322 | |
| 323 | if ((image = fopen (argv[1], "r")) == NULL) { |
| 324 | perror("Error opening image file"); |
| 325 | exit(1); |
| 326 | } |
| 327 | |
| 328 | buf = (char *) calloc (size, sizeof(char)); |
| 329 | fread (buf, sizeof(char), size, image); |
| 330 | |
Ronald G. Minnich | 4572a82 | 2003-02-11 16:09:12 +0000 | [diff] [blame] | 331 | printf("Calibrating timer since microsleep sucks ... takes a second\n"); |
| 332 | myusec_calibrate_delay(); |
| 333 | printf("OK, calibrated, now do the deed\n"); |
| 334 | |
Ronald G. Minnich | f4cf2ba | 2002-01-29 18:26:26 +0000 | [diff] [blame] | 335 | flash->write (flash, buf); |
| 336 | verify_flash (flash, buf); |
Ronald G. Minnich | 4572a82 | 2003-02-11 16:09:12 +0000 | [diff] [blame] | 337 | return 0; |
Ronald G. Minnich | f4cf2ba | 2002-01-29 18:26:26 +0000 | [diff] [blame] | 338 | } |