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