board/socrates/socrates.c

   1 // SPDX-License-Identifier: GPL-2.0+
   2 /*
   3  * (C) Copyright 2008
   4  * Sergei Poselenov, Emcraft Systems, sposelenov@emcraft.com.
   5  *
   6  * Copyright 2004 Freescale Semiconductor.
   7  * (C) Copyright 2002,2003, Motorola Inc.
   8  * Xianghua Xiao, (X.Xiao@motorola.com)
   9  *
  10  * (C) Copyright 2002 Scott McNutt <smcnutt@artesyncp.com>
  11  */
  12
  13 #include <common.h>
  14 #include <clock_legacy.h>
  15 #include <env.h>
  16 #include <init.h>
  17 #include <pci.h>
  18 #include <uuid.h>
  19 #include <asm/global_data.h>
  20 #include <asm/processor.h>
  21 #include <asm/immap_85xx.h>
  22 #include <ioports.h>
  23 #include <flash.h>
  24 #include <linux/delay.h>
  25 #include <linux/libfdt.h>
  26 #include <fdt_support.h>
  27 #include <asm/io.h>
  28 #include <i2c.h>
  29 #include "upm_table.h"
  30
  31 DECLARE_GLOBAL_DATA_PTR;
  32
  33 extern flash_info_t flash_info[];       /* FLASH chips info */
  34
  35 void local_bus_init (void);
  36 ulong flash_get_size (ulong base, int banknum);
  37
  38 int checkboard (void)
  39 {
  40         volatile ccsr_gur_t *gur = (void *)(CONFIG_SYS_MPC85xx_GUTS_ADDR);
  41         char buf[64];
  42         int f;
  43         int i = env_get_f("serial#", buf, sizeof(buf));
  44 #ifdef CONFIG_PCI
  45         char *src;
  46 #endif
  47
  48         puts("Board: Socrates");
  49         if (i > 0) {
  50                 puts(", serial# ");
  51                 puts(buf);
  52         }
  53         putc('\n');
  54
  55 #if defined(CONFIG_PCI)
  56         /* Check the PCI_clk sel bit */
  57         if (in_be32(&gur->porpllsr) & (1<<15)) {
  58                 src = "SYSCLK";
  59                 f = get_board_sys_clk();
  60         } else {
  61                 src = "PCI_CLK";
  62                 /* PCI is clocked by the external source at 33 MHz */
  63                 f = 33000000;
  64         }
  65         printf ("PCI1:  32 bit, %d MHz (%s)\n", f/1000000, src);
  66 #else
  67         printf ("PCI1:  disabled\n");
  68 #endif
  69
  70         /*
  71          * Initialize local bus.
  72          */
  73         local_bus_init ();
  74         return 0;
  75 }
  76
  77 int misc_init_r (void)
  78 {
  79         /*
  80          * Adjust flash start and offset to detected values
  81          */
  82         gd->bd->bi_flashstart = 0 - gd->bd->bi_flashsize;
  83         gd->bd->bi_flashoffset = 0;
  84
  85         /*
  86          * Check if boot FLASH isn't max size
  87          */
  88         if (gd->bd->bi_flashsize < (0 - CONFIG_SYS_FLASH0)) {
  89                 set_lbc_or(0, gd->bd->bi_flashstart |
  90                            (CONFIG_SYS_OR0_PRELIM & 0x00007fff));
  91                 set_lbc_br(0, gd->bd->bi_flashstart |
  92                            (CONFIG_SYS_BR0_PRELIM & 0x00007fff));
  93
  94                 /*
  95                  * Re-check to get correct base address
  96                  */
  97                 flash_get_size(gd->bd->bi_flashstart, CONFIG_SYS_MAX_FLASH_BANKS - 1);
  98         }
  99
 100         /*
 101          * Check if only one FLASH bank is available
 102          */
 103         if (gd->bd->bi_flashsize != CONFIG_SYS_MAX_FLASH_BANKS * (0 - CONFIG_SYS_FLASH0)) {
 104                 set_lbc_or(1, 0);
 105                 set_lbc_br(1, 0);
 106
 107                 /*
 108                  * Re-do flash protection upon new addresses
 109                  */
 110                 flash_protect(FLAG_PROTECT_CLEAR,
 111                               gd->bd->bi_flashstart, 0xffffffff,
 112                               &flash_info[CONFIG_SYS_MAX_FLASH_BANKS - 1]);
 113
 114                 /* Monitor protection ON by default */
 115                 flash_protect(FLAG_PROTECT_SET,
 116                               CONFIG_SYS_MONITOR_BASE, CONFIG_SYS_MONITOR_BASE +
 117                               monitor_flash_len - 1,
 118                               &flash_info[CONFIG_SYS_MAX_FLASH_BANKS - 1]);
 119
 120                 /* Environment protection ON by default */
 121                 flash_protect(FLAG_PROTECT_SET,
 122                               CONFIG_ENV_ADDR,
 123                               CONFIG_ENV_ADDR + CONFIG_ENV_SECT_SIZE - 1,
 124                               &flash_info[CONFIG_SYS_MAX_FLASH_BANKS - 1]);
 125
 126                 /* Redundant environment protection ON by default */
 127                 flash_protect(FLAG_PROTECT_SET,
 128                               CONFIG_ENV_ADDR_REDUND,
 129                               CONFIG_ENV_ADDR_REDUND + CONFIG_ENV_SECT_SIZE - 1,
 130                                &flash_info[CONFIG_SYS_MAX_FLASH_BANKS - 1]);
 131         }
 132
 133         pci_init();
 134
 135         return 0;
 136 }
 137
 138 /*
 139  * Initialize Local Bus
 140  */
 141 void local_bus_init (void)
 142 {
 143         volatile fsl_lbc_t *lbc = LBC_BASE_ADDR;
 144         volatile ccsr_local_ecm_t *ecm = (void *)(CONFIG_SYS_MPC85xx_ECM_ADDR);
 145         sys_info_t sysinfo;
 146         uint clkdiv;
 147         uint lbc_mhz;
 148         uint lcrr = CONFIG_SYS_LBC_LCRR;
 149
 150         get_sys_info (&sysinfo);
 151         clkdiv = lbc->lcrr & LCRR_CLKDIV;
 152         lbc_mhz = sysinfo.freq_systembus / 1000000 / clkdiv;
 153
 154         /* Disable PLL bypass for Local Bus Clock >= 66 MHz */
 155         if (lbc_mhz >= 66)
 156                 lcrr &= ~LCRR_DBYP;     /* DLL Enabled */
 157         else
 158                 lcrr |= LCRR_DBYP;      /* DLL Bypass */
 159
 160         out_be32 (&lbc->lcrr, lcrr);
 161         asm ("sync;isync;msync");
 162
 163         out_be32 (&lbc->ltesr, 0xffffffff);     /* Clear LBC error interrupts */
 164         out_be32 (&lbc->lteir, 0xffffffff);     /* Enable LBC error interrupts */
 165         out_be32 (&ecm->eedr, 0xffffffff);      /* Clear ecm errors */
 166         out_be32 (&ecm->eeer, 0xffffffff);      /* Enable ecm errors */
 167
 168         /* Init UPMA for FPGA access */
 169         out_be32 (&lbc->mamr, 0x44440); /* Use a customer-supplied value */
 170         upmconfig(UPMA, (uint *)UPMTableA, sizeof(UPMTableA) / sizeof(int));
 171
 172         /* Init UPMB for Lime controller access */
 173         out_be32 (&lbc->mbmr, 0x444440); /* Use a customer-supplied value */
 174         upmconfig(UPMB, (uint *)UPMTableB, sizeof(UPMTableB) / sizeof(int));
 175 }
 176
 177 #ifdef CONFIG_BOARD_EARLY_INIT_R
 178 int board_early_init_r (void)
 179 {
 180         volatile ccsr_gur_t *gur = (void *)(CONFIG_SYS_MPC85xx_GUTS_ADDR);
 181
 182         /* set and reset the GPIO pin 2 which will reset the W83782G chip */
 183         out_8((unsigned char*)&gur->gpoutdr, 0x3F );
 184         out_be32((unsigned int*)&gur->gpiocr, 0x200 );  /* enable GPOut */
 185         udelay(200);
 186         out_8( (unsigned char*)&gur->gpoutdr, 0x1F );
 187
 188         return (0);
 189 }
 190 #endif /* CONFIG_BOARD_EARLY_INIT_R */
 191
 192 #ifdef CONFIG_OF_BOARD_SETUP
 193 int ft_board_setup(void *blob, struct bd_info *bd)
 194 {
 195         u32 val[12];
 196         int rc, i = 0;
 197
 198         ft_cpu_setup(blob, bd);
 199
 200         /* Fixup NOR FLASH mapping */
 201         val[i++] = 0;                           /* chip select number */
 202         val[i++] = 0;                           /* always 0 */
 203         val[i++] = gd->bd->bi_flashstart;
 204         val[i++] = gd->bd->bi_flashsize;
 205
 206         /* Fixup FPGA mapping */
 207         val[i++] = 3;                           /* chip select number */
 208         val[i++] = 0;                           /* always 0 */
 209         val[i++] = CONFIG_SYS_FPGA_BASE;
 210         val[i++] = CONFIG_SYS_FPGA_SIZE;
 211
 212         rc = fdt_find_and_setprop(blob, "/localbus", "ranges",
 213                                   val, i * sizeof(u32), 1);
 214         if (rc)
 215                 printf("Unable to update localbus ranges, err=%s\n",
 216                        fdt_strerror(rc));
 217
 218         return 0;
 219 }
 220 #endif /* CONFIG_OF_BOARD_SETUP */
 221
 222 #if defined(CONFIG_OF_SEPARATE)
 223 void *board_fdt_blob_setup(int *err)
 224 {
 225         void *fw_dtb;
 226
 227         *err = 0;
 228         fw_dtb = (void *)(CONFIG_SYS_TEXT_BASE - CONFIG_ENV_SECT_SIZE);
 229         if (fdt_magic(fw_dtb) != FDT_MAGIC) {
 230                 printf("DTB is not passed via %x\n", (u32)fw_dtb);
 231                 *err = -ENXIO;
 232                 return NULL;
 233         }
 234
 235         return fw_dtb;
 236 }
 237 #endif
 238
 239 int get_serial_clock(void)
 240 {
 241         return 333333330;
 242 }