import u-boot-1.1.4-list-2.1.0.diff
[u-boot.git] / lib_m68k / board.c
1 /*
2  * (C) Copyright 2003
3  * Josef Baumgartner <josef.baumgartner@telex.de>
4  *
5  * (C) Copyright 2000-2002
6  * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
7  *
8  * See file CREDITS for list of people who contributed to this
9  * project.
10  *
11  * This program is free software; you can redistribute it and/or
12  * modify it under the terms of the GNU General Public License as
13  * published by the Free Software Foundation; either version 2 of
14  * the License, or (at your option) any later version.
15  *
16  * This program is distributed in the hope that it will be useful,
17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
19  * GNU General Public License for more details.
20  *
21  * You should have received a copy of the GNU General Public License
22  * along with this program; if not, write to the Free Software
23  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
24  * MA 02111-1307 USA
25  */
26
27 #include <common.h>
28 #include <watchdog.h>
29 #include <command.h>
30 #include <malloc.h>
31 #include <devices.h>
32
33 #ifdef  CONFIG_M5272
34 #include <asm/immap_5272.h>
35 #endif
36
37 #if (CONFIG_COMMANDS & CFG_CMD_IDE)
38 #include <ide.h>
39 #endif
40 #if (CONFIG_COMMANDS & CFG_CMD_SCSI)
41 #include <scsi.h>
42 #endif
43 #if (CONFIG_COMMANDS & CFG_CMD_KGDB)
44 #include <kgdb.h>
45 #endif
46 #ifdef CONFIG_STATUS_LED
47 #include <status_led.h>
48 #endif
49 #include <net.h>
50 #if (CONFIG_COMMANDS & CFG_CMD_BEDBUG)
51 #include <cmd_bedbug.h>
52 #endif
53 #ifdef CFG_ALLOC_DPRAM
54 #include <commproc.h>
55 #endif
56 #include <version.h>
57
58 #if defined(CONFIG_HARD_I2C) || \
59     defined(CONFIG_SOFT_I2C)
60 #include <i2c.h>
61 #endif
62
63 static char *failed = "*** failed ***\n";
64
65 #ifdef  CONFIG_PCU_E
66 extern flash_info_t flash_info[];
67 #endif
68
69 #include <environment.h>
70
71 #if ( ((CFG_ENV_ADDR+CFG_ENV_SIZE) < CFG_MONITOR_BASE) || \
72       (CFG_ENV_ADDR >= (CFG_MONITOR_BASE + CFG_MONITOR_LEN)) ) || \
73     defined(CFG_ENV_IS_IN_NVRAM)
74 #define TOTAL_MALLOC_LEN        (CFG_MALLOC_LEN + CFG_ENV_SIZE)
75 #else
76 #define TOTAL_MALLOC_LEN        CFG_MALLOC_LEN
77 #endif
78
79 extern ulong __init_end;
80 extern ulong _end;
81
82 extern  void timer_init(void);
83
84 #if defined(CONFIG_WATCHDOG)
85 # define INIT_FUNC_WATCHDOG_INIT        watchdog_init,
86 # define WATCHDOG_DISABLE               watchdog_disable
87
88 extern int watchdog_init(void);
89 extern int watchdog_disable(void);
90 #else
91 # define INIT_FUNC_WATCHDOG_INIT        /* undef */
92 # define WATCHDOG_DISABLE               /* undef */
93 #endif /* CONFIG_WATCHDOG */
94
95 ulong monitor_flash_len;
96
97 /*
98  * Begin and End of memory area for malloc(), and current "brk"
99  */
100 static  ulong   mem_malloc_start = 0;
101 static  ulong   mem_malloc_end   = 0;
102 static  ulong   mem_malloc_brk   = 0;
103
104 /************************************************************************
105  * Utilities                                                            *
106  ************************************************************************
107  */
108
109 /*
110  * The Malloc area is immediately below the monitor copy in DRAM
111  */
112 static void mem_malloc_init (void)
113 {
114         DECLARE_GLOBAL_DATA_PTR;
115
116         ulong dest_addr = CFG_MONITOR_BASE + gd->reloc_off;
117
118         mem_malloc_end = dest_addr;
119         mem_malloc_start = dest_addr - TOTAL_MALLOC_LEN;
120         mem_malloc_brk = mem_malloc_start;
121
122         memset ((void *) mem_malloc_start,
123                 0,
124                 mem_malloc_end - mem_malloc_start);
125 }
126
127 void *sbrk (ptrdiff_t increment)
128 {
129         ulong old = mem_malloc_brk;
130         ulong new = old + increment;
131
132         if ((new < mem_malloc_start) ||
133             (new > mem_malloc_end) ) {
134                 return (NULL);
135         }
136         mem_malloc_brk = new;
137         return ((void *)old);
138 }
139
140 char *strmhz(char *buf, long hz)
141 {
142     long l, n;
143     long m;
144
145     n = hz / 1000000L;
146
147     l = sprintf (buf, "%ld", n);
148
149     m = (hz % 1000000L) / 1000L;
150
151     if (m != 0)
152         sprintf (buf+l, ".%03ld", m);
153
154     return (buf);
155 }
156
157 /*
158  * All attempts to come up with a "common" initialization sequence
159  * that works for all boards and architectures failed: some of the
160  * requirements are just _too_ different. To get rid of the resulting
161  * mess of board dependend #ifdef'ed code we now make the whole
162  * initialization sequence configurable to the user.
163  *
164  * The requirements for any new initalization function is simple: it
165  * receives a pointer to the "global data" structure as it's only
166  * argument, and returns an integer return code, where 0 means
167  * "continue" and != 0 means "fatal error, hang the system".
168  */
169 typedef int (init_fnc_t) (void);
170
171 /************************************************************************
172  * Init Utilities                                                       *
173  ************************************************************************
174  * Some of this code should be moved into the core functions,
175  * but let's get it working (again) first...
176  */
177
178 static int init_baudrate (void)
179 {
180         DECLARE_GLOBAL_DATA_PTR;
181
182         uchar tmp[64];  /* long enough for environment variables */
183         int i = getenv_r ("baudrate", tmp, sizeof (tmp));
184
185         gd->baudrate = (i > 0)
186                         ? (int) simple_strtoul (tmp, NULL, 10)
187                         : CONFIG_BAUDRATE;
188         return (0);
189 }
190
191 /***********************************************************************/
192
193 static int init_func_ram (void)
194 {
195         DECLARE_GLOBAL_DATA_PTR;
196
197         int board_type = 0;     /* use dummy arg */
198         puts ("DRAM:  ");
199
200         if ((gd->ram_size = initdram (board_type)) > 0) {
201                 print_size (gd->ram_size, "\n");
202                 return (0);
203         }
204         puts (failed);
205         return (1);
206 }
207
208 /***********************************************************************/
209
210 #if defined(CONFIG_HARD_I2C) || defined(CONFIG_SOFT_I2C)
211 static int init_func_i2c (void)
212 {
213         puts ("I2C:   ");
214         i2c_init (CFG_I2C_SPEED, CFG_I2C_SLAVE);
215         puts ("ready\n");
216         return (0);
217 }
218 #endif
219
220 /***********************************************************************/
221
222 /************************************************************************
223  * Initialization sequence                                              *
224  ************************************************************************
225  */
226
227 init_fnc_t *init_sequence[] = {
228         env_init,
229         init_baudrate,
230         serial_init,
231         console_init_f,
232         display_options,
233         checkcpu,
234         checkboard,
235 #if defined(CONFIG_HARD_I2C) || defined(CONFIG_SOFT_I2C)
236         init_func_i2c,
237 #endif
238         init_func_ram,
239 #if defined(CFG_DRAM_TEST)
240         testdram,
241 #endif /* CFG_DRAM_TEST */
242         INIT_FUNC_WATCHDOG_INIT
243         NULL,                   /* Terminate this list */
244 };
245
246
247 /************************************************************************
248  *
249  * This is the first part of the initialization sequence that is
250  * implemented in C, but still running from ROM.
251  *
252  * The main purpose is to provide a (serial) console interface as
253  * soon as possible (so we can see any error messages), and to
254  * initialize the RAM so that we can relocate the monitor code to
255  * RAM.
256  *
257  * Be aware of the restrictions: global data is read-only, BSS is not
258  * initialized, and stack space is limited to a few kB.
259  *
260  ************************************************************************
261  */
262
263 void
264 board_init_f (ulong bootflag)
265 {
266     DECLARE_GLOBAL_DATA_PTR;
267
268         bd_t *bd;
269         ulong len, addr, addr_sp;
270         gd_t *id;
271         init_fnc_t **init_fnc_ptr;
272 #ifdef CONFIG_PRAM
273         int i;
274         ulong reg;
275         uchar tmp[64];          /* long enough for environment variables */
276 #endif
277
278         /* Pointer is writable since we allocated a register for it */
279         gd = (gd_t *) (CFG_INIT_RAM_ADDR + CFG_GBL_DATA_OFFSET);
280         /* compiler optimization barrier needed for GCC >= 3.4 */
281         __asm__ __volatile__("": : :"memory");
282
283         /* Clear initial global data */
284         memset ((void *) gd, 0, sizeof (gd_t));
285
286         for (init_fnc_ptr = init_sequence; *init_fnc_ptr; ++init_fnc_ptr) {
287                 if ((*init_fnc_ptr)() != 0) {
288                         hang ();
289                 }
290         }
291
292         /*
293          * Now that we have DRAM mapped and working, we can
294          * relocate the code and continue running from DRAM.
295          *
296          * Reserve memory at end of RAM for (top down in that order):
297          *      - protected RAM
298          *      - LCD framebuffer
299          *      - monitor code
300          *      - board info struct
301          */
302         len = (ulong)&_end - CFG_MONITOR_BASE;
303
304         addr = CFG_SDRAM_BASE + gd->ram_size;
305
306 #ifdef CONFIG_LOGBUFFER
307         /* reserve kernel log buffer */
308         addr -= (LOGBUFF_RESERVE);
309         debug ("Reserving %dk for kernel logbuffer at %08lx\n", LOGBUFF_LEN, addr);
310 #endif
311
312 #ifdef CONFIG_PRAM
313         /*
314          * reserve protected RAM
315          */
316         i = getenv_r ("pram", tmp, sizeof (tmp));
317         reg = (i > 0) ? simple_strtoul (tmp, NULL, 10) : CONFIG_PRAM;
318         addr -= (reg << 10);            /* size is in kB */
319         debug ("Reserving %ldk for protected RAM at %08lx\n", reg, addr);
320 #endif /* CONFIG_PRAM */
321
322         /*
323          * reserve memory for U-Boot code, data & bss
324          * round down to next 4 kB limit
325          */
326         addr -= len;
327         addr &= ~(4096 - 1);
328
329         debug ("Reserving %ldk for U-Boot at: %08lx\n", len >> 10, addr);
330
331         /*
332          * reserve memory for malloc() arena
333          */
334         addr_sp = addr - TOTAL_MALLOC_LEN;
335         debug ("Reserving %dk for malloc() at: %08lx\n",
336                         TOTAL_MALLOC_LEN >> 10, addr_sp);
337
338         /*
339          * (permanently) allocate a Board Info struct
340          * and a permanent copy of the "global" data
341          */
342         addr_sp -= sizeof (bd_t);
343         bd = (bd_t *) addr_sp;
344         gd->bd = bd;
345         debug ("Reserving %d Bytes for Board Info at: %08lx\n",
346                         sizeof (bd_t), addr_sp);
347         addr_sp -= sizeof (gd_t);
348         id = (gd_t *) addr_sp;
349         debug ("Reserving %d Bytes for Global Data at: %08lx\n",
350                         sizeof (gd_t), addr_sp);
351
352         /* Reserve memory for boot params. */
353         addr_sp -= CFG_BOOTPARAMS_LEN;
354         bd->bi_boot_params = addr_sp;
355         debug ("Reserving %dk for boot parameters at: %08lx\n",
356                         CFG_BOOTPARAMS_LEN >> 10, addr_sp);
357
358         /*
359          * Finally, we set up a new (bigger) stack.
360          *
361          * Leave some safety gap for SP, force alignment on 16 byte boundary
362          * Clear initial stack frame
363          */
364         addr_sp -= 16;
365         addr_sp &= ~0xF;
366         *((ulong *) addr_sp)-- = 0;
367         *((ulong *) addr_sp)-- = 0;
368         debug ("Stack Pointer at: %08lx\n", addr_sp);
369
370         /*
371          * Save local variables to board info struct
372          */
373         bd->bi_memstart  = CFG_SDRAM_BASE;      /* start of  DRAM memory      */
374         bd->bi_memsize   = gd->ram_size;        /* size  of  DRAM memory in bytes */
375         bd->bi_mbar_base = CFG_MBAR;            /* base of internal registers */
376
377         bd->bi_bootflags = bootflag;            /* boot / reboot flag (for LynxOS)    */
378
379         WATCHDOG_RESET ();
380         bd->bi_intfreq = gd->cpu_clk;   /* Internal Freq, in Hz */
381         bd->bi_busfreq = gd->bus_clk;   /* Bus Freq,      in Hz */
382         bd->bi_baudrate = gd->baudrate; /* Console Baudrate     */
383
384 #ifdef CFG_EXTBDINFO
385         strncpy (bd->bi_s_version, "1.2", sizeof (bd->bi_s_version));
386         strncpy (bd->bi_r_version, U_BOOT_VERSION, sizeof (bd->bi_r_version));
387 #endif
388
389         WATCHDOG_RESET ();
390
391 #ifdef CONFIG_POST
392         post_bootmode_init();
393         post_run (NULL, POST_ROM | post_bootmode_get(0));
394 #endif
395
396         WATCHDOG_RESET();
397
398         memcpy (id, (void *)gd, sizeof (gd_t));
399
400         debug ("Start relocate of code from %08x to %08lx\n", CFG_MONITOR_BASE, addr);
401         relocate_code (addr_sp, id, addr);
402
403         /* NOTREACHED - jump_to_ram() does not return */
404 }
405
406 /************************************************************************
407  *
408  * This is the next part if the initialization sequence: we are now
409  * running from RAM and have a "normal" C environment, i. e. global
410  * data can be written, BSS has been cleared, the stack size in not
411  * that critical any more, etc.
412  *
413  ************************************************************************
414  */
415 void board_init_r (gd_t *id, ulong dest_addr)
416 {
417         DECLARE_GLOBAL_DATA_PTR;
418         cmd_tbl_t *cmdtp;
419         char *s, *e;
420         bd_t *bd;
421         int i;
422         extern void malloc_bin_reloc (void);
423
424 #ifndef CFG_ENV_IS_NOWHERE
425         extern char * env_name_spec;
426 #endif
427 #ifndef CFG_NO_FLASH
428         ulong flash_size;
429 #endif
430         gd = id;                /* initialize RAM version of global data */
431         bd = gd->bd;
432
433         gd->flags |= GD_FLG_RELOC;      /* tell others: relocation done */
434
435         debug ("Now running in RAM - U-Boot at: %08lx\n", dest_addr);
436
437         WATCHDOG_RESET ();
438
439         gd->reloc_off =  dest_addr - CFG_MONITOR_BASE;
440
441         monitor_flash_len = (ulong)&__init_end - dest_addr;
442
443         /*
444          * We have to relocate the command table manually
445          */
446         for (cmdtp = &__u_boot_cmd_start; cmdtp !=  &__u_boot_cmd_end; cmdtp++) {
447                 ulong addr;
448                 addr = (ulong) (cmdtp->cmd) + gd->reloc_off;
449 #if 0
450                 printf ("Command \"%s\": 0x%08lx => 0x%08lx\n",
451                                 cmdtp->name, (ulong) (cmdtp->cmd), addr);
452 #endif
453                 cmdtp->cmd =
454                         (int (*)(struct cmd_tbl_s *, int, int, char *[]))addr;
455
456                 addr = (ulong)(cmdtp->name) + gd->reloc_off;
457                 cmdtp->name = (char *)addr;
458
459                 if (cmdtp->usage) {
460                         addr = (ulong)(cmdtp->usage) + gd->reloc_off;
461                         cmdtp->usage = (char *)addr;
462                 }
463 #ifdef  CFG_LONGHELP
464                 if (cmdtp->help) {
465                         addr = (ulong)(cmdtp->help) + gd->reloc_off;
466                         cmdtp->help = (char *)addr;
467                 }
468 #endif
469         }
470         /* there are some other pointer constants we must deal with */
471 #ifndef CFG_ENV_IS_NOWHERE
472         env_name_spec += gd->reloc_off;
473 #endif
474
475         WATCHDOG_RESET ();
476
477 #ifdef CONFIG_LOGBUFFER
478         logbuff_init_ptrs ();
479 #endif
480 #ifdef CONFIG_POST
481         post_output_backlog ();
482         post_reloc ();
483 #endif
484         WATCHDOG_RESET();
485
486 #if 0
487         /* instruction cache enabled in cpu_init_f() for faster relocation */
488         icache_enable ();       /* it's time to enable the instruction cache */
489 #endif
490
491         /*
492          * Setup trap handlers
493          */
494         trap_init (0);
495
496 #if !defined(CFG_NO_FLASH)
497         puts ("FLASH: ");
498
499         if ((flash_size = flash_init ()) > 0) {
500 # ifdef CFG_FLASH_CHECKSUM
501                 print_size (flash_size, "");
502                 /*
503                  * Compute and print flash CRC if flashchecksum is set to 'y'
504                  *
505                  * NOTE: Maybe we should add some WATCHDOG_RESET()? XXX
506                  */
507                 s = getenv ("flashchecksum");
508                 if (s && (*s == 'y')) {
509                         printf ("  CRC: %08lX",
510                                         crc32 (0,
511                                                    (const unsigned char *) CFG_FLASH_BASE,
512                                                    flash_size)
513                                         );
514                 }
515                 putc ('\n');
516 # else  /* !CFG_FLASH_CHECKSUM */
517                 print_size (flash_size, "\n");
518 # endif /* CFG_FLASH_CHECKSUM */
519         } else {
520                 puts (failed);
521                 hang ();
522         }
523
524         bd->bi_flashstart = CFG_FLASH_BASE;     /* update start of FLASH memory    */
525         bd->bi_flashsize = flash_size;  /* size of FLASH memory (final value) */
526         bd->bi_flashoffset = 0;
527 #else   /* CFG_NO_FLASH */
528         bd->bi_flashsize = 0;
529         bd->bi_flashstart = 0;
530         bd->bi_flashoffset = 0;
531 #endif /* !CFG_NO_FLASH */
532
533         WATCHDOG_RESET ();
534
535         /* initialize higher level parts of CPU like time base and timers */
536         cpu_init_r ();
537
538         WATCHDOG_RESET ();
539
540         /* initialize malloc() area */
541         mem_malloc_init ();
542         malloc_bin_reloc ();
543
544 #ifdef CONFIG_SPI
545 # if !defined(CFG_ENV_IS_IN_EEPROM)
546         spi_init_f ();
547 # endif
548         spi_init_r ();
549 #endif
550
551         /* relocate environment function pointers etc. */
552         env_relocate ();
553
554         /*
555          * Fill in missing fields of bd_info.
556          * We do this here, where we have "normal" access to the
557          * environment; we used to do this still running from ROM,
558          * where had to use getenv_r(), which can be pretty slow when
559          * the environment is in EEPROM.
560          */
561         s = getenv ("ethaddr");
562         for (i = 0; i < 6; ++i) {
563                 bd->bi_enetaddr[i] = s ? simple_strtoul (s, &e, 16) : 0;
564                 if (s)
565                         s = (*e) ? e + 1 : e;
566         }
567
568         /* IP Address */
569         bd->bi_ip_addr = getenv_IPaddr ("ipaddr");
570
571         WATCHDOG_RESET ();
572
573
574         /** leave this here (after malloc(), environment and PCI are working) **/
575         /* Initialize devices */
576         devices_init ();
577
578         /* Initialize the jump table for applications */
579         jumptable_init ();
580
581         /* Initialize the console (after the relocation and devices init) */
582         console_init_r ();
583
584 #if defined(CONFIG_MISC_INIT_R)
585         /* miscellaneous platform dependent initialisations */
586         misc_init_r ();
587 #endif
588
589 #if (CONFIG_COMMANDS & CFG_CMD_KGDB)
590         WATCHDOG_RESET ();
591         puts ("KGDB:  ");
592         kgdb_init ();
593 #endif
594
595         debug ("U-Boot relocated to %08lx\n", dest_addr);
596
597         /*
598          * Enable Interrupts
599          */
600         interrupt_init ();
601
602         /* Must happen after interrupts are initialized since
603          * an irq handler gets installed
604          */
605         timer_init();
606
607 #ifdef CONFIG_SERIAL_SOFTWARE_FIFO
608         serial_buffered_init();
609 #endif
610
611 #ifdef CONFIG_STATUS_LED
612         status_led_set (STATUS_LED_BOOT, STATUS_LED_BLINKING);
613 #endif
614
615         udelay (20);
616
617         set_timer (0);
618
619         /* Insert function pointers now that we have relocated the code */
620
621         /* Initialize from environment */
622         if ((s = getenv ("loadaddr")) != NULL) {
623                 load_addr = simple_strtoul (s, NULL, 16);
624         }
625 #if (CONFIG_COMMANDS & CFG_CMD_NET)
626         if ((s = getenv ("bootfile")) != NULL) {
627                 copy_filename (BootFile, s, sizeof (BootFile));
628         }
629 #endif /* CFG_CMD_NET */
630
631         WATCHDOG_RESET ();
632
633 #if (CONFIG_COMMANDS & CFG_CMD_DOC)
634         WATCHDOG_RESET ();
635         puts ("DOC:   ");
636         doc_init ();
637 #endif
638
639 #if (CONFIG_COMMANDS & CFG_CMD_NAND)
640         WATCHDOG_RESET ();
641         puts ("NAND:");
642         nand_init();            /* go init the NAND */
643 #endif
644
645 #if (CONFIG_COMMANDS & CFG_CMD_NET) && defined(FEC_ENET)
646         WATCHDOG_RESET();
647         eth_init(bd);
648 #endif
649
650 #ifdef CONFIG_POST
651         post_run (NULL, POST_RAM | post_bootmode_get(0));
652 #endif
653
654 #ifdef CONFIG_LAST_STAGE_INIT
655         WATCHDOG_RESET ();
656         /*
657          * Some parts can be only initialized if all others (like
658          * Interrupts) are up and running (i.e. the PC-style ISA
659          * keyboard).
660          */
661         last_stage_init ();
662 #endif
663
664 #if (CONFIG_COMMANDS & CFG_CMD_BEDBUG)
665         WATCHDOG_RESET ();
666         bedbug_init ();
667 #endif
668
669 #if defined(CONFIG_PRAM) || defined(CONFIG_LOGBUFFER)
670         /*
671          * Export available size of memory for Linux,
672          * taking into account the protected RAM at top of memory
673          */
674         {
675                 ulong pram;
676                 uchar memsz[32];
677 #ifdef CONFIG_PRAM
678                 char *s;
679
680                 if ((s = getenv ("pram")) != NULL) {
681                         pram = simple_strtoul (s, NULL, 10);
682                 } else {
683                         pram = CONFIG_PRAM;
684                 }
685 #else
686                 pram=0;
687 #endif
688 #ifdef CONFIG_LOGBUFFER
689                 /* Also take the logbuffer into account (pram is in kB) */
690                 pram += (LOGBUFF_LEN+LOGBUFF_OVERHEAD)/1024;
691 #endif
692                 sprintf (memsz, "%ldk", (bd->bi_memsize / 1024) - pram);
693                 setenv ("mem", memsz);
694         }
695 #endif
696
697 #ifdef CONFIG_MODEM_SUPPORT
698  {
699          extern int do_mdm_init;
700          do_mdm_init = gd->do_mdm_init;
701  }
702 #endif
703
704 #ifdef CONFIG_WATCHDOG
705         /* disable watchdog if environment is set */
706         if ((s = getenv ("watchdog")) != NULL) {
707                 if (strncmp (s, "off", 3) == 0) {
708                         WATCHDOG_DISABLE ();
709                 }
710         }
711 #endif /* CONFIG_WATCHDOG*/
712
713
714         /* Initialization complete - start the monitor */
715
716         /* main_loop() can return to retry autoboot, if so just run it again. */
717         for (;;) {
718                 WATCHDOG_RESET ();
719                 main_loop ();
720         }
721
722         /* NOTREACHED - no way out of command loop except booting */
723 }
724
725
726 void hang(void)
727 {
728         puts ("### ERROR ### Please RESET the board ###\n");
729         for (;;);
730 }