board/eltec/bab7xx/bab7xx.c

   1 /*
   2  * (C) Copyright 2001 Sysgo Real-Time Solutions, GmbH <www.elinos.com>
   3  * Andreas Heppel <aheppel@sysgo.de>
   4  * (C) Copyright 2001 ELTEC Elektronik AG
   5  * Frank Gottschling <fgottschling@eltec.de>
   6  *
   7  * See file CREDITS for list of people who contributed to this
   8  * project.
   9  *
  10  * This program is free software; you can redistribute it and/or
  11  * modify it under the terms of the GNU General Public License as
  12  * published by the Free Software Foundation; either version 2 of
  13  * the License, or (at your option) any later version.
  14  *
  15  * This program is distributed in the hope that it will be useful,
  16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18  * GNU General Public License for more details.
  19  *
  20  * You should have received a copy of the GNU General Public License
  21  * along with this program; if not, write to the Free Software
  22  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  23  * MA 02111-1307 USA
  24  */
  25
  26 #include <common.h>
  27 #include <command.h>
  28 #include <mpc106.h>
  29 #include <mk48t59.h>
  30 #include <74xx_7xx.h>
  31 #include <ns87308.h>
  32 #include <video_fb.h>
  33 #include <netdev.h>
  34
  35 DECLARE_GLOBAL_DATA_PTR;
  36
  37 /*---------------------------------------------------------------------------*/
  38 /*
  39  * Get Bus clock frequency
  40  */
  41 ulong bab7xx_get_bus_freq (void)
  42 {
  43         /*
  44          * The GPIO Port 1 on BAB7xx reflects the bus speed.
  45          */
  46         volatile struct GPIO *gpio =
  47                 (struct GPIO *) (CONFIG_SYS_ISA_IO + CONFIG_SYS_NS87308_GPIO_BASE);
  48
  49         unsigned char data = gpio->dta1;
  50
  51         if (data & 0x02)
  52                 return 66666666;
  53
  54         return 83333333;
  55 }
  56
  57 /*---------------------------------------------------------------------------*/
  58
  59 /*
  60  * Measure CPU clock speed (core clock GCLK1) (Approx. GCLK frequency in Hz)
  61  */
  62 ulong bab7xx_get_gclk_freq (void)
  63 {
  64         static const int pllratio_to_factor[] = {
  65                 00, 75, 70, 00, 20, 65, 100, 45, 30, 55, 40, 50, 80, 60, 35,
  66                         00,
  67         };
  68
  69         return pllratio_to_factor[get_hid1 () >> 28] *
  70                 (bab7xx_get_bus_freq () / 10);
  71 }
  72
  73 /*----------------------------------------------------------------------------*/
  74
  75 int checkcpu (void)
  76 {
  77         uint pvr = get_pvr ();
  78
  79         printf ("MPC7xx V%d.%d", (pvr >> 8) & 0xFF, pvr & 0xFF);
  80         printf (" at %ld / %ld MHz\n", bab7xx_get_gclk_freq () / 1000000,
  81                 bab7xx_get_bus_freq () / 1000000);
  82
  83         return (0);
  84 }
  85
  86 /* ------------------------------------------------------------------------- */
  87
  88 int checkboard (void)
  89 {
  90 #ifdef CONFIG_SYS_ADDRESS_MAP_A
  91         puts ("Board: ELTEC BAB7xx PReP\n");
  92 #else
  93         puts ("Board: ELTEC BAB7xx CHRP\n");
  94 #endif
  95         return (0);
  96 }
  97
  98 /* ------------------------------------------------------------------------- */
  99
 100 int checkflash (void)
 101 {
 102         /* TODO: XXX XXX XXX */
 103         printf ("2 MB ## Test not implemented yet ##\n");
 104         return (0);
 105 }
 106
 107 /* ------------------------------------------------------------------------- */
 108
 109
 110 static unsigned int mpc106_read_cfg_dword (unsigned int reg)
 111 {
 112         unsigned int reg_addr = MPC106_REG | (reg & 0xFFFFFFFC);
 113
 114         out32r (MPC106_REG_ADDR, reg_addr);
 115
 116         return (in32r (MPC106_REG_DATA | (reg & 0x3)));
 117 }
 118
 119 /* ------------------------------------------------------------------------- */
 120
 121 long int dram_size (int board_type)
 122 {
 123         /* No actual initialisation to do - done when setting up
 124          * PICRs MCCRs ME/SARs etc in ram_init.S.
 125          */
 126
 127         register unsigned long i, msar1, mear1, memSize;
 128
 129 #if defined(CONFIG_SYS_MEMTEST)
 130         register unsigned long reg;
 131
 132         printf ("Testing DRAM\n");
 133
 134         /* write each mem addr with it's address */
 135         for (reg = CONFIG_SYS_MEMTEST_START; reg < CONFIG_SYS_MEMTEST_END; reg += 4)
 136                 *reg = reg;
 137
 138         for (reg = CONFIG_SYS_MEMTEST_START; reg < CONFIG_SYS_MEMTEST_END; reg += 4) {
 139                 if (*reg != reg)
 140                         return -1;
 141         }
 142 #endif
 143
 144         /*
 145          * Since MPC106 memory controller chip has already been set to
 146          * control all memory, just read and interpret its memory boundery register.
 147          */
 148         memSize = 0;
 149         msar1 = mpc106_read_cfg_dword (MPC106_MSAR1);
 150         mear1 = mpc106_read_cfg_dword (MPC106_MEAR1);
 151         i = mpc106_read_cfg_dword (MPC106_MBER) & 0xf;
 152
 153         do {
 154                 if (i & 0x01)   /* is bank enabled ? */
 155                         memSize += (mear1 & 0xff) - (msar1 & 0xff) + 1;
 156                 msar1 >>= 8;
 157                 mear1 >>= 8;
 158                 i >>= 1;
 159         } while (i);
 160
 161         return (memSize * 0x100000);
 162 }
 163
 164 /* ------------------------------------------------------------------------- */
 165
 166 phys_size_t initdram (int board_type)
 167 {
 168         return dram_size (board_type);
 169 }
 170
 171 /* ------------------------------------------------------------------------- */
 172
 173 void after_reloc (ulong dest_addr)
 174 {
 175         /*
 176          * Jump to the main U-Boot board init code
 177          */
 178         board_init_r ((gd_t *) gd, dest_addr);
 179 }
 180
 181 /* ------------------------------------------------------------------------- */
 182
 183 /*
 184  * do_reset is done here because in this case it is board specific, since the
 185  * 7xx CPUs can only be reset by external HW (the RTC in this case).
 186  */
 187 void do_reset (cmd_tbl_t * cmdtp, bd_t * bd, int flag, int argc, char *argv[])
 188 {
 189 #if defined(CONFIG_RTC_MK48T59)
 190         /* trigger watchdog immediately */
 191         rtc_set_watchdog (1, RTC_WD_RB_16TH);
 192 #else
 193 #error "You must define the macro CONFIG_RTC_MK48T59."
 194 #endif
 195 }
 196
 197 /* ------------------------------------------------------------------------- */
 198
 199 #if defined(CONFIG_WATCHDOG)
 200 /*
 201  * Since the 7xx CPUs don't have an internal watchdog, this function is
 202  * board specific.  We use the RTC here.
 203  */
 204 void watchdog_reset (void)
 205 {
 206 #if defined(CONFIG_RTC_MK48T59)
 207         /* we use a 32 sec watchdog timer */
 208         rtc_set_watchdog (8, RTC_WD_RB_4);
 209 #else
 210 #error "You must define the macro CONFIG_RTC_MK48T59."
 211 #endif
 212 }
 213 #endif /* CONFIG_WATCHDOG */
 214
 215 /* ------------------------------------------------------------------------- */
 216
 217 #ifdef CONFIG_CONSOLE_EXTRA_INFO
 218 extern GraphicDevice smi;
 219
 220 void video_get_info_str (int line_number, char *info)
 221 {
 222         /* init video info strings for graphic console */
 223         switch (line_number) {
 224         case 1:
 225                 sprintf (info, " MPC7xx V%d.%d at %ld / %ld MHz",
 226                          (get_pvr () >> 8) & 0xFF,
 227                          get_pvr () & 0xFF,
 228                          bab7xx_get_gclk_freq () / 1000000,
 229                          bab7xx_get_bus_freq () / 1000000);
 230                 return;
 231         case 2:
 232                 sprintf (info,
 233                          " ELTEC BAB7xx with %ld MB DRAM and %ld MB FLASH",
 234                          dram_size (0) / 0x100000, flash_init () / 0x100000);
 235                 return;
 236         case 3:
 237                 sprintf (info, " %s", smi.modeIdent);
 238                 return;
 239         }
 240
 241         /* no more info lines */
 242         *info = 0;
 243         return;
 244 }
 245 #endif
 246
 247 /*---------------------------------------------------------------------------*/
 248
 249 int board_eth_init(bd_t *bis)
 250 {
 251         return pci_eth_init(bis);
 252 }