Dammit

Corresponding to coreboot v1 svn r490.

flash_rom.c

-/*
- * flash_rom.c: Flash programming utility for SiS 630/950 M/Bs
- *
- *
- * Copyright 2000 Silicon Integrated System Corporation
- *
- *	This program is free software; you can redistribute it and/or modify
- *	it under the terms of the GNU General Public License as published by
- *	the Free Software Foundation; either version 2 of the License, or
- *	(at your option) any later version.
- *
- *	This program is distributed in the hope that it will be useful,
- *	but WITHOUT ANY WARRANTY; without even the implied warranty of
- *	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
- *	GNU General Public License for more details.
- *
- *	You should have received a copy of the GNU General Public License
- *	along with this program; if not, write to the Free Software
- *	Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
- *
- *
- * Reference:
- *	1. SiS 630 Specification
- *	2. SiS 950 Specification
- *
- * $Id$
- */
-
-#include <errno.h>
-#include <fcntl.h>
-#include <sys/mman.h>
-#include <sys/io.h>
-#include <unistd.h>
-#include <stdio.h>
-
-#include "flash.h"
-#include "jedec.h"
-
-struct flashchip flashchips[] = {
-    {"Am29F040B",   AMD_ID,     AM_29F040B,   NULL, 512, 64*1024,
-     probe_29f040b, erase_29f040b, write_29f040b},
-    {"At29C040A",   ATMEL_ID,   AT_29C040A,   NULL, 512, 256,
-     probe_jedec,   erase_jedec,   write_jedec},
-    {"Mx29f002",    MX_ID,      MX_29F002,    NULL, 256, 64*1024,
-     probe_29f002,  erase_29f002,  write_29f002},
-    {"SST29EE020A", SST_ID,     SST_29EE020A, NULL, 256, 128,
-     probe_jedec,   erase_jedec,   write_jedec},
-    {"SST28SF040A", SST_ID,     SST_28SF040,  NULL, 512, 256,
-     probe_28sf040, erase_28sf040, write_28sf040},
-    {"W29C020C",    WINBOND_ID, W_29C020C,    NULL, 256, 128,
-     probe_jedec,   erase_jedec,   write_jedec},
-    {NULL,}
-};
-
-int enable_flash_sis630 (void)
-{
-    char b;
-
-    /* get io privilege access PCI configuration space */
-    if (iopl(3) != 0) {
-    	perror("Can not set io priviliage");
-        exit(1);
-    }
-
-    /* Enable 0xFFF8000~0xFFFF0000 decoding on SiS 540/630 */
-    outl(0x80000840, 0x0cf8);
-    b = inb(0x0cfc) | 0x0b;
-    outb(b, 0xcfc);
-    /* Flash write enable on SiS 540/630 */
-    outl(0x80000845, 0x0cf8);
-    b = inb(0x0cfd) | 0x40;
-    outb(b, 0xcfd);
-
-    /* The same thing on SiS 950 SuperIO side */
-    outb(0x87, 0x2e);
-    outb(0x01, 0x2e);
-    outb(0x55, 0x2e);
-    outb(0x55, 0x2e);
-
-    if (inb(0x2f) != 0x87) {
-	outb(0x87, 0x4e);
-    	outb(0x01, 0x4e);
-    	outb(0x55, 0x4e);
-    	outb(0xaa, 0x4e);
-	if (inb(0x4f) != 0x87) {
-	    printf("Can not access SiS 950\n");
-	    return -1;
-	}
-	outb(0x24, 0x4e);
-	b = inb(0x4f) | 0xfc;
-	outb(0x24, 0x4e);
-	outb(b, 0x4f);
-	outb(0x02, 0x4e);
-	outb(0x02, 0x4f);	
-    }
-
-    outb(0x24, 0x2e);
-    printf("2f is %#x\n", inb(0x2f));
-    b = inb(0x2f) | 0xfc;
-    outb(0x24, 0x2e);
-    outb(b, 0x2f);
-
-    outb(0x02, 0x2e);
-    outb(0x02, 0x2f);
-
-    return 0;
-}
-
-struct flashchip * probe_flash(struct flashchip * flash)
-{
-    int fd_mem;
-    char * bios;
-    unsigned long size;
-
-    if ((fd_mem = open("/dev/mem", O_RDWR)) < 0) {
-	perror("Can not open /dev/mem");
-	exit(1);
-    }
-
-    while (flash->name != NULL) {
-	size = flash->total_size * 1024;
-	bios = mmap (0, size, PROT_WRITE | PROT_READ, MAP_SHARED,
-		     fd_mem, (off_t) (0 - size));
-	if (bios == MAP_FAILED) {
-	    perror("Error MMAP /dev/mem");
-	    exit(1);
-	}
-	flash->virt_addr = bios;
-
-	if (flash->probe(flash) == 1) {
-	    printf ("%s found at physical address: 0x%lx\n",
-		    flash->name, (0 - size), bios);
-	    return flash;
-	}
-	munmap (bios, size);
-	flash++;
-    }
-    return NULL;
-}
-
-int verify_flash (struct flashchip * flash, char * buf)
-{
-    int i = 0;
-    int total_size = flash->total_size *1024;
-    char * bios = flash->virt_addr;
-
-    printf("Verifying address: ");
-    while (i++ < total_size) {
-	printf("0x%08x", i);
-	if (*(bios+i) != *(buf+i)) {
-	    return 0;
-	}
-	printf("\b\b\b\b\b\b\b\b\b\b");
-    }
-    printf("\n");
-    return 1;
-}
-
-main (int argc, char * argv[])
-{
-    char * buf;
-    unsigned long size;
-    FILE * image;
-    struct flashchip * flash;
-
-    if (argc > 2){
-	printf("usage: %s [romimage]\n", argv[0]);
-	printf(" If no romimage is specified, then all that happens\n");
-	printf(" is that flash writes are enabled (useful for DoC)\n");
-	exit(1);
-    }
-
-    enable_flash_sis630 ();
-
-    if ((flash = probe_flash (flashchips)) == NULL) {
-	printf("EEPROM not found\n");
-	exit(1);
-    }
-
-    if (argc < 2){
-	printf("OK, only ENABLING flash write, but NOT FLASHING\n");
-        exit(0);
-    }
-    size = flash->total_size * 1024;
-
-    if ((image = fopen (argv[1], "r")) == NULL) {
-	perror("Error opening image file");
-	exit(1);
-    }
-
-    buf = (char *) calloc (size, sizeof(char));
-    fread (buf, sizeof(char), size, image);
-
-    flash->write (flash, buf);
-    verify_flash (flash, buf);
-}