3 * Kyle Harris, Nexus Technologies, Inc. kharris@nexus-tech.net
6 * Sysgo Real-Time Solutions, GmbH <www.elinos.com>
7 * Marius Groeger <mgroeger@sysgo.de>
10 * Robert Schwebel, Pengutronix, <r.schwebel@pengutronix.de>
12 * See file CREDITS for list of people who contributed to this
15 * This program is free software; you can redistribute it and/or
16 * modify it under the terms of the GNU General Public License as
17 * published by the Free Software Foundation; either version 2 of
18 * the License, or (at your option) any later version.
20 * This program is distributed in the hope that it will be useful,
21 * but WITHOUT ANY WARRANTY; without even the implied warranty of
22 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
23 * GNU General Public License for more details.
25 * You should have received a copy of the GNU General Public License
26 * along with this program; if not, write to the Free Software
27 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
32 #include <asm/arch/pxa-regs.h>
34 #define FLASH_BANK_SIZE 0x02000000
35 #define MAIN_SECT_SIZE 0x40000 /* 2x16 = 256k per sector */
37 flash_info_t flash_info[CFG_MAX_FLASH_BANKS];
41 * flash_init: - initialize data structures for flash chips
43 * @return: size of the flash
46 ulong flash_init(void)
51 for (i = 0; i < CFG_MAX_FLASH_BANKS; i++) {
53 flash_info[i].flash_id =
54 (INTEL_MANUFACT & FLASH_VENDMASK) |
55 (INTEL_ID_28F128J3 & FLASH_TYPEMASK);
56 flash_info[i].size = FLASH_BANK_SIZE;
57 flash_info[i].sector_count = CFG_MAX_FLASH_SECT;
58 memset(flash_info[i].protect, 0, CFG_MAX_FLASH_SECT);
62 flashbase = PHYS_FLASH_1;
65 panic("configured to many flash banks!\n");
68 for (j = 0; j < flash_info[i].sector_count; j++) {
69 flash_info[i].start[j] = flashbase + j*MAIN_SECT_SIZE;
71 size += flash_info[i].size;
74 /* Protect monitor and environment sectors */
75 flash_protect(FLAG_PROTECT_SET,
77 CFG_FLASH_BASE + _armboot_end_data - _armboot_start,
80 #ifdef CFG_ENV_IS_IN_FLASH
81 flash_protect(FLAG_PROTECT_SET,
83 CFG_ENV_ADDR + CFG_ENV_SIZE - 1,
92 * flash_print_info: - print information about the flash situation
97 void flash_print_info (flash_info_t *info)
101 for (j=0; j<CFG_MAX_FLASH_BANKS; j++) {
103 switch (info->flash_id & FLASH_VENDMASK) {
105 case (INTEL_MANUFACT & FLASH_VENDMASK):
109 printf("Unknown Vendor ");
113 switch (info->flash_id & FLASH_TYPEMASK) {
115 case (INTEL_ID_28F128J3 & FLASH_TYPEMASK):
116 printf("28F128J3 (128Mbit)\n");
119 printf("Unknown Chip Type\n");
123 printf(" Size: %ld MB in %d Sectors\n",
124 info->size >> 20, info->sector_count);
126 printf(" Sector Start Addresses:");
127 for (i = 0; i < info->sector_count; i++) {
128 if ((i % 5) == 0) printf ("\n ");
130 printf (" %08lX%s", info->start[i],
131 info->protect[i] ? " (RO)" : " ");
140 * flash_erase: - erase flash sectors
144 int flash_erase(flash_info_t *info, int s_first, int s_last)
146 int flag, prot, sect;
149 if (info->flash_id == FLASH_UNKNOWN)
150 return ERR_UNKNOWN_FLASH_TYPE;
152 if ((s_first < 0) || (s_first > s_last)) {
156 if ((info->flash_id & FLASH_VENDMASK) != (INTEL_MANUFACT & FLASH_VENDMASK))
157 return ERR_UNKNOWN_FLASH_VENDOR;
160 for (sect=s_first; sect<=s_last; ++sect) {
161 if (info->protect[sect]) prot++;
164 if (prot) return ERR_PROTECTED;
167 * Disable interrupts which might cause a timeout
168 * here. Remember that our exception vectors are
169 * at address 0 in the flash, and we don't want a
170 * (ticker) exception to happen while the flash
171 * chip is in programming mode.
174 flag = disable_interrupts();
176 /* Start erase on unprotected sectors */
177 for (sect = s_first; sect<=s_last && !ctrlc(); sect++) {
179 printf("Erasing sector %2d ... ", sect);
181 /* arm simple, non interrupt dependent timer */
182 reset_timer_masked();
184 if (info->protect[sect] == 0) { /* not protected */
185 u32 * volatile addr = (u32 * volatile)(info->start[sect]);
188 /* The strata flashs are aligned side by side on */
189 /* the data bus, so we have to write the commands */
190 /* to both chips here: */
192 *addr = 0x00200020; /* erase setup */
193 *addr = 0x00D000D0; /* erase confirm */
195 while ((*addr & 0x00800080) != 0x00800080) {
196 if (get_timer_masked() > CFG_FLASH_ERASE_TOUT) {
197 *addr = 0x00B000B0; /* suspend erase*/
198 *addr = 0x00FF00FF; /* read mode */
204 *addr = 0x00500050; /* clear status register cmd. */
205 *addr = 0x00FF00FF; /* resest to read mode */
212 if (ctrlc()) printf("User Interrupt!\n");
216 /* allow flash to settle - wait 10 ms */
217 udelay_masked(10000);
219 if (flag) enable_interrupts();
226 * write_word: - copy memory to flash
234 static int write_word (flash_info_t *info, ulong dest, ushort data)
236 ushort *addr = (ushort *)dest, val;
240 /* Check if Flash is (sufficiently) erased */
241 if ((*addr & data) != data) return ERR_NOT_ERASED;
244 * Disable interrupts which might cause a timeout
245 * here. Remember that our exception vectors are
246 * at address 0 in the flash, and we don't want a
247 * (ticker) exception to happen while the flash
248 * chip is in programming mode.
250 flag = disable_interrupts();
252 /* clear status register command */
255 /* program set-up command */
258 /* latch address/data */
261 /* arm simple, non interrupt dependent timer */
262 reset_timer_masked();
264 /* wait while polling the status register */
265 while(((val = *addr) & 0x80) != 0x80) {
266 if (get_timer_masked() > CFG_FLASH_WRITE_TOUT) {
268 *addr = 0xB0; /* suspend program command */
273 if(val & 0x1A) { /* check for error */
274 printf("\nFlash write error %02x at address %08lx\n",
275 (int)val, (unsigned long)dest);
277 printf("Voltage range error.\n");
282 printf("Device protect error.\n");
287 printf("Programming error.\n");
297 *addr = 0xFF; /* read array command */
298 if (flag) enable_interrupts();
305 * write_buf: - Copy memory to flash.
308 * @param src: source of copy transaction
309 * @param addr: where to copy to
310 * @param cnt: number of bytes to copy
315 int write_buff (flash_info_t *info, uchar *src, ulong addr, ulong cnt)
322 wp = (addr & ~1); /* get lower word aligned address */
325 * handle unaligned start bytes
327 if ((l = addr - wp) != 0) {
329 for (i=0, cp=wp; i<l; ++i, ++cp) {
330 data = (data >> 8) | (*(uchar *)cp << 8);
332 for (; i<2 && cnt>0; ++i) {
333 data = (data >> 8) | (*src++ << 8);
337 for (; cnt==0 && i<2; ++i, ++cp) {
338 data = (data >> 8) | (*(uchar *)cp << 8);
341 if ((rc = write_word(info, wp, data)) != 0) {
348 * handle word aligned part
351 /* data = *((vushort*)src); */
352 data = *((ushort*)src);
353 if ((rc = write_word(info, wp, data)) != 0) {
361 if (cnt == 0) return ERR_OK;
364 * handle unaligned tail bytes
367 for (i=0, cp=wp; i<2 && cnt>0; ++i, ++cp) {
368 data = (data >> 8) | (*src++ << 8);
371 for (; i<2; ++i, ++cp) {
372 data = (data >> 8) | (*(uchar *)cp << 8);
375 return write_word(info, wp, data);