lin
2025-03-21 c2c82c91f6acd44c57766034b6ced0c53c164a55
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
/*
 * safe read and write memory routines callable while atomic
 *
 * Copyright 2012 Imagination Technologies
 */
 
#include <linux/uaccess.h>
#include <asm/io.h>
 
/*
 * The generic probe_kernel_write() uses the user copy code which can split the
 * writes if the source is unaligned, and repeats writes to make exceptions
 * precise. We override it here to avoid these things happening to memory mapped
 * IO memory where they could have undesired effects.
 * Due to the use of CACHERD instruction this only works on Meta2 onwards.
 */
#ifdef CONFIG_METAG_META21
long probe_kernel_write(void *dst, const void *src, size_t size)
{
   unsigned long ldst = (unsigned long)dst;
   void __iomem *iodst = (void __iomem *)dst;
   unsigned long lsrc = (unsigned long)src;
   const u8 *psrc = (u8 *)src;
   unsigned int pte, i;
   u8 bounce[8] __aligned(8);
 
   if (!size)
       return 0;
 
   /* Use the write combine bit to decide is the destination is MMIO. */
   pte = __builtin_meta2_cacherd(dst);
 
   /* Check the mapping is valid and writeable. */
   if ((pte & (MMCU_ENTRY_WR_BIT | MMCU_ENTRY_VAL_BIT))
       != (MMCU_ENTRY_WR_BIT | MMCU_ENTRY_VAL_BIT))
       return -EFAULT;
 
   /* Fall back to generic version for cases we're not interested in. */
   if (pte & MMCU_ENTRY_WRC_BIT    || /* write combined memory */
       (ldst & (size - 1))        || /* destination unaligned */
       size > 8            || /* more than max write size */
       (size & (size - 1)))       /* non power of 2 size */
       return __probe_kernel_write(dst, src, size);
 
   /* If src is unaligned, copy to the aligned bounce buffer first. */
   if (lsrc & (size - 1)) {
       for (i = 0; i < size; ++i)
           bounce[i] = psrc[i];
       psrc = bounce;
   }
 
   switch (size) {
   case 1:
       writeb(*psrc, iodst);
       break;
   case 2:
       writew(*(const u16 *)psrc, iodst);
       break;
   case 4:
       writel(*(const u32 *)psrc, iodst);
       break;
   case 8:
       writeq(*(const u64 *)psrc, iodst);
       break;
   }
   return 0;
}
#endif