arch/powerpc/platforms/powermac/pci.c

   1 /*
   2  * Support for PCI bridges found on Power Macintoshes.
   3  *
   4  * Copyright (C) 2003 Benjamin Herrenschmuidt (benh@kernel.crashing.org)
   5  * Copyright (C) 1997 Paul Mackerras (paulus@samba.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
  13 #include <linux/kernel.h>
  14 #include <linux/pci.h>
  15 #include <linux/delay.h>
  16 #include <linux/string.h>
  17 #include <linux/init.h>
  18 #include <linux/bootmem.h>
  19
  20 #include <asm/sections.h>
  21 #include <asm/io.h>
  22 #include <asm/prom.h>
  23 #include <asm/pci-bridge.h>
  24 #include <asm/machdep.h>
  25 #include <asm/pmac_feature.h>
  26 #include <asm/grackle.h>
  27 #ifdef CONFIG_PPC64
  28 #include <asm/iommu.h>
  29 #include <asm/ppc-pci.h>
  30 #endif
  31
  32 #undef DEBUG
  33
  34 #ifdef DEBUG
  35 #define DBG(x...) printk(x)
  36 #else
  37 #define DBG(x...)
  38 #endif
  39
  40 static int add_bridge(struct device_node *dev);
  41
  42 /* XXX Could be per-controller, but I don't think we risk anything by
  43  * assuming we won't have both UniNorth and Bandit */
  44 static int has_uninorth;
  45 #ifdef CONFIG_PPC64
  46 static struct pci_controller *u3_agp;
  47 static struct pci_controller *u3_ht;
  48 #endif /* CONFIG_PPC64 */
  49
  50 extern u8 pci_cache_line_size;
  51 extern int pcibios_assign_bus_offset;
  52
  53 struct device_node *k2_skiplist[2];
  54
  55 /*
  56  * Magic constants for enabling cache coherency in the bandit/PSX bridge.
  57  */
  58 #define BANDIT_DEVID_2  8
  59 #define BANDIT_REVID    3
  60
  61 #define BANDIT_DEVNUM   11
  62 #define BANDIT_MAGIC    0x50
  63 #define BANDIT_COHERENT 0x40
  64
  65 static int __init fixup_one_level_bus_range(struct device_node *node, int higher)
  66 {
  67         for (; node != 0;node = node->sibling) {
  68                 int * bus_range;
  69                 unsigned int *class_code;
  70                 int len;
  71
  72                 /* For PCI<->PCI bridges or CardBus bridges, we go down */
  73                 class_code = (unsigned int *) get_property(node, "class-code", NULL);
  74                 if (!class_code || ((*class_code >> 8) != PCI_CLASS_BRIDGE_PCI &&
  75                         (*class_code >> 8) != PCI_CLASS_BRIDGE_CARDBUS))
  76                         continue;
  77                 bus_range = (int *) get_property(node, "bus-range", &len);
  78                 if (bus_range != NULL && len > 2 * sizeof(int)) {
  79                         if (bus_range[1] > higher)
  80                                 higher = bus_range[1];
  81                 }
  82                 higher = fixup_one_level_bus_range(node->child, higher);
  83         }
  84         return higher;
  85 }
  86
  87 /* This routine fixes the "bus-range" property of all bridges in the
  88  * system since they tend to have their "last" member wrong on macs
  89  *
  90  * Note that the bus numbers manipulated here are OF bus numbers, they
  91  * are not Linux bus numbers.
  92  */
  93 static void __init fixup_bus_range(struct device_node *bridge)
  94 {
  95         int * bus_range;
  96         int len;
  97
  98         /* Lookup the "bus-range" property for the hose */
  99         bus_range = (int *) get_property(bridge, "bus-range", &len);
 100         if (bus_range == NULL || len < 2 * sizeof(int)) {
 101                 printk(KERN_WARNING "Can't get bus-range for %s\n",
 102                                bridge->full_name);
 103                 return;
 104         }
 105         bus_range[1] = fixup_one_level_bus_range(bridge->child, bus_range[1]);
 106 }
 107
 108 /*
 109  * Apple MacRISC (U3, UniNorth, Bandit, Chaos) PCI controllers.
 110  *
 111  * The "Bandit" version is present in all early PCI PowerMacs,
 112  * and up to the first ones using Grackle. Some machines may
 113  * have 2 bandit controllers (2 PCI busses).
 114  *
 115  * "Chaos" is used in some "Bandit"-type machines as a bridge
 116  * for the separate display bus. It is accessed the same
 117  * way as bandit, but cannot be probed for devices. It therefore
 118  * has its own config access functions.
 119  *
 120  * The "UniNorth" version is present in all Core99 machines
 121  * (iBook, G4, new IMacs, and all the recent Apple machines).
 122  * It contains 3 controllers in one ASIC.
 123  *
 124  * The U3 is the bridge used on G5 machines. It contains an
 125  * AGP bus which is dealt with the old UniNorth access routines
 126  * and a HyperTransport bus which uses its own set of access
 127  * functions.
 128  */
 129
 130 #define MACRISC_CFA0(devfn, off)        \
 131         ((1 << (unsigned long)PCI_SLOT(dev_fn)) \
 132         | (((unsigned long)PCI_FUNC(dev_fn)) << 8) \
 133         | (((unsigned long)(off)) & 0xFCUL))
 134
 135 #define MACRISC_CFA1(bus, devfn, off)   \
 136         ((((unsigned long)(bus)) << 16) \
 137         |(((unsigned long)(devfn)) << 8) \
 138         |(((unsigned long)(off)) & 0xFCUL) \
 139         |1UL)
 140
 141 static unsigned long macrisc_cfg_access(struct pci_controller* hose,
 142                                                u8 bus, u8 dev_fn, u8 offset)
 143 {
 144         unsigned int caddr;
 145
 146         if (bus == hose->first_busno) {
 147                 if (dev_fn < (11 << 3))
 148                         return 0;
 149                 caddr = MACRISC_CFA0(dev_fn, offset);
 150         } else
 151                 caddr = MACRISC_CFA1(bus, dev_fn, offset);
 152
 153         /* Uninorth will return garbage if we don't read back the value ! */
 154         do {
 155                 out_le32(hose->cfg_addr, caddr);
 156         } while (in_le32(hose->cfg_addr) != caddr);
 157
 158         offset &= has_uninorth ? 0x07 : 0x03;
 159         return ((unsigned long)hose->cfg_data) + offset;
 160 }
 161
 162 static int macrisc_read_config(struct pci_bus *bus, unsigned int devfn,
 163                                       int offset, int len, u32 *val)
 164 {
 165         struct pci_controller *hose;
 166         unsigned long addr;
 167
 168         hose = pci_bus_to_host(bus);
 169         if (hose == NULL)
 170                 return PCIBIOS_DEVICE_NOT_FOUND;
 171
 172         addr = macrisc_cfg_access(hose, bus->number, devfn, offset);
 173         if (!addr)
 174                 return PCIBIOS_DEVICE_NOT_FOUND;
 175         /*
 176          * Note: the caller has already checked that offset is
 177          * suitably aligned and that len is 1, 2 or 4.
 178          */
 179         switch (len) {
 180         case 1:
 181                 *val = in_8((u8 *)addr);
 182                 break;
 183         case 2:
 184                 *val = in_le16((u16 *)addr);
 185                 break;
 186         default:
 187                 *val = in_le32((u32 *)addr);
 188                 break;
 189         }
 190         return PCIBIOS_SUCCESSFUL;
 191 }
 192
 193 static int macrisc_write_config(struct pci_bus *bus, unsigned int devfn,
 194                                        int offset, int len, u32 val)
 195 {
 196         struct pci_controller *hose;
 197         unsigned long addr;
 198
 199         hose = pci_bus_to_host(bus);
 200         if (hose == NULL)
 201                 return PCIBIOS_DEVICE_NOT_FOUND;
 202
 203         addr = macrisc_cfg_access(hose, bus->number, devfn, offset);
 204         if (!addr)
 205                 return PCIBIOS_DEVICE_NOT_FOUND;
 206         /*
 207          * Note: the caller has already checked that offset is
 208          * suitably aligned and that len is 1, 2 or 4.
 209          */
 210         switch (len) {
 211         case 1:
 212                 out_8((u8 *)addr, val);
 213                 (void) in_8((u8 *)addr);
 214                 break;
 215         case 2:
 216                 out_le16((u16 *)addr, val);
 217                 (void) in_le16((u16 *)addr);
 218                 break;
 219         default:
 220                 out_le32((u32 *)addr, val);
 221                 (void) in_le32((u32 *)addr);
 222                 break;
 223         }
 224         return PCIBIOS_SUCCESSFUL;
 225 }
 226
 227 static struct pci_ops macrisc_pci_ops =
 228 {
 229         macrisc_read_config,
 230         macrisc_write_config
 231 };
 232
 233 #ifdef CONFIG_PPC32
 234 /*
 235  * Verify that a specific (bus, dev_fn) exists on chaos
 236  */
 237 static int
 238 chaos_validate_dev(struct pci_bus *bus, int devfn, int offset)
 239 {
 240         struct device_node *np;
 241         u32 *vendor, *device;
 242
 243         np = pci_busdev_to_OF_node(bus, devfn);
 244         if (np == NULL)
 245                 return PCIBIOS_DEVICE_NOT_FOUND;
 246
 247         vendor = (u32 *)get_property(np, "vendor-id", NULL);
 248         device = (u32 *)get_property(np, "device-id", NULL);
 249         if (vendor == NULL || device == NULL)
 250                 return PCIBIOS_DEVICE_NOT_FOUND;
 251
 252         if ((*vendor == 0x106b) && (*device == 3) && (offset >= 0x10)
 253             && (offset != 0x14) && (offset != 0x18) && (offset <= 0x24))
 254                 return PCIBIOS_BAD_REGISTER_NUMBER;
 255
 256         return PCIBIOS_SUCCESSFUL;
 257 }
 258
 259 static int
 260 chaos_read_config(struct pci_bus *bus, unsigned int devfn, int offset,
 261                   int len, u32 *val)
 262 {
 263         int result = chaos_validate_dev(bus, devfn, offset);
 264         if (result == PCIBIOS_BAD_REGISTER_NUMBER)
 265                 *val = ~0U;
 266         if (result != PCIBIOS_SUCCESSFUL)
 267                 return result;
 268         return macrisc_read_config(bus, devfn, offset, len, val);
 269 }
 270
 271 static int
 272 chaos_write_config(struct pci_bus *bus, unsigned int devfn, int offset,
 273                    int len, u32 val)
 274 {
 275         int result = chaos_validate_dev(bus, devfn, offset);
 276         if (result != PCIBIOS_SUCCESSFUL)
 277                 return result;
 278         return macrisc_write_config(bus, devfn, offset, len, val);
 279 }
 280
 281 static struct pci_ops chaos_pci_ops =
 282 {
 283         chaos_read_config,
 284         chaos_write_config
 285 };
 286
 287 static void __init setup_chaos(struct pci_controller *hose,
 288                                struct reg_property *addr)
 289 {
 290         /* assume a `chaos' bridge */
 291         hose->ops = &chaos_pci_ops;
 292         hose->cfg_addr = ioremap(addr->address + 0x800000, 0x1000);
 293         hose->cfg_data = ioremap(addr->address + 0xc00000, 0x1000);
 294 }
 295 #else
 296 #define setup_chaos(hose, addr)
 297 #endif /* CONFIG_PPC32 */
 298
 299 #ifdef CONFIG_PPC64
 300 /*
 301  * These versions of U3 HyperTransport config space access ops do not
 302  * implement self-view of the HT host yet
 303  */
 304
 305 /*
 306  * This function deals with some "special cases" devices.
 307  *
 308  *  0 -> No special case
 309  *  1 -> Skip the device but act as if the access was successfull
 310  *       (return 0xff's on reads, eventually, cache config space
 311  *       accesses in a later version)
 312  * -1 -> Hide the device (unsuccessful acess)
 313  */
 314 static int u3_ht_skip_device(struct pci_controller *hose,
 315                              struct pci_bus *bus, unsigned int devfn)
 316 {
 317         struct device_node *busdn, *dn;
 318         int i;
 319
 320         /* We only allow config cycles to devices that are in OF device-tree
 321          * as we are apparently having some weird things going on with some
 322          * revs of K2 on recent G5s
 323          */
 324         if (bus->self)
 325                 busdn = pci_device_to_OF_node(bus->self);
 326         else
 327                 busdn = hose->arch_data;
 328         for (dn = busdn->child; dn; dn = dn->sibling)
 329                 if (dn->data && PCI_DN(dn)->devfn == devfn)
 330                         break;
 331         if (dn == NULL)
 332                 return -1;
 333
 334         /*
 335          * When a device in K2 is powered down, we die on config
 336          * cycle accesses. Fix that here.
 337          */
 338         for (i=0; i<2; i++)
 339                 if (k2_skiplist[i] == dn)
 340                         return 1;
 341
 342         return 0;
 343 }
 344
 345 #define U3_HT_CFA0(devfn, off)          \
 346                 ((((unsigned long)devfn) << 8) | offset)
 347 #define U3_HT_CFA1(bus, devfn, off)     \
 348                 (U3_HT_CFA0(devfn, off) \
 349                 + (((unsigned long)bus) << 16) \
 350                 + 0x01000000UL)
 351
 352 static unsigned long u3_ht_cfg_access(struct pci_controller* hose,
 353                                              u8 bus, u8 devfn, u8 offset)
 354 {
 355         if (bus == hose->first_busno) {
 356                 /* For now, we don't self probe U3 HT bridge */
 357                 if (PCI_SLOT(devfn) == 0)
 358                         return 0;
 359                 return ((unsigned long)hose->cfg_data) + U3_HT_CFA0(devfn, offset);
 360         } else
 361                 return ((unsigned long)hose->cfg_data) + U3_HT_CFA1(bus, devfn, offset);
 362 }
 363
 364 static int u3_ht_read_config(struct pci_bus *bus, unsigned int devfn,
 365                                     int offset, int len, u32 *val)
 366 {
 367         struct pci_controller *hose;
 368         unsigned long addr;
 369
 370         hose = pci_bus_to_host(bus);
 371         if (hose == NULL)
 372                 return PCIBIOS_DEVICE_NOT_FOUND;
 373
 374         addr = u3_ht_cfg_access(hose, bus->number, devfn, offset);
 375         if (!addr)
 376                 return PCIBIOS_DEVICE_NOT_FOUND;
 377
 378         switch (u3_ht_skip_device(hose, bus, devfn)) {
 379         case 0:
 380                 break;
 381         case 1:
 382                 switch (len) {
 383                 case 1:
 384                         *val = 0xff; break;
 385                 case 2:
 386                         *val = 0xffff; break;
 387                 default:
 388                         *val = 0xfffffffful; break;
 389                 }
 390                 return PCIBIOS_SUCCESSFUL;
 391         default:
 392                 return PCIBIOS_DEVICE_NOT_FOUND;
 393         }
 394
 395         /*
 396          * Note: the caller has already checked that offset is
 397          * suitably aligned and that len is 1, 2 or 4.
 398          */
 399         switch (len) {
 400         case 1:
 401                 *val = in_8((u8 *)addr);
 402                 break;
 403         case 2:
 404                 *val = in_le16((u16 *)addr);
 405                 break;
 406         default:
 407                 *val = in_le32((u32 *)addr);
 408                 break;
 409         }
 410         return PCIBIOS_SUCCESSFUL;
 411 }
 412
 413 static int u3_ht_write_config(struct pci_bus *bus, unsigned int devfn,
 414                                      int offset, int len, u32 val)
 415 {
 416         struct pci_controller *hose;
 417         unsigned long addr;
 418
 419         hose = pci_bus_to_host(bus);
 420         if (hose == NULL)
 421                 return PCIBIOS_DEVICE_NOT_FOUND;
 422
 423         addr = u3_ht_cfg_access(hose, bus->number, devfn, offset);
 424         if (!addr)
 425                 return PCIBIOS_DEVICE_NOT_FOUND;
 426
 427         switch (u3_ht_skip_device(hose, bus, devfn)) {
 428         case 0:
 429                 break;
 430         case 1:
 431                 return PCIBIOS_SUCCESSFUL;
 432         default:
 433                 return PCIBIOS_DEVICE_NOT_FOUND;
 434         }
 435
 436         /*
 437          * Note: the caller has already checked that offset is
 438          * suitably aligned and that len is 1, 2 or 4.
 439          */
 440         switch (len) {
 441         case 1:
 442                 out_8((u8 *)addr, val);
 443                 (void) in_8((u8 *)addr);
 444                 break;
 445         case 2:
 446                 out_le16((u16 *)addr, val);
 447                 (void) in_le16((u16 *)addr);
 448                 break;
 449         default:
 450                 out_le32((u32 *)addr, val);
 451                 (void) in_le32((u32 *)addr);
 452                 break;
 453         }
 454         return PCIBIOS_SUCCESSFUL;
 455 }
 456
 457 static struct pci_ops u3_ht_pci_ops =
 458 {
 459         u3_ht_read_config,
 460         u3_ht_write_config
 461 };
 462 #endif /* CONFIG_PPC64 */
 463
 464 #ifdef CONFIG_PPC32
 465 /*
 466  * For a bandit bridge, turn on cache coherency if necessary.
 467  * N.B. we could clean this up using the hose ops directly.
 468  */
 469 static void __init init_bandit(struct pci_controller *bp)
 470 {
 471         unsigned int vendev, magic;
 472         int rev;
 473
 474         /* read the word at offset 0 in config space for device 11 */
 475         out_le32(bp->cfg_addr, (1UL << BANDIT_DEVNUM) + PCI_VENDOR_ID);
 476         udelay(2);
 477         vendev = in_le32(bp->cfg_data);
 478         if (vendev == (PCI_DEVICE_ID_APPLE_BANDIT << 16) +
 479                         PCI_VENDOR_ID_APPLE) {
 480                 /* read the revision id */
 481                 out_le32(bp->cfg_addr,
 482                          (1UL << BANDIT_DEVNUM) + PCI_REVISION_ID);
 483                 udelay(2);
 484                 rev = in_8(bp->cfg_data);
 485                 if (rev != BANDIT_REVID)
 486                         printk(KERN_WARNING
 487                                "Unknown revision %d for bandit\n", rev);
 488         } else if (vendev != (BANDIT_DEVID_2 << 16) + PCI_VENDOR_ID_APPLE) {
 489                 printk(KERN_WARNING "bandit isn't? (%x)\n", vendev);
 490                 return;
 491         }
 492
 493         /* read the word at offset 0x50 */
 494         out_le32(bp->cfg_addr, (1UL << BANDIT_DEVNUM) + BANDIT_MAGIC);
 495         udelay(2);
 496         magic = in_le32(bp->cfg_data);
 497         if ((magic & BANDIT_COHERENT) != 0)
 498                 return;
 499         magic |= BANDIT_COHERENT;
 500         udelay(2);
 501         out_le32(bp->cfg_data, magic);
 502         printk(KERN_INFO "Cache coherency enabled for bandit/PSX\n");
 503 }
 504
 505 /*
 506  * Tweak the PCI-PCI bridge chip on the blue & white G3s.
 507  */
 508 static void __init init_p2pbridge(void)
 509 {
 510         struct device_node *p2pbridge;
 511         struct pci_controller* hose;
 512         u8 bus, devfn;
 513         u16 val;
 514
 515         /* XXX it would be better here to identify the specific
 516            PCI-PCI bridge chip we have. */
 517         if ((p2pbridge = find_devices("pci-bridge")) == 0
 518             || p2pbridge->parent == NULL
 519             || strcmp(p2pbridge->parent->name, "pci") != 0)
 520                 return;
 521         if (pci_device_from_OF_node(p2pbridge, &bus, &devfn) < 0) {
 522                 DBG("Can't find PCI infos for PCI<->PCI bridge\n");
 523                 return;
 524         }
 525         /* Warning: At this point, we have not yet renumbered all busses.
 526          * So we must use OF walking to find out hose
 527          */
 528         hose = pci_find_hose_for_OF_device(p2pbridge);
 529         if (!hose) {
 530                 DBG("Can't find hose for PCI<->PCI bridge\n");
 531                 return;
 532         }
 533         if (early_read_config_word(hose, bus, devfn,
 534                                    PCI_BRIDGE_CONTROL, &val) < 0) {
 535                 printk(KERN_ERR "init_p2pbridge: couldn't read bridge control\n");
 536                 return;
 537         }
 538         val &= ~PCI_BRIDGE_CTL_MASTER_ABORT;
 539         early_write_config_word(hose, bus, devfn, PCI_BRIDGE_CONTROL, val);
 540 }
 541
 542 /*
 543  * Some Apple desktop machines have a NEC PD720100A USB2 controller
 544  * on the motherboard. Open Firmware, on these, will disable the
 545  * EHCI part of it so it behaves like a pair of OHCI's. This fixup
 546  * code re-enables it ;)
 547  */
 548 static void __init fixup_nec_usb2(void)
 549 {
 550         struct device_node *nec;
 551
 552         for (nec = NULL; (nec = of_find_node_by_name(nec, "usb")) != NULL;) {
 553                 struct pci_controller *hose;
 554                 u32 data, *prop;
 555                 u8 bus, devfn;
 556
 557                 prop = (u32 *)get_property(nec, "vendor-id", NULL);
 558                 if (prop == NULL)
 559                         continue;
 560                 if (0x1033 != *prop)
 561                         continue;
 562                 prop = (u32 *)get_property(nec, "device-id", NULL);
 563                 if (prop == NULL)
 564                         continue;
 565                 if (0x0035 != *prop)
 566                         continue;
 567                 prop = (u32 *)get_property(nec, "reg", NULL);
 568                 if (prop == NULL)
 569                         continue;
 570                 devfn = (prop[0] >> 8) & 0xff;
 571                 bus = (prop[0] >> 16) & 0xff;
 572                 if (PCI_FUNC(devfn) != 0)
 573                         continue;
 574                 hose = pci_find_hose_for_OF_device(nec);
 575                 if (!hose)
 576                         continue;
 577                 early_read_config_dword(hose, bus, devfn, 0xe4, &data);
 578                 if (data & 1UL) {
 579                         printk("Found NEC PD720100A USB2 chip with disabled EHCI, fixing up...\n");
 580                         data &= ~1UL;
 581                         early_write_config_dword(hose, bus, devfn, 0xe4, data);
 582                         early_write_config_byte(hose, bus, devfn | 2, PCI_INTERRUPT_LINE,
 583                                 nec->intrs[0].line);
 584                 }
 585         }
 586 }
 587
 588 static void __init setup_bandit(struct pci_controller *hose,
 589                                 struct reg_property *addr)
 590 {
 591         hose->ops = &macrisc_pci_ops;
 592         hose->cfg_addr = ioremap(addr->address + 0x800000, 0x1000);
 593         hose->cfg_data = ioremap(addr->address + 0xc00000, 0x1000);
 594         init_bandit(hose);
 595 }
 596
 597 static int __init setup_uninorth(struct pci_controller *hose,
 598                                  struct reg_property *addr)
 599 {
 600         pci_assign_all_buses = 1;
 601         has_uninorth = 1;
 602         hose->ops = &macrisc_pci_ops;
 603         hose->cfg_addr = ioremap(addr->address + 0x800000, 0x1000);
 604         hose->cfg_data = ioremap(addr->address + 0xc00000, 0x1000);
 605         /* We "know" that the bridge at f2000000 has the PCI slots. */
 606         return addr->address == 0xf2000000;
 607 }
 608 #endif
 609
 610 #ifdef CONFIG_PPC64
 611 static void __init setup_u3_agp(struct pci_controller* hose)
 612 {
 613         /* On G5, we move AGP up to high bus number so we don't need
 614          * to reassign bus numbers for HT. If we ever have P2P bridges
 615          * on AGP, we'll have to move pci_assign_all_busses to the
 616          * pci_controller structure so we enable it for AGP and not for
 617          * HT childs.
 618          * We hard code the address because of the different size of
 619          * the reg address cell, we shall fix that by killing struct
 620          * reg_property and using some accessor functions instead
 621          */
 622         hose->first_busno = 0xf0;
 623         hose->last_busno = 0xff;
 624         has_uninorth = 1;
 625         hose->ops = &macrisc_pci_ops;
 626         hose->cfg_addr = ioremap(0xf0000000 + 0x800000, 0x1000);
 627         hose->cfg_data = ioremap(0xf0000000 + 0xc00000, 0x1000);
 628
 629         u3_agp = hose;
 630 }
 631
 632 static void __init setup_u3_ht(struct pci_controller* hose)
 633 {
 634         struct device_node *np = (struct device_node *)hose->arch_data;
 635         int i, cur;
 636
 637         hose->ops = &u3_ht_pci_ops;
 638
 639         /* We hard code the address because of the different size of
 640          * the reg address cell, we shall fix that by killing struct
 641          * reg_property and using some accessor functions instead
 642          */
 643         hose->cfg_data = (volatile unsigned char *)ioremap(0xf2000000,
 644                                                            0x02000000);
 645
 646         /*
 647          * /ht node doesn't expose a "ranges" property, so we "remove"
 648          * regions that have been allocated to AGP. So far, this version of
 649          * the code doesn't assign any of the 0xfxxxxxxx "fine" memory regions
 650          * to /ht. We need to fix that sooner or later by either parsing all
 651          * child "ranges" properties or figuring out the U3 address space
 652          * decoding logic and then read its configuration register (if any).
 653          */
 654         hose->io_base_phys = 0xf4000000;
 655         hose->pci_io_size = 0x00400000;
 656         hose->io_resource.name = np->full_name;
 657         hose->io_resource.start = 0;
 658         hose->io_resource.end = 0x003fffff;
 659         hose->io_resource.flags = IORESOURCE_IO;
 660         hose->pci_mem_offset = 0;
 661         hose->first_busno = 0;
 662         hose->last_busno = 0xef;
 663         hose->mem_resources[0].name = np->full_name;
 664         hose->mem_resources[0].start = 0x80000000;
 665         hose->mem_resources[0].end = 0xefffffff;
 666         hose->mem_resources[0].flags = IORESOURCE_MEM;
 667
 668         u3_ht = hose;
 669
 670         if (u3_agp == NULL) {
 671                 DBG("U3 has no AGP, using full resource range\n");
 672                 return;
 673         }
 674
 675         /* We "remove" the AGP resources from the resources allocated to HT,
 676          * that is we create "holes". However, that code does assumptions
 677          * that so far happen to be true (cross fingers...), typically that
 678          * resources in the AGP node are properly ordered
 679          */
 680         cur = 0;
 681         for (i=0; i<3; i++) {
 682                 struct resource *res = &u3_agp->mem_resources[i];
 683                 if (res->flags != IORESOURCE_MEM)
 684                         continue;
 685                 /* We don't care about "fine" resources */
 686                 if (res->start >= 0xf0000000)
 687                         continue;
 688                 /* Check if it's just a matter of "shrinking" us in one
 689                  * direction
 690                  */
 691                 if (hose->mem_resources[cur].start == res->start) {
 692                         DBG("U3/HT: shrink start of %d, %08lx -> %08lx\n",
 693                             cur, hose->mem_resources[cur].start,
 694                             res->end + 1);
 695                         hose->mem_resources[cur].start = res->end + 1;
 696                         continue;
 697                 }
 698                 if (hose->mem_resources[cur].end == res->end) {
 699                         DBG("U3/HT: shrink end of %d, %08lx -> %08lx\n",
 700                             cur, hose->mem_resources[cur].end,
 701                             res->start - 1);
 702                         hose->mem_resources[cur].end = res->start - 1;
 703                         continue;
 704                 }
 705                 /* No, it's not the case, we need a hole */
 706                 if (cur == 2) {
 707                         /* not enough resources for a hole, we drop part
 708                          * of the range
 709                          */
 710                         printk(KERN_WARNING "Running out of resources"
 711                                " for /ht host !\n");
 712                         hose->mem_resources[cur].end = res->start - 1;
 713                         continue;
 714                 }
 715                 cur++;
 716                 DBG("U3/HT: hole, %d end at %08lx, %d start at %08lx\n",
 717                     cur-1, res->start - 1, cur, res->end + 1);
 718                 hose->mem_resources[cur].name = np->full_name;
 719                 hose->mem_resources[cur].flags = IORESOURCE_MEM;
 720                 hose->mem_resources[cur].start = res->end + 1;
 721                 hose->mem_resources[cur].end = hose->mem_resources[cur-1].end;
 722                 hose->mem_resources[cur-1].end = res->start - 1;
 723         }
 724 }
 725 #endif
 726
 727 /*
 728  * We assume that if we have a G3 powermac, we have one bridge called
 729  * "pci" (a MPC106) and no bandit or chaos bridges, and contrariwise,
 730  * if we have one or more bandit or chaos bridges, we don't have a MPC106.
 731  */
 732 static int __init add_bridge(struct device_node *dev)
 733 {
 734         int len;
 735         struct pci_controller *hose;
 736 #ifdef CONFIG_PPC32
 737         struct reg_property *addr;
 738 #endif
 739         char *disp_name;
 740         int *bus_range;
 741         int primary = 1;
 742
 743         DBG("Adding PCI host bridge %s\n", dev->full_name);
 744
 745 #ifdef CONFIG_PPC32
 746         /* XXX fix this */
 747         addr = (struct reg_property *) get_property(dev, "reg", &len);
 748         if (addr == NULL || len < sizeof(*addr)) {
 749                 printk(KERN_WARNING "Can't use %s: no address\n",
 750                        dev->full_name);
 751                 return -ENODEV;
 752         }
 753 #endif
 754         bus_range = (int *) get_property(dev, "bus-range", &len);
 755         if (bus_range == NULL || len < 2 * sizeof(int)) {
 756                 printk(KERN_WARNING "Can't get bus-range for %s, assume"
 757                        " bus 0\n", dev->full_name);
 758         }
 759
 760         /* XXX Different prototypes, to be merged */
 761 #ifdef CONFIG_PPC64
 762         hose = pcibios_alloc_controller(dev);
 763 #else
 764         hose = pcibios_alloc_controller();
 765 #endif
 766         if (!hose)
 767                 return -ENOMEM;
 768         hose->arch_data = dev;
 769         hose->first_busno = bus_range ? bus_range[0] : 0;
 770         hose->last_busno = bus_range ? bus_range[1] : 0xff;
 771
 772         disp_name = NULL;
 773 #ifdef CONFIG_PPC64
 774         if (device_is_compatible(dev, "u3-agp")) {
 775                 setup_u3_agp(hose);
 776                 disp_name = "U3-AGP";
 777                 primary = 0;
 778         } else if (device_is_compatible(dev, "u3-ht")) {
 779                 setup_u3_ht(hose);
 780                 disp_name = "U3-HT";
 781                 primary = 1;
 782         }
 783         printk(KERN_INFO "Found %s PCI host bridge.  Firmware bus number: %d->%d\n",
 784                 disp_name, hose->first_busno, hose->last_busno);
 785 #else
 786         if (device_is_compatible(dev, "uni-north")) {
 787                 primary = setup_uninorth(hose, addr);
 788                 disp_name = "UniNorth";
 789         } else if (strcmp(dev->name, "pci") == 0) {
 790                 /* XXX assume this is a mpc106 (grackle) */
 791                 setup_grackle(hose);
 792                 disp_name = "Grackle (MPC106)";
 793         } else if (strcmp(dev->name, "bandit") == 0) {
 794                 setup_bandit(hose, addr);
 795                 disp_name = "Bandit";
 796         } else if (strcmp(dev->name, "chaos") == 0) {
 797                 setup_chaos(hose, addr);
 798                 disp_name = "Chaos";
 799                 primary = 0;
 800         }
 801         printk(KERN_INFO "Found %s PCI host bridge at 0x%08lx. Firmware bus number: %d->%d\n",
 802                 disp_name, addr->address, hose->first_busno, hose->last_busno);
 803 #endif
 804         DBG(" ->Hose at 0x%p, cfg_addr=0x%p,cfg_data=0x%p\n",
 805                 hose, hose->cfg_addr, hose->cfg_data);
 806
 807         /* Interpret the "ranges" property */
 808         /* This also maps the I/O region and sets isa_io/mem_base */
 809         pci_process_bridge_OF_ranges(hose, dev, primary);
 810
 811         /* Fixup "bus-range" OF property */
 812         fixup_bus_range(dev);
 813
 814         return 0;
 815 }
 816
 817 static void __init
 818 pcibios_fixup_OF_interrupts(void)
 819 {
 820         struct pci_dev* dev = NULL;
 821
 822         /*
 823          * Open Firmware often doesn't initialize the
 824          * PCI_INTERRUPT_LINE config register properly, so we
 825          * should find the device node and apply the interrupt
 826          * obtained from the OF device-tree
 827          */
 828         for_each_pci_dev(dev) {
 829                 struct device_node *node;
 830                 node = pci_device_to_OF_node(dev);
 831                 /* this is the node, see if it has interrupts */
 832                 if (node && node->n_intrs > 0)
 833                         dev->irq = node->intrs[0].line;
 834                 pci_write_config_byte(dev, PCI_INTERRUPT_LINE, dev->irq);
 835         }
 836 }
 837
 838 void __init
 839 pmac_pcibios_fixup(void)
 840 {
 841         /* Fixup interrupts according to OF tree */
 842         pcibios_fixup_OF_interrupts();
 843 }
 844
 845 #ifdef CONFIG_PPC64
 846 static void __init pmac_fixup_phb_resources(void)
 847 {
 848         struct pci_controller *hose, *tmp;
 849
 850         list_for_each_entry_safe(hose, tmp, &hose_list, list_node) {
 851                 printk(KERN_INFO "PCI Host %d, io start: %lx; io end: %lx\n",
 852                        hose->global_number,
 853                        hose->io_resource.start, hose->io_resource.end);
 854         }
 855 }
 856 #endif
 857
 858 void __init pmac_pci_init(void)
 859 {
 860         struct device_node *np, *root;
 861         struct device_node *ht = NULL;
 862
 863         root = of_find_node_by_path("/");
 864         if (root == NULL) {
 865                 printk(KERN_CRIT "pmac_pci_init: can't find root "
 866                        "of device tree\n");
 867                 return;
 868         }
 869         for (np = NULL; (np = of_get_next_child(root, np)) != NULL;) {
 870                 if (np->name == NULL)
 871                         continue;
 872                 if (strcmp(np->name, "bandit") == 0
 873                     || strcmp(np->name, "chaos") == 0
 874                     || strcmp(np->name, "pci") == 0) {
 875                         if (add_bridge(np) == 0)
 876                                 of_node_get(np);
 877                 }
 878                 if (strcmp(np->name, "ht") == 0) {
 879                         of_node_get(np);
 880                         ht = np;
 881                 }
 882         }
 883         of_node_put(root);
 884
 885 #ifdef CONFIG_PPC64
 886         /* Probe HT last as it relies on the agp resources to be already
 887          * setup
 888          */
 889         if (ht && add_bridge(ht) != 0)
 890                 of_node_put(ht);
 891
 892         /*
 893          * We need to call pci_setup_phb_io for the HT bridge first
 894          * so it gets the I/O port numbers starting at 0, and we
 895          * need to call it for the AGP bridge after that so it gets
 896          * small positive I/O port numbers.
 897          */
 898         if (u3_ht)
 899                 pci_setup_phb_io(u3_ht, 1);
 900         if (u3_agp)
 901                 pci_setup_phb_io(u3_agp, 0);
 902
 903         /*
 904          * On ppc64, fixup the IO resources on our host bridges as
 905          * the common code does it only for children of the host bridges
 906          */
 907         pmac_fixup_phb_resources();
 908
 909         /* Setup the linkage between OF nodes and PHBs */
 910         pci_devs_phb_init();
 911
 912         /* Fixup the PCI<->OF mapping for U3 AGP due to bus renumbering. We
 913          * assume there is no P2P bridge on the AGP bus, which should be a
 914          * safe assumptions hopefully.
 915          */
 916         if (u3_agp) {
 917                 struct device_node *np = u3_agp->arch_data;
 918                 PCI_DN(np)->busno = 0xf0;
 919                 for (np = np->child; np; np = np->sibling)
 920                         PCI_DN(np)->busno = 0xf0;
 921         }
 922
 923         /* pmac_check_ht_link(); */
 924
 925         /* Tell pci.c to not use the common resource allocation mechanism */
 926         pci_probe_only = 1;
 927
 928         /* Allow all IO */
 929         io_page_mask = -1;
 930
 931 #else /* CONFIG_PPC64 */
 932         init_p2pbridge();
 933         fixup_nec_usb2();
 934
 935         /* We are still having some issues with the Xserve G4, enabling
 936          * some offset between bus number and domains for now when we
 937          * assign all busses should help for now
 938          */
 939         if (pci_assign_all_buses)
 940                 pcibios_assign_bus_offset = 0x10;
 941 #endif
 942 }
 943
 944 int
 945 pmac_pci_enable_device_hook(struct pci_dev *dev, int initial)
 946 {
 947         struct device_node* node;
 948         int updatecfg = 0;
 949         int uninorth_child;
 950
 951         node = pci_device_to_OF_node(dev);
 952
 953         /* We don't want to enable USB controllers absent from the OF tree
 954          * (iBook second controller)
 955          */
 956         if (dev->vendor == PCI_VENDOR_ID_APPLE
 957             && (dev->class == ((PCI_CLASS_SERIAL_USB << 8) | 0x10))
 958             && !node) {
 959                 printk(KERN_INFO "Apple USB OHCI %s disabled by firmware\n",
 960                        pci_name(dev));
 961                 return -EINVAL;
 962         }
 963
 964         if (!node)
 965                 return 0;
 966
 967         uninorth_child = node->parent &&
 968                 device_is_compatible(node->parent, "uni-north");
 969
 970         /* Firewire & GMAC were disabled after PCI probe, the driver is
 971          * claiming them, we must re-enable them now.
 972          */
 973         if (uninorth_child && !strcmp(node->name, "firewire") &&
 974             (device_is_compatible(node, "pci106b,18") ||
 975              device_is_compatible(node, "pci106b,30") ||
 976              device_is_compatible(node, "pci11c1,5811"))) {
 977                 pmac_call_feature(PMAC_FTR_1394_CABLE_POWER, node, 0, 1);
 978                 pmac_call_feature(PMAC_FTR_1394_ENABLE, node, 0, 1);
 979                 updatecfg = 1;
 980         }
 981         if (uninorth_child && !strcmp(node->name, "ethernet") &&
 982             device_is_compatible(node, "gmac")) {
 983                 pmac_call_feature(PMAC_FTR_GMAC_ENABLE, node, 0, 1);
 984                 updatecfg = 1;
 985         }
 986
 987         if (updatecfg) {
 988                 u16 cmd;
 989
 990                 /*
 991                  * Make sure PCI is correctly configured
 992                  *
 993                  * We use old pci_bios versions of the function since, by
 994                  * default, gmac is not powered up, and so will be absent
 995                  * from the kernel initial PCI lookup.
 996                  *
 997                  * Should be replaced by 2.4 new PCI mechanisms and really
 998                  * register the device.
 999                  */
1000                 pci_read_config_word(dev, PCI_COMMAND, &cmd);
1001                 cmd |= PCI_COMMAND_MEMORY | PCI_COMMAND_MASTER
1002                         | PCI_COMMAND_INVALIDATE;
1003                 pci_write_config_word(dev, PCI_COMMAND, cmd);
1004                 pci_write_config_byte(dev, PCI_LATENCY_TIMER, 16);
1005                 pci_write_config_byte(dev, PCI_CACHE_LINE_SIZE,
1006                                       L1_CACHE_BYTES >> 2);
1007         }
1008
1009         return 0;
1010 }
1011
1012 /* We power down some devices after they have been probed. They'll
1013  * be powered back on later on
1014  */
1015 void __init pmac_pcibios_after_init(void)
1016 {
1017         struct device_node* nd;
1018
1019 #ifdef CONFIG_BLK_DEV_IDE
1020         struct pci_dev *dev = NULL;
1021
1022         /* OF fails to initialize IDE controllers on macs
1023          * (and maybe other machines)
1024          *
1025          * Ideally, this should be moved to the IDE layer, but we need
1026          * to check specifically with Andre Hedrick how to do it cleanly
1027          * since the common IDE code seem to care about the fact that the
1028          * BIOS may have disabled a controller.
1029          *
1030          * -- BenH
1031          */
1032         for_each_pci_dev(dev) {
1033                 if ((dev->class >> 16) == PCI_BASE_CLASS_STORAGE)
1034                         pci_enable_device(dev);
1035         }
1036 #endif /* CONFIG_BLK_DEV_IDE */
1037
1038         nd = find_devices("firewire");
1039         while (nd) {
1040                 if (nd->parent && (device_is_compatible(nd, "pci106b,18") ||
1041                                    device_is_compatible(nd, "pci106b,30") ||
1042                                    device_is_compatible(nd, "pci11c1,5811"))
1043                     && device_is_compatible(nd->parent, "uni-north")) {
1044                         pmac_call_feature(PMAC_FTR_1394_ENABLE, nd, 0, 0);
1045                         pmac_call_feature(PMAC_FTR_1394_CABLE_POWER, nd, 0, 0);
1046                 }
1047                 nd = nd->next;
1048         }
1049         nd = find_devices("ethernet");
1050         while (nd) {
1051                 if (nd->parent && device_is_compatible(nd, "gmac")
1052                     && device_is_compatible(nd->parent, "uni-north"))
1053                         pmac_call_feature(PMAC_FTR_GMAC_ENABLE, nd, 0, 0);
1054                 nd = nd->next;
1055         }
1056 }
1057
1058 #ifdef CONFIG_PPC32
1059 void pmac_pci_fixup_cardbus(struct pci_dev* dev)
1060 {
1061         if (_machine != _MACH_Pmac)
1062                 return;
1063         /*
1064          * Fix the interrupt routing on the various cardbus bridges
1065          * used on powerbooks
1066          */
1067         if (dev->vendor != PCI_VENDOR_ID_TI)
1068                 return;
1069         if (dev->device == PCI_DEVICE_ID_TI_1130 ||
1070             dev->device == PCI_DEVICE_ID_TI_1131) {
1071                 u8 val;
1072                 /* Enable PCI interrupt */
1073                 if (pci_read_config_byte(dev, 0x91, &val) == 0)
1074                         pci_write_config_byte(dev, 0x91, val | 0x30);
1075                 /* Disable ISA interrupt mode */
1076                 if (pci_read_config_byte(dev, 0x92, &val) == 0)
1077                         pci_write_config_byte(dev, 0x92, val & ~0x06);
1078         }
1079         if (dev->device == PCI_DEVICE_ID_TI_1210 ||
1080             dev->device == PCI_DEVICE_ID_TI_1211 ||
1081             dev->device == PCI_DEVICE_ID_TI_1410 ||
1082             dev->device == PCI_DEVICE_ID_TI_1510) {
1083                 u8 val;
1084                 /* 0x8c == TI122X_IRQMUX, 2 says to route the INTA
1085                    signal out the MFUNC0 pin */
1086                 if (pci_read_config_byte(dev, 0x8c, &val) == 0)
1087                         pci_write_config_byte(dev, 0x8c, (val & ~0x0f) | 2);
1088                 /* Disable ISA interrupt mode */
1089                 if (pci_read_config_byte(dev, 0x92, &val) == 0)
1090                         pci_write_config_byte(dev, 0x92, val & ~0x06);
1091         }
1092 }
1093
1094 DECLARE_PCI_FIXUP_FINAL(PCI_VENDOR_ID_TI, PCI_ANY_ID, pmac_pci_fixup_cardbus);
1095
1096 void pmac_pci_fixup_pciata(struct pci_dev* dev)
1097 {
1098        u8 progif = 0;
1099
1100        /*
1101         * On PowerMacs, we try to switch any PCI ATA controller to
1102         * fully native mode
1103         */
1104         if (_machine != _MACH_Pmac)
1105                 return;
1106         /* Some controllers don't have the class IDE */
1107         if (dev->vendor == PCI_VENDOR_ID_PROMISE)
1108                 switch(dev->device) {
1109                 case PCI_DEVICE_ID_PROMISE_20246:
1110                 case PCI_DEVICE_ID_PROMISE_20262:
1111                 case PCI_DEVICE_ID_PROMISE_20263:
1112                 case PCI_DEVICE_ID_PROMISE_20265:
1113                 case PCI_DEVICE_ID_PROMISE_20267:
1114                 case PCI_DEVICE_ID_PROMISE_20268:
1115                 case PCI_DEVICE_ID_PROMISE_20269:
1116                 case PCI_DEVICE_ID_PROMISE_20270:
1117                 case PCI_DEVICE_ID_PROMISE_20271:
1118                 case PCI_DEVICE_ID_PROMISE_20275:
1119                 case PCI_DEVICE_ID_PROMISE_20276:
1120                 case PCI_DEVICE_ID_PROMISE_20277:
1121                         goto good;
1122                 }
1123         /* Others, check PCI class */
1124         if ((dev->class >> 8) != PCI_CLASS_STORAGE_IDE)
1125                 return;
1126  good:
1127         pci_read_config_byte(dev, PCI_CLASS_PROG, &progif);
1128         if ((progif & 5) != 5) {
1129                 printk(KERN_INFO "Forcing PCI IDE into native mode: %s\n", pci_name(dev));
1130                 (void) pci_write_config_byte(dev, PCI_CLASS_PROG, progif|5);
1131                 if (pci_read_config_byte(dev, PCI_CLASS_PROG, &progif) ||
1132                     (progif & 5) != 5)
1133                         printk(KERN_ERR "Rewrite of PROGIF failed !\n");
1134         }
1135 }
1136 DECLARE_PCI_FIXUP_FINAL(PCI_ANY_ID, PCI_ANY_ID, pmac_pci_fixup_pciata);
1137 #endif
1138
1139 /*
1140  * Disable second function on K2-SATA, it's broken
1141  * and disable IO BARs on first one
1142  */
1143 static void fixup_k2_sata(struct pci_dev* dev)
1144 {
1145         int i;
1146         u16 cmd;
1147
1148         if (PCI_FUNC(dev->devfn) > 0) {
1149                 pci_read_config_word(dev, PCI_COMMAND, &cmd);
1150                 cmd &= ~(PCI_COMMAND_IO | PCI_COMMAND_MEMORY);
1151                 pci_write_config_word(dev, PCI_COMMAND, cmd);
1152                 for (i = 0; i < 6; i++) {
1153                         dev->resource[i].start = dev->resource[i].end = 0;
1154                         dev->resource[i].flags = 0;
1155                         pci_write_config_dword(dev, PCI_BASE_ADDRESS_0 + 4 * i, 0);
1156                 }
1157         } else {
1158                 pci_read_config_word(dev, PCI_COMMAND, &cmd);
1159                 cmd &= ~PCI_COMMAND_IO;
1160                 pci_write_config_word(dev, PCI_COMMAND, cmd);
1161                 for (i = 0; i < 5; i++) {
1162                         dev->resource[i].start = dev->resource[i].end = 0;
1163                         dev->resource[i].flags = 0;
1164                         pci_write_config_dword(dev, PCI_BASE_ADDRESS_0 + 4 * i, 0);
1165                 }
1166         }
1167 }
1168 DECLARE_PCI_FIXUP_HEADER(PCI_VENDOR_ID_SERVERWORKS, 0x0240, fixup_k2_sata);
1169