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,
28 #if defined(CONFIG_ENV_IS_IN_FLASH)
29 # ifndef CONFIG_ENV_ADDR
30 # define CONFIG_ENV_ADDR (CONFIG_SYS_FLASH_BASE + CONFIG_ENV_OFFSET)
32 # ifndef CONFIG_ENV_SIZE
33 # define CONFIG_ENV_SIZE CONFIG_ENV_SECT_SIZE
35 # ifndef CONFIG_ENV_SECT_SIZE
36 # define CONFIG_ENV_SECT_SIZE CONFIG_ENV_SIZE
41 /*---------------------------------------------------------------------*/
45 #define DEBUGF(fmt,args...) printf(fmt ,##args)
47 #define DEBUGF(fmt,args...)
49 /*---------------------------------------------------------------------*/
51 flash_info_t flash_info
[CONFIG_SYS_MAX_FLASH_BANKS
]; /* info for FLASH chips */
53 /*-----------------------------------------------------------------------
56 static ulong
flash_get_size (vu_char
*addr
, flash_info_t
*info
);
57 static int write_data (flash_info_t
*info
, uchar
*dest
, uchar data
);
58 static void flash_get_offsets (ulong base
, flash_info_t
*info
);
61 #define BYTEME(x) ((x) & 0xFF)
63 /*-----------------------------------------------------------------------
66 unsigned long flash_init (void)
68 unsigned long flash_banks
[CONFIG_SYS_MAX_FLASH_BANKS
] = CONFIG_SYS_FLASH_BANKS
;
69 unsigned long size
, size_b
[CONFIG_SYS_MAX_FLASH_BANKS
];
73 /* Init: no FLASHes known */
74 for (i
=0; i
<CONFIG_SYS_MAX_FLASH_BANKS
; ++i
)
76 flash_info
[i
].flash_id
= FLASH_UNKNOWN
;
78 DEBUGF("Get flash bank %d @ 0x%08lx\n", i
, flash_banks
[i
]);
80 size_b[i] = flash_get_size((vu_char *)flash_banks[i], &flash_info[i]);
82 size_b
[i
] = flash_get_size((vu_char
*) 0xff800000 , &flash_info
[i
]);
84 if (flash_info
[i
].flash_id
== FLASH_UNKNOWN
)
86 printf ("## Unknown FLASH on Bank %d: "
87 "ID 0x%lx, Size = 0x%08lx = %ld MB\n",
88 i
, flash_info
[i
].flash_id
,
89 size_b
[i
], size_b
[i
]<<20);
93 DEBUGF("## Flash bank %d at 0x%08lx sizes: 0x%08lx \n",
94 i
, flash_banks
[i
], size_b
[i
]);
96 flash_get_offsets (flash_banks
[i
], &flash_info
[i
]);
97 flash_info
[i
].size
= size_b
[i
];
102 #if CONFIG_SYS_MONITOR_BASE >= CONFIG_SYS_FLASH_BASE
103 DEBUGF("protect monitor %x @ %x\n", CONFIG_SYS_MONITOR_BASE
, CONFIG_SYS_MONITOR_LEN
);
104 /* monitor protection ON by default */
105 flash_protect(FLAG_PROTECT_SET
,
106 CONFIG_SYS_MONITOR_BASE
,
107 CONFIG_SYS_MONITOR_BASE
+CONFIG_SYS_MONITOR_LEN
-1,
111 #ifdef CONFIG_ENV_IS_IN_FLASH
112 /* ENV protection ON by default */
113 DEBUGF("protect environtment %x @ %x\n", CONFIG_ENV_ADDR
, CONFIG_ENV_SECT_SIZE
);
114 flash_protect(FLAG_PROTECT_SET
,
116 CONFIG_ENV_ADDR
+CONFIG_ENV_SECT_SIZE
-1,
121 DEBUGF("## Final Flash bank sizes: ");
122 for (i
=0; i
<CONFIG_SYS_MAX_FLASH_BANKS
; ++i
)
124 DEBUGF("%08lx ", size_b
[i
]);
131 /*-----------------------------------------------------------------------
133 static void flash_get_offsets (ulong base
, flash_info_t
*info
)
137 if (info
->flash_id
== FLASH_UNKNOWN
) {
141 switch (info
->flash_id
& FLASH_VENDMASK
) {
142 case FLASH_MAN_INTEL
:
143 for (i
= 0; i
< info
->sector_count
; i
++) {
144 info
->start
[i
] = base
;
145 base
+= 0x00020000; /* 128k per bank */
150 printf ("Don't know sector ofsets for flash type 0x%lx\n", info
->flash_id
);
155 /*-----------------------------------------------------------------------
157 void flash_print_info (flash_info_t
*info
)
161 if (info
->flash_id
== FLASH_UNKNOWN
) {
162 printf ("missing or unknown FLASH type\n");
166 switch (info
->flash_id
& FLASH_VENDMASK
) {
167 case FLASH_MAN_AMD
: printf ("AMD "); break;
168 case FLASH_MAN_FUJ
: printf ("Fujitsu "); break;
169 case FLASH_MAN_SST
: printf ("SST "); break;
170 case FLASH_MAN_STM
: printf ("STM "); break;
171 case FLASH_MAN_INTEL
: printf ("Intel "); break;
172 case FLASH_MAN_MT
: printf ("MT "); break;
173 default: printf ("Unknown Vendor "); break;
176 switch (info
->flash_id
& FLASH_TYPEMASK
) {
177 case FLASH_28F320J3A
:
178 printf ("28F320J3A (32Mbit = 128K x 32)\n");
180 case FLASH_28F640J3A
:
181 printf ("28F640J3A (64Mbit = 128K x 64)\n");
183 case FLASH_28F128J3A
:
184 printf ("28F128J3A (128Mbit = 128K x 128)\n");
187 printf ("Unknown Chip Type\n");
192 if (info
->size
>= (1 << 20)) {
197 printf (" Size: %ld %cB in %d Sectors\n",
199 (i
== 20) ? 'M' : 'k',
202 printf (" Sector Start Addresses:");
203 for (i
=0; i
<info
->sector_count
; ++i
) {
208 info
->protect
[i
] ? " (RO)" : " "
216 /*-----------------------------------------------------------------------
220 /*-----------------------------------------------------------------------
224 * The following code cannot be run from FLASH!
226 static ulong
flash_get_size (vu_char
*addr
, flash_info_t
*info
)
228 vu_char manuf
, device
;
232 DEBUGF("Manuf. ID @ 0x%08lx: 0x%08x\n", (ulong
)addr
, manuf
);
235 case BYTEME(AMD_MANUFACT
):
236 info
->flash_id
= FLASH_MAN_AMD
;
238 case BYTEME(FUJ_MANUFACT
):
239 info
->flash_id
= FLASH_MAN_FUJ
;
241 case BYTEME(SST_MANUFACT
):
242 info
->flash_id
= FLASH_MAN_SST
;
244 case BYTEME(STM_MANUFACT
):
245 info
->flash_id
= FLASH_MAN_STM
;
247 case BYTEME(INTEL_MANUFACT
):
248 info
->flash_id
= FLASH_MAN_INTEL
;
251 info
->flash_id
= FLASH_UNKNOWN
;
252 info
->sector_count
= 0;
254 addr
[0] = BS(0xFF); /* restore read mode, (yes, BS is a NOP) */
255 return 0; /* no or unknown flash */
258 device
= BS(addr
[2]); /* device ID */
260 DEBUGF("Device ID @ 0x%08lx: 0x%08x\n", (ulong
)(&addr
[1]), device
);
263 case BYTEME(INTEL_ID_28F320J3A
):
264 info
->flash_id
+= FLASH_28F320J3A
;
265 info
->sector_count
= 32;
266 info
->size
= 0x00400000;
269 case BYTEME(INTEL_ID_28F640J3A
):
270 info
->flash_id
+= FLASH_28F640J3A
;
271 info
->sector_count
= 64;
272 info
->size
= 0x00800000;
275 case BYTEME(INTEL_ID_28F128J3A
):
276 info
->flash_id
+= FLASH_28F128J3A
;
277 info
->sector_count
= 128;
278 info
->size
= 0x01000000;
279 break; /* => 16 MB */
282 info
->flash_id
= FLASH_UNKNOWN
;
283 addr
[0] = BS(0xFF); /* restore read mode (yes, a NOP) */
284 return 0; /* => no or unknown flash */
288 if (info
->sector_count
> CONFIG_SYS_MAX_FLASH_SECT
) {
289 printf ("** ERROR: sector count %d > max (%d) **\n",
290 info
->sector_count
, CONFIG_SYS_MAX_FLASH_SECT
);
291 info
->sector_count
= CONFIG_SYS_MAX_FLASH_SECT
;
294 addr
[0] = BS(0xFF); /* restore read mode */
300 /*-----------------------------------------------------------------------
303 int flash_erase (flash_info_t
*info
, int s_first
, int s_last
)
305 int flag
, prot
, sect
;
306 ulong start
, now
, last
;
308 if ((s_first
< 0) || (s_first
> s_last
)) {
309 if (info
->flash_id
== FLASH_UNKNOWN
) {
310 printf ("- missing\n");
312 printf ("- no sectors to erase\n");
317 if ((info
->flash_id
& FLASH_VENDMASK
) != FLASH_MAN_INTEL
) {
318 printf ("Can erase only Intel flash types - aborted\n");
323 for (sect
=s_first
; sect
<=s_last
; ++sect
) {
324 if (info
->protect
[sect
]) {
330 printf ("- Warning: %d protected sectors will not be erased!\n", prot
);
335 start
= get_timer (0);
337 /* Start erase on unprotected sectors */
338 for (sect
= s_first
; sect
<=s_last
; sect
++) {
339 if (info
->protect
[sect
] == 0) { /* not protected */
340 vu_char
*addr
= (vu_char
*)(info
->start
[sect
]);
341 unsigned long status
;
343 /* Disable interrupts which might cause a timeout here */
344 flag
= disable_interrupts();
346 *addr
= BS(0x50); /* clear status register */
347 *addr
= BS(0x20); /* erase setup */
348 *addr
= BS(0xD0); /* erase confirm */
350 /* re-enable interrupts if necessary */
355 /* wait at least 80us - let's wait 1 ms */
358 while (((status
= BS(*addr
)) & BYTEME(0x00800080)) != BYTEME(0x00800080)) {
359 if ((now
=get_timer(start
)) > CONFIG_SYS_FLASH_ERASE_TOUT
) {
360 printf ("Timeout\n");
361 *addr
= BS(0xB0); /* suspend erase */
362 *addr
= BS(0xFF); /* reset to read mode */
366 /* show that we're waiting */
367 if ((now
- last
) > 1000) { /* every second */
373 *addr
= BS(0xFF); /* reset to read mode */
380 /*-----------------------------------------------------------------------
381 * Copy memory to flash, returns:
384 * 2 - Flash not erased
385 * 4 - Flash not identified
388 #define FLASH_WIDTH 1 /* flash bus width in bytes */
390 int write_buff (flash_info_t
*info
, uchar
*src
, ulong addr
, ulong cnt
)
392 uchar
*wp
= (uchar
*)addr
;
395 if (info
->flash_id
== FLASH_UNKNOWN
) {
400 if ((rc
= write_data(info
, wp
, *src
)) != 0) {
411 /*-----------------------------------------------------------------------
412 * Write a word to Flash, returns:
415 * 2 - Flash not erased
417 static int write_data (flash_info_t
*info
, uchar
*dest
, uchar data
)
419 vu_char
*addr
= (vu_char
*)dest
;
424 /* Check if Flash is (sufficiently) erased */
425 if ((BS(*addr
) & data
) != data
) {
428 /* Disable interrupts which might cause a timeout here */
429 flag
= disable_interrupts();
431 *addr
= BS(0x40); /* write setup */
434 /* re-enable interrupts if necessary */
439 start
= get_timer (0);
441 while (((status
= BS(*addr
)) & BYTEME(0x00800080)) != BYTEME(0x00800080)) {
442 if (get_timer(start
) > CONFIG_SYS_FLASH_WRITE_TOUT
) {
443 *addr
= BS(0xFF); /* restore read mode */
448 *addr
= BS(0xFF); /* restore read mode */
453 /*-----------------------------------------------------------------------