drivers/pci/hotplug/shpchp_hpc.c

   1 /*
   2  * Standard PCI Hot Plug Driver
   3  *
   4  * Copyright (C) 1995,2001 Compaq Computer Corporation
   5  * Copyright (C) 2001 Greg Kroah-Hartman (greg@kroah.com)
   6  * Copyright (C) 2001 IBM Corp.
   7  * Copyright (C) 2003-2004 Intel Corporation
   8  *
   9  * All rights reserved.
  10  *
  11  * This program is free software; you can redistribute it and/or modify
  12  * it under the terms of the GNU General Public License as published by
  13  * the Free Software Foundation; either version 2 of the License, or (at
  14  * your option) any later version.
  15  *
  16  * This program is distributed in the hope that it will be useful, but
  17  * WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE, GOOD TITLE or
  19  * NON INFRINGEMENT.  See the GNU General Public License for more
  20  * details.
  21  *
  22  * You should have received a copy of the GNU General Public License
  23  * along with this program; if not, write to the Free Software
  24  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  25  *
  26  * Send feedback to <greg@kroah.com>,<kristen.c.accardi@intel.com>
  27  *
  28  */
  29
  30 #include <linux/kernel.h>
  31 #include <linux/module.h>
  32 #include <linux/types.h>
  33 #include <linux/pci.h>
  34 #include <linux/interrupt.h>
  35
  36 #include "shpchp.h"
  37
  38 /* Slot Available Register I field definition */
  39 #define SLOT_33MHZ              0x0000001f
  40 #define SLOT_66MHZ_PCIX         0x00001f00
  41 #define SLOT_100MHZ_PCIX        0x001f0000
  42 #define SLOT_133MHZ_PCIX        0x1f000000
  43
  44 /* Slot Available Register II field definition */
  45 #define SLOT_66MHZ              0x0000001f
  46 #define SLOT_66MHZ_PCIX_266     0x00000f00
  47 #define SLOT_100MHZ_PCIX_266    0x0000f000
  48 #define SLOT_133MHZ_PCIX_266    0x000f0000
  49 #define SLOT_66MHZ_PCIX_533     0x00f00000
  50 #define SLOT_100MHZ_PCIX_533    0x0f000000
  51 #define SLOT_133MHZ_PCIX_533    0xf0000000
  52
  53 /* Slot Configuration */
  54 #define SLOT_NUM                0x0000001F
  55 #define FIRST_DEV_NUM           0x00001F00
  56 #define PSN                     0x07FF0000
  57 #define UPDOWN                  0x20000000
  58 #define MRLSENSOR               0x40000000
  59 #define ATTN_BUTTON             0x80000000
  60
  61 /*
  62  * Interrupt Locator Register definitions
  63  */
  64 #define CMD_INTR_PENDING        (1 << 0)
  65 #define SLOT_INTR_PENDING(i)    (1 << (i + 1))
  66
  67 /*
  68  * Controller SERR-INT Register
  69  */
  70 #define GLOBAL_INTR_MASK        (1 << 0)
  71 #define GLOBAL_SERR_MASK        (1 << 1)
  72 #define COMMAND_INTR_MASK       (1 << 2)
  73 #define ARBITER_SERR_MASK       (1 << 3)
  74 #define COMMAND_DETECTED        (1 << 16)
  75 #define ARBITER_DETECTED        (1 << 17)
  76 #define SERR_INTR_RSVDZ_MASK    0xfffc0000
  77
  78 /*
  79  * Logical Slot Register definitions
  80  */
  81 #define SLOT_REG(i)             (SLOT1 + (4 * i))
  82
  83 #define SLOT_STATE_SHIFT        (0)
  84 #define SLOT_STATE_MASK         (3 << 0)
  85 #define SLOT_STATE_PWRONLY      (1)
  86 #define SLOT_STATE_ENABLED      (2)
  87 #define SLOT_STATE_DISABLED     (3)
  88 #define PWR_LED_STATE_SHIFT     (2)
  89 #define PWR_LED_STATE_MASK      (3 << 2)
  90 #define ATN_LED_STATE_SHIFT     (4)
  91 #define ATN_LED_STATE_MASK      (3 << 4)
  92 #define ATN_LED_STATE_ON        (1)
  93 #define ATN_LED_STATE_BLINK     (2)
  94 #define ATN_LED_STATE_OFF       (3)
  95 #define POWER_FAULT             (1 << 6)
  96 #define ATN_BUTTON              (1 << 7)
  97 #define MRL_SENSOR              (1 << 8)
  98 #define MHZ66_CAP               (1 << 9)
  99 #define PRSNT_SHIFT             (10)
 100 #define PRSNT_MASK              (3 << 10)
 101 #define PCIX_CAP_SHIFT          (12)
 102 #define PCIX_CAP_MASK_PI1       (3 << 12)
 103 #define PCIX_CAP_MASK_PI2       (7 << 12)
 104 #define PRSNT_CHANGE_DETECTED   (1 << 16)
 105 #define ISO_PFAULT_DETECTED     (1 << 17)
 106 #define BUTTON_PRESS_DETECTED   (1 << 18)
 107 #define MRL_CHANGE_DETECTED     (1 << 19)
 108 #define CON_PFAULT_DETECTED     (1 << 20)
 109 #define PRSNT_CHANGE_INTR_MASK  (1 << 24)
 110 #define ISO_PFAULT_INTR_MASK    (1 << 25)
 111 #define BUTTON_PRESS_INTR_MASK  (1 << 26)
 112 #define MRL_CHANGE_INTR_MASK    (1 << 27)
 113 #define CON_PFAULT_INTR_MASK    (1 << 28)
 114 #define MRL_CHANGE_SERR_MASK    (1 << 29)
 115 #define CON_PFAULT_SERR_MASK    (1 << 30)
 116 #define SLOT_REG_RSVDZ_MASK     ((1 << 15) | (7 << 21))
 117
 118 /*
 119  * SHPC Command Code definitions
 120  *
 121  *     Slot Operation                           00h - 3Fh
 122  *     Set Bus Segment Speed/Mode A             40h - 47h
 123  *     Power-Only All Slots                     48h
 124  *     Enable All Slots                         49h
 125  *     Set Bus Segment Speed/Mode B (PI=2)      50h - 5Fh
 126  *     Reserved Command Codes                   60h - BFh
 127  *     Vendor Specific Commands                 C0h - FFh
 128  */
 129 #define SET_SLOT_PWR            0x01    /* Slot Operation */
 130 #define SET_SLOT_ENABLE         0x02
 131 #define SET_SLOT_DISABLE        0x03
 132 #define SET_PWR_ON              0x04
 133 #define SET_PWR_BLINK           0x08
 134 #define SET_PWR_OFF             0x0c
 135 #define SET_ATTN_ON             0x10
 136 #define SET_ATTN_BLINK          0x20
 137 #define SET_ATTN_OFF            0x30
 138 #define SETA_PCI_33MHZ          0x40    /* Set Bus Segment Speed/Mode A */
 139 #define SETA_PCI_66MHZ          0x41
 140 #define SETA_PCIX_66MHZ         0x42
 141 #define SETA_PCIX_100MHZ        0x43
 142 #define SETA_PCIX_133MHZ        0x44
 143 #define SETA_RESERVED1          0x45
 144 #define SETA_RESERVED2          0x46
 145 #define SETA_RESERVED3          0x47
 146 #define SET_PWR_ONLY_ALL        0x48    /* Power-Only All Slots */
 147 #define SET_ENABLE_ALL          0x49    /* Enable All Slots */
 148 #define SETB_PCI_33MHZ          0x50    /* Set Bus Segment Speed/Mode B */
 149 #define SETB_PCI_66MHZ          0x51
 150 #define SETB_PCIX_66MHZ_PM      0x52
 151 #define SETB_PCIX_100MHZ_PM     0x53
 152 #define SETB_PCIX_133MHZ_PM     0x54
 153 #define SETB_PCIX_66MHZ_EM      0x55
 154 #define SETB_PCIX_100MHZ_EM     0x56
 155 #define SETB_PCIX_133MHZ_EM     0x57
 156 #define SETB_PCIX_66MHZ_266     0x58
 157 #define SETB_PCIX_100MHZ_266    0x59
 158 #define SETB_PCIX_133MHZ_266    0x5a
 159 #define SETB_PCIX_66MHZ_533     0x5b
 160 #define SETB_PCIX_100MHZ_533    0x5c
 161 #define SETB_PCIX_133MHZ_533    0x5d
 162 #define SETB_RESERVED1          0x5e
 163 #define SETB_RESERVED2          0x5f
 164
 165 /*
 166  * SHPC controller command error code
 167  */
 168 #define SWITCH_OPEN             0x1
 169 #define INVALID_CMD             0x2
 170 #define INVALID_SPEED_MODE      0x4
 171
 172 /*
 173  * For accessing SHPC Working Register Set via PCI Configuration Space
 174  */
 175 #define DWORD_SELECT            0x2
 176 #define DWORD_DATA              0x4
 177
 178 /* Field Offset in Logical Slot Register - byte boundary */
 179 #define SLOT_EVENT_LATCH        0x2
 180 #define SLOT_SERR_INT_MASK      0x3
 181
 182 static irqreturn_t shpc_isr(int irq, void *dev_id);
 183 static void start_int_poll_timer(struct controller *ctrl, int sec);
 184 static int hpc_check_cmd_status(struct controller *ctrl);
 185
 186 static inline u8 shpc_readb(struct controller *ctrl, int reg)
 187 {
 188         return readb(ctrl->creg + reg);
 189 }
 190
 191 static inline void shpc_writeb(struct controller *ctrl, int reg, u8 val)
 192 {
 193         writeb(val, ctrl->creg + reg);
 194 }
 195
 196 static inline u16 shpc_readw(struct controller *ctrl, int reg)
 197 {
 198         return readw(ctrl->creg + reg);
 199 }
 200
 201 static inline void shpc_writew(struct controller *ctrl, int reg, u16 val)
 202 {
 203         writew(val, ctrl->creg + reg);
 204 }
 205
 206 static inline u32 shpc_readl(struct controller *ctrl, int reg)
 207 {
 208         return readl(ctrl->creg + reg);
 209 }
 210
 211 static inline void shpc_writel(struct controller *ctrl, int reg, u32 val)
 212 {
 213         writel(val, ctrl->creg + reg);
 214 }
 215
 216 static inline int shpc_indirect_read(struct controller *ctrl, int index,
 217                                      u32 *value)
 218 {
 219         int rc;
 220         u32 cap_offset = ctrl->cap_offset;
 221         struct pci_dev *pdev = ctrl->pci_dev;
 222
 223         rc = pci_write_config_byte(pdev, cap_offset + DWORD_SELECT, index);
 224         if (rc)
 225                 return rc;
 226         return pci_read_config_dword(pdev, cap_offset + DWORD_DATA, value);
 227 }
 228
 229 /*
 230  * This is the interrupt polling timeout function.
 231  */
 232 static void int_poll_timeout(unsigned long data)
 233 {
 234         struct controller *ctrl = (struct controller *)data;
 235
 236         /* Poll for interrupt events.  regs == NULL => polling */
 237         shpc_isr(0, ctrl);
 238
 239         init_timer(&ctrl->poll_timer);
 240         if (!shpchp_poll_time)
 241                 shpchp_poll_time = 2; /* default polling interval is 2 sec */
 242
 243         start_int_poll_timer(ctrl, shpchp_poll_time);
 244 }
 245
 246 /*
 247  * This function starts the interrupt polling timer.
 248  */
 249 static void start_int_poll_timer(struct controller *ctrl, int sec)
 250 {
 251         /* Clamp to sane value */
 252         if ((sec <= 0) || (sec > 60))
 253                 sec = 2;
 254
 255         ctrl->poll_timer.function = &int_poll_timeout;
 256         ctrl->poll_timer.data = (unsigned long)ctrl;
 257         ctrl->poll_timer.expires = jiffies + sec * HZ;
 258         add_timer(&ctrl->poll_timer);
 259 }
 260
 261 static inline int is_ctrl_busy(struct controller *ctrl)
 262 {
 263         u16 cmd_status = shpc_readw(ctrl, CMD_STATUS);
 264         return cmd_status & 0x1;
 265 }
 266
 267 /*
 268  * Returns 1 if SHPC finishes executing a command within 1 sec,
 269  * otherwise returns 0.
 270  */
 271 static inline int shpc_poll_ctrl_busy(struct controller *ctrl)
 272 {
 273         int i;
 274
 275         if (!is_ctrl_busy(ctrl))
 276                 return 1;
 277
 278         /* Check every 0.1 sec for a total of 1 sec */
 279         for (i = 0; i < 10; i++) {
 280                 msleep(100);
 281                 if (!is_ctrl_busy(ctrl))
 282                         return 1;
 283         }
 284
 285         return 0;
 286 }
 287
 288 static inline int shpc_wait_cmd(struct controller *ctrl)
 289 {
 290         int retval = 0;
 291         unsigned long timeout = msecs_to_jiffies(1000);
 292         int rc;
 293
 294         if (shpchp_poll_mode)
 295                 rc = shpc_poll_ctrl_busy(ctrl);
 296         else
 297                 rc = wait_event_interruptible_timeout(ctrl->queue,
 298                                                 !is_ctrl_busy(ctrl), timeout);
 299         if (!rc && is_ctrl_busy(ctrl)) {
 300                 retval = -EIO;
 301                 ctrl_err(ctrl, "Command not completed in 1000 msec\n");
 302         } else if (rc < 0) {
 303                 retval = -EINTR;
 304                 ctrl_info(ctrl, "Command was interrupted by a signal\n");
 305         }
 306
 307         return retval;
 308 }
 309
 310 static int shpc_write_cmd(struct slot *slot, u8 t_slot, u8 cmd)
 311 {
 312         struct controller *ctrl = slot->ctrl;
 313         u16 cmd_status;
 314         int retval = 0;
 315         u16 temp_word;
 316
 317         mutex_lock(&slot->ctrl->cmd_lock);
 318
 319         if (!shpc_poll_ctrl_busy(ctrl)) {
 320                 /* After 1 sec and and the controller is still busy */
 321                 ctrl_err(ctrl, "Controller is still busy after 1 sec\n");
 322                 retval = -EBUSY;
 323                 goto out;
 324         }
 325
 326         ++t_slot;
 327         temp_word =  (t_slot << 8) | (cmd & 0xFF);
 328         ctrl_dbg(ctrl, "%s: t_slot %x cmd %x\n", __func__, t_slot, cmd);
 329
 330         /* To make sure the Controller Busy bit is 0 before we send out the
 331          * command.
 332          */
 333         shpc_writew(ctrl, CMD, temp_word);
 334
 335         /*
 336          * Wait for command completion.
 337          */
 338         retval = shpc_wait_cmd(slot->ctrl);
 339         if (retval)
 340                 goto out;
 341
 342         cmd_status = hpc_check_cmd_status(slot->ctrl);
 343         if (cmd_status) {
 344                 ctrl_err(ctrl,
 345                          "Failed to issued command 0x%x (error code = %d)\n",
 346                          cmd, cmd_status);
 347                 retval = -EIO;
 348         }
 349  out:
 350         mutex_unlock(&slot->ctrl->cmd_lock);
 351         return retval;
 352 }
 353
 354 static int hpc_check_cmd_status(struct controller *ctrl)
 355 {
 356         int retval = 0;
 357         u16 cmd_status = shpc_readw(ctrl, CMD_STATUS) & 0x000F;
 358
 359         switch (cmd_status >> 1) {
 360         case 0:
 361                 retval = 0;
 362                 break;
 363         case 1:
 364                 retval = SWITCH_OPEN;
 365                 ctrl_err(ctrl, "Switch opened!\n");
 366                 break;
 367         case 2:
 368                 retval = INVALID_CMD;
 369                 ctrl_err(ctrl, "Invalid HPC command!\n");
 370                 break;
 371         case 4:
 372                 retval = INVALID_SPEED_MODE;
 373                 ctrl_err(ctrl, "Invalid bus speed/mode!\n");
 374                 break;
 375         default:
 376                 retval = cmd_status;
 377         }
 378
 379         return retval;
 380 }
 381
 382
 383 static int hpc_get_attention_status(struct slot *slot, u8 *status)
 384 {
 385         struct controller *ctrl = slot->ctrl;
 386         u32 slot_reg = shpc_readl(ctrl, SLOT_REG(slot->hp_slot));
 387         u8 state = (slot_reg & ATN_LED_STATE_MASK) >> ATN_LED_STATE_SHIFT;
 388
 389         switch (state) {
 390         case ATN_LED_STATE_ON:
 391                 *status = 1;    /* On */
 392                 break;
 393         case ATN_LED_STATE_BLINK:
 394                 *status = 2;    /* Blink */
 395                 break;
 396         case ATN_LED_STATE_OFF:
 397                 *status = 0;    /* Off */
 398                 break;
 399         default:
 400                 *status = 0xFF; /* Reserved */
 401                 break;
 402         }
 403
 404         return 0;
 405 }
 406
 407 static int hpc_get_power_status(struct slot * slot, u8 *status)
 408 {
 409         struct controller *ctrl = slot->ctrl;
 410         u32 slot_reg = shpc_readl(ctrl, SLOT_REG(slot->hp_slot));
 411         u8 state = (slot_reg & SLOT_STATE_MASK) >> SLOT_STATE_SHIFT;
 412
 413         switch (state) {
 414         case SLOT_STATE_PWRONLY:
 415                 *status = 2;    /* Powered only */
 416                 break;
 417         case SLOT_STATE_ENABLED:
 418                 *status = 1;    /* Enabled */
 419                 break;
 420         case SLOT_STATE_DISABLED:
 421                 *status = 0;    /* Disabled */
 422                 break;
 423         default:
 424                 *status = 0xFF; /* Reserved */
 425                 break;
 426         }
 427
 428         return 0;
 429 }
 430
 431
 432 static int hpc_get_latch_status(struct slot *slot, u8 *status)
 433 {
 434         struct controller *ctrl = slot->ctrl;
 435         u32 slot_reg = shpc_readl(ctrl, SLOT_REG(slot->hp_slot));
 436
 437         *status = !!(slot_reg & MRL_SENSOR);    /* 0 -> close; 1 -> open */
 438
 439         return 0;
 440 }
 441
 442 static int hpc_get_adapter_status(struct slot *slot, u8 *status)
 443 {
 444         struct controller *ctrl = slot->ctrl;
 445         u32 slot_reg = shpc_readl(ctrl, SLOT_REG(slot->hp_slot));
 446         u8 state = (slot_reg & PRSNT_MASK) >> PRSNT_SHIFT;
 447
 448         *status = (state != 0x3) ? 1 : 0;
 449
 450         return 0;
 451 }
 452
 453 static int hpc_get_prog_int(struct slot *slot, u8 *prog_int)
 454 {
 455         struct controller *ctrl = slot->ctrl;
 456
 457         *prog_int = shpc_readb(ctrl, PROG_INTERFACE);
 458
 459         return 0;
 460 }
 461
 462 static int hpc_get_adapter_speed(struct slot *slot, enum pci_bus_speed *value)
 463 {
 464         int retval = 0;
 465         struct controller *ctrl = slot->ctrl;
 466         u32 slot_reg = shpc_readl(ctrl, SLOT_REG(slot->hp_slot));
 467         u8 m66_cap  = !!(slot_reg & MHZ66_CAP);
 468         u8 pi, pcix_cap;
 469
 470         if ((retval = hpc_get_prog_int(slot, &pi)))
 471                 return retval;
 472
 473         switch (pi) {
 474         case 1:
 475                 pcix_cap = (slot_reg & PCIX_CAP_MASK_PI1) >> PCIX_CAP_SHIFT;
 476                 break;
 477         case 2:
 478                 pcix_cap = (slot_reg & PCIX_CAP_MASK_PI2) >> PCIX_CAP_SHIFT;
 479                 break;
 480         default:
 481                 return -ENODEV;
 482         }
 483
 484         ctrl_dbg(ctrl, "%s: slot_reg = %x, pcix_cap = %x, m66_cap = %x\n",
 485                  __func__, slot_reg, pcix_cap, m66_cap);
 486
 487         switch (pcix_cap) {
 488         case 0x0:
 489                 *value = m66_cap ? PCI_SPEED_66MHz : PCI_SPEED_33MHz;
 490                 break;
 491         case 0x1:
 492                 *value = PCI_SPEED_66MHz_PCIX;
 493                 break;
 494         case 0x3:
 495                 *value = PCI_SPEED_133MHz_PCIX;
 496                 break;
 497         case 0x4:
 498                 *value = PCI_SPEED_133MHz_PCIX_266;
 499                 break;
 500         case 0x5:
 501                 *value = PCI_SPEED_133MHz_PCIX_533;
 502                 break;
 503         case 0x2:
 504         default:
 505                 *value = PCI_SPEED_UNKNOWN;
 506                 retval = -ENODEV;
 507                 break;
 508         }
 509
 510         ctrl_dbg(ctrl, "Adapter speed = %d\n", *value);
 511         return retval;
 512 }
 513
 514 static int hpc_get_mode1_ECC_cap(struct slot *slot, u8 *mode)
 515 {
 516         int retval = 0;
 517         struct controller *ctrl = slot->ctrl;
 518         u16 sec_bus_status = shpc_readw(ctrl, SEC_BUS_CONFIG);
 519         u8 pi = shpc_readb(ctrl, PROG_INTERFACE);
 520
 521         if (pi == 2) {
 522                 *mode = (sec_bus_status & 0x0100) >> 8;
 523         } else {
 524                 retval = -1;
 525         }
 526
 527         ctrl_dbg(ctrl, "Mode 1 ECC cap = %d\n", *mode);
 528         return retval;
 529 }
 530
 531 static int hpc_query_power_fault(struct slot * slot)
 532 {
 533         struct controller *ctrl = slot->ctrl;
 534         u32 slot_reg = shpc_readl(ctrl, SLOT_REG(slot->hp_slot));
 535
 536         /* Note: Logic 0 => fault */
 537         return !(slot_reg & POWER_FAULT);
 538 }
 539
 540 static int hpc_set_attention_status(struct slot *slot, u8 value)
 541 {
 542         u8 slot_cmd = 0;
 543
 544         switch (value) {
 545                 case 0 :
 546                         slot_cmd = SET_ATTN_OFF;        /* OFF */
 547                         break;
 548                 case 1:
 549                         slot_cmd = SET_ATTN_ON;         /* ON */
 550                         break;
 551                 case 2:
 552                         slot_cmd = SET_ATTN_BLINK;      /* BLINK */
 553                         break;
 554                 default:
 555                         return -1;
 556         }
 557
 558         return shpc_write_cmd(slot, slot->hp_slot, slot_cmd);
 559 }
 560
 561
 562 static void hpc_set_green_led_on(struct slot *slot)
 563 {
 564         shpc_write_cmd(slot, slot->hp_slot, SET_PWR_ON);
 565 }
 566
 567 static void hpc_set_green_led_off(struct slot *slot)
 568 {
 569         shpc_write_cmd(slot, slot->hp_slot, SET_PWR_OFF);
 570 }
 571
 572 static void hpc_set_green_led_blink(struct slot *slot)
 573 {
 574         shpc_write_cmd(slot, slot->hp_slot, SET_PWR_BLINK);
 575 }
 576
 577 static void hpc_release_ctlr(struct controller *ctrl)
 578 {
 579         int i;
 580         u32 slot_reg, serr_int;
 581
 582         /*
 583          * Mask event interrupts and SERRs of all slots
 584          */
 585         for (i = 0; i < ctrl->num_slots; i++) {
 586                 slot_reg = shpc_readl(ctrl, SLOT_REG(i));
 587                 slot_reg |= (PRSNT_CHANGE_INTR_MASK | ISO_PFAULT_INTR_MASK |
 588                              BUTTON_PRESS_INTR_MASK | MRL_CHANGE_INTR_MASK |
 589                              CON_PFAULT_INTR_MASK   | MRL_CHANGE_SERR_MASK |
 590                              CON_PFAULT_SERR_MASK);
 591                 slot_reg &= ~SLOT_REG_RSVDZ_MASK;
 592                 shpc_writel(ctrl, SLOT_REG(i), slot_reg);
 593         }
 594
 595         cleanup_slots(ctrl);
 596
 597         /*
 598          * Mask SERR and System Interrupt generation
 599          */
 600         serr_int = shpc_readl(ctrl, SERR_INTR_ENABLE);
 601         serr_int |= (GLOBAL_INTR_MASK  | GLOBAL_SERR_MASK |
 602                      COMMAND_INTR_MASK | ARBITER_SERR_MASK);
 603         serr_int &= ~SERR_INTR_RSVDZ_MASK;
 604         shpc_writel(ctrl, SERR_INTR_ENABLE, serr_int);
 605
 606         if (shpchp_poll_mode)
 607                 del_timer(&ctrl->poll_timer);
 608         else {
 609                 free_irq(ctrl->pci_dev->irq, ctrl);
 610                 pci_disable_msi(ctrl->pci_dev);
 611         }
 612
 613         iounmap(ctrl->creg);
 614         release_mem_region(ctrl->mmio_base, ctrl->mmio_size);
 615 }
 616
 617 static int hpc_power_on_slot(struct slot * slot)
 618 {
 619         int retval;
 620
 621         retval = shpc_write_cmd(slot, slot->hp_slot, SET_SLOT_PWR);
 622         if (retval)
 623                 ctrl_err(slot->ctrl, "%s: Write command failed!\n", __func__);
 624
 625         return retval;
 626 }
 627
 628 static int hpc_slot_enable(struct slot * slot)
 629 {
 630         int retval;
 631
 632         /* Slot - Enable, Power Indicator - Blink, Attention Indicator - Off */
 633         retval = shpc_write_cmd(slot, slot->hp_slot,
 634                         SET_SLOT_ENABLE | SET_PWR_BLINK | SET_ATTN_OFF);
 635         if (retval)
 636                 ctrl_err(slot->ctrl, "%s: Write command failed!\n", __func__);
 637
 638         return retval;
 639 }
 640
 641 static int hpc_slot_disable(struct slot * slot)
 642 {
 643         int retval;
 644
 645         /* Slot - Disable, Power Indicator - Off, Attention Indicator - On */
 646         retval = shpc_write_cmd(slot, slot->hp_slot,
 647                         SET_SLOT_DISABLE | SET_PWR_OFF | SET_ATTN_ON);
 648         if (retval)
 649                 ctrl_err(slot->ctrl, "%s: Write command failed!\n", __func__);
 650
 651         return retval;
 652 }
 653
 654 static int shpc_get_cur_bus_speed(struct controller *ctrl)
 655 {
 656         int retval = 0;
 657         struct pci_bus *bus = ctrl->pci_dev->subordinate;
 658         enum pci_bus_speed bus_speed = PCI_SPEED_UNKNOWN;
 659         u16 sec_bus_reg = shpc_readw(ctrl, SEC_BUS_CONFIG);
 660         u8 pi = shpc_readb(ctrl, PROG_INTERFACE);
 661         u8 speed_mode = (pi == 2) ? (sec_bus_reg & 0xF) : (sec_bus_reg & 0x7);
 662
 663         if ((pi == 1) && (speed_mode > 4)) {
 664                 retval = -ENODEV;
 665                 goto out;
 666         }
 667
 668         switch (speed_mode) {
 669         case 0x0:
 670                 bus_speed = PCI_SPEED_33MHz;
 671                 break;
 672         case 0x1:
 673                 bus_speed = PCI_SPEED_66MHz;
 674                 break;
 675         case 0x2:
 676                 bus_speed = PCI_SPEED_66MHz_PCIX;
 677                 break;
 678         case 0x3:
 679                 bus_speed = PCI_SPEED_100MHz_PCIX;
 680                 break;
 681         case 0x4:
 682                 bus_speed = PCI_SPEED_133MHz_PCIX;
 683                 break;
 684         case 0x5:
 685                 bus_speed = PCI_SPEED_66MHz_PCIX_ECC;
 686                 break;
 687         case 0x6:
 688                 bus_speed = PCI_SPEED_100MHz_PCIX_ECC;
 689                 break;
 690         case 0x7:
 691                 bus_speed = PCI_SPEED_133MHz_PCIX_ECC;
 692                 break;
 693         case 0x8:
 694                 bus_speed = PCI_SPEED_66MHz_PCIX_266;
 695                 break;
 696         case 0x9:
 697                 bus_speed = PCI_SPEED_100MHz_PCIX_266;
 698                 break;
 699         case 0xa:
 700                 bus_speed = PCI_SPEED_133MHz_PCIX_266;
 701                 break;
 702         case 0xb:
 703                 bus_speed = PCI_SPEED_66MHz_PCIX_533;
 704                 break;
 705         case 0xc:
 706                 bus_speed = PCI_SPEED_100MHz_PCIX_533;
 707                 break;
 708         case 0xd:
 709                 bus_speed = PCI_SPEED_133MHz_PCIX_533;
 710                 break;
 711         default:
 712                 retval = -ENODEV;
 713                 break;
 714         }
 715
 716  out:
 717         bus->cur_bus_speed = bus_speed;
 718         dbg("Current bus speed = %d\n", bus_speed);
 719         return retval;
 720 }
 721
 722
 723 static int hpc_set_bus_speed_mode(struct slot * slot, enum pci_bus_speed value)
 724 {
 725         int retval;
 726         struct controller *ctrl = slot->ctrl;
 727         u8 pi, cmd;
 728
 729         pi = shpc_readb(ctrl, PROG_INTERFACE);
 730         if ((pi == 1) && (value > PCI_SPEED_133MHz_PCIX))
 731                 return -EINVAL;
 732
 733         switch (value) {
 734         case PCI_SPEED_33MHz:
 735                 cmd = SETA_PCI_33MHZ;
 736                 break;
 737         case PCI_SPEED_66MHz:
 738                 cmd = SETA_PCI_66MHZ;
 739                 break;
 740         case PCI_SPEED_66MHz_PCIX:
 741                 cmd = SETA_PCIX_66MHZ;
 742                 break;
 743         case PCI_SPEED_100MHz_PCIX:
 744                 cmd = SETA_PCIX_100MHZ;
 745                 break;
 746         case PCI_SPEED_133MHz_PCIX:
 747                 cmd = SETA_PCIX_133MHZ;
 748                 break;
 749         case PCI_SPEED_66MHz_PCIX_ECC:
 750                 cmd = SETB_PCIX_66MHZ_EM;
 751                 break;
 752         case PCI_SPEED_100MHz_PCIX_ECC:
 753                 cmd = SETB_PCIX_100MHZ_EM;
 754                 break;
 755         case PCI_SPEED_133MHz_PCIX_ECC:
 756                 cmd = SETB_PCIX_133MHZ_EM;
 757                 break;
 758         case PCI_SPEED_66MHz_PCIX_266:
 759                 cmd = SETB_PCIX_66MHZ_266;
 760                 break;
 761         case PCI_SPEED_100MHz_PCIX_266:
 762                 cmd = SETB_PCIX_100MHZ_266;
 763                 break;
 764         case PCI_SPEED_133MHz_PCIX_266:
 765                 cmd = SETB_PCIX_133MHZ_266;
 766                 break;
 767         case PCI_SPEED_66MHz_PCIX_533:
 768                 cmd = SETB_PCIX_66MHZ_533;
 769                 break;
 770         case PCI_SPEED_100MHz_PCIX_533:
 771                 cmd = SETB_PCIX_100MHZ_533;
 772                 break;
 773         case PCI_SPEED_133MHz_PCIX_533:
 774                 cmd = SETB_PCIX_133MHZ_533;
 775                 break;
 776         default:
 777                 return -EINVAL;
 778         }
 779
 780         retval = shpc_write_cmd(slot, 0, cmd);
 781         if (retval)
 782                 ctrl_err(ctrl, "%s: Write command failed!\n", __func__);
 783         else
 784                 shpc_get_cur_bus_speed(ctrl);
 785
 786         return retval;
 787 }
 788
 789 static irqreturn_t shpc_isr(int irq, void *dev_id)
 790 {
 791         struct controller *ctrl = (struct controller *)dev_id;
 792         u32 serr_int, slot_reg, intr_loc, intr_loc2;
 793         int hp_slot;
 794
 795         /* Check to see if it was our interrupt */
 796         intr_loc = shpc_readl(ctrl, INTR_LOC);
 797         if (!intr_loc)
 798                 return IRQ_NONE;
 799
 800         ctrl_dbg(ctrl, "%s: intr_loc = %x\n", __func__, intr_loc);
 801
 802         if(!shpchp_poll_mode) {
 803                 /*
 804                  * Mask Global Interrupt Mask - see implementation
 805                  * note on p. 139 of SHPC spec rev 1.0
 806                  */
 807                 serr_int = shpc_readl(ctrl, SERR_INTR_ENABLE);
 808                 serr_int |= GLOBAL_INTR_MASK;
 809                 serr_int &= ~SERR_INTR_RSVDZ_MASK;
 810                 shpc_writel(ctrl, SERR_INTR_ENABLE, serr_int);
 811
 812                 intr_loc2 = shpc_readl(ctrl, INTR_LOC);
 813                 ctrl_dbg(ctrl, "%s: intr_loc2 = %x\n", __func__, intr_loc2);
 814         }
 815
 816         if (intr_loc & CMD_INTR_PENDING) {
 817                 /*
 818                  * Command Complete Interrupt Pending
 819                  * RO only - clear by writing 1 to the Command Completion
 820                  * Detect bit in Controller SERR-INT register
 821                  */
 822                 serr_int = shpc_readl(ctrl, SERR_INTR_ENABLE);
 823                 serr_int &= ~SERR_INTR_RSVDZ_MASK;
 824                 shpc_writel(ctrl, SERR_INTR_ENABLE, serr_int);
 825
 826                 wake_up_interruptible(&ctrl->queue);
 827         }
 828
 829         if (!(intr_loc & ~CMD_INTR_PENDING))
 830                 goto out;
 831
 832         for (hp_slot = 0; hp_slot < ctrl->num_slots; hp_slot++) {
 833                 /* To find out which slot has interrupt pending */
 834                 if (!(intr_loc & SLOT_INTR_PENDING(hp_slot)))
 835                         continue;
 836
 837                 slot_reg = shpc_readl(ctrl, SLOT_REG(hp_slot));
 838                 ctrl_dbg(ctrl, "Slot %x with intr, slot register = %x\n",
 839                          hp_slot, slot_reg);
 840
 841                 if (slot_reg & MRL_CHANGE_DETECTED)
 842                         shpchp_handle_switch_change(hp_slot, ctrl);
 843
 844                 if (slot_reg & BUTTON_PRESS_DETECTED)
 845                         shpchp_handle_attention_button(hp_slot, ctrl);
 846
 847                 if (slot_reg & PRSNT_CHANGE_DETECTED)
 848                         shpchp_handle_presence_change(hp_slot, ctrl);
 849
 850                 if (slot_reg & (ISO_PFAULT_DETECTED | CON_PFAULT_DETECTED))
 851                         shpchp_handle_power_fault(hp_slot, ctrl);
 852
 853                 /* Clear all slot events */
 854                 slot_reg &= ~SLOT_REG_RSVDZ_MASK;
 855                 shpc_writel(ctrl, SLOT_REG(hp_slot), slot_reg);
 856         }
 857  out:
 858         if (!shpchp_poll_mode) {
 859                 /* Unmask Global Interrupt Mask */
 860                 serr_int = shpc_readl(ctrl, SERR_INTR_ENABLE);
 861                 serr_int &= ~(GLOBAL_INTR_MASK | SERR_INTR_RSVDZ_MASK);
 862                 shpc_writel(ctrl, SERR_INTR_ENABLE, serr_int);
 863         }
 864
 865         return IRQ_HANDLED;
 866 }
 867
 868 static int shpc_get_max_bus_speed(struct controller *ctrl)
 869 {
 870         int retval = 0;
 871         struct pci_bus *bus = ctrl->pci_dev->subordinate;
 872         enum pci_bus_speed bus_speed = PCI_SPEED_UNKNOWN;
 873         u8 pi = shpc_readb(ctrl, PROG_INTERFACE);
 874         u32 slot_avail1 = shpc_readl(ctrl, SLOT_AVAIL1);
 875         u32 slot_avail2 = shpc_readl(ctrl, SLOT_AVAIL2);
 876
 877         if (pi == 2) {
 878                 if (slot_avail2 & SLOT_133MHZ_PCIX_533)
 879                         bus_speed = PCI_SPEED_133MHz_PCIX_533;
 880                 else if (slot_avail2 & SLOT_100MHZ_PCIX_533)
 881                         bus_speed = PCI_SPEED_100MHz_PCIX_533;
 882                 else if (slot_avail2 & SLOT_66MHZ_PCIX_533)
 883                         bus_speed = PCI_SPEED_66MHz_PCIX_533;
 884                 else if (slot_avail2 & SLOT_133MHZ_PCIX_266)
 885                         bus_speed = PCI_SPEED_133MHz_PCIX_266;
 886                 else if (slot_avail2 & SLOT_100MHZ_PCIX_266)
 887                         bus_speed = PCI_SPEED_100MHz_PCIX_266;
 888                 else if (slot_avail2 & SLOT_66MHZ_PCIX_266)
 889                         bus_speed = PCI_SPEED_66MHz_PCIX_266;
 890         }
 891
 892         if (bus_speed == PCI_SPEED_UNKNOWN) {
 893                 if (slot_avail1 & SLOT_133MHZ_PCIX)
 894                         bus_speed = PCI_SPEED_133MHz_PCIX;
 895                 else if (slot_avail1 & SLOT_100MHZ_PCIX)
 896                         bus_speed = PCI_SPEED_100MHz_PCIX;
 897                 else if (slot_avail1 & SLOT_66MHZ_PCIX)
 898                         bus_speed = PCI_SPEED_66MHz_PCIX;
 899                 else if (slot_avail2 & SLOT_66MHZ)
 900                         bus_speed = PCI_SPEED_66MHz;
 901                 else if (slot_avail1 & SLOT_33MHZ)
 902                         bus_speed = PCI_SPEED_33MHz;
 903                 else
 904                         retval = -ENODEV;
 905         }
 906
 907         bus->max_bus_speed = bus_speed;
 908         ctrl_dbg(ctrl, "Max bus speed = %d\n", bus_speed);
 909
 910         return retval;
 911 }
 912
 913 static struct hpc_ops shpchp_hpc_ops = {
 914         .power_on_slot                  = hpc_power_on_slot,
 915         .slot_enable                    = hpc_slot_enable,
 916         .slot_disable                   = hpc_slot_disable,
 917         .set_bus_speed_mode             = hpc_set_bus_speed_mode,
 918         .set_attention_status   = hpc_set_attention_status,
 919         .get_power_status               = hpc_get_power_status,
 920         .get_attention_status   = hpc_get_attention_status,
 921         .get_latch_status               = hpc_get_latch_status,
 922         .get_adapter_status             = hpc_get_adapter_status,
 923
 924         .get_adapter_speed              = hpc_get_adapter_speed,
 925         .get_mode1_ECC_cap              = hpc_get_mode1_ECC_cap,
 926         .get_prog_int                   = hpc_get_prog_int,
 927
 928         .query_power_fault              = hpc_query_power_fault,
 929         .green_led_on                   = hpc_set_green_led_on,
 930         .green_led_off                  = hpc_set_green_led_off,
 931         .green_led_blink                = hpc_set_green_led_blink,
 932
 933         .release_ctlr                   = hpc_release_ctlr,
 934 };
 935
 936 int shpc_init(struct controller *ctrl, struct pci_dev *pdev)
 937 {
 938         int rc = -1, num_slots = 0;
 939         u8 hp_slot;
 940         u32 shpc_base_offset;
 941         u32 tempdword, slot_reg, slot_config;
 942         u8 i;
 943
 944         ctrl->pci_dev = pdev;  /* pci_dev of the P2P bridge */
 945         ctrl_dbg(ctrl, "Hotplug Controller:\n");
 946
 947         if (pdev->vendor == PCI_VENDOR_ID_AMD &&
 948             pdev->device == PCI_DEVICE_ID_AMD_GOLAM_7450) {
 949                 /* amd shpc driver doesn't use Base Offset; assume 0 */
 950                 ctrl->mmio_base = pci_resource_start(pdev, 0);
 951                 ctrl->mmio_size = pci_resource_len(pdev, 0);
 952         } else {
 953                 ctrl->cap_offset = pci_find_capability(pdev, PCI_CAP_ID_SHPC);
 954                 if (!ctrl->cap_offset) {
 955                         ctrl_err(ctrl, "Cannot find PCI capability\n");
 956                         goto abort;
 957                 }
 958                 ctrl_dbg(ctrl, " cap_offset = %x\n", ctrl->cap_offset);
 959
 960                 rc = shpc_indirect_read(ctrl, 0, &shpc_base_offset);
 961                 if (rc) {
 962                         ctrl_err(ctrl, "Cannot read base_offset\n");
 963                         goto abort;
 964                 }
 965
 966                 rc = shpc_indirect_read(ctrl, 3, &tempdword);
 967                 if (rc) {
 968                         ctrl_err(ctrl, "Cannot read slot config\n");
 969                         goto abort;
 970                 }
 971                 num_slots = tempdword & SLOT_NUM;
 972                 ctrl_dbg(ctrl, " num_slots (indirect) %x\n", num_slots);
 973
 974                 for (i = 0; i < 9 + num_slots; i++) {
 975                         rc = shpc_indirect_read(ctrl, i, &tempdword);
 976                         if (rc) {
 977                                 ctrl_err(ctrl,
 978                                          "Cannot read creg (index = %d)\n", i);
 979                                 goto abort;
 980                         }
 981                         ctrl_dbg(ctrl, " offset %d: value %x\n", i, tempdword);
 982                 }
 983
 984                 ctrl->mmio_base =
 985                         pci_resource_start(pdev, 0) + shpc_base_offset;
 986                 ctrl->mmio_size = 0x24 + 0x4 * num_slots;
 987         }
 988
 989         ctrl_info(ctrl, "HPC vendor_id %x device_id %x ss_vid %x ss_did %x\n",
 990                   pdev->vendor, pdev->device, pdev->subsystem_vendor,
 991                   pdev->subsystem_device);
 992
 993         rc = pci_enable_device(pdev);
 994         if (rc) {
 995                 ctrl_err(ctrl, "pci_enable_device failed\n");
 996                 goto abort;
 997         }
 998
 999         if (!request_mem_region(ctrl->mmio_base, ctrl->mmio_size, MY_NAME)) {
1000                 ctrl_err(ctrl, "Cannot reserve MMIO region\n");
1001                 rc = -1;
1002                 goto abort;
1003         }
1004
1005         ctrl->creg = ioremap(ctrl->mmio_base, ctrl->mmio_size);
1006         if (!ctrl->creg) {
1007                 ctrl_err(ctrl, "Cannot remap MMIO region %lx @ %lx\n",
1008                          ctrl->mmio_size, ctrl->mmio_base);
1009                 release_mem_region(ctrl->mmio_base, ctrl->mmio_size);
1010                 rc = -1;
1011                 goto abort;
1012         }
1013         ctrl_dbg(ctrl, "ctrl->creg %p\n", ctrl->creg);
1014
1015         mutex_init(&ctrl->crit_sect);
1016         mutex_init(&ctrl->cmd_lock);
1017
1018         /* Setup wait queue */
1019         init_waitqueue_head(&ctrl->queue);
1020
1021         ctrl->hpc_ops = &shpchp_hpc_ops;
1022
1023         /* Return PCI Controller Info */
1024         slot_config = shpc_readl(ctrl, SLOT_CONFIG);
1025         ctrl->slot_device_offset = (slot_config & FIRST_DEV_NUM) >> 8;
1026         ctrl->num_slots = slot_config & SLOT_NUM;
1027         ctrl->first_slot = (slot_config & PSN) >> 16;
1028         ctrl->slot_num_inc = ((slot_config & UPDOWN) >> 29) ? 1 : -1;
1029
1030         /* Mask Global Interrupt Mask & Command Complete Interrupt Mask */
1031         tempdword = shpc_readl(ctrl, SERR_INTR_ENABLE);
1032         ctrl_dbg(ctrl, "SERR_INTR_ENABLE = %x\n", tempdword);
1033         tempdword |= (GLOBAL_INTR_MASK  | GLOBAL_SERR_MASK |
1034                       COMMAND_INTR_MASK | ARBITER_SERR_MASK);
1035         tempdword &= ~SERR_INTR_RSVDZ_MASK;
1036         shpc_writel(ctrl, SERR_INTR_ENABLE, tempdword);
1037         tempdword = shpc_readl(ctrl, SERR_INTR_ENABLE);
1038         ctrl_dbg(ctrl, "SERR_INTR_ENABLE = %x\n", tempdword);
1039
1040         /* Mask the MRL sensor SERR Mask of individual slot in
1041          * Slot SERR-INT Mask & clear all the existing event if any
1042          */
1043         for (hp_slot = 0; hp_slot < ctrl->num_slots; hp_slot++) {
1044                 slot_reg = shpc_readl(ctrl, SLOT_REG(hp_slot));
1045                 ctrl_dbg(ctrl, "Default Logical Slot Register %d value %x\n",
1046                          hp_slot, slot_reg);
1047                 slot_reg |= (PRSNT_CHANGE_INTR_MASK | ISO_PFAULT_INTR_MASK |
1048                              BUTTON_PRESS_INTR_MASK | MRL_CHANGE_INTR_MASK |
1049                              CON_PFAULT_INTR_MASK   | MRL_CHANGE_SERR_MASK |
1050                              CON_PFAULT_SERR_MASK);
1051                 slot_reg &= ~SLOT_REG_RSVDZ_MASK;
1052                 shpc_writel(ctrl, SLOT_REG(hp_slot), slot_reg);
1053         }
1054
1055         if (shpchp_poll_mode) {
1056                 /* Install interrupt polling timer. Start with 10 sec delay */
1057                 init_timer(&ctrl->poll_timer);
1058                 start_int_poll_timer(ctrl, 10);
1059         } else {
1060                 /* Installs the interrupt handler */
1061                 rc = pci_enable_msi(pdev);
1062                 if (rc) {
1063                         ctrl_info(ctrl,
1064                                   "Can't get msi for the hotplug controller\n");
1065                         ctrl_info(ctrl,
1066                                   "Use INTx for the hotplug controller\n");
1067                 }
1068
1069                 rc = request_irq(ctrl->pci_dev->irq, shpc_isr, IRQF_SHARED,
1070                                  MY_NAME, (void *)ctrl);
1071                 ctrl_dbg(ctrl, "request_irq %d (returns %d)\n",
1072                          ctrl->pci_dev->irq, rc);
1073                 if (rc) {
1074                         ctrl_err(ctrl, "Can't get irq %d for the hotplug "
1075                                  "controller\n", ctrl->pci_dev->irq);
1076                         goto abort_iounmap;
1077                 }
1078         }
1079         ctrl_dbg(ctrl, "HPC at %s irq=%x\n", pci_name(pdev), pdev->irq);
1080
1081         shpc_get_max_bus_speed(ctrl);
1082         shpc_get_cur_bus_speed(ctrl);
1083
1084         /*
1085          * Unmask all event interrupts of all slots
1086          */
1087         for (hp_slot = 0; hp_slot < ctrl->num_slots; hp_slot++) {
1088                 slot_reg = shpc_readl(ctrl, SLOT_REG(hp_slot));
1089                 ctrl_dbg(ctrl, "Default Logical Slot Register %d value %x\n",
1090                          hp_slot, slot_reg);
1091                 slot_reg &= ~(PRSNT_CHANGE_INTR_MASK | ISO_PFAULT_INTR_MASK |
1092                               BUTTON_PRESS_INTR_MASK | MRL_CHANGE_INTR_MASK |
1093                               CON_PFAULT_INTR_MASK | SLOT_REG_RSVDZ_MASK);
1094                 shpc_writel(ctrl, SLOT_REG(hp_slot), slot_reg);
1095         }
1096         if (!shpchp_poll_mode) {
1097                 /* Unmask all general input interrupts and SERR */
1098                 tempdword = shpc_readl(ctrl, SERR_INTR_ENABLE);
1099                 tempdword &= ~(GLOBAL_INTR_MASK | COMMAND_INTR_MASK |
1100                                SERR_INTR_RSVDZ_MASK);
1101                 shpc_writel(ctrl, SERR_INTR_ENABLE, tempdword);
1102                 tempdword = shpc_readl(ctrl, SERR_INTR_ENABLE);
1103                 ctrl_dbg(ctrl, "SERR_INTR_ENABLE = %x\n", tempdword);
1104         }
1105
1106         return 0;
1107
1108         /* We end up here for the many possible ways to fail this API.  */
1109 abort_iounmap:
1110         iounmap(ctrl->creg);
1111 abort:
1112         return rc;
1113 }