v2.4.8 -> v2.4.8.1
[opensuse:kernel.git] / arch / ppc / kernel / pmac_setup.c
1 /*
2  * BK Id: SCCS/s.pmac_setup.c 1.24 07/06/01 14:49:51 trini
3  */
4 /*
5  *  linux/arch/ppc/kernel/setup.c
6  *
7  *  PowerPC version 
8  *    Copyright (C) 1995-1996 Gary Thomas (gdt@linuxppc.org)
9  *
10  *  Adapted for Power Macintosh by Paul Mackerras
11  *    Copyright (C) 1996 Paul Mackerras (paulus@cs.anu.edu.au)
12  *
13  *  Derived from "arch/alpha/kernel/setup.c"
14  *    Copyright (C) 1995 Linus Torvalds
15  *
16  *  This program is free software; you can redistribute it and/or
17  *  modify it under the terms of the GNU General Public License
18  *  as published by the Free Software Foundation; either version
19  *  2 of the License, or (at your option) any later version.
20  *
21  */
22
23 /*
24  * bootup setup stuff..
25  */
26
27 #include <linux/config.h>
28 #include <linux/init.h>
29 #include <linux/errno.h>
30 #include <linux/sched.h>
31 #include <linux/kernel.h>
32 #include <linux/mm.h>
33 #include <linux/stddef.h>
34 #include <linux/unistd.h>
35 #include <linux/ptrace.h>
36 #include <linux/slab.h>
37 #include <linux/user.h>
38 #include <linux/a.out.h>
39 #include <linux/tty.h>
40 #include <linux/string.h>
41 #include <linux/delay.h>
42 #include <linux/ioport.h>
43 #include <linux/major.h>
44 #include <linux/blk.h>
45 #include <linux/vt_kern.h>
46 #include <linux/console.h>
47 #include <linux/ide.h>
48 #include <linux/pci.h>
49 #include <linux/adb.h>
50 #include <linux/cuda.h>
51 #include <linux/pmu.h>
52
53 #include <asm/processor.h>
54 #include <asm/init.h>
55 #include <asm/prom.h>
56 #include <asm/system.h>
57 #include <asm/pgtable.h>
58 #include <asm/bitops.h>
59 #include <asm/io.h>
60 #include <asm/pci-bridge.h>
61 #include <asm/ohare.h>
62 #include <asm/mediabay.h>
63 #include <asm/feature.h>
64 #include <asm/machdep.h>
65 #include <asm/keyboard.h>
66 #include <asm/dma.h>
67 #include <asm/bootx.h>
68
69 #include <asm/time.h>
70 #include "local_irq.h"
71 #include "pmac_pic.h"
72 #include "../mm/mem_pieces.h"
73
74 #undef SHOW_GATWICK_IRQS
75
76 extern long pmac_time_init(void);
77 extern unsigned long pmac_get_rtc_time(void);
78 extern int pmac_set_rtc_time(unsigned long nowtime);
79 extern void pmac_read_rtc_time(void);
80 extern void pmac_calibrate_decr(void);
81 extern void pmac_pcibios_fixup(void);
82 extern void pmac_find_bridges(void);
83
84 extern int mackbd_setkeycode(unsigned int scancode, unsigned int keycode);
85 extern int mackbd_getkeycode(unsigned int scancode);
86 extern int mackbd_translate(unsigned char keycode, unsigned char *keycodep,
87                      char raw_mode);
88 extern char mackbd_unexpected_up(unsigned char keycode);
89 extern void mackbd_leds(unsigned char leds);
90 extern void __init mackbd_init_hw(void);
91 extern int mac_hid_kbd_translate(unsigned char scancode, unsigned char *keycode,
92                                  char raw_mode);
93 extern char mac_hid_kbd_unexpected_up(unsigned char keycode);
94 extern void mac_hid_init_hw(void);
95 #ifdef CONFIG_MAGIC_SYSRQ
96 extern unsigned char mac_hid_kbd_sysrq_xlate[128];
97 extern unsigned char pckbd_sysrq_xlate[128];
98 extern unsigned char mackbd_sysrq_xlate[128];
99 #endif /* CONFIG_MAGIC_SYSRQ */
100 extern int pckbd_setkeycode(unsigned int scancode, unsigned int keycode);
101 extern int pckbd_getkeycode(unsigned int scancode);
102 extern int pckbd_translate(unsigned char scancode, unsigned char *keycode,
103                            char raw_mode);
104 extern char pckbd_unexpected_up(unsigned char keycode);
105 extern int keyboard_sends_linux_keycodes;
106 extern void pmac_nvram_update(void);
107
108 extern int pmac_pci_enable_device_hook(struct pci_dev *dev, int initial);
109 extern void pmac_pcibios_after_init(void);
110
111 struct device_node *memory_node;
112
113 unsigned char drive_info;
114
115 int ppc_override_l2cr = 0;
116 int ppc_override_l2cr_value;
117 int has_l2cache = 0;
118
119 static int current_root_goodness = -1;
120
121 extern char saved_command_line[];
122
123 extern int pmac_newworld;
124
125 #define DEFAULT_ROOT_DEVICE 0x0801      /* sda1 - slightly silly choice */
126
127 extern void zs_kgdb_hook(int tty_num);
128 static void ohare_init(void);
129 #ifdef CONFIG_BOOTX_TEXT
130 void pmac_progress(char *s, unsigned short hex);
131 #endif
132
133 sys_ctrler_t sys_ctrler = SYS_CTRLER_UNKNOWN;
134
135 #ifdef CONFIG_SMP
136 volatile static long int core99_l2_cache;
137 void __pmac
138 core99_init_l2(void)
139 {
140         int cpu = smp_processor_id();
141
142         if ( (_get_PVR() >> 16) != 8 && (_get_PVR() >> 16) != 12 )
143                 return;
144
145         if (cpu == 0){
146                 core99_l2_cache = _get_L2CR();
147                 printk("CPU0: L2CR is %lx\n", core99_l2_cache);
148         } else {
149                 printk("CPU%d: L2CR was %lx\n", cpu, _get_L2CR());
150                 _set_L2CR(0);
151                 _set_L2CR(core99_l2_cache);
152                 printk("CPU%d: L2CR set to %lx\n", cpu, core99_l2_cache);
153         }
154 }
155 #endif /* CONFIG_SMP */
156
157 int __pmac
158 pmac_get_cpuinfo(char *buffer)
159 {
160         int len;
161         struct device_node *np;
162         char *pp;
163         int plen;
164
165         /* find motherboard type */
166         len = sprintf(buffer, "machine\t\t: ");
167         np = find_devices("device-tree");
168         if (np != NULL) {
169                 pp = (char *) get_property(np, "model", NULL);
170                 if (pp != NULL)
171                         len += sprintf(buffer+len, "%s\n", pp);
172                 else
173                         len += sprintf(buffer+len, "PowerMac\n");
174                 pp = (char *) get_property(np, "compatible", &plen);
175                 if (pp != NULL) {
176                         len += sprintf(buffer+len, "motherboard\t:");
177                         while (plen > 0) {
178                                 int l = strlen(pp) + 1;
179                                 len += sprintf(buffer+len, " %s", pp);
180                                 plen -= l;
181                                 pp += l;
182                         }
183                         buffer[len++] = '\n';
184                 }
185         } else
186                 len += sprintf(buffer+len, "PowerMac\n");
187
188         /* find l2 cache info */
189         np = find_devices("l2-cache");
190         if (np == 0)
191                 np = find_type_devices("cache");
192         if (np != 0) {
193                 unsigned int *ic = (unsigned int *)
194                         get_property(np, "i-cache-size", NULL);
195                 unsigned int *dc = (unsigned int *)
196                         get_property(np, "d-cache-size", NULL);
197                 len += sprintf(buffer+len, "L2 cache\t:");
198                 has_l2cache = 1;
199                 if (get_property(np, "cache-unified", NULL) != 0 && dc) {
200                         len += sprintf(buffer+len, " %dK unified", *dc / 1024);
201                 } else {
202                         if (ic)
203                                 len += sprintf(buffer+len, " %dK instruction",
204                                                *ic / 1024);
205                         if (dc)
206                                 len += sprintf(buffer+len, "%s %dK data",
207                                                (ic? " +": ""), *dc / 1024);
208                 }
209                 pp = get_property(np, "ram-type", NULL);
210                 if (pp)
211                         len += sprintf(buffer+len, " %s", pp);
212                 buffer[len++] = '\n';
213         }
214
215         /* find ram info */
216         np = find_devices("memory");
217         if (np != 0) {
218                 int n;
219                 struct reg_property *reg = (struct reg_property *)
220                         get_property(np, "reg", &n);
221                 
222                 if (reg != 0) {
223                         unsigned long total = 0;
224
225                         for (n /= sizeof(struct reg_property); n > 0; --n)
226                                 total += (reg++)->size;
227                         len += sprintf(buffer+len, "memory\t\t: %luMB\n",
228                                        total >> 20);
229                 }
230         }
231
232         /* Checks "l2cr-value" property in the registry */
233         np = find_devices("cpus");              
234         if (np == 0)
235                 np = find_type_devices("cpu");          
236         if (np != 0) {
237                 unsigned int *l2cr = (unsigned int *)
238                         get_property(np, "l2cr-value", NULL);
239                 if (l2cr != 0) {
240                         len += sprintf(buffer+len, "l2cr override\t: 0x%x\n", *l2cr);
241                 }
242         }
243         
244         /* Indicate newworld/oldworld */
245         len += sprintf(buffer+len, "pmac-generation\t: %s\n",
246                 pmac_newworld ? "NewWorld" : "OldWorld");               
247         
248
249         return len;
250 }
251
252 #ifdef CONFIG_SCSI
253 /* Find the device number for the disk (if any) at target tgt
254    on host adaptor host.  We just need to get the prototype from
255    sd.h */
256 #include <linux/blkdev.h>
257 #include "../../../drivers/scsi/scsi.h"
258 #include "../../../drivers/scsi/sd.h"
259
260 #endif
261
262 #ifdef CONFIG_VT
263 /*
264  * Dummy mksound function that does nothing.
265  * The real one is in the dmasound driver.
266  */
267 static void __pmac
268 pmac_mksound(unsigned int hz, unsigned int ticks)
269 {
270 }
271 #endif /* CONFIG_VT */
272
273 static volatile u32 *sysctrl_regs;
274
275 void __init
276 pmac_setup_arch(void)
277 {
278         struct device_node *cpu;
279         int *fp;
280
281         /* Set loops_per_jiffy to a half-way reasonable value,
282            for use until calibrate_delay gets called. */
283         cpu = find_type_devices("cpu");
284         if (cpu != 0) {
285                 fp = (int *) get_property(cpu, "clock-frequency", NULL);
286                 if (fp != 0) {
287                         switch (_get_PVR() >> 16) {
288                         case 4:         /* 604 */
289                         case 8:         /* G3 */
290                         case 9:         /* 604e */
291                         case 10:        /* mach V (604ev5) */
292                         case 12:        /* G4 */
293                         case 20:        /* 620 */
294                                 loops_per_jiffy = *fp / HZ;
295                                 break;
296                         default:        /* 601, 603, etc. */
297                                 loops_per_jiffy = *fp / (2*HZ);
298                         }
299                 } else
300                         loops_per_jiffy = 50000000 / HZ;
301         }
302
303         /* this area has the CPU identification register
304            and some registers used by smp boards */
305         sysctrl_regs = (volatile u32 *) ioremap(0xf8000000, 0x1000);
306         __ioremap(0xffc00000, 0x400000, pgprot_val(PAGE_READONLY));
307         ohare_init();
308
309         /* Lookup PCI hosts */
310         pmac_find_bridges();
311         
312         /* Checks "l2cr-value" property in the registry */
313         if ( (_get_PVR() >> 16) == 8 || (_get_PVR() >> 16) == 12 ) {
314                 struct device_node *np = find_devices("cpus");          
315                 if (np == 0)
316                         np = find_type_devices("cpu");          
317                 if (np != 0) {
318                         unsigned int *l2cr = (unsigned int *)
319                                 get_property(np, "l2cr-value", NULL);
320                         if (l2cr != 0) {
321                                 ppc_override_l2cr = 1;
322                                 ppc_override_l2cr_value = *l2cr;
323                                 _set_L2CR(0);
324                                 _set_L2CR(ppc_override_l2cr_value);
325                         }
326                 }
327         }
328
329         if (ppc_override_l2cr)
330                 printk(KERN_INFO "L2CR overriden (0x%x), backside cache is %s\n",
331                         ppc_override_l2cr_value, (ppc_override_l2cr_value & 0x80000000)
332                                 ? "enabled" : "disabled");
333
334 #ifdef CONFIG_SMP
335         /* somewhat of a hack */
336         core99_init_l2();
337 #endif
338         
339 #ifdef CONFIG_KGDB
340         zs_kgdb_hook(0);
341 #endif
342
343 #ifdef CONFIG_ADB_CUDA
344         find_via_cuda();
345 #endif  
346 #ifdef CONFIG_ADB_PMU
347         find_via_pmu();
348 #endif  
349 #ifdef CONFIG_NVRAM
350         pmac_nvram_init();
351 #endif
352 #ifdef CONFIG_DUMMY_CONSOLE
353         conswitchp = &dummy_con;
354 #endif
355 #ifdef CONFIG_VT
356         kd_mksound = pmac_mksound;
357 #endif
358 #ifdef CONFIG_BLK_DEV_INITRD
359         if (initrd_start)
360                 ROOT_DEV = MKDEV(RAMDISK_MAJOR, 0);
361         else
362 #endif
363                 ROOT_DEV = to_kdev_t(DEFAULT_ROOT_DEVICE);
364 }
365
366 static void __init ohare_init(void)
367 {
368         /*
369          * Turn on the L2 cache.
370          * We assume that we have a PSX memory controller iff
371          * we have an ohare I/O controller.
372          */
373         if (find_devices("ohare") != NULL) {
374                 if (((sysctrl_regs[2] >> 24) & 0xf) >= 3) {
375                         if (sysctrl_regs[4] & 0x10)
376                                 sysctrl_regs[4] |= 0x04000020;
377                         else
378                                 sysctrl_regs[4] |= 0x04000000;
379                         if(has_l2cache)
380                                 printk(KERN_INFO "Level 2 cache enabled\n");
381                 }
382         }
383 }
384
385 extern char *bootpath;
386 extern char *bootdevice;
387 void *boot_host;
388 int boot_target;
389 int boot_part;
390 extern kdev_t boot_dev;
391
392 void __init
393 pmac_init2(void)
394 {
395 #ifdef CONFIG_ADB_PMU
396         via_pmu_start();
397 #endif
398 #ifdef CONFIG_ADB_CUDA
399         via_cuda_start();
400 #endif
401 #ifdef CONFIG_PMAC_PBOOK
402         media_bay_init();
403 #endif  
404 }
405
406 #ifdef CONFIG_SCSI
407 void __init
408 note_scsi_host(struct device_node *node, void *host)
409 {
410         int l;
411         char *p;
412
413         l = strlen(node->full_name);
414         if (bootpath != NULL && bootdevice != NULL
415             && strncmp(node->full_name, bootdevice, l) == 0
416             && (bootdevice[l] == '/' || bootdevice[l] == 0)) {
417                 boot_host = host;
418                 /*
419                  * There's a bug in OF 1.0.5.  (Why am I not surprised.)
420                  * If you pass a path like scsi/sd@1:0 to canon, it returns
421                  * something like /bandit@F2000000/gc@10/53c94@10000/sd@0,0
422                  * That is, the scsi target number doesn't get preserved.
423                  * So we pick the target number out of bootpath and use that.
424                  */
425                 p = strstr(bootpath, "/sd@");
426                 if (p != NULL) {
427                         p += 4;
428                         boot_target = simple_strtoul(p, NULL, 10);
429                         p = strchr(p, ':');
430                         if (p != NULL)
431                                 boot_part = simple_strtoul(p + 1, NULL, 10);
432                 }
433         }
434 }
435 #endif
436
437 #if defined(CONFIG_BLK_DEV_IDE) && defined(CONFIG_BLK_DEV_IDE_PMAC)
438 kdev_t __init
439 find_ide_boot(void)
440 {
441         char *p;
442         int n;
443         kdev_t __init pmac_find_ide_boot(char *bootdevice, int n);
444
445         if (bootdevice == NULL)
446                 return 0;
447         p = strrchr(bootdevice, '/');
448         if (p == NULL)
449                 return 0;
450         n = p - bootdevice;
451
452         return pmac_find_ide_boot(bootdevice, n);
453 }
454 #endif /* CONFIG_BLK_DEV_IDE && CONFIG_BLK_DEV_IDE_PMAC */
455
456 void __init
457 find_boot_device(void)
458 {
459 #if defined(CONFIG_SCSI) && defined(CONFIG_BLK_DEV_SD)
460         if (boot_host != NULL) {
461                 boot_dev = sd_find_target(boot_host, boot_target);
462                 if (boot_dev != 0)
463                         return;
464         }
465 #endif
466 #if defined(CONFIG_BLK_DEV_IDE) && defined(CONFIG_BLK_DEV_IDE_PMAC)
467         boot_dev = find_ide_boot();
468 #endif
469 }
470
471 /* can't be __init - can be called whenever a disk is first accessed */
472 void __pmac
473 note_bootable_part(kdev_t dev, int part, int goodness)
474 {
475         static int found_boot = 0;
476         char *p;
477
478         /* Do nothing if the root has been set already. */
479         if ((goodness <= current_root_goodness) &&
480                 (ROOT_DEV != to_kdev_t(DEFAULT_ROOT_DEVICE)))
481                 return;
482         p = strstr(saved_command_line, "root=");
483         if (p != NULL && (p == saved_command_line || p[-1] == ' '))
484                 return;
485
486         if (!found_boot) {
487                 find_boot_device();
488                 found_boot = 1;
489         }
490         if (boot_dev == 0 || dev == boot_dev) {
491                 ROOT_DEV = MKDEV(MAJOR(dev), MINOR(dev) + part);
492                 boot_dev = NODEV;
493                 current_root_goodness = goodness;
494         }
495 }
496
497 void __pmac
498 pmac_restart(char *cmd)
499 {
500 #ifdef CONFIG_ADB_CUDA
501         struct adb_request req;
502 #endif /* CONFIG_ADB_CUDA */
503
504 #ifdef CONFIG_NVRAM
505         pmac_nvram_update();
506 #endif
507         
508         switch (sys_ctrler) {
509 #ifdef CONFIG_ADB_CUDA
510         case SYS_CTRLER_CUDA:
511                 cuda_request(&req, NULL, 2, CUDA_PACKET,
512                              CUDA_RESET_SYSTEM);
513                 for (;;)
514                         cuda_poll();
515                 break;
516 #endif /* CONFIG_ADB_CUDA */
517 #ifdef CONFIG_ADB_PMU           
518         case SYS_CTRLER_PMU:
519                 pmu_restart();
520                 break;
521 #endif /* CONFIG_ADB_PMU */             
522         default: ;
523         }
524 }
525
526 void __pmac
527 pmac_power_off(void)
528 {
529 #ifdef CONFIG_ADB_CUDA
530         struct adb_request req;
531 #endif /* CONFIG_ADB_CUDA */
532
533 #ifdef CONFIG_NVRAM
534         pmac_nvram_update();
535 #endif
536         
537         switch (sys_ctrler) {
538 #ifdef CONFIG_ADB_CUDA
539         case SYS_CTRLER_CUDA:
540                 cuda_request(&req, NULL, 2, CUDA_PACKET,
541                              CUDA_POWERDOWN);
542                 for (;;)
543                         cuda_poll();
544                 break;
545 #endif /* CONFIG_ADB_CUDA */
546 #ifdef CONFIG_ADB_PMU
547         case SYS_CTRLER_PMU:
548                 pmu_shutdown();
549                 break;
550 #endif /* CONFIG_ADB_PMU */
551         default: ;
552         }
553 }
554
555 void __pmac
556 pmac_halt(void)
557 {
558    pmac_power_off();
559 }
560
561
562 #if defined(CONFIG_BLK_DEV_IDE) || defined(CONFIG_BLK_DEV_IDE_MODULE)
563 /*
564  * IDE stuff.
565  */
566 void __pmac
567 pmac_ide_insw(ide_ioreg_t port, void *buf, int ns)
568 {
569         _insw_ns((unsigned short *)(port+_IO_BASE), buf, ns);
570 }
571
572 void __pmac
573 pmac_ide_outsw(ide_ioreg_t port, void *buf, int ns)
574 {
575         _outsw_ns((unsigned short *)(port+_IO_BASE), buf, ns);
576 }
577
578 int __pmac
579 pmac_ide_default_irq(ide_ioreg_t base)
580 {
581 #if defined(CONFIG_BLK_DEV_IDE) && defined(CONFIG_BLK_DEV_IDE_PMAC)
582         extern int pmac_ide_get_irq(ide_ioreg_t base);
583         return pmac_ide_get_irq(base);
584 #else
585         return 0;
586 #endif
587 }
588
589 ide_ioreg_t __pmac
590 pmac_ide_default_io_base(int index)
591 {
592 #if defined(CONFIG_BLK_DEV_IDE) && defined(CONFIG_BLK_DEV_IDE_PMAC)
593         extern ide_ioreg_t pmac_ide_get_base(int index);
594         return pmac_ide_get_base(index);
595 #else
596         return 0;
597 #endif
598 }
599
600 int __pmac
601 pmac_ide_check_region(ide_ioreg_t from, unsigned int extent)
602 {
603         /*
604          * We only do the check_region if `from' looks like a genuine
605          * I/O port number.  If it actually refers to a memory-mapped
606          * register, it should be OK.
607          */
608         if (from < ~_IO_BASE)
609                 return 0;
610         return check_region(from, extent);
611 }
612
613 void __pmac
614 pmac_ide_request_region(ide_ioreg_t from,
615                         unsigned int extent,
616                         const char *name)
617 {
618         if (from < ~_IO_BASE)
619                 request_region(from, extent, name);
620 }
621
622 void __pmac
623 pmac_ide_release_region(ide_ioreg_t from,
624                         unsigned int extent)
625 {
626         if (from < ~_IO_BASE)
627                 release_region(from, extent);
628 }
629
630 #if defined(CONFIG_BLK_DEV_IDE) && defined(CONFIG_BLK_DEV_IDE_PMAC)
631 /* This is declared in drivers/block/ide-pmac.c */
632 void __pmac
633 pmac_ide_init_hwif_ports (hw_regs_t *hw, ide_ioreg_t data_port, ide_ioreg_t ctrl_port, int *irq);
634 #else
635 /*
636  * This registers the standard ports for this architecture with the IDE
637  * driver.
638  */
639 void __pmac
640 pmac_ide_init_hwif_ports(hw_regs_t *hw, ide_ioreg_t data_port, ide_ioreg_t ctrl_port, int *irq)
641 {
642 }
643 #endif
644 #endif
645
646 /*
647  * Read in a property describing some pieces of memory.
648  */
649
650 static void __init
651 get_mem_prop(char *name, struct mem_pieces *mp)
652 {
653         struct reg_property *rp;
654         int i, s;
655         unsigned int *ip;
656         int nac = prom_n_addr_cells(memory_node);
657         int nsc = prom_n_size_cells(memory_node);
658
659         ip = (unsigned int *) get_property(memory_node, name, &s);
660         if (ip == NULL) {
661                 printk(KERN_ERR "error: couldn't get %s property on /memory\n",
662                        name);
663                 abort();
664         }
665         s /= (nsc + nac) * 4;
666         rp = mp->regions;
667         for (i = 0; i < s; ++i, ip += nac+nsc) {
668                 if (nac >= 2 && ip[nac-2] != 0)
669                         continue;
670                 rp->address = ip[nac-1];
671                 if (nsc >= 2 && ip[nac+nsc-2] != 0)
672                         rp->size = ~0U;
673                 else
674                         rp->size = ip[nac+nsc-1];
675                 ++rp;
676         }
677         mp->n_regions = rp - mp->regions;
678
679         /* Make sure the pieces are sorted. */
680         mem_pieces_sort(mp);
681         mem_pieces_coalesce(mp);
682 }
683
684 /*
685  * On systems with Open Firmware, collect information about
686  * physical RAM and which pieces are already in use.
687  * At this point, we have (at least) the first 8MB mapped with a BAT.
688  * Our text, data, bss use something over 1MB, starting at 0.
689  * Open Firmware may be using 1MB at the 4MB point.
690  */
691 unsigned long __init
692 pmac_find_end_of_memory(void)
693 {
694         unsigned long a, total;
695         struct mem_pieces phys_mem;
696
697         memory_node = find_devices("memory");
698         if (memory_node == NULL) {
699                 printk(KERN_ERR "can't find memory node\n");
700                 abort();
701         }
702
703         /*
704          * Find out where physical memory is, and check that it
705          * starts at 0 and is contiguous.  It seems that RAM is
706          * always physically contiguous on Power Macintoshes.
707          *
708          * Supporting discontiguous physical memory isn't hard,
709          * it just makes the virtual <-> physical mapping functions
710          * more complicated (or else you end up wasting space
711          * in mem_map).
712          */
713         get_mem_prop("reg", &phys_mem);
714         if (phys_mem.n_regions == 0)
715                 panic("No RAM??");
716         a = phys_mem.regions[0].address;
717         if (a != 0)
718                 panic("RAM doesn't start at physical address 0");
719         total = phys_mem.regions[0].size;
720
721         if (phys_mem.n_regions > 1) {
722                 printk("RAM starting at 0x%x is not contiguous\n",
723                        phys_mem.regions[1].address);
724                 printk("Using RAM from 0 to 0x%lx\n", total-1);
725         }
726
727         return total;
728 }
729
730 void __init
731 pmac_init(unsigned long r3, unsigned long r4, unsigned long r5,
732           unsigned long r6, unsigned long r7)
733 {
734         /* isa_io_base gets set in pmac_find_bridges */
735         isa_mem_base = PMAC_ISA_MEM_BASE;
736         pci_dram_offset = PMAC_PCI_DRAM_OFFSET;
737         ISA_DMA_THRESHOLD = ~0L;
738         DMA_MODE_READ = 1;
739         DMA_MODE_WRITE = 2;
740
741         ppc_md.setup_arch     = pmac_setup_arch;
742         ppc_md.setup_residual = NULL;
743         ppc_md.get_cpuinfo    = pmac_get_cpuinfo;
744         ppc_md.irq_cannonicalize = NULL;
745         ppc_md.init_IRQ       = pmac_pic_init;
746         ppc_md.get_irq        = pmac_get_irq; /* Changed later on ... */
747         ppc_md.init           = pmac_init2;
748         
749         ppc_md.pcibios_fixup  = pmac_pcibios_fixup;
750         ppc_md.pcibios_enable_device_hook = pmac_pci_enable_device_hook;
751         ppc_md.pcibios_after_init = pmac_pcibios_after_init;
752
753         ppc_md.restart        = pmac_restart;
754         ppc_md.power_off      = pmac_power_off;
755         ppc_md.halt           = pmac_halt;
756
757         ppc_md.time_init      = pmac_time_init;
758         ppc_md.set_rtc_time   = pmac_set_rtc_time;
759         ppc_md.get_rtc_time   = pmac_get_rtc_time;
760         ppc_md.calibrate_decr = pmac_calibrate_decr;
761
762         ppc_md.find_end_of_memory = pmac_find_end_of_memory;
763
764 #ifdef CONFIG_VT
765 #ifdef CONFIG_INPUT
766         ppc_md.kbd_init_hw       = mac_hid_init_hw;
767         ppc_md.kbd_translate     = mac_hid_kbd_translate;
768         ppc_md.kbd_unexpected_up = mac_hid_kbd_unexpected_up;
769         ppc_md.kbd_setkeycode    = 0;
770         ppc_md.kbd_getkeycode    = 0;
771 #ifdef CONFIG_MAGIC_SYSRQ
772 #ifdef CONFIG_MAC_ADBKEYCODES
773         if (!keyboard_sends_linux_keycodes) {
774                 ppc_md.ppc_kbd_sysrq_xlate = mac_hid_kbd_sysrq_xlate;
775                 SYSRQ_KEY = 0x69;
776         } else
777 #endif /* CONFIG_MAC_ADBKEYCODES */
778         {
779                 ppc_md.ppc_kbd_sysrq_xlate = pckbd_sysrq_xlate;
780                 SYSRQ_KEY = 0x54;
781         }
782 #endif /* CONFIG_MAGIC_SYSRQ */
783 #elif defined(CONFIG_ADB_KEYBOARD)
784         ppc_md.kbd_setkeycode       = mackbd_setkeycode;
785         ppc_md.kbd_getkeycode       = mackbd_getkeycode;
786         ppc_md.kbd_translate        = mackbd_translate;
787         ppc_md.kbd_unexpected_up    = mackbd_unexpected_up;
788         ppc_md.kbd_leds             = mackbd_leds;
789         ppc_md.kbd_init_hw          = mackbd_init_hw;
790 #ifdef CONFIG_MAGIC_SYSRQ
791         ppc_md.ppc_kbd_sysrq_xlate  = mackbd_sysrq_xlate;
792         SYSRQ_KEY = 0x69;
793 #endif /* CONFIG_MAGIC_SYSRQ */
794 #endif /* CONFIG_INPUT_ADBHID/CONFIG_ADB_KEYBOARD */
795 #endif /* CONFIG_VT */
796
797 #if defined(CONFIG_BLK_DEV_IDE) && defined(CONFIG_BLK_DEV_IDE_PMAC)
798         ppc_ide_md.insw                 = pmac_ide_insw;
799         ppc_ide_md.outsw                = pmac_ide_outsw;
800         ppc_ide_md.default_irq          = pmac_ide_default_irq;
801         ppc_ide_md.default_io_base      = pmac_ide_default_io_base;
802         ppc_ide_md.ide_check_region     = pmac_ide_check_region;
803         ppc_ide_md.ide_request_region   = pmac_ide_request_region;
804         ppc_ide_md.ide_release_region   = pmac_ide_release_region;
805         ppc_ide_md.fix_driveid          = ppc_generic_ide_fix_driveid;
806         ppc_ide_md.ide_init_hwif        = pmac_ide_init_hwif_ports;
807 #endif /* CONFIG_BLK_DEV_IDE && CONFIG_BLK_DEV_IDE_PMAC */
808 #ifdef CONFIG_BOOTX_TEXT
809         ppc_md.progress = pmac_progress;
810 #endif /* CONFIG_BOOTX_TEXT */
811         if (ppc_md.progress) ppc_md.progress("pmac_init(): exit", 0);
812         
813 }
814
815 #ifdef CONFIG_BOOTX_TEXT
816 extern void drawchar(char c);
817 extern void drawstring(const char *c);
818 extern boot_infos_t *disp_bi;
819 void __init
820 pmac_progress(char *s, unsigned short hex)
821 {
822         if (disp_bi == 0)
823                 return;
824         prom_drawstring(s);
825         prom_drawchar('\n');
826 }
827 #endif /* CONFIG_BOOTX_TEXT */