arch/powerpc/platforms/powermac/pic.c

   1 /*
   2  *  Support for the interrupt controllers found on Power Macintosh,
   3  *  currently Apple's "Grand Central" interrupt controller in all
   4  *  it's incarnations. OpenPIC support used on newer machines is
   5  *  in a separate file
   6  *
   7  *  Copyright (C) 1997 Paul Mackerras (paulus@samba.org)
   8  *  Copyright (C) 2005 Benjamin Herrenschmidt (benh@kernel.crashing.org)
   9  *                     IBM, Corp.
  10  *
  11  *  This program is free software; you can redistribute it and/or
  12  *  modify it under the terms of the GNU General Public License
  13  *  as published by the Free Software Foundation; either version
  14  *  2 of the License, or (at your option) any later version.
  15  *
  16  */
  17
  18 #include <linux/stddef.h>
  19 #include <linux/init.h>
  20 #include <linux/sched.h>
  21 #include <linux/signal.h>
  22 #include <linux/pci.h>
  23 #include <linux/interrupt.h>
  24 #include <linux/sysdev.h>
  25 #include <linux/adb.h>
  26 #include <linux/pmu.h>
  27 #include <linux/module.h>
  28
  29 #include <asm/sections.h>
  30 #include <asm/io.h>
  31 #include <asm/smp.h>
  32 #include <asm/prom.h>
  33 #include <asm/pci-bridge.h>
  34 #include <asm/time.h>
  35 #include <asm/pmac_feature.h>
  36 #include <asm/mpic.h>
  37 #include <asm/xmon.h>
  38
  39 #include "pmac.h"
  40
  41 #ifdef CONFIG_PPC32
  42 struct pmac_irq_hw {
  43         unsigned int    event;
  44         unsigned int    enable;
  45         unsigned int    ack;
  46         unsigned int    level;
  47 };
  48
  49 /* Workaround flags for 32bit powermac machines */
  50 unsigned int of_irq_workarounds;
  51 struct device_node *of_irq_dflt_pic;
  52
  53 /* Default addresses */
  54 static volatile struct pmac_irq_hw __iomem *pmac_irq_hw[4];
  55
  56 #define GC_LEVEL_MASK           0x3ff00000
  57 #define OHARE_LEVEL_MASK        0x1ff00000
  58 #define HEATHROW_LEVEL_MASK     0x1ff00000
  59
  60 static int max_irqs;
  61 static int max_real_irqs;
  62 static u32 level_mask[4];
  63
  64 static DEFINE_RAW_SPINLOCK(pmac_pic_lock);
  65
  66 #define NR_MASK_WORDS   ((NR_IRQS + 31) / 32)
  67 static unsigned long ppc_lost_interrupts[NR_MASK_WORDS];
  68 static unsigned long ppc_cached_irq_mask[NR_MASK_WORDS];
  69 static int pmac_irq_cascade = -1;
  70 static struct irq_host *pmac_pic_host;
  71
  72 static void __pmac_retrigger(unsigned int irq_nr)
  73 {
  74         if (irq_nr >= max_real_irqs && pmac_irq_cascade > 0) {
  75                 __set_bit(irq_nr, ppc_lost_interrupts);
  76                 irq_nr = pmac_irq_cascade;
  77                 mb();
  78         }
  79         if (!__test_and_set_bit(irq_nr, ppc_lost_interrupts)) {
  80                 atomic_inc(&ppc_n_lost_interrupts);
  81                 set_dec(1);
  82         }
  83 }
  84
  85 static void pmac_mask_and_ack_irq(struct irq_data *d)
  86 {
  87         unsigned int src = irq_map[d->irq].hwirq;
  88         unsigned long bit = 1UL << (src & 0x1f);
  89         int i = src >> 5;
  90         unsigned long flags;
  91
  92         raw_spin_lock_irqsave(&pmac_pic_lock, flags);
  93         __clear_bit(src, ppc_cached_irq_mask);
  94         if (__test_and_clear_bit(src, ppc_lost_interrupts))
  95                 atomic_dec(&ppc_n_lost_interrupts);
  96         out_le32(&pmac_irq_hw[i]->enable, ppc_cached_irq_mask[i]);
  97         out_le32(&pmac_irq_hw[i]->ack, bit);
  98         do {
  99                 /* make sure ack gets to controller before we enable
 100                    interrupts */
 101                 mb();
 102         } while((in_le32(&pmac_irq_hw[i]->enable) & bit)
 103                 != (ppc_cached_irq_mask[i] & bit));
 104         raw_spin_unlock_irqrestore(&pmac_pic_lock, flags);
 105 }
 106
 107 static void pmac_ack_irq(struct irq_data *d)
 108 {
 109         unsigned int src = irq_map[d->irq].hwirq;
 110         unsigned long bit = 1UL << (src & 0x1f);
 111         int i = src >> 5;
 112         unsigned long flags;
 113
 114         raw_spin_lock_irqsave(&pmac_pic_lock, flags);
 115         if (__test_and_clear_bit(src, ppc_lost_interrupts))
 116                 atomic_dec(&ppc_n_lost_interrupts);
 117         out_le32(&pmac_irq_hw[i]->ack, bit);
 118         (void)in_le32(&pmac_irq_hw[i]->ack);
 119         raw_spin_unlock_irqrestore(&pmac_pic_lock, flags);
 120 }
 121
 122 static void __pmac_set_irq_mask(unsigned int irq_nr, int nokicklost)
 123 {
 124         unsigned long bit = 1UL << (irq_nr & 0x1f);
 125         int i = irq_nr >> 5;
 126
 127         if ((unsigned)irq_nr >= max_irqs)
 128                 return;
 129
 130         /* enable unmasked interrupts */
 131         out_le32(&pmac_irq_hw[i]->enable, ppc_cached_irq_mask[i]);
 132
 133         do {
 134                 /* make sure mask gets to controller before we
 135                    return to user */
 136                 mb();
 137         } while((in_le32(&pmac_irq_hw[i]->enable) & bit)
 138                 != (ppc_cached_irq_mask[i] & bit));
 139
 140         /*
 141          * Unfortunately, setting the bit in the enable register
 142          * when the device interrupt is already on *doesn't* set
 143          * the bit in the flag register or request another interrupt.
 144          */
 145         if (bit & ppc_cached_irq_mask[i] & in_le32(&pmac_irq_hw[i]->level))
 146                 __pmac_retrigger(irq_nr);
 147 }
 148
 149 /* When an irq gets requested for the first client, if it's an
 150  * edge interrupt, we clear any previous one on the controller
 151  */
 152 static unsigned int pmac_startup_irq(struct irq_data *d)
 153 {
 154         unsigned long flags;
 155         unsigned int src = irq_map[d->irq].hwirq;
 156         unsigned long bit = 1UL << (src & 0x1f);
 157         int i = src >> 5;
 158
 159         raw_spin_lock_irqsave(&pmac_pic_lock, flags);
 160         if ((irq_to_desc(d->irq)->status & IRQ_LEVEL) == 0)
 161                 out_le32(&pmac_irq_hw[i]->ack, bit);
 162         __set_bit(src, ppc_cached_irq_mask);
 163         __pmac_set_irq_mask(src, 0);
 164         raw_spin_unlock_irqrestore(&pmac_pic_lock, flags);
 165
 166         return 0;
 167 }
 168
 169 static void pmac_mask_irq(struct irq_data *d)
 170 {
 171         unsigned long flags;
 172         unsigned int src = irq_map[d->irq].hwirq;
 173
 174         raw_spin_lock_irqsave(&pmac_pic_lock, flags);
 175         __clear_bit(src, ppc_cached_irq_mask);
 176         __pmac_set_irq_mask(src, 1);
 177         raw_spin_unlock_irqrestore(&pmac_pic_lock, flags);
 178 }
 179
 180 static void pmac_unmask_irq(struct irq_data *d)
 181 {
 182         unsigned long flags;
 183         unsigned int src = irq_map[d->irq].hwirq;
 184
 185         raw_spin_lock_irqsave(&pmac_pic_lock, flags);
 186         __set_bit(src, ppc_cached_irq_mask);
 187         __pmac_set_irq_mask(src, 0);
 188         raw_spin_unlock_irqrestore(&pmac_pic_lock, flags);
 189 }
 190
 191 static int pmac_retrigger(struct irq_data *d)
 192 {
 193         unsigned long flags;
 194
 195         raw_spin_lock_irqsave(&pmac_pic_lock, flags);
 196         __pmac_retrigger(irq_map[d->irq].hwirq);
 197         raw_spin_unlock_irqrestore(&pmac_pic_lock, flags);
 198         return 1;
 199 }
 200
 201 static struct irq_chip pmac_pic = {
 202         .name           = "PMAC-PIC",
 203         .irq_startup    = pmac_startup_irq,
 204         .irq_mask       = pmac_mask_irq,
 205         .irq_ack        = pmac_ack_irq,
 206         .irq_mask_ack   = pmac_mask_and_ack_irq,
 207         .irq_unmask     = pmac_unmask_irq,
 208         .irq_retrigger  = pmac_retrigger,
 209 };
 210
 211 static irqreturn_t gatwick_action(int cpl, void *dev_id)
 212 {
 213         unsigned long flags;
 214         int irq, bits;
 215         int rc = IRQ_NONE;
 216
 217         raw_spin_lock_irqsave(&pmac_pic_lock, flags);
 218         for (irq = max_irqs; (irq -= 32) >= max_real_irqs; ) {
 219                 int i = irq >> 5;
 220                 bits = in_le32(&pmac_irq_hw[i]->event) | ppc_lost_interrupts[i];
 221                 /* We must read level interrupts from the level register */
 222                 bits |= (in_le32(&pmac_irq_hw[i]->level) & level_mask[i]);
 223                 bits &= ppc_cached_irq_mask[i];
 224                 if (bits == 0)
 225                         continue;
 226                 irq += __ilog2(bits);
 227                 raw_spin_unlock_irqrestore(&pmac_pic_lock, flags);
 228                 generic_handle_irq(irq);
 229                 raw_spin_lock_irqsave(&pmac_pic_lock, flags);
 230                 rc = IRQ_HANDLED;
 231         }
 232         raw_spin_unlock_irqrestore(&pmac_pic_lock, flags);
 233         return rc;
 234 }
 235
 236 static unsigned int pmac_pic_get_irq(void)
 237 {
 238         int irq;
 239         unsigned long bits = 0;
 240         unsigned long flags;
 241
 242 #ifdef CONFIG_SMP
 243         void psurge_smp_message_recv(void);
 244
 245         /* IPI's are a hack on the powersurge -- Cort */
 246         if ( smp_processor_id() != 0 ) {
 247                 psurge_smp_message_recv();
 248                 return NO_IRQ_IGNORE;   /* ignore, already handled */
 249         }
 250 #endif /* CONFIG_SMP */
 251         raw_spin_lock_irqsave(&pmac_pic_lock, flags);
 252         for (irq = max_real_irqs; (irq -= 32) >= 0; ) {
 253                 int i = irq >> 5;
 254                 bits = in_le32(&pmac_irq_hw[i]->event) | ppc_lost_interrupts[i];
 255                 /* We must read level interrupts from the level register */
 256                 bits |= (in_le32(&pmac_irq_hw[i]->level) & level_mask[i]);
 257                 bits &= ppc_cached_irq_mask[i];
 258                 if (bits == 0)
 259                         continue;
 260                 irq += __ilog2(bits);
 261                 break;
 262         }
 263         raw_spin_unlock_irqrestore(&pmac_pic_lock, flags);
 264         if (unlikely(irq < 0))
 265                 return NO_IRQ;
 266         return irq_linear_revmap(pmac_pic_host, irq);
 267 }
 268
 269 #ifdef CONFIG_XMON
 270 static struct irqaction xmon_action = {
 271         .handler        = xmon_irq,
 272         .flags          = 0,
 273         .name           = "NMI - XMON"
 274 };
 275 #endif
 276
 277 static struct irqaction gatwick_cascade_action = {
 278         .handler        = gatwick_action,
 279         .flags          = IRQF_DISABLED,
 280         .name           = "cascade",
 281 };
 282
 283 static int pmac_pic_host_match(struct irq_host *h, struct device_node *node)
 284 {
 285         /* We match all, we don't always have a node anyway */
 286         return 1;
 287 }
 288
 289 static int pmac_pic_host_map(struct irq_host *h, unsigned int virq,
 290                              irq_hw_number_t hw)
 291 {
 292         struct irq_desc *desc = irq_to_desc(virq);
 293         int level;
 294
 295         if (hw >= max_irqs)
 296                 return -EINVAL;
 297
 298         /* Mark level interrupts, set delayed disable for edge ones and set
 299          * handlers
 300          */
 301         level = !!(level_mask[hw >> 5] & (1UL << (hw & 0x1f)));
 302         if (level)
 303                 desc->status |= IRQ_LEVEL;
 304         set_irq_chip_and_handler(virq, &pmac_pic, level ?
 305                                  handle_level_irq : handle_edge_irq);
 306         return 0;
 307 }
 308
 309 static int pmac_pic_host_xlate(struct irq_host *h, struct device_node *ct,
 310                                const u32 *intspec, unsigned int intsize,
 311                                irq_hw_number_t *out_hwirq,
 312                                unsigned int *out_flags)
 313
 314 {
 315         *out_flags = IRQ_TYPE_NONE;
 316         *out_hwirq = *intspec;
 317         return 0;
 318 }
 319
 320 static struct irq_host_ops pmac_pic_host_ops = {
 321         .match = pmac_pic_host_match,
 322         .map = pmac_pic_host_map,
 323         .xlate = pmac_pic_host_xlate,
 324 };
 325
 326 static void __init pmac_pic_probe_oldstyle(void)
 327 {
 328         int i;
 329         struct device_node *master = NULL;
 330         struct device_node *slave = NULL;
 331         u8 __iomem *addr;
 332         struct resource r;
 333
 334         /* Set our get_irq function */
 335         ppc_md.get_irq = pmac_pic_get_irq;
 336
 337         /*
 338          * Find the interrupt controller type & node
 339          */
 340
 341         if ((master = of_find_node_by_name(NULL, "gc")) != NULL) {
 342                 max_irqs = max_real_irqs = 32;
 343                 level_mask[0] = GC_LEVEL_MASK;
 344         } else if ((master = of_find_node_by_name(NULL, "ohare")) != NULL) {
 345                 max_irqs = max_real_irqs = 32;
 346                 level_mask[0] = OHARE_LEVEL_MASK;
 347
 348                 /* We might have a second cascaded ohare */
 349                 slave = of_find_node_by_name(NULL, "pci106b,7");
 350                 if (slave) {
 351                         max_irqs = 64;
 352                         level_mask[1] = OHARE_LEVEL_MASK;
 353                 }
 354         } else if ((master = of_find_node_by_name(NULL, "mac-io")) != NULL) {
 355                 max_irqs = max_real_irqs = 64;
 356                 level_mask[0] = HEATHROW_LEVEL_MASK;
 357                 level_mask[1] = 0;
 358
 359                 /* We might have a second cascaded heathrow */
 360                 slave = of_find_node_by_name(master, "mac-io");
 361
 362                 /* Check ordering of master & slave */
 363                 if (of_device_is_compatible(master, "gatwick")) {
 364                         struct device_node *tmp;
 365                         BUG_ON(slave == NULL);
 366                         tmp = master;
 367                         master = slave;
 368                         slave = tmp;
 369                 }
 370
 371                 /* We found a slave */
 372                 if (slave) {
 373                         max_irqs = 128;
 374                         level_mask[2] = HEATHROW_LEVEL_MASK;
 375                         level_mask[3] = 0;
 376                 }
 377         }
 378         BUG_ON(master == NULL);
 379
 380         /*
 381          * Allocate an irq host
 382          */
 383         pmac_pic_host = irq_alloc_host(master, IRQ_HOST_MAP_LINEAR, max_irqs,
 384                                        &pmac_pic_host_ops,
 385                                        max_irqs);
 386         BUG_ON(pmac_pic_host == NULL);
 387         irq_set_default_host(pmac_pic_host);
 388
 389         /* Get addresses of first controller if we have a node for it */
 390         BUG_ON(of_address_to_resource(master, 0, &r));
 391
 392         /* Map interrupts of primary controller */
 393         addr = (u8 __iomem *) ioremap(r.start, 0x40);
 394         i = 0;
 395         pmac_irq_hw[i++] = (volatile struct pmac_irq_hw __iomem *)
 396                 (addr + 0x20);
 397         if (max_real_irqs > 32)
 398                 pmac_irq_hw[i++] = (volatile struct pmac_irq_hw __iomem *)
 399                         (addr + 0x10);
 400         of_node_put(master);
 401
 402         printk(KERN_INFO "irq: Found primary Apple PIC %s for %d irqs\n",
 403                master->full_name, max_real_irqs);
 404
 405         /* Map interrupts of cascaded controller */
 406         if (slave && !of_address_to_resource(slave, 0, &r)) {
 407                 addr = (u8 __iomem *)ioremap(r.start, 0x40);
 408                 pmac_irq_hw[i++] = (volatile struct pmac_irq_hw __iomem *)
 409                         (addr + 0x20);
 410                 if (max_irqs > 64)
 411                         pmac_irq_hw[i++] =
 412                                 (volatile struct pmac_irq_hw __iomem *)
 413                                 (addr + 0x10);
 414                 pmac_irq_cascade = irq_of_parse_and_map(slave, 0);
 415
 416                 printk(KERN_INFO "irq: Found slave Apple PIC %s for %d irqs"
 417                        " cascade: %d\n", slave->full_name,
 418                        max_irqs - max_real_irqs, pmac_irq_cascade);
 419         }
 420         of_node_put(slave);
 421
 422         /* Disable all interrupts in all controllers */
 423         for (i = 0; i * 32 < max_irqs; ++i)
 424                 out_le32(&pmac_irq_hw[i]->enable, 0);
 425
 426         /* Hookup cascade irq */
 427         if (slave && pmac_irq_cascade != NO_IRQ)
 428                 setup_irq(pmac_irq_cascade, &gatwick_cascade_action);
 429
 430         printk(KERN_INFO "irq: System has %d possible interrupts\n", max_irqs);
 431 #ifdef CONFIG_XMON
 432         setup_irq(irq_create_mapping(NULL, 20), &xmon_action);
 433 #endif
 434 }
 435
 436 int of_irq_map_oldworld(struct device_node *device, int index,
 437                         struct of_irq *out_irq)
 438 {
 439         const u32 *ints = NULL;
 440         int intlen;
 441
 442         /*
 443          * Old machines just have a list of interrupt numbers
 444          * and no interrupt-controller nodes. We also have dodgy
 445          * cases where the APPL,interrupts property is completely
 446          * missing behind pci-pci bridges and we have to get it
 447          * from the parent (the bridge itself, as apple just wired
 448          * everything together on these)
 449          */
 450         while (device) {
 451                 ints = of_get_property(device, "AAPL,interrupts", &intlen);
 452                 if (ints != NULL)
 453                         break;
 454                 device = device->parent;
 455                 if (device && strcmp(device->type, "pci") != 0)
 456                         break;
 457         }
 458         if (ints == NULL)
 459                 return -EINVAL;
 460         intlen /= sizeof(u32);
 461
 462         if (index >= intlen)
 463                 return -EINVAL;
 464
 465         out_irq->controller = NULL;
 466         out_irq->specifier[0] = ints[index];
 467         out_irq->size = 1;
 468
 469         return 0;
 470 }
 471 #endif /* CONFIG_PPC32 */
 472
 473 static void pmac_u3_cascade(unsigned int irq, struct irq_desc *desc)
 474 {
 475         struct irq_chip *chip = get_irq_desc_chip(desc);
 476         struct mpic *mpic = get_irq_desc_data(desc);
 477         unsigned int cascade_irq = mpic_get_one_irq(mpic);
 478
 479         if (cascade_irq != NO_IRQ)
 480                 generic_handle_irq(cascade_irq);
 481
 482         chip->irq_eoi(&desc->irq_data);
 483 }
 484
 485 static void __init pmac_pic_setup_mpic_nmi(struct mpic *mpic)
 486 {
 487 #if defined(CONFIG_XMON) && defined(CONFIG_PPC32)
 488         struct device_node* pswitch;
 489         int nmi_irq;
 490
 491         pswitch = of_find_node_by_name(NULL, "programmer-switch");
 492         if (pswitch) {
 493                 nmi_irq = irq_of_parse_and_map(pswitch, 0);
 494                 if (nmi_irq != NO_IRQ) {
 495                         mpic_irq_set_priority(nmi_irq, 9);
 496                         setup_irq(nmi_irq, &xmon_action);
 497                 }
 498                 of_node_put(pswitch);
 499         }
 500 #endif  /* defined(CONFIG_XMON) && defined(CONFIG_PPC32) */
 501 }
 502
 503 static struct mpic * __init pmac_setup_one_mpic(struct device_node *np,
 504                                                 int master)
 505 {
 506         const char *name = master ? " MPIC 1   " : " MPIC 2   ";
 507         struct resource r;
 508         struct mpic *mpic;
 509         unsigned int flags = master ? MPIC_PRIMARY : 0;
 510         int rc;
 511
 512         rc = of_address_to_resource(np, 0, &r);
 513         if (rc)
 514                 return NULL;
 515
 516         pmac_call_feature(PMAC_FTR_ENABLE_MPIC, np, 0, 0);
 517
 518         flags |= MPIC_WANTS_RESET;
 519         if (of_get_property(np, "big-endian", NULL))
 520                 flags |= MPIC_BIG_ENDIAN;
 521
 522         /* Primary Big Endian means HT interrupts. This is quite dodgy
 523          * but works until I find a better way
 524          */
 525         if (master && (flags & MPIC_BIG_ENDIAN))
 526                 flags |= MPIC_U3_HT_IRQS;
 527
 528         mpic = mpic_alloc(np, r.start, flags, 0, 0, name);
 529         if (mpic == NULL)
 530                 return NULL;
 531
 532         mpic_init(mpic);
 533
 534         return mpic;
 535  }
 536
 537 static int __init pmac_pic_probe_mpic(void)
 538 {
 539         struct mpic *mpic1, *mpic2;
 540         struct device_node *np, *master = NULL, *slave = NULL;
 541         unsigned int cascade;
 542
 543         /* We can have up to 2 MPICs cascaded */
 544         for (np = NULL; (np = of_find_node_by_type(np, "open-pic"))
 545                      != NULL;) {
 546                 if (master == NULL &&
 547                     of_get_property(np, "interrupts", NULL) == NULL)
 548                         master = of_node_get(np);
 549                 else if (slave == NULL)
 550                         slave = of_node_get(np);
 551                 if (master && slave)
 552                         break;
 553         }
 554
 555         /* Check for bogus setups */
 556         if (master == NULL && slave != NULL) {
 557                 master = slave;
 558                 slave = NULL;
 559         }
 560
 561         /* Not found, default to good old pmac pic */
 562         if (master == NULL)
 563                 return -ENODEV;
 564
 565         /* Set master handler */
 566         ppc_md.get_irq = mpic_get_irq;
 567
 568         /* Setup master */
 569         mpic1 = pmac_setup_one_mpic(master, 1);
 570         BUG_ON(mpic1 == NULL);
 571
 572         /* Install NMI if any */
 573         pmac_pic_setup_mpic_nmi(mpic1);
 574
 575         of_node_put(master);
 576
 577         /* No slave, let's go out */
 578         if (slave == NULL)
 579                 return 0;
 580
 581         /* Get/Map slave interrupt */
 582         cascade = irq_of_parse_and_map(slave, 0);
 583         if (cascade == NO_IRQ) {
 584                 printk(KERN_ERR "Failed to map cascade IRQ\n");
 585                 return 0;
 586         }
 587
 588         mpic2 = pmac_setup_one_mpic(slave, 0);
 589         if (mpic2 == NULL) {
 590                 printk(KERN_ERR "Failed to setup slave MPIC\n");
 591                 of_node_put(slave);
 592                 return 0;
 593         }
 594         set_irq_data(cascade, mpic2);
 595         set_irq_chained_handler(cascade, pmac_u3_cascade);
 596
 597         of_node_put(slave);
 598         return 0;
 599 }
 600
 601
 602 void __init pmac_pic_init(void)
 603 {
 604         /* We configure the OF parsing based on our oldworld vs. newworld
 605          * platform type and wether we were booted by BootX.
 606          */
 607 #ifdef CONFIG_PPC32
 608         if (!pmac_newworld)
 609                 of_irq_workarounds |= OF_IMAP_OLDWORLD_MAC;
 610         if (of_get_property(of_chosen, "linux,bootx", NULL) != NULL)
 611                 of_irq_workarounds |= OF_IMAP_NO_PHANDLE;
 612
 613         /* If we don't have phandles on a newworld, then try to locate a
 614          * default interrupt controller (happens when booting with BootX).
 615          * We do a first match here, hopefully, that only ever happens on
 616          * machines with one controller.
 617          */
 618         if (pmac_newworld && (of_irq_workarounds & OF_IMAP_NO_PHANDLE)) {
 619                 struct device_node *np;
 620
 621                 for_each_node_with_property(np, "interrupt-controller") {
 622                         /* Skip /chosen/interrupt-controller */
 623                         if (strcmp(np->name, "chosen") == 0)
 624                                 continue;
 625                         /* It seems like at least one person wants
 626                          * to use BootX on a machine with an AppleKiwi
 627                          * controller which happens to pretend to be an
 628                          * interrupt controller too. */
 629                         if (strcmp(np->name, "AppleKiwi") == 0)
 630                                 continue;
 631                         /* I think we found one ! */
 632                         of_irq_dflt_pic = np;
 633                         break;
 634                 }
 635         }
 636 #endif /* CONFIG_PPC32 */
 637
 638         /* We first try to detect Apple's new Core99 chipset, since mac-io
 639          * is quite different on those machines and contains an IBM MPIC2.
 640          */
 641         if (pmac_pic_probe_mpic() == 0)
 642                 return;
 643
 644 #ifdef CONFIG_PPC32
 645         pmac_pic_probe_oldstyle();
 646 #endif
 647 }
 648
 649 #if defined(CONFIG_PM) && defined(CONFIG_PPC32)
 650 /*
 651  * These procedures are used in implementing sleep on the powerbooks.
 652  * sleep_save_intrs() saves the states of all interrupt enables
 653  * and disables all interrupts except for the nominated one.
 654  * sleep_restore_intrs() restores the states of all interrupt enables.
 655  */
 656 unsigned long sleep_save_mask[2];
 657
 658 /* This used to be passed by the PMU driver but that link got
 659  * broken with the new driver model. We use this tweak for now...
 660  * We really want to do things differently though...
 661  */
 662 static int pmacpic_find_viaint(void)
 663 {
 664         int viaint = -1;
 665
 666 #ifdef CONFIG_ADB_PMU
 667         struct device_node *np;
 668
 669         if (pmu_get_model() != PMU_OHARE_BASED)
 670                 goto not_found;
 671         np = of_find_node_by_name(NULL, "via-pmu");
 672         if (np == NULL)
 673                 goto not_found;
 674         viaint = irq_of_parse_and_map(np, 0);
 675
 676 not_found:
 677 #endif /* CONFIG_ADB_PMU */
 678         return viaint;
 679 }
 680
 681 static int pmacpic_suspend(struct sys_device *sysdev, pm_message_t state)
 682 {
 683         int viaint = pmacpic_find_viaint();
 684
 685         sleep_save_mask[0] = ppc_cached_irq_mask[0];
 686         sleep_save_mask[1] = ppc_cached_irq_mask[1];
 687         ppc_cached_irq_mask[0] = 0;
 688         ppc_cached_irq_mask[1] = 0;
 689         if (viaint > 0)
 690                 set_bit(viaint, ppc_cached_irq_mask);
 691         out_le32(&pmac_irq_hw[0]->enable, ppc_cached_irq_mask[0]);
 692         if (max_real_irqs > 32)
 693                 out_le32(&pmac_irq_hw[1]->enable, ppc_cached_irq_mask[1]);
 694         (void)in_le32(&pmac_irq_hw[0]->event);
 695         /* make sure mask gets to controller before we return to caller */
 696         mb();
 697         (void)in_le32(&pmac_irq_hw[0]->enable);
 698
 699         return 0;
 700 }
 701
 702 static int pmacpic_resume(struct sys_device *sysdev)
 703 {
 704         int i;
 705
 706         out_le32(&pmac_irq_hw[0]->enable, 0);
 707         if (max_real_irqs > 32)
 708                 out_le32(&pmac_irq_hw[1]->enable, 0);
 709         mb();
 710         for (i = 0; i < max_real_irqs; ++i)
 711                 if (test_bit(i, sleep_save_mask))
 712                         pmac_unmask_irq(irq_get_irq_data(i));
 713
 714         return 0;
 715 }
 716
 717 #endif /* CONFIG_PM && CONFIG_PPC32 */
 718
 719 static struct sysdev_class pmacpic_sysclass = {
 720         .name = "pmac_pic",
 721 };
 722
 723 static struct sys_device device_pmacpic = {
 724         .id             = 0,
 725         .cls            = &pmacpic_sysclass,
 726 };
 727
 728 static struct sysdev_driver driver_pmacpic = {
 729 #if defined(CONFIG_PM) && defined(CONFIG_PPC32)
 730         .suspend        = &pmacpic_suspend,
 731         .resume         = &pmacpic_resume,
 732 #endif /* CONFIG_PM && CONFIG_PPC32 */
 733 };
 734
 735 static int __init init_pmacpic_sysfs(void)
 736 {
 737 #ifdef CONFIG_PPC32
 738         if (max_irqs == 0)
 739                 return -ENODEV;
 740 #endif
 741         printk(KERN_DEBUG "Registering pmac pic with sysfs...\n");
 742         sysdev_class_register(&pmacpic_sysclass);
 743         sysdev_register(&device_pmacpic);
 744         sysdev_driver_register(&pmacpic_sysclass, &driver_pmacpic);
 745         return 0;
 746 }
 747 machine_subsys_initcall(powermac, init_pmacpic_sysfs);
 748