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
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
|
/* target operations
* Copyright (C) 2005 Red Hat Inc.
* Copyright (C) 2005 Intel Corporation.
*
* This file is part of systemtap, and is free software. You can
* redistribute it and/or modify it under the terms of the GNU General
* Public License (GPL); either version 2, or (at your option) any
* later version.
*/
#include <linux/types.h>
#define intptr_t long
#define uintptr_t unsigned long
/* These three macro definitions are generic, just shorthands
used by the generated code. */
#define op_abs(x) (x < 0 ? -x : x)
#define fetch_bitfield(target, base, higherbits, nbits) \
target = (((base) >> (sizeof (base) * 8 - (higherbits) - (nbits))) \
& (((__typeof (base)) 1 << (nbits)) - 1))
#define store_bitfield(target, base, higherbits, nbits) \
target = (target \
&~ ((((__typeof (base)) 1 << (nbits)) - 1) \
<< (sizeof (base) * 8 - (higherbits) - (nbits))) \
| ((__typeof (base)) (base) \
<< (sizeof (base) * 8 - (higherbits) - (nbits))))
/* These operations are target-specific. */
#include <asm/uaccess.h>
#define fetch_register(regno) \
((intptr_t) dwarf_register_##regno (c->regs))
#define store_register(regno, value) \
(dwarf_register_##regno (c->regs) = (value))
#if defined __i386__
/* The stack pointer is unlike other registers. When a trap happens in
kernel mode, it is not saved in the trap frame (struct pt_regs).
The `esp' (and `xss') fields are valid only for a user-mode trap.
For a kernel mode trap, the interrupted state's esp is actually an
address inside where the `struct pt_regs' on the kernel trap stack points.
For now we assume all traps are from kprobes in kernel-mode code.
For extra paranoia, could do BUG_ON((regs->xcs & 3) == 3). */
#define dwarf_register_0(regs) regs->eax
#define dwarf_register_1(regs) regs->ecx
#define dwarf_register_2(regs) regs->edx
#define dwarf_register_3(regs) regs->ebx
#define dwarf_register_4(regs) ((long) ®s->esp)
#define dwarf_register_5(regs) regs->ebp
#define dwarf_register_6(regs) regs->esi
#define dwarf_register_7(regs) regs->edi
#elif defined __ia64__
#undef fetch_register
#undef store_register
#define fetch_register(regno) ia64_fetch_register(regno, c->regs)
#define store_register(regno, value) ia64_store_register(regno, c->regs, value)
#elif defined __x86_64__
#define dwarf_register_0(regs) regs->rax
#define dwarf_register_1(regs) regs->rdx
#define dwarf_register_2(regs) regs->rcx
#define dwarf_register_3(regs) regs->rbx
#define dwarf_register_4(regs) regs->rsi
#define dwarf_register_5(regs) regs->rdi
#define dwarf_register_6(regs) regs->rbp
#define dwarf_register_7(regs) regs->rsp
#define dwarf_register_8(regs) regs->r8
#define dwarf_register_9(regs) regs->r9
#define dwarf_register_10(regs) regs->r10
#define dwarf_register_11(regs) regs->r11
#define dwarf_register_12(regs) regs->r12
#define dwarf_register_13(regs) regs->r13
#define dwarf_register_14(regs) regs->r14
#define dwarf_register_15(regs) regs->r15
#elif defined __powerpc__
#undef fetch_register
#undef store_register
#define fetch_register(regno) ((intptr_t) c->regs->gpr[regno])
#define store_register(regno) (c->regs->gpr[regno] = (value))
#endif
#if defined __i386__ || defined __x86_64__
#define deref(size, addr) \
({ \
int _bad = 0; \
u8 _b; u16 _w; u32 _l; u64 _q; \
intptr_t _v; \
switch (size) \
{ \
case 1: __get_user_asm(_b,addr,_bad,"b","b","=q",1); _v = _b; break; \
case 2: __get_user_asm(_w,addr,_bad,"w","w","=r",1); _v = _w; break; \
case 4: __get_user_asm(_l,addr,_bad,"l","","=r",1); _v = _l; break; \
case 8: __get_user_asm(_q,addr,_bad,"q","","=r",1); _v = _q; break; \
default: _v = __get_user_bad(); \
} \
if (_bad) \
goto deref_fault; \
_v; \
})
#define store_deref(size, addr, value) \
({ \
int _bad = 0; \
switch (size) \
{ \
case 1: __put_user_asm(((u8)(value)),addr,_bad,"b","b","iq",1); break; \
case 2: __put_user_asm(((u16)(value)),addr,_bad,"w","w","ir",1); break; \
case 4: __put_user_asm(((u32)(value)),addr,_bad,"l","k","ir",1); break; \
case 8: __put_user_asm(((u64)(value)),addr,_bad,"q","","ir",1); break; \
default: __put_user_bad(); \
} \
if (_bad) \
goto deref_fault; \
})
#elif defined __ia64__
#define deref(size, addr) \
({ \
int _bad = 0; \
intptr_t _v=0; \
switch (size){ \
case 1: __get_user_size(_v, addr, 1, _bad); break; \
case 2: __get_user_size(_v, addr, 2, _bad); break; \
case 4: __get_user_size(_v, addr, 4, _bad); break; \
case 8: __get_user_size(_v, addr, 8, _bad); break; \
default: __get_user_unknown(); break; \
} \
if (_bad) \
goto deref_fault; \
_v; \
})
#define store_deref(size, addr, value) \
({ \
int _bad=0; \
switch (size){ \
case 1: __put_user_size(value, addr, 1, _bad); break; \
case 2: __put_user_size(value, addr, 2, _bad); break; \
case 4: __put_user_size(value, addr, 4, _bad); break; \
case 8: __put_user_size(value, addr, 8, _bad); break; \
default: __put_user_unknown(); break; \
} \
if (_bad) \
goto deref_fault; \
})
#elif defined __powerpc__ || defined __powerpc64__
#if defined __powerpc64__
#define STP_PPC_LONG ".llong "
#else
#define STP_PPC_LONG ".long "
#endif
#define __stp_get_user_asm(x, addr, err, op) \
__asm__ __volatile__( \
"1: "op" %1,0(%2) # get_user\n" \
"2:\n" \
".section .fixup,\"ax\"\n" \
"3: li %0,%3\n" \
" li %1,0\n" \
" b 2b\n" \
".previous\n" \
".section __ex_table,\"a\"\n" \
" .balign %5\n" \
STP_PPC_LONG "1b,3b\n" \
".previous" \
: "=r" (err), "=r" (x) \
: "b" (addr), "i" (-EFAULT), "0" (err), \
"i"(sizeof(unsigned long)))
#define _stp_put_user_asm(x, addr, err, op) \
__asm__ __volatile__( \
"1: " op " %1,0(%2) # put_user\n" \
"2:\n" \
".section .fixup,\"ax\"\n" \
"3: li %0,%3\n" \
" b 2b\n" \
".previous\n" \
".section __ex_table,\"a\"\n" \
" .balign %5\n" \
STP_PPC_LONG "1b,3b\n" \
".previous" \
: "=r" (err) \
: "r" (x), "b" (addr), "i" (-EFAULT), "0" (err),\
"i"(sizeof(unsigned long)))
#define deref(size, addr) \
({ \
int _bad = 0; \
intptr_t _v; \
switch (size) \
{ \
case 1: __stp_get_user_asm(_v,addr,_bad,"lbz"); break; \
case 2: __stp_get_user_asm(_v,addr,_bad,"lhz"); break; \
case 4: __stp_get_user_asm(_v,addr,_bad,"lwz"); break; \
case 8: __stp_get_user_asm(_v,addr,_bad,"ld"); break; \
default: _v = __get_user_bad(); \
} \
if (_bad) \
goto deref_fault; \
_v; \
})
#define store_deref(size, addr, value) \
({ \
int _bad = 0; \
switch (size) \
{ \
case 1: __stp_put_user_asm(((u8)(value)),addr,_bad,"stb"); break; \
case 2: __stp_put_user_asm(((u16)(value)),addr,_bad,"sth"); break; \
case 4: __stp_put_user_asm(((u32)(value)),addr,_bad,"stw"); break; \
case 8: __stp_put_user_asm(((u64)(value)),addr,_bad); break; \
default: __stp_put_user_bad(); \
} \
if (_bad) \
goto deref_fault; \
})
#endif
#define deref_string(dst, addr, maxbytes) \
({ \
uintptr_t _addr; \
size_t _len; \
unsigned char _c; \
char *_d = (dst); \
for (_len = (maxbytes), _addr = (addr); \
_len > 1 && (_c = deref (1, _addr)) != '\0'; \
--_len, ++_addr) \
*_d++ = _c; \
*_d = '\0'; \
(dst); \
})
|
