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 */
get_cur_bus_info(struct slot ** sl)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
slot_update(struct slot ** sl)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
get_max_slots(void)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 */
ibmphp_init_devno(struct slot ** cur_slot)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
power_on(struct slot * slot_cur)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
power_off(struct slot * slot_cur)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
set_attention_status(struct hotplug_slot * hotplug_slot,u8 value)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 = hotplug_slot->private;
251 if (pslot)
252 rc = ibmphp_hpc_writeslot(pslot, cmd);
253 else
254 rc = -ENODEV;
255 }
256 } else
257 rc = -ENODEV;
258
259 ibmphp_unlock_operations();
260
261 debug("set_attention_status - Exit rc[%d]\n", rc);
262 return rc;
263 }
264
get_attention_status(struct hotplug_slot * hotplug_slot,u8 * value)265 static int get_attention_status(struct hotplug_slot *hotplug_slot, u8 *value)
266 {
267 int rc = -ENODEV;
268 struct slot *pslot;
269 struct slot myslot;
270
271 debug("get_attention_status - Entry hotplug_slot[%lx] pvalue[%lx]\n",
272 (ulong) hotplug_slot, (ulong) value);
273
274 ibmphp_lock_operations();
275 if (hotplug_slot) {
276 pslot = hotplug_slot->private;
277 if (pslot) {
278 memcpy(&myslot, pslot, sizeof(struct slot));
279 rc = ibmphp_hpc_readslot(pslot, READ_SLOTSTATUS,
280 &(myslot.status));
281 if (!rc)
282 rc = ibmphp_hpc_readslot(pslot,
283 READ_EXTSLOTSTATUS,
284 &(myslot.ext_status));
285 if (!rc)
286 *value = SLOT_ATTN(myslot.status,
287 myslot.ext_status);
288 }
289 }
290
291 ibmphp_unlock_operations();
292 debug("get_attention_status - Exit rc[%d] value[%x]\n", rc, *value);
293 return rc;
294 }
295
get_latch_status(struct hotplug_slot * hotplug_slot,u8 * value)296 static int get_latch_status(struct hotplug_slot *hotplug_slot, u8 *value)
297 {
298 int rc = -ENODEV;
299 struct slot *pslot;
300 struct slot myslot;
301
302 debug("get_latch_status - Entry hotplug_slot[%lx] pvalue[%lx]\n",
303 (ulong) hotplug_slot, (ulong) value);
304 ibmphp_lock_operations();
305 if (hotplug_slot) {
306 pslot = hotplug_slot->private;
307 if (pslot) {
308 memcpy(&myslot, pslot, sizeof(struct slot));
309 rc = ibmphp_hpc_readslot(pslot, READ_SLOTSTATUS,
310 &(myslot.status));
311 if (!rc)
312 *value = SLOT_LATCH(myslot.status);
313 }
314 }
315
316 ibmphp_unlock_operations();
317 debug("get_latch_status - Exit rc[%d] rc[%x] value[%x]\n",
318 rc, rc, *value);
319 return rc;
320 }
321
322
get_power_status(struct hotplug_slot * hotplug_slot,u8 * value)323 static int get_power_status(struct hotplug_slot *hotplug_slot, u8 *value)
324 {
325 int rc = -ENODEV;
326 struct slot *pslot;
327 struct slot myslot;
328
329 debug("get_power_status - Entry hotplug_slot[%lx] pvalue[%lx]\n",
330 (ulong) hotplug_slot, (ulong) value);
331 ibmphp_lock_operations();
332 if (hotplug_slot) {
333 pslot = hotplug_slot->private;
334 if (pslot) {
335 memcpy(&myslot, pslot, sizeof(struct slot));
336 rc = ibmphp_hpc_readslot(pslot, READ_SLOTSTATUS,
337 &(myslot.status));
338 if (!rc)
339 *value = SLOT_PWRGD(myslot.status);
340 }
341 }
342
343 ibmphp_unlock_operations();
344 debug("get_power_status - Exit rc[%d] rc[%x] value[%x]\n",
345 rc, rc, *value);
346 return rc;
347 }
348
get_adapter_present(struct hotplug_slot * hotplug_slot,u8 * value)349 static int get_adapter_present(struct hotplug_slot *hotplug_slot, u8 *value)
350 {
351 int rc = -ENODEV;
352 struct slot *pslot;
353 u8 present;
354 struct slot myslot;
355
356 debug("get_adapter_status - Entry hotplug_slot[%lx] pvalue[%lx]\n",
357 (ulong) hotplug_slot, (ulong) value);
358 ibmphp_lock_operations();
359 if (hotplug_slot) {
360 pslot = hotplug_slot->private;
361 if (pslot) {
362 memcpy(&myslot, pslot, sizeof(struct slot));
363 rc = ibmphp_hpc_readslot(pslot, READ_SLOTSTATUS,
364 &(myslot.status));
365 if (!rc) {
366 present = SLOT_PRESENT(myslot.status);
367 if (present == HPC_SLOT_EMPTY)
368 *value = 0;
369 else
370 *value = 1;
371 }
372 }
373 }
374
375 ibmphp_unlock_operations();
376 debug("get_adapter_present - Exit rc[%d] value[%x]\n", rc, *value);
377 return rc;
378 }
379
get_max_bus_speed(struct slot * slot)380 static int get_max_bus_speed(struct slot *slot)
381 {
382 int rc = 0;
383 u8 mode = 0;
384 enum pci_bus_speed speed;
385 struct pci_bus *bus = slot->hotplug_slot->pci_slot->bus;
386
387 debug("%s - Entry slot[%p]\n", __func__, slot);
388
389 ibmphp_lock_operations();
390 mode = slot->supported_bus_mode;
391 speed = slot->supported_speed;
392 ibmphp_unlock_operations();
393
394 switch (speed) {
395 case BUS_SPEED_33:
396 break;
397 case BUS_SPEED_66:
398 if (mode == BUS_MODE_PCIX)
399 speed += 0x01;
400 break;
401 case BUS_SPEED_100:
402 case BUS_SPEED_133:
403 speed += 0x01;
404 break;
405 default:
406 /* Note (will need to change): there would be soon 256, 512 also */
407 rc = -ENODEV;
408 }
409
410 if (!rc)
411 bus->max_bus_speed = speed;
412
413 debug("%s - Exit rc[%d] speed[%x]\n", __func__, rc, speed);
414 return rc;
415 }
416
417 /*
418 static int get_max_adapter_speed_1(struct hotplug_slot *hotplug_slot, u8 *value, u8 flag)
419 {
420 int rc = -ENODEV;
421 struct slot *pslot;
422 struct slot myslot;
423
424 debug("get_max_adapter_speed_1 - Entry hotplug_slot[%lx] pvalue[%lx]\n",
425 (ulong)hotplug_slot, (ulong) value);
426
427 if (flag)
428 ibmphp_lock_operations();
429
430 if (hotplug_slot && value) {
431 pslot = hotplug_slot->private;
432 if (pslot) {
433 memcpy(&myslot, pslot, sizeof(struct slot));
434 rc = ibmphp_hpc_readslot(pslot, READ_SLOTSTATUS,
435 &(myslot.status));
436
437 if (!(SLOT_LATCH (myslot.status)) &&
438 (SLOT_PRESENT (myslot.status))) {
439 rc = ibmphp_hpc_readslot(pslot,
440 READ_EXTSLOTSTATUS,
441 &(myslot.ext_status));
442 if (!rc)
443 *value = SLOT_SPEED(myslot.ext_status);
444 } else
445 *value = MAX_ADAPTER_NONE;
446 }
447 }
448
449 if (flag)
450 ibmphp_unlock_operations();
451
452 debug("get_max_adapter_speed_1 - Exit rc[%d] value[%x]\n", rc, *value);
453 return rc;
454 }
455
456 static int get_bus_name(struct hotplug_slot *hotplug_slot, char *value)
457 {
458 int rc = -ENODEV;
459 struct slot *pslot = NULL;
460
461 debug("get_bus_name - Entry hotplug_slot[%lx]\n", (ulong)hotplug_slot);
462
463 ibmphp_lock_operations();
464
465 if (hotplug_slot) {
466 pslot = hotplug_slot->private;
467 if (pslot) {
468 rc = 0;
469 snprintf(value, 100, "Bus %x", pslot->bus);
470 }
471 } else
472 rc = -ENODEV;
473
474 ibmphp_unlock_operations();
475 debug("get_bus_name - Exit rc[%d] value[%x]\n", rc, *value);
476 return rc;
477 }
478 */
479
480 /****************************************************************************
481 * This routine will initialize the ops data structure used in the validate
482 * function. It will also power off empty slots that are powered on since BIOS
483 * leaves those on, albeit disconnected
484 ****************************************************************************/
init_ops(void)485 static int __init init_ops(void)
486 {
487 struct slot *slot_cur;
488 int retval;
489 int rc;
490
491 list_for_each_entry(slot_cur, &ibmphp_slot_head, ibm_slot_list) {
492 debug("BEFORE GETTING SLOT STATUS, slot # %x\n",
493 slot_cur->number);
494 if (slot_cur->ctrl->revision == 0xFF)
495 if (get_ctrl_revision(slot_cur,
496 &slot_cur->ctrl->revision))
497 return -1;
498
499 if (slot_cur->bus_on->current_speed == 0xFF)
500 if (get_cur_bus_info(&slot_cur))
501 return -1;
502 get_max_bus_speed(slot_cur);
503
504 if (slot_cur->ctrl->options == 0xFF)
505 if (get_hpc_options(slot_cur, &slot_cur->ctrl->options))
506 return -1;
507
508 retval = slot_update(&slot_cur);
509 if (retval)
510 return retval;
511
512 debug("status = %x\n", slot_cur->status);
513 debug("ext_status = %x\n", slot_cur->ext_status);
514 debug("SLOT_POWER = %x\n", SLOT_POWER(slot_cur->status));
515 debug("SLOT_PRESENT = %x\n", SLOT_PRESENT(slot_cur->status));
516 debug("SLOT_LATCH = %x\n", SLOT_LATCH(slot_cur->status));
517
518 if ((SLOT_PWRGD(slot_cur->status)) &&
519 !(SLOT_PRESENT(slot_cur->status)) &&
520 !(SLOT_LATCH(slot_cur->status))) {
521 debug("BEFORE POWER OFF COMMAND\n");
522 rc = power_off(slot_cur);
523 if (rc)
524 return rc;
525
526 /* retval = slot_update(&slot_cur);
527 * if (retval)
528 * return retval;
529 * ibmphp_update_slot_info(slot_cur);
530 */
531 }
532 }
533 init_flag = 0;
534 return 0;
535 }
536
537 /* This operation will check whether the slot is within the bounds and
538 * the operation is valid to perform on that slot
539 * Parameters: slot, operation
540 * Returns: 0 or error codes
541 */
validate(struct slot * slot_cur,int opn)542 static int validate(struct slot *slot_cur, int opn)
543 {
544 int number;
545 int retval;
546
547 if (!slot_cur)
548 return -ENODEV;
549 number = slot_cur->number;
550 if ((number > max_slots) || (number < 0))
551 return -EBADSLT;
552 debug("slot_number in validate is %d\n", slot_cur->number);
553
554 retval = slot_update(&slot_cur);
555 if (retval)
556 return retval;
557
558 switch (opn) {
559 case ENABLE:
560 if (!(SLOT_PWRGD(slot_cur->status)) &&
561 (SLOT_PRESENT(slot_cur->status)) &&
562 !(SLOT_LATCH(slot_cur->status)))
563 return 0;
564 break;
565 case DISABLE:
566 if ((SLOT_PWRGD(slot_cur->status)) &&
567 (SLOT_PRESENT(slot_cur->status)) &&
568 !(SLOT_LATCH(slot_cur->status)))
569 return 0;
570 break;
571 default:
572 break;
573 }
574 err("validate failed....\n");
575 return -EINVAL;
576 }
577
578 /****************************************************************************
579 * This routine is for updating the data structures in the hotplug core
580 * Parameters: struct slot
581 * Returns: 0 or error
582 ****************************************************************************/
ibmphp_update_slot_info(struct slot * slot_cur)583 int ibmphp_update_slot_info(struct slot *slot_cur)
584 {
585 struct hotplug_slot_info *info;
586 struct pci_bus *bus = slot_cur->hotplug_slot->pci_slot->bus;
587 int rc;
588 u8 bus_speed;
589 u8 mode;
590
591 info = kmalloc(sizeof(struct hotplug_slot_info), GFP_KERNEL);
592 if (!info)
593 return -ENOMEM;
594
595 info->power_status = SLOT_PWRGD(slot_cur->status);
596 info->attention_status = SLOT_ATTN(slot_cur->status,
597 slot_cur->ext_status);
598 info->latch_status = SLOT_LATCH(slot_cur->status);
599 if (!SLOT_PRESENT(slot_cur->status)) {
600 info->adapter_status = 0;
601 /* info->max_adapter_speed_status = MAX_ADAPTER_NONE; */
602 } else {
603 info->adapter_status = 1;
604 /* get_max_adapter_speed_1(slot_cur->hotplug_slot,
605 &info->max_adapter_speed_status, 0); */
606 }
607
608 bus_speed = slot_cur->bus_on->current_speed;
609 mode = slot_cur->bus_on->current_bus_mode;
610
611 switch (bus_speed) {
612 case BUS_SPEED_33:
613 break;
614 case BUS_SPEED_66:
615 if (mode == BUS_MODE_PCIX)
616 bus_speed += 0x01;
617 else if (mode == BUS_MODE_PCI)
618 ;
619 else
620 bus_speed = PCI_SPEED_UNKNOWN;
621 break;
622 case BUS_SPEED_100:
623 case BUS_SPEED_133:
624 bus_speed += 0x01;
625 break;
626 default:
627 bus_speed = PCI_SPEED_UNKNOWN;
628 }
629
630 bus->cur_bus_speed = bus_speed;
631 // To do: bus_names
632
633 rc = pci_hp_change_slot_info(slot_cur->hotplug_slot, info);
634 kfree(info);
635 return rc;
636 }
637
638
639 /******************************************************************************
640 * This function will return the pci_func, given bus and devfunc, or NULL. It
641 * is called from visit routines
642 ******************************************************************************/
643
ibm_slot_find(u8 busno,u8 device,u8 function)644 static struct pci_func *ibm_slot_find(u8 busno, u8 device, u8 function)
645 {
646 struct pci_func *func_cur;
647 struct slot *slot_cur;
648 list_for_each_entry(slot_cur, &ibmphp_slot_head, ibm_slot_list) {
649 if (slot_cur->func) {
650 func_cur = slot_cur->func;
651 while (func_cur) {
652 if ((func_cur->busno == busno) &&
653 (func_cur->device == device) &&
654 (func_cur->function == function))
655 return func_cur;
656 func_cur = func_cur->next;
657 }
658 }
659 }
660 return NULL;
661 }
662
663 /*************************************************************
664 * This routine frees up memory used by struct slot, including
665 * the pointers to pci_func, bus, hotplug_slot, controller,
666 * and deregistering from the hotplug core
667 *************************************************************/
free_slots(void)668 static void free_slots(void)
669 {
670 struct slot *slot_cur, *next;
671
672 debug("%s -- enter\n", __func__);
673
674 list_for_each_entry_safe(slot_cur, next, &ibmphp_slot_head,
675 ibm_slot_list) {
676 pci_hp_del(slot_cur->hotplug_slot);
677 slot_cur->ctrl = NULL;
678 slot_cur->bus_on = NULL;
679
680 /*
681 * We don't want to actually remove the resources,
682 * since ibmphp_free_resources() will do just that.
683 */
684 ibmphp_unconfigure_card(&slot_cur, -1);
685
686 pci_hp_destroy(slot_cur->hotplug_slot);
687 kfree(slot_cur->hotplug_slot->info);
688 kfree(slot_cur->hotplug_slot);
689 kfree(slot_cur);
690 }
691 debug("%s -- exit\n", __func__);
692 }
693
ibm_unconfigure_device(struct pci_func * func)694 static void ibm_unconfigure_device(struct pci_func *func)
695 {
696 struct pci_dev *temp;
697 u8 j;
698
699 debug("inside %s\n", __func__);
700 debug("func->device = %x, func->function = %x\n",
701 func->device, func->function);
702 debug("func->device << 3 | 0x0 = %x\n", func->device << 3 | 0x0);
703
704 pci_lock_rescan_remove();
705
706 for (j = 0; j < 0x08; j++) {
707 temp = pci_get_domain_bus_and_slot(0, func->busno,
708 (func->device << 3) | j);
709 if (temp) {
710 pci_stop_and_remove_bus_device(temp);
711 pci_dev_put(temp);
712 }
713 }
714
715 pci_dev_put(func->dev);
716
717 pci_unlock_rescan_remove();
718 }
719
720 /*
721 * The following function is to fix kernel bug regarding
722 * getting bus entries, here we manually add those primary
723 * bus entries to kernel bus structure whenever apply
724 */
bus_structure_fixup(u8 busno)725 static u8 bus_structure_fixup(u8 busno)
726 {
727 struct pci_bus *bus, *b;
728 struct pci_dev *dev;
729 u16 l;
730
731 if (pci_find_bus(0, busno) || !(ibmphp_find_same_bus_num(busno)))
732 return 1;
733
734 bus = kmalloc(sizeof(*bus), GFP_KERNEL);
735 if (!bus)
736 return 1;
737
738 dev = kmalloc(sizeof(*dev), GFP_KERNEL);
739 if (!dev) {
740 kfree(bus);
741 return 1;
742 }
743
744 bus->number = busno;
745 bus->ops = ibmphp_pci_bus->ops;
746 dev->bus = bus;
747 for (dev->devfn = 0; dev->devfn < 256; dev->devfn += 8) {
748 if (!pci_read_config_word(dev, PCI_VENDOR_ID, &l) &&
749 (l != 0x0000) && (l != 0xffff)) {
750 debug("%s - Inside bus_structure_fixup()\n",
751 __func__);
752 b = pci_scan_bus(busno, ibmphp_pci_bus->ops, NULL);
753 if (!b)
754 continue;
755
756 pci_bus_add_devices(b);
757 break;
758 }
759 }
760
761 kfree(dev);
762 kfree(bus);
763
764 return 0;
765 }
766
ibm_configure_device(struct pci_func * func)767 static int ibm_configure_device(struct pci_func *func)
768 {
769 struct pci_bus *child;
770 int num;
771 int flag = 0; /* this is to make sure we don't double scan the bus,
772 for bridged devices primarily */
773
774 pci_lock_rescan_remove();
775
776 if (!(bus_structure_fixup(func->busno)))
777 flag = 1;
778 if (func->dev == NULL)
779 func->dev = pci_get_domain_bus_and_slot(0, func->busno,
780 PCI_DEVFN(func->device, func->function));
781
782 if (func->dev == NULL) {
783 struct pci_bus *bus = pci_find_bus(0, func->busno);
784 if (!bus)
785 goto out;
786
787 num = pci_scan_slot(bus,
788 PCI_DEVFN(func->device, func->function));
789 if (num)
790 pci_bus_add_devices(bus);
791
792 func->dev = pci_get_domain_bus_and_slot(0, func->busno,
793 PCI_DEVFN(func->device, func->function));
794 if (func->dev == NULL) {
795 err("ERROR... : pci_dev still NULL\n");
796 goto out;
797 }
798 }
799 if (!(flag) && (func->dev->hdr_type == PCI_HEADER_TYPE_BRIDGE)) {
800 pci_hp_add_bridge(func->dev);
801 child = func->dev->subordinate;
802 if (child)
803 pci_bus_add_devices(child);
804 }
805
806 out:
807 pci_unlock_rescan_remove();
808 return 0;
809 }
810
811 /*******************************************************
812 * Returns whether the bus is empty or not
813 *******************************************************/
is_bus_empty(struct slot * slot_cur)814 static int is_bus_empty(struct slot *slot_cur)
815 {
816 int rc;
817 struct slot *tmp_slot;
818 u8 i = slot_cur->bus_on->slot_min;
819
820 while (i <= slot_cur->bus_on->slot_max) {
821 if (i == slot_cur->number) {
822 i++;
823 continue;
824 }
825 tmp_slot = ibmphp_get_slot_from_physical_num(i);
826 if (!tmp_slot)
827 return 0;
828 rc = slot_update(&tmp_slot);
829 if (rc)
830 return 0;
831 if (SLOT_PRESENT(tmp_slot->status) &&
832 SLOT_PWRGD(tmp_slot->status))
833 return 0;
834 i++;
835 }
836 return 1;
837 }
838
839 /***********************************************************
840 * If the HPC permits and the bus currently empty, tries to set the
841 * bus speed and mode at the maximum card and bus capability
842 * Parameters: slot
843 * Returns: bus is set (0) or error code
844 ***********************************************************/
set_bus(struct slot * slot_cur)845 static int set_bus(struct slot *slot_cur)
846 {
847 int rc;
848 u8 speed;
849 u8 cmd = 0x0;
850 int retval;
851 static const struct pci_device_id ciobx[] = {
852 { PCI_DEVICE(PCI_VENDOR_ID_SERVERWORKS, 0x0101) },
853 { },
854 };
855
856 debug("%s - entry slot # %d\n", __func__, slot_cur->number);
857 if (SET_BUS_STATUS(slot_cur->ctrl) && is_bus_empty(slot_cur)) {
858 rc = slot_update(&slot_cur);
859 if (rc)
860 return rc;
861 speed = SLOT_SPEED(slot_cur->ext_status);
862 debug("ext_status = %x, speed = %x\n", slot_cur->ext_status, speed);
863 switch (speed) {
864 case HPC_SLOT_SPEED_33:
865 cmd = HPC_BUS_33CONVMODE;
866 break;
867 case HPC_SLOT_SPEED_66:
868 if (SLOT_PCIX(slot_cur->ext_status)) {
869 if ((slot_cur->supported_speed >= BUS_SPEED_66) &&
870 (slot_cur->supported_bus_mode == BUS_MODE_PCIX))
871 cmd = HPC_BUS_66PCIXMODE;
872 else if (!SLOT_BUS_MODE(slot_cur->ext_status))
873 /* if max slot/bus capability is 66 pci
874 and there's no bus mode mismatch, then
875 the adapter supports 66 pci */
876 cmd = HPC_BUS_66CONVMODE;
877 else
878 cmd = HPC_BUS_33CONVMODE;
879 } else {
880 if (slot_cur->supported_speed >= BUS_SPEED_66)
881 cmd = HPC_BUS_66CONVMODE;
882 else
883 cmd = HPC_BUS_33CONVMODE;
884 }
885 break;
886 case HPC_SLOT_SPEED_133:
887 switch (slot_cur->supported_speed) {
888 case BUS_SPEED_33:
889 cmd = HPC_BUS_33CONVMODE;
890 break;
891 case BUS_SPEED_66:
892 if (slot_cur->supported_bus_mode == BUS_MODE_PCIX)
893 cmd = HPC_BUS_66PCIXMODE;
894 else
895 cmd = HPC_BUS_66CONVMODE;
896 break;
897 case BUS_SPEED_100:
898 cmd = HPC_BUS_100PCIXMODE;
899 break;
900 case BUS_SPEED_133:
901 /* This is to take care of the bug in CIOBX chip */
902 if (pci_dev_present(ciobx))
903 ibmphp_hpc_writeslot(slot_cur,
904 HPC_BUS_100PCIXMODE);
905 cmd = HPC_BUS_133PCIXMODE;
906 break;
907 default:
908 err("Wrong bus speed\n");
909 return -ENODEV;
910 }
911 break;
912 default:
913 err("wrong slot speed\n");
914 return -ENODEV;
915 }
916 debug("setting bus speed for slot %d, cmd %x\n",
917 slot_cur->number, cmd);
918 retval = ibmphp_hpc_writeslot(slot_cur, cmd);
919 if (retval) {
920 err("setting bus speed failed\n");
921 return retval;
922 }
923 if (CTLR_RESULT(slot_cur->ctrl->status)) {
924 err("command not completed successfully in set_bus\n");
925 return -EIO;
926 }
927 }
928 /* This is for x440, once Brandon fixes the firmware,
929 will not need this delay */
930 msleep(1000);
931 debug("%s -Exit\n", __func__);
932 return 0;
933 }
934
935 /* This routine checks the bus limitations that the slot is on from the BIOS.
936 * This is used in deciding whether or not to power up the slot.
937 * (electrical/spec limitations. For example, >1 133 MHz or >2 66 PCI cards on
938 * same bus)
939 * Parameters: slot
940 * Returns: 0 = no limitations, -EINVAL = exceeded limitations on the bus
941 */
check_limitations(struct slot * slot_cur)942 static int check_limitations(struct slot *slot_cur)
943 {
944 u8 i;
945 struct slot *tmp_slot;
946 u8 count = 0;
947 u8 limitation = 0;
948
949 for (i = slot_cur->bus_on->slot_min; i <= slot_cur->bus_on->slot_max; i++) {
950 tmp_slot = ibmphp_get_slot_from_physical_num(i);
951 if (!tmp_slot)
952 return -ENODEV;
953 if ((SLOT_PWRGD(tmp_slot->status)) &&
954 !(SLOT_CONNECT(tmp_slot->status)))
955 count++;
956 }
957 get_cur_bus_info(&slot_cur);
958 switch (slot_cur->bus_on->current_speed) {
959 case BUS_SPEED_33:
960 limitation = slot_cur->bus_on->slots_at_33_conv;
961 break;
962 case BUS_SPEED_66:
963 if (slot_cur->bus_on->current_bus_mode == BUS_MODE_PCIX)
964 limitation = slot_cur->bus_on->slots_at_66_pcix;
965 else
966 limitation = slot_cur->bus_on->slots_at_66_conv;
967 break;
968 case BUS_SPEED_100:
969 limitation = slot_cur->bus_on->slots_at_100_pcix;
970 break;
971 case BUS_SPEED_133:
972 limitation = slot_cur->bus_on->slots_at_133_pcix;
973 break;
974 }
975
976 if ((count + 1) > limitation)
977 return -EINVAL;
978 return 0;
979 }
980
print_card_capability(struct slot * slot_cur)981 static inline void print_card_capability(struct slot *slot_cur)
982 {
983 info("capability of the card is ");
984 if ((slot_cur->ext_status & CARD_INFO) == PCIX133)
985 info(" 133 MHz PCI-X\n");
986 else if ((slot_cur->ext_status & CARD_INFO) == PCIX66)
987 info(" 66 MHz PCI-X\n");
988 else if ((slot_cur->ext_status & CARD_INFO) == PCI66)
989 info(" 66 MHz PCI\n");
990 else
991 info(" 33 MHz PCI\n");
992
993 }
994
995 /* This routine will power on the slot, configure the device(s) and find the
996 * drivers for them.
997 * Parameters: hotplug_slot
998 * Returns: 0 or failure codes
999 */
enable_slot(struct hotplug_slot * hs)1000 static int enable_slot(struct hotplug_slot *hs)
1001 {
1002 int rc, i, rcpr;
1003 struct slot *slot_cur;
1004 u8 function;
1005 struct pci_func *tmp_func;
1006
1007 ibmphp_lock_operations();
1008
1009 debug("ENABLING SLOT........\n");
1010 slot_cur = hs->private;
1011
1012 rc = validate(slot_cur, ENABLE);
1013 if (rc) {
1014 err("validate function failed\n");
1015 goto error_nopower;
1016 }
1017
1018 attn_LED_blink(slot_cur);
1019
1020 rc = set_bus(slot_cur);
1021 if (rc) {
1022 err("was not able to set the bus\n");
1023 goto error_nopower;
1024 }
1025
1026 /*-----------------debugging------------------------------*/
1027 get_cur_bus_info(&slot_cur);
1028 debug("the current bus speed right after set_bus = %x\n",
1029 slot_cur->bus_on->current_speed);
1030 /*----------------------------------------------------------*/
1031
1032 rc = check_limitations(slot_cur);
1033 if (rc) {
1034 err("Adding this card exceeds the limitations of this bus.\n");
1035 err("(i.e., >1 133MHz cards running on same bus, or >2 66 PCI cards running on same bus.\n");
1036 err("Try hot-adding into another bus\n");
1037 rc = -EINVAL;
1038 goto error_nopower;
1039 }
1040
1041 rc = power_on(slot_cur);
1042
1043 if (rc) {
1044 err("something wrong when powering up... please see below for details\n");
1045 /* need to turn off before on, otherwise, blinking overwrites */
1046 attn_off(slot_cur);
1047 attn_on(slot_cur);
1048 if (slot_update(&slot_cur)) {
1049 attn_off(slot_cur);
1050 attn_on(slot_cur);
1051 rc = -ENODEV;
1052 goto exit;
1053 }
1054 /* Check to see the error of why it failed */
1055 if ((SLOT_POWER(slot_cur->status)) &&
1056 !(SLOT_PWRGD(slot_cur->status)))
1057 err("power fault occurred trying to power up\n");
1058 else if (SLOT_BUS_SPEED(slot_cur->status)) {
1059 err("bus speed mismatch occurred. please check current bus speed and card capability\n");
1060 print_card_capability(slot_cur);
1061 } else if (SLOT_BUS_MODE(slot_cur->ext_status)) {
1062 err("bus mode mismatch occurred. please check current bus mode and card capability\n");
1063 print_card_capability(slot_cur);
1064 }
1065 ibmphp_update_slot_info(slot_cur);
1066 goto exit;
1067 }
1068 debug("after power_on\n");
1069 /*-----------------------debugging---------------------------*/
1070 get_cur_bus_info(&slot_cur);
1071 debug("the current bus speed right after power_on = %x\n",
1072 slot_cur->bus_on->current_speed);
1073 /*----------------------------------------------------------*/
1074
1075 rc = slot_update(&slot_cur);
1076 if (rc)
1077 goto error_power;
1078
1079 rc = -EINVAL;
1080 if (SLOT_POWER(slot_cur->status) && !(SLOT_PWRGD(slot_cur->status))) {
1081 err("power fault occurred trying to power up...\n");
1082 goto error_power;
1083 }
1084 if (SLOT_POWER(slot_cur->status) && (SLOT_BUS_SPEED(slot_cur->status))) {
1085 err("bus speed mismatch occurred. please check current bus speed and card capability\n");
1086 print_card_capability(slot_cur);
1087 goto error_power;
1088 }
1089 /* Don't think this case will happen after above checks...
1090 * but just in case, for paranoia sake */
1091 if (!(SLOT_POWER(slot_cur->status))) {
1092 err("power on failed...\n");
1093 goto error_power;
1094 }
1095
1096 slot_cur->func = kzalloc(sizeof(struct pci_func), GFP_KERNEL);
1097 if (!slot_cur->func) {
1098 /* We cannot do update_slot_info here, since no memory for
1099 * kmalloc n.e.ways, and update_slot_info allocates some */
1100 rc = -ENOMEM;
1101 goto error_power;
1102 }
1103 slot_cur->func->busno = slot_cur->bus;
1104 slot_cur->func->device = slot_cur->device;
1105 for (i = 0; i < 4; i++)
1106 slot_cur->func->irq[i] = slot_cur->irq[i];
1107
1108 debug("b4 configure_card, slot_cur->bus = %x, slot_cur->device = %x\n",
1109 slot_cur->bus, slot_cur->device);
1110
1111 if (ibmphp_configure_card(slot_cur->func, slot_cur->number)) {
1112 err("configure_card was unsuccessful...\n");
1113 /* true because don't need to actually deallocate resources,
1114 * just remove references */
1115 ibmphp_unconfigure_card(&slot_cur, 1);
1116 debug("after unconfigure_card\n");
1117 slot_cur->func = NULL;
1118 rc = -ENOMEM;
1119 goto error_power;
1120 }
1121
1122 function = 0x00;
1123 do {
1124 tmp_func = ibm_slot_find(slot_cur->bus, slot_cur->func->device,
1125 function++);
1126 if (tmp_func && !(tmp_func->dev))
1127 ibm_configure_device(tmp_func);
1128 } while (tmp_func);
1129
1130 attn_off(slot_cur);
1131 if (slot_update(&slot_cur)) {
1132 rc = -EFAULT;
1133 goto exit;
1134 }
1135 ibmphp_print_test();
1136 rc = ibmphp_update_slot_info(slot_cur);
1137 exit:
1138 ibmphp_unlock_operations();
1139 return rc;
1140
1141 error_nopower:
1142 attn_off(slot_cur); /* need to turn off if was blinking b4 */
1143 attn_on(slot_cur);
1144 error_cont:
1145 rcpr = slot_update(&slot_cur);
1146 if (rcpr) {
1147 rc = rcpr;
1148 goto exit;
1149 }
1150 ibmphp_update_slot_info(slot_cur);
1151 goto exit;
1152
1153 error_power:
1154 attn_off(slot_cur); /* need to turn off if was blinking b4 */
1155 attn_on(slot_cur);
1156 rcpr = power_off(slot_cur);
1157 if (rcpr) {
1158 rc = rcpr;
1159 goto exit;
1160 }
1161 goto error_cont;
1162 }
1163
1164 /**************************************************************
1165 * HOT REMOVING ADAPTER CARD *
1166 * INPUT: POINTER TO THE HOTPLUG SLOT STRUCTURE *
1167 * OUTPUT: SUCCESS 0 ; FAILURE: UNCONFIGURE , VALIDATE *
1168 * DISABLE POWER , *
1169 **************************************************************/
ibmphp_disable_slot(struct hotplug_slot * hotplug_slot)1170 static int ibmphp_disable_slot(struct hotplug_slot *hotplug_slot)
1171 {
1172 struct slot *slot = hotplug_slot->private;
1173 int rc;
1174
1175 ibmphp_lock_operations();
1176 rc = ibmphp_do_disable_slot(slot);
1177 ibmphp_unlock_operations();
1178 return rc;
1179 }
1180
ibmphp_do_disable_slot(struct slot * slot_cur)1181 int ibmphp_do_disable_slot(struct slot *slot_cur)
1182 {
1183 int rc;
1184 u8 flag;
1185
1186 debug("DISABLING SLOT...\n");
1187
1188 if ((slot_cur == NULL) || (slot_cur->ctrl == NULL))
1189 return -ENODEV;
1190
1191 flag = slot_cur->flag;
1192 slot_cur->flag = 1;
1193
1194 if (flag == 1) {
1195 rc = validate(slot_cur, DISABLE);
1196 /* checking if powered off already & valid slot # */
1197 if (rc)
1198 goto error;
1199 }
1200 attn_LED_blink(slot_cur);
1201
1202 if (slot_cur->func == NULL) {
1203 /* We need this for functions that were there on bootup */
1204 slot_cur->func = kzalloc(sizeof(struct pci_func), GFP_KERNEL);
1205 if (!slot_cur->func) {
1206 rc = -ENOMEM;
1207 goto error;
1208 }
1209 slot_cur->func->busno = slot_cur->bus;
1210 slot_cur->func->device = slot_cur->device;
1211 }
1212
1213 ibm_unconfigure_device(slot_cur->func);
1214
1215 /*
1216 * If we got here from latch suddenly opening on operating card or
1217 * a power fault, there's no power to the card, so cannot
1218 * read from it to determine what resources it occupied. This operation
1219 * is forbidden anyhow. The best we can do is remove it from kernel
1220 * lists at least */
1221
1222 if (!flag) {
1223 attn_off(slot_cur);
1224 return 0;
1225 }
1226
1227 rc = ibmphp_unconfigure_card(&slot_cur, 0);
1228 slot_cur->func = NULL;
1229 debug("in disable_slot. after unconfigure_card\n");
1230 if (rc) {
1231 err("could not unconfigure card.\n");
1232 goto error;
1233 }
1234
1235 rc = ibmphp_hpc_writeslot(slot_cur, HPC_SLOT_OFF);
1236 if (rc)
1237 goto error;
1238
1239 attn_off(slot_cur);
1240 rc = slot_update(&slot_cur);
1241 if (rc)
1242 goto exit;
1243
1244 rc = ibmphp_update_slot_info(slot_cur);
1245 ibmphp_print_test();
1246 exit:
1247 return rc;
1248
1249 error:
1250 /* Need to turn off if was blinking b4 */
1251 attn_off(slot_cur);
1252 attn_on(slot_cur);
1253 if (slot_update(&slot_cur)) {
1254 rc = -EFAULT;
1255 goto exit;
1256 }
1257 if (flag)
1258 ibmphp_update_slot_info(slot_cur);
1259 goto exit;
1260 }
1261
1262 struct hotplug_slot_ops ibmphp_hotplug_slot_ops = {
1263 .set_attention_status = set_attention_status,
1264 .enable_slot = enable_slot,
1265 .disable_slot = ibmphp_disable_slot,
1266 .hardware_test = NULL,
1267 .get_power_status = get_power_status,
1268 .get_attention_status = get_attention_status,
1269 .get_latch_status = get_latch_status,
1270 .get_adapter_status = get_adapter_present,
1271 /* .get_max_adapter_speed = get_max_adapter_speed,
1272 .get_bus_name_status = get_bus_name,
1273 */
1274 };
1275
ibmphp_unload(void)1276 static void ibmphp_unload(void)
1277 {
1278 free_slots();
1279 debug("after slots\n");
1280 ibmphp_free_resources();
1281 debug("after resources\n");
1282 ibmphp_free_bus_info_queue();
1283 debug("after bus info\n");
1284 ibmphp_free_ebda_hpc_queue();
1285 debug("after ebda hpc\n");
1286 ibmphp_free_ebda_pci_rsrc_queue();
1287 debug("after ebda pci rsrc\n");
1288 kfree(ibmphp_pci_bus);
1289 }
1290
ibmphp_init(void)1291 static int __init ibmphp_init(void)
1292 {
1293 struct pci_bus *bus;
1294 int i = 0;
1295 int rc = 0;
1296
1297 init_flag = 1;
1298
1299 info(DRIVER_DESC " version: " DRIVER_VERSION "\n");
1300
1301 ibmphp_pci_bus = kmalloc(sizeof(*ibmphp_pci_bus), GFP_KERNEL);
1302 if (!ibmphp_pci_bus) {
1303 rc = -ENOMEM;
1304 goto exit;
1305 }
1306
1307 bus = pci_find_bus(0, 0);
1308 if (!bus) {
1309 err("Can't find the root pci bus, can not continue\n");
1310 rc = -ENODEV;
1311 goto error;
1312 }
1313 memcpy(ibmphp_pci_bus, bus, sizeof(*ibmphp_pci_bus));
1314
1315 ibmphp_debug = debug;
1316
1317 ibmphp_hpc_initvars();
1318
1319 for (i = 0; i < 16; i++)
1320 irqs[i] = 0;
1321
1322 rc = ibmphp_access_ebda();
1323 if (rc)
1324 goto error;
1325 debug("after ibmphp_access_ebda()\n");
1326
1327 rc = ibmphp_rsrc_init();
1328 if (rc)
1329 goto error;
1330 debug("AFTER Resource & EBDA INITIALIZATIONS\n");
1331
1332 max_slots = get_max_slots();
1333
1334 rc = ibmphp_register_pci();
1335 if (rc)
1336 goto error;
1337
1338 if (init_ops()) {
1339 rc = -ENODEV;
1340 goto error;
1341 }
1342
1343 ibmphp_print_test();
1344 rc = ibmphp_hpc_start_poll_thread();
1345 if (rc)
1346 goto error;
1347
1348 exit:
1349 return rc;
1350
1351 error:
1352 ibmphp_unload();
1353 goto exit;
1354 }
1355
ibmphp_exit(void)1356 static void __exit ibmphp_exit(void)
1357 {
1358 ibmphp_hpc_stop_poll_thread();
1359 debug("after polling\n");
1360 ibmphp_unload();
1361 debug("done\n");
1362 }
1363
1364 module_init(ibmphp_init);
1365 module_exit(ibmphp_exit);
1366