3 * Stefan Roese, DENX Software Engineering, sr@denx.de.
5 * See file CREDITS for list of people who contributed to this
8 * This program is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU General Public License as
10 * published by the Free Software Foundation; either version 2 of
11 * the License, or (at your option) any later version.
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
25 #include <asm/processor.h>
27 #ifndef CFG_FLASH_READ0
28 #define CFG_FLASH_READ0 0x0000 /* 0 is standard */
29 #define CFG_FLASH_READ1 0x0001 /* 1 is standard */
30 #define CFG_FLASH_READ2 0x0002 /* 2 is standard */
33 flash_info_t flash_info[CFG_MAX_FLASH_BANKS]; /* info for FLASH chips */
38 static int write_word(flash_info_t *info, ulong dest, ulong data);
39 static ulong flash_get_size(vu_long *addr, flash_info_t *info);
41 unsigned long flash_init(void)
43 unsigned long size_b0, size_b1;
45 unsigned long base_b0, base_b1;
47 /* Init: no FLASHes known */
48 for (i = 0; i < CFG_MAX_FLASH_BANKS; ++i) {
49 flash_info[i].flash_id = FLASH_UNKNOWN;
52 /* Static FLASH Bank configuration here - FIXME XXX */
54 base_b0 = FLASH_BASE0_PRELIM;
55 size_b0 = flash_get_size ((vu_long *) base_b0, &flash_info[0]);
57 if (flash_info[0].flash_id == FLASH_UNKNOWN) {
58 printf ("## Unknown FLASH on Bank 0 - Size = 0x%08lx = %ld MB\n",
59 size_b0, size_b0 << 20);
62 base_b1 = FLASH_BASE1_PRELIM;
63 size_b1 = flash_get_size ((vu_long *) base_b1, &flash_info[1]);
65 return (size_b0 + size_b1);
68 void flash_print_info(flash_info_t *info)
74 volatile unsigned long *flash;
76 if (info->flash_id == FLASH_UNKNOWN) {
77 printf ("missing or unknown FLASH type\n");
81 switch (info->flash_id & FLASH_VENDMASK) {
82 case FLASH_MAN_AMD: printf ("AMD "); break;
83 case FLASH_MAN_FUJ: printf ("FUJITSU "); break;
84 case FLASH_MAN_SST: printf ("SST "); break;
85 case FLASH_MAN_EXCEL: printf ("Excel Semiconductor "); break;
86 default: printf ("Unknown Vendor "); break;
89 switch (info->flash_id & FLASH_TYPEMASK) {
90 case FLASH_AM400B: printf ("AM29LV400B (4 Mbit, bottom boot sect)\n");
92 case FLASH_AM400T: printf ("AM29LV400T (4 Mbit, top boot sector)\n");
94 case FLASH_AM040: printf ("AM29LV040B (4 Mbit, uniform sector size)\n");
96 case FLASH_AM800B: printf ("AM29LV800B (8 Mbit, bottom boot sect)\n");
98 case FLASH_AM800T: printf ("AM29LV800T (8 Mbit, top boot sector)\n");
100 case FLASH_AM160B: printf ("AM29LV160B (16 Mbit, bottom boot sect)\n");
102 case FLASH_AM160T: printf ("AM29LV160T (16 Mbit, top boot sector)\n");
104 case FLASH_AM320T: printf ("AM29LV320T (32 M, top sector)\n");
106 case FLASH_AM320B: printf ("AM29LV320B (32 M, bottom sector)\n");
108 case FLASH_AMDL322T: printf ("AM29DL322T (32 M, top sector)\n");
110 case FLASH_AMDL322B: printf ("AM29DL322B (32 M, bottom sector)\n");
112 case FLASH_AMDL323T: printf ("AM29DL323T (32 M, top sector)\n");
114 case FLASH_AMDL323B: printf ("AM29DL323B (32 M, bottom sector)\n");
116 case FLASH_SST020: printf ("SST39LF/VF020 (2 Mbit, uniform sector size)\n");
118 case FLASH_SST040: printf ("SST39LF/VF040 (4 Mbit, uniform sector size)\n");
120 default: printf ("Unknown Chip Type\n");
124 printf (" Size: %ld MB in %d Sectors\n",
125 info->size >> 20, info->sector_count);
127 printf (" Sector Start Addresses:");
128 for (i=0; i<info->sector_count; ++i) {
129 #ifdef CFG_FLASH_EMPTY_INFO
131 * Check if whole sector is erased
133 if (i != (info->sector_count-1))
134 size = info->start[i+1] - info->start[i];
136 size = info->start[0] + info->size - info->start[i];
138 flash = (volatile unsigned long *)info->start[i];
139 size = size >> 2; /* divide by 4 for longword access */
140 for (k=0; k<size; k++) {
141 if (*flash++ != 0xffffffff) {
149 /* print empty and read-only info */
150 printf (" %08lX%s%s",
153 info->protect[i] ? "RO " : " ");
159 info->protect[i] ? " (RO)" : " ");
168 * The following code cannot be run from FLASH!
170 static ulong flash_get_size(vu_long *addr, flash_info_t *info)
174 volatile CFG_FLASH_WORD_SIZE value;
175 ulong base = (ulong)addr;
176 volatile CFG_FLASH_WORD_SIZE *addr2 = (volatile CFG_FLASH_WORD_SIZE *)addr;
178 /* Write auto select command: read Manufacturer ID */
179 addr2[CFG_FLASH_ADDR0] = (CFG_FLASH_WORD_SIZE)0x00AA00AA;
180 addr2[CFG_FLASH_ADDR1] = (CFG_FLASH_WORD_SIZE)0x00550055;
181 addr2[CFG_FLASH_ADDR0] = (CFG_FLASH_WORD_SIZE)0x00900090;
183 value = addr2[CFG_FLASH_READ0];
186 case (CFG_FLASH_WORD_SIZE)AMD_MANUFACT:
187 info->flash_id = FLASH_MAN_AMD;
189 case (CFG_FLASH_WORD_SIZE)FUJ_MANUFACT:
190 info->flash_id = FLASH_MAN_FUJ;
192 case (CFG_FLASH_WORD_SIZE)SST_MANUFACT:
193 info->flash_id = FLASH_MAN_SST;
195 case (CFG_FLASH_WORD_SIZE)EXCEL_MANUFACT:
196 info->flash_id = FLASH_MAN_EXCEL;
199 info->flash_id = FLASH_UNKNOWN;
200 info->sector_count = 0;
202 return (0); /* no or unknown flash */
205 value = addr2[CFG_FLASH_READ1]; /* device ID */
208 case (CFG_FLASH_WORD_SIZE)AMD_ID_LV400T:
209 info->flash_id += FLASH_AM400T;
210 info->sector_count = 11;
211 info->size = 0x00080000;
212 break; /* => 0.5 MB */
214 case (CFG_FLASH_WORD_SIZE)AMD_ID_LV400B:
215 info->flash_id += FLASH_AM400B;
216 info->sector_count = 11;
217 info->size = 0x00080000;
218 break; /* => 0.5 MB */
220 case (CFG_FLASH_WORD_SIZE)AMD_ID_LV040B:
221 info->flash_id += FLASH_AM040;
222 info->sector_count = 8;
223 info->size = 0x0080000; /* => 512 ko */
226 case (CFG_FLASH_WORD_SIZE)AMD_ID_LV800T:
227 info->flash_id += FLASH_AM800T;
228 info->sector_count = 19;
229 info->size = 0x00100000;
232 case (CFG_FLASH_WORD_SIZE)AMD_ID_LV800B:
233 info->flash_id += FLASH_AM800B;
234 info->sector_count = 19;
235 info->size = 0x00100000;
238 case (CFG_FLASH_WORD_SIZE)AMD_ID_LV160T:
239 info->flash_id += FLASH_AM160T;
240 info->sector_count = 35;
241 info->size = 0x00200000;
244 case (CFG_FLASH_WORD_SIZE)AMD_ID_LV160B:
245 info->flash_id += FLASH_AM160B;
246 info->sector_count = 35;
247 info->size = 0x00200000;
250 case (CFG_FLASH_WORD_SIZE)AMD_ID_LV320T:
251 info->flash_id += FLASH_AM320T;
252 info->sector_count = 71;
253 info->size = 0x00400000; break; /* => 4 MB */
255 case (CFG_FLASH_WORD_SIZE)AMD_ID_LV320B:
256 info->flash_id += FLASH_AM320B;
257 info->sector_count = 71;
258 info->size = 0x00400000; break; /* => 4 MB */
260 case (CFG_FLASH_WORD_SIZE)AMD_ID_DL322T:
261 info->flash_id += FLASH_AMDL322T;
262 info->sector_count = 71;
263 info->size = 0x00400000; break; /* => 4 MB */
265 case (CFG_FLASH_WORD_SIZE)AMD_ID_DL322B:
266 info->flash_id += FLASH_AMDL322B;
267 info->sector_count = 71;
268 info->size = 0x00400000; break; /* => 4 MB */
270 case (CFG_FLASH_WORD_SIZE)AMD_ID_DL323T:
271 info->flash_id += FLASH_AMDL323T;
272 info->sector_count = 71;
273 info->size = 0x00400000; break; /* => 4 MB */
275 case (CFG_FLASH_WORD_SIZE)AMD_ID_DL323B:
276 info->flash_id += FLASH_AMDL323B;
277 info->sector_count = 71;
278 info->size = 0x00400000; break; /* => 4 MB */
280 case (CFG_FLASH_WORD_SIZE)SST_ID_xF020:
281 info->flash_id += FLASH_SST020;
282 info->sector_count = 64;
283 info->size = 0x00040000;
284 break; /* => 256 kB */
286 case (CFG_FLASH_WORD_SIZE)SST_ID_xF040:
287 info->flash_id += FLASH_SST040;
288 info->sector_count = 128;
289 info->size = 0x00080000;
290 break; /* => 512 kB */
293 info->flash_id = FLASH_UNKNOWN;
294 return (0); /* => no or unknown flash */
298 /* set up sector start address table */
299 if (((info->flash_id & FLASH_VENDMASK) == FLASH_MAN_SST) ||
300 ((info->flash_id & FLASH_TYPEMASK) == FLASH_AM640U)) {
301 for (i = 0; i < info->sector_count; i++)
302 info->start[i] = base + (i * 0x00001000);
303 } else if ((info->flash_id & FLASH_TYPEMASK) == FLASH_AM040) {
304 for (i = 0; i < info->sector_count; i++)
305 info->start[i] = base + (i * 0x00010000);
306 } else if (((info->flash_id & FLASH_TYPEMASK) == FLASH_AMDL322B) ||
307 ((info->flash_id & FLASH_TYPEMASK) == FLASH_AMDL323B) ||
308 ((info->flash_id & FLASH_TYPEMASK) == FLASH_AM320B) ||
309 ((info->flash_id & FLASH_TYPEMASK) == FLASH_AMDL324B)) {
310 /* set sector offsets for bottom boot block type */
311 for (i=0; i<8; ++i) { /* 8 x 8k boot sectors */
312 info->start[i] = base;
315 while (i < info->sector_count) { /* 64k regular sectors */
316 info->start[i] = base;
320 } else if (((info->flash_id & FLASH_TYPEMASK) == FLASH_AMDL322T) ||
321 ((info->flash_id & FLASH_TYPEMASK) == FLASH_AMDL323T) ||
322 ((info->flash_id & FLASH_TYPEMASK) == FLASH_AM320T) ||
323 ((info->flash_id & FLASH_TYPEMASK) == FLASH_AMDL324T)) {
324 /* set sector offsets for top boot block type */
326 i = info->sector_count;
327 for (n=0; n<8; ++n) { /* 8 x 8k boot sectors */
330 info->start[i] = base;
332 while (i > 0) { /* 64k regular sectors */
335 info->start[i] = base;
338 if (info->flash_id & FLASH_BTYPE) {
339 /* set sector offsets for bottom boot block type */
340 info->start[0] = base + 0x00000000;
341 info->start[1] = base + 0x00004000;
342 info->start[2] = base + 0x00006000;
343 info->start[3] = base + 0x00008000;
344 for (i = 4; i < info->sector_count; i++) {
345 info->start[i] = base + (i * 0x00010000) - 0x00030000;
348 /* set sector offsets for top boot block type */
349 i = info->sector_count - 1;
350 info->start[i--] = base + info->size - 0x00004000;
351 info->start[i--] = base + info->size - 0x00006000;
352 info->start[i--] = base + info->size - 0x00008000;
353 for (; i >= 0; i--) {
354 info->start[i] = base + i * 0x00010000;
359 /* check for protected sectors */
360 for (i = 0; i < info->sector_count; i++) {
361 /* read sector protection at sector address, (A7 .. A0) = 0x02 */
362 /* D0 = 1 if protected */
363 addr2 = (volatile CFG_FLASH_WORD_SIZE *)(info->start[i]);
364 if ((info->flash_id & FLASH_VENDMASK) != FLASH_MAN_AMD)
365 info->protect[i] = 0;
367 info->protect[i] = addr2[CFG_FLASH_READ2] & 1;
371 * Prevent writes to uninitialized FLASH.
373 if (info->flash_id != FLASH_UNKNOWN) {
374 addr2 = (CFG_FLASH_WORD_SIZE *)info->start[0];
375 *addr2 = (CFG_FLASH_WORD_SIZE)0x00F000F0; /* reset bank */
382 int flash_erase(flash_info_t *info, int s_first, int s_last)
384 volatile CFG_FLASH_WORD_SIZE *addr = (CFG_FLASH_WORD_SIZE *)(info->start[0]);
385 volatile CFG_FLASH_WORD_SIZE *addr2;
386 int flag, prot, sect, l_sect;
387 ulong start, now, last;
389 if ((s_first < 0) || (s_first > s_last)) {
390 if (info->flash_id == FLASH_UNKNOWN)
391 printf ("- missing\n");
393 printf ("- no sectors to erase\n");
397 if (info->flash_id == FLASH_UNKNOWN) {
398 printf ("Can't erase unknown flash type - aborted\n");
403 for (sect=s_first; sect<=s_last; ++sect)
404 if (info->protect[sect])
408 printf ("- Warning: %d protected sectors will not be erased!\n", prot);
414 /* Disable interrupts which might cause a timeout here */
415 flag = disable_interrupts();
417 /* Start erase on unprotected sectors */
418 for (sect = s_first; sect<=s_last; sect++) {
419 if (info->protect[sect] == 0) { /* not protected */
420 addr2 = (CFG_FLASH_WORD_SIZE *)(info->start[sect]);
421 if ((info->flash_id & FLASH_VENDMASK) == FLASH_MAN_SST) {
422 addr[CFG_FLASH_ADDR0] = (CFG_FLASH_WORD_SIZE)0x00AA00AA;
423 addr[CFG_FLASH_ADDR1] = (CFG_FLASH_WORD_SIZE)0x00550055;
424 addr[CFG_FLASH_ADDR0] = (CFG_FLASH_WORD_SIZE)0x00800080;
425 addr[CFG_FLASH_ADDR0] = (CFG_FLASH_WORD_SIZE)0x00AA00AA;
426 addr[CFG_FLASH_ADDR1] = (CFG_FLASH_WORD_SIZE)0x00550055;
427 addr2[0] = (CFG_FLASH_WORD_SIZE)0x00300030; /* sector erase */
429 /* re-enable interrupts if necessary */
435 /* data polling for D7 */
436 start = get_timer (0);
437 while ((addr2[0] & (CFG_FLASH_WORD_SIZE)0x00800080) !=
438 (CFG_FLASH_WORD_SIZE)0x00800080) {
439 if (get_timer(start) > CFG_FLASH_WRITE_TOUT)
443 if (sect == s_first) {
444 addr[CFG_FLASH_ADDR0] = (CFG_FLASH_WORD_SIZE)0x00AA00AA;
445 addr[CFG_FLASH_ADDR1] = (CFG_FLASH_WORD_SIZE)0x00550055;
446 addr[CFG_FLASH_ADDR0] = (CFG_FLASH_WORD_SIZE)0x00800080;
447 addr[CFG_FLASH_ADDR0] = (CFG_FLASH_WORD_SIZE)0x00AA00AA;
448 addr[CFG_FLASH_ADDR1] = (CFG_FLASH_WORD_SIZE)0x00550055;
450 addr2[0] = (CFG_FLASH_WORD_SIZE)0x00300030; /* sector erase */
456 /* re-enable interrupts if necessary */
460 /* wait at least 80us - let's wait 1 ms */
464 * We wait for the last triggered sector
469 start = get_timer (0);
471 addr = (CFG_FLASH_WORD_SIZE *)(info->start[l_sect]);
472 while ((addr[0] & (CFG_FLASH_WORD_SIZE)0x00800080) != (CFG_FLASH_WORD_SIZE)0x00800080) {
473 if ((now = get_timer(start)) > CFG_FLASH_ERASE_TOUT) {
474 printf ("Timeout\n");
477 /* show that we're waiting */
478 if ((now - last) > 1000) { /* every second */
485 /* reset to read mode */
486 addr = (CFG_FLASH_WORD_SIZE *)info->start[0];
487 addr[0] = (CFG_FLASH_WORD_SIZE)0x00F000F0; /* reset bank */
494 * Copy memory to flash, returns:
497 * 2 - Flash not erased
499 int write_buff(flash_info_t *info, uchar *src, ulong addr, ulong cnt)
504 wp = (addr & ~3); /* get lower word aligned address */
507 * handle unaligned start bytes
509 if ((l = addr - wp) != 0) {
511 for (i=0, cp=wp; i<l; ++i, ++cp) {
512 data = (data << 8) | (*(uchar *)cp);
514 for (; i<4 && cnt>0; ++i) {
515 data = (data << 8) | *src++;
519 for (; cnt==0 && i<4; ++i, ++cp) {
520 data = (data << 8) | (*(uchar *)cp);
523 if ((rc = write_word(info, wp, data)) != 0) {
530 * handle word aligned part
535 data = (data << 8) | *src++;
536 if ((rc = write_word(info, wp, data)) != 0)
546 * handle unaligned tail bytes
549 for (i=0, cp=wp; i<4 && cnt>0; ++i, ++cp) {
550 data = (data << 8) | *src++;
553 for (; i<4; ++i, ++cp)
554 data = (data << 8) | (*(uchar *)cp);
556 return (write_word(info, wp, data));
560 * Write a word to Flash, returns:
563 * 2 - Flash not erased
565 static int write_word(flash_info_t *info, ulong dest, ulong data)
567 volatile CFG_FLASH_WORD_SIZE *addr2 = (CFG_FLASH_WORD_SIZE *)(info->start[0]);
568 volatile CFG_FLASH_WORD_SIZE *dest2 = (CFG_FLASH_WORD_SIZE *)dest;
569 volatile CFG_FLASH_WORD_SIZE *data2 = (CFG_FLASH_WORD_SIZE *)&data;
574 /* Check if Flash is (sufficiently) erased */
575 if ((*((vu_long *)dest) & data) != data)
578 /* Disable interrupts which might cause a timeout here */
579 flag = disable_interrupts();
581 for (i=0; i<4/sizeof(CFG_FLASH_WORD_SIZE); i++) {
582 addr2[CFG_FLASH_ADDR0] = (CFG_FLASH_WORD_SIZE)0x00AA00AA;
583 addr2[CFG_FLASH_ADDR1] = (CFG_FLASH_WORD_SIZE)0x00550055;
584 addr2[CFG_FLASH_ADDR0] = (CFG_FLASH_WORD_SIZE)0x00A000A0;
588 /* re-enable interrupts if necessary */
592 /* data polling for D7 */
593 start = get_timer (0);
594 while ((dest2[i] & (CFG_FLASH_WORD_SIZE)0x00800080) !=
595 (data2[i] & (CFG_FLASH_WORD_SIZE)0x00800080)) {
596 if (get_timer(start) > CFG_FLASH_WRITE_TOUT)