/* * flash.c: Support code for the flash chips on the Xilinx ML2 board * * Copyright 2002 Mind NV * * http://www.mind.be/ * * Author : Peter De Schrijver (p2@mind.be) * * This software may be used and distributed according to the terms of * the GNU General Public License (GPL) version 2, incorporated herein by * reference. Drivers based on or derived from this code fall under the GPL * and must retain the authorship, copyright and this license notice. This * file is not a complete program and may only be used when the entire program * is licensed under the GPL. * */ #include <common.h> #include <asm/u-boot.h> #include <configs/ML2.h> #define FLASH_BANK_SIZE (64*1024*1024) flash_info_t flash_info[CFG_MAX_FLASH_BANKS]; #define SECT_SIZE (512*1024) #define CMD_READ_ARRAY 0x00FF00FF00FF00FULL #define CMD_IDENTIFY 0x0090009000900090ULL #define CMD_ERASE_SETUP 0x0020002000200020ULL #define CMD_ERASE_CONFIRM 0x00D000D000D000D0ULL #define CMD_PROGRAM 0x0040004000400040ULL #define CMD_RESUME 0x00D000D000D000D0ULL #define CMD_SUSPEND 0x00B000B000B000B0ULL #define CMD_STATUS_READ 0x0070007000700070ULL #define CMD_STATUS_RESET 0x0050005000500050ULL #define BIT_BUSY 0x0080008000800080ULL #define BIT_ERASE_SUSPEND 0x004000400400040ULL #define BIT_ERASE_ERROR 0x0020002000200020ULL #define BIT_PROGRAM_ERROR 0x0010001000100010ULL #define BIT_VPP_RANGE_ERROR 0x0008000800080008ULL #define BIT_PROGRAM_SUSPEND 0x0004000400040004ULL #define BIT_PROTECT_ERROR 0x0002000200020002ULL #define BIT_UNDEFINED 0x0001000100010001ULL #define BIT_SEQUENCE_ERROR 0x0030003000300030ULL #define BIT_TIMEOUT 0x80000000 inline void eieio(void) { __asm__ __volatile__ ("eieio" : : : "memory"); } ulong flash_init(void) { int i, j; ulong size = 0; for(i=0;i<CFG_MAX_FLASH_BANKS;i++) { ulong flashbase = 0; flash_info[i].flash_id = (INTEL_MANUFACT & FLASH_VENDMASK) | (INTEL_ID_28F128J3A & FLASH_TYPEMASK); flash_info[i].size = FLASH_BANK_SIZE; flash_info[i].sector_count = CFG_MAX_FLASH_SECT; memset(flash_info[i].protect, 0, CFG_MAX_FLASH_SECT); if (i==0) flashbase = CFG_FLASH_BASE; else panic("configured too many flash banks!\n"); for (j = 0; j < flash_info[i].sector_count; j++) flash_info[i].start[j]=flashbase + j * SECT_SIZE; size += flash_info[i].size; } return size; } void flash_print_info (flash_info_t *info) { int i; switch (info->flash_id & FLASH_VENDMASK) { case (INTEL_MANUFACT & FLASH_VENDMASK): printf("Intel: "); break; default: printf("Unknown Vendor "); break; } switch (info->flash_id & FLASH_TYPEMASK) { case (INTEL_ID_28F128J3A & FLASH_TYPEMASK): printf("4x 28F128J3A (128Mbit)\n"); break; default: printf("Unknown Chip Type\n"); break; } printf(" Size: %ld MB in %d Sectors\n", info->size >> 20, info->sector_count); printf(" Sector Start Addresses:"); for (i = 0; i < info->sector_count; i++) { if ((i % 5) == 0) printf("\n "); printf (" %08lX%s", info->start[i], info->protect[i] ? " (RO)" : " "); } printf ("\n"); } int flash_error (unsigned long long code) { if (code & BIT_TIMEOUT) { printf ("Timeout\n"); return ERR_TIMOUT; } if (~code & BIT_BUSY) { printf ("Busy\n"); return ERR_PROG_ERROR; } if (code & BIT_VPP_RANGE_ERROR) { printf ("Vpp range error\n"); return ERR_PROG_ERROR; } if (code & BIT_PROTECT_ERROR) { printf ("Device protect error\n"); return ERR_PROG_ERROR; } if (code & BIT_SEQUENCE_ERROR) { printf ("Command seqence error\n"); return ERR_PROG_ERROR; } if (code & BIT_ERASE_ERROR) { printf ("Block erase error\n"); return ERR_PROG_ERROR; } if (code & BIT_PROGRAM_ERROR) { printf ("Program error\n"); return ERR_PROG_ERROR; } if (code & BIT_ERASE_SUSPEND) { printf ("Block erase suspended\n"); return ERR_PROG_ERROR; } if (code & BIT_PROGRAM_SUSPEND) { printf ("Program suspended\n"); return ERR_PROG_ERROR; } return ERR_OK; } int flash_erase (flash_info_t *info, int s_first, int s_last) { int rc = ERR_OK; int sect; unsigned long long result; if (info->flash_id == FLASH_UNKNOWN) return ERR_UNKNOWN_FLASH_TYPE; if ((s_first < 0) || (s_first > s_last)) return ERR_INVAL; if ((info->flash_id & FLASH_VENDMASK) != (INTEL_MANUFACT & FLASH_VENDMASK)) return ERR_UNKNOWN_FLASH_VENDOR; for (sect=s_first; sect<=s_last; ++sect) if (info->protect[sect]) return ERR_PROTECTED; for (sect = s_first; sect<=s_last && !ctrlc(); sect++) { volatile unsigned long long *addr= (unsigned long long *)(info->start[sect]); printf("Erasing sector %2d ... ", sect); *addr=CMD_STATUS_RESET; eieio(); *addr=CMD_ERASE_SETUP; eieio(); *addr=CMD_ERASE_CONFIRM; eieio(); do { result = *addr; } while(~result & BIT_BUSY); *addr=CMD_READ_ARRAY; if ((rc = flash_error(result)) == ERR_OK) printf("ok.\n"); else break; } if (ctrlc()) printf("User Interrupt!\n"); return rc; } static int write_word (flash_info_t *info, ulong dest, unsigned long long data) { volatile unsigned long long *addr=(unsigned long long *)dest; unsigned long long result; int rc = ERR_OK; result=*addr; if ((result & data) != data) return ERR_NOT_ERASED; *addr=CMD_STATUS_RESET; eieio(); *addr=CMD_PROGRAM; eieio(); *addr=data; eieio(); do { result=*addr; } while(~result & BIT_BUSY); *addr=CMD_READ_ARRAY; rc = flash_error(result); return rc; } int write_buff (flash_info_t *info, uchar *src, ulong addr, ulong cnt) { ulong cp, wp; unsigned long long data; int l; int i,rc; wp=(addr & ~7); if((l=addr-wp) != 0) { data=0; for(i=0,cp=wp;i<l;++i,++cp) data = (data >> 8) | (*(uchar *)cp << 24); for (; i<8 && cnt>0; ++i) { data = (data >> 8) | (*src++ << 24); --cnt; ++cp; } for (; i<8; ++i, ++cp) data = (data >> 8) | (*(uchar *)cp << 24); if ((rc = write_word(info, wp, data)) != 0) return rc; wp+=8; } while(cnt>=8) { data=*((unsigned long long *)src); if ((rc = write_word(info, wp, data)) != 0) return rc; src+=8; wp+=8; cnt-=8; } if(cnt == 0) return ERR_OK; data = 0; for (i=0, cp=wp; i<8 && cnt>0; ++i, ++cp) { data = (data >> 8) | (*src++ << 24); --cnt; } for (; i<8; ++i, ++cp) { data = (data >> 8) | (*(uchar *)cp << 24); } return write_word(info, wp, data); }