linux/drivers/pci/hotplug/ibmphp_core.c
<<
>>
Prefs
   1// SPDX-License-Identifier: GPL-2.0+
   2/*
   3 * IBM Hot Plug Controller Driver
   4 *
   5 * Written By: Chuck Cole, Jyoti Shah, Tong Yu, Irene Zubarev, IBM Corporation
   6 *
   7 * Copyright (C) 2001,2003 Greg Kroah-Hartman (greg@kroah.com)
   8 * Copyright (C) 2001-2003 IBM Corp.
   9 *
  10 * All rights reserved.
  11 *
  12 * Send feedback to <gregkh@us.ibm.com>
  13 *
  14 */
  15
  16#include <linux/init.h>
  17#include <linux/module.h>
  18#include <linux/slab.h>
  19#include <linux/pci.h>
  20#include <linux/interrupt.h>
  21#include <linux/delay.h>
  22#include <linux/wait.h>
  23#include "../pci.h"
  24#include <asm/pci_x86.h>                /* for struct irq_routing_table */
  25#include <asm/io_apic.h>
  26#include "ibmphp.h"
  27
  28#define attn_on(sl)  ibmphp_hpc_writeslot(sl, HPC_SLOT_ATTNON)
  29#define attn_off(sl) ibmphp_hpc_writeslot(sl, HPC_SLOT_ATTNOFF)
  30#define attn_LED_blink(sl) ibmphp_hpc_writeslot(sl, HPC_SLOT_BLINKLED)
  31#define get_ctrl_revision(sl, rev) ibmphp_hpc_readslot(sl, READ_REVLEVEL, rev)
  32#define get_hpc_options(sl, opt) ibmphp_hpc_readslot(sl, READ_HPCOPTIONS, opt)
  33
  34#define DRIVER_VERSION  "0.6"
  35#define DRIVER_DESC     "IBM Hot Plug PCI Controller Driver"
  36
  37int ibmphp_debug;
  38
  39static bool debug;
  40module_param(debug, bool, S_IRUGO | S_IWUSR);
  41MODULE_PARM_DESC(debug, "Debugging mode enabled or not");
  42MODULE_LICENSE("GPL");
  43MODULE_DESCRIPTION(DRIVER_DESC);
  44
  45struct pci_bus *ibmphp_pci_bus;
  46static int max_slots;
  47
  48static int irqs[16];    /* PIC mode IRQs we're using so far (in case MPS
  49                         * tables don't provide default info for empty slots */
  50
  51static int init_flag;
  52
  53static inline int get_cur_bus_info(struct slot **sl)
  54{
  55        int rc = 1;
  56        struct slot *slot_cur = *sl;
  57
  58        debug("options = %x\n", slot_cur->ctrl->options);
  59        debug("revision = %x\n", slot_cur->ctrl->revision);
  60
  61        if (READ_BUS_STATUS(slot_cur->ctrl))
  62                rc = ibmphp_hpc_readslot(slot_cur, READ_BUSSTATUS, NULL);
  63
  64        if (rc)
  65                return rc;
  66
  67        slot_cur->bus_on->current_speed = CURRENT_BUS_SPEED(slot_cur->busstatus);
  68        if (READ_BUS_MODE(slot_cur->ctrl))
  69                slot_cur->bus_on->current_bus_mode =
  70                                CURRENT_BUS_MODE(slot_cur->busstatus);
  71        else
  72                slot_cur->bus_on->current_bus_mode = 0xFF;
  73
  74        debug("busstatus = %x, bus_speed = %x, bus_mode = %x\n",
  75                        slot_cur->busstatus,
  76                        slot_cur->bus_on->current_speed,
  77                        slot_cur->bus_on->current_bus_mode);
  78
  79        *sl = slot_cur;
  80        return 0;
  81}
  82
  83static inline int slot_update(struct slot **sl)
  84{
  85        int rc;
  86        rc = ibmphp_hpc_readslot(*sl, READ_ALLSTAT, NULL);
  87        if (rc)
  88                return rc;
  89        if (!init_flag)
  90                rc = get_cur_bus_info(sl);
  91        return rc;
  92}
  93
  94static int __init get_max_slots(void)
  95{
  96        struct slot *slot_cur;
  97        u8 slot_count = 0;
  98
  99        list_for_each_entry(slot_cur, &ibmphp_slot_head, ibm_slot_list) {
 100                /* sometimes the hot-pluggable slots start with 4 (not always from 1) */
 101                slot_count = max(slot_count, slot_cur->number);
 102        }
 103        return slot_count;
 104}
 105
 106/* This routine will put the correct slot->device information per slot.  It's
 107 * called from initialization of the slot structures. It will also assign
 108 * interrupt numbers per each slot.
 109 * Parameters: struct slot
 110 * Returns 0 or errors
 111 */
 112int ibmphp_init_devno(struct slot **cur_slot)
 113{
 114        struct irq_routing_table *rtable;
 115        int len;
 116        int loop;
 117        int i;
 118
 119        rtable = pcibios_get_irq_routing_table();
 120        if (!rtable) {
 121                err("no BIOS routing table...\n");
 122                return -ENOMEM;
 123        }
 124
 125        len = (rtable->size - sizeof(struct irq_routing_table)) /
 126                        sizeof(struct irq_info);
 127
 128        if (!len) {
 129                kfree(rtable);
 130                return -1;
 131        }
 132        for (loop = 0; loop < len; loop++) {
 133                if ((*cur_slot)->number == rtable->slots[loop].slot &&
 134                    (*cur_slot)->bus == rtable->slots[loop].bus) {
 135                        (*cur_slot)->device = PCI_SLOT(rtable->slots[loop].devfn);
 136                        for (i = 0; i < 4; i++)
 137                                (*cur_slot)->irq[i] = IO_APIC_get_PCI_irq_vector((int) (*cur_slot)->bus,
 138                                                (int) (*cur_slot)->device, i);
 139
 140                        debug("(*cur_slot)->irq[0] = %x\n",
 141                                        (*cur_slot)->irq[0]);
 142                        debug("(*cur_slot)->irq[1] = %x\n",
 143                                        (*cur_slot)->irq[1]);
 144                        debug("(*cur_slot)->irq[2] = %x\n",
 145                                        (*cur_slot)->irq[2]);
 146                        debug("(*cur_slot)->irq[3] = %x\n",
 147                                        (*cur_slot)->irq[3]);
 148
 149                        debug("rtable->exclusive_irqs = %x\n",
 150                                        rtable->exclusive_irqs);
 151                        debug("rtable->slots[loop].irq[0].bitmap = %x\n",
 152                                        rtable->slots[loop].irq[0].bitmap);
 153                        debug("rtable->slots[loop].irq[1].bitmap = %x\n",
 154                                        rtable->slots[loop].irq[1].bitmap);
 155                        debug("rtable->slots[loop].irq[2].bitmap = %x\n",
 156                                        rtable->slots[loop].irq[2].bitmap);
 157                        debug("rtable->slots[loop].irq[3].bitmap = %x\n",
 158                                        rtable->slots[loop].irq[3].bitmap);
 159
 160                        debug("rtable->slots[loop].irq[0].link = %x\n",
 161                                        rtable->slots[loop].irq[0].link);
 162                        debug("rtable->slots[loop].irq[1].link = %x\n",
 163                                        rtable->slots[loop].irq[1].link);
 164                        debug("rtable->slots[loop].irq[2].link = %x\n",
 165                                        rtable->slots[loop].irq[2].link);
 166                        debug("rtable->slots[loop].irq[3].link = %x\n",
 167                                        rtable->slots[loop].irq[3].link);
 168                        debug("end of init_devno\n");
 169                        kfree(rtable);
 170                        return 0;
 171                }
 172        }
 173
 174        kfree(rtable);
 175        return -1;
 176}
 177
 178static inline int power_on(struct slot *slot_cur)
 179{
 180        u8 cmd = HPC_SLOT_ON;
 181        int retval;
 182
 183        retval = ibmphp_hpc_writeslot(slot_cur, cmd);
 184        if (retval) {
 185                err("power on failed\n");
 186                return retval;
 187        }
 188        if (CTLR_RESULT(slot_cur->ctrl->status)) {
 189                err("command not completed successfully in power_on\n");
 190                return -EIO;
 191        }
 192        msleep(3000);   /* For ServeRAID cards, and some 66 PCI */
 193        return 0;
 194}
 195
 196static inline int power_off(struct slot *slot_cur)
 197{
 198        u8 cmd = HPC_SLOT_OFF;
 199        int retval;
 200
 201        retval = ibmphp_hpc_writeslot(slot_cur, cmd);
 202        if (retval) {
 203                err("power off failed\n");
 204                return retval;
 205        }
 206        if (CTLR_RESULT(slot_cur->ctrl->status)) {
 207                err("command not completed successfully in power_off\n");
 208                retval = -EIO;
 209        }
 210        return retval;
 211}
 212
 213static int set_attention_status(struct hotplug_slot *hotplug_slot, u8 value)
 214{
 215        int rc = 0;
 216        struct slot *pslot;
 217        u8 cmd = 0x00;     /* avoid compiler warning */
 218
 219        debug("set_attention_status - Entry hotplug_slot[%lx] value[%x]\n",
 220                        (ulong) hotplug_slot, value);
 221        ibmphp_lock_operations();
 222
 223
 224        if (hotplug_slot) {
 225                switch (value) {
 226                case HPC_SLOT_ATTN_OFF:
 227                        cmd = HPC_SLOT_ATTNOFF;
 228                        break;
 229                case HPC_SLOT_ATTN_ON:
 230                        cmd = HPC_SLOT_ATTNON;
 231                        break;
 232                case HPC_SLOT_ATTN_BLINK:
 233                        cmd = HPC_SLOT_BLINKLED;
 234                        break;
 235                default:
 236                        rc = -ENODEV;
 237                        err("set_attention_status - Error : invalid input [%x]\n",
 238                                        value);
 239                        break;
 240                }
 241                if (rc == 0) {
 242                        pslot = to_slot(hotplug_slot);
 243                        rc = ibmphp_hpc_writeslot(pslot, cmd);
 244                }
 245        } else
 246                rc = -ENODEV;
 247
 248        ibmphp_unlock_operations();
 249
 250        debug("set_attention_status - Exit rc[%d]\n", rc);
 251        return rc;
 252}
 253
 254static int get_attention_status(struct hotplug_slot *hotplug_slot, u8 *value)
 255{
 256        int rc = -ENODEV;
 257        struct slot *pslot;
 258        struct slot myslot;
 259
 260        debug("get_attention_status - Entry hotplug_slot[%lx] pvalue[%lx]\n",
 261                                        (ulong) hotplug_slot, (ulong) value);
 262
 263        ibmphp_lock_operations();
 264        if (hotplug_slot) {
 265                pslot = to_slot(hotplug_slot);
 266                memcpy(&myslot, pslot, sizeof(struct slot));
 267                rc = ibmphp_hpc_readslot(pslot, READ_SLOTSTATUS,
 268                                         &myslot.status);
 269                if (!rc)
 270                        rc = ibmphp_hpc_readslot(pslot, READ_EXTSLOTSTATUS,
 271                                                 &myslot.ext_status);
 272                if (!rc)
 273                        *value = SLOT_ATTN(myslot.status, myslot.ext_status);
 274        }
 275
 276        ibmphp_unlock_operations();
 277        debug("get_attention_status - Exit rc[%d] value[%x]\n", rc, *value);
 278        return rc;
 279}
 280
 281static int get_latch_status(struct hotplug_slot *hotplug_slot, u8 *value)
 282{
 283        int rc = -ENODEV;
 284        struct slot *pslot;
 285        struct slot myslot;
 286
 287        debug("get_latch_status - Entry hotplug_slot[%lx] pvalue[%lx]\n",
 288                                        (ulong) hotplug_slot, (ulong) value);
 289        ibmphp_lock_operations();
 290        if (hotplug_slot) {
 291                pslot = to_slot(hotplug_slot);
 292                memcpy(&myslot, pslot, sizeof(struct slot));
 293                rc = ibmphp_hpc_readslot(pslot, READ_SLOTSTATUS,
 294                                         &myslot.status);
 295                if (!rc)
 296                        *value = SLOT_LATCH(myslot.status);
 297        }
 298
 299        ibmphp_unlock_operations();
 300        debug("get_latch_status - Exit rc[%d] rc[%x] value[%x]\n",
 301                        rc, rc, *value);
 302        return rc;
 303}
 304
 305
 306static int get_power_status(struct hotplug_slot *hotplug_slot, u8 *value)
 307{
 308        int rc = -ENODEV;
 309        struct slot *pslot;
 310        struct slot myslot;
 311
 312        debug("get_power_status - Entry hotplug_slot[%lx] pvalue[%lx]\n",
 313                                        (ulong) hotplug_slot, (ulong) value);
 314        ibmphp_lock_operations();
 315        if (hotplug_slot) {
 316                pslot = to_slot(hotplug_slot);
 317                memcpy(&myslot, pslot, sizeof(struct slot));
 318                rc = ibmphp_hpc_readslot(pslot, READ_SLOTSTATUS,
 319                                         &myslot.status);
 320                if (!rc)
 321                        *value = SLOT_PWRGD(myslot.status);
 322        }
 323
 324        ibmphp_unlock_operations();
 325        debug("get_power_status - Exit rc[%d] rc[%x] value[%x]\n",
 326                        rc, rc, *value);
 327        return rc;
 328}
 329
 330static int get_adapter_present(struct hotplug_slot *hotplug_slot, u8 *value)
 331{
 332        int rc = -ENODEV;
 333        struct slot *pslot;
 334        u8 present;
 335        struct slot myslot;
 336
 337        debug("get_adapter_status - Entry hotplug_slot[%lx] pvalue[%lx]\n",
 338                                        (ulong) hotplug_slot, (ulong) value);
 339        ibmphp_lock_operations();
 340        if (hotplug_slot) {
 341                pslot = to_slot(hotplug_slot);
 342                memcpy(&myslot, pslot, sizeof(struct slot));
 343                rc = ibmphp_hpc_readslot(pslot, READ_SLOTSTATUS,
 344                                         &myslot.status);
 345                if (!rc) {
 346                        present = SLOT_PRESENT(myslot.status);
 347                        if (present == HPC_SLOT_EMPTY)
 348                                *value = 0;
 349                        else
 350                                *value = 1;
 351                }
 352        }
 353
 354        ibmphp_unlock_operations();
 355        debug("get_adapter_present - Exit rc[%d] value[%x]\n", rc, *value);
 356        return rc;
 357}
 358
 359static int get_max_bus_speed(struct slot *slot)
 360{
 361        int rc = 0;
 362        u8 mode = 0;
 363        enum pci_bus_speed speed;
 364        struct pci_bus *bus = slot->hotplug_slot.pci_slot->bus;
 365
 366        debug("%s - Entry slot[%p]\n", __func__, slot);
 367
 368        ibmphp_lock_operations();
 369        mode = slot->supported_bus_mode;
 370        speed = slot->supported_speed;
 371        ibmphp_unlock_operations();
 372
 373        switch (speed) {
 374        case BUS_SPEED_33:
 375                break;
 376        case BUS_SPEED_66:
 377                if (mode == BUS_MODE_PCIX)
 378                        speed += 0x01;
 379                break;
 380        case BUS_SPEED_100:
 381        case BUS_SPEED_133:
 382                speed += 0x01;
 383                break;
 384        default:
 385                /* Note (will need to change): there would be soon 256, 512 also */
 386                rc = -ENODEV;
 387        }
 388
 389        if (!rc)
 390                bus->max_bus_speed = speed;
 391
 392        debug("%s - Exit rc[%d] speed[%x]\n", __func__, rc, speed);
 393        return rc;
 394}
 395
 396/****************************************************************************
 397 * This routine will initialize the ops data structure used in the validate
 398 * function. It will also power off empty slots that are powered on since BIOS
 399 * leaves those on, albeit disconnected
 400 ****************************************************************************/
 401static int __init init_ops(void)
 402{
 403        struct slot *slot_cur;
 404        int retval;
 405        int rc;
 406
 407        list_for_each_entry(slot_cur, &ibmphp_slot_head, ibm_slot_list) {
 408                debug("BEFORE GETTING SLOT STATUS, slot # %x\n",
 409                                                        slot_cur->number);
 410                if (slot_cur->ctrl->revision == 0xFF)
 411                        if (get_ctrl_revision(slot_cur,
 412                                                &slot_cur->ctrl->revision))
 413                                return -1;
 414
 415                if (slot_cur->bus_on->current_speed == 0xFF)
 416                        if (get_cur_bus_info(&slot_cur))
 417                                return -1;
 418                get_max_bus_speed(slot_cur);
 419
 420                if (slot_cur->ctrl->options == 0xFF)
 421                        if (get_hpc_options(slot_cur, &slot_cur->ctrl->options))
 422                                return -1;
 423
 424                retval = slot_update(&slot_cur);
 425                if (retval)
 426                        return retval;
 427
 428                debug("status = %x\n", slot_cur->status);
 429                debug("ext_status = %x\n", slot_cur->ext_status);
 430                debug("SLOT_POWER = %x\n", SLOT_POWER(slot_cur->status));
 431                debug("SLOT_PRESENT = %x\n", SLOT_PRESENT(slot_cur->status));
 432                debug("SLOT_LATCH = %x\n", SLOT_LATCH(slot_cur->status));
 433
 434                if ((SLOT_PWRGD(slot_cur->status)) &&
 435                    !(SLOT_PRESENT(slot_cur->status)) &&
 436                    !(SLOT_LATCH(slot_cur->status))) {
 437                        debug("BEFORE POWER OFF COMMAND\n");
 438                                rc = power_off(slot_cur);
 439                                if (rc)
 440                                        return rc;
 441
 442        /*              retval = slot_update(&slot_cur);
 443         *              if (retval)
 444         *                      return retval;
 445         *              ibmphp_update_slot_info(slot_cur);
 446         */
 447                }
 448        }
 449        init_flag = 0;
 450        return 0;
 451}
 452
 453/* This operation will check whether the slot is within the bounds and
 454 * the operation is valid to perform on that slot
 455 * Parameters: slot, operation
 456 * Returns: 0 or error codes
 457 */
 458static int validate(struct slot *slot_cur, int opn)
 459{
 460        int number;
 461        int retval;
 462
 463        if (!slot_cur)
 464                return -ENODEV;
 465        number = slot_cur->number;
 466        if ((number > max_slots) || (number < 0))
 467                return -EBADSLT;
 468        debug("slot_number in validate is %d\n", slot_cur->number);
 469
 470        retval = slot_update(&slot_cur);
 471        if (retval)
 472                return retval;
 473
 474        switch (opn) {
 475                case ENABLE:
 476                        if (!(SLOT_PWRGD(slot_cur->status)) &&
 477                             (SLOT_PRESENT(slot_cur->status)) &&
 478                             !(SLOT_LATCH(slot_cur->status)))
 479                                return 0;
 480                        break;
 481                case DISABLE:
 482                        if ((SLOT_PWRGD(slot_cur->status)) &&
 483                            (SLOT_PRESENT(slot_cur->status)) &&
 484                            !(SLOT_LATCH(slot_cur->status)))
 485                                return 0;
 486                        break;
 487                default:
 488                        break;
 489        }
 490        err("validate failed....\n");
 491        return -EINVAL;
 492}
 493
 494/****************************************************************************
 495 * This routine is for updating the data structures in the hotplug core
 496 * Parameters: struct slot
 497 * Returns: 0 or error
 498 ****************************************************************************/
 499int ibmphp_update_slot_info(struct slot *slot_cur)
 500{
 501        struct pci_bus *bus = slot_cur->hotplug_slot.pci_slot->bus;
 502        u8 bus_speed;
 503        u8 mode;
 504
 505        bus_speed = slot_cur->bus_on->current_speed;
 506        mode = slot_cur->bus_on->current_bus_mode;
 507
 508        switch (bus_speed) {
 509                case BUS_SPEED_33:
 510                        break;
 511                case BUS_SPEED_66:
 512                        if (mode == BUS_MODE_PCIX)
 513                                bus_speed += 0x01;
 514                        else if (mode == BUS_MODE_PCI)
 515                                ;
 516                        else
 517                                bus_speed = PCI_SPEED_UNKNOWN;
 518                        break;
 519                case BUS_SPEED_100:
 520                case BUS_SPEED_133:
 521                        bus_speed += 0x01;
 522                        break;
 523                default:
 524                        bus_speed = PCI_SPEED_UNKNOWN;
 525        }
 526
 527        bus->cur_bus_speed = bus_speed;
 528        // To do: bus_names
 529
 530        return 0;
 531}
 532
 533
 534/******************************************************************************
 535 * This function will return the pci_func, given bus and devfunc, or NULL.  It
 536 * is called from visit routines
 537 ******************************************************************************/
 538
 539static struct pci_func *ibm_slot_find(u8 busno, u8 device, u8 function)
 540{
 541        struct pci_func *func_cur;
 542        struct slot *slot_cur;
 543        list_for_each_entry(slot_cur, &ibmphp_slot_head, ibm_slot_list) {
 544                if (slot_cur->func) {
 545                        func_cur = slot_cur->func;
 546                        while (func_cur) {
 547                                if ((func_cur->busno == busno) &&
 548                                                (func_cur->device == device) &&
 549                                                (func_cur->function == function))
 550                                        return func_cur;
 551                                func_cur = func_cur->next;
 552                        }
 553                }
 554        }
 555        return NULL;
 556}
 557
 558/*************************************************************
 559 * This routine frees up memory used by struct slot, including
 560 * the pointers to pci_func, bus, hotplug_slot, controller,
 561 * and deregistering from the hotplug core
 562 *************************************************************/
 563static void free_slots(void)
 564{
 565        struct slot *slot_cur, *next;
 566
 567        debug("%s -- enter\n", __func__);
 568
 569        list_for_each_entry_safe(slot_cur, next, &ibmphp_slot_head,
 570                                 ibm_slot_list) {
 571                pci_hp_del(&slot_cur->hotplug_slot);
 572                slot_cur->ctrl = NULL;
 573                slot_cur->bus_on = NULL;
 574
 575                /*
 576                 * We don't want to actually remove the resources,
 577                 * since ibmphp_free_resources() will do just that.
 578                 */
 579                ibmphp_unconfigure_card(&slot_cur, -1);
 580
 581                pci_hp_destroy(&slot_cur->hotplug_slot);
 582                kfree(slot_cur);
 583        }
 584        debug("%s -- exit\n", __func__);
 585}
 586
 587static void ibm_unconfigure_device(struct pci_func *func)
 588{
 589        struct pci_dev *temp;
 590        u8 j;
 591
 592        debug("inside %s\n", __func__);
 593        debug("func->device = %x, func->function = %x\n",
 594                                        func->device, func->function);
 595        debug("func->device << 3 | 0x0  = %x\n", func->device << 3 | 0x0);
 596
 597        pci_lock_rescan_remove();
 598
 599        for (j = 0; j < 0x08; j++) {
 600                temp = pci_get_domain_bus_and_slot(0, func->busno,
 601                                                   (func->device << 3) | j);
 602                if (temp) {
 603                        pci_stop_and_remove_bus_device(temp);
 604                        pci_dev_put(temp);
 605                }
 606        }
 607
 608        pci_dev_put(func->dev);
 609
 610        pci_unlock_rescan_remove();
 611}
 612
 613/*
 614 * The following function is to fix kernel bug regarding
 615 * getting bus entries, here we manually add those primary
 616 * bus entries to kernel bus structure whenever apply
 617 */
 618static u8 bus_structure_fixup(u8 busno)
 619{
 620        struct pci_bus *bus, *b;
 621        struct pci_dev *dev;
 622        u16 l;
 623
 624        if (pci_find_bus(0, busno) || !(ibmphp_find_same_bus_num(busno)))
 625                return 1;
 626
 627        bus = kmalloc(sizeof(*bus), GFP_KERNEL);
 628        if (!bus)
 629                return 1;
 630
 631        dev = kmalloc(sizeof(*dev), GFP_KERNEL);
 632        if (!dev) {
 633                kfree(bus);
 634                return 1;
 635        }
 636
 637        bus->number = busno;
 638        bus->ops = ibmphp_pci_bus->ops;
 639        dev->bus = bus;
 640        for (dev->devfn = 0; dev->devfn < 256; dev->devfn += 8) {
 641                if (!pci_read_config_word(dev, PCI_VENDOR_ID, &l) &&
 642                                        (l != 0x0000) && (l != 0xffff)) {
 643                        debug("%s - Inside bus_structure_fixup()\n",
 644                                                        __func__);
 645                        b = pci_scan_bus(busno, ibmphp_pci_bus->ops, NULL);
 646                        if (!b)
 647                                continue;
 648
 649                        pci_bus_add_devices(b);
 650                        break;
 651                }
 652        }
 653
 654        kfree(dev);
 655        kfree(bus);
 656
 657        return 0;
 658}
 659
 660static int ibm_configure_device(struct pci_func *func)
 661{
 662        struct pci_bus *child;
 663        int num;
 664        int flag = 0;   /* this is to make sure we don't double scan the bus,
 665                                        for bridged devices primarily */
 666
 667        pci_lock_rescan_remove();
 668
 669        if (!(bus_structure_fixup(func->busno)))
 670                flag = 1;
 671        if (func->dev == NULL)
 672                func->dev = pci_get_domain_bus_and_slot(0, func->busno,
 673                                PCI_DEVFN(func->device, func->function));
 674
 675        if (func->dev == NULL) {
 676                struct pci_bus *bus = pci_find_bus(0, func->busno);
 677                if (!bus)
 678                        goto out;
 679
 680                num = pci_scan_slot(bus,
 681                                PCI_DEVFN(func->device, func->function));
 682                if (num)
 683                        pci_bus_add_devices(bus);
 684
 685                func->dev = pci_get_domain_bus_and_slot(0, func->busno,
 686                                PCI_DEVFN(func->device, func->function));
 687                if (func->dev == NULL) {
 688                        err("ERROR... : pci_dev still NULL\n");
 689                        goto out;
 690                }
 691        }
 692        if (!(flag) && (func->dev->hdr_type == PCI_HEADER_TYPE_BRIDGE)) {
 693                pci_hp_add_bridge(func->dev);
 694                child = func->dev->subordinate;
 695                if (child)
 696                        pci_bus_add_devices(child);
 697        }
 698
 699 out:
 700        pci_unlock_rescan_remove();
 701        return 0;
 702}
 703
 704/*******************************************************
 705 * Returns whether the bus is empty or not
 706 *******************************************************/
 707static int is_bus_empty(struct slot *slot_cur)
 708{
 709        int rc;
 710        struct slot *tmp_slot;
 711        u8 i = slot_cur->bus_on->slot_min;
 712
 713        while (i <= slot_cur->bus_on->slot_max) {
 714                if (i == slot_cur->number) {
 715                        i++;
 716                        continue;
 717                }
 718                tmp_slot = ibmphp_get_slot_from_physical_num(i);
 719                if (!tmp_slot)
 720                        return 0;
 721                rc = slot_update(&tmp_slot);
 722                if (rc)
 723                        return 0;
 724                if (SLOT_PRESENT(tmp_slot->status) &&
 725                                        SLOT_PWRGD(tmp_slot->status))
 726                        return 0;
 727                i++;
 728        }
 729        return 1;
 730}
 731
 732/***********************************************************
 733 * If the HPC permits and the bus currently empty, tries to set the
 734 * bus speed and mode at the maximum card and bus capability
 735 * Parameters: slot
 736 * Returns: bus is set (0) or error code
 737 ***********************************************************/
 738static int set_bus(struct slot *slot_cur)
 739{
 740        int rc;
 741        u8 speed;
 742        u8 cmd = 0x0;
 743        int retval;
 744        static const struct pci_device_id ciobx[] = {
 745                { PCI_DEVICE(PCI_VENDOR_ID_SERVERWORKS, 0x0101) },
 746                { },
 747        };
 748
 749        debug("%s - entry slot # %d\n", __func__, slot_cur->number);
 750        if (SET_BUS_STATUS(slot_cur->ctrl) && is_bus_empty(slot_cur)) {
 751                rc = slot_update(&slot_cur);
 752                if (rc)
 753                        return rc;
 754                speed = SLOT_SPEED(slot_cur->ext_status);
 755                debug("ext_status = %x, speed = %x\n", slot_cur->ext_status, speed);
 756                switch (speed) {
 757                case HPC_SLOT_SPEED_33:
 758                        cmd = HPC_BUS_33CONVMODE;
 759                        break;
 760                case HPC_SLOT_SPEED_66:
 761                        if (SLOT_PCIX(slot_cur->ext_status)) {
 762                                if ((slot_cur->supported_speed >= BUS_SPEED_66) &&
 763                                                (slot_cur->supported_bus_mode == BUS_MODE_PCIX))
 764                                        cmd = HPC_BUS_66PCIXMODE;
 765                                else if (!SLOT_BUS_MODE(slot_cur->ext_status))
 766                                        /* if max slot/bus capability is 66 pci
 767                                        and there's no bus mode mismatch, then
 768                                        the adapter supports 66 pci */
 769                                        cmd = HPC_BUS_66CONVMODE;
 770                                else
 771                                        cmd = HPC_BUS_33CONVMODE;
 772                        } else {
 773                                if (slot_cur->supported_speed >= BUS_SPEED_66)
 774                                        cmd = HPC_BUS_66CONVMODE;
 775                                else
 776                                        cmd = HPC_BUS_33CONVMODE;
 777                        }
 778                        break;
 779                case HPC_SLOT_SPEED_133:
 780                        switch (slot_cur->supported_speed) {
 781                        case BUS_SPEED_33:
 782                                cmd = HPC_BUS_33CONVMODE;
 783                                break;
 784                        case BUS_SPEED_66:
 785                                if (slot_cur->supported_bus_mode == BUS_MODE_PCIX)
 786                                        cmd = HPC_BUS_66PCIXMODE;
 787                                else
 788                                        cmd = HPC_BUS_66CONVMODE;
 789                                break;
 790                        case BUS_SPEED_100:
 791                                cmd = HPC_BUS_100PCIXMODE;
 792                                break;
 793                        case BUS_SPEED_133:
 794                                /* This is to take care of the bug in CIOBX chip */
 795                                if (pci_dev_present(ciobx))
 796                                        ibmphp_hpc_writeslot(slot_cur,
 797                                                        HPC_BUS_100PCIXMODE);
 798                                cmd = HPC_BUS_133PCIXMODE;
 799                                break;
 800                        default:
 801                                err("Wrong bus speed\n");
 802                                return -ENODEV;
 803                        }
 804                        break;
 805                default:
 806                        err("wrong slot speed\n");
 807                        return -ENODEV;
 808                }
 809                debug("setting bus speed for slot %d, cmd %x\n",
 810                                                slot_cur->number, cmd);
 811                retval = ibmphp_hpc_writeslot(slot_cur, cmd);
 812                if (retval) {
 813                        err("setting bus speed failed\n");
 814                        return retval;
 815                }
 816                if (CTLR_RESULT(slot_cur->ctrl->status)) {
 817                        err("command not completed successfully in set_bus\n");
 818                        return -EIO;
 819                }
 820        }
 821        /* This is for x440, once Brandon fixes the firmware,
 822        will not need this delay */
 823        msleep(1000);
 824        debug("%s -Exit\n", __func__);
 825        return 0;
 826}
 827
 828/* This routine checks the bus limitations that the slot is on from the BIOS.
 829 * This is used in deciding whether or not to power up the slot.
 830 * (electrical/spec limitations. For example, >1 133 MHz or >2 66 PCI cards on
 831 * same bus)
 832 * Parameters: slot
 833 * Returns: 0 = no limitations, -EINVAL = exceeded limitations on the bus
 834 */
 835static int check_limitations(struct slot *slot_cur)
 836{
 837        u8 i;
 838        struct slot *tmp_slot;
 839        u8 count = 0;
 840        u8 limitation = 0;
 841
 842        for (i = slot_cur->bus_on->slot_min; i <= slot_cur->bus_on->slot_max; i++) {
 843                tmp_slot = ibmphp_get_slot_from_physical_num(i);
 844                if (!tmp_slot)
 845                        return -ENODEV;
 846                if ((SLOT_PWRGD(tmp_slot->status)) &&
 847                                        !(SLOT_CONNECT(tmp_slot->status)))
 848                        count++;
 849        }
 850        get_cur_bus_info(&slot_cur);
 851        switch (slot_cur->bus_on->current_speed) {
 852        case BUS_SPEED_33:
 853                limitation = slot_cur->bus_on->slots_at_33_conv;
 854                break;
 855        case BUS_SPEED_66:
 856                if (slot_cur->bus_on->current_bus_mode == BUS_MODE_PCIX)
 857                        limitation = slot_cur->bus_on->slots_at_66_pcix;
 858                else
 859                        limitation = slot_cur->bus_on->slots_at_66_conv;
 860                break;
 861        case BUS_SPEED_100:
 862                limitation = slot_cur->bus_on->slots_at_100_pcix;
 863                break;
 864        case BUS_SPEED_133:
 865                limitation = slot_cur->bus_on->slots_at_133_pcix;
 866                break;
 867        }
 868
 869        if ((count + 1) > limitation)
 870                return -EINVAL;
 871        return 0;
 872}
 873
 874static inline void print_card_capability(struct slot *slot_cur)
 875{
 876        info("capability of the card is ");
 877        if ((slot_cur->ext_status & CARD_INFO) == PCIX133)
 878                info("   133 MHz PCI-X\n");
 879        else if ((slot_cur->ext_status & CARD_INFO) == PCIX66)
 880                info("    66 MHz PCI-X\n");
 881        else if ((slot_cur->ext_status & CARD_INFO) == PCI66)
 882                info("    66 MHz PCI\n");
 883        else
 884                info("    33 MHz PCI\n");
 885
 886}
 887
 888/* This routine will power on the slot, configure the device(s) and find the
 889 * drivers for them.
 890 * Parameters: hotplug_slot
 891 * Returns: 0 or failure codes
 892 */
 893static int enable_slot(struct hotplug_slot *hs)
 894{
 895        int rc, i, rcpr;
 896        struct slot *slot_cur;
 897        u8 function;
 898        struct pci_func *tmp_func;
 899
 900        ibmphp_lock_operations();
 901
 902        debug("ENABLING SLOT........\n");
 903        slot_cur = to_slot(hs);
 904
 905        rc = validate(slot_cur, ENABLE);
 906        if (rc) {
 907                err("validate function failed\n");
 908                goto error_nopower;
 909        }
 910
 911        attn_LED_blink(slot_cur);
 912
 913        rc = set_bus(slot_cur);
 914        if (rc) {
 915                err("was not able to set the bus\n");
 916                goto error_nopower;
 917        }
 918
 919        /*-----------------debugging------------------------------*/
 920        get_cur_bus_info(&slot_cur);
 921        debug("the current bus speed right after set_bus = %x\n",
 922                                        slot_cur->bus_on->current_speed);
 923        /*----------------------------------------------------------*/
 924
 925        rc = check_limitations(slot_cur);
 926        if (rc) {
 927                err("Adding this card exceeds the limitations of this bus.\n");
 928                err("(i.e., >1 133MHz cards running on same bus, or >2 66 PCI cards running on same bus.\n");
 929                err("Try hot-adding into another bus\n");
 930                rc = -EINVAL;
 931                goto error_nopower;
 932        }
 933
 934        rc = power_on(slot_cur);
 935
 936        if (rc) {
 937                err("something wrong when powering up... please see below for details\n");
 938                /* need to turn off before on, otherwise, blinking overwrites */
 939                attn_off(slot_cur);
 940                attn_on(slot_cur);
 941                if (slot_update(&slot_cur)) {
 942                        attn_off(slot_cur);
 943                        attn_on(slot_cur);
 944                        rc = -ENODEV;
 945                        goto exit;
 946                }
 947                /* Check to see the error of why it failed */
 948                if ((SLOT_POWER(slot_cur->status)) &&
 949                                        !(SLOT_PWRGD(slot_cur->status)))
 950                        err("power fault occurred trying to power up\n");
 951                else if (SLOT_BUS_SPEED(slot_cur->status)) {
 952                        err("bus speed mismatch occurred.  please check current bus speed and card capability\n");
 953                        print_card_capability(slot_cur);
 954                } else if (SLOT_BUS_MODE(slot_cur->ext_status)) {
 955                        err("bus mode mismatch occurred.  please check current bus mode and card capability\n");
 956                        print_card_capability(slot_cur);
 957                }
 958                ibmphp_update_slot_info(slot_cur);
 959                goto exit;
 960        }
 961        debug("after power_on\n");
 962        /*-----------------------debugging---------------------------*/
 963        get_cur_bus_info(&slot_cur);
 964        debug("the current bus speed right after power_on = %x\n",
 965                                        slot_cur->bus_on->current_speed);
 966        /*----------------------------------------------------------*/
 967
 968        rc = slot_update(&slot_cur);
 969        if (rc)
 970                goto error_power;
 971
 972        rc = -EINVAL;
 973        if (SLOT_POWER(slot_cur->status) && !(SLOT_PWRGD(slot_cur->status))) {
 974                err("power fault occurred trying to power up...\n");
 975                goto error_power;
 976        }
 977        if (SLOT_POWER(slot_cur->status) && (SLOT_BUS_SPEED(slot_cur->status))) {
 978                err("bus speed mismatch occurred.  please check current bus speed and card capability\n");
 979                print_card_capability(slot_cur);
 980                goto error_power;
 981        }
 982        /* Don't think this case will happen after above checks...
 983         * but just in case, for paranoia sake */
 984        if (!(SLOT_POWER(slot_cur->status))) {
 985                err("power on failed...\n");
 986                goto error_power;
 987        }
 988
 989        slot_cur->func = kzalloc(sizeof(struct pci_func), GFP_KERNEL);
 990        if (!slot_cur->func) {
 991                /* do update_slot_info here? */
 992                rc = -ENOMEM;
 993                goto error_power;
 994        }
 995        slot_cur->func->busno = slot_cur->bus;
 996        slot_cur->func->device = slot_cur->device;
 997        for (i = 0; i < 4; i++)
 998                slot_cur->func->irq[i] = slot_cur->irq[i];
 999
1000        debug("b4 configure_card, slot_cur->bus = %x, slot_cur->device = %x\n",
1001                                        slot_cur->bus, slot_cur->device);
1002
1003        if (ibmphp_configure_card(slot_cur->func, slot_cur->number)) {
1004                err("configure_card was unsuccessful...\n");
1005                /* true because don't need to actually deallocate resources,
1006                 * just remove references */
1007                ibmphp_unconfigure_card(&slot_cur, 1);
1008                debug("after unconfigure_card\n");
1009                slot_cur->func = NULL;
1010                rc = -ENOMEM;
1011                goto error_power;
1012        }
1013
1014        function = 0x00;
1015        do {
1016                tmp_func = ibm_slot_find(slot_cur->bus, slot_cur->func->device,
1017                                                        function++);
1018                if (tmp_func && !(tmp_func->dev))
1019                        ibm_configure_device(tmp_func);
1020        } while (tmp_func);
1021
1022        attn_off(slot_cur);
1023        if (slot_update(&slot_cur)) {
1024                rc = -EFAULT;
1025                goto exit;
1026        }
1027        ibmphp_print_test();
1028        rc = ibmphp_update_slot_info(slot_cur);
1029exit:
1030        ibmphp_unlock_operations();
1031        return rc;
1032
1033error_nopower:
1034        attn_off(slot_cur);     /* need to turn off if was blinking b4 */
1035        attn_on(slot_cur);
1036error_cont:
1037        rcpr = slot_update(&slot_cur);
1038        if (rcpr) {
1039                rc = rcpr;
1040                goto exit;
1041        }
1042        ibmphp_update_slot_info(slot_cur);
1043        goto exit;
1044
1045error_power:
1046        attn_off(slot_cur);     /* need to turn off if was blinking b4 */
1047        attn_on(slot_cur);
1048        rcpr = power_off(slot_cur);
1049        if (rcpr) {
1050                rc = rcpr;
1051                goto exit;
1052        }
1053        goto error_cont;
1054}
1055
1056/**************************************************************
1057* HOT REMOVING ADAPTER CARD                                   *
1058* INPUT: POINTER TO THE HOTPLUG SLOT STRUCTURE                *
1059* OUTPUT: SUCCESS 0 ; FAILURE: UNCONFIGURE , VALIDATE         *
1060*               DISABLE POWER ,                               *
1061**************************************************************/
1062static int ibmphp_disable_slot(struct hotplug_slot *hotplug_slot)
1063{
1064        struct slot *slot = to_slot(hotplug_slot);
1065        int rc;
1066
1067        ibmphp_lock_operations();
1068        rc = ibmphp_do_disable_slot(slot);
1069        ibmphp_unlock_operations();
1070        return rc;
1071}
1072
1073int ibmphp_do_disable_slot(struct slot *slot_cur)
1074{
1075        int rc;
1076        u8 flag;
1077
1078        debug("DISABLING SLOT...\n");
1079
1080        if ((slot_cur == NULL) || (slot_cur->ctrl == NULL))
1081                return -ENODEV;
1082
1083        flag = slot_cur->flag;
1084        slot_cur->flag = 1;
1085
1086        if (flag == 1) {
1087                rc = validate(slot_cur, DISABLE);
1088                        /* checking if powered off already & valid slot # */
1089                if (rc)
1090                        goto error;
1091        }
1092        attn_LED_blink(slot_cur);
1093
1094        if (slot_cur->func == NULL) {
1095                /* We need this for functions that were there on bootup */
1096                slot_cur->func = kzalloc(sizeof(struct pci_func), GFP_KERNEL);
1097                if (!slot_cur->func) {
1098                        rc = -ENOMEM;
1099                        goto error;
1100                }
1101                slot_cur->func->busno = slot_cur->bus;
1102                slot_cur->func->device = slot_cur->device;
1103        }
1104
1105        ibm_unconfigure_device(slot_cur->func);
1106
1107        /*
1108         * If we got here from latch suddenly opening on operating card or
1109         * a power fault, there's no power to the card, so cannot
1110         * read from it to determine what resources it occupied.  This operation
1111         * is forbidden anyhow.  The best we can do is remove it from kernel
1112         * lists at least */
1113
1114        if (!flag) {
1115                attn_off(slot_cur);
1116                return 0;
1117        }
1118
1119        rc = ibmphp_unconfigure_card(&slot_cur, 0);
1120        slot_cur->func = NULL;
1121        debug("in disable_slot. after unconfigure_card\n");
1122        if (rc) {
1123                err("could not unconfigure card.\n");
1124                goto error;
1125        }
1126
1127        rc = ibmphp_hpc_writeslot(slot_cur, HPC_SLOT_OFF);
1128        if (rc)
1129                goto error;
1130
1131        attn_off(slot_cur);
1132        rc = slot_update(&slot_cur);
1133        if (rc)
1134                goto exit;
1135
1136        rc = ibmphp_update_slot_info(slot_cur);
1137        ibmphp_print_test();
1138exit:
1139        return rc;
1140
1141error:
1142        /*  Need to turn off if was blinking b4 */
1143        attn_off(slot_cur);
1144        attn_on(slot_cur);
1145        if (slot_update(&slot_cur)) {
1146                rc = -EFAULT;
1147                goto exit;
1148        }
1149        if (flag)
1150                ibmphp_update_slot_info(slot_cur);
1151        goto exit;
1152}
1153
1154const struct hotplug_slot_ops ibmphp_hotplug_slot_ops = {
1155        .set_attention_status =         set_attention_status,
1156        .enable_slot =                  enable_slot,
1157        .disable_slot =                 ibmphp_disable_slot,
1158        .hardware_test =                NULL,
1159        .get_power_status =             get_power_status,
1160        .get_attention_status =         get_attention_status,
1161        .get_latch_status =             get_latch_status,
1162        .get_adapter_status =           get_adapter_present,
1163};
1164
1165static void ibmphp_unload(void)
1166{
1167        free_slots();
1168        debug("after slots\n");
1169        ibmphp_free_resources();
1170        debug("after resources\n");
1171        ibmphp_free_bus_info_queue();
1172        debug("after bus info\n");
1173        ibmphp_free_ebda_hpc_queue();
1174        debug("after ebda hpc\n");
1175        ibmphp_free_ebda_pci_rsrc_queue();
1176        debug("after ebda pci rsrc\n");
1177        kfree(ibmphp_pci_bus);
1178}
1179
1180static int __init ibmphp_init(void)
1181{
1182        struct pci_bus *bus;
1183        int i = 0;
1184        int rc = 0;
1185
1186        init_flag = 1;
1187
1188        info(DRIVER_DESC " version: " DRIVER_VERSION "\n");
1189
1190        ibmphp_pci_bus = kmalloc(sizeof(*ibmphp_pci_bus), GFP_KERNEL);
1191        if (!ibmphp_pci_bus) {
1192                rc = -ENOMEM;
1193                goto exit;
1194        }
1195
1196        bus = pci_find_bus(0, 0);
1197        if (!bus) {
1198                err("Can't find the root pci bus, can not continue\n");
1199                rc = -ENODEV;
1200                goto error;
1201        }
1202        memcpy(ibmphp_pci_bus, bus, sizeof(*ibmphp_pci_bus));
1203
1204        ibmphp_debug = debug;
1205
1206        for (i = 0; i < 16; i++)
1207                irqs[i] = 0;
1208
1209        rc = ibmphp_access_ebda();
1210        if (rc)
1211                goto error;
1212        debug("after ibmphp_access_ebda()\n");
1213
1214        rc = ibmphp_rsrc_init();
1215        if (rc)
1216                goto error;
1217        debug("AFTER Resource & EBDA INITIALIZATIONS\n");
1218
1219        max_slots = get_max_slots();
1220
1221        rc = ibmphp_register_pci();
1222        if (rc)
1223                goto error;
1224
1225        if (init_ops()) {
1226                rc = -ENODEV;
1227                goto error;
1228        }
1229
1230        ibmphp_print_test();
1231        rc = ibmphp_hpc_start_poll_thread();
1232        if (rc)
1233                goto error;
1234
1235exit:
1236        return rc;
1237
1238error:
1239        ibmphp_unload();
1240        goto exit;
1241}
1242
1243static void __exit ibmphp_exit(void)
1244{
1245        ibmphp_hpc_stop_poll_thread();
1246        debug("after polling\n");
1247        ibmphp_unload();
1248        debug("done\n");
1249}
1250
1251module_init(ibmphp_init);
1252module_exit(ibmphp_exit);
1253