8bfb87c1a9f3851c1c28935853e7e4218a4ec909
[linux-2.6-block.git] / drivers / xen / xen-pciback / pciback_ops.c
1 /*
2  * PCI Backend Operations - respond to PCI requests from Frontend
3  *
4  *   Author: Ryan Wilson <hap9@epoch.ncsc.mil>
5  */
6
7 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
8
9 #include <linux/module.h>
10 #include <linux/wait.h>
11 #include <linux/bitops.h>
12 #include <xen/events.h>
13 #include <linux/sched.h>
14 #include "pciback.h"
15
16 int verbose_request;
17 module_param(verbose_request, int, 0644);
18
19 static irqreturn_t xen_pcibk_guest_interrupt(int irq, void *dev_id);
20
21 /* Ensure a device is has the fake IRQ handler "turned on/off" and is
22  * ready to be exported. This MUST be run after xen_pcibk_reset_device
23  * which does the actual PCI device enable/disable.
24  */
25 static void xen_pcibk_control_isr(struct pci_dev *dev, int reset)
26 {
27         struct xen_pcibk_dev_data *dev_data;
28         int rc;
29         int enable = 0;
30
31         dev_data = pci_get_drvdata(dev);
32         if (!dev_data)
33                 return;
34
35         /* We don't deal with bridges */
36         if (dev->hdr_type != PCI_HEADER_TYPE_NORMAL)
37                 return;
38
39         if (reset) {
40                 dev_data->enable_intx = 0;
41                 dev_data->ack_intr = 0;
42         }
43         enable =  dev_data->enable_intx;
44
45         /* Asked to disable, but ISR isn't runnig */
46         if (!enable && !dev_data->isr_on)
47                 return;
48
49         /* Squirrel away the IRQs in the dev_data. We need this
50          * b/c when device transitions to MSI, the dev->irq is
51          * overwritten with the MSI vector.
52          */
53         if (enable)
54                 dev_data->irq = dev->irq;
55
56         /*
57          * SR-IOV devices in all use MSI-X and have no legacy
58          * interrupts, so inhibit creating a fake IRQ handler for them.
59          */
60         if (dev_data->irq == 0)
61                 goto out;
62
63         dev_dbg(&dev->dev, "%s: #%d %s %s%s %s-> %s\n",
64                 dev_data->irq_name,
65                 dev_data->irq,
66                 pci_is_enabled(dev) ? "on" : "off",
67                 dev->msi_enabled ? "MSI" : "",
68                 dev->msix_enabled ? "MSI/X" : "",
69                 dev_data->isr_on ? "enable" : "disable",
70                 enable ? "enable" : "disable");
71
72         if (enable) {
73                 rc = request_irq(dev_data->irq,
74                                 xen_pcibk_guest_interrupt, IRQF_SHARED,
75                                 dev_data->irq_name, dev);
76                 if (rc) {
77                         dev_err(&dev->dev, "%s: failed to install fake IRQ " \
78                                 "handler for IRQ %d! (rc:%d)\n",
79                                 dev_data->irq_name, dev_data->irq, rc);
80                         goto out;
81                 }
82         } else {
83                 free_irq(dev_data->irq, dev);
84                 dev_data->irq = 0;
85         }
86         dev_data->isr_on = enable;
87         dev_data->ack_intr = enable;
88 out:
89         dev_dbg(&dev->dev, "%s: #%d %s %s%s %s\n",
90                 dev_data->irq_name,
91                 dev_data->irq,
92                 pci_is_enabled(dev) ? "on" : "off",
93                 dev->msi_enabled ? "MSI" : "",
94                 dev->msix_enabled ? "MSI/X" : "",
95                 enable ? (dev_data->isr_on ? "enabled" : "failed to enable") :
96                         (dev_data->isr_on ? "failed to disable" : "disabled"));
97 }
98
99 /* Ensure a device is "turned off" and ready to be exported.
100  * (Also see xen_pcibk_config_reset to ensure virtual configuration space is
101  * ready to be re-exported)
102  */
103 void xen_pcibk_reset_device(struct pci_dev *dev)
104 {
105         u16 cmd;
106
107         xen_pcibk_control_isr(dev, 1 /* reset device */);
108
109         /* Disable devices (but not bridges) */
110         if (dev->hdr_type == PCI_HEADER_TYPE_NORMAL) {
111 #ifdef CONFIG_PCI_MSI
112                 /* The guest could have been abruptly killed without
113                  * disabling MSI/MSI-X interrupts.*/
114                 if (dev->msix_enabled)
115                         pci_disable_msix(dev);
116                 if (dev->msi_enabled)
117                         pci_disable_msi(dev);
118 #endif
119                 if (pci_is_enabled(dev))
120                         pci_disable_device(dev);
121
122                 pci_write_config_word(dev, PCI_COMMAND, 0);
123
124                 dev->is_busmaster = 0;
125         } else {
126                 pci_read_config_word(dev, PCI_COMMAND, &cmd);
127                 if (cmd & (PCI_COMMAND_INVALIDATE)) {
128                         cmd &= ~(PCI_COMMAND_INVALIDATE);
129                         pci_write_config_word(dev, PCI_COMMAND, cmd);
130
131                         dev->is_busmaster = 0;
132                 }
133         }
134 }
135
136 #ifdef CONFIG_PCI_MSI
137 static
138 int xen_pcibk_enable_msi(struct xen_pcibk_device *pdev,
139                          struct pci_dev *dev, struct xen_pci_op *op)
140 {
141         struct xen_pcibk_dev_data *dev_data;
142         int status;
143
144         if (unlikely(verbose_request))
145                 printk(KERN_DEBUG DRV_NAME ": %s: enable MSI\n", pci_name(dev));
146
147         if (dev->msi_enabled)
148                 status = -EALREADY;
149         else if (dev->msix_enabled)
150                 status = -ENXIO;
151         else
152                 status = pci_enable_msi(dev);
153
154         if (status) {
155                 pr_warn_ratelimited("%s: error enabling MSI for guest %u: err %d\n",
156                                     pci_name(dev), pdev->xdev->otherend_id,
157                                     status);
158                 op->value = 0;
159                 return XEN_PCI_ERR_op_failed;
160         }
161
162         /* The value the guest needs is actually the IDT vector, not the
163          * the local domain's IRQ number. */
164
165         op->value = dev->irq ? xen_pirq_from_irq(dev->irq) : 0;
166         if (unlikely(verbose_request))
167                 printk(KERN_DEBUG DRV_NAME ": %s: MSI: %d\n", pci_name(dev),
168                         op->value);
169
170         dev_data = pci_get_drvdata(dev);
171         if (dev_data)
172                 dev_data->ack_intr = 0;
173
174         return 0;
175 }
176
177 static
178 int xen_pcibk_disable_msi(struct xen_pcibk_device *pdev,
179                           struct pci_dev *dev, struct xen_pci_op *op)
180 {
181         struct xen_pcibk_dev_data *dev_data;
182
183         if (unlikely(verbose_request))
184                 printk(KERN_DEBUG DRV_NAME ": %s: disable MSI\n",
185                        pci_name(dev));
186         pci_disable_msi(dev);
187
188         op->value = dev->irq ? xen_pirq_from_irq(dev->irq) : 0;
189         if (unlikely(verbose_request))
190                 printk(KERN_DEBUG DRV_NAME ": %s: MSI: %d\n", pci_name(dev),
191                         op->value);
192         dev_data = pci_get_drvdata(dev);
193         if (dev_data)
194                 dev_data->ack_intr = 1;
195         return 0;
196 }
197
198 static
199 int xen_pcibk_enable_msix(struct xen_pcibk_device *pdev,
200                           struct pci_dev *dev, struct xen_pci_op *op)
201 {
202         struct xen_pcibk_dev_data *dev_data;
203         int i, result;
204         struct msix_entry *entries;
205
206         if (unlikely(verbose_request))
207                 printk(KERN_DEBUG DRV_NAME ": %s: enable MSI-X\n",
208                        pci_name(dev));
209         if (op->value > SH_INFO_MAX_VEC)
210                 return -EINVAL;
211
212         entries = kmalloc(op->value * sizeof(*entries), GFP_KERNEL);
213         if (entries == NULL)
214                 return -ENOMEM;
215
216         for (i = 0; i < op->value; i++) {
217                 entries[i].entry = op->msix_entries[i].entry;
218                 entries[i].vector = op->msix_entries[i].vector;
219         }
220
221         result = pci_enable_msix_exact(dev, entries, op->value);
222         if (result == 0) {
223                 for (i = 0; i < op->value; i++) {
224                         op->msix_entries[i].entry = entries[i].entry;
225                         if (entries[i].vector) {
226                                 op->msix_entries[i].vector =
227                                         xen_pirq_from_irq(entries[i].vector);
228                                 if (unlikely(verbose_request))
229                                         printk(KERN_DEBUG DRV_NAME ": %s: " \
230                                                 "MSI-X[%d]: %d\n",
231                                                 pci_name(dev), i,
232                                                 op->msix_entries[i].vector);
233                         }
234                 }
235         } else
236                 pr_warn_ratelimited("%s: error enabling MSI-X for guest %u: err %d!\n",
237                                     pci_name(dev), pdev->xdev->otherend_id,
238                                     result);
239         kfree(entries);
240
241         op->value = result;
242         dev_data = pci_get_drvdata(dev);
243         if (dev_data)
244                 dev_data->ack_intr = 0;
245
246         return result > 0 ? 0 : result;
247 }
248
249 static
250 int xen_pcibk_disable_msix(struct xen_pcibk_device *pdev,
251                            struct pci_dev *dev, struct xen_pci_op *op)
252 {
253         struct xen_pcibk_dev_data *dev_data;
254         if (unlikely(verbose_request))
255                 printk(KERN_DEBUG DRV_NAME ": %s: disable MSI-X\n",
256                         pci_name(dev));
257         pci_disable_msix(dev);
258
259         /*
260          * SR-IOV devices (which don't have any legacy IRQ) have
261          * an undefined IRQ value of zero.
262          */
263         op->value = dev->irq ? xen_pirq_from_irq(dev->irq) : 0;
264         if (unlikely(verbose_request))
265                 printk(KERN_DEBUG DRV_NAME ": %s: MSI-X: %d\n", pci_name(dev),
266                         op->value);
267         dev_data = pci_get_drvdata(dev);
268         if (dev_data)
269                 dev_data->ack_intr = 1;
270         return 0;
271 }
272 #endif
273 /*
274 * Now the same evtchn is used for both pcifront conf_read_write request
275 * as well as pcie aer front end ack. We use a new work_queue to schedule
276 * xen_pcibk conf_read_write service for avoiding confict with aer_core
277 * do_recovery job which also use the system default work_queue
278 */
279 void xen_pcibk_test_and_schedule_op(struct xen_pcibk_device *pdev)
280 {
281         /* Check that frontend is requesting an operation and that we are not
282          * already processing a request */
283         if (test_bit(_XEN_PCIF_active, (unsigned long *)&pdev->sh_info->flags)
284             && !test_and_set_bit(_PDEVF_op_active, &pdev->flags)) {
285                 queue_work(xen_pcibk_wq, &pdev->op_work);
286         }
287         /*_XEN_PCIB_active should have been cleared by pcifront. And also make
288         sure xen_pcibk is waiting for ack by checking _PCIB_op_pending*/
289         if (!test_bit(_XEN_PCIB_active, (unsigned long *)&pdev->sh_info->flags)
290             && test_bit(_PCIB_op_pending, &pdev->flags)) {
291                 wake_up(&xen_pcibk_aer_wait_queue);
292         }
293 }
294
295 /* Performing the configuration space reads/writes must not be done in atomic
296  * context because some of the pci_* functions can sleep (mostly due to ACPI
297  * use of semaphores). This function is intended to be called from a work
298  * queue in process context taking a struct xen_pcibk_device as a parameter */
299
300 void xen_pcibk_do_op(struct work_struct *data)
301 {
302         struct xen_pcibk_device *pdev =
303                 container_of(data, struct xen_pcibk_device, op_work);
304         struct pci_dev *dev;
305         struct xen_pcibk_dev_data *dev_data = NULL;
306         struct xen_pci_op *op = &pdev->op;
307         int test_intx = 0;
308
309         *op = pdev->sh_info->op;
310         barrier();
311         dev = xen_pcibk_get_pci_dev(pdev, op->domain, op->bus, op->devfn);
312
313         if (dev == NULL)
314                 op->err = XEN_PCI_ERR_dev_not_found;
315         else {
316                 dev_data = pci_get_drvdata(dev);
317                 if (dev_data)
318                         test_intx = dev_data->enable_intx;
319                 switch (op->cmd) {
320                 case XEN_PCI_OP_conf_read:
321                         op->err = xen_pcibk_config_read(dev,
322                                   op->offset, op->size, &op->value);
323                         break;
324                 case XEN_PCI_OP_conf_write:
325                         op->err = xen_pcibk_config_write(dev,
326                                   op->offset, op->size, op->value);
327                         break;
328 #ifdef CONFIG_PCI_MSI
329                 case XEN_PCI_OP_enable_msi:
330                         op->err = xen_pcibk_enable_msi(pdev, dev, op);
331                         break;
332                 case XEN_PCI_OP_disable_msi:
333                         op->err = xen_pcibk_disable_msi(pdev, dev, op);
334                         break;
335                 case XEN_PCI_OP_enable_msix:
336                         op->err = xen_pcibk_enable_msix(pdev, dev, op);
337                         break;
338                 case XEN_PCI_OP_disable_msix:
339                         op->err = xen_pcibk_disable_msix(pdev, dev, op);
340                         break;
341 #endif
342                 default:
343                         op->err = XEN_PCI_ERR_not_implemented;
344                         break;
345                 }
346         }
347         if (!op->err && dev && dev_data) {
348                 /* Transition detected */
349                 if ((dev_data->enable_intx != test_intx))
350                         xen_pcibk_control_isr(dev, 0 /* no reset */);
351         }
352         pdev->sh_info->op.err = op->err;
353         pdev->sh_info->op.value = op->value;
354 #ifdef CONFIG_PCI_MSI
355         if (op->cmd == XEN_PCI_OP_enable_msix && op->err == 0) {
356                 unsigned int i;
357
358                 for (i = 0; i < op->value; i++)
359                         pdev->sh_info->op.msix_entries[i].vector =
360                                 op->msix_entries[i].vector;
361         }
362 #endif
363         /* Tell the driver domain that we're done. */
364         wmb();
365         clear_bit(_XEN_PCIF_active, (unsigned long *)&pdev->sh_info->flags);
366         notify_remote_via_irq(pdev->evtchn_irq);
367
368         /* Mark that we're done. */
369         smp_mb__before_atomic(); /* /after/ clearing PCIF_active */
370         clear_bit(_PDEVF_op_active, &pdev->flags);
371         smp_mb__after_atomic(); /* /before/ final check for work */
372
373         /* Check to see if the driver domain tried to start another request in
374          * between clearing _XEN_PCIF_active and clearing _PDEVF_op_active.
375         */
376         xen_pcibk_test_and_schedule_op(pdev);
377 }
378
379 irqreturn_t xen_pcibk_handle_event(int irq, void *dev_id)
380 {
381         struct xen_pcibk_device *pdev = dev_id;
382
383         xen_pcibk_test_and_schedule_op(pdev);
384
385         return IRQ_HANDLED;
386 }
387 static irqreturn_t xen_pcibk_guest_interrupt(int irq, void *dev_id)
388 {
389         struct pci_dev *dev = (struct pci_dev *)dev_id;
390         struct xen_pcibk_dev_data *dev_data = pci_get_drvdata(dev);
391
392         if (dev_data->isr_on && dev_data->ack_intr) {
393                 dev_data->handled++;
394                 if ((dev_data->handled % 1000) == 0) {
395                         if (xen_test_irq_shared(irq)) {
396                                 pr_info("%s IRQ line is not shared "
397                                         "with other domains. Turning ISR off\n",
398                                          dev_data->irq_name);
399                                 dev_data->ack_intr = 0;
400                         }
401                 }
402                 return IRQ_HANDLED;
403         }
404         return IRQ_NONE;
405 }