blob: 8f56a30b4884a3bc998e679fb7940a67872b0b29 [file] [log] [blame]
wdenk4a551702003-10-08 23:26:14 +00001/*
wdenkc935d3b2004-01-03 19:43:48 +00002 * (C) Copyright 2000-2004
wdenk4a551702003-10-08 23:26:14 +00003 * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
4 *
Wolfgang Denk1a459662013-07-08 09:37:19 +02005 * SPDX-License-Identifier: GPL-2.0+
wdenk4a551702003-10-08 23:26:14 +00006 */
7
8
9#include <common.h>
10#include <nios.h>
11
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +020012flash_info_t flash_info[CONFIG_SYS_MAX_FLASH_BANKS];
wdenk4a551702003-10-08 23:26:14 +000013
wdenk4a551702003-10-08 23:26:14 +000014/*--------------------------------------------------------------------*/
15void flash_print_info (flash_info_t * info)
16{
17 int i, k;
18 unsigned long size;
19 int erased;
20 volatile unsigned char *flash;
21
22 printf (" Size: %ld KB in %d Sectors\n",
23 info->size >> 10, info->sector_count);
24 printf (" Sector Start Addresses:");
25 for (i = 0; i < info->sector_count; ++i) {
26
27 /* Check if whole sector is erased */
28 if (i != (info->sector_count - 1))
29 size = info->start[i + 1] - info->start[i];
30 else
31 size = info->start[0] + info->size - info->start[i];
32 erased = 1;
33 flash = (volatile unsigned char *) info->start[i];
34 for (k = 0; k < size; k++) {
35 if (*flash++ != 0xff) {
36 erased = 0;
37 break;
38 }
39 }
40
41 /* Print the info */
42 if ((i % 5) == 0)
43 printf ("\n ");
44 printf (" %08lX%s%s", info->start[i], erased ? " E" : " ",
45 info->protect[i] ? "RO " : " ");
46 }
47 printf ("\n");
48}
49
50/*-------------------------------------------------------------------*/
51
52
53int flash_erase (flash_info_t * info, int s_first, int s_last)
54{
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +020055 volatile CONFIG_SYS_FLASH_WORD_SIZE *addr = (CONFIG_SYS_FLASH_WORD_SIZE *) (info->start[0]);
56 volatile CONFIG_SYS_FLASH_WORD_SIZE *addr2;
wdenk4a551702003-10-08 23:26:14 +000057 int prot, sect;
wdenk4a551702003-10-08 23:26:14 +000058 unsigned oldpri;
59 ulong start;
60
61 /* Some sanity checking */
62 if ((s_first < 0) || (s_first > s_last)) {
63 printf ("- no sectors to erase\n");
64 return 1;
65 }
66
67 prot = 0;
68 for (sect = s_first; sect <= s_last; ++sect) {
69 if (info->protect[sect]) {
70 prot++;
71 }
72 }
73 if (prot) {
74 printf ("- Warning: %d protected sectors will not be erased!\n",
75 prot);
76 } else {
77 printf ("\n");
78 }
79
wdenkec4c5442004-02-09 23:12:24 +000080#ifdef DEBUG
81 for (sect = s_first; sect <= s_last; sect++) {
82 printf("- Erase: Sect: %i @ 0x%08x\n", sect, info->start[sect]);
83 }
84#endif
85
wdenk4a551702003-10-08 23:26:14 +000086 /* NOTE: disabling interrupts on Nios can be very bad since it
87 * also disables the LO_LIMIT exception. It's better here to
88 * set the interrupt priority to 3 & restore it when we're done.
89 */
90 oldpri = ipri (3);
91
92 /* It's ok to erase multiple sectors provided we don't delay more
93 * than 50 usec between cmds ... at which point the erase time-out
94 * occurs. So don't go and put printf() calls in the loop ... it
95 * won't be very helpful ;-)
96 */
97 for (sect = s_first; sect <= s_last; sect++) {
98 if (info->protect[sect] == 0) { /* not protected */
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +020099 addr2 = (CONFIG_SYS_FLASH_WORD_SIZE *) (info->start[sect]);
wdenk4a551702003-10-08 23:26:14 +0000100 *addr = 0xaa;
101 *addr = 0x55;
102 *addr = 0x80;
103 *addr = 0xaa;
104 *addr = 0x55;
105 *addr2 = 0x30;
wdenkec4c5442004-02-09 23:12:24 +0000106 /* Now just wait for 0xff & provide some user
107 * feedback while we wait. Here we have to grant
108 * timer interrupts. Otherwise get_timer() can't
109 * work right. */
110 ipri(oldpri);
111 start = get_timer (0);
112 while (*addr2 != 0xff) {
113 udelay (1000 * 1000);
114 putc ('.');
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200115 if (get_timer (start) > CONFIG_SYS_FLASH_ERASE_TOUT) {
wdenkec4c5442004-02-09 23:12:24 +0000116 printf ("timeout\n");
117 return 1;
118 }
119 }
120 oldpri = ipri (3); /* disallow non important irqs again */
wdenk4a551702003-10-08 23:26:14 +0000121 }
122 }
123
wdenkec4c5442004-02-09 23:12:24 +0000124 printf ("\n");
wdenk4a551702003-10-08 23:26:14 +0000125
126 /* Restore interrupt priority */
127 ipri (oldpri);
128
129 return 0;
130}
131
132/*-----------------------------------------------------------------------
133 * Copy memory to flash, returns:
134 * 0 - OK
135 * 1 - write timeout
136 * 2 - Flash not erased
137 */
138
139int write_buff (flash_info_t * info, uchar * src, ulong addr, ulong cnt)
140{
141
142 vu_char *cmd = (vu_char *) info->start[0];
143 vu_char *dst = (vu_char *) addr;
144 unsigned char b;
145 unsigned oldpri;
146 ulong start;
147
148 while (cnt) {
149 /* Check for sufficient erase */
150 b = *src;
151 if ((*dst & b) != b) {
152 printf ("%02x : %02x\n", *dst, b);
153 return (2);
154 }
155
156 /* Disable interrupts other than window underflow
157 * (interrupt priority 2)
158 */
159 oldpri = ipri (3);
160 *cmd = 0xaa;
161 *cmd = 0x55;
162 *cmd = 0xa0;
163 *dst = b;
164
165 /* Verify write */
166 start = get_timer (0);
167 while (*dst != b) {
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200168 if (get_timer (start) > CONFIG_SYS_FLASH_WRITE_TOUT) {
wdenk4a551702003-10-08 23:26:14 +0000169 ipri (oldpri);
170 return 1;
171 }
172 }
173 dst++;
174 src++;
175 cnt--;
176 ipri (oldpri);
177 }
178
179 return (0);
180}