1// SPDX-License-Identifier: GPL-2.0-only
2/*
3 * Host side test driver to test endpoint functionality
4 *
5 * Copyright (C) 2017 Texas Instruments
6 * Author: Kishon Vijay Abraham I <kishon@ti.com>
7 */
8
9#include <linux/crc32.h>
10#include <linux/delay.h>
11#include <linux/fs.h>
12#include <linux/io.h>
13#include <linux/interrupt.h>
14#include <linux/irq.h>
15#include <linux/miscdevice.h>
16#include <linux/module.h>
17#include <linux/mutex.h>
18#include <linux/random.h>
19#include <linux/slab.h>
20#include <linux/uaccess.h>
21#include <linux/pci.h>
22#include <linux/pci_ids.h>
23
24#include <linux/pci_regs.h>
25
26#include <uapi/linux/pcitest.h>
27
28#define DRV_MODULE_NAME "pci-endpoint-test"
29
30#define IRQ_TYPE_UNDEFINED -1
31#define IRQ_TYPE_INTX 0
32#define IRQ_TYPE_MSI 1
33#define IRQ_TYPE_MSIX 2
34
35#define PCI_ENDPOINT_TEST_MAGIC 0x0
36
37#define PCI_ENDPOINT_TEST_COMMAND 0x4
38#define COMMAND_RAISE_INTX_IRQ BIT(0)
39#define COMMAND_RAISE_MSI_IRQ BIT(1)
40#define COMMAND_RAISE_MSIX_IRQ BIT(2)
41#define COMMAND_READ BIT(3)
42#define COMMAND_WRITE BIT(4)
43#define COMMAND_COPY BIT(5)
44
45#define PCI_ENDPOINT_TEST_STATUS 0x8
46#define STATUS_READ_SUCCESS BIT(0)
47#define STATUS_READ_FAIL BIT(1)
48#define STATUS_WRITE_SUCCESS BIT(2)
49#define STATUS_WRITE_FAIL BIT(3)
50#define STATUS_COPY_SUCCESS BIT(4)
51#define STATUS_COPY_FAIL BIT(5)
52#define STATUS_IRQ_RAISED BIT(6)
53#define STATUS_SRC_ADDR_INVALID BIT(7)
54#define STATUS_DST_ADDR_INVALID BIT(8)
55
56#define PCI_ENDPOINT_TEST_LOWER_SRC_ADDR 0x0c
57#define PCI_ENDPOINT_TEST_UPPER_SRC_ADDR 0x10
58
59#define PCI_ENDPOINT_TEST_LOWER_DST_ADDR 0x14
60#define PCI_ENDPOINT_TEST_UPPER_DST_ADDR 0x18
61
62#define PCI_ENDPOINT_TEST_SIZE 0x1c
63#define PCI_ENDPOINT_TEST_CHECKSUM 0x20
64
65#define PCI_ENDPOINT_TEST_IRQ_TYPE 0x24
66#define PCI_ENDPOINT_TEST_IRQ_NUMBER 0x28
67
68#define PCI_ENDPOINT_TEST_FLAGS 0x2c
69#define FLAG_USE_DMA BIT(0)
70
71#define PCI_DEVICE_ID_TI_AM654 0xb00c
72#define PCI_DEVICE_ID_TI_J7200 0xb00f
73#define PCI_DEVICE_ID_TI_AM64 0xb010
74#define PCI_DEVICE_ID_TI_J721S2 0xb013
75#define PCI_DEVICE_ID_LS1088A 0x80c0
76#define PCI_DEVICE_ID_IMX8 0x0808
77
78#define is_am654_pci_dev(pdev) \
79 ((pdev)->device == PCI_DEVICE_ID_TI_AM654)
80
81#define PCI_DEVICE_ID_RENESAS_R8A774A1 0x0028
82#define PCI_DEVICE_ID_RENESAS_R8A774B1 0x002b
83#define PCI_DEVICE_ID_RENESAS_R8A774C0 0x002d
84#define PCI_DEVICE_ID_RENESAS_R8A774E1 0x0025
85#define PCI_DEVICE_ID_RENESAS_R8A779F0 0x0031
86
87static DEFINE_IDA(pci_endpoint_test_ida);
88
89#define to_endpoint_test(priv) container_of((priv), struct pci_endpoint_test, \
90 miscdev)
91
92static bool no_msi;
93module_param(no_msi, bool, 0444);
94MODULE_PARM_DESC(no_msi, "Disable MSI interrupt in pci_endpoint_test");
95
96static int irq_type = IRQ_TYPE_MSI;
97module_param(irq_type, int, 0444);
98MODULE_PARM_DESC(irq_type, "IRQ mode selection in pci_endpoint_test (0 - Legacy, 1 - MSI, 2 - MSI-X)");
99
100enum pci_barno {
101 BAR_0,
102 BAR_1,
103 BAR_2,
104 BAR_3,
105 BAR_4,
106 BAR_5,
107};
108
109struct pci_endpoint_test {
110 struct pci_dev *pdev;
111 void __iomem *base;
112 void __iomem *bar[PCI_STD_NUM_BARS];
113 struct completion irq_raised;
114 int last_irq;
115 int num_irqs;
116 int irq_type;
117 /* mutex to protect the ioctls */
118 struct mutex mutex;
119 struct miscdevice miscdev;
120 enum pci_barno test_reg_bar;
121 size_t alignment;
122 const char *name;
123};
124
125struct pci_endpoint_test_data {
126 enum pci_barno test_reg_bar;
127 size_t alignment;
128 int irq_type;
129};
130
131static inline u32 pci_endpoint_test_readl(struct pci_endpoint_test *test,
132 u32 offset)
133{
134 return readl(addr: test->base + offset);
135}
136
137static inline void pci_endpoint_test_writel(struct pci_endpoint_test *test,
138 u32 offset, u32 value)
139{
140 writel(val: value, addr: test->base + offset);
141}
142
143static inline u32 pci_endpoint_test_bar_readl(struct pci_endpoint_test *test,
144 int bar, int offset)
145{
146 return readl(addr: test->bar[bar] + offset);
147}
148
149static inline void pci_endpoint_test_bar_writel(struct pci_endpoint_test *test,
150 int bar, u32 offset, u32 value)
151{
152 writel(val: value, addr: test->bar[bar] + offset);
153}
154
155static irqreturn_t pci_endpoint_test_irqhandler(int irq, void *dev_id)
156{
157 struct pci_endpoint_test *test = dev_id;
158 u32 reg;
159
160 reg = pci_endpoint_test_readl(test, PCI_ENDPOINT_TEST_STATUS);
161 if (reg & STATUS_IRQ_RAISED) {
162 test->last_irq = irq;
163 complete(&test->irq_raised);
164 }
165
166 return IRQ_HANDLED;
167}
168
169static void pci_endpoint_test_free_irq_vectors(struct pci_endpoint_test *test)
170{
171 struct pci_dev *pdev = test->pdev;
172
173 pci_free_irq_vectors(dev: pdev);
174 test->irq_type = IRQ_TYPE_UNDEFINED;
175}
176
177static bool pci_endpoint_test_alloc_irq_vectors(struct pci_endpoint_test *test,
178 int type)
179{
180 int irq = -1;
181 struct pci_dev *pdev = test->pdev;
182 struct device *dev = &pdev->dev;
183 bool res = true;
184
185 switch (type) {
186 case IRQ_TYPE_INTX:
187 irq = pci_alloc_irq_vectors(dev: pdev, min_vecs: 1, max_vecs: 1, PCI_IRQ_INTX);
188 if (irq < 0)
189 dev_err(dev, "Failed to get Legacy interrupt\n");
190 break;
191 case IRQ_TYPE_MSI:
192 irq = pci_alloc_irq_vectors(dev: pdev, min_vecs: 1, max_vecs: 32, PCI_IRQ_MSI);
193 if (irq < 0)
194 dev_err(dev, "Failed to get MSI interrupts\n");
195 break;
196 case IRQ_TYPE_MSIX:
197 irq = pci_alloc_irq_vectors(dev: pdev, min_vecs: 1, max_vecs: 2048, PCI_IRQ_MSIX);
198 if (irq < 0)
199 dev_err(dev, "Failed to get MSI-X interrupts\n");
200 break;
201 default:
202 dev_err(dev, "Invalid IRQ type selected\n");
203 }
204
205 if (irq < 0) {
206 irq = 0;
207 res = false;
208 }
209
210 test->irq_type = type;
211 test->num_irqs = irq;
212
213 return res;
214}
215
216static void pci_endpoint_test_release_irq(struct pci_endpoint_test *test)
217{
218 int i;
219 struct pci_dev *pdev = test->pdev;
220 struct device *dev = &pdev->dev;
221
222 for (i = 0; i < test->num_irqs; i++)
223 devm_free_irq(dev, irq: pci_irq_vector(dev: pdev, nr: i), dev_id: test);
224
225 test->num_irqs = 0;
226}
227
228static bool pci_endpoint_test_request_irq(struct pci_endpoint_test *test)
229{
230 int i;
231 int err;
232 struct pci_dev *pdev = test->pdev;
233 struct device *dev = &pdev->dev;
234
235 for (i = 0; i < test->num_irqs; i++) {
236 err = devm_request_irq(dev, irq: pci_irq_vector(dev: pdev, nr: i),
237 handler: pci_endpoint_test_irqhandler,
238 IRQF_SHARED, devname: test->name, dev_id: test);
239 if (err)
240 goto fail;
241 }
242
243 return true;
244
245fail:
246 switch (irq_type) {
247 case IRQ_TYPE_INTX:
248 dev_err(dev, "Failed to request IRQ %d for Legacy\n",
249 pci_irq_vector(pdev, i));
250 break;
251 case IRQ_TYPE_MSI:
252 dev_err(dev, "Failed to request IRQ %d for MSI %d\n",
253 pci_irq_vector(pdev, i),
254 i + 1);
255 break;
256 case IRQ_TYPE_MSIX:
257 dev_err(dev, "Failed to request IRQ %d for MSI-X %d\n",
258 pci_irq_vector(pdev, i),
259 i + 1);
260 break;
261 }
262
263 return false;
264}
265
266static const u32 bar_test_pattern[] = {
267 0xA0A0A0A0,
268 0xA1A1A1A1,
269 0xA2A2A2A2,
270 0xA3A3A3A3,
271 0xA4A4A4A4,
272 0xA5A5A5A5,
273};
274
275static bool pci_endpoint_test_bar(struct pci_endpoint_test *test,
276 enum pci_barno barno)
277{
278 int j;
279 u32 val;
280 int size;
281 struct pci_dev *pdev = test->pdev;
282
283 if (!test->bar[barno])
284 return false;
285
286 size = pci_resource_len(pdev, barno);
287
288 if (barno == test->test_reg_bar)
289 size = 0x4;
290
291 for (j = 0; j < size; j += 4)
292 pci_endpoint_test_bar_writel(test, bar: barno, offset: j,
293 value: bar_test_pattern[barno]);
294
295 for (j = 0; j < size; j += 4) {
296 val = pci_endpoint_test_bar_readl(test, bar: barno, offset: j);
297 if (val != bar_test_pattern[barno])
298 return false;
299 }
300
301 return true;
302}
303
304static bool pci_endpoint_test_intx_irq(struct pci_endpoint_test *test)
305{
306 u32 val;
307
308 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_IRQ_TYPE,
309 IRQ_TYPE_INTX);
310 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_IRQ_NUMBER, value: 0);
311 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_COMMAND,
312 COMMAND_RAISE_INTX_IRQ);
313 val = wait_for_completion_timeout(x: &test->irq_raised,
314 timeout: msecs_to_jiffies(m: 1000));
315 if (!val)
316 return false;
317
318 return true;
319}
320
321static bool pci_endpoint_test_msi_irq(struct pci_endpoint_test *test,
322 u16 msi_num, bool msix)
323{
324 u32 val;
325 struct pci_dev *pdev = test->pdev;
326
327 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_IRQ_TYPE,
328 value: msix ? IRQ_TYPE_MSIX : IRQ_TYPE_MSI);
329 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_IRQ_NUMBER, value: msi_num);
330 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_COMMAND,
331 value: msix ? COMMAND_RAISE_MSIX_IRQ :
332 COMMAND_RAISE_MSI_IRQ);
333 val = wait_for_completion_timeout(x: &test->irq_raised,
334 timeout: msecs_to_jiffies(m: 1000));
335 if (!val)
336 return false;
337
338 return pci_irq_vector(dev: pdev, nr: msi_num - 1) == test->last_irq;
339}
340
341static int pci_endpoint_test_validate_xfer_params(struct device *dev,
342 struct pci_endpoint_test_xfer_param *param, size_t alignment)
343{
344 if (!param->size) {
345 dev_dbg(dev, "Data size is zero\n");
346 return -EINVAL;
347 }
348
349 if (param->size > SIZE_MAX - alignment) {
350 dev_dbg(dev, "Maximum transfer data size exceeded\n");
351 return -EINVAL;
352 }
353
354 return 0;
355}
356
357static bool pci_endpoint_test_copy(struct pci_endpoint_test *test,
358 unsigned long arg)
359{
360 struct pci_endpoint_test_xfer_param param;
361 bool ret = false;
362 void *src_addr;
363 void *dst_addr;
364 u32 flags = 0;
365 bool use_dma;
366 size_t size;
367 dma_addr_t src_phys_addr;
368 dma_addr_t dst_phys_addr;
369 struct pci_dev *pdev = test->pdev;
370 struct device *dev = &pdev->dev;
371 void *orig_src_addr;
372 dma_addr_t orig_src_phys_addr;
373 void *orig_dst_addr;
374 dma_addr_t orig_dst_phys_addr;
375 size_t offset;
376 size_t alignment = test->alignment;
377 int irq_type = test->irq_type;
378 u32 src_crc32;
379 u32 dst_crc32;
380 int err;
381
382 err = copy_from_user(to: &param, from: (void __user *)arg, n: sizeof(param));
383 if (err) {
384 dev_err(dev, "Failed to get transfer param\n");
385 return false;
386 }
387
388 err = pci_endpoint_test_validate_xfer_params(dev, param: &param, alignment);
389 if (err)
390 return false;
391
392 size = param.size;
393
394 use_dma = !!(param.flags & PCITEST_FLAGS_USE_DMA);
395 if (use_dma)
396 flags |= FLAG_USE_DMA;
397
398 if (irq_type < IRQ_TYPE_INTX || irq_type > IRQ_TYPE_MSIX) {
399 dev_err(dev, "Invalid IRQ type option\n");
400 goto err;
401 }
402
403 orig_src_addr = kzalloc(size: size + alignment, GFP_KERNEL);
404 if (!orig_src_addr) {
405 dev_err(dev, "Failed to allocate source buffer\n");
406 ret = false;
407 goto err;
408 }
409
410 get_random_bytes(buf: orig_src_addr, len: size + alignment);
411 orig_src_phys_addr = dma_map_single(dev, orig_src_addr,
412 size + alignment, DMA_TO_DEVICE);
413 if (dma_mapping_error(dev, dma_addr: orig_src_phys_addr)) {
414 dev_err(dev, "failed to map source buffer address\n");
415 ret = false;
416 goto err_src_phys_addr;
417 }
418
419 if (alignment && !IS_ALIGNED(orig_src_phys_addr, alignment)) {
420 src_phys_addr = PTR_ALIGN(orig_src_phys_addr, alignment);
421 offset = src_phys_addr - orig_src_phys_addr;
422 src_addr = orig_src_addr + offset;
423 } else {
424 src_phys_addr = orig_src_phys_addr;
425 src_addr = orig_src_addr;
426 }
427
428 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_LOWER_SRC_ADDR,
429 lower_32_bits(src_phys_addr));
430
431 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_UPPER_SRC_ADDR,
432 upper_32_bits(src_phys_addr));
433
434 src_crc32 = crc32_le(crc: ~0, p: src_addr, len: size);
435
436 orig_dst_addr = kzalloc(size: size + alignment, GFP_KERNEL);
437 if (!orig_dst_addr) {
438 dev_err(dev, "Failed to allocate destination address\n");
439 ret = false;
440 goto err_dst_addr;
441 }
442
443 orig_dst_phys_addr = dma_map_single(dev, orig_dst_addr,
444 size + alignment, DMA_FROM_DEVICE);
445 if (dma_mapping_error(dev, dma_addr: orig_dst_phys_addr)) {
446 dev_err(dev, "failed to map destination buffer address\n");
447 ret = false;
448 goto err_dst_phys_addr;
449 }
450
451 if (alignment && !IS_ALIGNED(orig_dst_phys_addr, alignment)) {
452 dst_phys_addr = PTR_ALIGN(orig_dst_phys_addr, alignment);
453 offset = dst_phys_addr - orig_dst_phys_addr;
454 dst_addr = orig_dst_addr + offset;
455 } else {
456 dst_phys_addr = orig_dst_phys_addr;
457 dst_addr = orig_dst_addr;
458 }
459
460 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_LOWER_DST_ADDR,
461 lower_32_bits(dst_phys_addr));
462 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_UPPER_DST_ADDR,
463 upper_32_bits(dst_phys_addr));
464
465 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_SIZE,
466 value: size);
467
468 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_FLAGS, value: flags);
469 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_IRQ_TYPE, value: irq_type);
470 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_IRQ_NUMBER, value: 1);
471 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_COMMAND,
472 COMMAND_COPY);
473
474 wait_for_completion(&test->irq_raised);
475
476 dma_unmap_single(dev, orig_dst_phys_addr, size + alignment,
477 DMA_FROM_DEVICE);
478
479 dst_crc32 = crc32_le(crc: ~0, p: dst_addr, len: size);
480 if (dst_crc32 == src_crc32)
481 ret = true;
482
483err_dst_phys_addr:
484 kfree(objp: orig_dst_addr);
485
486err_dst_addr:
487 dma_unmap_single(dev, orig_src_phys_addr, size + alignment,
488 DMA_TO_DEVICE);
489
490err_src_phys_addr:
491 kfree(objp: orig_src_addr);
492
493err:
494 return ret;
495}
496
497static bool pci_endpoint_test_write(struct pci_endpoint_test *test,
498 unsigned long arg)
499{
500 struct pci_endpoint_test_xfer_param param;
501 bool ret = false;
502 u32 flags = 0;
503 bool use_dma;
504 u32 reg;
505 void *addr;
506 dma_addr_t phys_addr;
507 struct pci_dev *pdev = test->pdev;
508 struct device *dev = &pdev->dev;
509 void *orig_addr;
510 dma_addr_t orig_phys_addr;
511 size_t offset;
512 size_t alignment = test->alignment;
513 int irq_type = test->irq_type;
514 size_t size;
515 u32 crc32;
516 int err;
517
518 err = copy_from_user(to: &param, from: (void __user *)arg, n: sizeof(param));
519 if (err != 0) {
520 dev_err(dev, "Failed to get transfer param\n");
521 return false;
522 }
523
524 err = pci_endpoint_test_validate_xfer_params(dev, param: &param, alignment);
525 if (err)
526 return false;
527
528 size = param.size;
529
530 use_dma = !!(param.flags & PCITEST_FLAGS_USE_DMA);
531 if (use_dma)
532 flags |= FLAG_USE_DMA;
533
534 if (irq_type < IRQ_TYPE_INTX || irq_type > IRQ_TYPE_MSIX) {
535 dev_err(dev, "Invalid IRQ type option\n");
536 goto err;
537 }
538
539 orig_addr = kzalloc(size: size + alignment, GFP_KERNEL);
540 if (!orig_addr) {
541 dev_err(dev, "Failed to allocate address\n");
542 ret = false;
543 goto err;
544 }
545
546 get_random_bytes(buf: orig_addr, len: size + alignment);
547
548 orig_phys_addr = dma_map_single(dev, orig_addr, size + alignment,
549 DMA_TO_DEVICE);
550 if (dma_mapping_error(dev, dma_addr: orig_phys_addr)) {
551 dev_err(dev, "failed to map source buffer address\n");
552 ret = false;
553 goto err_phys_addr;
554 }
555
556 if (alignment && !IS_ALIGNED(orig_phys_addr, alignment)) {
557 phys_addr = PTR_ALIGN(orig_phys_addr, alignment);
558 offset = phys_addr - orig_phys_addr;
559 addr = orig_addr + offset;
560 } else {
561 phys_addr = orig_phys_addr;
562 addr = orig_addr;
563 }
564
565 crc32 = crc32_le(crc: ~0, p: addr, len: size);
566 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_CHECKSUM,
567 value: crc32);
568
569 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_LOWER_SRC_ADDR,
570 lower_32_bits(phys_addr));
571 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_UPPER_SRC_ADDR,
572 upper_32_bits(phys_addr));
573
574 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_SIZE, value: size);
575
576 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_FLAGS, value: flags);
577 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_IRQ_TYPE, value: irq_type);
578 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_IRQ_NUMBER, value: 1);
579 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_COMMAND,
580 COMMAND_READ);
581
582 wait_for_completion(&test->irq_raised);
583
584 reg = pci_endpoint_test_readl(test, PCI_ENDPOINT_TEST_STATUS);
585 if (reg & STATUS_READ_SUCCESS)
586 ret = true;
587
588 dma_unmap_single(dev, orig_phys_addr, size + alignment,
589 DMA_TO_DEVICE);
590
591err_phys_addr:
592 kfree(objp: orig_addr);
593
594err:
595 return ret;
596}
597
598static bool pci_endpoint_test_read(struct pci_endpoint_test *test,
599 unsigned long arg)
600{
601 struct pci_endpoint_test_xfer_param param;
602 bool ret = false;
603 u32 flags = 0;
604 bool use_dma;
605 size_t size;
606 void *addr;
607 dma_addr_t phys_addr;
608 struct pci_dev *pdev = test->pdev;
609 struct device *dev = &pdev->dev;
610 void *orig_addr;
611 dma_addr_t orig_phys_addr;
612 size_t offset;
613 size_t alignment = test->alignment;
614 int irq_type = test->irq_type;
615 u32 crc32;
616 int err;
617
618 err = copy_from_user(to: &param, from: (void __user *)arg, n: sizeof(param));
619 if (err) {
620 dev_err(dev, "Failed to get transfer param\n");
621 return false;
622 }
623
624 err = pci_endpoint_test_validate_xfer_params(dev, param: &param, alignment);
625 if (err)
626 return false;
627
628 size = param.size;
629
630 use_dma = !!(param.flags & PCITEST_FLAGS_USE_DMA);
631 if (use_dma)
632 flags |= FLAG_USE_DMA;
633
634 if (irq_type < IRQ_TYPE_INTX || irq_type > IRQ_TYPE_MSIX) {
635 dev_err(dev, "Invalid IRQ type option\n");
636 goto err;
637 }
638
639 orig_addr = kzalloc(size: size + alignment, GFP_KERNEL);
640 if (!orig_addr) {
641 dev_err(dev, "Failed to allocate destination address\n");
642 ret = false;
643 goto err;
644 }
645
646 orig_phys_addr = dma_map_single(dev, orig_addr, size + alignment,
647 DMA_FROM_DEVICE);
648 if (dma_mapping_error(dev, dma_addr: orig_phys_addr)) {
649 dev_err(dev, "failed to map source buffer address\n");
650 ret = false;
651 goto err_phys_addr;
652 }
653
654 if (alignment && !IS_ALIGNED(orig_phys_addr, alignment)) {
655 phys_addr = PTR_ALIGN(orig_phys_addr, alignment);
656 offset = phys_addr - orig_phys_addr;
657 addr = orig_addr + offset;
658 } else {
659 phys_addr = orig_phys_addr;
660 addr = orig_addr;
661 }
662
663 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_LOWER_DST_ADDR,
664 lower_32_bits(phys_addr));
665 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_UPPER_DST_ADDR,
666 upper_32_bits(phys_addr));
667
668 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_SIZE, value: size);
669
670 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_FLAGS, value: flags);
671 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_IRQ_TYPE, value: irq_type);
672 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_IRQ_NUMBER, value: 1);
673 pci_endpoint_test_writel(test, PCI_ENDPOINT_TEST_COMMAND,
674 COMMAND_WRITE);
675
676 wait_for_completion(&test->irq_raised);
677
678 dma_unmap_single(dev, orig_phys_addr, size + alignment,
679 DMA_FROM_DEVICE);
680
681 crc32 = crc32_le(crc: ~0, p: addr, len: size);
682 if (crc32 == pci_endpoint_test_readl(test, PCI_ENDPOINT_TEST_CHECKSUM))
683 ret = true;
684
685err_phys_addr:
686 kfree(objp: orig_addr);
687err:
688 return ret;
689}
690
691static bool pci_endpoint_test_clear_irq(struct pci_endpoint_test *test)
692{
693 pci_endpoint_test_release_irq(test);
694 pci_endpoint_test_free_irq_vectors(test);
695 return true;
696}
697
698static bool pci_endpoint_test_set_irq(struct pci_endpoint_test *test,
699 int req_irq_type)
700{
701 struct pci_dev *pdev = test->pdev;
702 struct device *dev = &pdev->dev;
703
704 if (req_irq_type < IRQ_TYPE_INTX || req_irq_type > IRQ_TYPE_MSIX) {
705 dev_err(dev, "Invalid IRQ type option\n");
706 return false;
707 }
708
709 if (test->irq_type == req_irq_type)
710 return true;
711
712 pci_endpoint_test_release_irq(test);
713 pci_endpoint_test_free_irq_vectors(test);
714
715 if (!pci_endpoint_test_alloc_irq_vectors(test, type: req_irq_type))
716 goto err;
717
718 if (!pci_endpoint_test_request_irq(test))
719 goto err;
720
721 return true;
722
723err:
724 pci_endpoint_test_free_irq_vectors(test);
725 return false;
726}
727
728static long pci_endpoint_test_ioctl(struct file *file, unsigned int cmd,
729 unsigned long arg)
730{
731 int ret = -EINVAL;
732 enum pci_barno bar;
733 struct pci_endpoint_test *test = to_endpoint_test(file->private_data);
734 struct pci_dev *pdev = test->pdev;
735
736 mutex_lock(&test->mutex);
737
738 reinit_completion(x: &test->irq_raised);
739 test->last_irq = -ENODATA;
740
741 switch (cmd) {
742 case PCITEST_BAR:
743 bar = arg;
744 if (bar > BAR_5)
745 goto ret;
746 if (is_am654_pci_dev(pdev) && bar == BAR_0)
747 goto ret;
748 ret = pci_endpoint_test_bar(test, barno: bar);
749 break;
750 case PCITEST_INTX_IRQ:
751 ret = pci_endpoint_test_intx_irq(test);
752 break;
753 case PCITEST_MSI:
754 case PCITEST_MSIX:
755 ret = pci_endpoint_test_msi_irq(test, msi_num: arg, msix: cmd == PCITEST_MSIX);
756 break;
757 case PCITEST_WRITE:
758 ret = pci_endpoint_test_write(test, arg);
759 break;
760 case PCITEST_READ:
761 ret = pci_endpoint_test_read(test, arg);
762 break;
763 case PCITEST_COPY:
764 ret = pci_endpoint_test_copy(test, arg);
765 break;
766 case PCITEST_SET_IRQTYPE:
767 ret = pci_endpoint_test_set_irq(test, req_irq_type: arg);
768 break;
769 case PCITEST_GET_IRQTYPE:
770 ret = irq_type;
771 break;
772 case PCITEST_CLEAR_IRQ:
773 ret = pci_endpoint_test_clear_irq(test);
774 break;
775 }
776
777ret:
778 mutex_unlock(lock: &test->mutex);
779 return ret;
780}
781
782static const struct file_operations pci_endpoint_test_fops = {
783 .owner = THIS_MODULE,
784 .unlocked_ioctl = pci_endpoint_test_ioctl,
785};
786
787static int pci_endpoint_test_probe(struct pci_dev *pdev,
788 const struct pci_device_id *ent)
789{
790 int err;
791 int id;
792 char name[24];
793 enum pci_barno bar;
794 void __iomem *base;
795 struct device *dev = &pdev->dev;
796 struct pci_endpoint_test *test;
797 struct pci_endpoint_test_data *data;
798 enum pci_barno test_reg_bar = BAR_0;
799 struct miscdevice *misc_device;
800
801 if (pci_is_bridge(dev: pdev))
802 return -ENODEV;
803
804 test = devm_kzalloc(dev, size: sizeof(*test), GFP_KERNEL);
805 if (!test)
806 return -ENOMEM;
807
808 test->test_reg_bar = 0;
809 test->alignment = 0;
810 test->pdev = pdev;
811 test->irq_type = IRQ_TYPE_UNDEFINED;
812
813 if (no_msi)
814 irq_type = IRQ_TYPE_INTX;
815
816 data = (struct pci_endpoint_test_data *)ent->driver_data;
817 if (data) {
818 test_reg_bar = data->test_reg_bar;
819 test->test_reg_bar = test_reg_bar;
820 test->alignment = data->alignment;
821 irq_type = data->irq_type;
822 }
823
824 init_completion(x: &test->irq_raised);
825 mutex_init(&test->mutex);
826
827 if ((dma_set_mask_and_coherent(dev: &pdev->dev, DMA_BIT_MASK(48)) != 0) &&
828 dma_set_mask_and_coherent(dev: &pdev->dev, DMA_BIT_MASK(32)) != 0) {
829 dev_err(dev, "Cannot set DMA mask\n");
830 return -EINVAL;
831 }
832
833 err = pci_enable_device(dev: pdev);
834 if (err) {
835 dev_err(dev, "Cannot enable PCI device\n");
836 return err;
837 }
838
839 err = pci_request_regions(pdev, DRV_MODULE_NAME);
840 if (err) {
841 dev_err(dev, "Cannot obtain PCI resources\n");
842 goto err_disable_pdev;
843 }
844
845 pci_set_master(dev: pdev);
846
847 if (!pci_endpoint_test_alloc_irq_vectors(test, type: irq_type)) {
848 err = -EINVAL;
849 goto err_disable_irq;
850 }
851
852 for (bar = 0; bar < PCI_STD_NUM_BARS; bar++) {
853 if (pci_resource_flags(pdev, bar) & IORESOURCE_MEM) {
854 base = pci_ioremap_bar(pdev, bar);
855 if (!base) {
856 dev_err(dev, "Failed to read BAR%d\n", bar);
857 WARN_ON(bar == test_reg_bar);
858 }
859 test->bar[bar] = base;
860 }
861 }
862
863 test->base = test->bar[test_reg_bar];
864 if (!test->base) {
865 err = -ENOMEM;
866 dev_err(dev, "Cannot perform PCI test without BAR%d\n",
867 test_reg_bar);
868 goto err_iounmap;
869 }
870
871 pci_set_drvdata(pdev, data: test);
872
873 id = ida_alloc(ida: &pci_endpoint_test_ida, GFP_KERNEL);
874 if (id < 0) {
875 err = id;
876 dev_err(dev, "Unable to get id\n");
877 goto err_iounmap;
878 }
879
880 snprintf(buf: name, size: sizeof(name), DRV_MODULE_NAME ".%d", id);
881 test->name = kstrdup(s: name, GFP_KERNEL);
882 if (!test->name) {
883 err = -ENOMEM;
884 goto err_ida_remove;
885 }
886
887 if (!pci_endpoint_test_request_irq(test)) {
888 err = -EINVAL;
889 goto err_kfree_test_name;
890 }
891
892 misc_device = &test->miscdev;
893 misc_device->minor = MISC_DYNAMIC_MINOR;
894 misc_device->name = kstrdup(s: name, GFP_KERNEL);
895 if (!misc_device->name) {
896 err = -ENOMEM;
897 goto err_release_irq;
898 }
899 misc_device->parent = &pdev->dev;
900 misc_device->fops = &pci_endpoint_test_fops;
901
902 err = misc_register(misc: misc_device);
903 if (err) {
904 dev_err(dev, "Failed to register device\n");
905 goto err_kfree_name;
906 }
907
908 return 0;
909
910err_kfree_name:
911 kfree(objp: misc_device->name);
912
913err_release_irq:
914 pci_endpoint_test_release_irq(test);
915
916err_kfree_test_name:
917 kfree(objp: test->name);
918
919err_ida_remove:
920 ida_free(&pci_endpoint_test_ida, id);
921
922err_iounmap:
923 for (bar = 0; bar < PCI_STD_NUM_BARS; bar++) {
924 if (test->bar[bar])
925 pci_iounmap(dev: pdev, test->bar[bar]);
926 }
927
928err_disable_irq:
929 pci_endpoint_test_free_irq_vectors(test);
930 pci_release_regions(pdev);
931
932err_disable_pdev:
933 pci_disable_device(dev: pdev);
934
935 return err;
936}
937
938static void pci_endpoint_test_remove(struct pci_dev *pdev)
939{
940 int id;
941 enum pci_barno bar;
942 struct pci_endpoint_test *test = pci_get_drvdata(pdev);
943 struct miscdevice *misc_device = &test->miscdev;
944
945 if (sscanf(misc_device->name, DRV_MODULE_NAME ".%d", &id) != 1)
946 return;
947 if (id < 0)
948 return;
949
950 pci_endpoint_test_release_irq(test);
951 pci_endpoint_test_free_irq_vectors(test);
952
953 misc_deregister(misc: &test->miscdev);
954 kfree(objp: misc_device->name);
955 kfree(objp: test->name);
956 ida_free(&pci_endpoint_test_ida, id);
957 for (bar = 0; bar < PCI_STD_NUM_BARS; bar++) {
958 if (test->bar[bar])
959 pci_iounmap(dev: pdev, test->bar[bar]);
960 }
961
962 pci_release_regions(pdev);
963 pci_disable_device(dev: pdev);
964}
965
966static const struct pci_endpoint_test_data default_data = {
967 .test_reg_bar = BAR_0,
968 .alignment = SZ_4K,
969 .irq_type = IRQ_TYPE_MSI,
970};
971
972static const struct pci_endpoint_test_data am654_data = {
973 .test_reg_bar = BAR_2,
974 .alignment = SZ_64K,
975 .irq_type = IRQ_TYPE_MSI,
976};
977
978static const struct pci_endpoint_test_data j721e_data = {
979 .alignment = 256,
980 .irq_type = IRQ_TYPE_MSI,
981};
982
983static const struct pci_device_id pci_endpoint_test_tbl[] = {
984 { PCI_DEVICE(PCI_VENDOR_ID_TI, PCI_DEVICE_ID_TI_DRA74x),
985 .driver_data = (kernel_ulong_t)&default_data,
986 },
987 { PCI_DEVICE(PCI_VENDOR_ID_TI, PCI_DEVICE_ID_TI_DRA72x),
988 .driver_data = (kernel_ulong_t)&default_data,
989 },
990 { PCI_DEVICE(PCI_VENDOR_ID_FREESCALE, 0x81c0),
991 .driver_data = (kernel_ulong_t)&default_data,
992 },
993 { PCI_DEVICE(PCI_VENDOR_ID_FREESCALE, PCI_DEVICE_ID_IMX8),},
994 { PCI_DEVICE(PCI_VENDOR_ID_FREESCALE, PCI_DEVICE_ID_LS1088A),
995 .driver_data = (kernel_ulong_t)&default_data,
996 },
997 { PCI_DEVICE_DATA(SYNOPSYS, EDDA, NULL) },
998 { PCI_DEVICE(PCI_VENDOR_ID_TI, PCI_DEVICE_ID_TI_AM654),
999 .driver_data = (kernel_ulong_t)&am654_data
1000 },
1001 { PCI_DEVICE(PCI_VENDOR_ID_RENESAS, PCI_DEVICE_ID_RENESAS_R8A774A1),},
1002 { PCI_DEVICE(PCI_VENDOR_ID_RENESAS, PCI_DEVICE_ID_RENESAS_R8A774B1),},
1003 { PCI_DEVICE(PCI_VENDOR_ID_RENESAS, PCI_DEVICE_ID_RENESAS_R8A774C0),},
1004 { PCI_DEVICE(PCI_VENDOR_ID_RENESAS, PCI_DEVICE_ID_RENESAS_R8A774E1),},
1005 { PCI_DEVICE(PCI_VENDOR_ID_RENESAS, PCI_DEVICE_ID_RENESAS_R8A779F0),
1006 .driver_data = (kernel_ulong_t)&default_data,
1007 },
1008 { PCI_DEVICE(PCI_VENDOR_ID_TI, PCI_DEVICE_ID_TI_J721E),
1009 .driver_data = (kernel_ulong_t)&j721e_data,
1010 },
1011 { PCI_DEVICE(PCI_VENDOR_ID_TI, PCI_DEVICE_ID_TI_J7200),
1012 .driver_data = (kernel_ulong_t)&j721e_data,
1013 },
1014 { PCI_DEVICE(PCI_VENDOR_ID_TI, PCI_DEVICE_ID_TI_AM64),
1015 .driver_data = (kernel_ulong_t)&j721e_data,
1016 },
1017 { PCI_DEVICE(PCI_VENDOR_ID_TI, PCI_DEVICE_ID_TI_J721S2),
1018 .driver_data = (kernel_ulong_t)&j721e_data,
1019 },
1020 { }
1021};
1022MODULE_DEVICE_TABLE(pci, pci_endpoint_test_tbl);
1023
1024static struct pci_driver pci_endpoint_test_driver = {
1025 .name = DRV_MODULE_NAME,
1026 .id_table = pci_endpoint_test_tbl,
1027 .probe = pci_endpoint_test_probe,
1028 .remove = pci_endpoint_test_remove,
1029 .sriov_configure = pci_sriov_configure_simple,
1030};
1031module_pci_driver(pci_endpoint_test_driver);
1032
1033MODULE_DESCRIPTION("PCI ENDPOINT TEST HOST DRIVER");
1034MODULE_AUTHOR("Kishon Vijay Abraham I <kishon@ti.com>");
1035MODULE_LICENSE("GPL v2");
1036

source code of linux/drivers/misc/pci_endpoint_test.c