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