3 * Wolfgang Denk, DENX Software Engineering, wd@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,
26 * Wait for completion of each sector erase command issued
28 * Chris Hallinan - DS4.COM, Inc. - clh@net1plus.com
32 * Modified July 20, 2001
33 * Strip down to support ONLY the AMD29F032B.
34 * Dave Updegraff - Cray, Inc. dave@cray.com
39 #include <asm/processor.h>
41 /* The flash chip we use... */
42 #define AMD_ID_F032B 0x41 /* 29F032B ID 32 Mbit,64 64Kx8 sectors */
43 #define FLASH_AM320B 0x0009
46 flash_info_t flash_info
[CONFIG_SYS_MAX_FLASH_BANKS
]; /* info for FLASH chips */
48 /*-----------------------------------------------------------------------
51 static ulong
flash_get_size (vu_long
*addr
, flash_info_t
*info
);
52 static int write_word (flash_info_t
*info
, ulong dest
, ulong data
);
53 static void flash_get_offsets (ulong base
, flash_info_t
*info
);
57 #define FLASH_WORD_SIZE unsigned char
59 /*-----------------------------------------------------------------------
62 unsigned long flash_init (void)
64 unsigned long size_b0
, size_b1
;
67 /* Init: no FLASHes known */
68 for (i
=0; i
<CONFIG_SYS_MAX_FLASH_BANKS
; ++i
) {
69 flash_info
[i
].flash_id
= FLASH_UNKNOWN
;
72 /* Static FLASH Bank configuration here - FIXME XXX */
74 size_b0
= flash_get_size((vu_long
*)FLASH_BASE0_PRELIM
, &flash_info
[0]);
76 if (flash_info
[0].flash_id
== FLASH_UNKNOWN
) {
77 printf ("## Unknown FLASH on Bank 0 - Size = 0x%08lx = %ld MB\n",
78 size_b0
, size_b0
<<20);
82 if (CONFIG_SYS_MAX_FLASH_BANKS
== 1)
85 flash_get_offsets (FLASH_BASE0_PRELIM
, &flash_info
[0]);
88 /* Monitor protection ON by default */
89 (void)flash_protect(FLAG_PROTECT_SET
,
91 FLASH_BASE0_PRELIM
+monitor_flash_len
-1,
95 flash_info
[0].size
= size_b0
;
98 return (size_b0
+ size_b1
);
102 /*-----------------------------------------------------------------------
104 static void flash_get_offsets (ulong base
, flash_info_t
*info
)
108 /* set up sector start address table */
109 for (i
= 0; i
< info
->sector_count
; i
++)
110 info
->start
[i
] = base
+ (i
* 0x00010000);
113 /*-----------------------------------------------------------------------
115 void flash_print_info (flash_info_t
*info
)
121 volatile unsigned long *flash
;
123 if (info
->flash_id
== FLASH_UNKNOWN
) {
124 printf ("missing or unknown FLASH type\n");
128 switch (info
->flash_id
& FLASH_VENDMASK
) {
129 case FLASH_MAN_AMD
: printf ("AMD "); break;
130 default: printf ("Unknown Vendor "); break;
133 switch (info
->flash_id
& FLASH_TYPEMASK
) {
134 case FLASH_AM320B
:printf ("AM29F032B (32 Mbit 64x64KB uniform sectors)\n");
136 default: printf ("Unknown Chip Type\n");
140 printf (" Size: %ld KB in %d Sectors\n",
141 info
->size
>> 10, info
->sector_count
);
143 printf (" Sector Start Addresses:");
144 for (i
=0; i
<info
->sector_count
; ++i
) {
146 * Check if whole sector is erased
148 if (i
!= (info
->sector_count
-1))
149 size
= info
->start
[i
+1] - info
->start
[i
];
151 size
= info
->start
[0] + info
->size
- info
->start
[i
];
153 flash
= (volatile unsigned long *)info
->start
[i
];
154 size
= size
>> 2; /* divide by 4 for longword access */
155 for (k
=0; k
<size
; k
++)
157 if (*flash
++ != 0xffffffff)
167 printf (" %08lX%s%s",
170 info
->protect
[i
] ? "RO " : " "
176 /*-----------------------------------------------------------------------
180 /*-----------------------------------------------------------------------
184 * The following code cannot be run from FLASH!
186 static ulong
flash_get_size (vu_long
*addr
, flash_info_t
*info
)
189 FLASH_WORD_SIZE value
;
190 ulong base
= (ulong
)addr
;
191 volatile FLASH_WORD_SIZE
*addr2
= (FLASH_WORD_SIZE
*)addr
;
193 /* Write auto select command: read Manufacturer ID */
194 addr2
[ADDR0
] = (FLASH_WORD_SIZE
)0x00AA00AA;
195 addr2
[ADDR1
] = (FLASH_WORD_SIZE
)0x00550055;
196 addr2
[ADDR0
] = (FLASH_WORD_SIZE
)0x00900090;
201 case (FLASH_WORD_SIZE
)AMD_MANUFACT
:
202 info
->flash_id
= FLASH_MAN_AMD
;
205 info
->flash_id
= FLASH_UNKNOWN
;
206 info
->sector_count
= 0;
208 return (0); /* no or unknown flash */
211 value
= addr2
[1]; /* device ID */
214 case (FLASH_WORD_SIZE
)AMD_ID_F032B
:
215 info
->flash_id
+= FLASH_AM320B
;
216 info
->sector_count
= 64;
217 info
->size
= 0x0400000; /* => 4 MB */
220 info
->flash_id
= FLASH_UNKNOWN
;
221 return (0); /* => no or unknown flash */
225 /* set up sector start address table */
226 for (i
= 0; i
< info
->sector_count
; i
++)
227 info
->start
[i
] = base
+ (i
* 0x00010000);
229 /* check for protected sectors */
230 for (i
= 0; i
< info
->sector_count
; i
++) {
231 /* read sector protection at sector address, (A7 .. A0) = 0x02 */
232 /* D0 = 1 if protected */
233 addr2
= (volatile FLASH_WORD_SIZE
*)(info
->start
[i
]);
234 info
->protect
[i
] = addr2
[2] & 1;
238 * Prevent writes to uninitialized FLASH.
240 if (info
->flash_id
!= FLASH_UNKNOWN
) {
241 addr2
= (FLASH_WORD_SIZE
*)info
->start
[0];
242 *addr2
= (FLASH_WORD_SIZE
)0x00F000F0; /* reset bank */
248 int wait_for_DQ7(flash_info_t
*info
, int sect
)
250 ulong start
, now
, last
;
251 volatile FLASH_WORD_SIZE
*addr
= (FLASH_WORD_SIZE
*)(info
->start
[sect
]);
253 start
= get_timer (0);
255 while ((addr
[0] & (FLASH_WORD_SIZE
)0x00800080) != (FLASH_WORD_SIZE
)0x00800080) {
256 if ((now
= get_timer(start
)) > CONFIG_SYS_FLASH_ERASE_TOUT
) {
257 printf ("Timeout\n");
260 /* show that we're waiting */
261 if ((now
- last
) > 1000) { /* every second */
269 /*-----------------------------------------------------------------------
272 int flash_erase (flash_info_t
*info
, int s_first
, int s_last
)
274 volatile FLASH_WORD_SIZE
*addr
= (FLASH_WORD_SIZE
*)(info
->start
[0]);
275 volatile FLASH_WORD_SIZE
*addr2
;
276 int flag
, prot
, sect
, l_sect
;
278 if ((s_first
< 0) || (s_first
> s_last
)) {
279 if (info
->flash_id
== FLASH_UNKNOWN
) {
280 printf ("- missing\n");
282 printf ("- no sectors to erase\n");
287 if (info
->flash_id
== FLASH_UNKNOWN
) {
288 printf ("Can't erase unknown flash type - aborted\n");
293 for (sect
=s_first
; sect
<=s_last
; ++sect
) {
294 if (info
->protect
[sect
]) {
300 printf ("- Warning: %d protected sectors will not be erased!\n",
308 /* Disable interrupts which might cause a timeout here */
309 flag
= disable_interrupts();
311 /* Start erase on unprotected sectors */
312 for (sect
= s_first
; sect
<=s_last
; sect
++) {
313 if (info
->protect
[sect
] == 0) { /* not protected */
314 addr2
= (FLASH_WORD_SIZE
*)(info
->start
[sect
]);
315 printf("Erasing sector %p\n", addr2
);
317 addr
[ADDR0
] = (FLASH_WORD_SIZE
)0x00AA00AA;
318 addr
[ADDR1
] = (FLASH_WORD_SIZE
)0x00550055;
319 addr
[ADDR0
] = (FLASH_WORD_SIZE
)0x00800080;
320 addr
[ADDR0
] = (FLASH_WORD_SIZE
)0x00AA00AA;
321 addr
[ADDR1
] = (FLASH_WORD_SIZE
)0x00550055;
322 addr2
[0] = (FLASH_WORD_SIZE
)0x00300030; /* sector erase */
325 * Wait for each sector to complete, it's more
326 * reliable. According to AMD Spec, you must
327 * issue all erase commands within a specified
328 * timeout. This has been seen to fail, especially
329 * if printf()s are included (for debug)!!
331 wait_for_DQ7(info
, sect
);
335 /* re-enable interrupts if necessary */
339 /* wait at least 80us - let's wait 1 ms */
342 /* reset to read mode */
343 addr
= (FLASH_WORD_SIZE
*)info
->start
[0];
344 addr
[0] = (FLASH_WORD_SIZE
)0x00F000F0; /* reset bank */
350 /*-----------------------------------------------------------------------
351 * Copy memory to flash, returns:
354 * 2 - Flash not erased
357 int write_buff (flash_info_t
*info
, uchar
*src
, ulong addr
, ulong cnt
)
362 wp
= (addr
& ~3); /* get lower word aligned address */
365 * handle unaligned start bytes
367 if ((l
= addr
- wp
) != 0) {
369 for (i
=0, cp
=wp
; i
<l
; ++i
, ++cp
) {
370 data
= (data
<< 8) | (*(uchar
*)cp
);
372 for (; i
<4 && cnt
>0; ++i
) {
373 data
= (data
<< 8) | *src
++;
377 for (; cnt
==0 && i
<4; ++i
, ++cp
) {
378 data
= (data
<< 8) | (*(uchar
*)cp
);
381 if ((rc
= write_word(info
, wp
, data
)) != 0) {
388 * handle word aligned part
392 for (i
=0; i
<4; ++i
) {
393 data
= (data
<< 8) | *src
++;
395 if ((rc
= write_word(info
, wp
, data
)) != 0) {
407 * handle unaligned tail bytes
410 for (i
=0, cp
=wp
; i
<4 && cnt
>0; ++i
, ++cp
) {
411 data
= (data
<< 8) | *src
++;
414 for (; i
<4; ++i
, ++cp
) {
415 data
= (data
<< 8) | (*(uchar
*)cp
);
418 return (write_word(info
, wp
, data
));
421 /*-----------------------------------------------------------------------
422 * Write a word to Flash, returns:
425 * 2 - Flash not erased
427 static int write_word (flash_info_t
*info
, ulong dest
, ulong data
)
429 volatile FLASH_WORD_SIZE
*addr2
= (FLASH_WORD_SIZE
*)(info
->start
[0]);
430 volatile FLASH_WORD_SIZE
*dest2
= (FLASH_WORD_SIZE
*)dest
;
431 volatile FLASH_WORD_SIZE
*data2
= (FLASH_WORD_SIZE
*)&data
;
436 /* Check if Flash is (sufficiently) erased */
437 if ((*((volatile FLASH_WORD_SIZE
*)dest
) &
438 (FLASH_WORD_SIZE
)data
) != (FLASH_WORD_SIZE
)data
) {
441 /* Disable interrupts which might cause a timeout here */
442 flag
= disable_interrupts();
444 for (i
=0; i
<4/sizeof(FLASH_WORD_SIZE
); i
++)
446 addr2
[ADDR0
] = (FLASH_WORD_SIZE
)0x00AA00AA;
447 addr2
[ADDR1
] = (FLASH_WORD_SIZE
)0x00550055;
448 addr2
[ADDR0
] = (FLASH_WORD_SIZE
)0x00A000A0;
452 /* re-enable interrupts if necessary */
456 /* data polling for D7 */
457 start
= get_timer (0);
458 while ((dest2
[i
] & (FLASH_WORD_SIZE
)0x00800080) !=
459 (data2
[i
] & (FLASH_WORD_SIZE
)0x00800080)) {
460 if (get_timer(start
) > CONFIG_SYS_FLASH_WRITE_TOUT
) {
469 /*-----------------------------------------------------------------------