2 * Compaq Hot Plug Controller Driver
4 * Copyright (C) 1995,2001 Compaq Computer Corporation
5 * Copyright (C) 2001 Greg Kroah-Hartman <greg@kroah.com>
6 * Copyright (C) 2001 IBM Corp.
10 * This program is free software; you can redistribute it and/or modify
11 * it under the terms of the GNU General Public License as published by
12 * the Free Software Foundation; either version 2 of the License, or (at
13 * your option) any later version.
15 * This program is distributed in the hope that it will be useful, but
16 * WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE, GOOD TITLE or
18 * NON INFRINGEMENT. See the GNU General Public License for more
21 * You should have received a copy of the GNU General Public License
22 * along with this program; if not, write to the Free Software
23 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
25 * Send feedback to <greg@kroah.com>
27 * Jan 12, 2003 - Added 66/100/133MHz PCI-X support,
28 * Torben Mathiasen <torben.mathiasen@hp.com>
32 #include <linux/module.h>
33 #include <linux/moduleparam.h>
34 #include <linux/kernel.h>
35 #include <linux/types.h>
36 #include <linux/proc_fs.h>
37 #include <linux/slab.h>
38 #include <linux/workqueue.h>
39 #include <linux/pci.h>
40 #include <linux/pci_hotplug.h>
41 #include <linux/init.h>
42 #include <linux/interrupt.h>
44 #include <asm/uaccess.h>
47 #include "cpqphp_nvram.h"
48 #include "../../../arch/x86/pci/pci.h" /* horrible hack showing how processor dependent we are... */
51 /* Global variables */
53 int cpqhp_legacy_mode
;
54 struct controller
*cpqhp_ctrl_list
; /* = NULL */
55 struct pci_func
*cpqhp_slot_list
[256];
58 static void __iomem
*smbios_table
;
59 static void __iomem
*smbios_start
;
60 static void __iomem
*cpqhp_rom_start
;
61 static int power_mode
;
63 static int initialized
;
65 #define DRIVER_VERSION "0.9.8"
66 #define DRIVER_AUTHOR "Dan Zink <dan.zink@compaq.com>, Greg Kroah-Hartman <greg@kroah.com>"
67 #define DRIVER_DESC "Compaq Hot Plug PCI Controller Driver"
69 MODULE_AUTHOR(DRIVER_AUTHOR
);
70 MODULE_DESCRIPTION(DRIVER_DESC
);
71 MODULE_LICENSE("GPL");
73 module_param(power_mode
, bool, 0644);
74 MODULE_PARM_DESC(power_mode
, "Power mode enabled or not");
76 module_param(debug
, bool, 0644);
77 MODULE_PARM_DESC(debug
, "Debugging mode enabled or not");
79 #define CPQHPC_MODULE_MINOR 208
81 static int one_time_init (void);
82 static int set_attention_status (struct hotplug_slot
*slot
, u8 value
);
83 static int process_SI (struct hotplug_slot
*slot
);
84 static int process_SS (struct hotplug_slot
*slot
);
85 static int hardware_test (struct hotplug_slot
*slot
, u32 value
);
86 static int get_power_status (struct hotplug_slot
*slot
, u8
*value
);
87 static int get_attention_status (struct hotplug_slot
*slot
, u8
*value
);
88 static int get_latch_status (struct hotplug_slot
*slot
, u8
*value
);
89 static int get_adapter_status (struct hotplug_slot
*slot
, u8
*value
);
90 static int get_max_bus_speed (struct hotplug_slot
*slot
, enum pci_bus_speed
*value
);
91 static int get_cur_bus_speed (struct hotplug_slot
*slot
, enum pci_bus_speed
*value
);
93 static struct hotplug_slot_ops cpqphp_hotplug_slot_ops
= {
95 .set_attention_status
= set_attention_status
,
96 .enable_slot
= process_SI
,
97 .disable_slot
= process_SS
,
98 .hardware_test
= hardware_test
,
99 .get_power_status
= get_power_status
,
100 .get_attention_status
= get_attention_status
,
101 .get_latch_status
= get_latch_status
,
102 .get_adapter_status
= get_adapter_status
,
103 .get_max_bus_speed
= get_max_bus_speed
,
104 .get_cur_bus_speed
= get_cur_bus_speed
,
108 static inline int is_slot64bit(struct slot
*slot
)
110 return (readb(slot
->p_sm_slot
+ SMBIOS_SLOT_WIDTH
) == 0x06) ? 1 : 0;
113 static inline int is_slot66mhz(struct slot
*slot
)
115 return (readb(slot
->p_sm_slot
+ SMBIOS_SLOT_TYPE
) == 0x0E) ? 1 : 0;
119 * detect_SMBIOS_pointer - find the System Management BIOS Table in mem region.
120 * @begin: begin pointer for region to be scanned.
121 * @end: end pointer for region to be scanned.
123 * Returns pointer to the head of the SMBIOS tables (or %NULL).
125 static void __iomem
* detect_SMBIOS_pointer(void __iomem
*begin
, void __iomem
*end
)
129 u8 temp1
, temp2
, temp3
, temp4
;
132 endp
= (end
- sizeof(u32
) + 1);
134 for (fp
= begin
; fp
<= endp
; fp
+= 16) {
151 dbg("Discovered SMBIOS Entry point at %p\n", fp
);
157 * init_SERR - Initializes the per slot SERR generation.
158 * @ctrl: controller to use
160 * For unexpected switch opens
162 static int init_SERR(struct controller
* ctrl
)
171 tempdword
= ctrl
->first_slot
;
173 number_of_slots
= readb(ctrl
->hpc_reg
+ SLOT_MASK
) & 0x0F;
174 // Loop through slots
175 while (number_of_slots
) {
176 physical_slot
= tempdword
;
177 writeb(0, ctrl
->hpc_reg
+ SLOT_SERR
);
186 /* nice debugging output */
187 static int pci_print_IRQ_route (void)
189 struct irq_routing_table
*routing_table
;
193 u8 tbus
, tdevice
, tslot
;
195 routing_table
= pcibios_get_irq_routing_table();
196 if (routing_table
== NULL
) {
197 err("No BIOS Routing Table??? Not good\n");
201 len
= (routing_table
->size
- sizeof(struct irq_routing_table
)) /
202 sizeof(struct irq_info
);
203 // Make sure I got at least one entry
205 kfree(routing_table
);
209 dbg("bus dev func slot\n");
211 for (loop
= 0; loop
< len
; ++loop
) {
212 tbus
= routing_table
->slots
[loop
].bus
;
213 tdevice
= routing_table
->slots
[loop
].devfn
;
214 tslot
= routing_table
->slots
[loop
].slot
;
215 dbg("%d %d %d %d\n", tbus
, tdevice
>> 3, tdevice
& 0x7, tslot
);
218 kfree(routing_table
);
224 * get_subsequent_smbios_entry: get the next entry from bios table.
225 * @smbios_start: where to start in the SMBIOS table
226 * @smbios_table: location of the SMBIOS table
227 * @curr: %NULL or pointer to previously returned structure
229 * Gets the first entry if previous == NULL;
230 * otherwise, returns the next entry.
231 * Uses global SMBIOS Table pointer.
233 * Returns a pointer to an SMBIOS structure or NULL if none found.
235 static void __iomem
*get_subsequent_smbios_entry(void __iomem
*smbios_start
,
236 void __iomem
*smbios_table
,
240 u8 previous_byte
= 1;
241 void __iomem
*p_temp
;
244 if (!smbios_table
|| !curr
)
247 // set p_max to the end of the table
248 p_max
= smbios_start
+ readw(smbios_table
+ ST_LENGTH
);
251 p_temp
+= readb(curr
+ SMBIOS_GENERIC_LENGTH
);
253 while ((p_temp
< p_max
) && !bail
) {
254 /* Look for the double NULL terminator
255 * The first condition is the previous byte
256 * and the second is the curr */
257 if (!previous_byte
&& !(readb(p_temp
))) {
261 previous_byte
= readb(p_temp
);
265 if (p_temp
< p_max
) {
274 * get_SMBIOS_entry - return the requested SMBIOS entry or %NULL
275 * @smbios_start: where to start in the SMBIOS table
276 * @smbios_table: location of the SMBIOS table
277 * @type: SMBIOS structure type to be returned
278 * @previous: %NULL or pointer to previously returned structure
280 * Gets the first entry of the specified type if previous == %NULL;
281 * Otherwise, returns the next entry of the given type.
282 * Uses global SMBIOS Table pointer.
283 * Uses get_subsequent_smbios_entry.
285 * Returns a pointer to an SMBIOS structure or %NULL if none found.
287 static void __iomem
*get_SMBIOS_entry(void __iomem
*smbios_start
,
288 void __iomem
*smbios_table
,
290 void __iomem
*previous
)
296 previous
= smbios_start
;
298 previous
= get_subsequent_smbios_entry(smbios_start
,
299 smbios_table
, previous
);
303 if (readb(previous
+ SMBIOS_GENERIC_TYPE
) != type
) {
304 previous
= get_subsequent_smbios_entry(smbios_start
,
305 smbios_table
, previous
);
314 static void release_slot(struct hotplug_slot
*hotplug_slot
)
316 struct slot
*slot
= hotplug_slot
->private;
318 dbg("%s - physical_slot = %s\n", __FUNCTION__
, hotplug_slot
->name
);
320 kfree(slot
->hotplug_slot
->info
);
321 kfree(slot
->hotplug_slot
->name
);
322 kfree(slot
->hotplug_slot
);
326 static int ctrl_slot_setup(struct controller
*ctrl
,
327 void __iomem
*smbios_start
,
328 void __iomem
*smbios_table
)
331 struct hotplug_slot
*hotplug_slot
;
332 struct hotplug_slot_info
*hotplug_slot_info
;
338 void __iomem
*slot_entry
= NULL
;
339 int result
= -ENOMEM
;
341 dbg("%s\n", __FUNCTION__
);
343 tempdword
= readl(ctrl
->hpc_reg
+ INT_INPUT_CLEAR
);
345 number_of_slots
= readb(ctrl
->hpc_reg
+ SLOT_MASK
) & 0x0F;
346 slot_device
= readb(ctrl
->hpc_reg
+ SLOT_MASK
) >> 4;
347 slot_number
= ctrl
->first_slot
;
349 while (number_of_slots
) {
350 slot
= kzalloc(sizeof(*slot
), GFP_KERNEL
);
354 slot
->hotplug_slot
= kzalloc(sizeof(*(slot
->hotplug_slot
)),
356 if (!slot
->hotplug_slot
)
358 hotplug_slot
= slot
->hotplug_slot
;
361 kzalloc(sizeof(*(hotplug_slot
->info
)),
363 if (!hotplug_slot
->info
)
365 hotplug_slot_info
= hotplug_slot
->info
;
366 hotplug_slot
->name
= kmalloc(SLOT_NAME_SIZE
, GFP_KERNEL
);
368 if (!hotplug_slot
->name
)
372 slot
->bus
= ctrl
->bus
;
373 slot
->device
= slot_device
;
374 slot
->number
= slot_number
;
375 dbg("slot->number = %d\n", slot
->number
);
377 slot_entry
= get_SMBIOS_entry(smbios_start
, smbios_table
, 9,
380 while (slot_entry
&& (readw(slot_entry
+ SMBIOS_SLOT_NUMBER
) !=
382 slot_entry
= get_SMBIOS_entry(smbios_start
,
383 smbios_table
, 9, slot_entry
);
386 slot
->p_sm_slot
= slot_entry
;
388 init_timer(&slot
->task_event
);
389 slot
->task_event
.expires
= jiffies
+ 5 * HZ
;
390 slot
->task_event
.function
= cpqhp_pushbutton_thread
;
392 //FIXME: these capabilities aren't used but if they are
393 // they need to be correctly implemented
394 slot
->capabilities
|= PCISLOT_REPLACE_SUPPORTED
;
395 slot
->capabilities
|= PCISLOT_INTERLOCK_SUPPORTED
;
397 if (is_slot64bit(slot
))
398 slot
->capabilities
|= PCISLOT_64_BIT_SUPPORTED
;
399 if (is_slot66mhz(slot
))
400 slot
->capabilities
|= PCISLOT_66_MHZ_SUPPORTED
;
401 if (ctrl
->speed
== PCI_SPEED_66MHz
)
402 slot
->capabilities
|= PCISLOT_66_MHZ_OPERATION
;
405 slot_device
- (readb(ctrl
->hpc_reg
+ SLOT_MASK
) >> 4);
408 slot
->capabilities
|=
409 ((((~tempdword
) >> 23) |
410 ((~tempdword
) >> 15)) >> ctrl_slot
) & 0x02;
411 // Check the switch state
412 slot
->capabilities
|=
413 ((~tempdword
& 0xFF) >> ctrl_slot
) & 0x01;
414 // Check the slot enable
415 slot
->capabilities
|=
416 ((read_slot_enable(ctrl
) << 2) >> ctrl_slot
) & 0x04;
418 /* register this slot with the hotplug pci core */
419 hotplug_slot
->release
= &release_slot
;
420 hotplug_slot
->private = slot
;
421 make_slot_name(hotplug_slot
->name
, SLOT_NAME_SIZE
, slot
);
422 hotplug_slot
->ops
= &cpqphp_hotplug_slot_ops
;
424 hotplug_slot_info
->power_status
= get_slot_enabled(ctrl
, slot
);
425 hotplug_slot_info
->attention_status
=
426 cpq_get_attention_status(ctrl
, slot
);
427 hotplug_slot_info
->latch_status
=
428 cpq_get_latch_status(ctrl
, slot
);
429 hotplug_slot_info
->adapter_status
=
430 get_presence_status(ctrl
, slot
);
432 dbg("registering bus %d, dev %d, number %d, "
433 "ctrl->slot_device_offset %d, slot %d\n",
434 slot
->bus
, slot
->device
,
435 slot
->number
, ctrl
->slot_device_offset
,
437 result
= pci_hp_register(hotplug_slot
);
439 err("pci_hp_register failed with error %d\n", result
);
443 slot
->next
= ctrl
->slot
;
453 kfree(hotplug_slot
->name
);
455 kfree(hotplug_slot_info
);
464 static int ctrl_slot_cleanup (struct controller
* ctrl
)
466 struct slot
*old_slot
, *next_slot
;
468 old_slot
= ctrl
->slot
;
472 /* memory will be freed by the release_slot callback */
473 next_slot
= old_slot
->next
;
474 pci_hp_deregister (old_slot
->hotplug_slot
);
475 old_slot
= next_slot
;
478 cpqhp_remove_debugfs_files(ctrl
);
480 //Free IRQ associated with hot plug device
481 free_irq(ctrl
->interrupt
, ctrl
);
483 iounmap(ctrl
->hpc_reg
);
484 //Finally reclaim PCI mem
485 release_mem_region(pci_resource_start(ctrl
->pci_dev
, 0),
486 pci_resource_len(ctrl
->pci_dev
, 0));
492 //============================================================================
493 // function: get_slot_mapping
495 // Description: Attempts to determine a logical slot mapping for a PCI
496 // device. Won't work for more than one PCI-PCI bridge
499 // Input: u8 bus_num - bus number of PCI device
500 // u8 dev_num - device number of PCI device
501 // u8 *slot - Pointer to u8 where slot number will
504 // Output: SUCCESS or FAILURE
505 //=============================================================================
507 get_slot_mapping(struct pci_bus
*bus
, u8 bus_num
, u8 dev_num
, u8
*slot
)
509 struct irq_routing_table
*PCIIRQRoutingInfoLength
;
514 u8 tbus
, tdevice
, tslot
, bridgeSlot
;
516 dbg("%s: %p, %d, %d, %p\n", __FUNCTION__
, bus
, bus_num
, dev_num
, slot
);
520 PCIIRQRoutingInfoLength
= pcibios_get_irq_routing_table();
521 if (!PCIIRQRoutingInfoLength
)
524 len
= (PCIIRQRoutingInfoLength
->size
-
525 sizeof(struct irq_routing_table
)) / sizeof(struct irq_info
);
526 // Make sure I got at least one entry
528 kfree(PCIIRQRoutingInfoLength
);
532 for (loop
= 0; loop
< len
; ++loop
) {
533 tbus
= PCIIRQRoutingInfoLength
->slots
[loop
].bus
;
534 tdevice
= PCIIRQRoutingInfoLength
->slots
[loop
].devfn
>> 3;
535 tslot
= PCIIRQRoutingInfoLength
->slots
[loop
].slot
;
537 if ((tbus
== bus_num
) && (tdevice
== dev_num
)) {
539 kfree(PCIIRQRoutingInfoLength
);
542 /* Did not get a match on the target PCI device. Check
543 * if the current IRQ table entry is a PCI-to-PCI bridge
544 * device. If so, and it's secondary bus matches the
545 * bus number for the target device, I need to save the
546 * bridge's slot number. If I can not find an entry for
547 * the target device, I will have to assume it's on the
548 * other side of the bridge, and assign it the bridge's
551 pci_bus_read_config_dword(bus
, PCI_DEVFN(tdevice
, 0),
552 PCI_CLASS_REVISION
, &work
);
554 if ((work
>> 8) == PCI_TO_PCI_BRIDGE_CLASS
) {
555 pci_bus_read_config_dword(bus
,
556 PCI_DEVFN(tdevice
, 0),
557 PCI_PRIMARY_BUS
, &work
);
558 // See if bridge's secondary bus matches target bus.
559 if (((work
>> 8) & 0x000000FF) == (long) bus_num
) {
567 // If we got here, we didn't find an entry in the IRQ mapping table
568 // for the target PCI device. If we did determine that the target
569 // device is on the other side of a PCI-to-PCI bridge, return the
570 // slot number for the bridge.
571 if (bridgeSlot
!= 0xFF) {
573 kfree(PCIIRQRoutingInfoLength
);
576 kfree(PCIIRQRoutingInfoLength
);
577 // Couldn't find an entry in the routing table for this PCI device
583 * cpqhp_set_attention_status - Turns the Amber LED for a slot on or off
584 * @ctrl: struct controller to use
585 * @func: PCI device/function info
586 * @status: LED control flag: 1 = LED on, 0 = LED off
589 cpqhp_set_attention_status(struct controller
*ctrl
, struct pci_func
*func
,
597 hp_slot
= func
->device
- ctrl
->slot_device_offset
;
599 // Wait for exclusive access to hardware
600 mutex_lock(&ctrl
->crit_sect
);
603 amber_LED_on (ctrl
, hp_slot
);
604 } else if (status
== 0) {
605 amber_LED_off (ctrl
, hp_slot
);
607 // Done with exclusive hardware access
608 mutex_unlock(&ctrl
->crit_sect
);
614 // Wait for SOBS to be unset
615 wait_for_ctrl_irq (ctrl
);
617 // Done with exclusive hardware access
618 mutex_unlock(&ctrl
->crit_sect
);
625 * set_attention_status - Turns the Amber LED for a slot on or off
626 * @hotplug_slot: slot to change LED on
627 * @status: LED control flag
629 static int set_attention_status (struct hotplug_slot
*hotplug_slot
, u8 status
)
631 struct pci_func
*slot_func
;
632 struct slot
*slot
= hotplug_slot
->private;
633 struct controller
*ctrl
= slot
->ctrl
;
639 dbg("%s - physical_slot = %s\n", __FUNCTION__
, hotplug_slot
->name
);
641 if (cpqhp_get_bus_dev(ctrl
, &bus
, &devfn
, slot
->number
) == -1)
645 function
= devfn
& 0x7;
646 dbg("bus, dev, fn = %d, %d, %d\n", bus
, device
, function
);
648 slot_func
= cpqhp_slot_find(bus
, device
, function
);
652 return cpqhp_set_attention_status(ctrl
, slot_func
, status
);
656 static int process_SI(struct hotplug_slot
*hotplug_slot
)
658 struct pci_func
*slot_func
;
659 struct slot
*slot
= hotplug_slot
->private;
660 struct controller
*ctrl
= slot
->ctrl
;
666 dbg("%s - physical_slot = %s\n", __FUNCTION__
, hotplug_slot
->name
);
668 if (cpqhp_get_bus_dev(ctrl
, &bus
, &devfn
, slot
->number
) == -1)
672 function
= devfn
& 0x7;
673 dbg("bus, dev, fn = %d, %d, %d\n", bus
, device
, function
);
675 slot_func
= cpqhp_slot_find(bus
, device
, function
);
679 slot_func
->bus
= bus
;
680 slot_func
->device
= device
;
681 slot_func
->function
= function
;
682 slot_func
->configured
= 0;
683 dbg("board_added(%p, %p)\n", slot_func
, ctrl
);
684 return cpqhp_process_SI(ctrl
, slot_func
);
688 static int process_SS(struct hotplug_slot
*hotplug_slot
)
690 struct pci_func
*slot_func
;
691 struct slot
*slot
= hotplug_slot
->private;
692 struct controller
*ctrl
= slot
->ctrl
;
698 dbg("%s - physical_slot = %s\n", __FUNCTION__
, hotplug_slot
->name
);
700 if (cpqhp_get_bus_dev(ctrl
, &bus
, &devfn
, slot
->number
) == -1)
704 function
= devfn
& 0x7;
705 dbg("bus, dev, fn = %d, %d, %d\n", bus
, device
, function
);
707 slot_func
= cpqhp_slot_find(bus
, device
, function
);
711 dbg("In %s, slot_func = %p, ctrl = %p\n", __FUNCTION__
, slot_func
, ctrl
);
712 return cpqhp_process_SS(ctrl
, slot_func
);
716 static int hardware_test(struct hotplug_slot
*hotplug_slot
, u32 value
)
718 struct slot
*slot
= hotplug_slot
->private;
719 struct controller
*ctrl
= slot
->ctrl
;
721 dbg("%s - physical_slot = %s\n", __FUNCTION__
, hotplug_slot
->name
);
723 return cpqhp_hardware_test(ctrl
, value
);
727 static int get_power_status(struct hotplug_slot
*hotplug_slot
, u8
*value
)
729 struct slot
*slot
= hotplug_slot
->private;
730 struct controller
*ctrl
= slot
->ctrl
;
732 dbg("%s - physical_slot = %s\n", __FUNCTION__
, hotplug_slot
->name
);
734 *value
= get_slot_enabled(ctrl
, slot
);
738 static int get_attention_status(struct hotplug_slot
*hotplug_slot
, u8
*value
)
740 struct slot
*slot
= hotplug_slot
->private;
741 struct controller
*ctrl
= slot
->ctrl
;
743 dbg("%s - physical_slot = %s\n", __FUNCTION__
, hotplug_slot
->name
);
745 *value
= cpq_get_attention_status(ctrl
, slot
);
749 static int get_latch_status(struct hotplug_slot
*hotplug_slot
, u8
*value
)
751 struct slot
*slot
= hotplug_slot
->private;
752 struct controller
*ctrl
= slot
->ctrl
;
754 dbg("%s - physical_slot = %s\n", __FUNCTION__
, hotplug_slot
->name
);
756 *value
= cpq_get_latch_status(ctrl
, slot
);
761 static int get_adapter_status(struct hotplug_slot
*hotplug_slot
, u8
*value
)
763 struct slot
*slot
= hotplug_slot
->private;
764 struct controller
*ctrl
= slot
->ctrl
;
766 dbg("%s - physical_slot = %s\n", __FUNCTION__
, hotplug_slot
->name
);
768 *value
= get_presence_status(ctrl
, slot
);
773 static int get_max_bus_speed (struct hotplug_slot
*hotplug_slot
, enum pci_bus_speed
*value
)
775 struct slot
*slot
= hotplug_slot
->private;
776 struct controller
*ctrl
= slot
->ctrl
;
778 dbg("%s - physical_slot = %s\n", __FUNCTION__
, hotplug_slot
->name
);
780 *value
= ctrl
->speed_capability
;
785 static int get_cur_bus_speed (struct hotplug_slot
*hotplug_slot
, enum pci_bus_speed
*value
)
787 struct slot
*slot
= hotplug_slot
->private;
788 struct controller
*ctrl
= slot
->ctrl
;
790 dbg("%s - physical_slot = %s\n", __FUNCTION__
, hotplug_slot
->name
);
792 *value
= ctrl
->speed
;
797 static int cpqhpc_probe(struct pci_dev
*pdev
, const struct pci_device_id
*ent
)
806 u16 subsystem_deviceid
;
808 struct controller
*ctrl
;
809 struct pci_func
*func
;
812 err
= pci_enable_device(pdev
);
814 printk(KERN_ERR MY_NAME
": cannot enable PCI device %s (%d)\n",
815 pci_name(pdev
), err
);
819 // Need to read VID early b/c it's used to differentiate CPQ and INTC discovery
820 rc
= pci_read_config_word(pdev
, PCI_VENDOR_ID
, &vendor_id
);
821 if (rc
|| ((vendor_id
!= PCI_VENDOR_ID_COMPAQ
) && (vendor_id
!= PCI_VENDOR_ID_INTEL
))) {
822 err(msg_HPC_non_compaq_or_intel
);
824 goto err_disable_device
;
826 dbg("Vendor ID: %x\n", vendor_id
);
828 dbg("revision: %d\n", pdev
->revision
);
829 if ((vendor_id
== PCI_VENDOR_ID_COMPAQ
) && (!pdev
->revision
)) {
830 err(msg_HPC_rev_error
);
832 goto err_disable_device
;
835 /* Check for the proper subsytem ID's
836 * Intel uses a different SSID programming model than Compaq.
837 * For Intel, each SSID bit identifies a PHP capability.
838 * Also Intel HPC's may have RID=0.
840 if ((pdev
->revision
> 2) || (vendor_id
== PCI_VENDOR_ID_INTEL
)) {
841 // TODO: This code can be made to support non-Compaq or Intel subsystem IDs
842 rc
= pci_read_config_word(pdev
, PCI_SUBSYSTEM_VENDOR_ID
, &subsystem_vid
);
844 err("%s : pci_read_config_word failed\n", __FUNCTION__
);
845 goto err_disable_device
;
847 dbg("Subsystem Vendor ID: %x\n", subsystem_vid
);
848 if ((subsystem_vid
!= PCI_VENDOR_ID_COMPAQ
) && (subsystem_vid
!= PCI_VENDOR_ID_INTEL
)) {
849 err(msg_HPC_non_compaq_or_intel
);
851 goto err_disable_device
;
854 ctrl
= kzalloc(sizeof(struct controller
), GFP_KERNEL
);
856 err("%s : out of memory\n", __FUNCTION__
);
858 goto err_disable_device
;
861 rc
= pci_read_config_word(pdev
, PCI_SUBSYSTEM_ID
, &subsystem_deviceid
);
863 err("%s : pci_read_config_word failed\n", __FUNCTION__
);
867 info("Hot Plug Subsystem Device ID: %x\n", subsystem_deviceid
);
869 /* Set Vendor ID, so it can be accessed later from other functions */
870 ctrl
->vendor_id
= vendor_id
;
872 switch (subsystem_vid
) {
873 case PCI_VENDOR_ID_COMPAQ
:
874 if (pdev
->revision
>= 0x13) { /* CIOBX */
876 ctrl
->slot_switch_type
= 1;
877 ctrl
->push_button
= 1;
878 ctrl
->pci_config_space
= 1;
879 ctrl
->defeature_PHP
= 1;
880 ctrl
->pcix_support
= 1;
881 ctrl
->pcix_speed_capability
= 1;
882 pci_read_config_byte(pdev
, 0x41, &bus_cap
);
883 if (bus_cap
& 0x80) {
884 dbg("bus max supports 133MHz PCI-X\n");
885 ctrl
->speed_capability
= PCI_SPEED_133MHz_PCIX
;
888 if (bus_cap
& 0x40) {
889 dbg("bus max supports 100MHz PCI-X\n");
890 ctrl
->speed_capability
= PCI_SPEED_100MHz_PCIX
;
894 dbg("bus max supports 66MHz PCI-X\n");
895 ctrl
->speed_capability
= PCI_SPEED_66MHz_PCIX
;
899 dbg("bus max supports 66MHz PCI\n");
900 ctrl
->speed_capability
= PCI_SPEED_66MHz
;
907 switch (subsystem_deviceid
) {
909 /* Original 6500/7000 implementation */
910 ctrl
->slot_switch_type
= 1;
911 ctrl
->speed_capability
= PCI_SPEED_33MHz
;
912 ctrl
->push_button
= 0;
913 ctrl
->pci_config_space
= 1;
914 ctrl
->defeature_PHP
= 1;
915 ctrl
->pcix_support
= 0;
916 ctrl
->pcix_speed_capability
= 0;
918 case PCI_SUB_HPC_ID2
:
919 /* First Pushbutton implementation */
921 ctrl
->slot_switch_type
= 1;
922 ctrl
->speed_capability
= PCI_SPEED_33MHz
;
923 ctrl
->push_button
= 1;
924 ctrl
->pci_config_space
= 1;
925 ctrl
->defeature_PHP
= 1;
926 ctrl
->pcix_support
= 0;
927 ctrl
->pcix_speed_capability
= 0;
929 case PCI_SUB_HPC_ID_INTC
:
930 /* Third party (6500/7000) */
931 ctrl
->slot_switch_type
= 1;
932 ctrl
->speed_capability
= PCI_SPEED_33MHz
;
933 ctrl
->push_button
= 0;
934 ctrl
->pci_config_space
= 1;
935 ctrl
->defeature_PHP
= 1;
936 ctrl
->pcix_support
= 0;
937 ctrl
->pcix_speed_capability
= 0;
939 case PCI_SUB_HPC_ID3
:
940 /* First 66 Mhz implementation */
942 ctrl
->slot_switch_type
= 1;
943 ctrl
->speed_capability
= PCI_SPEED_66MHz
;
944 ctrl
->push_button
= 1;
945 ctrl
->pci_config_space
= 1;
946 ctrl
->defeature_PHP
= 1;
947 ctrl
->pcix_support
= 0;
948 ctrl
->pcix_speed_capability
= 0;
950 case PCI_SUB_HPC_ID4
:
951 /* First PCI-X implementation, 100MHz */
953 ctrl
->slot_switch_type
= 1;
954 ctrl
->speed_capability
= PCI_SPEED_100MHz_PCIX
;
955 ctrl
->push_button
= 1;
956 ctrl
->pci_config_space
= 1;
957 ctrl
->defeature_PHP
= 1;
958 ctrl
->pcix_support
= 1;
959 ctrl
->pcix_speed_capability
= 0;
962 err(msg_HPC_not_supported
);
968 case PCI_VENDOR_ID_INTEL
:
969 /* Check for speed capability (0=33, 1=66) */
970 if (subsystem_deviceid
& 0x0001) {
971 ctrl
->speed_capability
= PCI_SPEED_66MHz
;
973 ctrl
->speed_capability
= PCI_SPEED_33MHz
;
976 /* Check for push button */
977 if (subsystem_deviceid
& 0x0002) {
979 ctrl
->push_button
= 0;
981 /* push button supported */
982 ctrl
->push_button
= 1;
985 /* Check for slot switch type (0=mechanical, 1=not mechanical) */
986 if (subsystem_deviceid
& 0x0004) {
988 ctrl
->slot_switch_type
= 0;
991 ctrl
->slot_switch_type
= 1;
994 /* PHP Status (0=De-feature PHP, 1=Normal operation) */
995 if (subsystem_deviceid
& 0x0008) {
996 ctrl
->defeature_PHP
= 1; // PHP supported
998 ctrl
->defeature_PHP
= 0; // PHP not supported
1001 /* Alternate Base Address Register Interface (0=not supported, 1=supported) */
1002 if (subsystem_deviceid
& 0x0010) {
1003 ctrl
->alternate_base_address
= 1; // supported
1005 ctrl
->alternate_base_address
= 0; // not supported
1008 /* PCI Config Space Index (0=not supported, 1=supported) */
1009 if (subsystem_deviceid
& 0x0020) {
1010 ctrl
->pci_config_space
= 1; // supported
1012 ctrl
->pci_config_space
= 0; // not supported
1016 if (subsystem_deviceid
& 0x0080) {
1018 ctrl
->pcix_support
= 1;
1019 /* Frequency of operation in PCI-X mode */
1020 if (subsystem_deviceid
& 0x0040) {
1021 /* 133MHz PCI-X if bit 7 is 1 */
1022 ctrl
->pcix_speed_capability
= 1;
1024 /* 100MHz PCI-X if bit 7 is 1 and bit 0 is 0, */
1025 /* 66MHz PCI-X if bit 7 is 1 and bit 0 is 1 */
1026 ctrl
->pcix_speed_capability
= 0;
1029 /* Conventional PCI */
1030 ctrl
->pcix_support
= 0;
1031 ctrl
->pcix_speed_capability
= 0;
1036 err(msg_HPC_not_supported
);
1042 err(msg_HPC_not_supported
);
1046 // Tell the user that we found one.
1047 info("Initializing the PCI hot plug controller residing on PCI bus %d\n",
1050 dbg("Hotplug controller capabilities:\n");
1051 dbg(" speed_capability %d\n", ctrl
->speed_capability
);
1052 dbg(" slot_switch_type %s\n", ctrl
->slot_switch_type
?
1053 "switch present" : "no switch");
1054 dbg(" defeature_PHP %s\n", ctrl
->defeature_PHP
?
1055 "PHP supported" : "PHP not supported");
1056 dbg(" alternate_base_address %s\n", ctrl
->alternate_base_address
?
1057 "supported" : "not supported");
1058 dbg(" pci_config_space %s\n", ctrl
->pci_config_space
?
1059 "supported" : "not supported");
1060 dbg(" pcix_speed_capability %s\n", ctrl
->pcix_speed_capability
?
1061 "supported" : "not supported");
1062 dbg(" pcix_support %s\n", ctrl
->pcix_support
?
1063 "supported" : "not supported");
1065 ctrl
->pci_dev
= pdev
;
1066 pci_set_drvdata(pdev
, ctrl
);
1068 /* make our own copy of the pci bus structure,
1069 * as we like tweaking it a lot */
1070 ctrl
->pci_bus
= kmalloc(sizeof(*ctrl
->pci_bus
), GFP_KERNEL
);
1071 if (!ctrl
->pci_bus
) {
1072 err("out of memory\n");
1076 memcpy(ctrl
->pci_bus
, pdev
->bus
, sizeof(*ctrl
->pci_bus
));
1078 ctrl
->bus
= pdev
->bus
->number
;
1079 ctrl
->rev
= pdev
->revision
;
1080 dbg("bus device function rev: %d %d %d %d\n", ctrl
->bus
,
1081 PCI_SLOT(pdev
->devfn
), PCI_FUNC(pdev
->devfn
), ctrl
->rev
);
1083 mutex_init(&ctrl
->crit_sect
);
1084 init_waitqueue_head(&ctrl
->queue
);
1086 /* initialize our threads if they haven't already been started up */
1087 rc
= one_time_init();
1092 dbg("pdev = %p\n", pdev
);
1093 dbg("pci resource start %llx\n", (unsigned long long)pci_resource_start(pdev
, 0));
1094 dbg("pci resource len %llx\n", (unsigned long long)pci_resource_len(pdev
, 0));
1096 if (!request_mem_region(pci_resource_start(pdev
, 0),
1097 pci_resource_len(pdev
, 0), MY_NAME
)) {
1098 err("cannot reserve MMIO region\n");
1103 ctrl
->hpc_reg
= ioremap(pci_resource_start(pdev
, 0),
1104 pci_resource_len(pdev
, 0));
1105 if (!ctrl
->hpc_reg
) {
1106 err("cannot remap MMIO region %llx @ %llx\n",
1107 (unsigned long long)pci_resource_len(pdev
, 0),
1108 (unsigned long long)pci_resource_start(pdev
, 0));
1110 goto err_free_mem_region
;
1113 // Check for 66Mhz operation
1114 ctrl
->speed
= get_controller_speed(ctrl
);
1117 /********************************************************
1119 * Save configuration headers for this and
1120 * subordinate PCI buses
1122 ********************************************************/
1124 // find the physical slot number of the first hot plug slot
1126 /* Get slot won't work for devices behind bridges, but
1127 * in this case it will always be called for the "base"
1128 * bus/dev/func of a slot.
1129 * CS: this is leveraging the PCIIRQ routing code from the kernel
1130 * (pci-pc.c: get_irq_routing_table) */
1131 rc
= get_slot_mapping(ctrl
->pci_bus
, pdev
->bus
->number
,
1132 (readb(ctrl
->hpc_reg
+ SLOT_MASK
) >> 4),
1133 &(ctrl
->first_slot
));
1134 dbg("get_slot_mapping: first_slot = %d, returned = %d\n",
1135 ctrl
->first_slot
, rc
);
1137 err(msg_initialization_err
, rc
);
1141 // Store PCI Config Space for all devices on this bus
1142 rc
= cpqhp_save_config(ctrl
, ctrl
->bus
, readb(ctrl
->hpc_reg
+ SLOT_MASK
));
1144 err("%s: unable to save PCI configuration data, error %d\n",
1150 * Get IO, memory, and IRQ resources for new devices
1152 // The next line is required for cpqhp_find_available_resources
1153 ctrl
->interrupt
= pdev
->irq
;
1154 if (ctrl
->interrupt
< 0x10) {
1155 cpqhp_legacy_mode
= 1;
1156 dbg("System seems to be configured for Full Table Mapped MPS mode\n");
1159 ctrl
->cfgspc_irq
= 0;
1160 pci_read_config_byte(pdev
, PCI_INTERRUPT_LINE
, &ctrl
->cfgspc_irq
);
1162 rc
= cpqhp_find_available_resources(ctrl
, cpqhp_rom_start
);
1163 ctrl
->add_support
= !rc
;
1165 dbg("cpqhp_find_available_resources = 0x%x\n", rc
);
1166 err("unable to locate PCI configuration resources for hot plug add.\n");
1171 * Finish setting up the hot plug ctrl device
1173 ctrl
->slot_device_offset
= readb(ctrl
->hpc_reg
+ SLOT_MASK
) >> 4;
1174 dbg("NumSlots %d \n", ctrl
->slot_device_offset
);
1176 ctrl
->next_event
= 0;
1178 /* Setup the slot information structures */
1179 rc
= ctrl_slot_setup(ctrl
, smbios_start
, smbios_table
);
1181 err(msg_initialization_err
, 6);
1182 err("%s: unable to save PCI configuration data, error %d\n",
1187 /* Mask all general input interrupts */
1188 writel(0xFFFFFFFFL
, ctrl
->hpc_reg
+ INT_MASK
);
1190 /* set up the interrupt */
1191 dbg("HPC interrupt = %d \n", ctrl
->interrupt
);
1192 if (request_irq(ctrl
->interrupt
, cpqhp_ctrl_intr
,
1193 IRQF_SHARED
, MY_NAME
, ctrl
)) {
1194 err("Can't get irq %d for the hotplug pci controller\n",
1200 /* Enable Shift Out interrupt and clear it, also enable SERR on power fault */
1201 temp_word
= readw(ctrl
->hpc_reg
+ MISC
);
1202 temp_word
|= 0x4006;
1203 writew(temp_word
, ctrl
->hpc_reg
+ MISC
);
1205 // Changed 05/05/97 to clear all interrupts at start
1206 writel(0xFFFFFFFFL
, ctrl
->hpc_reg
+ INT_INPUT_CLEAR
);
1208 ctrl
->ctrl_int_comp
= readl(ctrl
->hpc_reg
+ INT_INPUT_CLEAR
);
1210 writel(0x0L
, ctrl
->hpc_reg
+ INT_MASK
);
1212 if (!cpqhp_ctrl_list
) {
1213 cpqhp_ctrl_list
= ctrl
;
1216 ctrl
->next
= cpqhp_ctrl_list
;
1217 cpqhp_ctrl_list
= ctrl
;
1220 // turn off empty slots here unless command line option "ON" set
1221 // Wait for exclusive access to hardware
1222 mutex_lock(&ctrl
->crit_sect
);
1224 num_of_slots
= readb(ctrl
->hpc_reg
+ SLOT_MASK
) & 0x0F;
1226 // find first device number for the ctrl
1227 device
= readb(ctrl
->hpc_reg
+ SLOT_MASK
) >> 4;
1229 while (num_of_slots
) {
1230 dbg("num_of_slots: %d\n", num_of_slots
);
1231 func
= cpqhp_slot_find(ctrl
->bus
, device
, 0);
1235 hp_slot
= func
->device
- ctrl
->slot_device_offset
;
1236 dbg("hp_slot: %d\n", hp_slot
);
1238 // We have to save the presence info for these slots
1239 temp_word
= ctrl
->ctrl_int_comp
>> 16;
1240 func
->presence_save
= (temp_word
>> hp_slot
) & 0x01;
1241 func
->presence_save
|= (temp_word
>> (hp_slot
+ 7)) & 0x02;
1243 if (ctrl
->ctrl_int_comp
& (0x1L
<< hp_slot
)) {
1244 func
->switch_save
= 0;
1246 func
->switch_save
= 0x10;
1250 if (!func
->is_a_board
) {
1251 green_LED_off(ctrl
, hp_slot
);
1252 slot_disable(ctrl
, hp_slot
);
1262 // Wait for SOBS to be unset
1263 wait_for_ctrl_irq(ctrl
);
1266 rc
= init_SERR(ctrl
);
1268 err("init_SERR failed\n");
1269 mutex_unlock(&ctrl
->crit_sect
);
1273 // Done with exclusive hardware access
1274 mutex_unlock(&ctrl
->crit_sect
);
1276 cpqhp_create_debugfs_files(ctrl
);
1281 free_irq(ctrl
->interrupt
, ctrl
);
1283 iounmap(ctrl
->hpc_reg
);
1284 err_free_mem_region
:
1285 release_mem_region(pci_resource_start(pdev
, 0), pci_resource_len(pdev
, 0));
1287 kfree(ctrl
->pci_bus
);
1291 pci_disable_device(pdev
);
1296 static int one_time_init(void)
1306 retval
= pci_print_IRQ_route();
1310 dbg("Initialize + Start the notification mechanism \n");
1312 retval
= cpqhp_event_start_thread();
1316 dbg("Initialize slot lists\n");
1317 for (loop
= 0; loop
< 256; loop
++) {
1318 cpqhp_slot_list
[loop
] = NULL
;
1321 // FIXME: We also need to hook the NMI handler eventually.
1322 // this also needs to be worked with Christoph
1323 // register_NMI_handler();
1326 cpqhp_rom_start
= ioremap(ROM_PHY_ADDR
, ROM_PHY_LEN
);
1327 if (!cpqhp_rom_start
) {
1328 err ("Could not ioremap memory region for ROM\n");
1333 /* Now, map the int15 entry point if we are on compaq specific hardware */
1334 compaq_nvram_init(cpqhp_rom_start
);
1336 /* Map smbios table entry point structure */
1337 smbios_table
= detect_SMBIOS_pointer(cpqhp_rom_start
,
1338 cpqhp_rom_start
+ ROM_PHY_LEN
);
1339 if (!smbios_table
) {
1340 err ("Could not find the SMBIOS pointer in memory\n");
1342 goto error_rom_start
;
1345 smbios_start
= ioremap(readl(smbios_table
+ ST_ADDRESS
),
1346 readw(smbios_table
+ ST_LENGTH
));
1347 if (!smbios_start
) {
1348 err ("Could not ioremap memory region taken from SMBIOS values\n");
1350 goto error_smbios_start
;
1358 iounmap(smbios_start
);
1360 iounmap(cpqhp_rom_start
);
1366 static void __exit
unload_cpqphpd(void)
1368 struct pci_func
*next
;
1369 struct pci_func
*TempSlot
;
1372 struct controller
*ctrl
;
1373 struct controller
*tctrl
;
1374 struct pci_resource
*res
;
1375 struct pci_resource
*tres
;
1377 rc
= compaq_nvram_store(cpqhp_rom_start
);
1379 ctrl
= cpqhp_ctrl_list
;
1382 if (ctrl
->hpc_reg
) {
1384 rc
= read_slot_enable (ctrl
);
1386 writeb(0, ctrl
->hpc_reg
+ SLOT_SERR
);
1387 writel(0xFFFFFFC0L
| ~rc
, ctrl
->hpc_reg
+ INT_MASK
);
1389 misc
= readw(ctrl
->hpc_reg
+ MISC
);
1391 writew(misc
, ctrl
->hpc_reg
+ MISC
);
1394 ctrl_slot_cleanup(ctrl
);
1396 res
= ctrl
->io_head
;
1403 res
= ctrl
->mem_head
;
1410 res
= ctrl
->p_mem_head
;
1417 res
= ctrl
->bus_head
;
1424 kfree (ctrl
->pci_bus
);
1431 for (loop
= 0; loop
< 256; loop
++) {
1432 next
= cpqhp_slot_list
[loop
];
1433 while (next
!= NULL
) {
1434 res
= next
->io_head
;
1441 res
= next
->mem_head
;
1448 res
= next
->p_mem_head
;
1455 res
= next
->bus_head
;
1468 // Stop the notification mechanism
1470 cpqhp_event_stop_thread();
1472 //unmap the rom address
1473 if (cpqhp_rom_start
)
1474 iounmap(cpqhp_rom_start
);
1476 iounmap(smbios_start
);
1481 static struct pci_device_id hpcd_pci_tbl
[] = {
1483 /* handle any PCI Hotplug controller */
1484 .class = ((PCI_CLASS_SYSTEM_PCI_HOTPLUG
<< 8) | 0x00),
1487 /* no matter who makes it */
1488 .vendor
= PCI_ANY_ID
,
1489 .device
= PCI_ANY_ID
,
1490 .subvendor
= PCI_ANY_ID
,
1491 .subdevice
= PCI_ANY_ID
,
1493 }, { /* end: all zeroes */ }
1496 MODULE_DEVICE_TABLE(pci
, hpcd_pci_tbl
);
1500 static struct pci_driver cpqhpc_driver
= {
1501 .name
= "compaq_pci_hotplug",
1502 .id_table
= hpcd_pci_tbl
,
1503 .probe
= cpqhpc_probe
,
1504 /* remove: cpqhpc_remove_one, */
1509 static int __init
cpqhpc_init(void)
1513 cpqhp_debug
= debug
;
1515 info (DRIVER_DESC
" version: " DRIVER_VERSION
"\n");
1516 cpqhp_initialize_debugfs();
1517 result
= pci_register_driver(&cpqhpc_driver
);
1518 dbg("pci_register_driver = %d\n", result
);
1523 static void __exit
cpqhpc_cleanup(void)
1525 dbg("unload_cpqphpd()\n");
1528 dbg("pci_unregister_driver\n");
1529 pci_unregister_driver(&cpqhpc_driver
);
1530 cpqhp_shutdown_debugfs();
1534 module_init(cpqhpc_init
);
1535 module_exit(cpqhpc_cleanup
);