1 /*
2 * PCI Stub Driver - Grabs devices in backend to be exported later
3 *
4 * Ryan Wilson <hap9@epoch.ncsc.mil>
5 * Chris Bookholt <hap10@epoch.ncsc.mil>
6 */
7
8 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
9
10 #include <linux/module.h>
11 #include <linux/init.h>
12 #include <linux/rwsem.h>
13 #include <linux/list.h>
14 #include <linux/spinlock.h>
15 #include <linux/kref.h>
16 #include <linux/pci.h>
17 #include <linux/wait.h>
18 #include <linux/sched.h>
19 #include <linux/atomic.h>
20 #include <xen/events.h>
21 #include <asm/xen/pci.h>
22 #include <asm/xen/hypervisor.h>
23 #include <xen/interface/physdev.h>
24 #include "pciback.h"
25 #include "conf_space.h"
26 #include "conf_space_quirks.h"
27
28 #define PCISTUB_DRIVER_NAME "pciback"
29
30 static char *pci_devs_to_hide;
31 wait_queue_head_t xen_pcibk_aer_wait_queue;
32 /*Add sem for sync AER handling and xen_pcibk remove/reconfigue ops,
33 * We want to avoid in middle of AER ops, xen_pcibk devices is being removed
34 */
35 static DECLARE_RWSEM(pcistub_sem);
36 module_param_named(hide, pci_devs_to_hide, charp, 0444);
37
38 struct pcistub_device_id {
39 struct list_head slot_list;
40 int domain;
41 unsigned char bus;
42 unsigned int devfn;
43 };
44 static LIST_HEAD(pcistub_device_ids);
45 static DEFINE_SPINLOCK(device_ids_lock);
46
47 struct pcistub_device {
48 struct kref kref;
49 struct list_head dev_list;
50 spinlock_t lock;
51
52 struct pci_dev *dev;
53 struct xen_pcibk_device *pdev;/* non-NULL if struct pci_dev is in use */
54 };
55
56 /* Access to pcistub_devices & seized_devices lists and the initialize_devices
57 * flag must be locked with pcistub_devices_lock
58 */
59 static DEFINE_SPINLOCK(pcistub_devices_lock);
60 static LIST_HEAD(pcistub_devices);
61
62 /* wait for device_initcall before initializing our devices
63 * (see pcistub_init_devices_late)
64 */
65 static int initialize_devices;
66 static LIST_HEAD(seized_devices);
67
pcistub_device_alloc(struct pci_dev * dev)68 static struct pcistub_device *pcistub_device_alloc(struct pci_dev *dev)
69 {
70 struct pcistub_device *psdev;
71
72 dev_dbg(&dev->dev, "pcistub_device_alloc\n");
73
74 psdev = kzalloc(sizeof(*psdev), GFP_KERNEL);
75 if (!psdev)
76 return NULL;
77
78 psdev->dev = pci_dev_get(dev);
79 if (!psdev->dev) {
80 kfree(psdev);
81 return NULL;
82 }
83
84 kref_init(&psdev->kref);
85 spin_lock_init(&psdev->lock);
86
87 return psdev;
88 }
89
90 /* Don't call this directly as it's called by pcistub_device_put */
pcistub_device_release(struct kref * kref)91 static void pcistub_device_release(struct kref *kref)
92 {
93 struct pcistub_device *psdev;
94 struct pci_dev *dev;
95 struct xen_pcibk_dev_data *dev_data;
96
97 psdev = container_of(kref, struct pcistub_device, kref);
98 dev = psdev->dev;
99 dev_data = pci_get_drvdata(dev);
100
101 dev_dbg(&dev->dev, "pcistub_device_release\n");
102
103 xen_unregister_device_domain_owner(dev);
104
105 /* Call the reset function which does not take lock as this
106 * is called from "unbind" which takes a device_lock mutex.
107 */
108 __pci_reset_function_locked(dev);
109 if (dev_data &&
110 pci_load_and_free_saved_state(dev, &dev_data->pci_saved_state))
111 dev_info(&dev->dev, "Could not reload PCI state\n");
112 else
113 pci_restore_state(dev);
114
115 if (dev->msix_cap) {
116 struct physdev_pci_device ppdev = {
117 .seg = pci_domain_nr(dev->bus),
118 .bus = dev->bus->number,
119 .devfn = dev->devfn
120 };
121 int err = HYPERVISOR_physdev_op(PHYSDEVOP_release_msix,
122 &ppdev);
123
124 if (err && err != -ENOSYS)
125 dev_warn(&dev->dev, "MSI-X release failed (%d)\n",
126 err);
127 }
128
129 /* Disable the device */
130 xen_pcibk_reset_device(dev);
131
132 kfree(dev_data);
133 pci_set_drvdata(dev, NULL);
134
135 /* Clean-up the device */
136 xen_pcibk_config_free_dyn_fields(dev);
137 xen_pcibk_config_free_dev(dev);
138
139 pci_clear_dev_assigned(dev);
140 pci_dev_put(dev);
141
142 kfree(psdev);
143 }
144
pcistub_device_get(struct pcistub_device * psdev)145 static inline void pcistub_device_get(struct pcistub_device *psdev)
146 {
147 kref_get(&psdev->kref);
148 }
149
pcistub_device_put(struct pcistub_device * psdev)150 static inline void pcistub_device_put(struct pcistub_device *psdev)
151 {
152 kref_put(&psdev->kref, pcistub_device_release);
153 }
154
pcistub_device_find_locked(int domain,int bus,int slot,int func)155 static struct pcistub_device *pcistub_device_find_locked(int domain, int bus,
156 int slot, int func)
157 {
158 struct pcistub_device *psdev;
159
160 list_for_each_entry(psdev, &pcistub_devices, dev_list) {
161 if (psdev->dev != NULL
162 && domain == pci_domain_nr(psdev->dev->bus)
163 && bus == psdev->dev->bus->number
164 && slot == PCI_SLOT(psdev->dev->devfn)
165 && func == PCI_FUNC(psdev->dev->devfn)) {
166 return psdev;
167 }
168 }
169
170 return NULL;
171 }
172
pcistub_device_find(int domain,int bus,int slot,int func)173 static struct pcistub_device *pcistub_device_find(int domain, int bus,
174 int slot, int func)
175 {
176 struct pcistub_device *psdev;
177 unsigned long flags;
178
179 spin_lock_irqsave(&pcistub_devices_lock, flags);
180
181 psdev = pcistub_device_find_locked(domain, bus, slot, func);
182 if (psdev)
183 pcistub_device_get(psdev);
184
185 spin_unlock_irqrestore(&pcistub_devices_lock, flags);
186 return psdev;
187 }
188
pcistub_device_get_pci_dev(struct xen_pcibk_device * pdev,struct pcistub_device * psdev)189 static struct pci_dev *pcistub_device_get_pci_dev(struct xen_pcibk_device *pdev,
190 struct pcistub_device *psdev)
191 {
192 struct pci_dev *pci_dev = NULL;
193 unsigned long flags;
194
195 pcistub_device_get(psdev);
196
197 spin_lock_irqsave(&psdev->lock, flags);
198 if (!psdev->pdev) {
199 psdev->pdev = pdev;
200 pci_dev = psdev->dev;
201 }
202 spin_unlock_irqrestore(&psdev->lock, flags);
203
204 if (!pci_dev)
205 pcistub_device_put(psdev);
206
207 return pci_dev;
208 }
209
pcistub_get_pci_dev_by_slot(struct xen_pcibk_device * pdev,int domain,int bus,int slot,int func)210 struct pci_dev *pcistub_get_pci_dev_by_slot(struct xen_pcibk_device *pdev,
211 int domain, int bus,
212 int slot, int func)
213 {
214 struct pcistub_device *psdev;
215 struct pci_dev *found_dev = NULL;
216 unsigned long flags;
217
218 spin_lock_irqsave(&pcistub_devices_lock, flags);
219
220 psdev = pcistub_device_find_locked(domain, bus, slot, func);
221 if (psdev)
222 found_dev = pcistub_device_get_pci_dev(pdev, psdev);
223
224 spin_unlock_irqrestore(&pcistub_devices_lock, flags);
225 return found_dev;
226 }
227
pcistub_get_pci_dev(struct xen_pcibk_device * pdev,struct pci_dev * dev)228 struct pci_dev *pcistub_get_pci_dev(struct xen_pcibk_device *pdev,
229 struct pci_dev *dev)
230 {
231 struct pcistub_device *psdev;
232 struct pci_dev *found_dev = NULL;
233 unsigned long flags;
234
235 spin_lock_irqsave(&pcistub_devices_lock, flags);
236
237 list_for_each_entry(psdev, &pcistub_devices, dev_list) {
238 if (psdev->dev == dev) {
239 found_dev = pcistub_device_get_pci_dev(pdev, psdev);
240 break;
241 }
242 }
243
244 spin_unlock_irqrestore(&pcistub_devices_lock, flags);
245 return found_dev;
246 }
247
248 /*
249 * Called when:
250 * - XenBus state has been reconfigure (pci unplug). See xen_pcibk_remove_device
251 * - XenBus state has been disconnected (guest shutdown). See xen_pcibk_xenbus_remove
252 * - 'echo BDF > unbind' on pciback module with no guest attached. See pcistub_remove
253 * - 'echo BDF > unbind' with a guest still using it. See pcistub_remove
254 *
255 * As such we have to be careful.
256 *
257 * To make this easier, the caller has to hold the device lock.
258 */
pcistub_put_pci_dev(struct pci_dev * dev)259 void pcistub_put_pci_dev(struct pci_dev *dev)
260 {
261 struct pcistub_device *psdev, *found_psdev = NULL;
262 unsigned long flags;
263 struct xen_pcibk_dev_data *dev_data;
264 int ret;
265
266 spin_lock_irqsave(&pcistub_devices_lock, flags);
267
268 list_for_each_entry(psdev, &pcistub_devices, dev_list) {
269 if (psdev->dev == dev) {
270 found_psdev = psdev;
271 break;
272 }
273 }
274
275 spin_unlock_irqrestore(&pcistub_devices_lock, flags);
276 if (WARN_ON(!found_psdev))
277 return;
278
279 /*hold this lock for avoiding breaking link between
280 * pcistub and xen_pcibk when AER is in processing
281 */
282 down_write(&pcistub_sem);
283 /* Cleanup our device
284 * (so it's ready for the next domain)
285 */
286 device_lock_assert(&dev->dev);
287 __pci_reset_function_locked(dev);
288
289 dev_data = pci_get_drvdata(dev);
290 ret = pci_load_saved_state(dev, dev_data->pci_saved_state);
291 if (!ret) {
292 /*
293 * The usual sequence is pci_save_state & pci_restore_state
294 * but the guest might have messed the configuration space up.
295 * Use the initial version (when device was bound to us).
296 */
297 pci_restore_state(dev);
298 } else
299 dev_info(&dev->dev, "Could not reload PCI state\n");
300 /* This disables the device. */
301 xen_pcibk_reset_device(dev);
302
303 /* And cleanup up our emulated fields. */
304 xen_pcibk_config_reset_dev(dev);
305 xen_pcibk_config_free_dyn_fields(dev);
306
307 xen_unregister_device_domain_owner(dev);
308
309 spin_lock_irqsave(&found_psdev->lock, flags);
310 found_psdev->pdev = NULL;
311 spin_unlock_irqrestore(&found_psdev->lock, flags);
312
313 pcistub_device_put(found_psdev);
314 up_write(&pcistub_sem);
315 }
316
pcistub_match_one(struct pci_dev * dev,struct pcistub_device_id * pdev_id)317 static int pcistub_match_one(struct pci_dev *dev,
318 struct pcistub_device_id *pdev_id)
319 {
320 /* Match the specified device by domain, bus, slot, func and also if
321 * any of the device's parent bridges match.
322 */
323 for (; dev != NULL; dev = dev->bus->self) {
324 if (pci_domain_nr(dev->bus) == pdev_id->domain
325 && dev->bus->number == pdev_id->bus
326 && dev->devfn == pdev_id->devfn)
327 return 1;
328
329 /* Sometimes topmost bridge links to itself. */
330 if (dev == dev->bus->self)
331 break;
332 }
333
334 return 0;
335 }
336
pcistub_match(struct pci_dev * dev)337 static int pcistub_match(struct pci_dev *dev)
338 {
339 struct pcistub_device_id *pdev_id;
340 unsigned long flags;
341 int found = 0;
342
343 spin_lock_irqsave(&device_ids_lock, flags);
344 list_for_each_entry(pdev_id, &pcistub_device_ids, slot_list) {
345 if (pcistub_match_one(dev, pdev_id)) {
346 found = 1;
347 break;
348 }
349 }
350 spin_unlock_irqrestore(&device_ids_lock, flags);
351
352 return found;
353 }
354
pcistub_init_device(struct pci_dev * dev)355 static int pcistub_init_device(struct pci_dev *dev)
356 {
357 struct xen_pcibk_dev_data *dev_data;
358 int err = 0;
359
360 dev_dbg(&dev->dev, "initializing...\n");
361
362 /* The PCI backend is not intended to be a module (or to work with
363 * removable PCI devices (yet). If it were, xen_pcibk_config_free()
364 * would need to be called somewhere to free the memory allocated
365 * here and then to call kfree(pci_get_drvdata(psdev->dev)).
366 */
367 dev_data = kzalloc(sizeof(*dev_data) + strlen(DRV_NAME "[]")
368 + strlen(pci_name(dev)) + 1, GFP_KERNEL);
369 if (!dev_data) {
370 err = -ENOMEM;
371 goto out;
372 }
373 pci_set_drvdata(dev, dev_data);
374
375 /*
376 * Setup name for fake IRQ handler. It will only be enabled
377 * once the device is turned on by the guest.
378 */
379 sprintf(dev_data->irq_name, DRV_NAME "[%s]", pci_name(dev));
380
381 dev_dbg(&dev->dev, "initializing config\n");
382
383 init_waitqueue_head(&xen_pcibk_aer_wait_queue);
384 err = xen_pcibk_config_init_dev(dev);
385 if (err)
386 goto out;
387
388 /* HACK: Force device (& ACPI) to determine what IRQ it's on - we
389 * must do this here because pcibios_enable_device may specify
390 * the pci device's true irq (and possibly its other resources)
391 * if they differ from what's in the configuration space.
392 * This makes the assumption that the device's resources won't
393 * change after this point (otherwise this code may break!)
394 */
395 dev_dbg(&dev->dev, "enabling device\n");
396 err = pci_enable_device(dev);
397 if (err)
398 goto config_release;
399
400 if (dev->msix_cap) {
401 struct physdev_pci_device ppdev = {
402 .seg = pci_domain_nr(dev->bus),
403 .bus = dev->bus->number,
404 .devfn = dev->devfn
405 };
406
407 err = HYPERVISOR_physdev_op(PHYSDEVOP_prepare_msix, &ppdev);
408 if (err && err != -ENOSYS)
409 dev_err(&dev->dev, "MSI-X preparation failed (%d)\n",
410 err);
411 }
412
413 /* We need the device active to save the state. */
414 dev_dbg(&dev->dev, "save state of device\n");
415 pci_save_state(dev);
416 dev_data->pci_saved_state = pci_store_saved_state(dev);
417 if (!dev_data->pci_saved_state)
418 dev_err(&dev->dev, "Could not store PCI conf saved state!\n");
419 else {
420 dev_dbg(&dev->dev, "resetting (FLR, D3, etc) the device\n");
421 __pci_reset_function_locked(dev);
422 pci_restore_state(dev);
423 }
424 /* Now disable the device (this also ensures some private device
425 * data is setup before we export)
426 */
427 dev_dbg(&dev->dev, "reset device\n");
428 xen_pcibk_reset_device(dev);
429
430 pci_set_dev_assigned(dev);
431 return 0;
432
433 config_release:
434 xen_pcibk_config_free_dev(dev);
435
436 out:
437 pci_set_drvdata(dev, NULL);
438 kfree(dev_data);
439 return err;
440 }
441
442 /*
443 * Because some initialization still happens on
444 * devices during fs_initcall, we need to defer
445 * full initialization of our devices until
446 * device_initcall.
447 */
pcistub_init_devices_late(void)448 static int __init pcistub_init_devices_late(void)
449 {
450 struct pcistub_device *psdev;
451 unsigned long flags;
452 int err = 0;
453
454 spin_lock_irqsave(&pcistub_devices_lock, flags);
455
456 while (!list_empty(&seized_devices)) {
457 psdev = container_of(seized_devices.next,
458 struct pcistub_device, dev_list);
459 list_del(&psdev->dev_list);
460
461 spin_unlock_irqrestore(&pcistub_devices_lock, flags);
462
463 err = pcistub_init_device(psdev->dev);
464 if (err) {
465 dev_err(&psdev->dev->dev,
466 "error %d initializing device\n", err);
467 kfree(psdev);
468 psdev = NULL;
469 }
470
471 spin_lock_irqsave(&pcistub_devices_lock, flags);
472
473 if (psdev)
474 list_add_tail(&psdev->dev_list, &pcistub_devices);
475 }
476
477 initialize_devices = 1;
478
479 spin_unlock_irqrestore(&pcistub_devices_lock, flags);
480
481 return 0;
482 }
483
pcistub_device_id_add_list(struct pcistub_device_id * new,int domain,int bus,unsigned int devfn)484 static void pcistub_device_id_add_list(struct pcistub_device_id *new,
485 int domain, int bus, unsigned int devfn)
486 {
487 struct pcistub_device_id *pci_dev_id;
488 unsigned long flags;
489 int found = 0;
490
491 spin_lock_irqsave(&device_ids_lock, flags);
492
493 list_for_each_entry(pci_dev_id, &pcistub_device_ids, slot_list) {
494 if (pci_dev_id->domain == domain && pci_dev_id->bus == bus &&
495 pci_dev_id->devfn == devfn) {
496 found = 1;
497 break;
498 }
499 }
500
501 if (!found) {
502 new->domain = domain;
503 new->bus = bus;
504 new->devfn = devfn;
505 list_add_tail(&new->slot_list, &pcistub_device_ids);
506 }
507
508 spin_unlock_irqrestore(&device_ids_lock, flags);
509
510 if (found)
511 kfree(new);
512 }
513
pcistub_seize(struct pci_dev * dev,struct pcistub_device_id * pci_dev_id)514 static int pcistub_seize(struct pci_dev *dev,
515 struct pcistub_device_id *pci_dev_id)
516 {
517 struct pcistub_device *psdev;
518 unsigned long flags;
519 int err = 0;
520
521 psdev = pcistub_device_alloc(dev);
522 if (!psdev) {
523 kfree(pci_dev_id);
524 return -ENOMEM;
525 }
526
527 spin_lock_irqsave(&pcistub_devices_lock, flags);
528
529 if (initialize_devices) {
530 spin_unlock_irqrestore(&pcistub_devices_lock, flags);
531
532 /* don't want irqs disabled when calling pcistub_init_device */
533 err = pcistub_init_device(psdev->dev);
534
535 spin_lock_irqsave(&pcistub_devices_lock, flags);
536
537 if (!err)
538 list_add(&psdev->dev_list, &pcistub_devices);
539 } else {
540 dev_dbg(&dev->dev, "deferring initialization\n");
541 list_add(&psdev->dev_list, &seized_devices);
542 }
543
544 spin_unlock_irqrestore(&pcistub_devices_lock, flags);
545
546 if (err) {
547 kfree(pci_dev_id);
548 pcistub_device_put(psdev);
549 } else if (pci_dev_id)
550 pcistub_device_id_add_list(pci_dev_id, pci_domain_nr(dev->bus),
551 dev->bus->number, dev->devfn);
552
553 return err;
554 }
555
556 /* Called when 'bind'. This means we must _NOT_ call pci_reset_function or
557 * other functions that take the sysfs lock. */
pcistub_probe(struct pci_dev * dev,const struct pci_device_id * id)558 static int pcistub_probe(struct pci_dev *dev, const struct pci_device_id *id)
559 {
560 int err = 0, match;
561 struct pcistub_device_id *pci_dev_id = NULL;
562
563 dev_dbg(&dev->dev, "probing...\n");
564
565 match = pcistub_match(dev);
566
567 if ((dev->driver_override &&
568 !strcmp(dev->driver_override, PCISTUB_DRIVER_NAME)) ||
569 match) {
570
571 if (dev->hdr_type != PCI_HEADER_TYPE_NORMAL
572 && dev->hdr_type != PCI_HEADER_TYPE_BRIDGE) {
573 dev_err(&dev->dev, "can't export pci devices that "
574 "don't have a normal (0) or bridge (1) "
575 "header type!\n");
576 err = -ENODEV;
577 goto out;
578 }
579
580 if (!match) {
581 pci_dev_id = kmalloc(sizeof(*pci_dev_id), GFP_KERNEL);
582 if (!pci_dev_id) {
583 err = -ENOMEM;
584 goto out;
585 }
586 }
587
588 dev_info(&dev->dev, "seizing device\n");
589 err = pcistub_seize(dev, pci_dev_id);
590 } else
591 /* Didn't find the device */
592 err = -ENODEV;
593
594 out:
595 return err;
596 }
597
598 /* Called when 'unbind'. This means we must _NOT_ call pci_reset_function or
599 * other functions that take the sysfs lock. */
pcistub_remove(struct pci_dev * dev)600 static void pcistub_remove(struct pci_dev *dev)
601 {
602 struct pcistub_device *psdev, *found_psdev = NULL;
603 unsigned long flags;
604
605 dev_dbg(&dev->dev, "removing\n");
606
607 spin_lock_irqsave(&pcistub_devices_lock, flags);
608
609 xen_pcibk_config_quirk_release(dev);
610
611 list_for_each_entry(psdev, &pcistub_devices, dev_list) {
612 if (psdev->dev == dev) {
613 found_psdev = psdev;
614 break;
615 }
616 }
617
618 spin_unlock_irqrestore(&pcistub_devices_lock, flags);
619
620 if (found_psdev) {
621 dev_dbg(&dev->dev, "found device to remove %s\n",
622 found_psdev->pdev ? "- in-use" : "");
623
624 if (found_psdev->pdev) {
625 int domid = xen_find_device_domain_owner(dev);
626
627 pr_warn("****** removing device %s while still in-use by domain %d! ******\n",
628 pci_name(found_psdev->dev), domid);
629 pr_warn("****** driver domain may still access this device's i/o resources!\n");
630 pr_warn("****** shutdown driver domain before binding device\n");
631 pr_warn("****** to other drivers or domains\n");
632
633 /* N.B. This ends up calling pcistub_put_pci_dev which ends up
634 * doing the FLR. */
635 xen_pcibk_release_pci_dev(found_psdev->pdev,
636 found_psdev->dev,
637 false /* caller holds the lock. */);
638 }
639
640 spin_lock_irqsave(&pcistub_devices_lock, flags);
641 list_del(&found_psdev->dev_list);
642 spin_unlock_irqrestore(&pcistub_devices_lock, flags);
643
644 /* the final put for releasing from the list */
645 pcistub_device_put(found_psdev);
646 }
647 }
648
649 static const struct pci_device_id pcistub_ids[] = {
650 {
651 .vendor = PCI_ANY_ID,
652 .device = PCI_ANY_ID,
653 .subvendor = PCI_ANY_ID,
654 .subdevice = PCI_ANY_ID,
655 },
656 {0,},
657 };
658
659 #define PCI_NODENAME_MAX 40
kill_domain_by_device(struct pcistub_device * psdev)660 static void kill_domain_by_device(struct pcistub_device *psdev)
661 {
662 struct xenbus_transaction xbt;
663 int err;
664 char nodename[PCI_NODENAME_MAX];
665
666 BUG_ON(!psdev);
667 snprintf(nodename, PCI_NODENAME_MAX, "/local/domain/0/backend/pci/%d/0",
668 psdev->pdev->xdev->otherend_id);
669
670 again:
671 err = xenbus_transaction_start(&xbt);
672 if (err) {
673 dev_err(&psdev->dev->dev,
674 "error %d when start xenbus transaction\n", err);
675 return;
676 }
677 /*PV AER handlers will set this flag*/
678 xenbus_printf(xbt, nodename, "aerState" , "aerfail");
679 err = xenbus_transaction_end(xbt, 0);
680 if (err) {
681 if (err == -EAGAIN)
682 goto again;
683 dev_err(&psdev->dev->dev,
684 "error %d when end xenbus transaction\n", err);
685 return;
686 }
687 }
688
689 /* For each aer recovery step error_detected, mmio_enabled, etc, front_end and
690 * backend need to have cooperation. In xen_pcibk, those steps will do similar
691 * jobs: send service request and waiting for front_end response.
692 */
common_process(struct pcistub_device * psdev,pci_channel_state_t state,int aer_cmd,pci_ers_result_t result)693 static pci_ers_result_t common_process(struct pcistub_device *psdev,
694 pci_channel_state_t state, int aer_cmd,
695 pci_ers_result_t result)
696 {
697 pci_ers_result_t res = result;
698 struct xen_pcie_aer_op *aer_op;
699 struct xen_pcibk_device *pdev = psdev->pdev;
700 struct xen_pci_sharedinfo *sh_info = pdev->sh_info;
701 int ret;
702
703 /*with PV AER drivers*/
704 aer_op = &(sh_info->aer_op);
705 aer_op->cmd = aer_cmd ;
706 /*useful for error_detected callback*/
707 aer_op->err = state;
708 /*pcifront_end BDF*/
709 ret = xen_pcibk_get_pcifront_dev(psdev->dev, psdev->pdev,
710 &aer_op->domain, &aer_op->bus, &aer_op->devfn);
711 if (!ret) {
712 dev_err(&psdev->dev->dev,
713 DRV_NAME ": failed to get pcifront device\n");
714 return PCI_ERS_RESULT_NONE;
715 }
716 wmb();
717
718 dev_dbg(&psdev->dev->dev,
719 DRV_NAME ": aer_op %x dom %x bus %x devfn %x\n",
720 aer_cmd, aer_op->domain, aer_op->bus, aer_op->devfn);
721 /*local flag to mark there's aer request, xen_pcibk callback will use
722 * this flag to judge whether we need to check pci-front give aer
723 * service ack signal
724 */
725 set_bit(_PCIB_op_pending, (unsigned long *)&pdev->flags);
726
727 /*It is possible that a pcifront conf_read_write ops request invokes
728 * the callback which cause the spurious execution of wake_up.
729 * Yet it is harmless and better than a spinlock here
730 */
731 set_bit(_XEN_PCIB_active,
732 (unsigned long *)&sh_info->flags);
733 wmb();
734 notify_remote_via_irq(pdev->evtchn_irq);
735
736 /* Enable IRQ to signal "request done". */
737 xen_pcibk_lateeoi(pdev, 0);
738
739 ret = wait_event_timeout(xen_pcibk_aer_wait_queue,
740 !(test_bit(_XEN_PCIB_active, (unsigned long *)
741 &sh_info->flags)), 300*HZ);
742
743 /* Enable IRQ for pcifront request if not already active. */
744 if (!test_bit(_PDEVF_op_active, &pdev->flags))
745 xen_pcibk_lateeoi(pdev, 0);
746
747 if (!ret) {
748 if (test_bit(_XEN_PCIB_active,
749 (unsigned long *)&sh_info->flags)) {
750 dev_err(&psdev->dev->dev,
751 "pcifront aer process not responding!\n");
752 clear_bit(_XEN_PCIB_active,
753 (unsigned long *)&sh_info->flags);
754 aer_op->err = PCI_ERS_RESULT_NONE;
755 return res;
756 }
757 }
758 clear_bit(_PCIB_op_pending, (unsigned long *)&pdev->flags);
759
760 res = (pci_ers_result_t)aer_op->err;
761 return res;
762 }
763
764 /*
765 * xen_pcibk_slot_reset: it will send the slot_reset request to pcifront in case
766 * of the device driver could provide this service, and then wait for pcifront
767 * ack.
768 * @dev: pointer to PCI devices
769 * return value is used by aer_core do_recovery policy
770 */
xen_pcibk_slot_reset(struct pci_dev * dev)771 static pci_ers_result_t xen_pcibk_slot_reset(struct pci_dev *dev)
772 {
773 struct pcistub_device *psdev;
774 pci_ers_result_t result;
775
776 result = PCI_ERS_RESULT_RECOVERED;
777 dev_dbg(&dev->dev, "xen_pcibk_slot_reset(bus:%x,devfn:%x)\n",
778 dev->bus->number, dev->devfn);
779
780 down_write(&pcistub_sem);
781 psdev = pcistub_device_find(pci_domain_nr(dev->bus),
782 dev->bus->number,
783 PCI_SLOT(dev->devfn),
784 PCI_FUNC(dev->devfn));
785
786 if (!psdev || !psdev->pdev) {
787 dev_err(&dev->dev,
788 DRV_NAME " device is not found/assigned\n");
789 goto end;
790 }
791
792 if (!psdev->pdev->sh_info) {
793 dev_err(&dev->dev, DRV_NAME " device is not connected or owned"
794 " by HVM, kill it\n");
795 kill_domain_by_device(psdev);
796 goto end;
797 }
798
799 if (!test_bit(_XEN_PCIB_AERHANDLER,
800 (unsigned long *)&psdev->pdev->sh_info->flags)) {
801 dev_err(&dev->dev,
802 "guest with no AER driver should have been killed\n");
803 goto end;
804 }
805 result = common_process(psdev, 1, XEN_PCI_OP_aer_slotreset, result);
806
807 if (result == PCI_ERS_RESULT_NONE ||
808 result == PCI_ERS_RESULT_DISCONNECT) {
809 dev_dbg(&dev->dev,
810 "No AER slot_reset service or disconnected!\n");
811 kill_domain_by_device(psdev);
812 }
813 end:
814 if (psdev)
815 pcistub_device_put(psdev);
816 up_write(&pcistub_sem);
817 return result;
818
819 }
820
821
822 /*xen_pcibk_mmio_enabled: it will send the mmio_enabled request to pcifront
823 * in case of the device driver could provide this service, and then wait
824 * for pcifront ack
825 * @dev: pointer to PCI devices
826 * return value is used by aer_core do_recovery policy
827 */
828
xen_pcibk_mmio_enabled(struct pci_dev * dev)829 static pci_ers_result_t xen_pcibk_mmio_enabled(struct pci_dev *dev)
830 {
831 struct pcistub_device *psdev;
832 pci_ers_result_t result;
833
834 result = PCI_ERS_RESULT_RECOVERED;
835 dev_dbg(&dev->dev, "xen_pcibk_mmio_enabled(bus:%x,devfn:%x)\n",
836 dev->bus->number, dev->devfn);
837
838 down_write(&pcistub_sem);
839 psdev = pcistub_device_find(pci_domain_nr(dev->bus),
840 dev->bus->number,
841 PCI_SLOT(dev->devfn),
842 PCI_FUNC(dev->devfn));
843
844 if (!psdev || !psdev->pdev) {
845 dev_err(&dev->dev,
846 DRV_NAME " device is not found/assigned\n");
847 goto end;
848 }
849
850 if (!psdev->pdev->sh_info) {
851 dev_err(&dev->dev, DRV_NAME " device is not connected or owned"
852 " by HVM, kill it\n");
853 kill_domain_by_device(psdev);
854 goto end;
855 }
856
857 if (!test_bit(_XEN_PCIB_AERHANDLER,
858 (unsigned long *)&psdev->pdev->sh_info->flags)) {
859 dev_err(&dev->dev,
860 "guest with no AER driver should have been killed\n");
861 goto end;
862 }
863 result = common_process(psdev, 1, XEN_PCI_OP_aer_mmio, result);
864
865 if (result == PCI_ERS_RESULT_NONE ||
866 result == PCI_ERS_RESULT_DISCONNECT) {
867 dev_dbg(&dev->dev,
868 "No AER mmio_enabled service or disconnected!\n");
869 kill_domain_by_device(psdev);
870 }
871 end:
872 if (psdev)
873 pcistub_device_put(psdev);
874 up_write(&pcistub_sem);
875 return result;
876 }
877
878 /*xen_pcibk_error_detected: it will send the error_detected request to pcifront
879 * in case of the device driver could provide this service, and then wait
880 * for pcifront ack.
881 * @dev: pointer to PCI devices
882 * @error: the current PCI connection state
883 * return value is used by aer_core do_recovery policy
884 */
885
xen_pcibk_error_detected(struct pci_dev * dev,pci_channel_state_t error)886 static pci_ers_result_t xen_pcibk_error_detected(struct pci_dev *dev,
887 pci_channel_state_t error)
888 {
889 struct pcistub_device *psdev;
890 pci_ers_result_t result;
891
892 result = PCI_ERS_RESULT_CAN_RECOVER;
893 dev_dbg(&dev->dev, "xen_pcibk_error_detected(bus:%x,devfn:%x)\n",
894 dev->bus->number, dev->devfn);
895
896 down_write(&pcistub_sem);
897 psdev = pcistub_device_find(pci_domain_nr(dev->bus),
898 dev->bus->number,
899 PCI_SLOT(dev->devfn),
900 PCI_FUNC(dev->devfn));
901
902 if (!psdev || !psdev->pdev) {
903 dev_err(&dev->dev,
904 DRV_NAME " device is not found/assigned\n");
905 goto end;
906 }
907
908 if (!psdev->pdev->sh_info) {
909 dev_err(&dev->dev, DRV_NAME " device is not connected or owned"
910 " by HVM, kill it\n");
911 kill_domain_by_device(psdev);
912 goto end;
913 }
914
915 /*Guest owns the device yet no aer handler regiested, kill guest*/
916 if (!test_bit(_XEN_PCIB_AERHANDLER,
917 (unsigned long *)&psdev->pdev->sh_info->flags)) {
918 dev_dbg(&dev->dev, "guest may have no aer driver, kill it\n");
919 kill_domain_by_device(psdev);
920 goto end;
921 }
922 result = common_process(psdev, error, XEN_PCI_OP_aer_detected, result);
923
924 if (result == PCI_ERS_RESULT_NONE ||
925 result == PCI_ERS_RESULT_DISCONNECT) {
926 dev_dbg(&dev->dev,
927 "No AER error_detected service or disconnected!\n");
928 kill_domain_by_device(psdev);
929 }
930 end:
931 if (psdev)
932 pcistub_device_put(psdev);
933 up_write(&pcistub_sem);
934 return result;
935 }
936
937 /*xen_pcibk_error_resume: it will send the error_resume request to pcifront
938 * in case of the device driver could provide this service, and then wait
939 * for pcifront ack.
940 * @dev: pointer to PCI devices
941 */
942
xen_pcibk_error_resume(struct pci_dev * dev)943 static void xen_pcibk_error_resume(struct pci_dev *dev)
944 {
945 struct pcistub_device *psdev;
946
947 dev_dbg(&dev->dev, "xen_pcibk_error_resume(bus:%x,devfn:%x)\n",
948 dev->bus->number, dev->devfn);
949
950 down_write(&pcistub_sem);
951 psdev = pcistub_device_find(pci_domain_nr(dev->bus),
952 dev->bus->number,
953 PCI_SLOT(dev->devfn),
954 PCI_FUNC(dev->devfn));
955
956 if (!psdev || !psdev->pdev) {
957 dev_err(&dev->dev,
958 DRV_NAME " device is not found/assigned\n");
959 goto end;
960 }
961
962 if (!psdev->pdev->sh_info) {
963 dev_err(&dev->dev, DRV_NAME " device is not connected or owned"
964 " by HVM, kill it\n");
965 kill_domain_by_device(psdev);
966 goto end;
967 }
968
969 if (!test_bit(_XEN_PCIB_AERHANDLER,
970 (unsigned long *)&psdev->pdev->sh_info->flags)) {
971 dev_err(&dev->dev,
972 "guest with no AER driver should have been killed\n");
973 kill_domain_by_device(psdev);
974 goto end;
975 }
976 common_process(psdev, 1, XEN_PCI_OP_aer_resume,
977 PCI_ERS_RESULT_RECOVERED);
978 end:
979 if (psdev)
980 pcistub_device_put(psdev);
981 up_write(&pcistub_sem);
982 return;
983 }
984
985 /*add xen_pcibk AER handling*/
986 static const struct pci_error_handlers xen_pcibk_error_handler = {
987 .error_detected = xen_pcibk_error_detected,
988 .mmio_enabled = xen_pcibk_mmio_enabled,
989 .slot_reset = xen_pcibk_slot_reset,
990 .resume = xen_pcibk_error_resume,
991 };
992
993 /*
994 * Note: There is no MODULE_DEVICE_TABLE entry here because this isn't
995 * for a normal device. I don't want it to be loaded automatically.
996 */
997
998 static struct pci_driver xen_pcibk_pci_driver = {
999 /* The name should be xen_pciback, but until the tools are updated
1000 * we will keep it as pciback. */
1001 .name = PCISTUB_DRIVER_NAME,
1002 .id_table = pcistub_ids,
1003 .probe = pcistub_probe,
1004 .remove = pcistub_remove,
1005 .err_handler = &xen_pcibk_error_handler,
1006 };
1007
str_to_slot(const char * buf,int * domain,int * bus,int * slot,int * func)1008 static inline int str_to_slot(const char *buf, int *domain, int *bus,
1009 int *slot, int *func)
1010 {
1011 int parsed = 0;
1012
1013 switch (sscanf(buf, " %x:%x:%x.%x %n", domain, bus, slot, func,
1014 &parsed)) {
1015 case 3:
1016 *func = -1;
1017 sscanf(buf, " %x:%x:%x.* %n", domain, bus, slot, &parsed);
1018 break;
1019 case 2:
1020 *slot = *func = -1;
1021 sscanf(buf, " %x:%x:*.* %n", domain, bus, &parsed);
1022 break;
1023 }
1024 if (parsed && !buf[parsed])
1025 return 0;
1026
1027 /* try again without domain */
1028 *domain = 0;
1029 switch (sscanf(buf, " %x:%x.%x %n", bus, slot, func, &parsed)) {
1030 case 2:
1031 *func = -1;
1032 sscanf(buf, " %x:%x.* %n", bus, slot, &parsed);
1033 break;
1034 case 1:
1035 *slot = *func = -1;
1036 sscanf(buf, " %x:*.* %n", bus, &parsed);
1037 break;
1038 }
1039 if (parsed && !buf[parsed])
1040 return 0;
1041
1042 return -EINVAL;
1043 }
1044
str_to_quirk(const char * buf,int * domain,int * bus,int * slot,int * func,int * reg,int * size,int * mask)1045 static inline int str_to_quirk(const char *buf, int *domain, int *bus, int
1046 *slot, int *func, int *reg, int *size, int *mask)
1047 {
1048 int parsed = 0;
1049
1050 sscanf(buf, " %x:%x:%x.%x-%x:%x:%x %n", domain, bus, slot, func,
1051 reg, size, mask, &parsed);
1052 if (parsed && !buf[parsed])
1053 return 0;
1054
1055 /* try again without domain */
1056 *domain = 0;
1057 sscanf(buf, " %x:%x.%x-%x:%x:%x %n", bus, slot, func, reg, size,
1058 mask, &parsed);
1059 if (parsed && !buf[parsed])
1060 return 0;
1061
1062 return -EINVAL;
1063 }
1064
pcistub_device_id_add(int domain,int bus,int slot,int func)1065 static int pcistub_device_id_add(int domain, int bus, int slot, int func)
1066 {
1067 struct pcistub_device_id *pci_dev_id;
1068 int rc = 0, devfn = PCI_DEVFN(slot, func);
1069
1070 if (slot < 0) {
1071 for (slot = 0; !rc && slot < 32; ++slot)
1072 rc = pcistub_device_id_add(domain, bus, slot, func);
1073 return rc;
1074 }
1075
1076 if (func < 0) {
1077 for (func = 0; !rc && func < 8; ++func)
1078 rc = pcistub_device_id_add(domain, bus, slot, func);
1079 return rc;
1080 }
1081
1082 if ((
1083 #if !defined(MODULE) /* pci_domains_supported is not being exported */ \
1084 || !defined(CONFIG_PCI_DOMAINS)
1085 !pci_domains_supported ? domain :
1086 #endif
1087 domain < 0 || domain > 0xffff)
1088 || bus < 0 || bus > 0xff
1089 || PCI_SLOT(devfn) != slot
1090 || PCI_FUNC(devfn) != func)
1091 return -EINVAL;
1092
1093 pci_dev_id = kmalloc(sizeof(*pci_dev_id), GFP_KERNEL);
1094 if (!pci_dev_id)
1095 return -ENOMEM;
1096
1097 pr_debug("wants to seize %04x:%02x:%02x.%d\n",
1098 domain, bus, slot, func);
1099
1100 pcistub_device_id_add_list(pci_dev_id, domain, bus, devfn);
1101
1102 return 0;
1103 }
1104
pcistub_device_id_remove(int domain,int bus,int slot,int func)1105 static int pcistub_device_id_remove(int domain, int bus, int slot, int func)
1106 {
1107 struct pcistub_device_id *pci_dev_id, *t;
1108 int err = -ENOENT;
1109 unsigned long flags;
1110
1111 spin_lock_irqsave(&device_ids_lock, flags);
1112 list_for_each_entry_safe(pci_dev_id, t, &pcistub_device_ids,
1113 slot_list) {
1114 if (pci_dev_id->domain == domain && pci_dev_id->bus == bus
1115 && (slot < 0 || PCI_SLOT(pci_dev_id->devfn) == slot)
1116 && (func < 0 || PCI_FUNC(pci_dev_id->devfn) == func)) {
1117 /* Don't break; here because it's possible the same
1118 * slot could be in the list more than once
1119 */
1120 list_del(&pci_dev_id->slot_list);
1121 kfree(pci_dev_id);
1122
1123 err = 0;
1124
1125 pr_debug("removed %04x:%02x:%02x.%d from seize list\n",
1126 domain, bus, slot, func);
1127 }
1128 }
1129 spin_unlock_irqrestore(&device_ids_lock, flags);
1130
1131 return err;
1132 }
1133
pcistub_reg_add(int domain,int bus,int slot,int func,unsigned int reg,unsigned int size,unsigned int mask)1134 static int pcistub_reg_add(int domain, int bus, int slot, int func,
1135 unsigned int reg, unsigned int size,
1136 unsigned int mask)
1137 {
1138 int err = 0;
1139 struct pcistub_device *psdev;
1140 struct pci_dev *dev;
1141 struct config_field *field;
1142
1143 if (reg > 0xfff || (size < 4 && (mask >> (size * 8))))
1144 return -EINVAL;
1145
1146 psdev = pcistub_device_find(domain, bus, slot, func);
1147 if (!psdev) {
1148 err = -ENODEV;
1149 goto out;
1150 }
1151 dev = psdev->dev;
1152
1153 field = kzalloc(sizeof(*field), GFP_KERNEL);
1154 if (!field) {
1155 err = -ENOMEM;
1156 goto out;
1157 }
1158
1159 field->offset = reg;
1160 field->size = size;
1161 field->mask = mask;
1162 field->init = NULL;
1163 field->reset = NULL;
1164 field->release = NULL;
1165 field->clean = xen_pcibk_config_field_free;
1166
1167 err = xen_pcibk_config_quirks_add_field(dev, field);
1168 if (err)
1169 kfree(field);
1170 out:
1171 if (psdev)
1172 pcistub_device_put(psdev);
1173 return err;
1174 }
1175
new_slot_store(struct device_driver * drv,const char * buf,size_t count)1176 static ssize_t new_slot_store(struct device_driver *drv, const char *buf,
1177 size_t count)
1178 {
1179 int domain, bus, slot, func;
1180 int err;
1181
1182 err = str_to_slot(buf, &domain, &bus, &slot, &func);
1183 if (err)
1184 goto out;
1185
1186 err = pcistub_device_id_add(domain, bus, slot, func);
1187
1188 out:
1189 if (!err)
1190 err = count;
1191 return err;
1192 }
1193 static DRIVER_ATTR_WO(new_slot);
1194
remove_slot_store(struct device_driver * drv,const char * buf,size_t count)1195 static ssize_t remove_slot_store(struct device_driver *drv, const char *buf,
1196 size_t count)
1197 {
1198 int domain, bus, slot, func;
1199 int err;
1200
1201 err = str_to_slot(buf, &domain, &bus, &slot, &func);
1202 if (err)
1203 goto out;
1204
1205 err = pcistub_device_id_remove(domain, bus, slot, func);
1206
1207 out:
1208 if (!err)
1209 err = count;
1210 return err;
1211 }
1212 static DRIVER_ATTR_WO(remove_slot);
1213
slots_show(struct device_driver * drv,char * buf)1214 static ssize_t slots_show(struct device_driver *drv, char *buf)
1215 {
1216 struct pcistub_device_id *pci_dev_id;
1217 size_t count = 0;
1218 unsigned long flags;
1219
1220 spin_lock_irqsave(&device_ids_lock, flags);
1221 list_for_each_entry(pci_dev_id, &pcistub_device_ids, slot_list) {
1222 if (count >= PAGE_SIZE)
1223 break;
1224
1225 count += scnprintf(buf + count, PAGE_SIZE - count,
1226 "%04x:%02x:%02x.%d\n",
1227 pci_dev_id->domain, pci_dev_id->bus,
1228 PCI_SLOT(pci_dev_id->devfn),
1229 PCI_FUNC(pci_dev_id->devfn));
1230 }
1231 spin_unlock_irqrestore(&device_ids_lock, flags);
1232
1233 return count;
1234 }
1235 static DRIVER_ATTR_RO(slots);
1236
irq_handlers_show(struct device_driver * drv,char * buf)1237 static ssize_t irq_handlers_show(struct device_driver *drv, char *buf)
1238 {
1239 struct pcistub_device *psdev;
1240 struct xen_pcibk_dev_data *dev_data;
1241 size_t count = 0;
1242 unsigned long flags;
1243
1244 spin_lock_irqsave(&pcistub_devices_lock, flags);
1245 list_for_each_entry(psdev, &pcistub_devices, dev_list) {
1246 if (count >= PAGE_SIZE)
1247 break;
1248 if (!psdev->dev)
1249 continue;
1250 dev_data = pci_get_drvdata(psdev->dev);
1251 if (!dev_data)
1252 continue;
1253 count +=
1254 scnprintf(buf + count, PAGE_SIZE - count,
1255 "%s:%s:%sing:%ld\n",
1256 pci_name(psdev->dev),
1257 dev_data->isr_on ? "on" : "off",
1258 dev_data->ack_intr ? "ack" : "not ack",
1259 dev_data->handled);
1260 }
1261 spin_unlock_irqrestore(&pcistub_devices_lock, flags);
1262 return count;
1263 }
1264 static DRIVER_ATTR_RO(irq_handlers);
1265
irq_handler_state_store(struct device_driver * drv,const char * buf,size_t count)1266 static ssize_t irq_handler_state_store(struct device_driver *drv,
1267 const char *buf, size_t count)
1268 {
1269 struct pcistub_device *psdev;
1270 struct xen_pcibk_dev_data *dev_data;
1271 int domain, bus, slot, func;
1272 int err;
1273
1274 err = str_to_slot(buf, &domain, &bus, &slot, &func);
1275 if (err)
1276 return err;
1277
1278 psdev = pcistub_device_find(domain, bus, slot, func);
1279 if (!psdev) {
1280 err = -ENOENT;
1281 goto out;
1282 }
1283
1284 dev_data = pci_get_drvdata(psdev->dev);
1285 if (!dev_data) {
1286 err = -ENOENT;
1287 goto out;
1288 }
1289
1290 dev_dbg(&psdev->dev->dev, "%s fake irq handler: %d->%d\n",
1291 dev_data->irq_name, dev_data->isr_on,
1292 !dev_data->isr_on);
1293
1294 dev_data->isr_on = !(dev_data->isr_on);
1295 if (dev_data->isr_on)
1296 dev_data->ack_intr = 1;
1297 out:
1298 if (psdev)
1299 pcistub_device_put(psdev);
1300 if (!err)
1301 err = count;
1302 return err;
1303 }
1304 static DRIVER_ATTR_WO(irq_handler_state);
1305
quirks_store(struct device_driver * drv,const char * buf,size_t count)1306 static ssize_t quirks_store(struct device_driver *drv, const char *buf,
1307 size_t count)
1308 {
1309 int domain, bus, slot, func, reg, size, mask;
1310 int err;
1311
1312 err = str_to_quirk(buf, &domain, &bus, &slot, &func, ®, &size,
1313 &mask);
1314 if (err)
1315 goto out;
1316
1317 err = pcistub_reg_add(domain, bus, slot, func, reg, size, mask);
1318
1319 out:
1320 if (!err)
1321 err = count;
1322 return err;
1323 }
1324
quirks_show(struct device_driver * drv,char * buf)1325 static ssize_t quirks_show(struct device_driver *drv, char *buf)
1326 {
1327 int count = 0;
1328 unsigned long flags;
1329 struct xen_pcibk_config_quirk *quirk;
1330 struct xen_pcibk_dev_data *dev_data;
1331 const struct config_field *field;
1332 const struct config_field_entry *cfg_entry;
1333
1334 spin_lock_irqsave(&device_ids_lock, flags);
1335 list_for_each_entry(quirk, &xen_pcibk_quirks, quirks_list) {
1336 if (count >= PAGE_SIZE)
1337 goto out;
1338
1339 count += scnprintf(buf + count, PAGE_SIZE - count,
1340 "%02x:%02x.%01x\n\t%04x:%04x:%04x:%04x\n",
1341 quirk->pdev->bus->number,
1342 PCI_SLOT(quirk->pdev->devfn),
1343 PCI_FUNC(quirk->pdev->devfn),
1344 quirk->devid.vendor, quirk->devid.device,
1345 quirk->devid.subvendor,
1346 quirk->devid.subdevice);
1347
1348 dev_data = pci_get_drvdata(quirk->pdev);
1349
1350 list_for_each_entry(cfg_entry, &dev_data->config_fields, list) {
1351 field = cfg_entry->field;
1352 if (count >= PAGE_SIZE)
1353 goto out;
1354
1355 count += scnprintf(buf + count, PAGE_SIZE - count,
1356 "\t\t%08x:%01x:%08x\n",
1357 cfg_entry->base_offset +
1358 field->offset, field->size,
1359 field->mask);
1360 }
1361 }
1362
1363 out:
1364 spin_unlock_irqrestore(&device_ids_lock, flags);
1365
1366 return count;
1367 }
1368 static DRIVER_ATTR_RW(quirks);
1369
permissive_store(struct device_driver * drv,const char * buf,size_t count)1370 static ssize_t permissive_store(struct device_driver *drv, const char *buf,
1371 size_t count)
1372 {
1373 int domain, bus, slot, func;
1374 int err;
1375 struct pcistub_device *psdev;
1376 struct xen_pcibk_dev_data *dev_data;
1377
1378 err = str_to_slot(buf, &domain, &bus, &slot, &func);
1379 if (err)
1380 goto out;
1381
1382 psdev = pcistub_device_find(domain, bus, slot, func);
1383 if (!psdev) {
1384 err = -ENODEV;
1385 goto out;
1386 }
1387
1388 dev_data = pci_get_drvdata(psdev->dev);
1389 /* the driver data for a device should never be null at this point */
1390 if (!dev_data) {
1391 err = -ENXIO;
1392 goto release;
1393 }
1394 if (!dev_data->permissive) {
1395 dev_data->permissive = 1;
1396 /* Let user know that what they're doing could be unsafe */
1397 dev_warn(&psdev->dev->dev, "enabling permissive mode "
1398 "configuration space accesses!\n");
1399 dev_warn(&psdev->dev->dev,
1400 "permissive mode is potentially unsafe!\n");
1401 }
1402 release:
1403 pcistub_device_put(psdev);
1404 out:
1405 if (!err)
1406 err = count;
1407 return err;
1408 }
1409
permissive_show(struct device_driver * drv,char * buf)1410 static ssize_t permissive_show(struct device_driver *drv, char *buf)
1411 {
1412 struct pcistub_device *psdev;
1413 struct xen_pcibk_dev_data *dev_data;
1414 size_t count = 0;
1415 unsigned long flags;
1416 spin_lock_irqsave(&pcistub_devices_lock, flags);
1417 list_for_each_entry(psdev, &pcistub_devices, dev_list) {
1418 if (count >= PAGE_SIZE)
1419 break;
1420 if (!psdev->dev)
1421 continue;
1422 dev_data = pci_get_drvdata(psdev->dev);
1423 if (!dev_data || !dev_data->permissive)
1424 continue;
1425 count +=
1426 scnprintf(buf + count, PAGE_SIZE - count, "%s\n",
1427 pci_name(psdev->dev));
1428 }
1429 spin_unlock_irqrestore(&pcistub_devices_lock, flags);
1430 return count;
1431 }
1432 static DRIVER_ATTR_RW(permissive);
1433
pcistub_exit(void)1434 static void pcistub_exit(void)
1435 {
1436 driver_remove_file(&xen_pcibk_pci_driver.driver, &driver_attr_new_slot);
1437 driver_remove_file(&xen_pcibk_pci_driver.driver,
1438 &driver_attr_remove_slot);
1439 driver_remove_file(&xen_pcibk_pci_driver.driver, &driver_attr_slots);
1440 driver_remove_file(&xen_pcibk_pci_driver.driver, &driver_attr_quirks);
1441 driver_remove_file(&xen_pcibk_pci_driver.driver,
1442 &driver_attr_permissive);
1443 driver_remove_file(&xen_pcibk_pci_driver.driver,
1444 &driver_attr_irq_handlers);
1445 driver_remove_file(&xen_pcibk_pci_driver.driver,
1446 &driver_attr_irq_handler_state);
1447 pci_unregister_driver(&xen_pcibk_pci_driver);
1448 }
1449
pcistub_init(void)1450 static int __init pcistub_init(void)
1451 {
1452 int pos = 0;
1453 int err = 0;
1454 int domain, bus, slot, func;
1455 int parsed;
1456
1457 if (pci_devs_to_hide && *pci_devs_to_hide) {
1458 do {
1459 parsed = 0;
1460
1461 err = sscanf(pci_devs_to_hide + pos,
1462 " (%x:%x:%x.%x) %n",
1463 &domain, &bus, &slot, &func, &parsed);
1464 switch (err) {
1465 case 3:
1466 func = -1;
1467 sscanf(pci_devs_to_hide + pos,
1468 " (%x:%x:%x.*) %n",
1469 &domain, &bus, &slot, &parsed);
1470 break;
1471 case 2:
1472 slot = func = -1;
1473 sscanf(pci_devs_to_hide + pos,
1474 " (%x:%x:*.*) %n",
1475 &domain, &bus, &parsed);
1476 break;
1477 }
1478
1479 if (!parsed) {
1480 domain = 0;
1481 err = sscanf(pci_devs_to_hide + pos,
1482 " (%x:%x.%x) %n",
1483 &bus, &slot, &func, &parsed);
1484 switch (err) {
1485 case 2:
1486 func = -1;
1487 sscanf(pci_devs_to_hide + pos,
1488 " (%x:%x.*) %n",
1489 &bus, &slot, &parsed);
1490 break;
1491 case 1:
1492 slot = func = -1;
1493 sscanf(pci_devs_to_hide + pos,
1494 " (%x:*.*) %n",
1495 &bus, &parsed);
1496 break;
1497 }
1498 }
1499
1500 if (parsed <= 0)
1501 goto parse_error;
1502
1503 err = pcistub_device_id_add(domain, bus, slot, func);
1504 if (err)
1505 goto out;
1506
1507 pos += parsed;
1508 } while (pci_devs_to_hide[pos]);
1509 }
1510
1511 /* If we're the first PCI Device Driver to register, we're the
1512 * first one to get offered PCI devices as they become
1513 * available (and thus we can be the first to grab them)
1514 */
1515 err = pci_register_driver(&xen_pcibk_pci_driver);
1516 if (err < 0)
1517 goto out;
1518
1519 err = driver_create_file(&xen_pcibk_pci_driver.driver,
1520 &driver_attr_new_slot);
1521 if (!err)
1522 err = driver_create_file(&xen_pcibk_pci_driver.driver,
1523 &driver_attr_remove_slot);
1524 if (!err)
1525 err = driver_create_file(&xen_pcibk_pci_driver.driver,
1526 &driver_attr_slots);
1527 if (!err)
1528 err = driver_create_file(&xen_pcibk_pci_driver.driver,
1529 &driver_attr_quirks);
1530 if (!err)
1531 err = driver_create_file(&xen_pcibk_pci_driver.driver,
1532 &driver_attr_permissive);
1533
1534 if (!err)
1535 err = driver_create_file(&xen_pcibk_pci_driver.driver,
1536 &driver_attr_irq_handlers);
1537 if (!err)
1538 err = driver_create_file(&xen_pcibk_pci_driver.driver,
1539 &driver_attr_irq_handler_state);
1540 if (err)
1541 pcistub_exit();
1542
1543 out:
1544 return err;
1545
1546 parse_error:
1547 pr_err("Error parsing pci_devs_to_hide at \"%s\"\n",
1548 pci_devs_to_hide + pos);
1549 return -EINVAL;
1550 }
1551
1552 #ifndef MODULE
1553 /*
1554 * fs_initcall happens before device_initcall
1555 * so xen_pcibk *should* get called first (b/c we
1556 * want to suck up any device before other drivers
1557 * get a chance by being the first pci device
1558 * driver to register)
1559 */
1560 fs_initcall(pcistub_init);
1561 #endif
1562
1563 #ifdef CONFIG_PCI_IOV
find_vfs(const struct pci_dev * pdev)1564 static struct pcistub_device *find_vfs(const struct pci_dev *pdev)
1565 {
1566 struct pcistub_device *psdev = NULL;
1567 unsigned long flags;
1568 bool found = false;
1569
1570 spin_lock_irqsave(&pcistub_devices_lock, flags);
1571 list_for_each_entry(psdev, &pcistub_devices, dev_list) {
1572 if (!psdev->pdev && psdev->dev != pdev
1573 && pci_physfn(psdev->dev) == pdev) {
1574 found = true;
1575 break;
1576 }
1577 }
1578 spin_unlock_irqrestore(&pcistub_devices_lock, flags);
1579 if (found)
1580 return psdev;
1581 return NULL;
1582 }
1583
pci_stub_notifier(struct notifier_block * nb,unsigned long action,void * data)1584 static int pci_stub_notifier(struct notifier_block *nb,
1585 unsigned long action, void *data)
1586 {
1587 struct device *dev = data;
1588 const struct pci_dev *pdev = to_pci_dev(dev);
1589
1590 if (action != BUS_NOTIFY_UNBIND_DRIVER)
1591 return NOTIFY_DONE;
1592
1593 if (!pdev->is_physfn)
1594 return NOTIFY_DONE;
1595
1596 for (;;) {
1597 struct pcistub_device *psdev = find_vfs(pdev);
1598 if (!psdev)
1599 break;
1600 device_release_driver(&psdev->dev->dev);
1601 }
1602 return NOTIFY_DONE;
1603 }
1604
1605 static struct notifier_block pci_stub_nb = {
1606 .notifier_call = pci_stub_notifier,
1607 };
1608 #endif
1609
xen_pcibk_init(void)1610 static int __init xen_pcibk_init(void)
1611 {
1612 int err;
1613
1614 if (!xen_initial_domain())
1615 return -ENODEV;
1616
1617 err = xen_pcibk_config_init();
1618 if (err)
1619 return err;
1620
1621 #ifdef MODULE
1622 err = pcistub_init();
1623 if (err < 0)
1624 return err;
1625 #endif
1626
1627 pcistub_init_devices_late();
1628 err = xen_pcibk_xenbus_register();
1629 if (err)
1630 pcistub_exit();
1631 #ifdef CONFIG_PCI_IOV
1632 else
1633 bus_register_notifier(&pci_bus_type, &pci_stub_nb);
1634 #endif
1635
1636 return err;
1637 }
1638
xen_pcibk_cleanup(void)1639 static void __exit xen_pcibk_cleanup(void)
1640 {
1641 #ifdef CONFIG_PCI_IOV
1642 bus_unregister_notifier(&pci_bus_type, &pci_stub_nb);
1643 #endif
1644 xen_pcibk_xenbus_unregister();
1645 pcistub_exit();
1646 }
1647
1648 module_init(xen_pcibk_init);
1649 module_exit(xen_pcibk_cleanup);
1650
1651 MODULE_LICENSE("Dual BSD/GPL");
1652 MODULE_ALIAS("xen-backend:pci");
1653