arch/ppc/platforms/prep_setup.c

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