blob: 376930bd3cbf4b448fe5dd6b261c06b6fa7b4c34 [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
wdenke86e5a02004-10-17 21:12:06 +000027ulong myflush (void);
wdenkea8015b2002-10-26 16:43:06 +000028
29
30#define FLASH_BANK_SIZE PHYS_FLASH_SIZE
wdenke86e5a02004-10-17 21:12:06 +000031#define MAIN_SECT_SIZE 0x10000 /* 64 KB */
wdenkea8015b2002-10-26 16:43:06 +000032
wdenke86e5a02004-10-17 21:12:06 +000033flash_info_t flash_info[CFG_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
44#define MEM_FLASH_ADDR1 (*(volatile u16 *)(CFG_FLASH_BASE + (0x00000555 << 1)))
45#define MEM_FLASH_ADDR2 (*(volatile u16 *)(CFG_FLASH_BASE + (0x000002AA << 1)))
46
47#define BIT_ERASE_DONE 0x00000080
48#define BIT_RDY_MASK 0x00000080
49#define BIT_PROGRAM_ERROR 0x00000020
wdenke86e5a02004-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
wdenke86e5a02004-10-17 21:12:06 +000059ulong flash_init (void)
wdenkea8015b2002-10-26 16:43:06 +000060{
wdenke86e5a02004-10-17 21:12:06 +000061 int i, j;
62 ulong size = 0;
wdenkea8015b2002-10-26 16:43:06 +000063
wdenke86e5a02004-10-17 21:12:06 +000064 for (i = 0; i < CFG_MAX_FLASH_BANKS; i++) {
65 ulong flashbase = 0;
66
67 flash_info[i].flash_id =
wdenkea8015b2002-10-26 16:43:06 +000068#if defined(CONFIG_AMD_LV400)
wdenke86e5a02004-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)
wdenke86e5a02004-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
wdenke86e5a02004-10-17 21:12:06 +000077 flash_info[i].size = FLASH_BANK_SIZE;
78 flash_info[i].sector_count = CFG_MAX_FLASH_SECT;
79 memset (flash_info[i].protect, 0, CFG_MAX_FLASH_SECT);
80 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
wdenke86e5a02004-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
wdenke86e5a02004-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 }
wdenke86e5a02004-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
wdenke86e5a02004-10-17 21:12:06 +0000113 flash_protect (FLAG_PROTECT_SET,
114 CFG_FLASH_BASE,
115 CFG_FLASH_BASE + monitor_flash_len - 1,
116 &flash_info[0]);
wdenkea8015b2002-10-26 16:43:06 +0000117
wdenke86e5a02004-10-17 21:12:06 +0000118 flash_protect (FLAG_PROTECT_SET,
119 CFG_ENV_ADDR,
120 CFG_ENV_ADDR + CFG_ENV_SIZE - 1, &flash_info[0]);
wdenkea8015b2002-10-26 16:43:06 +0000121
wdenke86e5a02004-10-17 21:12:06 +0000122 return size;
wdenkea8015b2002-10-26 16:43:06 +0000123}
124
125/*-----------------------------------------------------------------------
126 */
wdenke86e5a02004-10-17 21:12:06 +0000127void flash_print_info (flash_info_t * info)
wdenkea8015b2002-10-26 16:43:06 +0000128{
wdenke86e5a02004-10-17 21:12:06 +0000129 int i;
wdenkea8015b2002-10-26 16:43:06 +0000130
wdenke86e5a02004-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;
wdenkea8015b2002-10-26 16:43:06 +0000138 }
wdenkea8015b2002-10-26 16:43:06 +0000139
wdenke86e5a02004-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 }
152
153 printf (" Size: %ld MB in %d Sectors\n",
154 info->size >> 20, info->sector_count);
155
156 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)" : " ");
163 }
164 printf ("\n");
165
166 Done:;
wdenkea8015b2002-10-26 16:43:06 +0000167}
168
169/*-----------------------------------------------------------------------
170 */
171
wdenke86e5a02004-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{
wdenke86e5a02004-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
wdenke86e5a02004-10-17 21:12:06 +0000179 /* first look for protection bits */
wdenkea8015b2002-10-26 16:43:06 +0000180
wdenke86e5a02004-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
wdenke86e5a02004-10-17 21:12:06 +0000184 if ((s_first < 0) || (s_first > s_last)) {
185 return ERR_INVAL;
wdenkea8015b2002-10-26 16:43:06 +0000186 }
wdenkea8015b2002-10-26 16:43:06 +0000187
wdenke86e5a02004-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
wdenke86e5a02004-10-17 21:12:06 +0000193 prot = 0;
194 for (sect = s_first; sect <= s_last; ++sect) {
195 if (info->protect[sect]) {
196 prot++;
wdenkea8015b2002-10-26 16:43:06 +0000197 }
wdenkea8015b2002-10-26 16:43:06 +0000198 }
wdenke86e5a02004-10-17 21:12:06 +0000199 if (prot)
200 return ERR_PROTECTED;
201
202 /*
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 ();
212
213 /* Start erase on unprotected sectors */
214 for (sect = s_first; sect <= s_last && !ctrlc (); sect++) {
215 printf ("Erasing sector %2d ... ", sect);
216
217 /* arm simple, non interrupt dependent timer */
218 reset_timer_masked ();
219
220 if (info->protect[sect] == 0) { /* not protected */
221 vu_short *addr = (vu_short *) (info->start[sect]);
222
223 MEM_FLASH_ADDR1 = CMD_UNLOCK1;
224 MEM_FLASH_ADDR2 = CMD_UNLOCK2;
225 MEM_FLASH_ADDR1 = CMD_ERASE_SETUP;
226
227 MEM_FLASH_ADDR1 = CMD_UNLOCK1;
228 MEM_FLASH_ADDR2 = CMD_UNLOCK2;
229 *addr = CMD_ERASE_CONFIRM;
230
231 /* wait until flash is ready */
232 chip = 0;
233
234 do {
235 result = *addr;
236
237 /* check timeout */
238 if (get_timer_masked () >
239 CFG_FLASH_ERASE_TOUT) {
240 MEM_FLASH_ADDR1 = CMD_READ_ARRAY;
241 chip = TMO;
242 break;
243 }
244
245 if (!chip
246 && (result & 0xFFFF) & BIT_ERASE_DONE)
247 chip = READY;
248
249 if (!chip
250 && (result & 0xFFFF) & BIT_PROGRAM_ERROR)
251 chip = ERR;
252
253 } while (!chip);
254
255 MEM_FLASH_ADDR1 = CMD_READ_ARRAY;
256
257 if (chip == ERR) {
258 rc = ERR_PROG_ERROR;
259 goto outahere;
260 }
261 if (chip == TMO) {
262 rc = ERR_TIMOUT;
263 goto outahere;
264 }
265
266 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
wdenke86e5a02004-10-17 21:12:06 +0000273 if (ctrlc ())
274 printf ("User Interrupt!\n");
wdenkea8015b2002-10-26 16:43:06 +0000275
wdenke86e5a02004-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
wdenke86e5a02004-10-17 21:12:06 +0000280 if (iflag)
281 enable_interrupts ();
wdenkea8015b2002-10-26 16:43:06 +0000282
wdenke86e5a02004-10-17 21:12:06 +0000283 if (cflag)
284 icache_enable ();
wdenkea8015b2002-10-26 16:43:06 +0000285
wdenke86e5a02004-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 Denk8412d812007-11-18 17:11:09 +0100293static int write_hword (flash_info_t * info, ulong dest, ushort data)
wdenkea8015b2002-10-26 16:43:06 +0000294{
wdenke86e5a02004-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
wdenke86e5a02004-10-17 21:12:06 +0000301 /*
302 * Check if Flash is (sufficiently) erased
303 */
wdenkea8015b2002-10-26 16:43:06 +0000304 result = *addr;
wdenke86e5a02004-10-17 21:12:06 +0000305 if ((result & data) != data)
306 return ERR_NOT_ERASED;
wdenkea8015b2002-10-26 16:43:06 +0000307
wdenkea8015b2002-10-26 16:43:06 +0000308
wdenke86e5a02004-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 ();
319
320 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;
325
326 /* arm simple, non interrupt dependent timer */
327 reset_timer_masked ();
328
329 /* wait until flash is ready */
330 chip = 0;
331 do {
wdenkea8015b2002-10-26 16:43:06 +0000332 result = *addr;
333
wdenke86e5a02004-10-17 21:12:06 +0000334 /* check timeout */
335 if (get_timer_masked () > CFG_FLASH_ERASE_TOUT) {
336 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
wdenke86e5a02004-10-17 21:12:06 +0000342 if (!chip && ((result & 0xFFFF) & BIT_PROGRAM_ERROR)) {
343 result = *addr;
wdenkea8015b2002-10-26 16:43:06 +0000344
wdenke86e5a02004-10-17 21:12:06 +0000345 if ((result & 0x80) == (data & 0x80))
346 chip = READY;
347 else
348 chip = ERR;
349 }
wdenkea8015b2002-10-26 16:43:06 +0000350
wdenke86e5a02004-10-17 21:12:06 +0000351 } while (!chip);
wdenkea8015b2002-10-26 16:43:06 +0000352
wdenke86e5a02004-10-17 21:12:06 +0000353 *addr = CMD_READ_ARRAY;
wdenkea8015b2002-10-26 16:43:06 +0000354
wdenke86e5a02004-10-17 21:12:06 +0000355 if (chip == ERR || *addr != data)
356 rc = ERR_PROG_ERROR;
wdenkea8015b2002-10-26 16:43:06 +0000357
wdenke86e5a02004-10-17 21:12:06 +0000358 if (iflag)
359 enable_interrupts ();
360
361 if (cflag)
362 icache_enable ();
363
364 return rc;
wdenkea8015b2002-10-26 16:43:06 +0000365}
366
367/*-----------------------------------------------------------------------
368 * Copy memory to flash.
369 */
370
wdenke86e5a02004-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{
wdenke86e5a02004-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
wdenke86e5a02004-10-17 21:12:06 +0000378 wp = (addr & ~1); /* get lower word aligned address */
wdenkea8015b2002-10-26 16:43:06 +0000379
wdenke86e5a02004-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 }
396
397 if ((rc = write_hword (info, wp, data)) != 0) {
398 return (rc);
399 }
400 wp += 2;
401 }
402
403 /*
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;
414 }
415
416 if (cnt == 0) {
417 return ERR_OK;
418 }
419
420 /*
421 * handle unaligned tail bytes
422 */
wdenkea8015b2002-10-26 16:43:06 +0000423 data = 0;
wdenke86e5a02004-10-17 21:12:06 +0000424 for (i = 0, cp = wp; i < 2 && cnt > 0; ++i, ++cp) {
425 data = (data >> 8) | (*src++ << 8);
426 --cnt;
wdenkea8015b2002-10-26 16:43:06 +0000427 }
wdenke86e5a02004-10-17 21:12:06 +0000428 for (; i < 2; ++i, ++cp) {
429 data = (data >> 8) | (*(uchar *) cp << 8);
wdenkea8015b2002-10-26 16:43:06 +0000430 }
431
wdenke86e5a02004-10-17 21:12:06 +0000432 return write_hword (info, wp, data);
wdenkea8015b2002-10-26 16:43:06 +0000433}