drivers/pci/hotplug/pciehp_hpc.c

   1 /*
   2  * PCI Express 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/signal.h>
  34 #include <linux/jiffies.h>
  35 #include <linux/timer.h>
  36 #include <linux/pci.h>
  37 #include <linux/interrupt.h>
  38 #include <linux/time.h>
  39
  40 #include "../pci.h"
  41 #include "pciehp.h"
  42
  43 static atomic_t pciehp_num_controllers = ATOMIC_INIT(0);
  44
  45 struct ctrl_reg {
  46         u8 cap_id;
  47         u8 nxt_ptr;
  48         u16 cap_reg;
  49         u32 dev_cap;
  50         u16 dev_ctrl;
  51         u16 dev_status;
  52         u32 lnk_cap;
  53         u16 lnk_ctrl;
  54         u16 lnk_status;
  55         u32 slot_cap;
  56         u16 slot_ctrl;
  57         u16 slot_status;
  58         u16 root_ctrl;
  59         u16 rsvp;
  60         u32 root_status;
  61 } __attribute__ ((packed));
  62
  63 /* offsets to the controller registers based on the above structure layout */
  64 enum ctrl_offsets {
  65         PCIECAPID       =       offsetof(struct ctrl_reg, cap_id),
  66         NXTCAPPTR       =       offsetof(struct ctrl_reg, nxt_ptr),
  67         CAPREG          =       offsetof(struct ctrl_reg, cap_reg),
  68         DEVCAP          =       offsetof(struct ctrl_reg, dev_cap),
  69         DEVCTRL         =       offsetof(struct ctrl_reg, dev_ctrl),
  70         DEVSTATUS       =       offsetof(struct ctrl_reg, dev_status),
  71         LNKCAP          =       offsetof(struct ctrl_reg, lnk_cap),
  72         LNKCTRL         =       offsetof(struct ctrl_reg, lnk_ctrl),
  73         LNKSTATUS       =       offsetof(struct ctrl_reg, lnk_status),
  74         SLOTCAP         =       offsetof(struct ctrl_reg, slot_cap),
  75         SLOTCTRL        =       offsetof(struct ctrl_reg, slot_ctrl),
  76         SLOTSTATUS      =       offsetof(struct ctrl_reg, slot_status),
  77         ROOTCTRL        =       offsetof(struct ctrl_reg, root_ctrl),
  78         ROOTSTATUS      =       offsetof(struct ctrl_reg, root_status),
  79 };
  80
  81 static inline int pciehp_readw(struct controller *ctrl, int reg, u16 *value)
  82 {
  83         struct pci_dev *dev = ctrl->pci_dev;
  84         return pci_read_config_word(dev, ctrl->cap_base + reg, value);
  85 }
  86
  87 static inline int pciehp_readl(struct controller *ctrl, int reg, u32 *value)
  88 {
  89         struct pci_dev *dev = ctrl->pci_dev;
  90         return pci_read_config_dword(dev, ctrl->cap_base + reg, value);
  91 }
  92
  93 static inline int pciehp_writew(struct controller *ctrl, int reg, u16 value)
  94 {
  95         struct pci_dev *dev = ctrl->pci_dev;
  96         return pci_write_config_word(dev, ctrl->cap_base + reg, value);
  97 }
  98
  99 static inline int pciehp_writel(struct controller *ctrl, int reg, u32 value)
 100 {
 101         struct pci_dev *dev = ctrl->pci_dev;
 102         return pci_write_config_dword(dev, ctrl->cap_base + reg, value);
 103 }
 104
 105 /* Field definitions in PCI Express Capabilities Register */
 106 #define CAP_VER                 0x000F
 107 #define DEV_PORT_TYPE           0x00F0
 108 #define SLOT_IMPL               0x0100
 109 #define MSG_NUM                 0x3E00
 110
 111 /* Device or Port Type */
 112 #define NAT_ENDPT               0x00
 113 #define LEG_ENDPT               0x01
 114 #define ROOT_PORT               0x04
 115 #define UP_STREAM               0x05
 116 #define DN_STREAM               0x06
 117 #define PCIE_PCI_BRDG           0x07
 118 #define PCI_PCIE_BRDG           0x10
 119
 120 /* Field definitions in Device Capabilities Register */
 121 #define DATTN_BUTTN_PRSN        0x1000
 122 #define DATTN_LED_PRSN          0x2000
 123 #define DPWR_LED_PRSN           0x4000
 124
 125 /* Field definitions in Link Capabilities Register */
 126 #define MAX_LNK_SPEED           0x000F
 127 #define MAX_LNK_WIDTH           0x03F0
 128
 129 /* Link Width Encoding */
 130 #define LNK_X1          0x01
 131 #define LNK_X2          0x02
 132 #define LNK_X4          0x04
 133 #define LNK_X8          0x08
 134 #define LNK_X12         0x0C
 135 #define LNK_X16         0x10
 136 #define LNK_X32         0x20
 137
 138 /*Field definitions of Link Status Register */
 139 #define LNK_SPEED       0x000F
 140 #define NEG_LINK_WD     0x03F0
 141 #define LNK_TRN_ERR     0x0400
 142 #define LNK_TRN         0x0800
 143 #define SLOT_CLK_CONF   0x1000
 144
 145 /* Field definitions in Slot Capabilities Register */
 146 #define ATTN_BUTTN_PRSN 0x00000001
 147 #define PWR_CTRL_PRSN   0x00000002
 148 #define MRL_SENS_PRSN   0x00000004
 149 #define ATTN_LED_PRSN   0x00000008
 150 #define PWR_LED_PRSN    0x00000010
 151 #define HP_SUPR_RM_SUP  0x00000020
 152 #define HP_CAP          0x00000040
 153 #define SLOT_PWR_VALUE  0x000003F8
 154 #define SLOT_PWR_LIMIT  0x00000C00
 155 #define PSN             0xFFF80000      /* PSN: Physical Slot Number */
 156
 157 /* Field definitions in Slot Control Register */
 158 #define ATTN_BUTTN_ENABLE               0x0001
 159 #define PWR_FAULT_DETECT_ENABLE         0x0002
 160 #define MRL_DETECT_ENABLE               0x0004
 161 #define PRSN_DETECT_ENABLE              0x0008
 162 #define CMD_CMPL_INTR_ENABLE            0x0010
 163 #define HP_INTR_ENABLE                  0x0020
 164 #define ATTN_LED_CTRL                   0x00C0
 165 #define PWR_LED_CTRL                    0x0300
 166 #define PWR_CTRL                        0x0400
 167 #define EMI_CTRL                        0x0800
 168
 169 /* Attention indicator and Power indicator states */
 170 #define LED_ON          0x01
 171 #define LED_BLINK       0x10
 172 #define LED_OFF         0x11
 173
 174 /* Power Control Command */
 175 #define POWER_ON        0
 176 #define POWER_OFF       0x0400
 177
 178 /* EMI Status defines */
 179 #define EMI_DISENGAGED  0
 180 #define EMI_ENGAGED     1
 181
 182 /* Field definitions in Slot Status Register */
 183 #define ATTN_BUTTN_PRESSED      0x0001
 184 #define PWR_FAULT_DETECTED      0x0002
 185 #define MRL_SENS_CHANGED        0x0004
 186 #define PRSN_DETECT_CHANGED     0x0008
 187 #define CMD_COMPLETED           0x0010
 188 #define MRL_STATE               0x0020
 189 #define PRSN_STATE              0x0040
 190 #define EMI_STATE               0x0080
 191 #define EMI_STATUS_BIT          7
 192
 193 static irqreturn_t pcie_isr(int irq, void *dev_id);
 194 static void start_int_poll_timer(struct controller *ctrl, int sec);
 195
 196 /* This is the interrupt polling timeout function. */
 197 static void int_poll_timeout(unsigned long data)
 198 {
 199         struct controller *ctrl = (struct controller *)data;
 200
 201         /* Poll for interrupt events.  regs == NULL => polling */
 202         pcie_isr(0, ctrl);
 203
 204         init_timer(&ctrl->poll_timer);
 205         if (!pciehp_poll_time)
 206                 pciehp_poll_time = 2; /* default polling interval is 2 sec */
 207
 208         start_int_poll_timer(ctrl, pciehp_poll_time);
 209 }
 210
 211 /* This function starts the interrupt polling timer. */
 212 static void start_int_poll_timer(struct controller *ctrl, int sec)
 213 {
 214         /* Clamp to sane value */
 215         if ((sec <= 0) || (sec > 60))
 216                 sec = 2;
 217
 218         ctrl->poll_timer.function = &int_poll_timeout;
 219         ctrl->poll_timer.data = (unsigned long)ctrl;
 220         ctrl->poll_timer.expires = jiffies + sec * HZ;
 221         add_timer(&ctrl->poll_timer);
 222 }
 223
 224 static inline int pciehp_request_irq(struct controller *ctrl)
 225 {
 226         int retval, irq = ctrl->pci_dev->irq;
 227
 228         /* Install interrupt polling timer. Start with 10 sec delay */
 229         if (pciehp_poll_mode) {
 230                 init_timer(&ctrl->poll_timer);
 231                 start_int_poll_timer(ctrl, 10);
 232                 return 0;
 233         }
 234
 235         /* Installs the interrupt handler */
 236         retval = request_irq(irq, pcie_isr, IRQF_SHARED, MY_NAME, ctrl);
 237         if (retval)
 238                 err("Cannot get irq %d for the hotplug controller\n", irq);
 239         return retval;
 240 }
 241
 242 static inline void pciehp_free_irq(struct controller *ctrl)
 243 {
 244         if (pciehp_poll_mode)
 245                 del_timer_sync(&ctrl->poll_timer);
 246         else
 247                 free_irq(ctrl->pci_dev->irq, ctrl);
 248 }
 249
 250 static int pcie_poll_cmd(struct controller *ctrl)
 251 {
 252         u16 slot_status;
 253         int timeout = 1000;
 254
 255         if (!pciehp_readw(ctrl, SLOTSTATUS, &slot_status)) {
 256                 if (slot_status & CMD_COMPLETED) {
 257                         pciehp_writew(ctrl, SLOTSTATUS, CMD_COMPLETED);
 258                         return 1;
 259                 }
 260         }
 261         while (timeout > 1000) {
 262                 msleep(10);
 263                 timeout -= 10;
 264                 if (!pciehp_readw(ctrl, SLOTSTATUS, &slot_status)) {
 265                         if (slot_status & CMD_COMPLETED) {
 266                                 pciehp_writew(ctrl, SLOTSTATUS, CMD_COMPLETED);
 267                                 return 1;
 268                         }
 269                 }
 270         }
 271         return 0;       /* timeout */
 272 }
 273
 274 static void pcie_wait_cmd(struct controller *ctrl, int poll)
 275 {
 276         unsigned int msecs = pciehp_poll_mode ? 2500 : 1000;
 277         unsigned long timeout = msecs_to_jiffies(msecs);
 278         int rc;
 279
 280         if (poll)
 281                 rc = pcie_poll_cmd(ctrl);
 282         else
 283                 rc = wait_event_timeout(ctrl->queue, !ctrl->cmd_busy, timeout);
 284         if (!rc)
 285                 dbg("Command not completed in 1000 msec\n");
 286 }
 287
 288 /**
 289  * pcie_write_cmd - Issue controller command
 290  * @ctrl: controller to which the command is issued
 291  * @cmd:  command value written to slot control register
 292  * @mask: bitmask of slot control register to be modified
 293  */
 294 static int pcie_write_cmd(struct controller *ctrl, u16 cmd, u16 mask)
 295 {
 296         int retval = 0;
 297         u16 slot_status;
 298         u16 slot_ctrl;
 299
 300         mutex_lock(&ctrl->ctrl_lock);
 301
 302         retval = pciehp_readw(ctrl, SLOTSTATUS, &slot_status);
 303         if (retval) {
 304                 err("%s: Cannot read SLOTSTATUS register\n", __func__);
 305                 goto out;
 306         }
 307
 308         if (slot_status & CMD_COMPLETED) {
 309                 if (!ctrl->no_cmd_complete) {
 310                         /*
 311                          * After 1 sec and CMD_COMPLETED still not set, just
 312                          * proceed forward to issue the next command according
 313                          * to spec. Just print out the error message.
 314                          */
 315                         dbg("%s: CMD_COMPLETED not clear after 1 sec.\n",
 316                             __func__);
 317                 } else if (!NO_CMD_CMPL(ctrl)) {
 318                         /*
 319                          * This controller semms to notify of command completed
 320                          * event even though it supports none of power
 321                          * controller, attention led, power led and EMI.
 322                          */
 323                         dbg("%s: Unexpected CMD_COMPLETED. Need to wait for "
 324                             "command completed event.\n", __func__);
 325                         ctrl->no_cmd_complete = 0;
 326                 } else {
 327                         dbg("%s: Unexpected CMD_COMPLETED. Maybe the "
 328                             "controller is broken.\n", __func__);
 329                 }
 330         }
 331
 332         retval = pciehp_readw(ctrl, SLOTCTRL, &slot_ctrl);
 333         if (retval) {
 334                 err("%s: Cannot read SLOTCTRL register\n", __func__);
 335                 goto out;
 336         }
 337
 338         slot_ctrl &= ~mask;
 339         slot_ctrl |= (cmd & mask);
 340         /* Don't enable command completed if caller is changing it. */
 341         if (!(mask & CMD_CMPL_INTR_ENABLE))
 342                 slot_ctrl |= CMD_CMPL_INTR_ENABLE;
 343
 344         ctrl->cmd_busy = 1;
 345         smp_mb();
 346         retval = pciehp_writew(ctrl, SLOTCTRL, slot_ctrl);
 347         if (retval)
 348                 err("%s: Cannot write to SLOTCTRL register\n", __func__);
 349
 350         /*
 351          * Wait for command completion.
 352          */
 353         if (!retval && !ctrl->no_cmd_complete) {
 354                 int poll = 0;
 355                 /*
 356                  * if hotplug interrupt is not enabled or command
 357                  * completed interrupt is not enabled, we need to poll
 358                  * command completed event.
 359                  */
 360                 if (!(slot_ctrl & HP_INTR_ENABLE) ||
 361                     !(slot_ctrl & CMD_CMPL_INTR_ENABLE))
 362                         poll = 1;
 363                 pcie_wait_cmd(ctrl, poll);
 364         }
 365  out:
 366         mutex_unlock(&ctrl->ctrl_lock);
 367         return retval;
 368 }
 369
 370 static int hpc_check_lnk_status(struct controller *ctrl)
 371 {
 372         u16 lnk_status;
 373         int retval = 0;
 374
 375         retval = pciehp_readw(ctrl, LNKSTATUS, &lnk_status);
 376         if (retval) {
 377                 err("%s: Cannot read LNKSTATUS register\n", __func__);
 378                 return retval;
 379         }
 380
 381         dbg("%s: lnk_status = %x\n", __func__, lnk_status);
 382         if ( (lnk_status & LNK_TRN) || (lnk_status & LNK_TRN_ERR) ||
 383                 !(lnk_status & NEG_LINK_WD)) {
 384                 err("%s : Link Training Error occurs \n", __func__);
 385                 retval = -1;
 386                 return retval;
 387         }
 388
 389         return retval;
 390 }
 391
 392 static int hpc_get_attention_status(struct slot *slot, u8 *status)
 393 {
 394         struct controller *ctrl = slot->ctrl;
 395         u16 slot_ctrl;
 396         u8 atten_led_state;
 397         int retval = 0;
 398
 399         retval = pciehp_readw(ctrl, SLOTCTRL, &slot_ctrl);
 400         if (retval) {
 401                 err("%s: Cannot read SLOTCTRL register\n", __func__);
 402                 return retval;
 403         }
 404
 405         dbg("%s: SLOTCTRL %x, value read %x\n",
 406             __func__, ctrl->cap_base + SLOTCTRL, slot_ctrl);
 407
 408         atten_led_state = (slot_ctrl & ATTN_LED_CTRL) >> 6;
 409
 410         switch (atten_led_state) {
 411         case 0:
 412                 *status = 0xFF; /* Reserved */
 413                 break;
 414         case 1:
 415                 *status = 1;    /* On */
 416                 break;
 417         case 2:
 418                 *status = 2;    /* Blink */
 419                 break;
 420         case 3:
 421                 *status = 0;    /* Off */
 422                 break;
 423         default:
 424                 *status = 0xFF;
 425                 break;
 426         }
 427
 428         return 0;
 429 }
 430
 431 static int hpc_get_power_status(struct slot *slot, u8 *status)
 432 {
 433         struct controller *ctrl = slot->ctrl;
 434         u16 slot_ctrl;
 435         u8 pwr_state;
 436         int     retval = 0;
 437
 438         retval = pciehp_readw(ctrl, SLOTCTRL, &slot_ctrl);
 439         if (retval) {
 440                 err("%s: Cannot read SLOTCTRL register\n", __func__);
 441                 return retval;
 442         }
 443         dbg("%s: SLOTCTRL %x value read %x\n",
 444             __func__, ctrl->cap_base + SLOTCTRL, slot_ctrl);
 445
 446         pwr_state = (slot_ctrl & PWR_CTRL) >> 10;
 447
 448         switch (pwr_state) {
 449         case 0:
 450                 *status = 1;
 451                 break;
 452         case 1:
 453                 *status = 0;
 454                 break;
 455         default:
 456                 *status = 0xFF;
 457                 break;
 458         }
 459
 460         return retval;
 461 }
 462
 463 static int hpc_get_latch_status(struct slot *slot, u8 *status)
 464 {
 465         struct controller *ctrl = slot->ctrl;
 466         u16 slot_status;
 467         int retval = 0;
 468
 469         retval = pciehp_readw(ctrl, SLOTSTATUS, &slot_status);
 470         if (retval) {
 471                 err("%s: Cannot read SLOTSTATUS register\n", __func__);
 472                 return retval;
 473         }
 474
 475         *status = (((slot_status & MRL_STATE) >> 5) == 0) ? 0 : 1;
 476
 477         return 0;
 478 }
 479
 480 static int hpc_get_adapter_status(struct slot *slot, u8 *status)
 481 {
 482         struct controller *ctrl = slot->ctrl;
 483         u16 slot_status;
 484         u8 card_state;
 485         int retval = 0;
 486
 487         retval = pciehp_readw(ctrl, SLOTSTATUS, &slot_status);
 488         if (retval) {
 489                 err("%s: Cannot read SLOTSTATUS register\n", __func__);
 490                 return retval;
 491         }
 492         card_state = (u8)((slot_status & PRSN_STATE) >> 6);
 493         *status = (card_state == 1) ? 1 : 0;
 494
 495         return 0;
 496 }
 497
 498 static int hpc_query_power_fault(struct slot *slot)
 499 {
 500         struct controller *ctrl = slot->ctrl;
 501         u16 slot_status;
 502         u8 pwr_fault;
 503         int retval = 0;
 504
 505         retval = pciehp_readw(ctrl, SLOTSTATUS, &slot_status);
 506         if (retval) {
 507                 err("%s: Cannot check for power fault\n", __func__);
 508                 return retval;
 509         }
 510         pwr_fault = (u8)((slot_status & PWR_FAULT_DETECTED) >> 1);
 511
 512         return pwr_fault;
 513 }
 514
 515 static int hpc_get_emi_status(struct slot *slot, u8 *status)
 516 {
 517         struct controller *ctrl = slot->ctrl;
 518         u16 slot_status;
 519         int retval = 0;
 520
 521         retval = pciehp_readw(ctrl, SLOTSTATUS, &slot_status);
 522         if (retval) {
 523                 err("%s : Cannot check EMI status\n", __func__);
 524                 return retval;
 525         }
 526         *status = (slot_status & EMI_STATE) >> EMI_STATUS_BIT;
 527
 528         return retval;
 529 }
 530
 531 static int hpc_toggle_emi(struct slot *slot)
 532 {
 533         u16 slot_cmd;
 534         u16 cmd_mask;
 535         int rc;
 536
 537         slot_cmd = EMI_CTRL;
 538         cmd_mask = EMI_CTRL;
 539         rc = pcie_write_cmd(slot->ctrl, slot_cmd, cmd_mask);
 540         slot->last_emi_toggle = get_seconds();
 541
 542         return rc;
 543 }
 544
 545 static int hpc_set_attention_status(struct slot *slot, u8 value)
 546 {
 547         struct controller *ctrl = slot->ctrl;
 548         u16 slot_cmd;
 549         u16 cmd_mask;
 550         int rc;
 551
 552         cmd_mask = ATTN_LED_CTRL;
 553         switch (value) {
 554                 case 0 :        /* turn off */
 555                         slot_cmd = 0x00C0;
 556                         break;
 557                 case 1:         /* turn on */
 558                         slot_cmd = 0x0040;
 559                         break;
 560                 case 2:         /* turn blink */
 561                         slot_cmd = 0x0080;
 562                         break;
 563                 default:
 564                         return -1;
 565         }
 566         rc = pcie_write_cmd(ctrl, slot_cmd, cmd_mask);
 567         dbg("%s: SLOTCTRL %x write cmd %x\n",
 568             __func__, ctrl->cap_base + SLOTCTRL, slot_cmd);
 569
 570         return rc;
 571 }
 572
 573 static void hpc_set_green_led_on(struct slot *slot)
 574 {
 575         struct controller *ctrl = slot->ctrl;
 576         u16 slot_cmd;
 577         u16 cmd_mask;
 578
 579         slot_cmd = 0x0100;
 580         cmd_mask = PWR_LED_CTRL;
 581         pcie_write_cmd(ctrl, slot_cmd, cmd_mask);
 582         dbg("%s: SLOTCTRL %x write cmd %x\n",
 583             __func__, ctrl->cap_base + SLOTCTRL, slot_cmd);
 584 }
 585
 586 static void hpc_set_green_led_off(struct slot *slot)
 587 {
 588         struct controller *ctrl = slot->ctrl;
 589         u16 slot_cmd;
 590         u16 cmd_mask;
 591
 592         slot_cmd = 0x0300;
 593         cmd_mask = PWR_LED_CTRL;
 594         pcie_write_cmd(ctrl, slot_cmd, cmd_mask);
 595         dbg("%s: SLOTCTRL %x write cmd %x\n",
 596             __func__, ctrl->cap_base + SLOTCTRL, slot_cmd);
 597 }
 598
 599 static void hpc_set_green_led_blink(struct slot *slot)
 600 {
 601         struct controller *ctrl = slot->ctrl;
 602         u16 slot_cmd;
 603         u16 cmd_mask;
 604
 605         slot_cmd = 0x0200;
 606         cmd_mask = PWR_LED_CTRL;
 607         pcie_write_cmd(ctrl, slot_cmd, cmd_mask);
 608         dbg("%s: SLOTCTRL %x write cmd %x\n",
 609             __func__, ctrl->cap_base + SLOTCTRL, slot_cmd);
 610 }
 611
 612 static int hpc_power_on_slot(struct slot * slot)
 613 {
 614         struct controller *ctrl = slot->ctrl;
 615         u16 slot_cmd;
 616         u16 cmd_mask;
 617         u16 slot_status;
 618         int retval = 0;
 619
 620         dbg("%s: slot->hp_slot %x\n", __func__, slot->hp_slot);
 621
 622         /* Clear sticky power-fault bit from previous power failures */
 623         retval = pciehp_readw(ctrl, SLOTSTATUS, &slot_status);
 624         if (retval) {
 625                 err("%s: Cannot read SLOTSTATUS register\n", __func__);
 626                 return retval;
 627         }
 628         slot_status &= PWR_FAULT_DETECTED;
 629         if (slot_status) {
 630                 retval = pciehp_writew(ctrl, SLOTSTATUS, slot_status);
 631                 if (retval) {
 632                         err("%s: Cannot write to SLOTSTATUS register\n",
 633                             __func__);
 634                         return retval;
 635                 }
 636         }
 637
 638         slot_cmd = POWER_ON;
 639         cmd_mask = PWR_CTRL;
 640         /* Enable detection that we turned off at slot power-off time */
 641         if (!pciehp_poll_mode) {
 642                 slot_cmd |= (PWR_FAULT_DETECT_ENABLE | MRL_DETECT_ENABLE |
 643                              PRSN_DETECT_ENABLE);
 644                 cmd_mask |= (PWR_FAULT_DETECT_ENABLE | MRL_DETECT_ENABLE |
 645                              PRSN_DETECT_ENABLE);
 646         }
 647
 648         retval = pcie_write_cmd(ctrl, slot_cmd, cmd_mask);
 649
 650         if (retval) {
 651                 err("%s: Write %x command failed!\n", __func__, slot_cmd);
 652                 return -1;
 653         }
 654         dbg("%s: SLOTCTRL %x write cmd %x\n",
 655             __func__, ctrl->cap_base + SLOTCTRL, slot_cmd);
 656
 657         return retval;
 658 }
 659
 660 static inline int pcie_mask_bad_dllp(struct controller *ctrl)
 661 {
 662         struct pci_dev *dev = ctrl->pci_dev;
 663         int pos;
 664         u32 reg;
 665
 666         pos = pci_find_ext_capability(dev, PCI_EXT_CAP_ID_ERR);
 667         if (!pos)
 668                 return 0;
 669         pci_read_config_dword(dev, pos + PCI_ERR_COR_MASK, &reg);
 670         if (reg & PCI_ERR_COR_BAD_DLLP)
 671                 return 0;
 672         reg |= PCI_ERR_COR_BAD_DLLP;
 673         pci_write_config_dword(dev, pos + PCI_ERR_COR_MASK, reg);
 674         return 1;
 675 }
 676
 677 static inline void pcie_unmask_bad_dllp(struct controller *ctrl)
 678 {
 679         struct pci_dev *dev = ctrl->pci_dev;
 680         u32 reg;
 681         int pos;
 682
 683         pos = pci_find_ext_capability(dev, PCI_EXT_CAP_ID_ERR);
 684         if (!pos)
 685                 return;
 686         pci_read_config_dword(dev, pos + PCI_ERR_COR_MASK, &reg);
 687         if (!(reg & PCI_ERR_COR_BAD_DLLP))
 688                 return;
 689         reg &= ~PCI_ERR_COR_BAD_DLLP;
 690         pci_write_config_dword(dev, pos + PCI_ERR_COR_MASK, reg);
 691 }
 692
 693 static int hpc_power_off_slot(struct slot * slot)
 694 {
 695         struct controller *ctrl = slot->ctrl;
 696         u16 slot_cmd;
 697         u16 cmd_mask;
 698         int retval = 0;
 699         int changed;
 700
 701         dbg("%s: slot->hp_slot %x\n", __func__, slot->hp_slot);
 702
 703         /*
 704          * Set Bad DLLP Mask bit in Correctable Error Mask
 705          * Register. This is the workaround against Bad DLLP error
 706          * that sometimes happens during turning power off the slot
 707          * which conforms to PCI Express 1.0a spec.
 708          */
 709         changed = pcie_mask_bad_dllp(ctrl);
 710
 711         slot_cmd = POWER_OFF;
 712         cmd_mask = PWR_CTRL;
 713         /*
 714          * If we get MRL or presence detect interrupts now, the isr
 715          * will notice the sticky power-fault bit too and issue power
 716          * indicator change commands. This will lead to an endless loop
 717          * of command completions, since the power-fault bit remains on
 718          * till the slot is powered on again.
 719          */
 720         if (!pciehp_poll_mode) {
 721                 slot_cmd &= ~(PWR_FAULT_DETECT_ENABLE | MRL_DETECT_ENABLE |
 722                               PRSN_DETECT_ENABLE);
 723                 cmd_mask |= (PWR_FAULT_DETECT_ENABLE | MRL_DETECT_ENABLE |
 724                              PRSN_DETECT_ENABLE);
 725         }
 726
 727         retval = pcie_write_cmd(ctrl, slot_cmd, cmd_mask);
 728         if (retval) {
 729                 err("%s: Write command failed!\n", __func__);
 730                 retval = -1;
 731                 goto out;
 732         }
 733         dbg("%s: SLOTCTRL %x write cmd %x\n",
 734             __func__, ctrl->cap_base + SLOTCTRL, slot_cmd);
 735  out:
 736         if (changed)
 737                 pcie_unmask_bad_dllp(ctrl);
 738
 739         return retval;
 740 }
 741
 742 static irqreturn_t pcie_isr(int irq, void *dev_id)
 743 {
 744         struct controller *ctrl = (struct controller *)dev_id;
 745         u16 detected, intr_loc;
 746         struct slot *p_slot;
 747
 748         /*
 749          * In order to guarantee that all interrupt events are
 750          * serviced, we need to re-inspect Slot Status register after
 751          * clearing what is presumed to be the last pending interrupt.
 752          */
 753         intr_loc = 0;
 754         do {
 755                 if (pciehp_readw(ctrl, SLOTSTATUS, &detected)) {
 756                         err("%s: Cannot read SLOTSTATUS\n", __func__);
 757                         return IRQ_NONE;
 758                 }
 759
 760                 detected &= (ATTN_BUTTN_PRESSED | PWR_FAULT_DETECTED |
 761                              MRL_SENS_CHANGED | PRSN_DETECT_CHANGED |
 762                              CMD_COMPLETED);
 763                 intr_loc |= detected;
 764                 if (!intr_loc)
 765                         return IRQ_NONE;
 766                 if (detected && pciehp_writew(ctrl, SLOTSTATUS, detected)) {
 767                         err("%s: Cannot write to SLOTSTATUS\n", __func__);
 768                         return IRQ_NONE;
 769                 }
 770         } while (detected);
 771
 772         dbg("%s: intr_loc %x\n", __FUNCTION__, intr_loc);
 773
 774         /* Check Command Complete Interrupt Pending */
 775         if (intr_loc & CMD_COMPLETED) {
 776                 ctrl->cmd_busy = 0;
 777                 smp_mb();
 778                 wake_up(&ctrl->queue);
 779         }
 780
 781         if (!(intr_loc & ~CMD_COMPLETED))
 782                 return IRQ_HANDLED;
 783
 784         p_slot = pciehp_find_slot(ctrl, ctrl->slot_device_offset);
 785
 786         /* Check MRL Sensor Changed */
 787         if (intr_loc & MRL_SENS_CHANGED)
 788                 pciehp_handle_switch_change(p_slot);
 789
 790         /* Check Attention Button Pressed */
 791         if (intr_loc & ATTN_BUTTN_PRESSED)
 792                 pciehp_handle_attention_button(p_slot);
 793
 794         /* Check Presence Detect Changed */
 795         if (intr_loc & PRSN_DETECT_CHANGED)
 796                 pciehp_handle_presence_change(p_slot);
 797
 798         /* Check Power Fault Detected */
 799         if (intr_loc & PWR_FAULT_DETECTED)
 800                 pciehp_handle_power_fault(p_slot);
 801
 802         return IRQ_HANDLED;
 803 }
 804
 805 static int hpc_get_max_lnk_speed(struct slot *slot, enum pci_bus_speed *value)
 806 {
 807         struct controller *ctrl = slot->ctrl;
 808         enum pcie_link_speed lnk_speed;
 809         u32     lnk_cap;
 810         int retval = 0;
 811
 812         retval = pciehp_readl(ctrl, LNKCAP, &lnk_cap);
 813         if (retval) {
 814                 err("%s: Cannot read LNKCAP register\n", __func__);
 815                 return retval;
 816         }
 817
 818         switch (lnk_cap & 0x000F) {
 819         case 1:
 820                 lnk_speed = PCIE_2PT5GB;
 821                 break;
 822         default:
 823                 lnk_speed = PCIE_LNK_SPEED_UNKNOWN;
 824                 break;
 825         }
 826
 827         *value = lnk_speed;
 828         dbg("Max link speed = %d\n", lnk_speed);
 829
 830         return retval;
 831 }
 832
 833 static int hpc_get_max_lnk_width(struct slot *slot,
 834                                  enum pcie_link_width *value)
 835 {
 836         struct controller *ctrl = slot->ctrl;
 837         enum pcie_link_width lnk_wdth;
 838         u32     lnk_cap;
 839         int retval = 0;
 840
 841         retval = pciehp_readl(ctrl, LNKCAP, &lnk_cap);
 842         if (retval) {
 843                 err("%s: Cannot read LNKCAP register\n", __func__);
 844                 return retval;
 845         }
 846
 847         switch ((lnk_cap & 0x03F0) >> 4){
 848         case 0:
 849                 lnk_wdth = PCIE_LNK_WIDTH_RESRV;
 850                 break;
 851         case 1:
 852                 lnk_wdth = PCIE_LNK_X1;
 853                 break;
 854         case 2:
 855                 lnk_wdth = PCIE_LNK_X2;
 856                 break;
 857         case 4:
 858                 lnk_wdth = PCIE_LNK_X4;
 859                 break;
 860         case 8:
 861                 lnk_wdth = PCIE_LNK_X8;
 862                 break;
 863         case 12:
 864                 lnk_wdth = PCIE_LNK_X12;
 865                 break;
 866         case 16:
 867                 lnk_wdth = PCIE_LNK_X16;
 868                 break;
 869         case 32:
 870                 lnk_wdth = PCIE_LNK_X32;
 871                 break;
 872         default:
 873                 lnk_wdth = PCIE_LNK_WIDTH_UNKNOWN;
 874                 break;
 875         }
 876
 877         *value = lnk_wdth;
 878         dbg("Max link width = %d\n", lnk_wdth);
 879
 880         return retval;
 881 }
 882
 883 static int hpc_get_cur_lnk_speed(struct slot *slot, enum pci_bus_speed *value)
 884 {
 885         struct controller *ctrl = slot->ctrl;
 886         enum pcie_link_speed lnk_speed = PCI_SPEED_UNKNOWN;
 887         int retval = 0;
 888         u16 lnk_status;
 889
 890         retval = pciehp_readw(ctrl, LNKSTATUS, &lnk_status);
 891         if (retval) {
 892                 err("%s: Cannot read LNKSTATUS register\n", __func__);
 893                 return retval;
 894         }
 895
 896         switch (lnk_status & 0x0F) {
 897         case 1:
 898                 lnk_speed = PCIE_2PT5GB;
 899                 break;
 900         default:
 901                 lnk_speed = PCIE_LNK_SPEED_UNKNOWN;
 902                 break;
 903         }
 904
 905         *value = lnk_speed;
 906         dbg("Current link speed = %d\n", lnk_speed);
 907
 908         return retval;
 909 }
 910
 911 static int hpc_get_cur_lnk_width(struct slot *slot,
 912                                  enum pcie_link_width *value)
 913 {
 914         struct controller *ctrl = slot->ctrl;
 915         enum pcie_link_width lnk_wdth = PCIE_LNK_WIDTH_UNKNOWN;
 916         int retval = 0;
 917         u16 lnk_status;
 918
 919         retval = pciehp_readw(ctrl, LNKSTATUS, &lnk_status);
 920         if (retval) {
 921                 err("%s: Cannot read LNKSTATUS register\n", __func__);
 922                 return retval;
 923         }
 924
 925         switch ((lnk_status & 0x03F0) >> 4){
 926         case 0:
 927                 lnk_wdth = PCIE_LNK_WIDTH_RESRV;
 928                 break;
 929         case 1:
 930                 lnk_wdth = PCIE_LNK_X1;
 931                 break;
 932         case 2:
 933                 lnk_wdth = PCIE_LNK_X2;
 934                 break;
 935         case 4:
 936                 lnk_wdth = PCIE_LNK_X4;
 937                 break;
 938         case 8:
 939                 lnk_wdth = PCIE_LNK_X8;
 940                 break;
 941         case 12:
 942                 lnk_wdth = PCIE_LNK_X12;
 943                 break;
 944         case 16:
 945                 lnk_wdth = PCIE_LNK_X16;
 946                 break;
 947         case 32:
 948                 lnk_wdth = PCIE_LNK_X32;
 949                 break;
 950         default:
 951                 lnk_wdth = PCIE_LNK_WIDTH_UNKNOWN;
 952                 break;
 953         }
 954
 955         *value = lnk_wdth;
 956         dbg("Current link width = %d\n", lnk_wdth);
 957
 958         return retval;
 959 }
 960
 961 static void pcie_release_ctrl(struct controller *ctrl);
 962 static struct hpc_ops pciehp_hpc_ops = {
 963         .power_on_slot                  = hpc_power_on_slot,
 964         .power_off_slot                 = hpc_power_off_slot,
 965         .set_attention_status           = hpc_set_attention_status,
 966         .get_power_status               = hpc_get_power_status,
 967         .get_attention_status           = hpc_get_attention_status,
 968         .get_latch_status               = hpc_get_latch_status,
 969         .get_adapter_status             = hpc_get_adapter_status,
 970         .get_emi_status                 = hpc_get_emi_status,
 971         .toggle_emi                     = hpc_toggle_emi,
 972
 973         .get_max_bus_speed              = hpc_get_max_lnk_speed,
 974         .get_cur_bus_speed              = hpc_get_cur_lnk_speed,
 975         .get_max_lnk_width              = hpc_get_max_lnk_width,
 976         .get_cur_lnk_width              = hpc_get_cur_lnk_width,
 977
 978         .query_power_fault              = hpc_query_power_fault,
 979         .green_led_on                   = hpc_set_green_led_on,
 980         .green_led_off                  = hpc_set_green_led_off,
 981         .green_led_blink                = hpc_set_green_led_blink,
 982
 983         .release_ctlr                   = pcie_release_ctrl,
 984         .check_lnk_status               = hpc_check_lnk_status,
 985 };
 986
 987 int pcie_enable_notification(struct controller *ctrl)
 988 {
 989         u16 cmd, mask;
 990
 991         cmd = PRSN_DETECT_ENABLE;
 992         if (ATTN_BUTTN(ctrl))
 993                 cmd |= ATTN_BUTTN_ENABLE;
 994         if (POWER_CTRL(ctrl))
 995                 cmd |= PWR_FAULT_DETECT_ENABLE;
 996         if (MRL_SENS(ctrl))
 997                 cmd |= MRL_DETECT_ENABLE;
 998         if (!pciehp_poll_mode)
 999                 cmd |= HP_INTR_ENABLE;
1000
1001         mask = PRSN_DETECT_ENABLE | ATTN_BUTTN_ENABLE |
1002                 PWR_FAULT_DETECT_ENABLE | MRL_DETECT_ENABLE | HP_INTR_ENABLE;
1003
1004         if (pcie_write_cmd(ctrl, cmd, mask)) {
1005                 err("%s: Cannot enable software notification\n", __func__);
1006                 return -1;
1007         }
1008         return 0;
1009 }
1010
1011 static void pcie_disable_notification(struct controller *ctrl)
1012 {
1013         u16 mask;
1014         mask = PRSN_DETECT_ENABLE | ATTN_BUTTN_ENABLE | MRL_DETECT_ENABLE |
1015                PWR_FAULT_DETECT_ENABLE | HP_INTR_ENABLE | CMD_CMPL_INTR_ENABLE;
1016         if (pcie_write_cmd(ctrl, 0, mask))
1017                 warn("%s: Cannot disable software notification\n", __func__);
1018 }
1019
1020 static int pcie_init_notification(struct controller *ctrl)
1021 {
1022         if (pciehp_request_irq(ctrl))
1023                 return -1;
1024         if (pcie_enable_notification(ctrl)) {
1025                 pciehp_free_irq(ctrl);
1026                 return -1;
1027         }
1028         return 0;
1029 }
1030
1031 static void pcie_shutdown_notification(struct controller *ctrl)
1032 {
1033         pcie_disable_notification(ctrl);
1034         pciehp_free_irq(ctrl);
1035 }
1036
1037 static void make_slot_name(struct slot *slot)
1038 {
1039         if (pciehp_slot_with_bus)
1040                 snprintf(slot->name, SLOT_NAME_SIZE, "%04d_%04d",
1041                          slot->bus, slot->number);
1042         else
1043                 snprintf(slot->name, SLOT_NAME_SIZE, "%d", slot->number);
1044 }
1045
1046 static int pcie_init_slot(struct controller *ctrl)
1047 {
1048         struct slot *slot;
1049
1050         slot = kzalloc(sizeof(*slot), GFP_KERNEL);
1051         if (!slot)
1052                 return -ENOMEM;
1053
1054         slot->hp_slot = 0;
1055         slot->ctrl = ctrl;
1056         slot->bus = ctrl->pci_dev->subordinate->number;
1057         slot->device = ctrl->slot_device_offset + slot->hp_slot;
1058         slot->hpc_ops = ctrl->hpc_ops;
1059         slot->number = ctrl->first_slot;
1060         make_slot_name(slot);
1061         mutex_init(&slot->lock);
1062         INIT_DELAYED_WORK(&slot->work, pciehp_queue_pushbutton_work);
1063         list_add(&slot->slot_list, &ctrl->slot_list);
1064         return 0;
1065 }
1066
1067 static void pcie_cleanup_slot(struct controller *ctrl)
1068 {
1069         struct slot *slot;
1070         slot = list_first_entry(&ctrl->slot_list, struct slot, slot_list);
1071         list_del(&slot->slot_list);
1072         cancel_delayed_work(&slot->work);
1073         flush_scheduled_work();
1074         flush_workqueue(pciehp_wq);
1075         kfree(slot);
1076 }
1077
1078 static inline void dbg_ctrl(struct controller *ctrl)
1079 {
1080         int i;
1081         u16 reg16;
1082         struct pci_dev *pdev = ctrl->pci_dev;
1083
1084         if (!pciehp_debug)
1085                 return;
1086
1087         dbg("Hotplug Controller:\n");
1088         dbg("  Seg/Bus/Dev/Func/IRQ : %s IRQ %d\n", pci_name(pdev), pdev->irq);
1089         dbg("  Vendor ID            : 0x%04x\n", pdev->vendor);
1090         dbg("  Device ID            : 0x%04x\n", pdev->device);
1091         dbg("  Subsystem ID         : 0x%04x\n", pdev->subsystem_device);
1092         dbg("  Subsystem Vendor ID  : 0x%04x\n", pdev->subsystem_vendor);
1093         dbg("  PCIe Cap offset      : 0x%02x\n", ctrl->cap_base);
1094         for (i = 0; i < DEVICE_COUNT_RESOURCE; i++) {
1095                 if (!pci_resource_len(pdev, i))
1096                         continue;
1097                 dbg("  PCI resource [%d]     : 0x%llx@0x%llx\n", i,
1098                     (unsigned long long)pci_resource_len(pdev, i),
1099                     (unsigned long long)pci_resource_start(pdev, i));
1100         }
1101         dbg("Slot Capabilities      : 0x%08x\n", ctrl->slot_cap);
1102         dbg("  Physical Slot Number : %d\n", ctrl->first_slot);
1103         dbg("  Attention Button     : %3s\n", ATTN_BUTTN(ctrl) ? "yes" : "no");
1104         dbg("  Power Controller     : %3s\n", POWER_CTRL(ctrl) ? "yes" : "no");
1105         dbg("  MRL Sensor           : %3s\n", MRL_SENS(ctrl)   ? "yes" : "no");
1106         dbg("  Attention Indicator  : %3s\n", ATTN_LED(ctrl)   ? "yes" : "no");
1107         dbg("  Power Indicator      : %3s\n", PWR_LED(ctrl)    ? "yes" : "no");
1108         dbg("  Hot-Plug Surprise    : %3s\n", HP_SUPR_RM(ctrl) ? "yes" : "no");
1109         dbg("  EMI Present          : %3s\n", EMI(ctrl)        ? "yes" : "no");
1110         dbg("  Comamnd Completed    : %3s\n", NO_CMD_CMPL(ctrl)? "no" : "yes");
1111         pciehp_readw(ctrl, SLOTSTATUS, &reg16);
1112         dbg("Slot Status            : 0x%04x\n", reg16);
1113         pciehp_readw(ctrl, SLOTCTRL, &reg16);
1114         dbg("Slot Control           : 0x%04x\n", reg16);
1115 }
1116
1117 struct controller *pcie_init(struct pcie_device *dev)
1118 {
1119         struct controller *ctrl;
1120         u32 slot_cap;
1121         struct pci_dev *pdev = dev->port;
1122
1123         ctrl = kzalloc(sizeof(*ctrl), GFP_KERNEL);
1124         if (!ctrl) {
1125                 err("%s : out of memory\n", __func__);
1126                 goto abort;
1127         }
1128         INIT_LIST_HEAD(&ctrl->slot_list);
1129
1130         ctrl->pci_dev = pdev;
1131         ctrl->cap_base = pci_find_capability(pdev, PCI_CAP_ID_EXP);
1132         if (!ctrl->cap_base) {
1133                 err("%s: Cannot find PCI Express capability\n", __func__);
1134                 goto abort;
1135         }
1136         if (pciehp_readl(ctrl, SLOTCAP, &slot_cap)) {
1137                 err("%s: Cannot read SLOTCAP register\n", __func__);
1138                 goto abort;
1139         }
1140
1141         ctrl->slot_cap = slot_cap;
1142         ctrl->first_slot = slot_cap >> 19;
1143         ctrl->slot_device_offset = 0;
1144         ctrl->num_slots = 1;
1145         ctrl->hpc_ops = &pciehp_hpc_ops;
1146         mutex_init(&ctrl->crit_sect);
1147         mutex_init(&ctrl->ctrl_lock);
1148         init_waitqueue_head(&ctrl->queue);
1149         dbg_ctrl(ctrl);
1150         /*
1151          * Controller doesn't notify of command completion if the "No
1152          * Command Completed Support" bit is set in Slot Capability
1153          * register or the controller supports none of power
1154          * controller, attention led, power led and EMI.
1155          */
1156         if (NO_CMD_CMPL(ctrl) ||
1157             !(POWER_CTRL(ctrl) | ATTN_LED(ctrl) | PWR_LED(ctrl) | EMI(ctrl)))
1158             ctrl->no_cmd_complete = 1;
1159
1160         /* Clear all remaining event bits in Slot Status register */
1161         if (pciehp_writew(ctrl, SLOTSTATUS, 0x1f))
1162                 goto abort_ctrl;
1163
1164         /* Disable sotfware notification */
1165         pcie_disable_notification(ctrl);
1166
1167         /*
1168          * If this is the first controller to be initialized,
1169          * initialize the pciehp work queue
1170          */
1171         if (atomic_add_return(1, &pciehp_num_controllers) == 1) {
1172                 pciehp_wq = create_singlethread_workqueue("pciehpd");
1173                 if (!pciehp_wq)
1174                         goto abort_ctrl;
1175         }
1176
1177         info("HPC vendor_id %x device_id %x ss_vid %x ss_did %x\n",
1178              pdev->vendor, pdev->device,
1179              pdev->subsystem_vendor, pdev->subsystem_device);
1180
1181         if (pcie_init_slot(ctrl))
1182                 goto abort_ctrl;
1183
1184         if (pcie_init_notification(ctrl))
1185                 goto abort_slot;
1186
1187         return ctrl;
1188
1189 abort_slot:
1190         pcie_cleanup_slot(ctrl);
1191 abort_ctrl:
1192         kfree(ctrl);
1193 abort:
1194         return NULL;
1195 }
1196
1197 void pcie_release_ctrl(struct controller *ctrl)
1198 {
1199         pcie_shutdown_notification(ctrl);
1200         pcie_cleanup_slot(ctrl);
1201         /*
1202          * If this is the last controller to be released, destroy the
1203          * pciehp work queue
1204          */
1205         if (atomic_dec_and_test(&pciehp_num_controllers))
1206                 destroy_workqueue(pciehp_wq);
1207         kfree(ctrl);
1208 }