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>
9 * See file CREDITS for list of people who contributed to this
12 * This program is free software; you can redistribute it and/or
13 * modify it under the terms of the GNU General Public License as
14 * published by the Free Software Foundation; either version 2 of
15 * the License, or (at your option) any later version.
17 * This program is distributed in the hope that it will be useful,
18 * but WITHOUT ANY WARRANTY; without even the implied warranty of
19 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20 * GNU General Public License for more details.
22 * You should have received a copy of the GNU General Public License
23 * along with this program; if not, write to the Free Software
24 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
30 #define FLASH_BANK_SIZE 0x400000
31 #define MAIN_SECT_SIZE 0x20000
33 flash_info_t flash_info[CONFIG_SYS_MAX_FLASH_BANKS];
36 /*-----------------------------------------------------------------------
39 ulong flash_init (void)
44 for (i = 0; i < CONFIG_SYS_MAX_FLASH_BANKS; i++) {
47 flash_info[i].flash_id =
48 (INTEL_MANUFACT & FLASH_VENDMASK) |
49 (INTEL_ID_28F128J3 & FLASH_TYPEMASK);
50 flash_info[i].size = FLASH_BANK_SIZE;
51 flash_info[i].sector_count = CONFIG_SYS_MAX_FLASH_SECT;
52 memset (flash_info[i].protect, 0, CONFIG_SYS_MAX_FLASH_SECT);
55 flashbase = PHYS_FLASH_1;
58 flashbase = PHYS_FLASH_2;
61 panic ("configured too many flash banks!\n");
64 for (j = 0; j < flash_info[i].sector_count; j++) {
65 flash_info[i].start[j] =
66 flashbase + j * MAIN_SECT_SIZE;
68 size += flash_info[i].size;
71 /* Protect monitor and environment sectors
73 flash_protect (FLAG_PROTECT_SET,
74 CONFIG_SYS_FLASH_BASE,
75 CONFIG_SYS_FLASH_BASE + monitor_flash_len - 1,
78 flash_protect (FLAG_PROTECT_SET,
80 CONFIG_ENV_ADDR + CONFIG_ENV_SIZE - 1, &flash_info[0]);
85 /*-----------------------------------------------------------------------
87 void flash_print_info (flash_info_t * info)
91 for (j = 0; j < CONFIG_SYS_MAX_FLASH_BANKS; j++) {
92 switch (info->flash_id & FLASH_VENDMASK) {
93 case (INTEL_MANUFACT & FLASH_VENDMASK):
97 printf ("Unknown Vendor ");
101 switch (info->flash_id & FLASH_TYPEMASK) {
102 case (INTEL_ID_28F320J3A & FLASH_TYPEMASK):
103 printf ("28F320J3A (32Mbit)\n");
105 case (INTEL_ID_28F128J3 & FLASH_TYPEMASK):
106 printf ("28F128J3 (128Mbit)\n");
109 printf ("Unknown Chip Type\n");
114 printf (" Size: %ld MB in %d Sectors\n",
115 info->size >> 20, info->sector_count);
117 printf (" Sector Start Addresses:");
118 for (i = 0; i < info->sector_count; i++) {
122 printf (" %08lX%s", info->start[i],
123 info->protect[i] ? " (RO)" : " ");
132 /*-----------------------------------------------------------------------
135 int flash_erase (flash_info_t * info, int s_first, int s_last)
137 int flag, prot, sect;
141 if (info->flash_id == FLASH_UNKNOWN)
142 return ERR_UNKNOWN_FLASH_TYPE;
144 if ((s_first < 0) || (s_first > s_last)) {
148 if ((info->flash_id & FLASH_VENDMASK) !=
149 (INTEL_MANUFACT & FLASH_VENDMASK)) {
150 return ERR_UNKNOWN_FLASH_VENDOR;
154 for (sect = s_first; sect <= s_last; ++sect) {
155 if (info->protect[sect]) {
160 return ERR_PROTECTED;
163 * Disable interrupts which might cause a timeout
164 * here. Remember that our exception vectors are
165 * at address 0 in the flash, and we don't want a
166 * (ticker) exception to happen while the flash
167 * chip is in programming mode.
169 flag = disable_interrupts ();
171 /* Start erase on unprotected sectors */
172 for (sect = s_first; sect <= s_last && !ctrlc (); sect++) {
174 printf ("Erasing sector %2d ... ", sect);
176 /* arm simple, non interrupt dependent timer */
177 start = get_timer(0);
179 if (info->protect[sect] == 0) { /* not protected */
180 vu_short *addr = (vu_short *) (info->start[sect]);
182 *addr = 0x20; /* erase setup */
183 *addr = 0xD0; /* erase confirm */
185 while ((*addr & 0x80) != 0x80) {
186 if (get_timer(start) >
187 CONFIG_SYS_FLASH_ERASE_TOUT) {
188 *addr = 0xB0; /* suspend erase */
189 *addr = 0xFF; /* reset to read mode */
195 /* clear status register command */
197 /* reset to read mode */
203 printf ("User Interrupt!\n");
207 /* allow flash to settle - wait 10 ms */
208 udelay_masked (10000);
211 enable_interrupts ();
216 /*-----------------------------------------------------------------------
217 * Copy memory to flash
220 static int write_word (flash_info_t * info, ulong dest, ushort data)
222 vu_short *addr = (vu_short *) dest, val;
227 /* Check if Flash is (sufficiently) erased
229 if ((*addr & data) != data)
230 return ERR_NOT_ERASED;
233 * Disable interrupts which might cause a timeout
234 * here. Remember that our exception vectors are
235 * at address 0 in the flash, and we don't want a
236 * (ticker) exception to happen while the flash
237 * chip is in programming mode.
239 flag = disable_interrupts ();
241 /* clear status register command */
244 /* program set-up command */
247 /* latch address/data */
250 /* arm simple, non interrupt dependent timer */
251 start = get_timer(0);
253 /* wait while polling the status register */
254 while (((val = *addr) & 0x80) != 0x80) {
255 if (get_timer(start) > CONFIG_SYS_FLASH_WRITE_TOUT) {
257 /* suspend program command */
263 if (val & 0x1A) { /* check for error */
264 printf ("\nFlash write error %02x at address %08lx\n",
265 (int) val, (unsigned long) dest);
266 if (val & (1 << 3)) {
267 printf ("Voltage range error.\n");
271 if (val & (1 << 1)) {
272 printf ("Device protect error.\n");
276 if (val & (1 << 4)) {
277 printf ("Programming error.\n");
286 /* read array command */
290 enable_interrupts ();
295 /*-----------------------------------------------------------------------
296 * Copy memory to flash.
299 int write_buff (flash_info_t * info, uchar * src, ulong addr, ulong cnt)
306 wp = (addr & ~1); /* get lower word aligned address */
309 * handle unaligned start bytes
311 if ((l = addr - wp) != 0) {
313 for (i = 0, cp = wp; i < l; ++i, ++cp) {
314 data = (data >> 8) | (*(uchar *) cp << 8);
316 for (; i < 2 && cnt > 0; ++i) {
317 data = (data >> 8) | (*src++ << 8);
321 for (; cnt == 0 && i < 2; ++i, ++cp) {
322 data = (data >> 8) | (*(uchar *) cp << 8);
325 if ((rc = write_word (info, wp, data)) != 0) {
332 * handle word aligned part
335 data = *((vu_short *) src);
336 if ((rc = write_word (info, wp, data)) != 0) {
349 * handle unaligned tail bytes
352 for (i = 0, cp = wp; i < 2 && cnt > 0; ++i, ++cp) {
353 data = (data >> 8) | (*src++ << 8);
356 for (; i < 2; ++i, ++cp) {
357 data = (data >> 8) | (*(uchar *) cp << 8);
360 return write_word (info, wp, data);