arch/powerpc/platforms/embedded6xx/holly.c

   1 /*
   2  * Board setup routines for the IBM 750GX/CL platform w/ TSI10x bridge
   3  *
   4  * Copyright 2007 IBM Corporation
   5  *
   6  * Stephen Winiecki <stevewin@us.ibm.com>
   7  * Josh Boyer <jwboyer@linux.vnet.ibm.com>
   8  *
   9  * Based on code from mpc7448_hpc2.c
  10  *
  11  * This program is free software; you can redistribute it and/or
  12  * modify it under the terms of the GNU General Public License
  13  * version 2 as published by the Free Software Foundation.
  14  */
  15
  16 #include <linux/stddef.h>
  17 #include <linux/kernel.h>
  18 #include <linux/pci.h>
  19 #include <linux/kdev_t.h>
  20 #include <linux/console.h>
  21 #include <linux/delay.h>
  22 #include <linux/irq.h>
  23 #include <linux/ide.h>
  24 #include <linux/seq_file.h>
  25 #include <linux/root_dev.h>
  26 #include <linux/serial.h>
  27 #include <linux/tty.h>
  28 #include <linux/serial_core.h>
  29
  30 #include <asm/system.h>
  31 #include <asm/time.h>
  32 #include <asm/machdep.h>
  33 #include <asm/prom.h>
  34 #include <asm/udbg.h>
  35 #include <asm/tsi108.h>
  36 #include <asm/pci-bridge.h>
  37 #include <asm/reg.h>
  38 #include <mm/mmu_decl.h>
  39 #include <asm/tsi108_irq.h>
  40 #include <asm/tsi108_pci.h>
  41 #include <asm/mpic.h>
  42 #include <asm/of_platform.h>
  43
  44 #undef DEBUG
  45
  46 #define HOLLY_PCI_CFG_PHYS 0x7c000000
  47
  48 int holly_exclude_device(struct pci_controller *hose, u_char bus, u_char devfn)
  49 {
  50         if (bus == 0 && PCI_SLOT(devfn) == 0)
  51                 return PCIBIOS_DEVICE_NOT_FOUND;
  52         else
  53                 return PCIBIOS_SUCCESSFUL;
  54 }
  55
  56 static void holly_remap_bridge(void)
  57 {
  58         u32 lut_val, lut_addr;
  59         int i;
  60
  61         printk(KERN_INFO "Remapping PCI bridge\n");
  62
  63         /* Re-init the PCI bridge and LUT registers to have mappings that don't
  64          * rely on PIBS
  65          */
  66         lut_addr = 0x900;
  67         for (i = 0; i < 31; i++) {
  68                 tsi108_write_reg(TSI108_PB_OFFSET + lut_addr, 0x00000201);
  69                 lut_addr += 4;
  70                 tsi108_write_reg(TSI108_PB_OFFSET + lut_addr, 0x0);
  71                 lut_addr += 4;
  72         }
  73
  74         /* Reserve the last LUT entry for PCI I/O space */
  75         tsi108_write_reg(TSI108_PB_OFFSET + lut_addr, 0x00000241);
  76         lut_addr += 4;
  77         tsi108_write_reg(TSI108_PB_OFFSET + lut_addr, 0x0);
  78
  79         /* Map PCI I/O space */
  80         tsi108_write_reg(TSI108_PCI_PFAB_IO_UPPER, 0x0);
  81         tsi108_write_reg(TSI108_PCI_PFAB_IO, 0x1);
  82
  83         /* Map PCI CFG space */
  84         tsi108_write_reg(TSI108_PCI_PFAB_BAR0_UPPER, 0x0);
  85         tsi108_write_reg(TSI108_PCI_PFAB_BAR0, 0x7c000000 | 0x01);
  86
  87         /* We don't need MEM32 and PRM remapping so disable them */
  88         tsi108_write_reg(TSI108_PCI_PFAB_MEM32, 0x0);
  89         tsi108_write_reg(TSI108_PCI_PFAB_PFM3, 0x0);
  90         tsi108_write_reg(TSI108_PCI_PFAB_PFM4, 0x0);
  91
  92         /* Set P2O_BAR0 */
  93         tsi108_write_reg(TSI108_PCI_P2O_BAR0_UPPER, 0x0);
  94         tsi108_write_reg(TSI108_PCI_P2O_BAR0, 0xc0000000);
  95
  96         /* Init the PCI LUTs to do no remapping */
  97         lut_addr = 0x500;
  98         lut_val = 0x00000002;
  99
 100         for (i = 0; i < 32; i++) {
 101                 tsi108_write_reg(TSI108_PCI_OFFSET + lut_addr, lut_val);
 102                 lut_addr += 4;
 103                 tsi108_write_reg(TSI108_PCI_OFFSET + lut_addr, 0x40000000);
 104                 lut_addr += 4;
 105                 lut_val += 0x02000000;
 106         }
 107         tsi108_write_reg(TSI108_PCI_P2O_PAGE_SIZES, 0x00007900);
 108
 109         /* Set 64-bit PCI bus address for system memory */
 110         tsi108_write_reg(TSI108_PCI_P2O_BAR2_UPPER, 0x0);
 111         tsi108_write_reg(TSI108_PCI_P2O_BAR2, 0x0);
 112 }
 113
 114 static void __init holly_setup_arch(void)
 115 {
 116         struct device_node *cpu;
 117         struct device_node *np;
 118
 119         if (ppc_md.progress)
 120                 ppc_md.progress("holly_setup_arch():set_bridge", 0);
 121
 122         cpu = of_find_node_by_type(NULL, "cpu");
 123         if (cpu) {
 124                 const unsigned int *fp;
 125
 126                 fp = of_get_property(cpu, "clock-frequency", NULL);
 127                 if (fp)
 128                         loops_per_jiffy = *fp / HZ;
 129                 else
 130                         loops_per_jiffy = 50000000 / HZ;
 131                 of_node_put(cpu);
 132         }
 133         tsi108_csr_vir_base = get_vir_csrbase();
 134
 135         /* setup PCI host bridge */
 136         holly_remap_bridge();
 137
 138         np = of_find_node_by_type(NULL, "pci");
 139         if (np)
 140                 tsi108_setup_pci(np, HOLLY_PCI_CFG_PHYS, 1);
 141
 142         ppc_md.pci_exclude_device = holly_exclude_device;
 143         if (ppc_md.progress)
 144                 ppc_md.progress("tsi108: resources set", 0x100);
 145
 146         printk(KERN_INFO "PPC750GX/CL Platform\n");
 147 }
 148
 149 /*
 150  * Interrupt setup and service.  Interrrupts on the holly come
 151  * from the four external INT pins, PCI interrupts are routed via
 152  * PCI interrupt control registers, it generates internal IRQ23
 153  *
 154  * Interrupt routing on the Holly Board:
 155  * TSI108:PB_INT[0] -> CPU0:INT#
 156  * TSI108:PB_INT[1] -> CPU0:MCP#
 157  * TSI108:PB_INT[2] -> N/C
 158  * TSI108:PB_INT[3] -> N/C
 159  */
 160 static void __init holly_init_IRQ(void)
 161 {
 162         struct mpic *mpic;
 163         phys_addr_t mpic_paddr = 0;
 164         struct device_node *tsi_pic;
 165 #ifdef CONFIG_PCI
 166         unsigned int cascade_pci_irq;
 167         struct device_node *tsi_pci;
 168         struct device_node *cascade_node = NULL;
 169 #endif
 170
 171         tsi_pic = of_find_node_by_type(NULL, "open-pic");
 172         if (tsi_pic) {
 173                 unsigned int size;
 174                 const void *prop = of_get_property(tsi_pic, "reg", &size);
 175                 mpic_paddr = of_translate_address(tsi_pic, prop);
 176         }
 177
 178         if (mpic_paddr == 0) {
 179                 printk(KERN_ERR "%s: No tsi108 PIC found !\n", __func__);
 180                 return;
 181         }
 182
 183         pr_debug("%s: tsi108 pic phys_addr = 0x%x\n", __func__, (u32) mpic_paddr);
 184
 185         mpic = mpic_alloc(tsi_pic, mpic_paddr,
 186                         MPIC_PRIMARY | MPIC_BIG_ENDIAN | MPIC_WANTS_RESET |
 187                         MPIC_SPV_EOI | MPIC_NO_PTHROU_DIS | MPIC_REGSET_TSI108,
 188                         24,
 189                         NR_IRQS-4, /* num_sources used */
 190                         "Tsi108_PIC");
 191
 192         BUG_ON(mpic == NULL);
 193
 194         mpic_assign_isu(mpic, 0, mpic_paddr + 0x100);
 195
 196         mpic_init(mpic);
 197
 198 #ifdef CONFIG_PCI
 199         tsi_pci = of_find_node_by_type(NULL, "pci");
 200         if (tsi_pci == NULL) {
 201                 printk(KERN_ERR "%s: No tsi108 pci node found !\n", __func__);
 202                 return;
 203         }
 204
 205         cascade_node = of_find_node_by_type(NULL, "pic-router");
 206         if (cascade_node == NULL) {
 207                 printk(KERN_ERR "%s: No tsi108 pci cascade node found !\n", __func__);
 208                 return;
 209         }
 210
 211         cascade_pci_irq = irq_of_parse_and_map(tsi_pci, 0);
 212         pr_debug("%s: tsi108 cascade_pci_irq = 0x%x\n", __func__, (u32) cascade_pci_irq);
 213         tsi108_pci_int_init(cascade_node);
 214         set_irq_data(cascade_pci_irq, mpic);
 215         set_irq_chained_handler(cascade_pci_irq, tsi108_irq_cascade);
 216 #endif
 217         /* Configure MPIC outputs to CPU0 */
 218         tsi108_write_reg(TSI108_MPIC_OFFSET + 0x30c, 0);
 219         of_node_put(tsi_pic);
 220 }
 221
 222 void holly_show_cpuinfo(struct seq_file *m)
 223 {
 224         seq_printf(m, "vendor\t\t: IBM\n");
 225         seq_printf(m, "machine\t\t: PPC750 GX/CL\n");
 226 }
 227
 228 void holly_restart(char *cmd)
 229 {
 230         __be32 __iomem *ocn_bar1 = NULL;
 231         unsigned long bar;
 232         struct device_node *bridge = NULL;
 233         const void *prop;
 234         int size;
 235         phys_addr_t addr = 0xc0000000;
 236
 237         local_irq_disable();
 238
 239         bridge = of_find_node_by_type(NULL, "tsi-bridge");
 240         if (bridge) {
 241                 prop = of_get_property(bridge, "reg", &size);
 242                 addr = of_translate_address(bridge, prop);
 243         }
 244         addr += (TSI108_PB_OFFSET + 0x414);
 245
 246         ocn_bar1 = ioremap(addr, 0x4);
 247
 248         /* Turn on the BOOT bit so the addresses are correctly
 249          * routed to the HLP interface */
 250         bar = ioread32be(ocn_bar1);
 251         bar |= 2;
 252         iowrite32be(bar, ocn_bar1);
 253         iosync();
 254
 255         /* Set SRR0 to the reset vector and turn on MSR_IP */
 256         mtspr(SPRN_SRR0, 0xfff00100);
 257         mtspr(SPRN_SRR1, MSR_IP);
 258
 259         /* Do an rfi to jump back to firmware.  Somewhat evil,
 260          * but it works
 261          */
 262         __asm__ __volatile__("rfi" : : : "memory");
 263
 264         /* Spin until reset happens.  Shouldn't really get here */
 265         for (;;) ;
 266 }
 267
 268 void holly_power_off(void)
 269 {
 270         local_irq_disable();
 271         /* No way to shut power off with software */
 272         for (;;) ;
 273 }
 274
 275 void holly_halt(void)
 276 {
 277         holly_power_off();
 278 }
 279
 280 /*
 281  * Called very early, device-tree isn't unflattened
 282  */
 283 static int __init holly_probe(void)
 284 {
 285         unsigned long root = of_get_flat_dt_root();
 286
 287         if (!of_flat_dt_is_compatible(root, "ibm,holly"))
 288                 return 0;
 289         return 1;
 290 }
 291
 292 static int ppc750_machine_check_exception(struct pt_regs *regs)
 293 {
 294         const struct exception_table_entry *entry;
 295
 296         /* Are we prepared to handle this fault */
 297         if ((entry = search_exception_tables(regs->nip)) != NULL) {
 298                 tsi108_clear_pci_cfg_error();
 299                 regs->msr |= MSR_RI;
 300                 regs->nip = entry->fixup;
 301                 return 1;
 302         }
 303         return 0;
 304 }
 305
 306 define_machine(holly){
 307         .name                           = "PPC750 GX/CL TSI",
 308         .probe                          = holly_probe,
 309         .setup_arch                     = holly_setup_arch,
 310         .init_IRQ                       = holly_init_IRQ,
 311         .show_cpuinfo                   = holly_show_cpuinfo,
 312         .get_irq                        = mpic_get_irq,
 313         .restart                        = holly_restart,
 314         .calibrate_decr                 = generic_calibrate_decr,
 315         .machine_check_exception        = ppc750_machine_check_exception,
 316         .progress                       = udbg_progress,
 317 };