patch-2_6_7-vs1_9_1_12
[linux-2.6.git] / drivers / pci / hotplug / shpchp_core.c
1 /*
2  * Standard 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  * Copyright (C) 2003-2004 Intel Corporation
8  *
9  * All rights reserved.
10  *
11  * This program is free software; you can redistribute it and/or modify
12  * it under the terms of the GNU General Public License as published by
13  * the Free Software Foundation; either version 2 of the License, or (at
14  * your option) any later version.
15  *
16  * This program is distributed in the hope that it will be useful, but
17  * WITHOUT ANY WARRANTY; without even the implied warranty of
18  * MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE, GOOD TITLE or
19  * NON INFRINGEMENT.  See the GNU General Public License for more
20  * details.
21  *
22  * You should have received a copy of the GNU General Public License
23  * along with this program; if not, write to the Free Software
24  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
25  *
26  * Send feedback to <greg@kroah.com>, <dely.l.sy@intel.com>
27  *
28  */
29
30 #include <linux/config.h>
31 #include <linux/module.h>
32 #include <linux/moduleparam.h>
33 #include <linux/kernel.h>
34 #include <linux/types.h>
35 #include <linux/proc_fs.h>
36 #include <linux/miscdevice.h>
37 #include <linux/slab.h>
38 #include <linux/workqueue.h>
39 #include <linux/pci.h>
40 #include <linux/init.h>
41 #include <asm/uaccess.h>
42 #include "shpchp.h"
43 #include "shpchprm.h"
44
45 /* Global variables */
46 int shpchp_debug;
47 int shpchp_poll_mode;
48 int shpchp_poll_time;
49 struct controller *shpchp_ctrl_list;    /* = NULL */
50 struct pci_func *shpchp_slot_list[256];
51
52 #define DRIVER_VERSION  "0.4"
53 #define DRIVER_AUTHOR   "Dan Zink <dan.zink@compaq.com>, Greg Kroah-Hartman <greg@kroah.com>, Dely Sy <dely.l.sy@intel.com>"
54 #define DRIVER_DESC     "Standard Hot Plug PCI Controller Driver"
55
56 MODULE_AUTHOR(DRIVER_AUTHOR);
57 MODULE_DESCRIPTION(DRIVER_DESC);
58 MODULE_LICENSE("GPL");
59
60 module_param(shpchp_debug, bool, 644);
61 module_param(shpchp_poll_mode, bool, 644);
62 module_param(shpchp_poll_time, int, 644);
63 MODULE_PARM_DESC(shpchp_debug, "Debugging mode enabled or not");
64 MODULE_PARM_DESC(shpchp_poll_mode, "Using polling mechanism for hot-plug events or not");
65 MODULE_PARM_DESC(shpchp_poll_time, "Polling mechanism frequency, in seconds");
66
67 #define SHPC_MODULE_NAME "shpchp"
68
69 static int shpc_start_thread (void);
70 static int set_attention_status (struct hotplug_slot *slot, u8 value);
71 static int enable_slot          (struct hotplug_slot *slot);
72 static int disable_slot         (struct hotplug_slot *slot);
73 static int get_power_status     (struct hotplug_slot *slot, u8 *value);
74 static int get_attention_status (struct hotplug_slot *slot, u8 *value);
75 static int get_latch_status     (struct hotplug_slot *slot, u8 *value);
76 static int get_adapter_status   (struct hotplug_slot *slot, u8 *value);
77 static int get_max_bus_speed    (struct hotplug_slot *slot, enum pci_bus_speed *value);
78 static int get_cur_bus_speed    (struct hotplug_slot *slot, enum pci_bus_speed *value);
79
80 static struct hotplug_slot_ops shpchp_hotplug_slot_ops = {
81         .owner =                THIS_MODULE,
82         .set_attention_status = set_attention_status,
83         .enable_slot =          enable_slot,
84         .disable_slot =         disable_slot,
85         .get_power_status =     get_power_status,
86         .get_attention_status = get_attention_status,
87         .get_latch_status =     get_latch_status,
88         .get_adapter_status =   get_adapter_status,
89         .get_max_bus_speed =    get_max_bus_speed,
90         .get_cur_bus_speed =    get_cur_bus_speed,
91 };
92
93 /**
94  * release_slot - free up the memory used by a slot
95  * @hotplug_slot: slot to free
96  */
97 static void release_slot(struct hotplug_slot *hotplug_slot)
98 {
99         struct slot *slot = (struct slot *)hotplug_slot->private;
100
101         dbg("%s - physical_slot = %s\n", __FUNCTION__, hotplug_slot->name);
102
103         kfree(slot->hotplug_slot->info);
104         kfree(slot->hotplug_slot->name);
105         kfree(slot->hotplug_slot);
106         kfree(slot);
107 }
108
109 static int init_slots(struct controller *ctrl)
110 {
111         struct slot *new_slot;
112         u8 number_of_slots;
113         u8 slot_device;
114         u32 slot_number, sun;
115         int result = -ENOMEM;
116
117         dbg("%s\n",__FUNCTION__);
118
119         number_of_slots = ctrl->num_slots;
120         slot_device = ctrl->slot_device_offset;
121         slot_number = ctrl->first_slot;
122
123         while (number_of_slots) {
124                 new_slot = (struct slot *) kmalloc(sizeof(struct slot), GFP_KERNEL);
125                 if (!new_slot)
126                         goto error;
127
128                 memset(new_slot, 0, sizeof(struct slot));
129                 new_slot->hotplug_slot = kmalloc (sizeof (struct hotplug_slot), GFP_KERNEL);
130                 if (!new_slot->hotplug_slot)
131                         goto error_slot;
132                 memset(new_slot->hotplug_slot, 0, sizeof (struct hotplug_slot));
133
134                 new_slot->hotplug_slot->info = kmalloc (sizeof (struct hotplug_slot_info), GFP_KERNEL);
135                 if (!new_slot->hotplug_slot->info)
136                         goto error_hpslot;
137                 memset(new_slot->hotplug_slot->info, 0, sizeof (struct hotplug_slot_info));
138                 new_slot->hotplug_slot->name = kmalloc (SLOT_NAME_SIZE, GFP_KERNEL);
139                 if (!new_slot->hotplug_slot->name)
140                         goto error_info;
141
142                 new_slot->magic = SLOT_MAGIC;
143                 new_slot->ctrl = ctrl;
144                 new_slot->bus = ctrl->slot_bus;
145                 new_slot->device = slot_device;
146                 new_slot->hpc_ops = ctrl->hpc_ops;
147
148                 if (shpchprm_get_physical_slot_number(ctrl, &sun,
149                                         new_slot->bus, new_slot->device))
150                         goto error_name;
151
152                 new_slot->number = sun;
153                 new_slot->hp_slot = slot_device - ctrl->slot_device_offset;
154
155                 /* register this slot with the hotplug pci core */
156                 new_slot->hotplug_slot->private = new_slot;
157                 new_slot->hotplug_slot->release = &release_slot;
158                 make_slot_name(new_slot->hotplug_slot->name, SLOT_NAME_SIZE, new_slot);
159                 new_slot->hotplug_slot->ops = &shpchp_hotplug_slot_ops;
160
161                 new_slot->hpc_ops->get_power_status(new_slot, &(new_slot->hotplug_slot->info->power_status));
162                 new_slot->hpc_ops->get_attention_status(new_slot, &(new_slot->hotplug_slot->info->attention_status));
163                 new_slot->hpc_ops->get_latch_status(new_slot, &(new_slot->hotplug_slot->info->latch_status));
164                 new_slot->hpc_ops->get_adapter_status(new_slot, &(new_slot->hotplug_slot->info->adapter_status));
165
166                 dbg("Registering bus=%x dev=%x hp_slot=%x sun=%x slot_device_offset=%x\n", new_slot->bus, 
167                         new_slot->device, new_slot->hp_slot, new_slot->number, ctrl->slot_device_offset);
168                 result = pci_hp_register (new_slot->hotplug_slot);
169                 if (result) {
170                         err ("pci_hp_register failed with error %d\n", result);
171                         goto error_name;
172                 }
173
174                 new_slot->next = ctrl->slot;
175                 ctrl->slot = new_slot;
176
177                 number_of_slots--;
178                 slot_device++;
179                 slot_number += ctrl->slot_num_inc;
180         }
181
182         return 0;
183
184 error_name:
185         kfree(new_slot->hotplug_slot->name);
186 error_info:
187         kfree(new_slot->hotplug_slot->info);
188 error_hpslot:
189         kfree(new_slot->hotplug_slot);
190 error_slot:
191         kfree(new_slot);
192 error:
193         return result;
194 }
195
196 static void cleanup_slots(struct controller *ctrl)
197 {
198         struct slot *old_slot, *next_slot;
199
200         old_slot = ctrl->slot;
201         ctrl->slot = NULL;
202
203         while (old_slot) {
204                 next_slot = old_slot->next;
205                 pci_hp_deregister(old_slot->hotplug_slot);
206                 old_slot = next_slot;
207         }
208 }
209
210 static int get_ctlr_slot_config(struct controller *ctrl)
211 {
212         int num_ctlr_slots;
213         int first_device_num;
214         int physical_slot_num;
215         int updown;
216         int rc;
217         int flags;
218
219         rc = shpc_get_ctlr_slot_config(ctrl, &num_ctlr_slots, &first_device_num, &physical_slot_num, &updown, &flags);
220         if (rc) {
221                 err("%s: get_ctlr_slot_config fail for b:d (%x:%x)\n", __FUNCTION__, ctrl->bus, ctrl->device);
222                 return -1;
223         }
224
225         ctrl->num_slots = num_ctlr_slots;
226         ctrl->slot_device_offset = first_device_num;
227         ctrl->first_slot = physical_slot_num;
228         ctrl->slot_num_inc = updown;            /* either -1 or 1 */
229
230         dbg("%s: num_slot(0x%x) 1st_dev(0x%x) psn(0x%x) updown(%d) for b:d (%x:%x)\n",
231                 __FUNCTION__, num_ctlr_slots, first_device_num, physical_slot_num, updown, ctrl->bus, ctrl->device);
232
233         return 0;
234 }
235
236
237 /*
238  * set_attention_status - Turns the Amber LED for a slot on, off or blink
239  */
240 static int set_attention_status (struct hotplug_slot *hotplug_slot, u8 status)
241 {
242         struct slot *slot = get_slot (hotplug_slot, __FUNCTION__);
243
244         dbg("%s - physical_slot = %s\n", __FUNCTION__, hotplug_slot->name);
245
246         hotplug_slot->info->attention_status = status;
247         slot->hpc_ops->set_attention_status(slot, status);
248
249         return 0;
250 }
251
252
253 static int enable_slot (struct hotplug_slot *hotplug_slot)
254 {
255         struct slot *slot = get_slot (hotplug_slot, __FUNCTION__);
256
257         dbg("%s - physical_slot = %s\n", __FUNCTION__, hotplug_slot->name);
258
259         return shpchp_enable_slot(slot);
260 }
261
262
263 static int disable_slot (struct hotplug_slot *hotplug_slot)
264 {
265         struct slot *slot = get_slot (hotplug_slot, __FUNCTION__);
266
267         dbg("%s - physical_slot = %s\n", __FUNCTION__, hotplug_slot->name);
268
269         return shpchp_disable_slot(slot);
270 }
271
272 static int get_power_status (struct hotplug_slot *hotplug_slot, u8 *value)
273 {
274         struct slot *slot = get_slot (hotplug_slot, __FUNCTION__);
275         int retval;
276
277         dbg("%s - physical_slot = %s\n", __FUNCTION__, hotplug_slot->name);
278
279         retval = slot->hpc_ops->get_power_status(slot, value);
280         if (retval < 0)
281                 *value = hotplug_slot->info->power_status;
282
283         return 0;
284 }
285
286 static int get_attention_status (struct hotplug_slot *hotplug_slot, u8 *value)
287 {
288         struct slot *slot = get_slot (hotplug_slot, __FUNCTION__);
289         int retval;
290
291         dbg("%s - physical_slot = %s\n", __FUNCTION__, hotplug_slot->name);
292
293         retval = slot->hpc_ops->get_attention_status(slot, value);
294         if (retval < 0)
295                 *value = hotplug_slot->info->attention_status;
296
297         return 0;
298 }
299
300 static int get_latch_status (struct hotplug_slot *hotplug_slot, u8 *value)
301 {
302         struct slot *slot = get_slot (hotplug_slot, __FUNCTION__);
303         int retval;
304
305         dbg("%s - physical_slot = %s\n", __FUNCTION__, hotplug_slot->name);
306
307         retval = slot->hpc_ops->get_latch_status(slot, value);
308         if (retval < 0)
309                 *value = hotplug_slot->info->latch_status;
310
311         return 0;
312 }
313
314 static int get_adapter_status (struct hotplug_slot *hotplug_slot, u8 *value)
315 {
316         struct slot *slot = get_slot (hotplug_slot, __FUNCTION__);
317         int retval;
318
319         dbg("%s - physical_slot = %s\n", __FUNCTION__, hotplug_slot->name);
320
321         retval = slot->hpc_ops->get_adapter_status(slot, value);
322         if (retval < 0)
323                 *value = hotplug_slot->info->adapter_status;
324
325         return 0;
326 }
327
328 static int get_max_bus_speed (struct hotplug_slot *hotplug_slot, enum pci_bus_speed *value)
329 {
330         struct slot *slot = get_slot (hotplug_slot, __FUNCTION__);
331         int retval;
332
333         dbg("%s - physical_slot = %s\n", __FUNCTION__, hotplug_slot->name);
334         
335         retval = slot->hpc_ops->get_max_bus_speed(slot, value);
336         if (retval < 0)
337                 *value = PCI_SPEED_UNKNOWN;
338
339         return 0;
340 }
341
342 static int get_cur_bus_speed (struct hotplug_slot *hotplug_slot, enum pci_bus_speed *value)
343 {
344         struct slot *slot = get_slot (hotplug_slot, __FUNCTION__);
345         int retval;
346
347         dbg("%s - physical_slot = %s\n", __FUNCTION__, hotplug_slot->name);
348         
349         retval = slot->hpc_ops->get_cur_bus_speed(slot, value);
350         if (retval < 0)
351                 *value = PCI_SPEED_UNKNOWN;
352
353         return 0;
354 }
355
356 static int shpc_probe(struct pci_dev *pdev, const struct pci_device_id *ent)
357 {
358         int rc;
359         struct controller *ctrl;
360         struct slot *t_slot;
361         int first_device_num;   /* first PCI device number supported by this SHPC */
362         int num_ctlr_slots;     /* number of slots supported by this SHPC */
363
364         ctrl = (struct controller *) kmalloc(sizeof(struct controller), GFP_KERNEL);
365         if (!ctrl) {
366                 err("%s : out of memory\n", __FUNCTION__);
367                 goto err_out_none;
368         }
369         memset(ctrl, 0, sizeof(struct controller));
370
371         dbg("DRV_thread pid = %d\n", current->pid);
372
373         rc = shpc_init(ctrl, pdev,
374                         (php_intr_callback_t) shpchp_handle_attention_button,
375                         (php_intr_callback_t) shpchp_handle_switch_change,
376                         (php_intr_callback_t) shpchp_handle_presence_change,
377                         (php_intr_callback_t) shpchp_handle_power_fault);
378         if (rc) {
379                 dbg("%s: controller initialization failed\n", SHPC_MODULE_NAME);
380                 goto err_out_free_ctrl;
381         }
382
383         dbg("%s: controller initialization success\n", __FUNCTION__);
384         ctrl->pci_dev = pdev;  /* pci_dev of the P2P bridge */
385
386         pci_set_drvdata(pdev, ctrl);
387
388         ctrl->pci_bus = kmalloc (sizeof (*ctrl->pci_bus), GFP_KERNEL);
389         if (!ctrl->pci_bus) {
390                 err("out of memory\n");
391                 rc = -ENOMEM;
392                 goto err_out_unmap_mmio_region;
393         }
394         
395         memcpy (ctrl->pci_bus, pdev->bus, sizeof (*ctrl->pci_bus));
396         ctrl->bus = pdev->bus->number;
397         ctrl->slot_bus = pdev->subordinate->number;
398
399         ctrl->device = PCI_SLOT(pdev->devfn);
400         ctrl->function = PCI_FUNC(pdev->devfn);
401         dbg("ctrl bus=0x%x, device=%x, function=%x, irq=%x\n", ctrl->bus, ctrl->device, ctrl->function, pdev->irq);
402
403         /*
404          *      Save configuration headers for this and subordinate PCI buses
405          */
406
407         rc = get_ctlr_slot_config(ctrl);
408         if (rc) {
409                 err(msg_initialization_err, rc);
410                 goto err_out_free_ctrl_bus;
411         }
412         first_device_num = ctrl->slot_device_offset;
413         num_ctlr_slots = ctrl->num_slots;
414
415         /* Store PCI Config Space for all devices on this bus */
416         rc = shpchp_save_config(ctrl, ctrl->slot_bus, num_ctlr_slots, first_device_num);
417         if (rc) {
418                 err("%s: unable to save PCI configuration data, error %d\n", __FUNCTION__, rc);
419                 goto err_out_free_ctrl_bus;
420         }
421
422         /* Get IO, memory, and IRQ resources for new devices */
423         rc = shpchprm_find_available_resources(ctrl);
424         ctrl->add_support = !rc;
425         
426         if (rc) {
427                 dbg("shpchprm_find_available_resources = %#x\n", rc);
428                 err("unable to locate PCI configuration resources for hot plug add.\n");
429                 goto err_out_free_ctrl_bus;
430         }
431
432         /* Setup the slot information structures */
433         rc = init_slots(ctrl);
434         if (rc) {
435                 err(msg_initialization_err, 6);
436                 goto err_out_free_ctrl_slot;
437         }
438
439         /* Now hpc_functions (slot->hpc_ops->functions) are ready  */
440         t_slot = shpchp_find_slot(ctrl, first_device_num);
441
442         /* Check for operation bus speed */
443         rc = t_slot->hpc_ops->get_cur_bus_speed(t_slot, &ctrl->speed);
444         dbg("%s: t_slot->hp_slot %x\n", __FUNCTION__,t_slot->hp_slot);
445
446         if (rc || ctrl->speed == PCI_SPEED_UNKNOWN) {
447                 err(SHPC_MODULE_NAME ": Can't get current bus speed. Set to 33MHz PCI.\n");
448                 ctrl->speed = PCI_SPEED_33MHz;
449         }
450
451         /* Finish setting up the hot plug ctrl device */
452         ctrl->next_event = 0;
453
454         if (!shpchp_ctrl_list) {
455                 shpchp_ctrl_list = ctrl;
456                 ctrl->next = NULL;
457         } else {
458                 ctrl->next = shpchp_ctrl_list;
459                 shpchp_ctrl_list = ctrl;
460         }
461
462         shpchp_create_ctrl_files(ctrl);
463
464         return 0;
465
466 err_out_free_ctrl_slot:
467         cleanup_slots(ctrl);
468 err_out_free_ctrl_bus:
469         kfree(ctrl->pci_bus);
470 err_out_unmap_mmio_region:
471         ctrl->hpc_ops->release_ctlr(ctrl);
472 err_out_free_ctrl:
473         kfree(ctrl);
474 err_out_none:
475         return -ENODEV;
476 }
477
478
479 static int shpc_start_thread(void)
480 {
481         int loop;
482         int retval = 0;
483         
484         dbg("Initialize + Start the notification/polling mechanism \n");
485
486         retval = shpchp_event_start_thread();
487         if (retval) {
488                 dbg("shpchp_event_start_thread() failed\n");
489                 return retval;
490         }
491
492         dbg("Initialize slot lists\n");
493         /* One slot list for each bus in the system */
494         for (loop = 0; loop < 256; loop++) {
495                 shpchp_slot_list[loop] = NULL;
496         }
497
498         return retval;
499 }
500
501 static inline void __exit
502 free_shpchp_res(struct pci_resource *res)
503 {
504         struct pci_resource *tres;
505
506         while (res) {
507                 tres = res;
508                 res = res->next;
509                 kfree(tres);
510         }
511 }
512
513 static void __exit unload_shpchpd(void)
514 {
515         struct pci_func *next;
516         struct pci_func *TempSlot;
517         int loop;
518         struct controller *ctrl;
519         struct controller *tctrl;
520
521         ctrl = shpchp_ctrl_list;
522
523         while (ctrl) {
524                 cleanup_slots(ctrl);
525
526                 free_shpchp_res(ctrl->io_head);
527                 free_shpchp_res(ctrl->mem_head);
528                 free_shpchp_res(ctrl->p_mem_head);
529                 free_shpchp_res(ctrl->bus_head);
530
531                 kfree (ctrl->pci_bus);
532
533                 dbg("%s: calling release_ctlr\n", __FUNCTION__);
534                 ctrl->hpc_ops->release_ctlr(ctrl);
535
536                 tctrl = ctrl;
537                 ctrl = ctrl->next;
538
539                 kfree(tctrl);
540         }
541
542         for (loop = 0; loop < 256; loop++) {
543                 next = shpchp_slot_list[loop];
544                 while (next != NULL) {
545                         free_shpchp_res(next->io_head);
546                         free_shpchp_res(next->mem_head);
547                         free_shpchp_res(next->p_mem_head);
548                         free_shpchp_res(next->bus_head);
549
550                         TempSlot = next;
551                         next = next->next;
552                         kfree(TempSlot);
553                 }
554         }
555
556         /* Stop the notification mechanism */
557         shpchp_event_stop_thread();
558
559 }
560
561
562 static struct pci_device_id shpcd_pci_tbl[] = {
563         {
564         .class =        ((PCI_CLASS_BRIDGE_PCI << 8) | 0x00),
565         .class_mask =   ~0,
566         .vendor =       PCI_ANY_ID,
567         .device =       PCI_ANY_ID,
568         .subvendor =    PCI_ANY_ID,
569         .subdevice =    PCI_ANY_ID,
570         },
571         
572         { /* end: all zeroes */ }
573 };
574
575 MODULE_DEVICE_TABLE(pci, shpcd_pci_tbl);
576
577
578
579 static struct pci_driver shpc_driver = {
580         .name =         SHPC_MODULE_NAME,
581         .id_table =     shpcd_pci_tbl,
582         .probe =        shpc_probe,
583         /* remove:      shpc_remove_one, */
584 };
585
586
587
588 static int __init shpcd_init(void)
589 {
590         int retval = 0;
591
592 #ifdef CONFIG_HOTPLUG_PCI_SHPC_POLL_EVENT_MODE
593         shpchp_poll_mode = 1;
594 #endif
595
596         retval = shpc_start_thread();
597         if (retval)
598                 goto error_hpc_init;
599
600         retval = shpchprm_init(PCI);
601         if (!retval) {
602                 retval = pci_module_init(&shpc_driver);
603                 dbg("%s: pci_module_init = %d\n", __FUNCTION__, retval);
604                 info(DRIVER_DESC " version: " DRIVER_VERSION "\n");
605         }
606
607 error_hpc_init:
608         if (retval) {
609                 shpchprm_cleanup();
610                 shpchp_event_stop_thread();
611         } else
612                 shpchprm_print_pirt();
613
614         return retval;
615 }
616
617 static void __exit shpcd_cleanup(void)
618 {
619         dbg("unload_shpchpd()\n");
620         unload_shpchpd();
621
622         shpchprm_cleanup();
623
624         dbg("pci_unregister_driver\n");
625         pci_unregister_driver(&shpc_driver);
626
627         info(DRIVER_DESC " version: " DRIVER_VERSION " unloaded\n");
628 }
629
630 module_init(shpcd_init);
631 module_exit(shpcd_cleanup);