Linux Audio

Check our new training course

Linux debugging, profiling, tracing and performance analysis training

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