Linux 2.6.34-rc3
[pohmelfs.git] / drivers / pci / hotplug / cpqphp_core.c
blobf184d1d2ecbebfc9b7f1d27371d8b12af77610f1
1 /*
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.
8 * All rights reserved.
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
19 * details.
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>
31 #include <linux/module.h>
32 #include <linux/moduleparam.h>
33 #include <linux/kernel.h>
34 #include <linux/types.h>
35 #include <linux/proc_fs.h>
36 #include <linux/slab.h>
37 #include <linux/workqueue.h>
38 #include <linux/pci.h>
39 #include <linux/pci_hotplug.h>
40 #include <linux/init.h>
41 #include <linux/interrupt.h>
43 #include <asm/uaccess.h>
45 #include "cpqphp.h"
46 #include "cpqphp_nvram.h"
49 /* Global variables */
50 int cpqhp_debug;
51 int cpqhp_legacy_mode;
52 struct controller *cpqhp_ctrl_list; /* = NULL */
53 struct pci_func *cpqhp_slot_list[256];
54 struct irq_routing_table *cpqhp_routing_table;
56 /* local variables */
57 static void __iomem *smbios_table;
58 static void __iomem *smbios_start;
59 static void __iomem *cpqhp_rom_start;
60 static int power_mode;
61 static int debug;
62 static int initialized;
64 #define DRIVER_VERSION "0.9.8"
65 #define DRIVER_AUTHOR "Dan Zink <dan.zink@compaq.com>, Greg Kroah-Hartman <greg@kroah.com>"
66 #define DRIVER_DESC "Compaq Hot Plug PCI Controller Driver"
68 MODULE_AUTHOR(DRIVER_AUTHOR);
69 MODULE_DESCRIPTION(DRIVER_DESC);
70 MODULE_LICENSE("GPL");
72 module_param(power_mode, bool, 0644);
73 MODULE_PARM_DESC(power_mode, "Power mode enabled or not");
75 module_param(debug, bool, 0644);
76 MODULE_PARM_DESC(debug, "Debugging mode enabled or not");
78 #define CPQHPC_MODULE_MINOR 208
80 static inline int is_slot64bit(struct slot *slot)
82 return (readb(slot->p_sm_slot + SMBIOS_SLOT_WIDTH) == 0x06) ? 1 : 0;
85 static inline int is_slot66mhz(struct slot *slot)
87 return (readb(slot->p_sm_slot + SMBIOS_SLOT_TYPE) == 0x0E) ? 1 : 0;
90 /**
91 * detect_SMBIOS_pointer - find the System Management BIOS Table in mem region.
92 * @begin: begin pointer for region to be scanned.
93 * @end: end pointer for region to be scanned.
95 * Returns pointer to the head of the SMBIOS tables (or %NULL).
97 static void __iomem * detect_SMBIOS_pointer(void __iomem *begin, void __iomem *end)
99 void __iomem *fp;
100 void __iomem *endp;
101 u8 temp1, temp2, temp3, temp4;
102 int status = 0;
104 endp = (end - sizeof(u32) + 1);
106 for (fp = begin; fp <= endp; fp += 16) {
107 temp1 = readb(fp);
108 temp2 = readb(fp+1);
109 temp3 = readb(fp+2);
110 temp4 = readb(fp+3);
111 if (temp1 == '_' &&
112 temp2 == 'S' &&
113 temp3 == 'M' &&
114 temp4 == '_') {
115 status = 1;
116 break;
120 if (!status)
121 fp = NULL;
123 dbg("Discovered SMBIOS Entry point at %p\n", fp);
125 return fp;
129 * init_SERR - Initializes the per slot SERR generation.
130 * @ctrl: controller to use
132 * For unexpected switch opens
134 static int init_SERR(struct controller * ctrl)
136 u32 tempdword;
137 u32 number_of_slots;
138 u8 physical_slot;
140 if (!ctrl)
141 return 1;
143 tempdword = ctrl->first_slot;
145 number_of_slots = readb(ctrl->hpc_reg + SLOT_MASK) & 0x0F;
146 /* Loop through slots */
147 while (number_of_slots) {
148 physical_slot = tempdword;
149 writeb(0, ctrl->hpc_reg + SLOT_SERR);
150 tempdword++;
151 number_of_slots--;
154 return 0;
157 static int init_cpqhp_routing_table(void)
159 int len;
161 cpqhp_routing_table = pcibios_get_irq_routing_table();
162 if (cpqhp_routing_table == NULL)
163 return -ENOMEM;
165 len = cpqhp_routing_table_length();
166 if (len == 0) {
167 kfree(cpqhp_routing_table);
168 cpqhp_routing_table = NULL;
169 return -1;
172 return 0;
175 /* nice debugging output */
176 static void pci_print_IRQ_route(void)
178 int len;
179 int loop;
180 u8 tbus, tdevice, tslot;
182 len = cpqhp_routing_table_length();
184 dbg("bus dev func slot\n");
185 for (loop = 0; loop < len; ++loop) {
186 tbus = cpqhp_routing_table->slots[loop].bus;
187 tdevice = cpqhp_routing_table->slots[loop].devfn;
188 tslot = cpqhp_routing_table->slots[loop].slot;
189 dbg("%d %d %d %d\n", tbus, tdevice >> 3, tdevice & 0x7, tslot);
192 return;
197 * get_subsequent_smbios_entry: get the next entry from bios table.
198 * @smbios_start: where to start in the SMBIOS table
199 * @smbios_table: location of the SMBIOS table
200 * @curr: %NULL or pointer to previously returned structure
202 * Gets the first entry if previous == NULL;
203 * otherwise, returns the next entry.
204 * Uses global SMBIOS Table pointer.
206 * Returns a pointer to an SMBIOS structure or NULL if none found.
208 static void __iomem *get_subsequent_smbios_entry(void __iomem *smbios_start,
209 void __iomem *smbios_table,
210 void __iomem *curr)
212 u8 bail = 0;
213 u8 previous_byte = 1;
214 void __iomem *p_temp;
215 void __iomem *p_max;
217 if (!smbios_table || !curr)
218 return NULL;
220 /* set p_max to the end of the table */
221 p_max = smbios_start + readw(smbios_table + ST_LENGTH);
223 p_temp = curr;
224 p_temp += readb(curr + SMBIOS_GENERIC_LENGTH);
226 while ((p_temp < p_max) && !bail) {
227 /* Look for the double NULL terminator
228 * The first condition is the previous byte
229 * and the second is the curr
231 if (!previous_byte && !(readb(p_temp)))
232 bail = 1;
234 previous_byte = readb(p_temp);
235 p_temp++;
238 if (p_temp < p_max)
239 return p_temp;
240 else
241 return NULL;
246 * get_SMBIOS_entry - return the requested SMBIOS entry or %NULL
247 * @smbios_start: where to start in the SMBIOS table
248 * @smbios_table: location of the SMBIOS table
249 * @type: SMBIOS structure type to be returned
250 * @previous: %NULL or pointer to previously returned structure
252 * Gets the first entry of the specified type if previous == %NULL;
253 * Otherwise, returns the next entry of the given type.
254 * Uses global SMBIOS Table pointer.
255 * Uses get_subsequent_smbios_entry.
257 * Returns a pointer to an SMBIOS structure or %NULL if none found.
259 static void __iomem *get_SMBIOS_entry(void __iomem *smbios_start,
260 void __iomem *smbios_table,
261 u8 type,
262 void __iomem *previous)
264 if (!smbios_table)
265 return NULL;
267 if (!previous)
268 previous = smbios_start;
269 else
270 previous = get_subsequent_smbios_entry(smbios_start,
271 smbios_table, previous);
273 while (previous)
274 if (readb(previous + SMBIOS_GENERIC_TYPE) != type)
275 previous = get_subsequent_smbios_entry(smbios_start,
276 smbios_table, previous);
277 else
278 break;
280 return previous;
283 static void release_slot(struct hotplug_slot *hotplug_slot)
285 struct slot *slot = hotplug_slot->private;
287 dbg("%s - physical_slot = %s\n", __func__, slot_name(slot));
289 kfree(slot->hotplug_slot->info);
290 kfree(slot->hotplug_slot);
291 kfree(slot);
294 static int ctrl_slot_cleanup (struct controller * ctrl)
296 struct slot *old_slot, *next_slot;
298 old_slot = ctrl->slot;
299 ctrl->slot = NULL;
301 while (old_slot) {
302 /* memory will be freed by the release_slot callback */
303 next_slot = old_slot->next;
304 pci_hp_deregister (old_slot->hotplug_slot);
305 old_slot = next_slot;
308 cpqhp_remove_debugfs_files(ctrl);
310 /* Free IRQ associated with hot plug device */
311 free_irq(ctrl->interrupt, ctrl);
312 /* Unmap the memory */
313 iounmap(ctrl->hpc_reg);
314 /* Finally reclaim PCI mem */
315 release_mem_region(pci_resource_start(ctrl->pci_dev, 0),
316 pci_resource_len(ctrl->pci_dev, 0));
318 return 0;
323 * get_slot_mapping - determine logical slot mapping for PCI device
325 * Won't work for more than one PCI-PCI bridge in a slot.
327 * @bus_num - bus number of PCI device
328 * @dev_num - device number of PCI device
329 * @slot - Pointer to u8 where slot number will be returned
331 * Output: SUCCESS or FAILURE
333 static int
334 get_slot_mapping(struct pci_bus *bus, u8 bus_num, u8 dev_num, u8 *slot)
336 u32 work;
337 long len;
338 long loop;
340 u8 tbus, tdevice, tslot, bridgeSlot;
342 dbg("%s: %p, %d, %d, %p\n", __func__, bus, bus_num, dev_num, slot);
344 bridgeSlot = 0xFF;
346 len = cpqhp_routing_table_length();
347 for (loop = 0; loop < len; ++loop) {
348 tbus = cpqhp_routing_table->slots[loop].bus;
349 tdevice = cpqhp_routing_table->slots[loop].devfn >> 3;
350 tslot = cpqhp_routing_table->slots[loop].slot;
352 if ((tbus == bus_num) && (tdevice == dev_num)) {
353 *slot = tslot;
354 return 0;
355 } else {
356 /* Did not get a match on the target PCI device. Check
357 * if the current IRQ table entry is a PCI-to-PCI
358 * bridge device. If so, and it's secondary bus
359 * matches the bus number for the target device, I need
360 * to save the bridge's slot number. If I can not find
361 * an entry for the target device, I will have to
362 * assume it's on the other side of the bridge, and
363 * assign it the bridge's slot.
365 bus->number = tbus;
366 pci_bus_read_config_dword(bus, PCI_DEVFN(tdevice, 0),
367 PCI_CLASS_REVISION, &work);
369 if ((work >> 8) == PCI_TO_PCI_BRIDGE_CLASS) {
370 pci_bus_read_config_dword(bus,
371 PCI_DEVFN(tdevice, 0),
372 PCI_PRIMARY_BUS, &work);
373 // See if bridge's secondary bus matches target bus.
374 if (((work >> 8) & 0x000000FF) == (long) bus_num)
375 bridgeSlot = tslot;
381 /* If we got here, we didn't find an entry in the IRQ mapping table for
382 * the target PCI device. If we did determine that the target device
383 * is on the other side of a PCI-to-PCI bridge, return the slot number
384 * for the bridge.
386 if (bridgeSlot != 0xFF) {
387 *slot = bridgeSlot;
388 return 0;
390 /* Couldn't find an entry in the routing table for this PCI device */
391 return -1;
396 * cpqhp_set_attention_status - Turns the Amber LED for a slot on or off
397 * @ctrl: struct controller to use
398 * @func: PCI device/function info
399 * @status: LED control flag: 1 = LED on, 0 = LED off
401 static int
402 cpqhp_set_attention_status(struct controller *ctrl, struct pci_func *func,
403 u32 status)
405 u8 hp_slot;
407 if (func == NULL)
408 return 1;
410 hp_slot = func->device - ctrl->slot_device_offset;
412 /* Wait for exclusive access to hardware */
413 mutex_lock(&ctrl->crit_sect);
415 if (status == 1)
416 amber_LED_on (ctrl, hp_slot);
417 else if (status == 0)
418 amber_LED_off (ctrl, hp_slot);
419 else {
420 /* Done with exclusive hardware access */
421 mutex_unlock(&ctrl->crit_sect);
422 return 1;
425 set_SOGO(ctrl);
427 /* Wait for SOBS to be unset */
428 wait_for_ctrl_irq (ctrl);
430 /* Done with exclusive hardware access */
431 mutex_unlock(&ctrl->crit_sect);
433 return 0;
438 * set_attention_status - Turns the Amber LED for a slot on or off
439 * @hotplug_slot: slot to change LED on
440 * @status: LED control flag
442 static int set_attention_status (struct hotplug_slot *hotplug_slot, u8 status)
444 struct pci_func *slot_func;
445 struct slot *slot = hotplug_slot->private;
446 struct controller *ctrl = slot->ctrl;
447 u8 bus;
448 u8 devfn;
449 u8 device;
450 u8 function;
452 dbg("%s - physical_slot = %s\n", __func__, slot_name(slot));
454 if (cpqhp_get_bus_dev(ctrl, &bus, &devfn, slot->number) == -1)
455 return -ENODEV;
457 device = devfn >> 3;
458 function = devfn & 0x7;
459 dbg("bus, dev, fn = %d, %d, %d\n", bus, device, function);
461 slot_func = cpqhp_slot_find(bus, device, function);
462 if (!slot_func)
463 return -ENODEV;
465 return cpqhp_set_attention_status(ctrl, slot_func, status);
469 static int process_SI(struct hotplug_slot *hotplug_slot)
471 struct pci_func *slot_func;
472 struct slot *slot = hotplug_slot->private;
473 struct controller *ctrl = slot->ctrl;
474 u8 bus;
475 u8 devfn;
476 u8 device;
477 u8 function;
479 dbg("%s - physical_slot = %s\n", __func__, slot_name(slot));
481 if (cpqhp_get_bus_dev(ctrl, &bus, &devfn, slot->number) == -1)
482 return -ENODEV;
484 device = devfn >> 3;
485 function = devfn & 0x7;
486 dbg("bus, dev, fn = %d, %d, %d\n", bus, device, function);
488 slot_func = cpqhp_slot_find(bus, device, function);
489 if (!slot_func)
490 return -ENODEV;
492 slot_func->bus = bus;
493 slot_func->device = device;
494 slot_func->function = function;
495 slot_func->configured = 0;
496 dbg("board_added(%p, %p)\n", slot_func, ctrl);
497 return cpqhp_process_SI(ctrl, slot_func);
501 static int process_SS(struct hotplug_slot *hotplug_slot)
503 struct pci_func *slot_func;
504 struct slot *slot = hotplug_slot->private;
505 struct controller *ctrl = slot->ctrl;
506 u8 bus;
507 u8 devfn;
508 u8 device;
509 u8 function;
511 dbg("%s - physical_slot = %s\n", __func__, slot_name(slot));
513 if (cpqhp_get_bus_dev(ctrl, &bus, &devfn, slot->number) == -1)
514 return -ENODEV;
516 device = devfn >> 3;
517 function = devfn & 0x7;
518 dbg("bus, dev, fn = %d, %d, %d\n", bus, device, function);
520 slot_func = cpqhp_slot_find(bus, device, function);
521 if (!slot_func)
522 return -ENODEV;
524 dbg("In %s, slot_func = %p, ctrl = %p\n", __func__, slot_func, ctrl);
525 return cpqhp_process_SS(ctrl, slot_func);
529 static int hardware_test(struct hotplug_slot *hotplug_slot, u32 value)
531 struct slot *slot = hotplug_slot->private;
532 struct controller *ctrl = slot->ctrl;
534 dbg("%s - physical_slot = %s\n", __func__, slot_name(slot));
536 return cpqhp_hardware_test(ctrl, value);
540 static int get_power_status(struct hotplug_slot *hotplug_slot, u8 *value)
542 struct slot *slot = hotplug_slot->private;
543 struct controller *ctrl = slot->ctrl;
545 dbg("%s - physical_slot = %s\n", __func__, slot_name(slot));
547 *value = get_slot_enabled(ctrl, slot);
548 return 0;
551 static int get_attention_status(struct hotplug_slot *hotplug_slot, u8 *value)
553 struct slot *slot = hotplug_slot->private;
554 struct controller *ctrl = slot->ctrl;
556 dbg("%s - physical_slot = %s\n", __func__, slot_name(slot));
558 *value = cpq_get_attention_status(ctrl, slot);
559 return 0;
562 static int get_latch_status(struct hotplug_slot *hotplug_slot, u8 *value)
564 struct slot *slot = hotplug_slot->private;
565 struct controller *ctrl = slot->ctrl;
567 dbg("%s - physical_slot = %s\n", __func__, slot_name(slot));
569 *value = cpq_get_latch_status(ctrl, slot);
571 return 0;
574 static int get_adapter_status(struct hotplug_slot *hotplug_slot, u8 *value)
576 struct slot *slot = hotplug_slot->private;
577 struct controller *ctrl = slot->ctrl;
579 dbg("%s - physical_slot = %s\n", __func__, slot_name(slot));
581 *value = get_presence_status(ctrl, slot);
583 return 0;
586 static struct hotplug_slot_ops cpqphp_hotplug_slot_ops = {
587 .set_attention_status = set_attention_status,
588 .enable_slot = process_SI,
589 .disable_slot = process_SS,
590 .hardware_test = hardware_test,
591 .get_power_status = get_power_status,
592 .get_attention_status = get_attention_status,
593 .get_latch_status = get_latch_status,
594 .get_adapter_status = get_adapter_status,
597 #define SLOT_NAME_SIZE 10
599 static int ctrl_slot_setup(struct controller *ctrl,
600 void __iomem *smbios_start,
601 void __iomem *smbios_table)
603 struct slot *slot;
604 struct hotplug_slot *hotplug_slot;
605 struct hotplug_slot_info *hotplug_slot_info;
606 struct pci_bus *bus = ctrl->pci_bus;
607 u8 number_of_slots;
608 u8 slot_device;
609 u8 slot_number;
610 u8 ctrl_slot;
611 u32 tempdword;
612 char name[SLOT_NAME_SIZE];
613 void __iomem *slot_entry= NULL;
614 int result = -ENOMEM;
616 dbg("%s\n", __func__);
618 tempdword = readl(ctrl->hpc_reg + INT_INPUT_CLEAR);
620 number_of_slots = readb(ctrl->hpc_reg + SLOT_MASK) & 0x0F;
621 slot_device = readb(ctrl->hpc_reg + SLOT_MASK) >> 4;
622 slot_number = ctrl->first_slot;
624 while (number_of_slots) {
625 slot = kzalloc(sizeof(*slot), GFP_KERNEL);
626 if (!slot)
627 goto error;
629 slot->hotplug_slot = kzalloc(sizeof(*(slot->hotplug_slot)),
630 GFP_KERNEL);
631 if (!slot->hotplug_slot)
632 goto error_slot;
633 hotplug_slot = slot->hotplug_slot;
635 hotplug_slot->info = kzalloc(sizeof(*(hotplug_slot->info)),
636 GFP_KERNEL);
637 if (!hotplug_slot->info)
638 goto error_hpslot;
639 hotplug_slot_info = hotplug_slot->info;
641 slot->ctrl = ctrl;
642 slot->bus = ctrl->bus;
643 slot->device = slot_device;
644 slot->number = slot_number;
645 dbg("slot->number = %u\n", slot->number);
647 slot_entry = get_SMBIOS_entry(smbios_start, smbios_table, 9,
648 slot_entry);
650 while (slot_entry && (readw(slot_entry + SMBIOS_SLOT_NUMBER) !=
651 slot->number)) {
652 slot_entry = get_SMBIOS_entry(smbios_start,
653 smbios_table, 9, slot_entry);
656 slot->p_sm_slot = slot_entry;
658 init_timer(&slot->task_event);
659 slot->task_event.expires = jiffies + 5 * HZ;
660 slot->task_event.function = cpqhp_pushbutton_thread;
662 /*FIXME: these capabilities aren't used but if they are
663 * they need to be correctly implemented
665 slot->capabilities |= PCISLOT_REPLACE_SUPPORTED;
666 slot->capabilities |= PCISLOT_INTERLOCK_SUPPORTED;
668 if (is_slot64bit(slot))
669 slot->capabilities |= PCISLOT_64_BIT_SUPPORTED;
670 if (is_slot66mhz(slot))
671 slot->capabilities |= PCISLOT_66_MHZ_SUPPORTED;
672 if (bus->cur_bus_speed == PCI_SPEED_66MHz)
673 slot->capabilities |= PCISLOT_66_MHZ_OPERATION;
675 ctrl_slot =
676 slot_device - (readb(ctrl->hpc_reg + SLOT_MASK) >> 4);
678 /* Check presence */
679 slot->capabilities |=
680 ((((~tempdword) >> 23) |
681 ((~tempdword) >> 15)) >> ctrl_slot) & 0x02;
682 /* Check the switch state */
683 slot->capabilities |=
684 ((~tempdword & 0xFF) >> ctrl_slot) & 0x01;
685 /* Check the slot enable */
686 slot->capabilities |=
687 ((read_slot_enable(ctrl) << 2) >> ctrl_slot) & 0x04;
689 /* register this slot with the hotplug pci core */
690 hotplug_slot->release = &release_slot;
691 hotplug_slot->private = slot;
692 snprintf(name, SLOT_NAME_SIZE, "%u", slot->number);
693 hotplug_slot->ops = &cpqphp_hotplug_slot_ops;
695 hotplug_slot_info->power_status = get_slot_enabled(ctrl, slot);
696 hotplug_slot_info->attention_status =
697 cpq_get_attention_status(ctrl, slot);
698 hotplug_slot_info->latch_status =
699 cpq_get_latch_status(ctrl, slot);
700 hotplug_slot_info->adapter_status =
701 get_presence_status(ctrl, slot);
703 dbg("registering bus %d, dev %d, number %d, "
704 "ctrl->slot_device_offset %d, slot %d\n",
705 slot->bus, slot->device,
706 slot->number, ctrl->slot_device_offset,
707 slot_number);
708 result = pci_hp_register(hotplug_slot,
709 ctrl->pci_dev->bus,
710 slot->device,
711 name);
712 if (result) {
713 err("pci_hp_register failed with error %d\n", result);
714 goto error_info;
717 slot->next = ctrl->slot;
718 ctrl->slot = slot;
720 number_of_slots--;
721 slot_device++;
722 slot_number++;
725 return 0;
726 error_info:
727 kfree(hotplug_slot_info);
728 error_hpslot:
729 kfree(hotplug_slot);
730 error_slot:
731 kfree(slot);
732 error:
733 return result;
736 static int one_time_init(void)
738 int loop;
739 int retval = 0;
741 if (initialized)
742 return 0;
744 power_mode = 0;
746 retval = init_cpqhp_routing_table();
747 if (retval)
748 goto error;
750 if (cpqhp_debug)
751 pci_print_IRQ_route();
753 dbg("Initialize + Start the notification mechanism \n");
755 retval = cpqhp_event_start_thread();
756 if (retval)
757 goto error;
759 dbg("Initialize slot lists\n");
760 for (loop = 0; loop < 256; loop++)
761 cpqhp_slot_list[loop] = NULL;
763 /* FIXME: We also need to hook the NMI handler eventually.
764 * this also needs to be worked with Christoph
765 * register_NMI_handler();
767 /* Map rom address */
768 cpqhp_rom_start = ioremap(ROM_PHY_ADDR, ROM_PHY_LEN);
769 if (!cpqhp_rom_start) {
770 err ("Could not ioremap memory region for ROM\n");
771 retval = -EIO;
772 goto error;
775 /* Now, map the int15 entry point if we are on compaq specific
776 * hardware
778 compaq_nvram_init(cpqhp_rom_start);
780 /* Map smbios table entry point structure */
781 smbios_table = detect_SMBIOS_pointer(cpqhp_rom_start,
782 cpqhp_rom_start + ROM_PHY_LEN);
783 if (!smbios_table) {
784 err ("Could not find the SMBIOS pointer in memory\n");
785 retval = -EIO;
786 goto error_rom_start;
789 smbios_start = ioremap(readl(smbios_table + ST_ADDRESS),
790 readw(smbios_table + ST_LENGTH));
791 if (!smbios_start) {
792 err ("Could not ioremap memory region taken from SMBIOS values\n");
793 retval = -EIO;
794 goto error_smbios_start;
797 initialized = 1;
799 return retval;
801 error_smbios_start:
802 iounmap(smbios_start);
803 error_rom_start:
804 iounmap(cpqhp_rom_start);
805 error:
806 return retval;
809 static int cpqhpc_probe(struct pci_dev *pdev, const struct pci_device_id *ent)
811 u8 num_of_slots = 0;
812 u8 hp_slot = 0;
813 u8 device;
814 u8 bus_cap;
815 u16 temp_word;
816 u16 vendor_id;
817 u16 subsystem_vid;
818 u16 subsystem_deviceid;
819 u32 rc;
820 struct controller *ctrl;
821 struct pci_func *func;
822 struct pci_bus *bus;
823 int err;
825 err = pci_enable_device(pdev);
826 if (err) {
827 printk(KERN_ERR MY_NAME ": cannot enable PCI device %s (%d)\n",
828 pci_name(pdev), err);
829 return err;
831 bus = pdev->subordinate;
833 /* Need to read VID early b/c it's used to differentiate CPQ and INTC
834 * discovery
836 rc = pci_read_config_word(pdev, PCI_VENDOR_ID, &vendor_id);
837 if (rc || ((vendor_id != PCI_VENDOR_ID_COMPAQ) && (vendor_id != PCI_VENDOR_ID_INTEL))) {
838 err(msg_HPC_non_compaq_or_intel);
839 rc = -ENODEV;
840 goto err_disable_device;
842 dbg("Vendor ID: %x\n", vendor_id);
844 dbg("revision: %d\n", pdev->revision);
845 if ((vendor_id == PCI_VENDOR_ID_COMPAQ) && (!pdev->revision)) {
846 err(msg_HPC_rev_error);
847 rc = -ENODEV;
848 goto err_disable_device;
851 /* Check for the proper subsytem ID's
852 * Intel uses a different SSID programming model than Compaq.
853 * For Intel, each SSID bit identifies a PHP capability.
854 * Also Intel HPC's may have RID=0.
856 if ((pdev->revision <= 2) && (vendor_id != PCI_VENDOR_ID_INTEL)) {
857 err(msg_HPC_not_supported);
858 return -ENODEV;
861 /* TODO: This code can be made to support non-Compaq or Intel
862 * subsystem IDs
864 rc = pci_read_config_word(pdev, PCI_SUBSYSTEM_VENDOR_ID, &subsystem_vid);
865 if (rc) {
866 err("%s : pci_read_config_word failed\n", __func__);
867 goto err_disable_device;
869 dbg("Subsystem Vendor ID: %x\n", subsystem_vid);
870 if ((subsystem_vid != PCI_VENDOR_ID_COMPAQ) && (subsystem_vid != PCI_VENDOR_ID_INTEL)) {
871 err(msg_HPC_non_compaq_or_intel);
872 rc = -ENODEV;
873 goto err_disable_device;
876 ctrl = kzalloc(sizeof(struct controller), GFP_KERNEL);
877 if (!ctrl) {
878 err("%s : out of memory\n", __func__);
879 rc = -ENOMEM;
880 goto err_disable_device;
883 rc = pci_read_config_word(pdev, PCI_SUBSYSTEM_ID, &subsystem_deviceid);
884 if (rc) {
885 err("%s : pci_read_config_word failed\n", __func__);
886 goto err_free_ctrl;
889 info("Hot Plug Subsystem Device ID: %x\n", subsystem_deviceid);
891 /* Set Vendor ID, so it can be accessed later from other
892 * functions
894 ctrl->vendor_id = vendor_id;
896 switch (subsystem_vid) {
897 case PCI_VENDOR_ID_COMPAQ:
898 if (pdev->revision >= 0x13) { /* CIOBX */
899 ctrl->push_flag = 1;
900 ctrl->slot_switch_type = 1;
901 ctrl->push_button = 1;
902 ctrl->pci_config_space = 1;
903 ctrl->defeature_PHP = 1;
904 ctrl->pcix_support = 1;
905 ctrl->pcix_speed_capability = 1;
906 pci_read_config_byte(pdev, 0x41, &bus_cap);
907 if (bus_cap & 0x80) {
908 dbg("bus max supports 133MHz PCI-X\n");
909 bus->max_bus_speed = PCI_SPEED_133MHz_PCIX;
910 break;
912 if (bus_cap & 0x40) {
913 dbg("bus max supports 100MHz PCI-X\n");
914 bus->max_bus_speed = PCI_SPEED_100MHz_PCIX;
915 break;
917 if (bus_cap & 20) {
918 dbg("bus max supports 66MHz PCI-X\n");
919 bus->max_bus_speed = PCI_SPEED_66MHz_PCIX;
920 break;
922 if (bus_cap & 10) {
923 dbg("bus max supports 66MHz PCI\n");
924 bus->max_bus_speed = PCI_SPEED_66MHz;
925 break;
928 break;
931 switch (subsystem_deviceid) {
932 case PCI_SUB_HPC_ID:
933 /* Original 6500/7000 implementation */
934 ctrl->slot_switch_type = 1;
935 bus->max_bus_speed = PCI_SPEED_33MHz;
936 ctrl->push_button = 0;
937 ctrl->pci_config_space = 1;
938 ctrl->defeature_PHP = 1;
939 ctrl->pcix_support = 0;
940 ctrl->pcix_speed_capability = 0;
941 break;
942 case PCI_SUB_HPC_ID2:
943 /* First Pushbutton implementation */
944 ctrl->push_flag = 1;
945 ctrl->slot_switch_type = 1;
946 bus->max_bus_speed = PCI_SPEED_33MHz;
947 ctrl->push_button = 1;
948 ctrl->pci_config_space = 1;
949 ctrl->defeature_PHP = 1;
950 ctrl->pcix_support = 0;
951 ctrl->pcix_speed_capability = 0;
952 break;
953 case PCI_SUB_HPC_ID_INTC:
954 /* Third party (6500/7000) */
955 ctrl->slot_switch_type = 1;
956 bus->max_bus_speed = PCI_SPEED_33MHz;
957 ctrl->push_button = 0;
958 ctrl->pci_config_space = 1;
959 ctrl->defeature_PHP = 1;
960 ctrl->pcix_support = 0;
961 ctrl->pcix_speed_capability = 0;
962 break;
963 case PCI_SUB_HPC_ID3:
964 /* First 66 Mhz implementation */
965 ctrl->push_flag = 1;
966 ctrl->slot_switch_type = 1;
967 bus->max_bus_speed = PCI_SPEED_66MHz;
968 ctrl->push_button = 1;
969 ctrl->pci_config_space = 1;
970 ctrl->defeature_PHP = 1;
971 ctrl->pcix_support = 0;
972 ctrl->pcix_speed_capability = 0;
973 break;
974 case PCI_SUB_HPC_ID4:
975 /* First PCI-X implementation, 100MHz */
976 ctrl->push_flag = 1;
977 ctrl->slot_switch_type = 1;
978 bus->max_bus_speed = PCI_SPEED_100MHz_PCIX;
979 ctrl->push_button = 1;
980 ctrl->pci_config_space = 1;
981 ctrl->defeature_PHP = 1;
982 ctrl->pcix_support = 1;
983 ctrl->pcix_speed_capability = 0;
984 break;
985 default:
986 err(msg_HPC_not_supported);
987 rc = -ENODEV;
988 goto err_free_ctrl;
990 break;
992 case PCI_VENDOR_ID_INTEL:
993 /* Check for speed capability (0=33, 1=66) */
994 if (subsystem_deviceid & 0x0001)
995 bus->max_bus_speed = PCI_SPEED_66MHz;
996 else
997 bus->max_bus_speed = PCI_SPEED_33MHz;
999 /* Check for push button */
1000 if (subsystem_deviceid & 0x0002)
1001 ctrl->push_button = 0;
1002 else
1003 ctrl->push_button = 1;
1005 /* Check for slot switch type (0=mechanical, 1=not mechanical) */
1006 if (subsystem_deviceid & 0x0004)
1007 ctrl->slot_switch_type = 0;
1008 else
1009 ctrl->slot_switch_type = 1;
1011 /* PHP Status (0=De-feature PHP, 1=Normal operation) */
1012 if (subsystem_deviceid & 0x0008)
1013 ctrl->defeature_PHP = 1; /* PHP supported */
1014 else
1015 ctrl->defeature_PHP = 0; /* PHP not supported */
1017 /* Alternate Base Address Register Interface
1018 * (0=not supported, 1=supported)
1020 if (subsystem_deviceid & 0x0010)
1021 ctrl->alternate_base_address = 1;
1022 else
1023 ctrl->alternate_base_address = 0;
1025 /* PCI Config Space Index (0=not supported, 1=supported) */
1026 if (subsystem_deviceid & 0x0020)
1027 ctrl->pci_config_space = 1;
1028 else
1029 ctrl->pci_config_space = 0;
1031 /* PCI-X support */
1032 if (subsystem_deviceid & 0x0080) {
1033 ctrl->pcix_support = 1;
1034 if (subsystem_deviceid & 0x0040)
1035 /* 133MHz PCI-X if bit 7 is 1 */
1036 ctrl->pcix_speed_capability = 1;
1037 else
1038 /* 100MHz PCI-X if bit 7 is 1 and bit 0 is 0, */
1039 /* 66MHz PCI-X if bit 7 is 1 and bit 0 is 1 */
1040 ctrl->pcix_speed_capability = 0;
1041 } else {
1042 /* Conventional PCI */
1043 ctrl->pcix_support = 0;
1044 ctrl->pcix_speed_capability = 0;
1046 break;
1048 default:
1049 err(msg_HPC_not_supported);
1050 rc = -ENODEV;
1051 goto err_free_ctrl;
1054 /* Tell the user that we found one. */
1055 info("Initializing the PCI hot plug controller residing on PCI bus %d\n",
1056 pdev->bus->number);
1058 dbg("Hotplug controller capabilities:\n");
1059 dbg(" speed_capability %d\n", bus->max_bus_speed);
1060 dbg(" slot_switch_type %s\n", ctrl->slot_switch_type ?
1061 "switch present" : "no switch");
1062 dbg(" defeature_PHP %s\n", ctrl->defeature_PHP ?
1063 "PHP supported" : "PHP not supported");
1064 dbg(" alternate_base_address %s\n", ctrl->alternate_base_address ?
1065 "supported" : "not supported");
1066 dbg(" pci_config_space %s\n", ctrl->pci_config_space ?
1067 "supported" : "not supported");
1068 dbg(" pcix_speed_capability %s\n", ctrl->pcix_speed_capability ?
1069 "supported" : "not supported");
1070 dbg(" pcix_support %s\n", ctrl->pcix_support ?
1071 "supported" : "not supported");
1073 ctrl->pci_dev = pdev;
1074 pci_set_drvdata(pdev, ctrl);
1076 /* make our own copy of the pci bus structure,
1077 * as we like tweaking it a lot */
1078 ctrl->pci_bus = kmalloc(sizeof(*ctrl->pci_bus), GFP_KERNEL);
1079 if (!ctrl->pci_bus) {
1080 err("out of memory\n");
1081 rc = -ENOMEM;
1082 goto err_free_ctrl;
1084 memcpy(ctrl->pci_bus, pdev->bus, sizeof(*ctrl->pci_bus));
1086 ctrl->bus = pdev->bus->number;
1087 ctrl->rev = pdev->revision;
1088 dbg("bus device function rev: %d %d %d %d\n", ctrl->bus,
1089 PCI_SLOT(pdev->devfn), PCI_FUNC(pdev->devfn), ctrl->rev);
1091 mutex_init(&ctrl->crit_sect);
1092 init_waitqueue_head(&ctrl->queue);
1094 /* initialize our threads if they haven't already been started up */
1095 rc = one_time_init();
1096 if (rc) {
1097 goto err_free_bus;
1100 dbg("pdev = %p\n", pdev);
1101 dbg("pci resource start %llx\n", (unsigned long long)pci_resource_start(pdev, 0));
1102 dbg("pci resource len %llx\n", (unsigned long long)pci_resource_len(pdev, 0));
1104 if (!request_mem_region(pci_resource_start(pdev, 0),
1105 pci_resource_len(pdev, 0), MY_NAME)) {
1106 err("cannot reserve MMIO region\n");
1107 rc = -ENOMEM;
1108 goto err_free_bus;
1111 ctrl->hpc_reg = ioremap(pci_resource_start(pdev, 0),
1112 pci_resource_len(pdev, 0));
1113 if (!ctrl->hpc_reg) {
1114 err("cannot remap MMIO region %llx @ %llx\n",
1115 (unsigned long long)pci_resource_len(pdev, 0),
1116 (unsigned long long)pci_resource_start(pdev, 0));
1117 rc = -ENODEV;
1118 goto err_free_mem_region;
1121 /* Check for 66Mhz operation */
1122 bus->cur_bus_speed = get_controller_speed(ctrl);
1125 /********************************************************
1127 * Save configuration headers for this and
1128 * subordinate PCI buses
1130 ********************************************************/
1132 /* find the physical slot number of the first hot plug slot */
1134 /* Get slot won't work for devices behind bridges, but
1135 * in this case it will always be called for the "base"
1136 * bus/dev/func of a slot.
1137 * CS: this is leveraging the PCIIRQ routing code from the kernel
1138 * (pci-pc.c: get_irq_routing_table) */
1139 rc = get_slot_mapping(ctrl->pci_bus, pdev->bus->number,
1140 (readb(ctrl->hpc_reg + SLOT_MASK) >> 4),
1141 &(ctrl->first_slot));
1142 dbg("get_slot_mapping: first_slot = %d, returned = %d\n",
1143 ctrl->first_slot, rc);
1144 if (rc) {
1145 err(msg_initialization_err, rc);
1146 goto err_iounmap;
1149 /* Store PCI Config Space for all devices on this bus */
1150 rc = cpqhp_save_config(ctrl, ctrl->bus, readb(ctrl->hpc_reg + SLOT_MASK));
1151 if (rc) {
1152 err("%s: unable to save PCI configuration data, error %d\n",
1153 __func__, rc);
1154 goto err_iounmap;
1158 * Get IO, memory, and IRQ resources for new devices
1160 /* The next line is required for cpqhp_find_available_resources */
1161 ctrl->interrupt = pdev->irq;
1162 if (ctrl->interrupt < 0x10) {
1163 cpqhp_legacy_mode = 1;
1164 dbg("System seems to be configured for Full Table Mapped MPS mode\n");
1167 ctrl->cfgspc_irq = 0;
1168 pci_read_config_byte(pdev, PCI_INTERRUPT_LINE, &ctrl->cfgspc_irq);
1170 rc = cpqhp_find_available_resources(ctrl, cpqhp_rom_start);
1171 ctrl->add_support = !rc;
1172 if (rc) {
1173 dbg("cpqhp_find_available_resources = 0x%x\n", rc);
1174 err("unable to locate PCI configuration resources for hot plug add.\n");
1175 goto err_iounmap;
1179 * Finish setting up the hot plug ctrl device
1181 ctrl->slot_device_offset = readb(ctrl->hpc_reg + SLOT_MASK) >> 4;
1182 dbg("NumSlots %d \n", ctrl->slot_device_offset);
1184 ctrl->next_event = 0;
1186 /* Setup the slot information structures */
1187 rc = ctrl_slot_setup(ctrl, smbios_start, smbios_table);
1188 if (rc) {
1189 err(msg_initialization_err, 6);
1190 err("%s: unable to save PCI configuration data, error %d\n",
1191 __func__, rc);
1192 goto err_iounmap;
1195 /* Mask all general input interrupts */
1196 writel(0xFFFFFFFFL, ctrl->hpc_reg + INT_MASK);
1198 /* set up the interrupt */
1199 dbg("HPC interrupt = %d \n", ctrl->interrupt);
1200 if (request_irq(ctrl->interrupt, cpqhp_ctrl_intr,
1201 IRQF_SHARED, MY_NAME, ctrl)) {
1202 err("Can't get irq %d for the hotplug pci controller\n",
1203 ctrl->interrupt);
1204 rc = -ENODEV;
1205 goto err_iounmap;
1208 /* Enable Shift Out interrupt and clear it, also enable SERR on power
1209 * fault
1211 temp_word = readw(ctrl->hpc_reg + MISC);
1212 temp_word |= 0x4006;
1213 writew(temp_word, ctrl->hpc_reg + MISC);
1215 /* Changed 05/05/97 to clear all interrupts at start */
1216 writel(0xFFFFFFFFL, ctrl->hpc_reg + INT_INPUT_CLEAR);
1218 ctrl->ctrl_int_comp = readl(ctrl->hpc_reg + INT_INPUT_CLEAR);
1220 writel(0x0L, ctrl->hpc_reg + INT_MASK);
1222 if (!cpqhp_ctrl_list) {
1223 cpqhp_ctrl_list = ctrl;
1224 ctrl->next = NULL;
1225 } else {
1226 ctrl->next = cpqhp_ctrl_list;
1227 cpqhp_ctrl_list = ctrl;
1230 /* turn off empty slots here unless command line option "ON" set
1231 * Wait for exclusive access to hardware
1233 mutex_lock(&ctrl->crit_sect);
1235 num_of_slots = readb(ctrl->hpc_reg + SLOT_MASK) & 0x0F;
1237 /* find first device number for the ctrl */
1238 device = readb(ctrl->hpc_reg + SLOT_MASK) >> 4;
1240 while (num_of_slots) {
1241 dbg("num_of_slots: %d\n", num_of_slots);
1242 func = cpqhp_slot_find(ctrl->bus, device, 0);
1243 if (!func)
1244 break;
1246 hp_slot = func->device - ctrl->slot_device_offset;
1247 dbg("hp_slot: %d\n", hp_slot);
1249 /* We have to save the presence info for these slots */
1250 temp_word = ctrl->ctrl_int_comp >> 16;
1251 func->presence_save = (temp_word >> hp_slot) & 0x01;
1252 func->presence_save |= (temp_word >> (hp_slot + 7)) & 0x02;
1254 if (ctrl->ctrl_int_comp & (0x1L << hp_slot))
1255 func->switch_save = 0;
1256 else
1257 func->switch_save = 0x10;
1259 if (!power_mode)
1260 if (!func->is_a_board) {
1261 green_LED_off(ctrl, hp_slot);
1262 slot_disable(ctrl, hp_slot);
1265 device++;
1266 num_of_slots--;
1269 if (!power_mode) {
1270 set_SOGO(ctrl);
1271 /* Wait for SOBS to be unset */
1272 wait_for_ctrl_irq(ctrl);
1275 rc = init_SERR(ctrl);
1276 if (rc) {
1277 err("init_SERR failed\n");
1278 mutex_unlock(&ctrl->crit_sect);
1279 goto err_free_irq;
1282 /* Done with exclusive hardware access */
1283 mutex_unlock(&ctrl->crit_sect);
1285 cpqhp_create_debugfs_files(ctrl);
1287 return 0;
1289 err_free_irq:
1290 free_irq(ctrl->interrupt, ctrl);
1291 err_iounmap:
1292 iounmap(ctrl->hpc_reg);
1293 err_free_mem_region:
1294 release_mem_region(pci_resource_start(pdev, 0), pci_resource_len(pdev, 0));
1295 err_free_bus:
1296 kfree(ctrl->pci_bus);
1297 err_free_ctrl:
1298 kfree(ctrl);
1299 err_disable_device:
1300 pci_disable_device(pdev);
1301 return rc;
1304 static void __exit unload_cpqphpd(void)
1306 struct pci_func *next;
1307 struct pci_func *TempSlot;
1308 int loop;
1309 u32 rc;
1310 struct controller *ctrl;
1311 struct controller *tctrl;
1312 struct pci_resource *res;
1313 struct pci_resource *tres;
1315 rc = compaq_nvram_store(cpqhp_rom_start);
1317 ctrl = cpqhp_ctrl_list;
1319 while (ctrl) {
1320 if (ctrl->hpc_reg) {
1321 u16 misc;
1322 rc = read_slot_enable (ctrl);
1324 writeb(0, ctrl->hpc_reg + SLOT_SERR);
1325 writel(0xFFFFFFC0L | ~rc, ctrl->hpc_reg + INT_MASK);
1327 misc = readw(ctrl->hpc_reg + MISC);
1328 misc &= 0xFFFD;
1329 writew(misc, ctrl->hpc_reg + MISC);
1332 ctrl_slot_cleanup(ctrl);
1334 res = ctrl->io_head;
1335 while (res) {
1336 tres = res;
1337 res = res->next;
1338 kfree(tres);
1341 res = ctrl->mem_head;
1342 while (res) {
1343 tres = res;
1344 res = res->next;
1345 kfree(tres);
1348 res = ctrl->p_mem_head;
1349 while (res) {
1350 tres = res;
1351 res = res->next;
1352 kfree(tres);
1355 res = ctrl->bus_head;
1356 while (res) {
1357 tres = res;
1358 res = res->next;
1359 kfree(tres);
1362 kfree (ctrl->pci_bus);
1364 tctrl = ctrl;
1365 ctrl = ctrl->next;
1366 kfree(tctrl);
1369 for (loop = 0; loop < 256; loop++) {
1370 next = cpqhp_slot_list[loop];
1371 while (next != NULL) {
1372 res = next->io_head;
1373 while (res) {
1374 tres = res;
1375 res = res->next;
1376 kfree(tres);
1379 res = next->mem_head;
1380 while (res) {
1381 tres = res;
1382 res = res->next;
1383 kfree(tres);
1386 res = next->p_mem_head;
1387 while (res) {
1388 tres = res;
1389 res = res->next;
1390 kfree(tres);
1393 res = next->bus_head;
1394 while (res) {
1395 tres = res;
1396 res = res->next;
1397 kfree(tres);
1400 TempSlot = next;
1401 next = next->next;
1402 kfree(TempSlot);
1406 /* Stop the notification mechanism */
1407 if (initialized)
1408 cpqhp_event_stop_thread();
1410 /* unmap the rom address */
1411 if (cpqhp_rom_start)
1412 iounmap(cpqhp_rom_start);
1413 if (smbios_start)
1414 iounmap(smbios_start);
1417 static struct pci_device_id hpcd_pci_tbl[] = {
1419 /* handle any PCI Hotplug controller */
1420 .class = ((PCI_CLASS_SYSTEM_PCI_HOTPLUG << 8) | 0x00),
1421 .class_mask = ~0,
1423 /* no matter who makes it */
1424 .vendor = PCI_ANY_ID,
1425 .device = PCI_ANY_ID,
1426 .subvendor = PCI_ANY_ID,
1427 .subdevice = PCI_ANY_ID,
1429 }, { /* end: all zeroes */ }
1432 MODULE_DEVICE_TABLE(pci, hpcd_pci_tbl);
1434 static struct pci_driver cpqhpc_driver = {
1435 .name = "compaq_pci_hotplug",
1436 .id_table = hpcd_pci_tbl,
1437 .probe = cpqhpc_probe,
1438 /* remove: cpqhpc_remove_one, */
1441 static int __init cpqhpc_init(void)
1443 int result;
1445 cpqhp_debug = debug;
1447 info (DRIVER_DESC " version: " DRIVER_VERSION "\n");
1448 cpqhp_initialize_debugfs();
1449 result = pci_register_driver(&cpqhpc_driver);
1450 dbg("pci_register_driver = %d\n", result);
1451 return result;
1454 static void __exit cpqhpc_cleanup(void)
1456 dbg("unload_cpqphpd()\n");
1457 unload_cpqphpd();
1459 dbg("pci_unregister_driver\n");
1460 pci_unregister_driver(&cpqhpc_driver);
1461 cpqhp_shutdown_debugfs();
1464 module_init(cpqhpc_init);
1465 module_exit(cpqhpc_cleanup);