blob: 132d752e85453977c9713c5e4b48b5f83a5fe96c [file] [log] [blame]
wdenkea8015b2002-10-26 16:43:06 +00001/*
2 * (C) Copyright 2002
3 * Sysgo Real-Time Solutions, GmbH <www.elinos.com>
4 * Alex Zuepke <azu@sysgo.de>
5 *
6 * See file CREDITS for list of people who contributed to this
7 * project.
8 *
9 * This program is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU General Public License as
11 * published by the Free Software Foundation; either version 2 of
12 * the License, or (at your option) any later version.
13 *
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
18 *
19 * You should have received a copy of the GNU General Public License
20 * along with this program; if not, write to the Free Software
21 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
22 * MA 02111-1307 USA
23 */
24
25#include <common.h>
26
wdenkce4832c2004-10-17 21:12:06 +000027ulong myflush (void);
wdenkea8015b2002-10-26 16:43:06 +000028
29
30#define FLASH_BANK_SIZE PHYS_FLASH_SIZE
wdenkce4832c2004-10-17 21:12:06 +000031#define MAIN_SECT_SIZE 0x10000 /* 64 KB */
wdenkea8015b2002-10-26 16:43:06 +000032
Jean-Christophe PLAGNIOL-VILLARD03836942008-10-16 15:01:15 +020033flash_info_t flash_info[CONFIG_SYS_MAX_FLASH_BANKS];
wdenkea8015b2002-10-26 16:43:06 +000034
35
36#define CMD_READ_ARRAY 0x000000F0
37#define CMD_UNLOCK1 0x000000AA
38#define CMD_UNLOCK2 0x00000055
39#define CMD_ERASE_SETUP 0x00000080
40#define CMD_ERASE_CONFIRM 0x00000030
41#define CMD_PROGRAM 0x000000A0
42#define CMD_UNLOCK_BYPASS 0x00000020
43
Jean-Christophe PLAGNIOL-VILLARD03836942008-10-16 15:01:15 +020044#define MEM_FLASH_ADDR1 (*(volatile u16 *)(CONFIG_SYS_FLASH_BASE + (0x00000555 << 1)))
45#define MEM_FLASH_ADDR2 (*(volatile u16 *)(CONFIG_SYS_FLASH_BASE + (0x000002AA << 1)))
wdenkea8015b2002-10-26 16:43:06 +000046
47#define BIT_ERASE_DONE 0x00000080
48#define BIT_RDY_MASK 0x00000080
49#define BIT_PROGRAM_ERROR 0x00000020
wdenkce4832c2004-10-17 21:12:06 +000050#define BIT_TIMEOUT 0x80000000 /* our flag */
wdenkea8015b2002-10-26 16:43:06 +000051
52#define READY 1
53#define ERR 2
54#define TMO 4
55
56/*-----------------------------------------------------------------------
57 */
58
wdenkce4832c2004-10-17 21:12:06 +000059ulong flash_init (void)
wdenkea8015b2002-10-26 16:43:06 +000060{
wdenkce4832c2004-10-17 21:12:06 +000061 int i, j;
62 ulong size = 0;
wdenkea8015b2002-10-26 16:43:06 +000063
Jean-Christophe PLAGNIOL-VILLARD03836942008-10-16 15:01:15 +020064 for (i = 0; i < CONFIG_SYS_MAX_FLASH_BANKS; i++) {
wdenkce4832c2004-10-17 21:12:06 +000065 ulong flashbase = 0;
66
67 flash_info[i].flash_id =
wdenkea8015b2002-10-26 16:43:06 +000068#if defined(CONFIG_AMD_LV400)
wdenkce4832c2004-10-17 21:12:06 +000069 (AMD_MANUFACT & FLASH_VENDMASK) |
70 (AMD_ID_LV400B & FLASH_TYPEMASK);
wdenkea8015b2002-10-26 16:43:06 +000071#elif defined(CONFIG_AMD_LV800)
wdenkce4832c2004-10-17 21:12:06 +000072 (AMD_MANUFACT & FLASH_VENDMASK) |
73 (AMD_ID_LV800B & FLASH_TYPEMASK);
wdenkea8015b2002-10-26 16:43:06 +000074#else
75#error "Unknown flash configured"
76#endif
wdenkce4832c2004-10-17 21:12:06 +000077 flash_info[i].size = FLASH_BANK_SIZE;
Jean-Christophe PLAGNIOL-VILLARD03836942008-10-16 15:01:15 +020078 flash_info[i].sector_count = CONFIG_SYS_MAX_FLASH_SECT;
79 memset (flash_info[i].protect, 0, CONFIG_SYS_MAX_FLASH_SECT);
wdenkce4832c2004-10-17 21:12:06 +000080 if (i == 0)
81 flashbase = PHYS_FLASH_1;
82 else
83 panic ("configured too many flash banks!\n");
84 for (j = 0; j < flash_info[i].sector_count; j++) {
85 if (j <= 3) {
86 /* 1st one is 16 KB */
87 if (j == 0) {
88 flash_info[i].start[j] =
89 flashbase + 0;
90 }
wdenkea8015b2002-10-26 16:43:06 +000091
wdenkce4832c2004-10-17 21:12:06 +000092 /* 2nd and 3rd are both 8 KB */
93 if ((j == 1) || (j == 2)) {
94 flash_info[i].start[j] =
95 flashbase + 0x4000 + (j -
96 1) *
97 0x2000;
98 }
wdenkea8015b2002-10-26 16:43:06 +000099
wdenkce4832c2004-10-17 21:12:06 +0000100 /* 4th 32 KB */
101 if (j == 3) {
102 flash_info[i].start[j] =
103 flashbase + 0x8000;
104 }
105 } else {
106 flash_info[i].start[j] =
107 flashbase + (j - 3) * MAIN_SECT_SIZE;
108 }
wdenkea8015b2002-10-26 16:43:06 +0000109 }
wdenkce4832c2004-10-17 21:12:06 +0000110 size += flash_info[i].size;
wdenkea8015b2002-10-26 16:43:06 +0000111 }
wdenkea8015b2002-10-26 16:43:06 +0000112
wdenkce4832c2004-10-17 21:12:06 +0000113 flash_protect (FLAG_PROTECT_SET,
Jean-Christophe PLAGNIOL-VILLARD03836942008-10-16 15:01:15 +0200114 CONFIG_SYS_FLASH_BASE,
115 CONFIG_SYS_FLASH_BASE + monitor_flash_len - 1,
wdenkce4832c2004-10-17 21:12:06 +0000116 &flash_info[0]);
wdenkea8015b2002-10-26 16:43:06 +0000117
wdenkce4832c2004-10-17 21:12:06 +0000118 flash_protect (FLAG_PROTECT_SET,
Jean-Christophe PLAGNIOL-VILLARD7e1cda62008-09-10 22:48:06 +0200119 CONFIG_ENV_ADDR,
120 CONFIG_ENV_ADDR + CONFIG_ENV_SIZE - 1, &flash_info[0]);
wdenkea8015b2002-10-26 16:43:06 +0000121
wdenkce4832c2004-10-17 21:12:06 +0000122 return size;
wdenkea8015b2002-10-26 16:43:06 +0000123}
124
125/*-----------------------------------------------------------------------
126 */
wdenkce4832c2004-10-17 21:12:06 +0000127void flash_print_info (flash_info_t * info)
wdenkea8015b2002-10-26 16:43:06 +0000128{
wdenkce4832c2004-10-17 21:12:06 +0000129 int i;
wdenkea8015b2002-10-26 16:43:06 +0000130
wdenkce4832c2004-10-17 21:12:06 +0000131 switch (info->flash_id & FLASH_VENDMASK) {
132 case (AMD_MANUFACT & FLASH_VENDMASK):
133 printf ("AMD: ");
134 break;
135 default:
136 printf ("Unknown Vendor ");
137 break;
138 }
wdenkea8015b2002-10-26 16:43:06 +0000139
wdenkce4832c2004-10-17 21:12:06 +0000140 switch (info->flash_id & FLASH_TYPEMASK) {
141 case (AMD_ID_LV400B & FLASH_TYPEMASK):
142 printf ("1x Amd29LV400BB (4Mbit)\n");
143 break;
144 case (AMD_ID_LV800B & FLASH_TYPEMASK):
145 printf ("1x Amd29LV800BB (8Mbit)\n");
146 break;
147 default:
148 printf ("Unknown Chip Type\n");
149 goto Done;
150 break;
151 }
wdenkea8015b2002-10-26 16:43:06 +0000152
wdenkce4832c2004-10-17 21:12:06 +0000153 printf (" Size: %ld MB in %d Sectors\n",
154 info->size >> 20, info->sector_count);
wdenkea8015b2002-10-26 16:43:06 +0000155
wdenkce4832c2004-10-17 21:12:06 +0000156 printf (" Sector Start Addresses:");
157 for (i = 0; i < info->sector_count; i++) {
158 if ((i % 5) == 0) {
159 printf ("\n ");
160 }
161 printf (" %08lX%s", info->start[i],
162 info->protect[i] ? " (RO)" : " ");
wdenkea8015b2002-10-26 16:43:06 +0000163 }
wdenkce4832c2004-10-17 21:12:06 +0000164 printf ("\n");
wdenkea8015b2002-10-26 16:43:06 +0000165
wdenkce4832c2004-10-17 21:12:06 +0000166 Done:;
wdenkea8015b2002-10-26 16:43:06 +0000167}
168
169/*-----------------------------------------------------------------------
170 */
171
wdenkce4832c2004-10-17 21:12:06 +0000172int flash_erase (flash_info_t * info, int s_first, int s_last)
wdenkea8015b2002-10-26 16:43:06 +0000173{
wdenkce4832c2004-10-17 21:12:06 +0000174 ushort result;
175 int iflag, cflag, prot, sect;
176 int rc = ERR_OK;
177 int chip;
wdenkea8015b2002-10-26 16:43:06 +0000178
wdenkce4832c2004-10-17 21:12:06 +0000179 /* first look for protection bits */
wdenkea8015b2002-10-26 16:43:06 +0000180
wdenkce4832c2004-10-17 21:12:06 +0000181 if (info->flash_id == FLASH_UNKNOWN)
182 return ERR_UNKNOWN_FLASH_TYPE;
wdenkea8015b2002-10-26 16:43:06 +0000183
wdenkce4832c2004-10-17 21:12:06 +0000184 if ((s_first < 0) || (s_first > s_last)) {
185 return ERR_INVAL;
186 }
wdenkea8015b2002-10-26 16:43:06 +0000187
wdenkce4832c2004-10-17 21:12:06 +0000188 if ((info->flash_id & FLASH_VENDMASK) !=
189 (AMD_MANUFACT & FLASH_VENDMASK)) {
190 return ERR_UNKNOWN_FLASH_VENDOR;
191 }
wdenkea8015b2002-10-26 16:43:06 +0000192
wdenkce4832c2004-10-17 21:12:06 +0000193 prot = 0;
194 for (sect = s_first; sect <= s_last; ++sect) {
195 if (info->protect[sect]) {
196 prot++;
197 }
wdenkea8015b2002-10-26 16:43:06 +0000198 }
wdenkce4832c2004-10-17 21:12:06 +0000199 if (prot)
200 return ERR_PROTECTED;
wdenkea8015b2002-10-26 16:43:06 +0000201
wdenkce4832c2004-10-17 21:12:06 +0000202 /*
203 * Disable interrupts which might cause a timeout
204 * here. Remember that our exception vectors are
205 * at address 0 in the flash, and we don't want a
206 * (ticker) exception to happen while the flash
207 * chip is in programming mode.
208 */
209 cflag = icache_status ();
210 icache_disable ();
211 iflag = disable_interrupts ();
wdenkea8015b2002-10-26 16:43:06 +0000212
wdenkce4832c2004-10-17 21:12:06 +0000213 /* Start erase on unprotected sectors */
214 for (sect = s_first; sect <= s_last && !ctrlc (); sect++) {
215 printf ("Erasing sector %2d ... ", sect);
wdenkea8015b2002-10-26 16:43:06 +0000216
wdenkce4832c2004-10-17 21:12:06 +0000217 /* arm simple, non interrupt dependent timer */
218 reset_timer_masked ();
wdenkea8015b2002-10-26 16:43:06 +0000219
wdenkce4832c2004-10-17 21:12:06 +0000220 if (info->protect[sect] == 0) { /* not protected */
221 vu_short *addr = (vu_short *) (info->start[sect]);
wdenkea8015b2002-10-26 16:43:06 +0000222
wdenkce4832c2004-10-17 21:12:06 +0000223 MEM_FLASH_ADDR1 = CMD_UNLOCK1;
224 MEM_FLASH_ADDR2 = CMD_UNLOCK2;
225 MEM_FLASH_ADDR1 = CMD_ERASE_SETUP;
wdenkea8015b2002-10-26 16:43:06 +0000226
wdenkce4832c2004-10-17 21:12:06 +0000227 MEM_FLASH_ADDR1 = CMD_UNLOCK1;
228 MEM_FLASH_ADDR2 = CMD_UNLOCK2;
229 *addr = CMD_ERASE_CONFIRM;
wdenkea8015b2002-10-26 16:43:06 +0000230
wdenkce4832c2004-10-17 21:12:06 +0000231 /* wait until flash is ready */
232 chip = 0;
wdenkea8015b2002-10-26 16:43:06 +0000233
wdenkce4832c2004-10-17 21:12:06 +0000234 do {
235 result = *addr;
wdenkea8015b2002-10-26 16:43:06 +0000236
wdenkce4832c2004-10-17 21:12:06 +0000237 /* check timeout */
238 if (get_timer_masked () >
Jean-Christophe PLAGNIOL-VILLARD03836942008-10-16 15:01:15 +0200239 CONFIG_SYS_FLASH_ERASE_TOUT) {
wdenkce4832c2004-10-17 21:12:06 +0000240 MEM_FLASH_ADDR1 = CMD_READ_ARRAY;
241 chip = TMO;
242 break;
243 }
wdenkea8015b2002-10-26 16:43:06 +0000244
wdenkce4832c2004-10-17 21:12:06 +0000245 if (!chip
246 && (result & 0xFFFF) & BIT_ERASE_DONE)
247 chip = READY;
wdenkea8015b2002-10-26 16:43:06 +0000248
wdenkce4832c2004-10-17 21:12:06 +0000249 if (!chip
250 && (result & 0xFFFF) & BIT_PROGRAM_ERROR)
251 chip = ERR;
wdenkea8015b2002-10-26 16:43:06 +0000252
wdenkce4832c2004-10-17 21:12:06 +0000253 } while (!chip);
wdenkea8015b2002-10-26 16:43:06 +0000254
wdenkce4832c2004-10-17 21:12:06 +0000255 MEM_FLASH_ADDR1 = CMD_READ_ARRAY;
wdenkea8015b2002-10-26 16:43:06 +0000256
wdenkce4832c2004-10-17 21:12:06 +0000257 if (chip == ERR) {
258 rc = ERR_PROG_ERROR;
259 goto outahere;
260 }
261 if (chip == TMO) {
262 rc = ERR_TIMOUT;
263 goto outahere;
264 }
wdenkea8015b2002-10-26 16:43:06 +0000265
wdenkce4832c2004-10-17 21:12:06 +0000266 printf ("ok.\n");
267 } else { /* it was protected */
268
269 printf ("protected!\n");
270 }
wdenkea8015b2002-10-26 16:43:06 +0000271 }
wdenkea8015b2002-10-26 16:43:06 +0000272
wdenkce4832c2004-10-17 21:12:06 +0000273 if (ctrlc ())
274 printf ("User Interrupt!\n");
wdenkea8015b2002-10-26 16:43:06 +0000275
wdenkce4832c2004-10-17 21:12:06 +0000276 outahere:
277 /* allow flash to settle - wait 10 ms */
278 udelay_masked (10000);
wdenkea8015b2002-10-26 16:43:06 +0000279
wdenkce4832c2004-10-17 21:12:06 +0000280 if (iflag)
281 enable_interrupts ();
wdenkea8015b2002-10-26 16:43:06 +0000282
wdenkce4832c2004-10-17 21:12:06 +0000283 if (cflag)
284 icache_enable ();
wdenkea8015b2002-10-26 16:43:06 +0000285
wdenkce4832c2004-10-17 21:12:06 +0000286 return rc;
wdenkea8015b2002-10-26 16:43:06 +0000287}
288
289/*-----------------------------------------------------------------------
290 * Copy memory to flash
291 */
292
Wolfgang Denka923f112007-11-18 17:11:09 +0100293static int write_hword (flash_info_t * info, ulong dest, ushort data)
wdenkea8015b2002-10-26 16:43:06 +0000294{
wdenkce4832c2004-10-17 21:12:06 +0000295 vu_short *addr = (vu_short *) dest;
296 ushort result;
297 int rc = ERR_OK;
298 int cflag, iflag;
299 int chip;
wdenkea8015b2002-10-26 16:43:06 +0000300
wdenkce4832c2004-10-17 21:12:06 +0000301 /*
302 * Check if Flash is (sufficiently) erased
303 */
304 result = *addr;
305 if ((result & data) != data)
306 return ERR_NOT_ERASED;
wdenkea8015b2002-10-26 16:43:06 +0000307
wdenkea8015b2002-10-26 16:43:06 +0000308
wdenkce4832c2004-10-17 21:12:06 +0000309 /*
310 * Disable interrupts which might cause a timeout
311 * here. Remember that our exception vectors are
312 * at address 0 in the flash, and we don't want a
313 * (ticker) exception to happen while the flash
314 * chip is in programming mode.
315 */
316 cflag = icache_status ();
317 icache_disable ();
318 iflag = disable_interrupts ();
wdenkea8015b2002-10-26 16:43:06 +0000319
wdenkce4832c2004-10-17 21:12:06 +0000320 MEM_FLASH_ADDR1 = CMD_UNLOCK1;
321 MEM_FLASH_ADDR2 = CMD_UNLOCK2;
322 MEM_FLASH_ADDR1 = CMD_UNLOCK_BYPASS;
323 *addr = CMD_PROGRAM;
324 *addr = data;
wdenkea8015b2002-10-26 16:43:06 +0000325
wdenkce4832c2004-10-17 21:12:06 +0000326 /* arm simple, non interrupt dependent timer */
327 reset_timer_masked ();
wdenkea8015b2002-10-26 16:43:06 +0000328
wdenkce4832c2004-10-17 21:12:06 +0000329 /* wait until flash is ready */
330 chip = 0;
331 do {
wdenkea8015b2002-10-26 16:43:06 +0000332 result = *addr;
333
wdenkce4832c2004-10-17 21:12:06 +0000334 /* check timeout */
Jean-Christophe PLAGNIOL-VILLARD03836942008-10-16 15:01:15 +0200335 if (get_timer_masked () > CONFIG_SYS_FLASH_ERASE_TOUT) {
wdenkce4832c2004-10-17 21:12:06 +0000336 chip = ERR | TMO;
337 break;
338 }
339 if (!chip && ((result & 0x80) == (data & 0x80)))
wdenkea8015b2002-10-26 16:43:06 +0000340 chip = READY;
wdenkea8015b2002-10-26 16:43:06 +0000341
wdenkce4832c2004-10-17 21:12:06 +0000342 if (!chip && ((result & 0xFFFF) & BIT_PROGRAM_ERROR)) {
343 result = *addr;
wdenkea8015b2002-10-26 16:43:06 +0000344
wdenkce4832c2004-10-17 21:12:06 +0000345 if ((result & 0x80) == (data & 0x80))
346 chip = READY;
347 else
348 chip = ERR;
349 }
350
351 } while (!chip);
352
353 *addr = CMD_READ_ARRAY;
wdenkea8015b2002-10-26 16:43:06 +0000354
wdenkce4832c2004-10-17 21:12:06 +0000355 if (chip == ERR || *addr != data)
356 rc = ERR_PROG_ERROR;
wdenkea8015b2002-10-26 16:43:06 +0000357
wdenkce4832c2004-10-17 21:12:06 +0000358 if (iflag)
359 enable_interrupts ();
wdenkea8015b2002-10-26 16:43:06 +0000360
wdenkce4832c2004-10-17 21:12:06 +0000361 if (cflag)
362 icache_enable ();
wdenkea8015b2002-10-26 16:43:06 +0000363
wdenkce4832c2004-10-17 21:12:06 +0000364 return rc;
wdenkea8015b2002-10-26 16:43:06 +0000365}
366
367/*-----------------------------------------------------------------------
368 * Copy memory to flash.
369 */
370
wdenkce4832c2004-10-17 21:12:06 +0000371int write_buff (flash_info_t * info, uchar * src, ulong addr, ulong cnt)
wdenkea8015b2002-10-26 16:43:06 +0000372{
wdenkce4832c2004-10-17 21:12:06 +0000373 ulong cp, wp;
374 int l;
375 int i, rc;
376 ushort data;
wdenkea8015b2002-10-26 16:43:06 +0000377
wdenkce4832c2004-10-17 21:12:06 +0000378 wp = (addr & ~1); /* get lower word aligned address */
wdenkea8015b2002-10-26 16:43:06 +0000379
wdenkce4832c2004-10-17 21:12:06 +0000380 /*
381 * handle unaligned start bytes
382 */
383 if ((l = addr - wp) != 0) {
384 data = 0;
385 for (i = 0, cp = wp; i < l; ++i, ++cp) {
386 data = (data >> 8) | (*(uchar *) cp << 8);
387 }
388 for (; i < 2 && cnt > 0; ++i) {
389 data = (data >> 8) | (*src++ << 8);
390 --cnt;
391 ++cp;
392 }
393 for (; cnt == 0 && i < 2; ++i, ++cp) {
394 data = (data >> 8) | (*(uchar *) cp << 8);
395 }
wdenkea8015b2002-10-26 16:43:06 +0000396
wdenkce4832c2004-10-17 21:12:06 +0000397 if ((rc = write_hword (info, wp, data)) != 0) {
398 return (rc);
399 }
400 wp += 2;
wdenkea8015b2002-10-26 16:43:06 +0000401 }
wdenkea8015b2002-10-26 16:43:06 +0000402
wdenkce4832c2004-10-17 21:12:06 +0000403 /*
404 * handle word aligned part
405 */
406 while (cnt >= 2) {
407 data = *((vu_short *) src);
408 if ((rc = write_hword (info, wp, data)) != 0) {
409 return (rc);
410 }
411 src += 2;
412 wp += 2;
413 cnt -= 2;
wdenkea8015b2002-10-26 16:43:06 +0000414 }
wdenkea8015b2002-10-26 16:43:06 +0000415
wdenkce4832c2004-10-17 21:12:06 +0000416 if (cnt == 0) {
417 return ERR_OK;
418 }
wdenkea8015b2002-10-26 16:43:06 +0000419
wdenkce4832c2004-10-17 21:12:06 +0000420 /*
421 * handle unaligned tail bytes
422 */
423 data = 0;
424 for (i = 0, cp = wp; i < 2 && cnt > 0; ++i, ++cp) {
425 data = (data >> 8) | (*src++ << 8);
426 --cnt;
427 }
428 for (; i < 2; ++i, ++cp) {
429 data = (data >> 8) | (*(uchar *) cp << 8);
430 }
wdenkea8015b2002-10-26 16:43:06 +0000431
wdenkce4832c2004-10-17 21:12:06 +0000432 return write_hword (info, wp, data);
wdenkea8015b2002-10-26 16:43:06 +0000433}