Merge git://git.infradead.org/mtd-2.6
[linux-2.6] / arch / ppc / platforms / prep_setup.c
1 /*
2  *  Copyright (C) 1995  Linus Torvalds
3  *  Adapted from 'alpha' version by Gary Thomas
4  *  Modified by Cort Dougan (cort@cs.nmt.edu)
5  *
6  * Support for PReP (Motorola MTX/MVME)
7  * by Troy Benjegerdes (hozer@drgw.net)
8  */
9
10 /*
11  * bootup setup stuff..
12  */
13
14 #include <linux/delay.h>
15 #include <linux/module.h>
16 #include <linux/errno.h>
17 #include <linux/sched.h>
18 #include <linux/kernel.h>
19 #include <linux/mm.h>
20 #include <linux/stddef.h>
21 #include <linux/unistd.h>
22 #include <linux/ptrace.h>
23 #include <linux/slab.h>
24 #include <linux/user.h>
25 #include <linux/a.out.h>
26 #include <linux/screen_info.h>
27 #include <linux/major.h>
28 #include <linux/interrupt.h>
29 #include <linux/reboot.h>
30 #include <linux/init.h>
31 #include <linux/initrd.h>
32 #include <linux/ioport.h>
33 #include <linux/console.h>
34 #include <linux/timex.h>
35 #include <linux/pci.h>
36 #include <linux/ide.h>
37 #include <linux/seq_file.h>
38 #include <linux/root_dev.h>
39
40 #include <asm/sections.h>
41 #include <asm/mmu.h>
42 #include <asm/processor.h>
43 #include <asm/residual.h>
44 #include <asm/io.h>
45 #include <asm/pgtable.h>
46 #include <asm/cache.h>
47 #include <asm/dma.h>
48 #include <asm/machdep.h>
49 #include <asm/mc146818rtc.h>
50 #include <asm/mk48t59.h>
51 #include <asm/prep_nvram.h>
52 #include <asm/raven.h>
53 #include <asm/vga.h>
54 #include <asm/time.h>
55 #include <asm/mpc10x.h>
56 #include <asm/i8259.h>
57 #include <asm/open_pic.h>
58 #include <asm/pci-bridge.h>
59 #include <asm/todc.h>
60
61 /* prep registers for L2 */
62 #define CACHECRBA       0x80000823      /* Cache configuration register address */
63 #define L2CACHE_MASK    0x03    /* Mask for 2 L2 Cache bits */
64 #define L2CACHE_512KB   0x00    /* 512KB */
65 #define L2CACHE_256KB   0x01    /* 256KB */
66 #define L2CACHE_1MB     0x02    /* 1MB */
67 #define L2CACHE_NONE    0x03    /* NONE */
68 #define L2CACHE_PARITY  0x08    /* Mask for L2 Cache Parity Protected bit */
69
70 TODC_ALLOC();
71
72 unsigned char ucBoardRev;
73 unsigned char ucBoardRevMaj, ucBoardRevMin;
74
75 extern unsigned char prep_nvram_read_val(int addr);
76 extern void prep_nvram_write_val(int addr,
77                                  unsigned char val);
78 extern unsigned char rs_nvram_read_val(int addr);
79 extern void rs_nvram_write_val(int addr,
80                                  unsigned char val);
81 extern void ibm_prep_init(void);
82
83 extern void prep_find_bridges(void);
84
85 int _prep_type;
86
87 extern void prep_residual_setup_pci(char *irq_edge_mask_lo, char *irq_edge_mask_hi);
88 extern void prep_sandalfoot_setup_pci(char *irq_edge_mask_lo, char *irq_edge_mask_hi);
89 extern void prep_thinkpad_setup_pci(char *irq_edge_mask_lo, char *irq_edge_mask_hi);
90 extern void prep_carolina_setup_pci(char *irq_edge_mask_lo, char *irq_edge_mask_hi);
91 extern void prep_tiger1_setup_pci(char *irq_edge_mask_lo, char *irq_edge_mask_hi);
92
93
94 #define cached_21       (((char *)(ppc_cached_irq_mask))[3])
95 #define cached_A1       (((char *)(ppc_cached_irq_mask))[2])
96
97 #ifdef CONFIG_SOUND_CS4232
98 long ppc_cs4232_dma, ppc_cs4232_dma2;
99 #endif
100
101 extern PTE *Hash, *Hash_end;
102 extern unsigned long Hash_size, Hash_mask;
103 extern int probingmem;
104 extern unsigned long loops_per_jiffy;
105
106 #ifdef CONFIG_SOUND_CS4232
107 EXPORT_SYMBOL(ppc_cs4232_dma);
108 EXPORT_SYMBOL(ppc_cs4232_dma2);
109 #endif
110
111 /* useful ISA ports */
112 #define PREP_SYSCTL     0x81c
113 /* present in the IBM reference design; possibly identical in Mot boxes: */
114 #define PREP_IBM_SIMM_ID        0x803   /* SIMM size: 32 or 8 MiB */
115 #define PREP_IBM_SIMM_PRESENCE  0x804
116 #define PREP_IBM_EQUIPMENT      0x80c
117 #define PREP_IBM_L2INFO 0x80d
118 #define PREP_IBM_PM1    0x82a   /* power management register 1 */
119 #define PREP_IBM_PLANAR 0x852   /* planar ID - identifies the motherboard */
120 #define PREP_IBM_DISP   0x8c0   /* 4-digit LED display */
121
122 /* Equipment Present Register masks: */
123 #define PREP_IBM_EQUIPMENT_RESERVED     0x80
124 #define PREP_IBM_EQUIPMENT_SCSIFUSE     0x40
125 #define PREP_IBM_EQUIPMENT_L2_COPYBACK  0x08
126 #define PREP_IBM_EQUIPMENT_L2_256       0x04
127 #define PREP_IBM_EQUIPMENT_CPU  0x02
128 #define PREP_IBM_EQUIPMENT_L2   0x01
129
130 /* planar ID values: */
131 /* Sandalfoot/Sandalbow (6015/7020) */
132 #define PREP_IBM_SANDALFOOT     0xfc
133 /* Woodfield, Thinkpad 850/860 (6042/7249) */
134 #define PREP_IBM_THINKPAD       0xff /* planar ID unimplemented */
135 /* PowerSeries 830/850 (6050/6070) */
136 #define PREP_IBM_CAROLINA_IDE_0 0xf0
137 #define PREP_IBM_CAROLINA_IDE_1 0xf1
138 #define PREP_IBM_CAROLINA_IDE_2 0xf2
139 #define PREP_IBM_CAROLINA_IDE_3 0xf3
140 /* 7248-43P */
141 #define PREP_IBM_CAROLINA_SCSI_0        0xf4
142 #define PREP_IBM_CAROLINA_SCSI_1        0xf5
143 #define PREP_IBM_CAROLINA_SCSI_2        0xf6
144 #define PREP_IBM_CAROLINA_SCSI_3        0xf7 /* missing from Carolina Tech Spec */
145 /* Tiger1 (7043-140) */
146 #define PREP_IBM_TIGER1_133             0xd1
147 #define PREP_IBM_TIGER1_166             0xd2
148 #define PREP_IBM_TIGER1_180             0xd3
149 #define PREP_IBM_TIGER1_xxx             0xd4 /* unknown, but probably exists */
150 #define PREP_IBM_TIGER1_333             0xd5 /* missing from Tiger Tech Spec */
151
152 /* setup_ibm_pci:
153  *      set Motherboard_map_name, Motherboard_map, Motherboard_routes.
154  *      return 8259 edge/level masks.
155  */
156 void (*setup_ibm_pci)(char *irq_lo, char *irq_hi);
157
158 extern char *Motherboard_map_name; /* for use in *_cpuinfo */
159
160 /*
161  * As found in the PReP reference implementation.
162  * Used by Thinkpad, Sandalfoot (6015/7020), and all Motorola PReP.
163  */
164 static void __init
165 prep_gen_enable_l2(void)
166 {
167         outb(inb(PREP_SYSCTL) | 0x3, PREP_SYSCTL);
168 }
169
170 /* Used by Carolina and Tiger1 */
171 static void __init
172 prep_carolina_enable_l2(void)
173 {
174         outb(inb(PREP_SYSCTL) | 0xc0, PREP_SYSCTL);
175 }
176
177 /* cpuinfo code common to all IBM PReP */
178 static void
179 prep_ibm_cpuinfo(struct seq_file *m)
180 {
181         unsigned int equip_reg = inb(PREP_IBM_EQUIPMENT);
182
183         seq_printf(m, "machine\t\t: PReP %s\n", Motherboard_map_name);
184
185         seq_printf(m, "upgrade cpu\t: ");
186         if (equip_reg & PREP_IBM_EQUIPMENT_CPU) {
187                 seq_printf(m, "not ");
188         }
189         seq_printf(m, "present\n");
190
191         /* print info about the SCSI fuse */
192         seq_printf(m, "scsi fuse\t: ");
193         if (equip_reg & PREP_IBM_EQUIPMENT_SCSIFUSE)
194                 seq_printf(m, "ok");
195         else
196                 seq_printf(m, "bad");
197         seq_printf(m, "\n");
198
199         /* print info about SIMMs */
200         if (have_residual_data) {
201                 int i;
202                 seq_printf(m, "simms\t\t: ");
203                 for (i = 0; (res->ActualNumMemories) && (i < MAX_MEMS); i++) {
204                         if (res->Memories[i].SIMMSize != 0)
205                                 seq_printf(m, "%d:%ldMiB ", i,
206                                         (res->Memories[i].SIMMSize > 1024) ?
207                                         res->Memories[i].SIMMSize>>20 :
208                                         res->Memories[i].SIMMSize);
209                 }
210                 seq_printf(m, "\n");
211         }
212 }
213
214 static int
215 prep_gen_cpuinfo(struct seq_file *m)
216 {
217         prep_ibm_cpuinfo(m);
218         return 0;
219 }
220
221 static int
222 prep_sandalfoot_cpuinfo(struct seq_file *m)
223 {
224         unsigned int equip_reg = inb(PREP_IBM_EQUIPMENT);
225
226         prep_ibm_cpuinfo(m);
227
228         /* report amount and type of L2 cache present */
229         seq_printf(m, "L2 cache\t: ");
230         if (equip_reg & PREP_IBM_EQUIPMENT_L2) {
231                 seq_printf(m, "not present");
232         } else {
233                 if (equip_reg & PREP_IBM_EQUIPMENT_L2_256)
234                         seq_printf(m, "256KiB");
235                 else
236                         seq_printf(m, "unknown size");
237
238                 if (equip_reg & PREP_IBM_EQUIPMENT_L2_COPYBACK)
239                         seq_printf(m, ", copy-back");
240                 else
241                         seq_printf(m, ", write-through");
242         }
243         seq_printf(m, "\n");
244
245         return 0;
246 }
247
248 static int
249 prep_thinkpad_cpuinfo(struct seq_file *m)
250 {
251         unsigned int equip_reg = inb(PREP_IBM_EQUIPMENT);
252         char *cpubus_speed, *pci_speed;
253
254         prep_ibm_cpuinfo(m);
255
256         /* report amount and type of L2 cache present */
257         seq_printf(m, "l2 cache\t: ");
258         if ((equip_reg & 0x1) == 0) {
259                 switch ((equip_reg & 0xc) >> 2) {
260                         case 0x0:
261                                 seq_printf(m, "128KiB look-aside 2-way write-through\n");
262                                 break;
263                         case 0x1:
264                                 seq_printf(m, "512KiB look-aside direct-mapped write-back\n");
265                                 break;
266                         case 0x2:
267                                 seq_printf(m, "256KiB look-aside 2-way write-through\n");
268                                 break;
269                         case 0x3:
270                                 seq_printf(m, "256KiB look-aside direct-mapped write-back\n");
271                                 break;
272                 }
273         } else {
274                 seq_printf(m, "not present\n");
275         }
276
277         /* report bus speeds because we can */
278         if ((equip_reg & 0x80) == 0) {
279                 switch ((equip_reg & 0x30) >> 4) {
280                         case 0x1:
281                                 cpubus_speed = "50";
282                                 pci_speed = "25";
283                                 break;
284                         case 0x3:
285                                 cpubus_speed = "66";
286                                 pci_speed = "33";
287                                 break;
288                         default:
289                                 cpubus_speed = "unknown";
290                                 pci_speed = "unknown";
291                                 break;
292                 }
293         } else {
294                 switch ((equip_reg & 0x30) >> 4) {
295                         case 0x1:
296                                 cpubus_speed = "25";
297                                 pci_speed = "25";
298                                 break;
299                         case 0x2:
300                                 cpubus_speed = "60";
301                                 pci_speed = "30";
302                                 break;
303                         case 0x3:
304                                 cpubus_speed = "33";
305                                 pci_speed = "33";
306                                 break;
307                         default:
308                                 cpubus_speed = "unknown";
309                                 pci_speed = "unknown";
310                                 break;
311                 }
312         }
313         seq_printf(m, "60x bus\t\t: %sMHz\n", cpubus_speed);
314         seq_printf(m, "pci bus\t\t: %sMHz\n", pci_speed);
315
316         return 0;
317 }
318
319 static int
320 prep_carolina_cpuinfo(struct seq_file *m)
321 {
322         unsigned int equip_reg = inb(PREP_IBM_EQUIPMENT);
323
324         prep_ibm_cpuinfo(m);
325
326         /* report amount and type of L2 cache present */
327         seq_printf(m, "l2 cache\t: ");
328         if ((equip_reg & 0x1) == 0) {
329                 unsigned int l2_reg = inb(PREP_IBM_L2INFO);
330
331                 /* L2 size */
332                 if ((l2_reg & 0x60) == 0)
333                         seq_printf(m, "256KiB");
334                 else if ((l2_reg & 0x60) == 0x20)
335                         seq_printf(m, "512KiB");
336                 else
337                         seq_printf(m, "unknown size");
338
339                 /* L2 type */
340                 if ((l2_reg & 0x3) == 0)
341                         seq_printf(m, ", async");
342                 else if ((l2_reg & 0x3) == 1)
343                         seq_printf(m, ", sync");
344                 else
345                         seq_printf(m, ", unknown type");
346
347                 seq_printf(m, "\n");
348         } else {
349                 seq_printf(m, "not present\n");
350         }
351
352         return 0;
353 }
354
355 static int
356 prep_tiger1_cpuinfo(struct seq_file *m)
357 {
358         unsigned int l2_reg = inb(PREP_IBM_L2INFO);
359
360         prep_ibm_cpuinfo(m);
361
362         /* report amount and type of L2 cache present */
363         seq_printf(m, "l2 cache\t: ");
364         if ((l2_reg & 0xf) == 0xf) {
365                 seq_printf(m, "not present\n");
366         } else {
367                 if (l2_reg & 0x8)
368                         seq_printf(m, "async, ");
369                 else
370                         seq_printf(m, "sync burst, ");
371         
372                 if (l2_reg & 0x4)
373                         seq_printf(m, "parity, ");
374                 else
375                         seq_printf(m, "no parity, ");
376         
377                 switch (l2_reg & 0x3) {
378                         case 0x0:
379                                 seq_printf(m, "256KiB\n");
380                                 break;
381                         case 0x1:
382                                 seq_printf(m, "512KiB\n");
383                                 break;
384                         case 0x2:
385                                 seq_printf(m, "1MiB\n");
386                                 break;
387                         default:
388                                 seq_printf(m, "unknown size\n");
389                                 break;
390                 }
391         }
392
393         return 0;
394 }
395
396
397 /* Used by all Motorola PReP */
398 static int
399 prep_mot_cpuinfo(struct seq_file *m)
400 {
401         unsigned int cachew = *((unsigned char *)CACHECRBA);
402
403         seq_printf(m, "machine\t\t: PReP %s\n", Motherboard_map_name);
404
405         /* report amount and type of L2 cache present */
406         seq_printf(m, "l2 cache\t: ");
407         switch (cachew & L2CACHE_MASK) {
408                 case L2CACHE_512KB:
409                         seq_printf(m, "512KiB");
410                         break;
411                 case L2CACHE_256KB:
412                         seq_printf(m, "256KiB");
413                         break;
414                 case L2CACHE_1MB:
415                         seq_printf(m, "1MiB");
416                         break;
417                 case L2CACHE_NONE:
418                         seq_printf(m, "none\n");
419                         goto no_l2;
420                         break;
421                 default:
422                         seq_printf(m, "%x\n", cachew);
423         }
424
425         seq_printf(m, ", parity %s",
426                         (cachew & L2CACHE_PARITY)? "enabled" : "disabled");
427
428         seq_printf(m, " SRAM:");
429
430         switch ( ((cachew & 0xf0) >> 4) & ~(0x3) ) {
431                 case 1: seq_printf(m, "synchronous, parity, flow-through\n");
432                                 break;
433                 case 2: seq_printf(m, "asynchronous, no parity\n");
434                                 break;
435                 case 3: seq_printf(m, "asynchronous, parity\n");
436                                 break;
437                 default:seq_printf(m, "synchronous, pipelined, no parity\n");
438                                 break;
439         }
440
441 no_l2:
442         /* print info about SIMMs */
443         if (have_residual_data) {
444                 int i;
445                 seq_printf(m, "simms\t\t: ");
446                 for (i = 0; (res->ActualNumMemories) && (i < MAX_MEMS); i++) {
447                         if (res->Memories[i].SIMMSize != 0)
448                                 seq_printf(m, "%d:%ldM ", i,
449                                         (res->Memories[i].SIMMSize > 1024) ?
450                                         res->Memories[i].SIMMSize>>20 :
451                                         res->Memories[i].SIMMSize);
452                 }
453                 seq_printf(m, "\n");
454         }
455
456         return 0;
457 }
458
459 static void
460 prep_restart(char *cmd)
461 {
462 #define PREP_SP92       0x92    /* Special Port 92 */
463         local_irq_disable(); /* no interrupts */
464
465         /* set exception prefix high - to the prom */
466         _nmask_and_or_msr(0, MSR_IP);
467
468         /* make sure bit 0 (reset) is a 0 */
469         outb( inb(PREP_SP92) & ~1L , PREP_SP92);
470         /* signal a reset to system control port A - soft reset */
471         outb( inb(PREP_SP92) | 1 , PREP_SP92);
472
473         while ( 1 ) ;
474         /* not reached */
475 #undef PREP_SP92
476 }
477
478 static void
479 prep_halt(void)
480 {
481         local_irq_disable(); /* no interrupts */
482
483         /* set exception prefix high - to the prom */
484         _nmask_and_or_msr(0, MSR_IP);
485
486         while ( 1 ) ;
487         /* not reached */
488 }
489
490 /* Carrera is the power manager in the Thinkpads. Unfortunately not much is
491  * known about it, so we can't power down.
492  */
493 static void
494 prep_carrera_poweroff(void)
495 {
496         prep_halt();
497 }
498
499 /*
500  * On most IBM PReP's, power management is handled by a Signetics 87c750
501  * behind the Utah component on the ISA bus. To access the 750 you must write
502  * a series of nibbles to port 0x82a (decoded by the Utah). This is described
503  * somewhat in the IBM Carolina Technical Specification.
504  * -Hollis
505  */
506 static void
507 utah_sig87c750_setbit(unsigned int bytenum, unsigned int bitnum, int value)
508 {
509         /*
510          * byte1: 0 0 0 1 0  d  a5 a4
511          * byte2: 0 0 0 1 a3 a2 a1 a0
512          *
513          * d = the bit's value, enabled or disabled
514          * (a5 a4 a3) = the byte number, minus 20
515          * (a2 a1 a0) = the bit number
516          *
517          * example: set the 5th bit of byte 21 (21.5)
518          *     a5 a4 a3 = 001 (byte 1)
519          *     a2 a1 a0 = 101 (bit 5)
520          *
521          *     byte1 = 0001 0100 (0x14)
522          *     byte2 = 0001 1101 (0x1d)
523          */
524         unsigned char byte1=0x10, byte2=0x10;
525
526         /* the 750's '20.0' is accessed as '0.0' through Utah (which adds 20) */
527         bytenum -= 20;
528
529         byte1 |= (!!value) << 2;                /* set d */
530         byte1 |= (bytenum >> 1) & 0x3;  /* set a5, a4 */
531
532         byte2 |= (bytenum & 0x1) << 3;  /* set a3 */
533         byte2 |= bitnum & 0x7;                  /* set a2, a1, a0 */
534
535         outb(byte1, PREP_IBM_PM1);      /* first nibble */
536         mb();
537         udelay(100);                            /* important: let controller recover */
538
539         outb(byte2, PREP_IBM_PM1);      /* second nibble */
540         mb();
541         udelay(100);                            /* important: let controller recover */
542 }
543
544 static void
545 prep_sig750_poweroff(void)
546 {
547         /* tweak the power manager found in most IBM PRePs (except Thinkpads) */
548
549         local_irq_disable();
550         /* set exception prefix high - to the prom */
551         _nmask_and_or_msr(0, MSR_IP);
552
553         utah_sig87c750_setbit(21, 5, 1); /* set bit 21.5, "PMEXEC_OFF" */
554
555         while (1) ;
556         /* not reached */
557 }
558
559 static int
560 prep_show_percpuinfo(struct seq_file *m, int i)
561 {
562         /* PREP's without residual data will give incorrect values here */
563         seq_printf(m, "clock\t\t: ");
564         if (have_residual_data)
565                 seq_printf(m, "%ldMHz\n",
566                            (res->VitalProductData.ProcessorHz > 1024) ?
567                            res->VitalProductData.ProcessorHz / 1000000 :
568                            res->VitalProductData.ProcessorHz);
569         else
570                 seq_printf(m, "???\n");
571
572         return 0;
573 }
574
575 #ifdef CONFIG_SOUND_CS4232
576 static long __init masktoint(unsigned int i)
577 {
578         int t = -1;
579         while (i >> ++t)
580                 ;
581         return (t-1);
582 }
583
584 /*
585  * ppc_cs4232_dma and ppc_cs4232_dma2 are used in include/asm/dma.h
586  * to distinguish sound dma-channels from others. This is because
587  * blocksize on 16 bit dma-channels 5,6,7 is 128k, but
588  * the cs4232.c uses 64k like on 8 bit dma-channels 0,1,2,3
589  */
590
591 static void __init prep_init_sound(void)
592 {
593         PPC_DEVICE *audiodevice = NULL;
594
595         /*
596          * Get the needed resource informations from residual data.
597          *
598          */
599         if (have_residual_data)
600                 audiodevice = residual_find_device(~0, NULL,
601                                 MultimediaController, AudioController, -1, 0);
602
603         if (audiodevice != NULL) {
604                 PnP_TAG_PACKET *pkt;
605
606                 pkt = PnP_find_packet((unsigned char *)&res->DevicePnPHeap[audiodevice->AllocatedOffset],
607                                 S5_Packet, 0);
608                 if (pkt != NULL)
609                         ppc_cs4232_dma = masktoint(pkt->S5_Pack.DMAMask);
610                 pkt = PnP_find_packet((unsigned char*)&res->DevicePnPHeap[audiodevice->AllocatedOffset],
611                                 S5_Packet, 1);
612                 if (pkt != NULL)
613                         ppc_cs4232_dma2 = masktoint(pkt->S5_Pack.DMAMask);
614         }
615
616         /*
617          * These are the PReP specs' defaults for the cs4231.  We use these
618          * as fallback incase we don't have residual data.
619          * At least the IBM Thinkpad 850 with IDE DMA Channels at 6 and 7
620          * will use the other values.
621          */
622         if (audiodevice == NULL) {
623                 switch (_prep_type) {
624                 case _PREP_IBM:
625                         ppc_cs4232_dma = 1;
626                         ppc_cs4232_dma2 = -1;
627                         break;
628                 default:
629                         ppc_cs4232_dma = 6;
630                         ppc_cs4232_dma2 = 7;
631                 }
632         }
633
634         /*
635          * Find a way to push these informations to the cs4232 driver
636          * Give it out with printk, when not in cmd_line?
637          * Append it to  cmd_line and boot_command_line?
638          * Format is cs4232=io,irq,dma,dma2
639          */
640 }
641 #endif /* CONFIG_SOUND_CS4232 */
642
643 /*
644  * Fill out screen_info according to the residual data. This allows us to use
645  * at least vesafb.
646  */
647 static void __init
648 prep_init_vesa(void)
649 {
650 #if     (defined(CONFIG_FB_VGA16) || defined(CONFIG_FB_VGA16_MODULE) || \
651          defined(CONFIG_FB_VESA))
652         PPC_DEVICE *vgadev = NULL;
653
654         if (have_residual_data)
655                 vgadev = residual_find_device(~0, NULL, DisplayController,
656                                                         SVGAController, -1, 0);
657
658         if (vgadev != NULL) {
659                 PnP_TAG_PACKET *pkt;
660
661                 pkt = PnP_find_large_vendor_packet(
662                                 (unsigned char *)&res->DevicePnPHeap[vgadev->AllocatedOffset],
663                                 0x04, 0); /* 0x04 = Display Tag */
664                 if (pkt != NULL) {
665                         unsigned char *ptr = (unsigned char *)pkt;
666
667                         if (ptr[4]) {
668                                 /* graphics mode */
669                                 screen_info.orig_video_isVGA = VIDEO_TYPE_VLFB;
670
671                                 screen_info.lfb_depth = ptr[4] * 8;
672
673                                 screen_info.lfb_width = swab16(*(short *)(ptr+6));
674                                 screen_info.lfb_height = swab16(*(short *)(ptr+8));
675                                 screen_info.lfb_linelength = swab16(*(short *)(ptr+10));
676
677                                 screen_info.lfb_base = swab32(*(long *)(ptr+12));
678                                 screen_info.lfb_size = swab32(*(long *)(ptr+20)) / 65536;
679                         }
680                 }
681         }
682 #endif
683 }
684
685 /*
686  * Set DBAT 2 to access 0x80000000 so early progress messages will work
687  */
688 static __inline__ void
689 prep_set_bat(void)
690 {
691         /* wait for all outstanding memory access to complete */
692         mb();
693
694         /* setup DBATs */
695         mtspr(SPRN_DBAT2U, 0x80001ffe);
696         mtspr(SPRN_DBAT2L, 0x8000002a);
697
698         /* wait for updates */
699         mb();
700 }
701
702 /*
703  * IBM 3-digit status LED
704  */
705 static unsigned int ibm_statusled_base;
706
707 static void
708 ibm_statusled_progress(char *s, unsigned short hex);
709
710 static int
711 ibm_statusled_panic(struct notifier_block *dummy1, unsigned long dummy2,
712                     void * dummy3)
713 {
714         ibm_statusled_progress(NULL, 0x505); /* SOS */
715         return NOTIFY_DONE;
716 }
717
718 static struct notifier_block ibm_statusled_block = {
719         ibm_statusled_panic,
720         NULL,
721         INT_MAX /* try to do it first */
722 };
723
724 static void
725 ibm_statusled_progress(char *s, unsigned short hex)
726 {
727         static int notifier_installed;
728         /*
729          * Progress uses 4 digits and we have only 3.  So, we map 0xffff to
730          * 0xfff for display switch off.  Out of range values are mapped to
731          * 0xeff, as I'm told 0xf00 and above are reserved for hardware codes.
732          * Install the panic notifier when the display is first switched off.
733          */
734         if (hex == 0xffff) {
735                 hex = 0xfff;
736                 if (!notifier_installed) {
737                         ++notifier_installed;
738                         atomic_notifier_chain_register(&panic_notifier_list,
739                                                 &ibm_statusled_block);
740                 }
741         }
742         else
743                 if (hex > 0xfff)
744                         hex = 0xeff;
745
746         mb();
747         outw(hex, ibm_statusled_base);
748 }
749
750 static void __init
751 ibm_statusled_init(void)
752 {
753         /*
754          * The IBM 3-digit LED display is specified in the residual data
755          * as an operator panel device, type "System Status LED".  Find
756          * that device and determine its address.  We validate all the
757          * other parameters on the off-chance another, similar device
758          * exists.
759          */
760         if (have_residual_data) {
761                 PPC_DEVICE *led;
762                 PnP_TAG_PACKET *pkt;
763
764                 led = residual_find_device(~0, NULL, SystemPeripheral,
765                                            OperatorPanel, SystemStatusLED, 0);
766                 if (!led)
767                         return;
768
769                 pkt = PnP_find_packet((unsigned char *)
770                        &res->DevicePnPHeap[led->AllocatedOffset], S8_Packet, 0);
771                 if (!pkt)
772                         return;
773
774                 if (pkt->S8_Pack.IOInfo != ISAAddr16bit)
775                         return;
776                 if (*(unsigned short *)pkt->S8_Pack.RangeMin !=
777                     *(unsigned short *)pkt->S8_Pack.RangeMax)
778                         return;
779                 if (pkt->S8_Pack.IOAlign != 2)
780                         return;
781                 if (pkt->S8_Pack.IONum != 2)
782                         return;
783
784                 ibm_statusled_base = ld_le16((unsigned short *)
785                                              (pkt->S8_Pack.RangeMin));
786                 ppc_md.progress = ibm_statusled_progress;
787         }
788 }
789
790 static void __init
791 prep_setup_arch(void)
792 {
793         unsigned char reg;
794         int is_ide=0;
795
796         /* init to some ~sane value until calibrate_delay() runs */
797         loops_per_jiffy = 50000000;
798
799         /* Lookup PCI host bridges */
800         prep_find_bridges();
801
802         /* Set up floppy in PS/2 mode */
803         outb(0x09, SIO_CONFIG_RA);
804         reg = inb(SIO_CONFIG_RD);
805         reg = (reg & 0x3F) | 0x40;
806         outb(reg, SIO_CONFIG_RD);
807         outb(reg, SIO_CONFIG_RD);       /* Have to write twice to change! */
808
809         switch ( _prep_type )
810         {
811         case _PREP_IBM:
812                 reg = inb(PREP_IBM_PLANAR);
813                 printk(KERN_INFO "IBM planar ID: %02x", reg);
814                 switch (reg) {
815                         case PREP_IBM_SANDALFOOT:
816                                 prep_gen_enable_l2();
817                                 setup_ibm_pci = prep_sandalfoot_setup_pci;
818                                 ppc_md.power_off = prep_sig750_poweroff;
819                                 ppc_md.show_cpuinfo = prep_sandalfoot_cpuinfo;
820                                 break;
821                         case PREP_IBM_THINKPAD:
822                                 prep_gen_enable_l2();
823                                 setup_ibm_pci = prep_thinkpad_setup_pci;
824                                 ppc_md.power_off = prep_carrera_poweroff;
825                                 ppc_md.show_cpuinfo = prep_thinkpad_cpuinfo;
826                                 break;
827                         default:
828                                 if (have_residual_data) {
829                                         prep_gen_enable_l2();
830                                         setup_ibm_pci = prep_residual_setup_pci;
831                                         ppc_md.power_off = prep_halt;
832                                         ppc_md.show_cpuinfo = prep_gen_cpuinfo;
833                                         break;
834                                 }
835                                 else
836                                         printk(" - unknown! Assuming Carolina");
837                                         /* fall through */
838                         case PREP_IBM_CAROLINA_IDE_0:
839                         case PREP_IBM_CAROLINA_IDE_1:
840                         case PREP_IBM_CAROLINA_IDE_2:
841                         case PREP_IBM_CAROLINA_IDE_3:
842                                 is_ide = 1;
843                         case PREP_IBM_CAROLINA_SCSI_0:
844                         case PREP_IBM_CAROLINA_SCSI_1:
845                         case PREP_IBM_CAROLINA_SCSI_2:
846                         case PREP_IBM_CAROLINA_SCSI_3:
847                                 prep_carolina_enable_l2();
848                                 setup_ibm_pci = prep_carolina_setup_pci;
849                                 ppc_md.power_off = prep_sig750_poweroff;
850                                 ppc_md.show_cpuinfo = prep_carolina_cpuinfo;
851                                 break;
852                         case PREP_IBM_TIGER1_133:
853                         case PREP_IBM_TIGER1_166:
854                         case PREP_IBM_TIGER1_180:
855                         case PREP_IBM_TIGER1_xxx:
856                         case PREP_IBM_TIGER1_333:
857                                 prep_carolina_enable_l2();
858                                 setup_ibm_pci = prep_tiger1_setup_pci;
859                                 ppc_md.power_off = prep_sig750_poweroff;
860                                 ppc_md.show_cpuinfo = prep_tiger1_cpuinfo;
861                                 break;
862                 }
863                 printk("\n");
864
865                 /* default root device */
866                 if (is_ide)
867                         ROOT_DEV = MKDEV(IDE0_MAJOR, 3);
868                 else
869                         ROOT_DEV = MKDEV(SCSI_DISK0_MAJOR, 3);
870
871                 break;
872         case _PREP_Motorola:
873                 prep_gen_enable_l2();
874                 ppc_md.power_off = prep_halt;
875                 ppc_md.show_cpuinfo = prep_mot_cpuinfo;
876
877 #ifdef CONFIG_BLK_DEV_INITRD
878                 if (initrd_start)
879                         ROOT_DEV = Root_RAM0;
880                 else
881 #endif
882 #ifdef CONFIG_ROOT_NFS
883                         ROOT_DEV = Root_NFS;
884 #else
885                         ROOT_DEV = Root_SDA2;
886 #endif
887                 break;
888         }
889
890         /* Read in NVRAM data */
891         init_prep_nvram();
892
893         /* if no bootargs, look in NVRAM */
894         if ( cmd_line[0] == '\0' ) {
895                 char *bootargs;
896                  bootargs = prep_nvram_get_var("bootargs");
897                  if (bootargs != NULL) {
898                          strcpy(cmd_line, bootargs);
899                          /* again.. */
900                          strcpy(boot_command_line, cmd_line);
901                 }
902         }
903
904 #ifdef CONFIG_SOUND_CS4232
905         prep_init_sound();
906 #endif /* CONFIG_SOUND_CS4232 */
907
908         prep_init_vesa();
909
910         switch (_prep_type) {
911         case _PREP_Motorola:
912                 raven_init();
913                 break;
914         case _PREP_IBM:
915                 ibm_prep_init();
916                 break;
917         }
918
919 #ifdef CONFIG_VGA_CONSOLE
920         /* vgacon.c needs to know where we mapped IO memory in io_block_mapping() */
921         vgacon_remap_base = 0xf0000000;
922         conswitchp = &vga_con;
923 #endif
924 }
925
926 /*
927  * First, see if we can get this information from the residual data.
928  * This is important on some IBM PReP systems.  If we cannot, we let the
929  * TODC code handle doing this.
930  */
931 static void __init
932 prep_calibrate_decr(void)
933 {
934         if (have_residual_data) {
935                 unsigned long freq, divisor = 4;
936
937                 if ( res->VitalProductData.ProcessorBusHz ) {
938                         freq = res->VitalProductData.ProcessorBusHz;
939                         printk("time_init: decrementer frequency = %lu.%.6lu MHz\n",
940                                         (freq/divisor)/1000000,
941                                         (freq/divisor)%1000000);
942                         tb_to_us = mulhwu_scale_factor(freq/divisor, 1000000);
943                         tb_ticks_per_jiffy = freq / HZ / divisor;
944                 }
945         }
946         else
947                 todc_calibrate_decr();
948 }
949
950 static void __init
951 prep_init_IRQ(void)
952 {
953         unsigned int pci_viddid, pci_did;
954
955         if (OpenPIC_Addr != NULL) {
956                 openpic_init(NUM_8259_INTERRUPTS);
957                 /* We have a cascade on OpenPIC IRQ 0, Linux IRQ 16 */
958                 openpic_hookup_cascade(NUM_8259_INTERRUPTS, "82c59 cascade",
959                                        i8259_irq);
960         }
961
962         if (have_residual_data) {
963                 i8259_init(residual_isapic_addr(), 0);
964                 return;
965         }
966
967         /* If we have a Raven PCI bridge or a Hawk PCI bridge / Memory
968          * controller, we poll (as they have a different int-ack address). */
969         early_read_config_dword(NULL, 0, 0, PCI_VENDOR_ID, &pci_viddid);
970         pci_did = (pci_viddid & 0xffff0000) >> 16;
971         if (((pci_viddid & 0xffff) == PCI_VENDOR_ID_MOTOROLA)
972                         && ((pci_did == PCI_DEVICE_ID_MOTOROLA_RAVEN)
973                                 || (pci_did == PCI_DEVICE_ID_MOTOROLA_HAWK)))
974                 i8259_init(0, 0);
975         else
976                 /* PCI interrupt ack address given in section 6.1.8 of the
977                  * PReP specification. */
978                 i8259_init(MPC10X_MAPA_PCI_INTACK_ADDR, 0);
979 }
980
981 #if defined(CONFIG_BLK_DEV_IDE) || defined(CONFIG_BLK_DEV_IDE_MODULE)
982 /*
983  * IDE stuff.
984  */
985 static int
986 prep_ide_default_irq(unsigned long base)
987 {
988         switch (base) {
989                 case 0x1f0: return 13;
990                 case 0x170: return 13;
991                 case 0x1e8: return 11;
992                 case 0x168: return 10;
993                 case 0xfff0: return 14;         /* MCP(N)750 ide0 */
994                 case 0xffe0: return 15;         /* MCP(N)750 ide1 */
995                 default: return 0;
996         }
997 }
998
999 static unsigned long
1000 prep_ide_default_io_base(int index)
1001 {
1002         switch (index) {
1003                 case 0: return 0x1f0;
1004                 case 1: return 0x170;
1005                 case 2: return 0x1e8;
1006                 case 3: return 0x168;
1007                 default:
1008                         return 0;
1009         }
1010 }
1011 #endif
1012
1013 #ifdef CONFIG_SMP
1014 /* PReP (MTX) support */
1015 static int __init
1016 smp_prep_probe(void)
1017 {
1018         extern int mot_multi;
1019
1020         if (mot_multi) {
1021                 openpic_request_IPIs();
1022                 smp_hw_index[1] = 1;
1023                 return 2;
1024         }
1025
1026         return 1;
1027 }
1028
1029 static void __init
1030 smp_prep_kick_cpu(int nr)
1031 {
1032         *(unsigned long *)KERNELBASE = nr;
1033         asm volatile("dcbf 0,%0"::"r"(KERNELBASE):"memory");
1034         printk("CPU1 released, waiting\n");
1035 }
1036
1037 static void __init
1038 smp_prep_setup_cpu(int cpu_nr)
1039 {
1040         if (OpenPIC_Addr)
1041                 do_openpic_setup_cpu();
1042 }
1043
1044 static struct smp_ops_t prep_smp_ops = {
1045         smp_openpic_message_pass,
1046         smp_prep_probe,
1047         smp_prep_kick_cpu,
1048         smp_prep_setup_cpu,
1049         .give_timebase = smp_generic_give_timebase,
1050         .take_timebase = smp_generic_take_timebase,
1051 };
1052 #endif /* CONFIG_SMP */
1053
1054 /*
1055  * Setup the bat mappings we're going to load that cover
1056  * the io areas.  RAM was mapped by mapin_ram().
1057  * -- Cort
1058  */
1059 static void __init
1060 prep_map_io(void)
1061 {
1062         io_block_mapping(0x80000000, PREP_ISA_IO_BASE, 0x10000000, _PAGE_IO);
1063         io_block_mapping(0xf0000000, PREP_ISA_MEM_BASE, 0x08000000, _PAGE_IO);
1064 }
1065
1066 static int __init
1067 prep_request_io(void)
1068 {
1069 #ifdef CONFIG_NVRAM
1070         request_region(PREP_NVRAM_AS0, 0x8, "nvram");
1071 #endif
1072         request_region(0x00,0x20,"dma1");
1073         request_region(0x40,0x20,"timer");
1074         request_region(0x80,0x10,"dma page reg");
1075         request_region(0xc0,0x20,"dma2");
1076
1077         return 0;
1078 }
1079
1080 device_initcall(prep_request_io);
1081
1082 void __init
1083 prep_init(unsigned long r3, unsigned long r4, unsigned long r5,
1084                 unsigned long r6, unsigned long r7)
1085 {
1086 #ifdef CONFIG_PREP_RESIDUAL
1087         /* make a copy of residual data */
1088         if ( r3 ) {
1089                 memcpy((void *)res,(void *)(r3+KERNELBASE),
1090                          sizeof(RESIDUAL));
1091         }
1092 #endif
1093
1094         isa_io_base = PREP_ISA_IO_BASE;
1095         isa_mem_base = PREP_ISA_MEM_BASE;
1096         pci_dram_offset = PREP_PCI_DRAM_OFFSET;
1097         ISA_DMA_THRESHOLD = 0x00ffffff;
1098         DMA_MODE_READ = 0x44;
1099         DMA_MODE_WRITE = 0x48;
1100         ppc_do_canonicalize_irqs = 1;
1101
1102         /* figure out what kind of prep workstation we are */
1103         if (have_residual_data) {
1104                 if ( !strncmp(res->VitalProductData.PrintableModel,"IBM",3) )
1105                         _prep_type = _PREP_IBM;
1106                 else
1107                         _prep_type = _PREP_Motorola;
1108         }
1109         else {
1110                 /* assume motorola if no residual (netboot?) */
1111                 _prep_type = _PREP_Motorola;
1112         }
1113
1114 #ifdef CONFIG_PREP_RESIDUAL
1115         /* Switch off all residual data processing if the user requests it */
1116         if (strstr(cmd_line, "noresidual") != NULL)
1117                         res = NULL;
1118 #endif
1119
1120         /* Initialise progress early to get maximum benefit */
1121         prep_set_bat();
1122         ibm_statusled_init();
1123
1124         ppc_md.setup_arch     = prep_setup_arch;
1125         ppc_md.show_percpuinfo = prep_show_percpuinfo;
1126         ppc_md.show_cpuinfo   = NULL; /* set in prep_setup_arch() */
1127         ppc_md.init_IRQ       = prep_init_IRQ;
1128         /* this gets changed later on if we have an OpenPIC -- Cort */
1129         ppc_md.get_irq        = i8259_irq;
1130
1131         ppc_md.phys_mem_access_prot = pci_phys_mem_access_prot;
1132
1133         ppc_md.restart        = prep_restart;
1134         ppc_md.power_off      = NULL; /* set in prep_setup_arch() */
1135         ppc_md.halt           = prep_halt;
1136
1137         ppc_md.nvram_read_val = prep_nvram_read_val;
1138         ppc_md.nvram_write_val = prep_nvram_write_val;
1139
1140         ppc_md.time_init      = todc_time_init;
1141         if (_prep_type == _PREP_IBM) {
1142                 ppc_md.rtc_read_val = todc_mc146818_read_val;
1143                 ppc_md.rtc_write_val = todc_mc146818_write_val;
1144                 TODC_INIT(TODC_TYPE_MC146818, RTC_PORT(0), NULL, RTC_PORT(1),
1145                                 8);
1146         } else {
1147                 TODC_INIT(TODC_TYPE_MK48T59, PREP_NVRAM_AS0, PREP_NVRAM_AS1,
1148                                 PREP_NVRAM_DATA, 8);
1149         }
1150
1151         ppc_md.calibrate_decr = prep_calibrate_decr;
1152         ppc_md.set_rtc_time   = todc_set_rtc_time;
1153         ppc_md.get_rtc_time   = todc_get_rtc_time;
1154
1155         ppc_md.setup_io_mappings = prep_map_io;
1156
1157 #if defined(CONFIG_BLK_DEV_IDE) || defined(CONFIG_BLK_DEV_IDE_MODULE)
1158         ppc_ide_md.default_irq = prep_ide_default_irq;
1159         ppc_ide_md.default_io_base = prep_ide_default_io_base;
1160 #endif
1161
1162 #ifdef CONFIG_SMP
1163         smp_ops                  = &prep_smp_ops;
1164 #endif /* CONFIG_SMP */
1165 }