util/flashrom/chipset_enable.c

   1 /*
   2  *   flash rom utility: enable flash writes
   3  *
   4  *   Copyright (C) 2000 Silicon Integrated System Corporation
   5  *   Copyright (C) 2005-2007 coresystems GmbH <stepan@coresystems.de>
   6  *   Copyright (C) 2006 Uwe Hermann <uwe@hermann-uwe.de>
   7  *
   8  *   This program is free software; you can redistribute it and/or
   9  *   modify it under the terms of the GNU General Public License
  10  *   version 2
  11  *
  12  */
  13
  14 #include <stdio.h>
  15 #include <pci/pci.h>
  16 #include <stdlib.h>
  17
  18 #include "flash.h"
  19 #include "debug.h"
  20
  21 static int enable_flash_ali_m1533(struct pci_dev *dev, char *name)
  22 {
  23         uint8_t tmp;
  24
  25         /* ROM Write enable, 0xFFFC0000-0xFFFDFFFF and
  26            0xFFFE0000-0xFFFFFFFF ROM select enable. */
  27         tmp = pci_read_byte(dev, 0x47);
  28         tmp |= 0x46;
  29         pci_write_byte(dev, 0x47, tmp);
  30
  31         return 0;
  32 }
  33
  34 static int enable_flash_sis630(struct pci_dev *dev, char *name)
  35 {
  36         char b;
  37
  38         /* Enable 0xFFF8000~0xFFFF0000 decoding on SiS 540/630 */
  39         outl(0x80000840, 0x0cf8);
  40         b = inb(0x0cfc) | 0x0b;
  41         outb(b, 0xcfc);
  42         /* Flash write enable on SiS 540/630 */
  43         outl(0x80000845, 0x0cf8);
  44         b = inb(0x0cfd) | 0x40;
  45         outb(b, 0xcfd);
  46
  47         /* The same thing on SiS 950 SuperIO side */
  48         outb(0x87, 0x2e);
  49         outb(0x01, 0x2e);
  50         outb(0x55, 0x2e);
  51         outb(0x55, 0x2e);
  52
  53         if (inb(0x2f) != 0x87) {
  54                 outb(0x87, 0x4e);
  55                 outb(0x01, 0x4e);
  56                 outb(0x55, 0x4e);
  57                 outb(0xaa, 0x4e);
  58                 if (inb(0x4f) != 0x87) {
  59                         printf("Can not access SiS 950\n");
  60                         return -1;
  61                 }
  62                 outb(0x24, 0x4e);
  63                 b = inb(0x4f) | 0xfc;
  64                 outb(0x24, 0x4e);
  65                 outb(b, 0x4f);
  66                 outb(0x02, 0x4e);
  67                 outb(0x02, 0x4f);
  68         }
  69
  70         outb(0x24, 0x2e);
  71         printf("2f is %#x\n", inb(0x2f));
  72         b = inb(0x2f) | 0xfc;
  73         outb(0x24, 0x2e);
  74         outb(b, 0x2f);
  75
  76         outb(0x02, 0x2e);
  77         outb(0x02, 0x2f);
  78
  79         return 0;
  80 }
  81
  82 /* Datasheet:
  83  *   - Name: 82371AB PCI-TO-ISA / IDE XCELERATOR (PIIX4)
  84  *   - URL: http://www.intel.com/design/intarch/datashts/290562.htm
  85  *   - PDF: http://www.intel.com/design/intarch/datashts/29056201.pdf
  86  *   - Order Number: 290562-001
  87  */
  88 static int enable_flash_piix4(struct pci_dev *dev, char *name)
  89 {
  90         uint16_t old, new;
  91         uint16_t xbcs = 0x4e;   /* X-Bus Chip Select register. */
  92
  93         old = pci_read_word(dev, xbcs);
  94
  95         /* Set bit 9: 1-Meg Extended BIOS Enable (PCI master accesses to
  96          *            FFF00000-FFF7FFFF are forwarded to ISA).
  97          * Set bit 7: Extended BIOS Enable (PCI master accesses to
  98          *            FFF80000-FFFDFFFF are forwarded to ISA).
  99          * Set bit 6: Lower BIOS Enable (PCI master, or ISA master accesses to
 100          *            the lower 64-Kbyte BIOS block (E0000-EFFFF) at the top
 101          *            of 1 Mbyte, or the aliases at the top of 4 Gbyte
 102          *            (FFFE0000-FFFEFFFF) result in the generation of BIOSCS#.
 103          * Note: Accesses to FFFF0000-FFFFFFFF are always forwarded to ISA.
 104          * Set bit 2: BIOSCS# Write Enable (1=enable, 0=disable).
 105          */
 106         new = old | 0x2c4;
 107
 108         if (new == old)
 109                 return 0;
 110
 111         pci_write_word(dev, xbcs, new);
 112
 113         if (pci_read_word(dev, xbcs) != new) {
 114                 printf("tried to set 0x%x to 0x%x on %s failed (WARNING ONLY)\n", xbcs, new, name);
 115                 return -1;
 116         }
 117         return 0;
 118 }
 119
 120 static int enable_flash_ich(struct pci_dev *dev, char *name, int bios_cntl)
 121 {
 122         /* register 4e.b gets or'ed with one */
 123         uint8_t old, new;
 124
 125         /* if it fails, it fails. There are so many variations of broken mobos
 126          * that it is hard to argue that we should quit at this point.
 127          */
 128
 129         /* Note: the ICH0-ICH5 BIOS_CNTL register is actually 16 bit wide, but
 130          * just treating it as 8 bit wide seems to work fine in practice.
 131          */
 132
 133         /* see ie. page 375 of "Intel ICH7 External Design Specification"
 134          * http://download.intel.com/design/chipsets/datashts/30701302.pdf
 135          */
 136
 137         old = pci_read_byte(dev, bios_cntl);
 138
 139         new = old | 1;
 140
 141         if (new == old)
 142                 return 0;
 143
 144         pci_write_byte(dev, bios_cntl, new);
 145
 146         if (pci_read_byte(dev, bios_cntl) != new) {
 147                 printf("tried to set 0x%x to 0x%x on %s failed (WARNING ONLY)\n", bios_cntl, new, name);
 148                 return -1;
 149         }
 150         return 0;
 151 }
 152
 153 static int enable_flash_ich_4e(struct pci_dev *dev, char *name)
 154 {
 155         return enable_flash_ich(dev, name, 0x4e);
 156 }
 157
 158 static int enable_flash_ich_dc(struct pci_dev *dev, char *name)
 159 {
 160         return enable_flash_ich(dev, name, 0xdc);
 161 }
 162
 163 /*
 164  *
 165  */
 166 static int enable_flash_vt823x(struct pci_dev *dev, char *name)
 167 {
 168         uint8_t val;
 169
 170         /* ROM Write enable */
 171         val = pci_read_byte(dev, 0x40);
 172         val |= 0x10;
 173         pci_write_byte(dev, 0x40, val);
 174
 175         if (pci_read_byte(dev, 0x40) != val) {
 176                 printf("\nWARNING: Failed to enable ROM Write on \"%s\"\n",
 177                        name);
 178                 return -1;
 179         }
 180
 181         return 0;
 182 }
 183
 184 static int enable_flash_cs5530(struct pci_dev *dev, char *name)
 185 {
 186         uint8_t new;
 187
 188         pci_write_byte(dev, 0x52, 0xee);
 189
 190         new = pci_read_byte(dev, 0x52);
 191
 192         if (new != 0xee) {
 193                 printf("tried to set register 0x%x to 0x%x on %s failed (WARNING ONLY)\n", 0x52, new, name);
 194                 return -1;
 195         }
 196
 197         new = pci_read_byte(dev, 0x5b) | 0x20;
 198         pci_write_byte(dev, 0x5b, new);
 199
 200         return 0;
 201 }
 202
 203 static int enable_flash_sc1100(struct pci_dev *dev, char *name)
 204 {
 205         uint8_t new;
 206
 207         pci_write_byte(dev, 0x52, 0xee);
 208
 209         new = pci_read_byte(dev, 0x52);
 210
 211         if (new != 0xee) {
 212                 printf("tried to set register 0x%x to 0x%x on %s failed (WARNING ONLY)\n", 0x52, new, name);
 213                 return -1;
 214         }
 215         return 0;
 216 }
 217
 218 static int enable_flash_sis5595(struct pci_dev *dev, char *name)
 219 {
 220         uint8_t new, newer;
 221
 222         new = pci_read_byte(dev, 0x45);
 223
 224         /* clear bit 5 */
 225         new &= (~0x20);
 226         /* set bit 2 */
 227         new |= 0x4;
 228
 229         pci_write_byte(dev, 0x45, new);
 230
 231         newer = pci_read_byte(dev, 0x45);
 232         if (newer != new) {
 233                 printf("tried to set register 0x%x to 0x%x on %s failed (WARNING ONLY)\n", 0x45, new, name);
 234                 printf("Stuck at 0x%x\n", newer);
 235                 return -1;
 236         }
 237         return 0;
 238 }
 239
 240 static int enable_flash_amd8111(struct pci_dev *dev, char *name)
 241 {
 242         /* register 4e.b gets or'ed with one */
 243         uint8_t old, new;
 244
 245         /* if it fails, it fails. There are so many variations of broken mobos
 246          * that it is hard to argue that we should quit at this point.
 247          */
 248
 249         /* enable decoding at 0xffb00000 to 0xffffffff */
 250         old = pci_read_byte(dev, 0x43);
 251         new = old | 0xC0;
 252         if (new != old) {
 253                 pci_write_byte(dev, 0x43, new);
 254                 if (pci_read_byte(dev, 0x43) != new) {
 255                         printf("tried to set 0x%x to 0x%x on %s failed (WARNING ONLY)\n", 0x43, new, name);
 256                 }
 257         }
 258
 259         old = pci_read_byte(dev, 0x40);
 260         new = old | 0x01;
 261         if (new == old)
 262                 return 0;
 263         pci_write_byte(dev, 0x40, new);
 264
 265         if (pci_read_byte(dev, 0x40) != new) {
 266                 printf("tried to set 0x%x to 0x%x on %s failed (WARNING ONLY)\n", 0x40, new, name);
 267                 return -1;
 268         }
 269         return 0;
 270 }
 271
 272 static int enable_flash_ck804(struct pci_dev *dev, char *name)
 273 {
 274         /* register 4e.b gets or'ed with one */
 275         uint8_t old, new;
 276
 277         /* if it fails, it fails. There are so many variations of broken mobos
 278          * that it is hard to argue that we should quit at this point.
 279          */
 280
 281         /* dump_pci_device(dev); */
 282
 283         old = pci_read_byte(dev, 0x88);
 284         new = old | 0xc0;
 285         if (new != old) {
 286                 pci_write_byte(dev, 0x88, new);
 287                 if (pci_read_byte(dev, 0x88) != new) {
 288                         printf("tried to set 0x%x to 0x%x on %s failed (WARNING ONLY)\n", 0x88, new, name);
 289                 }
 290         }
 291
 292         old = pci_read_byte(dev, 0x6d);
 293         new = old | 0x01;
 294         if (new == old)
 295                 return 0;
 296         pci_write_byte(dev, 0x6d, new);
 297
 298         if (pci_read_byte(dev, 0x6d) != new) {
 299                 printf("tried to set 0x%x to 0x%x on %s failed (WARNING ONLY)\n", 0x6d, new, name);
 300                 return -1;
 301         }
 302         return 0;
 303 }
 304
 305 static int enable_flash_sb400(struct pci_dev *dev, char *name)
 306 {
 307         uint8_t tmp;
 308
 309         struct pci_filter f;
 310         struct pci_dev *smbusdev;
 311
 312         /* then look for the smbus device */
 313         pci_filter_init((struct pci_access *)0, &f);
 314         f.vendor = 0x1002;
 315         f.device = 0x4372;
 316
 317         for (smbusdev = pacc->devices; smbusdev; smbusdev = smbusdev->next) {
 318                 if (pci_filter_match(&f, smbusdev)) {
 319                         break;
 320                 }
 321         }
 322
 323         if (!smbusdev) {
 324                 fprintf(stderr, "ERROR: SMBus device not found. aborting\n");
 325                 exit(1);
 326         }
 327
 328         /* enable some smbus stuff */
 329         tmp = pci_read_byte(smbusdev, 0x79);
 330         tmp |= 0x01;
 331         pci_write_byte(smbusdev, 0x79, tmp);
 332
 333         /* change southbridge */
 334         tmp = pci_read_byte(dev, 0x48);
 335         tmp |= 0x21;
 336         pci_write_byte(dev, 0x48, tmp);
 337
 338         /* now become a bit silly. */
 339         tmp = inb(0xc6f);
 340         outb(tmp, 0xeb);
 341         outb(tmp, 0xeb);
 342         tmp |= 0x40;
 343         outb(tmp, 0xc6f);
 344         outb(tmp, 0xeb);
 345         outb(tmp, 0xeb);
 346
 347         return 0;
 348 }
 349
 350 static int enable_flash_mcp55(struct pci_dev *dev, char *name)
 351 {
 352         /* register 4e.b gets or'ed with one */
 353         unsigned char old, new, byte;
 354         unsigned short word;
 355
 356         /* if it fails, it fails. There are so many variations of broken mobos
 357          * that it is hard to argue that we should quit at this point.
 358          */
 359
 360         /* dump_pci_device(dev); */
 361
 362         /* Set the 4MB enable bit bit */
 363         byte = pci_read_byte(dev, 0x88);
 364         byte |= 0xff;           /* 256K */
 365         pci_write_byte(dev, 0x88, byte);
 366         byte = pci_read_byte(dev, 0x8c);
 367         byte |= 0xff;           /* 1M */
 368         pci_write_byte(dev, 0x8c, byte);
 369         word = pci_read_word(dev, 0x90);
 370         word |= 0x7fff;         /* 15M */
 371         pci_write_word(dev, 0x90, word);
 372
 373         old = pci_read_byte(dev, 0x6d);
 374         new = old | 0x01;
 375         if (new == old)
 376                 return 0;
 377         pci_write_byte(dev, 0x6d, new);
 378
 379         if (pci_read_byte(dev, 0x6d) != new) {
 380                 printf
 381                     ("tried to set 0x%x to 0x%x on %s failed (WARNING ONLY)\n",
 382                      0x6d, new, name);
 383                 return -1;
 384         }
 385
 386         return 0;
 387
 388 }
 389
 390 typedef struct penable {
 391         unsigned short vendor, device;
 392         char *name;
 393         int (*doit) (struct pci_dev * dev, char *name);
 394 } FLASH_ENABLE;
 395
 396 static FLASH_ENABLE enables[] = {
 397         {0x1039, 0x0630, "SIS630", enable_flash_sis630},
 398         {0x8086, 0x7110, "PIIX4/PIIX4E/PIIX4M", enable_flash_piix4},
 399         {0x8086, 0x2410, "ICH", enable_flash_ich_4e},
 400         {0x8086, 0x2420, "ICH0", enable_flash_ich_4e},
 401         {0x8086, 0x2440, "ICH2", enable_flash_ich_4e},
 402         {0x8086, 0x244c, "ICH2-M", enable_flash_ich_4e},
 403         {0x8086, 0x2480, "ICH3-S", enable_flash_ich_4e},
 404         {0x8086, 0x248c, "ICH3-M", enable_flash_ich_4e},
 405         {0x8086, 0x24c0, "ICH4/ICH4-L", enable_flash_ich_4e},
 406         {0x8086, 0x24cc, "ICH4-M", enable_flash_ich_4e},
 407         {0x8086, 0x24d0, "ICH5/ICH5R", enable_flash_ich_4e},
 408         {0x8086, 0x2640, "ICH6/ICH6R", enable_flash_ich_dc},
 409         {0x8086, 0x2641, "ICH6-M", enable_flash_ich_dc},
 410         {0x8086, 0x27b0, "ICH7DH", enable_flash_ich_dc},
 411         {0x8086, 0x27b8, "ICH7/ICH7R", enable_flash_ich_dc},
 412         {0x8086, 0x27b9, "ICH7M", enable_flash_ich_dc},
 413         {0x8086, 0x27bd, "ICH7MDH", enable_flash_ich_dc},
 414         {0x8086, 0x2810, "ICH8/ICH8R", enable_flash_ich_dc},
 415         {0x8086, 0x2812, "ICH8DH", enable_flash_ich_dc},
 416         {0x8086, 0x2814, "ICH8DO", enable_flash_ich_dc},
 417         {0x1106, 0x8231, "VT8231", enable_flash_vt823x},
 418         {0x1106, 0x3177, "VT8235", enable_flash_vt823x},
 419         {0x1106, 0x3227, "VT8237", enable_flash_vt823x},
 420         {0x1106, 0x8324, "CX700", enable_flash_vt823x},
 421         {0x1106, 0x0686, "VT82C686", enable_flash_amd8111},
 422         {0x1078, 0x0100, "CS5530", enable_flash_cs5530},
 423         {0x100b, 0x0510, "SC1100", enable_flash_sc1100},
 424         {0x1039, 0x0008, "SIS5595", enable_flash_sis5595},
 425         {0x1022, 0x7468, "AMD8111", enable_flash_amd8111},
 426         {0x10B9, 0x1533, "ALi M1533", enable_flash_ali_m1533},
 427         /* this fallthrough looks broken. */
 428         {0x10de, 0x0050, "NVIDIA CK804", enable_flash_ck804},   /* LPC */
 429         {0x10de, 0x0051, "NVIDIA CK804", enable_flash_ck804},   /* Pro */
 430         {0x10de, 0x00d3, "NVIDIA CK804", enable_flash_ck804},   /* Slave, should not be here, to fix known bug for A01. */
 431
 432         {0x10de, 0x0260, "NVidia MCP51", enable_flash_ck804},
 433         {0x10de, 0x0261, "NVidia MCP51", enable_flash_ck804},
 434         {0x10de, 0x0262, "NVidia MCP51", enable_flash_ck804},
 435         {0x10de, 0x0263, "NVidia MCP51", enable_flash_ck804},
 436
 437         {0x10de, 0x0360, "NVIDIA MCP55", enable_flash_mcp55},   /* Gigabyte m57sli-s4 */
 438         {0x10de, 0x0361, "NVIDIA MCP55", enable_flash_mcp55},   /* LPC */
 439         {0x10de, 0x0362, "NVIDIA MCP55", enable_flash_mcp55},   /* LPC */
 440         {0x10de, 0x0363, "NVIDIA MCP55", enable_flash_mcp55},   /* LPC */
 441         {0x10de, 0x0364, "NVIDIA MCP55", enable_flash_mcp55},   /* LPC */
 442         {0x10de, 0x0365, "NVIDIA MCP55", enable_flash_mcp55},   /* LPC */
 443         {0x10de, 0x0366, "NVIDIA MCP55", enable_flash_mcp55},   /* LPC */
 444         {0x10de, 0x0367, "NVIDIA MCP55", enable_flash_mcp55},   /* Pro */
 445
 446         {0x1002, 0x4377, "ATI SB400", enable_flash_sb400},      /* ATI Technologies Inc IXP SB400 PCI-ISA Bridge (rev 80) */
 447 };
 448
 449 /*
 450  *
 451  */
 452 int chipset_flash_enable(void)
 453 {
 454         struct pci_dev *dev = 0;
 455         int ret = -2;           /* nothing! */
 456         int i;
 457
 458         /* now let's try to find the chipset we have ... */
 459         for (i = 0; i < sizeof(enables) / sizeof(enables[0]); i++) {
 460                 dev = pci_dev_find(enables[i].vendor, enables[i].device);
 461                 if (dev)
 462                         break;
 463         }
 464
 465         if (dev) {
 466                 printf("Found chipset \"%s\": Enabling flash write... ",
 467                        enables[i].name);
 468
 469                 ret = enables[i].doit(dev, enables[i].name);
 470                 if (ret)
 471                         printf("Failed!\n");
 472                 else
 473                         printf("OK.\n");
 474         }
 475
 476         return ret;
 477 }