arch/powerpc/platforms/embedded6xx/mpc7448_hpc2.c

   1 /*
   2  * mpc7448_hpc2.c
   3  *
   4  * Board setup routines for the Freescale mpc7448hpc2(taiga) platform
   5  *
   6  * Author: Jacob Pan
   7  *       jacob.pan@freescale.com
   8  * Author: Xianghua Xiao
   9  *       x.xiao@freescale.com
  10  * Maintainer: Roy Zang <tie-fei.zang@freescale.com>
  11  *      Add Flat Device Tree support fot mpc7448hpc2 board
  12  *
  13  * Copyright 2004-2006 Freescale Semiconductor, Inc.
  14  *
  15  * This program is free software; you can redistribute it and/or
  16  * modify it under the terms of the GNU General Public License
  17  * as published by the Free Software Foundation; either version
  18  * 2 of the License, or (at your option) any later version.
  19  */
  20
  21 #include <linux/stddef.h>
  22 #include <linux/kernel.h>
  23 #include <linux/pci.h>
  24 #include <linux/kdev_t.h>
  25 #include <linux/console.h>
  26 #include <linux/delay.h>
  27 #include <linux/irq.h>
  28 #include <linux/ide.h>
  29 #include <linux/seq_file.h>
  30 #include <linux/root_dev.h>
  31 #include <linux/serial.h>
  32 #include <linux/tty.h>
  33 #include <linux/serial_core.h>
  34
  35 #include <asm/system.h>
  36 #include <asm/time.h>
  37 #include <asm/machdep.h>
  38 #include <asm/prom.h>
  39 #include <asm/udbg.h>
  40 #include <asm/tsi108.h>
  41 #include <asm/pci-bridge.h>
  42 #include <asm/reg.h>
  43 #include <mm/mmu_decl.h>
  44 #include "mpc7448_hpc2.h"
  45 #include <asm/tsi108_irq.h>
  46 #include <asm/mpic.h>
  47
  48 #undef DEBUG
  49 #ifdef DEBUG
  50 #define DBG(fmt...) do { printk(fmt); } while(0)
  51 #else
  52 #define DBG(fmt...) do { } while(0)
  53 #endif
  54
  55 #ifndef CONFIG_PCI
  56 isa_io_base = MPC7448_HPC2_ISA_IO_BASE;
  57 isa_mem_base = MPC7448_HPC2_ISA_MEM_BASE;
  58 pci_dram_offset = MPC7448_HPC2_PCI_MEM_OFFSET;
  59 #endif
  60
  61 extern int tsi108_setup_pci(struct device_node *dev);
  62 extern void _nmask_and_or_msr(unsigned long nmask, unsigned long or_val);
  63 extern void tsi108_pci_int_init(void);
  64 extern void tsi108_irq_cascade(unsigned int irq, struct irq_desc *desc,
  65                             struct pt_regs *regs);
  66
  67 int mpc7448_hpc2_exclude_device(u_char bus, u_char devfn)
  68 {
  69         if (bus == 0 && PCI_SLOT(devfn) == 0)
  70                 return PCIBIOS_DEVICE_NOT_FOUND;
  71         else
  72                 return PCIBIOS_SUCCESSFUL;
  73 }
  74
  75 /*
  76  * find pci slot by devfn in interrupt map of OF tree
  77  */
  78 u8 find_slot_by_devfn(unsigned int *interrupt_map, unsigned int devfn)
  79 {
  80         int i;
  81         unsigned int tmp;
  82         for (i = 0; i < 4; i++){
  83                 tmp = interrupt_map[i*4*7];
  84                 if ((tmp >> 11) == (devfn >> 3))
  85                         return i;
  86         }
  87         return i;
  88 }
  89
  90 /*
  91  * Scans the interrupt map for pci device
  92  */
  93 void mpc7448_hpc2_fixup_irq(struct pci_dev *dev)
  94 {
  95         struct pci_controller *hose;
  96         struct device_node *node;
  97         const unsigned int *interrupt;
  98         int busnr;
  99         int len;
 100         u8 slot;
 101         u8 pin;
 102
 103         /* Lookup the hose */
 104         busnr = dev->bus->number;
 105         hose = pci_bus_to_hose(busnr);
 106         if (!hose)
 107                 printk(KERN_ERR "No pci hose found\n");
 108
 109         /* Check it has an OF node associated */
 110         node = (struct device_node *) hose->arch_data;
 111         if (!node)
 112                 printk(KERN_ERR "No pci node found\n");
 113
 114         interrupt = get_property(node, "interrupt-map", &len);
 115         slot = find_slot_by_devfn(interrupt, dev->devfn);
 116         pci_read_config_byte(dev, PCI_INTERRUPT_PIN, &pin);
 117         if (pin == 0 || pin > 4)
 118                 pin = 1;
 119         pin--;
 120         dev->irq  = interrupt[slot*4*7 + pin*7 + 5];
 121         DBG("TSI_PCI: dev->irq = 0x%x\n", dev->irq);
 122 }
 123 /* temporary pci irq map fixup*/
 124
 125 void __init mpc7448_hpc2_pcibios_fixup(void)
 126 {
 127         struct pci_dev *dev = NULL;
 128         for_each_pci_dev(dev) {
 129                 mpc7448_hpc2_fixup_irq(dev);
 130                 pci_write_config_byte(dev, PCI_INTERRUPT_LINE, dev->irq);
 131         }
 132 }
 133
 134 static void __init mpc7448_hpc2_setup_arch(void)
 135 {
 136         struct device_node *cpu;
 137         struct device_node *np;
 138         if (ppc_md.progress)
 139                 ppc_md.progress("mpc7448_hpc2_setup_arch():set_bridge", 0);
 140
 141         cpu = of_find_node_by_type(NULL, "cpu");
 142         if (cpu != 0) {
 143                 const unsigned int *fp;
 144
 145                 fp = get_property(cpu, "clock-frequency", NULL);
 146                 if (fp != 0)
 147                         loops_per_jiffy = *fp / HZ;
 148                 else
 149                         loops_per_jiffy = 50000000 / HZ;
 150                 of_node_put(cpu);
 151         }
 152         tsi108_csr_vir_base = get_vir_csrbase();
 153
 154 #ifdef  CONFIG_ROOT_NFS
 155         ROOT_DEV = Root_NFS;
 156 #else
 157         ROOT_DEV = Root_HDA1;
 158 #endif
 159
 160 #ifdef CONFIG_BLK_DEV_INITRD
 161         ROOT_DEV = Root_RAM0;
 162 #endif
 163
 164         /* setup PCI host bridge */
 165 #ifdef CONFIG_PCI
 166         for (np = NULL; (np = of_find_node_by_type(np, "pci")) != NULL;)
 167                 tsi108_setup_pci(np);
 168
 169         ppc_md.pci_exclude_device = mpc7448_hpc2_exclude_device;
 170         if (ppc_md.progress)
 171                 ppc_md.progress("tsi108: resources set", 0x100);
 172 #endif
 173
 174         printk(KERN_INFO "MPC7448HPC2 (TAIGA) Platform\n");
 175         printk(KERN_INFO
 176                "Jointly ported by Freescale and Tundra Semiconductor\n");
 177         printk(KERN_INFO
 178                "Enabling L2 cache then enabling the HID0 prefetch engine.\n");
 179 }
 180
 181 /*
 182  * Interrupt setup and service.  Interrrupts on the mpc7448_hpc2 come
 183  * from the four external INT pins, PCI interrupts are routed via
 184  * PCI interrupt control registers, it generates internal IRQ23
 185  *
 186  * Interrupt routing on the Taiga Board:
 187  * TSI108:PB_INT[0] -> CPU0:INT#
 188  * TSI108:PB_INT[1] -> CPU0:MCP#
 189  * TSI108:PB_INT[2] -> N/C
 190  * TSI108:PB_INT[3] -> N/C
 191  */
 192 static void __init mpc7448_hpc2_init_IRQ(void)
 193 {
 194         struct mpic *mpic;
 195         phys_addr_t mpic_paddr = 0;
 196         unsigned int cascade_pci_irq;
 197         struct device_node *tsi_pci;
 198         struct device_node *tsi_pic;
 199
 200         tsi_pic = of_find_node_by_type(NULL, "open-pic");
 201         if (tsi_pic) {
 202                 unsigned int size;
 203                 void *prop = get_property(tsi_pic, "reg", &size);
 204                 mpic_paddr = of_translate_address(tsi_pic, prop);
 205         }
 206
 207         if (mpic_paddr == 0) {
 208                 printk("%s: No tsi108 PIC found !\n", __FUNCTION__);
 209                 return;
 210         }
 211
 212         DBG("%s: tsi108pic phys_addr = 0x%x\n", __FUNCTION__,
 213             (u32) mpic_paddr);
 214
 215         mpic = mpic_alloc(tsi_pic, mpic_paddr,
 216                         MPIC_PRIMARY | MPIC_BIG_ENDIAN | MPIC_WANTS_RESET |
 217                         MPIC_SPV_EOI | MPIC_NO_PTHROU_DIS | MPIC_REGSET_TSI108,
 218                         0, /* num_sources used */
 219                         0, /* num_sources used */
 220                         "Tsi108_PIC");
 221
 222         BUG_ON(mpic == NULL); /* XXXX */
 223         mpic_init(mpic);
 224
 225         tsi_pci = of_find_node_by_type(NULL, "pci");
 226         if (tsi_pci == 0) {
 227                 printk("%s: No tsi108 pci node found !\n", __FUNCTION__);
 228                 return;
 229         }
 230
 231         cascade_pci_irq = irq_of_parse_and_map(tsi_pci, 0);
 232         set_irq_data(cascade_pci_irq, mpic);
 233         set_irq_chained_handler(cascade_pci_irq, tsi108_irq_cascade);
 234
 235         tsi108_pci_int_init();
 236
 237         /* Configure MPIC outputs to CPU0 */
 238         tsi108_write_reg(TSI108_MPIC_OFFSET + 0x30c, 0);
 239         of_node_put(tsi_pic);
 240 }
 241
 242 void mpc7448_hpc2_show_cpuinfo(struct seq_file *m)
 243 {
 244         seq_printf(m, "vendor\t\t: Freescale Semiconductor\n");
 245         seq_printf(m, "machine\t\t: MPC7448hpc2\n");
 246 }
 247
 248 void mpc7448_hpc2_restart(char *cmd)
 249 {
 250         local_irq_disable();
 251
 252         /* Set exception prefix high - to the firmware */
 253         _nmask_and_or_msr(0, MSR_IP);
 254
 255         for (;;) ;              /* Spin until reset happens */
 256 }
 257
 258 void mpc7448_hpc2_power_off(void)
 259 {
 260         local_irq_disable();
 261         for (;;) ;              /* No way to shut power off with software */
 262 }
 263
 264 void mpc7448_hpc2_halt(void)
 265 {
 266         mpc7448_hpc2_power_off();
 267 }
 268
 269 /*
 270  * Called very early, device-tree isn't unflattened
 271  */
 272 static int __init mpc7448_hpc2_probe(void)
 273 {
 274         unsigned long root = of_get_flat_dt_root();
 275
 276         if (!of_flat_dt_is_compatible(root, "mpc74xx"))
 277                 return 0;
 278         return 1;
 279 }
 280
 281 static int mpc7448_machine_check_exception(struct pt_regs *regs)
 282 {
 283         extern void tsi108_clear_pci_cfg_error(void);
 284         const struct exception_table_entry *entry;
 285
 286         /* Are we prepared to handle this fault */
 287         if ((entry = search_exception_tables(regs->nip)) != NULL) {
 288                 tsi108_clear_pci_cfg_error();
 289                 regs->msr |= MSR_RI;
 290                 regs->nip = entry->fixup;
 291                 return 1;
 292         }
 293         return 0;
 294
 295 }
 296
 297 define_machine(mpc7448_hpc2){
 298         .name                   = "MPC7448 HPC2",
 299         .probe                  = mpc7448_hpc2_probe,
 300         .setup_arch             = mpc7448_hpc2_setup_arch,
 301         .init_IRQ               = mpc7448_hpc2_init_IRQ,
 302         .show_cpuinfo           = mpc7448_hpc2_show_cpuinfo,
 303         .get_irq                = mpic_get_irq,
 304         .pcibios_fixup          = mpc7448_hpc2_pcibios_fixup,
 305         .restart                = mpc7448_hpc2_restart,
 306         .calibrate_decr         = generic_calibrate_decr,
 307         .machine_check_exception= mpc7448_machine_check_exception,
 308         .progress               = udbg_progress,
 309 };