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(unsigned int virq)
  86 {
  87         unsigned int src = irq_map[virq].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(unsigned int virq)
 108 {
 109         unsigned int src = irq_map[virq].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(unsigned int virq)
 153 {
 154         unsigned long flags;
 155         unsigned int src = irq_map[virq].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(virq)->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(unsigned int virq)
 170 {
 171         unsigned long flags;
 172         unsigned int src = irq_map[virq].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(unsigned int virq)
 181 {
 182         unsigned long flags;
 183         unsigned int src = irq_map[virq].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(unsigned int virq)
 192 {
 193         unsigned long flags;
 194
 195         raw_spin_lock_irqsave(&pmac_pic_lock, flags);
 196         __pmac_retrigger(irq_map[virq].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         .startup        = pmac_startup_irq,
 204         .mask           = pmac_mask_irq,
 205         .ack            = pmac_ack_irq,
 206         .mask_ack       = pmac_mask_and_ack_irq,
 207         .unmask         = pmac_unmask_irq,
 208         .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 mpic *mpic = desc->handler_data;
 476
 477         unsigned int cascade_irq = mpic_get_one_irq(mpic);
 478         if (cascade_irq != NO_IRQ)
 479                 generic_handle_irq(cascade_irq);
 480         desc->chip->eoi(irq);
 481 }
 482
 483 static void __init pmac_pic_setup_mpic_nmi(struct mpic *mpic)
 484 {
 485 #if defined(CONFIG_XMON) && defined(CONFIG_PPC32)
 486         struct device_node* pswitch;
 487         int nmi_irq;
 488
 489         pswitch = of_find_node_by_name(NULL, "programmer-switch");
 490         if (pswitch) {
 491                 nmi_irq = irq_of_parse_and_map(pswitch, 0);
 492                 if (nmi_irq != NO_IRQ) {
 493                         mpic_irq_set_priority(nmi_irq, 9);
 494                         setup_irq(nmi_irq, &xmon_action);
 495                 }
 496                 of_node_put(pswitch);
 497         }
 498 #endif  /* defined(CONFIG_XMON) && defined(CONFIG_PPC32) */
 499 }
 500
 501 static struct mpic * __init pmac_setup_one_mpic(struct device_node *np,
 502                                                 int master)
 503 {
 504         const char *name = master ? " MPIC 1   " : " MPIC 2   ";
 505         struct resource r;
 506         struct mpic *mpic;
 507         unsigned int flags = master ? MPIC_PRIMARY : 0;
 508         int rc;
 509
 510         rc = of_address_to_resource(np, 0, &r);
 511         if (rc)
 512                 return NULL;
 513
 514         pmac_call_feature(PMAC_FTR_ENABLE_MPIC, np, 0, 0);
 515
 516         flags |= MPIC_WANTS_RESET;
 517         if (of_get_property(np, "big-endian", NULL))
 518                 flags |= MPIC_BIG_ENDIAN;
 519
 520         /* Primary Big Endian means HT interrupts. This is quite dodgy
 521          * but works until I find a better way
 522          */
 523         if (master && (flags & MPIC_BIG_ENDIAN))
 524                 flags |= MPIC_U3_HT_IRQS;
 525
 526         mpic = mpic_alloc(np, r.start, flags, 0, 0, name);
 527         if (mpic == NULL)
 528                 return NULL;
 529
 530         mpic_init(mpic);
 531
 532         return mpic;
 533  }
 534
 535 static int __init pmac_pic_probe_mpic(void)
 536 {
 537         struct mpic *mpic1, *mpic2;
 538         struct device_node *np, *master = NULL, *slave = NULL;
 539         unsigned int cascade;
 540
 541         /* We can have up to 2 MPICs cascaded */
 542         for (np = NULL; (np = of_find_node_by_type(np, "open-pic"))
 543                      != NULL;) {
 544                 if (master == NULL &&
 545                     of_get_property(np, "interrupts", NULL) == NULL)
 546                         master = of_node_get(np);
 547                 else if (slave == NULL)
 548                         slave = of_node_get(np);
 549                 if (master && slave)
 550                         break;
 551         }
 552
 553         /* Check for bogus setups */
 554         if (master == NULL && slave != NULL) {
 555                 master = slave;
 556                 slave = NULL;
 557         }
 558
 559         /* Not found, default to good old pmac pic */
 560         if (master == NULL)
 561                 return -ENODEV;
 562
 563         /* Set master handler */
 564         ppc_md.get_irq = mpic_get_irq;
 565
 566         /* Setup master */
 567         mpic1 = pmac_setup_one_mpic(master, 1);
 568         BUG_ON(mpic1 == NULL);
 569
 570         /* Install NMI if any */
 571         pmac_pic_setup_mpic_nmi(mpic1);
 572
 573         of_node_put(master);
 574
 575         /* No slave, let's go out */
 576         if (slave == NULL)
 577                 return 0;
 578
 579         /* Get/Map slave interrupt */
 580         cascade = irq_of_parse_and_map(slave, 0);
 581         if (cascade == NO_IRQ) {
 582                 printk(KERN_ERR "Failed to map cascade IRQ\n");
 583                 return 0;
 584         }
 585
 586         mpic2 = pmac_setup_one_mpic(slave, 0);
 587         if (mpic2 == NULL) {
 588                 printk(KERN_ERR "Failed to setup slave MPIC\n");
 589                 of_node_put(slave);
 590                 return 0;
 591         }
 592         set_irq_data(cascade, mpic2);
 593         set_irq_chained_handler(cascade, pmac_u3_cascade);
 594
 595         of_node_put(slave);
 596         return 0;
 597 }
 598
 599
 600 void __init pmac_pic_init(void)
 601 {
 602         /* We configure the OF parsing based on our oldworld vs. newworld
 603          * platform type and wether we were booted by BootX.
 604          */
 605 #ifdef CONFIG_PPC32
 606         if (!pmac_newworld)
 607                 of_irq_workarounds |= OF_IMAP_OLDWORLD_MAC;
 608         if (of_get_property(of_chosen, "linux,bootx", NULL) != NULL)
 609                 of_irq_workarounds |= OF_IMAP_NO_PHANDLE;
 610
 611         /* If we don't have phandles on a newworld, then try to locate a
 612          * default interrupt controller (happens when booting with BootX).
 613          * We do a first match here, hopefully, that only ever happens on
 614          * machines with one controller.
 615          */
 616         if (pmac_newworld && (of_irq_workarounds & OF_IMAP_NO_PHANDLE)) {
 617                 struct device_node *np;
 618
 619                 for_each_node_with_property(np, "interrupt-controller") {
 620                         /* Skip /chosen/interrupt-controller */
 621                         if (strcmp(np->name, "chosen") == 0)
 622                                 continue;
 623                         /* It seems like at least one person wants
 624                          * to use BootX on a machine with an AppleKiwi
 625                          * controller which happens to pretend to be an
 626                          * interrupt controller too. */
 627                         if (strcmp(np->name, "AppleKiwi") == 0)
 628                                 continue;
 629                         /* I think we found one ! */
 630                         of_irq_dflt_pic = np;
 631                         break;
 632                 }
 633         }
 634 #endif /* CONFIG_PPC32 */
 635
 636         /* We first try to detect Apple's new Core99 chipset, since mac-io
 637          * is quite different on those machines and contains an IBM MPIC2.
 638          */
 639         if (pmac_pic_probe_mpic() == 0)
 640                 return;
 641
 642 #ifdef CONFIG_PPC32
 643         pmac_pic_probe_oldstyle();
 644 #endif
 645 }
 646
 647 #if defined(CONFIG_PM) && defined(CONFIG_PPC32)
 648 /*
 649  * These procedures are used in implementing sleep on the powerbooks.
 650  * sleep_save_intrs() saves the states of all interrupt enables
 651  * and disables all interrupts except for the nominated one.
 652  * sleep_restore_intrs() restores the states of all interrupt enables.
 653  */
 654 unsigned long sleep_save_mask[2];
 655
 656 /* This used to be passed by the PMU driver but that link got
 657  * broken with the new driver model. We use this tweak for now...
 658  * We really want to do things differently though...
 659  */
 660 static int pmacpic_find_viaint(void)
 661 {
 662         int viaint = -1;
 663
 664 #ifdef CONFIG_ADB_PMU
 665         struct device_node *np;
 666
 667         if (pmu_get_model() != PMU_OHARE_BASED)
 668                 goto not_found;
 669         np = of_find_node_by_name(NULL, "via-pmu");
 670         if (np == NULL)
 671                 goto not_found;
 672         viaint = irq_of_parse_and_map(np, 0);
 673
 674 not_found:
 675 #endif /* CONFIG_ADB_PMU */
 676         return viaint;
 677 }
 678
 679 static int pmacpic_suspend(struct sys_device *sysdev, pm_message_t state)
 680 {
 681         int viaint = pmacpic_find_viaint();
 682
 683         sleep_save_mask[0] = ppc_cached_irq_mask[0];
 684         sleep_save_mask[1] = ppc_cached_irq_mask[1];
 685         ppc_cached_irq_mask[0] = 0;
 686         ppc_cached_irq_mask[1] = 0;
 687         if (viaint > 0)
 688                 set_bit(viaint, ppc_cached_irq_mask);
 689         out_le32(&pmac_irq_hw[0]->enable, ppc_cached_irq_mask[0]);
 690         if (max_real_irqs > 32)
 691                 out_le32(&pmac_irq_hw[1]->enable, ppc_cached_irq_mask[1]);
 692         (void)in_le32(&pmac_irq_hw[0]->event);
 693         /* make sure mask gets to controller before we return to caller */
 694         mb();
 695         (void)in_le32(&pmac_irq_hw[0]->enable);
 696
 697         return 0;
 698 }
 699
 700 static int pmacpic_resume(struct sys_device *sysdev)
 701 {
 702         int i;
 703
 704         out_le32(&pmac_irq_hw[0]->enable, 0);
 705         if (max_real_irqs > 32)
 706                 out_le32(&pmac_irq_hw[1]->enable, 0);
 707         mb();
 708         for (i = 0; i < max_real_irqs; ++i)
 709                 if (test_bit(i, sleep_save_mask))
 710                         pmac_unmask_irq(i);
 711
 712         return 0;
 713 }
 714
 715 #endif /* CONFIG_PM && CONFIG_PPC32 */
 716
 717 static struct sysdev_class pmacpic_sysclass = {
 718         .name = "pmac_pic",
 719 };
 720
 721 static struct sys_device device_pmacpic = {
 722         .id             = 0,
 723         .cls            = &pmacpic_sysclass,
 724 };
 725
 726 static struct sysdev_driver driver_pmacpic = {
 727 #if defined(CONFIG_PM) && defined(CONFIG_PPC32)
 728         .suspend        = &pmacpic_suspend,
 729         .resume         = &pmacpic_resume,
 730 #endif /* CONFIG_PM && CONFIG_PPC32 */
 731 };
 732
 733 static int __init init_pmacpic_sysfs(void)
 734 {
 735 #ifdef CONFIG_PPC32
 736         if (max_irqs == 0)
 737                 return -ENODEV;
 738 #endif
 739         printk(KERN_DEBUG "Registering pmac pic with sysfs...\n");
 740         sysdev_class_register(&pmacpic_sysclass);
 741         sysdev_register(&device_pmacpic);
 742         sysdev_driver_register(&pmacpic_sysclass, &driver_pmacpic);
 743         return 0;
 744 }
 745 machine_subsys_initcall(powermac, init_pmacpic_sysfs);
 746