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