board/freescale/mpc8349itx/mpc8349itx.c

   1 /*
   2  * Copyright (C) Freescale Semiconductor, Inc. 2006. All rights reserved.
   3  *
   4  * See file CREDITS for list of people who contributed to this
   5  * project.
   6  *
   7  * This program is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU General Public License as
   9  * published by the Free Software Foundation; either version 2 of
  10  * the License, or (at your option) any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS for A PARTICULAR PURPOSE.  See the
  15  * GNU General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License
  18  * along with this program; if not, write to the Free Software
  19  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  20  * MA 02111-1307 USA
  21  */
  22
  23 #include <common.h>
  24 #include <ioports.h>
  25 #include <mpc83xx.h>
  26 #include <i2c.h>
  27 #include <miiphy.h>
  28 #include <vsc7385.h>
  29 #ifdef CONFIG_PCI
  30 #include <asm/mpc8349_pci.h>
  31 #include <pci.h>
  32 #endif
  33 #include <spd_sdram.h>
  34 #include <asm/mmu.h>
  35 #if defined(CONFIG_OF_LIBFDT)
  36 #include <libfdt.h>
  37 #endif
  38
  39 #ifndef CONFIG_SPD_EEPROM
  40 /*************************************************************************
  41  *  fixed sdram init -- doesn't use serial presence detect.
  42  ************************************************************************/
  43 int fixed_sdram(void)
  44 {
  45         volatile immap_t *im = (immap_t *) CONFIG_SYS_IMMR;
  46         u32 ddr_size;           /* The size of RAM, in bytes */
  47         u32 ddr_size_log2 = 0;
  48
  49         for (ddr_size = CONFIG_SYS_DDR_SIZE * 0x100000; ddr_size > 1; ddr_size >>= 1) {
  50                 if (ddr_size & 1) {
  51                         return -1;
  52                 }
  53                 ddr_size_log2++;
  54         }
  55
  56         im->sysconf.ddrlaw[0].ar =
  57             LAWAR_EN | ((ddr_size_log2 - 1) & LAWAR_SIZE);
  58         im->sysconf.ddrlaw[0].bar = CONFIG_SYS_DDR_SDRAM_BASE & 0xfffff000;
  59
  60         /* Only one CS0 for DDR */
  61         im->ddr.csbnds[0].csbnds = 0x0000000f;
  62         im->ddr.cs_config[0] = CONFIG_SYS_DDR_CONFIG;
  63
  64         debug("cs0_bnds = 0x%08x\n", im->ddr.csbnds[0].csbnds);
  65         debug("cs0_config = 0x%08x\n", im->ddr.cs_config[0]);
  66
  67         debug("DDR:bar=0x%08x\n", im->sysconf.ddrlaw[0].bar);
  68         debug("DDR:ar=0x%08x\n", im->sysconf.ddrlaw[0].ar);
  69
  70         im->ddr.timing_cfg_1 = CONFIG_SYS_DDR_TIMING_1;
  71         im->ddr.timing_cfg_2 = CONFIG_SYS_DDR_TIMING_2;/* Was "2 << TIMING_CFG2_WR_DATA_DELAY_SHIFT" */
  72         im->ddr.sdram_cfg = SDRAM_CFG_SREN | SDRAM_CFG_SDRAM_TYPE_DDR1;
  73         im->ddr.sdram_mode =
  74             (0x0000 << SDRAM_MODE_ESD_SHIFT) | (0x0032 << SDRAM_MODE_SD_SHIFT);
  75         im->ddr.sdram_interval =
  76             (0x0410 << SDRAM_INTERVAL_REFINT_SHIFT) | (0x0100 <<
  77                                                        SDRAM_INTERVAL_BSTOPRE_SHIFT);
  78         im->ddr.sdram_clk_cntl = CONFIG_SYS_DDR_SDRAM_CLK_CNTL;
  79
  80         udelay(200);
  81
  82         im->ddr.sdram_cfg |= SDRAM_CFG_MEM_EN;
  83
  84         debug("DDR:timing_cfg_1=0x%08x\n", im->ddr.timing_cfg_1);
  85         debug("DDR:timing_cfg_2=0x%08x\n", im->ddr.timing_cfg_2);
  86         debug("DDR:sdram_mode=0x%08x\n", im->ddr.sdram_mode);
  87         debug("DDR:sdram_interval=0x%08x\n", im->ddr.sdram_interval);
  88         debug("DDR:sdram_cfg=0x%08x\n", im->ddr.sdram_cfg);
  89
  90         return CONFIG_SYS_DDR_SIZE;
  91 }
  92 #endif
  93
  94 #ifdef CONFIG_PCI
  95 /*
  96  * Initialize PCI Devices, report devices found
  97  */
  98 #ifndef CONFIG_PCI_PNP
  99 static struct pci_config_table pci_mpc83xxmitx_config_table[] = {
 100         {
 101          PCI_ANY_ID,
 102          PCI_ANY_ID,
 103          PCI_ANY_ID,
 104          PCI_ANY_ID,
 105          0x0f,
 106          PCI_ANY_ID,
 107          pci_cfgfunc_config_device,
 108          {
 109           PCI_ENET0_IOADDR,
 110           PCI_ENET0_MEMADDR,
 111           PCI_COMMAND_MEMORY | PCI_COMMAND_MASTER}
 112          },
 113         {}
 114 }
 115 #endif
 116
 117 volatile static struct pci_controller hose[] = {
 118         {
 119 #ifndef CONFIG_PCI_PNP
 120               config_table:pci_mpc83xxmitx_config_table,
 121 #endif
 122          },
 123         {
 124 #ifndef CONFIG_PCI_PNP
 125               config_table:pci_mpc83xxmitx_config_table,
 126 #endif
 127          }
 128 };
 129 #endif                          /* CONFIG_PCI */
 130
 131 phys_size_t initdram(int board_type)
 132 {
 133         volatile immap_t *im = (immap_t *) CONFIG_SYS_IMMR;
 134         u32 msize = 0;
 135 #ifdef CONFIG_DDR_ECC
 136         volatile ddr83xx_t *ddr = &im->ddr;
 137 #endif
 138
 139         if ((im->sysconf.immrbar & IMMRBAR_BASE_ADDR) != (u32) im)
 140                 return -1;
 141
 142         /* DDR SDRAM - Main SODIMM */
 143         im->sysconf.ddrlaw[0].bar = CONFIG_SYS_DDR_BASE & LAWBAR_BAR;
 144 #ifdef CONFIG_SPD_EEPROM
 145         msize = spd_sdram();
 146 #else
 147         msize = fixed_sdram();
 148 #endif
 149
 150 #ifdef CONFIG_DDR_ECC
 151         if (ddr->sdram_cfg & SDRAM_CFG_ECC_EN)
 152                 /* Unlike every other board, on the 83xx spd_sdram() returns
 153                    megabytes instead of just bytes.  That's why we need to
 154                    multiple by 1MB when calling ddr_enable_ecc(). */
 155                 ddr_enable_ecc(msize * 1048576);
 156 #endif
 157
 158         /* return total bus RAM size(bytes) */
 159         return msize * 1024 * 1024;
 160 }
 161
 162 int checkboard(void)
 163 {
 164 #ifdef CONFIG_MPC8349ITX
 165         puts("Board: Freescale MPC8349E-mITX\n");
 166 #else
 167         puts("Board: Freescale MPC8349E-mITX-GP\n");
 168 #endif
 169
 170         return 0;
 171 }
 172
 173 /*
 174  * Implement a work-around for a hardware problem with compact
 175  * flash.
 176  *
 177  * Program the UPM if compact flash is enabled.
 178  */
 179 int misc_init_f(void)
 180 {
 181 #ifdef CONFIG_VSC7385_ENET
 182         volatile u32 *vsc7385_cpuctrl;
 183
 184         /* 0x1c0c0 is the VSC7385 CPU Control (CPUCTRL) Register.  The power up
 185            default of VSC7385 L1_IRQ and L2_IRQ requests are active high.  That
 186            means it is 0 when the IRQ is not active.  This makes the wire-AND
 187            logic always assert IRQ7 to CPU even if there is no request from the
 188            switch.  Since the compact flash and the switch share the same IRQ,
 189            the Linux kernel will think that the compact flash is requesting irq
 190            and get stuck when it tries to clear the IRQ.  Thus we need to set
 191            the L2_IRQ0 and L2_IRQ1 to active low.
 192
 193            The following code sets the L1_IRQ and L2_IRQ polarity to active low.
 194            Without this code, compact flash will not work in Linux because
 195            unlike U-Boot, Linux uses the IRQ, so this code is necessary if we
 196            don't enable compact flash for U-Boot.
 197          */
 198
 199         vsc7385_cpuctrl = (volatile u32 *)(CONFIG_SYS_VSC7385_BASE + 0x1c0c0);
 200         *vsc7385_cpuctrl |= 0x0c;
 201 #endif
 202
 203 #ifdef CONFIG_COMPACT_FLASH
 204         /* UPM Table Configuration Code */
 205         static uint UPMATable[] = {
 206                 0xcffffc00, 0x0fffff00, 0x0fafff00, 0x0fafff00,
 207                 0x0faffd00, 0x0faffc04, 0x0ffffc00, 0x3ffffc01,
 208                 0xfffffc00, 0xfffffc00, 0xfffffc00, 0xfffffc00,
 209                 0xfffffc00, 0xfffffc00, 0xfffffc00, 0xfffffc00,
 210                 0xfffffc00, 0xfffffc00, 0xfffffc00, 0xfff7fc00,
 211                 0xfffffc00, 0xfffffc00, 0xfffffc00, 0xfffffc01,
 212                 0xcffffc00, 0x0fffff00, 0x0ff3ff00, 0x0ff3ff00,
 213                 0x0ff3fe00, 0x0ffffc00, 0x3ffffc05, 0xfffffc00,
 214                 0xfffffc00, 0xfffffc00, 0xfffffc00, 0xfffffc00,
 215                 0xfffffc00, 0xfffffc00, 0xfffffc00, 0xfffffc00,
 216                 0xfffffc00, 0xfffffc00, 0xfffffc00, 0xfffffc00,
 217                 0xfffffc00, 0xfffffc00, 0xfffffc00, 0xfffffc01,
 218                 0xfffffc00, 0xfffffc00, 0xfffffc00, 0xfffffc00,
 219                 0xfffffc00, 0xfffffc00, 0xfffffc00, 0xfffffc00,
 220                 0xfffffc00, 0xfffffc00, 0xfffffc00, 0xfffffc01,
 221                 0xfffffc00, 0xfffffc00, 0xfffffc00, 0xfffffc01
 222         };
 223         volatile immap_t *immap = (immap_t *) CONFIG_SYS_IMMR;
 224         volatile fsl_lbus_t *lbus = &immap->lbus;
 225
 226         lbus->bank[3].br = CONFIG_SYS_BR3_PRELIM;
 227         lbus->bank[3].or = CONFIG_SYS_OR3_PRELIM;
 228
 229         /* Program the MAMR. RFEN=0, OP=00, UWPL=1, AM=000, DS=01, G0CL=000,
 230            GPL4=0, RLF=0001, WLF=0001, TLF=0001, MAD=000000
 231          */
 232         lbus->mamr = 0x08404440;
 233
 234         upmconfig(0, UPMATable, sizeof(UPMATable) / sizeof(UPMATable[0]));
 235
 236         puts("UPMA:  Configured for compact flash\n");
 237 #endif
 238
 239         return 0;
 240 }
 241
 242 /*
 243  * Miscellaneous late-boot configurations
 244  *
 245  * Make sure the EEPROM has the HRCW correctly programmed.
 246  * Make sure the RTC is correctly programmed.
 247  *
 248  * The MPC8349E-mITX can be configured to load the HRCW from
 249  * EEPROM instead of flash.  This is controlled via jumpers
 250  * LGPL0, 1, and 3.  Normally, these jumpers are set to 000 (all
 251  * jumpered), but if they're set to 001 or 010, then the HRCW is
 252  * read from the "I2C EEPROM".
 253  *
 254  * This function makes sure that the I2C EEPROM is programmed
 255  * correctly.
 256  *
 257  * If a VSC7385 microcode image is present, then upload it.
 258  */
 259 int misc_init_r(void)
 260 {
 261         int rc = 0;
 262
 263 #ifdef CONFIG_HARD_I2C
 264
 265         unsigned int orig_bus = i2c_get_bus_num();
 266         u8 i2c_data;
 267
 268 #ifdef CONFIG_SYS_I2C_RTC_ADDR
 269         u8 ds1339_data[17];
 270 #endif
 271
 272 #ifdef CONFIG_SYS_I2C_EEPROM_ADDR
 273         static u8 eeprom_data[] =       /* HRCW data */
 274         {
 275                 0xAA, 0x55, 0xAA,       /* Preamble */
 276                 0x7C,                   /* ACS=0, BYTE_EN=1111, CONT=1 */
 277                 0x02, 0x40,             /* RCWL ADDR=0x0_0900 */
 278                 (CONFIG_SYS_HRCW_LOW >> 24) & 0xFF,
 279                 (CONFIG_SYS_HRCW_LOW >> 16) & 0xFF,
 280                 (CONFIG_SYS_HRCW_LOW >> 8) & 0xFF,
 281                 CONFIG_SYS_HRCW_LOW & 0xFF,
 282                 0x7C,                   /* ACS=0, BYTE_EN=1111, CONT=1 */
 283                 0x02, 0x41,             /* RCWH ADDR=0x0_0904 */
 284                 (CONFIG_SYS_HRCW_HIGH >> 24) & 0xFF,
 285                 (CONFIG_SYS_HRCW_HIGH >> 16) & 0xFF,
 286                 (CONFIG_SYS_HRCW_HIGH >> 8) & 0xFF,
 287                 CONFIG_SYS_HRCW_HIGH & 0xFF
 288         };
 289
 290         u8 data[sizeof(eeprom_data)];
 291 #endif
 292
 293         printf("Board revision: ");
 294         i2c_set_bus_num(1);
 295         if (i2c_read(CONFIG_SYS_I2C_8574A_ADDR2, 0, 0, &i2c_data, sizeof(i2c_data)) == 0)
 296                 printf("%u.%u (PCF8475A)\n", (i2c_data & 0x02) >> 1, i2c_data & 0x01);
 297         else if (i2c_read(CONFIG_SYS_I2C_8574_ADDR2, 0, 0, &i2c_data, sizeof(i2c_data)) == 0)
 298                 printf("%u.%u (PCF8475)\n",  (i2c_data & 0x02) >> 1, i2c_data & 0x01);
 299         else {
 300                 printf("Unknown\n");
 301                 rc = 1;
 302         }
 303
 304 #ifdef CONFIG_SYS_I2C_EEPROM_ADDR
 305         i2c_set_bus_num(0);
 306
 307         if (i2c_read(CONFIG_SYS_I2C_EEPROM_ADDR, 0, 2, data, sizeof(data)) == 0) {
 308                 if (memcmp(data, eeprom_data, sizeof(data)) != 0) {
 309                         if (i2c_write
 310                             (CONFIG_SYS_I2C_EEPROM_ADDR, 0, 2, eeprom_data,
 311                              sizeof(eeprom_data)) != 0) {
 312                                 puts("Failure writing the HRCW to EEPROM via I2C.\n");
 313                                 rc = 1;
 314                         }
 315                 }
 316         } else {
 317                 puts("Failure reading the HRCW from EEPROM via I2C.\n");
 318                 rc = 1;
 319         }
 320 #endif
 321
 322 #ifdef CONFIG_SYS_I2C_RTC_ADDR
 323         i2c_set_bus_num(1);
 324
 325         if (i2c_read(CONFIG_SYS_I2C_RTC_ADDR, 0, 1, ds1339_data, sizeof(ds1339_data))
 326             == 0) {
 327
 328                 /* Work-around for MPC8349E-mITX bug #13601.
 329                    If the RTC does not contain valid register values, the DS1339
 330                    Linux driver will not work.
 331                  */
 332
 333                 /* Make sure status register bits 6-2 are zero */
 334                 ds1339_data[0x0f] &= ~0x7c;
 335
 336                 /* Check for a valid day register value */
 337                 ds1339_data[0x03] &= ~0xf8;
 338                 if (ds1339_data[0x03] == 0) {
 339                         ds1339_data[0x03] = 1;
 340                 }
 341
 342                 /* Check for a valid date register value */
 343                 ds1339_data[0x04] &= ~0xc0;
 344                 if ((ds1339_data[0x04] == 0) ||
 345                     ((ds1339_data[0x04] & 0x0f) > 9) ||
 346                     (ds1339_data[0x04] >= 0x32)) {
 347                         ds1339_data[0x04] = 1;
 348                 }
 349
 350                 /* Check for a valid month register value */
 351                 ds1339_data[0x05] &= ~0x60;
 352
 353                 if ((ds1339_data[0x05] == 0) ||
 354                     ((ds1339_data[0x05] & 0x0f) > 9) ||
 355                     ((ds1339_data[0x05] >= 0x13)
 356                      && (ds1339_data[0x05] <= 0x19))) {
 357                         ds1339_data[0x05] = 1;
 358                 }
 359
 360                 /* Enable Oscillator and rate select */
 361                 ds1339_data[0x0e] = 0x1c;
 362
 363                 /* Work-around for MPC8349E-mITX bug #13330.
 364                    Ensure that the RTC control register contains the value 0x1c.
 365                    This affects SATA performance.
 366                  */
 367
 368                 if (i2c_write
 369                     (CONFIG_SYS_I2C_RTC_ADDR, 0, 1, ds1339_data,
 370                      sizeof(ds1339_data))) {
 371                         puts("Failure writing to the RTC via I2C.\n");
 372                         rc = 1;
 373                 }
 374         } else {
 375                 puts("Failure reading from the RTC via I2C.\n");
 376                 rc = 1;
 377         }
 378 #endif
 379
 380         i2c_set_bus_num(orig_bus);
 381 #endif
 382
 383 #ifdef CONFIG_VSC7385_IMAGE
 384         if (vsc7385_upload_firmware((void *) CONFIG_VSC7385_IMAGE,
 385                 CONFIG_VSC7385_IMAGE_SIZE)) {
 386                 puts("Failure uploading VSC7385 microcode.\n");
 387                 rc = 1;
 388         }
 389 #endif
 390
 391         return rc;
 392 }
 393
 394 #if defined(CONFIG_OF_BOARD_SETUP)
 395 void ft_board_setup(void *blob, bd_t *bd)
 396 {
 397         ft_cpu_setup(blob, bd);
 398 #ifdef CONFIG_PCI
 399         ft_pci_setup(blob, bd);
 400 #endif
 401 }
 402 #endif