/* * msys_doc.c: driver for programming m-systems doc devices * * * Copyright 2003 Niki W. Waibel * * 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. */ #include #include #include "flash.h" #include "msys_doc.h" static int doc_wait(volatile char *bios, int timeout); static unsigned char doc_read_chipid(volatile char *bios); static unsigned char doc_read_docstatus(volatile char *bios); static unsigned char doc_read_cdsncontrol(volatile char *bios); static void doc_write_cdsncontrol(volatile char *bios, unsigned char data); int probe_md2802(struct flashchip * flash) { volatile char *bios = flash->virt_addr; unsigned char chipid; #ifndef MSYSTEMS_DOC_NO_55AA_CHECKING unsigned char id_0x55, id_0xAA; #endif /* !MSYSTEMS_DOC_NO_55AA_CHECKING */ int i, toggle_a, toggle_b; printf("%s:\n", __FUNCTION__); printf("%s: *******************************\n", __FUNCTION__); printf("%s: * THIS IS A PRE ALPHA VERSION *\n", __FUNCTION__); printf("%s: * IN THE DEVELOPEMENT *********\n", __FUNCTION__); printf("%s: * PROCESS RIGHT NOW. **********\n", __FUNCTION__); printf("%s: *******************************\n", __FUNCTION__); printf("%s: * IF YOU ARE NOT A DEVELOPER **\n", __FUNCTION__); printf("%s: * THEN DO NOT TRY TO READ OR **\n", __FUNCTION__); printf("%s: * WRITE TO THIS DEVICE ********\n", __FUNCTION__); printf("%s: *******************************\n", __FUNCTION__); printf("%s:\n", __FUNCTION__); printf("%s: switching off reset mode ...\n", __FUNCTION__); doc_write(0x85, bios, DOCControl); doc_write(0x85, bios, DOCControl); doc_read_4nop(bios); if(doc_wait(bios, 5000)) return(-1); printf("%s: switching off reset mode ... done\n", __FUNCTION__); printf("%s:\n", __FUNCTION__); printf("%s: switching off write protection ...\n", __FUNCTION__); doc_write_cdsncontrol(bios, doc_read_cdsncontrol(bios)&(~0x08)); printf("%s: switching off write protection ... done\n", __FUNCTION__); printf("%s:\n", __FUNCTION__); chipid = doc_read_chipid(bios); #ifndef MSYSTEMS_DOC_NO_55AA_CHECKING id_0x55 = doc_read(bios, IPL_0x0000); id_0xAA = doc_read(bios, IPL_0x0001); #endif /* !MSYSTEMS_DOC_NO_55AA_CHECKING */ printf("%s: IPL_0x0000: 0x%02x\n", __FUNCTION__, id_0x55); printf("%s: IPL_0x0001: 0x%02x\n", __FUNCTION__, id_0xAA); printf("%s: IPL_0x0002: 0x%02x\n", __FUNCTION__, doc_read(bios, IPL_0x0002)); printf("%s: IPL_0x0003: 0x%02x\n", __FUNCTION__, doc_read(bios, IPL_0x0003)); printf("%s:\n", __FUNCTION__); printf("%s: ChipID: 0x%02x\n", __FUNCTION__, chipid); printf("%s: DOCStatus: 0x%02x\n", __FUNCTION__, doc_read_docstatus(bios)); printf("%s: FloorSelect: 0x%02x\n", __FUNCTION__, doc_read(bios, FloorSelect)); printf("%s: CDSNControl: 0x%02x\n", __FUNCTION__, doc_read_cdsncontrol(bios)); printf("%s: CDSNDeviceSelect: 0x%02x\n", __FUNCTION__, doc_read(bios, CDSNDeviceSelect)); printf("%s: ECCConfiguration: 0x%02x\n", __FUNCTION__, doc_read(bios, ECCConfiguration)); printf("%s: CDSNSlowIO: 0x%02x\n", __FUNCTION__, doc_read(bios, CDSNSlowIO)); printf("%s: ECCSyndrome0: 0x%02x\n", __FUNCTION__, doc_read(bios, ECCSyndrome0)); printf("%s: ECCSyndrome1: 0x%02x\n", __FUNCTION__, doc_read(bios, ECCSyndrome1)); printf("%s: ECCSyndrome2: 0x%02x\n", __FUNCTION__, doc_read(bios, ECCSyndrome2)); printf("%s: ECCSyndrome3: 0x%02x\n", __FUNCTION__, doc_read(bios, ECCSyndrome3)); printf("%s: ECCSyndrome4: 0x%02x\n", __FUNCTION__, doc_read(bios, ECCSyndrome4)); printf("%s: ECCSyndrome5: 0x%02x\n", __FUNCTION__, doc_read(bios, ECCSyndrome5)); printf("%s: AliasResolution: 0x%02x\n", __FUNCTION__, doc_read(bios, AliasResolution)); printf("%s: ConfigurationInput: 0x%02x\n", __FUNCTION__, doc_read(bios, ConfigurationInput)); printf("%s: ReadPipelineInitialization: 0x%02x\n", __FUNCTION__, doc_read(bios, ReadPipelineInitialization)); printf("%s: LastDataRead: 0x%02x\n", __FUNCTION__, doc_read(bios, LastDataRead)); printf("%s:\n", __FUNCTION__); printf("%s: checking ECCConfiguration toggle bit\n", __FUNCTION__); printf("%s:", __FUNCTION__); toggle_a = toggle_b = 0; for(i=0; i<10; i++) { unsigned char toggle = doc_toggle(bios); printf(" 0x%02x", toggle); if(i%2) toggle_a += toggle; else toggle_b += toggle; } /* for(i=0; i<10; i++) */ printf("\n%s: toggle result: %d/%d\n", __FUNCTION__, toggle_a, toggle_b); if(chipid == flash->model_id && ((toggle_a==5 && toggle_b==0)||(toggle_a==0 && toggle_b==5)) #ifndef MSYSTEMS_DOC_NO_55AA_CHECKING && id_0x55 == 0x55 && id_0xAA == 0xaa #endif /* !MSYSTEMS_DOC_NO_55AA_CHECKING */ ) { return(1); } return(0); } /* int probe_md2802(struct flashchip *flash) */ int read_md2802(struct flashchip *flash, unsigned char *buf) { return(0); } /* int read_md2802(struct flashchip *flash, unsigned char *buf) */ int erase_md2802(struct flashchip *flash) { volatile char *bios = flash->virt_addr; return(1); *(volatile char *)(bios + 0x5555) = 0xAA; *(volatile char *)(bios + 0x2AAA) = 0x55; *(volatile char *)(bios + 0x5555) = 0x80; *(volatile char *)(bios + 0x5555) = 0xAA; *(volatile char *)(bios + 0x2AAA) = 0x55; *(volatile char *)(bios + 0x5555) = 0x10; } /* int erase_md2802(struct flashchip *flash) */ int write_md2802(struct flashchip *flash, unsigned char *buf) { int i; int total_size = flash->total_size *1024, page_size = flash->page_size; volatile unsigned char * bios = flash->virt_addr; return(1); erase_md2802 (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); //write_page_md2802(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_md2802(bios); } /* int write_md2802(struct flashchip *flash, char *buf) */ /* wait timeout msec for doc to become ready return: 0: ready -1: timeout expired */ static int doc_wait(volatile char *bios, int timeout) { int i = 20; doc_read_4nop(bios); while(_doc_busy(bios) && (i != 0)) { usleep(timeout*1000/20); i--; } doc_read_2nop(bios); if(_doc_busy(bios)) { doc_read_2nop(bios); return(-1); } return(0); } /* static int doc_wait(volatile char *bios, int timeout) */ static unsigned char doc_read_docstatus(volatile char *bios) { doc_read(bios, CDSNSlowIO); doc_read_2nop(bios); return(doc_read(bios, _DOCStatus)); } /* static unsigned char doc_read_docstatus(volatile char *bios) */ static unsigned char doc_read_chipid(volatile char *bios) { doc_read(bios, CDSNSlowIO); doc_read_2nop(bios); return(doc_read(bios, _ChipID)); } /* static unsigned char doc_read_chipid(volatile char *bios) */ static unsigned char doc_read_cdsncontrol(volatile char *bios) { unsigned char value; /* the delays might be necessary when reading the busy bit, but because a read to this reg reads the busy bit anyway we better do this delays... */ doc_read_4nop(bios); value = doc_read(bios, _CDSNControl); doc_read_2nop(bios); return(value); } /* static unsigned char doc_read_chipid(volatile char *bios) */ static void doc_write_cdsncontrol(volatile char *bios, unsigned char data) { doc_write(data, bios, _CDSNControl); doc_read_4nop(bios); } /* static void doc_write_chipid(volatile char *bios, unsigned char data) */