2 * Xen PCI Frontend Stub - puts some "dummy" functions in to the Linux
3 * x86 PCI core to support the Xen PCI Frontend
5 * Author: Ryan Wilson <hap9@epoch.ncsc.mil>
7 #include <linux/module.h>
8 #include <linux/init.h>
10 #include <linux/acpi.h>
13 #include <asm/io_apic.h>
14 #include <asm/pci_x86.h>
16 #include <asm/xen/hypervisor.h>
18 #include <xen/features.h>
19 #include <xen/events.h>
20 #include <asm/xen/pci.h>
23 static int acpi_register_gsi_xen_hvm(struct device
*dev
, u32 gsi
,
24 int trigger
, int polarity
)
27 struct physdev_map_pirq map_irq
;
31 if (!xen_hvm_domain())
34 map_irq
.domid
= DOMID_SELF
;
35 map_irq
.type
= MAP_PIRQ_TYPE_GSI
;
39 rc
= HYPERVISOR_physdev_op(PHYSDEVOP_map_pirq
, &map_irq
);
41 printk(KERN_WARNING
"xen map irq failed %d\n", rc
);
45 if (trigger
== ACPI_EDGE_SENSITIVE
) {
50 name
= "ioapic-level";
53 irq
= xen_bind_pirq_gsi_to_irq(gsi
, map_irq
.pirq
, shareable
, name
);
55 printk(KERN_DEBUG
"xen: --> irq=%d, pirq=%d\n", irq
, map_irq
.pirq
);
61 #if defined(CONFIG_PCI_MSI)
62 #include <linux/msi.h>
63 #include <asm/msidef.h>
65 struct xen_pci_frontend_ops
*xen_pci_frontend
;
66 EXPORT_SYMBOL_GPL(xen_pci_frontend
);
68 #define XEN_PIRQ_MSI_DATA (MSI_DATA_TRIGGER_EDGE | \
69 MSI_DATA_LEVEL_ASSERT | (3 << 8) | MSI_DATA_VECTOR(0))
71 static void xen_msi_compose_msg(struct pci_dev
*pdev
, unsigned int pirq
,
74 /* We set vector == 0 to tell the hypervisor we don't care about it,
75 * but we want a pirq setup instead.
76 * We use the dest_id field to pass the pirq that we want. */
77 msg
->address_hi
= MSI_ADDR_BASE_HI
| MSI_ADDR_EXT_DEST_ID(pirq
);
80 MSI_ADDR_DEST_MODE_PHYSICAL
|
81 MSI_ADDR_REDIRECTION_CPU
|
82 MSI_ADDR_DEST_ID(pirq
);
84 msg
->data
= XEN_PIRQ_MSI_DATA
;
87 static int xen_hvm_setup_msi_irqs(struct pci_dev
*dev
, int nvec
, int type
)
90 struct msi_desc
*msidesc
;
93 list_for_each_entry(msidesc
, &dev
->msi_list
, list
) {
94 __read_msi_msg(msidesc
, &msg
);
95 pirq
= MSI_ADDR_EXT_DEST_ID(msg
.address_hi
) |
96 ((msg
.address_lo
>> MSI_ADDR_DEST_ID_SHIFT
) & 0xff);
97 if (msg
.data
!= XEN_PIRQ_MSI_DATA
||
98 xen_irq_from_pirq(pirq
) < 0) {
99 pirq
= xen_allocate_pirq_msi(dev
, msidesc
);
102 xen_msi_compose_msg(dev
, pirq
, &msg
);
103 __write_msi_msg(msidesc
, &msg
);
104 dev_dbg(&dev
->dev
, "xen: msi bound to pirq=%d\n", pirq
);
107 "xen: msi already bound to pirq=%d\n", pirq
);
109 irq
= xen_bind_pirq_msi_to_irq(dev
, msidesc
, pirq
, 0,
110 (type
== PCI_CAP_ID_MSIX
) ?
116 "xen: msi --> pirq=%d --> irq=%d\n", pirq
, irq
);
122 "Xen PCI frontend has not registered MSI/MSI-X support!\n");
127 * For MSI interrupts we have to use drivers/xen/event.s functions to
128 * allocate an irq_desc and setup the right */
131 static int xen_setup_msi_irqs(struct pci_dev
*dev
, int nvec
, int type
)
134 struct msi_desc
*msidesc
;
137 v
= kzalloc(sizeof(int) * max(1, nvec
), GFP_KERNEL
);
141 if (type
== PCI_CAP_ID_MSIX
)
142 ret
= xen_pci_frontend_enable_msix(dev
, v
, nvec
);
144 ret
= xen_pci_frontend_enable_msi(dev
, v
);
148 list_for_each_entry(msidesc
, &dev
->msi_list
, list
) {
149 irq
= xen_bind_pirq_msi_to_irq(dev
, msidesc
, v
[i
], 0,
150 (type
== PCI_CAP_ID_MSIX
) ?
162 dev_err(&dev
->dev
, "Xen PCI frontend has not registered MSI/MSI-X support!\n");
168 static void xen_teardown_msi_irqs(struct pci_dev
*dev
)
170 struct msi_desc
*msidesc
;
172 msidesc
= list_entry(dev
->msi_list
.next
, struct msi_desc
, list
);
173 if (msidesc
->msi_attrib
.is_msix
)
174 xen_pci_frontend_disable_msix(dev
);
176 xen_pci_frontend_disable_msi(dev
);
178 /* Free the IRQ's and the msidesc using the generic code. */
179 default_teardown_msi_irqs(dev
);
182 static void xen_teardown_msi_irq(unsigned int irq
)
184 xen_destroy_irq(irq
);
187 #ifdef CONFIG_XEN_DOM0
188 static int xen_initdom_setup_msi_irqs(struct pci_dev
*dev
, int nvec
, int type
)
191 struct msi_desc
*msidesc
;
193 list_for_each_entry(msidesc
, &dev
->msi_list
, list
) {
194 struct physdev_map_pirq map_irq
;
197 domid
= ret
= xen_find_device_domain_owner(dev
);
198 /* N.B. Casting int's -ENODEV to uint16_t results in 0xFFED,
199 * hence check ret value for < 0. */
203 memset(&map_irq
, 0, sizeof(map_irq
));
204 map_irq
.domid
= domid
;
205 map_irq
.type
= MAP_PIRQ_TYPE_MSI
;
208 map_irq
.bus
= dev
->bus
->number
;
209 map_irq
.devfn
= dev
->devfn
;
211 if (type
== PCI_CAP_ID_MSIX
) {
213 u32 table_offset
, bir
;
215 pos
= pci_find_capability(dev
, PCI_CAP_ID_MSIX
);
217 pci_read_config_dword(dev
, pos
+ PCI_MSIX_TABLE
,
219 bir
= (u8
)(table_offset
& PCI_MSIX_FLAGS_BIRMASK
);
221 map_irq
.table_base
= pci_resource_start(dev
, bir
);
222 map_irq
.entry_nr
= msidesc
->msi_attrib
.entry_nr
;
225 ret
= HYPERVISOR_physdev_op(PHYSDEVOP_map_pirq
, &map_irq
);
227 dev_warn(&dev
->dev
, "xen map irq failed %d for %d domain\n",
232 ret
= xen_bind_pirq_msi_to_irq(dev
, msidesc
,
233 map_irq
.pirq
, map_irq
.index
,
234 (type
== PCI_CAP_ID_MSIX
) ?
247 static int xen_pcifront_enable_irq(struct pci_dev
*dev
)
254 rc
= pci_read_config_byte(dev
, PCI_INTERRUPT_LINE
, &gsi
);
256 dev_warn(&dev
->dev
, "Xen PCI: failed to read interrupt line: %d\n",
261 rc
= xen_allocate_pirq_gsi(gsi
);
263 dev_warn(&dev
->dev
, "Xen PCI: failed to allocate a PIRQ for GSI%d: %d\n",
269 if (gsi
< NR_IRQS_LEGACY
)
272 rc
= xen_bind_pirq_gsi_to_irq(gsi
, pirq
, share
, "pcifront");
274 dev_warn(&dev
->dev
, "Xen PCI: failed to bind GSI%d (PIRQ%d) to IRQ: %d\n",
280 dev_info(&dev
->dev
, "Xen PCI mapped GSI%d to IRQ%d\n", gsi
, dev
->irq
);
284 int __init
pci_xen_init(void)
286 if (!xen_pv_domain() || xen_initial_domain())
289 printk(KERN_INFO
"PCI: setting up Xen PCI frontend stub\n");
291 pcibios_set_cache_line_size();
293 pcibios_enable_irq
= xen_pcifront_enable_irq
;
294 pcibios_disable_irq
= NULL
;
297 /* Keep ACPI out of the picture */
301 #ifdef CONFIG_PCI_MSI
302 x86_msi
.setup_msi_irqs
= xen_setup_msi_irqs
;
303 x86_msi
.teardown_msi_irq
= xen_teardown_msi_irq
;
304 x86_msi
.teardown_msi_irqs
= xen_teardown_msi_irqs
;
309 int __init
pci_xen_hvm_init(void)
311 if (!xen_feature(XENFEAT_hvm_pirqs
))
316 * We don't want to change the actual ACPI delivery model,
317 * just how GSIs get registered.
319 __acpi_register_gsi
= acpi_register_gsi_xen_hvm
;
322 #ifdef CONFIG_PCI_MSI
323 x86_msi
.setup_msi_irqs
= xen_hvm_setup_msi_irqs
;
324 x86_msi
.teardown_msi_irq
= xen_teardown_msi_irq
;
329 #ifdef CONFIG_XEN_DOM0
330 static int xen_register_pirq(u32 gsi
, int gsi_override
, int triggering
)
332 int rc
, pirq
, irq
= -1;
333 struct physdev_map_pirq map_irq
;
337 if (!xen_pv_domain())
340 if (triggering
== ACPI_EDGE_SENSITIVE
) {
342 name
= "ioapic-edge";
345 name
= "ioapic-level";
347 pirq
= xen_allocate_pirq_gsi(gsi
);
351 if (gsi_override
>= 0)
352 irq
= xen_bind_pirq_gsi_to_irq(gsi_override
, pirq
, shareable
, name
);
354 irq
= xen_bind_pirq_gsi_to_irq(gsi
, pirq
, shareable
, name
);
358 printk(KERN_DEBUG
"xen: --> pirq=%d -> irq=%d (gsi=%d)\n", pirq
, irq
, gsi
);
360 map_irq
.domid
= DOMID_SELF
;
361 map_irq
.type
= MAP_PIRQ_TYPE_GSI
;
365 rc
= HYPERVISOR_physdev_op(PHYSDEVOP_map_pirq
, &map_irq
);
367 printk(KERN_WARNING
"xen map irq failed %d\n", rc
);
375 static int xen_register_gsi(u32 gsi
, int gsi_override
, int triggering
, int polarity
)
378 struct physdev_setup_gsi setup_gsi
;
380 if (!xen_pv_domain())
383 printk(KERN_DEBUG
"xen: registering gsi %u triggering %d polarity %d\n",
384 gsi
, triggering
, polarity
);
386 irq
= xen_register_pirq(gsi
, gsi_override
, triggering
);
389 setup_gsi
.triggering
= (triggering
== ACPI_EDGE_SENSITIVE
? 0 : 1);
390 setup_gsi
.polarity
= (polarity
== ACPI_ACTIVE_HIGH
? 0 : 1);
392 rc
= HYPERVISOR_physdev_op(PHYSDEVOP_setup_gsi
, &setup_gsi
);
394 printk(KERN_INFO
"Already setup the GSI :%d\n", gsi
);
396 printk(KERN_ERR
"Failed to setup GSI :%d, err_code:%d\n",
403 static __init
void xen_setup_acpi_sci(void)
406 int trigger
, polarity
;
407 int gsi
= acpi_sci_override_gsi
;
409 int gsi_override
= -1;
414 rc
= acpi_get_override_irq(gsi
, &trigger
, &polarity
);
416 printk(KERN_WARNING
"xen: acpi_get_override_irq failed for acpi"
417 " sci, rc=%d\n", rc
);
420 trigger
= trigger
? ACPI_LEVEL_SENSITIVE
: ACPI_EDGE_SENSITIVE
;
421 polarity
= polarity
? ACPI_ACTIVE_LOW
: ACPI_ACTIVE_HIGH
;
423 printk(KERN_INFO
"xen: sci override: global_irq=%d trigger=%d "
424 "polarity=%d\n", gsi
, trigger
, polarity
);
426 /* Before we bind the GSI to a Linux IRQ, check whether
427 * we need to override it with bus_irq (IRQ) value. Usually for
428 * IRQs below IRQ_LEGACY_IRQ this holds IRQ == GSI, as so:
429 * ACPI: INT_SRC_OVR (bus 0 bus_irq 9 global_irq 9 low level)
430 * but there are oddballs where the IRQ != GSI:
431 * ACPI: INT_SRC_OVR (bus 0 bus_irq 9 global_irq 20 low level)
432 * which ends up being: gsi_to_irq[9] == 20
433 * (which is what acpi_gsi_to_irq ends up calling when starting the
434 * the ACPI interpreter and keels over since IRQ 9 has not been
435 * setup as we had setup IRQ 20 for it).
437 /* Check whether the GSI != IRQ */
438 if (acpi_gsi_to_irq(gsi
, &irq
) == 0) {
439 if (irq
>= 0 && irq
!= gsi
)
440 /* Bugger, we MUST have that IRQ. */
444 gsi
= xen_register_gsi(gsi
, gsi_override
, trigger
, polarity
);
445 printk(KERN_INFO
"xen: acpi sci %d\n", gsi
);
450 static int acpi_register_gsi_xen(struct device
*dev
, u32 gsi
,
451 int trigger
, int polarity
)
453 return xen_register_gsi(gsi
, -1 /* no GSI override */, trigger
, polarity
);
456 static int __init
pci_xen_initial_domain(void)
458 #ifdef CONFIG_PCI_MSI
459 x86_msi
.setup_msi_irqs
= xen_initdom_setup_msi_irqs
;
460 x86_msi
.teardown_msi_irq
= xen_teardown_msi_irq
;
462 xen_setup_acpi_sci();
463 __acpi_register_gsi
= acpi_register_gsi_xen
;
468 void __init
xen_setup_pirqs(void)
472 pci_xen_initial_domain();
474 if (0 == nr_ioapics
) {
475 for (irq
= 0; irq
< NR_IRQS_LEGACY
; irq
++) {
476 pirq
= xen_allocate_pirq_gsi(irq
);
478 "Could not allocate PIRQ for legacy interrupt\n"))
480 irq
= xen_bind_pirq_gsi_to_irq(irq
, pirq
, 0, "xt-pic");
485 /* Pre-allocate legacy irqs */
486 for (irq
= 0; irq
< NR_IRQS_LEGACY
; irq
++) {
487 int trigger
, polarity
;
489 if (acpi_get_override_irq(irq
, &trigger
, &polarity
) == -1)
492 xen_register_pirq(irq
, -1 /* no GSI override */,
493 trigger
? ACPI_LEVEL_SENSITIVE
: ACPI_EDGE_SENSITIVE
);
498 #ifdef CONFIG_XEN_DOM0
499 struct xen_device_domain_owner
{
502 struct list_head list
;
505 static DEFINE_SPINLOCK(dev_domain_list_spinlock
);
506 static struct list_head dev_domain_list
= LIST_HEAD_INIT(dev_domain_list
);
508 static struct xen_device_domain_owner
*find_device(struct pci_dev
*dev
)
510 struct xen_device_domain_owner
*owner
;
512 list_for_each_entry(owner
, &dev_domain_list
, list
) {
513 if (owner
->dev
== dev
)
519 int xen_find_device_domain_owner(struct pci_dev
*dev
)
521 struct xen_device_domain_owner
*owner
;
522 int domain
= -ENODEV
;
524 spin_lock(&dev_domain_list_spinlock
);
525 owner
= find_device(dev
);
527 domain
= owner
->domain
;
528 spin_unlock(&dev_domain_list_spinlock
);
531 EXPORT_SYMBOL_GPL(xen_find_device_domain_owner
);
533 int xen_register_device_domain_owner(struct pci_dev
*dev
, uint16_t domain
)
535 struct xen_device_domain_owner
*owner
;
537 owner
= kzalloc(sizeof(struct xen_device_domain_owner
), GFP_KERNEL
);
541 spin_lock(&dev_domain_list_spinlock
);
542 if (find_device(dev
)) {
543 spin_unlock(&dev_domain_list_spinlock
);
547 owner
->domain
= domain
;
549 list_add_tail(&owner
->list
, &dev_domain_list
);
550 spin_unlock(&dev_domain_list_spinlock
);
553 EXPORT_SYMBOL_GPL(xen_register_device_domain_owner
);
555 int xen_unregister_device_domain_owner(struct pci_dev
*dev
)
557 struct xen_device_domain_owner
*owner
;
559 spin_lock(&dev_domain_list_spinlock
);
560 owner
= find_device(dev
);
562 spin_unlock(&dev_domain_list_spinlock
);
565 list_del(&owner
->list
);
566 spin_unlock(&dev_domain_list_spinlock
);
570 EXPORT_SYMBOL_GPL(xen_unregister_device_domain_owner
);