Merge branch 'upstream' of git://lost.foo-projects.org/~ahkok/git/netdev-2.6 into...
[linux-2.6] / drivers / pci / hotplug / sgi_hotplug.c
1 /*
2  * This file is subject to the terms and conditions of the GNU General Public
3  * License.  See the file "COPYING" in the main directory of this archive
4  * for more details.
5  *
6  * Copyright (C) 2005-2006 Silicon Graphics, Inc. All rights reserved.
7  *
8  * This work was based on the 2.4/2.6 kernel development by Dick Reigner.
9  * Work to add BIOS PROM support was completed by Mike Habeck.
10  */
11
12 #include <linux/init.h>
13 #include <linux/kernel.h>
14 #include <linux/module.h>
15 #include <linux/pci.h>
16 #include <linux/proc_fs.h>
17 #include <linux/types.h>
18 #include <linux/mutex.h>
19
20 #include <asm/sn/addrs.h>
21 #include <asm/sn/geo.h>
22 #include <asm/sn/l1.h>
23 #include <asm/sn/module.h>
24 #include <asm/sn/pcibr_provider.h>
25 #include <asm/sn/pcibus_provider_defs.h>
26 #include <asm/sn/pcidev.h>
27 #include <asm/sn/sn_feature_sets.h>
28 #include <asm/sn/sn_sal.h>
29 #include <asm/sn/types.h>
30
31 #include "../pci.h"
32 #include "pci_hotplug.h"
33
34 MODULE_LICENSE("GPL");
35 MODULE_AUTHOR("SGI (prarit@sgi.com, dickie@sgi.com, habeck@sgi.com)");
36 MODULE_DESCRIPTION("SGI Altix Hot Plug PCI Controller Driver");
37
38 #define PCIIO_ASIC_TYPE_TIOCA           4
39 #define PCI_SLOT_ALREADY_UP             2       /* slot already up */
40 #define PCI_SLOT_ALREADY_DOWN           3       /* slot already down */
41 #define PCI_L1_ERR                      7       /* L1 console command error */
42 #define PCI_EMPTY_33MHZ                 15      /* empty 33 MHz bus */
43 #define PCI_L1_QSIZE                    128     /* our L1 message buffer size */
44 #define SN_MAX_HP_SLOTS                 32      /* max hotplug slots */
45 #define SGI_HOTPLUG_PROM_REV            0x0430  /* Min. required PROM version */
46 #define SN_SLOT_NAME_SIZE               33      /* size of name string */
47
48 /* internal list head */
49 static struct list_head sn_hp_list;
50
51 /* hotplug_slot struct's private pointer */
52 struct slot {
53         int device_num;
54         struct pci_bus *pci_bus;
55         /* this struct for glue internal only */
56         struct hotplug_slot *hotplug_slot;
57         struct list_head hp_list;
58         char physical_path[SN_SLOT_NAME_SIZE];
59 };
60
61 struct pcibr_slot_enable_resp {
62         int resp_sub_errno;
63         char resp_l1_msg[PCI_L1_QSIZE + 1];
64 };
65
66 struct pcibr_slot_disable_resp {
67         int resp_sub_errno;
68         char resp_l1_msg[PCI_L1_QSIZE + 1];
69 };
70
71 enum sn_pci_req_e {
72         PCI_REQ_SLOT_ELIGIBLE,
73         PCI_REQ_SLOT_DISABLE
74 };
75
76 static int enable_slot(struct hotplug_slot *slot);
77 static int disable_slot(struct hotplug_slot *slot);
78 static inline int get_power_status(struct hotplug_slot *slot, u8 *value);
79
80 static struct hotplug_slot_ops sn_hotplug_slot_ops = {
81         .owner                  = THIS_MODULE,
82         .enable_slot            = enable_slot,
83         .disable_slot           = disable_slot,
84         .get_power_status       = get_power_status,
85 };
86
87 static DEFINE_MUTEX(sn_hotplug_mutex);
88
89 static ssize_t path_show (struct hotplug_slot *bss_hotplug_slot,
90                           char *buf)
91 {
92         int retval = -ENOENT;
93         struct slot *slot = bss_hotplug_slot->private;
94
95         if (!slot)
96                 return retval;
97
98         retval = sprintf (buf, "%s\n", slot->physical_path);
99         return retval;
100 }
101
102 static struct hotplug_slot_attribute sn_slot_path_attr = __ATTR_RO(path);
103
104 static int sn_pci_slot_valid(struct pci_bus *pci_bus, int device)
105 {
106         struct pcibus_info *pcibus_info;
107         u16 busnum, segment, ioboard_type;
108
109         pcibus_info = SN_PCIBUS_BUSSOFT_INFO(pci_bus);
110
111         /* Check to see if this is a valid slot on 'pci_bus' */
112         if (!(pcibus_info->pbi_valid_devices & (1 << device)))
113                 return -EPERM;
114
115         ioboard_type = sn_ioboard_to_pci_bus(pci_bus);
116         busnum = pcibus_info->pbi_buscommon.bs_persist_busnum;
117         segment = pci_domain_nr(pci_bus) & 0xf;
118
119         /* Do not allow hotplug operations on base I/O cards */
120         if ((ioboard_type == L1_BRICKTYPE_IX ||
121              ioboard_type == L1_BRICKTYPE_IA) &&
122             (segment == 1 && busnum == 0 && device != 1))
123                 return -EPERM;
124
125         return 1;
126 }
127
128 static int sn_pci_bus_valid(struct pci_bus *pci_bus)
129 {
130         struct pcibus_info *pcibus_info;
131         u32 asic_type;
132         u16 ioboard_type;
133
134         /* Don't register slots hanging off the TIOCA bus */
135         pcibus_info = SN_PCIBUS_BUSSOFT_INFO(pci_bus);
136         asic_type = pcibus_info->pbi_buscommon.bs_asic_type;
137         if (asic_type == PCIIO_ASIC_TYPE_TIOCA)
138                 return -EPERM;
139
140         /* Only register slots in I/O Bricks that support hotplug */
141         ioboard_type = sn_ioboard_to_pci_bus(pci_bus);
142         switch (ioboard_type) {
143                 case L1_BRICKTYPE_IX:
144                 case L1_BRICKTYPE_PX:
145                 case L1_BRICKTYPE_IA:
146                 case L1_BRICKTYPE_PA:
147                 case L1_BOARDTYPE_PCIX3SLOT:
148                         return 1;
149                         break;
150                 default:
151                         return -EPERM;
152                         break;
153         }
154
155         return -EIO;
156 }
157
158 static int sn_hp_slot_private_alloc(struct hotplug_slot *bss_hotplug_slot,
159                                     struct pci_bus *pci_bus, int device)
160 {
161         struct pcibus_info *pcibus_info;
162         struct slot *slot;
163
164         pcibus_info = SN_PCIBUS_BUSSOFT_INFO(pci_bus);
165
166         slot = kzalloc(sizeof(*slot), GFP_KERNEL);
167         if (!slot)
168                 return -ENOMEM;
169         bss_hotplug_slot->private = slot;
170
171         bss_hotplug_slot->name = kmalloc(SN_SLOT_NAME_SIZE, GFP_KERNEL);
172         if (!bss_hotplug_slot->name) {
173                 kfree(bss_hotplug_slot->private);
174                 return -ENOMEM;
175         }
176
177         slot->device_num = device;
178         slot->pci_bus = pci_bus;
179         sprintf(bss_hotplug_slot->name, "%04x:%02x:%02x",
180                 pci_domain_nr(pci_bus),
181                 ((u16)pcibus_info->pbi_buscommon.bs_persist_busnum),
182                 device + 1);
183
184         sn_generate_path(pci_bus, slot->physical_path);
185
186         slot->hotplug_slot = bss_hotplug_slot;
187         list_add(&slot->hp_list, &sn_hp_list);
188
189         return 0;
190 }
191
192 static struct hotplug_slot * sn_hp_destroy(void)
193 {
194         struct slot *slot;
195         struct hotplug_slot *bss_hotplug_slot = NULL;
196
197         list_for_each_entry(slot, &sn_hp_list, hp_list) {
198                 bss_hotplug_slot = slot->hotplug_slot;
199                 list_del(&((struct slot *)bss_hotplug_slot->private)->
200                          hp_list);
201                 sysfs_remove_file(&bss_hotplug_slot->kobj,
202                                   &sn_slot_path_attr.attr);
203                 break;
204         }
205         return bss_hotplug_slot;
206 }
207
208 static void sn_bus_alloc_data(struct pci_dev *dev)
209 {
210         struct pci_bus *subordinate_bus;
211         struct pci_dev *child;
212
213         sn_pci_fixup_slot(dev);
214
215         /* Recursively sets up the sn_irq_info structs */
216         if (dev->subordinate) {
217                 subordinate_bus = dev->subordinate;
218                 list_for_each_entry(child, &subordinate_bus->devices, bus_list)
219                         sn_bus_alloc_data(child);
220         }
221 }
222
223 static void sn_bus_free_data(struct pci_dev *dev)
224 {
225         struct pci_bus *subordinate_bus;
226         struct pci_dev *child;
227
228         /* Recursively clean up sn_irq_info structs */
229         if (dev->subordinate) {
230                 subordinate_bus = dev->subordinate;
231                 list_for_each_entry(child, &subordinate_bus->devices, bus_list)
232                         sn_bus_free_data(child);
233         }
234         /*
235          * Some drivers may use dma accesses during the
236          * driver remove function. We release the sysdata
237          * areas after the driver remove functions have
238          * been called.
239          */
240         sn_bus_store_sysdata(dev);
241         sn_pci_unfixup_slot(dev);
242 }
243
244 static int sn_slot_enable(struct hotplug_slot *bss_hotplug_slot,
245                           int device_num)
246 {
247         struct slot *slot = bss_hotplug_slot->private;
248         struct pcibus_info *pcibus_info;
249         struct pcibr_slot_enable_resp resp;
250         int rc;
251
252         pcibus_info = SN_PCIBUS_BUSSOFT_INFO(slot->pci_bus);
253
254         /*
255          * Power-on and initialize the slot in the SN
256          * PCI infrastructure.
257          */
258         rc = sal_pcibr_slot_enable(pcibus_info, device_num, &resp);
259
260         if (rc == PCI_SLOT_ALREADY_UP) {
261                 dev_dbg(slot->pci_bus->self, "is already active\n");
262                 return 1; /* return 1 to user */
263         }
264
265         if (rc == PCI_L1_ERR) {
266                 dev_dbg(slot->pci_bus->self,
267                         "L1 failure %d with message: %s",
268                         resp.resp_sub_errno, resp.resp_l1_msg);
269                 return -EPERM;
270         }
271
272         if (rc) {
273                 dev_dbg(slot->pci_bus->self,
274                         "insert failed with error %d sub-error %d\n",
275                         rc, resp.resp_sub_errno);
276                 return -EIO;
277         }
278
279         pcibus_info = SN_PCIBUS_BUSSOFT_INFO(slot->pci_bus);
280         pcibus_info->pbi_enabled_devices |= (1 << device_num);
281
282         return 0;
283 }
284
285 static int sn_slot_disable(struct hotplug_slot *bss_hotplug_slot,
286                            int device_num, int action)
287 {
288         struct slot *slot = bss_hotplug_slot->private;
289         struct pcibus_info *pcibus_info;
290         struct pcibr_slot_disable_resp resp;
291         int rc;
292
293         pcibus_info = SN_PCIBUS_BUSSOFT_INFO(slot->pci_bus);
294
295         rc = sal_pcibr_slot_disable(pcibus_info, device_num, action, &resp);
296
297         if ((action == PCI_REQ_SLOT_ELIGIBLE) &&
298             (rc == PCI_SLOT_ALREADY_DOWN)) {
299                 dev_dbg(slot->pci_bus->self, "Slot %s already inactive\n");
300                 return 1; /* return 1 to user */
301         }
302
303         if ((action == PCI_REQ_SLOT_ELIGIBLE) && (rc == PCI_EMPTY_33MHZ)) {
304                 dev_dbg(slot->pci_bus->self,
305                         "Cannot remove last 33MHz card\n");
306                 return -EPERM;
307         }
308
309         if ((action == PCI_REQ_SLOT_ELIGIBLE) && (rc == PCI_L1_ERR)) {
310                 dev_dbg(slot->pci_bus->self,
311                         "L1 failure %d with message \n%s\n",
312                         resp.resp_sub_errno, resp.resp_l1_msg);
313                 return -EPERM;
314         }
315
316         if ((action == PCI_REQ_SLOT_ELIGIBLE) && rc) {
317                 dev_dbg(slot->pci_bus->self,
318                         "remove failed with error %d sub-error %d\n",
319                         rc, resp.resp_sub_errno);
320                 return -EIO;
321         }
322
323         if ((action == PCI_REQ_SLOT_ELIGIBLE) && !rc)
324                 return 0;
325
326         if ((action == PCI_REQ_SLOT_DISABLE) && !rc) {
327                 pcibus_info = SN_PCIBUS_BUSSOFT_INFO(slot->pci_bus);
328                 pcibus_info->pbi_enabled_devices &= ~(1 << device_num);
329                 dev_dbg(slot->pci_bus->self, "remove successful\n");
330                 return 0;
331         }
332
333         if ((action == PCI_REQ_SLOT_DISABLE) && rc) {
334                 dev_dbg(slot->pci_bus->self,"remove failed rc = %d\n", rc);
335         }
336
337         return rc;
338 }
339
340 static int enable_slot(struct hotplug_slot *bss_hotplug_slot)
341 {
342         struct slot *slot = bss_hotplug_slot->private;
343         struct pci_bus *new_bus = NULL;
344         struct pci_dev *dev;
345         int func, num_funcs;
346         int new_ppb = 0;
347         int rc;
348
349         /* Serialize the Linux PCI infrastructure */
350         mutex_lock(&sn_hotplug_mutex);
351
352         /*
353          * Power-on and initialize the slot in the SN
354          * PCI infrastructure.
355          */
356         rc = sn_slot_enable(bss_hotplug_slot, slot->device_num);
357         if (rc) {
358                 mutex_unlock(&sn_hotplug_mutex);
359                 return rc;
360         }
361
362         num_funcs = pci_scan_slot(slot->pci_bus,
363                                   PCI_DEVFN(slot->device_num + 1, 0));
364         if (!num_funcs) {
365                 dev_dbg(slot->pci_bus->self, "no device in slot\n");
366                 mutex_unlock(&sn_hotplug_mutex);
367                 return -ENODEV;
368         }
369
370         sn_pci_controller_fixup(pci_domain_nr(slot->pci_bus),
371                                 slot->pci_bus->number,
372                                 slot->pci_bus);
373         /*
374          * Map SN resources for all functions on the card
375          * to the Linux PCI interface and tell the drivers
376          * about them.
377          */
378         for (func = 0; func < num_funcs;  func++) {
379                 dev = pci_get_slot(slot->pci_bus,
380                                    PCI_DEVFN(slot->device_num + 1,
381                                              PCI_FUNC(func)));
382                 if (dev) {
383                         if (dev->hdr_type == PCI_HEADER_TYPE_BRIDGE) {
384                                 unsigned char sec_bus;
385                                 pci_read_config_byte(dev, PCI_SECONDARY_BUS,
386                                                      &sec_bus);
387                                 new_bus = pci_add_new_bus(dev->bus, dev,
388                                                           sec_bus);
389                                 pci_scan_child_bus(new_bus);
390                                 sn_pci_controller_fixup(pci_domain_nr(new_bus),
391                                                         new_bus->number,
392                                                         new_bus);
393                                 new_ppb = 1;
394                         }
395                         sn_bus_alloc_data(dev);
396                         pci_dev_put(dev);
397                 }
398         }
399
400         /* Call the driver for the new device */
401         pci_bus_add_devices(slot->pci_bus);
402         /* Call the drivers for the new devices subordinate to PPB */
403         if (new_ppb)
404                 pci_bus_add_devices(new_bus);
405
406         mutex_unlock(&sn_hotplug_mutex);
407
408         if (rc == 0)
409                 dev_dbg(slot->pci_bus->self,
410                         "insert operation successful\n");
411         else
412                 dev_dbg(slot->pci_bus->self,
413                         "insert operation failed rc = %d\n", rc);
414
415         return rc;
416 }
417
418 static int disable_slot(struct hotplug_slot *bss_hotplug_slot)
419 {
420         struct slot *slot = bss_hotplug_slot->private;
421         struct pci_dev *dev;
422         int func;
423         int rc;
424
425         /* Acquire update access to the bus */
426         mutex_lock(&sn_hotplug_mutex);
427
428         /* is it okay to bring this slot down? */
429         rc = sn_slot_disable(bss_hotplug_slot, slot->device_num,
430                              PCI_REQ_SLOT_ELIGIBLE);
431         if (rc)
432                 goto leaving;
433
434         /* Free the SN resources assigned to the Linux device.*/
435         for (func = 0; func < 8;  func++) {
436                 dev = pci_get_slot(slot->pci_bus,
437                                    PCI_DEVFN(slot->device_num + 1,
438                                              PCI_FUNC(func)));
439                 if (dev) {
440                         sn_bus_free_data(dev);
441                         pci_remove_bus_device(dev);
442                         pci_dev_put(dev);
443                 }
444         }
445
446         /* free the collected sysdata pointers */
447         sn_bus_free_sysdata();
448
449         /* Deactivate slot */
450         rc = sn_slot_disable(bss_hotplug_slot, slot->device_num,
451                              PCI_REQ_SLOT_DISABLE);
452  leaving:
453         /* Release the bus lock */
454         mutex_unlock(&sn_hotplug_mutex);
455
456         return rc;
457 }
458
459 static inline int get_power_status(struct hotplug_slot *bss_hotplug_slot,
460                                    u8 *value)
461 {
462         struct slot *slot = bss_hotplug_slot->private;
463         struct pcibus_info *pcibus_info;
464         u32 power;
465
466         pcibus_info = SN_PCIBUS_BUSSOFT_INFO(slot->pci_bus);
467         mutex_lock(&sn_hotplug_mutex);
468         power = pcibus_info->pbi_enabled_devices & (1 << slot->device_num);
469         *value = power ? 1 : 0;
470         mutex_unlock(&sn_hotplug_mutex);
471         return 0;
472 }
473
474 static void sn_release_slot(struct hotplug_slot *bss_hotplug_slot)
475 {
476         kfree(bss_hotplug_slot->info);
477         kfree(bss_hotplug_slot->name);
478         kfree(bss_hotplug_slot->private);
479         kfree(bss_hotplug_slot);
480 }
481
482 static int sn_hotplug_slot_register(struct pci_bus *pci_bus)
483 {
484         int device;
485         struct hotplug_slot *bss_hotplug_slot;
486         int rc = 0;
487
488         /*
489          * Currently only four devices are supported,
490          * in the future there maybe more -- up to 32.
491          */
492
493         for (device = 0; device < SN_MAX_HP_SLOTS ; device++) {
494                 if (sn_pci_slot_valid(pci_bus, device) != 1)
495                         continue;
496
497                 bss_hotplug_slot = kzalloc(sizeof(*bss_hotplug_slot),
498                                            GFP_KERNEL);
499                 if (!bss_hotplug_slot) {
500                         rc = -ENOMEM;
501                         goto alloc_err;
502                 }
503
504                 bss_hotplug_slot->info =
505                         kzalloc(sizeof(struct hotplug_slot_info),
506                                 GFP_KERNEL);
507                 if (!bss_hotplug_slot->info) {
508                         rc = -ENOMEM;
509                         goto alloc_err;
510                 }
511
512                 if (sn_hp_slot_private_alloc(bss_hotplug_slot,
513                                              pci_bus, device)) {
514                         rc = -ENOMEM;
515                         goto alloc_err;
516                 }
517
518                 bss_hotplug_slot->ops = &sn_hotplug_slot_ops;
519                 bss_hotplug_slot->release = &sn_release_slot;
520
521                 rc = pci_hp_register(bss_hotplug_slot);
522                 if (rc)
523                         goto register_err;
524
525                 rc = sysfs_create_file(&bss_hotplug_slot->kobj,
526                                        &sn_slot_path_attr.attr);
527                 if (rc)
528                         goto register_err;
529         }
530         dev_dbg(pci_bus->self, "Registered bus with hotplug\n");
531         return rc;
532
533 register_err:
534         dev_dbg(pci_bus->self, "bus failed to register with err = %d\n",
535                 rc);
536
537 alloc_err:
538         if (rc == -ENOMEM)
539                 dev_dbg(pci_bus->self, "Memory allocation error\n");
540
541         /* destroy THIS element */
542         if (bss_hotplug_slot)
543                 sn_release_slot(bss_hotplug_slot);
544
545         /* destroy anything else on the list */
546         while ((bss_hotplug_slot = sn_hp_destroy()))
547                 pci_hp_deregister(bss_hotplug_slot);
548
549         return rc;
550 }
551
552 static int sn_pci_hotplug_init(void)
553 {
554         struct pci_bus *pci_bus = NULL;
555         int rc;
556         int registered = 0;
557
558         if (!sn_prom_feature_available(PRF_HOTPLUG_SUPPORT)) {
559                 printk(KERN_ERR "%s: PROM version does not support hotplug.\n",
560                        __FUNCTION__);
561                 return -EPERM;
562         }
563
564         INIT_LIST_HEAD(&sn_hp_list);
565
566         while ((pci_bus = pci_find_next_bus(pci_bus))) {
567                 if (!pci_bus->sysdata)
568                         continue;
569
570                 rc = sn_pci_bus_valid(pci_bus);
571                 if (rc != 1) {
572                         dev_dbg(pci_bus->self, "not a valid hotplug bus\n");
573                         continue;
574                 }
575                 dev_dbg(pci_bus->self, "valid hotplug bus\n");
576
577                 rc = sn_hotplug_slot_register(pci_bus);
578                 if (!rc) {
579                         registered = 1;
580                 } else {
581                         registered = 0;
582                         break;
583                 }
584         }
585
586         return registered == 1 ? 0 : -ENODEV;
587 }
588
589 static void sn_pci_hotplug_exit(void)
590 {
591         struct hotplug_slot *bss_hotplug_slot;
592
593         while ((bss_hotplug_slot = sn_hp_destroy()))
594                 pci_hp_deregister(bss_hotplug_slot);
595
596         if (!list_empty(&sn_hp_list))
597                 printk(KERN_ERR "%s: internal list is not empty\n", __FILE__);
598 }
599
600 module_init(sn_pci_hotplug_init);
601 module_exit(sn_pci_hotplug_exit);