blob: 8e4c0e2fd77150bbdd27601ccd17cb0df3b26c28 [file] [log] [blame]
Stefan Roese779e9752007-08-14 14:44:41 +02001/*
2 * (C) Copyright 2007
3 * Stefan Roese, DENX Software Engineering, sr@denx.de.
4 *
5 * See file CREDITS for list of people who contributed to this
6 * project.
7 *
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.
12 *
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.
17 *
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,
21 * MA 02111-1307 USA
22 */
23
24#include <common.h>
25#include <command.h>
26#include <malloc.h>
27#include <environment.h>
28#include <logbuff.h>
29#include <post.h>
30
31#include <asm/processor.h>
32#include <asm/io.h>
33#include <asm/gpio.h>
34
35DECLARE_GLOBAL_DATA_PTR;
36
37#define REBOOT_MAGIC 0x07081967
38#define REBOOT_NOP 0x00000000
39#define REBOOT_DO_POST 0x00000001
40
41extern flash_info_t flash_info[CFG_MAX_FLASH_BANKS]; /* info for FLASH chips */
42extern env_t *env_ptr;
43extern uchar default_environment[];
44
45ulong flash_get_size(ulong base, int banknum);
46void env_crc_update(void);
47int do_reset (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
48
49static u32 start_time;
50
51int board_early_init_f(void)
52{
53 mtdcr(uicsr, 0xFFFFFFFF); /* clear all ints */
54 mtdcr(uicer, 0x00000000); /* disable all ints */
55 mtdcr(uiccr, 0x00000000);
56 mtdcr(uicpr, 0xFFFF7F00); /* set int polarities */
57 mtdcr(uictr, 0x00000000); /* set int trigger levels */
58 mtdcr(uicsr, 0xFFFFFFFF); /* clear all ints */
59 mtdcr(uicvcr, 0x00000001); /* set vect base=0,INT0 highest priority */
60
61 /*
62 * Configure CPC0_PCI to enable PerWE as output
63 */
64 mtdcr(cpc0_pci, CPC0_PCI_SPE);
65
66 return 0;
67}
68
69int misc_init_r(void)
70{
71 u32 pbcr;
72 int size_val = 0;
73 u32 post_magic;
74 u32 post_val;
75
76 post_magic = in_be32((void *)CFG_POST_MAGIC);
77 post_val = in_be32((void *)CFG_POST_VAL);
78 if ((post_magic == REBOOT_MAGIC) && (post_val == REBOOT_DO_POST)) {
79 /*
80 * Set special bootline bootparameter to pass this POST boot
81 * mode to Linux to reset the username/password
82 */
83 setenv("addmisc", "setenv bootargs \\${bootargs} factory_reset=yes");
84
85 /*
86 * Normally don't run POST tests, only when enabled
87 * via the sw-reset button. So disable further tests
88 * upon next bootup here.
89 */
90 out_be32((void *)CFG_POST_VAL, REBOOT_NOP);
91 } else {
92 /*
93 * Only run POST when initiated via the sw-reset button mechanism
94 */
95 post_word_store(0);
96 }
97
98 /*
99 * Get current time
100 */
101 start_time = get_timer(0);
102
103 /*
104 * FLASH stuff...
105 */
106
107 /* Re-do sizing to get full correct info */
108
109 /* adjust flash start and offset */
110 mfebc(pb0cr, pbcr);
111 switch (gd->bd->bi_flashsize) {
112 case 1 << 20:
113 size_val = 0;
114 break;
115 case 2 << 20:
116 size_val = 1;
117 break;
118 case 4 << 20:
119 size_val = 2;
120 break;
121 case 8 << 20:
122 size_val = 3;
123 break;
124 case 16 << 20:
125 size_val = 4;
126 break;
127 case 32 << 20:
128 size_val = 5;
129 break;
130 case 64 << 20:
131 size_val = 6;
132 break;
133 case 128 << 20:
134 size_val = 7;
135 break;
136 }
137 pbcr = (pbcr & 0x0001ffff) | gd->bd->bi_flashstart | (size_val << 17);
138 mtebc(pb0cr, pbcr);
139
140 /*
141 * Re-check to get correct base address
142 */
143 flash_get_size(gd->bd->bi_flashstart, 0);
144
145 /* Monitor protection ON by default */
146 (void)flash_protect(FLAG_PROTECT_SET,
147 -CFG_MONITOR_LEN,
148 0xffffffff,
149 &flash_info[0]);
150
151 /* Env protection ON by default */
152 (void)flash_protect(FLAG_PROTECT_SET,
Jean-Christophe PLAGNIOL-VILLARD0e8d1582008-09-10 22:48:06 +0200153 CONFIG_ENV_ADDR_REDUND,
154 CONFIG_ENV_ADDR_REDUND + 2*CONFIG_ENV_SECT_SIZE - 1,
Stefan Roese779e9752007-08-14 14:44:41 +0200155 &flash_info[0]);
156
157 return 0;
158}
159
160/*
161 * Check Board Identity:
162 */
163int checkboard(void)
164{
165 char *s = getenv("serial#");
166
167 puts("Board: Zeus-");
168
169 if (in_be32((void *)GPIO0_IR) & GPIO_VAL(CFG_GPIO_ZEUS_PE))
170 puts("PE");
171 else
172 puts("CE");
173
174 puts(" of BulletEndPoint");
175
176 if (s != NULL) {
177 puts(", serial# ");
178 puts(s);
179 }
180 putc('\n');
181
182 /* both LED's off */
183 gpio_write_bit(CFG_GPIO_LED_RED, 0);
184 gpio_write_bit(CFG_GPIO_LED_GREEN, 0);
185 udelay(10000);
186 /* and on again */
187 gpio_write_bit(CFG_GPIO_LED_RED, 1);
188 gpio_write_bit(CFG_GPIO_LED_GREEN, 1);
189
190 return (0);
191}
192
193static u32 detect_sdram_size(void)
194{
195 u32 val;
196 u32 size;
197
198 mfsdram(mem_mb0cf, val);
199 size = (4 << 20) << ((val & 0x000e0000) >> 17);
200
201 /*
202 * Check if 2nd bank is enabled too
203 */
204 mfsdram(mem_mb1cf, val);
205 if (val & 1)
206 size += (4 << 20) << ((val & 0x000e0000) >> 17);
207
208 return size;
209}
210
Becky Bruce9973e3c2008-06-09 16:03:40 -0500211phys_size_t initdram (int board_type)
Stefan Roese779e9752007-08-14 14:44:41 +0200212{
213 return detect_sdram_size();
214}
215
Stefan Roese779e9752007-08-14 14:44:41 +0200216static int default_env_var(char *buf, char *var)
217{
218 char *ptr;
219 char *val;
220
221 /*
222 * Find env variable
223 */
224 ptr = strstr(buf + 4, var);
225 if (ptr == NULL) {
226 printf("ERROR: %s not found!\n", var);
227 return -1;
228 }
229 ptr += strlen(var) + 1;
230
231 /*
232 * Now the ethaddr needs to be updated in the "normal"
233 * environment storage -> redundant flash.
234 */
235 val = ptr;
236 setenv(var, val);
237 printf("Updated %s from eeprom to %s!\n", var, val);
238
239 return 0;
240}
241
242static int restore_default(void)
243{
244 char *buf;
245 char *buf_save;
246 u32 crc;
247
248 /*
249 * Unprotect and erase environment area
250 */
251 flash_protect(FLAG_PROTECT_CLEAR,
Jean-Christophe PLAGNIOL-VILLARD0e8d1582008-09-10 22:48:06 +0200252 CONFIG_ENV_ADDR_REDUND,
253 CONFIG_ENV_ADDR_REDUND + 2*CONFIG_ENV_SECT_SIZE - 1,
Stefan Roese779e9752007-08-14 14:44:41 +0200254 &flash_info[0]);
255
Jean-Christophe PLAGNIOL-VILLARD0e8d1582008-09-10 22:48:06 +0200256 flash_sect_erase(CONFIG_ENV_ADDR_REDUND,
257 CONFIG_ENV_ADDR_REDUND + 2*CONFIG_ENV_SECT_SIZE - 1);
Stefan Roese779e9752007-08-14 14:44:41 +0200258
259 /*
260 * Now restore default environment from U-Boot image
261 * -> ipaddr, serverip...
262 */
263 memset(env_ptr, 0, sizeof(env_t));
264 memcpy(env_ptr->data, default_environment, ENV_SIZE);
265#ifdef CFG_REDUNDAND_ENVIRONMENT
266 env_ptr->flags = 0xFF;
267#endif
268 env_crc_update();
269 gd->env_valid = 1;
270
271 /*
272 * Read board specific values from I2C EEPROM
273 * and set env variables accordingly
274 * -> ethaddr, eth1addr, serial#
275 */
276 buf = buf_save = malloc(FACTORY_RESET_ENV_SIZE);
277 if (eeprom_read(FACTORY_RESET_I2C_EEPROM, FACTORY_RESET_ENV_OFFS,
278 (u8 *)buf, FACTORY_RESET_ENV_SIZE)) {
279 puts("\nError reading EEPROM!\n");
280 } else {
281 crc = crc32(0, (u8 *)(buf + 4), FACTORY_RESET_ENV_SIZE - 4);
282 if (crc != *(u32 *)buf) {
Stefan Roeseb0021442008-07-10 09:58:06 +0200283 printf("ERROR: crc mismatch %08x %08x\n", crc, *(u32 *)buf);
Stefan Roese779e9752007-08-14 14:44:41 +0200284 return -1;
285 }
286
287 default_env_var(buf, "ethaddr");
288 buf += 8 + 18;
289 default_env_var(buf, "eth1addr");
290 buf += 9 + 18;
291 default_env_var(buf, "serial#");
292 }
293
294 /*
295 * Finally save updated env variables back to flash
296 */
297 saveenv();
298
299 free(buf_save);
300
301 return 0;
302}
303
304int do_set_default(cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
305{
306 char *buf;
307 char *buf_save;
308 char str[32];
309 u32 crc;
310 char var[32];
311
312 if (argc < 4) {
313 puts("ERROR!\n");
314 return -1;
315 }
316
317 buf = buf_save = malloc(FACTORY_RESET_ENV_SIZE);
318 memset(buf, 0, FACTORY_RESET_ENV_SIZE);
319
320 strcpy(var, "ethaddr");
321 printf("Setting %s to %s\n", var, argv[1]);
322 sprintf(str, "%s=%s", var, argv[1]);
323 strcpy(buf + 4, str);
324 buf += strlen(str) + 1;
325
326 strcpy(var, "eth1addr");
327 printf("Setting %s to %s\n", var, argv[2]);
328 sprintf(str, "%s=%s", var, argv[2]);
329 strcpy(buf + 4, str);
330 buf += strlen(str) + 1;
331
332 strcpy(var, "serial#");
333 printf("Setting %s to %s\n", var, argv[3]);
334 sprintf(str, "%s=%s", var, argv[3]);
335 strcpy(buf + 4, str);
336
337 crc = crc32(0, (u8 *)(buf_save + 4), FACTORY_RESET_ENV_SIZE - 4);
338 *(u32 *)buf_save = crc;
339
340 if (eeprom_write(FACTORY_RESET_I2C_EEPROM, FACTORY_RESET_ENV_OFFS,
341 (u8 *)buf_save, FACTORY_RESET_ENV_SIZE)) {
342 puts("\nError writing EEPROM!\n");
343 return -1;
344 }
345
346 free(buf_save);
347
348 return 0;
349}
350
351U_BOOT_CMD(
352 setdef, 4, 1, do_set_default,
353 "setdef - write board-specific values to EEPROM (ethaddr...)\n",
354 "ethaddr eth1addr serial#\n - write board-specific values to EEPROM\n"
355 );
356
357static inline int sw_reset_pressed(void)
358{
359 return !(in_be32((void *)GPIO0_IR) & GPIO_VAL(CFG_GPIO_SW_RESET));
360}
361
362int do_chkreset(cmd_tbl_t* cmdtp, int flag, int argc, char* argv[])
363{
364 int delta;
365 int count = 0;
366 int post = 0;
367 int factory_reset = 0;
368
369 if (!sw_reset_pressed()) {
370 printf("SW-Reset already high (Button released)\n");
371 printf("-> No action taken!\n");
372 return 0;
373 }
374
375 printf("Waiting for SW-Reset button to be released.");
376
377 while (1) {
378 delta = get_timer(start_time);
379 if (!sw_reset_pressed())
380 break;
381
382 if ((delta > CFG_TIME_POST) && !post) {
383 printf("\nWhen released now, POST tests will be started.");
384 gpio_write_bit(CFG_GPIO_LED_GREEN, 0);
385 post = 1;
386 }
387
388 if ((delta > CFG_TIME_FACTORY_RESET) && !factory_reset) {
389 printf("\nWhen released now, factory default values"
390 " will be restored.");
391 gpio_write_bit(CFG_GPIO_LED_RED, 0);
392 factory_reset = 1;
393 }
394
395 udelay(1000);
396 if (!(count++ % 1000))
397 printf(".");
398 }
399
400
401 printf("\nSW-Reset Button released after %d milli-seconds!\n", delta);
402
403 if (delta > CFG_TIME_FACTORY_RESET) {
404 printf("Starting factory reset value restoration...\n");
405
406 /*
407 * Restore default setting
408 */
409 restore_default();
410
411 /*
412 * Reset the board for default to become valid
413 */
414 do_reset(NULL, 0, 0, NULL);
415
416 return 0;
417 }
418
419 if (delta > CFG_TIME_POST) {
420 printf("Starting POST configuration...\n");
421
422 /*
423 * Enable POST upon next bootup
424 */
425 out_be32((void *)CFG_POST_MAGIC, REBOOT_MAGIC);
426 out_be32((void *)CFG_POST_VAL, REBOOT_DO_POST);
427 post_bootmode_init();
428
429 /*
430 * Reset the logbuffer for a clean start
431 */
432 logbuff_reset();
433
434 do_reset(NULL, 0, 0, NULL);
435
436 return 0;
437 }
438
439 return 0;
440}
441
442U_BOOT_CMD (
443 chkreset, 1, 1, do_chkreset,
444 "chkreset- Check for status of SW-reset button and act accordingly\n",
445 NULL
446);
447
448#if defined(CONFIG_POST)
449/*
450 * Returns 1 if keys pressed to start the power-on long-running tests
451 * Called from board_init_f().
452 */
453int post_hotkeys_pressed(void)
454{
455 u32 post_magic;
456 u32 post_val;
457
458 post_magic = in_be32((void *)CFG_POST_MAGIC);
459 post_val = in_be32((void *)CFG_POST_VAL);
460
461 if ((post_magic == REBOOT_MAGIC) && (post_val == REBOOT_DO_POST))
462 return 1;
463 else
464 return 0;
465}
466#endif /* CONFIG_POST */