[POWERPC] Make pci_read_irq_line the default
[linux-2.6.git] / 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
66 int mpc7448_hpc2_exclude_device(u_char bus, u_char devfn)
67 {
68         if (bus == 0 && PCI_SLOT(devfn) == 0)
69                 return PCIBIOS_DEVICE_NOT_FOUND;
70         else
71                 return PCIBIOS_SUCCESSFUL;
72 }
73
74 /*
75  * find pci slot by devfn in interrupt map of OF tree
76  */
77 u8 find_slot_by_devfn(unsigned int *interrupt_map, unsigned int devfn)
78 {
79         int i;
80         unsigned int tmp;
81         for (i = 0; i < 4; i++){
82                 tmp = interrupt_map[i*4*7];
83                 if ((tmp >> 11) == (devfn >> 3))
84                         return i;
85         }
86         return i;
87 }
88
89 /*
90  * Scans the interrupt map for pci device
91  */
92 void __devinit mpc7448_hpc2_fixup_irq(struct pci_dev *dev)
93 {
94         struct pci_controller *hose;
95         struct device_node *node;
96         const unsigned int *interrupt;
97         int busnr;
98         int len;
99         u8 slot;
100         u8 pin;
101
102         /* Lookup the hose */
103         busnr = dev->bus->number;
104         hose = pci_bus_to_hose(busnr);
105         if (!hose)
106                 printk(KERN_ERR "No pci hose found\n");
107
108         /* Check it has an OF node associated */
109         node = (struct device_node *) hose->arch_data;
110         if (!node)
111                 printk(KERN_ERR "No pci node found\n");
112
113         interrupt = get_property(node, "interrupt-map", &len);
114         slot = find_slot_by_devfn(interrupt, dev->devfn);
115         pci_read_config_byte(dev, PCI_INTERRUPT_PIN, &pin);
116         if (pin == 0 || pin > 4)
117                 pin = 1;
118         pin--;
119         dev->irq  = interrupt[slot*4*7 + pin*7 + 5];
120
121         pci_write_config_byte(dev, PCI_INTERRUPT_LINE, dev->irq);
122
123         DBG("TSI_PCI: dev->irq = 0x%x\n", dev->irq);
124 }
125 /* temporary pci irq map fixup*/
126
127 static void __init mpc7448_hpc2_setup_arch(void)
128 {
129         struct device_node *cpu;
130         struct device_node *np;
131         if (ppc_md.progress)
132                 ppc_md.progress("mpc7448_hpc2_setup_arch():set_bridge", 0);
133
134         cpu = of_find_node_by_type(NULL, "cpu");
135         if (cpu != 0) {
136                 const unsigned int *fp;
137
138                 fp = get_property(cpu, "clock-frequency", NULL);
139                 if (fp != 0)
140                         loops_per_jiffy = *fp / HZ;
141                 else
142                         loops_per_jiffy = 50000000 / HZ;
143                 of_node_put(cpu);
144         }
145         tsi108_csr_vir_base = get_vir_csrbase();
146
147 #ifdef  CONFIG_ROOT_NFS
148         ROOT_DEV = Root_NFS;
149 #else
150         ROOT_DEV = Root_HDA1;
151 #endif
152
153 #ifdef CONFIG_BLK_DEV_INITRD
154         ROOT_DEV = Root_RAM0;
155 #endif
156
157         /* setup PCI host bridge */
158 #ifdef CONFIG_PCI
159         for (np = NULL; (np = of_find_node_by_type(np, "pci")) != NULL;)
160                 tsi108_setup_pci(np);
161
162         ppc_md.pci_exclude_device = mpc7448_hpc2_exclude_device;
163         if (ppc_md.progress)
164                 ppc_md.progress("tsi108: resources set", 0x100);
165 #endif
166
167         printk(KERN_INFO "MPC7448HPC2 (TAIGA) Platform\n");
168         printk(KERN_INFO
169                "Jointly ported by Freescale and Tundra Semiconductor\n");
170         printk(KERN_INFO
171                "Enabling L2 cache then enabling the HID0 prefetch engine.\n");
172 }
173
174 /*
175  * Interrupt setup and service.  Interrrupts on the mpc7448_hpc2 come
176  * from the four external INT pins, PCI interrupts are routed via
177  * PCI interrupt control registers, it generates internal IRQ23
178  *
179  * Interrupt routing on the Taiga Board:
180  * TSI108:PB_INT[0] -> CPU0:INT#
181  * TSI108:PB_INT[1] -> CPU0:MCP#
182  * TSI108:PB_INT[2] -> N/C
183  * TSI108:PB_INT[3] -> N/C
184  */
185 static void __init mpc7448_hpc2_init_IRQ(void)
186 {
187         struct mpic *mpic;
188         phys_addr_t mpic_paddr = 0;
189         unsigned int cascade_pci_irq;
190         struct device_node *tsi_pci;
191         struct device_node *tsi_pic;
192
193         tsi_pic = of_find_node_by_type(NULL, "open-pic");
194         if (tsi_pic) {
195                 unsigned int size;
196                 const void *prop = get_property(tsi_pic, "reg", &size);
197                 mpic_paddr = of_translate_address(tsi_pic, prop);
198         }
199
200         if (mpic_paddr == 0) {
201                 printk("%s: No tsi108 PIC found !\n", __FUNCTION__);
202                 return;
203         }
204
205         DBG("%s: tsi108pic phys_addr = 0x%x\n", __FUNCTION__,
206             (u32) mpic_paddr);
207
208         mpic = mpic_alloc(tsi_pic, mpic_paddr,
209                         MPIC_PRIMARY | MPIC_BIG_ENDIAN | MPIC_WANTS_RESET |
210                         MPIC_SPV_EOI | MPIC_NO_PTHROU_DIS | MPIC_REGSET_TSI108,
211                         0, /* num_sources used */
212                         0, /* num_sources used */
213                         "Tsi108_PIC");
214
215         BUG_ON(mpic == NULL); /* XXXX */
216         mpic_init(mpic);
217
218         tsi_pci = of_find_node_by_type(NULL, "pci");
219         if (tsi_pci == 0) {
220                 printk("%s: No tsi108 pci node found !\n", __FUNCTION__);
221                 return;
222         }
223
224         cascade_pci_irq = irq_of_parse_and_map(tsi_pci, 0);
225         set_irq_data(cascade_pci_irq, mpic);
226         set_irq_chained_handler(cascade_pci_irq, tsi108_irq_cascade);
227
228         tsi108_pci_int_init();
229
230         /* Configure MPIC outputs to CPU0 */
231         tsi108_write_reg(TSI108_MPIC_OFFSET + 0x30c, 0);
232         of_node_put(tsi_pic);
233 }
234
235 void mpc7448_hpc2_show_cpuinfo(struct seq_file *m)
236 {
237         seq_printf(m, "vendor\t\t: Freescale Semiconductor\n");
238         seq_printf(m, "machine\t\t: MPC7448hpc2\n");
239 }
240
241 void mpc7448_hpc2_restart(char *cmd)
242 {
243         local_irq_disable();
244
245         /* Set exception prefix high - to the firmware */
246         _nmask_and_or_msr(0, MSR_IP);
247
248         for (;;) ;              /* Spin until reset happens */
249 }
250
251 void mpc7448_hpc2_power_off(void)
252 {
253         local_irq_disable();
254         for (;;) ;              /* No way to shut power off with software */
255 }
256
257 void mpc7448_hpc2_halt(void)
258 {
259         mpc7448_hpc2_power_off();
260 }
261
262 /*
263  * Called very early, device-tree isn't unflattened
264  */
265 static int __init mpc7448_hpc2_probe(void)
266 {
267         unsigned long root = of_get_flat_dt_root();
268
269         if (!of_flat_dt_is_compatible(root, "mpc74xx"))
270                 return 0;
271         return 1;
272 }
273
274 static int mpc7448_machine_check_exception(struct pt_regs *regs)
275 {
276         extern void tsi108_clear_pci_cfg_error(void);
277         const struct exception_table_entry *entry;
278
279         /* Are we prepared to handle this fault */
280         if ((entry = search_exception_tables(regs->nip)) != NULL) {
281                 tsi108_clear_pci_cfg_error();
282                 regs->msr |= MSR_RI;
283                 regs->nip = entry->fixup;
284                 return 1;
285         }
286         return 0;
287
288 }
289
290 define_machine(mpc7448_hpc2){
291         .name                   = "MPC7448 HPC2",
292         .probe                  = mpc7448_hpc2_probe,
293         .setup_arch             = mpc7448_hpc2_setup_arch,
294         .init_IRQ               = mpc7448_hpc2_init_IRQ,
295         .show_cpuinfo           = mpc7448_hpc2_show_cpuinfo,
296         .get_irq                = mpic_get_irq,
297         .pci_irq_fixup          = mpc7448_hpc2_fixup_irq,
298         .restart                = mpc7448_hpc2_restart,
299         .calibrate_decr         = generic_calibrate_decr,
300         .machine_check_exception= mpc7448_machine_check_exception,
301         .progress               = udbg_progress,
302 };