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/seq_file.h>
  29 #include <linux/root_dev.h>
  30 #include <linux/serial.h>
  31 #include <linux/tty.h>
  32 #include <linux/serial_core.h>
  33
  34 #include <asm/system.h>
  35 #include <asm/time.h>
  36 #include <asm/machdep.h>
  37 #include <asm/prom.h>
  38 #include <asm/udbg.h>
  39 #include <asm/tsi108.h>
  40 #include <asm/pci-bridge.h>
  41 #include <asm/reg.h>
  42 #include <mm/mmu_decl.h>
  43 #include "mpc7448_hpc2.h"
  44 #include <asm/tsi108_irq.h>
  45 #include <asm/mpic.h>
  46
  47 #undef DEBUG
  48 #ifdef DEBUG
  49 #define DBG(fmt...) do { printk(fmt); } while(0)
  50 #else
  51 #define DBG(fmt...) do { } while(0)
  52 #endif
  53
  54 #ifndef CONFIG_PCI
  55 isa_io_base = MPC7448_HPC2_ISA_IO_BASE;
  56 isa_mem_base = MPC7448_HPC2_ISA_MEM_BASE;
  57 pci_dram_offset = MPC7448_HPC2_PCI_MEM_OFFSET;
  58 #endif
  59
  60 extern int tsi108_setup_pci(struct device_node *dev);
  61 extern void _nmask_and_or_msr(unsigned long nmask, unsigned long or_val);
  62 extern void tsi108_pci_int_init(struct device_node *node);
  63 extern void tsi108_irq_cascade(unsigned int irq, struct irq_desc *desc);
  64
  65 int mpc7448_hpc2_exclude_device(u_char bus, u_char devfn)
  66 {
  67         if (bus == 0 && PCI_SLOT(devfn) == 0)
  68                 return PCIBIOS_DEVICE_NOT_FOUND;
  69         else
  70                 return PCIBIOS_SUCCESSFUL;
  71 }
  72
  73 static void __init mpc7448_hpc2_setup_arch(void)
  74 {
  75         struct device_node *cpu;
  76         struct device_node *np;
  77         if (ppc_md.progress)
  78                 ppc_md.progress("mpc7448_hpc2_setup_arch():set_bridge", 0);
  79
  80         cpu = of_find_node_by_type(NULL, "cpu");
  81         if (cpu != 0) {
  82                 const unsigned int *fp;
  83
  84                 fp = of_get_property(cpu, "clock-frequency", NULL);
  85                 if (fp != 0)
  86                         loops_per_jiffy = *fp / HZ;
  87                 else
  88                         loops_per_jiffy = 50000000 / HZ;
  89                 of_node_put(cpu);
  90         }
  91         tsi108_csr_vir_base = get_vir_csrbase();
  92
  93         /* setup PCI host bridge */
  94 #ifdef CONFIG_PCI
  95         for (np = NULL; (np = of_find_node_by_type(np, "pci")) != NULL;)
  96                 tsi108_setup_pci(np);
  97
  98         ppc_md.pci_exclude_device = mpc7448_hpc2_exclude_device;
  99         if (ppc_md.progress)
 100                 ppc_md.progress("tsi108: resources set", 0x100);
 101 #endif
 102
 103         printk(KERN_INFO "MPC7448HPC2 (TAIGA) Platform\n");
 104         printk(KERN_INFO
 105                "Jointly ported by Freescale and Tundra Semiconductor\n");
 106         printk(KERN_INFO
 107                "Enabling L2 cache then enabling the HID0 prefetch engine.\n");
 108 }
 109
 110 /*
 111  * Interrupt setup and service.  Interrrupts on the mpc7448_hpc2 come
 112  * from the four external INT pins, PCI interrupts are routed via
 113  * PCI interrupt control registers, it generates internal IRQ23
 114  *
 115  * Interrupt routing on the Taiga Board:
 116  * TSI108:PB_INT[0] -> CPU0:INT#
 117  * TSI108:PB_INT[1] -> CPU0:MCP#
 118  * TSI108:PB_INT[2] -> N/C
 119  * TSI108:PB_INT[3] -> N/C
 120  */
 121 static void __init mpc7448_hpc2_init_IRQ(void)
 122 {
 123         struct mpic *mpic;
 124         phys_addr_t mpic_paddr = 0;
 125         struct device_node *tsi_pic;
 126 #ifdef CONFIG_PCI
 127         unsigned int cascade_pci_irq;
 128         struct device_node *tsi_pci;
 129         struct device_node *cascade_node = NULL;
 130 #endif
 131
 132         tsi_pic = of_find_node_by_type(NULL, "open-pic");
 133         if (tsi_pic) {
 134                 unsigned int size;
 135                 const void *prop = of_get_property(tsi_pic, "reg", &size);
 136                 mpic_paddr = of_translate_address(tsi_pic, prop);
 137         }
 138
 139         if (mpic_paddr == 0) {
 140                 printk("%s: No tsi108 PIC found !\n", __FUNCTION__);
 141                 return;
 142         }
 143
 144         DBG("%s: tsi108 pic phys_addr = 0x%x\n", __FUNCTION__,
 145             (u32) mpic_paddr);
 146
 147         mpic = mpic_alloc(tsi_pic, mpic_paddr,
 148                         MPIC_PRIMARY | MPIC_BIG_ENDIAN | MPIC_WANTS_RESET |
 149                         MPIC_SPV_EOI | MPIC_NO_PTHROU_DIS | MPIC_REGSET_TSI108,
 150                         24,
 151                         NR_IRQS-4, /* num_sources used */
 152                         "Tsi108_PIC");
 153
 154         BUG_ON(mpic == NULL);
 155
 156         mpic_assign_isu(mpic, 0, mpic_paddr + 0x100);
 157
 158         mpic_init(mpic);
 159
 160 #ifdef CONFIG_PCI
 161         tsi_pci = of_find_node_by_type(NULL, "pci");
 162         if (tsi_pci == NULL) {
 163                 printk("%s: No tsi108 pci node found !\n", __FUNCTION__);
 164                 return;
 165         }
 166         cascade_node = of_find_node_by_type(NULL, "pic-router");
 167         if (cascade_node == NULL) {
 168                 printk("%s: No tsi108 pci cascade node found !\n", __FUNCTION__);
 169                 return;
 170         }
 171
 172         cascade_pci_irq = irq_of_parse_and_map(tsi_pci, 0);
 173         DBG("%s: tsi108 cascade_pci_irq = 0x%x\n", __FUNCTION__,
 174             (u32) cascade_pci_irq);
 175         tsi108_pci_int_init(cascade_node);
 176         set_irq_data(cascade_pci_irq, mpic);
 177         set_irq_chained_handler(cascade_pci_irq, tsi108_irq_cascade);
 178 #endif
 179         /* Configure MPIC outputs to CPU0 */
 180         tsi108_write_reg(TSI108_MPIC_OFFSET + 0x30c, 0);
 181         of_node_put(tsi_pic);
 182 }
 183
 184 void mpc7448_hpc2_show_cpuinfo(struct seq_file *m)
 185 {
 186         seq_printf(m, "vendor\t\t: Freescale Semiconductor\n");
 187         seq_printf(m, "machine\t\t: MPC7448hpc2\n");
 188 }
 189
 190 void mpc7448_hpc2_restart(char *cmd)
 191 {
 192         local_irq_disable();
 193
 194         /* Set exception prefix high - to the firmware */
 195         _nmask_and_or_msr(0, MSR_IP);
 196
 197         for (;;) ;              /* Spin until reset happens */
 198 }
 199
 200 void mpc7448_hpc2_power_off(void)
 201 {
 202         local_irq_disable();
 203         for (;;) ;              /* No way to shut power off with software */
 204 }
 205
 206 void mpc7448_hpc2_halt(void)
 207 {
 208         mpc7448_hpc2_power_off();
 209 }
 210
 211 /*
 212  * Called very early, device-tree isn't unflattened
 213  */
 214 static int __init mpc7448_hpc2_probe(void)
 215 {
 216         unsigned long root = of_get_flat_dt_root();
 217
 218         if (!of_flat_dt_is_compatible(root, "mpc74xx"))
 219                 return 0;
 220         return 1;
 221 }
 222
 223 static int mpc7448_machine_check_exception(struct pt_regs *regs)
 224 {
 225         extern void tsi108_clear_pci_cfg_error(void);
 226         const struct exception_table_entry *entry;
 227
 228         /* Are we prepared to handle this fault */
 229         if ((entry = search_exception_tables(regs->nip)) != NULL) {
 230                 tsi108_clear_pci_cfg_error();
 231                 regs->msr |= MSR_RI;
 232                 regs->nip = entry->fixup;
 233                 return 1;
 234         }
 235         return 0;
 236 }
 237
 238 define_machine(mpc7448_hpc2){
 239         .name                   = "MPC7448 HPC2",
 240         .probe                  = mpc7448_hpc2_probe,
 241         .setup_arch             = mpc7448_hpc2_setup_arch,
 242         .init_IRQ               = mpc7448_hpc2_init_IRQ,
 243         .show_cpuinfo           = mpc7448_hpc2_show_cpuinfo,
 244         .get_irq                = mpic_get_irq,
 245         .restart                = mpc7448_hpc2_restart,
 246         .calibrate_decr         = generic_calibrate_decr,
 247         .machine_check_exception= mpc7448_machine_check_exception,
 248         .progress               = udbg_progress,
 249 };