1 /* SPDX-License-Identifier: GPL-2.0-or-later */
2 #ifndef _ASM_POWERPC_INST_H
3 #define _ASM_POWERPC_INST_H
4
5 #include <asm/ppc-opcode.h>
6 #include <asm/reg.h>
7 #include <asm/disassemble.h>
8 #include <asm/uaccess.h>
9
10 #define ___get_user_instr(gu_op, dest, ptr) \
11 ({ \
12 long __gui_ret; \
13 u32 __user *__gui_ptr = (u32 __user *)ptr; \
14 ppc_inst_t __gui_inst; \
15 unsigned int __prefix, __suffix; \
16 \
17 __chk_user_ptr(ptr); \
18 __gui_ret = gu_op(__prefix, __gui_ptr); \
19 if (__gui_ret == 0) { \
20 if (IS_ENABLED(CONFIG_PPC64) && (__prefix >> 26) == OP_PREFIX) { \
21 __gui_ret = gu_op(__suffix, __gui_ptr + 1); \
22 __gui_inst = ppc_inst_prefix(__prefix, __suffix); \
23 } else { \
24 __gui_inst = ppc_inst(__prefix); \
25 } \
26 if (__gui_ret == 0) \
27 (dest) = __gui_inst; \
28 } \
29 __gui_ret; \
30 })
31
32 #define get_user_instr(x, ptr) ___get_user_instr(get_user, x, ptr)
33
34 #define __get_user_instr(x, ptr) ___get_user_instr(__get_user, x, ptr)
35
36 /*
37 * Instruction data type for POWER
38 */
39
40 #if defined(CONFIG_PPC64) || defined(__CHECKER__)
ppc_inst_val(ppc_inst_t x)41 static inline u32 ppc_inst_val(ppc_inst_t x)
42 {
43 return x.val;
44 }
45
46 #define ppc_inst(x) ((ppc_inst_t){ .val = (x) })
47
48 #else
ppc_inst_val(ppc_inst_t x)49 static inline u32 ppc_inst_val(ppc_inst_t x)
50 {
51 return x;
52 }
53 #define ppc_inst(x) (x)
54 #endif
55
ppc_inst_primary_opcode(ppc_inst_t x)56 static inline int ppc_inst_primary_opcode(ppc_inst_t x)
57 {
58 return ppc_inst_val(x) >> 26;
59 }
60
61 #ifdef CONFIG_PPC64
62 #define ppc_inst_prefix(x, y) ((ppc_inst_t){ .val = (x), .suffix = (y) })
63
ppc_inst_suffix(ppc_inst_t x)64 static inline u32 ppc_inst_suffix(ppc_inst_t x)
65 {
66 return x.suffix;
67 }
68
69 #else
70 #define ppc_inst_prefix(x, y) ((void)y, ppc_inst(x))
71
ppc_inst_suffix(ppc_inst_t x)72 static inline u32 ppc_inst_suffix(ppc_inst_t x)
73 {
74 return 0;
75 }
76
77 #endif /* CONFIG_PPC64 */
78
ppc_inst_read(const u32 * ptr)79 static inline ppc_inst_t ppc_inst_read(const u32 *ptr)
80 {
81 if (IS_ENABLED(CONFIG_PPC64) && (*ptr >> 26) == OP_PREFIX)
82 return ppc_inst_prefix(*ptr, *(ptr + 1));
83 else
84 return ppc_inst(*ptr);
85 }
86
ppc_inst_prefixed(ppc_inst_t x)87 static inline bool ppc_inst_prefixed(ppc_inst_t x)
88 {
89 return IS_ENABLED(CONFIG_PPC64) && ppc_inst_primary_opcode(x) == OP_PREFIX;
90 }
91
ppc_inst_swab(ppc_inst_t x)92 static inline ppc_inst_t ppc_inst_swab(ppc_inst_t x)
93 {
94 return ppc_inst_prefix(swab32(ppc_inst_val(x)), swab32(ppc_inst_suffix(x)));
95 }
96
ppc_inst_equal(ppc_inst_t x,ppc_inst_t y)97 static inline bool ppc_inst_equal(ppc_inst_t x, ppc_inst_t y)
98 {
99 if (ppc_inst_val(x) != ppc_inst_val(y))
100 return false;
101 if (!ppc_inst_prefixed(x))
102 return true;
103 return ppc_inst_suffix(x) == ppc_inst_suffix(y);
104 }
105
ppc_inst_len(ppc_inst_t x)106 static inline int ppc_inst_len(ppc_inst_t x)
107 {
108 return ppc_inst_prefixed(x) ? 8 : 4;
109 }
110
111 /*
112 * Return the address of the next instruction, if the instruction @value was
113 * located at @location.
114 */
ppc_inst_next(u32 * location,u32 * value)115 static inline u32 *ppc_inst_next(u32 *location, u32 *value)
116 {
117 ppc_inst_t tmp;
118
119 tmp = ppc_inst_read(value);
120
121 return (void *)location + ppc_inst_len(tmp);
122 }
123
ppc_inst_as_ulong(ppc_inst_t x)124 static inline unsigned long ppc_inst_as_ulong(ppc_inst_t x)
125 {
126 if (IS_ENABLED(CONFIG_PPC32))
127 return ppc_inst_val(x);
128 else if (IS_ENABLED(CONFIG_CPU_LITTLE_ENDIAN))
129 return (u64)ppc_inst_suffix(x) << 32 | ppc_inst_val(x);
130 else
131 return (u64)ppc_inst_val(x) << 32 | ppc_inst_suffix(x);
132 }
133
ppc_inst_write(u32 * ptr,ppc_inst_t x)134 static inline void ppc_inst_write(u32 *ptr, ppc_inst_t x)
135 {
136 if (!ppc_inst_prefixed(x))
137 *ptr = ppc_inst_val(x);
138 else
139 *(u64 *)ptr = ppc_inst_as_ulong(x);
140 }
141
142 #define PPC_INST_STR_LEN sizeof("00000000 00000000")
143
__ppc_inst_as_str(char str[PPC_INST_STR_LEN],ppc_inst_t x)144 static inline char *__ppc_inst_as_str(char str[PPC_INST_STR_LEN], ppc_inst_t x)
145 {
146 if (ppc_inst_prefixed(x))
147 sprintf(str, "%08x %08x", ppc_inst_val(x), ppc_inst_suffix(x));
148 else
149 sprintf(str, "%08x", ppc_inst_val(x));
150
151 return str;
152 }
153
154 #define ppc_inst_as_str(x) \
155 ({ \
156 char __str[PPC_INST_STR_LEN]; \
157 __ppc_inst_as_str(__str, x); \
158 __str; \
159 })
160
__copy_inst_from_kernel_nofault(ppc_inst_t * inst,u32 * src)161 static inline int __copy_inst_from_kernel_nofault(ppc_inst_t *inst, u32 *src)
162 {
163 unsigned int val, suffix;
164
165 /* See https://github.com/ClangBuiltLinux/linux/issues/1521 */
166 #if defined(CONFIG_CC_IS_CLANG) && CONFIG_CLANG_VERSION < 140000
167 val = suffix = 0;
168 #endif
169 __get_kernel_nofault(&val, src, u32, Efault);
170 if (IS_ENABLED(CONFIG_PPC64) && get_op(val) == OP_PREFIX) {
171 __get_kernel_nofault(&suffix, src + 1, u32, Efault);
172 *inst = ppc_inst_prefix(val, suffix);
173 } else {
174 *inst = ppc_inst(val);
175 }
176 return 0;
177 Efault:
178 return -EFAULT;
179 }
180
copy_inst_from_kernel_nofault(ppc_inst_t * inst,u32 * src)181 static inline int copy_inst_from_kernel_nofault(ppc_inst_t *inst, u32 *src)
182 {
183 if (unlikely(!is_kernel_addr((unsigned long)src)))
184 return -ERANGE;
185
186 return __copy_inst_from_kernel_nofault(inst, src);
187 }
188
189 #endif /* _ASM_POWERPC_INST_H */
190