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
);
362 /* Recursive argument parser */
364 parse_probe_arg(char *arg
, const struct fetch_type
*type
,
365 struct fetch_insn
**pcode
, struct fetch_insn
*end
,
366 unsigned int flags
, int offs
)
368 struct fetch_insn
*code
= *pcode
;
370 int deref
= FETCH_OP_DEREF
;
377 ret
= parse_probe_vars(arg
+ 1, type
, code
, flags
, offs
);
380 case '%': /* named register */
381 ret
= regs_query_register_offset(arg
+ 1);
383 code
->op
= FETCH_OP_REG
;
384 code
->param
= (unsigned int)ret
;
387 trace_probe_log_err(offs
, BAD_REG_NAME
);
390 case '@': /* memory, file-offset or symbol */
391 if (isdigit(arg
[1])) {
392 ret
= kstrtoul(arg
+ 1, 0, ¶m
);
394 trace_probe_log_err(offs
, BAD_MEM_ADDR
);
398 code
->op
= FETCH_OP_IMM
;
399 code
->immediate
= param
;
400 } else if (arg
[1] == '+') {
401 /* kprobes don't support file offsets */
402 if (flags
& TPARG_FL_KERNEL
) {
403 trace_probe_log_err(offs
, FILE_ON_KPROBE
);
406 ret
= kstrtol(arg
+ 2, 0, &offset
);
408 trace_probe_log_err(offs
, BAD_FILE_OFFS
);
412 code
->op
= FETCH_OP_FOFFS
;
413 code
->immediate
= (unsigned long)offset
; // imm64?
415 /* uprobes don't support symbols */
416 if (!(flags
& TPARG_FL_KERNEL
)) {
417 trace_probe_log_err(offs
, SYM_ON_UPROBE
);
420 /* Preserve symbol for updating */
421 code
->op
= FETCH_NOP_SYMBOL
;
422 code
->data
= kstrdup(arg
+ 1, GFP_KERNEL
);
426 trace_probe_log_err(offs
, TOO_MANY_OPS
);
429 code
->op
= FETCH_OP_IMM
;
432 /* These are fetching from memory */
434 trace_probe_log_err(offs
, TOO_MANY_OPS
);
438 code
->op
= FETCH_OP_DEREF
;
439 code
->offset
= offset
;
442 case '+': /* deref memory */
445 deref
= FETCH_OP_UDEREF
;
450 arg
++; /* Skip '+', because kstrtol() rejects it. */
451 tmp
= strchr(arg
, '(');
453 trace_probe_log_err(offs
, DEREF_NEED_BRACE
);
457 ret
= kstrtol(arg
, 0, &offset
);
459 trace_probe_log_err(offs
, BAD_DEREF_OFFS
);
462 offs
+= (tmp
+ 1 - arg
) + (arg
[0] != '-' ? 1 : 0);
464 tmp
= strrchr(arg
, ')');
466 trace_probe_log_err(offs
+ strlen(arg
),
470 const struct fetch_type
*t2
= find_fetch_type(NULL
);
473 ret
= parse_probe_arg(arg
, t2
, &code
, end
, flags
, offs
);
476 if (code
->op
== FETCH_OP_COMM
||
477 code
->op
== FETCH_OP_DATA
) {
478 trace_probe_log_err(offs
, COMM_CANT_DEREF
);
482 trace_probe_log_err(offs
, TOO_MANY_OPS
);
488 code
->offset
= offset
;
491 case '\\': /* Immediate value */
492 if (arg
[1] == '"') { /* Immediate string */
493 ret
= __parse_imm_string(arg
+ 2, &tmp
, offs
+ 2);
496 code
->op
= FETCH_OP_DATA
;
499 ret
= str_to_immediate(arg
+ 1, &code
->immediate
);
501 trace_probe_log_err(offs
+ 1, BAD_IMM
);
503 code
->op
= FETCH_OP_IMM
;
507 if (!ret
&& code
->op
== FETCH_OP_NOP
) {
508 /* Parsed, but do not find fetch method */
509 trace_probe_log_err(offs
, BAD_FETCH_ARG
);
515 #define BYTES_TO_BITS(nb) ((BITS_PER_LONG * (nb)) / sizeof(long))
517 /* Bitfield type needs to be parsed into a fetch function */
518 static int __parse_bitfield_probe_arg(const char *bf
,
519 const struct fetch_type
*t
,
520 struct fetch_insn
**pcode
)
522 struct fetch_insn
*code
= *pcode
;
523 unsigned long bw
, bo
;
529 bw
= simple_strtoul(bf
+ 1, &tail
, 0); /* Use simple one */
531 if (bw
== 0 || *tail
!= '@')
535 bo
= simple_strtoul(bf
, &tail
, 0);
537 if (tail
== bf
|| *tail
!= '/')
540 if (code
->op
!= FETCH_OP_NOP
)
544 code
->op
= FETCH_OP_MOD_BF
;
545 code
->lshift
= BYTES_TO_BITS(t
->size
) - (bw
+ bo
);
546 code
->rshift
= BYTES_TO_BITS(t
->size
) - bw
;
547 code
->basesize
= t
->size
;
549 return (BYTES_TO_BITS(t
->size
) < (bw
+ bo
)) ? -EINVAL
: 0;
552 /* String length checking wrapper */
553 static int traceprobe_parse_probe_arg_body(const char *argv
, ssize_t
*size
,
554 struct probe_arg
*parg
, unsigned int flags
, int offset
)
556 struct fetch_insn
*code
, *scode
, *tmp
= NULL
;
561 arg
= kstrdup(argv
, GFP_KERNEL
);
567 if (len
> MAX_ARGSTR_LEN
) {
568 trace_probe_log_err(offset
, ARG_TOO_LONG
);
570 } else if (len
== 0) {
571 trace_probe_log_err(offset
, NO_ARG_BODY
);
576 parg
->comm
= kstrdup(arg
, GFP_KERNEL
);
581 t
= strchr(arg
, ':');
584 t2
= strchr(++t
, '[');
587 t3
= strchr(t2
, ']');
589 offset
+= t2
+ strlen(t2
) - arg
;
590 trace_probe_log_err(offset
,
593 } else if (t3
[1] != '\0') {
594 trace_probe_log_err(offset
+ t3
+ 1 - arg
,
599 if (kstrtouint(t2
, 0, &parg
->count
) || !parg
->count
) {
600 trace_probe_log_err(offset
+ t2
- arg
,
604 if (parg
->count
> MAX_ARRAY_LEN
) {
605 trace_probe_log_err(offset
+ t2
- arg
,
613 * Since $comm and immediate string can not be dereferenced,
614 * we can find those by strcmp.
616 if (strcmp(arg
, "$comm") == 0 || strncmp(arg
, "\\\"", 2) == 0) {
617 /* The type of $comm must be "string", and not an array. */
618 if (parg
->count
|| (t
&& strcmp(t
, "string")))
620 parg
->type
= find_fetch_type("string");
622 parg
->type
= find_fetch_type(t
);
624 trace_probe_log_err(offset
+ (t
? (t
- arg
) : 0), BAD_TYPE
);
627 parg
->offset
= *size
;
628 *size
+= parg
->type
->size
* (parg
->count
?: 1);
632 len
= strlen(parg
->type
->fmttype
) + 6;
633 parg
->fmt
= kmalloc(len
, GFP_KERNEL
);
636 snprintf(parg
->fmt
, len
, "%s[%d]", parg
->type
->fmttype
,
640 code
= tmp
= kcalloc(FETCH_INSN_MAX
, sizeof(*code
), GFP_KERNEL
);
643 code
[FETCH_INSN_MAX
- 1].op
= FETCH_OP_END
;
645 ret
= parse_probe_arg(arg
, parg
->type
, &code
, &code
[FETCH_INSN_MAX
- 1],
651 /* Store operation */
652 if (!strcmp(parg
->type
->name
, "string") ||
653 !strcmp(parg
->type
->name
, "ustring")) {
654 if (code
->op
!= FETCH_OP_DEREF
&& code
->op
!= FETCH_OP_UDEREF
&&
655 code
->op
!= FETCH_OP_IMM
&& code
->op
!= FETCH_OP_COMM
&&
656 code
->op
!= FETCH_OP_DATA
&& code
->op
!= FETCH_OP_TP_ARG
) {
657 trace_probe_log_err(offset
+ (t
? (t
- arg
) : 0),
661 if ((code
->op
== FETCH_OP_IMM
|| code
->op
== FETCH_OP_COMM
||
662 code
->op
== FETCH_OP_DATA
) || code
->op
== FETCH_OP_TP_ARG
||
665 * IMM, DATA and COMM is pointing actual address, those
666 * must be kept, and if parg->count != 0, this is an
667 * array of string pointers instead of string address
671 if (code
->op
!= FETCH_OP_NOP
) {
672 trace_probe_log_err(offset
, TOO_MANY_OPS
);
676 /* If op == DEREF, replace it with STRING */
677 if (!strcmp(parg
->type
->name
, "ustring") ||
678 code
->op
== FETCH_OP_UDEREF
)
679 code
->op
= FETCH_OP_ST_USTRING
;
681 code
->op
= FETCH_OP_ST_STRING
;
682 code
->size
= parg
->type
->size
;
683 parg
->dynamic
= true;
684 } else if (code
->op
== FETCH_OP_DEREF
) {
685 code
->op
= FETCH_OP_ST_MEM
;
686 code
->size
= parg
->type
->size
;
687 } else if (code
->op
== FETCH_OP_UDEREF
) {
688 code
->op
= FETCH_OP_ST_UMEM
;
689 code
->size
= parg
->type
->size
;
692 if (code
->op
!= FETCH_OP_NOP
) {
693 trace_probe_log_err(offset
, TOO_MANY_OPS
);
696 code
->op
= FETCH_OP_ST_RAW
;
697 code
->size
= parg
->type
->size
;
700 /* Modify operation */
702 ret
= __parse_bitfield_probe_arg(t
, parg
->type
, &code
);
704 trace_probe_log_err(offset
+ t
- arg
, BAD_BITFIELD
);
709 /* Loop(Array) operation */
711 if (scode
->op
!= FETCH_OP_ST_MEM
&&
712 scode
->op
!= FETCH_OP_ST_STRING
&&
713 scode
->op
!= FETCH_OP_ST_USTRING
) {
714 trace_probe_log_err(offset
+ (t
? (t
- arg
) : 0),
719 if (code
->op
!= FETCH_OP_NOP
) {
720 trace_probe_log_err(offset
, TOO_MANY_OPS
);
723 code
->op
= FETCH_OP_LP_ARRAY
;
724 code
->param
= parg
->count
;
727 code
->op
= FETCH_OP_END
;
730 /* Shrink down the code buffer */
731 parg
->code
= kcalloc(code
- tmp
+ 1, sizeof(*code
), GFP_KERNEL
);
735 memcpy(parg
->code
, tmp
, sizeof(*code
) * (code
- tmp
+ 1));
739 for (code
= tmp
; code
< tmp
+ FETCH_INSN_MAX
; code
++)
740 if (code
->op
== FETCH_NOP_SYMBOL
||
741 code
->op
== FETCH_OP_DATA
)
751 /* Return 1 if name is reserved or already used by another argument */
752 static int traceprobe_conflict_field_name(const char *name
,
753 struct probe_arg
*args
, int narg
)
757 for (i
= 0; i
< ARRAY_SIZE(reserved_field_names
); i
++)
758 if (strcmp(reserved_field_names
[i
], name
) == 0)
761 for (i
= 0; i
< narg
; i
++)
762 if (strcmp(args
[i
].name
, name
) == 0)
768 int traceprobe_parse_probe_arg(struct trace_probe
*tp
, int i
, const char *arg
,
771 struct probe_arg
*parg
= &tp
->args
[i
];
774 /* Increment count for freeing args in error case */
777 body
= strchr(arg
, '=');
779 if (body
- arg
> MAX_ARG_NAME_LEN
) {
780 trace_probe_log_err(0, ARG_NAME_TOO_LONG
);
782 } else if (body
== arg
) {
783 trace_probe_log_err(0, NO_ARG_NAME
);
786 parg
->name
= kmemdup_nul(arg
, body
- arg
, GFP_KERNEL
);
789 /* If argument name is omitted, set "argN" */
790 parg
->name
= kasprintf(GFP_KERNEL
, "arg%d", i
+ 1);
796 if (!is_good_name(parg
->name
)) {
797 trace_probe_log_err(0, BAD_ARG_NAME
);
800 if (traceprobe_conflict_field_name(parg
->name
, tp
->args
, i
)) {
801 trace_probe_log_err(0, USED_ARG_NAME
);
804 /* Parse fetch argument */
805 return traceprobe_parse_probe_arg_body(body
, &tp
->size
, parg
, flags
,
809 void traceprobe_free_probe_arg(struct probe_arg
*arg
)
811 struct fetch_insn
*code
= arg
->code
;
813 while (code
&& code
->op
!= FETCH_OP_END
) {
814 if (code
->op
== FETCH_NOP_SYMBOL
||
815 code
->op
== FETCH_OP_DATA
)
825 int traceprobe_update_arg(struct probe_arg
*arg
)
827 struct fetch_insn
*code
= arg
->code
;
833 while (code
&& code
->op
!= FETCH_OP_END
) {
834 if (code
->op
== FETCH_NOP_SYMBOL
) {
835 if (code
[1].op
!= FETCH_OP_IMM
)
838 tmp
= strpbrk(code
->data
, "+-");
841 ret
= traceprobe_split_symbol_offset(code
->data
,
847 (unsigned long)kallsyms_lookup_name(code
->data
);
850 if (!code
[1].immediate
)
852 code
[1].immediate
+= offset
;
859 /* When len=0, we just calculate the needed length */
860 #define LEN_OR_ZERO (len ? len - pos : 0)
861 static int __set_print_fmt(struct trace_probe
*tp
, char *buf
, int len
,
862 enum probe_print_type ptype
)
864 struct probe_arg
*parg
;
867 const char *fmt
, *arg
;
870 case PROBE_PRINT_NORMAL
:
872 arg
= "REC->" FIELD_STRING_IP
;
874 case PROBE_PRINT_RETURN
:
875 fmt
= "(%lx <- %lx)";
876 arg
= "REC->" FIELD_STRING_FUNC
", REC->" FIELD_STRING_RETIP
;
878 case PROBE_PRINT_EVENT
:
880 arg
= "REC->" FIELD_STRING_TYPE
;
887 pos
+= snprintf(buf
+ pos
, LEN_OR_ZERO
, "\"%s", fmt
);
889 for (i
= 0; i
< tp
->nr_args
; i
++) {
891 pos
+= snprintf(buf
+ pos
, LEN_OR_ZERO
, " %s=", parg
->name
);
893 pos
+= snprintf(buf
+ pos
, LEN_OR_ZERO
, "{%s",
895 for (j
= 1; j
< parg
->count
; j
++)
896 pos
+= snprintf(buf
+ pos
, LEN_OR_ZERO
, ",%s",
898 pos
+= snprintf(buf
+ pos
, LEN_OR_ZERO
, "}");
900 pos
+= snprintf(buf
+ pos
, LEN_OR_ZERO
, "%s",
904 pos
+= snprintf(buf
+ pos
, LEN_OR_ZERO
, "\", %s", arg
);
906 for (i
= 0; i
< tp
->nr_args
; i
++) {
909 if ((strcmp(parg
->type
->name
, "string") == 0) ||
910 (strcmp(parg
->type
->name
, "ustring") == 0))
911 fmt
= ", __get_str(%s[%d])";
913 fmt
= ", REC->%s[%d]";
914 for (j
= 0; j
< parg
->count
; j
++)
915 pos
+= snprintf(buf
+ pos
, LEN_OR_ZERO
,
918 if ((strcmp(parg
->type
->name
, "string") == 0) ||
919 (strcmp(parg
->type
->name
, "ustring") == 0))
920 fmt
= ", __get_str(%s)";
923 pos
+= snprintf(buf
+ pos
, LEN_OR_ZERO
,
928 /* return the length of print_fmt */
933 int traceprobe_set_print_fmt(struct trace_probe
*tp
, enum probe_print_type ptype
)
935 struct trace_event_call
*call
= trace_probe_event_call(tp
);
939 /* First: called with 0 length to calculate the needed length */
940 len
= __set_print_fmt(tp
, NULL
, 0, ptype
);
941 print_fmt
= kmalloc(len
+ 1, GFP_KERNEL
);
945 /* Second: actually write the @print_fmt */
946 __set_print_fmt(tp
, print_fmt
, len
+ 1, ptype
);
947 call
->print_fmt
= print_fmt
;
952 int traceprobe_define_arg_fields(struct trace_event_call
*event_call
,
953 size_t offset
, struct trace_probe
*tp
)
957 /* Set argument names as fields */
958 for (i
= 0; i
< tp
->nr_args
; i
++) {
959 struct probe_arg
*parg
= &tp
->args
[i
];
960 const char *fmt
= parg
->type
->fmttype
;
961 int size
= parg
->type
->size
;
967 ret
= trace_define_field(event_call
, fmt
, parg
->name
,
968 offset
+ parg
->offset
, size
,
969 parg
->type
->is_signed
,
977 static void trace_probe_event_free(struct trace_probe_event
*tpe
)
979 kfree(tpe
->class.system
);
980 kfree(tpe
->call
.name
);
981 kfree(tpe
->call
.print_fmt
);
985 int trace_probe_append(struct trace_probe
*tp
, struct trace_probe
*to
)
987 if (trace_probe_has_sibling(tp
))
990 list_del_init(&tp
->list
);
991 trace_probe_event_free(tp
->event
);
993 tp
->event
= to
->event
;
994 list_add_tail(&tp
->list
, trace_probe_probe_list(to
));
999 void trace_probe_unlink(struct trace_probe
*tp
)
1001 list_del_init(&tp
->list
);
1002 if (list_empty(trace_probe_probe_list(tp
)))
1003 trace_probe_event_free(tp
->event
);
1007 void trace_probe_cleanup(struct trace_probe
*tp
)
1011 for (i
= 0; i
< tp
->nr_args
; i
++)
1012 traceprobe_free_probe_arg(&tp
->args
[i
]);
1015 trace_probe_unlink(tp
);
1018 int trace_probe_init(struct trace_probe
*tp
, const char *event
,
1019 const char *group
, bool alloc_filter
)
1021 struct trace_event_call
*call
;
1022 size_t size
= sizeof(struct trace_probe_event
);
1025 if (!event
|| !group
)
1029 size
+= sizeof(struct trace_uprobe_filter
);
1031 tp
->event
= kzalloc(size
, GFP_KERNEL
);
1035 INIT_LIST_HEAD(&tp
->event
->files
);
1036 INIT_LIST_HEAD(&tp
->event
->class.fields
);
1037 INIT_LIST_HEAD(&tp
->event
->probes
);
1038 INIT_LIST_HEAD(&tp
->list
);
1039 list_add(&tp
->list
, &tp
->event
->probes
);
1041 call
= trace_probe_event_call(tp
);
1042 call
->class = &tp
->event
->class;
1043 call
->name
= kstrdup(event
, GFP_KERNEL
);
1049 tp
->event
->class.system
= kstrdup(group
, GFP_KERNEL
);
1050 if (!tp
->event
->class.system
) {
1058 trace_probe_cleanup(tp
);
1062 static struct trace_event_call
*
1063 find_trace_event_call(const char *system
, const char *event_name
)
1065 struct trace_event_call
*tp_event
;
1068 list_for_each_entry(tp_event
, &ftrace_events
, list
) {
1069 if (!tp_event
->class->system
||
1070 strcmp(system
, tp_event
->class->system
))
1072 name
= trace_event_name(tp_event
);
1073 if (!name
|| strcmp(event_name
, name
))
1081 int trace_probe_register_event_call(struct trace_probe
*tp
)
1083 struct trace_event_call
*call
= trace_probe_event_call(tp
);
1086 lockdep_assert_held(&event_mutex
);
1088 if (find_trace_event_call(trace_probe_group_name(tp
),
1089 trace_probe_name(tp
)))
1092 ret
= register_trace_event(&call
->event
);
1096 ret
= trace_add_event_call(call
);
1098 unregister_trace_event(&call
->event
);
1103 int trace_probe_add_file(struct trace_probe
*tp
, struct trace_event_file
*file
)
1105 struct event_file_link
*link
;
1107 link
= kmalloc(sizeof(*link
), GFP_KERNEL
);
1112 INIT_LIST_HEAD(&link
->list
);
1113 list_add_tail_rcu(&link
->list
, &tp
->event
->files
);
1114 trace_probe_set_flag(tp
, TP_FLAG_TRACE
);
1118 struct event_file_link
*trace_probe_get_file_link(struct trace_probe
*tp
,
1119 struct trace_event_file
*file
)
1121 struct event_file_link
*link
;
1123 trace_probe_for_each_link(link
, tp
) {
1124 if (link
->file
== file
)
1131 int trace_probe_remove_file(struct trace_probe
*tp
,
1132 struct trace_event_file
*file
)
1134 struct event_file_link
*link
;
1136 link
= trace_probe_get_file_link(tp
, file
);
1140 list_del_rcu(&link
->list
);
1144 if (list_empty(&tp
->event
->files
))
1145 trace_probe_clear_flag(tp
, TP_FLAG_TRACE
);
1151 * Return the smallest index of different type argument (start from 1).
1152 * If all argument types and name are same, return 0.
1154 int trace_probe_compare_arg_type(struct trace_probe
*a
, struct trace_probe
*b
)
1158 /* In case of more arguments */
1159 if (a
->nr_args
< b
->nr_args
)
1160 return a
->nr_args
+ 1;
1161 if (a
->nr_args
> b
->nr_args
)
1162 return b
->nr_args
+ 1;
1164 for (i
= 0; i
< a
->nr_args
; i
++) {
1165 if ((b
->nr_args
<= i
) ||
1166 ((a
->args
[i
].type
!= b
->args
[i
].type
) ||
1167 (a
->args
[i
].count
!= b
->args
[i
].count
) ||
1168 strcmp(a
->args
[i
].name
, b
->args
[i
].name
)))
1175 bool trace_probe_match_command_args(struct trace_probe
*tp
,
1176 int argc
, const char **argv
)
1178 char buf
[MAX_ARGSTR_LEN
+ 1];
1181 if (tp
->nr_args
< argc
)
1184 for (i
= 0; i
< argc
; i
++) {
1185 snprintf(buf
, sizeof(buf
), "%s=%s",
1186 tp
->args
[i
].name
, tp
->args
[i
].comm
);
1187 if (strcmp(buf
, argv
[i
]))
1193 int trace_probe_create(const char *raw_command
, int (*createfn
)(int, const char **))
1195 int argc
= 0, ret
= 0;
1198 argv
= argv_split(GFP_KERNEL
, raw_command
, &argc
);
1203 ret
= createfn(argc
, (const char **)argv
);