1 /* SPDX-License-Identifier: (GPL-2.0-only or LGPL-2.1-only)
3 * probes/lttng-kretprobes.c
5 * LTTng kretprobes integration module.
7 * Copyright (C) 2009-2012 Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
10 #include <linux/module.h>
11 #include <wrapper/kprobes.h>
12 #include <linux/slab.h>
13 #include <linux/kref.h>
14 #include <lttng/events.h>
15 #include <lttng/events-internal.h>
16 #include <ringbuffer/frontend_types.h>
17 #include <wrapper/vmalloc.h>
18 #include <wrapper/irqflags.h>
19 #include <lttng/tracer.h>
20 #include <blacklist/kprobes.h>
22 enum lttng_kretprobe_type
{
29 struct lttng_kernel_event_common
*event
[2]; /* ENTRY and EXIT */
30 struct kref kref_register
;
31 struct kref kref_alloc
;
35 int _lttng_kretprobes_handler(struct kretprobe_instance
*krpi
,
37 enum lttng_kretprobe_type type
)
39 struct lttng_krp
*lttng_krp
=
40 container_of(lttng_get_kretprobe(krpi
), struct lttng_krp
, krp
);
41 struct lttng_kernel_event_common
*event
= lttng_krp
->event
[type
];
42 struct lttng_kernel_probe_ctx lttng_probe_ctx
= {
44 .interruptible
= !lttng_regs_irqs_disabled(regs
),
48 unsigned long parent_ip
;
51 switch (event
->type
) {
52 case LTTNG_KERNEL_EVENT_TYPE_RECORDER
:
54 struct lttng_kernel_event_recorder
*event_recorder
=
55 container_of(event
, struct lttng_kernel_event_recorder
, parent
);
56 struct lttng_channel
*chan
= event_recorder
->chan
;
58 if (unlikely(!LTTNG_READ_ONCE(chan
->session
->active
)))
60 if (unlikely(!LTTNG_READ_ONCE(chan
->enabled
)))
64 case LTTNG_KERNEL_EVENT_TYPE_NOTIFIER
: /* Fall-through. */
69 if (unlikely(!LTTNG_READ_ONCE(event
->enabled
)))
72 switch (event
->type
) {
73 case LTTNG_KERNEL_EVENT_TYPE_RECORDER
:
75 struct lttng_kernel_event_recorder
*event_recorder
=
76 container_of(event
, struct lttng_kernel_event_recorder
, parent
);
77 struct lttng_channel
*chan
= event_recorder
->chan
;
78 struct lib_ring_buffer_ctx ctx
;
81 payload
.ip
= (unsigned long) lttng_get_kretprobe(krpi
)->kp
.addr
;
82 payload
.parent_ip
= (unsigned long) krpi
->ret_addr
;
84 lib_ring_buffer_ctx_init(&ctx
, event_recorder
, sizeof(payload
),
85 lttng_alignof(payload
), <tng_probe_ctx
);
86 ret
= chan
->ops
->event_reserve(&ctx
);
89 lib_ring_buffer_align_ctx(&ctx
, lttng_alignof(payload
));
90 chan
->ops
->event_write(&ctx
, &payload
, sizeof(payload
));
91 chan
->ops
->event_commit(&ctx
);
94 case LTTNG_KERNEL_EVENT_TYPE_NOTIFIER
: /* Fall-through. */
102 int lttng_kretprobes_handler_entry(struct kretprobe_instance
*krpi
,
103 struct pt_regs
*regs
)
105 return _lttng_kretprobes_handler(krpi
, regs
, EVENT_ENTRY
);
109 int lttng_kretprobes_handler_exit(struct kretprobe_instance
*krpi
,
110 struct pt_regs
*regs
)
112 return _lttng_kretprobes_handler(krpi
, regs
, EVENT_EXIT
);
115 static const struct lttng_kernel_type_common
*event_type
=
116 lttng_kernel_static_type_integer_from_type(unsigned long, __BYTE_ORDER
, 16);
119 * Create event description
122 int lttng_create_kprobe_event(const char *name
, struct lttng_kernel_event_recorder
*event_recorder
,
123 enum lttng_kretprobe_type type
)
125 const struct lttng_kernel_event_field
**fieldp_array
;
126 struct lttng_kernel_event_field
*field
;
127 struct lttng_kernel_event_desc
*desc
;
130 const char *suffix
= NULL
;
133 desc
= kzalloc(sizeof(*desc
), GFP_KERNEL
);
136 name_len
= strlen(name
);
145 name_len
+= strlen(suffix
);
146 alloc_name
= kmalloc(name_len
+ 1, GFP_KERNEL
);
151 strcpy(alloc_name
, name
);
152 strcat(alloc_name
, suffix
);
153 desc
->event_name
= alloc_name
;
155 fieldp_array
= kzalloc(desc
->nr_fields
* sizeof(struct lttng_kernel_event_field
*), GFP_KERNEL
);
158 goto error_fieldp_array
;
160 desc
->fields
= fieldp_array
;
162 field
= kzalloc(sizeof(struct lttng_kernel_event_field
), GFP_KERNEL
);
168 field
->type
= event_type
;
169 desc
->fields
[0] = field
;
171 field
= kzalloc(sizeof(struct lttng_kernel_event_field
), GFP_KERNEL
);
176 field
->name
= "parent_ip";
177 field
->type
= event_type
;
178 desc
->fields
[1] = field
;
180 desc
->owner
= THIS_MODULE
;
181 event_recorder
->priv
->parent
.desc
= desc
;
186 kfree(desc
->fields
[0]);
190 kfree(desc
->event_name
);
196 int lttng_kretprobes_register(const char *name
,
197 const char *symbol_name
,
200 struct lttng_kernel_event_recorder
*event_recorder_entry
,
201 struct lttng_kernel_event_recorder
*event_recorder_exit
)
204 struct lttng_krp
*lttng_krp
;
206 /* Kprobes expects a NULL symbol name if unused */
207 if (symbol_name
[0] == '\0')
210 ret
= lttng_create_kprobe_event(name
, event_recorder_entry
, EVENT_ENTRY
);
213 ret
= lttng_create_kprobe_event(name
, event_recorder_exit
, EVENT_EXIT
);
215 goto event_exit_error
;
216 lttng_krp
= kzalloc(sizeof(*lttng_krp
), GFP_KERNEL
);
219 lttng_krp
->krp
.entry_handler
= lttng_kretprobes_handler_entry
;
220 lttng_krp
->krp
.handler
= lttng_kretprobes_handler_exit
;
224 alloc_symbol
= kstrdup(symbol_name
, GFP_KERNEL
);
229 lttng_krp
->krp
.kp
.symbol_name
=
231 event_recorder_entry
->priv
->parent
.u
.kretprobe
.symbol_name
=
233 event_recorder_exit
->priv
->parent
.u
.kretprobe
.symbol_name
=
236 lttng_krp
->krp
.kp
.offset
= offset
;
237 lttng_krp
->krp
.kp
.addr
= (void *) (unsigned long) addr
;
239 /* Allow probe handler to find event structures */
240 lttng_krp
->event
[EVENT_ENTRY
] = &event_recorder_entry
->parent
;
241 lttng_krp
->event
[EVENT_EXIT
] = &event_recorder_exit
->parent
;
242 event_recorder_entry
->priv
->parent
.u
.kretprobe
.lttng_krp
= lttng_krp
;
243 event_recorder_exit
->priv
->parent
.u
.kretprobe
.lttng_krp
= lttng_krp
;
246 * Both events must be unregistered before the kretprobe is
247 * unregistered. Same for memory allocation.
249 kref_init(<tng_krp
->kref_alloc
);
250 kref_get(<tng_krp
->kref_alloc
); /* inc refcount to 2, no overflow. */
251 kref_init(<tng_krp
->kref_register
);
252 kref_get(<tng_krp
->kref_register
); /* inc refcount to 2, no overflow. */
255 * Ensure the memory we just allocated don't trigger page faults.
256 * Well.. kprobes itself puts the page fault handler on the blacklist,
257 * but we can never be too careful.
259 wrapper_vmalloc_sync_mappings();
261 ret
= register_kretprobe(<tng_krp
->krp
);
267 kfree(lttng_krp
->krp
.kp
.symbol_name
);
271 kfree(event_recorder_exit
->priv
->parent
.desc
->fields
[0]);
272 kfree(event_recorder_exit
->priv
->parent
.desc
->fields
[1]);
273 kfree(event_recorder_exit
->priv
->parent
.desc
->fields
);
274 kfree(event_recorder_exit
->priv
->parent
.desc
->event_name
);
275 kfree(event_recorder_exit
->priv
->parent
.desc
);
277 kfree(event_recorder_entry
->priv
->parent
.desc
->fields
[0]);
278 kfree(event_recorder_entry
->priv
->parent
.desc
->fields
[1]);
279 kfree(event_recorder_entry
->priv
->parent
.desc
->fields
);
280 kfree(event_recorder_entry
->priv
->parent
.desc
->event_name
);
281 kfree(event_recorder_entry
->priv
->parent
.desc
);
285 EXPORT_SYMBOL_GPL(lttng_kretprobes_register
);
288 void _lttng_kretprobes_unregister_release(struct kref
*kref
)
290 struct lttng_krp
*lttng_krp
=
291 container_of(kref
, struct lttng_krp
, kref_register
);
292 unregister_kretprobe(<tng_krp
->krp
);
295 void lttng_kretprobes_unregister(struct lttng_kernel_event_recorder
*event_recorder
)
297 kref_put(&event_recorder
->priv
->parent
.u
.kretprobe
.lttng_krp
->kref_register
,
298 _lttng_kretprobes_unregister_release
);
300 EXPORT_SYMBOL_GPL(lttng_kretprobes_unregister
);
303 void _lttng_kretprobes_release(struct kref
*kref
)
305 struct lttng_krp
*lttng_krp
=
306 container_of(kref
, struct lttng_krp
, kref_alloc
);
307 kfree(lttng_krp
->krp
.kp
.symbol_name
);
310 void lttng_kretprobes_destroy_private(struct lttng_kernel_event_recorder
*event_recorder
)
312 kfree(event_recorder
->priv
->parent
.desc
->fields
[0]);
313 kfree(event_recorder
->priv
->parent
.desc
->fields
[1]);
314 kfree(event_recorder
->priv
->parent
.desc
->fields
);
315 kfree(event_recorder
->priv
->parent
.desc
->event_name
);
316 kfree(event_recorder
->priv
->parent
.desc
);
317 kref_put(&event_recorder
->priv
->parent
.u
.kretprobe
.lttng_krp
->kref_alloc
,
318 _lttng_kretprobes_release
);
320 EXPORT_SYMBOL_GPL(lttng_kretprobes_destroy_private
);
322 int lttng_kretprobes_event_enable_state(struct lttng_kernel_event_common
*event
,
325 struct lttng_kernel_event_common
*event_exit
;
326 struct lttng_krp
*lttng_krp
;
328 if (event
->priv
->instrumentation
!= LTTNG_KERNEL_ABI_KRETPROBE
) {
331 if (event
->enabled
== enable
) {
334 lttng_krp
= event
->priv
->u
.kretprobe
.lttng_krp
;
335 event_exit
= lttng_krp
->event
[EVENT_EXIT
];
336 WRITE_ONCE(event
->enabled
, enable
);
337 WRITE_ONCE(event_exit
->enabled
, enable
);
340 EXPORT_SYMBOL_GPL(lttng_kretprobes_event_enable_state
);
342 MODULE_LICENSE("GPL and additional rights");
343 MODULE_AUTHOR("Mathieu Desnoyers <mathieu.desnoyers@efficios.com>");
344 MODULE_DESCRIPTION("LTTng kretprobes probes");
345 MODULE_VERSION(__stringify(LTTNG_MODULES_MAJOR_VERSION
) "."
346 __stringify(LTTNG_MODULES_MINOR_VERSION
) "."
347 __stringify(LTTNG_MODULES_PATCHLEVEL_VERSION
)
348 LTTNG_MODULES_EXTRAVERSION
);