1 // SPDX-License-Identifier: GPL-2.0
3 * Common code for probe-based Dynamic events.
5 * This code was copied from kernel/trace/trace_kprobe.c written by
6 * Masami Hiramatsu <masami.hiramatsu.pt@hitachi.com>
8 * Updates to make this generic:
9 * Copyright (C) IBM Corporation, 2010-2011
10 * Author: Srikar Dronamraju
12 #define pr_fmt(fmt) "trace_probe: " fmt
14 #include "trace_probe.h"
19 static const char *trace_probe_err_text
[] = { ERRORS
};
21 static const char *reserved_field_names
[] = {
24 "common_preempt_count",
32 /* Printing in basic type function template */
33 #define DEFINE_BASIC_PRINT_TYPE_FUNC(tname, type, fmt) \
34 int PRINT_TYPE_FUNC_NAME(tname)(struct trace_seq *s, void *data, void *ent)\
36 trace_seq_printf(s, fmt, *(type *)data); \
37 return !trace_seq_has_overflowed(s); \
39 const char PRINT_TYPE_FMT_NAME(tname)[] = fmt;
41 DEFINE_BASIC_PRINT_TYPE_FUNC(u8
, u8
, "%u")
42 DEFINE_BASIC_PRINT_TYPE_FUNC(u16
, u16
, "%u")
43 DEFINE_BASIC_PRINT_TYPE_FUNC(u32
, u32
, "%u")
44 DEFINE_BASIC_PRINT_TYPE_FUNC(u64
, u64
, "%Lu")
45 DEFINE_BASIC_PRINT_TYPE_FUNC(s8
, s8
, "%d")
46 DEFINE_BASIC_PRINT_TYPE_FUNC(s16
, s16
, "%d")
47 DEFINE_BASIC_PRINT_TYPE_FUNC(s32
, s32
, "%d")
48 DEFINE_BASIC_PRINT_TYPE_FUNC(s64
, s64
, "%Ld")
49 DEFINE_BASIC_PRINT_TYPE_FUNC(x8
, u8
, "0x%x")
50 DEFINE_BASIC_PRINT_TYPE_FUNC(x16
, u16
, "0x%x")
51 DEFINE_BASIC_PRINT_TYPE_FUNC(x32
, u32
, "0x%x")
52 DEFINE_BASIC_PRINT_TYPE_FUNC(x64
, u64
, "0x%Lx")
54 int PRINT_TYPE_FUNC_NAME(symbol
)(struct trace_seq
*s
, void *data
, void *ent
)
56 trace_seq_printf(s
, "%pS", (void *)*(unsigned long *)data
);
57 return !trace_seq_has_overflowed(s
);
59 const char PRINT_TYPE_FMT_NAME(symbol
)[] = "%pS";
61 /* Print type function for string type */
62 int PRINT_TYPE_FUNC_NAME(string
)(struct trace_seq
*s
, void *data
, void *ent
)
64 int len
= *(u32
*)data
>> 16;
67 trace_seq_puts(s
, "(fault)");
69 trace_seq_printf(s
, "\"%s\"",
70 (const char *)get_loc_data(data
, ent
));
71 return !trace_seq_has_overflowed(s
);
74 const char PRINT_TYPE_FMT_NAME(string
)[] = "\\\"%s\\\"";
76 /* Fetch type information table */
77 static const struct fetch_type probe_fetch_types
[] = {
79 __ASSIGN_FETCH_TYPE("string", string
, string
, sizeof(u32
), 1,
81 __ASSIGN_FETCH_TYPE("ustring", string
, string
, sizeof(u32
), 1,
84 ASSIGN_FETCH_TYPE(u8
, u8
, 0),
85 ASSIGN_FETCH_TYPE(u16
, u16
, 0),
86 ASSIGN_FETCH_TYPE(u32
, u32
, 0),
87 ASSIGN_FETCH_TYPE(u64
, u64
, 0),
88 ASSIGN_FETCH_TYPE(s8
, u8
, 1),
89 ASSIGN_FETCH_TYPE(s16
, u16
, 1),
90 ASSIGN_FETCH_TYPE(s32
, u32
, 1),
91 ASSIGN_FETCH_TYPE(s64
, u64
, 1),
92 ASSIGN_FETCH_TYPE_ALIAS(x8
, u8
, u8
, 0),
93 ASSIGN_FETCH_TYPE_ALIAS(x16
, u16
, u16
, 0),
94 ASSIGN_FETCH_TYPE_ALIAS(x32
, u32
, u32
, 0),
95 ASSIGN_FETCH_TYPE_ALIAS(x64
, u64
, u64
, 0),
96 ASSIGN_FETCH_TYPE_ALIAS(symbol
, ADDR_FETCH_TYPE
, ADDR_FETCH_TYPE
, 0),
101 static const struct fetch_type
*find_fetch_type(const char *type
)
106 type
= DEFAULT_FETCH_TYPE_STR
;
108 /* Special case: bitfield */
112 type
= strchr(type
, '/');
117 if (kstrtoul(type
, 0, &bs
))
122 return find_fetch_type("u8");
124 return find_fetch_type("u16");
126 return find_fetch_type("u32");
128 return find_fetch_type("u64");
134 for (i
= 0; probe_fetch_types
[i
].name
; i
++) {
135 if (strcmp(type
, probe_fetch_types
[i
].name
) == 0)
136 return &probe_fetch_types
[i
];
143 static struct trace_probe_log trace_probe_log
;
145 void trace_probe_log_init(const char *subsystem
, int argc
, const char **argv
)
147 trace_probe_log
.subsystem
= subsystem
;
148 trace_probe_log
.argc
= argc
;
149 trace_probe_log
.argv
= argv
;
150 trace_probe_log
.index
= 0;
153 void trace_probe_log_clear(void)
155 memset(&trace_probe_log
, 0, sizeof(trace_probe_log
));
158 void trace_probe_log_set_index(int index
)
160 trace_probe_log
.index
= index
;
163 void __trace_probe_log_err(int offset
, int err_type
)
166 int i
, len
= 0, pos
= 0;
168 if (!trace_probe_log
.argv
)
171 /* Recalculate the length and allocate buffer */
172 for (i
= 0; i
< trace_probe_log
.argc
; i
++) {
173 if (i
== trace_probe_log
.index
)
175 len
+= strlen(trace_probe_log
.argv
[i
]) + 1;
177 command
= kzalloc(len
, GFP_KERNEL
);
181 if (trace_probe_log
.index
>= trace_probe_log
.argc
) {
183 * Set the error position is next to the last arg + space.
184 * Note that len includes the terminal null and the cursor
185 * appears at pos + 1.
191 /* And make a command string from argv array */
193 for (i
= 0; i
< trace_probe_log
.argc
; i
++) {
194 len
= strlen(trace_probe_log
.argv
[i
]);
195 strcpy(p
, trace_probe_log
.argv
[i
]);
201 tracing_log_err(NULL
, trace_probe_log
.subsystem
, command
,
202 trace_probe_err_text
, err_type
, pos
+ offset
);
207 /* Split symbol and offset. */
208 int traceprobe_split_symbol_offset(char *symbol
, long *offset
)
216 tmp
= strpbrk(symbol
, "+-");
218 ret
= kstrtol(tmp
, 0, offset
);
228 /* @buf must has MAX_EVENT_NAME_LEN size */
229 int traceprobe_parse_event_name(const char **pevent
, const char **pgroup
,
230 char *buf
, int offset
)
232 const char *slash
, *event
= *pevent
;
235 slash
= strchr(event
, '/');
237 slash
= strchr(event
, '.');
240 if (slash
== event
) {
241 trace_probe_log_err(offset
, NO_GROUP_NAME
);
244 if (slash
- event
+ 1 > MAX_EVENT_NAME_LEN
) {
245 trace_probe_log_err(offset
, GROUP_TOO_LONG
);
248 strlcpy(buf
, event
, slash
- event
+ 1);
249 if (!is_good_name(buf
)) {
250 trace_probe_log_err(offset
, BAD_GROUP_NAME
);
255 offset
+= slash
- event
+ 1;
260 trace_probe_log_err(offset
, NO_EVENT_NAME
);
262 } else if (len
> MAX_EVENT_NAME_LEN
) {
263 trace_probe_log_err(offset
, EVENT_TOO_LONG
);
266 if (!is_good_name(event
)) {
267 trace_probe_log_err(offset
, BAD_EVENT_NAME
);
273 #define PARAM_MAX_STACK (THREAD_SIZE / sizeof(unsigned long))
275 static int parse_probe_vars(char *arg
, const struct fetch_type
*t
,
276 struct fetch_insn
*code
, unsigned int flags
, int offs
)
282 if (strcmp(arg
, "retval") == 0) {
283 if (flags
& TPARG_FL_RETURN
) {
284 code
->op
= FETCH_OP_RETVAL
;
286 trace_probe_log_err(offs
, RETVAL_ON_PROBE
);
289 } else if ((len
= str_has_prefix(arg
, "stack"))) {
290 if (arg
[len
] == '\0') {
291 code
->op
= FETCH_OP_STACKP
;
292 } else if (isdigit(arg
[len
])) {
293 ret
= kstrtoul(arg
+ len
, 10, ¶m
);
296 } else if ((flags
& TPARG_FL_KERNEL
) &&
297 param
> PARAM_MAX_STACK
) {
298 trace_probe_log_err(offs
, BAD_STACK_NUM
);
301 code
->op
= FETCH_OP_STACK
;
302 code
->param
= (unsigned int)param
;
306 } else if (strcmp(arg
, "comm") == 0) {
307 code
->op
= FETCH_OP_COMM
;
308 #ifdef CONFIG_HAVE_FUNCTION_ARG_ACCESS_API
309 } else if (((flags
& TPARG_FL_MASK
) ==
310 (TPARG_FL_KERNEL
| TPARG_FL_FENTRY
)) &&
311 (len
= str_has_prefix(arg
, "arg"))) {
312 ret
= kstrtoul(arg
+ len
, 10, ¶m
);
315 } else if (!param
|| param
> PARAM_MAX_STACK
) {
316 trace_probe_log_err(offs
, BAD_ARG_NUM
);
319 code
->op
= FETCH_OP_ARG
;
320 code
->param
= (unsigned int)param
- 1;
322 } else if (flags
& TPARG_FL_TPOINT
) {
325 code
->data
= kstrdup(arg
, GFP_KERNEL
);
328 code
->op
= FETCH_OP_TP_ARG
;
335 trace_probe_log_err(offs
, BAD_VAR
);
339 static int str_to_immediate(char *str
, unsigned long *imm
)
342 return kstrtoul(str
, 0, imm
);
343 else if (str
[0] == '-')
344 return kstrtol(str
, 0, (long *)imm
);
345 else if (str
[0] == '+')
346 return kstrtol(str
+ 1, 0, (long *)imm
);
350 static int __parse_imm_string(char *str
, char **pbuf
, int offs
)
352 size_t len
= strlen(str
);
354 if (str
[len
- 1] != '"') {
355 trace_probe_log_err(offs
+ len
, IMMSTR_NO_CLOSE
);
358 *pbuf
= kstrndup(str
, len
- 1, GFP_KERNEL
);
364 /* Recursive argument parser */
366 parse_probe_arg(char *arg
, const struct fetch_type
*type
,
367 struct fetch_insn
**pcode
, struct fetch_insn
*end
,
368 unsigned int flags
, int offs
)
370 struct fetch_insn
*code
= *pcode
;
372 int deref
= FETCH_OP_DEREF
;
379 ret
= parse_probe_vars(arg
+ 1, type
, code
, flags
, offs
);
382 case '%': /* named register */
383 ret
= regs_query_register_offset(arg
+ 1);
385 code
->op
= FETCH_OP_REG
;
386 code
->param
= (unsigned int)ret
;
389 trace_probe_log_err(offs
, BAD_REG_NAME
);
392 case '@': /* memory, file-offset or symbol */
393 if (isdigit(arg
[1])) {
394 ret
= kstrtoul(arg
+ 1, 0, ¶m
);
396 trace_probe_log_err(offs
, BAD_MEM_ADDR
);
400 code
->op
= FETCH_OP_IMM
;
401 code
->immediate
= param
;
402 } else if (arg
[1] == '+') {
403 /* kprobes don't support file offsets */
404 if (flags
& TPARG_FL_KERNEL
) {
405 trace_probe_log_err(offs
, FILE_ON_KPROBE
);
408 ret
= kstrtol(arg
+ 2, 0, &offset
);
410 trace_probe_log_err(offs
, BAD_FILE_OFFS
);
414 code
->op
= FETCH_OP_FOFFS
;
415 code
->immediate
= (unsigned long)offset
; // imm64?
417 /* uprobes don't support symbols */
418 if (!(flags
& TPARG_FL_KERNEL
)) {
419 trace_probe_log_err(offs
, SYM_ON_UPROBE
);
422 /* Preserve symbol for updating */
423 code
->op
= FETCH_NOP_SYMBOL
;
424 code
->data
= kstrdup(arg
+ 1, GFP_KERNEL
);
428 trace_probe_log_err(offs
, TOO_MANY_OPS
);
431 code
->op
= FETCH_OP_IMM
;
434 /* These are fetching from memory */
436 trace_probe_log_err(offs
, TOO_MANY_OPS
);
440 code
->op
= FETCH_OP_DEREF
;
441 code
->offset
= offset
;
444 case '+': /* deref memory */
447 deref
= FETCH_OP_UDEREF
;
452 arg
++; /* Skip '+', because kstrtol() rejects it. */
453 tmp
= strchr(arg
, '(');
455 trace_probe_log_err(offs
, DEREF_NEED_BRACE
);
459 ret
= kstrtol(arg
, 0, &offset
);
461 trace_probe_log_err(offs
, BAD_DEREF_OFFS
);
464 offs
+= (tmp
+ 1 - arg
) + (arg
[0] != '-' ? 1 : 0);
466 tmp
= strrchr(arg
, ')');
468 trace_probe_log_err(offs
+ strlen(arg
),
472 const struct fetch_type
*t2
= find_fetch_type(NULL
);
475 ret
= parse_probe_arg(arg
, t2
, &code
, end
, flags
, offs
);
478 if (code
->op
== FETCH_OP_COMM
||
479 code
->op
== FETCH_OP_DATA
) {
480 trace_probe_log_err(offs
, COMM_CANT_DEREF
);
484 trace_probe_log_err(offs
, TOO_MANY_OPS
);
490 code
->offset
= offset
;
493 case '\\': /* Immediate value */
494 if (arg
[1] == '"') { /* Immediate string */
495 ret
= __parse_imm_string(arg
+ 2, &tmp
, offs
+ 2);
498 code
->op
= FETCH_OP_DATA
;
501 ret
= str_to_immediate(arg
+ 1, &code
->immediate
);
503 trace_probe_log_err(offs
+ 1, BAD_IMM
);
505 code
->op
= FETCH_OP_IMM
;
509 if (!ret
&& code
->op
== FETCH_OP_NOP
) {
510 /* Parsed, but do not find fetch method */
511 trace_probe_log_err(offs
, BAD_FETCH_ARG
);
517 #define BYTES_TO_BITS(nb) ((BITS_PER_LONG * (nb)) / sizeof(long))
519 /* Bitfield type needs to be parsed into a fetch function */
520 static int __parse_bitfield_probe_arg(const char *bf
,
521 const struct fetch_type
*t
,
522 struct fetch_insn
**pcode
)
524 struct fetch_insn
*code
= *pcode
;
525 unsigned long bw
, bo
;
531 bw
= simple_strtoul(bf
+ 1, &tail
, 0); /* Use simple one */
533 if (bw
== 0 || *tail
!= '@')
537 bo
= simple_strtoul(bf
, &tail
, 0);
539 if (tail
== bf
|| *tail
!= '/')
542 if (code
->op
!= FETCH_OP_NOP
)
546 code
->op
= FETCH_OP_MOD_BF
;
547 code
->lshift
= BYTES_TO_BITS(t
->size
) - (bw
+ bo
);
548 code
->rshift
= BYTES_TO_BITS(t
->size
) - bw
;
549 code
->basesize
= t
->size
;
551 return (BYTES_TO_BITS(t
->size
) < (bw
+ bo
)) ? -EINVAL
: 0;
554 /* String length checking wrapper */
555 static int traceprobe_parse_probe_arg_body(const char *argv
, ssize_t
*size
,
556 struct probe_arg
*parg
, unsigned int flags
, int offset
)
558 struct fetch_insn
*code
, *scode
, *tmp
= NULL
;
563 arg
= kstrdup(argv
, GFP_KERNEL
);
569 if (len
> MAX_ARGSTR_LEN
) {
570 trace_probe_log_err(offset
, ARG_TOO_LONG
);
572 } else if (len
== 0) {
573 trace_probe_log_err(offset
, NO_ARG_BODY
);
578 parg
->comm
= kstrdup(arg
, GFP_KERNEL
);
583 t
= strchr(arg
, ':');
586 t2
= strchr(++t
, '[');
589 t3
= strchr(t2
, ']');
591 offset
+= t2
+ strlen(t2
) - arg
;
592 trace_probe_log_err(offset
,
595 } else if (t3
[1] != '\0') {
596 trace_probe_log_err(offset
+ t3
+ 1 - arg
,
601 if (kstrtouint(t2
, 0, &parg
->count
) || !parg
->count
) {
602 trace_probe_log_err(offset
+ t2
- arg
,
606 if (parg
->count
> MAX_ARRAY_LEN
) {
607 trace_probe_log_err(offset
+ t2
- arg
,
615 * Since $comm and immediate string can not be dereferenced,
616 * we can find those by strcmp.
618 if (strcmp(arg
, "$comm") == 0 || strncmp(arg
, "\\\"", 2) == 0) {
619 /* The type of $comm must be "string", and not an array. */
620 if (parg
->count
|| (t
&& strcmp(t
, "string")))
622 parg
->type
= find_fetch_type("string");
624 parg
->type
= find_fetch_type(t
);
626 trace_probe_log_err(offset
+ (t
? (t
- arg
) : 0), BAD_TYPE
);
629 parg
->offset
= *size
;
630 *size
+= parg
->type
->size
* (parg
->count
?: 1);
634 len
= strlen(parg
->type
->fmttype
) + 6;
635 parg
->fmt
= kmalloc(len
, GFP_KERNEL
);
638 snprintf(parg
->fmt
, len
, "%s[%d]", parg
->type
->fmttype
,
642 code
= tmp
= kcalloc(FETCH_INSN_MAX
, sizeof(*code
), GFP_KERNEL
);
645 code
[FETCH_INSN_MAX
- 1].op
= FETCH_OP_END
;
647 ret
= parse_probe_arg(arg
, parg
->type
, &code
, &code
[FETCH_INSN_MAX
- 1],
653 /* Store operation */
654 if (!strcmp(parg
->type
->name
, "string") ||
655 !strcmp(parg
->type
->name
, "ustring")) {
656 if (code
->op
!= FETCH_OP_DEREF
&& code
->op
!= FETCH_OP_UDEREF
&&
657 code
->op
!= FETCH_OP_IMM
&& code
->op
!= FETCH_OP_COMM
&&
658 code
->op
!= FETCH_OP_DATA
&& code
->op
!= FETCH_OP_TP_ARG
) {
659 trace_probe_log_err(offset
+ (t
? (t
- arg
) : 0),
663 if ((code
->op
== FETCH_OP_IMM
|| code
->op
== FETCH_OP_COMM
||
664 code
->op
== FETCH_OP_DATA
) || code
->op
== FETCH_OP_TP_ARG
||
667 * IMM, DATA and COMM is pointing actual address, those
668 * must be kept, and if parg->count != 0, this is an
669 * array of string pointers instead of string address
673 if (code
->op
!= FETCH_OP_NOP
) {
674 trace_probe_log_err(offset
, TOO_MANY_OPS
);
678 /* If op == DEREF, replace it with STRING */
679 if (!strcmp(parg
->type
->name
, "ustring") ||
680 code
->op
== FETCH_OP_UDEREF
)
681 code
->op
= FETCH_OP_ST_USTRING
;
683 code
->op
= FETCH_OP_ST_STRING
;
684 code
->size
= parg
->type
->size
;
685 parg
->dynamic
= true;
686 } else if (code
->op
== FETCH_OP_DEREF
) {
687 code
->op
= FETCH_OP_ST_MEM
;
688 code
->size
= parg
->type
->size
;
689 } else if (code
->op
== FETCH_OP_UDEREF
) {
690 code
->op
= FETCH_OP_ST_UMEM
;
691 code
->size
= parg
->type
->size
;
694 if (code
->op
!= FETCH_OP_NOP
) {
695 trace_probe_log_err(offset
, TOO_MANY_OPS
);
698 code
->op
= FETCH_OP_ST_RAW
;
699 code
->size
= parg
->type
->size
;
702 /* Modify operation */
704 ret
= __parse_bitfield_probe_arg(t
, parg
->type
, &code
);
706 trace_probe_log_err(offset
+ t
- arg
, BAD_BITFIELD
);
711 /* Loop(Array) operation */
713 if (scode
->op
!= FETCH_OP_ST_MEM
&&
714 scode
->op
!= FETCH_OP_ST_STRING
&&
715 scode
->op
!= FETCH_OP_ST_USTRING
) {
716 trace_probe_log_err(offset
+ (t
? (t
- arg
) : 0),
721 if (code
->op
!= FETCH_OP_NOP
) {
722 trace_probe_log_err(offset
, TOO_MANY_OPS
);
725 code
->op
= FETCH_OP_LP_ARRAY
;
726 code
->param
= parg
->count
;
729 code
->op
= FETCH_OP_END
;
732 /* Shrink down the code buffer */
733 parg
->code
= kcalloc(code
- tmp
+ 1, sizeof(*code
), GFP_KERNEL
);
737 memcpy(parg
->code
, tmp
, sizeof(*code
) * (code
- tmp
+ 1));
741 for (code
= tmp
; code
< tmp
+ FETCH_INSN_MAX
; code
++)
742 if (code
->op
== FETCH_NOP_SYMBOL
||
743 code
->op
== FETCH_OP_DATA
)
753 /* Return 1 if name is reserved or already used by another argument */
754 static int traceprobe_conflict_field_name(const char *name
,
755 struct probe_arg
*args
, int narg
)
759 for (i
= 0; i
< ARRAY_SIZE(reserved_field_names
); i
++)
760 if (strcmp(reserved_field_names
[i
], name
) == 0)
763 for (i
= 0; i
< narg
; i
++)
764 if (strcmp(args
[i
].name
, name
) == 0)
770 int traceprobe_parse_probe_arg(struct trace_probe
*tp
, int i
, const char *arg
,
773 struct probe_arg
*parg
= &tp
->args
[i
];
776 /* Increment count for freeing args in error case */
779 body
= strchr(arg
, '=');
781 if (body
- arg
> MAX_ARG_NAME_LEN
) {
782 trace_probe_log_err(0, ARG_NAME_TOO_LONG
);
784 } else if (body
== arg
) {
785 trace_probe_log_err(0, NO_ARG_NAME
);
788 parg
->name
= kmemdup_nul(arg
, body
- arg
, GFP_KERNEL
);
791 /* If argument name is omitted, set "argN" */
792 parg
->name
= kasprintf(GFP_KERNEL
, "arg%d", i
+ 1);
798 if (!is_good_name(parg
->name
)) {
799 trace_probe_log_err(0, BAD_ARG_NAME
);
802 if (traceprobe_conflict_field_name(parg
->name
, tp
->args
, i
)) {
803 trace_probe_log_err(0, USED_ARG_NAME
);
806 /* Parse fetch argument */
807 return traceprobe_parse_probe_arg_body(body
, &tp
->size
, parg
, flags
,
811 void traceprobe_free_probe_arg(struct probe_arg
*arg
)
813 struct fetch_insn
*code
= arg
->code
;
815 while (code
&& code
->op
!= FETCH_OP_END
) {
816 if (code
->op
== FETCH_NOP_SYMBOL
||
817 code
->op
== FETCH_OP_DATA
)
827 int traceprobe_update_arg(struct probe_arg
*arg
)
829 struct fetch_insn
*code
= arg
->code
;
835 while (code
&& code
->op
!= FETCH_OP_END
) {
836 if (code
->op
== FETCH_NOP_SYMBOL
) {
837 if (code
[1].op
!= FETCH_OP_IMM
)
840 tmp
= strpbrk(code
->data
, "+-");
843 ret
= traceprobe_split_symbol_offset(code
->data
,
849 (unsigned long)kallsyms_lookup_name(code
->data
);
852 if (!code
[1].immediate
)
854 code
[1].immediate
+= offset
;
861 /* When len=0, we just calculate the needed length */
862 #define LEN_OR_ZERO (len ? len - pos : 0)
863 static int __set_print_fmt(struct trace_probe
*tp
, char *buf
, int len
,
864 enum probe_print_type ptype
)
866 struct probe_arg
*parg
;
869 const char *fmt
, *arg
;
872 case PROBE_PRINT_NORMAL
:
874 arg
= "REC->" FIELD_STRING_IP
;
876 case PROBE_PRINT_RETURN
:
877 fmt
= "(%lx <- %lx)";
878 arg
= "REC->" FIELD_STRING_FUNC
", REC->" FIELD_STRING_RETIP
;
880 case PROBE_PRINT_EVENT
:
882 arg
= "REC->" FIELD_STRING_TYPE
;
889 pos
+= snprintf(buf
+ pos
, LEN_OR_ZERO
, "\"%s", fmt
);
891 for (i
= 0; i
< tp
->nr_args
; i
++) {
893 pos
+= snprintf(buf
+ pos
, LEN_OR_ZERO
, " %s=", parg
->name
);
895 pos
+= snprintf(buf
+ pos
, LEN_OR_ZERO
, "{%s",
897 for (j
= 1; j
< parg
->count
; j
++)
898 pos
+= snprintf(buf
+ pos
, LEN_OR_ZERO
, ",%s",
900 pos
+= snprintf(buf
+ pos
, LEN_OR_ZERO
, "}");
902 pos
+= snprintf(buf
+ pos
, LEN_OR_ZERO
, "%s",
906 pos
+= snprintf(buf
+ pos
, LEN_OR_ZERO
, "\", %s", arg
);
908 for (i
= 0; i
< tp
->nr_args
; i
++) {
911 if ((strcmp(parg
->type
->name
, "string") == 0) ||
912 (strcmp(parg
->type
->name
, "ustring") == 0))
913 fmt
= ", __get_str(%s[%d])";
915 fmt
= ", REC->%s[%d]";
916 for (j
= 0; j
< parg
->count
; j
++)
917 pos
+= snprintf(buf
+ pos
, LEN_OR_ZERO
,
920 if ((strcmp(parg
->type
->name
, "string") == 0) ||
921 (strcmp(parg
->type
->name
, "ustring") == 0))
922 fmt
= ", __get_str(%s)";
925 pos
+= snprintf(buf
+ pos
, LEN_OR_ZERO
,
930 /* return the length of print_fmt */
935 int traceprobe_set_print_fmt(struct trace_probe
*tp
, enum probe_print_type ptype
)
937 struct trace_event_call
*call
= trace_probe_event_call(tp
);
941 /* First: called with 0 length to calculate the needed length */
942 len
= __set_print_fmt(tp
, NULL
, 0, ptype
);
943 print_fmt
= kmalloc(len
+ 1, GFP_KERNEL
);
947 /* Second: actually write the @print_fmt */
948 __set_print_fmt(tp
, print_fmt
, len
+ 1, ptype
);
949 call
->print_fmt
= print_fmt
;
954 int traceprobe_define_arg_fields(struct trace_event_call
*event_call
,
955 size_t offset
, struct trace_probe
*tp
)
959 /* Set argument names as fields */
960 for (i
= 0; i
< tp
->nr_args
; i
++) {
961 struct probe_arg
*parg
= &tp
->args
[i
];
962 const char *fmt
= parg
->type
->fmttype
;
963 int size
= parg
->type
->size
;
969 ret
= trace_define_field(event_call
, fmt
, parg
->name
,
970 offset
+ parg
->offset
, size
,
971 parg
->type
->is_signed
,
979 static void trace_probe_event_free(struct trace_probe_event
*tpe
)
981 kfree(tpe
->class.system
);
982 kfree(tpe
->call
.name
);
983 kfree(tpe
->call
.print_fmt
);
987 int trace_probe_append(struct trace_probe
*tp
, struct trace_probe
*to
)
989 if (trace_probe_has_sibling(tp
))
992 list_del_init(&tp
->list
);
993 trace_probe_event_free(tp
->event
);
995 tp
->event
= to
->event
;
996 list_add_tail(&tp
->list
, trace_probe_probe_list(to
));
1001 void trace_probe_unlink(struct trace_probe
*tp
)
1003 list_del_init(&tp
->list
);
1004 if (list_empty(trace_probe_probe_list(tp
)))
1005 trace_probe_event_free(tp
->event
);
1009 void trace_probe_cleanup(struct trace_probe
*tp
)
1013 for (i
= 0; i
< tp
->nr_args
; i
++)
1014 traceprobe_free_probe_arg(&tp
->args
[i
]);
1017 trace_probe_unlink(tp
);
1020 int trace_probe_init(struct trace_probe
*tp
, const char *event
,
1021 const char *group
, bool alloc_filter
)
1023 struct trace_event_call
*call
;
1024 size_t size
= sizeof(struct trace_probe_event
);
1027 if (!event
|| !group
)
1031 size
+= sizeof(struct trace_uprobe_filter
);
1033 tp
->event
= kzalloc(size
, GFP_KERNEL
);
1037 INIT_LIST_HEAD(&tp
->event
->files
);
1038 INIT_LIST_HEAD(&tp
->event
->class.fields
);
1039 INIT_LIST_HEAD(&tp
->event
->probes
);
1040 INIT_LIST_HEAD(&tp
->list
);
1041 list_add(&tp
->list
, &tp
->event
->probes
);
1043 call
= trace_probe_event_call(tp
);
1044 call
->class = &tp
->event
->class;
1045 call
->name
= kstrdup(event
, GFP_KERNEL
);
1051 tp
->event
->class.system
= kstrdup(group
, GFP_KERNEL
);
1052 if (!tp
->event
->class.system
) {
1060 trace_probe_cleanup(tp
);
1064 static struct trace_event_call
*
1065 find_trace_event_call(const char *system
, const char *event_name
)
1067 struct trace_event_call
*tp_event
;
1070 list_for_each_entry(tp_event
, &ftrace_events
, list
) {
1071 if (!tp_event
->class->system
||
1072 strcmp(system
, tp_event
->class->system
))
1074 name
= trace_event_name(tp_event
);
1075 if (!name
|| strcmp(event_name
, name
))
1083 int trace_probe_register_event_call(struct trace_probe
*tp
)
1085 struct trace_event_call
*call
= trace_probe_event_call(tp
);
1088 lockdep_assert_held(&event_mutex
);
1090 if (find_trace_event_call(trace_probe_group_name(tp
),
1091 trace_probe_name(tp
)))
1094 ret
= register_trace_event(&call
->event
);
1098 ret
= trace_add_event_call(call
);
1100 unregister_trace_event(&call
->event
);
1105 int trace_probe_add_file(struct trace_probe
*tp
, struct trace_event_file
*file
)
1107 struct event_file_link
*link
;
1109 link
= kmalloc(sizeof(*link
), GFP_KERNEL
);
1114 INIT_LIST_HEAD(&link
->list
);
1115 list_add_tail_rcu(&link
->list
, &tp
->event
->files
);
1116 trace_probe_set_flag(tp
, TP_FLAG_TRACE
);
1120 struct event_file_link
*trace_probe_get_file_link(struct trace_probe
*tp
,
1121 struct trace_event_file
*file
)
1123 struct event_file_link
*link
;
1125 trace_probe_for_each_link(link
, tp
) {
1126 if (link
->file
== file
)
1133 int trace_probe_remove_file(struct trace_probe
*tp
,
1134 struct trace_event_file
*file
)
1136 struct event_file_link
*link
;
1138 link
= trace_probe_get_file_link(tp
, file
);
1142 list_del_rcu(&link
->list
);
1146 if (list_empty(&tp
->event
->files
))
1147 trace_probe_clear_flag(tp
, TP_FLAG_TRACE
);
1153 * Return the smallest index of different type argument (start from 1).
1154 * If all argument types and name are same, return 0.
1156 int trace_probe_compare_arg_type(struct trace_probe
*a
, struct trace_probe
*b
)
1160 /* In case of more arguments */
1161 if (a
->nr_args
< b
->nr_args
)
1162 return a
->nr_args
+ 1;
1163 if (a
->nr_args
> b
->nr_args
)
1164 return b
->nr_args
+ 1;
1166 for (i
= 0; i
< a
->nr_args
; i
++) {
1167 if ((b
->nr_args
<= i
) ||
1168 ((a
->args
[i
].type
!= b
->args
[i
].type
) ||
1169 (a
->args
[i
].count
!= b
->args
[i
].count
) ||
1170 strcmp(a
->args
[i
].name
, b
->args
[i
].name
)))
1177 bool trace_probe_match_command_args(struct trace_probe
*tp
,
1178 int argc
, const char **argv
)
1180 char buf
[MAX_ARGSTR_LEN
+ 1];
1183 if (tp
->nr_args
< argc
)
1186 for (i
= 0; i
< argc
; i
++) {
1187 snprintf(buf
, sizeof(buf
), "%s=%s",
1188 tp
->args
[i
].name
, tp
->args
[i
].comm
);
1189 if (strcmp(buf
, argv
[i
]))
1195 int trace_probe_create(const char *raw_command
, int (*createfn
)(int, const char **))
1197 int argc
= 0, ret
= 0;
1200 argv
= argv_split(GFP_KERNEL
, raw_command
, &argc
);
1205 ret
= createfn(argc
, (const char **)argv
);