vserver 1.9.3
[linux-2.6.git] / arch / ppc / platforms / mcpn765.c
1 /*
2  * arch/ppc/platforms/mcpn765.c
3  *
4  * Board setup routines for the Motorola MCG MCPN765 cPCI Board.
5  *
6  * Author: Mark A. Greer
7  *         mgreer@mvista.com
8  *
9  * Modified by Randy Vinson (rvinson@mvista.com)
10  *
11  * 2001-2002 (c) MontaVista, Software, Inc.  This file is licensed under
12  * the terms of the GNU General Public License version 2.  This program
13  * is licensed "as is" without any warranty of any kind, whether express
14  * or implied.
15  */
16
17 /*
18  * This file adds support for the Motorola MCG MCPN765.
19  */
20 #include <linux/config.h>
21 #include <linux/stddef.h>
22 #include <linux/kernel.h>
23 #include <linux/init.h>
24 #include <linux/errno.h>
25 #include <linux/reboot.h>
26 #include <linux/pci.h>
27 #include <linux/kdev_t.h>
28 #include <linux/major.h>
29 #include <linux/initrd.h>
30 #include <linux/console.h>
31 #include <linux/delay.h>
32 #include <linux/irq.h>
33 #include <linux/seq_file.h>
34 #include <linux/root_dev.h>
35 #include <linux/serial.h>
36 #include <linux/tty.h>  /* for linux/serial_core.h */
37 #include <linux/serial_core.h>
38 #include <linux/slab.h>
39
40 #include <asm/system.h>
41 #include <asm/pgtable.h>
42 #include <asm/page.h>
43 #include <asm/time.h>
44 #include <asm/dma.h>
45 #include <asm/byteorder.h>
46 #include <asm/io.h>
47 #include <asm/machdep.h>
48 #include <asm/prom.h>
49 #include <asm/smp.h>
50 #include <asm/open_pic.h>
51 #include <asm/i8259.h>
52 #include <asm/todc.h>
53 #include <asm/pci-bridge.h>
54 #include <asm/irq.h>
55 #include <asm/uaccess.h>
56 #include <asm/bootinfo.h>
57 #include <asm/hawk.h>
58 #include <asm/kgdb.h>
59
60 #include "mcpn765.h"
61
62 static u_char mcpn765_openpic_initsenses[] __initdata = {
63         (IRQ_SENSE_EDGE  | IRQ_POLARITY_POSITIVE),/* 16: i8259 cascade */
64         (IRQ_SENSE_LEVEL | IRQ_POLARITY_NEGATIVE),/* 17: COM1,2,3,4 */
65         (IRQ_SENSE_LEVEL | IRQ_POLARITY_NEGATIVE),/* 18: Enet 1 (front) */
66         (IRQ_SENSE_LEVEL | IRQ_POLARITY_NEGATIVE),/* 19: HAWK WDT XXXX */
67         (IRQ_SENSE_LEVEL | IRQ_POLARITY_NEGATIVE),/* 20: 21554 bridge */
68         (IRQ_SENSE_LEVEL | IRQ_POLARITY_NEGATIVE),/* 21: cPCI INTA# */
69         (IRQ_SENSE_LEVEL | IRQ_POLARITY_NEGATIVE),/* 22: cPCI INTB# */
70         (IRQ_SENSE_LEVEL | IRQ_POLARITY_NEGATIVE),/* 23: cPCI INTC# */
71         (IRQ_SENSE_LEVEL | IRQ_POLARITY_NEGATIVE),/* 24: cPCI INTD# */
72         (IRQ_SENSE_LEVEL | IRQ_POLARITY_NEGATIVE),/* 25: PMC1 INTA#,PMC2 INTB#*/
73         (IRQ_SENSE_LEVEL | IRQ_POLARITY_NEGATIVE),/* 26: PMC1 INTB#,PMC2 INTC#*/
74         (IRQ_SENSE_LEVEL | IRQ_POLARITY_NEGATIVE),/* 27: PMC1 INTC#,PMC2 INTD#*/
75         (IRQ_SENSE_LEVEL | IRQ_POLARITY_NEGATIVE),/* 28: PMC1 INTD#,PMC2 INTA#*/
76         (IRQ_SENSE_LEVEL | IRQ_POLARITY_NEGATIVE),/* 29: Enet 2 (J3) */
77         (IRQ_SENSE_LEVEL | IRQ_POLARITY_NEGATIVE),/* 30: Abort Switch */
78         (IRQ_SENSE_LEVEL | IRQ_POLARITY_NEGATIVE),/* 31: RTC Alarm */
79 };
80
81 extern void mcpn765_set_VIA_IDE_native(void);
82
83 extern u_int openpic_irq(void);
84 extern char cmd_line[];
85
86 extern void gen550_progress(char *, unsigned short);
87 extern void gen550_init(int, struct uart_port *);
88
89 int use_of_interrupt_tree = 0;
90
91 static void mcpn765_halt(void);
92
93 TODC_ALLOC();
94
95 /*
96  * Motorola MCG MCPN765 interrupt routing.
97  */
98 static inline int
99 mcpn765_map_irq(struct pci_dev *dev, unsigned char idsel, unsigned char pin)
100 {
101         static char pci_irq_table[][4] =
102         /*
103          *      PCI IDSEL/INTPIN->INTLINE
104          *         A   B   C   D
105          */
106         {
107                 { 14,  0,  0,  0 },     /* IDSEL 11 - have to manually set */
108                 {  0,  0,  0,  0 },     /* IDSEL 12 - unused */
109                 {  0,  0,  0,  0 },     /* IDSEL 13 - unused */
110                 { 18,  0,  0,  0 },     /* IDSEL 14 - Enet 0 */
111                 {  0,  0,  0,  0 },     /* IDSEL 15 - unused */
112                 { 25, 26, 27, 28 },     /* IDSEL 16 - PMC Slot 1 */
113                 { 28, 25, 26, 27 },     /* IDSEL 17 - PMC Slot 2 */
114                 {  0,  0,  0,  0 },     /* IDSEL 18 - PMC 2B Connector XXXX */
115                 { 29,  0,  0,  0 },     /* IDSEL 19 - Enet 1 */
116                 { 20,  0,  0,  0 },     /* IDSEL 20 - 21554 cPCI bridge */
117         };
118
119         const long min_idsel = 11, max_idsel = 20, irqs_per_slot = 4;
120         return PCI_IRQ_TABLE_LOOKUP;
121 }
122
123 void __init
124 mcpn765_set_VIA_IDE_legacy(void)
125 {
126         unsigned short vend, dev;
127
128         early_read_config_word(0, 0, PCI_DEVFN(0xb, 1), PCI_VENDOR_ID, &vend);
129         early_read_config_word(0, 0, PCI_DEVFN(0xb, 1), PCI_DEVICE_ID, &dev);
130
131         if ((vend == PCI_VENDOR_ID_VIA) &&
132             (dev == PCI_DEVICE_ID_VIA_82C586_1)) {
133
134                 unsigned char temp;
135
136                 /* put back original "standard" port base addresses */
137                 early_write_config_dword(0, 0, PCI_DEVFN(0xb, 1),
138                                          PCI_BASE_ADDRESS_0, 0x1f1);
139                 early_write_config_dword(0, 0, PCI_DEVFN(0xb, 1),
140                                          PCI_BASE_ADDRESS_1, 0x3f5);
141                 early_write_config_dword(0, 0, PCI_DEVFN(0xb, 1),
142                                          PCI_BASE_ADDRESS_2, 0x171);
143                 early_write_config_dword(0, 0, PCI_DEVFN(0xb, 1),
144                                          PCI_BASE_ADDRESS_3, 0x375);
145                 early_write_config_dword(0, 0, PCI_DEVFN(0xb, 1),
146                                          PCI_BASE_ADDRESS_4, 0xcc01);
147
148                 /* put into legacy mode */
149                 early_read_config_byte(0, 0, PCI_DEVFN(0xb, 1), PCI_CLASS_PROG,
150                                        &temp);
151                 temp &= ~0x05;
152                 early_write_config_byte(0, 0, PCI_DEVFN(0xb, 1), PCI_CLASS_PROG,
153                                         temp);
154         }
155 }
156
157 void
158 mcpn765_set_VIA_IDE_native(void)
159 {
160         unsigned short vend, dev;
161
162         early_read_config_word(0, 0, PCI_DEVFN(0xb, 1), PCI_VENDOR_ID, &vend);
163         early_read_config_word(0, 0, PCI_DEVFN(0xb, 1), PCI_DEVICE_ID, &dev);
164
165         if ((vend == PCI_VENDOR_ID_VIA) &&
166             (dev == PCI_DEVICE_ID_VIA_82C586_1)) {
167
168                 unsigned char temp;
169
170                 /* put into native mode */
171                 early_read_config_byte(0, 0, PCI_DEVFN(0xb, 1), PCI_CLASS_PROG,
172                                        &temp);
173                 temp |= 0x05;
174                 early_write_config_byte(0, 0, PCI_DEVFN(0xb, 1), PCI_CLASS_PROG,
175                                         temp);
176         }
177 }
178
179 /*
180  * Initialize the VIA 82c586b.
181  */
182 static void __init
183 mcpn765_setup_via_82c586b(void)
184 {
185         struct pci_dev  *dev;
186         u_char          c;
187
188         if ((dev = pci_find_device(PCI_VENDOR_ID_VIA,
189                                    PCI_DEVICE_ID_VIA_82C586_0,
190                                    NULL)) == NULL) {
191                 printk("No VIA ISA bridge found\n");
192                 mcpn765_halt();
193                 /* NOTREACHED */
194         }
195
196         /*
197          * If the firmware left the EISA 4d0/4d1 ports enabled, make sure
198          * IRQ 14 is set for edge.
199          */
200         pci_read_config_byte(dev, 0x47, &c);
201
202         if (c & (1<<5)) {
203                 c = inb(0x4d1);
204                 c &= ~(1<<6);
205                 outb(c, 0x4d1);
206         }
207
208         /* Disable PNP IRQ routing since we use the Hawk's MPIC */
209         pci_write_config_dword(dev, 0x54, 0);
210         pci_write_config_byte(dev, 0x58, 0);
211
212
213         if ((dev = pci_find_device(PCI_VENDOR_ID_VIA,
214                                    PCI_DEVICE_ID_VIA_82C586_1,
215                                    NULL)) == NULL) {
216                 printk("No VIA ISA bridge found\n");
217                 mcpn765_halt();
218                 /* NOTREACHED */
219         }
220
221         /*
222          * PPCBug doesn't set the enable bits for the IDE device.
223          * Turn them on now.
224          */
225         pci_read_config_byte(dev, 0x40, &c);
226         c |= 0x03;
227         pci_write_config_byte(dev, 0x40, c);
228
229         return;
230 }
231
232 void __init
233 mcpn765_pcibios_fixup(void)
234 {
235         /* Do MCPN765 board specific initialization.  */
236         mcpn765_setup_via_82c586b();
237 }
238
239 void __init
240 mcpn765_find_bridges(void)
241 {
242         struct pci_controller   *hose;
243
244         hose = pcibios_alloc_controller();
245
246         if (!hose)
247                 return;
248
249         hose->first_busno = 0;
250         hose->last_busno = 0xff;
251         hose->pci_mem_offset = MCPN765_PCI_PHY_MEM_OFFSET;
252
253         pci_init_resource(&hose->io_resource,
254                         MCPN765_PCI_IO_START,
255                         MCPN765_PCI_IO_END,
256                         IORESOURCE_IO,
257                         "PCI host bridge");
258
259         pci_init_resource(&hose->mem_resources[0],
260                         MCPN765_PCI_MEM_START,
261                         MCPN765_PCI_MEM_END,
262                         IORESOURCE_MEM,
263                         "PCI host bridge");
264
265         hose->io_space.start = MCPN765_PCI_IO_START;
266         hose->io_space.end = MCPN765_PCI_IO_END;
267         hose->mem_space.start = MCPN765_PCI_MEM_START;
268         hose->mem_space.end = MCPN765_PCI_MEM_END - HAWK_MPIC_SIZE;
269
270         if (hawk_init(hose,
271                        MCPN765_HAWK_PPC_REG_BASE,
272                        MCPN765_PROC_PCI_MEM_START,
273                        MCPN765_PROC_PCI_MEM_END - HAWK_MPIC_SIZE,
274                        MCPN765_PROC_PCI_IO_START,
275                        MCPN765_PROC_PCI_IO_END,
276                        MCPN765_PCI_MEM_END - HAWK_MPIC_SIZE + 1) != 0) {
277                 printk("Could not initialize HAWK bridge\n");
278         }
279
280         /* VIA IDE BAR decoders are only 16-bits wide. PCI Auto Config
281          * will reassign the bars outside of 16-bit I/O space, which will 
282          * "break" things. To prevent this, we'll set the IDE chip into
283          * legacy mode and seed the bars with their legacy addresses (in 16-bit
284          * I/O space). The Auto Config code will skip the IDE contoller in 
285          * legacy mode, so our bar values will stick.
286          */
287         mcpn765_set_VIA_IDE_legacy();
288
289         hose->last_busno = pciauto_bus_scan(hose, hose->first_busno);
290
291         /* Now that we've got 16-bit addresses in the bars, we can switch the
292          * IDE controller back into native mode so we can do "modern" resource
293          * and interrupt management.
294          */
295         mcpn765_set_VIA_IDE_native();
296
297         ppc_md.pcibios_fixup = mcpn765_pcibios_fixup;
298         ppc_md.pcibios_fixup_bus = NULL;
299         ppc_md.pci_swizzle = common_swizzle;
300         ppc_md.pci_map_irq = mcpn765_map_irq;
301
302         return;
303 }
304 static void __init
305 mcpn765_setup_arch(void)
306 {
307         struct pci_controller *hose;
308
309         if ( ppc_md.progress )
310                 ppc_md.progress("mcpn765_setup_arch: enter", 0);
311
312         loops_per_jiffy = 50000000 / HZ;
313
314 #ifdef CONFIG_BLK_DEV_INITRD
315         if (initrd_start)
316                 ROOT_DEV = Root_RAM0;
317         else
318 #endif
319 #ifdef  CONFIG_ROOT_NFS
320                 ROOT_DEV = Root_NFS;
321 #else
322                 ROOT_DEV = Root_SDA2;
323 #endif
324
325         if ( ppc_md.progress )
326                 ppc_md.progress("mcpn765_setup_arch: find_bridges", 0);
327
328         /* Lookup PCI host bridges */
329         mcpn765_find_bridges();
330
331         hose = pci_bus_to_hose(0);
332         isa_io_base = (ulong)hose->io_base_virt;
333
334         TODC_INIT(TODC_TYPE_MK48T37,
335                   (MCPN765_PHYS_NVRAM_AS0 - isa_io_base),
336                   (MCPN765_PHYS_NVRAM_AS1 - isa_io_base),
337                   (MCPN765_PHYS_NVRAM_DATA - isa_io_base),
338                   8);
339
340         OpenPIC_InitSenses = mcpn765_openpic_initsenses;
341         OpenPIC_NumInitSenses = sizeof(mcpn765_openpic_initsenses);
342
343         printk("Motorola MCG MCPN765 cPCI Non-System Board\n");
344         printk("MCPN765 port (MontaVista Software, Inc. (source@mvista.com))\n");
345
346         if ( ppc_md.progress )
347                 ppc_md.progress("mcpn765_setup_arch: exit", 0);
348
349         return;
350 }
351
352 static void __init
353 mcpn765_init2(void)
354 {
355
356         request_region(0x00,0x20,"dma1");
357         request_region(0x20,0x20,"pic1");
358         request_region(0x40,0x20,"timer");
359         request_region(0x80,0x10,"dma page reg");
360         request_region(0xa0,0x20,"pic2");
361         request_region(0xc0,0x20,"dma2");
362
363         return;
364 }
365
366 /*
367  * Interrupt setup and service.
368  * Have MPIC on HAWK and cascaded 8259s on VIA 82586 cascaded to MPIC.
369  */
370 static void __init
371 mcpn765_init_IRQ(void)
372 {
373         int i;
374
375         if ( ppc_md.progress )
376                 ppc_md.progress("init_irq: enter", 0);
377
378         openpic_init(NUM_8259_INTERRUPTS);
379         openpic_hookup_cascade(NUM_8259_INTERRUPTS, "82c59 cascade",
380                         i8259_irq);
381
382         for(i=0; i < NUM_8259_INTERRUPTS; i++)
383                 irq_desc[i].handler = &i8259_pic;
384
385         i8259_init(0);
386
387         if ( ppc_md.progress )
388                 ppc_md.progress("init_irq: exit", 0);
389
390         return;
391 }
392
393 static u32
394 mcpn765_irq_canonicalize(u32 irq)
395 {
396         if (irq == 2)
397                 return 9;
398         else
399                 return irq;
400 }
401
402 static unsigned long __init
403 mcpn765_find_end_of_memory(void)
404 {
405         return hawk_get_mem_size(MCPN765_HAWK_SMC_BASE);
406 }
407
408 static void __init
409 mcpn765_map_io(void)
410 {
411         io_block_mapping(0xfe800000, 0xfe800000, 0x00800000, _PAGE_IO);
412 }
413
414 static void
415 mcpn765_reset_board(void)
416 {
417         local_irq_disable();
418
419         /* set VIA IDE controller into native mode */
420         mcpn765_set_VIA_IDE_native();
421
422         /* Set exception prefix high - to the firmware */
423         _nmask_and_or_msr(0, MSR_IP);
424
425         out_8((u_char *)MCPN765_BOARD_MODRST_REG, 0x01);
426
427         return;
428 }
429
430 static void
431 mcpn765_restart(char *cmd)
432 {
433         volatile ulong  i = 10000000;
434
435         mcpn765_reset_board();
436
437         while (i-- > 0);
438         panic("restart failed\n");
439 }
440
441 static void
442 mcpn765_power_off(void)
443 {
444         mcpn765_halt();
445         /* NOTREACHED */
446 }
447
448 static void
449 mcpn765_halt(void)
450 {
451         local_irq_disable();
452         while (1);
453         /* NOTREACHED */
454 }
455
456 static int
457 mcpn765_show_cpuinfo(struct seq_file *m)
458 {
459         seq_printf(m, "vendor\t\t: Motorola MCG\n");
460         seq_printf(m, "machine\t\t: MCPN765\n");
461
462         return 0;
463 }
464
465 /*
466  * Set BAT 3 to map 0xf0000000 to end of physical memory space.
467  */
468 static __inline__ void
469 mcpn765_set_bat(void)
470 {
471         mb();
472         mtspr(DBAT1U, 0xfe8000fe);
473         mtspr(DBAT1L, 0xfe80002a);
474         mb();
475 }
476
477 void __init
478 platform_init(unsigned long r3, unsigned long r4, unsigned long r5,
479                 unsigned long r6, unsigned long r7)
480 {
481         parse_bootinfo(find_bootinfo());
482
483         /* Map in board regs, etc. */
484         mcpn765_set_bat();
485
486         isa_mem_base = MCPN765_ISA_MEM_BASE;
487         pci_dram_offset = MCPN765_PCI_DRAM_OFFSET;
488         ISA_DMA_THRESHOLD = 0x00ffffff;
489         DMA_MODE_READ = 0x44;
490         DMA_MODE_WRITE = 0x48;
491
492         ppc_md.setup_arch = mcpn765_setup_arch;
493         ppc_md.show_cpuinfo = mcpn765_show_cpuinfo;
494         ppc_md.irq_canonicalize = mcpn765_irq_canonicalize;
495         ppc_md.init_IRQ = mcpn765_init_IRQ;
496         ppc_md.get_irq = openpic_get_irq;
497         ppc_md.init = mcpn765_init2;
498
499         ppc_md.restart = mcpn765_restart;
500         ppc_md.power_off = mcpn765_power_off;
501         ppc_md.halt = mcpn765_halt;
502
503         ppc_md.find_end_of_memory = mcpn765_find_end_of_memory;
504         ppc_md.setup_io_mappings = mcpn765_map_io;
505
506         ppc_md.time_init = todc_time_init;
507         ppc_md.set_rtc_time = todc_set_rtc_time;
508         ppc_md.get_rtc_time = todc_get_rtc_time;
509         ppc_md.calibrate_decr = todc_calibrate_decr;
510
511         ppc_md.nvram_read_val = todc_m48txx_read_val;
512         ppc_md.nvram_write_val = todc_m48txx_write_val;
513
514         ppc_md.heartbeat = NULL;
515         ppc_md.heartbeat_reset = 0;
516         ppc_md.heartbeat_count = 0;
517
518 #ifdef CONFIG_SERIAL_TEXT_DEBUG
519         ppc_md.progress = gen550_progress;
520 #endif
521 #ifdef CONFIG_KGDB
522         ppc_md.kgdb_map_scc = gen550_kgdb_map_scc;
523 #endif
524
525         return;
526 }