arch/ppc/platforms/4xx/yucca.c

   1 /*
   2  * arch/ppc/platforms/4xx/yucca.c
   3  *
   4  * Yucca board specific routines
   5  *
   6  * Roland Dreier <rolandd@cisco.com> (based on luan.c by Matt Porter)
   7  *
   8  * Copyright 2004-2005 MontaVista Software Inc.
   9  * Copyright (c) 2005 Cisco Systems.  All rights reserved.
  10  *
  11  * This program is free software; you can redistribute  it and/or modify it
  12  * under  the terms of  the GNU General  Public License as published by the
  13  * Free Software Foundation;  either version 2 of the  License, or (at your
  14  * option) any later version.
  15  */
  16
  17 #include <linux/config.h>
  18 #include <linux/stddef.h>
  19 #include <linux/kernel.h>
  20 #include <linux/init.h>
  21 #include <linux/errno.h>
  22 #include <linux/reboot.h>
  23 #include <linux/pci.h>
  24 #include <linux/kdev_t.h>
  25 #include <linux/types.h>
  26 #include <linux/major.h>
  27 #include <linux/blkdev.h>
  28 #include <linux/console.h>
  29 #include <linux/delay.h>
  30 #include <linux/ide.h>
  31 #include <linux/initrd.h>
  32 #include <linux/seq_file.h>
  33 #include <linux/root_dev.h>
  34 #include <linux/tty.h>
  35 #include <linux/serial.h>
  36 #include <linux/serial_core.h>
  37
  38 #include <asm/system.h>
  39 #include <asm/pgtable.h>
  40 #include <asm/page.h>
  41 #include <asm/dma.h>
  42 #include <asm/io.h>
  43 #include <asm/machdep.h>
  44 #include <asm/ocp.h>
  45 #include <asm/pci-bridge.h>
  46 #include <asm/time.h>
  47 #include <asm/todc.h>
  48 #include <asm/bootinfo.h>
  49 #include <asm/ppc4xx_pic.h>
  50 #include <asm/ppcboot.h>
  51
  52 #include <syslib/ibm44x_common.h>
  53 #include <syslib/ibm440gx_common.h>
  54 #include <syslib/ibm440sp_common.h>
  55 #include <syslib/ppc440spe_pcie.h>
  56
  57 extern bd_t __res;
  58
  59 static struct ibm44x_clocks clocks __initdata;
  60
  61 static void __init
  62 yucca_calibrate_decr(void)
  63 {
  64         unsigned int freq;
  65
  66         if (mfspr(SPRN_CCR1) & CCR1_TCS)
  67                 freq = YUCCA_TMR_CLK;
  68         else
  69                 freq = clocks.cpu;
  70
  71         ibm44x_calibrate_decr(freq);
  72 }
  73
  74 static int
  75 yucca_show_cpuinfo(struct seq_file *m)
  76 {
  77         seq_printf(m, "vendor\t\t: AMCC\n");
  78         seq_printf(m, "machine\t\t: PPC440SPe EVB (Yucca)\n");
  79
  80         return 0;
  81 }
  82
  83 static enum {
  84         HOSE_UNKNOWN,
  85         HOSE_PCIX,
  86         HOSE_PCIE0,
  87         HOSE_PCIE1,
  88         HOSE_PCIE2
  89 } hose_type[4];
  90
  91 static inline int
  92 yucca_map_irq(struct pci_dev *dev, unsigned char idsel, unsigned char pin)
  93 {
  94         struct pci_controller *hose = pci_bus_to_hose(dev->bus->number);
  95
  96         if (hose_type[hose->index] == HOSE_PCIX) {
  97                 static char pci_irq_table[][4] =
  98                 /*
  99                  *      PCI IDSEL/INTPIN->INTLINE
 100                  *        A   B   C   D
 101                  */
 102                 {
 103                         { 81, -1, -1, -1 },     /* IDSEL 1 - PCIX0 Slot 0 */
 104                 };
 105                 const long min_idsel = 1, max_idsel = 1, irqs_per_slot = 4;
 106                 return PCI_IRQ_TABLE_LOOKUP;
 107         } else if (hose_type[hose->index] == HOSE_PCIE0) {
 108                 static char pci_irq_table[][4] =
 109                 /*
 110                  *      PCI IDSEL/INTPIN->INTLINE
 111                  *        A   B   C   D
 112                  */
 113                 {
 114                         { 96, 97, 98, 99 },
 115                 };
 116                 const long min_idsel = 1, max_idsel = 1, irqs_per_slot = 4;
 117                 return PCI_IRQ_TABLE_LOOKUP;
 118         } else if (hose_type[hose->index] == HOSE_PCIE1) {
 119                 static char pci_irq_table[][4] =
 120                 /*
 121                  *      PCI IDSEL/INTPIN->INTLINE
 122                  *        A   B   C   D
 123                  */
 124                 {
 125                         { 100, 101, 102, 103 },
 126                 };
 127                 const long min_idsel = 1, max_idsel = 1, irqs_per_slot = 4;
 128                 return PCI_IRQ_TABLE_LOOKUP;
 129         } else if (hose_type[hose->index] == HOSE_PCIE2) {
 130                 static char pci_irq_table[][4] =
 131                 /*
 132                  *      PCI IDSEL/INTPIN->INTLINE
 133                  *        A   B   C   D
 134                  */
 135                 {
 136                         { 104, 105, 106, 107 },
 137                 };
 138                 const long min_idsel = 1, max_idsel = 1, irqs_per_slot = 4;
 139                 return PCI_IRQ_TABLE_LOOKUP;
 140         }
 141         return -1;
 142 }
 143
 144 static void __init yucca_set_emacdata(void)
 145 {
 146         struct ocp_def *def;
 147         struct ocp_func_emac_data *emacdata;
 148
 149         /* Set phy_map, phy_mode, and mac_addr for the EMAC */
 150         def = ocp_get_one_device(OCP_VENDOR_IBM, OCP_FUNC_EMAC, 0);
 151         emacdata = def->additions;
 152         emacdata->phy_map = 0x00000001; /* Skip 0x00 */
 153         emacdata->phy_mode = PHY_MODE_GMII;
 154         memcpy(emacdata->mac_addr, __res.bi_enetaddr, 6);
 155 }
 156
 157 static int __init yucca_pcie_card_present(int port)
 158 {
 159    void __iomem *pcie_fpga_base;
 160    u16 reg;
 161
 162    pcie_fpga_base = ioremap64(YUCCA_FPGA_REG_BASE, YUCCA_FPGA_REG_SIZE);
 163    reg = in_be16(pcie_fpga_base + FPGA_REG1C);
 164    iounmap(pcie_fpga_base);
 165
 166    switch(port) {
 167    case 0: return !(reg & FPGA_REG1C_PE0_PRSNT);
 168    case 1: return !(reg & FPGA_REG1C_PE1_PRSNT);
 169    case 2: return !(reg & FPGA_REG1C_PE2_PRSNT);
 170    default: return 0;
 171    }
 172 }
 173
 174 /*
 175  * For the given slot, set rootpoint mode, send power to the slot,
 176  * turn on the green LED and turn off the yellow LED, enable the clock
 177  * and turn off reset.
 178  */
 179 static void __init yucca_setup_pcie_fpga_rootpoint(int port)
 180 {
 181         void __iomem *pcie_reg_fpga_base;
 182         u16 power, clock, green_led, yellow_led, reset_off, rootpoint, endpoint;
 183
 184         pcie_reg_fpga_base = ioremap64(YUCCA_FPGA_REG_BASE, YUCCA_FPGA_REG_SIZE);
 185
 186         switch(port) {
 187         case 0:
 188                 rootpoint   = FPGA_REG1C_PE0_ROOTPOINT;
 189                 endpoint    = 0;
 190                 power       = FPGA_REG1A_PE0_PWRON;
 191                 green_led   = FPGA_REG1A_PE0_GLED;
 192                 clock       = FPGA_REG1A_PE0_REFCLK_ENABLE;
 193                 yellow_led  = FPGA_REG1A_PE0_YLED;
 194                 reset_off   = FPGA_REG1C_PE0_PERST;
 195                 break;
 196         case 1:
 197                 rootpoint   = 0;
 198                 endpoint    = FPGA_REG1C_PE1_ENDPOINT;
 199                 power       = FPGA_REG1A_PE1_PWRON;
 200                 green_led   = FPGA_REG1A_PE1_GLED;
 201                 clock       = FPGA_REG1A_PE1_REFCLK_ENABLE;
 202                 yellow_led  = FPGA_REG1A_PE1_YLED;
 203                 reset_off   = FPGA_REG1C_PE1_PERST;
 204                 break;
 205         case 2:
 206                 rootpoint   = 0;
 207                 endpoint    = FPGA_REG1C_PE2_ENDPOINT;
 208                 power       = FPGA_REG1A_PE2_PWRON;
 209                 green_led   = FPGA_REG1A_PE2_GLED;
 210                 clock       = FPGA_REG1A_PE2_REFCLK_ENABLE;
 211                 yellow_led  = FPGA_REG1A_PE2_YLED;
 212                 reset_off   = FPGA_REG1C_PE2_PERST;
 213                 break;
 214
 215         default:
 216                 return;
 217         }
 218
 219         out_be16(pcie_reg_fpga_base + FPGA_REG1A,
 220                  ~(power | clock | green_led) &
 221                  (yellow_led | in_be16(pcie_reg_fpga_base + FPGA_REG1A)));
 222         out_be16(pcie_reg_fpga_base + FPGA_REG1C,
 223                  ~(endpoint | reset_off) &
 224                  (rootpoint | in_be16(pcie_reg_fpga_base + FPGA_REG1C)));
 225
 226         /*
 227          * Leave device in reset for a while after powering on the
 228          * slot to give it a chance to initialize.
 229          */
 230         mdelay(250);
 231
 232         out_be16(pcie_reg_fpga_base + FPGA_REG1C,
 233                  reset_off | in_be16(pcie_reg_fpga_base + FPGA_REG1C));
 234
 235         iounmap(pcie_reg_fpga_base);
 236 }
 237
 238 static void __init
 239 yucca_setup_hoses(void)
 240 {
 241         struct pci_controller *hose;
 242         char name[20];
 243         int i;
 244
 245         if (0 && ppc440spe_init_pcie()) {
 246                 printk(KERN_WARNING "PPC440SPe PCI Express initialization failed\n");
 247                 return;
 248         }
 249
 250         for (i = 0; i <= 2; ++i) {
 251                 if (!yucca_pcie_card_present(i))
 252                         continue;
 253
 254                 printk(KERN_INFO "PCIE%d: card present\n", i);
 255                 yucca_setup_pcie_fpga_rootpoint(i);
 256                 if (ppc440spe_init_pcie_rootport(i)) {
 257                         printk(KERN_WARNING "PCIE%d: initialization failed\n", i);
 258                         continue;
 259                 }
 260
 261                 hose = pcibios_alloc_controller();
 262                 if (!hose)
 263                         return;
 264
 265                 sprintf(name, "PCIE%d host bridge", i);
 266                 pci_init_resource(&hose->io_resource,
 267                                   YUCCA_PCIX_LOWER_IO,
 268                                   YUCCA_PCIX_UPPER_IO,
 269                                   IORESOURCE_IO,
 270                                   name);
 271
 272                 hose->mem_space.start = YUCCA_PCIE_LOWER_MEM +
 273                         i * YUCCA_PCIE_MEM_SIZE;
 274                 hose->mem_space.end   = hose->mem_space.start +
 275                         YUCCA_PCIE_MEM_SIZE - 1;
 276
 277                 pci_init_resource(&hose->mem_resources[0],
 278                                   hose->mem_space.start,
 279                                   hose->mem_space.end,
 280                                   IORESOURCE_MEM,
 281                                   name);
 282
 283                 hose->first_busno = 0;
 284                 hose->last_busno  = 15;
 285                 hose_type[hose->index] = HOSE_PCIE0 + i;
 286
 287                 ppc440spe_setup_pcie(hose, i);
 288                 hose->last_busno = pciauto_bus_scan(hose, hose->first_busno);
 289         }
 290
 291         ppc_md.pci_swizzle = common_swizzle;
 292         ppc_md.pci_map_irq = yucca_map_irq;
 293 }
 294
 295 TODC_ALLOC();
 296
 297 static void __init
 298 yucca_early_serial_map(void)
 299 {
 300         struct uart_port port;
 301
 302         /* Setup ioremapped serial port access */
 303         memset(&port, 0, sizeof(port));
 304         port.membase = ioremap64(PPC440SPE_UART0_ADDR, 8);
 305         port.irq = UART0_INT;
 306         port.uartclk = clocks.uart0;
 307         port.regshift = 0;
 308         port.iotype = UPIO_MEM;
 309         port.flags = UPF_BOOT_AUTOCONF | UPF_SKIP_TEST;
 310         port.line = 0;
 311
 312         if (early_serial_setup(&port) != 0) {
 313                 printk("Early serial init of port 0 failed\n");
 314         }
 315
 316         port.membase = ioremap64(PPC440SPE_UART1_ADDR, 8);
 317         port.irq = UART1_INT;
 318         port.uartclk = clocks.uart1;
 319         port.line = 1;
 320
 321         if (early_serial_setup(&port) != 0) {
 322                 printk("Early serial init of port 1 failed\n");
 323         }
 324
 325         port.membase = ioremap64(PPC440SPE_UART2_ADDR, 8);
 326         port.irq = UART2_INT;
 327         port.uartclk = BASE_BAUD;
 328         port.line = 2;
 329
 330         if (early_serial_setup(&port) != 0) {
 331                 printk("Early serial init of port 2 failed\n");
 332         }
 333 }
 334
 335 static void __init
 336 yucca_setup_arch(void)
 337 {
 338         yucca_set_emacdata();
 339
 340 #if !defined(CONFIG_BDI_SWITCH)
 341         /*
 342          * The Abatron BDI JTAG debugger does not tolerate others
 343          * mucking with the debug registers.
 344          */
 345         mtspr(SPRN_DBCR0, (DBCR0_TDE | DBCR0_IDM));
 346 #endif
 347
 348         /*
 349          * Determine various clocks.
 350          * To be completely correct we should get SysClk
 351          * from FPGA, because it can be changed by on-board switches
 352          * --ebs
 353          */
 354         /* 440GX and 440SPe clocking is the same - rd */
 355         ibm440gx_get_clocks(&clocks, 33333333, 6 * 1843200);
 356         ocp_sys_info.opb_bus_freq = clocks.opb;
 357
 358         /* init to some ~sane value until calibrate_delay() runs */
 359         loops_per_jiffy = 50000000/HZ;
 360
 361         /* Setup PCIXn host bridges */
 362         yucca_setup_hoses();
 363
 364 #ifdef CONFIG_BLK_DEV_INITRD
 365         if (initrd_start)
 366                 ROOT_DEV = Root_RAM0;
 367         else
 368 #endif
 369 #ifdef CONFIG_ROOT_NFS
 370                 ROOT_DEV = Root_NFS;
 371 #else
 372                 ROOT_DEV = Root_HDA1;
 373 #endif
 374
 375         yucca_early_serial_map();
 376
 377         /* Identify the system */
 378         printk("Yucca port (Roland Dreier <rolandd@cisco.com>)\n");
 379 }
 380
 381 void __init platform_init(unsigned long r3, unsigned long r4,
 382                 unsigned long r5, unsigned long r6, unsigned long r7)
 383 {
 384         ibm44x_platform_init(r3, r4, r5, r6, r7);
 385
 386         ppc_md.setup_arch = yucca_setup_arch;
 387         ppc_md.show_cpuinfo = yucca_show_cpuinfo;
 388         ppc_md.find_end_of_memory = ibm440sp_find_end_of_memory;
 389         ppc_md.get_irq = NULL;          /* Set in ppc4xx_pic_init() */
 390
 391         ppc_md.calibrate_decr = yucca_calibrate_decr;
 392 #ifdef CONFIG_KGDB
 393         ppc_md.early_serial_map = yucca_early_serial_map;
 394 #endif
 395 }