arch/ppc/platforms/pmac_feature.c

   1 /*
   2  *  arch/ppc/platforms/pmac_feature.c
   3  *
   4  *  Copyright (C) 1996-2001 Paul Mackerras (paulus@cs.anu.edu.au)
   5  *                          Ben. Herrenschmidt (benh@kernel.crashing.org)
   6  *
   7  *  This program is free software; you can redistribute it and/or
   8  *  modify it under the terms of the GNU General Public License
   9  *  as published by the Free Software Foundation; either version
  10  *  2 of the License, or (at your option) any later version.
  11  *
  12  *  TODO:
  13  *
  14  *   - Replace mdelay with some schedule loop if possible
  15  *   - Shorten some obfuscated delays on some routines (like modem
  16  *     power)
  17  *   - Refcount some clocks (see darwin)
  18  *   - Split split split...
  19  *
  20  */
  21 #include <linux/config.h>
  22 #include <linux/types.h>
  23 #include <linux/init.h>
  24 #include <linux/delay.h>
  25 #include <linux/kernel.h>
  26 #include <linux/sched.h>
  27 #include <linux/spinlock.h>
  28 #include <linux/adb.h>
  29 #include <linux/pmu.h>
  30 #include <linux/ioport.h>
  31 #include <linux/pci.h>
  32 #include <asm/sections.h>
  33 #include <asm/errno.h>
  34 #include <asm/ohare.h>
  35 #include <asm/heathrow.h>
  36 #include <asm/keylargo.h>
  37 #include <asm/uninorth.h>
  38 #include <asm/io.h>
  39 #include <asm/prom.h>
  40 #include <asm/machdep.h>
  41 #include <asm/pmac_feature.h>
  42 #include <asm/dbdma.h>
  43 #include <asm/pci-bridge.h>
  44 #include <asm/pmac_low_i2c.h>
  45
  46 #undef DEBUG_FEATURE
  47
  48 #ifdef DEBUG_FEATURE
  49 #define DBG(fmt,...) printk(KERN_DEBUG fmt)
  50 #else
  51 #define DBG(fmt,...)
  52 #endif
  53
  54 #ifdef CONFIG_6xx
  55 extern int powersave_lowspeed;
  56 #endif
  57
  58 extern int powersave_nap;
  59 extern struct device_node *k2_skiplist[2];
  60
  61
  62 /*
  63  * We use a single global lock to protect accesses. Each driver has
  64  * to take care of its own locking
  65  */
  66 static DEFINE_SPINLOCK(feature_lock  __pmacdata);
  67
  68 #define LOCK(flags)     spin_lock_irqsave(&feature_lock, flags);
  69 #define UNLOCK(flags)   spin_unlock_irqrestore(&feature_lock, flags);
  70
  71
  72 /*
  73  * Instance of some macio stuffs
  74  */
  75 struct macio_chip macio_chips[MAX_MACIO_CHIPS]  __pmacdata;
  76
  77 struct macio_chip* __pmac
  78 macio_find(struct device_node* child, int type)
  79 {
  80         while(child) {
  81                 int     i;
  82
  83                 for (i=0; i < MAX_MACIO_CHIPS && macio_chips[i].of_node; i++)
  84                         if (child == macio_chips[i].of_node &&
  85                             (!type || macio_chips[i].type == type))
  86                                 return &macio_chips[i];
  87                 child = child->parent;
  88         }
  89         return NULL;
  90 }
  91
  92 static const char* macio_names[] __pmacdata =
  93 {
  94         "Unknown",
  95         "Grand Central",
  96         "OHare",
  97         "OHareII",
  98         "Heathrow",
  99         "Gatwick",
 100         "Paddington",
 101         "Keylargo",
 102         "Pangea",
 103         "Intrepid",
 104         "K2"
 105 };
 106
 107
 108
 109 /*
 110  * Uninorth reg. access. Note that Uni-N regs are big endian
 111  */
 112
 113 #define UN_REG(r)       (uninorth_base + ((r) >> 2))
 114 #define UN_IN(r)        (in_be32(UN_REG(r)))
 115 #define UN_OUT(r,v)     (out_be32(UN_REG(r), (v)))
 116 #define UN_BIS(r,v)     (UN_OUT((r), UN_IN(r) | (v)))
 117 #define UN_BIC(r,v)     (UN_OUT((r), UN_IN(r) & ~(v)))
 118
 119 static struct device_node* uninorth_node __pmacdata;
 120 static u32 __iomem * uninorth_base __pmacdata;
 121 static u32 uninorth_rev __pmacdata;
 122 static int uninorth_u3 __pmacdata;
 123 static void __iomem *u3_ht;
 124
 125 /*
 126  * For each motherboard family, we have a table of functions pointers
 127  * that handle the various features.
 128  */
 129
 130 typedef long (*feature_call)(struct device_node* node, long param, long value);
 131
 132 struct feature_table_entry {
 133         unsigned int    selector;
 134         feature_call    function;
 135 };
 136
 137 struct pmac_mb_def
 138 {
 139         const char*                     model_string;
 140         const char*                     model_name;
 141         int                             model_id;
 142         struct feature_table_entry*     features;
 143         unsigned long                   board_flags;
 144 };
 145 static struct pmac_mb_def pmac_mb __pmacdata;
 146
 147 /*
 148  * Here are the chip specific feature functions
 149  */
 150
 151 static inline int __pmac
 152 simple_feature_tweak(struct device_node* node, int type, int reg, u32 mask, int value)
 153 {
 154         struct macio_chip*      macio;
 155         unsigned long           flags;
 156
 157         macio = macio_find(node, type);
 158         if (!macio)
 159                 return -ENODEV;
 160         LOCK(flags);
 161         if (value)
 162                 MACIO_BIS(reg, mask);
 163         else
 164                 MACIO_BIC(reg, mask);
 165         (void)MACIO_IN32(reg);
 166         UNLOCK(flags);
 167
 168         return 0;
 169 }
 170
 171 #ifndef CONFIG_POWER4
 172
 173 static long __pmac
 174 ohare_htw_scc_enable(struct device_node* node, long param, long value)
 175 {
 176         struct macio_chip*      macio;
 177         unsigned long           chan_mask;
 178         unsigned long           fcr;
 179         unsigned long           flags;
 180         int                     htw, trans;
 181         unsigned long           rmask;
 182
 183         macio = macio_find(node, 0);
 184         if (!macio)
 185                 return -ENODEV;
 186         if (!strcmp(node->name, "ch-a"))
 187                 chan_mask = MACIO_FLAG_SCCA_ON;
 188         else if (!strcmp(node->name, "ch-b"))
 189                 chan_mask = MACIO_FLAG_SCCB_ON;
 190         else
 191                 return -ENODEV;
 192
 193         htw = (macio->type == macio_heathrow || macio->type == macio_paddington
 194                 || macio->type == macio_gatwick);
 195         /* On these machines, the HRW_SCC_TRANS_EN_N bit mustn't be touched */
 196         trans = (pmac_mb.model_id != PMAC_TYPE_YOSEMITE &&
 197                  pmac_mb.model_id != PMAC_TYPE_YIKES);
 198         if (value) {
 199 #ifdef CONFIG_ADB_PMU
 200                 if ((param & 0xfff) == PMAC_SCC_IRDA)
 201                         pmu_enable_irled(1);
 202 #endif /* CONFIG_ADB_PMU */
 203                 LOCK(flags);
 204                 fcr = MACIO_IN32(OHARE_FCR);
 205                 /* Check if scc cell need enabling */
 206                 if (!(fcr & OH_SCC_ENABLE)) {
 207                         fcr |= OH_SCC_ENABLE;
 208                         if (htw) {
 209                                 /* Side effect: this will also power up the
 210                                  * modem, but it's too messy to figure out on which
 211                                  * ports this controls the tranceiver and on which
 212                                  * it controls the modem
 213                                  */
 214                                 if (trans)
 215                                         fcr &= ~HRW_SCC_TRANS_EN_N;
 216                                 MACIO_OUT32(OHARE_FCR, fcr);
 217                                 fcr |= (rmask = HRW_RESET_SCC);
 218                                 MACIO_OUT32(OHARE_FCR, fcr);
 219                         } else {
 220                                 fcr |= (rmask = OH_SCC_RESET);
 221                                 MACIO_OUT32(OHARE_FCR, fcr);
 222                         }
 223                         UNLOCK(flags);
 224                         (void)MACIO_IN32(OHARE_FCR);
 225                         mdelay(15);
 226                         LOCK(flags);
 227                         fcr &= ~rmask;
 228                         MACIO_OUT32(OHARE_FCR, fcr);
 229                 }
 230                 if (chan_mask & MACIO_FLAG_SCCA_ON)
 231                         fcr |= OH_SCCA_IO;
 232                 if (chan_mask & MACIO_FLAG_SCCB_ON)
 233                         fcr |= OH_SCCB_IO;
 234                 MACIO_OUT32(OHARE_FCR, fcr);
 235                 macio->flags |= chan_mask;
 236                 UNLOCK(flags);
 237                 if (param & PMAC_SCC_FLAG_XMON)
 238                         macio->flags |= MACIO_FLAG_SCC_LOCKED;
 239         } else {
 240                 if (macio->flags & MACIO_FLAG_SCC_LOCKED)
 241                         return -EPERM;
 242                 LOCK(flags);
 243                 fcr = MACIO_IN32(OHARE_FCR);
 244                 if (chan_mask & MACIO_FLAG_SCCA_ON)
 245                         fcr &= ~OH_SCCA_IO;
 246                 if (chan_mask & MACIO_FLAG_SCCB_ON)
 247                         fcr &= ~OH_SCCB_IO;
 248                 MACIO_OUT32(OHARE_FCR, fcr);
 249                 if ((fcr & (OH_SCCA_IO | OH_SCCB_IO)) == 0) {
 250                         fcr &= ~OH_SCC_ENABLE;
 251                         if (htw && trans)
 252                                 fcr |= HRW_SCC_TRANS_EN_N;
 253                         MACIO_OUT32(OHARE_FCR, fcr);
 254                 }
 255                 macio->flags &= ~(chan_mask);
 256                 UNLOCK(flags);
 257                 mdelay(10);
 258 #ifdef CONFIG_ADB_PMU
 259                 if ((param & 0xfff) == PMAC_SCC_IRDA)
 260                         pmu_enable_irled(0);
 261 #endif /* CONFIG_ADB_PMU */
 262         }
 263         return 0;
 264 }
 265
 266 static long __pmac
 267 ohare_floppy_enable(struct device_node* node, long param, long value)
 268 {
 269         return simple_feature_tweak(node, macio_ohare,
 270                 OHARE_FCR, OH_FLOPPY_ENABLE, value);
 271 }
 272
 273 static long __pmac
 274 ohare_mesh_enable(struct device_node* node, long param, long value)
 275 {
 276         return simple_feature_tweak(node, macio_ohare,
 277                 OHARE_FCR, OH_MESH_ENABLE, value);
 278 }
 279
 280 static long __pmac
 281 ohare_ide_enable(struct device_node* node, long param, long value)
 282 {
 283         switch(param) {
 284             case 0:
 285                 /* For some reason, setting the bit in set_initial_features()
 286                  * doesn't stick. I'm still investigating... --BenH.
 287                  */
 288                 if (value)
 289                         simple_feature_tweak(node, macio_ohare,
 290                                 OHARE_FCR, OH_IOBUS_ENABLE, 1);
 291                 return simple_feature_tweak(node, macio_ohare,
 292                         OHARE_FCR, OH_IDE0_ENABLE, value);
 293             case 1:
 294                 return simple_feature_tweak(node, macio_ohare,
 295                         OHARE_FCR, OH_BAY_IDE_ENABLE, value);
 296             default:
 297                 return -ENODEV;
 298         }
 299 }
 300
 301 static long __pmac
 302 ohare_ide_reset(struct device_node* node, long param, long value)
 303 {
 304         switch(param) {
 305             case 0:
 306                 return simple_feature_tweak(node, macio_ohare,
 307                         OHARE_FCR, OH_IDE0_RESET_N, !value);
 308             case 1:
 309                 return simple_feature_tweak(node, macio_ohare,
 310                         OHARE_FCR, OH_IDE1_RESET_N, !value);
 311             default:
 312                 return -ENODEV;
 313         }
 314 }
 315
 316 static long __pmac
 317 ohare_sleep_state(struct device_node* node, long param, long value)
 318 {
 319         struct macio_chip*      macio = &macio_chips[0];
 320
 321         if ((pmac_mb.board_flags & PMAC_MB_CAN_SLEEP) == 0)
 322                 return -EPERM;
 323         if (value == 1) {
 324                 MACIO_BIC(OHARE_FCR, OH_IOBUS_ENABLE);
 325         } else if (value == 0) {
 326                 MACIO_BIS(OHARE_FCR, OH_IOBUS_ENABLE);
 327         }
 328
 329         return 0;
 330 }
 331
 332 static long __pmac
 333 heathrow_modem_enable(struct device_node* node, long param, long value)
 334 {
 335         struct macio_chip*      macio;
 336         u8                      gpio;
 337         unsigned long           flags;
 338
 339         macio = macio_find(node, macio_unknown);
 340         if (!macio)
 341                 return -ENODEV;
 342         gpio = MACIO_IN8(HRW_GPIO_MODEM_RESET) & ~1;
 343         if (!value) {
 344                 LOCK(flags);
 345                 MACIO_OUT8(HRW_GPIO_MODEM_RESET, gpio);
 346                 UNLOCK(flags);
 347                 (void)MACIO_IN8(HRW_GPIO_MODEM_RESET);
 348                 mdelay(250);
 349         }
 350         if (pmac_mb.model_id != PMAC_TYPE_YOSEMITE &&
 351             pmac_mb.model_id != PMAC_TYPE_YIKES) {
 352                 LOCK(flags);
 353                 if (value)
 354                         MACIO_BIC(HEATHROW_FCR, HRW_SCC_TRANS_EN_N);
 355                 else
 356                         MACIO_BIS(HEATHROW_FCR, HRW_SCC_TRANS_EN_N);
 357                 UNLOCK(flags);
 358                 (void)MACIO_IN32(HEATHROW_FCR);
 359                 mdelay(250);
 360         }
 361         if (value) {
 362                 LOCK(flags);
 363                 MACIO_OUT8(HRW_GPIO_MODEM_RESET, gpio | 1);
 364                 (void)MACIO_IN8(HRW_GPIO_MODEM_RESET);
 365                 UNLOCK(flags); mdelay(250); LOCK(flags);
 366                 MACIO_OUT8(HRW_GPIO_MODEM_RESET, gpio);
 367                 (void)MACIO_IN8(HRW_GPIO_MODEM_RESET);
 368                 UNLOCK(flags); mdelay(250); LOCK(flags);
 369                 MACIO_OUT8(HRW_GPIO_MODEM_RESET, gpio | 1);
 370                 (void)MACIO_IN8(HRW_GPIO_MODEM_RESET);
 371                 UNLOCK(flags); mdelay(250);
 372         }
 373         return 0;
 374 }
 375
 376 static long __pmac
 377 heathrow_floppy_enable(struct device_node* node, long param, long value)
 378 {
 379         return simple_feature_tweak(node, macio_unknown,
 380                 HEATHROW_FCR,
 381                 HRW_SWIM_ENABLE|HRW_BAY_FLOPPY_ENABLE,
 382                 value);
 383 }
 384
 385 static long __pmac
 386 heathrow_mesh_enable(struct device_node* node, long param, long value)
 387 {
 388         struct macio_chip*      macio;
 389         unsigned long           flags;
 390
 391         macio = macio_find(node, macio_unknown);
 392         if (!macio)
 393                 return -ENODEV;
 394         LOCK(flags);
 395         /* Set clear mesh cell enable */
 396         if (value)
 397                 MACIO_BIS(HEATHROW_FCR, HRW_MESH_ENABLE);
 398         else
 399                 MACIO_BIC(HEATHROW_FCR, HRW_MESH_ENABLE);
 400         (void)MACIO_IN32(HEATHROW_FCR);
 401         udelay(10);
 402         /* Set/Clear termination power */
 403         if (value)
 404                 MACIO_BIC(HEATHROW_MBCR, 0x04000000);
 405         else
 406                 MACIO_BIS(HEATHROW_MBCR, 0x04000000);
 407         (void)MACIO_IN32(HEATHROW_MBCR);
 408         udelay(10);
 409         UNLOCK(flags);
 410
 411         return 0;
 412 }
 413
 414 static long __pmac
 415 heathrow_ide_enable(struct device_node* node, long param, long value)
 416 {
 417         switch(param) {
 418             case 0:
 419                 return simple_feature_tweak(node, macio_unknown,
 420                         HEATHROW_FCR, HRW_IDE0_ENABLE, value);
 421             case 1:
 422                 return simple_feature_tweak(node, macio_unknown,
 423                         HEATHROW_FCR, HRW_BAY_IDE_ENABLE, value);
 424             default:
 425                 return -ENODEV;
 426         }
 427 }
 428
 429 static long __pmac
 430 heathrow_ide_reset(struct device_node* node, long param, long value)
 431 {
 432         switch(param) {
 433             case 0:
 434                 return simple_feature_tweak(node, macio_unknown,
 435                         HEATHROW_FCR, HRW_IDE0_RESET_N, !value);
 436             case 1:
 437                 return simple_feature_tweak(node, macio_unknown,
 438                         HEATHROW_FCR, HRW_IDE1_RESET_N, !value);
 439             default:
 440                 return -ENODEV;
 441         }
 442 }
 443
 444 static long __pmac
 445 heathrow_bmac_enable(struct device_node* node, long param, long value)
 446 {
 447         struct macio_chip*      macio;
 448         unsigned long           flags;
 449
 450         macio = macio_find(node, 0);
 451         if (!macio)
 452                 return -ENODEV;
 453         if (value) {
 454                 LOCK(flags);
 455                 MACIO_BIS(HEATHROW_FCR, HRW_BMAC_IO_ENABLE);
 456                 MACIO_BIS(HEATHROW_FCR, HRW_BMAC_RESET);
 457                 UNLOCK(flags);
 458                 (void)MACIO_IN32(HEATHROW_FCR);
 459                 mdelay(10);
 460                 LOCK(flags);
 461                 MACIO_BIC(HEATHROW_FCR, HRW_BMAC_RESET);
 462                 UNLOCK(flags);
 463                 (void)MACIO_IN32(HEATHROW_FCR);
 464                 mdelay(10);
 465         } else {
 466                 LOCK(flags);
 467                 MACIO_BIC(HEATHROW_FCR, HRW_BMAC_IO_ENABLE);
 468                 UNLOCK(flags);
 469         }
 470         return 0;
 471 }
 472
 473 static long __pmac
 474 heathrow_sound_enable(struct device_node* node, long param, long value)
 475 {
 476         struct macio_chip*      macio;
 477         unsigned long           flags;
 478
 479         /* B&W G3 and Yikes don't support that properly (the
 480          * sound appear to never come back after beeing shut down).
 481          */
 482         if (pmac_mb.model_id == PMAC_TYPE_YOSEMITE ||
 483             pmac_mb.model_id == PMAC_TYPE_YIKES)
 484                 return 0;
 485
 486         macio = macio_find(node, 0);
 487         if (!macio)
 488                 return -ENODEV;
 489         if (value) {
 490                 LOCK(flags);
 491                 MACIO_BIS(HEATHROW_FCR, HRW_SOUND_CLK_ENABLE);
 492                 MACIO_BIC(HEATHROW_FCR, HRW_SOUND_POWER_N);
 493                 UNLOCK(flags);
 494                 (void)MACIO_IN32(HEATHROW_FCR);
 495         } else {
 496                 LOCK(flags);
 497                 MACIO_BIS(HEATHROW_FCR, HRW_SOUND_POWER_N);
 498                 MACIO_BIC(HEATHROW_FCR, HRW_SOUND_CLK_ENABLE);
 499                 UNLOCK(flags);
 500         }
 501         return 0;
 502 }
 503
 504 static u32 save_fcr[6] __pmacdata;
 505 static u32 save_mbcr __pmacdata;
 506 static u32 save_gpio_levels[2] __pmacdata;
 507 static u8 save_gpio_extint[KEYLARGO_GPIO_EXTINT_CNT] __pmacdata;
 508 static u8 save_gpio_normal[KEYLARGO_GPIO_CNT] __pmacdata;
 509 static u32 save_unin_clock_ctl __pmacdata;
 510 static struct dbdma_regs save_dbdma[13] __pmacdata;
 511 static struct dbdma_regs save_alt_dbdma[13] __pmacdata;
 512
 513 static void __pmac
 514 dbdma_save(struct macio_chip* macio, struct dbdma_regs* save)
 515 {
 516         int i;
 517
 518         /* Save state & config of DBDMA channels */
 519         for (i=0; i<13; i++) {
 520                 volatile struct dbdma_regs __iomem * chan = (void __iomem *)
 521                         (macio->base + ((0x8000+i*0x100)>>2));
 522                 save[i].cmdptr_hi = in_le32(&chan->cmdptr_hi);
 523                 save[i].cmdptr = in_le32(&chan->cmdptr);
 524                 save[i].intr_sel = in_le32(&chan->intr_sel);
 525                 save[i].br_sel = in_le32(&chan->br_sel);
 526                 save[i].wait_sel = in_le32(&chan->wait_sel);
 527         }
 528 }
 529
 530 static void __pmac
 531 dbdma_restore(struct macio_chip* macio, struct dbdma_regs* save)
 532 {
 533         int i;
 534
 535         /* Save state & config of DBDMA channels */
 536         for (i=0; i<13; i++) {
 537                 volatile struct dbdma_regs __iomem * chan = (void __iomem *)
 538                         (macio->base + ((0x8000+i*0x100)>>2));
 539                 out_le32(&chan->control, (ACTIVE|DEAD|WAKE|FLUSH|PAUSE|RUN)<<16);
 540                 while (in_le32(&chan->status) & ACTIVE)
 541                         mb();
 542                 out_le32(&chan->cmdptr_hi, save[i].cmdptr_hi);
 543                 out_le32(&chan->cmdptr, save[i].cmdptr);
 544                 out_le32(&chan->intr_sel, save[i].intr_sel);
 545                 out_le32(&chan->br_sel, save[i].br_sel);
 546                 out_le32(&chan->wait_sel, save[i].wait_sel);
 547         }
 548 }
 549
 550 static void __pmac
 551 heathrow_sleep(struct macio_chip* macio, int secondary)
 552 {
 553         if (secondary) {
 554                 dbdma_save(macio, save_alt_dbdma);
 555                 save_fcr[2] = MACIO_IN32(0x38);
 556                 save_fcr[3] = MACIO_IN32(0x3c);
 557         } else {
 558                 dbdma_save(macio, save_dbdma);
 559                 save_fcr[0] = MACIO_IN32(0x38);
 560                 save_fcr[1] = MACIO_IN32(0x3c);
 561                 save_mbcr = MACIO_IN32(0x34);
 562                 /* Make sure sound is shut down */
 563                 MACIO_BIS(HEATHROW_FCR, HRW_SOUND_POWER_N);
 564                 MACIO_BIC(HEATHROW_FCR, HRW_SOUND_CLK_ENABLE);
 565                 /* This seems to be necessary as well or the fan
 566                  * keeps coming up and battery drains fast */
 567                 MACIO_BIC(HEATHROW_FCR, HRW_IOBUS_ENABLE);
 568                 MACIO_BIC(HEATHROW_FCR, HRW_IDE0_RESET_N);
 569                 /* Make sure eth is down even if module or sleep
 570                  * won't work properly */
 571                 MACIO_BIC(HEATHROW_FCR, HRW_BMAC_IO_ENABLE | HRW_BMAC_RESET);
 572         }
 573         /* Make sure modem is shut down */
 574         MACIO_OUT8(HRW_GPIO_MODEM_RESET,
 575                 MACIO_IN8(HRW_GPIO_MODEM_RESET) & ~1);
 576         MACIO_BIS(HEATHROW_FCR, HRW_SCC_TRANS_EN_N);
 577         MACIO_BIC(HEATHROW_FCR, OH_SCCA_IO|OH_SCCB_IO|HRW_SCC_ENABLE);
 578
 579         /* Let things settle */
 580         (void)MACIO_IN32(HEATHROW_FCR);
 581 }
 582
 583 static void __pmac
 584 heathrow_wakeup(struct macio_chip* macio, int secondary)
 585 {
 586         if (secondary) {
 587                 MACIO_OUT32(0x38, save_fcr[2]);
 588                 (void)MACIO_IN32(0x38);
 589                 mdelay(1);
 590                 MACIO_OUT32(0x3c, save_fcr[3]);
 591                 (void)MACIO_IN32(0x38);
 592                 mdelay(10);
 593                 dbdma_restore(macio, save_alt_dbdma);
 594         } else {
 595                 MACIO_OUT32(0x38, save_fcr[0] | HRW_IOBUS_ENABLE);
 596                 (void)MACIO_IN32(0x38);
 597                 mdelay(1);
 598                 MACIO_OUT32(0x3c, save_fcr[1]);
 599                 (void)MACIO_IN32(0x38);
 600                 mdelay(1);
 601                 MACIO_OUT32(0x34, save_mbcr);
 602                 (void)MACIO_IN32(0x38);
 603                 mdelay(10);
 604                 dbdma_restore(macio, save_dbdma);
 605         }
 606 }
 607
 608 static long __pmac
 609 heathrow_sleep_state(struct device_node* node, long param, long value)
 610 {
 611         if ((pmac_mb.board_flags & PMAC_MB_CAN_SLEEP) == 0)
 612                 return -EPERM;
 613         if (value == 1) {
 614                 if (macio_chips[1].type == macio_gatwick)
 615                         heathrow_sleep(&macio_chips[0], 1);
 616                 heathrow_sleep(&macio_chips[0], 0);
 617         } else if (value == 0) {
 618                 heathrow_wakeup(&macio_chips[0], 0);
 619                 if (macio_chips[1].type == macio_gatwick)
 620                         heathrow_wakeup(&macio_chips[0], 1);
 621         }
 622         return 0;
 623 }
 624
 625 static long __pmac
 626 core99_scc_enable(struct device_node* node, long param, long value)
 627 {
 628         struct macio_chip*      macio;
 629         unsigned long           flags;
 630         unsigned long           chan_mask;
 631         u32                     fcr;
 632
 633         macio = macio_find(node, 0);
 634         if (!macio)
 635                 return -ENODEV;
 636         if (!strcmp(node->name, "ch-a"))
 637                 chan_mask = MACIO_FLAG_SCCA_ON;
 638         else if (!strcmp(node->name, "ch-b"))
 639                 chan_mask = MACIO_FLAG_SCCB_ON;
 640         else
 641                 return -ENODEV;
 642
 643         if (value) {
 644                 int need_reset_scc = 0;
 645                 int need_reset_irda = 0;
 646
 647                 LOCK(flags);
 648                 fcr = MACIO_IN32(KEYLARGO_FCR0);
 649                 /* Check if scc cell need enabling */
 650                 if (!(fcr & KL0_SCC_CELL_ENABLE)) {
 651                         fcr |= KL0_SCC_CELL_ENABLE;
 652                         need_reset_scc = 1;
 653                 }
 654                 if (chan_mask & MACIO_FLAG_SCCA_ON) {
 655                         fcr |= KL0_SCCA_ENABLE;
 656                         /* Don't enable line drivers for I2S modem */
 657                         if ((param & 0xfff) == PMAC_SCC_I2S1)
 658                                 fcr &= ~KL0_SCC_A_INTF_ENABLE;
 659                         else
 660                                 fcr |= KL0_SCC_A_INTF_ENABLE;
 661                 }
 662                 if (chan_mask & MACIO_FLAG_SCCB_ON) {
 663                         fcr |= KL0_SCCB_ENABLE;
 664                         /* Perform irda specific inits */
 665                         if ((param & 0xfff) == PMAC_SCC_IRDA) {
 666                                 fcr &= ~KL0_SCC_B_INTF_ENABLE;
 667                                 fcr |= KL0_IRDA_ENABLE;
 668                                 fcr |= KL0_IRDA_CLK32_ENABLE | KL0_IRDA_CLK19_ENABLE;
 669                                 fcr |= KL0_IRDA_SOURCE1_SEL;
 670                                 fcr &= ~(KL0_IRDA_FAST_CONNECT|KL0_IRDA_DEFAULT1|KL0_IRDA_DEFAULT0);
 671                                 fcr &= ~(KL0_IRDA_SOURCE2_SEL|KL0_IRDA_HIGH_BAND);
 672                                 need_reset_irda = 1;
 673                         } else
 674                                 fcr |= KL0_SCC_B_INTF_ENABLE;
 675                 }
 676                 MACIO_OUT32(KEYLARGO_FCR0, fcr);
 677                 macio->flags |= chan_mask;
 678                 if (need_reset_scc)  {
 679                         MACIO_BIS(KEYLARGO_FCR0, KL0_SCC_RESET);
 680                         (void)MACIO_IN32(KEYLARGO_FCR0);
 681                         UNLOCK(flags);
 682                         mdelay(15);
 683                         LOCK(flags);
 684                         MACIO_BIC(KEYLARGO_FCR0, KL0_SCC_RESET);
 685                 }
 686                 if (need_reset_irda)  {
 687                         MACIO_BIS(KEYLARGO_FCR0, KL0_IRDA_RESET);
 688                         (void)MACIO_IN32(KEYLARGO_FCR0);
 689                         UNLOCK(flags);
 690                         mdelay(15);
 691                         LOCK(flags);
 692                         MACIO_BIC(KEYLARGO_FCR0, KL0_IRDA_RESET);
 693                 }
 694                 UNLOCK(flags);
 695                 if (param & PMAC_SCC_FLAG_XMON)
 696                         macio->flags |= MACIO_FLAG_SCC_LOCKED;
 697         } else {
 698                 if (macio->flags & MACIO_FLAG_SCC_LOCKED)
 699                         return -EPERM;
 700                 LOCK(flags);
 701                 fcr = MACIO_IN32(KEYLARGO_FCR0);
 702                 if (chan_mask & MACIO_FLAG_SCCA_ON)
 703                         fcr &= ~KL0_SCCA_ENABLE;
 704                 if (chan_mask & MACIO_FLAG_SCCB_ON) {
 705                         fcr &= ~KL0_SCCB_ENABLE;
 706                         /* Perform irda specific clears */
 707                         if ((param & 0xfff) == PMAC_SCC_IRDA) {
 708                                 fcr &= ~KL0_IRDA_ENABLE;
 709                                 fcr &= ~(KL0_IRDA_CLK32_ENABLE | KL0_IRDA_CLK19_ENABLE);
 710                                 fcr &= ~(KL0_IRDA_FAST_CONNECT|KL0_IRDA_DEFAULT1|KL0_IRDA_DEFAULT0);
 711                                 fcr &= ~(KL0_IRDA_SOURCE1_SEL|KL0_IRDA_SOURCE2_SEL|KL0_IRDA_HIGH_BAND);
 712                         }
 713                 }
 714                 MACIO_OUT32(KEYLARGO_FCR0, fcr);
 715                 if ((fcr & (KL0_SCCA_ENABLE | KL0_SCCB_ENABLE)) == 0) {
 716                         fcr &= ~KL0_SCC_CELL_ENABLE;
 717                         MACIO_OUT32(KEYLARGO_FCR0, fcr);
 718                 }
 719                 macio->flags &= ~(chan_mask);
 720                 UNLOCK(flags);
 721                 mdelay(10);
 722         }
 723         return 0;
 724 }
 725
 726 static long __pmac
 727 core99_modem_enable(struct device_node* node, long param, long value)
 728 {
 729         struct macio_chip*      macio;
 730         u8                      gpio;
 731         unsigned long           flags;
 732
 733         /* Hack for internal USB modem */
 734         if (node == NULL) {
 735                 if (macio_chips[0].type != macio_keylargo)
 736                         return -ENODEV;
 737                 node = macio_chips[0].of_node;
 738         }
 739         macio = macio_find(node, 0);
 740         if (!macio)
 741                 return -ENODEV;
 742         gpio = MACIO_IN8(KL_GPIO_MODEM_RESET);
 743         gpio |= KEYLARGO_GPIO_OUTPUT_ENABLE;
 744         gpio &= ~KEYLARGO_GPIO_OUTOUT_DATA;
 745
 746         if (!value) {
 747                 LOCK(flags);
 748                 MACIO_OUT8(KL_GPIO_MODEM_RESET, gpio);
 749                 UNLOCK(flags);
 750                 (void)MACIO_IN8(KL_GPIO_MODEM_RESET);
 751                 mdelay(250);
 752         }
 753         LOCK(flags);
 754         if (value) {
 755                 MACIO_BIC(KEYLARGO_FCR2, KL2_ALT_DATA_OUT);
 756                 UNLOCK(flags);
 757                 (void)MACIO_IN32(KEYLARGO_FCR2);
 758                 mdelay(250);
 759         } else {
 760                 MACIO_BIS(KEYLARGO_FCR2, KL2_ALT_DATA_OUT);
 761                 UNLOCK(flags);
 762         }
 763         if (value) {
 764                 LOCK(flags);
 765                 MACIO_OUT8(KL_GPIO_MODEM_RESET, gpio | KEYLARGO_GPIO_OUTOUT_DATA);
 766                 (void)MACIO_IN8(KL_GPIO_MODEM_RESET);
 767                 UNLOCK(flags); mdelay(250); LOCK(flags);
 768                 MACIO_OUT8(KL_GPIO_MODEM_RESET, gpio);
 769                 (void)MACIO_IN8(KL_GPIO_MODEM_RESET);
 770                 UNLOCK(flags); mdelay(250); LOCK(flags);
 771                 MACIO_OUT8(KL_GPIO_MODEM_RESET, gpio | KEYLARGO_GPIO_OUTOUT_DATA);
 772                 (void)MACIO_IN8(KL_GPIO_MODEM_RESET);
 773                 UNLOCK(flags); mdelay(250);
 774         }
 775         return 0;
 776 }
 777
 778 static long __pmac
 779 pangea_modem_enable(struct device_node* node, long param, long value)
 780 {
 781         struct macio_chip*      macio;
 782         u8                      gpio;
 783         unsigned long           flags;
 784
 785         /* Hack for internal USB modem */
 786         if (node == NULL) {
 787                 if (macio_chips[0].type != macio_pangea &&
 788                     macio_chips[0].type != macio_intrepid)
 789                         return -ENODEV;
 790                 node = macio_chips[0].of_node;
 791         }
 792         macio = macio_find(node, 0);
 793         if (!macio)
 794                 return -ENODEV;
 795         gpio = MACIO_IN8(KL_GPIO_MODEM_RESET);
 796         gpio |= KEYLARGO_GPIO_OUTPUT_ENABLE;
 797         gpio &= ~KEYLARGO_GPIO_OUTOUT_DATA;
 798
 799         if (!value) {
 800                 LOCK(flags);
 801                 MACIO_OUT8(KL_GPIO_MODEM_RESET, gpio);
 802                 UNLOCK(flags);
 803                 (void)MACIO_IN8(KL_GPIO_MODEM_RESET);
 804                 mdelay(250);
 805         }
 806         LOCK(flags);
 807         if (value) {
 808                 MACIO_OUT8(KL_GPIO_MODEM_POWER,
 809                         KEYLARGO_GPIO_OUTPUT_ENABLE);
 810                 UNLOCK(flags);
 811                 (void)MACIO_IN32(KEYLARGO_FCR2);
 812                 mdelay(250);
 813         } else {
 814                 MACIO_OUT8(KL_GPIO_MODEM_POWER,
 815                         KEYLARGO_GPIO_OUTPUT_ENABLE | KEYLARGO_GPIO_OUTOUT_DATA);
 816                 UNLOCK(flags);
 817         }
 818         if (value) {
 819                 LOCK(flags);
 820                 MACIO_OUT8(KL_GPIO_MODEM_RESET, gpio | KEYLARGO_GPIO_OUTOUT_DATA);
 821                 (void)MACIO_IN8(KL_GPIO_MODEM_RESET);
 822                 UNLOCK(flags); mdelay(250); LOCK(flags);
 823                 MACIO_OUT8(KL_GPIO_MODEM_RESET, gpio);
 824                 (void)MACIO_IN8(KL_GPIO_MODEM_RESET);
 825                 UNLOCK(flags); mdelay(250); LOCK(flags);
 826                 MACIO_OUT8(KL_GPIO_MODEM_RESET, gpio | KEYLARGO_GPIO_OUTOUT_DATA);
 827                 (void)MACIO_IN8(KL_GPIO_MODEM_RESET);
 828                 UNLOCK(flags); mdelay(250);
 829         }
 830         return 0;
 831 }
 832
 833 static long __pmac
 834 core99_ata100_enable(struct device_node* node, long value)
 835 {
 836         unsigned long flags;
 837         struct pci_dev *pdev = NULL;
 838         u8 pbus, pid;
 839
 840         if (uninorth_rev < 0x24)
 841                 return -ENODEV;
 842
 843         LOCK(flags);
 844         if (value)
 845                 UN_BIS(UNI_N_CLOCK_CNTL, UNI_N_CLOCK_CNTL_ATA100);
 846         else
 847                 UN_BIC(UNI_N_CLOCK_CNTL, UNI_N_CLOCK_CNTL_ATA100);
 848         (void)UN_IN(UNI_N_CLOCK_CNTL);
 849         UNLOCK(flags);
 850         udelay(20);
 851
 852         if (value) {
 853                 if (pci_device_from_OF_node(node, &pbus, &pid) == 0)
 854                         pdev = pci_find_slot(pbus, pid);
 855                 if (pdev == NULL)
 856                         return 0;
 857                 pci_enable_device(pdev);
 858                 pci_set_master(pdev);
 859         }
 860         return 0;
 861 }
 862
 863 static long __pmac
 864 core99_ide_enable(struct device_node* node, long param, long value)
 865 {
 866         /* Bus ID 0 to 2 are KeyLargo based IDE, busID 3 is U2
 867          * based ata-100
 868          */
 869         switch(param) {
 870             case 0:
 871                 return simple_feature_tweak(node, macio_unknown,
 872                         KEYLARGO_FCR1, KL1_EIDE0_ENABLE, value);
 873             case 1:
 874                 return simple_feature_tweak(node, macio_unknown,
 875                         KEYLARGO_FCR1, KL1_EIDE1_ENABLE, value);
 876             case 2:
 877                 return simple_feature_tweak(node, macio_unknown,
 878                         KEYLARGO_FCR1, KL1_UIDE_ENABLE, value);
 879             case 3:
 880                 return core99_ata100_enable(node, value);
 881             default:
 882                 return -ENODEV;
 883         }
 884 }
 885
 886 static long __pmac
 887 core99_ide_reset(struct device_node* node, long param, long value)
 888 {
 889         switch(param) {
 890             case 0:
 891                 return simple_feature_tweak(node, macio_unknown,
 892                         KEYLARGO_FCR1, KL1_EIDE0_RESET_N, !value);
 893             case 1:
 894                 return simple_feature_tweak(node, macio_unknown,
 895                         KEYLARGO_FCR1, KL1_EIDE1_RESET_N, !value);
 896             case 2:
 897                 return simple_feature_tweak(node, macio_unknown,
 898                         KEYLARGO_FCR1, KL1_UIDE_RESET_N, !value);
 899             default:
 900                 return -ENODEV;
 901         }
 902 }
 903
 904 static long __pmac
 905 core99_gmac_enable(struct device_node* node, long param, long value)
 906 {
 907         unsigned long flags;
 908
 909         LOCK(flags);
 910         if (value)
 911                 UN_BIS(UNI_N_CLOCK_CNTL, UNI_N_CLOCK_CNTL_GMAC);
 912         else
 913                 UN_BIC(UNI_N_CLOCK_CNTL, UNI_N_CLOCK_CNTL_GMAC);
 914         (void)UN_IN(UNI_N_CLOCK_CNTL);
 915         UNLOCK(flags);
 916         udelay(20);
 917
 918         return 0;
 919 }
 920
 921 static long __pmac
 922 core99_gmac_phy_reset(struct device_node* node, long param, long value)
 923 {
 924         unsigned long flags;
 925         struct macio_chip* macio;
 926
 927         macio = &macio_chips[0];
 928         if (macio->type != macio_keylargo && macio->type != macio_pangea &&
 929             macio->type != macio_intrepid)
 930                 return -ENODEV;
 931
 932         LOCK(flags);
 933         MACIO_OUT8(KL_GPIO_ETH_PHY_RESET, KEYLARGO_GPIO_OUTPUT_ENABLE);
 934         (void)MACIO_IN8(KL_GPIO_ETH_PHY_RESET);
 935         UNLOCK(flags);
 936         mdelay(10);
 937         LOCK(flags);
 938         MACIO_OUT8(KL_GPIO_ETH_PHY_RESET, /*KEYLARGO_GPIO_OUTPUT_ENABLE | */
 939                 KEYLARGO_GPIO_OUTOUT_DATA);
 940         UNLOCK(flags);
 941         mdelay(10);
 942
 943         return 0;
 944 }
 945
 946 static long __pmac
 947 core99_sound_chip_enable(struct device_node* node, long param, long value)
 948 {
 949         struct macio_chip*      macio;
 950         unsigned long           flags;
 951
 952         macio = macio_find(node, 0);
 953         if (!macio)
 954                 return -ENODEV;
 955
 956         /* Do a better probe code, screamer G4 desktops &
 957          * iMacs can do that too, add a recalibrate  in
 958          * the driver as well
 959          */
 960         if (pmac_mb.model_id == PMAC_TYPE_PISMO ||
 961             pmac_mb.model_id == PMAC_TYPE_TITANIUM) {
 962                 LOCK(flags);
 963                 if (value)
 964                         MACIO_OUT8(KL_GPIO_SOUND_POWER,
 965                                 KEYLARGO_GPIO_OUTPUT_ENABLE |
 966                                 KEYLARGO_GPIO_OUTOUT_DATA);
 967                 else
 968                         MACIO_OUT8(KL_GPIO_SOUND_POWER,
 969                                 KEYLARGO_GPIO_OUTPUT_ENABLE);
 970                 (void)MACIO_IN8(KL_GPIO_SOUND_POWER);
 971                 UNLOCK(flags);
 972         }
 973         return 0;
 974 }
 975
 976 static long __pmac
 977 core99_airport_enable(struct device_node* node, long param, long value)
 978 {
 979         struct macio_chip*      macio;
 980         unsigned long           flags;
 981         int                     state;
 982
 983         macio = macio_find(node, 0);
 984         if (!macio)
 985                 return -ENODEV;
 986
 987         /* Hint: we allow passing of macio itself for the sake of the
 988          * sleep code
 989          */
 990         if (node != macio->of_node &&
 991             (!node->parent || node->parent != macio->of_node))
 992                 return -ENODEV;
 993         state = (macio->flags & MACIO_FLAG_AIRPORT_ON) != 0;
 994         if (value == state)
 995                 return 0;
 996         if (value) {
 997                 /* This code is a reproduction of OF enable-cardslot
 998                  * and init-wireless methods, slightly hacked until
 999                  * I got it working.
1000                  */
1001                 LOCK(flags);
1002                 MACIO_OUT8(KEYLARGO_GPIO_0+0xf, 5);
1003                 (void)MACIO_IN8(KEYLARGO_GPIO_0+0xf);
1004                 UNLOCK(flags);
1005                 mdelay(10);
1006                 LOCK(flags);
1007                 MACIO_OUT8(KEYLARGO_GPIO_0+0xf, 4);
1008                 (void)MACIO_IN8(KEYLARGO_GPIO_0+0xf);
1009                 UNLOCK(flags);
1010
1011                 mdelay(10);
1012
1013                 LOCK(flags);
1014                 MACIO_BIC(KEYLARGO_FCR2, KL2_CARDSEL_16);
1015                 (void)MACIO_IN32(KEYLARGO_FCR2);
1016                 udelay(10);
1017                 MACIO_OUT8(KEYLARGO_GPIO_EXTINT_0+0xb, 0);
1018                 (void)MACIO_IN8(KEYLARGO_GPIO_EXTINT_0+0xb);
1019                 udelay(10);
1020                 MACIO_OUT8(KEYLARGO_GPIO_EXTINT_0+0xa, 0x28);
1021                 (void)MACIO_IN8(KEYLARGO_GPIO_EXTINT_0+0xa);
1022                 udelay(10);
1023                 MACIO_OUT8(KEYLARGO_GPIO_EXTINT_0+0xd, 0x28);
1024                 (void)MACIO_IN8(KEYLARGO_GPIO_EXTINT_0+0xd);
1025                 udelay(10);
1026                 MACIO_OUT8(KEYLARGO_GPIO_0+0xd, 0x28);
1027                 (void)MACIO_IN8(KEYLARGO_GPIO_0+0xd);
1028                 udelay(10);
1029                 MACIO_OUT8(KEYLARGO_GPIO_0+0xe, 0x28);
1030                 (void)MACIO_IN8(KEYLARGO_GPIO_0+0xe);
1031                 UNLOCK(flags);
1032                 udelay(10);
1033                 MACIO_OUT32(0x1c000, 0);
1034                 mdelay(1);
1035                 MACIO_OUT8(0x1a3e0, 0x41);
1036                 (void)MACIO_IN8(0x1a3e0);
1037                 udelay(10);
1038                 LOCK(flags);
1039                 MACIO_BIS(KEYLARGO_FCR2, KL2_CARDSEL_16);
1040                 (void)MACIO_IN32(KEYLARGO_FCR2);
1041                 UNLOCK(flags);
1042                 mdelay(100);
1043
1044                 macio->flags |= MACIO_FLAG_AIRPORT_ON;
1045         } else {
1046                 LOCK(flags);
1047                 MACIO_BIC(KEYLARGO_FCR2, KL2_CARDSEL_16);
1048                 (void)MACIO_IN32(KEYLARGO_FCR2);
1049                 MACIO_OUT8(KL_GPIO_AIRPORT_0, 0);
1050                 MACIO_OUT8(KL_GPIO_AIRPORT_1, 0);
1051                 MACIO_OUT8(KL_GPIO_AIRPORT_2, 0);
1052                 MACIO_OUT8(KL_GPIO_AIRPORT_3, 0);
1053                 MACIO_OUT8(KL_GPIO_AIRPORT_4, 0);
1054                 (void)MACIO_IN8(KL_GPIO_AIRPORT_4);
1055                 UNLOCK(flags);
1056
1057                 macio->flags &= ~MACIO_FLAG_AIRPORT_ON;
1058         }
1059         return 0;
1060 }
1061
1062 #ifdef CONFIG_SMP
1063 static long __pmac
1064 core99_reset_cpu(struct device_node* node, long param, long value)
1065 {
1066         unsigned int reset_io = 0;
1067         unsigned long flags;
1068         struct macio_chip* macio;
1069         struct device_node* np;
1070         const int dflt_reset_lines[] = {        KL_GPIO_RESET_CPU0,
1071                                                 KL_GPIO_RESET_CPU1,
1072                                                 KL_GPIO_RESET_CPU2,
1073                                                 KL_GPIO_RESET_CPU3 };
1074
1075         macio = &macio_chips[0];
1076         if (macio->type != macio_keylargo)
1077                 return -ENODEV;
1078
1079         np = find_path_device("/cpus");
1080         if (np == NULL)
1081                 return -ENODEV;
1082         for (np = np->child; np != NULL; np = np->sibling) {
1083                 u32* num = (u32 *)get_property(np, "reg", NULL);
1084                 u32* rst = (u32 *)get_property(np, "soft-reset", NULL);
1085                 if (num == NULL || rst == NULL)
1086                         continue;
1087                 if (param == *num) {
1088                         reset_io = *rst;
1089                         break;
1090                 }
1091         }
1092         if (np == NULL || reset_io == 0)
1093                 reset_io = dflt_reset_lines[param];
1094
1095         LOCK(flags);
1096         MACIO_OUT8(reset_io, KEYLARGO_GPIO_OUTPUT_ENABLE);
1097         (void)MACIO_IN8(reset_io);
1098         udelay(1);
1099         MACIO_OUT8(reset_io, 0);
1100         (void)MACIO_IN8(reset_io);
1101         UNLOCK(flags);
1102
1103         return 0;
1104 }
1105 #endif /* CONFIG_SMP */
1106
1107 static long __pmac
1108 core99_usb_enable(struct device_node* node, long param, long value)
1109 {
1110         struct macio_chip* macio;
1111         unsigned long flags;
1112         char* prop;
1113         int number;
1114         u32 reg;
1115
1116         macio = &macio_chips[0];
1117         if (macio->type != macio_keylargo && macio->type != macio_pangea &&
1118             macio->type != macio_intrepid)
1119                 return -ENODEV;
1120
1121         prop = (char *)get_property(node, "AAPL,clock-id", NULL);
1122         if (!prop)
1123                 return -ENODEV;
1124         if (strncmp(prop, "usb0u048", 8) == 0)
1125                 number = 0;
1126         else if (strncmp(prop, "usb1u148", 8) == 0)
1127                 number = 2;
1128         else if (strncmp(prop, "usb2u248", 8) == 0)
1129                 number = 4;
1130         else
1131                 return -ENODEV;
1132
1133         /* Sorry for the brute-force locking, but this is only used during
1134          * sleep and the timing seem to be critical
1135          */
1136         LOCK(flags);
1137         if (value) {
1138                 /* Turn ON */
1139                 if (number == 0) {
1140                         MACIO_BIC(KEYLARGO_FCR0, (KL0_USB0_PAD_SUSPEND0 | KL0_USB0_PAD_SUSPEND1));
1141                         (void)MACIO_IN32(KEYLARGO_FCR0);
1142                         UNLOCK(flags);
1143                         mdelay(1);
1144                         LOCK(flags);
1145                         MACIO_BIS(KEYLARGO_FCR0, KL0_USB0_CELL_ENABLE);
1146                 } else if (number == 2) {
1147                         MACIO_BIC(KEYLARGO_FCR0, (KL0_USB1_PAD_SUSPEND0 | KL0_USB1_PAD_SUSPEND1));
1148                         UNLOCK(flags);
1149                         (void)MACIO_IN32(KEYLARGO_FCR0);
1150                         mdelay(1);
1151                         LOCK(flags);
1152                         MACIO_BIS(KEYLARGO_FCR0, KL0_USB1_CELL_ENABLE);
1153                 } else if (number == 4) {
1154                         MACIO_BIC(KEYLARGO_FCR1, (KL1_USB2_PAD_SUSPEND0 | KL1_USB2_PAD_SUSPEND1));
1155                         UNLOCK(flags);
1156                         (void)MACIO_IN32(KEYLARGO_FCR1);
1157                         mdelay(1);
1158                         LOCK(flags);
1159                         MACIO_BIS(KEYLARGO_FCR1, KL1_USB2_CELL_ENABLE);
1160                 }
1161                 if (number < 4) {
1162                         reg = MACIO_IN32(KEYLARGO_FCR4);
1163                         reg &=  ~(KL4_PORT_WAKEUP_ENABLE(number) | KL4_PORT_RESUME_WAKE_EN(number) |
1164                                 KL4_PORT_CONNECT_WAKE_EN(number) | KL4_PORT_DISCONNECT_WAKE_EN(number));
1165                         reg &=  ~(KL4_PORT_WAKEUP_ENABLE(number+1) | KL4_PORT_RESUME_WAKE_EN(number+1) |
1166                                 KL4_PORT_CONNECT_WAKE_EN(number+1) | KL4_PORT_DISCONNECT_WAKE_EN(number+1));
1167                         MACIO_OUT32(KEYLARGO_FCR4, reg);
1168                         (void)MACIO_IN32(KEYLARGO_FCR4);
1169                         udelay(10);
1170                 } else {
1171                         reg = MACIO_IN32(KEYLARGO_FCR3);
1172                         reg &=  ~(KL3_IT_PORT_WAKEUP_ENABLE(0) | KL3_IT_PORT_RESUME_WAKE_EN(0) |
1173                                 KL3_IT_PORT_CONNECT_WAKE_EN(0) | KL3_IT_PORT_DISCONNECT_WAKE_EN(0));
1174                         reg &=  ~(KL3_IT_PORT_WAKEUP_ENABLE(1) | KL3_IT_PORT_RESUME_WAKE_EN(1) |
1175                                 KL3_IT_PORT_CONNECT_WAKE_EN(1) | KL3_IT_PORT_DISCONNECT_WAKE_EN(1));
1176                         MACIO_OUT32(KEYLARGO_FCR3, reg);
1177                         (void)MACIO_IN32(KEYLARGO_FCR3);
1178                         udelay(10);
1179                 }
1180                 if (macio->type == macio_intrepid) {
1181                         /* wait for clock stopped bits to clear */
1182                         u32 test0 = 0, test1 = 0;
1183                         u32 status0, status1;
1184                         int timeout = 1000;
1185
1186                         UNLOCK(flags);
1187                         switch (number) {
1188                         case 0:
1189                                 test0 = UNI_N_CLOCK_STOPPED_USB0;
1190                                 test1 = UNI_N_CLOCK_STOPPED_USB0PCI;
1191                                 break;
1192                         case 2:
1193                                 test0 = UNI_N_CLOCK_STOPPED_USB1;
1194                                 test1 = UNI_N_CLOCK_STOPPED_USB1PCI;
1195                                 break;
1196                         case 4:
1197                                 test0 = UNI_N_CLOCK_STOPPED_USB2;
1198                                 test1 = UNI_N_CLOCK_STOPPED_USB2PCI;
1199                                 break;
1200                         }
1201                         do {
1202                                 if (--timeout <= 0) {
1203                                         printk(KERN_ERR "core99_usb_enable: "
1204                                                "Timeout waiting for clocks\n");
1205                                         break;
1206                                 }
1207                                 mdelay(1);
1208                                 status0 = UN_IN(UNI_N_CLOCK_STOP_STATUS0);
1209                                 status1 = UN_IN(UNI_N_CLOCK_STOP_STATUS1);
1210                         } while ((status0 & test0) | (status1 & test1));
1211                         LOCK(flags);
1212                 }
1213         } else {
1214                 /* Turn OFF */
1215                 if (number < 4) {
1216                         reg = MACIO_IN32(KEYLARGO_FCR4);
1217                         reg |=  KL4_PORT_WAKEUP_ENABLE(number) | KL4_PORT_RESUME_WAKE_EN(number) |
1218                                 KL4_PORT_CONNECT_WAKE_EN(number) | KL4_PORT_DISCONNECT_WAKE_EN(number);
1219                         reg |=  KL4_PORT_WAKEUP_ENABLE(number+1) | KL4_PORT_RESUME_WAKE_EN(number+1) |
1220                                 KL4_PORT_CONNECT_WAKE_EN(number+1) | KL4_PORT_DISCONNECT_WAKE_EN(number+1);
1221                         MACIO_OUT32(KEYLARGO_FCR4, reg);
1222                         (void)MACIO_IN32(KEYLARGO_FCR4);
1223                         udelay(1);
1224                 } else {
1225                         reg = MACIO_IN32(KEYLARGO_FCR3);
1226                         reg |=  KL3_IT_PORT_WAKEUP_ENABLE(0) | KL3_IT_PORT_RESUME_WAKE_EN(0) |
1227                                 KL3_IT_PORT_CONNECT_WAKE_EN(0) | KL3_IT_PORT_DISCONNECT_WAKE_EN(0);
1228                         reg |=  KL3_IT_PORT_WAKEUP_ENABLE(1) | KL3_IT_PORT_RESUME_WAKE_EN(1) |
1229                                 KL3_IT_PORT_CONNECT_WAKE_EN(1) | KL3_IT_PORT_DISCONNECT_WAKE_EN(1);
1230                         MACIO_OUT32(KEYLARGO_FCR3, reg);
1231                         (void)MACIO_IN32(KEYLARGO_FCR3);
1232                         udelay(1);
1233                 }
1234                 if (number == 0) {
1235                         if (macio->type != macio_intrepid)
1236                                 MACIO_BIC(KEYLARGO_FCR0, KL0_USB0_CELL_ENABLE);
1237                         (void)MACIO_IN32(KEYLARGO_FCR0);
1238                         udelay(1);
1239                         MACIO_BIS(KEYLARGO_FCR0, (KL0_USB0_PAD_SUSPEND0 | KL0_USB0_PAD_SUSPEND1));
1240                         (void)MACIO_IN32(KEYLARGO_FCR0);
1241                 } else if (number == 2) {
1242                         if (macio->type != macio_intrepid)
1243                                 MACIO_BIC(KEYLARGO_FCR0, KL0_USB1_CELL_ENABLE);
1244                         (void)MACIO_IN32(KEYLARGO_FCR0);
1245                         udelay(1);
1246                         MACIO_BIS(KEYLARGO_FCR0, (KL0_USB1_PAD_SUSPEND0 | KL0_USB1_PAD_SUSPEND1));
1247                         (void)MACIO_IN32(KEYLARGO_FCR0);
1248                 } else if (number == 4) {
1249                         udelay(1);
1250                         MACIO_BIS(KEYLARGO_FCR1, (KL1_USB2_PAD_SUSPEND0 | KL1_USB2_PAD_SUSPEND1));
1251                         (void)MACIO_IN32(KEYLARGO_FCR1);
1252                 }
1253                 udelay(1);
1254         }
1255         UNLOCK(flags);
1256
1257         return 0;
1258 }
1259
1260 static long __pmac
1261 core99_firewire_enable(struct device_node* node, long param, long value)
1262 {
1263         unsigned long flags;
1264         struct macio_chip* macio;
1265
1266         macio = &macio_chips[0];
1267         if (macio->type != macio_keylargo && macio->type != macio_pangea &&
1268             macio->type != macio_intrepid)
1269                 return -ENODEV;
1270         if (!(macio->flags & MACIO_FLAG_FW_SUPPORTED))
1271                 return -ENODEV;
1272
1273         LOCK(flags);
1274         if (value) {
1275                 UN_BIS(UNI_N_CLOCK_CNTL, UNI_N_CLOCK_CNTL_FW);
1276                 (void)UN_IN(UNI_N_CLOCK_CNTL);
1277         } else {
1278                 UN_BIC(UNI_N_CLOCK_CNTL, UNI_N_CLOCK_CNTL_FW);
1279                 (void)UN_IN(UNI_N_CLOCK_CNTL);
1280         }
1281         UNLOCK(flags);
1282         mdelay(1);
1283
1284         return 0;
1285 }
1286
1287 static long __pmac
1288 core99_firewire_cable_power(struct device_node* node, long param, long value)
1289 {
1290         unsigned long flags;
1291         struct macio_chip* macio;
1292
1293         /* Trick: we allow NULL node */
1294         if ((pmac_mb.board_flags & PMAC_MB_HAS_FW_POWER) == 0)
1295                 return -ENODEV;
1296         macio = &macio_chips[0];
1297         if (macio->type != macio_keylargo && macio->type != macio_pangea &&
1298             macio->type != macio_intrepid)
1299                 return -ENODEV;
1300         if (!(macio->flags & MACIO_FLAG_FW_SUPPORTED))
1301                 return -ENODEV;
1302
1303         LOCK(flags);
1304         if (value) {
1305                 MACIO_OUT8(KL_GPIO_FW_CABLE_POWER , 0);
1306                 MACIO_IN8(KL_GPIO_FW_CABLE_POWER);
1307                 udelay(10);
1308         } else {
1309                 MACIO_OUT8(KL_GPIO_FW_CABLE_POWER , 4);
1310                 MACIO_IN8(KL_GPIO_FW_CABLE_POWER); udelay(10);
1311         }
1312         UNLOCK(flags);
1313         mdelay(1);
1314
1315         return 0;
1316 }
1317
1318 static long __pmac
1319 intrepid_aack_delay_enable(struct device_node* node, long param, long value)
1320 {
1321         unsigned long flags;
1322
1323         if (uninorth_rev < 0xd2)
1324                 return -ENODEV;
1325
1326         LOCK(flags);
1327         if (param)
1328                 UN_BIS(UNI_N_AACK_DELAY, UNI_N_AACK_DELAY_ENABLE);
1329         else
1330                 UN_BIC(UNI_N_AACK_DELAY, UNI_N_AACK_DELAY_ENABLE);
1331         UNLOCK(flags);
1332
1333         return 0;
1334 }
1335
1336
1337 #endif /* CONFIG_POWER4 */
1338
1339 static long __pmac
1340 core99_read_gpio(struct device_node* node, long param, long value)
1341 {
1342         struct macio_chip* macio = &macio_chips[0];
1343
1344         return MACIO_IN8(param);
1345 }
1346
1347
1348 static long __pmac
1349 core99_write_gpio(struct device_node* node, long param, long value)
1350 {
1351         struct macio_chip* macio = &macio_chips[0];
1352
1353         MACIO_OUT8(param, (u8)(value & 0xff));
1354         return 0;
1355 }
1356
1357 #ifdef CONFIG_POWER4
1358
1359 static long __pmac
1360 g5_gmac_enable(struct device_node* node, long param, long value)
1361 {
1362         struct macio_chip* macio = &macio_chips[0];
1363         unsigned long flags;
1364         u8 pbus, pid;
1365
1366         LOCK(flags);
1367         if (value) {
1368                 MACIO_BIS(KEYLARGO_FCR1, K2_FCR1_GMAC_CLK_ENABLE);
1369                 mb();
1370                 k2_skiplist[0] = NULL;
1371         } else {
1372                 k2_skiplist[0] = node;
1373                 mb();
1374                 MACIO_BIC(KEYLARGO_FCR1, K2_FCR1_GMAC_CLK_ENABLE);
1375         }
1376
1377         UNLOCK(flags);
1378         mdelay(1);
1379
1380         return 0;
1381 }
1382
1383 static long __pmac
1384 g5_fw_enable(struct device_node* node, long param, long value)
1385 {
1386         struct macio_chip* macio = &macio_chips[0];
1387         unsigned long flags;
1388
1389         LOCK(flags);
1390         if (value) {
1391                 MACIO_BIS(KEYLARGO_FCR1, K2_FCR1_FW_CLK_ENABLE);
1392                 mb();
1393                 k2_skiplist[1] = NULL;
1394         } else {
1395                 k2_skiplist[1] = node;
1396                 mb();
1397                 MACIO_BIC(KEYLARGO_FCR1, K2_FCR1_FW_CLK_ENABLE);
1398         }
1399
1400         UNLOCK(flags);
1401         mdelay(1);
1402
1403         return 0;
1404 }
1405
1406 static long __pmac
1407 g5_mpic_enable(struct device_node* node, long param, long value)
1408 {
1409         unsigned long flags;
1410
1411         if (node->parent == NULL || strcmp(node->parent->name, "u3"))
1412                 return 0;
1413
1414         LOCK(flags);
1415         UN_BIS(U3_TOGGLE_REG, U3_MPIC_RESET | U3_MPIC_OUTPUT_ENABLE);
1416         UNLOCK(flags);
1417
1418         return 0;
1419 }
1420
1421 #ifdef CONFIG_SMP
1422 static long __pmac
1423 g5_reset_cpu(struct device_node* node, long param, long value)
1424 {
1425         unsigned int reset_io = 0;
1426         unsigned long flags;
1427         struct macio_chip* macio;
1428         struct device_node* np;
1429
1430         macio = &macio_chips[0];
1431         if (macio->type != macio_keylargo2)
1432                 return -ENODEV;
1433
1434         np = find_path_device("/cpus");
1435         if (np == NULL)
1436                 return -ENODEV;
1437         for (np = np->child; np != NULL; np = np->sibling) {
1438                 u32* num = (u32 *)get_property(np, "reg", NULL);
1439                 u32* rst = (u32 *)get_property(np, "soft-reset", NULL);
1440                 if (num == NULL || rst == NULL)
1441                         continue;
1442                 if (param == *num) {
1443                         reset_io = *rst;
1444                         break;
1445                 }
1446         }
1447         if (np == NULL || reset_io == 0)
1448                 return -ENODEV;
1449
1450         LOCK(flags);
1451         MACIO_OUT8(reset_io, KEYLARGO_GPIO_OUTPUT_ENABLE);
1452         (void)MACIO_IN8(reset_io);
1453         udelay(1);
1454         MACIO_OUT8(reset_io, 0);
1455         (void)MACIO_IN8(reset_io);
1456         UNLOCK(flags);
1457
1458         return 0;
1459 }
1460 #endif /* CONFIG_SMP */
1461
1462 /*
1463  * This can be called from pmac_smp so isn't static
1464  *
1465  * This takes the second CPU off the bus on dual CPU machines
1466  * running UP
1467  */
1468 void __pmac g5_phy_disable_cpu1(void)
1469 {
1470         UN_OUT(U3_API_PHY_CONFIG_1, 0);
1471 }
1472
1473 #endif /* CONFIG_POWER4 */
1474
1475 #ifndef CONFIG_POWER4
1476
1477 static void __pmac
1478 keylargo_shutdown(struct macio_chip* macio, int sleep_mode)
1479 {
1480         u32 temp;
1481
1482         if (sleep_mode) {
1483                 mdelay(1);
1484                 MACIO_BIS(KEYLARGO_FCR0, KL0_USB_REF_SUSPEND);
1485                 (void)MACIO_IN32(KEYLARGO_FCR0);
1486                 mdelay(1);
1487         }
1488
1489         MACIO_BIC(KEYLARGO_FCR0,KL0_SCCA_ENABLE | KL0_SCCB_ENABLE |
1490                                 KL0_SCC_CELL_ENABLE |
1491                                 KL0_IRDA_ENABLE | KL0_IRDA_CLK32_ENABLE |
1492                                 KL0_IRDA_CLK19_ENABLE);
1493
1494         MACIO_BIC(KEYLARGO_MBCR, KL_MBCR_MB0_DEV_MASK);
1495         MACIO_BIS(KEYLARGO_MBCR, KL_MBCR_MB0_IDE_ENABLE);
1496
1497         MACIO_BIC(KEYLARGO_FCR1,
1498                 KL1_AUDIO_SEL_22MCLK | KL1_AUDIO_CLK_ENABLE_BIT |
1499                 KL1_AUDIO_CLK_OUT_ENABLE | KL1_AUDIO_CELL_ENABLE |
1500                 KL1_I2S0_CELL_ENABLE | KL1_I2S0_CLK_ENABLE_BIT |
1501                 KL1_I2S0_ENABLE | KL1_I2S1_CELL_ENABLE |
1502                 KL1_I2S1_CLK_ENABLE_BIT | KL1_I2S1_ENABLE |
1503                 KL1_EIDE0_ENABLE | KL1_EIDE0_RESET_N |
1504                 KL1_EIDE1_ENABLE | KL1_EIDE1_RESET_N |
1505                 KL1_UIDE_ENABLE);
1506
1507         MACIO_BIS(KEYLARGO_FCR2, KL2_ALT_DATA_OUT);
1508         MACIO_BIC(KEYLARGO_FCR2, KL2_IOBUS_ENABLE);
1509
1510         temp = MACIO_IN32(KEYLARGO_FCR3);
1511         if (macio->rev >= 2) {
1512                 temp |= KL3_SHUTDOWN_PLL2X;
1513                 if (sleep_mode)
1514                         temp |= KL3_SHUTDOWN_PLL_TOTAL;
1515         }
1516
1517         temp |= KL3_SHUTDOWN_PLLKW6 | KL3_SHUTDOWN_PLLKW4 |
1518                 KL3_SHUTDOWN_PLLKW35;
1519         if (sleep_mode)
1520                 temp |= KL3_SHUTDOWN_PLLKW12;
1521         temp &= ~(KL3_CLK66_ENABLE | KL3_CLK49_ENABLE | KL3_CLK45_ENABLE
1522                 | KL3_CLK31_ENABLE | KL3_I2S1_CLK18_ENABLE | KL3_I2S0_CLK18_ENABLE);
1523         if (sleep_mode)
1524                 temp &= ~(KL3_TIMER_CLK18_ENABLE | KL3_VIA_CLK16_ENABLE);
1525         MACIO_OUT32(KEYLARGO_FCR3, temp);
1526
1527         /* Flush posted writes & wait a bit */
1528         (void)MACIO_IN32(KEYLARGO_FCR0); mdelay(1);
1529 }
1530
1531 static void __pmac
1532 pangea_shutdown(struct macio_chip* macio, int sleep_mode)
1533 {
1534         u32 temp;
1535
1536         MACIO_BIC(KEYLARGO_FCR0,KL0_SCCA_ENABLE | KL0_SCCB_ENABLE |
1537                                 KL0_SCC_CELL_ENABLE |
1538                                 KL0_USB0_CELL_ENABLE | KL0_USB1_CELL_ENABLE);
1539
1540         MACIO_BIC(KEYLARGO_FCR1,
1541                 KL1_AUDIO_SEL_22MCLK | KL1_AUDIO_CLK_ENABLE_BIT |
1542                 KL1_AUDIO_CLK_OUT_ENABLE | KL1_AUDIO_CELL_ENABLE |
1543                 KL1_I2S0_CELL_ENABLE | KL1_I2S0_CLK_ENABLE_BIT |
1544                 KL1_I2S0_ENABLE | KL1_I2S1_CELL_ENABLE |
1545                 KL1_I2S1_CLK_ENABLE_BIT | KL1_I2S1_ENABLE |
1546                 KL1_UIDE_ENABLE);
1547         if (pmac_mb.board_flags & PMAC_MB_MOBILE)
1548                 MACIO_BIC(KEYLARGO_FCR1, KL1_UIDE_RESET_N);
1549
1550         MACIO_BIS(KEYLARGO_FCR2, KL2_ALT_DATA_OUT);
1551
1552         temp = MACIO_IN32(KEYLARGO_FCR3);
1553         temp |= KL3_SHUTDOWN_PLLKW6 | KL3_SHUTDOWN_PLLKW4 |
1554                 KL3_SHUTDOWN_PLLKW35;
1555         temp &= ~(KL3_CLK49_ENABLE | KL3_CLK45_ENABLE | KL3_CLK31_ENABLE
1556                 | KL3_I2S0_CLK18_ENABLE | KL3_I2S1_CLK18_ENABLE);
1557         if (sleep_mode)
1558                 temp &= ~(KL3_VIA_CLK16_ENABLE | KL3_TIMER_CLK18_ENABLE);
1559         MACIO_OUT32(KEYLARGO_FCR3, temp);
1560
1561         /* Flush posted writes & wait a bit */
1562         (void)MACIO_IN32(KEYLARGO_FCR0); mdelay(1);
1563 }
1564
1565 static void __pmac
1566 intrepid_shutdown(struct macio_chip* macio, int sleep_mode)
1567 {
1568         u32 temp;
1569
1570         MACIO_BIC(KEYLARGO_FCR0,KL0_SCCA_ENABLE | KL0_SCCB_ENABLE |
1571                   KL0_SCC_CELL_ENABLE);
1572
1573         MACIO_BIC(KEYLARGO_FCR1,
1574                   /*KL1_USB2_CELL_ENABLE |*/
1575                 KL1_I2S0_CELL_ENABLE | KL1_I2S0_CLK_ENABLE_BIT |
1576                 KL1_I2S0_ENABLE | KL1_I2S1_CELL_ENABLE |
1577                 KL1_I2S1_CLK_ENABLE_BIT | KL1_I2S1_ENABLE);
1578         if (pmac_mb.board_flags & PMAC_MB_MOBILE)
1579                 MACIO_BIC(KEYLARGO_FCR1, KL1_UIDE_RESET_N);
1580
1581         temp = MACIO_IN32(KEYLARGO_FCR3);
1582         temp &= ~(KL3_CLK49_ENABLE | KL3_CLK45_ENABLE |
1583                   KL3_I2S1_CLK18_ENABLE | KL3_I2S0_CLK18_ENABLE);
1584         if (sleep_mode)
1585                 temp &= ~(KL3_TIMER_CLK18_ENABLE | KL3_IT_VIA_CLK32_ENABLE);
1586         MACIO_OUT32(KEYLARGO_FCR3, temp);
1587
1588         /* Flush posted writes & wait a bit */
1589         (void)MACIO_IN32(KEYLARGO_FCR0);
1590         mdelay(10);
1591 }
1592
1593 static int __pmac
1594 core99_sleep(void)
1595 {
1596         struct macio_chip* macio;
1597         int i;
1598
1599         macio = &macio_chips[0];
1600         if (macio->type != macio_keylargo && macio->type != macio_pangea &&
1601             macio->type != macio_intrepid)
1602                 return -ENODEV;
1603
1604         /* The device-tree contains that in the hwclock node */
1605         if (macio->type == macio_intrepid) {
1606                 UN_OUT(UNI_N_CLOCK_SPREADING, 0);
1607                 mdelay(40);
1608         }
1609
1610         /* We power off the wireless slot in case it was not done
1611          * by the driver. We don't power it on automatically however
1612          */
1613         if (macio->flags & MACIO_FLAG_AIRPORT_ON)
1614                 core99_airport_enable(macio->of_node, 0, 0);
1615
1616         /* We power off the FW cable. Should be done by the driver... */
1617         if (macio->flags & MACIO_FLAG_FW_SUPPORTED) {
1618                 core99_firewire_enable(NULL, 0, 0);
1619                 core99_firewire_cable_power(NULL, 0, 0);
1620         }
1621
1622         /* We make sure int. modem is off (in case driver lost it) */
1623         if (macio->type == macio_keylargo)
1624                 core99_modem_enable(macio->of_node, 0, 0);
1625         else
1626                 pangea_modem_enable(macio->of_node, 0, 0);
1627
1628         /* We make sure the sound is off as well */
1629         core99_sound_chip_enable(macio->of_node, 0, 0);
1630
1631         /*
1632          * Save various bits of KeyLargo
1633          */
1634
1635         /* Save the state of the various GPIOs */
1636         save_gpio_levels[0] = MACIO_IN32(KEYLARGO_GPIO_LEVELS0);
1637         save_gpio_levels[1] = MACIO_IN32(KEYLARGO_GPIO_LEVELS1);
1638         for (i=0; i<KEYLARGO_GPIO_EXTINT_CNT; i++)
1639                 save_gpio_extint[i] = MACIO_IN8(KEYLARGO_GPIO_EXTINT_0+i);
1640         for (i=0; i<KEYLARGO_GPIO_CNT; i++)
1641                 save_gpio_normal[i] = MACIO_IN8(KEYLARGO_GPIO_0+i);
1642
1643         /* Save the FCRs */
1644         if (macio->type == macio_keylargo)
1645                 save_mbcr = MACIO_IN32(KEYLARGO_MBCR);
1646         save_fcr[0] = MACIO_IN32(KEYLARGO_FCR0);
1647         save_fcr[1] = MACIO_IN32(KEYLARGO_FCR1);
1648         save_fcr[2] = MACIO_IN32(KEYLARGO_FCR2);
1649         save_fcr[3] = MACIO_IN32(KEYLARGO_FCR3);
1650         save_fcr[4] = MACIO_IN32(KEYLARGO_FCR4);
1651         if (macio->type == macio_pangea || macio->type == macio_intrepid)
1652                 save_fcr[5] = MACIO_IN32(KEYLARGO_FCR5);
1653
1654         /* Save state & config of DBDMA channels */
1655         dbdma_save(macio, save_dbdma);
1656
1657         /*
1658          * Turn off as much as we can
1659          */
1660         if (macio->type == macio_pangea)
1661                 pangea_shutdown(macio, 1);
1662         else if (macio->type == macio_intrepid)
1663                 intrepid_shutdown(macio, 1);
1664         else if (macio->type == macio_keylargo)
1665                 keylargo_shutdown(macio, 1);
1666
1667         /*
1668          * Put the host bridge to sleep
1669          */
1670
1671         save_unin_clock_ctl = UN_IN(UNI_N_CLOCK_CNTL);
1672         /* Note: do not switch GMAC off, driver does it when necessary, WOL must keep it
1673          * enabled !
1674          */
1675         UN_OUT(UNI_N_CLOCK_CNTL, save_unin_clock_ctl &
1676                ~(/*UNI_N_CLOCK_CNTL_GMAC|*/UNI_N_CLOCK_CNTL_FW/*|UNI_N_CLOCK_CNTL_PCI*/));
1677         udelay(100);
1678         UN_OUT(UNI_N_HWINIT_STATE, UNI_N_HWINIT_STATE_SLEEPING);
1679         UN_OUT(UNI_N_POWER_MGT, UNI_N_POWER_MGT_SLEEP);
1680         mdelay(10);
1681
1682         /*
1683          * FIXME: A bit of black magic with OpenPIC (don't ask me why)
1684          */
1685         if (pmac_mb.model_id == PMAC_TYPE_SAWTOOTH) {
1686                 MACIO_BIS(0x506e0, 0x00400000);
1687                 MACIO_BIS(0x506e0, 0x80000000);
1688         }
1689         return 0;
1690 }
1691
1692 static int __pmac
1693 core99_wake_up(void)
1694 {
1695         struct macio_chip* macio;
1696         int i;
1697
1698         macio = &macio_chips[0];
1699         if (macio->type != macio_keylargo && macio->type != macio_pangea &&
1700             macio->type != macio_intrepid)
1701                 return -ENODEV;
1702
1703         /*
1704          * Wakeup the host bridge
1705          */
1706         UN_OUT(UNI_N_POWER_MGT, UNI_N_POWER_MGT_NORMAL);
1707         udelay(10);
1708         UN_OUT(UNI_N_HWINIT_STATE, UNI_N_HWINIT_STATE_RUNNING);
1709         udelay(10);
1710
1711         /*
1712          * Restore KeyLargo
1713          */
1714
1715         if (macio->type == macio_keylargo) {
1716                 MACIO_OUT32(KEYLARGO_MBCR, save_mbcr);
1717                 (void)MACIO_IN32(KEYLARGO_MBCR); udelay(10);
1718         }
1719         MACIO_OUT32(KEYLARGO_FCR0, save_fcr[0]);
1720         (void)MACIO_IN32(KEYLARGO_FCR0); udelay(10);
1721         MACIO_OUT32(KEYLARGO_FCR1, save_fcr[1]);
1722         (void)MACIO_IN32(KEYLARGO_FCR1); udelay(10);
1723         MACIO_OUT32(KEYLARGO_FCR2, save_fcr[2]);
1724         (void)MACIO_IN32(KEYLARGO_FCR2); udelay(10);
1725         MACIO_OUT32(KEYLARGO_FCR3, save_fcr[3]);
1726         (void)MACIO_IN32(KEYLARGO_FCR3); udelay(10);
1727         MACIO_OUT32(KEYLARGO_FCR4, save_fcr[4]);
1728         (void)MACIO_IN32(KEYLARGO_FCR4); udelay(10);
1729         if (macio->type == macio_pangea || macio->type == macio_intrepid) {
1730                 MACIO_OUT32(KEYLARGO_FCR5, save_fcr[5]);
1731                 (void)MACIO_IN32(KEYLARGO_FCR5); udelay(10);
1732         }
1733
1734         dbdma_restore(macio, save_dbdma);
1735
1736         MACIO_OUT32(KEYLARGO_GPIO_LEVELS0, save_gpio_levels[0]);
1737         MACIO_OUT32(KEYLARGO_GPIO_LEVELS1, save_gpio_levels[1]);
1738         for (i=0; i<KEYLARGO_GPIO_EXTINT_CNT; i++)
1739                 MACIO_OUT8(KEYLARGO_GPIO_EXTINT_0+i, save_gpio_extint[i]);
1740         for (i=0; i<KEYLARGO_GPIO_CNT; i++)
1741                 MACIO_OUT8(KEYLARGO_GPIO_0+i, save_gpio_normal[i]);
1742
1743         /* FIXME more black magic with OpenPIC ... */
1744         if (pmac_mb.model_id == PMAC_TYPE_SAWTOOTH) {
1745                 MACIO_BIC(0x506e0, 0x00400000);
1746                 MACIO_BIC(0x506e0, 0x80000000);
1747         }
1748
1749         UN_OUT(UNI_N_CLOCK_CNTL, save_unin_clock_ctl);
1750         udelay(100);
1751
1752         /* Restore clock spreading */
1753         if (macio->type == macio_intrepid) {
1754                 UN_OUT(UNI_N_CLOCK_SPREADING, 2);
1755                 mdelay(40);
1756         }
1757
1758         return 0;
1759 }
1760
1761 static long __pmac
1762 core99_sleep_state(struct device_node* node, long param, long value)
1763 {
1764         /* Param == 1 means to enter the "fake sleep" mode that is
1765          * used for CPU speed switch
1766          */
1767         if (param == 1) {
1768                 if (value == 1) {
1769                         UN_OUT(UNI_N_HWINIT_STATE, UNI_N_HWINIT_STATE_SLEEPING);
1770                         UN_OUT(UNI_N_POWER_MGT, UNI_N_POWER_MGT_IDLE2);
1771                 } else {
1772                         UN_OUT(UNI_N_POWER_MGT, UNI_N_POWER_MGT_NORMAL);
1773                         udelay(10);
1774                         UN_OUT(UNI_N_HWINIT_STATE, UNI_N_HWINIT_STATE_RUNNING);
1775                         udelay(10);
1776                 }
1777                 return 0;
1778         }
1779         if ((pmac_mb.board_flags & PMAC_MB_CAN_SLEEP) == 0)
1780                 return -EPERM;
1781
1782 #ifdef CONFIG_CPU_FREQ_PMAC
1783         /* XXX should be elsewhere */
1784         if (machine_is_compatible("PowerBook6,5") ||
1785             machine_is_compatible("PowerBook6,4") ||
1786             machine_is_compatible("PowerBook5,5") ||
1787             machine_is_compatible("PowerBook5,4")) {
1788                 struct device_node *volt_gpio_np;
1789                 u32 *reg = NULL;
1790
1791                 volt_gpio_np = of_find_node_by_name(NULL, "cpu-vcore-select");
1792                 if (volt_gpio_np != NULL)
1793                         reg = (u32 *)get_property(volt_gpio_np, "reg", NULL);
1794                 if (reg != NULL) {
1795                         /* Set the CPU voltage high if sleeping */
1796                         if (value == 1) {
1797                                 pmac_call_feature(PMAC_FTR_WRITE_GPIO, NULL,
1798                                                   *reg, 0x05);
1799                         } else if (value == 0 && (mfspr(SPRN_HID1) & HID1_DFS)) {
1800                                 pmac_call_feature(PMAC_FTR_WRITE_GPIO, NULL,
1801                                                   *reg, 0x04);
1802                         }
1803                         mdelay(2);
1804                 }
1805         }
1806 #endif /* CONFIG_CPU_FREQ_PMAC */
1807
1808         if (value == 1)
1809                 return core99_sleep();
1810         else if (value == 0)
1811                 return core99_wake_up();
1812         return 0;
1813 }
1814
1815 #endif /* CONFIG_POWER4 */
1816
1817 static long __pmac
1818 generic_dev_can_wake(struct device_node* node, long param, long value)
1819 {
1820         /* Todo: eventually check we are really dealing with on-board
1821          * video device ...
1822          */
1823
1824         if (pmac_mb.board_flags & PMAC_MB_MAY_SLEEP)
1825                 pmac_mb.board_flags |= PMAC_MB_CAN_SLEEP;
1826         return 0;
1827 }
1828
1829 static long __pmac
1830 generic_get_mb_info(struct device_node* node, long param, long value)
1831 {
1832         switch(param) {
1833                 case PMAC_MB_INFO_MODEL:
1834                         return pmac_mb.model_id;
1835                 case PMAC_MB_INFO_FLAGS:
1836                         return pmac_mb.board_flags;
1837                 case PMAC_MB_INFO_NAME:
1838                         /* hack hack hack... but should work */
1839                         *((const char **)value) = pmac_mb.model_name;
1840                         return 0;
1841         }
1842         return -EINVAL;
1843 }
1844
1845
1846 /*
1847  * Table definitions
1848  */
1849
1850 /* Used on any machine
1851  */
1852 static struct feature_table_entry any_features[]  __pmacdata = {
1853         { PMAC_FTR_GET_MB_INFO,         generic_get_mb_info },
1854         { PMAC_FTR_DEVICE_CAN_WAKE,     generic_dev_can_wake },
1855         { 0, NULL }
1856 };
1857
1858 #ifndef CONFIG_POWER4
1859
1860 /* OHare based motherboards. Currently, we only use these on the
1861  * 2400,3400 and 3500 series powerbooks. Some older desktops seem
1862  * to have issues with turning on/off those asic cells
1863  */
1864 static struct feature_table_entry ohare_features[]  __pmacdata = {
1865         { PMAC_FTR_SCC_ENABLE,          ohare_htw_scc_enable },
1866         { PMAC_FTR_SWIM3_ENABLE,        ohare_floppy_enable },
1867         { PMAC_FTR_MESH_ENABLE,         ohare_mesh_enable },
1868         { PMAC_FTR_IDE_ENABLE,          ohare_ide_enable},
1869         { PMAC_FTR_IDE_RESET,           ohare_ide_reset},
1870         { PMAC_FTR_SLEEP_STATE,         ohare_sleep_state },
1871         { 0, NULL }
1872 };
1873
1874 /* Heathrow desktop machines (Beige G3).
1875  * Separated as some features couldn't be properly tested
1876  * and the serial port control bits appear to confuse it.
1877  */
1878 static struct feature_table_entry heathrow_desktop_features[]  __pmacdata = {
1879         { PMAC_FTR_SWIM3_ENABLE,        heathrow_floppy_enable },
1880         { PMAC_FTR_MESH_ENABLE,         heathrow_mesh_enable },
1881         { PMAC_FTR_IDE_ENABLE,          heathrow_ide_enable },
1882         { PMAC_FTR_IDE_RESET,           heathrow_ide_reset },
1883         { PMAC_FTR_BMAC_ENABLE,         heathrow_bmac_enable },
1884         { 0, NULL }
1885 };
1886
1887 /* Heathrow based laptop, that is the Wallstreet and mainstreet
1888  * powerbooks.
1889  */
1890 static struct feature_table_entry heathrow_laptop_features[]  __pmacdata = {
1891         { PMAC_FTR_SCC_ENABLE,          ohare_htw_scc_enable },
1892         { PMAC_FTR_MODEM_ENABLE,        heathrow_modem_enable },
1893         { PMAC_FTR_SWIM3_ENABLE,        heathrow_floppy_enable },
1894         { PMAC_FTR_MESH_ENABLE,         heathrow_mesh_enable },
1895         { PMAC_FTR_IDE_ENABLE,          heathrow_ide_enable },
1896         { PMAC_FTR_IDE_RESET,           heathrow_ide_reset },
1897         { PMAC_FTR_BMAC_ENABLE,         heathrow_bmac_enable },
1898         { PMAC_FTR_SOUND_CHIP_ENABLE,   heathrow_sound_enable },
1899         { PMAC_FTR_SLEEP_STATE,         heathrow_sleep_state },
1900         { 0, NULL }
1901 };
1902
1903 /* Paddington based machines
1904  * The lombard (101) powerbook, first iMac models, B&W G3 and Yikes G4.
1905  */
1906 static struct feature_table_entry paddington_features[]  __pmacdata = {
1907         { PMAC_FTR_SCC_ENABLE,          ohare_htw_scc_enable },
1908         { PMAC_FTR_MODEM_ENABLE,        heathrow_modem_enable },
1909         { PMAC_FTR_SWIM3_ENABLE,        heathrow_floppy_enable },
1910         { PMAC_FTR_MESH_ENABLE,         heathrow_mesh_enable },
1911         { PMAC_FTR_IDE_ENABLE,          heathrow_ide_enable },
1912         { PMAC_FTR_IDE_RESET,           heathrow_ide_reset },
1913         { PMAC_FTR_BMAC_ENABLE,         heathrow_bmac_enable },
1914         { PMAC_FTR_SOUND_CHIP_ENABLE,   heathrow_sound_enable },
1915         { PMAC_FTR_SLEEP_STATE,         heathrow_sleep_state },
1916         { 0, NULL }
1917 };
1918
1919 /* Core99 & MacRISC 2 machines (all machines released since the
1920  * iBook (included), that is all AGP machines, except pangea
1921  * chipset. The pangea chipset is the "combo" UniNorth/KeyLargo
1922  * used on iBook2 & iMac "flow power".
1923  */
1924 static struct feature_table_entry core99_features[]  __pmacdata = {
1925         { PMAC_FTR_SCC_ENABLE,          core99_scc_enable },
1926         { PMAC_FTR_MODEM_ENABLE,        core99_modem_enable },
1927         { PMAC_FTR_IDE_ENABLE,          core99_ide_enable },
1928         { PMAC_FTR_IDE_RESET,           core99_ide_reset },
1929         { PMAC_FTR_GMAC_ENABLE,         core99_gmac_enable },
1930         { PMAC_FTR_GMAC_PHY_RESET,      core99_gmac_phy_reset },
1931         { PMAC_FTR_SOUND_CHIP_ENABLE,   core99_sound_chip_enable },
1932         { PMAC_FTR_AIRPORT_ENABLE,      core99_airport_enable },
1933         { PMAC_FTR_USB_ENABLE,          core99_usb_enable },
1934         { PMAC_FTR_1394_ENABLE,         core99_firewire_enable },
1935         { PMAC_FTR_1394_CABLE_POWER,    core99_firewire_cable_power },
1936         { PMAC_FTR_SLEEP_STATE,         core99_sleep_state },
1937 #ifdef CONFIG_SMP
1938         { PMAC_FTR_RESET_CPU,           core99_reset_cpu },
1939 #endif /* CONFIG_SMP */
1940         { PMAC_FTR_READ_GPIO,           core99_read_gpio },
1941         { PMAC_FTR_WRITE_GPIO,          core99_write_gpio },
1942         { 0, NULL }
1943 };
1944
1945 /* RackMac
1946  */
1947 static struct feature_table_entry rackmac_features[]  __pmacdata = {
1948         { PMAC_FTR_SCC_ENABLE,          core99_scc_enable },
1949         { PMAC_FTR_IDE_ENABLE,          core99_ide_enable },
1950         { PMAC_FTR_IDE_RESET,           core99_ide_reset },
1951         { PMAC_FTR_GMAC_ENABLE,         core99_gmac_enable },
1952         { PMAC_FTR_GMAC_PHY_RESET,      core99_gmac_phy_reset },
1953         { PMAC_FTR_USB_ENABLE,          core99_usb_enable },
1954         { PMAC_FTR_1394_ENABLE,         core99_firewire_enable },
1955         { PMAC_FTR_1394_CABLE_POWER,    core99_firewire_cable_power },
1956         { PMAC_FTR_SLEEP_STATE,         core99_sleep_state },
1957 #ifdef CONFIG_SMP
1958         { PMAC_FTR_RESET_CPU,           core99_reset_cpu },
1959 #endif /* CONFIG_SMP */
1960         { PMAC_FTR_READ_GPIO,           core99_read_gpio },
1961         { PMAC_FTR_WRITE_GPIO,          core99_write_gpio },
1962         { 0, NULL }
1963 };
1964
1965 /* Pangea features
1966  */
1967 static struct feature_table_entry pangea_features[]  __pmacdata = {
1968         { PMAC_FTR_SCC_ENABLE,          core99_scc_enable },
1969         { PMAC_FTR_MODEM_ENABLE,        pangea_modem_enable },
1970         { PMAC_FTR_IDE_ENABLE,          core99_ide_enable },
1971         { PMAC_FTR_IDE_RESET,           core99_ide_reset },
1972         { PMAC_FTR_GMAC_ENABLE,         core99_gmac_enable },
1973         { PMAC_FTR_GMAC_PHY_RESET,      core99_gmac_phy_reset },
1974         { PMAC_FTR_SOUND_CHIP_ENABLE,   core99_sound_chip_enable },
1975         { PMAC_FTR_AIRPORT_ENABLE,      core99_airport_enable },
1976         { PMAC_FTR_USB_ENABLE,          core99_usb_enable },
1977         { PMAC_FTR_1394_ENABLE,         core99_firewire_enable },
1978         { PMAC_FTR_1394_CABLE_POWER,    core99_firewire_cable_power },
1979         { PMAC_FTR_SLEEP_STATE,         core99_sleep_state },
1980         { PMAC_FTR_READ_GPIO,           core99_read_gpio },
1981         { PMAC_FTR_WRITE_GPIO,          core99_write_gpio },
1982         { 0, NULL }
1983 };
1984
1985 /* Intrepid features
1986  */
1987 static struct feature_table_entry intrepid_features[]  __pmacdata = {
1988         { PMAC_FTR_SCC_ENABLE,          core99_scc_enable },
1989         { PMAC_FTR_MODEM_ENABLE,        pangea_modem_enable },
1990         { PMAC_FTR_IDE_ENABLE,          core99_ide_enable },
1991         { PMAC_FTR_IDE_RESET,           core99_ide_reset },
1992         { PMAC_FTR_GMAC_ENABLE,         core99_gmac_enable },
1993         { PMAC_FTR_GMAC_PHY_RESET,      core99_gmac_phy_reset },
1994         { PMAC_FTR_SOUND_CHIP_ENABLE,   core99_sound_chip_enable },
1995         { PMAC_FTR_AIRPORT_ENABLE,      core99_airport_enable },
1996         { PMAC_FTR_USB_ENABLE,          core99_usb_enable },
1997         { PMAC_FTR_1394_ENABLE,         core99_firewire_enable },
1998         { PMAC_FTR_1394_CABLE_POWER,    core99_firewire_cable_power },
1999         { PMAC_FTR_SLEEP_STATE,         core99_sleep_state },
2000         { PMAC_FTR_READ_GPIO,           core99_read_gpio },
2001         { PMAC_FTR_WRITE_GPIO,          core99_write_gpio },
2002         { PMAC_FTR_AACK_DELAY_ENABLE,   intrepid_aack_delay_enable },
2003         { 0, NULL }
2004 };
2005
2006 #else /* CONFIG_POWER4 */
2007
2008 /* G5 features
2009  */
2010 static struct feature_table_entry g5_features[]  __pmacdata = {
2011         { PMAC_FTR_GMAC_ENABLE,         g5_gmac_enable },
2012         { PMAC_FTR_1394_ENABLE,         g5_fw_enable },
2013         { PMAC_FTR_ENABLE_MPIC,         g5_mpic_enable },
2014 #ifdef CONFIG_SMP
2015         { PMAC_FTR_RESET_CPU,           g5_reset_cpu },
2016 #endif /* CONFIG_SMP */
2017         { PMAC_FTR_READ_GPIO,           core99_read_gpio },
2018         { PMAC_FTR_WRITE_GPIO,          core99_write_gpio },
2019         { 0, NULL }
2020 };
2021
2022 #endif /* CONFIG_POWER4 */
2023
2024 static struct pmac_mb_def pmac_mb_defs[] __pmacdata = {
2025 #ifndef CONFIG_POWER4
2026         /*
2027          * Desktops
2028          */
2029
2030         {       "AAPL,8500",                    "PowerMac 8500/8600",
2031                 PMAC_TYPE_PSURGE,               NULL,
2032                 0
2033         },
2034         {       "AAPL,9500",                    "PowerMac 9500/9600",
2035                 PMAC_TYPE_PSURGE,               NULL,
2036                 0
2037         },
2038         {       "AAPL,7200",                    "PowerMac 7200",
2039                 PMAC_TYPE_PSURGE,               NULL,
2040                 0
2041         },
2042         {       "AAPL,7300",                    "PowerMac 7200/7300",
2043                 PMAC_TYPE_PSURGE,               NULL,
2044                 0
2045         },
2046         {       "AAPL,7500",                    "PowerMac 7500",
2047                 PMAC_TYPE_PSURGE,               NULL,
2048                 0
2049         },
2050         {       "AAPL,ShinerESB",               "Apple Network Server",
2051                 PMAC_TYPE_ANS,                  NULL,
2052                 0
2053         },
2054         {       "AAPL,e407",                    "Alchemy",
2055                 PMAC_TYPE_ALCHEMY,              NULL,
2056                 0
2057         },
2058         {       "AAPL,e411",                    "Gazelle",
2059                 PMAC_TYPE_GAZELLE,              NULL,
2060                 0
2061         },
2062         {       "AAPL,Gossamer",                "PowerMac G3 (Gossamer)",
2063                 PMAC_TYPE_GOSSAMER,             heathrow_desktop_features,
2064                 0
2065         },
2066         {       "AAPL,PowerMac G3",             "PowerMac G3 (Silk)",
2067                 PMAC_TYPE_SILK,                 heathrow_desktop_features,
2068                 0
2069         },
2070         {       "PowerMac1,1",                  "Blue&White G3",
2071                 PMAC_TYPE_YOSEMITE,             paddington_features,
2072                 0
2073         },
2074         {       "PowerMac1,2",                  "PowerMac G4 PCI Graphics",
2075                 PMAC_TYPE_YIKES,                paddington_features,
2076                 0
2077         },
2078         {       "PowerMac2,1",                  "iMac FireWire",
2079                 PMAC_TYPE_FW_IMAC,              core99_features,
2080                 PMAC_MB_MAY_SLEEP | PMAC_MB_OLD_CORE99
2081         },
2082         {       "PowerMac2,2",                  "iMac FireWire",
2083                 PMAC_TYPE_FW_IMAC,              core99_features,
2084                 PMAC_MB_MAY_SLEEP | PMAC_MB_OLD_CORE99
2085         },
2086         {       "PowerMac3,1",                  "PowerMac G4 AGP Graphics",
2087                 PMAC_TYPE_SAWTOOTH,             core99_features,
2088                 PMAC_MB_OLD_CORE99
2089         },
2090         {       "PowerMac3,2",                  "PowerMac G4 AGP Graphics",
2091                 PMAC_TYPE_SAWTOOTH,             core99_features,
2092                 PMAC_MB_MAY_SLEEP | PMAC_MB_OLD_CORE99
2093         },
2094         {       "PowerMac3,3",                  "PowerMac G4 AGP Graphics",
2095                 PMAC_TYPE_SAWTOOTH,             core99_features,
2096                 PMAC_MB_MAY_SLEEP | PMAC_MB_OLD_CORE99
2097         },
2098         {       "PowerMac3,4",                  "PowerMac G4 Silver",
2099                 PMAC_TYPE_QUICKSILVER,          core99_features,
2100                 PMAC_MB_MAY_SLEEP
2101         },
2102         {       "PowerMac3,5",                  "PowerMac G4 Silver",
2103                 PMAC_TYPE_QUICKSILVER,          core99_features,
2104                 PMAC_MB_MAY_SLEEP
2105         },
2106         {       "PowerMac3,6",                  "PowerMac G4 Windtunnel",
2107                 PMAC_TYPE_WINDTUNNEL,           core99_features,
2108                 PMAC_MB_MAY_SLEEP,
2109         },
2110         {       "PowerMac4,1",                  "iMac \"Flower Power\"",
2111                 PMAC_TYPE_PANGEA_IMAC,          pangea_features,
2112                 PMAC_MB_MAY_SLEEP
2113         },
2114         {       "PowerMac4,2",                  "Flat panel iMac",
2115                 PMAC_TYPE_FLAT_PANEL_IMAC,      pangea_features,
2116                 PMAC_MB_CAN_SLEEP
2117         },
2118         {       "PowerMac4,4",                  "eMac",
2119                 PMAC_TYPE_EMAC,                 core99_features,
2120                 PMAC_MB_MAY_SLEEP
2121         },
2122         {       "PowerMac5,1",                  "PowerMac G4 Cube",
2123                 PMAC_TYPE_CUBE,                 core99_features,
2124                 PMAC_MB_MAY_SLEEP | PMAC_MB_OLD_CORE99
2125         },
2126         {       "PowerMac6,1",                  "Flat panel iMac",
2127                 PMAC_TYPE_UNKNOWN_INTREPID,     intrepid_features,
2128                 PMAC_MB_MAY_SLEEP,
2129         },
2130         {       "PowerMac6,3",                  "Flat panel iMac",
2131                 PMAC_TYPE_UNKNOWN_INTREPID,     intrepid_features,
2132                 PMAC_MB_MAY_SLEEP,
2133         },
2134         {       "PowerMac6,4",                  "eMac",
2135                 PMAC_TYPE_UNKNOWN_INTREPID,     intrepid_features,
2136                 PMAC_MB_MAY_SLEEP,
2137         },
2138         {       "PowerMac10,1",                 "Mac mini",
2139                 PMAC_TYPE_UNKNOWN_INTREPID,     intrepid_features,
2140                 PMAC_MB_MAY_SLEEP | PMAC_MB_HAS_FW_POWER,
2141         },
2142         {       "iMac,1",                       "iMac (first generation)",
2143                 PMAC_TYPE_ORIG_IMAC,            paddington_features,
2144                 0
2145         },
2146
2147         /*
2148          * Xserve's
2149          */
2150
2151         {       "RackMac1,1",                   "XServe",
2152                 PMAC_TYPE_RACKMAC,              rackmac_features,
2153                 0,
2154         },
2155         {       "RackMac1,2",                   "XServe rev. 2",
2156                 PMAC_TYPE_RACKMAC,              rackmac_features,
2157                 0,
2158         },
2159
2160         /*
2161          * Laptops
2162          */
2163
2164         {       "AAPL,3400/2400",               "PowerBook 3400",
2165                 PMAC_TYPE_HOOPER,               ohare_features,
2166                 PMAC_MB_CAN_SLEEP | PMAC_MB_MOBILE
2167         },
2168         {       "AAPL,3500",                    "PowerBook 3500",
2169                 PMAC_TYPE_KANGA,                ohare_features,
2170                 PMAC_MB_CAN_SLEEP | PMAC_MB_MOBILE
2171         },
2172         {       "AAPL,PowerBook1998",           "PowerBook Wallstreet",
2173                 PMAC_TYPE_WALLSTREET,           heathrow_laptop_features,
2174                 PMAC_MB_CAN_SLEEP | PMAC_MB_MOBILE
2175         },
2176         {       "PowerBook1,1",                 "PowerBook 101 (Lombard)",
2177                 PMAC_TYPE_101_PBOOK,            paddington_features,
2178                 PMAC_MB_MAY_SLEEP | PMAC_MB_MOBILE
2179         },
2180         {       "PowerBook2,1",                 "iBook (first generation)",
2181                 PMAC_TYPE_ORIG_IBOOK,           core99_features,
2182                 PMAC_MB_CAN_SLEEP | PMAC_MB_OLD_CORE99 | PMAC_MB_MOBILE
2183         },
2184         {       "PowerBook2,2",                 "iBook FireWire",
2185                 PMAC_TYPE_FW_IBOOK,             core99_features,
2186                 PMAC_MB_MAY_SLEEP | PMAC_MB_HAS_FW_POWER |
2187                 PMAC_MB_OLD_CORE99 | PMAC_MB_MOBILE
2188         },
2189         {       "PowerBook3,1",                 "PowerBook Pismo",
2190                 PMAC_TYPE_PISMO,                core99_features,
2191                 PMAC_MB_MAY_SLEEP | PMAC_MB_HAS_FW_POWER |
2192                 PMAC_MB_OLD_CORE99 | PMAC_MB_MOBILE
2193         },
2194         {       "PowerBook3,2",                 "PowerBook Titanium",
2195                 PMAC_TYPE_TITANIUM,             core99_features,
2196                 PMAC_MB_MAY_SLEEP | PMAC_MB_HAS_FW_POWER | PMAC_MB_MOBILE
2197         },
2198         {       "PowerBook3,3",                 "PowerBook Titanium II",
2199                 PMAC_TYPE_TITANIUM2,            core99_features,
2200                 PMAC_MB_MAY_SLEEP | PMAC_MB_HAS_FW_POWER | PMAC_MB_MOBILE
2201         },
2202         {       "PowerBook3,4",                 "PowerBook Titanium III",
2203                 PMAC_TYPE_TITANIUM3,            core99_features,
2204                 PMAC_MB_MAY_SLEEP | PMAC_MB_HAS_FW_POWER | PMAC_MB_MOBILE
2205         },
2206         {       "PowerBook3,5",                 "PowerBook Titanium IV",
2207                 PMAC_TYPE_TITANIUM4,            core99_features,
2208                 PMAC_MB_MAY_SLEEP | PMAC_MB_HAS_FW_POWER | PMAC_MB_MOBILE
2209         },
2210         {       "PowerBook4,1",                 "iBook 2",
2211                 PMAC_TYPE_IBOOK2,               pangea_features,
2212                 PMAC_MB_MAY_SLEEP | PMAC_MB_HAS_FW_POWER | PMAC_MB_MOBILE
2213         },
2214         {       "PowerBook4,2",                 "iBook 2",
2215                 PMAC_TYPE_IBOOK2,               pangea_features,
2216                 PMAC_MB_MAY_SLEEP | PMAC_MB_HAS_FW_POWER | PMAC_MB_MOBILE
2217         },
2218         {       "PowerBook4,3",                 "iBook 2 rev. 2",
2219                 PMAC_TYPE_IBOOK2,               pangea_features,
2220                 PMAC_MB_MAY_SLEEP | PMAC_MB_HAS_FW_POWER | PMAC_MB_MOBILE
2221         },
2222         {       "PowerBook5,1",                 "PowerBook G4 17\"",
2223                 PMAC_TYPE_UNKNOWN_INTREPID,     intrepid_features,
2224                 PMAC_MB_HAS_FW_POWER | PMAC_MB_MOBILE,
2225         },
2226         {       "PowerBook5,2",                 "PowerBook G4 15\"",
2227                 PMAC_TYPE_UNKNOWN_INTREPID,     intrepid_features,
2228                 PMAC_MB_MAY_SLEEP | PMAC_MB_HAS_FW_POWER | PMAC_MB_MOBILE,
2229         },
2230         {       "PowerBook5,3",                 "PowerBook G4 17\"",
2231                 PMAC_TYPE_UNKNOWN_INTREPID,     intrepid_features,
2232                 PMAC_MB_MAY_SLEEP | PMAC_MB_HAS_FW_POWER | PMAC_MB_MOBILE,
2233         },
2234         {       "PowerBook5,4",                 "PowerBook G4 15\"",
2235                 PMAC_TYPE_UNKNOWN_INTREPID,     intrepid_features,
2236                 PMAC_MB_MAY_SLEEP | PMAC_MB_HAS_FW_POWER | PMAC_MB_MOBILE,
2237         },
2238         {       "PowerBook5,5",                 "PowerBook G4 17\"",
2239                 PMAC_TYPE_UNKNOWN_INTREPID,     intrepid_features,
2240                 PMAC_MB_MAY_SLEEP | PMAC_MB_HAS_FW_POWER | PMAC_MB_MOBILE,
2241         },
2242         {       "PowerBook5,6",                 "PowerBook G4 15\"",
2243                 PMAC_TYPE_UNKNOWN_INTREPID,     intrepid_features,
2244                 PMAC_MB_MAY_SLEEP | PMAC_MB_HAS_FW_POWER | PMAC_MB_MOBILE,
2245         },
2246         {       "PowerBook5,7",                 "PowerBook G4 17\"",
2247                 PMAC_TYPE_UNKNOWN_INTREPID,     intrepid_features,
2248                 PMAC_MB_MAY_SLEEP | PMAC_MB_HAS_FW_POWER | PMAC_MB_MOBILE,
2249         },
2250         {       "PowerBook6,1",                 "PowerBook G4 12\"",
2251                 PMAC_TYPE_UNKNOWN_INTREPID,     intrepid_features,
2252                 PMAC_MB_MAY_SLEEP | PMAC_MB_HAS_FW_POWER | PMAC_MB_MOBILE,
2253         },
2254         {       "PowerBook6,2",                 "PowerBook G4",
2255                 PMAC_TYPE_UNKNOWN_INTREPID,     intrepid_features,
2256                 PMAC_MB_MAY_SLEEP | PMAC_MB_HAS_FW_POWER | PMAC_MB_MOBILE,
2257         },
2258         {       "PowerBook6,3",                 "iBook G4",
2259                 PMAC_TYPE_UNKNOWN_INTREPID,     intrepid_features,
2260                 PMAC_MB_MAY_SLEEP | PMAC_MB_HAS_FW_POWER | PMAC_MB_MOBILE,
2261         },
2262         {       "PowerBook6,4",                 "PowerBook G4 12\"",
2263                 PMAC_TYPE_UNKNOWN_INTREPID,     intrepid_features,
2264                 PMAC_MB_MAY_SLEEP | PMAC_MB_HAS_FW_POWER | PMAC_MB_MOBILE,
2265         },
2266         {       "PowerBook6,5",                 "iBook G4",
2267                 PMAC_TYPE_UNKNOWN_INTREPID,     intrepid_features,
2268                 PMAC_MB_MAY_SLEEP | PMAC_MB_HAS_FW_POWER | PMAC_MB_MOBILE,
2269         },
2270         {       "PowerBook6,8",                 "PowerBook G4 12\"",
2271                 PMAC_TYPE_UNKNOWN_INTREPID,     intrepid_features,
2272                 PMAC_MB_MAY_SLEEP | PMAC_MB_HAS_FW_POWER | PMAC_MB_MOBILE,
2273         },
2274 #else /* CONFIG_POWER4 */
2275         {       "PowerMac7,2",                  "PowerMac G5",
2276                 PMAC_TYPE_POWERMAC_G5,          g5_features,
2277                 0,
2278         },
2279 #endif /* CONFIG_POWER4 */
2280 };
2281
2282 /*
2283  * The toplevel feature_call callback
2284  */
2285 long __pmac
2286 pmac_do_feature_call(unsigned int selector, ...)
2287 {
2288         struct device_node* node;
2289         long param, value;
2290         int i;
2291         feature_call func = NULL;
2292         va_list args;
2293
2294         if (pmac_mb.features)
2295                 for (i=0; pmac_mb.features[i].function; i++)
2296                         if (pmac_mb.features[i].selector == selector) {
2297                                 func = pmac_mb.features[i].function;
2298                                 break;
2299                         }
2300         if (!func)
2301                 for (i=0; any_features[i].function; i++)
2302                         if (any_features[i].selector == selector) {
2303                                 func = any_features[i].function;
2304                                 break;
2305                         }
2306         if (!func)
2307                 return -ENODEV;
2308
2309         va_start(args, selector);
2310         node = (struct device_node*)va_arg(args, void*);
2311         param = va_arg(args, long);
2312         value = va_arg(args, long);
2313         va_end(args);
2314
2315         return func(node, param, value);
2316 }
2317
2318 static int __init
2319 probe_motherboard(void)
2320 {
2321         int i;
2322         struct macio_chip* macio = &macio_chips[0];
2323         const char* model = NULL;
2324         struct device_node *dt;
2325
2326         /* Lookup known motherboard type in device-tree. First try an
2327          * exact match on the "model" property, then try a "compatible"
2328          * match is none is found.
2329          */
2330         dt = find_devices("device-tree");
2331         if (dt != NULL)
2332                 model = (const char *) get_property(dt, "model", NULL);
2333         for(i=0; model && i<(sizeof(pmac_mb_defs)/sizeof(struct pmac_mb_def)); i++) {
2334             if (strcmp(model, pmac_mb_defs[i].model_string) == 0) {
2335                 pmac_mb = pmac_mb_defs[i];
2336                 goto found;
2337             }
2338         }
2339         for(i=0; i<(sizeof(pmac_mb_defs)/sizeof(struct pmac_mb_def)); i++) {
2340             if (machine_is_compatible(pmac_mb_defs[i].model_string)) {
2341                 pmac_mb = pmac_mb_defs[i];
2342                 goto found;
2343             }
2344         }
2345
2346         /* Fallback to selection depending on mac-io chip type */
2347         switch(macio->type) {
2348 #ifndef CONFIG_POWER4
2349             case macio_grand_central:
2350                 pmac_mb.model_id = PMAC_TYPE_PSURGE;
2351                 pmac_mb.model_name = "Unknown PowerSurge";
2352                 break;
2353             case macio_ohare:
2354                 pmac_mb.model_id = PMAC_TYPE_UNKNOWN_OHARE;
2355                 pmac_mb.model_name = "Unknown OHare-based";
2356                 break;
2357             case macio_heathrow:
2358                 pmac_mb.model_id = PMAC_TYPE_UNKNOWN_HEATHROW;
2359                 pmac_mb.model_name = "Unknown Heathrow-based";
2360                 pmac_mb.features = heathrow_desktop_features;
2361                 break;
2362             case macio_paddington:
2363                 pmac_mb.model_id = PMAC_TYPE_UNKNOWN_PADDINGTON;
2364                 pmac_mb.model_name = "Unknown Paddington-based";
2365                 pmac_mb.features = paddington_features;
2366                 break;
2367             case macio_keylargo:
2368                 pmac_mb.model_id = PMAC_TYPE_UNKNOWN_CORE99;
2369                 pmac_mb.model_name = "Unknown Keylargo-based";
2370                 pmac_mb.features = core99_features;
2371                 break;
2372             case macio_pangea:
2373                 pmac_mb.model_id = PMAC_TYPE_UNKNOWN_PANGEA;
2374                 pmac_mb.model_name = "Unknown Pangea-based";
2375                 pmac_mb.features = pangea_features;
2376                 break;
2377             case macio_intrepid:
2378                 pmac_mb.model_id = PMAC_TYPE_UNKNOWN_INTREPID;
2379                 pmac_mb.model_name = "Unknown Intrepid-based";
2380                 pmac_mb.features = intrepid_features;
2381                 break;
2382 #else /* CONFIG_POWER4 */
2383             case macio_keylargo2:
2384                 pmac_mb.model_id = PMAC_TYPE_UNKNOWN_K2;
2385                 pmac_mb.model_name = "Unknown G5";
2386                 pmac_mb.features = g5_features;
2387                 break;
2388 #endif /* CONFIG_POWER4 */
2389             default:
2390                 return -ENODEV;
2391         }
2392 found:
2393 #ifndef CONFIG_POWER4
2394         /* Fixup Hooper vs. Comet */
2395         if (pmac_mb.model_id == PMAC_TYPE_HOOPER) {
2396                 u32 __iomem * mach_id_ptr = ioremap(0xf3000034, 4);
2397                 if (!mach_id_ptr)
2398                         return -ENODEV;
2399                 /* Here, I used to disable the media-bay on comet. It
2400                  * appears this is wrong, the floppy connector is actually
2401                  * a kind of media-bay and works with the current driver.
2402                  */
2403                 if (__raw_readl(mach_id_ptr) & 0x20000000UL)
2404                         pmac_mb.model_id = PMAC_TYPE_COMET;
2405                 iounmap(mach_id_ptr);
2406         }
2407 #endif /* CONFIG_POWER4 */
2408
2409 #ifdef CONFIG_6xx
2410         /* Set default value of powersave_nap on machines that support it.
2411          * It appears that uninorth rev 3 has a problem with it, we don't
2412          * enable it on those. In theory, the flush-on-lock property is
2413          * supposed to be set when not supported, but I'm not very confident
2414          * that all Apple OF revs did it properly, I do it the paranoid way.
2415          */
2416         while (uninorth_base && uninorth_rev > 3) {
2417                 struct device_node* np = find_path_device("/cpus");
2418                 if (!np || !np->child) {
2419                         printk(KERN_WARNING "Can't find CPU(s) in device tree !\n");
2420                         break;
2421                 }
2422                 np = np->child;
2423                 /* Nap mode not supported on SMP */
2424                 if (np->sibling)
2425                         break;
2426                 /* Nap mode not supported if flush-on-lock property is present */
2427                 if (get_property(np, "flush-on-lock", NULL))
2428                         break;
2429                 powersave_nap = 1;
2430                 printk(KERN_INFO "Processor NAP mode on idle enabled.\n");
2431                 break;
2432         }
2433
2434         /* On CPUs that support it (750FX), lowspeed by default during
2435          * NAP mode
2436          */
2437         powersave_lowspeed = 1;
2438 #endif /* CONFIG_6xx */
2439 #ifdef CONFIG_POWER4
2440         powersave_nap = 1;
2441 #endif
2442         /* Check for "mobile" machine */
2443         if (model && (strncmp(model, "PowerBook", 9) == 0
2444                    || strncmp(model, "iBook", 5) == 0))
2445                 pmac_mb.board_flags |= PMAC_MB_MOBILE;
2446
2447
2448         printk(KERN_INFO "PowerMac motherboard: %s\n", pmac_mb.model_name);
2449         return 0;
2450 }
2451
2452 /* Initialize the Core99 UniNorth host bridge and memory controller
2453  */
2454 static void __init
2455 probe_uninorth(void)
2456 {
2457         unsigned long actrl;
2458
2459         /* Locate core99 Uni-N */
2460         uninorth_node = of_find_node_by_name(NULL, "uni-n");
2461         /* Locate G5 u3 */
2462         if (uninorth_node == NULL) {
2463                 uninorth_node = of_find_node_by_name(NULL, "u3");
2464                 uninorth_u3 = 1;
2465         }
2466         if (uninorth_node && uninorth_node->n_addrs > 0) {
2467                 unsigned long address = uninorth_node->addrs[0].address;
2468                 uninorth_base = ioremap(address, 0x40000);
2469                 uninorth_rev = in_be32(UN_REG(UNI_N_VERSION));
2470                 if (uninorth_u3)
2471                         u3_ht = ioremap(address + U3_HT_CONFIG_BASE, 0x1000);
2472         } else
2473                 uninorth_node = NULL;
2474
2475         if (!uninorth_node)
2476                 return;
2477
2478         printk(KERN_INFO "Found %s memory controller & host bridge, revision: %d\n",
2479                uninorth_u3 ? "U3" : "UniNorth", uninorth_rev);
2480         printk(KERN_INFO "Mapped at 0x%08lx\n", (unsigned long)uninorth_base);
2481
2482         /* Set the arbitrer QAck delay according to what Apple does
2483          */
2484         if (uninorth_rev < 0x11) {
2485                 actrl = UN_IN(UNI_N_ARB_CTRL) & ~UNI_N_ARB_CTRL_QACK_DELAY_MASK;
2486                 actrl |= ((uninorth_rev < 3) ? UNI_N_ARB_CTRL_QACK_DELAY105 :
2487                         UNI_N_ARB_CTRL_QACK_DELAY) << UNI_N_ARB_CTRL_QACK_DELAY_SHIFT;
2488                 UN_OUT(UNI_N_ARB_CTRL, actrl);
2489         }
2490
2491         /* Some more magic as done by them in recent MacOS X on UniNorth
2492          * revs 1.5 to 2.O and Pangea. Seem to toggle the UniN Maxbus/PCI
2493          * memory timeout
2494          */
2495         if ((uninorth_rev >= 0x11 && uninorth_rev <= 0x24) || uninorth_rev == 0xc0)
2496                 UN_OUT(0x2160, UN_IN(0x2160) & 0x00ffffff);
2497 }
2498
2499 static void __init
2500 probe_one_macio(const char* name, const char* compat, int type)
2501 {
2502         struct device_node*     node;
2503         int                     i;
2504         volatile u32 __iomem *  base;
2505         u32*                    revp;
2506
2507         node = find_devices(name);
2508         if (!node || !node->n_addrs)
2509                 return;
2510         if (compat)
2511                 do {
2512                         if (device_is_compatible(node, compat))
2513                                 break;
2514                         node = node->next;
2515                 } while (node);
2516         if (!node)
2517                 return;
2518         for(i=0; i<MAX_MACIO_CHIPS; i++) {
2519                 if (!macio_chips[i].of_node)
2520                         break;
2521                 if (macio_chips[i].of_node == node)
2522                         return;
2523         }
2524         if (i >= MAX_MACIO_CHIPS) {
2525                 printk(KERN_ERR "pmac_feature: Please increase MAX_MACIO_CHIPS !\n");
2526                 printk(KERN_ERR "pmac_feature: %s skipped\n", node->full_name);
2527                 return;
2528         }
2529         base = ioremap(node->addrs[0].address, node->addrs[0].size);
2530         if (!base) {
2531                 printk(KERN_ERR "pmac_feature: Can't map mac-io chip !\n");
2532                 return;
2533         }
2534         if (type == macio_keylargo) {
2535                 u32* did = (u32 *)get_property(node, "device-id", NULL);
2536                 if (*did == 0x00000025)
2537                         type = macio_pangea;
2538                 if (*did == 0x0000003e)
2539                         type = macio_intrepid;
2540         }
2541         macio_chips[i].of_node  = node;
2542         macio_chips[i].type     = type;
2543         macio_chips[i].base     = base;
2544         macio_chips[i].flags    = MACIO_FLAG_SCCB_ON | MACIO_FLAG_SCCB_ON;
2545         macio_chips[i].name     = macio_names[type];
2546         revp = (u32 *)get_property(node, "revision-id", NULL);
2547         if (revp)
2548                 macio_chips[i].rev = *revp;
2549         printk(KERN_INFO "Found a %s mac-io controller, rev: %d, mapped at 0x%p\n",
2550                 macio_names[type], macio_chips[i].rev, macio_chips[i].base);
2551 }
2552
2553 static int __init
2554 probe_macios(void)
2555 {
2556         /* Warning, ordering is important */
2557         probe_one_macio("gc", NULL, macio_grand_central);
2558         probe_one_macio("ohare", NULL, macio_ohare);
2559         probe_one_macio("pci106b,7", NULL, macio_ohareII);
2560         probe_one_macio("mac-io", "keylargo", macio_keylargo);
2561         probe_one_macio("mac-io", "paddington", macio_paddington);
2562         probe_one_macio("mac-io", "gatwick", macio_gatwick);
2563         probe_one_macio("mac-io", "heathrow", macio_heathrow);
2564         probe_one_macio("mac-io", "K2-Keylargo", macio_keylargo2);
2565
2566         /* Make sure the "main" macio chip appear first */
2567         if (macio_chips[0].type == macio_gatwick
2568             && macio_chips[1].type == macio_heathrow) {
2569                 struct macio_chip temp = macio_chips[0];
2570                 macio_chips[0] = macio_chips[1];
2571                 macio_chips[1] = temp;
2572         }
2573         if (macio_chips[0].type == macio_ohareII
2574             && macio_chips[1].type == macio_ohare) {
2575                 struct macio_chip temp = macio_chips[0];
2576                 macio_chips[0] = macio_chips[1];
2577                 macio_chips[1] = temp;
2578         }
2579         macio_chips[0].lbus.index = 0;
2580         macio_chips[1].lbus.index = 1;
2581
2582         return (macio_chips[0].of_node == NULL) ? -ENODEV : 0;
2583 }
2584
2585 static void __init
2586 initial_serial_shutdown(struct device_node* np)
2587 {
2588         int len;
2589         struct slot_names_prop {
2590                 int     count;
2591                 char    name[1];
2592         } *slots;
2593         char *conn;
2594         int port_type = PMAC_SCC_ASYNC;
2595         int modem = 0;
2596
2597         slots = (struct slot_names_prop *)get_property(np, "slot-names", &len);
2598         conn = get_property(np, "AAPL,connector", &len);
2599         if (conn && (strcmp(conn, "infrared") == 0))
2600                 port_type = PMAC_SCC_IRDA;
2601         else if (device_is_compatible(np, "cobalt"))
2602                 modem = 1;
2603         else if (slots && slots->count > 0) {
2604                 if (strcmp(slots->name, "IrDA") == 0)
2605                         port_type = PMAC_SCC_IRDA;
2606                 else if (strcmp(slots->name, "Modem") == 0)
2607                         modem = 1;
2608         }
2609         if (modem)
2610                 pmac_call_feature(PMAC_FTR_MODEM_ENABLE, np, 0, 0);
2611         pmac_call_feature(PMAC_FTR_SCC_ENABLE, np, port_type, 0);
2612 }
2613
2614 static void __init
2615 set_initial_features(void)
2616 {
2617         struct device_node* np;
2618
2619         /* That hack appears to be necessary for some StarMax motherboards
2620          * but I'm not too sure it was audited for side-effects on other
2621          * ohare based machines...
2622          * Since I still have difficulties figuring the right way to
2623          * differenciate them all and since that hack was there for a long
2624          * time, I'll keep it around
2625          */
2626         if (macio_chips[0].type == macio_ohare && !find_devices("via-pmu")) {
2627                 struct macio_chip* macio = &macio_chips[0];
2628                 MACIO_OUT32(OHARE_FCR, STARMAX_FEATURES);
2629         } else if (macio_chips[0].type == macio_ohare) {
2630                 struct macio_chip* macio = &macio_chips[0];
2631                 MACIO_BIS(OHARE_FCR, OH_IOBUS_ENABLE);
2632         } else if (macio_chips[1].type == macio_ohare) {
2633                 struct macio_chip* macio = &macio_chips[1];
2634                 MACIO_BIS(OHARE_FCR, OH_IOBUS_ENABLE);
2635         }
2636
2637 #ifdef CONFIG_POWER4
2638         if (macio_chips[0].type == macio_keylargo2) {
2639 #ifndef CONFIG_SMP
2640                 /* On SMP machines running UP, we have the second CPU eating
2641                  * bus cycles. We need to take it off the bus. This is done
2642                  * from pmac_smp for SMP kernels running on one CPU
2643                  */
2644                 np = of_find_node_by_type(NULL, "cpu");
2645                 if (np != NULL)
2646                         np = of_find_node_by_type(np, "cpu");
2647                 if (np != NULL) {
2648                         g5_phy_disable_cpu1();
2649                         of_node_put(np);
2650                 }
2651 #endif /* CONFIG_SMP */
2652                 /* Enable GMAC for now for PCI probing. It will be disabled
2653                  * later on after PCI probe
2654                  */
2655                 np = of_find_node_by_name(NULL, "ethernet");
2656                 while(np) {
2657                         if (device_is_compatible(np, "K2-GMAC"))
2658                                 g5_gmac_enable(np, 0, 1);
2659                         np = of_find_node_by_name(np, "ethernet");
2660                 }
2661
2662                 /* Enable FW before PCI probe. Will be disabled later on
2663                  * Note: We should have a batter way to check that we are
2664                  * dealing with uninorth internal cell and not a PCI cell
2665                  * on the external PCI. The code below works though.
2666                  */
2667                 np = of_find_node_by_name(NULL, "firewire");
2668                 while(np) {
2669                         if (device_is_compatible(np, "pci106b,5811")) {
2670                                 macio_chips[0].flags |= MACIO_FLAG_FW_SUPPORTED;
2671                                 g5_fw_enable(np, 0, 1);
2672                         }
2673                         np = of_find_node_by_name(np, "firewire");
2674                 }
2675         }
2676 #else /* CONFIG_POWER4 */
2677
2678         if (macio_chips[0].type == macio_keylargo ||
2679             macio_chips[0].type == macio_pangea ||
2680             macio_chips[0].type == macio_intrepid) {
2681                 /* Enable GMAC for now for PCI probing. It will be disabled
2682                  * later on after PCI probe
2683                  */
2684                 np = of_find_node_by_name(NULL, "ethernet");
2685                 while(np) {
2686                         if (np->parent
2687                             && device_is_compatible(np->parent, "uni-north")
2688                             && device_is_compatible(np, "gmac"))
2689                                 core99_gmac_enable(np, 0, 1);
2690                         np = of_find_node_by_name(np, "ethernet");
2691                 }
2692
2693                 /* Enable FW before PCI probe. Will be disabled later on
2694                  * Note: We should have a batter way to check that we are
2695                  * dealing with uninorth internal cell and not a PCI cell
2696                  * on the external PCI. The code below works though.
2697                  */
2698                 np = of_find_node_by_name(NULL, "firewire");
2699                 while(np) {
2700                         if (np->parent
2701                             && device_is_compatible(np->parent, "uni-north")
2702                             && (device_is_compatible(np, "pci106b,18") ||
2703                                 device_is_compatible(np, "pci106b,30") ||
2704                                 device_is_compatible(np, "pci11c1,5811"))) {
2705                                 macio_chips[0].flags |= MACIO_FLAG_FW_SUPPORTED;
2706                                 core99_firewire_enable(np, 0, 1);
2707                         }
2708                         np = of_find_node_by_name(np, "firewire");
2709                 }
2710
2711                 /* Enable ATA-100 before PCI probe. */
2712                 np = of_find_node_by_name(NULL, "ata-6");
2713                 while(np) {
2714                         if (np->parent
2715                             && device_is_compatible(np->parent, "uni-north")
2716                             && device_is_compatible(np, "kauai-ata")) {
2717                                 core99_ata100_enable(np, 1);
2718                         }
2719                         np = of_find_node_by_name(np, "ata-6");
2720                 }
2721
2722                 /* Switch airport off */
2723                 np = find_devices("radio");
2724                 while(np) {
2725                         if (np && np->parent == macio_chips[0].of_node) {
2726                                 macio_chips[0].flags |= MACIO_FLAG_AIRPORT_ON;
2727                                 core99_airport_enable(np, 0, 0);
2728                         }
2729                         np = np->next;
2730                 }
2731         }
2732
2733         /* On all machines that support sound PM, switch sound off */
2734         if (macio_chips[0].of_node)
2735                 pmac_do_feature_call(PMAC_FTR_SOUND_CHIP_ENABLE,
2736                         macio_chips[0].of_node, 0, 0);
2737
2738         /* While on some desktop G3s, we turn it back on */
2739         if (macio_chips[0].of_node && macio_chips[0].type == macio_heathrow
2740                 && (pmac_mb.model_id == PMAC_TYPE_GOSSAMER ||
2741                     pmac_mb.model_id == PMAC_TYPE_SILK)) {
2742                 struct macio_chip* macio = &macio_chips[0];
2743                 MACIO_BIS(HEATHROW_FCR, HRW_SOUND_CLK_ENABLE);
2744                 MACIO_BIC(HEATHROW_FCR, HRW_SOUND_POWER_N);
2745         }
2746
2747         /* Hack for bumping clock speed on the new PowerBooks and the
2748          * iBook G4. This implements the "platform-do-clockspreading" OF
2749          * property. For safety, we also check the product ID in the
2750          * device-tree to make reasonably sure we won't set wrong values
2751          * in the clock chip.
2752          *
2753          * Of course, ultimately, we have to implement a real parser for
2754          * the platform-do-* stuff...
2755          */
2756         while (machine_is_compatible("PowerBook5,2") ||
2757                machine_is_compatible("PowerBook5,3") ||
2758                machine_is_compatible("PowerBook6,2") ||
2759                machine_is_compatible("PowerBook6,3")) {
2760                 struct device_node *ui2c = of_find_node_by_type(NULL, "i2c");
2761                 struct device_node *dt = of_find_node_by_name(NULL, "device-tree");
2762                 u8 buffer[9];
2763                 u32 *productID;
2764                 int i, rc, changed = 0;
2765
2766                 if (dt == NULL)
2767                         break;
2768                 productID = (u32 *)get_property(dt, "pid#", NULL);
2769                 if (productID == NULL)
2770                         break;
2771                 while(ui2c) {
2772                         struct device_node *p = of_get_parent(ui2c);
2773                         if (p && !strcmp(p->name, "uni-n"))
2774                                 break;
2775                         ui2c = of_find_node_by_type(ui2c, "i2c");
2776                 }
2777                 if (ui2c == NULL)
2778                         break;
2779                 DBG("Trying to bump clock speed for PID: %08x...\n", *productID);
2780                 rc = pmac_low_i2c_open(ui2c, 1);
2781                 if (rc != 0)
2782                         break;
2783                 pmac_low_i2c_setmode(ui2c, pmac_low_i2c_mode_combined);
2784                 rc = pmac_low_i2c_xfer(ui2c, 0xd2 | pmac_low_i2c_read, 0x80, buffer, 9);
2785                 DBG("read result: %d,", rc);
2786                 if (rc != 0) {
2787                         pmac_low_i2c_close(ui2c);
2788                         break;
2789                 }
2790                 for (i=0; i<9; i++)
2791                         DBG(" %02x", buffer[i]);
2792                 DBG("\n");
2793
2794                 switch(*productID) {
2795                 case 0x1182:    /* AlBook 12" rev 2 */
2796                 case 0x1183:    /* iBook G4 12" */
2797                         buffer[0] = (buffer[0] & 0x8f) | 0x70;
2798                         buffer[2] = (buffer[2] & 0x7f) | 0x00;
2799                         buffer[5] = (buffer[5] & 0x80) | 0x31;
2800                         buffer[6] = (buffer[6] & 0x40) | 0xb0;
2801                         buffer[7] = (buffer[7] & 0x00) | 0xc0;
2802                         buffer[8] = (buffer[8] & 0x00) | 0x30;
2803                         changed = 1;
2804                         break;
2805                 case 0x3142:    /* AlBook 15" (ATI M10) */
2806                 case 0x3143:    /* AlBook 17" (ATI M10) */
2807                         buffer[0] = (buffer[0] & 0xaf) | 0x50;
2808                         buffer[2] = (buffer[2] & 0x7f) | 0x00;
2809                         buffer[5] = (buffer[5] & 0x80) | 0x31;
2810                         buffer[6] = (buffer[6] & 0x40) | 0xb0;
2811                         buffer[7] = (buffer[7] & 0x00) | 0xd0;
2812                         buffer[8] = (buffer[8] & 0x00) | 0x30;
2813                         changed = 1;
2814                         break;
2815                 default:
2816                         DBG("i2c-hwclock: Machine model not handled\n");
2817                         break;
2818                 }
2819                 if (!changed) {
2820                         pmac_low_i2c_close(ui2c);
2821                         break;
2822                 }
2823                 pmac_low_i2c_setmode(ui2c, pmac_low_i2c_mode_stdsub);
2824                 rc = pmac_low_i2c_xfer(ui2c, 0xd2 | pmac_low_i2c_write, 0x80, buffer, 9);
2825                 DBG("write result: %d,", rc);
2826                 pmac_low_i2c_setmode(ui2c, pmac_low_i2c_mode_combined);
2827                 rc = pmac_low_i2c_xfer(ui2c, 0xd2 | pmac_low_i2c_read, 0x80, buffer, 9);
2828                 DBG("read result: %d,", rc);
2829                 if (rc != 0) {
2830                         pmac_low_i2c_close(ui2c);
2831                         break;
2832                 }
2833                 for (i=0; i<9; i++)
2834                         DBG(" %02x", buffer[i]);
2835                 pmac_low_i2c_close(ui2c);
2836                 break;
2837         }
2838
2839 #endif /* CONFIG_POWER4 */
2840
2841         /* On all machines, switch modem & serial ports off */
2842         np = find_devices("ch-a");
2843         while(np) {
2844                 initial_serial_shutdown(np);
2845                 np = np->next;
2846         }
2847         np = find_devices("ch-b");
2848         while(np) {
2849                 initial_serial_shutdown(np);
2850                 np = np->next;
2851         }
2852 }
2853
2854 void __init
2855 pmac_feature_init(void)
2856 {
2857         /* Detect the UniNorth memory controller */
2858         probe_uninorth();
2859
2860         /* Probe mac-io controllers */
2861         if (probe_macios()) {
2862                 printk(KERN_WARNING "No mac-io chip found\n");
2863                 return;
2864         }
2865
2866         /* Setup low-level i2c stuffs */
2867         pmac_init_low_i2c();
2868
2869         /* Probe machine type */
2870         if (probe_motherboard())
2871                 printk(KERN_WARNING "Unknown PowerMac !\n");
2872
2873         /* Set some initial features (turn off some chips that will
2874          * be later turned on)
2875          */
2876         set_initial_features();
2877 }
2878
2879 int __init
2880 pmac_feature_late_init(void)
2881 {
2882         struct device_node* np;
2883
2884         /* Request some resources late */
2885         if (uninorth_node)
2886                 request_OF_resource(uninorth_node, 0, NULL);
2887         np = find_devices("hammerhead");
2888         if (np)
2889                 request_OF_resource(np, 0, NULL);
2890         np = find_devices("interrupt-controller");
2891         if (np)
2892                 request_OF_resource(np, 0, NULL);
2893         return 0;
2894 }
2895
2896 device_initcall(pmac_feature_late_init);
2897
2898 #ifdef CONFIG_POWER4
2899
2900 static void dump_HT_speeds(char *name, u32 cfg, u32 frq)
2901 {
2902         int     freqs[16] = { 200,300,400,500,600,800,1000,0,0,0,0,0,0,0,0,0 };
2903         int     bits[8] = { 8,16,0,32,2,4,0,0 };
2904         int     freq = (frq >> 8) & 0xf;
2905
2906         if (freqs[freq] == 0)
2907                 printk("%s: Unknown HT link frequency %x\n", name, freq);
2908         else
2909                 printk("%s: %d MHz on main link, (%d in / %d out) bits width\n",
2910                        name, freqs[freq],
2911                        bits[(cfg >> 28) & 0x7], bits[(cfg >> 24) & 0x7]);
2912 }
2913
2914 void __init pmac_check_ht_link(void)
2915 {
2916         u32     ufreq, freq, ucfg, cfg;
2917         struct device_node *pcix_node;
2918         u8      px_bus, px_devfn;
2919         struct pci_controller *px_hose;
2920
2921         (void)in_be32(u3_ht + U3_HT_LINK_COMMAND);
2922         ucfg = cfg = in_be32(u3_ht + U3_HT_LINK_CONFIG);
2923         ufreq = freq = in_be32(u3_ht + U3_HT_LINK_FREQ);
2924         dump_HT_speeds("U3 HyperTransport", cfg, freq);
2925
2926         pcix_node = of_find_compatible_node(NULL, "pci", "pci-x");
2927         if (pcix_node == NULL) {
2928                 printk("No PCI-X bridge found\n");
2929                 return;
2930         }
2931         if (pci_device_from_OF_node(pcix_node, &px_bus, &px_devfn) != 0) {
2932                 printk("PCI-X bridge found but not matched to pci\n");
2933                 return;
2934         }
2935         px_hose = pci_find_hose_for_OF_device(pcix_node);
2936         if (px_hose == NULL) {
2937                 printk("PCI-X bridge found but not matched to host\n");
2938                 return;
2939         }
2940         early_read_config_dword(px_hose, px_bus, px_devfn, 0xc4, &cfg);
2941         early_read_config_dword(px_hose, px_bus, px_devfn, 0xcc, &freq);
2942         dump_HT_speeds("PCI-X HT Uplink", cfg, freq);
2943         early_read_config_dword(px_hose, px_bus, px_devfn, 0xc8, &cfg);
2944         early_read_config_dword(px_hose, px_bus, px_devfn, 0xd0, &freq);
2945         dump_HT_speeds("PCI-X HT Downlink", cfg, freq);
2946 }
2947
2948 #endif /* CONFIG_POWER4 */
2949
2950 /*
2951  * Early video resume hook
2952  */
2953
2954 static void (*pmac_early_vresume_proc)(void *data) __pmacdata;
2955 static void *pmac_early_vresume_data __pmacdata;
2956
2957 void pmac_set_early_video_resume(void (*proc)(void *data), void *data)
2958 {
2959         if (_machine != _MACH_Pmac)
2960                 return;
2961         preempt_disable();
2962         pmac_early_vresume_proc = proc;
2963         pmac_early_vresume_data = data;
2964         preempt_enable();
2965 }
2966 EXPORT_SYMBOL(pmac_set_early_video_resume);
2967
2968 void __pmac pmac_call_early_video_resume(void)
2969 {
2970         if (pmac_early_vresume_proc)
2971                 pmac_early_vresume_proc(pmac_early_vresume_data);
2972 }