xref: /linux/drivers/pci/setup-bus.c (revision f7511d5f66f01fc451747b24e79f3ada7a3af9af)
1 /*
2  *	drivers/pci/setup-bus.c
3  *
4  * Extruded from code written by
5  *      Dave Rusling (david.rusling@reo.mts.dec.com)
6  *      David Mosberger (davidm@cs.arizona.edu)
7  *	David Miller (davem@redhat.com)
8  *
9  * Support routines for initializing a PCI subsystem.
10  */
11 
12 /*
13  * Nov 2000, Ivan Kokshaysky <ink@jurassic.park.msu.ru>
14  *	     PCI-PCI bridges cleanup, sorted resource allocation.
15  * Feb 2002, Ivan Kokshaysky <ink@jurassic.park.msu.ru>
16  *	     Converted to allocation in 3 passes, which gives
17  *	     tighter packing. Prefetchable range support.
18  */
19 
20 #include <linux/init.h>
21 #include <linux/kernel.h>
22 #include <linux/module.h>
23 #include <linux/pci.h>
24 #include <linux/errno.h>
25 #include <linux/ioport.h>
26 #include <linux/cache.h>
27 #include <linux/slab.h>
28 
29 
30 #define DEBUG_CONFIG 1
31 #if DEBUG_CONFIG
32 #define DBG(x...)     printk(x)
33 #else
34 #define DBG(x...)
35 #endif
36 
37 static void pbus_assign_resources_sorted(struct pci_bus *bus)
38 {
39 	struct pci_dev *dev;
40 	struct resource *res;
41 	struct resource_list head, *list, *tmp;
42 	int idx;
43 
44 	head.next = NULL;
45 	list_for_each_entry(dev, &bus->devices, bus_list) {
46 		u16 class = dev->class >> 8;
47 
48 		/* Don't touch classless devices or host bridges or ioapics.  */
49 		if (class == PCI_CLASS_NOT_DEFINED ||
50 		    class == PCI_CLASS_BRIDGE_HOST)
51 			continue;
52 
53 		/* Don't touch ioapic devices already enabled by firmware */
54 		if (class == PCI_CLASS_SYSTEM_PIC) {
55 			u16 command;
56 			pci_read_config_word(dev, PCI_COMMAND, &command);
57 			if (command & (PCI_COMMAND_IO | PCI_COMMAND_MEMORY))
58 				continue;
59 		}
60 
61 		pdev_sort_resources(dev, &head);
62 	}
63 
64 	for (list = head.next; list;) {
65 		res = list->res;
66 		idx = res - &list->dev->resource[0];
67 		if (pci_assign_resource(list->dev, idx)) {
68 			/* FIXME: get rid of this */
69 			res->start = 0;
70 			res->end = 0;
71 			res->flags = 0;
72 		}
73 		tmp = list;
74 		list = list->next;
75 		kfree(tmp);
76 	}
77 }
78 
79 void pci_setup_cardbus(struct pci_bus *bus)
80 {
81 	struct pci_dev *bridge = bus->self;
82 	struct pci_bus_region region;
83 
84 	printk("PCI: Bus %d, cardbus bridge: %s\n",
85 		bus->number, pci_name(bridge));
86 
87 	pcibios_resource_to_bus(bridge, &region, bus->resource[0]);
88 	if (bus->resource[0]->flags & IORESOURCE_IO) {
89 		/*
90 		 * The IO resource is allocated a range twice as large as it
91 		 * would normally need.  This allows us to set both IO regs.
92 		 */
93 		printk(KERN_INFO "  IO window: 0x%08lx-0x%08lx\n",
94 		       (unsigned long)region.start,
95 		       (unsigned long)region.end);
96 		pci_write_config_dword(bridge, PCI_CB_IO_BASE_0,
97 					region.start);
98 		pci_write_config_dword(bridge, PCI_CB_IO_LIMIT_0,
99 					region.end);
100 	}
101 
102 	pcibios_resource_to_bus(bridge, &region, bus->resource[1]);
103 	if (bus->resource[1]->flags & IORESOURCE_IO) {
104 		printk(KERN_INFO "  IO window: 0x%08lx-0x%08lx\n",
105 		       (unsigned long)region.start,
106 		       (unsigned long)region.end);
107 		pci_write_config_dword(bridge, PCI_CB_IO_BASE_1,
108 					region.start);
109 		pci_write_config_dword(bridge, PCI_CB_IO_LIMIT_1,
110 					region.end);
111 	}
112 
113 	pcibios_resource_to_bus(bridge, &region, bus->resource[2]);
114 	if (bus->resource[2]->flags & IORESOURCE_MEM) {
115 		printk(KERN_INFO "  PREFETCH window: 0x%08lx-0x%08lx\n",
116 		       (unsigned long)region.start,
117 		       (unsigned long)region.end);
118 		pci_write_config_dword(bridge, PCI_CB_MEMORY_BASE_0,
119 					region.start);
120 		pci_write_config_dword(bridge, PCI_CB_MEMORY_LIMIT_0,
121 					region.end);
122 	}
123 
124 	pcibios_resource_to_bus(bridge, &region, bus->resource[3]);
125 	if (bus->resource[3]->flags & IORESOURCE_MEM) {
126 		printk(KERN_INFO "  MEM window: 0x%08lx-0x%08lx\n",
127 		       (unsigned long)region.start,
128 		       (unsigned long)region.end);
129 		pci_write_config_dword(bridge, PCI_CB_MEMORY_BASE_1,
130 					region.start);
131 		pci_write_config_dword(bridge, PCI_CB_MEMORY_LIMIT_1,
132 					region.end);
133 	}
134 }
135 EXPORT_SYMBOL(pci_setup_cardbus);
136 
137 /* Initialize bridges with base/limit values we have collected.
138    PCI-to-PCI Bridge Architecture Specification rev. 1.1 (1998)
139    requires that if there is no I/O ports or memory behind the
140    bridge, corresponding range must be turned off by writing base
141    value greater than limit to the bridge's base/limit registers.
142 
143    Note: care must be taken when updating I/O base/limit registers
144    of bridges which support 32-bit I/O. This update requires two
145    config space writes, so it's quite possible that an I/O window of
146    the bridge will have some undesirable address (e.g. 0) after the
147    first write. Ditto 64-bit prefetchable MMIO.  */
148 static void pci_setup_bridge(struct pci_bus *bus)
149 {
150 	struct pci_dev *bridge = bus->self;
151 	struct pci_bus_region region;
152 	u32 l, bu, lu, io_upper16;
153 
154 	DBG(KERN_INFO "PCI: Bridge: %s\n", pci_name(bridge));
155 
156 	/* Set up the top and bottom of the PCI I/O segment for this bus. */
157 	pcibios_resource_to_bus(bridge, &region, bus->resource[0]);
158 	if (bus->resource[0]->flags & IORESOURCE_IO) {
159 		pci_read_config_dword(bridge, PCI_IO_BASE, &l);
160 		l &= 0xffff0000;
161 		l |= (region.start >> 8) & 0x00f0;
162 		l |= region.end & 0xf000;
163 		/* Set up upper 16 bits of I/O base/limit. */
164 		io_upper16 = (region.end & 0xffff0000) | (region.start >> 16);
165 		DBG(KERN_INFO "  IO window: %04lx-%04lx\n",
166 		    (unsigned long)region.start,
167 		    (unsigned long)region.end);
168 	}
169 	else {
170 		/* Clear upper 16 bits of I/O base/limit. */
171 		io_upper16 = 0;
172 		l = 0x00f0;
173 		DBG(KERN_INFO "  IO window: disabled.\n");
174 	}
175 	/* Temporarily disable the I/O range before updating PCI_IO_BASE. */
176 	pci_write_config_dword(bridge, PCI_IO_BASE_UPPER16, 0x0000ffff);
177 	/* Update lower 16 bits of I/O base/limit. */
178 	pci_write_config_dword(bridge, PCI_IO_BASE, l);
179 	/* Update upper 16 bits of I/O base/limit. */
180 	pci_write_config_dword(bridge, PCI_IO_BASE_UPPER16, io_upper16);
181 
182 	/* Set up the top and bottom of the PCI Memory segment
183 	   for this bus. */
184 	pcibios_resource_to_bus(bridge, &region, bus->resource[1]);
185 	if (bus->resource[1]->flags & IORESOURCE_MEM) {
186 		l = (region.start >> 16) & 0xfff0;
187 		l |= region.end & 0xfff00000;
188 		DBG(KERN_INFO "  MEM window: 0x%08lx-0x%08lx\n",
189 		    (unsigned long)region.start,
190 		    (unsigned long)region.end);
191 	}
192 	else {
193 		l = 0x0000fff0;
194 		DBG(KERN_INFO "  MEM window: disabled.\n");
195 	}
196 	pci_write_config_dword(bridge, PCI_MEMORY_BASE, l);
197 
198 	/* Clear out the upper 32 bits of PREF limit.
199 	   If PCI_PREF_BASE_UPPER32 was non-zero, this temporarily
200 	   disables PREF range, which is ok. */
201 	pci_write_config_dword(bridge, PCI_PREF_LIMIT_UPPER32, 0);
202 
203 	/* Set up PREF base/limit. */
204 	bu = lu = 0;
205 	pcibios_resource_to_bus(bridge, &region, bus->resource[2]);
206 	if (bus->resource[2]->flags & IORESOURCE_PREFETCH) {
207 		l = (region.start >> 16) & 0xfff0;
208 		l |= region.end & 0xfff00000;
209 		bu = upper_32_bits(region.start);
210 		lu = upper_32_bits(region.end);
211 		DBG(KERN_INFO "  PREFETCH window: 0x%016llx-0x%016llx\n",
212 		    (unsigned long long)region.start,
213 		    (unsigned long long)region.end);
214 	}
215 	else {
216 		l = 0x0000fff0;
217 		DBG(KERN_INFO "  PREFETCH window: disabled.\n");
218 	}
219 	pci_write_config_dword(bridge, PCI_PREF_MEMORY_BASE, l);
220 
221 	/* Set the upper 32 bits of PREF base & limit. */
222 	pci_write_config_dword(bridge, PCI_PREF_BASE_UPPER32, bu);
223 	pci_write_config_dword(bridge, PCI_PREF_LIMIT_UPPER32, lu);
224 
225 	pci_write_config_word(bridge, PCI_BRIDGE_CONTROL, bus->bridge_ctl);
226 }
227 
228 /* Check whether the bridge supports optional I/O and
229    prefetchable memory ranges. If not, the respective
230    base/limit registers must be read-only and read as 0. */
231 static void pci_bridge_check_ranges(struct pci_bus *bus)
232 {
233 	u16 io;
234 	u32 pmem;
235 	struct pci_dev *bridge = bus->self;
236 	struct resource *b_res;
237 
238 	b_res = &bridge->resource[PCI_BRIDGE_RESOURCES];
239 	b_res[1].flags |= IORESOURCE_MEM;
240 
241 	pci_read_config_word(bridge, PCI_IO_BASE, &io);
242 	if (!io) {
243 		pci_write_config_word(bridge, PCI_IO_BASE, 0xf0f0);
244 		pci_read_config_word(bridge, PCI_IO_BASE, &io);
245  		pci_write_config_word(bridge, PCI_IO_BASE, 0x0);
246  	}
247  	if (io)
248 		b_res[0].flags |= IORESOURCE_IO;
249 	/*  DECchip 21050 pass 2 errata: the bridge may miss an address
250 	    disconnect boundary by one PCI data phase.
251 	    Workaround: do not use prefetching on this device. */
252 	if (bridge->vendor == PCI_VENDOR_ID_DEC && bridge->device == 0x0001)
253 		return;
254 	pci_read_config_dword(bridge, PCI_PREF_MEMORY_BASE, &pmem);
255 	if (!pmem) {
256 		pci_write_config_dword(bridge, PCI_PREF_MEMORY_BASE,
257 					       0xfff0fff0);
258 		pci_read_config_dword(bridge, PCI_PREF_MEMORY_BASE, &pmem);
259 		pci_write_config_dword(bridge, PCI_PREF_MEMORY_BASE, 0x0);
260 	}
261 	if (pmem)
262 		b_res[2].flags |= IORESOURCE_MEM | IORESOURCE_PREFETCH;
263 }
264 
265 /* Helper function for sizing routines: find first available
266    bus resource of a given type. Note: we intentionally skip
267    the bus resources which have already been assigned (that is,
268    have non-NULL parent resource). */
269 static struct resource *find_free_bus_resource(struct pci_bus *bus, unsigned long type)
270 {
271 	int i;
272 	struct resource *r;
273 	unsigned long type_mask = IORESOURCE_IO | IORESOURCE_MEM |
274 				  IORESOURCE_PREFETCH;
275 
276 	for (i = 0; i < PCI_BUS_NUM_RESOURCES; i++) {
277 		r = bus->resource[i];
278 		if (r == &ioport_resource || r == &iomem_resource)
279 			continue;
280 		if (r && (r->flags & type_mask) == type && !r->parent)
281 			return r;
282 	}
283 	return NULL;
284 }
285 
286 /* Sizing the IO windows of the PCI-PCI bridge is trivial,
287    since these windows have 4K granularity and the IO ranges
288    of non-bridge PCI devices are limited to 256 bytes.
289    We must be careful with the ISA aliasing though. */
290 static void pbus_size_io(struct pci_bus *bus)
291 {
292 	struct pci_dev *dev;
293 	struct resource *b_res = find_free_bus_resource(bus, IORESOURCE_IO);
294 	unsigned long size = 0, size1 = 0;
295 
296 	if (!b_res)
297  		return;
298 
299 	list_for_each_entry(dev, &bus->devices, bus_list) {
300 		int i;
301 
302 		for (i = 0; i < PCI_NUM_RESOURCES; i++) {
303 			struct resource *r = &dev->resource[i];
304 			unsigned long r_size;
305 
306 			if (r->parent || !(r->flags & IORESOURCE_IO))
307 				continue;
308 			r_size = r->end - r->start + 1;
309 
310 			if (r_size < 0x400)
311 				/* Might be re-aligned for ISA */
312 				size += r_size;
313 			else
314 				size1 += r_size;
315 		}
316 	}
317 /* To be fixed in 2.5: we should have sort of HAVE_ISA
318    flag in the struct pci_bus. */
319 #if defined(CONFIG_ISA) || defined(CONFIG_EISA)
320 	size = (size & 0xff) + ((size & ~0xffUL) << 2);
321 #endif
322 	size = ALIGN(size + size1, 4096);
323 	if (!size) {
324 		b_res->flags = 0;
325 		return;
326 	}
327 	/* Alignment of the IO window is always 4K */
328 	b_res->start = 4096;
329 	b_res->end = b_res->start + size - 1;
330 	b_res->flags |= IORESOURCE_STARTALIGN;
331 }
332 
333 /* Calculate the size of the bus and minimal alignment which
334    guarantees that all child resources fit in this size. */
335 static int pbus_size_mem(struct pci_bus *bus, unsigned long mask, unsigned long type)
336 {
337 	struct pci_dev *dev;
338 	resource_size_t min_align, align, size;
339 	resource_size_t aligns[12];	/* Alignments from 1Mb to 2Gb */
340 	int order, max_order;
341 	struct resource *b_res = find_free_bus_resource(bus, type);
342 
343 	if (!b_res)
344 		return 0;
345 
346 	memset(aligns, 0, sizeof(aligns));
347 	max_order = 0;
348 	size = 0;
349 
350 	list_for_each_entry(dev, &bus->devices, bus_list) {
351 		int i;
352 
353 		for (i = 0; i < PCI_NUM_RESOURCES; i++) {
354 			struct resource *r = &dev->resource[i];
355 			resource_size_t r_size;
356 
357 			if (r->parent || (r->flags & mask) != type)
358 				continue;
359 			r_size = r->end - r->start + 1;
360 			/* For bridges size != alignment */
361 			align = (i < PCI_BRIDGE_RESOURCES) ? r_size : r->start;
362 			order = __ffs(align) - 20;
363 			if (order > 11) {
364 				printk(KERN_WARNING "PCI: region %s/%d "
365 				       "too large: 0x%016llx-0x%016llx\n",
366 					pci_name(dev), i,
367 				       (unsigned long long)r->start,
368 				       (unsigned long long)r->end);
369 				r->flags = 0;
370 				continue;
371 			}
372 			size += r_size;
373 			if (order < 0)
374 				order = 0;
375 			/* Exclude ranges with size > align from
376 			   calculation of the alignment. */
377 			if (r_size == align)
378 				aligns[order] += align;
379 			if (order > max_order)
380 				max_order = order;
381 		}
382 	}
383 
384 	align = 0;
385 	min_align = 0;
386 	for (order = 0; order <= max_order; order++) {
387 #ifdef CONFIG_RESOURCES_64BIT
388 		resource_size_t align1 = 1ULL << (order + 20);
389 #else
390 		resource_size_t align1 = 1U << (order + 20);
391 #endif
392 		if (!align)
393 			min_align = align1;
394 		else if (ALIGN(align + min_align, min_align) < align1)
395 			min_align = align1 >> 1;
396 		align += aligns[order];
397 	}
398 	size = ALIGN(size, min_align);
399 	if (!size) {
400 		b_res->flags = 0;
401 		return 1;
402 	}
403 	b_res->start = min_align;
404 	b_res->end = size + min_align - 1;
405 	b_res->flags |= IORESOURCE_STARTALIGN;
406 	return 1;
407 }
408 
409 static void pci_bus_size_cardbus(struct pci_bus *bus)
410 {
411 	struct pci_dev *bridge = bus->self;
412 	struct resource *b_res = &bridge->resource[PCI_BRIDGE_RESOURCES];
413 	u16 ctrl;
414 
415 	/*
416 	 * Reserve some resources for CardBus.  We reserve
417 	 * a fixed amount of bus space for CardBus bridges.
418 	 */
419 	b_res[0].start = 0;
420 	b_res[0].end = pci_cardbus_io_size - 1;
421 	b_res[0].flags |= IORESOURCE_IO | IORESOURCE_SIZEALIGN;
422 
423 	b_res[1].start = 0;
424 	b_res[1].end = pci_cardbus_io_size - 1;
425 	b_res[1].flags |= IORESOURCE_IO | IORESOURCE_SIZEALIGN;
426 
427 	/*
428 	 * Check whether prefetchable memory is supported
429 	 * by this bridge.
430 	 */
431 	pci_read_config_word(bridge, PCI_CB_BRIDGE_CONTROL, &ctrl);
432 	if (!(ctrl & PCI_CB_BRIDGE_CTL_PREFETCH_MEM0)) {
433 		ctrl |= PCI_CB_BRIDGE_CTL_PREFETCH_MEM0;
434 		pci_write_config_word(bridge, PCI_CB_BRIDGE_CONTROL, ctrl);
435 		pci_read_config_word(bridge, PCI_CB_BRIDGE_CONTROL, &ctrl);
436 	}
437 
438 	/*
439 	 * If we have prefetchable memory support, allocate
440 	 * two regions.  Otherwise, allocate one region of
441 	 * twice the size.
442 	 */
443 	if (ctrl & PCI_CB_BRIDGE_CTL_PREFETCH_MEM0) {
444 		b_res[2].start = 0;
445 		b_res[2].end = pci_cardbus_mem_size - 1;
446 		b_res[2].flags |= IORESOURCE_MEM | IORESOURCE_PREFETCH | IORESOURCE_SIZEALIGN;
447 
448 		b_res[3].start = 0;
449 		b_res[3].end = pci_cardbus_mem_size - 1;
450 		b_res[3].flags |= IORESOURCE_MEM | IORESOURCE_SIZEALIGN;
451 	} else {
452 		b_res[3].start = 0;
453 		b_res[3].end = pci_cardbus_mem_size * 2 - 1;
454 		b_res[3].flags |= IORESOURCE_MEM | IORESOURCE_SIZEALIGN;
455 	}
456 }
457 
458 void __ref pci_bus_size_bridges(struct pci_bus *bus)
459 {
460 	struct pci_dev *dev;
461 	unsigned long mask, prefmask;
462 
463 	list_for_each_entry(dev, &bus->devices, bus_list) {
464 		struct pci_bus *b = dev->subordinate;
465 		if (!b)
466 			continue;
467 
468 		switch (dev->class >> 8) {
469 		case PCI_CLASS_BRIDGE_CARDBUS:
470 			pci_bus_size_cardbus(b);
471 			break;
472 
473 		case PCI_CLASS_BRIDGE_PCI:
474 		default:
475 			pci_bus_size_bridges(b);
476 			break;
477 		}
478 	}
479 
480 	/* The root bus? */
481 	if (!bus->self)
482 		return;
483 
484 	switch (bus->self->class >> 8) {
485 	case PCI_CLASS_BRIDGE_CARDBUS:
486 		/* don't size cardbuses yet. */
487 		break;
488 
489 	case PCI_CLASS_BRIDGE_PCI:
490 		pci_bridge_check_ranges(bus);
491 	default:
492 		pbus_size_io(bus);
493 		/* If the bridge supports prefetchable range, size it
494 		   separately. If it doesn't, or its prefetchable window
495 		   has already been allocated by arch code, try
496 		   non-prefetchable range for both types of PCI memory
497 		   resources. */
498 		mask = IORESOURCE_MEM;
499 		prefmask = IORESOURCE_MEM | IORESOURCE_PREFETCH;
500 		if (pbus_size_mem(bus, prefmask, prefmask))
501 			mask = prefmask; /* Success, size non-prefetch only. */
502 		pbus_size_mem(bus, mask, IORESOURCE_MEM);
503 		break;
504 	}
505 }
506 EXPORT_SYMBOL(pci_bus_size_bridges);
507 
508 void __ref pci_bus_assign_resources(struct pci_bus *bus)
509 {
510 	struct pci_bus *b;
511 	struct pci_dev *dev;
512 
513 	pbus_assign_resources_sorted(bus);
514 
515 	list_for_each_entry(dev, &bus->devices, bus_list) {
516 		b = dev->subordinate;
517 		if (!b)
518 			continue;
519 
520 		pci_bus_assign_resources(b);
521 
522 		switch (dev->class >> 8) {
523 		case PCI_CLASS_BRIDGE_PCI:
524 			pci_setup_bridge(b);
525 			break;
526 
527 		case PCI_CLASS_BRIDGE_CARDBUS:
528 			pci_setup_cardbus(b);
529 			break;
530 
531 		default:
532 			printk(KERN_INFO "PCI: not setting up bridge %s "
533 			       "for bus %d\n", pci_name(dev), b->number);
534 			break;
535 		}
536 	}
537 }
538 EXPORT_SYMBOL(pci_bus_assign_resources);
539 
540 void __init
541 pci_assign_unassigned_resources(void)
542 {
543 	struct pci_bus *bus;
544 
545 	/* Depth first, calculate sizes and alignments of all
546 	   subordinate buses. */
547 	list_for_each_entry(bus, &pci_root_buses, node) {
548 		pci_bus_size_bridges(bus);
549 	}
550 	/* Depth last, allocate resources and update the hardware. */
551 	list_for_each_entry(bus, &pci_root_buses, node) {
552 		pci_bus_assign_resources(bus);
553 		pci_enable_bridges(bus);
554 	}
555 }
556