LXR uboot/board/socrates/socrates.c

   1/*
   2 * (C) Copyright 2008
   3 * Sergei Poselenov, Emcraft Systems, sposelenov@emcraft.com.
   4 *
   5 * Copyright 2004 Freescale Semiconductor.
   6 * (C) Copyright 2002,2003, Motorola Inc.
   7 * Xianghua Xiao, (X.Xiao@motorola.com)
   8 *
   9 * (C) Copyright 2002 Scott McNutt <smcnutt@artesyncp.com>
  10 *
  11 * SPDX-License-Identifier:     GPL-2.0+
  12 */
  13
  14#include <common.h>
  15#include <pci.h>
  16#include <asm/processor.h>
  17#include <asm/immap_85xx.h>
  18#include <ioports.h>
  19#include <flash.h>
  20#include <libfdt.h>
  21#include <fdt_support.h>
  22#include <asm/io.h>
  23#include <i2c.h>
  24#include <mb862xx.h>
  25#include <video_fb.h>
  26#include "upm_table.h"
  27
  28DECLARE_GLOBAL_DATA_PTR;
  29
  30extern flash_info_t flash_info[];       /* FLASH chips info */
  31extern GraphicDevice mb862xx;
  32
  33void local_bus_init (void);
  34ulong flash_get_size (ulong base, int banknum);
  35
  36int checkboard (void)
  37{
  38        volatile ccsr_gur_t *gur = (void *)(CONFIG_SYS_MPC85xx_GUTS_ADDR);
  39        char buf[64];
  40        int f;
  41        int i = getenv_f("serial#", buf, sizeof(buf));
  42#ifdef CONFIG_PCI
  43        char *src;
  44#endif
  45
  46        puts("Board: Socrates");
  47        if (i > 0) {
  48                puts(", serial# ");
  49                puts(buf);
  50        }
  51        putc('\n');
  52
  53#ifdef CONFIG_PCI
  54        /* Check the PCI_clk sel bit */
  55        if (in_be32(&gur->porpllsr) & (1<<15)) {
  56                src = "SYSCLK";
  57                f = CONFIG_SYS_CLK_FREQ;
  58        } else {
  59                src = "PCI_CLK";
  60                f = CONFIG_PCI_CLK_FREQ;
  61        }
  62        printf ("PCI1:  32 bit, %d MHz (%s)\n", f/1000000, src);
  63#else
  64        printf ("PCI1:  disabled\n");
  65#endif
  66
  67        /*
  68         * Initialize local bus.
  69         */
  70        local_bus_init ();
  71        return 0;
  72}
  73
  74int misc_init_r (void)
  75{
  76        /*
  77         * Adjust flash start and offset to detected values
  78         */
  79        gd->bd->bi_flashstart = 0 - gd->bd->bi_flashsize;
  80        gd->bd->bi_flashoffset = 0;
  81
  82        /*
  83         * Check if boot FLASH isn't max size
  84         */
  85        if (gd->bd->bi_flashsize < (0 - CONFIG_SYS_FLASH0)) {
  86                set_lbc_or(0, gd->bd->bi_flashstart |
  87                           (CONFIG_SYS_OR0_PRELIM & 0x00007fff));
  88                set_lbc_br(0, gd->bd->bi_flashstart |
  89                           (CONFIG_SYS_BR0_PRELIM & 0x00007fff));
  90
  91                /*
  92                 * Re-check to get correct base address
  93                 */
  94                flash_get_size(gd->bd->bi_flashstart, CONFIG_SYS_MAX_FLASH_BANKS - 1);
  95        }
  96
  97        /*
  98         * Check if only one FLASH bank is available
  99         */
 100        if (gd->bd->bi_flashsize != CONFIG_SYS_MAX_FLASH_BANKS * (0 - CONFIG_SYS_FLASH0)) {
 101                set_lbc_or(1, 0);
 102                set_lbc_br(1, 0);
 103
 104                /*
 105                 * Re-do flash protection upon new addresses
 106                 */
 107                flash_protect (FLAG_PROTECT_CLEAR,
 108                               gd->bd->bi_flashstart, 0xffffffff,
 109                               &flash_info[CONFIG_SYS_MAX_FLASH_BANKS - 1]);
 110
 111                /* Monitor protection ON by default */
 112                flash_protect (FLAG_PROTECT_SET,
 113                               CONFIG_SYS_MONITOR_BASE, CONFIG_SYS_MONITOR_BASE + monitor_flash_len - 1,
 114                               &flash_info[CONFIG_SYS_MAX_FLASH_BANKS - 1]);
 115
 116                /* Environment protection ON by default */
 117                flash_protect (FLAG_PROTECT_SET,
 118                               CONFIG_ENV_ADDR,
 119                               CONFIG_ENV_ADDR + CONFIG_ENV_SECT_SIZE - 1,
 120                               &flash_info[CONFIG_SYS_MAX_FLASH_BANKS - 1]);
 121
 122                /* Redundant environment protection ON by default */
 123                flash_protect (FLAG_PROTECT_SET,
 124                               CONFIG_ENV_ADDR_REDUND,
 125                               CONFIG_ENV_ADDR_REDUND + CONFIG_ENV_SECT_SIZE - 1,
 126                               &flash_info[CONFIG_SYS_MAX_FLASH_BANKS - 1]);
 127        }
 128
 129        return 0;
 130}
 131
 132/*
 133 * Initialize Local Bus
 134 */
 135void local_bus_init (void)
 136{
 137        volatile fsl_lbc_t *lbc = LBC_BASE_ADDR;
 138        volatile ccsr_local_ecm_t *ecm = (void *)(CONFIG_SYS_MPC85xx_ECM_ADDR);
 139        sys_info_t sysinfo;
 140        uint clkdiv;
 141        uint lbc_mhz;
 142        uint lcrr = CONFIG_SYS_LBC_LCRR;
 143
 144        get_sys_info (&sysinfo);
 145        clkdiv = lbc->lcrr & LCRR_CLKDIV;
 146        lbc_mhz = sysinfo.freq_systembus / 1000000 / clkdiv;
 147
 148        /* Disable PLL bypass for Local Bus Clock >= 66 MHz */
 149        if (lbc_mhz >= 66)
 150                lcrr &= ~LCRR_DBYP;     /* DLL Enabled */
 151        else
 152                lcrr |= LCRR_DBYP;      /* DLL Bypass */
 153
 154        out_be32 (&lbc->lcrr, lcrr);
 155        asm ("sync;isync;msync");
 156
 157        out_be32 (&lbc->ltesr, 0xffffffff);     /* Clear LBC error interrupts */
 158        out_be32 (&lbc->lteir, 0xffffffff);     /* Enable LBC error interrupts */
 159        out_be32 (&ecm->eedr, 0xffffffff);      /* Clear ecm errors */
 160        out_be32 (&ecm->eeer, 0xffffffff);      /* Enable ecm errors */
 161
 162        /* Init UPMA for FPGA access */
 163        out_be32 (&lbc->mamr, 0x44440); /* Use a customer-supplied value */
 164        upmconfig (UPMA, (uint *)UPMTableA, sizeof(UPMTableA)/sizeof(int));
 165
 166        /* Init UPMB for Lime controller access */
 167        out_be32 (&lbc->mbmr, 0x444440); /* Use a customer-supplied value */
 168        upmconfig (UPMB, (uint *)UPMTableB, sizeof(UPMTableB)/sizeof(int));
 169}
 170
 171#if defined(CONFIG_PCI)
 172/*
 173 * Initialize PCI Devices, report devices found.
 174 */
 175
 176#ifndef CONFIG_PCI_PNP
 177static struct pci_config_table pci_mpc85xxads_config_table[] = {
 178        {PCI_ANY_ID, PCI_ANY_ID, PCI_ANY_ID, PCI_ANY_ID,
 179         PCI_IDSEL_NUMBER, PCI_ANY_ID,
 180         pci_cfgfunc_config_device, {PCI_ENET0_IOADDR,
 181                                     PCI_ENET0_MEMADDR,
 182                                     PCI_COMMAND_MEMORY |
 183                                     PCI_COMMAND_MASTER}},
 184        {}
 185};
 186#endif
 187
 188
 189static struct pci_controller hose = {
 190#ifndef CONFIG_PCI_PNP
 191        config_table:pci_mpc85xxads_config_table,
 192#endif
 193};
 194
 195#endif /* CONFIG_PCI */
 196
 197
 198void pci_init_board (void)
 199{
 200#ifdef CONFIG_PCI
 201        pci_mpc85xx_init (&hose);
 202#endif /* CONFIG_PCI */
 203}
 204
 205#ifdef CONFIG_BOARD_EARLY_INIT_R
 206int board_early_init_r (void)
 207{
 208        volatile ccsr_gur_t *gur = (void *)(CONFIG_SYS_MPC85xx_GUTS_ADDR);
 209
 210        /* set and reset the GPIO pin 2 which will reset the W83782G chip */
 211        out_8((unsigned char*)&gur->gpoutdr, 0x3F );
 212        out_be32((unsigned int*)&gur->gpiocr, 0x200 );  /* enable GPOut */
 213        udelay(200);
 214        out_8( (unsigned char*)&gur->gpoutdr, 0x1F );
 215
 216        return (0);
 217}
 218#endif /* CONFIG_BOARD_EARLY_INIT_R */
 219
 220#if defined(CONFIG_OF_LIBFDT) && defined(CONFIG_OF_BOARD_SETUP)
 221void
 222ft_board_setup(void *blob, bd_t *bd)
 223{
 224        u32 val[12];
 225        int rc, i = 0;
 226
 227        ft_cpu_setup(blob, bd);
 228
 229        /* Fixup NOR FLASH mapping */
 230        val[i++] = 0;                           /* chip select number */
 231        val[i++] = 0;                           /* always 0 */
 232        val[i++] = gd->bd->bi_flashstart;
 233        val[i++] = gd->bd->bi_flashsize;
 234
 235        if (mb862xx.frameAdrs == CONFIG_SYS_LIME_BASE) {
 236                /* Fixup LIME mapping */
 237                val[i++] = 2;                   /* chip select number */
 238                val[i++] = 0;                   /* always 0 */
 239                val[i++] = CONFIG_SYS_LIME_BASE;
 240                val[i++] = CONFIG_SYS_LIME_SIZE;
 241        }
 242
 243        /* Fixup FPGA mapping */
 244        val[i++] = 3;                           /* chip select number */
 245        val[i++] = 0;                           /* always 0 */
 246        val[i++] = CONFIG_SYS_FPGA_BASE;
 247        val[i++] = CONFIG_SYS_FPGA_SIZE;
 248
 249        rc = fdt_find_and_setprop(blob, "/localbus", "ranges",
 250                                  val, i * sizeof(u32), 1);
 251        if (rc)
 252                printf("Unable to update localbus ranges, err=%s\n",
 253                       fdt_strerror(rc));
 254}
 255#endif /* defined(CONFIG_OF_LIBFDT) && defined(CONFIG_OF_BOARD_SETUP) */
 256
 257#define DEFAULT_BRIGHTNESS      25
 258#define BACKLIGHT_ENABLE        (1 << 31)
 259
 260static const gdc_regs init_regs [] =
 261{
 262        {0x0100, 0x00010f00},
 263        {0x0020, 0x801901df},
 264        {0x0024, 0x00000000},
 265        {0x0028, 0x00000000},
 266        {0x002c, 0x00000000},
 267        {0x0110, 0x00000000},
 268        {0x0114, 0x00000000},
 269        {0x0118, 0x01df0320},
 270        {0x0004, 0x041f0000},
 271        {0x0008, 0x031f031f},
 272        {0x000c, 0x017f0349},
 273        {0x0010, 0x020c0000},
 274        {0x0014, 0x01df01e9},
 275        {0x0018, 0x00000000},
 276        {0x001c, 0x01e00320},
 277        {0x0100, 0x80010f00},
 278        {0x0, 0x0}
 279};
 280
 281const gdc_regs *board_get_regs (void)
 282{
 283        return init_regs;
 284}
 285
 286int lime_probe(void)
 287{
 288        uint cfg_br2;
 289        uint cfg_or2;
 290        int type;
 291
 292        cfg_br2 = get_lbc_br(2);
 293        cfg_or2 = get_lbc_or(2);
 294
 295        /* Configure GPCM for CS2 */
 296        set_lbc_br(2, 0);
 297        set_lbc_or(2, 0xfc000410);
 298        set_lbc_br(2, (CONFIG_SYS_LIME_BASE) | 0x00001901);
 299
 300        /* Get controller type */
 301        type = mb862xx_probe(CONFIG_SYS_LIME_BASE);
 302
 303        /* Restore previous CS2 configuration */
 304        set_lbc_br(2, 0);
 305        set_lbc_or(2, cfg_or2);
 306        set_lbc_br(2, cfg_br2);
 307
 308        return (type == MB862XX_TYPE_LIME) ? 1 : 0;
 309}
 310
 311/* Returns Lime base address */
 312unsigned int board_video_init (void)
 313{
 314        if (!lime_probe())
 315                return 0;
 316
 317        mb862xx.winSizeX = 800;
 318        mb862xx.winSizeY = 480;
 319        mb862xx.gdfIndex = GDF_15BIT_555RGB;
 320        mb862xx.gdfBytesPP = 2;
 321
 322        return CONFIG_SYS_LIME_BASE;
 323}
 324
 325#define W83782D_REG_CFG         0x40
 326#define W83782D_REG_BANK_SEL    0x4e
 327#define W83782D_REG_ADCCLK      0x4b
 328#define W83782D_REG_BEEP_CTRL   0x4d
 329#define W83782D_REG_BEEP_CTRL2  0x57
 330#define W83782D_REG_PWMOUT1     0x5b
 331#define W83782D_REG_VBAT        0x5d
 332
 333static int w83782d_hwmon_init(void)
 334{
 335        u8 buf;
 336
 337        if (i2c_read(CONFIG_SYS_I2C_W83782G_ADDR, W83782D_REG_CFG, 1, &buf, 1))
 338                return -1;
 339
 340        i2c_reg_write(CONFIG_SYS_I2C_W83782G_ADDR, W83782D_REG_CFG, 0x80);
 341        i2c_reg_write(CONFIG_SYS_I2C_W83782G_ADDR, W83782D_REG_BANK_SEL, 0);
 342        i2c_reg_write(CONFIG_SYS_I2C_W83782G_ADDR, W83782D_REG_ADCCLK, 0x40);
 343
 344        buf = i2c_reg_read(CONFIG_SYS_I2C_W83782G_ADDR, W83782D_REG_BEEP_CTRL);
 345        i2c_reg_write(CONFIG_SYS_I2C_W83782G_ADDR, W83782D_REG_BEEP_CTRL,
 346                      buf | 0x80);
 347        i2c_reg_write(CONFIG_SYS_I2C_W83782G_ADDR, W83782D_REG_BEEP_CTRL2, 0);
 348        i2c_reg_write(CONFIG_SYS_I2C_W83782G_ADDR, W83782D_REG_PWMOUT1, 0x47);
 349        i2c_reg_write(CONFIG_SYS_I2C_W83782G_ADDR, W83782D_REG_VBAT, 0x01);
 350
 351        buf = i2c_reg_read(CONFIG_SYS_I2C_W83782G_ADDR, W83782D_REG_CFG);
 352        i2c_reg_write(CONFIG_SYS_I2C_W83782G_ADDR, W83782D_REG_CFG,
 353                      (buf & 0xf4) | 0x01);
 354        return 0;
 355}
 356
 357static void board_backlight_brightness(int br)
 358{
 359        u32 reg;
 360        u8 buf;
 361        u8 old_buf;
 362
 363        /* Select bank 0 */
 364        if (i2c_read(CONFIG_SYS_I2C_W83782G_ADDR, 0x4e, 1, &old_buf, 1))
 365                goto err;
 366        else
 367                buf = old_buf & 0xf8;
 368
 369        if (i2c_write(CONFIG_SYS_I2C_W83782G_ADDR, 0x4e, 1, &buf, 1))
 370                goto err;
 371
 372        if (br > 0) {
 373                /* PWMOUT1 duty cycle ctrl */
 374                buf = 255 / (100 / br);
 375                if (i2c_write(CONFIG_SYS_I2C_W83782G_ADDR, 0x5b, 1, &buf, 1))
 376                        goto err;
 377
 378                /* LEDs on */
 379                reg = in_be32((void *)(CONFIG_SYS_FPGA_BASE + 0x0c));
 380                if (!(reg & BACKLIGHT_ENABLE));
 381                        out_be32((void *)(CONFIG_SYS_FPGA_BASE + 0x0c),
 382                                 reg | BACKLIGHT_ENABLE);
 383        } else {
 384                buf = 0;
 385                if (i2c_write(CONFIG_SYS_I2C_W83782G_ADDR, 0x5b, 1, &buf, 1))
 386                        goto err;
 387
 388                /* LEDs off */
 389                reg = in_be32((void *)(CONFIG_SYS_FPGA_BASE + 0x0c));
 390                reg &= ~BACKLIGHT_ENABLE;
 391                out_be32((void *)(CONFIG_SYS_FPGA_BASE + 0x0c), reg);
 392        }
 393        /* Restore previous bank setting */
 394        if (i2c_write(CONFIG_SYS_I2C_W83782G_ADDR, 0x4e, 1, &old_buf, 1))
 395                goto err;
 396
 397        return;
 398err:
 399        printf("W83782G I2C access failed\n");
 400}
 401
 402void board_backlight_switch (int flag)
 403{
 404        char * param;
 405        int rc;
 406
 407        if (w83782d_hwmon_init())
 408                printf ("hwmon IC init failed\n");
 409
 410        if (flag) {
 411                param = getenv("brightness");
 412                rc = param ? simple_strtol(param, NULL, 10) : -1;
 413                if (rc < 0)
 414                        rc = DEFAULT_BRIGHTNESS;
 415        } else {
 416                rc = 0;
 417        }
 418        board_backlight_brightness(rc);
 419}
 420
 421#if defined(CONFIG_CONSOLE_EXTRA_INFO)
 422/*
 423 * Return text to be printed besides the logo.
 424 */
 425void video_get_info_str (int line_number, char *info)
 426{
 427        if (line_number == 1) {
 428                strcpy (info, " Board: Socrates");
 429        } else {
 430                info [0] = '\0';
 431        }
 432}
 433#endif
 434