1 /*
2 * linux/arch/alpha/kernel/pci.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 */
8
9 /* 2.3.x PCI/resources, 1999 Andrea Arcangeli <andrea@suse.de> */
10
11 /*
12 * Nov 2000, Ivan Kokshaysky <ink@jurassic.park.msu.ru>
13 * PCI-PCI bridges cleanup
14 */
15 #include <linux/string.h>
16 #include <linux/pci.h>
17 #include <linux/init.h>
18 #include <linux/ioport.h>
19 #include <linux/kernel.h>
20 #include <linux/bootmem.h>
21 #include <linux/module.h>
22 #include <linux/cache.h>
23 #include <linux/slab.h>
24 #include <asm/machvec.h>
25
26 #include "proto.h"
27 #include "pci_impl.h"
28
29
30 /*
31 * Some string constants used by the various core logics.
32 */
33
34 const char *const pci_io_names[] = {
35 "PCI IO bus 0", "PCI IO bus 1", "PCI IO bus 2", "PCI IO bus 3",
36 "PCI IO bus 4", "PCI IO bus 5", "PCI IO bus 6", "PCI IO bus 7"
37 };
38
39 const char *const pci_mem_names[] = {
40 "PCI mem bus 0", "PCI mem bus 1", "PCI mem bus 2", "PCI mem bus 3",
41 "PCI mem bus 4", "PCI mem bus 5", "PCI mem bus 6", "PCI mem bus 7"
42 };
43
44 const char pci_hae0_name[] = "HAE0";
45
46 /*
47 * If PCI_PROBE_ONLY in pci_flags is set, we don't change any PCI resource
48 * assignments.
49 */
50
51 /*
52 * The PCI controller list.
53 */
54
55 struct pci_controller *hose_head, **hose_tail = &hose_head;
56 struct pci_controller *pci_isa_hose;
57
58 /*
59 * Quirks.
60 */
61
quirk_isa_bridge(struct pci_dev * dev)62 static void quirk_isa_bridge(struct pci_dev *dev)
63 {
64 dev->class = PCI_CLASS_BRIDGE_ISA << 8;
65 }
66 DECLARE_PCI_FIXUP_HEADER(PCI_VENDOR_ID_INTEL, PCI_DEVICE_ID_INTEL_82378, quirk_isa_bridge);
67
quirk_cypress(struct pci_dev * dev)68 static void quirk_cypress(struct pci_dev *dev)
69 {
70 /* The Notorious Cy82C693 chip. */
71
72 /* The generic legacy mode IDE fixup in drivers/pci/probe.c
73 doesn't work correctly with the Cypress IDE controller as
74 it has non-standard register layout. Fix that. */
75 if (dev->class >> 8 == PCI_CLASS_STORAGE_IDE) {
76 dev->resource[2].start = dev->resource[3].start = 0;
77 dev->resource[2].end = dev->resource[3].end = 0;
78 dev->resource[2].flags = dev->resource[3].flags = 0;
79 if (PCI_FUNC(dev->devfn) == 2) {
80 dev->resource[0].start = 0x170;
81 dev->resource[0].end = 0x177;
82 dev->resource[1].start = 0x376;
83 dev->resource[1].end = 0x376;
84 }
85 }
86
87 /* The Cypress bridge responds on the PCI bus in the address range
88 0xffff0000-0xffffffff (conventional x86 BIOS ROM). There is no
89 way to turn this off. The bridge also supports several extended
90 BIOS ranges (disabled after power-up), and some consoles do turn
91 them on. So if we use a large direct-map window, or a large SG
92 window, we must avoid the entire 0xfff00000-0xffffffff region. */
93 if (dev->class >> 8 == PCI_CLASS_BRIDGE_ISA) {
94 if (__direct_map_base + __direct_map_size >= 0xfff00000UL)
95 __direct_map_size = 0xfff00000UL - __direct_map_base;
96 else {
97 struct pci_controller *hose = dev->sysdata;
98 struct pci_iommu_arena *pci = hose->sg_pci;
99 if (pci && pci->dma_base + pci->size >= 0xfff00000UL)
100 pci->size = 0xfff00000UL - pci->dma_base;
101 }
102 }
103 }
104 DECLARE_PCI_FIXUP_HEADER(PCI_VENDOR_ID_CONTAQ, PCI_DEVICE_ID_CONTAQ_82C693, quirk_cypress);
105
106 /* Called for each device after PCI setup is done. */
pcibios_fixup_final(struct pci_dev * dev)107 static void pcibios_fixup_final(struct pci_dev *dev)
108 {
109 unsigned int class = dev->class >> 8;
110
111 if (class == PCI_CLASS_BRIDGE_ISA || class == PCI_CLASS_BRIDGE_EISA) {
112 dev->dma_mask = MAX_ISA_DMA_ADDRESS - 1;
113 isa_bridge = dev;
114 }
115 }
116 DECLARE_PCI_FIXUP_FINAL(PCI_ANY_ID, PCI_ANY_ID, pcibios_fixup_final);
117
118 /* Just declaring that the power-of-ten prefixes are actually the
119 power-of-two ones doesn't make it true :) */
120 #define KB 1024
121 #define MB (1024*KB)
122 #define GB (1024*MB)
123
124 resource_size_t
pcibios_align_resource(void * data,const struct resource * res,resource_size_t size,resource_size_t align)125 pcibios_align_resource(void *data, const struct resource *res,
126 resource_size_t size, resource_size_t align)
127 {
128 struct pci_dev *dev = data;
129 struct pci_controller *hose = dev->sysdata;
130 unsigned long alignto;
131 resource_size_t start = res->start;
132
133 if (res->flags & IORESOURCE_IO) {
134 /* Make sure we start at our min on all hoses */
135 if (start - hose->io_space->start < PCIBIOS_MIN_IO)
136 start = PCIBIOS_MIN_IO + hose->io_space->start;
137
138 /*
139 * Put everything into 0x00-0xff region modulo 0x400
140 */
141 if (start & 0x300)
142 start = (start + 0x3ff) & ~0x3ff;
143 }
144 else if (res->flags & IORESOURCE_MEM) {
145 /* Make sure we start at our min on all hoses */
146 if (start - hose->mem_space->start < PCIBIOS_MIN_MEM)
147 start = PCIBIOS_MIN_MEM + hose->mem_space->start;
148
149 /*
150 * The following holds at least for the Low Cost
151 * Alpha implementation of the PCI interface:
152 *
153 * In sparse memory address space, the first
154 * octant (16MB) of every 128MB segment is
155 * aliased to the very first 16 MB of the
156 * address space (i.e., it aliases the ISA
157 * memory address space). Thus, we try to
158 * avoid allocating PCI devices in that range.
159 * Can be allocated in 2nd-7th octant only.
160 * Devices that need more than 112MB of
161 * address space must be accessed through
162 * dense memory space only!
163 */
164
165 /* Align to multiple of size of minimum base. */
166 alignto = max_t(resource_size_t, 0x1000, align);
167 start = ALIGN(start, alignto);
168 if (hose->sparse_mem_base && size <= 7 * 16*MB) {
169 if (((start / (16*MB)) & 0x7) == 0) {
170 start &= ~(128*MB - 1);
171 start += 16*MB;
172 start = ALIGN(start, alignto);
173 }
174 if (start/(128*MB) != (start + size - 1)/(128*MB)) {
175 start &= ~(128*MB - 1);
176 start += (128 + 16)*MB;
177 start = ALIGN(start, alignto);
178 }
179 }
180 }
181
182 return start;
183 }
184 #undef KB
185 #undef MB
186 #undef GB
187
188 static int __init
pcibios_init(void)189 pcibios_init(void)
190 {
191 if (alpha_mv.init_pci)
192 alpha_mv.init_pci();
193 return 0;
194 }
195
196 subsys_initcall(pcibios_init);
197
198 #ifdef ALPHA_RESTORE_SRM_SETUP
199 static struct pdev_srm_saved_conf *srm_saved_configs;
200
pdev_save_srm_config(struct pci_dev * dev)201 void pdev_save_srm_config(struct pci_dev *dev)
202 {
203 struct pdev_srm_saved_conf *tmp;
204 static int printed = 0;
205
206 if (!alpha_using_srm || pci_has_flag(PCI_PROBE_ONLY))
207 return;
208
209 if (!printed) {
210 printk(KERN_INFO "pci: enabling save/restore of SRM state\n");
211 printed = 1;
212 }
213
214 tmp = kmalloc(sizeof(*tmp), GFP_KERNEL);
215 if (!tmp) {
216 printk(KERN_ERR "%s: kmalloc() failed!\n", __func__);
217 return;
218 }
219 tmp->next = srm_saved_configs;
220 tmp->dev = dev;
221
222 pci_save_state(dev);
223
224 srm_saved_configs = tmp;
225 }
226
227 void
pci_restore_srm_config(void)228 pci_restore_srm_config(void)
229 {
230 struct pdev_srm_saved_conf *tmp;
231
232 /* No need to restore if probed only. */
233 if (pci_has_flag(PCI_PROBE_ONLY))
234 return;
235
236 /* Restore SRM config. */
237 for (tmp = srm_saved_configs; tmp; tmp = tmp->next) {
238 pci_restore_state(tmp->dev);
239 }
240 }
241 #endif
242
pcibios_fixup_bus(struct pci_bus * bus)243 void pcibios_fixup_bus(struct pci_bus *bus)
244 {
245 struct pci_dev *dev = bus->self;
246
247 if (pci_has_flag(PCI_PROBE_ONLY) && dev &&
248 (dev->class >> 8) == PCI_CLASS_BRIDGE_PCI) {
249 pci_read_bridge_bases(bus);
250 }
251
252 list_for_each_entry(dev, &bus->devices, bus_list) {
253 pdev_save_srm_config(dev);
254 }
255 }
256
257 /*
258 * If we set up a device for bus mastering, we need to check the latency
259 * timer as certain firmware forgets to set it properly, as seen
260 * on SX164 and LX164 with SRM.
261 */
262 void
pcibios_set_master(struct pci_dev * dev)263 pcibios_set_master(struct pci_dev *dev)
264 {
265 u8 lat;
266 pci_read_config_byte(dev, PCI_LATENCY_TIMER, &lat);
267 if (lat >= 16) return;
268 printk("PCI: Setting latency timer of device %s to 64\n",
269 pci_name(dev));
270 pci_write_config_byte(dev, PCI_LATENCY_TIMER, 64);
271 }
272
273 void __init
pcibios_claim_one_bus(struct pci_bus * b)274 pcibios_claim_one_bus(struct pci_bus *b)
275 {
276 struct pci_dev *dev;
277 struct pci_bus *child_bus;
278
279 list_for_each_entry(dev, &b->devices, bus_list) {
280 int i;
281
282 for (i = 0; i < PCI_NUM_RESOURCES; i++) {
283 struct resource *r = &dev->resource[i];
284
285 if (r->parent || !r->start || !r->flags)
286 continue;
287 if (pci_has_flag(PCI_PROBE_ONLY) ||
288 (r->flags & IORESOURCE_PCI_FIXED))
289 pci_claim_resource(dev, i);
290 }
291 }
292
293 list_for_each_entry(child_bus, &b->children, node)
294 pcibios_claim_one_bus(child_bus);
295 }
296
297 static void __init
pcibios_claim_console_setup(void)298 pcibios_claim_console_setup(void)
299 {
300 struct pci_bus *b;
301
302 list_for_each_entry(b, &pci_root_buses, node)
303 pcibios_claim_one_bus(b);
304 }
305
306 void __init
common_init_pci(void)307 common_init_pci(void)
308 {
309 struct pci_controller *hose;
310 struct list_head resources;
311 struct pci_bus *bus;
312 int next_busno;
313 int need_domain_info = 0;
314 u32 pci_mem_end;
315 u32 sg_base;
316 unsigned long end;
317
318 /* Scan all of the recorded PCI controllers. */
319 for (next_busno = 0, hose = hose_head; hose; hose = hose->next) {
320 sg_base = hose->sg_pci ? hose->sg_pci->dma_base : ~0;
321
322 /* Adjust hose mem_space limit to prevent PCI allocations
323 in the iommu windows. */
324 pci_mem_end = min((u32)__direct_map_base, sg_base) - 1;
325 end = hose->mem_space->start + pci_mem_end;
326 if (hose->mem_space->end > end)
327 hose->mem_space->end = end;
328
329 INIT_LIST_HEAD(&resources);
330 pci_add_resource_offset(&resources, hose->io_space,
331 hose->io_space->start);
332 pci_add_resource_offset(&resources, hose->mem_space,
333 hose->mem_space->start);
334
335 bus = pci_scan_root_bus(NULL, next_busno, alpha_mv.pci_ops,
336 hose, &resources);
337 hose->bus = bus;
338 hose->need_domain_info = need_domain_info;
339 next_busno = bus->busn_res.end + 1;
340 /* Don't allow 8-bit bus number overflow inside the hose -
341 reserve some space for bridges. */
342 if (next_busno > 224) {
343 next_busno = 0;
344 need_domain_info = 1;
345 }
346 }
347
348 pcibios_claim_console_setup();
349
350 pci_assign_unassigned_resources();
351 pci_fixup_irqs(alpha_mv.pci_swizzle, alpha_mv.pci_map_irq);
352 }
353
354
355 struct pci_controller * __init
alloc_pci_controller(void)356 alloc_pci_controller(void)
357 {
358 struct pci_controller *hose;
359
360 hose = alloc_bootmem(sizeof(*hose));
361
362 *hose_tail = hose;
363 hose_tail = &hose->next;
364
365 return hose;
366 }
367
368 struct resource * __init
alloc_resource(void)369 alloc_resource(void)
370 {
371 struct resource *res;
372
373 res = alloc_bootmem(sizeof(*res));
374
375 return res;
376 }
377
378
379 /* Provide information on locations of various I/O regions in physical
380 memory. Do this on a per-card basis so that we choose the right hose. */
381
382 asmlinkage long
sys_pciconfig_iobase(long which,unsigned long bus,unsigned long dfn)383 sys_pciconfig_iobase(long which, unsigned long bus, unsigned long dfn)
384 {
385 struct pci_controller *hose;
386 struct pci_dev *dev;
387
388 /* from hose or from bus.devfn */
389 if (which & IOBASE_FROM_HOSE) {
390 for(hose = hose_head; hose; hose = hose->next)
391 if (hose->index == bus) break;
392 if (!hose) return -ENODEV;
393 } else {
394 /* Special hook for ISA access. */
395 if (bus == 0 && dfn == 0) {
396 hose = pci_isa_hose;
397 } else {
398 dev = pci_get_bus_and_slot(bus, dfn);
399 if (!dev)
400 return -ENODEV;
401 hose = dev->sysdata;
402 pci_dev_put(dev);
403 }
404 }
405
406 switch (which & ~IOBASE_FROM_HOSE) {
407 case IOBASE_HOSE:
408 return hose->index;
409 case IOBASE_SPARSE_MEM:
410 return hose->sparse_mem_base;
411 case IOBASE_DENSE_MEM:
412 return hose->dense_mem_base;
413 case IOBASE_SPARSE_IO:
414 return hose->sparse_io_base;
415 case IOBASE_DENSE_IO:
416 return hose->dense_io_base;
417 case IOBASE_ROOT_BUS:
418 return hose->bus->number;
419 }
420
421 return -EOPNOTSUPP;
422 }
423
424 /* Destroy an __iomem token. Not copied from lib/iomap.c. */
425
pci_iounmap(struct pci_dev * dev,void __iomem * addr)426 void pci_iounmap(struct pci_dev *dev, void __iomem * addr)
427 {
428 if (__is_mmio(addr))
429 iounmap(addr);
430 }
431
432 EXPORT_SYMBOL(pci_iounmap);
433
434 /* FIXME: Some boxes have multiple ISA bridges! */
435 struct pci_dev *isa_bridge;
436 EXPORT_SYMBOL(isa_bridge);
437