Can now burn 82802ab
Corresponding to coreboot v1 svn r633.
diff --git a/82802ab.c b/82802ab.c
new file mode 100644
index 0000000..71f2af7
--- /dev/null
+++ b/82802ab.c
@@ -0,0 +1,195 @@
+/*
+ * 82802ab.c: driver for programming JEDEC standard flash parts
+ *
+ *
+ * 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: http://www.intel.com/design/chipsets/datashts/290658.htm
+ *
+ * $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 "82802ab.h"
+
+// I need that Berkeley bit-map printer
+void print_82802ab_status(unsigned char status)
+{
+ printf("%s", status & 0x80 ? "Ready:" : "Busy:");
+ printf("%s", status & 0x40 ? "BE SUSPEND:" : "BE RUN/FINISH:");
+ printf("%s", status & 0x20 ? "BE ERROR:" : "BE OK:");
+ printf("%s", status & 0x10 ? "PROG ERR:" : "PROG OK:");
+ printf("%s", status & 0x8 ? "VP ERR:" : "VPP OK:");
+ printf("%s", status & 0x4 ? "PROG SUSPEND:" : "PROG RUN/FINISH:");
+ printf("%s", status & 0x2 ? "WP|TBL#|WP#,ABORT:" : "UNLOCK:");
+}
+
+int probe_82802ab (struct flashchip * flash)
+{
+ volatile unsigned char * bios = flash->virt_addr;
+ unsigned char id1, id2;
+
+#if 0
+ *(volatile unsigned char *) (bios + 0x5555) = 0xAA;
+ *(volatile unsigned char *) (bios + 0x2AAA) = 0x55;
+ *(volatile unsigned char *) (bios + 0x5555) = 0x90;
+#endif
+
+ *bios = 0xff;
+ myusec_delay(10);
+ *bios = 0x90;
+ myusec_delay(10);
+
+ id1 = *(volatile unsigned char *) bios;
+ id2 = *(volatile unsigned char *) (bios + 0x01);
+
+#if 1
+ *(volatile unsigned char *) (bios + 0x5555) = 0xAA;
+ *(volatile unsigned char *) (bios + 0x2AAA) = 0x55;
+ *(volatile unsigned char *) (bios + 0x5555) = 0xF0;
+
+#endif
+ myusec_delay(10);
+
+ printf(__FUNCTION__ "id1 %d, id2 %d\n", id1, id2);
+ if (id1 == flash->manufacture_id && id2 == flash->model_id) {
+ size_t size = flash->total_size * 1024;
+ // we need to mmap the write-protect space.
+ bios = mmap (0, size, PROT_WRITE | PROT_READ, MAP_SHARED,
+ flash->fd_mem, (off_t) (0 - 0x400000 - size));
+ if (bios == MAP_FAILED) {
+ // it's this part but we can't map it ...
+ perror("Error MMAP /dev/mem");
+ exit(1);
+ }
+
+ flash->virt_addr_2 = bios;
+ return 1;
+ }
+
+ return 0;
+}
+
+unsigned char wait_82802ab(volatile unsigned char * bios)
+{
+
+ unsigned char status;
+ unsigned char id1, id2;
+
+ *bios = 0x70;
+ if ((*bios & 0x80) == 0) { // it's busy
+ while ((*bios & 0x80) == 0)
+ ;
+ }
+
+ status = *bios;
+
+ // put another command to get out of status register mode
+
+ *bios = 0x90;
+ myusec_delay(10);
+
+ id1 = *(volatile unsigned char *) bios;
+ id2 = *(volatile unsigned char *) (bios + 0x01);
+
+ // this is needed to jam it out of "read id" mode
+ *(volatile unsigned char *) (bios + 0x5555) = 0xAA;
+ *(volatile unsigned char *) (bios + 0x2AAA) = 0x55;
+ *(volatile unsigned char *) (bios + 0x5555) = 0xF0;
+ return status;
+
+}
+int erase_82802ab_block(struct flashchip *flash, int offset)
+{
+ volatile unsigned char * bios = flash->virt_addr + offset;
+ volatile unsigned char *wrprotect = flash->virt_addr_2 + offset + 2;
+ unsigned char status;
+
+ // clear status register
+ *bios = 0x50;
+ printf("Erase at %p\n", bios);
+ // clear write protect
+ printf("write protect is at %p\n", (wrprotect));
+ printf("write protect is 0x%x\n", *(wrprotect));
+ *(wrprotect) = 0;
+ printf("write protect is 0x%x\n", *(wrprotect));
+
+ // now start it
+ *(volatile unsigned char *) (bios) = 0x20;
+ *(volatile unsigned char *) (bios) = 0xd0;
+ myusec_delay(10);
+ // now let's see what the register is
+ status = wait_82802ab(flash->virt_addr);
+ print_82802ab_status(status);
+ printf("DONE BLOCK 0x%x\n", offset);
+}
+int erase_82802ab (struct flashchip * flash)
+{
+ int i;
+ volatile unsigned char * bios = flash->virt_addr;
+ unsigned int total_size = flash->total_size * 1024;
+
+ printf("total_size is %d; flash->page_size is %d\n",
+ total_size, flash->page_size);
+ for(i = 0; i < total_size; i += flash->page_size)
+ erase_82802ab_block(flash, i);
+ printf("DONE ERASE\n");
+}
+
+void write_page_82802ab (volatile char * bios, char * src, volatile char * dst,
+ int page_size)
+{
+ int i;
+
+ for (i = 0; i < page_size; i++) {
+ /* transfer data from source to destination */
+ *dst = 0x40;
+ *dst++ = *src++;
+ wait_82802ab(bios);
+ }
+
+}
+
+int write_82802ab (struct flashchip * flash, char * buf)
+{
+ int i;
+ int total_size = flash->total_size *1024, page_size = flash->page_size;
+ volatile unsigned char * bios = flash->virt_addr;
+
+ erase_82802ab (flash);
+ if (*bios != 0xff) {
+ printf("ERASE FAILED\n");
+ return -1;
+ }
+ printf ("Programming Page: ");
+ for (i = 0; i < total_size/page_size; i++) {
+ printf ("%04d at address: 0x%08x", i, i * page_size);
+ write_page_82802ab(bios, buf + i * page_size, bios + i * page_size,
+ page_size);
+ printf ("\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b");
+ }
+ printf("\n");
+ protect_82802ab (bios);
+}
diff --git a/82802ab.h b/82802ab.h
new file mode 100644
index 0000000..3649704
--- /dev/null
+++ b/82802ab.h
@@ -0,0 +1,44 @@
+extern int probe_82802ab (struct flashchip * flash);
+extern int erase_82802ab (struct flashchip * flash);
+extern int write_82802ab (struct flashchip * flash, char * buf);
+
+extern __inline__ void toggle_ready_82802ab (volatile char * dst)
+{
+ unsigned int i = 0;
+ char tmp1, tmp2;
+
+ tmp1 = *dst & 0x40;
+
+ while (i++ < 0xFFFFFF) {
+ tmp2 = *dst & 0x40;
+ if (tmp1 == tmp2) {
+ break;
+ }
+ tmp1 = tmp2;
+ }
+}
+
+extern __inline__ void data_polling_82802ab (volatile char * dst, char data)
+{
+ unsigned int i = 0;
+ char tmp;
+
+ data &= 0x80;
+
+ while (i++ < 0xFFFFFF) {
+ tmp = *dst & 0x80;
+ if (tmp == data) {
+ break;
+ }
+ }
+}
+
+extern __inline__ void protect_82802ab (volatile char * bios)
+{
+ *(volatile char *) (bios + 0x5555) = 0xAA;
+ *(volatile char *) (bios + 0x2AAA) = 0x55;
+ *(volatile char *) (bios + 0x5555) = 0xA0;
+
+ usleep(200);
+}
+
diff --git a/Makefile b/Makefile
index 15a2ae6..18a6396 100644
--- a/Makefile
+++ b/Makefile
@@ -1,4 +1,5 @@
OBJS = jedec.o sst28sf040.o am29f040b.o mx29f002.c sst39sf020.o m29f400bt.o
+OBJS += 82802ab.o
CC = gcc -O2 -g
all: ${OBJS}
diff --git a/flash.h b/flash.h
index 959ef0b..f30ab67 100644
--- a/flash.h
+++ b/flash.h
@@ -13,6 +13,8 @@
int (*probe) (struct flashchip * flash);
int (*erase) (struct flashchip * flash);
int (*write) (struct flashchip * flash, char * buf);
+ int fd_mem;
+ volatile char *virt_addr_2;
};
#define AMD_ID 0x01
diff --git a/flash_rom.c b/flash_rom.c
index fe1bdf7..85a016a 100644
--- a/flash_rom.c
+++ b/flash_rom.c
@@ -36,6 +36,7 @@
#include "flash.h"
#include "jedec.h"
#include "m29f400bt.h"
+#include "82802ab.h"
struct flashchip flashchips[] = {
{"Am29F040B", AMD_ID, AM_29F040B, NULL, 512, 64*1024,
@@ -56,6 +57,8 @@
probe_jedec, erase_jedec, write_jedec},
{"M29F400BT", ST_ID, ST_M29F400BT , NULL, 512, 64*1024,
probe_m29f400bt, erase_m29f400bt, write_linuxbios_m29f400bt},
+ {"82802ab", 137, 173 , NULL, 512, 64*1024,
+ probe_82802ab, erase_82802ab, write_82802ab},
{NULL,}
};
@@ -134,6 +137,7 @@
exit(1);
}
flash->virt_addr = bios;
+ flash->fd_mem = fd_mem;
if (flash->probe(flash) == 1) {
printf ("%s found at physical address: 0x%lx\n",
diff --git a/jedec.c b/jedec.c
index 594d9c2..f26659f 100644
--- a/jedec.c
+++ b/jedec.c
@@ -74,9 +74,13 @@
{
int i;
int total_size = flash->total_size *1024, page_size = flash->page_size;
- volatile char * bios = flash->virt_addr;
+ volatile unsigned char * bios = flash->virt_addr;
erase_jedec (flash);
+ if (*bios != (unsigned char ) 0xff) {
+ printf("ERASE FAILED\n");
+ return -1;
+ }
printf ("Programming Page: ");
for (i = 0; i < total_size/page_size; i++) {
printf ("%04d at address: 0x%08x", i, i * page_size);