Merge branch 'r6040-next'
[linux/fpc-iii.git] / drivers / pci / hotplug / ibmphp_res.c
blobaee6e41001e1950a5dcfdfb12d4357570b10ecea
1 /*
2 * IBM Hot Plug Controller Driver
4 * Written By: Irene Zubarev, IBM Corporation
6 * Copyright (C) 2001 Greg Kroah-Hartman (greg@kroah.com)
7 * Copyright (C) 2001,2002 IBM Corp.
9 * All rights reserved.
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.
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.
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.
26 * Send feedback to <gregkh@us.ibm.com>
30 #include <linux/module.h>
31 #include <linux/slab.h>
32 #include <linux/pci.h>
33 #include <linux/list.h>
34 #include <linux/init.h>
35 #include "ibmphp.h"
37 static int flags = 0; /* for testing */
39 static void update_resources(struct bus_node *bus_cur, int type, int rangeno);
40 static int once_over(void);
41 static int remove_ranges(struct bus_node *, struct bus_node *);
42 static int update_bridge_ranges(struct bus_node **);
43 static int add_bus_range(int type, struct range_node *, struct bus_node *);
44 static void fix_resources(struct bus_node *);
45 static struct bus_node *find_bus_wprev(u8, struct bus_node **, u8);
47 static LIST_HEAD(gbuses);
49 static struct bus_node * __init alloc_error_bus(struct ebda_pci_rsrc *curr, u8 busno, int flag)
51 struct bus_node *newbus;
53 if (!(curr) && !(flag)) {
54 err("NULL pointer passed\n");
55 return NULL;
58 newbus = kzalloc(sizeof(struct bus_node), GFP_KERNEL);
59 if (!newbus) {
60 err("out of system memory\n");
61 return NULL;
64 if (flag)
65 newbus->busno = busno;
66 else
67 newbus->busno = curr->bus_num;
68 list_add_tail(&newbus->bus_list, &gbuses);
69 return newbus;
72 static struct resource_node * __init alloc_resources(struct ebda_pci_rsrc *curr)
74 struct resource_node *rs;
76 if (!curr) {
77 err("NULL passed to allocate\n");
78 return NULL;
81 rs = kzalloc(sizeof(struct resource_node), GFP_KERNEL);
82 if (!rs) {
83 err("out of system memory\n");
84 return NULL;
86 rs->busno = curr->bus_num;
87 rs->devfunc = curr->dev_fun;
88 rs->start = curr->start_addr;
89 rs->end = curr->end_addr;
90 rs->len = curr->end_addr - curr->start_addr + 1;
91 return rs;
94 static int __init alloc_bus_range(struct bus_node **new_bus, struct range_node **new_range, struct ebda_pci_rsrc *curr, int flag, u8 first_bus)
96 struct bus_node *newbus;
97 struct range_node *newrange;
98 u8 num_ranges = 0;
100 if (first_bus) {
101 newbus = kzalloc(sizeof(struct bus_node), GFP_KERNEL);
102 if (!newbus) {
103 err("out of system memory.\n");
104 return -ENOMEM;
106 newbus->busno = curr->bus_num;
107 } else {
108 newbus = *new_bus;
109 switch (flag) {
110 case MEM:
111 num_ranges = newbus->noMemRanges;
112 break;
113 case PFMEM:
114 num_ranges = newbus->noPFMemRanges;
115 break;
116 case IO:
117 num_ranges = newbus->noIORanges;
118 break;
122 newrange = kzalloc(sizeof(struct range_node), GFP_KERNEL);
123 if (!newrange) {
124 if (first_bus)
125 kfree(newbus);
126 err("out of system memory\n");
127 return -ENOMEM;
129 newrange->start = curr->start_addr;
130 newrange->end = curr->end_addr;
132 if (first_bus || (!num_ranges))
133 newrange->rangeno = 1;
134 else {
135 /* need to insert our range */
136 add_bus_range(flag, newrange, newbus);
137 debug("%d resource Primary Bus inserted on bus %x [%x - %x]\n", flag, newbus->busno, newrange->start, newrange->end);
140 switch (flag) {
141 case MEM:
142 newbus->rangeMem = newrange;
143 if (first_bus)
144 newbus->noMemRanges = 1;
145 else {
146 debug("First Memory Primary on bus %x, [%x - %x]\n", newbus->busno, newrange->start, newrange->end);
147 ++newbus->noMemRanges;
148 fix_resources(newbus);
150 break;
151 case IO:
152 newbus->rangeIO = newrange;
153 if (first_bus)
154 newbus->noIORanges = 1;
155 else {
156 debug("First IO Primary on bus %x, [%x - %x]\n", newbus->busno, newrange->start, newrange->end);
157 ++newbus->noIORanges;
158 fix_resources(newbus);
160 break;
161 case PFMEM:
162 newbus->rangePFMem = newrange;
163 if (first_bus)
164 newbus->noPFMemRanges = 1;
165 else {
166 debug("1st PFMemory Primary on Bus %x [%x - %x]\n", newbus->busno, newrange->start, newrange->end);
167 ++newbus->noPFMemRanges;
168 fix_resources(newbus);
171 break;
174 *new_bus = newbus;
175 *new_range = newrange;
176 return 0;
180 /* Notes:
181 * 1. The ranges are ordered. The buses are not ordered. (First come)
183 * 2. If cannot allocate out of PFMem range, allocate from Mem ranges. PFmemFromMem
184 * are not sorted. (no need since use mem node). To not change the entire code, we
185 * also add mem node whenever this case happens so as not to change
186 * ibmphp_check_mem_resource etc(and since it really is taking Mem resource)
189 /*****************************************************************************
190 * This is the Resource Management initialization function. It will go through
191 * the Resource list taken from EBDA and fill in this module's data structures
193 * THIS IS NOT TAKING INTO CONSIDERATION IO RESTRICTIONS OF PRIMARY BUSES,
194 * SINCE WE'RE GOING TO ASSUME FOR NOW WE DON'T HAVE THOSE ON OUR BUSES FOR NOW
196 * Input: ptr to the head of the resource list from EBDA
197 * Output: 0, -1 or error codes
198 ***************************************************************************/
199 int __init ibmphp_rsrc_init(void)
201 struct ebda_pci_rsrc *curr;
202 struct range_node *newrange = NULL;
203 struct bus_node *newbus = NULL;
204 struct bus_node *bus_cur;
205 struct bus_node *bus_prev;
206 struct resource_node *new_io = NULL;
207 struct resource_node *new_mem = NULL;
208 struct resource_node *new_pfmem = NULL;
209 int rc;
211 list_for_each_entry(curr, &ibmphp_ebda_pci_rsrc_head,
212 ebda_pci_rsrc_list) {
213 if (!(curr->rsrc_type & PCIDEVMASK)) {
214 /* EBDA still lists non PCI devices, so ignore... */
215 debug("this is not a PCI DEVICE in rsrc_init, please take care\n");
216 // continue;
219 /* this is a primary bus resource */
220 if (curr->rsrc_type & PRIMARYBUSMASK) {
221 /* memory */
222 if ((curr->rsrc_type & RESTYPE) == MMASK) {
223 /* no bus structure exists in place yet */
224 if (list_empty(&gbuses)) {
225 rc = alloc_bus_range(&newbus, &newrange, curr, MEM, 1);
226 if (rc)
227 return rc;
228 list_add_tail(&newbus->bus_list, &gbuses);
229 debug("gbuses = NULL, Memory Primary Bus %x [%x - %x]\n", newbus->busno, newrange->start, newrange->end);
230 } else {
231 bus_cur = find_bus_wprev(curr->bus_num, &bus_prev, 1);
232 /* found our bus */
233 if (bus_cur) {
234 rc = alloc_bus_range(&bus_cur, &newrange, curr, MEM, 0);
235 if (rc)
236 return rc;
237 } else {
238 /* went through all the buses and didn't find ours, need to create a new bus node */
239 rc = alloc_bus_range(&newbus, &newrange, curr, MEM, 1);
240 if (rc)
241 return rc;
243 list_add_tail(&newbus->bus_list, &gbuses);
244 debug("New Bus, Memory Primary Bus %x [%x - %x]\n", newbus->busno, newrange->start, newrange->end);
247 } else if ((curr->rsrc_type & RESTYPE) == PFMASK) {
248 /* prefetchable memory */
249 if (list_empty(&gbuses)) {
250 /* no bus structure exists in place yet */
251 rc = alloc_bus_range(&newbus, &newrange, curr, PFMEM, 1);
252 if (rc)
253 return rc;
254 list_add_tail(&newbus->bus_list, &gbuses);
255 debug("gbuses = NULL, PFMemory Primary Bus %x [%x - %x]\n", newbus->busno, newrange->start, newrange->end);
256 } else {
257 bus_cur = find_bus_wprev(curr->bus_num, &bus_prev, 1);
258 if (bus_cur) {
259 /* found our bus */
260 rc = alloc_bus_range(&bus_cur, &newrange, curr, PFMEM, 0);
261 if (rc)
262 return rc;
263 } else {
264 /* went through all the buses and didn't find ours, need to create a new bus node */
265 rc = alloc_bus_range(&newbus, &newrange, curr, PFMEM, 1);
266 if (rc)
267 return rc;
268 list_add_tail(&newbus->bus_list, &gbuses);
269 debug("1st Bus, PFMemory Primary Bus %x [%x - %x]\n", newbus->busno, newrange->start, newrange->end);
272 } else if ((curr->rsrc_type & RESTYPE) == IOMASK) {
273 /* IO */
274 if (list_empty(&gbuses)) {
275 /* no bus structure exists in place yet */
276 rc = alloc_bus_range(&newbus, &newrange, curr, IO, 1);
277 if (rc)
278 return rc;
279 list_add_tail(&newbus->bus_list, &gbuses);
280 debug("gbuses = NULL, IO Primary Bus %x [%x - %x]\n", newbus->busno, newrange->start, newrange->end);
281 } else {
282 bus_cur = find_bus_wprev(curr->bus_num, &bus_prev, 1);
283 if (bus_cur) {
284 rc = alloc_bus_range(&bus_cur, &newrange, curr, IO, 0);
285 if (rc)
286 return rc;
287 } else {
288 /* went through all the buses and didn't find ours, need to create a new bus node */
289 rc = alloc_bus_range(&newbus, &newrange, curr, IO, 1);
290 if (rc)
291 return rc;
292 list_add_tail(&newbus->bus_list, &gbuses);
293 debug("1st Bus, IO Primary Bus %x [%x - %x]\n", newbus->busno, newrange->start, newrange->end);
297 } else {
298 ; /* type is reserved WHAT TO DO IN THIS CASE???
299 NOTHING TO DO??? */
301 } else {
302 /* regular pci device resource */
303 if ((curr->rsrc_type & RESTYPE) == MMASK) {
304 /* Memory resource */
305 new_mem = alloc_resources(curr);
306 if (!new_mem)
307 return -ENOMEM;
308 new_mem->type = MEM;
310 * if it didn't find the bus, means PCI dev
311 * came b4 the Primary Bus info, so need to
312 * create a bus rangeno becomes a problem...
313 * assign a -1 and then update once the range
314 * actually appears...
316 if (ibmphp_add_resource(new_mem) < 0) {
317 newbus = alloc_error_bus(curr, 0, 0);
318 if (!newbus)
319 return -ENOMEM;
320 newbus->firstMem = new_mem;
321 ++newbus->needMemUpdate;
322 new_mem->rangeno = -1;
324 debug("Memory resource for device %x, bus %x, [%x - %x]\n", new_mem->devfunc, new_mem->busno, new_mem->start, new_mem->end);
326 } else if ((curr->rsrc_type & RESTYPE) == PFMASK) {
327 /* PFMemory resource */
328 new_pfmem = alloc_resources(curr);
329 if (!new_pfmem)
330 return -ENOMEM;
331 new_pfmem->type = PFMEM;
332 new_pfmem->fromMem = 0;
333 if (ibmphp_add_resource(new_pfmem) < 0) {
334 newbus = alloc_error_bus(curr, 0, 0);
335 if (!newbus)
336 return -ENOMEM;
337 newbus->firstPFMem = new_pfmem;
338 ++newbus->needPFMemUpdate;
339 new_pfmem->rangeno = -1;
342 debug("PFMemory resource for device %x, bus %x, [%x - %x]\n", new_pfmem->devfunc, new_pfmem->busno, new_pfmem->start, new_pfmem->end);
343 } else if ((curr->rsrc_type & RESTYPE) == IOMASK) {
344 /* IO resource */
345 new_io = alloc_resources(curr);
346 if (!new_io)
347 return -ENOMEM;
348 new_io->type = IO;
351 * if it didn't find the bus, means PCI dev
352 * came b4 the Primary Bus info, so need to
353 * create a bus rangeno becomes a problem...
354 * Can assign a -1 and then update once the
355 * range actually appears...
357 if (ibmphp_add_resource(new_io) < 0) {
358 newbus = alloc_error_bus(curr, 0, 0);
359 if (!newbus)
360 return -ENOMEM;
361 newbus->firstIO = new_io;
362 ++newbus->needIOUpdate;
363 new_io->rangeno = -1;
365 debug("IO resource for device %x, bus %x, [%x - %x]\n", new_io->devfunc, new_io->busno, new_io->start, new_io->end);
370 list_for_each_entry(bus_cur, &gbuses, bus_list) {
371 /* This is to get info about PPB resources, since EBDA doesn't put this info into the primary bus info */
372 rc = update_bridge_ranges(&bus_cur);
373 if (rc)
374 return rc;
376 return once_over(); /* This is to align ranges (so no -1) */
379 /********************************************************************************
380 * This function adds a range into a sorted list of ranges per bus for a particular
381 * range type, it then calls another routine to update the range numbers on the
382 * pci devices' resources for the appropriate resource
384 * Input: type of the resource, range to add, current bus
385 * Output: 0 or -1, bus and range ptrs
386 ********************************************************************************/
387 static int add_bus_range(int type, struct range_node *range, struct bus_node *bus_cur)
389 struct range_node *range_cur = NULL;
390 struct range_node *range_prev;
391 int count = 0, i_init;
392 int noRanges = 0;
394 switch (type) {
395 case MEM:
396 range_cur = bus_cur->rangeMem;
397 noRanges = bus_cur->noMemRanges;
398 break;
399 case PFMEM:
400 range_cur = bus_cur->rangePFMem;
401 noRanges = bus_cur->noPFMemRanges;
402 break;
403 case IO:
404 range_cur = bus_cur->rangeIO;
405 noRanges = bus_cur->noIORanges;
406 break;
409 range_prev = NULL;
410 while (range_cur) {
411 if (range->start < range_cur->start)
412 break;
413 range_prev = range_cur;
414 range_cur = range_cur->next;
415 count = count + 1;
417 if (!count) {
418 /* our range will go at the beginning of the list */
419 switch (type) {
420 case MEM:
421 bus_cur->rangeMem = range;
422 break;
423 case PFMEM:
424 bus_cur->rangePFMem = range;
425 break;
426 case IO:
427 bus_cur->rangeIO = range;
428 break;
430 range->next = range_cur;
431 range->rangeno = 1;
432 i_init = 0;
433 } else if (!range_cur) {
434 /* our range will go at the end of the list */
435 range->next = NULL;
436 range_prev->next = range;
437 range->rangeno = range_prev->rangeno + 1;
438 return 0;
439 } else {
440 /* the range is in the middle */
441 range_prev->next = range;
442 range->next = range_cur;
443 range->rangeno = range_cur->rangeno;
444 i_init = range_prev->rangeno;
447 for (count = i_init; count < noRanges; ++count) {
448 ++range_cur->rangeno;
449 range_cur = range_cur->next;
452 update_resources(bus_cur, type, i_init + 1);
453 return 0;
456 /*******************************************************************************
457 * This routine goes through the list of resources of type 'type' and updates
458 * the range numbers that they correspond to. It was called from add_bus_range fnc
460 * Input: bus, type of the resource, the rangeno starting from which to update
461 ******************************************************************************/
462 static void update_resources(struct bus_node *bus_cur, int type, int rangeno)
464 struct resource_node *res = NULL;
465 u8 eol = 0; /* end of list indicator */
467 switch (type) {
468 case MEM:
469 if (bus_cur->firstMem)
470 res = bus_cur->firstMem;
471 break;
472 case PFMEM:
473 if (bus_cur->firstPFMem)
474 res = bus_cur->firstPFMem;
475 break;
476 case IO:
477 if (bus_cur->firstIO)
478 res = bus_cur->firstIO;
479 break;
482 if (res) {
483 while (res) {
484 if (res->rangeno == rangeno)
485 break;
486 if (res->next)
487 res = res->next;
488 else if (res->nextRange)
489 res = res->nextRange;
490 else {
491 eol = 1;
492 break;
496 if (!eol) {
497 /* found the range */
498 while (res) {
499 ++res->rangeno;
500 res = res->next;
506 static void fix_me(struct resource_node *res, struct bus_node *bus_cur, struct range_node *range)
508 char *str = "";
509 switch (res->type) {
510 case IO:
511 str = "io";
512 break;
513 case MEM:
514 str = "mem";
515 break;
516 case PFMEM:
517 str = "pfmem";
518 break;
521 while (res) {
522 if (res->rangeno == -1) {
523 while (range) {
524 if ((res->start >= range->start) && (res->end <= range->end)) {
525 res->rangeno = range->rangeno;
526 debug("%s->rangeno in fix_resources is %d\n", str, res->rangeno);
527 switch (res->type) {
528 case IO:
529 --bus_cur->needIOUpdate;
530 break;
531 case MEM:
532 --bus_cur->needMemUpdate;
533 break;
534 case PFMEM:
535 --bus_cur->needPFMemUpdate;
536 break;
538 break;
540 range = range->next;
543 if (res->next)
544 res = res->next;
545 else
546 res = res->nextRange;
551 /*****************************************************************************
552 * This routine reassigns the range numbers to the resources that had a -1
553 * This case can happen only if upon initialization, resources taken by pci dev
554 * appear in EBDA before the resources allocated for that bus, since we don't
555 * know the range, we assign -1, and this routine is called after a new range
556 * is assigned to see the resources with unknown range belong to the added range
558 * Input: current bus
559 * Output: none, list of resources for that bus are fixed if can be
560 *******************************************************************************/
561 static void fix_resources(struct bus_node *bus_cur)
563 struct range_node *range;
564 struct resource_node *res;
566 debug("%s - bus_cur->busno = %d\n", __func__, bus_cur->busno);
568 if (bus_cur->needIOUpdate) {
569 res = bus_cur->firstIO;
570 range = bus_cur->rangeIO;
571 fix_me(res, bus_cur, range);
573 if (bus_cur->needMemUpdate) {
574 res = bus_cur->firstMem;
575 range = bus_cur->rangeMem;
576 fix_me(res, bus_cur, range);
578 if (bus_cur->needPFMemUpdate) {
579 res = bus_cur->firstPFMem;
580 range = bus_cur->rangePFMem;
581 fix_me(res, bus_cur, range);
585 /*******************************************************************************
586 * This routine adds a resource to the list of resources to the appropriate bus
587 * based on their resource type and sorted by their starting addresses. It assigns
588 * the ptrs to next and nextRange if needed.
590 * Input: resource ptr
591 * Output: ptrs assigned (to the node)
592 * 0 or -1
593 *******************************************************************************/
594 int ibmphp_add_resource(struct resource_node *res)
596 struct resource_node *res_cur;
597 struct resource_node *res_prev;
598 struct bus_node *bus_cur;
599 struct range_node *range_cur = NULL;
600 struct resource_node *res_start = NULL;
602 debug("%s - enter\n", __func__);
604 if (!res) {
605 err("NULL passed to add\n");
606 return -ENODEV;
609 bus_cur = find_bus_wprev(res->busno, NULL, 0);
611 if (!bus_cur) {
612 /* didn't find a bus, something's wrong!!! */
613 debug("no bus in the system, either pci_dev's wrong or allocation failed\n");
614 return -ENODEV;
617 /* Normal case */
618 switch (res->type) {
619 case IO:
620 range_cur = bus_cur->rangeIO;
621 res_start = bus_cur->firstIO;
622 break;
623 case MEM:
624 range_cur = bus_cur->rangeMem;
625 res_start = bus_cur->firstMem;
626 break;
627 case PFMEM:
628 range_cur = bus_cur->rangePFMem;
629 res_start = bus_cur->firstPFMem;
630 break;
631 default:
632 err("cannot read the type of the resource to add... problem\n");
633 return -EINVAL;
635 while (range_cur) {
636 if ((res->start >= range_cur->start) && (res->end <= range_cur->end)) {
637 res->rangeno = range_cur->rangeno;
638 break;
640 range_cur = range_cur->next;
643 /* !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
644 * this is again the case of rangeno = -1
645 * !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
648 if (!range_cur) {
649 switch (res->type) {
650 case IO:
651 ++bus_cur->needIOUpdate;
652 break;
653 case MEM:
654 ++bus_cur->needMemUpdate;
655 break;
656 case PFMEM:
657 ++bus_cur->needPFMemUpdate;
658 break;
660 res->rangeno = -1;
663 debug("The range is %d\n", res->rangeno);
664 if (!res_start) {
665 /* no first{IO,Mem,Pfmem} on the bus, 1st IO/Mem/Pfmem resource ever */
666 switch (res->type) {
667 case IO:
668 bus_cur->firstIO = res;
669 break;
670 case MEM:
671 bus_cur->firstMem = res;
672 break;
673 case PFMEM:
674 bus_cur->firstPFMem = res;
675 break;
677 res->next = NULL;
678 res->nextRange = NULL;
679 } else {
680 res_cur = res_start;
681 res_prev = NULL;
683 debug("res_cur->rangeno is %d\n", res_cur->rangeno);
685 while (res_cur) {
686 if (res_cur->rangeno >= res->rangeno)
687 break;
688 res_prev = res_cur;
689 if (res_cur->next)
690 res_cur = res_cur->next;
691 else
692 res_cur = res_cur->nextRange;
695 if (!res_cur) {
696 /* at the end of the resource list */
697 debug("i should be here, [%x - %x]\n", res->start, res->end);
698 res_prev->nextRange = res;
699 res->next = NULL;
700 res->nextRange = NULL;
701 } else if (res_cur->rangeno == res->rangeno) {
702 /* in the same range */
703 while (res_cur) {
704 if (res->start < res_cur->start)
705 break;
706 res_prev = res_cur;
707 res_cur = res_cur->next;
709 if (!res_cur) {
710 /* the last resource in this range */
711 res_prev->next = res;
712 res->next = NULL;
713 res->nextRange = res_prev->nextRange;
714 res_prev->nextRange = NULL;
715 } else if (res->start < res_cur->start) {
716 /* at the beginning or middle of the range */
717 if (!res_prev) {
718 switch (res->type) {
719 case IO:
720 bus_cur->firstIO = res;
721 break;
722 case MEM:
723 bus_cur->firstMem = res;
724 break;
725 case PFMEM:
726 bus_cur->firstPFMem = res;
727 break;
729 } else if (res_prev->rangeno == res_cur->rangeno)
730 res_prev->next = res;
731 else
732 res_prev->nextRange = res;
734 res->next = res_cur;
735 res->nextRange = NULL;
737 } else {
738 /* this is the case where it is 1st occurrence of the range */
739 if (!res_prev) {
740 /* at the beginning of the resource list */
741 res->next = NULL;
742 switch (res->type) {
743 case IO:
744 res->nextRange = bus_cur->firstIO;
745 bus_cur->firstIO = res;
746 break;
747 case MEM:
748 res->nextRange = bus_cur->firstMem;
749 bus_cur->firstMem = res;
750 break;
751 case PFMEM:
752 res->nextRange = bus_cur->firstPFMem;
753 bus_cur->firstPFMem = res;
754 break;
756 } else if (res_cur->rangeno > res->rangeno) {
757 /* in the middle of the resource list */
758 res_prev->nextRange = res;
759 res->next = NULL;
760 res->nextRange = res_cur;
765 debug("%s - exit\n", __func__);
766 return 0;
769 /****************************************************************************
770 * This routine will remove the resource from the list of resources
772 * Input: io, mem, and/or pfmem resource to be deleted
773 * Output: modified resource list
774 * 0 or error code
775 ****************************************************************************/
776 int ibmphp_remove_resource(struct resource_node *res)
778 struct bus_node *bus_cur;
779 struct resource_node *res_cur = NULL;
780 struct resource_node *res_prev;
781 struct resource_node *mem_cur;
782 char *type = "";
784 if (!res) {
785 err("resource to remove is NULL\n");
786 return -ENODEV;
789 bus_cur = find_bus_wprev(res->busno, NULL, 0);
791 if (!bus_cur) {
792 err("cannot find corresponding bus of the io resource to remove bailing out...\n");
793 return -ENODEV;
796 switch (res->type) {
797 case IO:
798 res_cur = bus_cur->firstIO;
799 type = "io";
800 break;
801 case MEM:
802 res_cur = bus_cur->firstMem;
803 type = "mem";
804 break;
805 case PFMEM:
806 res_cur = bus_cur->firstPFMem;
807 type = "pfmem";
808 break;
809 default:
810 err("unknown type for resource to remove\n");
811 return -EINVAL;
813 res_prev = NULL;
815 while (res_cur) {
816 if ((res_cur->start == res->start) && (res_cur->end == res->end))
817 break;
818 res_prev = res_cur;
819 if (res_cur->next)
820 res_cur = res_cur->next;
821 else
822 res_cur = res_cur->nextRange;
825 if (!res_cur) {
826 if (res->type == PFMEM) {
828 * case where pfmem might be in the PFMemFromMem list
829 * so will also need to remove the corresponding mem
830 * entry
832 res_cur = bus_cur->firstPFMemFromMem;
833 res_prev = NULL;
835 while (res_cur) {
836 if ((res_cur->start == res->start) && (res_cur->end == res->end)) {
837 mem_cur = bus_cur->firstMem;
838 while (mem_cur) {
839 if ((mem_cur->start == res_cur->start)
840 && (mem_cur->end == res_cur->end))
841 break;
842 if (mem_cur->next)
843 mem_cur = mem_cur->next;
844 else
845 mem_cur = mem_cur->nextRange;
847 if (!mem_cur) {
848 err("cannot find corresponding mem node for pfmem...\n");
849 return -EINVAL;
852 ibmphp_remove_resource(mem_cur);
853 if (!res_prev)
854 bus_cur->firstPFMemFromMem = res_cur->next;
855 else
856 res_prev->next = res_cur->next;
857 kfree(res_cur);
858 return 0;
860 res_prev = res_cur;
861 if (res_cur->next)
862 res_cur = res_cur->next;
863 else
864 res_cur = res_cur->nextRange;
866 if (!res_cur) {
867 err("cannot find pfmem to delete...\n");
868 return -EINVAL;
870 } else {
871 err("the %s resource is not in the list to be deleted...\n", type);
872 return -EINVAL;
875 if (!res_prev) {
876 /* first device to be deleted */
877 if (res_cur->next) {
878 switch (res->type) {
879 case IO:
880 bus_cur->firstIO = res_cur->next;
881 break;
882 case MEM:
883 bus_cur->firstMem = res_cur->next;
884 break;
885 case PFMEM:
886 bus_cur->firstPFMem = res_cur->next;
887 break;
889 } else if (res_cur->nextRange) {
890 switch (res->type) {
891 case IO:
892 bus_cur->firstIO = res_cur->nextRange;
893 break;
894 case MEM:
895 bus_cur->firstMem = res_cur->nextRange;
896 break;
897 case PFMEM:
898 bus_cur->firstPFMem = res_cur->nextRange;
899 break;
901 } else {
902 switch (res->type) {
903 case IO:
904 bus_cur->firstIO = NULL;
905 break;
906 case MEM:
907 bus_cur->firstMem = NULL;
908 break;
909 case PFMEM:
910 bus_cur->firstPFMem = NULL;
911 break;
914 kfree(res_cur);
915 return 0;
916 } else {
917 if (res_cur->next) {
918 if (res_prev->rangeno == res_cur->rangeno)
919 res_prev->next = res_cur->next;
920 else
921 res_prev->nextRange = res_cur->next;
922 } else if (res_cur->nextRange) {
923 res_prev->next = NULL;
924 res_prev->nextRange = res_cur->nextRange;
925 } else {
926 res_prev->next = NULL;
927 res_prev->nextRange = NULL;
929 kfree(res_cur);
930 return 0;
933 return 0;
936 static struct range_node *find_range(struct bus_node *bus_cur, struct resource_node *res)
938 struct range_node *range = NULL;
940 switch (res->type) {
941 case IO:
942 range = bus_cur->rangeIO;
943 break;
944 case MEM:
945 range = bus_cur->rangeMem;
946 break;
947 case PFMEM:
948 range = bus_cur->rangePFMem;
949 break;
950 default:
951 err("cannot read resource type in find_range\n");
954 while (range) {
955 if (res->rangeno == range->rangeno)
956 break;
957 range = range->next;
959 return range;
962 /*****************************************************************************
963 * This routine will check to make sure the io/mem/pfmem->len that the device asked for
964 * can fit w/i our list of available IO/MEM/PFMEM resources. If cannot, returns -EINVAL,
965 * otherwise, returns 0
967 * Input: resource
968 * Output: the correct start and end address are inputted into the resource node,
969 * 0 or -EINVAL
970 *****************************************************************************/
971 int ibmphp_check_resource(struct resource_node *res, u8 bridge)
973 struct bus_node *bus_cur;
974 struct range_node *range = NULL;
975 struct resource_node *res_prev;
976 struct resource_node *res_cur = NULL;
977 u32 len_cur = 0, start_cur = 0, len_tmp = 0;
978 int noranges = 0;
979 u32 tmp_start; /* this is to make sure start address is divisible by the length needed */
980 u32 tmp_divide;
981 u8 flag = 0;
983 if (!res)
984 return -EINVAL;
986 if (bridge) {
987 /* The rules for bridges are different, 4K divisible for IO, 1M for (pf)mem*/
988 if (res->type == IO)
989 tmp_divide = IOBRIDGE;
990 else
991 tmp_divide = MEMBRIDGE;
992 } else
993 tmp_divide = res->len;
995 bus_cur = find_bus_wprev(res->busno, NULL, 0);
997 if (!bus_cur) {
998 /* didn't find a bus, something's wrong!!! */
999 debug("no bus in the system, either pci_dev's wrong or allocation failed\n");
1000 return -EINVAL;
1003 debug("%s - enter\n", __func__);
1004 debug("bus_cur->busno is %d\n", bus_cur->busno);
1006 /* This is a quick fix to not mess up with the code very much. i.e.,
1007 * 2000-2fff, len = 1000, but when we compare, we need it to be fff */
1008 res->len -= 1;
1010 switch (res->type) {
1011 case IO:
1012 res_cur = bus_cur->firstIO;
1013 noranges = bus_cur->noIORanges;
1014 break;
1015 case MEM:
1016 res_cur = bus_cur->firstMem;
1017 noranges = bus_cur->noMemRanges;
1018 break;
1019 case PFMEM:
1020 res_cur = bus_cur->firstPFMem;
1021 noranges = bus_cur->noPFMemRanges;
1022 break;
1023 default:
1024 err("wrong type of resource to check\n");
1025 return -EINVAL;
1027 res_prev = NULL;
1029 while (res_cur) {
1030 range = find_range(bus_cur, res_cur);
1031 debug("%s - rangeno = %d\n", __func__, res_cur->rangeno);
1033 if (!range) {
1034 err("no range for the device exists... bailing out...\n");
1035 return -EINVAL;
1038 /* found our range */
1039 if (!res_prev) {
1040 /* first time in the loop */
1041 len_tmp = res_cur->start - 1 - range->start;
1043 if ((res_cur->start != range->start) && (len_tmp >= res->len)) {
1044 debug("len_tmp = %x\n", len_tmp);
1046 if ((len_tmp < len_cur) || (len_cur == 0)) {
1048 if ((range->start % tmp_divide) == 0) {
1049 /* just perfect, starting address is divisible by length */
1050 flag = 1;
1051 len_cur = len_tmp;
1052 start_cur = range->start;
1053 } else {
1054 /* Needs adjusting */
1055 tmp_start = range->start;
1056 flag = 0;
1058 while ((len_tmp = res_cur->start - 1 - tmp_start) >= res->len) {
1059 if ((tmp_start % tmp_divide) == 0) {
1060 flag = 1;
1061 len_cur = len_tmp;
1062 start_cur = tmp_start;
1063 break;
1065 tmp_start += tmp_divide - tmp_start % tmp_divide;
1066 if (tmp_start >= res_cur->start - 1)
1067 break;
1071 if (flag && len_cur == res->len) {
1072 debug("but we are not here, right?\n");
1073 res->start = start_cur;
1074 res->len += 1; /* To restore the balance */
1075 res->end = res->start + res->len - 1;
1076 return 0;
1081 if (!res_cur->next) {
1082 /* last device on the range */
1083 len_tmp = range->end - (res_cur->end + 1);
1085 if ((range->end != res_cur->end) && (len_tmp >= res->len)) {
1086 debug("len_tmp = %x\n", len_tmp);
1087 if ((len_tmp < len_cur) || (len_cur == 0)) {
1089 if (((res_cur->end + 1) % tmp_divide) == 0) {
1090 /* just perfect, starting address is divisible by length */
1091 flag = 1;
1092 len_cur = len_tmp;
1093 start_cur = res_cur->end + 1;
1094 } else {
1095 /* Needs adjusting */
1096 tmp_start = res_cur->end + 1;
1097 flag = 0;
1099 while ((len_tmp = range->end - tmp_start) >= res->len) {
1100 if ((tmp_start % tmp_divide) == 0) {
1101 flag = 1;
1102 len_cur = len_tmp;
1103 start_cur = tmp_start;
1104 break;
1106 tmp_start += tmp_divide - tmp_start % tmp_divide;
1107 if (tmp_start >= range->end)
1108 break;
1111 if (flag && len_cur == res->len) {
1112 res->start = start_cur;
1113 res->len += 1; /* To restore the balance */
1114 res->end = res->start + res->len - 1;
1115 return 0;
1121 if (res_prev) {
1122 if (res_prev->rangeno != res_cur->rangeno) {
1123 /* 1st device on this range */
1124 len_tmp = res_cur->start - 1 - range->start;
1126 if ((res_cur->start != range->start) && (len_tmp >= res->len)) {
1127 if ((len_tmp < len_cur) || (len_cur == 0)) {
1128 if ((range->start % tmp_divide) == 0) {
1129 /* just perfect, starting address is divisible by length */
1130 flag = 1;
1131 len_cur = len_tmp;
1132 start_cur = range->start;
1133 } else {
1134 /* Needs adjusting */
1135 tmp_start = range->start;
1136 flag = 0;
1138 while ((len_tmp = res_cur->start - 1 - tmp_start) >= res->len) {
1139 if ((tmp_start % tmp_divide) == 0) {
1140 flag = 1;
1141 len_cur = len_tmp;
1142 start_cur = tmp_start;
1143 break;
1145 tmp_start += tmp_divide - tmp_start % tmp_divide;
1146 if (tmp_start >= res_cur->start - 1)
1147 break;
1151 if (flag && len_cur == res->len) {
1152 res->start = start_cur;
1153 res->len += 1; /* To restore the balance */
1154 res->end = res->start + res->len - 1;
1155 return 0;
1159 } else {
1160 /* in the same range */
1161 len_tmp = res_cur->start - 1 - res_prev->end - 1;
1163 if (len_tmp >= res->len) {
1164 if ((len_tmp < len_cur) || (len_cur == 0)) {
1165 if (((res_prev->end + 1) % tmp_divide) == 0) {
1166 /* just perfect, starting address's divisible by length */
1167 flag = 1;
1168 len_cur = len_tmp;
1169 start_cur = res_prev->end + 1;
1170 } else {
1171 /* Needs adjusting */
1172 tmp_start = res_prev->end + 1;
1173 flag = 0;
1175 while ((len_tmp = res_cur->start - 1 - tmp_start) >= res->len) {
1176 if ((tmp_start % tmp_divide) == 0) {
1177 flag = 1;
1178 len_cur = len_tmp;
1179 start_cur = tmp_start;
1180 break;
1182 tmp_start += tmp_divide - tmp_start % tmp_divide;
1183 if (tmp_start >= res_cur->start - 1)
1184 break;
1188 if (flag && len_cur == res->len) {
1189 res->start = start_cur;
1190 res->len += 1; /* To restore the balance */
1191 res->end = res->start + res->len - 1;
1192 return 0;
1198 /* end if (res_prev) */
1199 res_prev = res_cur;
1200 if (res_cur->next)
1201 res_cur = res_cur->next;
1202 else
1203 res_cur = res_cur->nextRange;
1204 } /* end of while */
1207 if (!res_prev) {
1208 /* 1st device ever */
1209 /* need to find appropriate range */
1210 switch (res->type) {
1211 case IO:
1212 range = bus_cur->rangeIO;
1213 break;
1214 case MEM:
1215 range = bus_cur->rangeMem;
1216 break;
1217 case PFMEM:
1218 range = bus_cur->rangePFMem;
1219 break;
1221 while (range) {
1222 len_tmp = range->end - range->start;
1224 if (len_tmp >= res->len) {
1225 if ((len_tmp < len_cur) || (len_cur == 0)) {
1226 if ((range->start % tmp_divide) == 0) {
1227 /* just perfect, starting address's divisible by length */
1228 flag = 1;
1229 len_cur = len_tmp;
1230 start_cur = range->start;
1231 } else {
1232 /* Needs adjusting */
1233 tmp_start = range->start;
1234 flag = 0;
1236 while ((len_tmp = range->end - tmp_start) >= res->len) {
1237 if ((tmp_start % tmp_divide) == 0) {
1238 flag = 1;
1239 len_cur = len_tmp;
1240 start_cur = tmp_start;
1241 break;
1243 tmp_start += tmp_divide - tmp_start % tmp_divide;
1244 if (tmp_start >= range->end)
1245 break;
1249 if (flag && len_cur == res->len) {
1250 res->start = start_cur;
1251 res->len += 1; /* To restore the balance */
1252 res->end = res->start + res->len - 1;
1253 return 0;
1257 range = range->next;
1258 } /* end of while */
1260 if ((!range) && (len_cur == 0)) {
1261 /* have gone through the list of devices and ranges and haven't found n.e.thing */
1262 err("no appropriate range.. bailing out...\n");
1263 return -EINVAL;
1264 } else if (len_cur) {
1265 res->start = start_cur;
1266 res->len += 1; /* To restore the balance */
1267 res->end = res->start + res->len - 1;
1268 return 0;
1272 if (!res_cur) {
1273 debug("prev->rangeno = %d, noranges = %d\n", res_prev->rangeno, noranges);
1274 if (res_prev->rangeno < noranges) {
1275 /* if there're more ranges out there to check */
1276 switch (res->type) {
1277 case IO:
1278 range = bus_cur->rangeIO;
1279 break;
1280 case MEM:
1281 range = bus_cur->rangeMem;
1282 break;
1283 case PFMEM:
1284 range = bus_cur->rangePFMem;
1285 break;
1287 while (range) {
1288 len_tmp = range->end - range->start;
1290 if (len_tmp >= res->len) {
1291 if ((len_tmp < len_cur) || (len_cur == 0)) {
1292 if ((range->start % tmp_divide) == 0) {
1293 /* just perfect, starting address's divisible by length */
1294 flag = 1;
1295 len_cur = len_tmp;
1296 start_cur = range->start;
1297 } else {
1298 /* Needs adjusting */
1299 tmp_start = range->start;
1300 flag = 0;
1302 while ((len_tmp = range->end - tmp_start) >= res->len) {
1303 if ((tmp_start % tmp_divide) == 0) {
1304 flag = 1;
1305 len_cur = len_tmp;
1306 start_cur = tmp_start;
1307 break;
1309 tmp_start += tmp_divide - tmp_start % tmp_divide;
1310 if (tmp_start >= range->end)
1311 break;
1315 if (flag && len_cur == res->len) {
1316 res->start = start_cur;
1317 res->len += 1; /* To restore the balance */
1318 res->end = res->start + res->len - 1;
1319 return 0;
1323 range = range->next;
1324 } /* end of while */
1326 if ((!range) && (len_cur == 0)) {
1327 /* have gone through the list of devices and ranges and haven't found n.e.thing */
1328 err("no appropriate range.. bailing out...\n");
1329 return -EINVAL;
1330 } else if (len_cur) {
1331 res->start = start_cur;
1332 res->len += 1; /* To restore the balance */
1333 res->end = res->start + res->len - 1;
1334 return 0;
1336 } else {
1337 /* no more ranges to check on */
1338 if (len_cur) {
1339 res->start = start_cur;
1340 res->len += 1; /* To restore the balance */
1341 res->end = res->start + res->len - 1;
1342 return 0;
1343 } else {
1344 /* have gone through the list of devices and haven't found n.e.thing */
1345 err("no appropriate range.. bailing out...\n");
1346 return -EINVAL;
1349 } /* end if (!res_cur) */
1350 return -EINVAL;
1353 /********************************************************************************
1354 * This routine is called from remove_card if the card contained PPB.
1355 * It will remove all the resources on the bus as well as the bus itself
1356 * Input: Bus
1357 * Output: 0, -ENODEV
1358 ********************************************************************************/
1359 int ibmphp_remove_bus(struct bus_node *bus, u8 parent_busno)
1361 struct resource_node *res_cur;
1362 struct resource_node *res_tmp;
1363 struct bus_node *prev_bus;
1364 int rc;
1366 prev_bus = find_bus_wprev(parent_busno, NULL, 0);
1368 if (!prev_bus) {
1369 debug("something terribly wrong. Cannot find parent bus to the one to remove\n");
1370 return -ENODEV;
1373 debug("In ibmphp_remove_bus... prev_bus->busno is %x\n", prev_bus->busno);
1375 rc = remove_ranges(bus, prev_bus);
1376 if (rc)
1377 return rc;
1379 if (bus->firstIO) {
1380 res_cur = bus->firstIO;
1381 while (res_cur) {
1382 res_tmp = res_cur;
1383 if (res_cur->next)
1384 res_cur = res_cur->next;
1385 else
1386 res_cur = res_cur->nextRange;
1387 kfree(res_tmp);
1388 res_tmp = NULL;
1390 bus->firstIO = NULL;
1392 if (bus->firstMem) {
1393 res_cur = bus->firstMem;
1394 while (res_cur) {
1395 res_tmp = res_cur;
1396 if (res_cur->next)
1397 res_cur = res_cur->next;
1398 else
1399 res_cur = res_cur->nextRange;
1400 kfree(res_tmp);
1401 res_tmp = NULL;
1403 bus->firstMem = NULL;
1405 if (bus->firstPFMem) {
1406 res_cur = bus->firstPFMem;
1407 while (res_cur) {
1408 res_tmp = res_cur;
1409 if (res_cur->next)
1410 res_cur = res_cur->next;
1411 else
1412 res_cur = res_cur->nextRange;
1413 kfree(res_tmp);
1414 res_tmp = NULL;
1416 bus->firstPFMem = NULL;
1419 if (bus->firstPFMemFromMem) {
1420 res_cur = bus->firstPFMemFromMem;
1421 while (res_cur) {
1422 res_tmp = res_cur;
1423 res_cur = res_cur->next;
1425 kfree(res_tmp);
1426 res_tmp = NULL;
1428 bus->firstPFMemFromMem = NULL;
1431 list_del(&bus->bus_list);
1432 kfree(bus);
1433 return 0;
1436 /******************************************************************************
1437 * This routine deletes the ranges from a given bus, and the entries from the
1438 * parent's bus in the resources
1439 * Input: current bus, previous bus
1440 * Output: 0, -EINVAL
1441 ******************************************************************************/
1442 static int remove_ranges(struct bus_node *bus_cur, struct bus_node *bus_prev)
1444 struct range_node *range_cur;
1445 struct range_node *range_tmp;
1446 int i;
1447 struct resource_node *res = NULL;
1449 if (bus_cur->noIORanges) {
1450 range_cur = bus_cur->rangeIO;
1451 for (i = 0; i < bus_cur->noIORanges; i++) {
1452 if (ibmphp_find_resource(bus_prev, range_cur->start, &res, IO) < 0)
1453 return -EINVAL;
1454 ibmphp_remove_resource(res);
1456 range_tmp = range_cur;
1457 range_cur = range_cur->next;
1458 kfree(range_tmp);
1459 range_tmp = NULL;
1461 bus_cur->rangeIO = NULL;
1463 if (bus_cur->noMemRanges) {
1464 range_cur = bus_cur->rangeMem;
1465 for (i = 0; i < bus_cur->noMemRanges; i++) {
1466 if (ibmphp_find_resource(bus_prev, range_cur->start, &res, MEM) < 0)
1467 return -EINVAL;
1469 ibmphp_remove_resource(res);
1470 range_tmp = range_cur;
1471 range_cur = range_cur->next;
1472 kfree(range_tmp);
1473 range_tmp = NULL;
1475 bus_cur->rangeMem = NULL;
1477 if (bus_cur->noPFMemRanges) {
1478 range_cur = bus_cur->rangePFMem;
1479 for (i = 0; i < bus_cur->noPFMemRanges; i++) {
1480 if (ibmphp_find_resource(bus_prev, range_cur->start, &res, PFMEM) < 0)
1481 return -EINVAL;
1483 ibmphp_remove_resource(res);
1484 range_tmp = range_cur;
1485 range_cur = range_cur->next;
1486 kfree(range_tmp);
1487 range_tmp = NULL;
1489 bus_cur->rangePFMem = NULL;
1491 return 0;
1495 * find the resource node in the bus
1496 * Input: Resource needed, start address of the resource, type of resource
1498 int ibmphp_find_resource(struct bus_node *bus, u32 start_address, struct resource_node **res, int flag)
1500 struct resource_node *res_cur = NULL;
1501 char *type = "";
1503 if (!bus) {
1504 err("The bus passed in NULL to find resource\n");
1505 return -ENODEV;
1508 switch (flag) {
1509 case IO:
1510 res_cur = bus->firstIO;
1511 type = "io";
1512 break;
1513 case MEM:
1514 res_cur = bus->firstMem;
1515 type = "mem";
1516 break;
1517 case PFMEM:
1518 res_cur = bus->firstPFMem;
1519 type = "pfmem";
1520 break;
1521 default:
1522 err("wrong type of flag\n");
1523 return -EINVAL;
1526 while (res_cur) {
1527 if (res_cur->start == start_address) {
1528 *res = res_cur;
1529 break;
1531 if (res_cur->next)
1532 res_cur = res_cur->next;
1533 else
1534 res_cur = res_cur->nextRange;
1537 if (!res_cur) {
1538 if (flag == PFMEM) {
1539 res_cur = bus->firstPFMemFromMem;
1540 while (res_cur) {
1541 if (res_cur->start == start_address) {
1542 *res = res_cur;
1543 break;
1545 res_cur = res_cur->next;
1547 if (!res_cur) {
1548 debug("SOS...cannot find %s resource in the bus.\n", type);
1549 return -EINVAL;
1551 } else {
1552 debug("SOS... cannot find %s resource in the bus.\n", type);
1553 return -EINVAL;
1557 if (*res)
1558 debug("*res->start = %x\n", (*res)->start);
1560 return 0;
1563 /***********************************************************************
1564 * This routine will free the resource structures used by the
1565 * system. It is called from cleanup routine for the module
1566 * Parameters: none
1567 * Returns: none
1568 ***********************************************************************/
1569 void ibmphp_free_resources(void)
1571 struct bus_node *bus_cur = NULL, *next;
1572 struct bus_node *bus_tmp;
1573 struct range_node *range_cur;
1574 struct range_node *range_tmp;
1575 struct resource_node *res_cur;
1576 struct resource_node *res_tmp;
1577 int i = 0;
1578 flags = 1;
1580 list_for_each_entry_safe(bus_cur, next, &gbuses, bus_list) {
1581 if (bus_cur->noIORanges) {
1582 range_cur = bus_cur->rangeIO;
1583 for (i = 0; i < bus_cur->noIORanges; i++) {
1584 if (!range_cur)
1585 break;
1586 range_tmp = range_cur;
1587 range_cur = range_cur->next;
1588 kfree(range_tmp);
1589 range_tmp = NULL;
1592 if (bus_cur->noMemRanges) {
1593 range_cur = bus_cur->rangeMem;
1594 for (i = 0; i < bus_cur->noMemRanges; i++) {
1595 if (!range_cur)
1596 break;
1597 range_tmp = range_cur;
1598 range_cur = range_cur->next;
1599 kfree(range_tmp);
1600 range_tmp = NULL;
1603 if (bus_cur->noPFMemRanges) {
1604 range_cur = bus_cur->rangePFMem;
1605 for (i = 0; i < bus_cur->noPFMemRanges; i++) {
1606 if (!range_cur)
1607 break;
1608 range_tmp = range_cur;
1609 range_cur = range_cur->next;
1610 kfree(range_tmp);
1611 range_tmp = NULL;
1615 if (bus_cur->firstIO) {
1616 res_cur = bus_cur->firstIO;
1617 while (res_cur) {
1618 res_tmp = res_cur;
1619 if (res_cur->next)
1620 res_cur = res_cur->next;
1621 else
1622 res_cur = res_cur->nextRange;
1623 kfree(res_tmp);
1624 res_tmp = NULL;
1626 bus_cur->firstIO = NULL;
1628 if (bus_cur->firstMem) {
1629 res_cur = bus_cur->firstMem;
1630 while (res_cur) {
1631 res_tmp = res_cur;
1632 if (res_cur->next)
1633 res_cur = res_cur->next;
1634 else
1635 res_cur = res_cur->nextRange;
1636 kfree(res_tmp);
1637 res_tmp = NULL;
1639 bus_cur->firstMem = NULL;
1641 if (bus_cur->firstPFMem) {
1642 res_cur = bus_cur->firstPFMem;
1643 while (res_cur) {
1644 res_tmp = res_cur;
1645 if (res_cur->next)
1646 res_cur = res_cur->next;
1647 else
1648 res_cur = res_cur->nextRange;
1649 kfree(res_tmp);
1650 res_tmp = NULL;
1652 bus_cur->firstPFMem = NULL;
1655 if (bus_cur->firstPFMemFromMem) {
1656 res_cur = bus_cur->firstPFMemFromMem;
1657 while (res_cur) {
1658 res_tmp = res_cur;
1659 res_cur = res_cur->next;
1661 kfree(res_tmp);
1662 res_tmp = NULL;
1664 bus_cur->firstPFMemFromMem = NULL;
1667 bus_tmp = bus_cur;
1668 list_del(&bus_cur->bus_list);
1669 kfree(bus_tmp);
1670 bus_tmp = NULL;
1674 /*********************************************************************************
1675 * This function will go over the PFmem resources to check if the EBDA allocated
1676 * pfmem out of memory buckets of the bus. If so, it will change the range numbers
1677 * and a flag to indicate that this resource is out of memory. It will also move the
1678 * Pfmem out of the pfmem resource list to the PFMemFromMem list, and will create
1679 * a new Mem node
1680 * This routine is called right after initialization
1681 *******************************************************************************/
1682 static int __init once_over(void)
1684 struct resource_node *pfmem_cur;
1685 struct resource_node *pfmem_prev;
1686 struct resource_node *mem;
1687 struct bus_node *bus_cur;
1689 list_for_each_entry(bus_cur, &gbuses, bus_list) {
1690 if ((!bus_cur->rangePFMem) && (bus_cur->firstPFMem)) {
1691 for (pfmem_cur = bus_cur->firstPFMem, pfmem_prev = NULL; pfmem_cur; pfmem_prev = pfmem_cur, pfmem_cur = pfmem_cur->next) {
1692 pfmem_cur->fromMem = 1;
1693 if (pfmem_prev)
1694 pfmem_prev->next = pfmem_cur->next;
1695 else
1696 bus_cur->firstPFMem = pfmem_cur->next;
1698 if (!bus_cur->firstPFMemFromMem)
1699 pfmem_cur->next = NULL;
1700 else
1701 /* we don't need to sort PFMemFromMem since we're using mem node for
1702 all the real work anyways, so just insert at the beginning of the
1703 list
1705 pfmem_cur->next = bus_cur->firstPFMemFromMem;
1707 bus_cur->firstPFMemFromMem = pfmem_cur;
1709 mem = kzalloc(sizeof(struct resource_node), GFP_KERNEL);
1710 if (!mem) {
1711 err("out of system memory\n");
1712 return -ENOMEM;
1714 mem->type = MEM;
1715 mem->busno = pfmem_cur->busno;
1716 mem->devfunc = pfmem_cur->devfunc;
1717 mem->start = pfmem_cur->start;
1718 mem->end = pfmem_cur->end;
1719 mem->len = pfmem_cur->len;
1720 if (ibmphp_add_resource(mem) < 0)
1721 err("Trouble...trouble... EBDA allocated pfmem from mem, but system doesn't display it has this space... unless not PCI device...\n");
1722 pfmem_cur->rangeno = mem->rangeno;
1723 } /* end for pfmem */
1724 } /* end if */
1725 } /* end list_for_each bus */
1726 return 0;
1729 int ibmphp_add_pfmem_from_mem(struct resource_node *pfmem)
1731 struct bus_node *bus_cur = find_bus_wprev(pfmem->busno, NULL, 0);
1733 if (!bus_cur) {
1734 err("cannot find bus of pfmem to add...\n");
1735 return -ENODEV;
1738 if (bus_cur->firstPFMemFromMem)
1739 pfmem->next = bus_cur->firstPFMemFromMem;
1740 else
1741 pfmem->next = NULL;
1743 bus_cur->firstPFMemFromMem = pfmem;
1745 return 0;
1748 /* This routine just goes through the buses to see if the bus already exists.
1749 * It is called from ibmphp_find_sec_number, to find out a secondary bus number for
1750 * bridged cards
1751 * Parameters: bus_number
1752 * Returns: Bus pointer or NULL
1754 struct bus_node *ibmphp_find_res_bus(u8 bus_number)
1756 return find_bus_wprev(bus_number, NULL, 0);
1759 static struct bus_node *find_bus_wprev(u8 bus_number, struct bus_node **prev, u8 flag)
1761 struct bus_node *bus_cur;
1763 list_for_each_entry(bus_cur, &gbuses, bus_list) {
1764 if (flag)
1765 *prev = list_prev_entry(bus_cur, bus_list);
1766 if (bus_cur->busno == bus_number)
1767 return bus_cur;
1770 return NULL;
1773 void ibmphp_print_test(void)
1775 int i = 0;
1776 struct bus_node *bus_cur = NULL;
1777 struct range_node *range;
1778 struct resource_node *res;
1780 debug_pci("*****************START**********************\n");
1782 if ((!list_empty(&gbuses)) && flags) {
1783 err("The GBUSES is not NULL?!?!?!?!?\n");
1784 return;
1787 list_for_each_entry(bus_cur, &gbuses, bus_list) {
1788 debug_pci ("This is bus # %d. There are\n", bus_cur->busno);
1789 debug_pci ("IORanges = %d\t", bus_cur->noIORanges);
1790 debug_pci ("MemRanges = %d\t", bus_cur->noMemRanges);
1791 debug_pci ("PFMemRanges = %d\n", bus_cur->noPFMemRanges);
1792 debug_pci ("The IO Ranges are as follows:\n");
1793 if (bus_cur->rangeIO) {
1794 range = bus_cur->rangeIO;
1795 for (i = 0; i < bus_cur->noIORanges; i++) {
1796 debug_pci("rangeno is %d\n", range->rangeno);
1797 debug_pci("[%x - %x]\n", range->start, range->end);
1798 range = range->next;
1802 debug_pci("The Mem Ranges are as follows:\n");
1803 if (bus_cur->rangeMem) {
1804 range = bus_cur->rangeMem;
1805 for (i = 0; i < bus_cur->noMemRanges; i++) {
1806 debug_pci("rangeno is %d\n", range->rangeno);
1807 debug_pci("[%x - %x]\n", range->start, range->end);
1808 range = range->next;
1812 debug_pci("The PFMem Ranges are as follows:\n");
1814 if (bus_cur->rangePFMem) {
1815 range = bus_cur->rangePFMem;
1816 for (i = 0; i < bus_cur->noPFMemRanges; i++) {
1817 debug_pci("rangeno is %d\n", range->rangeno);
1818 debug_pci("[%x - %x]\n", range->start, range->end);
1819 range = range->next;
1823 debug_pci("The resources on this bus are as follows\n");
1825 debug_pci("IO...\n");
1826 if (bus_cur->firstIO) {
1827 res = bus_cur->firstIO;
1828 while (res) {
1829 debug_pci("The range # is %d\n", res->rangeno);
1830 debug_pci("The bus, devfnc is %d, %x\n", res->busno, res->devfunc);
1831 debug_pci("[%x - %x], len=%x\n", res->start, res->end, res->len);
1832 if (res->next)
1833 res = res->next;
1834 else if (res->nextRange)
1835 res = res->nextRange;
1836 else
1837 break;
1840 debug_pci("Mem...\n");
1841 if (bus_cur->firstMem) {
1842 res = bus_cur->firstMem;
1843 while (res) {
1844 debug_pci("The range # is %d\n", res->rangeno);
1845 debug_pci("The bus, devfnc is %d, %x\n", res->busno, res->devfunc);
1846 debug_pci("[%x - %x], len=%x\n", res->start, res->end, res->len);
1847 if (res->next)
1848 res = res->next;
1849 else if (res->nextRange)
1850 res = res->nextRange;
1851 else
1852 break;
1855 debug_pci("PFMem...\n");
1856 if (bus_cur->firstPFMem) {
1857 res = bus_cur->firstPFMem;
1858 while (res) {
1859 debug_pci("The range # is %d\n", res->rangeno);
1860 debug_pci("The bus, devfnc is %d, %x\n", res->busno, res->devfunc);
1861 debug_pci("[%x - %x], len=%x\n", res->start, res->end, res->len);
1862 if (res->next)
1863 res = res->next;
1864 else if (res->nextRange)
1865 res = res->nextRange;
1866 else
1867 break;
1871 debug_pci("PFMemFromMem...\n");
1872 if (bus_cur->firstPFMemFromMem) {
1873 res = bus_cur->firstPFMemFromMem;
1874 while (res) {
1875 debug_pci("The range # is %d\n", res->rangeno);
1876 debug_pci("The bus, devfnc is %d, %x\n", res->busno, res->devfunc);
1877 debug_pci("[%x - %x], len=%x\n", res->start, res->end, res->len);
1878 res = res->next;
1882 debug_pci("***********************END***********************\n");
1885 static int range_exists_already(struct range_node *range, struct bus_node *bus_cur, u8 type)
1887 struct range_node *range_cur = NULL;
1888 switch (type) {
1889 case IO:
1890 range_cur = bus_cur->rangeIO;
1891 break;
1892 case MEM:
1893 range_cur = bus_cur->rangeMem;
1894 break;
1895 case PFMEM:
1896 range_cur = bus_cur->rangePFMem;
1897 break;
1898 default:
1899 err("wrong type passed to find out if range already exists\n");
1900 return -ENODEV;
1903 while (range_cur) {
1904 if ((range_cur->start == range->start) && (range_cur->end == range->end))
1905 return 1;
1906 range_cur = range_cur->next;
1909 return 0;
1912 /* This routine will read the windows for any PPB we have and update the
1913 * range info for the secondary bus, and will also input this info into
1914 * primary bus, since BIOS doesn't. This is for PPB that are in the system
1915 * on bootup. For bridged cards that were added during previous load of the
1916 * driver, only the ranges and the bus structure are added, the devices are
1917 * added from NVRAM
1918 * Input: primary busno
1919 * Returns: none
1920 * Note: this function doesn't take into account IO restrictions etc,
1921 * so will only work for bridges with no video/ISA devices behind them It
1922 * also will not work for onboard PPBs that can have more than 1 *bus
1923 * behind them All these are TO DO.
1924 * Also need to add more error checkings... (from fnc returns etc)
1926 static int __init update_bridge_ranges(struct bus_node **bus)
1928 u8 sec_busno, device, function, hdr_type, start_io_address, end_io_address;
1929 u16 vendor_id, upper_io_start, upper_io_end, start_mem_address, end_mem_address;
1930 u32 start_address, end_address, upper_start, upper_end;
1931 struct bus_node *bus_sec;
1932 struct bus_node *bus_cur;
1933 struct resource_node *io;
1934 struct resource_node *mem;
1935 struct resource_node *pfmem;
1936 struct range_node *range;
1937 unsigned int devfn;
1939 bus_cur = *bus;
1940 if (!bus_cur)
1941 return -ENODEV;
1942 ibmphp_pci_bus->number = bus_cur->busno;
1944 debug("inside %s\n", __func__);
1945 debug("bus_cur->busno = %x\n", bus_cur->busno);
1947 for (device = 0; device < 32; device++) {
1948 for (function = 0x00; function < 0x08; function++) {
1949 devfn = PCI_DEVFN(device, function);
1950 pci_bus_read_config_word(ibmphp_pci_bus, devfn, PCI_VENDOR_ID, &vendor_id);
1952 if (vendor_id != PCI_VENDOR_ID_NOTVALID) {
1953 /* found correct device!!! */
1954 pci_bus_read_config_byte(ibmphp_pci_bus, devfn, PCI_HEADER_TYPE, &hdr_type);
1956 switch (hdr_type) {
1957 case PCI_HEADER_TYPE_NORMAL:
1958 function = 0x8;
1959 break;
1960 case PCI_HEADER_TYPE_MULTIDEVICE:
1961 break;
1962 case PCI_HEADER_TYPE_BRIDGE:
1963 function = 0x8;
1964 case PCI_HEADER_TYPE_MULTIBRIDGE:
1965 /* We assume here that only 1 bus behind the bridge
1966 TO DO: add functionality for several:
1967 temp = secondary;
1968 while (temp < subordinate) {
1970 temp++;
1973 pci_bus_read_config_byte(ibmphp_pci_bus, devfn, PCI_SECONDARY_BUS, &sec_busno);
1974 bus_sec = find_bus_wprev(sec_busno, NULL, 0);
1975 /* this bus structure doesn't exist yet, PPB was configured during previous loading of ibmphp */
1976 if (!bus_sec) {
1977 bus_sec = alloc_error_bus(NULL, sec_busno, 1);
1978 /* the rest will be populated during NVRAM call */
1979 return 0;
1981 pci_bus_read_config_byte(ibmphp_pci_bus, devfn, PCI_IO_BASE, &start_io_address);
1982 pci_bus_read_config_byte(ibmphp_pci_bus, devfn, PCI_IO_LIMIT, &end_io_address);
1983 pci_bus_read_config_word(ibmphp_pci_bus, devfn, PCI_IO_BASE_UPPER16, &upper_io_start);
1984 pci_bus_read_config_word(ibmphp_pci_bus, devfn, PCI_IO_LIMIT_UPPER16, &upper_io_end);
1985 start_address = (start_io_address & PCI_IO_RANGE_MASK) << 8;
1986 start_address |= (upper_io_start << 16);
1987 end_address = (end_io_address & PCI_IO_RANGE_MASK) << 8;
1988 end_address |= (upper_io_end << 16);
1990 if ((start_address) && (start_address <= end_address)) {
1991 range = kzalloc(sizeof(struct range_node), GFP_KERNEL);
1992 if (!range) {
1993 err("out of system memory\n");
1994 return -ENOMEM;
1996 range->start = start_address;
1997 range->end = end_address + 0xfff;
1999 if (bus_sec->noIORanges > 0) {
2000 if (!range_exists_already(range, bus_sec, IO)) {
2001 add_bus_range(IO, range, bus_sec);
2002 ++bus_sec->noIORanges;
2003 } else {
2004 kfree(range);
2005 range = NULL;
2007 } else {
2008 /* 1st IO Range on the bus */
2009 range->rangeno = 1;
2010 bus_sec->rangeIO = range;
2011 ++bus_sec->noIORanges;
2013 fix_resources(bus_sec);
2015 if (ibmphp_find_resource(bus_cur, start_address, &io, IO)) {
2016 io = kzalloc(sizeof(struct resource_node), GFP_KERNEL);
2017 if (!io) {
2018 kfree(range);
2019 err("out of system memory\n");
2020 return -ENOMEM;
2022 io->type = IO;
2023 io->busno = bus_cur->busno;
2024 io->devfunc = ((device << 3) | (function & 0x7));
2025 io->start = start_address;
2026 io->end = end_address + 0xfff;
2027 io->len = io->end - io->start + 1;
2028 ibmphp_add_resource(io);
2032 pci_bus_read_config_word(ibmphp_pci_bus, devfn, PCI_MEMORY_BASE, &start_mem_address);
2033 pci_bus_read_config_word(ibmphp_pci_bus, devfn, PCI_MEMORY_LIMIT, &end_mem_address);
2035 start_address = 0x00000000 | (start_mem_address & PCI_MEMORY_RANGE_MASK) << 16;
2036 end_address = 0x00000000 | (end_mem_address & PCI_MEMORY_RANGE_MASK) << 16;
2038 if ((start_address) && (start_address <= end_address)) {
2040 range = kzalloc(sizeof(struct range_node), GFP_KERNEL);
2041 if (!range) {
2042 err("out of system memory\n");
2043 return -ENOMEM;
2045 range->start = start_address;
2046 range->end = end_address + 0xfffff;
2048 if (bus_sec->noMemRanges > 0) {
2049 if (!range_exists_already(range, bus_sec, MEM)) {
2050 add_bus_range(MEM, range, bus_sec);
2051 ++bus_sec->noMemRanges;
2052 } else {
2053 kfree(range);
2054 range = NULL;
2056 } else {
2057 /* 1st Mem Range on the bus */
2058 range->rangeno = 1;
2059 bus_sec->rangeMem = range;
2060 ++bus_sec->noMemRanges;
2063 fix_resources(bus_sec);
2065 if (ibmphp_find_resource(bus_cur, start_address, &mem, MEM)) {
2066 mem = kzalloc(sizeof(struct resource_node), GFP_KERNEL);
2067 if (!mem) {
2068 kfree(range);
2069 err("out of system memory\n");
2070 return -ENOMEM;
2072 mem->type = MEM;
2073 mem->busno = bus_cur->busno;
2074 mem->devfunc = ((device << 3) | (function & 0x7));
2075 mem->start = start_address;
2076 mem->end = end_address + 0xfffff;
2077 mem->len = mem->end - mem->start + 1;
2078 ibmphp_add_resource(mem);
2081 pci_bus_read_config_word(ibmphp_pci_bus, devfn, PCI_PREF_MEMORY_BASE, &start_mem_address);
2082 pci_bus_read_config_word(ibmphp_pci_bus, devfn, PCI_PREF_MEMORY_LIMIT, &end_mem_address);
2083 pci_bus_read_config_dword(ibmphp_pci_bus, devfn, PCI_PREF_BASE_UPPER32, &upper_start);
2084 pci_bus_read_config_dword(ibmphp_pci_bus, devfn, PCI_PREF_LIMIT_UPPER32, &upper_end);
2085 start_address = 0x00000000 | (start_mem_address & PCI_MEMORY_RANGE_MASK) << 16;
2086 end_address = 0x00000000 | (end_mem_address & PCI_MEMORY_RANGE_MASK) << 16;
2087 #if BITS_PER_LONG == 64
2088 start_address |= ((long) upper_start) << 32;
2089 end_address |= ((long) upper_end) << 32;
2090 #endif
2092 if ((start_address) && (start_address <= end_address)) {
2094 range = kzalloc(sizeof(struct range_node), GFP_KERNEL);
2095 if (!range) {
2096 err("out of system memory\n");
2097 return -ENOMEM;
2099 range->start = start_address;
2100 range->end = end_address + 0xfffff;
2102 if (bus_sec->noPFMemRanges > 0) {
2103 if (!range_exists_already(range, bus_sec, PFMEM)) {
2104 add_bus_range(PFMEM, range, bus_sec);
2105 ++bus_sec->noPFMemRanges;
2106 } else {
2107 kfree(range);
2108 range = NULL;
2110 } else {
2111 /* 1st PFMem Range on the bus */
2112 range->rangeno = 1;
2113 bus_sec->rangePFMem = range;
2114 ++bus_sec->noPFMemRanges;
2117 fix_resources(bus_sec);
2118 if (ibmphp_find_resource(bus_cur, start_address, &pfmem, PFMEM)) {
2119 pfmem = kzalloc(sizeof(struct resource_node), GFP_KERNEL);
2120 if (!pfmem) {
2121 kfree(range);
2122 err("out of system memory\n");
2123 return -ENOMEM;
2125 pfmem->type = PFMEM;
2126 pfmem->busno = bus_cur->busno;
2127 pfmem->devfunc = ((device << 3) | (function & 0x7));
2128 pfmem->start = start_address;
2129 pfmem->end = end_address + 0xfffff;
2130 pfmem->len = pfmem->end - pfmem->start + 1;
2131 pfmem->fromMem = 0;
2133 ibmphp_add_resource(pfmem);
2136 break;
2137 } /* end of switch */
2138 } /* end if vendor */
2139 } /* end for function */
2140 } /* end for device */
2142 bus = &bus_cur;
2143 return 0;