1/*
2 * Compaq Hot Plug Controller Driver
3 *
4 * Copyright (C) 1995,2001 Compaq Computer Corporation
5 * Copyright (C) 2001 Greg Kroah-Hartman <greg@kroah.com>
6 * Copyright (C) 2001 IBM Corp.
7 *
8 * All rights reserved.
9 *
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.
14 *
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.
20 *
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.
24 *
25 * Send feedback to <greg@kroah.com>
26 *
27 * Jan 12, 2003 -	Added 66/100/133MHz PCI-X support,
28 * 			Torben Mathiasen <torben.mathiasen@hp.com>
29 *
30 */
31
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>
43
44#include <asm/uaccess.h>
45
46#include "cpqphp.h"
47#include "cpqphp_nvram.h"
48#include "../../../arch/i386/pci/pci.h"	/* horrible hack showing how processor dependent we are... */
49
50
51/* Global variables */
52int cpqhp_debug;
53int cpqhp_legacy_mode;
54struct controller *cpqhp_ctrl_list;	/* = NULL */
55struct pci_func *cpqhp_slot_list[256];
56
57/* local variables */
58static void __iomem *smbios_table;
59static void __iomem *smbios_start;
60static void __iomem *cpqhp_rom_start;
61static int power_mode;
62static int debug;
63static int initialized;
64
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"
68
69MODULE_AUTHOR(DRIVER_AUTHOR);
70MODULE_DESCRIPTION(DRIVER_DESC);
71MODULE_LICENSE("GPL");
72
73module_param(power_mode, bool, 0644);
74MODULE_PARM_DESC(power_mode, "Power mode enabled or not");
75
76module_param(debug, bool, 0644);
77MODULE_PARM_DESC(debug, "Debugging mode enabled or not");
78
79#define CPQHPC_MODULE_MINOR 208
80
81static int one_time_init	(void);
82static int set_attention_status	(struct hotplug_slot *slot, u8 value);
83static int process_SI		(struct hotplug_slot *slot);
84static int process_SS		(struct hotplug_slot *slot);
85static int hardware_test	(struct hotplug_slot *slot, u32 value);
86static int get_power_status	(struct hotplug_slot *slot, u8 *value);
87static int get_attention_status	(struct hotplug_slot *slot, u8 *value);
88static int get_latch_status	(struct hotplug_slot *slot, u8 *value);
89static int get_adapter_status	(struct hotplug_slot *slot, u8 *value);
90static int get_max_bus_speed	(struct hotplug_slot *slot, enum pci_bus_speed *value);
91static int get_cur_bus_speed	(struct hotplug_slot *slot, enum pci_bus_speed *value);
92
93static struct hotplug_slot_ops cpqphp_hotplug_slot_ops = {
94	.owner =		THIS_MODULE,
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,
105};
106
107
108static inline int is_slot64bit(struct slot *slot)
109{
110	return (readb(slot->p_sm_slot + SMBIOS_SLOT_WIDTH) == 0x06) ? 1 : 0;
111}
112
113static inline int is_slot66mhz(struct slot *slot)
114{
115	return (readb(slot->p_sm_slot + SMBIOS_SLOT_TYPE) == 0x0E) ? 1 : 0;
116}
117
118/**
119 * detect_SMBIOS_pointer - find the System Management BIOS Table in mem region.
120 *
121 * @begin: begin pointer for region to be scanned.
122 * @end: end pointer for region to be scanned.
123 *
124 * Returns pointer to the head of the SMBIOS tables (or NULL)
125 *
126 */
127static void __iomem * detect_SMBIOS_pointer(void __iomem *begin, void __iomem *end)
128{
129	void __iomem *fp;
130	void __iomem *endp;
131	u8 temp1, temp2, temp3, temp4;
132	int status = 0;
133
134	endp = (end - sizeof(u32) + 1);
135
136	for (fp = begin; fp <= endp; fp += 16) {
137		temp1 = readb(fp);
138		temp2 = readb(fp+1);
139		temp3 = readb(fp+2);
140		temp4 = readb(fp+3);
141		if (temp1 == '_' &&
142		    temp2 == 'S' &&
143		    temp3 == 'M' &&
144		    temp4 == '_') {
145			status = 1;
146			break;
147		}
148	}
149
150	if (!status)
151		fp = NULL;
152
153	dbg("Discovered SMBIOS Entry point at %p\n", fp);
154
155	return fp;
156}
157
158/**
159 * init_SERR - Initializes the per slot SERR generation.
160 *
161 * For unexpected switch opens
162 *
163 */
164static int init_SERR(struct controller * ctrl)
165{
166	u32 tempdword;
167	u32 number_of_slots;
168	u8 physical_slot;
169
170	if (!ctrl)
171		return 1;
172
173	tempdword = ctrl->first_slot;
174
175	number_of_slots = readb(ctrl->hpc_reg + SLOT_MASK) & 0x0F;
176	// Loop through slots
177	while (number_of_slots) {
178		physical_slot = tempdword;
179		writeb(0, ctrl->hpc_reg + SLOT_SERR);
180		tempdword++;
181		number_of_slots--;
182	}
183
184	return 0;
185}
186
187
188/* nice debugging output */
189static int pci_print_IRQ_route (void)
190{
191	struct irq_routing_table *routing_table;
192	int len;
193	int loop;
194
195	u8 tbus, tdevice, tslot;
196
197	routing_table = pcibios_get_irq_routing_table();
198	if (routing_table == NULL) {
199		err("No BIOS Routing Table??? Not good\n");
200		return -ENOMEM;
201	}
202
203	len = (routing_table->size - sizeof(struct irq_routing_table)) /
204			sizeof(struct irq_info);
205	// Make sure I got at least one entry
206	if (len == 0) {
207		kfree(routing_table);
208		return -1;
209	}
210
211	dbg("bus dev func slot\n");
212
213	for (loop = 0; loop < len; ++loop) {
214		tbus = routing_table->slots[loop].bus;
215		tdevice = routing_table->slots[loop].devfn;
216		tslot = routing_table->slots[loop].slot;
217		dbg("%d %d %d %d\n", tbus, tdevice >> 3, tdevice & 0x7, tslot);
218
219	}
220	kfree(routing_table);
221	return 0;
222}
223
224
225/**
226 * get_subsequent_smbios_entry: get the next entry from bios table.
227 *
228 * Gets the first entry if previous == NULL
229 * Otherwise, returns the next entry
230 * Uses global SMBIOS Table pointer
231 *
232 * @curr: %NULL or pointer to previously returned structure
233 *
234 * returns a pointer to an SMBIOS structure or NULL if none found
235 */
236static void __iomem *get_subsequent_smbios_entry(void __iomem *smbios_start,
237						void __iomem *smbios_table,
238						void __iomem *curr)
239{
240	u8 bail = 0;
241	u8 previous_byte = 1;
242	void __iomem *p_temp;
243	void __iomem *p_max;
244
245	if (!smbios_table || !curr)
246		return(NULL);
247
248	// set p_max to the end of the table
249	p_max = smbios_start + readw(smbios_table + ST_LENGTH);
250
251	p_temp = curr;
252	p_temp += readb(curr + SMBIOS_GENERIC_LENGTH);
253
254	while ((p_temp < p_max) && !bail) {
255		/* Look for the double NULL terminator
256		 * The first condition is the previous byte
257		 * and the second is the curr */
258		if (!previous_byte && !(readb(p_temp))) {
259			bail = 1;
260		}
261
262		previous_byte = readb(p_temp);
263		p_temp++;
264	}
265
266	if (p_temp < p_max) {
267		return p_temp;
268	} else {
269		return NULL;
270	}
271}
272
273
274/**
275 * get_SMBIOS_entry
276 *
277 * @type:SMBIOS structure type to be returned
278 * @previous: %NULL or pointer to previously returned structure
279 *
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
284 *
285 * returns a pointer to an SMBIOS structure or %NULL if none found
286 */
287static void __iomem *get_SMBIOS_entry(void __iomem *smbios_start,
288					void __iomem *smbios_table,
289					u8 type,
290					void __iomem *previous)
291{
292	if (!smbios_table)
293		return NULL;
294
295	if (!previous) {
296		previous = smbios_start;
297	} else {
298		previous = get_subsequent_smbios_entry(smbios_start,
299					smbios_table, previous);
300	}
301
302	while (previous) {
303	       	if (readb(previous + SMBIOS_GENERIC_TYPE) != type) {
304			previous = get_subsequent_smbios_entry(smbios_start,
305						smbios_table, previous);
306		} else {
307			break;
308		}
309	}
310
311	return previous;
312}
313
314static void release_slot(struct hotplug_slot *hotplug_slot)
315{
316	struct slot *slot = hotplug_slot->private;
317
318	dbg("%s - physical_slot = %s\n", __FUNCTION__, hotplug_slot->name);
319
320	kfree(slot->hotplug_slot->info);
321	kfree(slot->hotplug_slot->name);
322	kfree(slot->hotplug_slot);
323	kfree(slot);
324}
325
326static int ctrl_slot_setup(struct controller *ctrl,
327			void __iomem *smbios_start,
328			void __iomem *smbios_table)
329{
330	struct slot *slot;
331	struct hotplug_slot *hotplug_slot;
332	struct hotplug_slot_info *hotplug_slot_info;
333	u8 number_of_slots;
334	u8 slot_device;
335	u8 slot_number;
336	u8 ctrl_slot;
337	u32 tempdword;
338	void __iomem *slot_entry= NULL;
339	int result = -ENOMEM;
340
341	dbg("%s\n", __FUNCTION__);
342
343	tempdword = readl(ctrl->hpc_reg + INT_INPUT_CLEAR);
344
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;
348
349	while (number_of_slots) {
350		slot = kzalloc(sizeof(*slot), GFP_KERNEL);
351		if (!slot)
352			goto error;
353
354		slot->hotplug_slot = kzalloc(sizeof(*(slot->hotplug_slot)),
355						GFP_KERNEL);
356		if (!slot->hotplug_slot)
357			goto error_slot;
358		hotplug_slot = slot->hotplug_slot;
359
360		hotplug_slot->info =
361				kzalloc(sizeof(*(hotplug_slot->info)),
362							GFP_KERNEL);
363		if (!hotplug_slot->info)
364			goto error_hpslot;
365		hotplug_slot_info = hotplug_slot->info;
366		hotplug_slot->name = kmalloc(SLOT_NAME_SIZE, GFP_KERNEL);
367
368		if (!hotplug_slot->name)
369			goto error_info;
370
371		slot->ctrl = ctrl;
372		slot->bus = ctrl->bus;
373		slot->device = slot_device;
374		slot->number = slot_number;
375		dbg("slot->number = %d\n", slot->number);
376
377		slot_entry = get_SMBIOS_entry(smbios_start, smbios_table, 9,
378					slot_entry);
379
380		while (slot_entry && (readw(slot_entry + SMBIOS_SLOT_NUMBER) !=
381				slot->number)) {
382			slot_entry = get_SMBIOS_entry(smbios_start,
383						smbios_table, 9, slot_entry);
384		}
385
386		slot->p_sm_slot = slot_entry;
387
388		init_timer(&slot->task_event);
389		slot->task_event.expires = jiffies + 5 * HZ;
390		slot->task_event.function = cpqhp_pushbutton_thread;
391
392		//       they need to be correctly implemented
393		slot->capabilities |= PCISLOT_REPLACE_SUPPORTED;
394		slot->capabilities |= PCISLOT_INTERLOCK_SUPPORTED;
395
396		if (is_slot64bit(slot))
397			slot->capabilities |= PCISLOT_64_BIT_SUPPORTED;
398		if (is_slot66mhz(slot))
399			slot->capabilities |= PCISLOT_66_MHZ_SUPPORTED;
400		if (ctrl->speed == PCI_SPEED_66MHz)
401			slot->capabilities |= PCISLOT_66_MHZ_OPERATION;
402
403		ctrl_slot =
404			slot_device - (readb(ctrl->hpc_reg + SLOT_MASK) >> 4);
405
406		// Check presence
407		slot->capabilities |=
408			((((~tempdword) >> 23) |
409			 ((~tempdword) >> 15)) >> ctrl_slot) & 0x02;
410		// Check the switch state
411		slot->capabilities |=
412			((~tempdword & 0xFF) >> ctrl_slot) & 0x01;
413		// Check the slot enable
414		slot->capabilities |=
415			((read_slot_enable(ctrl) << 2) >> ctrl_slot) & 0x04;
416
417		/* register this slot with the hotplug pci core */
418		hotplug_slot->release = &release_slot;
419		hotplug_slot->private = slot;
420		make_slot_name(hotplug_slot->name, SLOT_NAME_SIZE, slot);
421		hotplug_slot->ops = &cpqphp_hotplug_slot_ops;
422
423		hotplug_slot_info->power_status = get_slot_enabled(ctrl, slot);
424		hotplug_slot_info->attention_status =
425			cpq_get_attention_status(ctrl, slot);
426		hotplug_slot_info->latch_status =
427			cpq_get_latch_status(ctrl, slot);
428		hotplug_slot_info->adapter_status =
429			get_presence_status(ctrl, slot);
430
431		dbg("registering bus %d, dev %d, number %d, "
432				"ctrl->slot_device_offset %d, slot %d\n",
433				slot->bus, slot->device,
434				slot->number, ctrl->slot_device_offset,
435				slot_number);
436		result = pci_hp_register(hotplug_slot);
437		if (result) {
438			err("pci_hp_register failed with error %d\n", result);
439			goto error_name;
440		}
441
442		slot->next = ctrl->slot;
443		ctrl->slot = slot;
444
445		number_of_slots--;
446		slot_device++;
447		slot_number++;
448	}
449
450	return 0;
451error_name:
452	kfree(hotplug_slot->name);
453error_info:
454	kfree(hotplug_slot_info);
455error_hpslot:
456	kfree(hotplug_slot);
457error_slot:
458	kfree(slot);
459error:
460	return result;
461}
462
463static int ctrl_slot_cleanup (struct controller * ctrl)
464{
465	struct slot *old_slot, *next_slot;
466
467	old_slot = ctrl->slot;
468	ctrl->slot = NULL;
469
470	while (old_slot) {
471		/* memory will be freed by the release_slot callback */
472		next_slot = old_slot->next;
473		pci_hp_deregister (old_slot->hotplug_slot);
474		old_slot = next_slot;
475	}
476
477	cpqhp_remove_debugfs_files(ctrl);
478
479	//Free IRQ associated with hot plug device
480	free_irq(ctrl->interrupt, ctrl);
481	//Unmap the memory
482	iounmap(ctrl->hpc_reg);
483	//Finally reclaim PCI mem
484	release_mem_region(pci_resource_start(ctrl->pci_dev, 0),
485			   pci_resource_len(ctrl->pci_dev, 0));
486
487	return(0);
488}
489
490
491//============================================================================
492// function:	get_slot_mapping
493//
494// Description: Attempts to determine a logical slot mapping for a PCI
495//		device.  Won't work for more than one PCI-PCI bridge
496//		in a slot.
497//
498// Input:	u8 bus_num - bus number of PCI device
499//		u8 dev_num - device number of PCI device
500//		u8 *slot - Pointer to u8 where slot number will
501//			be returned
502//
503// Output:	SUCCESS or FAILURE
504//=============================================================================
505static int
506get_slot_mapping(struct pci_bus *bus, u8 bus_num, u8 dev_num, u8 *slot)
507{
508	struct irq_routing_table *PCIIRQRoutingInfoLength;
509	u32 work;
510	long len;
511	long loop;
512
513	u8 tbus, tdevice, tslot, bridgeSlot;
514
515	dbg("%s: %p, %d, %d, %p\n", __FUNCTION__, bus, bus_num, dev_num, slot);
516
517	bridgeSlot = 0xFF;
518
519	PCIIRQRoutingInfoLength = pcibios_get_irq_routing_table();
520	if (!PCIIRQRoutingInfoLength)
521		return -1;
522
523	len = (PCIIRQRoutingInfoLength->size -
524	       sizeof(struct irq_routing_table)) / sizeof(struct irq_info);
525	// Make sure I got at least one entry
526	if (len == 0) {
527		kfree(PCIIRQRoutingInfoLength);
528		return -1;
529	}
530
531	for (loop = 0; loop < len; ++loop) {
532		tbus = PCIIRQRoutingInfoLength->slots[loop].bus;
533		tdevice = PCIIRQRoutingInfoLength->slots[loop].devfn >> 3;
534		tslot = PCIIRQRoutingInfoLength->slots[loop].slot;
535
536		if ((tbus == bus_num) && (tdevice == dev_num)) {
537			*slot = tslot;
538			kfree(PCIIRQRoutingInfoLength);
539			return 0;
540		} else {
541			/* Did not get a match on the target PCI device. Check
542			 * if the current IRQ table entry is a PCI-to-PCI bridge
543			 * device.  If so, and it's secondary bus matches the
544			 * bus number for the target device, I need to save the
545			 * bridge's slot number.  If I can not find an entry for
546			 * the target device, I will have to assume it's on the
547			 * other side of the bridge, and assign it the bridge's
548			 * slot. */
549			bus->number = tbus;
550			pci_bus_read_config_dword(bus, PCI_DEVFN(tdevice, 0),
551						PCI_REVISION_ID, &work);
552
553			if ((work >> 8) == PCI_TO_PCI_BRIDGE_CLASS) {
554				pci_bus_read_config_dword(bus,
555							PCI_DEVFN(tdevice, 0),
556							PCI_PRIMARY_BUS, &work);
557				// See if bridge's secondary bus matches target bus.
558				if (((work >> 8) & 0x000000FF) == (long) bus_num) {
559					bridgeSlot = tslot;
560				}
561			}
562		}
563
564	}
565
566	// If we got here, we didn't find an entry in the IRQ mapping table
567	// for the target PCI device.  If we did determine that the target
568	// device is on the other side of a PCI-to-PCI bridge, return the
569	// slot number for the bridge.
570	if (bridgeSlot != 0xFF) {
571		*slot = bridgeSlot;
572		kfree(PCIIRQRoutingInfoLength);
573		return 0;
574	}
575	kfree(PCIIRQRoutingInfoLength);
576	// Couldn't find an entry in the routing table for this PCI device
577	return -1;
578}
579
580
581/**
582 * cpqhp_set_attention_status - Turns the Amber LED for a slot on or off
583 *
584 */
585static int
586cpqhp_set_attention_status(struct controller *ctrl, struct pci_func *func,
587				u32 status)
588{
589	u8 hp_slot;
590
591	if (func == NULL)
592		return(1);
593
594	hp_slot = func->device - ctrl->slot_device_offset;
595
596	// Wait for exclusive access to hardware
597	mutex_lock(&ctrl->crit_sect);
598
599	if (status == 1) {
600		amber_LED_on (ctrl, hp_slot);
601	} else if (status == 0) {
602		amber_LED_off (ctrl, hp_slot);
603	} else {
604		// Done with exclusive hardware access
605		mutex_unlock(&ctrl->crit_sect);
606		return(1);
607	}
608
609	set_SOGO(ctrl);
610
611	// Wait for SOBS to be unset
612	wait_for_ctrl_irq (ctrl);
613
614	// Done with exclusive hardware access
615	mutex_unlock(&ctrl->crit_sect);
616
617	return(0);
618}
619
620
621/**
622 * set_attention_status - Turns the Amber LED for a slot on or off
623 *
624 */
625static int set_attention_status (struct hotplug_slot *hotplug_slot, u8 status)
626{
627	struct pci_func *slot_func;
628	struct slot *slot = hotplug_slot->private;
629	struct controller *ctrl = slot->ctrl;
630	u8 bus;
631	u8 devfn;
632	u8 device;
633	u8 function;
634
635	dbg("%s - physical_slot = %s\n", __FUNCTION__, hotplug_slot->name);
636
637	if (cpqhp_get_bus_dev(ctrl, &bus, &devfn, slot->number) == -1)
638		return -ENODEV;
639
640	device = devfn >> 3;
641	function = devfn & 0x7;
642	dbg("bus, dev, fn = %d, %d, %d\n", bus, device, function);
643
644	slot_func = cpqhp_slot_find(bus, device, function);
645	if (!slot_func)
646		return -ENODEV;
647
648	return cpqhp_set_attention_status(ctrl, slot_func, status);
649}
650
651
652static int process_SI(struct hotplug_slot *hotplug_slot)
653{
654	struct pci_func *slot_func;
655	struct slot *slot = hotplug_slot->private;
656	struct controller *ctrl = slot->ctrl;
657	u8 bus;
658	u8 devfn;
659	u8 device;
660	u8 function;
661
662	dbg("%s - physical_slot = %s\n", __FUNCTION__, hotplug_slot->name);
663
664	if (cpqhp_get_bus_dev(ctrl, &bus, &devfn, slot->number) == -1)
665		return -ENODEV;
666
667	device = devfn >> 3;
668	function = devfn & 0x7;
669	dbg("bus, dev, fn = %d, %d, %d\n", bus, device, function);
670
671	slot_func = cpqhp_slot_find(bus, device, function);
672	if (!slot_func)
673		return -ENODEV;
674
675	slot_func->bus = bus;
676	slot_func->device = device;
677	slot_func->function = function;
678	slot_func->configured = 0;
679	dbg("board_added(%p, %p)\n", slot_func, ctrl);
680	return cpqhp_process_SI(ctrl, slot_func);
681}
682
683
684static int process_SS(struct hotplug_slot *hotplug_slot)
685{
686	struct pci_func *slot_func;
687	struct slot *slot = hotplug_slot->private;
688	struct controller *ctrl = slot->ctrl;
689	u8 bus;
690	u8 devfn;
691	u8 device;
692	u8 function;
693
694	dbg("%s - physical_slot = %s\n", __FUNCTION__, hotplug_slot->name);
695
696	if (cpqhp_get_bus_dev(ctrl, &bus, &devfn, slot->number) == -1)
697		return -ENODEV;
698
699	device = devfn >> 3;
700	function = devfn & 0x7;
701	dbg("bus, dev, fn = %d, %d, %d\n", bus, device, function);
702
703	slot_func = cpqhp_slot_find(bus, device, function);
704	if (!slot_func)
705		return -ENODEV;
706
707	dbg("In %s, slot_func = %p, ctrl = %p\n", __FUNCTION__, slot_func, ctrl);
708	return cpqhp_process_SS(ctrl, slot_func);
709}
710
711
712static int hardware_test(struct hotplug_slot *hotplug_slot, u32 value)
713{
714	struct slot *slot = hotplug_slot->private;
715	struct controller *ctrl = slot->ctrl;
716
717	dbg("%s - physical_slot = %s\n", __FUNCTION__, hotplug_slot->name);
718
719	return cpqhp_hardware_test(ctrl, value);
720}
721
722
723static int get_power_status(struct hotplug_slot *hotplug_slot, u8 *value)
724{
725	struct slot *slot = hotplug_slot->private;
726	struct controller *ctrl = slot->ctrl;
727
728	dbg("%s - physical_slot = %s\n", __FUNCTION__, hotplug_slot->name);
729
730	*value = get_slot_enabled(ctrl, slot);
731	return 0;
732}
733
734static int get_attention_status(struct hotplug_slot *hotplug_slot, u8 *value)
735{
736	struct slot *slot = hotplug_slot->private;
737	struct controller *ctrl = slot->ctrl;
738
739	dbg("%s - physical_slot = %s\n", __FUNCTION__, hotplug_slot->name);
740
741	*value = cpq_get_attention_status(ctrl, slot);
742	return 0;
743}
744
745static int get_latch_status(struct hotplug_slot *hotplug_slot, u8 *value)
746{
747	struct slot *slot = hotplug_slot->private;
748	struct controller *ctrl = slot->ctrl;
749
750	dbg("%s - physical_slot = %s\n", __FUNCTION__, hotplug_slot->name);
751
752	*value = cpq_get_latch_status(ctrl, slot);
753
754	return 0;
755}
756
757static int get_adapter_status(struct hotplug_slot *hotplug_slot, u8 *value)
758{
759	struct slot *slot = hotplug_slot->private;
760	struct controller *ctrl = slot->ctrl;
761
762	dbg("%s - physical_slot = %s\n", __FUNCTION__, hotplug_slot->name);
763
764	*value = get_presence_status(ctrl, slot);
765
766	return 0;
767}
768
769static int get_max_bus_speed (struct hotplug_slot *hotplug_slot, enum pci_bus_speed *value)
770{
771	struct slot *slot = hotplug_slot->private;
772	struct controller *ctrl = slot->ctrl;
773
774	dbg("%s - physical_slot = %s\n", __FUNCTION__, hotplug_slot->name);
775
776	*value = ctrl->speed_capability;
777
778	return 0;
779}
780
781static int get_cur_bus_speed (struct hotplug_slot *hotplug_slot, enum pci_bus_speed *value)
782{
783	struct slot *slot = hotplug_slot->private;
784	struct controller *ctrl = slot->ctrl;
785
786	dbg("%s - physical_slot = %s\n", __FUNCTION__, hotplug_slot->name);
787
788	*value = ctrl->speed;
789
790	return 0;
791}
792
793static int cpqhpc_probe(struct pci_dev *pdev, const struct pci_device_id *ent)
794{
795	u8 num_of_slots = 0;
796	u8 hp_slot = 0;
797	u8 device;
798	u8 rev;
799	u8 bus_cap;
800	u16 temp_word;
801	u16 vendor_id;
802	u16 subsystem_vid;
803	u16 subsystem_deviceid;
804	u32 rc;
805	struct controller *ctrl;
806	struct pci_func *func;
807	int err;
808
809	err = pci_enable_device(pdev);
810	if (err) {
811		printk(KERN_ERR MY_NAME ": cannot enable PCI device %s (%d)\n",
812			pci_name(pdev), err);
813		return err;
814	}
815
816	// Need to read VID early b/c it's used to differentiate CPQ and INTC discovery
817	rc = pci_read_config_word(pdev, PCI_VENDOR_ID, &vendor_id);
818	if (rc || ((vendor_id != PCI_VENDOR_ID_COMPAQ) && (vendor_id != PCI_VENDOR_ID_INTEL))) {
819		err(msg_HPC_non_compaq_or_intel);
820		rc = -ENODEV;
821		goto err_disable_device;
822	}
823	dbg("Vendor ID: %x\n", vendor_id);
824
825	rc = pci_read_config_byte(pdev, PCI_REVISION_ID, &rev);
826	dbg("revision: %d\n", rev);
827	if (rc || ((vendor_id == PCI_VENDOR_ID_COMPAQ) && (!rev))) {
828		err(msg_HPC_rev_error);
829		rc = -ENODEV;
830		goto err_disable_device;
831	}
832
833	/* Check for the proper subsytem ID's
834	 * Intel uses a different SSID programming model than Compaq.
835	 * For Intel, each SSID bit identifies a PHP capability.
836	 * Also Intel HPC's may have RID=0.
837	 */
838	if ((rev > 2) || (vendor_id == PCI_VENDOR_ID_INTEL)) {
839		// TODO: This code can be made to support non-Compaq or Intel subsystem IDs
840		rc = pci_read_config_word(pdev, PCI_SUBSYSTEM_VENDOR_ID, &subsystem_vid);
841		if (rc) {
842			err("%s : pci_read_config_word failed\n", __FUNCTION__);
843			goto err_disable_device;
844		}
845		dbg("Subsystem Vendor ID: %x\n", subsystem_vid);
846		if ((subsystem_vid != PCI_VENDOR_ID_COMPAQ) && (subsystem_vid != PCI_VENDOR_ID_INTEL)) {
847			err(msg_HPC_non_compaq_or_intel);
848			rc = -ENODEV;
849			goto err_disable_device;
850		}
851
852		ctrl = kzalloc(sizeof(struct controller), GFP_KERNEL);
853		if (!ctrl) {
854			err("%s : out of memory\n", __FUNCTION__);
855			rc = -ENOMEM;
856			goto err_disable_device;
857		}
858
859		rc = pci_read_config_word(pdev, PCI_SUBSYSTEM_ID, &subsystem_deviceid);
860		if (rc) {
861			err("%s : pci_read_config_word failed\n", __FUNCTION__);
862			goto err_free_ctrl;
863		}
864
865		info("Hot Plug Subsystem Device ID: %x\n", subsystem_deviceid);
866
867		/* Set Vendor ID, so it can be accessed later from other functions */
868		ctrl->vendor_id = vendor_id;
869
870		switch (subsystem_vid) {
871			case PCI_VENDOR_ID_COMPAQ:
872				if (rev >= 0x13) { /* CIOBX */
873					ctrl->push_flag = 1;
874					ctrl->slot_switch_type = 1;
875					ctrl->push_button = 1;
876					ctrl->pci_config_space = 1;
877					ctrl->defeature_PHP = 1;
878					ctrl->pcix_support = 1;
879					ctrl->pcix_speed_capability = 1;
880					pci_read_config_byte(pdev, 0x41, &bus_cap);
881					if (bus_cap & 0x80) {
882						dbg("bus max supports 133MHz PCI-X\n");
883						ctrl->speed_capability = PCI_SPEED_133MHz_PCIX;
884						break;
885					}
886					if (bus_cap & 0x40) {
887						dbg("bus max supports 100MHz PCI-X\n");
888						ctrl->speed_capability = PCI_SPEED_100MHz_PCIX;
889						break;
890					}
891					if (bus_cap & 20) {
892						dbg("bus max supports 66MHz PCI-X\n");
893						ctrl->speed_capability = PCI_SPEED_66MHz_PCIX;
894						break;
895					}
896					if (bus_cap & 10) {
897						dbg("bus max supports 66MHz PCI\n");
898						ctrl->speed_capability = PCI_SPEED_66MHz;
899						break;
900					}
901
902					break;
903				}
904
905				switch (subsystem_deviceid) {
906					case PCI_SUB_HPC_ID:
907						/* Original 6500/7000 implementation */
908						ctrl->slot_switch_type = 1;
909						ctrl->speed_capability = PCI_SPEED_33MHz;
910						ctrl->push_button = 0;
911						ctrl->pci_config_space = 1;
912						ctrl->defeature_PHP = 1;
913						ctrl->pcix_support = 0;
914						ctrl->pcix_speed_capability = 0;
915						break;
916					case PCI_SUB_HPC_ID2:
917						/* First Pushbutton implementation */
918						ctrl->push_flag = 1;
919						ctrl->slot_switch_type = 1;
920						ctrl->speed_capability = PCI_SPEED_33MHz;
921						ctrl->push_button = 1;
922						ctrl->pci_config_space = 1;
923						ctrl->defeature_PHP = 1;
924						ctrl->pcix_support = 0;
925						ctrl->pcix_speed_capability = 0;
926						break;
927					case PCI_SUB_HPC_ID_INTC:
928						/* Third party (6500/7000) */
929						ctrl->slot_switch_type = 1;
930						ctrl->speed_capability = PCI_SPEED_33MHz;
931						ctrl->push_button = 0;
932						ctrl->pci_config_space = 1;
933						ctrl->defeature_PHP = 1;
934						ctrl->pcix_support = 0;
935						ctrl->pcix_speed_capability = 0;
936						break;
937					case PCI_SUB_HPC_ID3:
938						/* First 66 Mhz implementation */
939						ctrl->push_flag = 1;
940						ctrl->slot_switch_type = 1;
941						ctrl->speed_capability = PCI_SPEED_66MHz;
942						ctrl->push_button = 1;
943						ctrl->pci_config_space = 1;
944						ctrl->defeature_PHP = 1;
945						ctrl->pcix_support = 0;
946						ctrl->pcix_speed_capability = 0;
947						break;
948					case PCI_SUB_HPC_ID4:
949						/* First PCI-X implementation, 100MHz */
950						ctrl->push_flag = 1;
951						ctrl->slot_switch_type = 1;
952						ctrl->speed_capability = PCI_SPEED_100MHz_PCIX;
953						ctrl->push_button = 1;
954						ctrl->pci_config_space = 1;
955						ctrl->defeature_PHP = 1;
956						ctrl->pcix_support = 1;
957						ctrl->pcix_speed_capability = 0;
958						break;
959					default:
960						err(msg_HPC_not_supported);
961						rc = -ENODEV;
962						goto err_free_ctrl;
963				}
964				break;
965
966			case PCI_VENDOR_ID_INTEL:
967				/* Check for speed capability (0=33, 1=66) */
968				if (subsystem_deviceid & 0x0001) {
969					ctrl->speed_capability = PCI_SPEED_66MHz;
970				} else {
971					ctrl->speed_capability = PCI_SPEED_33MHz;
972				}
973
974				/* Check for push button */
975				if (subsystem_deviceid & 0x0002) {
976					/* no push button */
977					ctrl->push_button = 0;
978				} else {
979					/* push button supported */
980					ctrl->push_button = 1;
981				}
982
983				/* Check for slot switch type (0=mechanical, 1=not mechanical) */
984				if (subsystem_deviceid & 0x0004) {
985					/* no switch */
986					ctrl->slot_switch_type = 0;
987				} else {
988					/* switch */
989					ctrl->slot_switch_type = 1;
990				}
991
992				/* PHP Status (0=De-feature PHP, 1=Normal operation) */
993				if (subsystem_deviceid & 0x0008) {
994					ctrl->defeature_PHP = 1;	// PHP supported
995				} else {
996					ctrl->defeature_PHP = 0;	// PHP not supported
997				}
998
999				/* Alternate Base Address Register Interface (0=not supported, 1=supported) */
1000				if (subsystem_deviceid & 0x0010) {
1001					ctrl->alternate_base_address = 1;	// supported
1002				} else {
1003					ctrl->alternate_base_address = 0;	// not supported
1004				}
1005
1006				/* PCI Config Space Index (0=not supported, 1=supported) */
1007				if (subsystem_deviceid & 0x0020) {
1008					ctrl->pci_config_space = 1;		// supported
1009				} else {
1010					ctrl->pci_config_space = 0;		// not supported
1011				}
1012
1013				/* PCI-X support */
1014				if (subsystem_deviceid & 0x0080) {
1015					/* PCI-X capable */
1016					ctrl->pcix_support = 1;
1017					/* Frequency of operation in PCI-X mode */
1018					if (subsystem_deviceid & 0x0040) {
1019						/* 133MHz PCI-X if bit 7 is 1 */
1020						ctrl->pcix_speed_capability = 1;
1021					} else {
1022						/* 100MHz PCI-X if bit 7 is 1 and bit 0 is 0, */
1023						/* 66MHz PCI-X if bit 7 is 1 and bit 0 is 1 */
1024						ctrl->pcix_speed_capability = 0;
1025					}
1026				} else {
1027					/* Conventional PCI */
1028					ctrl->pcix_support = 0;
1029					ctrl->pcix_speed_capability = 0;
1030				}
1031				break;
1032
1033			default:
1034				err(msg_HPC_not_supported);
1035				rc = -ENODEV;
1036				goto err_free_ctrl;
1037		}
1038
1039	} else {
1040		err(msg_HPC_not_supported);
1041		return -ENODEV;
1042	}
1043
1044	// Tell the user that we found one.
1045	info("Initializing the PCI hot plug controller residing on PCI bus %d\n",
1046					pdev->bus->number);
1047
1048	dbg("Hotplug controller capabilities:\n");
1049	dbg("    speed_capability       %d\n", ctrl->speed_capability);
1050	dbg("    slot_switch_type       %s\n", ctrl->slot_switch_type ?
1051					"switch present" : "no switch");
1052	dbg("    defeature_PHP          %s\n", ctrl->defeature_PHP ?
1053					"PHP supported" : "PHP not supported");
1054	dbg("    alternate_base_address %s\n", ctrl->alternate_base_address ?
1055					"supported" : "not supported");
1056	dbg("    pci_config_space       %s\n", ctrl->pci_config_space ?
1057					"supported" : "not supported");
1058	dbg("    pcix_speed_capability  %s\n", ctrl->pcix_speed_capability ?
1059					"supported" : "not supported");
1060	dbg("    pcix_support           %s\n", ctrl->pcix_support ?
1061					"supported" : "not supported");
1062
1063	ctrl->pci_dev = pdev;
1064	pci_set_drvdata(pdev, ctrl);
1065
1066	/* make our own copy of the pci bus structure,
1067	 * as we like tweaking it a lot */
1068	ctrl->pci_bus = kmalloc(sizeof(*ctrl->pci_bus), GFP_KERNEL);
1069	if (!ctrl->pci_bus) {
1070		err("out of memory\n");
1071		rc = -ENOMEM;
1072		goto err_free_ctrl;
1073	}
1074	memcpy(ctrl->pci_bus, pdev->bus, sizeof(*ctrl->pci_bus));
1075
1076	ctrl->bus = pdev->bus->number;
1077	ctrl->rev = rev;
1078	dbg("bus device function rev: %d %d %d %d\n", ctrl->bus,
1079		PCI_SLOT(pdev->devfn), PCI_FUNC(pdev->devfn), ctrl->rev);
1080
1081	mutex_init(&ctrl->crit_sect);
1082	init_waitqueue_head(&ctrl->queue);
1083
1084	/* initialize our threads if they haven't already been started up */
1085	rc = one_time_init();
1086	if (rc) {
1087		goto err_free_bus;
1088	}
1089
1090	dbg("pdev = %p\n", pdev);
1091	dbg("pci resource start %llx\n", (unsigned long long)pci_resource_start(pdev, 0));
1092	dbg("pci resource len %llx\n", (unsigned long long)pci_resource_len(pdev, 0));
1093
1094	if (!request_mem_region(pci_resource_start(pdev, 0),
1095				pci_resource_len(pdev, 0), MY_NAME)) {
1096		err("cannot reserve MMIO region\n");
1097		rc = -ENOMEM;
1098		goto err_free_bus;
1099	}
1100
1101	ctrl->hpc_reg = ioremap(pci_resource_start(pdev, 0),
1102					pci_resource_len(pdev, 0));
1103	if (!ctrl->hpc_reg) {
1104		err("cannot remap MMIO region %llx @ %llx\n",
1105		    (unsigned long long)pci_resource_len(pdev, 0),
1106		    (unsigned long long)pci_resource_start(pdev, 0));
1107		rc = -ENODEV;
1108		goto err_free_mem_region;
1109	}
1110
1111	// Check for 66Mhz operation
1112	ctrl->speed = get_controller_speed(ctrl);
1113
1114
1115	/********************************************************
1116	 *
1117	 *              Save configuration headers for this and
1118	 *              subordinate PCI buses
1119	 *
1120	 ********************************************************/
1121
1122	// find the physical slot number of the first hot plug slot
1123
1124	/* Get slot won't work for devices behind bridges, but
1125	 * in this case it will always be called for the "base"
1126	 * bus/dev/func of a slot.
1127	 * CS: this is leveraging the PCIIRQ routing code from the kernel
1128	 * (pci-pc.c: get_irq_routing_table) */
1129	rc = get_slot_mapping(ctrl->pci_bus, pdev->bus->number,
1130				(readb(ctrl->hpc_reg + SLOT_MASK) >> 4),
1131				&(ctrl->first_slot));
1132	dbg("get_slot_mapping: first_slot = %d, returned = %d\n",
1133				ctrl->first_slot, rc);
1134	if (rc) {
1135		err(msg_initialization_err, rc);
1136		goto err_iounmap;
1137	}
1138
1139	// Store PCI Config Space for all devices on this bus
1140	rc = cpqhp_save_config(ctrl, ctrl->bus, readb(ctrl->hpc_reg + SLOT_MASK));
1141	if (rc) {
1142		err("%s: unable to save PCI configuration data, error %d\n",
1143				__FUNCTION__, rc);
1144		goto err_iounmap;
1145	}
1146
1147	/*
1148	 * Get IO, memory, and IRQ resources for new devices
1149	 */
1150	// The next line is required for cpqhp_find_available_resources
1151	ctrl->interrupt = pdev->irq;
1152	if (ctrl->interrupt < 0x10) {
1153		cpqhp_legacy_mode = 1;
1154		dbg("System seems to be configured for Full Table Mapped MPS mode\n");
1155	}
1156
1157	ctrl->cfgspc_irq = 0;
1158	pci_read_config_byte(pdev, PCI_INTERRUPT_LINE, &ctrl->cfgspc_irq);
1159
1160	rc = cpqhp_find_available_resources(ctrl, cpqhp_rom_start);
1161	ctrl->add_support = !rc;
1162	if (rc) {
1163		dbg("cpqhp_find_available_resources = 0x%x\n", rc);
1164		err("unable to locate PCI configuration resources for hot plug add.\n");
1165		goto err_iounmap;
1166	}
1167
1168	/*
1169	 * Finish setting up the hot plug ctrl device
1170	 */
1171	ctrl->slot_device_offset = readb(ctrl->hpc_reg + SLOT_MASK) >> 4;
1172	dbg("NumSlots %d \n", ctrl->slot_device_offset);
1173
1174	ctrl->next_event = 0;
1175
1176	/* Setup the slot information structures */
1177	rc = ctrl_slot_setup(ctrl, smbios_start, smbios_table);
1178	if (rc) {
1179		err(msg_initialization_err, 6);
1180		err("%s: unable to save PCI configuration data, error %d\n",
1181			__FUNCTION__, rc);
1182		goto err_iounmap;
1183	}
1184
1185	/* Mask all general input interrupts */
1186	writel(0xFFFFFFFFL, ctrl->hpc_reg + INT_MASK);
1187
1188	/* set up the interrupt */
1189	dbg("HPC interrupt = %d \n", ctrl->interrupt);
1190	if (request_irq(ctrl->interrupt, cpqhp_ctrl_intr,
1191			IRQF_SHARED, MY_NAME, ctrl)) {
1192		err("Can't get irq %d for the hotplug pci controller\n",
1193			ctrl->interrupt);
1194		rc = -ENODEV;
1195		goto err_iounmap;
1196	}
1197
1198	/* Enable Shift Out interrupt and clear it, also enable SERR on power fault */
1199	temp_word = readw(ctrl->hpc_reg + MISC);
1200	temp_word |= 0x4006;
1201	writew(temp_word, ctrl->hpc_reg + MISC);
1202
1203	// Changed 05/05/97 to clear all interrupts at start
1204	writel(0xFFFFFFFFL, ctrl->hpc_reg + INT_INPUT_CLEAR);
1205
1206	ctrl->ctrl_int_comp = readl(ctrl->hpc_reg + INT_INPUT_CLEAR);
1207
1208	writel(0x0L, ctrl->hpc_reg + INT_MASK);
1209
1210	if (!cpqhp_ctrl_list) {
1211		cpqhp_ctrl_list = ctrl;
1212		ctrl->next = NULL;
1213	} else {
1214		ctrl->next = cpqhp_ctrl_list;
1215		cpqhp_ctrl_list = ctrl;
1216	}
1217
1218	// turn off empty slots here unless command line option "ON" set
1219	// Wait for exclusive access to hardware
1220	mutex_lock(&ctrl->crit_sect);
1221
1222	num_of_slots = readb(ctrl->hpc_reg + SLOT_MASK) & 0x0F;
1223
1224	// find first device number for the ctrl
1225	device = readb(ctrl->hpc_reg + SLOT_MASK) >> 4;
1226
1227	while (num_of_slots) {
1228		dbg("num_of_slots: %d\n", num_of_slots);
1229		func = cpqhp_slot_find(ctrl->bus, device, 0);
1230		if (!func)
1231			break;
1232
1233		hp_slot = func->device - ctrl->slot_device_offset;
1234		dbg("hp_slot: %d\n", hp_slot);
1235
1236		// We have to save the presence info for these slots
1237		temp_word = ctrl->ctrl_int_comp >> 16;
1238		func->presence_save = (temp_word >> hp_slot) & 0x01;
1239		func->presence_save |= (temp_word >> (hp_slot + 7)) & 0x02;
1240
1241		if (ctrl->ctrl_int_comp & (0x1L << hp_slot)) {
1242			func->switch_save = 0;
1243		} else {
1244			func->switch_save = 0x10;
1245		}
1246
1247		if (!power_mode) {
1248			if (!func->is_a_board) {
1249				green_LED_off(ctrl, hp_slot);
1250				slot_disable(ctrl, hp_slot);
1251			}
1252		}
1253
1254		device++;
1255		num_of_slots--;
1256	}
1257
1258	if (!power_mode) {
1259		set_SOGO(ctrl);
1260		// Wait for SOBS to be unset
1261		wait_for_ctrl_irq(ctrl);
1262	}
1263
1264	rc = init_SERR(ctrl);
1265	if (rc) {
1266		err("init_SERR failed\n");
1267		mutex_unlock(&ctrl->crit_sect);
1268		goto err_free_irq;
1269	}
1270
1271	// Done with exclusive hardware access
1272	mutex_unlock(&ctrl->crit_sect);
1273
1274	cpqhp_create_debugfs_files(ctrl);
1275
1276	return 0;
1277
1278err_free_irq:
1279	free_irq(ctrl->interrupt, ctrl);
1280err_iounmap:
1281	iounmap(ctrl->hpc_reg);
1282err_free_mem_region:
1283	release_mem_region(pci_resource_start(pdev, 0), pci_resource_len(pdev, 0));
1284err_free_bus:
1285	kfree(ctrl->pci_bus);
1286err_free_ctrl:
1287	kfree(ctrl);
1288err_disable_device:
1289	pci_disable_device(pdev);
1290	return rc;
1291}
1292
1293
1294static int one_time_init(void)
1295{
1296	int loop;
1297	int retval = 0;
1298
1299	if (initialized)
1300		return 0;
1301
1302	power_mode = 0;
1303
1304	retval = pci_print_IRQ_route();
1305	if (retval)
1306		goto error;
1307
1308	dbg("Initialize + Start the notification mechanism \n");
1309
1310	retval = cpqhp_event_start_thread();
1311	if (retval)
1312		goto error;
1313
1314	dbg("Initialize slot lists\n");
1315	for (loop = 0; loop < 256; loop++) {
1316		cpqhp_slot_list[loop] = NULL;
1317	}
1318
1319	// this also needs to be worked with Christoph
1320	// register_NMI_handler();
1321
1322	// Map rom address
1323	cpqhp_rom_start = ioremap(ROM_PHY_ADDR, ROM_PHY_LEN);
1324	if (!cpqhp_rom_start) {
1325		err ("Could not ioremap memory region for ROM\n");
1326		retval = -EIO;
1327		goto error;
1328	}
1329
1330	/* Now, map the int15 entry point if we are on compaq specific hardware */
1331	compaq_nvram_init(cpqhp_rom_start);
1332
1333	/* Map smbios table entry point structure */
1334	smbios_table = detect_SMBIOS_pointer(cpqhp_rom_start,
1335					cpqhp_rom_start + ROM_PHY_LEN);
1336	if (!smbios_table) {
1337		err ("Could not find the SMBIOS pointer in memory\n");
1338		retval = -EIO;
1339		goto error_rom_start;
1340	}
1341
1342	smbios_start = ioremap(readl(smbios_table + ST_ADDRESS),
1343					readw(smbios_table + ST_LENGTH));
1344	if (!smbios_start) {
1345		err ("Could not ioremap memory region taken from SMBIOS values\n");
1346		retval = -EIO;
1347		goto error_smbios_start;
1348	}
1349
1350	initialized = 1;
1351
1352	return retval;
1353
1354error_smbios_start:
1355	iounmap(smbios_start);
1356error_rom_start:
1357	iounmap(cpqhp_rom_start);
1358error:
1359	return retval;
1360}
1361
1362
1363static void __exit unload_cpqphpd(void)
1364{
1365	struct pci_func *next;
1366	struct pci_func *TempSlot;
1367	int loop;
1368	u32 rc;
1369	struct controller *ctrl;
1370	struct controller *tctrl;
1371	struct pci_resource *res;
1372	struct pci_resource *tres;
1373
1374	rc = compaq_nvram_store(cpqhp_rom_start);
1375
1376	ctrl = cpqhp_ctrl_list;
1377
1378	while (ctrl) {
1379		if (ctrl->hpc_reg) {
1380			u16 misc;
1381			rc = read_slot_enable (ctrl);
1382
1383			writeb(0, ctrl->hpc_reg + SLOT_SERR);
1384			writel(0xFFFFFFC0L | ~rc, ctrl->hpc_reg + INT_MASK);
1385
1386			misc = readw(ctrl->hpc_reg + MISC);
1387			misc &= 0xFFFD;
1388			writew(misc, ctrl->hpc_reg + MISC);
1389		}
1390
1391		ctrl_slot_cleanup(ctrl);
1392
1393		res = ctrl->io_head;
1394		while (res) {
1395			tres = res;
1396			res = res->next;
1397			kfree(tres);
1398		}
1399
1400		res = ctrl->mem_head;
1401		while (res) {
1402			tres = res;
1403			res = res->next;
1404			kfree(tres);
1405		}
1406
1407		res = ctrl->p_mem_head;
1408		while (res) {
1409			tres = res;
1410			res = res->next;
1411			kfree(tres);
1412		}
1413
1414		res = ctrl->bus_head;
1415		while (res) {
1416			tres = res;
1417			res = res->next;
1418			kfree(tres);
1419		}
1420
1421		kfree (ctrl->pci_bus);
1422
1423		tctrl = ctrl;
1424		ctrl = ctrl->next;
1425		kfree(tctrl);
1426	}
1427
1428	for (loop = 0; loop < 256; loop++) {
1429		next = cpqhp_slot_list[loop];
1430		while (next != NULL) {
1431			res = next->io_head;
1432			while (res) {
1433				tres = res;
1434				res = res->next;
1435				kfree(tres);
1436			}
1437
1438			res = next->mem_head;
1439			while (res) {
1440				tres = res;
1441				res = res->next;
1442				kfree(tres);
1443			}
1444
1445			res = next->p_mem_head;
1446			while (res) {
1447				tres = res;
1448				res = res->next;
1449				kfree(tres);
1450			}
1451
1452			res = next->bus_head;
1453			while (res) {
1454				tres = res;
1455				res = res->next;
1456				kfree(tres);
1457			}
1458
1459			TempSlot = next;
1460			next = next->next;
1461			kfree(TempSlot);
1462		}
1463	}
1464
1465	// Stop the notification mechanism
1466	if (initialized)
1467		cpqhp_event_stop_thread();
1468
1469	//unmap the rom address
1470	if (cpqhp_rom_start)
1471		iounmap(cpqhp_rom_start);
1472	if (smbios_start)
1473		iounmap(smbios_start);
1474}
1475
1476
1477
1478static struct pci_device_id hpcd_pci_tbl[] = {
1479	{
1480	/* handle any PCI Hotplug controller */
1481	.class =        ((PCI_CLASS_SYSTEM_PCI_HOTPLUG << 8) | 0x00),
1482	.class_mask =   ~0,
1483
1484	/* no matter who makes it */
1485	.vendor =       PCI_ANY_ID,
1486	.device =       PCI_ANY_ID,
1487	.subvendor =    PCI_ANY_ID,
1488	.subdevice =    PCI_ANY_ID,
1489
1490	}, { /* end: all zeroes */ }
1491};
1492
1493MODULE_DEVICE_TABLE(pci, hpcd_pci_tbl);
1494
1495
1496
1497static struct pci_driver cpqhpc_driver = {
1498	.name =		"compaq_pci_hotplug",
1499	.id_table =	hpcd_pci_tbl,
1500	.probe =	cpqhpc_probe,
1501	/* remove:	cpqhpc_remove_one, */
1502};
1503
1504
1505
1506static int __init cpqhpc_init(void)
1507{
1508	int result;
1509
1510	cpqhp_debug = debug;
1511
1512	info (DRIVER_DESC " version: " DRIVER_VERSION "\n");
1513	cpqhp_initialize_debugfs();
1514	result = pci_register_driver(&cpqhpc_driver);
1515	dbg("pci_register_driver = %d\n", result);
1516	return result;
1517}
1518
1519
1520static void __exit cpqhpc_cleanup(void)
1521{
1522	dbg("unload_cpqphpd()\n");
1523	unload_cpqphpd();
1524
1525	dbg("pci_unregister_driver\n");
1526	pci_unregister_driver(&cpqhpc_driver);
1527	cpqhp_shutdown_debugfs();
1528}
1529
1530
1531module_init(cpqhpc_init);
1532module_exit(cpqhpc_cleanup);
1533