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 case FLASH_MAN_MX: printf ("MXIC "); break;
87 default: printf ("Unknown Vendor "); break;
90 switch (info->flash_id & FLASH_TYPEMASK) {
91 case FLASH_AM400B: printf ("AM29LV400B (4 Mbit, bottom boot sect)\n");
93 case FLASH_AM400T: printf ("AM29LV400T (4 Mbit, top boot sector)\n");
95 case FLASH_AM040: printf ("AM29LV040B (4 Mbit, uniform sector size)\n");
97 case FLASH_AM800B: printf ("AM29LV800B (8 Mbit, bottom boot sect)\n");
99 case FLASH_AM800T: printf ("AM29LV800T (8 Mbit, top boot sector)\n");
101 case FLASH_AM160B: printf ("AM29LV160B (16 Mbit, bottom boot sect)\n");
103 case FLASH_AM160T: printf ("AM29LV160T (16 Mbit, top boot sector)\n");
105 case FLASH_AM320T: printf ("AM29LV320T (32 M, top sector)\n");
107 case FLASH_AM320B: printf ("AM29LV320B (32 M, bottom sector)\n");
109 case FLASH_AMDL322T: printf ("AM29DL322T (32 M, top sector)\n");
111 case FLASH_AMDL322B: printf ("AM29DL322B (32 M, bottom sector)\n");
113 case FLASH_AMDL323T: printf ("AM29DL323T (32 M, top sector)\n");
115 case FLASH_AMDL323B: printf ("AM29DL323B (32 M, bottom sector)\n");
117 case FLASH_SST020: printf ("SST39LF/VF020 (2 Mbit, uniform sector size)\n");
119 case FLASH_SST040: printf ("SST39LF/VF040 (4 Mbit, uniform sector size)\n");
121 default: printf ("Unknown Chip Type\n");
125 printf (" Size: %ld MB in %d Sectors\n",
126 info->size >> 20, info->sector_count);
128 printf (" Sector Start Addresses:");
129 for (i=0; i<info->sector_count; ++i) {
130 #ifdef CFG_FLASH_EMPTY_INFO
132 * Check if whole sector is erased
134 if (i != (info->sector_count-1))
135 size = info->start[i+1] - info->start[i];
137 size = info->start[0] + info->size - info->start[i];
139 flash = (volatile unsigned long *)info->start[i];
140 size = size >> 2; /* divide by 4 for longword access */
141 for (k=0; k<size; k++) {
142 if (*flash++ != 0xffffffff) {
150 /* print empty and read-only info */
151 printf (" %08lX%s%s",
154 info->protect[i] ? "RO " : " ");
160 info->protect[i] ? " (RO)" : " ");
169 * The following code cannot be run from FLASH!
171 static ulong flash_get_size(vu_long *addr, flash_info_t *info)
175 volatile CFG_FLASH_WORD_SIZE value;
176 ulong base = (ulong)addr;
177 volatile CFG_FLASH_WORD_SIZE *addr2 = (volatile CFG_FLASH_WORD_SIZE *)addr;
179 /* Write auto select command: read Manufacturer ID */
180 addr2[CFG_FLASH_ADDR0] = (CFG_FLASH_WORD_SIZE)0x00AA00AA;
181 addr2[CFG_FLASH_ADDR1] = (CFG_FLASH_WORD_SIZE)0x00550055;
182 addr2[CFG_FLASH_ADDR0] = (CFG_FLASH_WORD_SIZE)0x00900090;
184 value = addr2[CFG_FLASH_READ0];
187 case (CFG_FLASH_WORD_SIZE)AMD_MANUFACT:
188 info->flash_id = FLASH_MAN_AMD;
190 case (CFG_FLASH_WORD_SIZE)FUJ_MANUFACT:
191 info->flash_id = FLASH_MAN_FUJ;
193 case (CFG_FLASH_WORD_SIZE)SST_MANUFACT:
194 info->flash_id = FLASH_MAN_SST;
196 case (CFG_FLASH_WORD_SIZE)EXCEL_MANUFACT:
197 info->flash_id = FLASH_MAN_EXCEL;
199 case (CFG_FLASH_WORD_SIZE)MX_MANUFACT:
200 info->flash_id = FLASH_MAN_MX;
203 info->flash_id = FLASH_UNKNOWN;
204 info->sector_count = 0;
206 return (0); /* no or unknown flash */
209 value = addr2[CFG_FLASH_READ1]; /* device ID */
212 case (CFG_FLASH_WORD_SIZE)AMD_ID_LV400T:
213 info->flash_id += FLASH_AM400T;
214 info->sector_count = 11;
215 info->size = 0x00080000;
216 break; /* => 0.5 MB */
218 case (CFG_FLASH_WORD_SIZE)AMD_ID_LV400B:
219 info->flash_id += FLASH_AM400B;
220 info->sector_count = 11;
221 info->size = 0x00080000;
222 break; /* => 0.5 MB */
224 case (CFG_FLASH_WORD_SIZE)AMD_ID_LV040B:
225 info->flash_id += FLASH_AM040;
226 info->sector_count = 8;
227 info->size = 0x0080000; /* => 0.5 MB */
230 case (CFG_FLASH_WORD_SIZE)AMD_ID_LV800T:
231 info->flash_id += FLASH_AM800T;
232 info->sector_count = 19;
233 info->size = 0x00100000;
236 case (CFG_FLASH_WORD_SIZE)AMD_ID_LV800B:
237 info->flash_id += FLASH_AM800B;
238 info->sector_count = 19;
239 info->size = 0x00100000;
242 case (CFG_FLASH_WORD_SIZE)AMD_ID_LV160T:
243 info->flash_id += FLASH_AM160T;
244 info->sector_count = 35;
245 info->size = 0x00200000;
248 case (CFG_FLASH_WORD_SIZE)AMD_ID_LV160B:
249 info->flash_id += FLASH_AM160B;
250 info->sector_count = 35;
251 info->size = 0x00200000;
254 case (CFG_FLASH_WORD_SIZE)AMD_ID_LV320T:
255 info->flash_id += FLASH_AM320T;
256 info->sector_count = 71;
257 info->size = 0x00400000;
260 case (CFG_FLASH_WORD_SIZE)AMD_ID_LV320B:
261 info->flash_id += FLASH_AM320B;
262 info->sector_count = 71;
263 info->size = 0x00400000;
266 case (CFG_FLASH_WORD_SIZE)AMD_ID_DL322T:
267 info->flash_id += FLASH_AMDL322T;
268 info->sector_count = 71;
269 info->size = 0x00400000;
272 case (CFG_FLASH_WORD_SIZE)AMD_ID_DL322B:
273 info->flash_id += FLASH_AMDL322B;
274 info->sector_count = 71;
275 info->size = 0x00400000;
278 case (CFG_FLASH_WORD_SIZE)AMD_ID_DL323T:
279 info->flash_id += FLASH_AMDL323T;
280 info->sector_count = 71;
281 info->size = 0x00400000;
284 case (CFG_FLASH_WORD_SIZE)AMD_ID_DL323B:
285 info->flash_id += FLASH_AMDL323B;
286 info->sector_count = 71;
287 info->size = 0x00400000;
290 case (CFG_FLASH_WORD_SIZE)SST_ID_xF020:
291 info->flash_id += FLASH_SST020;
292 info->sector_count = 64;
293 info->size = 0x00040000;
294 break; /* => 256 kB */
296 case (CFG_FLASH_WORD_SIZE)SST_ID_xF040:
297 info->flash_id += FLASH_SST040;
298 info->sector_count = 128;
299 info->size = 0x00080000;
300 break; /* => 512 kB */
303 info->flash_id = FLASH_UNKNOWN;
304 return (0); /* => no or unknown flash */
308 /* set up sector start address table */
309 if (((info->flash_id & FLASH_VENDMASK) == FLASH_MAN_SST) ||
310 ((info->flash_id & FLASH_TYPEMASK) == FLASH_AM640U)) {
311 for (i = 0; i < info->sector_count; i++)
312 info->start[i] = base + (i * 0x00001000);
313 } else if ((info->flash_id & FLASH_TYPEMASK) == FLASH_AM040) {
314 for (i = 0; i < info->sector_count; i++)
315 info->start[i] = base + (i * 0x00010000);
316 } else if (((info->flash_id & FLASH_TYPEMASK) == FLASH_AMDL322B) ||
317 ((info->flash_id & FLASH_TYPEMASK) == FLASH_AMDL323B) ||
318 ((info->flash_id & FLASH_TYPEMASK) == FLASH_AM320B) ||
319 ((info->flash_id & FLASH_TYPEMASK) == FLASH_AMDL324B)) {
320 /* set sector offsets for bottom boot block type */
321 for (i=0; i<8; ++i) { /* 8 x 8k boot sectors */
322 info->start[i] = base;
325 while (i < info->sector_count) { /* 64k regular sectors */
326 info->start[i] = base;
330 } else if (((info->flash_id & FLASH_TYPEMASK) == FLASH_AMDL322T) ||
331 ((info->flash_id & FLASH_TYPEMASK) == FLASH_AMDL323T) ||
332 ((info->flash_id & FLASH_TYPEMASK) == FLASH_AM320T) ||
333 ((info->flash_id & FLASH_TYPEMASK) == FLASH_AMDL324T)) {
334 /* set sector offsets for top boot block type */
336 i = info->sector_count;
337 for (n=0; n<8; ++n) { /* 8 x 8k boot sectors */
340 info->start[i] = base;
342 while (i > 0) { /* 64k regular sectors */
345 info->start[i] = base;
348 if (info->flash_id & FLASH_BTYPE) {
349 /* set sector offsets for bottom boot block type */
350 info->start[0] = base + 0x00000000;
351 info->start[1] = base + 0x00004000;
352 info->start[2] = base + 0x00006000;
353 info->start[3] = base + 0x00008000;
354 for (i = 4; i < info->sector_count; i++) {
355 info->start[i] = base + (i * 0x00010000) - 0x00030000;
358 /* set sector offsets for top boot block type */
359 i = info->sector_count - 1;
360 info->start[i--] = base + info->size - 0x00004000;
361 info->start[i--] = base + info->size - 0x00006000;
362 info->start[i--] = base + info->size - 0x00008000;
363 for (; i >= 0; i--) {
364 info->start[i] = base + i * 0x00010000;
369 /* check for protected sectors */
370 for (i = 0; i < info->sector_count; i++) {
371 /* read sector protection at sector address, (A7 .. A0) = 0x02 */
372 /* D0 = 1 if protected */
373 addr2 = (volatile CFG_FLASH_WORD_SIZE *)(info->start[i]);
374 if ((info->flash_id & FLASH_VENDMASK) != FLASH_MAN_AMD)
375 info->protect[i] = 0;
377 info->protect[i] = addr2[CFG_FLASH_READ2] & 1;
381 * Prevent writes to uninitialized FLASH.
383 if (info->flash_id != FLASH_UNKNOWN) {
384 addr2 = (CFG_FLASH_WORD_SIZE *)info->start[0];
385 *addr2 = (CFG_FLASH_WORD_SIZE)0x00F000F0; /* reset bank */
392 int flash_erase(flash_info_t *info, int s_first, int s_last)
394 volatile CFG_FLASH_WORD_SIZE *addr = (CFG_FLASH_WORD_SIZE *)(info->start[0]);
395 volatile CFG_FLASH_WORD_SIZE *addr2;
396 int flag, prot, sect, l_sect;
397 ulong start, now, last;
399 if ((s_first < 0) || (s_first > s_last)) {
400 if (info->flash_id == FLASH_UNKNOWN)
401 printf ("- missing\n");
403 printf ("- no sectors to erase\n");
407 if (info->flash_id == FLASH_UNKNOWN) {
408 printf ("Can't erase unknown flash type - aborted\n");
413 for (sect=s_first; sect<=s_last; ++sect)
414 if (info->protect[sect])
418 printf ("- Warning: %d protected sectors will not be erased!\n", prot);
424 /* Disable interrupts which might cause a timeout here */
425 flag = disable_interrupts();
427 /* Start erase on unprotected sectors */
428 for (sect = s_first; sect<=s_last; sect++) {
429 if (info->protect[sect] == 0) { /* not protected */
430 addr2 = (CFG_FLASH_WORD_SIZE *)(info->start[sect]);
431 if ((info->flash_id & FLASH_VENDMASK) == FLASH_MAN_SST) {
432 addr[CFG_FLASH_ADDR0] = (CFG_FLASH_WORD_SIZE)0x00AA00AA;
433 addr[CFG_FLASH_ADDR1] = (CFG_FLASH_WORD_SIZE)0x00550055;
434 addr[CFG_FLASH_ADDR0] = (CFG_FLASH_WORD_SIZE)0x00800080;
435 addr[CFG_FLASH_ADDR0] = (CFG_FLASH_WORD_SIZE)0x00AA00AA;
436 addr[CFG_FLASH_ADDR1] = (CFG_FLASH_WORD_SIZE)0x00550055;
437 addr2[0] = (CFG_FLASH_WORD_SIZE)0x00300030; /* sector erase */
439 /* re-enable interrupts if necessary */
445 /* data polling for D7 */
446 start = get_timer (0);
447 while ((addr2[0] & (CFG_FLASH_WORD_SIZE)0x00800080) !=
448 (CFG_FLASH_WORD_SIZE)0x00800080) {
449 if (get_timer(start) > CFG_FLASH_WRITE_TOUT)
453 if (sect == s_first) {
454 addr[CFG_FLASH_ADDR0] = (CFG_FLASH_WORD_SIZE)0x00AA00AA;
455 addr[CFG_FLASH_ADDR1] = (CFG_FLASH_WORD_SIZE)0x00550055;
456 addr[CFG_FLASH_ADDR0] = (CFG_FLASH_WORD_SIZE)0x00800080;
457 addr[CFG_FLASH_ADDR0] = (CFG_FLASH_WORD_SIZE)0x00AA00AA;
458 addr[CFG_FLASH_ADDR1] = (CFG_FLASH_WORD_SIZE)0x00550055;
460 addr2[0] = (CFG_FLASH_WORD_SIZE)0x00300030; /* sector erase */
466 /* re-enable interrupts if necessary */
470 /* wait at least 80us - let's wait 1 ms */
474 * We wait for the last triggered sector
479 start = get_timer (0);
481 addr = (CFG_FLASH_WORD_SIZE *)(info->start[l_sect]);
482 while ((addr[0] & (CFG_FLASH_WORD_SIZE)0x00800080) != (CFG_FLASH_WORD_SIZE)0x00800080) {
483 if ((now = get_timer(start)) > CFG_FLASH_ERASE_TOUT) {
484 printf ("Timeout\n");
487 /* show that we're waiting */
488 if ((now - last) > 1000) { /* every second */
495 /* reset to read mode */
496 addr = (CFG_FLASH_WORD_SIZE *)info->start[0];
497 addr[0] = (CFG_FLASH_WORD_SIZE)0x00F000F0; /* reset bank */
504 * Copy memory to flash, returns:
507 * 2 - Flash not erased
509 int write_buff(flash_info_t *info, uchar *src, ulong addr, ulong cnt)
514 wp = (addr & ~3); /* get lower word aligned address */
517 * handle unaligned start bytes
519 if ((l = addr - wp) != 0) {
521 for (i=0, cp=wp; i<l; ++i, ++cp) {
522 data = (data << 8) | (*(uchar *)cp);
524 for (; i<4 && cnt>0; ++i) {
525 data = (data << 8) | *src++;
529 for (; cnt==0 && i<4; ++i, ++cp) {
530 data = (data << 8) | (*(uchar *)cp);
533 if ((rc = write_word(info, wp, data)) != 0) {
540 * handle word aligned part
545 data = (data << 8) | *src++;
546 if ((rc = write_word(info, wp, data)) != 0)
556 * handle unaligned tail bytes
559 for (i=0, cp=wp; i<4 && cnt>0; ++i, ++cp) {
560 data = (data << 8) | *src++;
563 for (; i<4; ++i, ++cp)
564 data = (data << 8) | (*(uchar *)cp);
566 return (write_word(info, wp, data));
570 * Write a word to Flash, returns:
573 * 2 - Flash not erased
575 static int write_word(flash_info_t *info, ulong dest, ulong data)
577 volatile CFG_FLASH_WORD_SIZE *addr2 = (CFG_FLASH_WORD_SIZE *)(info->start[0]);
578 volatile CFG_FLASH_WORD_SIZE *dest2 = (CFG_FLASH_WORD_SIZE *)dest;
579 volatile CFG_FLASH_WORD_SIZE *data2 = (CFG_FLASH_WORD_SIZE *)&data;
584 /* Check if Flash is (sufficiently) erased */
585 if ((*((vu_long *)dest) & data) != data)
588 /* Disable interrupts which might cause a timeout here */
589 flag = disable_interrupts();
591 for (i=0; i<4/sizeof(CFG_FLASH_WORD_SIZE); i++) {
592 addr2[CFG_FLASH_ADDR0] = (CFG_FLASH_WORD_SIZE)0x00AA00AA;
593 addr2[CFG_FLASH_ADDR1] = (CFG_FLASH_WORD_SIZE)0x00550055;
594 addr2[CFG_FLASH_ADDR0] = (CFG_FLASH_WORD_SIZE)0x00A000A0;
598 /* re-enable interrupts if necessary */
602 /* data polling for D7 */
603 start = get_timer (0);
604 while ((dest2[i] & (CFG_FLASH_WORD_SIZE)0x00800080) !=
605 (data2[i] & (CFG_FLASH_WORD_SIZE)0x00800080)) {
606 if (get_timer(start) > CFG_FLASH_WRITE_TOUT)