Merge tag 'gvt-fixes-2018-12-04' of https://github.com/intel/gvt-linux into drm-intel...
[sfrench/cifs-2.6.git] / drivers / pci / hotplug / ibmphp_core.c
1 // SPDX-License-Identifier: GPL-2.0+
2 /*
3  * IBM Hot Plug Controller Driver
4  *
5  * Written By: Chuck Cole, Jyoti Shah, Tong Yu, Irene Zubarev, IBM Corporation
6  *
7  * Copyright (C) 2001,2003 Greg Kroah-Hartman (greg@kroah.com)
8  * Copyright (C) 2001-2003 IBM Corp.
9  *
10  * All rights reserved.
11  *
12  * Send feedback to <gregkh@us.ibm.com>
13  *
14  */
15
16 #include <linux/init.h>
17 #include <linux/module.h>
18 #include <linux/slab.h>
19 #include <linux/pci.h>
20 #include <linux/interrupt.h>
21 #include <linux/delay.h>
22 #include <linux/wait.h>
23 #include "../pci.h"
24 #include <asm/pci_x86.h>                /* for struct irq_routing_table */
25 #include <asm/io_apic.h>
26 #include "ibmphp.h"
27
28 #define attn_on(sl)  ibmphp_hpc_writeslot(sl, HPC_SLOT_ATTNON)
29 #define attn_off(sl) ibmphp_hpc_writeslot(sl, HPC_SLOT_ATTNOFF)
30 #define attn_LED_blink(sl) ibmphp_hpc_writeslot(sl, HPC_SLOT_BLINKLED)
31 #define get_ctrl_revision(sl, rev) ibmphp_hpc_readslot(sl, READ_REVLEVEL, rev)
32 #define get_hpc_options(sl, opt) ibmphp_hpc_readslot(sl, READ_HPCOPTIONS, opt)
33
34 #define DRIVER_VERSION  "0.6"
35 #define DRIVER_DESC     "IBM Hot Plug PCI Controller Driver"
36
37 int ibmphp_debug;
38
39 static bool debug;
40 module_param(debug, bool, S_IRUGO | S_IWUSR);
41 MODULE_PARM_DESC(debug, "Debugging mode enabled or not");
42 MODULE_LICENSE("GPL");
43 MODULE_DESCRIPTION(DRIVER_DESC);
44
45 struct pci_bus *ibmphp_pci_bus;
46 static int max_slots;
47
48 static int irqs[16];    /* PIC mode IRQs we're using so far (in case MPS
49                          * tables don't provide default info for empty slots */
50
51 static int init_flag;
52
53 /*
54 static int get_max_adapter_speed_1 (struct hotplug_slot *, u8 *, u8);
55
56 static inline int get_max_adapter_speed (struct hotplug_slot *hs, u8 *value)
57 {
58         return get_max_adapter_speed_1 (hs, value, 1);
59 }
60 */
61 static inline int get_cur_bus_info(struct slot **sl)
62 {
63         int rc = 1;
64         struct slot *slot_cur = *sl;
65
66         debug("options = %x\n", slot_cur->ctrl->options);
67         debug("revision = %x\n", slot_cur->ctrl->revision);
68
69         if (READ_BUS_STATUS(slot_cur->ctrl))
70                 rc = ibmphp_hpc_readslot(slot_cur, READ_BUSSTATUS, NULL);
71
72         if (rc)
73                 return rc;
74
75         slot_cur->bus_on->current_speed = CURRENT_BUS_SPEED(slot_cur->busstatus);
76         if (READ_BUS_MODE(slot_cur->ctrl))
77                 slot_cur->bus_on->current_bus_mode =
78                                 CURRENT_BUS_MODE(slot_cur->busstatus);
79         else
80                 slot_cur->bus_on->current_bus_mode = 0xFF;
81
82         debug("busstatus = %x, bus_speed = %x, bus_mode = %x\n",
83                         slot_cur->busstatus,
84                         slot_cur->bus_on->current_speed,
85                         slot_cur->bus_on->current_bus_mode);
86
87         *sl = slot_cur;
88         return 0;
89 }
90
91 static inline int slot_update(struct slot **sl)
92 {
93         int rc;
94         rc = ibmphp_hpc_readslot(*sl, READ_ALLSTAT, NULL);
95         if (rc)
96                 return rc;
97         if (!init_flag)
98                 rc = get_cur_bus_info(sl);
99         return rc;
100 }
101
102 static int __init get_max_slots(void)
103 {
104         struct slot *slot_cur;
105         u8 slot_count = 0;
106
107         list_for_each_entry(slot_cur, &ibmphp_slot_head, ibm_slot_list) {
108                 /* sometimes the hot-pluggable slots start with 4 (not always from 1) */
109                 slot_count = max(slot_count, slot_cur->number);
110         }
111         return slot_count;
112 }
113
114 /* This routine will put the correct slot->device information per slot.  It's
115  * called from initialization of the slot structures. It will also assign
116  * interrupt numbers per each slot.
117  * Parameters: struct slot
118  * Returns 0 or errors
119  */
120 int ibmphp_init_devno(struct slot **cur_slot)
121 {
122         struct irq_routing_table *rtable;
123         int len;
124         int loop;
125         int i;
126
127         rtable = pcibios_get_irq_routing_table();
128         if (!rtable) {
129                 err("no BIOS routing table...\n");
130                 return -ENOMEM;
131         }
132
133         len = (rtable->size - sizeof(struct irq_routing_table)) /
134                         sizeof(struct irq_info);
135
136         if (!len) {
137                 kfree(rtable);
138                 return -1;
139         }
140         for (loop = 0; loop < len; loop++) {
141                 if ((*cur_slot)->number == rtable->slots[loop].slot &&
142                     (*cur_slot)->bus == rtable->slots[loop].bus) {
143                         (*cur_slot)->device = PCI_SLOT(rtable->slots[loop].devfn);
144                         for (i = 0; i < 4; i++)
145                                 (*cur_slot)->irq[i] = IO_APIC_get_PCI_irq_vector((int) (*cur_slot)->bus,
146                                                 (int) (*cur_slot)->device, i);
147
148                         debug("(*cur_slot)->irq[0] = %x\n",
149                                         (*cur_slot)->irq[0]);
150                         debug("(*cur_slot)->irq[1] = %x\n",
151                                         (*cur_slot)->irq[1]);
152                         debug("(*cur_slot)->irq[2] = %x\n",
153                                         (*cur_slot)->irq[2]);
154                         debug("(*cur_slot)->irq[3] = %x\n",
155                                         (*cur_slot)->irq[3]);
156
157                         debug("rtable->exclusive_irqs = %x\n",
158                                         rtable->exclusive_irqs);
159                         debug("rtable->slots[loop].irq[0].bitmap = %x\n",
160                                         rtable->slots[loop].irq[0].bitmap);
161                         debug("rtable->slots[loop].irq[1].bitmap = %x\n",
162                                         rtable->slots[loop].irq[1].bitmap);
163                         debug("rtable->slots[loop].irq[2].bitmap = %x\n",
164                                         rtable->slots[loop].irq[2].bitmap);
165                         debug("rtable->slots[loop].irq[3].bitmap = %x\n",
166                                         rtable->slots[loop].irq[3].bitmap);
167
168                         debug("rtable->slots[loop].irq[0].link = %x\n",
169                                         rtable->slots[loop].irq[0].link);
170                         debug("rtable->slots[loop].irq[1].link = %x\n",
171                                         rtable->slots[loop].irq[1].link);
172                         debug("rtable->slots[loop].irq[2].link = %x\n",
173                                         rtable->slots[loop].irq[2].link);
174                         debug("rtable->slots[loop].irq[3].link = %x\n",
175                                         rtable->slots[loop].irq[3].link);
176                         debug("end of init_devno\n");
177                         kfree(rtable);
178                         return 0;
179                 }
180         }
181
182         kfree(rtable);
183         return -1;
184 }
185
186 static inline int power_on(struct slot *slot_cur)
187 {
188         u8 cmd = HPC_SLOT_ON;
189         int retval;
190
191         retval = ibmphp_hpc_writeslot(slot_cur, cmd);
192         if (retval) {
193                 err("power on failed\n");
194                 return retval;
195         }
196         if (CTLR_RESULT(slot_cur->ctrl->status)) {
197                 err("command not completed successfully in power_on\n");
198                 return -EIO;
199         }
200         msleep(3000);   /* For ServeRAID cards, and some 66 PCI */
201         return 0;
202 }
203
204 static inline int power_off(struct slot *slot_cur)
205 {
206         u8 cmd = HPC_SLOT_OFF;
207         int retval;
208
209         retval = ibmphp_hpc_writeslot(slot_cur, cmd);
210         if (retval) {
211                 err("power off failed\n");
212                 return retval;
213         }
214         if (CTLR_RESULT(slot_cur->ctrl->status)) {
215                 err("command not completed successfully in power_off\n");
216                 retval = -EIO;
217         }
218         return retval;
219 }
220
221 static int set_attention_status(struct hotplug_slot *hotplug_slot, u8 value)
222 {
223         int rc = 0;
224         struct slot *pslot;
225         u8 cmd = 0x00;     /* avoid compiler warning */
226
227         debug("set_attention_status - Entry hotplug_slot[%lx] value[%x]\n",
228                         (ulong) hotplug_slot, value);
229         ibmphp_lock_operations();
230
231
232         if (hotplug_slot) {
233                 switch (value) {
234                 case HPC_SLOT_ATTN_OFF:
235                         cmd = HPC_SLOT_ATTNOFF;
236                         break;
237                 case HPC_SLOT_ATTN_ON:
238                         cmd = HPC_SLOT_ATTNON;
239                         break;
240                 case HPC_SLOT_ATTN_BLINK:
241                         cmd = HPC_SLOT_BLINKLED;
242                         break;
243                 default:
244                         rc = -ENODEV;
245                         err("set_attention_status - Error : invalid input [%x]\n",
246                                         value);
247                         break;
248                 }
249                 if (rc == 0) {
250                         pslot = to_slot(hotplug_slot);
251                         rc = ibmphp_hpc_writeslot(pslot, cmd);
252                 }
253         } else
254                 rc = -ENODEV;
255
256         ibmphp_unlock_operations();
257
258         debug("set_attention_status - Exit rc[%d]\n", rc);
259         return rc;
260 }
261
262 static int get_attention_status(struct hotplug_slot *hotplug_slot, u8 *value)
263 {
264         int rc = -ENODEV;
265         struct slot *pslot;
266         struct slot myslot;
267
268         debug("get_attention_status - Entry hotplug_slot[%lx] pvalue[%lx]\n",
269                                         (ulong) hotplug_slot, (ulong) value);
270
271         ibmphp_lock_operations();
272         if (hotplug_slot) {
273                 pslot = to_slot(hotplug_slot);
274                 memcpy(&myslot, pslot, sizeof(struct slot));
275                 rc = ibmphp_hpc_readslot(pslot, READ_SLOTSTATUS,
276                                          &myslot.status);
277                 if (!rc)
278                         rc = ibmphp_hpc_readslot(pslot, READ_EXTSLOTSTATUS,
279                                                  &myslot.ext_status);
280                 if (!rc)
281                         *value = SLOT_ATTN(myslot.status, myslot.ext_status);
282         }
283
284         ibmphp_unlock_operations();
285         debug("get_attention_status - Exit rc[%d] value[%x]\n", rc, *value);
286         return rc;
287 }
288
289 static int get_latch_status(struct hotplug_slot *hotplug_slot, u8 *value)
290 {
291         int rc = -ENODEV;
292         struct slot *pslot;
293         struct slot myslot;
294
295         debug("get_latch_status - Entry hotplug_slot[%lx] pvalue[%lx]\n",
296                                         (ulong) hotplug_slot, (ulong) value);
297         ibmphp_lock_operations();
298         if (hotplug_slot) {
299                 pslot = to_slot(hotplug_slot);
300                 memcpy(&myslot, pslot, sizeof(struct slot));
301                 rc = ibmphp_hpc_readslot(pslot, READ_SLOTSTATUS,
302                                          &myslot.status);
303                 if (!rc)
304                         *value = SLOT_LATCH(myslot.status);
305         }
306
307         ibmphp_unlock_operations();
308         debug("get_latch_status - Exit rc[%d] rc[%x] value[%x]\n",
309                         rc, rc, *value);
310         return rc;
311 }
312
313
314 static int get_power_status(struct hotplug_slot *hotplug_slot, u8 *value)
315 {
316         int rc = -ENODEV;
317         struct slot *pslot;
318         struct slot myslot;
319
320         debug("get_power_status - Entry hotplug_slot[%lx] pvalue[%lx]\n",
321                                         (ulong) hotplug_slot, (ulong) value);
322         ibmphp_lock_operations();
323         if (hotplug_slot) {
324                 pslot = to_slot(hotplug_slot);
325                 memcpy(&myslot, pslot, sizeof(struct slot));
326                 rc = ibmphp_hpc_readslot(pslot, READ_SLOTSTATUS,
327                                          &myslot.status);
328                 if (!rc)
329                         *value = SLOT_PWRGD(myslot.status);
330         }
331
332         ibmphp_unlock_operations();
333         debug("get_power_status - Exit rc[%d] rc[%x] value[%x]\n",
334                         rc, rc, *value);
335         return rc;
336 }
337
338 static int get_adapter_present(struct hotplug_slot *hotplug_slot, u8 *value)
339 {
340         int rc = -ENODEV;
341         struct slot *pslot;
342         u8 present;
343         struct slot myslot;
344
345         debug("get_adapter_status - Entry hotplug_slot[%lx] pvalue[%lx]\n",
346                                         (ulong) hotplug_slot, (ulong) value);
347         ibmphp_lock_operations();
348         if (hotplug_slot) {
349                 pslot = to_slot(hotplug_slot);
350                 memcpy(&myslot, pslot, sizeof(struct slot));
351                 rc = ibmphp_hpc_readslot(pslot, READ_SLOTSTATUS,
352                                          &myslot.status);
353                 if (!rc) {
354                         present = SLOT_PRESENT(myslot.status);
355                         if (present == HPC_SLOT_EMPTY)
356                                 *value = 0;
357                         else
358                                 *value = 1;
359                 }
360         }
361
362         ibmphp_unlock_operations();
363         debug("get_adapter_present - Exit rc[%d] value[%x]\n", rc, *value);
364         return rc;
365 }
366
367 static int get_max_bus_speed(struct slot *slot)
368 {
369         int rc = 0;
370         u8 mode = 0;
371         enum pci_bus_speed speed;
372         struct pci_bus *bus = slot->hotplug_slot.pci_slot->bus;
373
374         debug("%s - Entry slot[%p]\n", __func__, slot);
375
376         ibmphp_lock_operations();
377         mode = slot->supported_bus_mode;
378         speed = slot->supported_speed;
379         ibmphp_unlock_operations();
380
381         switch (speed) {
382         case BUS_SPEED_33:
383                 break;
384         case BUS_SPEED_66:
385                 if (mode == BUS_MODE_PCIX)
386                         speed += 0x01;
387                 break;
388         case BUS_SPEED_100:
389         case BUS_SPEED_133:
390                 speed += 0x01;
391                 break;
392         default:
393                 /* Note (will need to change): there would be soon 256, 512 also */
394                 rc = -ENODEV;
395         }
396
397         if (!rc)
398                 bus->max_bus_speed = speed;
399
400         debug("%s - Exit rc[%d] speed[%x]\n", __func__, rc, speed);
401         return rc;
402 }
403
404 /*
405 static int get_max_adapter_speed_1(struct hotplug_slot *hotplug_slot, u8 *value, u8 flag)
406 {
407         int rc = -ENODEV;
408         struct slot *pslot;
409         struct slot myslot;
410
411         debug("get_max_adapter_speed_1 - Entry hotplug_slot[%lx] pvalue[%lx]\n",
412                                                 (ulong)hotplug_slot, (ulong) value);
413
414         if (flag)
415                 ibmphp_lock_operations();
416
417         if (hotplug_slot && value) {
418                 pslot = hotplug_slot->private;
419                 if (pslot) {
420                         memcpy(&myslot, pslot, sizeof(struct slot));
421                         rc = ibmphp_hpc_readslot(pslot, READ_SLOTSTATUS,
422                                                 &(myslot.status));
423
424                         if (!(SLOT_LATCH (myslot.status)) &&
425                                         (SLOT_PRESENT (myslot.status))) {
426                                 rc = ibmphp_hpc_readslot(pslot,
427                                                 READ_EXTSLOTSTATUS,
428                                                 &(myslot.ext_status));
429                                 if (!rc)
430                                         *value = SLOT_SPEED(myslot.ext_status);
431                         } else
432                                 *value = MAX_ADAPTER_NONE;
433                 }
434         }
435
436         if (flag)
437                 ibmphp_unlock_operations();
438
439         debug("get_max_adapter_speed_1 - Exit rc[%d] value[%x]\n", rc, *value);
440         return rc;
441 }
442
443 static int get_bus_name(struct hotplug_slot *hotplug_slot, char *value)
444 {
445         int rc = -ENODEV;
446         struct slot *pslot = NULL;
447
448         debug("get_bus_name - Entry hotplug_slot[%lx]\n", (ulong)hotplug_slot);
449
450         ibmphp_lock_operations();
451
452         if (hotplug_slot) {
453                 pslot = hotplug_slot->private;
454                 if (pslot) {
455                         rc = 0;
456                         snprintf(value, 100, "Bus %x", pslot->bus);
457                 }
458         } else
459                 rc = -ENODEV;
460
461         ibmphp_unlock_operations();
462         debug("get_bus_name - Exit rc[%d] value[%x]\n", rc, *value);
463         return rc;
464 }
465 */
466
467 /****************************************************************************
468  * This routine will initialize the ops data structure used in the validate
469  * function. It will also power off empty slots that are powered on since BIOS
470  * leaves those on, albeit disconnected
471  ****************************************************************************/
472 static int __init init_ops(void)
473 {
474         struct slot *slot_cur;
475         int retval;
476         int rc;
477
478         list_for_each_entry(slot_cur, &ibmphp_slot_head, ibm_slot_list) {
479                 debug("BEFORE GETTING SLOT STATUS, slot # %x\n",
480                                                         slot_cur->number);
481                 if (slot_cur->ctrl->revision == 0xFF)
482                         if (get_ctrl_revision(slot_cur,
483                                                 &slot_cur->ctrl->revision))
484                                 return -1;
485
486                 if (slot_cur->bus_on->current_speed == 0xFF)
487                         if (get_cur_bus_info(&slot_cur))
488                                 return -1;
489                 get_max_bus_speed(slot_cur);
490
491                 if (slot_cur->ctrl->options == 0xFF)
492                         if (get_hpc_options(slot_cur, &slot_cur->ctrl->options))
493                                 return -1;
494
495                 retval = slot_update(&slot_cur);
496                 if (retval)
497                         return retval;
498
499                 debug("status = %x\n", slot_cur->status);
500                 debug("ext_status = %x\n", slot_cur->ext_status);
501                 debug("SLOT_POWER = %x\n", SLOT_POWER(slot_cur->status));
502                 debug("SLOT_PRESENT = %x\n", SLOT_PRESENT(slot_cur->status));
503                 debug("SLOT_LATCH = %x\n", SLOT_LATCH(slot_cur->status));
504
505                 if ((SLOT_PWRGD(slot_cur->status)) &&
506                     !(SLOT_PRESENT(slot_cur->status)) &&
507                     !(SLOT_LATCH(slot_cur->status))) {
508                         debug("BEFORE POWER OFF COMMAND\n");
509                                 rc = power_off(slot_cur);
510                                 if (rc)
511                                         return rc;
512
513         /*              retval = slot_update(&slot_cur);
514          *              if (retval)
515          *                      return retval;
516          *              ibmphp_update_slot_info(slot_cur);
517          */
518                 }
519         }
520         init_flag = 0;
521         return 0;
522 }
523
524 /* This operation will check whether the slot is within the bounds and
525  * the operation is valid to perform on that slot
526  * Parameters: slot, operation
527  * Returns: 0 or error codes
528  */
529 static int validate(struct slot *slot_cur, int opn)
530 {
531         int number;
532         int retval;
533
534         if (!slot_cur)
535                 return -ENODEV;
536         number = slot_cur->number;
537         if ((number > max_slots) || (number < 0))
538                 return -EBADSLT;
539         debug("slot_number in validate is %d\n", slot_cur->number);
540
541         retval = slot_update(&slot_cur);
542         if (retval)
543                 return retval;
544
545         switch (opn) {
546                 case ENABLE:
547                         if (!(SLOT_PWRGD(slot_cur->status)) &&
548                              (SLOT_PRESENT(slot_cur->status)) &&
549                              !(SLOT_LATCH(slot_cur->status)))
550                                 return 0;
551                         break;
552                 case DISABLE:
553                         if ((SLOT_PWRGD(slot_cur->status)) &&
554                             (SLOT_PRESENT(slot_cur->status)) &&
555                             !(SLOT_LATCH(slot_cur->status)))
556                                 return 0;
557                         break;
558                 default:
559                         break;
560         }
561         err("validate failed....\n");
562         return -EINVAL;
563 }
564
565 /****************************************************************************
566  * This routine is for updating the data structures in the hotplug core
567  * Parameters: struct slot
568  * Returns: 0 or error
569  ****************************************************************************/
570 int ibmphp_update_slot_info(struct slot *slot_cur)
571 {
572         struct pci_bus *bus = slot_cur->hotplug_slot.pci_slot->bus;
573         u8 bus_speed;
574         u8 mode;
575
576         bus_speed = slot_cur->bus_on->current_speed;
577         mode = slot_cur->bus_on->current_bus_mode;
578
579         switch (bus_speed) {
580                 case BUS_SPEED_33:
581                         break;
582                 case BUS_SPEED_66:
583                         if (mode == BUS_MODE_PCIX)
584                                 bus_speed += 0x01;
585                         else if (mode == BUS_MODE_PCI)
586                                 ;
587                         else
588                                 bus_speed = PCI_SPEED_UNKNOWN;
589                         break;
590                 case BUS_SPEED_100:
591                 case BUS_SPEED_133:
592                         bus_speed += 0x01;
593                         break;
594                 default:
595                         bus_speed = PCI_SPEED_UNKNOWN;
596         }
597
598         bus->cur_bus_speed = bus_speed;
599         // To do: bus_names
600
601         return 0;
602 }
603
604
605 /******************************************************************************
606  * This function will return the pci_func, given bus and devfunc, or NULL.  It
607  * is called from visit routines
608  ******************************************************************************/
609
610 static struct pci_func *ibm_slot_find(u8 busno, u8 device, u8 function)
611 {
612         struct pci_func *func_cur;
613         struct slot *slot_cur;
614         list_for_each_entry(slot_cur, &ibmphp_slot_head, ibm_slot_list) {
615                 if (slot_cur->func) {
616                         func_cur = slot_cur->func;
617                         while (func_cur) {
618                                 if ((func_cur->busno == busno) &&
619                                                 (func_cur->device == device) &&
620                                                 (func_cur->function == function))
621                                         return func_cur;
622                                 func_cur = func_cur->next;
623                         }
624                 }
625         }
626         return NULL;
627 }
628
629 /*************************************************************
630  * This routine frees up memory used by struct slot, including
631  * the pointers to pci_func, bus, hotplug_slot, controller,
632  * and deregistering from the hotplug core
633  *************************************************************/
634 static void free_slots(void)
635 {
636         struct slot *slot_cur, *next;
637
638         debug("%s -- enter\n", __func__);
639
640         list_for_each_entry_safe(slot_cur, next, &ibmphp_slot_head,
641                                  ibm_slot_list) {
642                 pci_hp_del(&slot_cur->hotplug_slot);
643                 slot_cur->ctrl = NULL;
644                 slot_cur->bus_on = NULL;
645
646                 /*
647                  * We don't want to actually remove the resources,
648                  * since ibmphp_free_resources() will do just that.
649                  */
650                 ibmphp_unconfigure_card(&slot_cur, -1);
651
652                 pci_hp_destroy(&slot_cur->hotplug_slot);
653                 kfree(slot_cur);
654         }
655         debug("%s -- exit\n", __func__);
656 }
657
658 static void ibm_unconfigure_device(struct pci_func *func)
659 {
660         struct pci_dev *temp;
661         u8 j;
662
663         debug("inside %s\n", __func__);
664         debug("func->device = %x, func->function = %x\n",
665                                         func->device, func->function);
666         debug("func->device << 3 | 0x0  = %x\n", func->device << 3 | 0x0);
667
668         pci_lock_rescan_remove();
669
670         for (j = 0; j < 0x08; j++) {
671                 temp = pci_get_domain_bus_and_slot(0, func->busno,
672                                                    (func->device << 3) | j);
673                 if (temp) {
674                         pci_stop_and_remove_bus_device(temp);
675                         pci_dev_put(temp);
676                 }
677         }
678
679         pci_dev_put(func->dev);
680
681         pci_unlock_rescan_remove();
682 }
683
684 /*
685  * The following function is to fix kernel bug regarding
686  * getting bus entries, here we manually add those primary
687  * bus entries to kernel bus structure whenever apply
688  */
689 static u8 bus_structure_fixup(u8 busno)
690 {
691         struct pci_bus *bus, *b;
692         struct pci_dev *dev;
693         u16 l;
694
695         if (pci_find_bus(0, busno) || !(ibmphp_find_same_bus_num(busno)))
696                 return 1;
697
698         bus = kmalloc(sizeof(*bus), GFP_KERNEL);
699         if (!bus)
700                 return 1;
701
702         dev = kmalloc(sizeof(*dev), GFP_KERNEL);
703         if (!dev) {
704                 kfree(bus);
705                 return 1;
706         }
707
708         bus->number = busno;
709         bus->ops = ibmphp_pci_bus->ops;
710         dev->bus = bus;
711         for (dev->devfn = 0; dev->devfn < 256; dev->devfn += 8) {
712                 if (!pci_read_config_word(dev, PCI_VENDOR_ID, &l) &&
713                                         (l != 0x0000) && (l != 0xffff)) {
714                         debug("%s - Inside bus_structure_fixup()\n",
715                                                         __func__);
716                         b = pci_scan_bus(busno, ibmphp_pci_bus->ops, NULL);
717                         if (!b)
718                                 continue;
719
720                         pci_bus_add_devices(b);
721                         break;
722                 }
723         }
724
725         kfree(dev);
726         kfree(bus);
727
728         return 0;
729 }
730
731 static int ibm_configure_device(struct pci_func *func)
732 {
733         struct pci_bus *child;
734         int num;
735         int flag = 0;   /* this is to make sure we don't double scan the bus,
736                                         for bridged devices primarily */
737
738         pci_lock_rescan_remove();
739
740         if (!(bus_structure_fixup(func->busno)))
741                 flag = 1;
742         if (func->dev == NULL)
743                 func->dev = pci_get_domain_bus_and_slot(0, func->busno,
744                                 PCI_DEVFN(func->device, func->function));
745
746         if (func->dev == NULL) {
747                 struct pci_bus *bus = pci_find_bus(0, func->busno);
748                 if (!bus)
749                         goto out;
750
751                 num = pci_scan_slot(bus,
752                                 PCI_DEVFN(func->device, func->function));
753                 if (num)
754                         pci_bus_add_devices(bus);
755
756                 func->dev = pci_get_domain_bus_and_slot(0, func->busno,
757                                 PCI_DEVFN(func->device, func->function));
758                 if (func->dev == NULL) {
759                         err("ERROR... : pci_dev still NULL\n");
760                         goto out;
761                 }
762         }
763         if (!(flag) && (func->dev->hdr_type == PCI_HEADER_TYPE_BRIDGE)) {
764                 pci_hp_add_bridge(func->dev);
765                 child = func->dev->subordinate;
766                 if (child)
767                         pci_bus_add_devices(child);
768         }
769
770  out:
771         pci_unlock_rescan_remove();
772         return 0;
773 }
774
775 /*******************************************************
776  * Returns whether the bus is empty or not
777  *******************************************************/
778 static int is_bus_empty(struct slot *slot_cur)
779 {
780         int rc;
781         struct slot *tmp_slot;
782         u8 i = slot_cur->bus_on->slot_min;
783
784         while (i <= slot_cur->bus_on->slot_max) {
785                 if (i == slot_cur->number) {
786                         i++;
787                         continue;
788                 }
789                 tmp_slot = ibmphp_get_slot_from_physical_num(i);
790                 if (!tmp_slot)
791                         return 0;
792                 rc = slot_update(&tmp_slot);
793                 if (rc)
794                         return 0;
795                 if (SLOT_PRESENT(tmp_slot->status) &&
796                                         SLOT_PWRGD(tmp_slot->status))
797                         return 0;
798                 i++;
799         }
800         return 1;
801 }
802
803 /***********************************************************
804  * If the HPC permits and the bus currently empty, tries to set the
805  * bus speed and mode at the maximum card and bus capability
806  * Parameters: slot
807  * Returns: bus is set (0) or error code
808  ***********************************************************/
809 static int set_bus(struct slot *slot_cur)
810 {
811         int rc;
812         u8 speed;
813         u8 cmd = 0x0;
814         int retval;
815         static const struct pci_device_id ciobx[] = {
816                 { PCI_DEVICE(PCI_VENDOR_ID_SERVERWORKS, 0x0101) },
817                 { },
818         };
819
820         debug("%s - entry slot # %d\n", __func__, slot_cur->number);
821         if (SET_BUS_STATUS(slot_cur->ctrl) && is_bus_empty(slot_cur)) {
822                 rc = slot_update(&slot_cur);
823                 if (rc)
824                         return rc;
825                 speed = SLOT_SPEED(slot_cur->ext_status);
826                 debug("ext_status = %x, speed = %x\n", slot_cur->ext_status, speed);
827                 switch (speed) {
828                 case HPC_SLOT_SPEED_33:
829                         cmd = HPC_BUS_33CONVMODE;
830                         break;
831                 case HPC_SLOT_SPEED_66:
832                         if (SLOT_PCIX(slot_cur->ext_status)) {
833                                 if ((slot_cur->supported_speed >= BUS_SPEED_66) &&
834                                                 (slot_cur->supported_bus_mode == BUS_MODE_PCIX))
835                                         cmd = HPC_BUS_66PCIXMODE;
836                                 else if (!SLOT_BUS_MODE(slot_cur->ext_status))
837                                         /* if max slot/bus capability is 66 pci
838                                         and there's no bus mode mismatch, then
839                                         the adapter supports 66 pci */
840                                         cmd = HPC_BUS_66CONVMODE;
841                                 else
842                                         cmd = HPC_BUS_33CONVMODE;
843                         } else {
844                                 if (slot_cur->supported_speed >= BUS_SPEED_66)
845                                         cmd = HPC_BUS_66CONVMODE;
846                                 else
847                                         cmd = HPC_BUS_33CONVMODE;
848                         }
849                         break;
850                 case HPC_SLOT_SPEED_133:
851                         switch (slot_cur->supported_speed) {
852                         case BUS_SPEED_33:
853                                 cmd = HPC_BUS_33CONVMODE;
854                                 break;
855                         case BUS_SPEED_66:
856                                 if (slot_cur->supported_bus_mode == BUS_MODE_PCIX)
857                                         cmd = HPC_BUS_66PCIXMODE;
858                                 else
859                                         cmd = HPC_BUS_66CONVMODE;
860                                 break;
861                         case BUS_SPEED_100:
862                                 cmd = HPC_BUS_100PCIXMODE;
863                                 break;
864                         case BUS_SPEED_133:
865                                 /* This is to take care of the bug in CIOBX chip */
866                                 if (pci_dev_present(ciobx))
867                                         ibmphp_hpc_writeslot(slot_cur,
868                                                         HPC_BUS_100PCIXMODE);
869                                 cmd = HPC_BUS_133PCIXMODE;
870                                 break;
871                         default:
872                                 err("Wrong bus speed\n");
873                                 return -ENODEV;
874                         }
875                         break;
876                 default:
877                         err("wrong slot speed\n");
878                         return -ENODEV;
879                 }
880                 debug("setting bus speed for slot %d, cmd %x\n",
881                                                 slot_cur->number, cmd);
882                 retval = ibmphp_hpc_writeslot(slot_cur, cmd);
883                 if (retval) {
884                         err("setting bus speed failed\n");
885                         return retval;
886                 }
887                 if (CTLR_RESULT(slot_cur->ctrl->status)) {
888                         err("command not completed successfully in set_bus\n");
889                         return -EIO;
890                 }
891         }
892         /* This is for x440, once Brandon fixes the firmware,
893         will not need this delay */
894         msleep(1000);
895         debug("%s -Exit\n", __func__);
896         return 0;
897 }
898
899 /* This routine checks the bus limitations that the slot is on from the BIOS.
900  * This is used in deciding whether or not to power up the slot.
901  * (electrical/spec limitations. For example, >1 133 MHz or >2 66 PCI cards on
902  * same bus)
903  * Parameters: slot
904  * Returns: 0 = no limitations, -EINVAL = exceeded limitations on the bus
905  */
906 static int check_limitations(struct slot *slot_cur)
907 {
908         u8 i;
909         struct slot *tmp_slot;
910         u8 count = 0;
911         u8 limitation = 0;
912
913         for (i = slot_cur->bus_on->slot_min; i <= slot_cur->bus_on->slot_max; i++) {
914                 tmp_slot = ibmphp_get_slot_from_physical_num(i);
915                 if (!tmp_slot)
916                         return -ENODEV;
917                 if ((SLOT_PWRGD(tmp_slot->status)) &&
918                                         !(SLOT_CONNECT(tmp_slot->status)))
919                         count++;
920         }
921         get_cur_bus_info(&slot_cur);
922         switch (slot_cur->bus_on->current_speed) {
923         case BUS_SPEED_33:
924                 limitation = slot_cur->bus_on->slots_at_33_conv;
925                 break;
926         case BUS_SPEED_66:
927                 if (slot_cur->bus_on->current_bus_mode == BUS_MODE_PCIX)
928                         limitation = slot_cur->bus_on->slots_at_66_pcix;
929                 else
930                         limitation = slot_cur->bus_on->slots_at_66_conv;
931                 break;
932         case BUS_SPEED_100:
933                 limitation = slot_cur->bus_on->slots_at_100_pcix;
934                 break;
935         case BUS_SPEED_133:
936                 limitation = slot_cur->bus_on->slots_at_133_pcix;
937                 break;
938         }
939
940         if ((count + 1) > limitation)
941                 return -EINVAL;
942         return 0;
943 }
944
945 static inline void print_card_capability(struct slot *slot_cur)
946 {
947         info("capability of the card is ");
948         if ((slot_cur->ext_status & CARD_INFO) == PCIX133)
949                 info("   133 MHz PCI-X\n");
950         else if ((slot_cur->ext_status & CARD_INFO) == PCIX66)
951                 info("    66 MHz PCI-X\n");
952         else if ((slot_cur->ext_status & CARD_INFO) == PCI66)
953                 info("    66 MHz PCI\n");
954         else
955                 info("    33 MHz PCI\n");
956
957 }
958
959 /* This routine will power on the slot, configure the device(s) and find the
960  * drivers for them.
961  * Parameters: hotplug_slot
962  * Returns: 0 or failure codes
963  */
964 static int enable_slot(struct hotplug_slot *hs)
965 {
966         int rc, i, rcpr;
967         struct slot *slot_cur;
968         u8 function;
969         struct pci_func *tmp_func;
970
971         ibmphp_lock_operations();
972
973         debug("ENABLING SLOT........\n");
974         slot_cur = to_slot(hs);
975
976         rc = validate(slot_cur, ENABLE);
977         if (rc) {
978                 err("validate function failed\n");
979                 goto error_nopower;
980         }
981
982         attn_LED_blink(slot_cur);
983
984         rc = set_bus(slot_cur);
985         if (rc) {
986                 err("was not able to set the bus\n");
987                 goto error_nopower;
988         }
989
990         /*-----------------debugging------------------------------*/
991         get_cur_bus_info(&slot_cur);
992         debug("the current bus speed right after set_bus = %x\n",
993                                         slot_cur->bus_on->current_speed);
994         /*----------------------------------------------------------*/
995
996         rc = check_limitations(slot_cur);
997         if (rc) {
998                 err("Adding this card exceeds the limitations of this bus.\n");
999                 err("(i.e., >1 133MHz cards running on same bus, or >2 66 PCI cards running on same bus.\n");
1000                 err("Try hot-adding into another bus\n");
1001                 rc = -EINVAL;
1002                 goto error_nopower;
1003         }
1004
1005         rc = power_on(slot_cur);
1006
1007         if (rc) {
1008                 err("something wrong when powering up... please see below for details\n");
1009                 /* need to turn off before on, otherwise, blinking overwrites */
1010                 attn_off(slot_cur);
1011                 attn_on(slot_cur);
1012                 if (slot_update(&slot_cur)) {
1013                         attn_off(slot_cur);
1014                         attn_on(slot_cur);
1015                         rc = -ENODEV;
1016                         goto exit;
1017                 }
1018                 /* Check to see the error of why it failed */
1019                 if ((SLOT_POWER(slot_cur->status)) &&
1020                                         !(SLOT_PWRGD(slot_cur->status)))
1021                         err("power fault occurred trying to power up\n");
1022                 else if (SLOT_BUS_SPEED(slot_cur->status)) {
1023                         err("bus speed mismatch occurred.  please check current bus speed and card capability\n");
1024                         print_card_capability(slot_cur);
1025                 } else if (SLOT_BUS_MODE(slot_cur->ext_status)) {
1026                         err("bus mode mismatch occurred.  please check current bus mode and card capability\n");
1027                         print_card_capability(slot_cur);
1028                 }
1029                 ibmphp_update_slot_info(slot_cur);
1030                 goto exit;
1031         }
1032         debug("after power_on\n");
1033         /*-----------------------debugging---------------------------*/
1034         get_cur_bus_info(&slot_cur);
1035         debug("the current bus speed right after power_on = %x\n",
1036                                         slot_cur->bus_on->current_speed);
1037         /*----------------------------------------------------------*/
1038
1039         rc = slot_update(&slot_cur);
1040         if (rc)
1041                 goto error_power;
1042
1043         rc = -EINVAL;
1044         if (SLOT_POWER(slot_cur->status) && !(SLOT_PWRGD(slot_cur->status))) {
1045                 err("power fault occurred trying to power up...\n");
1046                 goto error_power;
1047         }
1048         if (SLOT_POWER(slot_cur->status) && (SLOT_BUS_SPEED(slot_cur->status))) {
1049                 err("bus speed mismatch occurred.  please check current bus speed and card capability\n");
1050                 print_card_capability(slot_cur);
1051                 goto error_power;
1052         }
1053         /* Don't think this case will happen after above checks...
1054          * but just in case, for paranoia sake */
1055         if (!(SLOT_POWER(slot_cur->status))) {
1056                 err("power on failed...\n");
1057                 goto error_power;
1058         }
1059
1060         slot_cur->func = kzalloc(sizeof(struct pci_func), GFP_KERNEL);
1061         if (!slot_cur->func) {
1062                 /* do update_slot_info here? */
1063                 rc = -ENOMEM;
1064                 goto error_power;
1065         }
1066         slot_cur->func->busno = slot_cur->bus;
1067         slot_cur->func->device = slot_cur->device;
1068         for (i = 0; i < 4; i++)
1069                 slot_cur->func->irq[i] = slot_cur->irq[i];
1070
1071         debug("b4 configure_card, slot_cur->bus = %x, slot_cur->device = %x\n",
1072                                         slot_cur->bus, slot_cur->device);
1073
1074         if (ibmphp_configure_card(slot_cur->func, slot_cur->number)) {
1075                 err("configure_card was unsuccessful...\n");
1076                 /* true because don't need to actually deallocate resources,
1077                  * just remove references */
1078                 ibmphp_unconfigure_card(&slot_cur, 1);
1079                 debug("after unconfigure_card\n");
1080                 slot_cur->func = NULL;
1081                 rc = -ENOMEM;
1082                 goto error_power;
1083         }
1084
1085         function = 0x00;
1086         do {
1087                 tmp_func = ibm_slot_find(slot_cur->bus, slot_cur->func->device,
1088                                                         function++);
1089                 if (tmp_func && !(tmp_func->dev))
1090                         ibm_configure_device(tmp_func);
1091         } while (tmp_func);
1092
1093         attn_off(slot_cur);
1094         if (slot_update(&slot_cur)) {
1095                 rc = -EFAULT;
1096                 goto exit;
1097         }
1098         ibmphp_print_test();
1099         rc = ibmphp_update_slot_info(slot_cur);
1100 exit:
1101         ibmphp_unlock_operations();
1102         return rc;
1103
1104 error_nopower:
1105         attn_off(slot_cur);     /* need to turn off if was blinking b4 */
1106         attn_on(slot_cur);
1107 error_cont:
1108         rcpr = slot_update(&slot_cur);
1109         if (rcpr) {
1110                 rc = rcpr;
1111                 goto exit;
1112         }
1113         ibmphp_update_slot_info(slot_cur);
1114         goto exit;
1115
1116 error_power:
1117         attn_off(slot_cur);     /* need to turn off if was blinking b4 */
1118         attn_on(slot_cur);
1119         rcpr = power_off(slot_cur);
1120         if (rcpr) {
1121                 rc = rcpr;
1122                 goto exit;
1123         }
1124         goto error_cont;
1125 }
1126
1127 /**************************************************************
1128 * HOT REMOVING ADAPTER CARD                                   *
1129 * INPUT: POINTER TO THE HOTPLUG SLOT STRUCTURE                *
1130 * OUTPUT: SUCCESS 0 ; FAILURE: UNCONFIGURE , VALIDATE         *
1131 *               DISABLE POWER ,                               *
1132 **************************************************************/
1133 static int ibmphp_disable_slot(struct hotplug_slot *hotplug_slot)
1134 {
1135         struct slot *slot = to_slot(hotplug_slot);
1136         int rc;
1137
1138         ibmphp_lock_operations();
1139         rc = ibmphp_do_disable_slot(slot);
1140         ibmphp_unlock_operations();
1141         return rc;
1142 }
1143
1144 int ibmphp_do_disable_slot(struct slot *slot_cur)
1145 {
1146         int rc;
1147         u8 flag;
1148
1149         debug("DISABLING SLOT...\n");
1150
1151         if ((slot_cur == NULL) || (slot_cur->ctrl == NULL))
1152                 return -ENODEV;
1153
1154         flag = slot_cur->flag;
1155         slot_cur->flag = 1;
1156
1157         if (flag == 1) {
1158                 rc = validate(slot_cur, DISABLE);
1159                         /* checking if powered off already & valid slot # */
1160                 if (rc)
1161                         goto error;
1162         }
1163         attn_LED_blink(slot_cur);
1164
1165         if (slot_cur->func == NULL) {
1166                 /* We need this for functions that were there on bootup */
1167                 slot_cur->func = kzalloc(sizeof(struct pci_func), GFP_KERNEL);
1168                 if (!slot_cur->func) {
1169                         rc = -ENOMEM;
1170                         goto error;
1171                 }
1172                 slot_cur->func->busno = slot_cur->bus;
1173                 slot_cur->func->device = slot_cur->device;
1174         }
1175
1176         ibm_unconfigure_device(slot_cur->func);
1177
1178         /*
1179          * If we got here from latch suddenly opening on operating card or
1180          * a power fault, there's no power to the card, so cannot
1181          * read from it to determine what resources it occupied.  This operation
1182          * is forbidden anyhow.  The best we can do is remove it from kernel
1183          * lists at least */
1184
1185         if (!flag) {
1186                 attn_off(slot_cur);
1187                 return 0;
1188         }
1189
1190         rc = ibmphp_unconfigure_card(&slot_cur, 0);
1191         slot_cur->func = NULL;
1192         debug("in disable_slot. after unconfigure_card\n");
1193         if (rc) {
1194                 err("could not unconfigure card.\n");
1195                 goto error;
1196         }
1197
1198         rc = ibmphp_hpc_writeslot(slot_cur, HPC_SLOT_OFF);
1199         if (rc)
1200                 goto error;
1201
1202         attn_off(slot_cur);
1203         rc = slot_update(&slot_cur);
1204         if (rc)
1205                 goto exit;
1206
1207         rc = ibmphp_update_slot_info(slot_cur);
1208         ibmphp_print_test();
1209 exit:
1210         return rc;
1211
1212 error:
1213         /*  Need to turn off if was blinking b4 */
1214         attn_off(slot_cur);
1215         attn_on(slot_cur);
1216         if (slot_update(&slot_cur)) {
1217                 rc = -EFAULT;
1218                 goto exit;
1219         }
1220         if (flag)
1221                 ibmphp_update_slot_info(slot_cur);
1222         goto exit;
1223 }
1224
1225 const struct hotplug_slot_ops ibmphp_hotplug_slot_ops = {
1226         .set_attention_status =         set_attention_status,
1227         .enable_slot =                  enable_slot,
1228         .disable_slot =                 ibmphp_disable_slot,
1229         .hardware_test =                NULL,
1230         .get_power_status =             get_power_status,
1231         .get_attention_status =         get_attention_status,
1232         .get_latch_status =             get_latch_status,
1233         .get_adapter_status =           get_adapter_present,
1234 /*      .get_max_adapter_speed =        get_max_adapter_speed,
1235         .get_bus_name_status =          get_bus_name,
1236 */
1237 };
1238
1239 static void ibmphp_unload(void)
1240 {
1241         free_slots();
1242         debug("after slots\n");
1243         ibmphp_free_resources();
1244         debug("after resources\n");
1245         ibmphp_free_bus_info_queue();
1246         debug("after bus info\n");
1247         ibmphp_free_ebda_hpc_queue();
1248         debug("after ebda hpc\n");
1249         ibmphp_free_ebda_pci_rsrc_queue();
1250         debug("after ebda pci rsrc\n");
1251         kfree(ibmphp_pci_bus);
1252 }
1253
1254 static int __init ibmphp_init(void)
1255 {
1256         struct pci_bus *bus;
1257         int i = 0;
1258         int rc = 0;
1259
1260         init_flag = 1;
1261
1262         info(DRIVER_DESC " version: " DRIVER_VERSION "\n");
1263
1264         ibmphp_pci_bus = kmalloc(sizeof(*ibmphp_pci_bus), GFP_KERNEL);
1265         if (!ibmphp_pci_bus) {
1266                 rc = -ENOMEM;
1267                 goto exit;
1268         }
1269
1270         bus = pci_find_bus(0, 0);
1271         if (!bus) {
1272                 err("Can't find the root pci bus, can not continue\n");
1273                 rc = -ENODEV;
1274                 goto error;
1275         }
1276         memcpy(ibmphp_pci_bus, bus, sizeof(*ibmphp_pci_bus));
1277
1278         ibmphp_debug = debug;
1279
1280         ibmphp_hpc_initvars();
1281
1282         for (i = 0; i < 16; i++)
1283                 irqs[i] = 0;
1284
1285         rc = ibmphp_access_ebda();
1286         if (rc)
1287                 goto error;
1288         debug("after ibmphp_access_ebda()\n");
1289
1290         rc = ibmphp_rsrc_init();
1291         if (rc)
1292                 goto error;
1293         debug("AFTER Resource & EBDA INITIALIZATIONS\n");
1294
1295         max_slots = get_max_slots();
1296
1297         rc = ibmphp_register_pci();
1298         if (rc)
1299                 goto error;
1300
1301         if (init_ops()) {
1302                 rc = -ENODEV;
1303                 goto error;
1304         }
1305
1306         ibmphp_print_test();
1307         rc = ibmphp_hpc_start_poll_thread();
1308         if (rc)
1309                 goto error;
1310
1311 exit:
1312         return rc;
1313
1314 error:
1315         ibmphp_unload();
1316         goto exit;
1317 }
1318
1319 static void __exit ibmphp_exit(void)
1320 {
1321         ibmphp_hpc_stop_poll_thread();
1322         debug("after polling\n");
1323         ibmphp_unload();
1324         debug("done\n");
1325 }
1326
1327 module_init(ibmphp_init);
1328 module_exit(ibmphp_exit);