cpu/mpc512x/cpu.c

   1 /*
   2  * Copyright (C) 2004-2006 Freescale Semiconductor, Inc.
   3  * (C) Copyright 2007 DENX Software Engineering
   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 /*
  25  * CPU specific code for the MPC512x family.
  26  *
  27  * Derived from the MPC83xx code.
  28  */
  29
  30 #include <common.h>
  31 #include <command.h>
  32 #include <mpc512x.h>
  33 #include <asm/processor.h>
  34
  35 #if defined(CONFIG_OF_LIBFDT)
  36 #include <fdt_support.h>
  37 #endif
  38
  39 DECLARE_GLOBAL_DATA_PTR;
  40
  41 int checkcpu (void)
  42 {
  43         volatile immap_t *immr = (immap_t *) CFG_IMMR;
  44         ulong clock = gd->cpu_clk;
  45         u32 pvr = get_pvr ();
  46         u32 spridr = immr->sysconf.spridr;
  47         char buf[32];
  48
  49         puts ("CPU:   ");
  50
  51         switch (spridr & 0xffff0000) {
  52         case SPR_5121E:
  53                 puts ("MPC5121e ");
  54                 break;
  55         default:
  56                 printf ("Unknown part ID %08x ", spridr & 0xffff0000);
  57         }
  58         printf ("rev. %d.%d, Core ", SVR_MJREV (spridr), SVR_MNREV (spridr));
  59
  60         switch (pvr & 0xffff0000) {
  61         case PVR_E300C4:
  62                 puts ("e300c4 ");
  63                 break;
  64         default:
  65                 puts ("unknown ");
  66         }
  67         printf ("at %s MHz, CSB at %3d MHz\n", strmhz(buf, clock),
  68                 gd->csb_clk / 1000000);
  69         return 0;
  70 }
  71
  72
  73 int
  74 do_reset (cmd_tbl_t * cmdtp, int flag, int argc, char *argv[])
  75 {
  76         ulong msr;
  77         volatile immap_t *immap = (immap_t *) CFG_IMMR;
  78
  79         /* Interrupts and MMU off */
  80         __asm__ __volatile__ ("mfmsr    %0":"=r" (msr):);
  81
  82         msr &= ~( MSR_EE | MSR_IR | MSR_DR);
  83         __asm__ __volatile__ ("mtmsr    %0"::"r" (msr));
  84
  85         /*
  86          * Enable Reset Control Reg - "RSTE" is the magic word that let us go
  87          */
  88         immap->reset.rpr = 0x52535445;
  89
  90         /* Verify Reset Control Reg is enabled */
  91         while (!((immap->reset.rcer) & RCER_CRE))
  92                 ;
  93
  94         printf ("Resetting the board.\n");
  95         udelay(200);
  96
  97         /* Perform reset */
  98         immap->reset.rcr = RCR_SWHR;
  99
 100         /* Unreached... */
 101         return 1;
 102 }
 103
 104
 105 /*
 106  * Get timebase clock frequency (like cpu_clk in Hz)
 107  */
 108 unsigned long get_tbclk (void)
 109 {
 110         ulong tbclk;
 111
 112         tbclk = (gd->bus_clk + 3L) / 4L;
 113
 114         return tbclk;
 115 }
 116
 117
 118 #if defined(CONFIG_WATCHDOG)
 119 void watchdog_reset (void)
 120 {
 121         int re_enable = disable_interrupts ();
 122
 123         /* Reset watchdog */
 124         volatile immap_t *immr = (immap_t *) CFG_IMMR;
 125         immr->wdt.swsrr = 0x556c;
 126         immr->wdt.swsrr = 0xaa39;
 127
 128         if (re_enable)
 129                 enable_interrupts ();
 130 }
 131 #endif
 132
 133 #ifdef CONFIG_OF_LIBFDT
 134 void ft_cpu_setup(void *blob, bd_t *bd)
 135 {
 136         char *cpu_path = "/cpus/" OF_CPU;
 137         char *eth_path = "/" OF_SOC "/ethernet@2800";
 138         char *eth_path_old = "/" OF_SOC_OLD "/ethernet@2800";
 139
 140         do_fixup_by_path_u32(blob, cpu_path, "timebase-frequency", OF_TBCLK, 1);
 141         do_fixup_by_path_u32(blob, cpu_path, "bus-frequency", bd->bi_busfreq, 1);
 142         do_fixup_by_path_u32(blob, cpu_path, "clock-frequency", bd->bi_intfreq, 1);
 143         do_fixup_by_path_u32(blob, "/" OF_SOC, "bus-frequency", bd->bi_ipsfreq, 1);
 144         do_fixup_by_path(blob, eth_path, "local-mac-address", bd->bi_enetaddr, 6, 0);
 145
 146         /* this is so old kernels with old device trees will boot */
 147         do_fixup_by_path_u32(blob, "/" OF_SOC_OLD, "bus-frequency", bd->bi_ipsfreq, 0);
 148         do_fixup_by_path(blob, eth_path_old, "local-mac-address",
 149                         bd->bi_enetaddr, 6, 0);
 150         do_fixup_by_path(blob, eth_path_old, "address", bd->bi_enetaddr, 6, 0);
 151 }
 152 #endif