2 * pci.c - Low-Level PCI Access in IA-64
4 * Derived from bios32.c of i386 tree.
6 * (c) Copyright 2002, 2005 Hewlett-Packard Development Company, L.P.
7 * David Mosberger-Tang <davidm@hpl.hp.com>
8 * Bjorn Helgaas <bjorn.helgaas@hp.com>
9 * Copyright (C) 2004 Silicon Graphics, Inc.
11 * Note: Above list of copyright holders is incomplete...
14 #include <linux/acpi.h>
15 #include <linux/types.h>
16 #include <linux/kernel.h>
17 #include <linux/pci.h>
18 #include <linux/init.h>
19 #include <linux/ioport.h>
20 #include <linux/slab.h>
21 #include <linux/spinlock.h>
22 #include <linux/bootmem.h>
24 #include <asm/machvec.h>
26 #include <asm/system.h>
31 #include <asm/hw_irq.h>
34 * Low-level SAL-based PCI configuration access functions. Note that SAL
35 * calls are already serialized (via sal_lock), so we don't need another
36 * synchronization mechanism here.
39 #define PCI_SAL_ADDRESS(seg, bus, devfn, reg) \
40 (((u64) seg << 24) | (bus << 16) | (devfn << 8) | (reg))
42 /* SAL 3.2 adds support for extended config space. */
44 #define PCI_SAL_EXT_ADDRESS(seg, bus, devfn, reg) \
45 (((u64) seg << 28) | (bus << 20) | (devfn << 12) | (reg))
47 int raw_pci_read(unsigned int seg
, unsigned int bus
, unsigned int devfn
,
48 int reg
, int len
, u32
*value
)
53 if (!value
|| (seg
> 65535) || (bus
> 255) || (devfn
> 255) || (reg
> 4095))
56 if ((seg
| reg
) <= 255) {
57 addr
= PCI_SAL_ADDRESS(seg
, bus
, devfn
, reg
);
59 } else if (sal_revision
>= SAL_VERSION_CODE(3,2)) {
60 addr
= PCI_SAL_EXT_ADDRESS(seg
, bus
, devfn
, reg
);
66 result
= ia64_sal_pci_config_read(addr
, mode
, len
, &data
);
74 int raw_pci_write(unsigned int seg
, unsigned int bus
, unsigned int devfn
,
75 int reg
, int len
, u32 value
)
80 if ((seg
> 65535) || (bus
> 255) || (devfn
> 255) || (reg
> 4095))
83 if ((seg
| reg
) <= 255) {
84 addr
= PCI_SAL_ADDRESS(seg
, bus
, devfn
, reg
);
86 } else if (sal_revision
>= SAL_VERSION_CODE(3,2)) {
87 addr
= PCI_SAL_EXT_ADDRESS(seg
, bus
, devfn
, reg
);
92 result
= ia64_sal_pci_config_write(addr
, mode
, len
, value
);
98 static int pci_read(struct pci_bus
*bus
, unsigned int devfn
, int where
,
101 return raw_pci_read(pci_domain_nr(bus
), bus
->number
,
102 devfn
, where
, size
, value
);
105 static int pci_write(struct pci_bus
*bus
, unsigned int devfn
, int where
,
108 return raw_pci_write(pci_domain_nr(bus
), bus
->number
,
109 devfn
, where
, size
, value
);
112 struct pci_ops pci_root_ops
= {
117 /* Called by ACPI when it finds a new root bus. */
119 static struct pci_controller
* __devinit
120 alloc_pci_controller (int seg
)
122 struct pci_controller
*controller
;
124 controller
= kzalloc(sizeof(*controller
), GFP_KERNEL
);
128 controller
->segment
= seg
;
129 controller
->node
= -1;
133 struct pci_root_info
{
134 struct acpi_device
*bridge
;
135 struct pci_controller
*controller
;
140 new_space (u64 phys_base
, int sparse
)
146 return 0; /* legacy I/O port space */
148 mmio_base
= (u64
) ioremap(phys_base
, 0);
149 for (i
= 0; i
< num_io_spaces
; i
++)
150 if (io_space
[i
].mmio_base
== mmio_base
&&
151 io_space
[i
].sparse
== sparse
)
154 if (num_io_spaces
== MAX_IO_SPACES
) {
155 printk(KERN_ERR
"PCI: Too many IO port spaces "
156 "(MAX_IO_SPACES=%lu)\n", MAX_IO_SPACES
);
161 io_space
[i
].mmio_base
= mmio_base
;
162 io_space
[i
].sparse
= sparse
;
168 add_io_space (struct pci_root_info
*info
, struct acpi_resource_address64
*addr
)
170 struct resource
*resource
;
172 unsigned long base
, min
, max
, base_port
;
173 unsigned int sparse
= 0, space_nr
, len
;
175 resource
= kzalloc(sizeof(*resource
), GFP_KERNEL
);
177 printk(KERN_ERR
"PCI: No memory for %s I/O port space\n",
182 len
= strlen(info
->name
) + 32;
183 name
= kzalloc(len
, GFP_KERNEL
);
185 printk(KERN_ERR
"PCI: No memory for %s I/O port space name\n",
191 max
= min
+ addr
->address_length
- 1;
192 if (addr
->info
.io
.translation_type
== ACPI_SPARSE_TRANSLATION
)
195 space_nr
= new_space(addr
->translation_offset
, sparse
);
199 base
= __pa(io_space
[space_nr
].mmio_base
);
200 base_port
= IO_SPACE_BASE(space_nr
);
201 snprintf(name
, len
, "%s I/O Ports %08lx-%08lx", info
->name
,
202 base_port
+ min
, base_port
+ max
);
205 * The SDM guarantees the legacy 0-64K space is sparse, but if the
206 * mapping is done by the processor (not the bridge), ACPI may not
212 resource
->name
= name
;
213 resource
->flags
= IORESOURCE_MEM
;
214 resource
->start
= base
+ (sparse
? IO_SPACE_SPARSE_ENCODING(min
) : min
);
215 resource
->end
= base
+ (sparse
? IO_SPACE_SPARSE_ENCODING(max
) : max
);
216 insert_resource(&iomem_resource
, resource
);
228 static acpi_status __devinit
resource_to_window(struct acpi_resource
*resource
,
229 struct acpi_resource_address64
*addr
)
234 * We're only interested in _CRS descriptors that are
235 * - address space descriptors for memory or I/O space
237 * - producers, i.e., the address space is routed downstream,
238 * not consumed by the bridge itself
240 status
= acpi_resource_to_address64(resource
, addr
);
241 if (ACPI_SUCCESS(status
) &&
242 (addr
->resource_type
== ACPI_MEMORY_RANGE
||
243 addr
->resource_type
== ACPI_IO_RANGE
) &&
244 addr
->address_length
&&
245 addr
->producer_consumer
== ACPI_PRODUCER
)
251 static acpi_status __devinit
252 count_window (struct acpi_resource
*resource
, void *data
)
254 unsigned int *windows
= (unsigned int *) data
;
255 struct acpi_resource_address64 addr
;
258 status
= resource_to_window(resource
, &addr
);
259 if (ACPI_SUCCESS(status
))
265 static __devinit acpi_status
add_window(struct acpi_resource
*res
, void *data
)
267 struct pci_root_info
*info
= data
;
268 struct pci_window
*window
;
269 struct acpi_resource_address64 addr
;
271 unsigned long flags
, offset
= 0;
272 struct resource
*root
;
274 /* Return AE_OK for non-window resources to keep scanning for more */
275 status
= resource_to_window(res
, &addr
);
276 if (!ACPI_SUCCESS(status
))
279 if (addr
.resource_type
== ACPI_MEMORY_RANGE
) {
280 flags
= IORESOURCE_MEM
;
281 root
= &iomem_resource
;
282 offset
= addr
.translation_offset
;
283 } else if (addr
.resource_type
== ACPI_IO_RANGE
) {
284 flags
= IORESOURCE_IO
;
285 root
= &ioport_resource
;
286 offset
= add_io_space(info
, &addr
);
292 window
= &info
->controller
->window
[info
->controller
->windows
++];
293 window
->resource
.name
= info
->name
;
294 window
->resource
.flags
= flags
;
295 window
->resource
.start
= addr
.minimum
+ offset
;
296 window
->resource
.end
= window
->resource
.start
+ addr
.address_length
- 1;
297 window
->resource
.child
= NULL
;
298 window
->offset
= offset
;
300 if (insert_resource(root
, &window
->resource
)) {
301 dev_err(&info
->bridge
->dev
,
302 "can't allocate host bridge window %pR\n",
306 dev_info(&info
->bridge
->dev
, "host bridge window %pR "
307 "(PCI address [%#llx-%#llx])\n",
309 window
->resource
.start
- offset
,
310 window
->resource
.end
- offset
);
312 dev_info(&info
->bridge
->dev
,
313 "host bridge window %pR\n",
320 static void __devinit
321 pcibios_setup_root_windows(struct pci_bus
*bus
, struct pci_controller
*ctrl
)
326 for (i
= 0; i
< ctrl
->windows
; i
++) {
327 struct resource
*res
= &ctrl
->window
[i
].resource
;
328 /* HP's firmware has a hack to work around a Windows bug.
329 * Ignore these tiny memory ranges */
330 if ((res
->flags
& IORESOURCE_MEM
) &&
331 (res
->end
- res
->start
< 16))
333 if (j
>= PCI_BUS_NUM_RESOURCES
) {
335 "ignoring host bridge window %pR (no space)\n",
339 bus
->resource
[j
++] = res
;
343 struct pci_bus
* __devinit
344 pci_acpi_scan_root(struct acpi_device
*device
, int domain
, int bus
)
346 struct pci_controller
*controller
;
347 unsigned int windows
= 0;
348 struct pci_bus
*pbus
;
352 controller
= alloc_pci_controller(domain
);
356 controller
->acpi_handle
= device
->handle
;
358 pxm
= acpi_get_pxm(controller
->acpi_handle
);
361 controller
->node
= pxm_to_node(pxm
);
364 acpi_walk_resources(device
->handle
, METHOD_NAME__CRS
, count_window
,
367 struct pci_root_info info
;
370 kmalloc_node(sizeof(*controller
->window
) * windows
,
371 GFP_KERNEL
, controller
->node
);
372 if (!controller
->window
)
375 name
= kmalloc(16, GFP_KERNEL
);
379 sprintf(name
, "PCI Bus %04x:%02x", domain
, bus
);
380 info
.bridge
= device
;
381 info
.controller
= controller
;
383 acpi_walk_resources(device
->handle
, METHOD_NAME__CRS
,
387 * See arch/x86/pci/acpi.c.
388 * The desired pci bus might already be scanned in a quirk. We
389 * should handle the case here, but it appears that IA64 hasn't
390 * such quirk. So we just ignore the case now.
392 pbus
= pci_scan_bus_parented(NULL
, bus
, &pci_root_ops
, controller
);
397 kfree(controller
->window
);
404 void pcibios_resource_to_bus(struct pci_dev
*dev
,
405 struct pci_bus_region
*region
, struct resource
*res
)
407 struct pci_controller
*controller
= PCI_CONTROLLER(dev
);
408 unsigned long offset
= 0;
411 for (i
= 0; i
< controller
->windows
; i
++) {
412 struct pci_window
*window
= &controller
->window
[i
];
413 if (!(window
->resource
.flags
& res
->flags
))
415 if (window
->resource
.start
> res
->start
)
417 if (window
->resource
.end
< res
->end
)
419 offset
= window
->offset
;
423 region
->start
= res
->start
- offset
;
424 region
->end
= res
->end
- offset
;
426 EXPORT_SYMBOL(pcibios_resource_to_bus
);
428 void pcibios_bus_to_resource(struct pci_dev
*dev
,
429 struct resource
*res
, struct pci_bus_region
*region
)
431 struct pci_controller
*controller
= PCI_CONTROLLER(dev
);
432 unsigned long offset
= 0;
435 for (i
= 0; i
< controller
->windows
; i
++) {
436 struct pci_window
*window
= &controller
->window
[i
];
437 if (!(window
->resource
.flags
& res
->flags
))
439 if (window
->resource
.start
- window
->offset
> region
->start
)
441 if (window
->resource
.end
- window
->offset
< region
->end
)
443 offset
= window
->offset
;
447 res
->start
= region
->start
+ offset
;
448 res
->end
= region
->end
+ offset
;
450 EXPORT_SYMBOL(pcibios_bus_to_resource
);
452 static int __devinit
is_valid_resource(struct pci_dev
*dev
, int idx
)
454 unsigned int i
, type_mask
= IORESOURCE_IO
| IORESOURCE_MEM
;
455 struct resource
*devr
= &dev
->resource
[idx
], *busr
;
460 pci_bus_for_each_resource(dev
->bus
, busr
, i
) {
461 if (!busr
|| ((busr
->flags
^ devr
->flags
) & type_mask
))
463 if ((devr
->start
) && (devr
->start
>= busr
->start
) &&
464 (devr
->end
<= busr
->end
))
470 static void __devinit
471 pcibios_fixup_resources(struct pci_dev
*dev
, int start
, int limit
)
473 struct pci_bus_region region
;
476 for (i
= start
; i
< limit
; i
++) {
477 if (!dev
->resource
[i
].flags
)
479 region
.start
= dev
->resource
[i
].start
;
480 region
.end
= dev
->resource
[i
].end
;
481 pcibios_bus_to_resource(dev
, &dev
->resource
[i
], ®ion
);
482 if ((is_valid_resource(dev
, i
)))
483 pci_claim_resource(dev
, i
);
487 void __devinit
pcibios_fixup_device_resources(struct pci_dev
*dev
)
489 pcibios_fixup_resources(dev
, 0, PCI_BRIDGE_RESOURCES
);
491 EXPORT_SYMBOL_GPL(pcibios_fixup_device_resources
);
493 static void __devinit
pcibios_fixup_bridge_resources(struct pci_dev
*dev
)
495 pcibios_fixup_resources(dev
, PCI_BRIDGE_RESOURCES
, PCI_NUM_RESOURCES
);
499 * Called after each bus is probed, but before its children are examined.
502 pcibios_fixup_bus (struct pci_bus
*b
)
507 pci_read_bridge_bases(b
);
508 pcibios_fixup_bridge_resources(b
->self
);
510 pcibios_setup_root_windows(b
, b
->sysdata
);
512 list_for_each_entry(dev
, &b
->devices
, bus_list
)
513 pcibios_fixup_device_resources(dev
);
514 platform_pci_fixup_bus(b
);
520 pcibios_update_irq (struct pci_dev
*dev
, int irq
)
522 pci_write_config_byte(dev
, PCI_INTERRUPT_LINE
, irq
);
524 /* ??? FIXME -- record old value for shutdown. */
528 pcibios_enable_device (struct pci_dev
*dev
, int mask
)
532 ret
= pci_enable_resources(dev
, mask
);
536 if (!dev
->msi_enabled
)
537 return acpi_pci_irq_enable(dev
);
542 pcibios_disable_device (struct pci_dev
*dev
)
544 BUG_ON(atomic_read(&dev
->enable_cnt
));
545 if (!dev
->msi_enabled
)
546 acpi_pci_irq_disable(dev
);
550 pcibios_align_resource (void *data
, const struct resource
*res
,
551 resource_size_t size
, resource_size_t align
)
557 * PCI BIOS setup, always defaults to SAL interface
560 pcibios_setup (char *str
)
566 pci_mmap_page_range (struct pci_dev
*dev
, struct vm_area_struct
*vma
,
567 enum pci_mmap_state mmap_state
, int write_combine
)
569 unsigned long size
= vma
->vm_end
- vma
->vm_start
;
573 * I/O space cannot be accessed via normal processor loads and
574 * stores on this platform.
576 if (mmap_state
== pci_mmap_io
)
578 * XXX we could relax this for I/O spaces for which ACPI
579 * indicates that the space is 1-to-1 mapped. But at the
580 * moment, we don't support multiple PCI address spaces and
581 * the legacy I/O space is not 1-to-1 mapped, so this is moot.
585 if (!valid_mmap_phys_addr_range(vma
->vm_pgoff
, size
))
588 prot
= phys_mem_access_prot(NULL
, vma
->vm_pgoff
, size
,
592 * If the user requested WC, the kernel uses UC or WC for this region,
593 * and the chipset supports WC, we can use WC. Otherwise, we have to
594 * use the same attribute the kernel uses.
597 ((pgprot_val(prot
) & _PAGE_MA_MASK
) == _PAGE_MA_UC
||
598 (pgprot_val(prot
) & _PAGE_MA_MASK
) == _PAGE_MA_WC
) &&
599 efi_range_is_wc(vma
->vm_start
, vma
->vm_end
- vma
->vm_start
))
600 vma
->vm_page_prot
= pgprot_writecombine(vma
->vm_page_prot
);
602 vma
->vm_page_prot
= prot
;
604 if (remap_pfn_range(vma
, vma
->vm_start
, vma
->vm_pgoff
,
605 vma
->vm_end
- vma
->vm_start
, vma
->vm_page_prot
))
612 * ia64_pci_get_legacy_mem - generic legacy mem routine
613 * @bus: bus to get legacy memory base address for
615 * Find the base of legacy memory for @bus. This is typically the first
616 * megabyte of bus address space for @bus or is simply 0 on platforms whose
617 * chipsets support legacy I/O and memory routing. Returns the base address
618 * or an error pointer if an error occurred.
620 * This is the ia64 generic version of this routine. Other platforms
621 * are free to override it with a machine vector.
623 char *ia64_pci_get_legacy_mem(struct pci_bus
*bus
)
625 return (char *)__IA64_UNCACHED_OFFSET
;
629 * pci_mmap_legacy_page_range - map legacy memory space to userland
630 * @bus: bus whose legacy space we're mapping
631 * @vma: vma passed in by mmap
633 * Map legacy memory space for this device back to userspace using a machine
634 * vector to get the base address.
637 pci_mmap_legacy_page_range(struct pci_bus
*bus
, struct vm_area_struct
*vma
,
638 enum pci_mmap_state mmap_state
)
640 unsigned long size
= vma
->vm_end
- vma
->vm_start
;
644 /* We only support mmap'ing of legacy memory space */
645 if (mmap_state
!= pci_mmap_mem
)
649 * Avoid attribute aliasing. See Documentation/ia64/aliasing.txt
652 if (!valid_mmap_phys_addr_range(vma
->vm_pgoff
, size
))
654 prot
= phys_mem_access_prot(NULL
, vma
->vm_pgoff
, size
,
657 addr
= pci_get_legacy_mem(bus
);
659 return PTR_ERR(addr
);
661 vma
->vm_pgoff
+= (unsigned long)addr
>> PAGE_SHIFT
;
662 vma
->vm_page_prot
= prot
;
664 if (remap_pfn_range(vma
, vma
->vm_start
, vma
->vm_pgoff
,
665 size
, vma
->vm_page_prot
))
672 * ia64_pci_legacy_read - read from legacy I/O space
674 * @port: legacy port value
675 * @val: caller allocated storage for returned value
676 * @size: number of bytes to read
678 * Simply reads @size bytes from @port and puts the result in @val.
680 * Again, this (and the write routine) are generic versions that can be
681 * overridden by the platform. This is necessary on platforms that don't
682 * support legacy I/O routing or that hard fail on legacy I/O timeouts.
684 int ia64_pci_legacy_read(struct pci_bus
*bus
, u16 port
, u32
*val
, u8 size
)
707 * ia64_pci_legacy_write - perform a legacy I/O write
709 * @port: port to write
710 * @val: value to write
711 * @size: number of bytes to write from @val
713 * Simply writes @size bytes of @val to @port.
715 int ia64_pci_legacy_write(struct pci_bus
*bus
, u16 port
, u32 val
, u8 size
)
738 * set_pci_cacheline_size - determine cacheline size for PCI devices
740 * We want to use the line-size of the outer-most cache. We assume
741 * that this line-size is the same for all CPUs.
743 * Code mostly taken from arch/ia64/kernel/palinfo.c:cache_info().
745 static void __init
set_pci_dfl_cacheline_size(void)
747 unsigned long levels
, unique_caches
;
749 pal_cache_config_info_t cci
;
751 status
= ia64_pal_cache_summary(&levels
, &unique_caches
);
753 printk(KERN_ERR
"%s: ia64_pal_cache_summary() failed "
754 "(status=%ld)\n", __func__
, status
);
758 status
= ia64_pal_cache_config_info(levels
- 1,
759 /* cache_type (data_or_unified)= */ 2, &cci
);
761 printk(KERN_ERR
"%s: ia64_pal_cache_config_info() failed "
762 "(status=%ld)\n", __func__
, status
);
765 pci_dfl_cache_line_size
= (1 << cci
.pcci_line_size
) / 4;
768 u64
ia64_dma_get_required_mask(struct device
*dev
)
770 u32 low_totalram
= ((max_pfn
- 1) << PAGE_SHIFT
);
771 u32 high_totalram
= ((max_pfn
- 1) >> (32 - PAGE_SHIFT
));
774 if (!high_totalram
) {
775 /* convert to mask just covering totalram */
776 low_totalram
= (1 << (fls(low_totalram
) - 1));
777 low_totalram
+= low_totalram
- 1;
780 high_totalram
= (1 << (fls(high_totalram
) - 1));
781 high_totalram
+= high_totalram
- 1;
782 mask
= (((u64
)high_totalram
) << 32) + 0xffffffff;
786 EXPORT_SYMBOL_GPL(ia64_dma_get_required_mask
);
788 u64
dma_get_required_mask(struct device
*dev
)
790 return platform_dma_get_required_mask(dev
);
792 EXPORT_SYMBOL_GPL(dma_get_required_mask
);
794 static int __init
pcibios_init(void)
796 set_pci_dfl_cacheline_size();
800 subsys_initcall(pcibios_init
);