• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 // SPDX-License-Identifier: GPL-2.0
2 /*
3  * trace_events_hist - trace event hist triggers
4  *
5  * Copyright (C) 2015 Tom Zanussi <tom.zanussi@linux.intel.com>
6  */
7 
8 #include <linux/module.h>
9 #include <linux/kallsyms.h>
10 #include <linux/security.h>
11 #include <linux/mutex.h>
12 #include <linux/slab.h>
13 #include <linux/stacktrace.h>
14 #include <linux/rculist.h>
15 #include <linux/tracefs.h>
16 
17 /* for gfp flag names */
18 #include <linux/trace_events.h>
19 #include <trace/events/mmflags.h>
20 
21 #include "tracing_map.h"
22 #include "trace_synth.h"
23 
24 #define ERRORS								\
25 	C(NONE,			"No error"),				\
26 	C(DUPLICATE_VAR,	"Variable already defined"),		\
27 	C(VAR_NOT_UNIQUE,	"Variable name not unique, need to use fully qualified name (subsys.event.var) for variable"), \
28 	C(TOO_MANY_VARS,	"Too many variables defined"),		\
29 	C(MALFORMED_ASSIGNMENT,	"Malformed assignment"),		\
30 	C(NAMED_MISMATCH,	"Named hist trigger doesn't match existing named trigger (includes variables)"), \
31 	C(TRIGGER_EEXIST,	"Hist trigger already exists"),		\
32 	C(TRIGGER_ENOENT_CLEAR,	"Can't clear or continue a nonexistent hist trigger"), \
33 	C(SET_CLOCK_FAIL,	"Couldn't set trace_clock"),		\
34 	C(BAD_FIELD_MODIFIER,	"Invalid field modifier"),		\
35 	C(TOO_MANY_SUBEXPR,	"Too many subexpressions (3 max)"),	\
36 	C(TIMESTAMP_MISMATCH,	"Timestamp units in expression don't match"), \
37 	C(TOO_MANY_FIELD_VARS,	"Too many field variables defined"),	\
38 	C(EVENT_FILE_NOT_FOUND,	"Event file not found"),		\
39 	C(HIST_NOT_FOUND,	"Matching event histogram not found"),	\
40 	C(HIST_CREATE_FAIL,	"Couldn't create histogram for field"),	\
41 	C(SYNTH_VAR_NOT_FOUND,	"Couldn't find synthetic variable"),	\
42 	C(SYNTH_EVENT_NOT_FOUND,"Couldn't find synthetic event"),	\
43 	C(SYNTH_TYPE_MISMATCH,	"Param type doesn't match synthetic event field type"), \
44 	C(SYNTH_COUNT_MISMATCH,	"Param count doesn't match synthetic event field count"), \
45 	C(FIELD_VAR_PARSE_FAIL,	"Couldn't parse field variable"),	\
46 	C(VAR_CREATE_FIND_FAIL,	"Couldn't create or find variable"),	\
47 	C(ONX_NOT_VAR,		"For onmax(x) or onchange(x), x must be a variable"), \
48 	C(ONX_VAR_NOT_FOUND,	"Couldn't find onmax or onchange variable"), \
49 	C(ONX_VAR_CREATE_FAIL,	"Couldn't create onmax or onchange variable"), \
50 	C(FIELD_VAR_CREATE_FAIL,"Couldn't create field variable"),	\
51 	C(TOO_MANY_PARAMS,	"Too many action params"),		\
52 	C(PARAM_NOT_FOUND,	"Couldn't find param"),			\
53 	C(INVALID_PARAM,	"Invalid action param"),		\
54 	C(ACTION_NOT_FOUND,	"No action found"),			\
55 	C(NO_SAVE_PARAMS,	"No params found for save()"),		\
56 	C(TOO_MANY_SAVE_ACTIONS,"Can't have more than one save() action per hist"), \
57 	C(ACTION_MISMATCH,	"Handler doesn't support action"),	\
58 	C(NO_CLOSING_PAREN,	"No closing paren found"),		\
59 	C(SUBSYS_NOT_FOUND,	"Missing subsystem"),			\
60 	C(INVALID_SUBSYS_EVENT,	"Invalid subsystem or event name"),	\
61 	C(INVALID_REF_KEY,	"Using variable references in keys not supported"), \
62 	C(VAR_NOT_FOUND,	"Couldn't find variable"),		\
63 	C(FIELD_NOT_FOUND,	"Couldn't find field"),			\
64 	C(EMPTY_ASSIGNMENT,	"Empty assignment"),			\
65 	C(INVALID_SORT_MODIFIER,"Invalid sort modifier"),		\
66 	C(EMPTY_SORT_FIELD,	"Empty sort field"),			\
67 	C(TOO_MANY_SORT_FIELDS,	"Too many sort fields (Max = 2)"),	\
68 	C(INVALID_SORT_FIELD,	"Sort field must be a key or a val"),	\
69 	C(INVALID_STR_OPERAND,	"String type can not be an operand in expression"),
70 
71 #undef C
72 #define C(a, b)		HIST_ERR_##a
73 
74 enum { ERRORS };
75 
76 #undef C
77 #define C(a, b)		b
78 
79 static const char *err_text[] = { ERRORS };
80 
81 struct hist_field;
82 
83 typedef u64 (*hist_field_fn_t) (struct hist_field *field,
84 				struct tracing_map_elt *elt,
85 				struct ring_buffer_event *rbe,
86 				void *event);
87 
88 #define HIST_FIELD_OPERANDS_MAX	2
89 #define HIST_FIELDS_MAX		(TRACING_MAP_FIELDS_MAX + TRACING_MAP_VARS_MAX)
90 #define HIST_ACTIONS_MAX	8
91 
92 enum field_op_id {
93 	FIELD_OP_NONE,
94 	FIELD_OP_PLUS,
95 	FIELD_OP_MINUS,
96 	FIELD_OP_UNARY_MINUS,
97 };
98 
99 /*
100  * A hist_var (histogram variable) contains variable information for
101  * hist_fields having the HIST_FIELD_FL_VAR or HIST_FIELD_FL_VAR_REF
102  * flag set.  A hist_var has a variable name e.g. ts0, and is
103  * associated with a given histogram trigger, as specified by
104  * hist_data.  The hist_var idx is the unique index assigned to the
105  * variable by the hist trigger's tracing_map.  The idx is what is
106  * used to set a variable's value and, by a variable reference, to
107  * retrieve it.
108  */
109 struct hist_var {
110 	char				*name;
111 	struct hist_trigger_data	*hist_data;
112 	unsigned int			idx;
113 };
114 
115 struct hist_field {
116 	struct ftrace_event_field	*field;
117 	unsigned long			flags;
118 	hist_field_fn_t			fn;
119 	unsigned int			ref;
120 	unsigned int			size;
121 	unsigned int			offset;
122 	unsigned int                    is_signed;
123 	const char			*type;
124 	struct hist_field		*operands[HIST_FIELD_OPERANDS_MAX];
125 	struct hist_trigger_data	*hist_data;
126 
127 	/*
128 	 * Variable fields contain variable-specific info in var.
129 	 */
130 	struct hist_var			var;
131 	enum field_op_id		operator;
132 	char				*system;
133 	char				*event_name;
134 
135 	/*
136 	 * The name field is used for EXPR and VAR_REF fields.  VAR
137 	 * fields contain the variable name in var.name.
138 	 */
139 	char				*name;
140 
141 	/*
142 	 * When a histogram trigger is hit, if it has any references
143 	 * to variables, the values of those variables are collected
144 	 * into a var_ref_vals array by resolve_var_refs().  The
145 	 * current value of each variable is read from the tracing_map
146 	 * using the hist field's hist_var.idx and entered into the
147 	 * var_ref_idx entry i.e. var_ref_vals[var_ref_idx].
148 	 */
149 	unsigned int			var_ref_idx;
150 	bool                            read_once;
151 
152 	unsigned int			var_str_idx;
153 };
154 
hist_field_none(struct hist_field * field,struct tracing_map_elt * elt,struct ring_buffer_event * rbe,void * event)155 static u64 hist_field_none(struct hist_field *field,
156 			   struct tracing_map_elt *elt,
157 			   struct ring_buffer_event *rbe,
158 			   void *event)
159 {
160 	return 0;
161 }
162 
hist_field_counter(struct hist_field * field,struct tracing_map_elt * elt,struct ring_buffer_event * rbe,void * event)163 static u64 hist_field_counter(struct hist_field *field,
164 			      struct tracing_map_elt *elt,
165 			      struct ring_buffer_event *rbe,
166 			      void *event)
167 {
168 	return 1;
169 }
170 
hist_field_string(struct hist_field * hist_field,struct tracing_map_elt * elt,struct ring_buffer_event * rbe,void * event)171 static u64 hist_field_string(struct hist_field *hist_field,
172 			     struct tracing_map_elt *elt,
173 			     struct ring_buffer_event *rbe,
174 			     void *event)
175 {
176 	char *addr = (char *)(event + hist_field->field->offset);
177 
178 	return (u64)(unsigned long)addr;
179 }
180 
hist_field_dynstring(struct hist_field * hist_field,struct tracing_map_elt * elt,struct ring_buffer_event * rbe,void * event)181 static u64 hist_field_dynstring(struct hist_field *hist_field,
182 				struct tracing_map_elt *elt,
183 				struct ring_buffer_event *rbe,
184 				void *event)
185 {
186 	u32 str_item = *(u32 *)(event + hist_field->field->offset);
187 	int str_loc = str_item & 0xffff;
188 	char *addr = (char *)(event + str_loc);
189 
190 	return (u64)(unsigned long)addr;
191 }
192 
hist_field_pstring(struct hist_field * hist_field,struct tracing_map_elt * elt,struct ring_buffer_event * rbe,void * event)193 static u64 hist_field_pstring(struct hist_field *hist_field,
194 			      struct tracing_map_elt *elt,
195 			      struct ring_buffer_event *rbe,
196 			      void *event)
197 {
198 	char **addr = (char **)(event + hist_field->field->offset);
199 
200 	return (u64)(unsigned long)*addr;
201 }
202 
hist_field_log2(struct hist_field * hist_field,struct tracing_map_elt * elt,struct ring_buffer_event * rbe,void * event)203 static u64 hist_field_log2(struct hist_field *hist_field,
204 			   struct tracing_map_elt *elt,
205 			   struct ring_buffer_event *rbe,
206 			   void *event)
207 {
208 	struct hist_field *operand = hist_field->operands[0];
209 
210 	u64 val = operand->fn(operand, elt, rbe, event);
211 
212 	return (u64) ilog2(roundup_pow_of_two(val));
213 }
214 
hist_field_plus(struct hist_field * hist_field,struct tracing_map_elt * elt,struct ring_buffer_event * rbe,void * event)215 static u64 hist_field_plus(struct hist_field *hist_field,
216 			   struct tracing_map_elt *elt,
217 			   struct ring_buffer_event *rbe,
218 			   void *event)
219 {
220 	struct hist_field *operand1 = hist_field->operands[0];
221 	struct hist_field *operand2 = hist_field->operands[1];
222 
223 	u64 val1 = operand1->fn(operand1, elt, rbe, event);
224 	u64 val2 = operand2->fn(operand2, elt, rbe, event);
225 
226 	return val1 + val2;
227 }
228 
hist_field_minus(struct hist_field * hist_field,struct tracing_map_elt * elt,struct ring_buffer_event * rbe,void * event)229 static u64 hist_field_minus(struct hist_field *hist_field,
230 			    struct tracing_map_elt *elt,
231 			    struct ring_buffer_event *rbe,
232 			    void *event)
233 {
234 	struct hist_field *operand1 = hist_field->operands[0];
235 	struct hist_field *operand2 = hist_field->operands[1];
236 
237 	u64 val1 = operand1->fn(operand1, elt, rbe, event);
238 	u64 val2 = operand2->fn(operand2, elt, rbe, event);
239 
240 	return val1 - val2;
241 }
242 
hist_field_unary_minus(struct hist_field * hist_field,struct tracing_map_elt * elt,struct ring_buffer_event * rbe,void * event)243 static u64 hist_field_unary_minus(struct hist_field *hist_field,
244 				  struct tracing_map_elt *elt,
245 				  struct ring_buffer_event *rbe,
246 				  void *event)
247 {
248 	struct hist_field *operand = hist_field->operands[0];
249 
250 	s64 sval = (s64)operand->fn(operand, elt, rbe, event);
251 	u64 val = (u64)-sval;
252 
253 	return val;
254 }
255 
256 #define DEFINE_HIST_FIELD_FN(type)					\
257 	static u64 hist_field_##type(struct hist_field *hist_field,	\
258 				     struct tracing_map_elt *elt,	\
259 				     struct ring_buffer_event *rbe,	\
260 				     void *event)			\
261 {									\
262 	type *addr = (type *)(event + hist_field->field->offset);	\
263 									\
264 	return (u64)(unsigned long)*addr;				\
265 }
266 
267 DEFINE_HIST_FIELD_FN(s64);
268 DEFINE_HIST_FIELD_FN(u64);
269 DEFINE_HIST_FIELD_FN(s32);
270 DEFINE_HIST_FIELD_FN(u32);
271 DEFINE_HIST_FIELD_FN(s16);
272 DEFINE_HIST_FIELD_FN(u16);
273 DEFINE_HIST_FIELD_FN(s8);
274 DEFINE_HIST_FIELD_FN(u8);
275 
276 #define for_each_hist_field(i, hist_data)	\
277 	for ((i) = 0; (i) < (hist_data)->n_fields; (i)++)
278 
279 #define for_each_hist_val_field(i, hist_data)	\
280 	for ((i) = 0; (i) < (hist_data)->n_vals; (i)++)
281 
282 #define for_each_hist_key_field(i, hist_data)	\
283 	for ((i) = (hist_data)->n_vals; (i) < (hist_data)->n_fields; (i)++)
284 
285 #define HIST_STACKTRACE_DEPTH	16
286 #define HIST_STACKTRACE_SIZE	(HIST_STACKTRACE_DEPTH * sizeof(unsigned long))
287 #define HIST_STACKTRACE_SKIP	5
288 
289 #define HITCOUNT_IDX		0
290 #define HIST_KEY_SIZE_MAX	(MAX_FILTER_STR_VAL + HIST_STACKTRACE_SIZE)
291 
292 enum hist_field_flags {
293 	HIST_FIELD_FL_HITCOUNT		= 1 << 0,
294 	HIST_FIELD_FL_KEY		= 1 << 1,
295 	HIST_FIELD_FL_STRING		= 1 << 2,
296 	HIST_FIELD_FL_HEX		= 1 << 3,
297 	HIST_FIELD_FL_SYM		= 1 << 4,
298 	HIST_FIELD_FL_SYM_OFFSET	= 1 << 5,
299 	HIST_FIELD_FL_EXECNAME		= 1 << 6,
300 	HIST_FIELD_FL_SYSCALL		= 1 << 7,
301 	HIST_FIELD_FL_STACKTRACE	= 1 << 8,
302 	HIST_FIELD_FL_LOG2		= 1 << 9,
303 	HIST_FIELD_FL_TIMESTAMP		= 1 << 10,
304 	HIST_FIELD_FL_TIMESTAMP_USECS	= 1 << 11,
305 	HIST_FIELD_FL_VAR		= 1 << 12,
306 	HIST_FIELD_FL_EXPR		= 1 << 13,
307 	HIST_FIELD_FL_VAR_REF		= 1 << 14,
308 	HIST_FIELD_FL_CPU		= 1 << 15,
309 	HIST_FIELD_FL_ALIAS		= 1 << 16,
310 };
311 
312 struct var_defs {
313 	unsigned int	n_vars;
314 	char		*name[TRACING_MAP_VARS_MAX];
315 	char		*expr[TRACING_MAP_VARS_MAX];
316 };
317 
318 struct hist_trigger_attrs {
319 	char		*keys_str;
320 	char		*vals_str;
321 	char		*sort_key_str;
322 	char		*name;
323 	char		*clock;
324 	bool		pause;
325 	bool		cont;
326 	bool		clear;
327 	bool		ts_in_usecs;
328 	unsigned int	map_bits;
329 
330 	char		*assignment_str[TRACING_MAP_VARS_MAX];
331 	unsigned int	n_assignments;
332 
333 	char		*action_str[HIST_ACTIONS_MAX];
334 	unsigned int	n_actions;
335 
336 	struct var_defs	var_defs;
337 };
338 
339 struct field_var {
340 	struct hist_field	*var;
341 	struct hist_field	*val;
342 };
343 
344 struct field_var_hist {
345 	struct hist_trigger_data	*hist_data;
346 	char				*cmd;
347 };
348 
349 struct hist_trigger_data {
350 	struct hist_field               *fields[HIST_FIELDS_MAX];
351 	unsigned int			n_vals;
352 	unsigned int			n_keys;
353 	unsigned int			n_fields;
354 	unsigned int			n_vars;
355 	unsigned int			n_var_str;
356 	unsigned int			key_size;
357 	struct tracing_map_sort_key	sort_keys[TRACING_MAP_SORT_KEYS_MAX];
358 	unsigned int			n_sort_keys;
359 	struct trace_event_file		*event_file;
360 	struct hist_trigger_attrs	*attrs;
361 	struct tracing_map		*map;
362 	bool				enable_timestamps;
363 	bool				remove;
364 	struct hist_field               *var_refs[TRACING_MAP_VARS_MAX];
365 	unsigned int			n_var_refs;
366 
367 	struct action_data		*actions[HIST_ACTIONS_MAX];
368 	unsigned int			n_actions;
369 
370 	struct field_var		*field_vars[SYNTH_FIELDS_MAX];
371 	unsigned int			n_field_vars;
372 	unsigned int			n_field_var_str;
373 	struct field_var_hist		*field_var_hists[SYNTH_FIELDS_MAX];
374 	unsigned int			n_field_var_hists;
375 
376 	struct field_var		*save_vars[SYNTH_FIELDS_MAX];
377 	unsigned int			n_save_vars;
378 	unsigned int			n_save_var_str;
379 };
380 
381 struct action_data;
382 
383 typedef void (*action_fn_t) (struct hist_trigger_data *hist_data,
384 			     struct tracing_map_elt *elt, void *rec,
385 			     struct ring_buffer_event *rbe, void *key,
386 			     struct action_data *data, u64 *var_ref_vals);
387 
388 typedef bool (*check_track_val_fn_t) (u64 track_val, u64 var_val);
389 
390 enum handler_id {
391 	HANDLER_ONMATCH = 1,
392 	HANDLER_ONMAX,
393 	HANDLER_ONCHANGE,
394 };
395 
396 enum action_id {
397 	ACTION_SAVE = 1,
398 	ACTION_TRACE,
399 	ACTION_SNAPSHOT,
400 };
401 
402 struct action_data {
403 	enum handler_id		handler;
404 	enum action_id		action;
405 	char			*action_name;
406 	action_fn_t		fn;
407 
408 	unsigned int		n_params;
409 	char			*params[SYNTH_FIELDS_MAX];
410 
411 	/*
412 	 * When a histogram trigger is hit, the values of any
413 	 * references to variables, including variables being passed
414 	 * as parameters to synthetic events, are collected into a
415 	 * var_ref_vals array.  This var_ref_idx array is an array of
416 	 * indices into the var_ref_vals array, one for each synthetic
417 	 * event param, and is passed to the synthetic event
418 	 * invocation.
419 	 */
420 	unsigned int		var_ref_idx[TRACING_MAP_VARS_MAX];
421 	struct synth_event	*synth_event;
422 	bool			use_trace_keyword;
423 	char			*synth_event_name;
424 
425 	union {
426 		struct {
427 			char			*event;
428 			char			*event_system;
429 		} match_data;
430 
431 		struct {
432 			/*
433 			 * var_str contains the $-unstripped variable
434 			 * name referenced by var_ref, and used when
435 			 * printing the action.  Because var_ref
436 			 * creation is deferred to create_actions(),
437 			 * we need a per-action way to save it until
438 			 * then, thus var_str.
439 			 */
440 			char			*var_str;
441 
442 			/*
443 			 * var_ref refers to the variable being
444 			 * tracked e.g onmax($var).
445 			 */
446 			struct hist_field	*var_ref;
447 
448 			/*
449 			 * track_var contains the 'invisible' tracking
450 			 * variable created to keep the current
451 			 * e.g. max value.
452 			 */
453 			struct hist_field	*track_var;
454 
455 			check_track_val_fn_t	check_val;
456 			action_fn_t		save_data;
457 		} track_data;
458 	};
459 };
460 
461 struct track_data {
462 	u64				track_val;
463 	bool				updated;
464 
465 	unsigned int			key_len;
466 	void				*key;
467 	struct tracing_map_elt		elt;
468 
469 	struct action_data		*action_data;
470 	struct hist_trigger_data	*hist_data;
471 };
472 
473 struct hist_elt_data {
474 	char *comm;
475 	u64 *var_ref_vals;
476 	char *field_var_str[SYNTH_FIELDS_MAX];
477 };
478 
479 struct snapshot_context {
480 	struct tracing_map_elt	*elt;
481 	void			*key;
482 };
483 
track_data_free(struct track_data * track_data)484 static void track_data_free(struct track_data *track_data)
485 {
486 	struct hist_elt_data *elt_data;
487 
488 	if (!track_data)
489 		return;
490 
491 	kfree(track_data->key);
492 
493 	elt_data = track_data->elt.private_data;
494 	if (elt_data) {
495 		kfree(elt_data->comm);
496 		kfree(elt_data);
497 	}
498 
499 	kfree(track_data);
500 }
501 
track_data_alloc(unsigned int key_len,struct action_data * action_data,struct hist_trigger_data * hist_data)502 static struct track_data *track_data_alloc(unsigned int key_len,
503 					   struct action_data *action_data,
504 					   struct hist_trigger_data *hist_data)
505 {
506 	struct track_data *data = kzalloc(sizeof(*data), GFP_KERNEL);
507 	struct hist_elt_data *elt_data;
508 
509 	if (!data)
510 		return ERR_PTR(-ENOMEM);
511 
512 	data->key = kzalloc(key_len, GFP_KERNEL);
513 	if (!data->key) {
514 		track_data_free(data);
515 		return ERR_PTR(-ENOMEM);
516 	}
517 
518 	data->key_len = key_len;
519 	data->action_data = action_data;
520 	data->hist_data = hist_data;
521 
522 	elt_data = kzalloc(sizeof(*elt_data), GFP_KERNEL);
523 	if (!elt_data) {
524 		track_data_free(data);
525 		return ERR_PTR(-ENOMEM);
526 	}
527 
528 	data->elt.private_data = elt_data;
529 
530 	elt_data->comm = kzalloc(TASK_COMM_LEN, GFP_KERNEL);
531 	if (!elt_data->comm) {
532 		track_data_free(data);
533 		return ERR_PTR(-ENOMEM);
534 	}
535 
536 	return data;
537 }
538 
539 static char last_cmd[MAX_FILTER_STR_VAL];
540 static char last_cmd_loc[MAX_FILTER_STR_VAL];
541 
errpos(char * str)542 static int errpos(char *str)
543 {
544 	return err_pos(last_cmd, str);
545 }
546 
last_cmd_set(struct trace_event_file * file,char * str)547 static void last_cmd_set(struct trace_event_file *file, char *str)
548 {
549 	const char *system = NULL, *name = NULL;
550 	struct trace_event_call *call;
551 
552 	if (!str)
553 		return;
554 
555 	strcpy(last_cmd, "hist:");
556 	strncat(last_cmd, str, MAX_FILTER_STR_VAL - 1 - sizeof("hist:"));
557 
558 	if (file) {
559 		call = file->event_call;
560 		system = call->class->system;
561 		if (system) {
562 			name = trace_event_name(call);
563 			if (!name)
564 				system = NULL;
565 		}
566 	}
567 
568 	if (system)
569 		snprintf(last_cmd_loc, MAX_FILTER_STR_VAL, "hist:%s:%s", system, name);
570 }
571 
hist_err(struct trace_array * tr,u8 err_type,u8 err_pos)572 static void hist_err(struct trace_array *tr, u8 err_type, u8 err_pos)
573 {
574 	tracing_log_err(tr, last_cmd_loc, last_cmd, err_text,
575 			err_type, err_pos);
576 }
577 
hist_err_clear(void)578 static void hist_err_clear(void)
579 {
580 	last_cmd[0] = '\0';
581 	last_cmd_loc[0] = '\0';
582 }
583 
584 typedef void (*synth_probe_func_t) (void *__data, u64 *var_ref_vals,
585 				    unsigned int *var_ref_idx);
586 
trace_synth(struct synth_event * event,u64 * var_ref_vals,unsigned int * var_ref_idx)587 static inline void trace_synth(struct synth_event *event, u64 *var_ref_vals,
588 			       unsigned int *var_ref_idx)
589 {
590 	struct tracepoint *tp = event->tp;
591 
592 	if (unlikely(atomic_read(&tp->key.enabled) > 0)) {
593 		struct tracepoint_func *probe_func_ptr;
594 		synth_probe_func_t probe_func;
595 		void *__data;
596 
597 		if (!(cpu_online(raw_smp_processor_id())))
598 			return;
599 
600 		probe_func_ptr = rcu_dereference_sched((tp)->funcs);
601 		if (probe_func_ptr) {
602 			do {
603 				probe_func = probe_func_ptr->func;
604 				__data = probe_func_ptr->data;
605 				probe_func(__data, var_ref_vals, var_ref_idx);
606 			} while ((++probe_func_ptr)->func);
607 		}
608 	}
609 }
610 
action_trace(struct hist_trigger_data * hist_data,struct tracing_map_elt * elt,void * rec,struct ring_buffer_event * rbe,void * key,struct action_data * data,u64 * var_ref_vals)611 static void action_trace(struct hist_trigger_data *hist_data,
612 			 struct tracing_map_elt *elt, void *rec,
613 			 struct ring_buffer_event *rbe, void *key,
614 			 struct action_data *data, u64 *var_ref_vals)
615 {
616 	struct synth_event *event = data->synth_event;
617 
618 	trace_synth(event, var_ref_vals, data->var_ref_idx);
619 }
620 
621 struct hist_var_data {
622 	struct list_head list;
623 	struct hist_trigger_data *hist_data;
624 };
625 
hist_field_timestamp(struct hist_field * hist_field,struct tracing_map_elt * elt,struct ring_buffer_event * rbe,void * event)626 static u64 hist_field_timestamp(struct hist_field *hist_field,
627 				struct tracing_map_elt *elt,
628 				struct ring_buffer_event *rbe,
629 				void *event)
630 {
631 	struct hist_trigger_data *hist_data = hist_field->hist_data;
632 	struct trace_array *tr = hist_data->event_file->tr;
633 
634 	u64 ts = ring_buffer_event_time_stamp(rbe);
635 
636 	if (hist_data->attrs->ts_in_usecs && trace_clock_in_ns(tr))
637 		ts = ns2usecs(ts);
638 
639 	return ts;
640 }
641 
hist_field_cpu(struct hist_field * hist_field,struct tracing_map_elt * elt,struct ring_buffer_event * rbe,void * event)642 static u64 hist_field_cpu(struct hist_field *hist_field,
643 			  struct tracing_map_elt *elt,
644 			  struct ring_buffer_event *rbe,
645 			  void *event)
646 {
647 	int cpu = smp_processor_id();
648 
649 	return cpu;
650 }
651 
652 /**
653  * check_field_for_var_ref - Check if a VAR_REF field references a variable
654  * @hist_field: The VAR_REF field to check
655  * @var_data: The hist trigger that owns the variable
656  * @var_idx: The trigger variable identifier
657  *
658  * Check the given VAR_REF field to see whether or not it references
659  * the given variable associated with the given trigger.
660  *
661  * Return: The VAR_REF field if it does reference the variable, NULL if not
662  */
663 static struct hist_field *
check_field_for_var_ref(struct hist_field * hist_field,struct hist_trigger_data * var_data,unsigned int var_idx)664 check_field_for_var_ref(struct hist_field *hist_field,
665 			struct hist_trigger_data *var_data,
666 			unsigned int var_idx)
667 {
668 	WARN_ON(!(hist_field && hist_field->flags & HIST_FIELD_FL_VAR_REF));
669 
670 	if (hist_field && hist_field->var.idx == var_idx &&
671 	    hist_field->var.hist_data == var_data)
672 		return hist_field;
673 
674 	return NULL;
675 }
676 
677 /**
678  * find_var_ref - Check if a trigger has a reference to a trigger variable
679  * @hist_data: The hist trigger that might have a reference to the variable
680  * @var_data: The hist trigger that owns the variable
681  * @var_idx: The trigger variable identifier
682  *
683  * Check the list of var_refs[] on the first hist trigger to see
684  * whether any of them are references to the variable on the second
685  * trigger.
686  *
687  * Return: The VAR_REF field referencing the variable if so, NULL if not
688  */
find_var_ref(struct hist_trigger_data * hist_data,struct hist_trigger_data * var_data,unsigned int var_idx)689 static struct hist_field *find_var_ref(struct hist_trigger_data *hist_data,
690 				       struct hist_trigger_data *var_data,
691 				       unsigned int var_idx)
692 {
693 	struct hist_field *hist_field;
694 	unsigned int i;
695 
696 	for (i = 0; i < hist_data->n_var_refs; i++) {
697 		hist_field = hist_data->var_refs[i];
698 		if (check_field_for_var_ref(hist_field, var_data, var_idx))
699 			return hist_field;
700 	}
701 
702 	return NULL;
703 }
704 
705 /**
706  * find_any_var_ref - Check if there is a reference to a given trigger variable
707  * @hist_data: The hist trigger
708  * @var_idx: The trigger variable identifier
709  *
710  * Check to see whether the given variable is currently referenced by
711  * any other trigger.
712  *
713  * The trigger the variable is defined on is explicitly excluded - the
714  * assumption being that a self-reference doesn't prevent a trigger
715  * from being removed.
716  *
717  * Return: The VAR_REF field referencing the variable if so, NULL if not
718  */
find_any_var_ref(struct hist_trigger_data * hist_data,unsigned int var_idx)719 static struct hist_field *find_any_var_ref(struct hist_trigger_data *hist_data,
720 					   unsigned int var_idx)
721 {
722 	struct trace_array *tr = hist_data->event_file->tr;
723 	struct hist_field *found = NULL;
724 	struct hist_var_data *var_data;
725 
726 	list_for_each_entry(var_data, &tr->hist_vars, list) {
727 		if (var_data->hist_data == hist_data)
728 			continue;
729 		found = find_var_ref(var_data->hist_data, hist_data, var_idx);
730 		if (found)
731 			break;
732 	}
733 
734 	return found;
735 }
736 
737 /**
738  * check_var_refs - Check if there is a reference to any of trigger's variables
739  * @hist_data: The hist trigger
740  *
741  * A trigger can define one or more variables.  If any one of them is
742  * currently referenced by any other trigger, this function will
743  * determine that.
744 
745  * Typically used to determine whether or not a trigger can be removed
746  * - if there are any references to a trigger's variables, it cannot.
747  *
748  * Return: True if there is a reference to any of trigger's variables
749  */
check_var_refs(struct hist_trigger_data * hist_data)750 static bool check_var_refs(struct hist_trigger_data *hist_data)
751 {
752 	struct hist_field *field;
753 	bool found = false;
754 	int i;
755 
756 	for_each_hist_field(i, hist_data) {
757 		field = hist_data->fields[i];
758 		if (field && field->flags & HIST_FIELD_FL_VAR) {
759 			if (find_any_var_ref(hist_data, field->var.idx)) {
760 				found = true;
761 				break;
762 			}
763 		}
764 	}
765 
766 	return found;
767 }
768 
find_hist_vars(struct hist_trigger_data * hist_data)769 static struct hist_var_data *find_hist_vars(struct hist_trigger_data *hist_data)
770 {
771 	struct trace_array *tr = hist_data->event_file->tr;
772 	struct hist_var_data *var_data, *found = NULL;
773 
774 	list_for_each_entry(var_data, &tr->hist_vars, list) {
775 		if (var_data->hist_data == hist_data) {
776 			found = var_data;
777 			break;
778 		}
779 	}
780 
781 	return found;
782 }
783 
field_has_hist_vars(struct hist_field * hist_field,unsigned int level)784 static bool field_has_hist_vars(struct hist_field *hist_field,
785 				unsigned int level)
786 {
787 	int i;
788 
789 	if (level > 3)
790 		return false;
791 
792 	if (!hist_field)
793 		return false;
794 
795 	if (hist_field->flags & HIST_FIELD_FL_VAR ||
796 	    hist_field->flags & HIST_FIELD_FL_VAR_REF)
797 		return true;
798 
799 	for (i = 0; i < HIST_FIELD_OPERANDS_MAX; i++) {
800 		struct hist_field *operand;
801 
802 		operand = hist_field->operands[i];
803 		if (field_has_hist_vars(operand, level + 1))
804 			return true;
805 	}
806 
807 	return false;
808 }
809 
has_hist_vars(struct hist_trigger_data * hist_data)810 static bool has_hist_vars(struct hist_trigger_data *hist_data)
811 {
812 	struct hist_field *hist_field;
813 	int i;
814 
815 	for_each_hist_field(i, hist_data) {
816 		hist_field = hist_data->fields[i];
817 		if (field_has_hist_vars(hist_field, 0))
818 			return true;
819 	}
820 
821 	return false;
822 }
823 
save_hist_vars(struct hist_trigger_data * hist_data)824 static int save_hist_vars(struct hist_trigger_data *hist_data)
825 {
826 	struct trace_array *tr = hist_data->event_file->tr;
827 	struct hist_var_data *var_data;
828 
829 	var_data = find_hist_vars(hist_data);
830 	if (var_data)
831 		return 0;
832 
833 	if (tracing_check_open_get_tr(tr))
834 		return -ENODEV;
835 
836 	var_data = kzalloc(sizeof(*var_data), GFP_KERNEL);
837 	if (!var_data) {
838 		trace_array_put(tr);
839 		return -ENOMEM;
840 	}
841 
842 	var_data->hist_data = hist_data;
843 	list_add(&var_data->list, &tr->hist_vars);
844 
845 	return 0;
846 }
847 
remove_hist_vars(struct hist_trigger_data * hist_data)848 static void remove_hist_vars(struct hist_trigger_data *hist_data)
849 {
850 	struct trace_array *tr = hist_data->event_file->tr;
851 	struct hist_var_data *var_data;
852 
853 	var_data = find_hist_vars(hist_data);
854 	if (!var_data)
855 		return;
856 
857 	if (WARN_ON(check_var_refs(hist_data)))
858 		return;
859 
860 	list_del(&var_data->list);
861 
862 	kfree(var_data);
863 
864 	trace_array_put(tr);
865 }
866 
find_var_field(struct hist_trigger_data * hist_data,const char * var_name)867 static struct hist_field *find_var_field(struct hist_trigger_data *hist_data,
868 					 const char *var_name)
869 {
870 	struct hist_field *hist_field, *found = NULL;
871 	int i;
872 
873 	for_each_hist_field(i, hist_data) {
874 		hist_field = hist_data->fields[i];
875 		if (hist_field && hist_field->flags & HIST_FIELD_FL_VAR &&
876 		    strcmp(hist_field->var.name, var_name) == 0) {
877 			found = hist_field;
878 			break;
879 		}
880 	}
881 
882 	return found;
883 }
884 
find_var(struct hist_trigger_data * hist_data,struct trace_event_file * file,const char * var_name)885 static struct hist_field *find_var(struct hist_trigger_data *hist_data,
886 				   struct trace_event_file *file,
887 				   const char *var_name)
888 {
889 	struct hist_trigger_data *test_data;
890 	struct event_trigger_data *test;
891 	struct hist_field *hist_field;
892 
893 	lockdep_assert_held(&event_mutex);
894 
895 	hist_field = find_var_field(hist_data, var_name);
896 	if (hist_field)
897 		return hist_field;
898 
899 	list_for_each_entry(test, &file->triggers, list) {
900 		if (test->cmd_ops->trigger_type == ETT_EVENT_HIST) {
901 			test_data = test->private_data;
902 			hist_field = find_var_field(test_data, var_name);
903 			if (hist_field)
904 				return hist_field;
905 		}
906 	}
907 
908 	return NULL;
909 }
910 
find_var_file(struct trace_array * tr,char * system,char * event_name,char * var_name)911 static struct trace_event_file *find_var_file(struct trace_array *tr,
912 					      char *system,
913 					      char *event_name,
914 					      char *var_name)
915 {
916 	struct hist_trigger_data *var_hist_data;
917 	struct hist_var_data *var_data;
918 	struct trace_event_file *file, *found = NULL;
919 
920 	if (system)
921 		return find_event_file(tr, system, event_name);
922 
923 	list_for_each_entry(var_data, &tr->hist_vars, list) {
924 		var_hist_data = var_data->hist_data;
925 		file = var_hist_data->event_file;
926 		if (file == found)
927 			continue;
928 
929 		if (find_var_field(var_hist_data, var_name)) {
930 			if (found) {
931 				hist_err(tr, HIST_ERR_VAR_NOT_UNIQUE, errpos(var_name));
932 				return NULL;
933 			}
934 
935 			found = file;
936 		}
937 	}
938 
939 	return found;
940 }
941 
find_file_var(struct trace_event_file * file,const char * var_name)942 static struct hist_field *find_file_var(struct trace_event_file *file,
943 					const char *var_name)
944 {
945 	struct hist_trigger_data *test_data;
946 	struct event_trigger_data *test;
947 	struct hist_field *hist_field;
948 
949 	lockdep_assert_held(&event_mutex);
950 
951 	list_for_each_entry(test, &file->triggers, list) {
952 		if (test->cmd_ops->trigger_type == ETT_EVENT_HIST) {
953 			test_data = test->private_data;
954 			hist_field = find_var_field(test_data, var_name);
955 			if (hist_field)
956 				return hist_field;
957 		}
958 	}
959 
960 	return NULL;
961 }
962 
963 static struct hist_field *
find_match_var(struct hist_trigger_data * hist_data,char * var_name)964 find_match_var(struct hist_trigger_data *hist_data, char *var_name)
965 {
966 	struct trace_array *tr = hist_data->event_file->tr;
967 	struct hist_field *hist_field, *found = NULL;
968 	struct trace_event_file *file;
969 	unsigned int i;
970 
971 	for (i = 0; i < hist_data->n_actions; i++) {
972 		struct action_data *data = hist_data->actions[i];
973 
974 		if (data->handler == HANDLER_ONMATCH) {
975 			char *system = data->match_data.event_system;
976 			char *event_name = data->match_data.event;
977 
978 			file = find_var_file(tr, system, event_name, var_name);
979 			if (!file)
980 				continue;
981 			hist_field = find_file_var(file, var_name);
982 			if (hist_field) {
983 				if (found) {
984 					hist_err(tr, HIST_ERR_VAR_NOT_UNIQUE,
985 						 errpos(var_name));
986 					return ERR_PTR(-EINVAL);
987 				}
988 
989 				found = hist_field;
990 			}
991 		}
992 	}
993 	return found;
994 }
995 
find_event_var(struct hist_trigger_data * hist_data,char * system,char * event_name,char * var_name)996 static struct hist_field *find_event_var(struct hist_trigger_data *hist_data,
997 					 char *system,
998 					 char *event_name,
999 					 char *var_name)
1000 {
1001 	struct trace_array *tr = hist_data->event_file->tr;
1002 	struct hist_field *hist_field = NULL;
1003 	struct trace_event_file *file;
1004 
1005 	if (!system || !event_name) {
1006 		hist_field = find_match_var(hist_data, var_name);
1007 		if (IS_ERR(hist_field))
1008 			return NULL;
1009 		if (hist_field)
1010 			return hist_field;
1011 	}
1012 
1013 	file = find_var_file(tr, system, event_name, var_name);
1014 	if (!file)
1015 		return NULL;
1016 
1017 	hist_field = find_file_var(file, var_name);
1018 
1019 	return hist_field;
1020 }
1021 
hist_field_var_ref(struct hist_field * hist_field,struct tracing_map_elt * elt,struct ring_buffer_event * rbe,void * event)1022 static u64 hist_field_var_ref(struct hist_field *hist_field,
1023 			      struct tracing_map_elt *elt,
1024 			      struct ring_buffer_event *rbe,
1025 			      void *event)
1026 {
1027 	struct hist_elt_data *elt_data;
1028 	u64 var_val = 0;
1029 
1030 	if (WARN_ON_ONCE(!elt))
1031 		return var_val;
1032 
1033 	elt_data = elt->private_data;
1034 	var_val = elt_data->var_ref_vals[hist_field->var_ref_idx];
1035 
1036 	return var_val;
1037 }
1038 
resolve_var_refs(struct hist_trigger_data * hist_data,void * key,u64 * var_ref_vals,bool self)1039 static bool resolve_var_refs(struct hist_trigger_data *hist_data, void *key,
1040 			     u64 *var_ref_vals, bool self)
1041 {
1042 	struct hist_trigger_data *var_data;
1043 	struct tracing_map_elt *var_elt;
1044 	struct hist_field *hist_field;
1045 	unsigned int i, var_idx;
1046 	bool resolved = true;
1047 	u64 var_val = 0;
1048 
1049 	for (i = 0; i < hist_data->n_var_refs; i++) {
1050 		hist_field = hist_data->var_refs[i];
1051 		var_idx = hist_field->var.idx;
1052 		var_data = hist_field->var.hist_data;
1053 
1054 		if (var_data == NULL) {
1055 			resolved = false;
1056 			break;
1057 		}
1058 
1059 		if ((self && var_data != hist_data) ||
1060 		    (!self && var_data == hist_data))
1061 			continue;
1062 
1063 		var_elt = tracing_map_lookup(var_data->map, key);
1064 		if (!var_elt) {
1065 			resolved = false;
1066 			break;
1067 		}
1068 
1069 		if (!tracing_map_var_set(var_elt, var_idx)) {
1070 			resolved = false;
1071 			break;
1072 		}
1073 
1074 		if (self || !hist_field->read_once)
1075 			var_val = tracing_map_read_var(var_elt, var_idx);
1076 		else
1077 			var_val = tracing_map_read_var_once(var_elt, var_idx);
1078 
1079 		var_ref_vals[i] = var_val;
1080 	}
1081 
1082 	return resolved;
1083 }
1084 
hist_field_name(struct hist_field * field,unsigned int level)1085 static const char *hist_field_name(struct hist_field *field,
1086 				   unsigned int level)
1087 {
1088 	const char *field_name = "";
1089 
1090 	if (level > 1)
1091 		return field_name;
1092 
1093 	if (field->field)
1094 		field_name = field->field->name;
1095 	else if (field->flags & HIST_FIELD_FL_LOG2 ||
1096 		 field->flags & HIST_FIELD_FL_ALIAS)
1097 		field_name = hist_field_name(field->operands[0], ++level);
1098 	else if (field->flags & HIST_FIELD_FL_CPU)
1099 		field_name = "common_cpu";
1100 	else if (field->flags & HIST_FIELD_FL_EXPR ||
1101 		 field->flags & HIST_FIELD_FL_VAR_REF) {
1102 		if (field->system) {
1103 			static char full_name[MAX_FILTER_STR_VAL];
1104 
1105 			strcat(full_name, field->system);
1106 			strcat(full_name, ".");
1107 			strcat(full_name, field->event_name);
1108 			strcat(full_name, ".");
1109 			strcat(full_name, field->name);
1110 			field_name = full_name;
1111 		} else
1112 			field_name = field->name;
1113 	} else if (field->flags & HIST_FIELD_FL_TIMESTAMP)
1114 		field_name = "common_timestamp";
1115 
1116 	if (field_name == NULL)
1117 		field_name = "";
1118 
1119 	return field_name;
1120 }
1121 
select_value_fn(int field_size,int field_is_signed)1122 static hist_field_fn_t select_value_fn(int field_size, int field_is_signed)
1123 {
1124 	hist_field_fn_t fn = NULL;
1125 
1126 	switch (field_size) {
1127 	case 8:
1128 		if (field_is_signed)
1129 			fn = hist_field_s64;
1130 		else
1131 			fn = hist_field_u64;
1132 		break;
1133 	case 4:
1134 		if (field_is_signed)
1135 			fn = hist_field_s32;
1136 		else
1137 			fn = hist_field_u32;
1138 		break;
1139 	case 2:
1140 		if (field_is_signed)
1141 			fn = hist_field_s16;
1142 		else
1143 			fn = hist_field_u16;
1144 		break;
1145 	case 1:
1146 		if (field_is_signed)
1147 			fn = hist_field_s8;
1148 		else
1149 			fn = hist_field_u8;
1150 		break;
1151 	}
1152 
1153 	return fn;
1154 }
1155 
parse_map_size(char * str)1156 static int parse_map_size(char *str)
1157 {
1158 	unsigned long size, map_bits;
1159 	int ret;
1160 
1161 	ret = kstrtoul(str, 0, &size);
1162 	if (ret)
1163 		goto out;
1164 
1165 	map_bits = ilog2(roundup_pow_of_two(size));
1166 	if (map_bits < TRACING_MAP_BITS_MIN ||
1167 	    map_bits > TRACING_MAP_BITS_MAX)
1168 		ret = -EINVAL;
1169 	else
1170 		ret = map_bits;
1171  out:
1172 	return ret;
1173 }
1174 
destroy_hist_trigger_attrs(struct hist_trigger_attrs * attrs)1175 static void destroy_hist_trigger_attrs(struct hist_trigger_attrs *attrs)
1176 {
1177 	unsigned int i;
1178 
1179 	if (!attrs)
1180 		return;
1181 
1182 	for (i = 0; i < attrs->n_assignments; i++)
1183 		kfree(attrs->assignment_str[i]);
1184 
1185 	for (i = 0; i < attrs->n_actions; i++)
1186 		kfree(attrs->action_str[i]);
1187 
1188 	kfree(attrs->name);
1189 	kfree(attrs->sort_key_str);
1190 	kfree(attrs->keys_str);
1191 	kfree(attrs->vals_str);
1192 	kfree(attrs->clock);
1193 	kfree(attrs);
1194 }
1195 
parse_action(char * str,struct hist_trigger_attrs * attrs)1196 static int parse_action(char *str, struct hist_trigger_attrs *attrs)
1197 {
1198 	int ret = -EINVAL;
1199 
1200 	if (attrs->n_actions >= HIST_ACTIONS_MAX)
1201 		return ret;
1202 
1203 	if ((str_has_prefix(str, "onmatch(")) ||
1204 	    (str_has_prefix(str, "onmax(")) ||
1205 	    (str_has_prefix(str, "onchange("))) {
1206 		attrs->action_str[attrs->n_actions] = kstrdup(str, GFP_KERNEL);
1207 		if (!attrs->action_str[attrs->n_actions]) {
1208 			ret = -ENOMEM;
1209 			return ret;
1210 		}
1211 		attrs->n_actions++;
1212 		ret = 0;
1213 	}
1214 	return ret;
1215 }
1216 
parse_assignment(struct trace_array * tr,char * str,struct hist_trigger_attrs * attrs)1217 static int parse_assignment(struct trace_array *tr,
1218 			    char *str, struct hist_trigger_attrs *attrs)
1219 {
1220 	int len, ret = 0;
1221 
1222 	if ((len = str_has_prefix(str, "key=")) ||
1223 	    (len = str_has_prefix(str, "keys="))) {
1224 		attrs->keys_str = kstrdup(str + len, GFP_KERNEL);
1225 		if (!attrs->keys_str) {
1226 			ret = -ENOMEM;
1227 			goto out;
1228 		}
1229 	} else if ((len = str_has_prefix(str, "val=")) ||
1230 		   (len = str_has_prefix(str, "vals=")) ||
1231 		   (len = str_has_prefix(str, "values="))) {
1232 		attrs->vals_str = kstrdup(str + len, GFP_KERNEL);
1233 		if (!attrs->vals_str) {
1234 			ret = -ENOMEM;
1235 			goto out;
1236 		}
1237 	} else if ((len = str_has_prefix(str, "sort="))) {
1238 		attrs->sort_key_str = kstrdup(str + len, GFP_KERNEL);
1239 		if (!attrs->sort_key_str) {
1240 			ret = -ENOMEM;
1241 			goto out;
1242 		}
1243 	} else if (str_has_prefix(str, "name=")) {
1244 		attrs->name = kstrdup(str, GFP_KERNEL);
1245 		if (!attrs->name) {
1246 			ret = -ENOMEM;
1247 			goto out;
1248 		}
1249 	} else if ((len = str_has_prefix(str, "clock="))) {
1250 		str += len;
1251 
1252 		str = strstrip(str);
1253 		attrs->clock = kstrdup(str, GFP_KERNEL);
1254 		if (!attrs->clock) {
1255 			ret = -ENOMEM;
1256 			goto out;
1257 		}
1258 	} else if ((len = str_has_prefix(str, "size="))) {
1259 		int map_bits = parse_map_size(str + len);
1260 
1261 		if (map_bits < 0) {
1262 			ret = map_bits;
1263 			goto out;
1264 		}
1265 		attrs->map_bits = map_bits;
1266 	} else {
1267 		char *assignment;
1268 
1269 		if (attrs->n_assignments == TRACING_MAP_VARS_MAX) {
1270 			hist_err(tr, HIST_ERR_TOO_MANY_VARS, errpos(str));
1271 			ret = -EINVAL;
1272 			goto out;
1273 		}
1274 
1275 		assignment = kstrdup(str, GFP_KERNEL);
1276 		if (!assignment) {
1277 			ret = -ENOMEM;
1278 			goto out;
1279 		}
1280 
1281 		attrs->assignment_str[attrs->n_assignments++] = assignment;
1282 	}
1283  out:
1284 	return ret;
1285 }
1286 
1287 static struct hist_trigger_attrs *
parse_hist_trigger_attrs(struct trace_array * tr,char * trigger_str)1288 parse_hist_trigger_attrs(struct trace_array *tr, char *trigger_str)
1289 {
1290 	struct hist_trigger_attrs *attrs;
1291 	int ret = 0;
1292 
1293 	attrs = kzalloc(sizeof(*attrs), GFP_KERNEL);
1294 	if (!attrs)
1295 		return ERR_PTR(-ENOMEM);
1296 
1297 	while (trigger_str) {
1298 		char *str = strsep(&trigger_str, ":");
1299 		char *rhs;
1300 
1301 		rhs = strchr(str, '=');
1302 		if (rhs) {
1303 			if (!strlen(++rhs)) {
1304 				ret = -EINVAL;
1305 				hist_err(tr, HIST_ERR_EMPTY_ASSIGNMENT, errpos(str));
1306 				goto free;
1307 			}
1308 			ret = parse_assignment(tr, str, attrs);
1309 			if (ret)
1310 				goto free;
1311 		} else if (strcmp(str, "pause") == 0)
1312 			attrs->pause = true;
1313 		else if ((strcmp(str, "cont") == 0) ||
1314 			 (strcmp(str, "continue") == 0))
1315 			attrs->cont = true;
1316 		else if (strcmp(str, "clear") == 0)
1317 			attrs->clear = true;
1318 		else {
1319 			ret = parse_action(str, attrs);
1320 			if (ret)
1321 				goto free;
1322 		}
1323 	}
1324 
1325 	if (!attrs->keys_str) {
1326 		ret = -EINVAL;
1327 		goto free;
1328 	}
1329 
1330 	if (!attrs->clock) {
1331 		attrs->clock = kstrdup("global", GFP_KERNEL);
1332 		if (!attrs->clock) {
1333 			ret = -ENOMEM;
1334 			goto free;
1335 		}
1336 	}
1337 
1338 	return attrs;
1339  free:
1340 	destroy_hist_trigger_attrs(attrs);
1341 
1342 	return ERR_PTR(ret);
1343 }
1344 
save_comm(char * comm,struct task_struct * task)1345 static inline void save_comm(char *comm, struct task_struct *task)
1346 {
1347 	if (!task->pid) {
1348 		strcpy(comm, "<idle>");
1349 		return;
1350 	}
1351 
1352 	if (WARN_ON_ONCE(task->pid < 0)) {
1353 		strcpy(comm, "<XXX>");
1354 		return;
1355 	}
1356 
1357 	strncpy(comm, task->comm, TASK_COMM_LEN);
1358 }
1359 
hist_elt_data_free(struct hist_elt_data * elt_data)1360 static void hist_elt_data_free(struct hist_elt_data *elt_data)
1361 {
1362 	unsigned int i;
1363 
1364 	for (i = 0; i < SYNTH_FIELDS_MAX; i++)
1365 		kfree(elt_data->field_var_str[i]);
1366 
1367 	kfree(elt_data->comm);
1368 	kfree(elt_data);
1369 }
1370 
hist_trigger_elt_data_free(struct tracing_map_elt * elt)1371 static void hist_trigger_elt_data_free(struct tracing_map_elt *elt)
1372 {
1373 	struct hist_elt_data *elt_data = elt->private_data;
1374 
1375 	hist_elt_data_free(elt_data);
1376 }
1377 
hist_trigger_elt_data_alloc(struct tracing_map_elt * elt)1378 static int hist_trigger_elt_data_alloc(struct tracing_map_elt *elt)
1379 {
1380 	struct hist_trigger_data *hist_data = elt->map->private_data;
1381 	unsigned int size = TASK_COMM_LEN;
1382 	struct hist_elt_data *elt_data;
1383 	struct hist_field *key_field;
1384 	unsigned int i, n_str;
1385 
1386 	elt_data = kzalloc(sizeof(*elt_data), GFP_KERNEL);
1387 	if (!elt_data)
1388 		return -ENOMEM;
1389 
1390 	for_each_hist_key_field(i, hist_data) {
1391 		key_field = hist_data->fields[i];
1392 
1393 		if (key_field->flags & HIST_FIELD_FL_EXECNAME) {
1394 			elt_data->comm = kzalloc(size, GFP_KERNEL);
1395 			if (!elt_data->comm) {
1396 				kfree(elt_data);
1397 				return -ENOMEM;
1398 			}
1399 			break;
1400 		}
1401 	}
1402 
1403 	n_str = hist_data->n_field_var_str + hist_data->n_save_var_str +
1404 		hist_data->n_var_str;
1405 	if (n_str > SYNTH_FIELDS_MAX) {
1406 		hist_elt_data_free(elt_data);
1407 		return -EINVAL;
1408 	}
1409 
1410 	BUILD_BUG_ON(STR_VAR_LEN_MAX & (sizeof(u64) - 1));
1411 
1412 	size = STR_VAR_LEN_MAX;
1413 
1414 	for (i = 0; i < n_str; i++) {
1415 		elt_data->field_var_str[i] = kzalloc(size, GFP_KERNEL);
1416 		if (!elt_data->field_var_str[i]) {
1417 			hist_elt_data_free(elt_data);
1418 			return -ENOMEM;
1419 		}
1420 	}
1421 
1422 	elt->private_data = elt_data;
1423 
1424 	return 0;
1425 }
1426 
hist_trigger_elt_data_init(struct tracing_map_elt * elt)1427 static void hist_trigger_elt_data_init(struct tracing_map_elt *elt)
1428 {
1429 	struct hist_elt_data *elt_data = elt->private_data;
1430 
1431 	if (elt_data->comm)
1432 		save_comm(elt_data->comm, current);
1433 }
1434 
1435 static const struct tracing_map_ops hist_trigger_elt_data_ops = {
1436 	.elt_alloc	= hist_trigger_elt_data_alloc,
1437 	.elt_free	= hist_trigger_elt_data_free,
1438 	.elt_init	= hist_trigger_elt_data_init,
1439 };
1440 
get_hist_field_flags(struct hist_field * hist_field)1441 static const char *get_hist_field_flags(struct hist_field *hist_field)
1442 {
1443 	const char *flags_str = NULL;
1444 
1445 	if (hist_field->flags & HIST_FIELD_FL_HEX)
1446 		flags_str = "hex";
1447 	else if (hist_field->flags & HIST_FIELD_FL_SYM)
1448 		flags_str = "sym";
1449 	else if (hist_field->flags & HIST_FIELD_FL_SYM_OFFSET)
1450 		flags_str = "sym-offset";
1451 	else if (hist_field->flags & HIST_FIELD_FL_EXECNAME)
1452 		flags_str = "execname";
1453 	else if (hist_field->flags & HIST_FIELD_FL_SYSCALL)
1454 		flags_str = "syscall";
1455 	else if (hist_field->flags & HIST_FIELD_FL_LOG2)
1456 		flags_str = "log2";
1457 	else if (hist_field->flags & HIST_FIELD_FL_TIMESTAMP_USECS)
1458 		flags_str = "usecs";
1459 
1460 	return flags_str;
1461 }
1462 
expr_field_str(struct hist_field * field,char * expr)1463 static void expr_field_str(struct hist_field *field, char *expr)
1464 {
1465 	if (field->flags & HIST_FIELD_FL_VAR_REF)
1466 		strcat(expr, "$");
1467 
1468 	strcat(expr, hist_field_name(field, 0));
1469 
1470 	if (field->flags && !(field->flags & HIST_FIELD_FL_VAR_REF)) {
1471 		const char *flags_str = get_hist_field_flags(field);
1472 
1473 		if (flags_str) {
1474 			strcat(expr, ".");
1475 			strcat(expr, flags_str);
1476 		}
1477 	}
1478 }
1479 
expr_str(struct hist_field * field,unsigned int level)1480 static char *expr_str(struct hist_field *field, unsigned int level)
1481 {
1482 	char *expr;
1483 
1484 	if (level > 1)
1485 		return NULL;
1486 
1487 	expr = kzalloc(MAX_FILTER_STR_VAL, GFP_KERNEL);
1488 	if (!expr)
1489 		return NULL;
1490 
1491 	if (!field->operands[0]) {
1492 		expr_field_str(field, expr);
1493 		return expr;
1494 	}
1495 
1496 	if (field->operator == FIELD_OP_UNARY_MINUS) {
1497 		char *subexpr;
1498 
1499 		strcat(expr, "-(");
1500 		subexpr = expr_str(field->operands[0], ++level);
1501 		if (!subexpr) {
1502 			kfree(expr);
1503 			return NULL;
1504 		}
1505 		strcat(expr, subexpr);
1506 		strcat(expr, ")");
1507 
1508 		kfree(subexpr);
1509 
1510 		return expr;
1511 	}
1512 
1513 	expr_field_str(field->operands[0], expr);
1514 
1515 	switch (field->operator) {
1516 	case FIELD_OP_MINUS:
1517 		strcat(expr, "-");
1518 		break;
1519 	case FIELD_OP_PLUS:
1520 		strcat(expr, "+");
1521 		break;
1522 	default:
1523 		kfree(expr);
1524 		return NULL;
1525 	}
1526 
1527 	expr_field_str(field->operands[1], expr);
1528 
1529 	return expr;
1530 }
1531 
contains_operator(char * str)1532 static int contains_operator(char *str)
1533 {
1534 	enum field_op_id field_op = FIELD_OP_NONE;
1535 	char *op;
1536 
1537 	op = strpbrk(str, "+-");
1538 	if (!op)
1539 		return FIELD_OP_NONE;
1540 
1541 	switch (*op) {
1542 	case '-':
1543 		/*
1544 		 * Unfortunately, the modifier ".sym-offset"
1545 		 * can confuse things.
1546 		 */
1547 		if (op - str >= 4 && !strncmp(op - 4, ".sym-offset", 11))
1548 			return FIELD_OP_NONE;
1549 
1550 		if (*str == '-')
1551 			field_op = FIELD_OP_UNARY_MINUS;
1552 		else
1553 			field_op = FIELD_OP_MINUS;
1554 		break;
1555 	case '+':
1556 		field_op = FIELD_OP_PLUS;
1557 		break;
1558 	default:
1559 		break;
1560 	}
1561 
1562 	return field_op;
1563 }
1564 
get_hist_field(struct hist_field * hist_field)1565 static void get_hist_field(struct hist_field *hist_field)
1566 {
1567 	hist_field->ref++;
1568 }
1569 
__destroy_hist_field(struct hist_field * hist_field)1570 static void __destroy_hist_field(struct hist_field *hist_field)
1571 {
1572 	if (--hist_field->ref > 1)
1573 		return;
1574 
1575 	kfree(hist_field->var.name);
1576 	kfree(hist_field->name);
1577 	kfree(hist_field->type);
1578 
1579 	kfree(hist_field->system);
1580 	kfree(hist_field->event_name);
1581 
1582 	kfree(hist_field);
1583 }
1584 
destroy_hist_field(struct hist_field * hist_field,unsigned int level)1585 static void destroy_hist_field(struct hist_field *hist_field,
1586 			       unsigned int level)
1587 {
1588 	unsigned int i;
1589 
1590 	if (level > 3)
1591 		return;
1592 
1593 	if (!hist_field)
1594 		return;
1595 
1596 	if (hist_field->flags & HIST_FIELD_FL_VAR_REF)
1597 		return; /* var refs will be destroyed separately */
1598 
1599 	for (i = 0; i < HIST_FIELD_OPERANDS_MAX; i++)
1600 		destroy_hist_field(hist_field->operands[i], level + 1);
1601 
1602 	__destroy_hist_field(hist_field);
1603 }
1604 
create_hist_field(struct hist_trigger_data * hist_data,struct ftrace_event_field * field,unsigned long flags,char * var_name)1605 static struct hist_field *create_hist_field(struct hist_trigger_data *hist_data,
1606 					    struct ftrace_event_field *field,
1607 					    unsigned long flags,
1608 					    char *var_name)
1609 {
1610 	struct hist_field *hist_field;
1611 
1612 	if (field && is_function_field(field))
1613 		return NULL;
1614 
1615 	hist_field = kzalloc(sizeof(struct hist_field), GFP_KERNEL);
1616 	if (!hist_field)
1617 		return NULL;
1618 
1619 	hist_field->ref = 1;
1620 
1621 	hist_field->hist_data = hist_data;
1622 
1623 	if (flags & HIST_FIELD_FL_EXPR || flags & HIST_FIELD_FL_ALIAS)
1624 		goto out; /* caller will populate */
1625 
1626 	if (flags & HIST_FIELD_FL_VAR_REF) {
1627 		hist_field->fn = hist_field_var_ref;
1628 		goto out;
1629 	}
1630 
1631 	if (flags & HIST_FIELD_FL_HITCOUNT) {
1632 		hist_field->fn = hist_field_counter;
1633 		hist_field->size = sizeof(u64);
1634 		hist_field->type = kstrdup("u64", GFP_KERNEL);
1635 		if (!hist_field->type)
1636 			goto free;
1637 		goto out;
1638 	}
1639 
1640 	if (flags & HIST_FIELD_FL_STACKTRACE) {
1641 		hist_field->fn = hist_field_none;
1642 		goto out;
1643 	}
1644 
1645 	if (flags & HIST_FIELD_FL_LOG2) {
1646 		unsigned long fl = flags & ~HIST_FIELD_FL_LOG2;
1647 		hist_field->fn = hist_field_log2;
1648 		hist_field->operands[0] = create_hist_field(hist_data, field, fl, NULL);
1649 		hist_field->size = hist_field->operands[0]->size;
1650 		hist_field->type = kstrdup(hist_field->operands[0]->type, GFP_KERNEL);
1651 		if (!hist_field->type)
1652 			goto free;
1653 		goto out;
1654 	}
1655 
1656 	if (flags & HIST_FIELD_FL_TIMESTAMP) {
1657 		hist_field->fn = hist_field_timestamp;
1658 		hist_field->size = sizeof(u64);
1659 		hist_field->type = kstrdup("u64", GFP_KERNEL);
1660 		if (!hist_field->type)
1661 			goto free;
1662 		goto out;
1663 	}
1664 
1665 	if (flags & HIST_FIELD_FL_CPU) {
1666 		hist_field->fn = hist_field_cpu;
1667 		hist_field->size = sizeof(int);
1668 		hist_field->type = kstrdup("unsigned int", GFP_KERNEL);
1669 		if (!hist_field->type)
1670 			goto free;
1671 		goto out;
1672 	}
1673 
1674 	if (WARN_ON_ONCE(!field))
1675 		goto out;
1676 
1677 	/* Pointers to strings are just pointers and dangerous to dereference */
1678 	if (is_string_field(field) &&
1679 	    (field->filter_type != FILTER_PTR_STRING)) {
1680 		flags |= HIST_FIELD_FL_STRING;
1681 
1682 		hist_field->size = MAX_FILTER_STR_VAL;
1683 		hist_field->type = kstrdup(field->type, GFP_KERNEL);
1684 		if (!hist_field->type)
1685 			goto free;
1686 
1687 		if (field->filter_type == FILTER_STATIC_STRING)
1688 			hist_field->fn = hist_field_string;
1689 		else if (field->filter_type == FILTER_DYN_STRING)
1690 			hist_field->fn = hist_field_dynstring;
1691 		else
1692 			hist_field->fn = hist_field_pstring;
1693 	} else {
1694 		hist_field->size = field->size;
1695 		hist_field->is_signed = field->is_signed;
1696 		hist_field->type = kstrdup(field->type, GFP_KERNEL);
1697 		if (!hist_field->type)
1698 			goto free;
1699 
1700 		hist_field->fn = select_value_fn(field->size,
1701 						 field->is_signed);
1702 		if (!hist_field->fn) {
1703 			destroy_hist_field(hist_field, 0);
1704 			return NULL;
1705 		}
1706 	}
1707  out:
1708 	hist_field->field = field;
1709 	hist_field->flags = flags;
1710 
1711 	if (var_name) {
1712 		hist_field->var.name = kstrdup(var_name, GFP_KERNEL);
1713 		if (!hist_field->var.name)
1714 			goto free;
1715 	}
1716 
1717 	return hist_field;
1718  free:
1719 	destroy_hist_field(hist_field, 0);
1720 	return NULL;
1721 }
1722 
destroy_hist_fields(struct hist_trigger_data * hist_data)1723 static void destroy_hist_fields(struct hist_trigger_data *hist_data)
1724 {
1725 	unsigned int i;
1726 
1727 	for (i = 0; i < HIST_FIELDS_MAX; i++) {
1728 		if (hist_data->fields[i]) {
1729 			destroy_hist_field(hist_data->fields[i], 0);
1730 			hist_data->fields[i] = NULL;
1731 		}
1732 	}
1733 
1734 	for (i = 0; i < hist_data->n_var_refs; i++) {
1735 		WARN_ON(!(hist_data->var_refs[i]->flags & HIST_FIELD_FL_VAR_REF));
1736 		__destroy_hist_field(hist_data->var_refs[i]);
1737 		hist_data->var_refs[i] = NULL;
1738 	}
1739 }
1740 
init_var_ref(struct hist_field * ref_field,struct hist_field * var_field,char * system,char * event_name)1741 static int init_var_ref(struct hist_field *ref_field,
1742 			struct hist_field *var_field,
1743 			char *system, char *event_name)
1744 {
1745 	int err = 0;
1746 
1747 	ref_field->var.idx = var_field->var.idx;
1748 	ref_field->var.hist_data = var_field->hist_data;
1749 	ref_field->size = var_field->size;
1750 	ref_field->is_signed = var_field->is_signed;
1751 	ref_field->flags |= var_field->flags &
1752 		(HIST_FIELD_FL_TIMESTAMP | HIST_FIELD_FL_TIMESTAMP_USECS);
1753 
1754 	if (system) {
1755 		ref_field->system = kstrdup(system, GFP_KERNEL);
1756 		if (!ref_field->system)
1757 			return -ENOMEM;
1758 	}
1759 
1760 	if (event_name) {
1761 		ref_field->event_name = kstrdup(event_name, GFP_KERNEL);
1762 		if (!ref_field->event_name) {
1763 			err = -ENOMEM;
1764 			goto free;
1765 		}
1766 	}
1767 
1768 	if (var_field->var.name) {
1769 		ref_field->name = kstrdup(var_field->var.name, GFP_KERNEL);
1770 		if (!ref_field->name) {
1771 			err = -ENOMEM;
1772 			goto free;
1773 		}
1774 	} else if (var_field->name) {
1775 		ref_field->name = kstrdup(var_field->name, GFP_KERNEL);
1776 		if (!ref_field->name) {
1777 			err = -ENOMEM;
1778 			goto free;
1779 		}
1780 	}
1781 
1782 	ref_field->type = kstrdup(var_field->type, GFP_KERNEL);
1783 	if (!ref_field->type) {
1784 		err = -ENOMEM;
1785 		goto free;
1786 	}
1787  out:
1788 	return err;
1789  free:
1790 	kfree(ref_field->system);
1791 	kfree(ref_field->event_name);
1792 	kfree(ref_field->name);
1793 
1794 	goto out;
1795 }
1796 
find_var_ref_idx(struct hist_trigger_data * hist_data,struct hist_field * var_field)1797 static int find_var_ref_idx(struct hist_trigger_data *hist_data,
1798 			    struct hist_field *var_field)
1799 {
1800 	struct hist_field *ref_field;
1801 	int i;
1802 
1803 	for (i = 0; i < hist_data->n_var_refs; i++) {
1804 		ref_field = hist_data->var_refs[i];
1805 		if (ref_field->var.idx == var_field->var.idx &&
1806 		    ref_field->var.hist_data == var_field->hist_data)
1807 			return i;
1808 	}
1809 
1810 	return -ENOENT;
1811 }
1812 
1813 /**
1814  * create_var_ref - Create a variable reference and attach it to trigger
1815  * @hist_data: The trigger that will be referencing the variable
1816  * @var_field: The VAR field to create a reference to
1817  * @system: The optional system string
1818  * @event_name: The optional event_name string
1819  *
1820  * Given a variable hist_field, create a VAR_REF hist_field that
1821  * represents a reference to it.
1822  *
1823  * This function also adds the reference to the trigger that
1824  * now references the variable.
1825  *
1826  * Return: The VAR_REF field if successful, NULL if not
1827  */
create_var_ref(struct hist_trigger_data * hist_data,struct hist_field * var_field,char * system,char * event_name)1828 static struct hist_field *create_var_ref(struct hist_trigger_data *hist_data,
1829 					 struct hist_field *var_field,
1830 					 char *system, char *event_name)
1831 {
1832 	unsigned long flags = HIST_FIELD_FL_VAR_REF;
1833 	struct hist_field *ref_field;
1834 	int i;
1835 
1836 	/* Check if the variable already exists */
1837 	for (i = 0; i < hist_data->n_var_refs; i++) {
1838 		ref_field = hist_data->var_refs[i];
1839 		if (ref_field->var.idx == var_field->var.idx &&
1840 		    ref_field->var.hist_data == var_field->hist_data) {
1841 			get_hist_field(ref_field);
1842 			return ref_field;
1843 		}
1844 	}
1845 
1846 	ref_field = create_hist_field(var_field->hist_data, NULL, flags, NULL);
1847 	if (ref_field) {
1848 		if (init_var_ref(ref_field, var_field, system, event_name)) {
1849 			destroy_hist_field(ref_field, 0);
1850 			return NULL;
1851 		}
1852 
1853 		hist_data->var_refs[hist_data->n_var_refs] = ref_field;
1854 		ref_field->var_ref_idx = hist_data->n_var_refs++;
1855 	}
1856 
1857 	return ref_field;
1858 }
1859 
is_var_ref(char * var_name)1860 static bool is_var_ref(char *var_name)
1861 {
1862 	if (!var_name || strlen(var_name) < 2 || var_name[0] != '$')
1863 		return false;
1864 
1865 	return true;
1866 }
1867 
field_name_from_var(struct hist_trigger_data * hist_data,char * var_name)1868 static char *field_name_from_var(struct hist_trigger_data *hist_data,
1869 				 char *var_name)
1870 {
1871 	char *name, *field;
1872 	unsigned int i;
1873 
1874 	for (i = 0; i < hist_data->attrs->var_defs.n_vars; i++) {
1875 		name = hist_data->attrs->var_defs.name[i];
1876 
1877 		if (strcmp(var_name, name) == 0) {
1878 			field = hist_data->attrs->var_defs.expr[i];
1879 			if (contains_operator(field) || is_var_ref(field))
1880 				continue;
1881 			return field;
1882 		}
1883 	}
1884 
1885 	return NULL;
1886 }
1887 
local_field_var_ref(struct hist_trigger_data * hist_data,char * system,char * event_name,char * var_name)1888 static char *local_field_var_ref(struct hist_trigger_data *hist_data,
1889 				 char *system, char *event_name,
1890 				 char *var_name)
1891 {
1892 	struct trace_event_call *call;
1893 
1894 	if (system && event_name) {
1895 		call = hist_data->event_file->event_call;
1896 
1897 		if (strcmp(system, call->class->system) != 0)
1898 			return NULL;
1899 
1900 		if (strcmp(event_name, trace_event_name(call)) != 0)
1901 			return NULL;
1902 	}
1903 
1904 	if (!!system != !!event_name)
1905 		return NULL;
1906 
1907 	if (!is_var_ref(var_name))
1908 		return NULL;
1909 
1910 	var_name++;
1911 
1912 	return field_name_from_var(hist_data, var_name);
1913 }
1914 
parse_var_ref(struct hist_trigger_data * hist_data,char * system,char * event_name,char * var_name)1915 static struct hist_field *parse_var_ref(struct hist_trigger_data *hist_data,
1916 					char *system, char *event_name,
1917 					char *var_name)
1918 {
1919 	struct hist_field *var_field = NULL, *ref_field = NULL;
1920 	struct trace_array *tr = hist_data->event_file->tr;
1921 
1922 	if (!is_var_ref(var_name))
1923 		return NULL;
1924 
1925 	var_name++;
1926 
1927 	var_field = find_event_var(hist_data, system, event_name, var_name);
1928 	if (var_field)
1929 		ref_field = create_var_ref(hist_data, var_field,
1930 					   system, event_name);
1931 
1932 	if (!ref_field)
1933 		hist_err(tr, HIST_ERR_VAR_NOT_FOUND, errpos(var_name));
1934 
1935 	return ref_field;
1936 }
1937 
1938 static struct ftrace_event_field *
parse_field(struct hist_trigger_data * hist_data,struct trace_event_file * file,char * field_str,unsigned long * flags)1939 parse_field(struct hist_trigger_data *hist_data, struct trace_event_file *file,
1940 	    char *field_str, unsigned long *flags)
1941 {
1942 	struct ftrace_event_field *field = NULL;
1943 	char *field_name, *modifier, *str;
1944 	struct trace_array *tr = file->tr;
1945 
1946 	modifier = str = kstrdup(field_str, GFP_KERNEL);
1947 	if (!modifier)
1948 		return ERR_PTR(-ENOMEM);
1949 
1950 	field_name = strsep(&modifier, ".");
1951 	if (modifier) {
1952 		if (strcmp(modifier, "hex") == 0)
1953 			*flags |= HIST_FIELD_FL_HEX;
1954 		else if (strcmp(modifier, "sym") == 0)
1955 			*flags |= HIST_FIELD_FL_SYM;
1956 		else if (strcmp(modifier, "sym-offset") == 0)
1957 			*flags |= HIST_FIELD_FL_SYM_OFFSET;
1958 		else if ((strcmp(modifier, "execname") == 0) &&
1959 			 (strcmp(field_name, "common_pid") == 0))
1960 			*flags |= HIST_FIELD_FL_EXECNAME;
1961 		else if (strcmp(modifier, "syscall") == 0)
1962 			*flags |= HIST_FIELD_FL_SYSCALL;
1963 		else if (strcmp(modifier, "log2") == 0)
1964 			*flags |= HIST_FIELD_FL_LOG2;
1965 		else if (strcmp(modifier, "usecs") == 0)
1966 			*flags |= HIST_FIELD_FL_TIMESTAMP_USECS;
1967 		else {
1968 			hist_err(tr, HIST_ERR_BAD_FIELD_MODIFIER, errpos(modifier));
1969 			field = ERR_PTR(-EINVAL);
1970 			goto out;
1971 		}
1972 	}
1973 
1974 	if (strcmp(field_name, "common_timestamp") == 0) {
1975 		*flags |= HIST_FIELD_FL_TIMESTAMP;
1976 		hist_data->enable_timestamps = true;
1977 		if (*flags & HIST_FIELD_FL_TIMESTAMP_USECS)
1978 			hist_data->attrs->ts_in_usecs = true;
1979 	} else if (strcmp(field_name, "common_cpu") == 0)
1980 		*flags |= HIST_FIELD_FL_CPU;
1981 	else {
1982 		field = trace_find_event_field(file->event_call, field_name);
1983 		if (!field || !field->size) {
1984 			/*
1985 			 * For backward compatibility, if field_name
1986 			 * was "cpu", then we treat this the same as
1987 			 * common_cpu.
1988 			 */
1989 			if (strcmp(field_name, "cpu") == 0) {
1990 				*flags |= HIST_FIELD_FL_CPU;
1991 			} else {
1992 				hist_err(tr, HIST_ERR_FIELD_NOT_FOUND,
1993 					 errpos(field_name));
1994 				field = ERR_PTR(-EINVAL);
1995 				goto out;
1996 			}
1997 		}
1998 	}
1999  out:
2000 	kfree(str);
2001 
2002 	return field;
2003 }
2004 
create_alias(struct hist_trigger_data * hist_data,struct hist_field * var_ref,char * var_name)2005 static struct hist_field *create_alias(struct hist_trigger_data *hist_data,
2006 				       struct hist_field *var_ref,
2007 				       char *var_name)
2008 {
2009 	struct hist_field *alias = NULL;
2010 	unsigned long flags = HIST_FIELD_FL_ALIAS | HIST_FIELD_FL_VAR;
2011 
2012 	alias = create_hist_field(hist_data, NULL, flags, var_name);
2013 	if (!alias)
2014 		return NULL;
2015 
2016 	alias->fn = var_ref->fn;
2017 	alias->operands[0] = var_ref;
2018 
2019 	if (init_var_ref(alias, var_ref, var_ref->system, var_ref->event_name)) {
2020 		destroy_hist_field(alias, 0);
2021 		return NULL;
2022 	}
2023 
2024 	alias->var_ref_idx = var_ref->var_ref_idx;
2025 
2026 	return alias;
2027 }
2028 
parse_atom(struct hist_trigger_data * hist_data,struct trace_event_file * file,char * str,unsigned long * flags,char * var_name)2029 static struct hist_field *parse_atom(struct hist_trigger_data *hist_data,
2030 				     struct trace_event_file *file, char *str,
2031 				     unsigned long *flags, char *var_name)
2032 {
2033 	char *s, *ref_system = NULL, *ref_event = NULL, *ref_var = str;
2034 	struct ftrace_event_field *field = NULL;
2035 	struct hist_field *hist_field = NULL;
2036 	int ret = 0;
2037 
2038 	s = strchr(str, '.');
2039 	if (s) {
2040 		s = strchr(++s, '.');
2041 		if (s) {
2042 			ref_system = strsep(&str, ".");
2043 			if (!str) {
2044 				ret = -EINVAL;
2045 				goto out;
2046 			}
2047 			ref_event = strsep(&str, ".");
2048 			if (!str) {
2049 				ret = -EINVAL;
2050 				goto out;
2051 			}
2052 			ref_var = str;
2053 		}
2054 	}
2055 
2056 	s = local_field_var_ref(hist_data, ref_system, ref_event, ref_var);
2057 	if (!s) {
2058 		hist_field = parse_var_ref(hist_data, ref_system,
2059 					   ref_event, ref_var);
2060 		if (hist_field) {
2061 			if (var_name) {
2062 				hist_field = create_alias(hist_data, hist_field, var_name);
2063 				if (!hist_field) {
2064 					ret = -ENOMEM;
2065 					goto out;
2066 				}
2067 			}
2068 			return hist_field;
2069 		}
2070 	} else
2071 		str = s;
2072 
2073 	field = parse_field(hist_data, file, str, flags);
2074 	if (IS_ERR(field)) {
2075 		ret = PTR_ERR(field);
2076 		goto out;
2077 	}
2078 
2079 	hist_field = create_hist_field(hist_data, field, *flags, var_name);
2080 	if (!hist_field) {
2081 		ret = -ENOMEM;
2082 		goto out;
2083 	}
2084 
2085 	return hist_field;
2086  out:
2087 	return ERR_PTR(ret);
2088 }
2089 
2090 static struct hist_field *parse_expr(struct hist_trigger_data *hist_data,
2091 				     struct trace_event_file *file,
2092 				     char *str, unsigned long flags,
2093 				     char *var_name, unsigned int level);
2094 
parse_unary(struct hist_trigger_data * hist_data,struct trace_event_file * file,char * str,unsigned long flags,char * var_name,unsigned int level)2095 static struct hist_field *parse_unary(struct hist_trigger_data *hist_data,
2096 				      struct trace_event_file *file,
2097 				      char *str, unsigned long flags,
2098 				      char *var_name, unsigned int level)
2099 {
2100 	struct hist_field *operand1, *expr = NULL;
2101 	unsigned long operand_flags;
2102 	int ret = 0;
2103 	char *s;
2104 
2105 	/* we support only -(xxx) i.e. explicit parens required */
2106 
2107 	if (level > 3) {
2108 		hist_err(file->tr, HIST_ERR_TOO_MANY_SUBEXPR, errpos(str));
2109 		ret = -EINVAL;
2110 		goto free;
2111 	}
2112 
2113 	str++; /* skip leading '-' */
2114 
2115 	s = strchr(str, '(');
2116 	if (s)
2117 		str++;
2118 	else {
2119 		ret = -EINVAL;
2120 		goto free;
2121 	}
2122 
2123 	s = strrchr(str, ')');
2124 	if (s)
2125 		*s = '\0';
2126 	else {
2127 		ret = -EINVAL; /* no closing ')' */
2128 		goto free;
2129 	}
2130 
2131 	flags |= HIST_FIELD_FL_EXPR;
2132 	expr = create_hist_field(hist_data, NULL, flags, var_name);
2133 	if (!expr) {
2134 		ret = -ENOMEM;
2135 		goto free;
2136 	}
2137 
2138 	operand_flags = 0;
2139 	operand1 = parse_expr(hist_data, file, str, operand_flags, NULL, ++level);
2140 	if (IS_ERR(operand1)) {
2141 		ret = PTR_ERR(operand1);
2142 		goto free;
2143 	}
2144 	if (operand1->flags & HIST_FIELD_FL_STRING) {
2145 		/* String type can not be the operand of unary operator. */
2146 		hist_err(file->tr, HIST_ERR_INVALID_STR_OPERAND, errpos(str));
2147 		destroy_hist_field(operand1, 0);
2148 		ret = -EINVAL;
2149 		goto free;
2150 	}
2151 
2152 	expr->flags |= operand1->flags &
2153 		(HIST_FIELD_FL_TIMESTAMP | HIST_FIELD_FL_TIMESTAMP_USECS);
2154 	expr->fn = hist_field_unary_minus;
2155 	expr->operands[0] = operand1;
2156 	expr->operator = FIELD_OP_UNARY_MINUS;
2157 	expr->name = expr_str(expr, 0);
2158 	expr->type = kstrdup(operand1->type, GFP_KERNEL);
2159 	if (!expr->type) {
2160 		ret = -ENOMEM;
2161 		goto free;
2162 	}
2163 
2164 	return expr;
2165  free:
2166 	destroy_hist_field(expr, 0);
2167 	return ERR_PTR(ret);
2168 }
2169 
check_expr_operands(struct trace_array * tr,struct hist_field * operand1,struct hist_field * operand2)2170 static int check_expr_operands(struct trace_array *tr,
2171 			       struct hist_field *operand1,
2172 			       struct hist_field *operand2)
2173 {
2174 	unsigned long operand1_flags = operand1->flags;
2175 	unsigned long operand2_flags = operand2->flags;
2176 
2177 	if ((operand1_flags & HIST_FIELD_FL_VAR_REF) ||
2178 	    (operand1_flags & HIST_FIELD_FL_ALIAS)) {
2179 		struct hist_field *var;
2180 
2181 		var = find_var_field(operand1->var.hist_data, operand1->name);
2182 		if (!var)
2183 			return -EINVAL;
2184 		operand1_flags = var->flags;
2185 	}
2186 
2187 	if ((operand2_flags & HIST_FIELD_FL_VAR_REF) ||
2188 	    (operand2_flags & HIST_FIELD_FL_ALIAS)) {
2189 		struct hist_field *var;
2190 
2191 		var = find_var_field(operand2->var.hist_data, operand2->name);
2192 		if (!var)
2193 			return -EINVAL;
2194 		operand2_flags = var->flags;
2195 	}
2196 
2197 	if ((operand1_flags & HIST_FIELD_FL_TIMESTAMP_USECS) !=
2198 	    (operand2_flags & HIST_FIELD_FL_TIMESTAMP_USECS)) {
2199 		hist_err(tr, HIST_ERR_TIMESTAMP_MISMATCH, 0);
2200 		return -EINVAL;
2201 	}
2202 
2203 	return 0;
2204 }
2205 
parse_expr(struct hist_trigger_data * hist_data,struct trace_event_file * file,char * str,unsigned long flags,char * var_name,unsigned int level)2206 static struct hist_field *parse_expr(struct hist_trigger_data *hist_data,
2207 				     struct trace_event_file *file,
2208 				     char *str, unsigned long flags,
2209 				     char *var_name, unsigned int level)
2210 {
2211 	struct hist_field *operand1 = NULL, *operand2 = NULL, *expr = NULL;
2212 	unsigned long operand_flags;
2213 	int field_op, ret = -EINVAL;
2214 	char *sep, *operand1_str;
2215 
2216 	if (level > 3) {
2217 		hist_err(file->tr, HIST_ERR_TOO_MANY_SUBEXPR, errpos(str));
2218 		return ERR_PTR(-EINVAL);
2219 	}
2220 
2221 	field_op = contains_operator(str);
2222 
2223 	if (field_op == FIELD_OP_NONE)
2224 		return parse_atom(hist_data, file, str, &flags, var_name);
2225 
2226 	if (field_op == FIELD_OP_UNARY_MINUS)
2227 		return parse_unary(hist_data, file, str, flags, var_name, ++level);
2228 
2229 	switch (field_op) {
2230 	case FIELD_OP_MINUS:
2231 		sep = "-";
2232 		break;
2233 	case FIELD_OP_PLUS:
2234 		sep = "+";
2235 		break;
2236 	default:
2237 		goto free;
2238 	}
2239 
2240 	operand1_str = strsep(&str, sep);
2241 	if (!operand1_str || !str)
2242 		goto free;
2243 
2244 	operand_flags = 0;
2245 	operand1 = parse_atom(hist_data, file, operand1_str,
2246 			      &operand_flags, NULL);
2247 	if (IS_ERR(operand1)) {
2248 		ret = PTR_ERR(operand1);
2249 		operand1 = NULL;
2250 		goto free;
2251 	}
2252 	if (operand1->flags & HIST_FIELD_FL_STRING) {
2253 		hist_err(file->tr, HIST_ERR_INVALID_STR_OPERAND, errpos(operand1_str));
2254 		ret = -EINVAL;
2255 		goto free;
2256 	}
2257 
2258 	/* rest of string could be another expression e.g. b+c in a+b+c */
2259 	operand_flags = 0;
2260 	operand2 = parse_expr(hist_data, file, str, operand_flags, NULL, ++level);
2261 	if (IS_ERR(operand2)) {
2262 		ret = PTR_ERR(operand2);
2263 		operand2 = NULL;
2264 		goto free;
2265 	}
2266 	if (operand2->flags & HIST_FIELD_FL_STRING) {
2267 		hist_err(file->tr, HIST_ERR_INVALID_STR_OPERAND, errpos(str));
2268 		ret = -EINVAL;
2269 		goto free;
2270 	}
2271 
2272 	ret = check_expr_operands(file->tr, operand1, operand2);
2273 	if (ret)
2274 		goto free;
2275 
2276 	flags |= HIST_FIELD_FL_EXPR;
2277 
2278 	flags |= operand1->flags &
2279 		(HIST_FIELD_FL_TIMESTAMP | HIST_FIELD_FL_TIMESTAMP_USECS);
2280 
2281 	expr = create_hist_field(hist_data, NULL, flags, var_name);
2282 	if (!expr) {
2283 		ret = -ENOMEM;
2284 		goto free;
2285 	}
2286 
2287 	operand1->read_once = true;
2288 	operand2->read_once = true;
2289 
2290 	expr->operands[0] = operand1;
2291 	expr->operands[1] = operand2;
2292 
2293 	/* The operand sizes should be the same, so just pick one */
2294 	expr->size = operand1->size;
2295 
2296 	expr->operator = field_op;
2297 	expr->name = expr_str(expr, 0);
2298 	expr->type = kstrdup(operand1->type, GFP_KERNEL);
2299 	if (!expr->type) {
2300 		ret = -ENOMEM;
2301 		goto free;
2302 	}
2303 
2304 	switch (field_op) {
2305 	case FIELD_OP_MINUS:
2306 		expr->fn = hist_field_minus;
2307 		break;
2308 	case FIELD_OP_PLUS:
2309 		expr->fn = hist_field_plus;
2310 		break;
2311 	default:
2312 		ret = -EINVAL;
2313 		goto free;
2314 	}
2315 
2316 	return expr;
2317  free:
2318 	destroy_hist_field(operand1, 0);
2319 	destroy_hist_field(operand2, 0);
2320 	destroy_hist_field(expr, 0);
2321 
2322 	return ERR_PTR(ret);
2323 }
2324 
find_trigger_filter(struct hist_trigger_data * hist_data,struct trace_event_file * file)2325 static char *find_trigger_filter(struct hist_trigger_data *hist_data,
2326 				 struct trace_event_file *file)
2327 {
2328 	struct event_trigger_data *test;
2329 
2330 	lockdep_assert_held(&event_mutex);
2331 
2332 	list_for_each_entry(test, &file->triggers, list) {
2333 		if (test->cmd_ops->trigger_type == ETT_EVENT_HIST) {
2334 			if (test->private_data == hist_data)
2335 				return test->filter_str;
2336 		}
2337 	}
2338 
2339 	return NULL;
2340 }
2341 
2342 static struct event_command trigger_hist_cmd;
2343 static int event_hist_trigger_func(struct event_command *cmd_ops,
2344 				   struct trace_event_file *file,
2345 				   char *glob, char *cmd, char *param);
2346 
compatible_keys(struct hist_trigger_data * target_hist_data,struct hist_trigger_data * hist_data,unsigned int n_keys)2347 static bool compatible_keys(struct hist_trigger_data *target_hist_data,
2348 			    struct hist_trigger_data *hist_data,
2349 			    unsigned int n_keys)
2350 {
2351 	struct hist_field *target_hist_field, *hist_field;
2352 	unsigned int n, i, j;
2353 
2354 	if (hist_data->n_fields - hist_data->n_vals != n_keys)
2355 		return false;
2356 
2357 	i = hist_data->n_vals;
2358 	j = target_hist_data->n_vals;
2359 
2360 	for (n = 0; n < n_keys; n++) {
2361 		hist_field = hist_data->fields[i + n];
2362 		target_hist_field = target_hist_data->fields[j + n];
2363 
2364 		if (strcmp(hist_field->type, target_hist_field->type) != 0)
2365 			return false;
2366 		if (hist_field->size != target_hist_field->size)
2367 			return false;
2368 		if (hist_field->is_signed != target_hist_field->is_signed)
2369 			return false;
2370 	}
2371 
2372 	return true;
2373 }
2374 
2375 static struct hist_trigger_data *
find_compatible_hist(struct hist_trigger_data * target_hist_data,struct trace_event_file * file)2376 find_compatible_hist(struct hist_trigger_data *target_hist_data,
2377 		     struct trace_event_file *file)
2378 {
2379 	struct hist_trigger_data *hist_data;
2380 	struct event_trigger_data *test;
2381 	unsigned int n_keys;
2382 
2383 	lockdep_assert_held(&event_mutex);
2384 
2385 	n_keys = target_hist_data->n_fields - target_hist_data->n_vals;
2386 
2387 	list_for_each_entry(test, &file->triggers, list) {
2388 		if (test->cmd_ops->trigger_type == ETT_EVENT_HIST) {
2389 			hist_data = test->private_data;
2390 
2391 			if (compatible_keys(target_hist_data, hist_data, n_keys))
2392 				return hist_data;
2393 		}
2394 	}
2395 
2396 	return NULL;
2397 }
2398 
event_file(struct trace_array * tr,char * system,char * event_name)2399 static struct trace_event_file *event_file(struct trace_array *tr,
2400 					   char *system, char *event_name)
2401 {
2402 	struct trace_event_file *file;
2403 
2404 	file = __find_event_file(tr, system, event_name);
2405 	if (!file)
2406 		return ERR_PTR(-EINVAL);
2407 
2408 	return file;
2409 }
2410 
2411 static struct hist_field *
find_synthetic_field_var(struct hist_trigger_data * target_hist_data,char * system,char * event_name,char * field_name)2412 find_synthetic_field_var(struct hist_trigger_data *target_hist_data,
2413 			 char *system, char *event_name, char *field_name)
2414 {
2415 	struct hist_field *event_var;
2416 	char *synthetic_name;
2417 
2418 	synthetic_name = kzalloc(MAX_FILTER_STR_VAL, GFP_KERNEL);
2419 	if (!synthetic_name)
2420 		return ERR_PTR(-ENOMEM);
2421 
2422 	strcpy(synthetic_name, "synthetic_");
2423 	strcat(synthetic_name, field_name);
2424 
2425 	event_var = find_event_var(target_hist_data, system, event_name, synthetic_name);
2426 
2427 	kfree(synthetic_name);
2428 
2429 	return event_var;
2430 }
2431 
2432 /**
2433  * create_field_var_hist - Automatically create a histogram and var for a field
2434  * @target_hist_data: The target hist trigger
2435  * @subsys_name: Optional subsystem name
2436  * @event_name: Optional event name
2437  * @field_name: The name of the field (and the resulting variable)
2438  *
2439  * Hist trigger actions fetch data from variables, not directly from
2440  * events.  However, for convenience, users are allowed to directly
2441  * specify an event field in an action, which will be automatically
2442  * converted into a variable on their behalf.
2443 
2444  * If a user specifies a field on an event that isn't the event the
2445  * histogram currently being defined (the target event histogram), the
2446  * only way that can be accomplished is if a new hist trigger is
2447  * created and the field variable defined on that.
2448  *
2449  * This function creates a new histogram compatible with the target
2450  * event (meaning a histogram with the same key as the target
2451  * histogram), and creates a variable for the specified field, but
2452  * with 'synthetic_' prepended to the variable name in order to avoid
2453  * collision with normal field variables.
2454  *
2455  * Return: The variable created for the field.
2456  */
2457 static struct hist_field *
create_field_var_hist(struct hist_trigger_data * target_hist_data,char * subsys_name,char * event_name,char * field_name)2458 create_field_var_hist(struct hist_trigger_data *target_hist_data,
2459 		      char *subsys_name, char *event_name, char *field_name)
2460 {
2461 	struct trace_array *tr = target_hist_data->event_file->tr;
2462 	struct hist_field *event_var = ERR_PTR(-EINVAL);
2463 	struct hist_trigger_data *hist_data;
2464 	unsigned int i, n, first = true;
2465 	struct field_var_hist *var_hist;
2466 	struct trace_event_file *file;
2467 	struct hist_field *key_field;
2468 	char *saved_filter;
2469 	char *cmd;
2470 	int ret;
2471 
2472 	if (target_hist_data->n_field_var_hists >= SYNTH_FIELDS_MAX) {
2473 		hist_err(tr, HIST_ERR_TOO_MANY_FIELD_VARS, errpos(field_name));
2474 		return ERR_PTR(-EINVAL);
2475 	}
2476 
2477 	file = event_file(tr, subsys_name, event_name);
2478 
2479 	if (IS_ERR(file)) {
2480 		hist_err(tr, HIST_ERR_EVENT_FILE_NOT_FOUND, errpos(field_name));
2481 		ret = PTR_ERR(file);
2482 		return ERR_PTR(ret);
2483 	}
2484 
2485 	/*
2486 	 * Look for a histogram compatible with target.  We'll use the
2487 	 * found histogram specification to create a new matching
2488 	 * histogram with our variable on it.  target_hist_data is not
2489 	 * yet a registered histogram so we can't use that.
2490 	 */
2491 	hist_data = find_compatible_hist(target_hist_data, file);
2492 	if (!hist_data) {
2493 		hist_err(tr, HIST_ERR_HIST_NOT_FOUND, errpos(field_name));
2494 		return ERR_PTR(-EINVAL);
2495 	}
2496 
2497 	/* See if a synthetic field variable has already been created */
2498 	event_var = find_synthetic_field_var(target_hist_data, subsys_name,
2499 					     event_name, field_name);
2500 	if (!IS_ERR_OR_NULL(event_var))
2501 		return event_var;
2502 
2503 	var_hist = kzalloc(sizeof(*var_hist), GFP_KERNEL);
2504 	if (!var_hist)
2505 		return ERR_PTR(-ENOMEM);
2506 
2507 	cmd = kzalloc(MAX_FILTER_STR_VAL, GFP_KERNEL);
2508 	if (!cmd) {
2509 		kfree(var_hist);
2510 		return ERR_PTR(-ENOMEM);
2511 	}
2512 
2513 	/* Use the same keys as the compatible histogram */
2514 	strcat(cmd, "keys=");
2515 
2516 	for_each_hist_key_field(i, hist_data) {
2517 		key_field = hist_data->fields[i];
2518 		if (!first)
2519 			strcat(cmd, ",");
2520 		strcat(cmd, key_field->field->name);
2521 		first = false;
2522 	}
2523 
2524 	/* Create the synthetic field variable specification */
2525 	strcat(cmd, ":synthetic_");
2526 	strcat(cmd, field_name);
2527 	strcat(cmd, "=");
2528 	strcat(cmd, field_name);
2529 
2530 	/* Use the same filter as the compatible histogram */
2531 	saved_filter = find_trigger_filter(hist_data, file);
2532 	if (saved_filter) {
2533 		strcat(cmd, " if ");
2534 		strcat(cmd, saved_filter);
2535 	}
2536 
2537 	var_hist->cmd = kstrdup(cmd, GFP_KERNEL);
2538 	if (!var_hist->cmd) {
2539 		kfree(cmd);
2540 		kfree(var_hist);
2541 		return ERR_PTR(-ENOMEM);
2542 	}
2543 
2544 	/* Save the compatible histogram information */
2545 	var_hist->hist_data = hist_data;
2546 
2547 	/* Create the new histogram with our variable */
2548 	ret = event_hist_trigger_func(&trigger_hist_cmd, file,
2549 				      "", "hist", cmd);
2550 	if (ret) {
2551 		kfree(cmd);
2552 		kfree(var_hist->cmd);
2553 		kfree(var_hist);
2554 		hist_err(tr, HIST_ERR_HIST_CREATE_FAIL, errpos(field_name));
2555 		return ERR_PTR(ret);
2556 	}
2557 
2558 	kfree(cmd);
2559 
2560 	/* If we can't find the variable, something went wrong */
2561 	event_var = find_synthetic_field_var(target_hist_data, subsys_name,
2562 					     event_name, field_name);
2563 	if (IS_ERR_OR_NULL(event_var)) {
2564 		kfree(var_hist->cmd);
2565 		kfree(var_hist);
2566 		hist_err(tr, HIST_ERR_SYNTH_VAR_NOT_FOUND, errpos(field_name));
2567 		return ERR_PTR(-EINVAL);
2568 	}
2569 
2570 	n = target_hist_data->n_field_var_hists;
2571 	target_hist_data->field_var_hists[n] = var_hist;
2572 	target_hist_data->n_field_var_hists++;
2573 
2574 	return event_var;
2575 }
2576 
2577 static struct hist_field *
find_target_event_var(struct hist_trigger_data * hist_data,char * subsys_name,char * event_name,char * var_name)2578 find_target_event_var(struct hist_trigger_data *hist_data,
2579 		      char *subsys_name, char *event_name, char *var_name)
2580 {
2581 	struct trace_event_file *file = hist_data->event_file;
2582 	struct hist_field *hist_field = NULL;
2583 
2584 	if (subsys_name) {
2585 		struct trace_event_call *call;
2586 
2587 		if (!event_name)
2588 			return NULL;
2589 
2590 		call = file->event_call;
2591 
2592 		if (strcmp(subsys_name, call->class->system) != 0)
2593 			return NULL;
2594 
2595 		if (strcmp(event_name, trace_event_name(call)) != 0)
2596 			return NULL;
2597 	}
2598 
2599 	hist_field = find_var_field(hist_data, var_name);
2600 
2601 	return hist_field;
2602 }
2603 
__update_field_vars(struct tracing_map_elt * elt,struct ring_buffer_event * rbe,void * rec,struct field_var ** field_vars,unsigned int n_field_vars,unsigned int field_var_str_start)2604 static inline void __update_field_vars(struct tracing_map_elt *elt,
2605 				       struct ring_buffer_event *rbe,
2606 				       void *rec,
2607 				       struct field_var **field_vars,
2608 				       unsigned int n_field_vars,
2609 				       unsigned int field_var_str_start)
2610 {
2611 	struct hist_elt_data *elt_data = elt->private_data;
2612 	unsigned int i, j, var_idx;
2613 	u64 var_val;
2614 
2615 	for (i = 0, j = field_var_str_start; i < n_field_vars; i++) {
2616 		struct field_var *field_var = field_vars[i];
2617 		struct hist_field *var = field_var->var;
2618 		struct hist_field *val = field_var->val;
2619 
2620 		var_val = val->fn(val, elt, rbe, rec);
2621 		var_idx = var->var.idx;
2622 
2623 		if (val->flags & HIST_FIELD_FL_STRING) {
2624 			char *str = elt_data->field_var_str[j++];
2625 			char *val_str = (char *)(uintptr_t)var_val;
2626 
2627 			strscpy(str, val_str, STR_VAR_LEN_MAX);
2628 			var_val = (u64)(uintptr_t)str;
2629 		}
2630 		tracing_map_set_var(elt, var_idx, var_val);
2631 	}
2632 }
2633 
update_field_vars(struct hist_trigger_data * hist_data,struct tracing_map_elt * elt,struct ring_buffer_event * rbe,void * rec)2634 static void update_field_vars(struct hist_trigger_data *hist_data,
2635 			      struct tracing_map_elt *elt,
2636 			      struct ring_buffer_event *rbe,
2637 			      void *rec)
2638 {
2639 	__update_field_vars(elt, rbe, rec, hist_data->field_vars,
2640 			    hist_data->n_field_vars, 0);
2641 }
2642 
save_track_data_vars(struct hist_trigger_data * hist_data,struct tracing_map_elt * elt,void * rec,struct ring_buffer_event * rbe,void * key,struct action_data * data,u64 * var_ref_vals)2643 static void save_track_data_vars(struct hist_trigger_data *hist_data,
2644 				 struct tracing_map_elt *elt, void *rec,
2645 				 struct ring_buffer_event *rbe, void *key,
2646 				 struct action_data *data, u64 *var_ref_vals)
2647 {
2648 	__update_field_vars(elt, rbe, rec, hist_data->save_vars,
2649 			    hist_data->n_save_vars, hist_data->n_field_var_str);
2650 }
2651 
create_var(struct hist_trigger_data * hist_data,struct trace_event_file * file,char * name,int size,const char * type)2652 static struct hist_field *create_var(struct hist_trigger_data *hist_data,
2653 				     struct trace_event_file *file,
2654 				     char *name, int size, const char *type)
2655 {
2656 	struct hist_field *var;
2657 	int idx;
2658 
2659 	if (find_var(hist_data, file, name) && !hist_data->remove) {
2660 		var = ERR_PTR(-EINVAL);
2661 		goto out;
2662 	}
2663 
2664 	var = kzalloc(sizeof(struct hist_field), GFP_KERNEL);
2665 	if (!var) {
2666 		var = ERR_PTR(-ENOMEM);
2667 		goto out;
2668 	}
2669 
2670 	idx = tracing_map_add_var(hist_data->map);
2671 	if (idx < 0) {
2672 		kfree(var);
2673 		var = ERR_PTR(-EINVAL);
2674 		goto out;
2675 	}
2676 
2677 	var->ref = 1;
2678 	var->flags = HIST_FIELD_FL_VAR;
2679 	var->var.idx = idx;
2680 	var->var.hist_data = var->hist_data = hist_data;
2681 	var->size = size;
2682 	var->var.name = kstrdup(name, GFP_KERNEL);
2683 	var->type = kstrdup(type, GFP_KERNEL);
2684 	if (!var->var.name || !var->type) {
2685 		kfree(var->var.name);
2686 		kfree(var->type);
2687 		kfree(var);
2688 		var = ERR_PTR(-ENOMEM);
2689 	}
2690  out:
2691 	return var;
2692 }
2693 
create_field_var(struct hist_trigger_data * hist_data,struct trace_event_file * file,char * field_name)2694 static struct field_var *create_field_var(struct hist_trigger_data *hist_data,
2695 					  struct trace_event_file *file,
2696 					  char *field_name)
2697 {
2698 	struct hist_field *val = NULL, *var = NULL;
2699 	unsigned long flags = HIST_FIELD_FL_VAR;
2700 	struct trace_array *tr = file->tr;
2701 	struct field_var *field_var;
2702 	int ret = 0;
2703 
2704 	if (hist_data->n_field_vars >= SYNTH_FIELDS_MAX) {
2705 		hist_err(tr, HIST_ERR_TOO_MANY_FIELD_VARS, errpos(field_name));
2706 		ret = -EINVAL;
2707 		goto err;
2708 	}
2709 
2710 	val = parse_atom(hist_data, file, field_name, &flags, NULL);
2711 	if (IS_ERR(val)) {
2712 		hist_err(tr, HIST_ERR_FIELD_VAR_PARSE_FAIL, errpos(field_name));
2713 		ret = PTR_ERR(val);
2714 		goto err;
2715 	}
2716 
2717 	var = create_var(hist_data, file, field_name, val->size, val->type);
2718 	if (IS_ERR(var)) {
2719 		hist_err(tr, HIST_ERR_VAR_CREATE_FIND_FAIL, errpos(field_name));
2720 		kfree(val);
2721 		ret = PTR_ERR(var);
2722 		goto err;
2723 	}
2724 
2725 	field_var = kzalloc(sizeof(struct field_var), GFP_KERNEL);
2726 	if (!field_var) {
2727 		kfree(val);
2728 		kfree(var);
2729 		ret =  -ENOMEM;
2730 		goto err;
2731 	}
2732 
2733 	field_var->var = var;
2734 	field_var->val = val;
2735  out:
2736 	return field_var;
2737  err:
2738 	field_var = ERR_PTR(ret);
2739 	goto out;
2740 }
2741 
2742 /**
2743  * create_target_field_var - Automatically create a variable for a field
2744  * @target_hist_data: The target hist trigger
2745  * @subsys_name: Optional subsystem name
2746  * @event_name: Optional event name
2747  * @var_name: The name of the field (and the resulting variable)
2748  *
2749  * Hist trigger actions fetch data from variables, not directly from
2750  * events.  However, for convenience, users are allowed to directly
2751  * specify an event field in an action, which will be automatically
2752  * converted into a variable on their behalf.
2753 
2754  * This function creates a field variable with the name var_name on
2755  * the hist trigger currently being defined on the target event.  If
2756  * subsys_name and event_name are specified, this function simply
2757  * verifies that they do in fact match the target event subsystem and
2758  * event name.
2759  *
2760  * Return: The variable created for the field.
2761  */
2762 static struct field_var *
create_target_field_var(struct hist_trigger_data * target_hist_data,char * subsys_name,char * event_name,char * var_name)2763 create_target_field_var(struct hist_trigger_data *target_hist_data,
2764 			char *subsys_name, char *event_name, char *var_name)
2765 {
2766 	struct trace_event_file *file = target_hist_data->event_file;
2767 
2768 	if (subsys_name) {
2769 		struct trace_event_call *call;
2770 
2771 		if (!event_name)
2772 			return NULL;
2773 
2774 		call = file->event_call;
2775 
2776 		if (strcmp(subsys_name, call->class->system) != 0)
2777 			return NULL;
2778 
2779 		if (strcmp(event_name, trace_event_name(call)) != 0)
2780 			return NULL;
2781 	}
2782 
2783 	return create_field_var(target_hist_data, file, var_name);
2784 }
2785 
check_track_val_max(u64 track_val,u64 var_val)2786 static bool check_track_val_max(u64 track_val, u64 var_val)
2787 {
2788 	if (var_val <= track_val)
2789 		return false;
2790 
2791 	return true;
2792 }
2793 
check_track_val_changed(u64 track_val,u64 var_val)2794 static bool check_track_val_changed(u64 track_val, u64 var_val)
2795 {
2796 	if (var_val == track_val)
2797 		return false;
2798 
2799 	return true;
2800 }
2801 
get_track_val(struct hist_trigger_data * hist_data,struct tracing_map_elt * elt,struct action_data * data)2802 static u64 get_track_val(struct hist_trigger_data *hist_data,
2803 			 struct tracing_map_elt *elt,
2804 			 struct action_data *data)
2805 {
2806 	unsigned int track_var_idx = data->track_data.track_var->var.idx;
2807 	u64 track_val;
2808 
2809 	track_val = tracing_map_read_var(elt, track_var_idx);
2810 
2811 	return track_val;
2812 }
2813 
save_track_val(struct hist_trigger_data * hist_data,struct tracing_map_elt * elt,struct action_data * data,u64 var_val)2814 static void save_track_val(struct hist_trigger_data *hist_data,
2815 			   struct tracing_map_elt *elt,
2816 			   struct action_data *data, u64 var_val)
2817 {
2818 	unsigned int track_var_idx = data->track_data.track_var->var.idx;
2819 
2820 	tracing_map_set_var(elt, track_var_idx, var_val);
2821 }
2822 
save_track_data(struct hist_trigger_data * hist_data,struct tracing_map_elt * elt,void * rec,struct ring_buffer_event * rbe,void * key,struct action_data * data,u64 * var_ref_vals)2823 static void save_track_data(struct hist_trigger_data *hist_data,
2824 			    struct tracing_map_elt *elt, void *rec,
2825 			    struct ring_buffer_event *rbe, void *key,
2826 			    struct action_data *data, u64 *var_ref_vals)
2827 {
2828 	if (data->track_data.save_data)
2829 		data->track_data.save_data(hist_data, elt, rec, rbe, key, data, var_ref_vals);
2830 }
2831 
check_track_val(struct tracing_map_elt * elt,struct action_data * data,u64 var_val)2832 static bool check_track_val(struct tracing_map_elt *elt,
2833 			    struct action_data *data,
2834 			    u64 var_val)
2835 {
2836 	struct hist_trigger_data *hist_data;
2837 	u64 track_val;
2838 
2839 	hist_data = data->track_data.track_var->hist_data;
2840 	track_val = get_track_val(hist_data, elt, data);
2841 
2842 	return data->track_data.check_val(track_val, var_val);
2843 }
2844 
2845 #ifdef CONFIG_TRACER_SNAPSHOT
cond_snapshot_update(struct trace_array * tr,void * cond_data)2846 static bool cond_snapshot_update(struct trace_array *tr, void *cond_data)
2847 {
2848 	/* called with tr->max_lock held */
2849 	struct track_data *track_data = tr->cond_snapshot->cond_data;
2850 	struct hist_elt_data *elt_data, *track_elt_data;
2851 	struct snapshot_context *context = cond_data;
2852 	struct action_data *action;
2853 	u64 track_val;
2854 
2855 	if (!track_data)
2856 		return false;
2857 
2858 	action = track_data->action_data;
2859 
2860 	track_val = get_track_val(track_data->hist_data, context->elt,
2861 				  track_data->action_data);
2862 
2863 	if (!action->track_data.check_val(track_data->track_val, track_val))
2864 		return false;
2865 
2866 	track_data->track_val = track_val;
2867 	memcpy(track_data->key, context->key, track_data->key_len);
2868 
2869 	elt_data = context->elt->private_data;
2870 	track_elt_data = track_data->elt.private_data;
2871 	if (elt_data->comm)
2872 		strncpy(track_elt_data->comm, elt_data->comm, TASK_COMM_LEN);
2873 
2874 	track_data->updated = true;
2875 
2876 	return true;
2877 }
2878 
save_track_data_snapshot(struct hist_trigger_data * hist_data,struct tracing_map_elt * elt,void * rec,struct ring_buffer_event * rbe,void * key,struct action_data * data,u64 * var_ref_vals)2879 static void save_track_data_snapshot(struct hist_trigger_data *hist_data,
2880 				     struct tracing_map_elt *elt, void *rec,
2881 				     struct ring_buffer_event *rbe, void *key,
2882 				     struct action_data *data,
2883 				     u64 *var_ref_vals)
2884 {
2885 	struct trace_event_file *file = hist_data->event_file;
2886 	struct snapshot_context context;
2887 
2888 	context.elt = elt;
2889 	context.key = key;
2890 
2891 	tracing_snapshot_cond(file->tr, &context);
2892 }
2893 
2894 static void hist_trigger_print_key(struct seq_file *m,
2895 				   struct hist_trigger_data *hist_data,
2896 				   void *key,
2897 				   struct tracing_map_elt *elt);
2898 
snapshot_action(struct hist_trigger_data * hist_data)2899 static struct action_data *snapshot_action(struct hist_trigger_data *hist_data)
2900 {
2901 	unsigned int i;
2902 
2903 	if (!hist_data->n_actions)
2904 		return NULL;
2905 
2906 	for (i = 0; i < hist_data->n_actions; i++) {
2907 		struct action_data *data = hist_data->actions[i];
2908 
2909 		if (data->action == ACTION_SNAPSHOT)
2910 			return data;
2911 	}
2912 
2913 	return NULL;
2914 }
2915 
track_data_snapshot_print(struct seq_file * m,struct hist_trigger_data * hist_data)2916 static void track_data_snapshot_print(struct seq_file *m,
2917 				      struct hist_trigger_data *hist_data)
2918 {
2919 	struct trace_event_file *file = hist_data->event_file;
2920 	struct track_data *track_data;
2921 	struct action_data *action;
2922 
2923 	track_data = tracing_cond_snapshot_data(file->tr);
2924 	if (!track_data)
2925 		return;
2926 
2927 	if (!track_data->updated)
2928 		return;
2929 
2930 	action = snapshot_action(hist_data);
2931 	if (!action)
2932 		return;
2933 
2934 	seq_puts(m, "\nSnapshot taken (see tracing/snapshot).  Details:\n");
2935 	seq_printf(m, "\ttriggering value { %s(%s) }: %10llu",
2936 		   action->handler == HANDLER_ONMAX ? "onmax" : "onchange",
2937 		   action->track_data.var_str, track_data->track_val);
2938 
2939 	seq_puts(m, "\ttriggered by event with key: ");
2940 	hist_trigger_print_key(m, hist_data, track_data->key, &track_data->elt);
2941 	seq_putc(m, '\n');
2942 }
2943 #else
cond_snapshot_update(struct trace_array * tr,void * cond_data)2944 static bool cond_snapshot_update(struct trace_array *tr, void *cond_data)
2945 {
2946 	return false;
2947 }
save_track_data_snapshot(struct hist_trigger_data * hist_data,struct tracing_map_elt * elt,void * rec,struct ring_buffer_event * rbe,void * key,struct action_data * data,u64 * var_ref_vals)2948 static void save_track_data_snapshot(struct hist_trigger_data *hist_data,
2949 				     struct tracing_map_elt *elt, void *rec,
2950 				     struct ring_buffer_event *rbe, void *key,
2951 				     struct action_data *data,
2952 				     u64 *var_ref_vals) {}
track_data_snapshot_print(struct seq_file * m,struct hist_trigger_data * hist_data)2953 static void track_data_snapshot_print(struct seq_file *m,
2954 				      struct hist_trigger_data *hist_data) {}
2955 #endif /* CONFIG_TRACER_SNAPSHOT */
2956 
track_data_print(struct seq_file * m,struct hist_trigger_data * hist_data,struct tracing_map_elt * elt,struct action_data * data)2957 static void track_data_print(struct seq_file *m,
2958 			     struct hist_trigger_data *hist_data,
2959 			     struct tracing_map_elt *elt,
2960 			     struct action_data *data)
2961 {
2962 	u64 track_val = get_track_val(hist_data, elt, data);
2963 	unsigned int i, save_var_idx;
2964 
2965 	if (data->handler == HANDLER_ONMAX)
2966 		seq_printf(m, "\n\tmax: %10llu", track_val);
2967 	else if (data->handler == HANDLER_ONCHANGE)
2968 		seq_printf(m, "\n\tchanged: %10llu", track_val);
2969 
2970 	if (data->action == ACTION_SNAPSHOT)
2971 		return;
2972 
2973 	for (i = 0; i < hist_data->n_save_vars; i++) {
2974 		struct hist_field *save_val = hist_data->save_vars[i]->val;
2975 		struct hist_field *save_var = hist_data->save_vars[i]->var;
2976 		u64 val;
2977 
2978 		save_var_idx = save_var->var.idx;
2979 
2980 		val = tracing_map_read_var(elt, save_var_idx);
2981 
2982 		if (save_val->flags & HIST_FIELD_FL_STRING) {
2983 			seq_printf(m, "  %s: %-32s", save_var->var.name,
2984 				   (char *)(uintptr_t)(val));
2985 		} else
2986 			seq_printf(m, "  %s: %10llu", save_var->var.name, val);
2987 	}
2988 }
2989 
ontrack_action(struct hist_trigger_data * hist_data,struct tracing_map_elt * elt,void * rec,struct ring_buffer_event * rbe,void * key,struct action_data * data,u64 * var_ref_vals)2990 static void ontrack_action(struct hist_trigger_data *hist_data,
2991 			   struct tracing_map_elt *elt, void *rec,
2992 			   struct ring_buffer_event *rbe, void *key,
2993 			   struct action_data *data, u64 *var_ref_vals)
2994 {
2995 	u64 var_val = var_ref_vals[data->track_data.var_ref->var_ref_idx];
2996 
2997 	if (check_track_val(elt, data, var_val)) {
2998 		save_track_val(hist_data, elt, data, var_val);
2999 		save_track_data(hist_data, elt, rec, rbe, key, data, var_ref_vals);
3000 	}
3001 }
3002 
action_data_destroy(struct action_data * data)3003 static void action_data_destroy(struct action_data *data)
3004 {
3005 	unsigned int i;
3006 
3007 	lockdep_assert_held(&event_mutex);
3008 
3009 	kfree(data->action_name);
3010 
3011 	for (i = 0; i < data->n_params; i++)
3012 		kfree(data->params[i]);
3013 
3014 	if (data->synth_event)
3015 		data->synth_event->ref--;
3016 
3017 	kfree(data->synth_event_name);
3018 
3019 	kfree(data);
3020 }
3021 
track_data_destroy(struct hist_trigger_data * hist_data,struct action_data * data)3022 static void track_data_destroy(struct hist_trigger_data *hist_data,
3023 			       struct action_data *data)
3024 {
3025 	struct trace_event_file *file = hist_data->event_file;
3026 
3027 	destroy_hist_field(data->track_data.track_var, 0);
3028 
3029 	if (data->action == ACTION_SNAPSHOT) {
3030 		struct track_data *track_data;
3031 
3032 		track_data = tracing_cond_snapshot_data(file->tr);
3033 		if (track_data && track_data->hist_data == hist_data) {
3034 			tracing_snapshot_cond_disable(file->tr);
3035 			track_data_free(track_data);
3036 		}
3037 	}
3038 
3039 	kfree(data->track_data.var_str);
3040 
3041 	action_data_destroy(data);
3042 }
3043 
3044 static int action_create(struct hist_trigger_data *hist_data,
3045 			 struct action_data *data);
3046 
track_data_create(struct hist_trigger_data * hist_data,struct action_data * data)3047 static int track_data_create(struct hist_trigger_data *hist_data,
3048 			     struct action_data *data)
3049 {
3050 	struct hist_field *var_field, *ref_field, *track_var = NULL;
3051 	struct trace_event_file *file = hist_data->event_file;
3052 	struct trace_array *tr = file->tr;
3053 	char *track_data_var_str;
3054 	int ret = 0;
3055 
3056 	track_data_var_str = data->track_data.var_str;
3057 	if (track_data_var_str[0] != '$') {
3058 		hist_err(tr, HIST_ERR_ONX_NOT_VAR, errpos(track_data_var_str));
3059 		return -EINVAL;
3060 	}
3061 	track_data_var_str++;
3062 
3063 	var_field = find_target_event_var(hist_data, NULL, NULL, track_data_var_str);
3064 	if (!var_field) {
3065 		hist_err(tr, HIST_ERR_ONX_VAR_NOT_FOUND, errpos(track_data_var_str));
3066 		return -EINVAL;
3067 	}
3068 
3069 	ref_field = create_var_ref(hist_data, var_field, NULL, NULL);
3070 	if (!ref_field)
3071 		return -ENOMEM;
3072 
3073 	data->track_data.var_ref = ref_field;
3074 
3075 	if (data->handler == HANDLER_ONMAX)
3076 		track_var = create_var(hist_data, file, "__max", sizeof(u64), "u64");
3077 	if (IS_ERR(track_var)) {
3078 		hist_err(tr, HIST_ERR_ONX_VAR_CREATE_FAIL, 0);
3079 		ret = PTR_ERR(track_var);
3080 		goto out;
3081 	}
3082 
3083 	if (data->handler == HANDLER_ONCHANGE)
3084 		track_var = create_var(hist_data, file, "__change", sizeof(u64), "u64");
3085 	if (IS_ERR(track_var)) {
3086 		hist_err(tr, HIST_ERR_ONX_VAR_CREATE_FAIL, 0);
3087 		ret = PTR_ERR(track_var);
3088 		goto out;
3089 	}
3090 	data->track_data.track_var = track_var;
3091 
3092 	ret = action_create(hist_data, data);
3093  out:
3094 	return ret;
3095 }
3096 
parse_action_params(struct trace_array * tr,char * params,struct action_data * data)3097 static int parse_action_params(struct trace_array *tr, char *params,
3098 			       struct action_data *data)
3099 {
3100 	char *param, *saved_param;
3101 	bool first_param = true;
3102 	int ret = 0;
3103 
3104 	while (params) {
3105 		if (data->n_params >= SYNTH_FIELDS_MAX) {
3106 			hist_err(tr, HIST_ERR_TOO_MANY_PARAMS, 0);
3107 			goto out;
3108 		}
3109 
3110 		param = strsep(&params, ",");
3111 		if (!param) {
3112 			hist_err(tr, HIST_ERR_PARAM_NOT_FOUND, 0);
3113 			ret = -EINVAL;
3114 			goto out;
3115 		}
3116 
3117 		param = strstrip(param);
3118 		if (strlen(param) < 2) {
3119 			hist_err(tr, HIST_ERR_INVALID_PARAM, errpos(param));
3120 			ret = -EINVAL;
3121 			goto out;
3122 		}
3123 
3124 		saved_param = kstrdup(param, GFP_KERNEL);
3125 		if (!saved_param) {
3126 			ret = -ENOMEM;
3127 			goto out;
3128 		}
3129 
3130 		if (first_param && data->use_trace_keyword) {
3131 			data->synth_event_name = saved_param;
3132 			first_param = false;
3133 			continue;
3134 		}
3135 		first_param = false;
3136 
3137 		data->params[data->n_params++] = saved_param;
3138 	}
3139  out:
3140 	return ret;
3141 }
3142 
action_parse(struct trace_array * tr,char * str,struct action_data * data,enum handler_id handler)3143 static int action_parse(struct trace_array *tr, char *str, struct action_data *data,
3144 			enum handler_id handler)
3145 {
3146 	char *action_name;
3147 	int ret = 0;
3148 
3149 	strsep(&str, ".");
3150 	if (!str) {
3151 		hist_err(tr, HIST_ERR_ACTION_NOT_FOUND, 0);
3152 		ret = -EINVAL;
3153 		goto out;
3154 	}
3155 
3156 	action_name = strsep(&str, "(");
3157 	if (!action_name || !str) {
3158 		hist_err(tr, HIST_ERR_ACTION_NOT_FOUND, 0);
3159 		ret = -EINVAL;
3160 		goto out;
3161 	}
3162 
3163 	if (str_has_prefix(action_name, "save")) {
3164 		char *params = strsep(&str, ")");
3165 
3166 		if (!params) {
3167 			hist_err(tr, HIST_ERR_NO_SAVE_PARAMS, 0);
3168 			ret = -EINVAL;
3169 			goto out;
3170 		}
3171 
3172 		ret = parse_action_params(tr, params, data);
3173 		if (ret)
3174 			goto out;
3175 
3176 		if (handler == HANDLER_ONMAX)
3177 			data->track_data.check_val = check_track_val_max;
3178 		else if (handler == HANDLER_ONCHANGE)
3179 			data->track_data.check_val = check_track_val_changed;
3180 		else {
3181 			hist_err(tr, HIST_ERR_ACTION_MISMATCH, errpos(action_name));
3182 			ret = -EINVAL;
3183 			goto out;
3184 		}
3185 
3186 		data->track_data.save_data = save_track_data_vars;
3187 		data->fn = ontrack_action;
3188 		data->action = ACTION_SAVE;
3189 	} else if (str_has_prefix(action_name, "snapshot")) {
3190 		char *params = strsep(&str, ")");
3191 
3192 		if (!str) {
3193 			hist_err(tr, HIST_ERR_NO_CLOSING_PAREN, errpos(params));
3194 			ret = -EINVAL;
3195 			goto out;
3196 		}
3197 
3198 		if (handler == HANDLER_ONMAX)
3199 			data->track_data.check_val = check_track_val_max;
3200 		else if (handler == HANDLER_ONCHANGE)
3201 			data->track_data.check_val = check_track_val_changed;
3202 		else {
3203 			hist_err(tr, HIST_ERR_ACTION_MISMATCH, errpos(action_name));
3204 			ret = -EINVAL;
3205 			goto out;
3206 		}
3207 
3208 		data->track_data.save_data = save_track_data_snapshot;
3209 		data->fn = ontrack_action;
3210 		data->action = ACTION_SNAPSHOT;
3211 	} else {
3212 		char *params = strsep(&str, ")");
3213 
3214 		if (str_has_prefix(action_name, "trace"))
3215 			data->use_trace_keyword = true;
3216 
3217 		if (params) {
3218 			ret = parse_action_params(tr, params, data);
3219 			if (ret)
3220 				goto out;
3221 		}
3222 
3223 		if (handler == HANDLER_ONMAX)
3224 			data->track_data.check_val = check_track_val_max;
3225 		else if (handler == HANDLER_ONCHANGE)
3226 			data->track_data.check_val = check_track_val_changed;
3227 
3228 		if (handler != HANDLER_ONMATCH) {
3229 			data->track_data.save_data = action_trace;
3230 			data->fn = ontrack_action;
3231 		} else
3232 			data->fn = action_trace;
3233 
3234 		data->action = ACTION_TRACE;
3235 	}
3236 
3237 	data->action_name = kstrdup(action_name, GFP_KERNEL);
3238 	if (!data->action_name) {
3239 		ret = -ENOMEM;
3240 		goto out;
3241 	}
3242 
3243 	data->handler = handler;
3244  out:
3245 	return ret;
3246 }
3247 
track_data_parse(struct hist_trigger_data * hist_data,char * str,enum handler_id handler)3248 static struct action_data *track_data_parse(struct hist_trigger_data *hist_data,
3249 					    char *str, enum handler_id handler)
3250 {
3251 	struct action_data *data;
3252 	int ret = -EINVAL;
3253 	char *var_str;
3254 
3255 	data = kzalloc(sizeof(*data), GFP_KERNEL);
3256 	if (!data)
3257 		return ERR_PTR(-ENOMEM);
3258 
3259 	var_str = strsep(&str, ")");
3260 	if (!var_str || !str) {
3261 		ret = -EINVAL;
3262 		goto free;
3263 	}
3264 
3265 	data->track_data.var_str = kstrdup(var_str, GFP_KERNEL);
3266 	if (!data->track_data.var_str) {
3267 		ret = -ENOMEM;
3268 		goto free;
3269 	}
3270 
3271 	ret = action_parse(hist_data->event_file->tr, str, data, handler);
3272 	if (ret)
3273 		goto free;
3274  out:
3275 	return data;
3276  free:
3277 	track_data_destroy(hist_data, data);
3278 	data = ERR_PTR(ret);
3279 	goto out;
3280 }
3281 
onmatch_destroy(struct action_data * data)3282 static void onmatch_destroy(struct action_data *data)
3283 {
3284 	kfree(data->match_data.event);
3285 	kfree(data->match_data.event_system);
3286 
3287 	action_data_destroy(data);
3288 }
3289 
destroy_field_var(struct field_var * field_var)3290 static void destroy_field_var(struct field_var *field_var)
3291 {
3292 	if (!field_var)
3293 		return;
3294 
3295 	destroy_hist_field(field_var->var, 0);
3296 	destroy_hist_field(field_var->val, 0);
3297 
3298 	kfree(field_var);
3299 }
3300 
destroy_field_vars(struct hist_trigger_data * hist_data)3301 static void destroy_field_vars(struct hist_trigger_data *hist_data)
3302 {
3303 	unsigned int i;
3304 
3305 	for (i = 0; i < hist_data->n_field_vars; i++)
3306 		destroy_field_var(hist_data->field_vars[i]);
3307 
3308 	for (i = 0; i < hist_data->n_save_vars; i++)
3309 		destroy_field_var(hist_data->save_vars[i]);
3310 }
3311 
save_field_var(struct hist_trigger_data * hist_data,struct field_var * field_var)3312 static void save_field_var(struct hist_trigger_data *hist_data,
3313 			   struct field_var *field_var)
3314 {
3315 	hist_data->field_vars[hist_data->n_field_vars++] = field_var;
3316 
3317 	if (field_var->val->flags & HIST_FIELD_FL_STRING)
3318 		hist_data->n_field_var_str++;
3319 }
3320 
3321 
check_synth_field(struct synth_event * event,struct hist_field * hist_field,unsigned int field_pos)3322 static int check_synth_field(struct synth_event *event,
3323 			     struct hist_field *hist_field,
3324 			     unsigned int field_pos)
3325 {
3326 	struct synth_field *field;
3327 
3328 	if (field_pos >= event->n_fields)
3329 		return -EINVAL;
3330 
3331 	field = event->fields[field_pos];
3332 
3333 	/*
3334 	 * A dynamic string synth field can accept static or
3335 	 * dynamic. A static string synth field can only accept a
3336 	 * same-sized static string, which is checked for later.
3337 	 */
3338 	if (strstr(hist_field->type, "char[") && field->is_string
3339 	    && field->is_dynamic)
3340 		return 0;
3341 
3342 	if (strcmp(field->type, hist_field->type) != 0) {
3343 		if (field->size != hist_field->size ||
3344 		    field->is_signed != hist_field->is_signed)
3345 			return -EINVAL;
3346 	}
3347 
3348 	return 0;
3349 }
3350 
3351 static struct hist_field *
trace_action_find_var(struct hist_trigger_data * hist_data,struct action_data * data,char * system,char * event,char * var)3352 trace_action_find_var(struct hist_trigger_data *hist_data,
3353 		      struct action_data *data,
3354 		      char *system, char *event, char *var)
3355 {
3356 	struct trace_array *tr = hist_data->event_file->tr;
3357 	struct hist_field *hist_field;
3358 
3359 	var++; /* skip '$' */
3360 
3361 	hist_field = find_target_event_var(hist_data, system, event, var);
3362 	if (!hist_field) {
3363 		if (!system && data->handler == HANDLER_ONMATCH) {
3364 			system = data->match_data.event_system;
3365 			event = data->match_data.event;
3366 		}
3367 
3368 		hist_field = find_event_var(hist_data, system, event, var);
3369 	}
3370 
3371 	if (!hist_field)
3372 		hist_err(tr, HIST_ERR_PARAM_NOT_FOUND, errpos(var));
3373 
3374 	return hist_field;
3375 }
3376 
3377 static struct hist_field *
trace_action_create_field_var(struct hist_trigger_data * hist_data,struct action_data * data,char * system,char * event,char * var)3378 trace_action_create_field_var(struct hist_trigger_data *hist_data,
3379 			      struct action_data *data, char *system,
3380 			      char *event, char *var)
3381 {
3382 	struct hist_field *hist_field = NULL;
3383 	struct field_var *field_var;
3384 
3385 	/*
3386 	 * First try to create a field var on the target event (the
3387 	 * currently being defined).  This will create a variable for
3388 	 * unqualified fields on the target event, or if qualified,
3389 	 * target fields that have qualified names matching the target.
3390 	 */
3391 	field_var = create_target_field_var(hist_data, system, event, var);
3392 
3393 	if (field_var && !IS_ERR(field_var)) {
3394 		save_field_var(hist_data, field_var);
3395 		hist_field = field_var->var;
3396 	} else {
3397 		field_var = NULL;
3398 		/*
3399 		 * If no explicit system.event is specfied, default to
3400 		 * looking for fields on the onmatch(system.event.xxx)
3401 		 * event.
3402 		 */
3403 		if (!system && data->handler == HANDLER_ONMATCH) {
3404 			system = data->match_data.event_system;
3405 			event = data->match_data.event;
3406 		}
3407 
3408 		if (!event)
3409 			goto free;
3410 		/*
3411 		 * At this point, we're looking at a field on another
3412 		 * event.  Because we can't modify a hist trigger on
3413 		 * another event to add a variable for a field, we need
3414 		 * to create a new trigger on that event and create the
3415 		 * variable at the same time.
3416 		 */
3417 		hist_field = create_field_var_hist(hist_data, system, event, var);
3418 		if (IS_ERR(hist_field))
3419 			goto free;
3420 	}
3421  out:
3422 	return hist_field;
3423  free:
3424 	destroy_field_var(field_var);
3425 	hist_field = NULL;
3426 	goto out;
3427 }
3428 
trace_action_create(struct hist_trigger_data * hist_data,struct action_data * data)3429 static int trace_action_create(struct hist_trigger_data *hist_data,
3430 			       struct action_data *data)
3431 {
3432 	struct trace_array *tr = hist_data->event_file->tr;
3433 	char *event_name, *param, *system = NULL;
3434 	struct hist_field *hist_field, *var_ref;
3435 	unsigned int i;
3436 	unsigned int field_pos = 0;
3437 	struct synth_event *event;
3438 	char *synth_event_name;
3439 	int var_ref_idx, ret = 0;
3440 
3441 	lockdep_assert_held(&event_mutex);
3442 
3443 	if (data->use_trace_keyword)
3444 		synth_event_name = data->synth_event_name;
3445 	else
3446 		synth_event_name = data->action_name;
3447 
3448 	event = find_synth_event(synth_event_name);
3449 	if (!event) {
3450 		hist_err(tr, HIST_ERR_SYNTH_EVENT_NOT_FOUND, errpos(synth_event_name));
3451 		return -EINVAL;
3452 	}
3453 
3454 	event->ref++;
3455 
3456 	for (i = 0; i < data->n_params; i++) {
3457 		char *p;
3458 
3459 		p = param = kstrdup(data->params[i], GFP_KERNEL);
3460 		if (!param) {
3461 			ret = -ENOMEM;
3462 			goto err;
3463 		}
3464 
3465 		system = strsep(&param, ".");
3466 		if (!param) {
3467 			param = (char *)system;
3468 			system = event_name = NULL;
3469 		} else {
3470 			event_name = strsep(&param, ".");
3471 			if (!param) {
3472 				kfree(p);
3473 				ret = -EINVAL;
3474 				goto err;
3475 			}
3476 		}
3477 
3478 		if (param[0] == '$')
3479 			hist_field = trace_action_find_var(hist_data, data,
3480 							   system, event_name,
3481 							   param);
3482 		else
3483 			hist_field = trace_action_create_field_var(hist_data,
3484 								   data,
3485 								   system,
3486 								   event_name,
3487 								   param);
3488 
3489 		if (!hist_field) {
3490 			kfree(p);
3491 			ret = -EINVAL;
3492 			goto err;
3493 		}
3494 
3495 		if (check_synth_field(event, hist_field, field_pos) == 0) {
3496 			var_ref = create_var_ref(hist_data, hist_field,
3497 						 system, event_name);
3498 			if (!var_ref) {
3499 				kfree(p);
3500 				ret = -ENOMEM;
3501 				goto err;
3502 			}
3503 
3504 			var_ref_idx = find_var_ref_idx(hist_data, var_ref);
3505 			if (WARN_ON(var_ref_idx < 0)) {
3506 				ret = var_ref_idx;
3507 				goto err;
3508 			}
3509 
3510 			data->var_ref_idx[i] = var_ref_idx;
3511 
3512 			field_pos++;
3513 			kfree(p);
3514 			continue;
3515 		}
3516 
3517 		hist_err(tr, HIST_ERR_SYNTH_TYPE_MISMATCH, errpos(param));
3518 		kfree(p);
3519 		ret = -EINVAL;
3520 		goto err;
3521 	}
3522 
3523 	if (field_pos != event->n_fields) {
3524 		hist_err(tr, HIST_ERR_SYNTH_COUNT_MISMATCH, errpos(event->name));
3525 		ret = -EINVAL;
3526 		goto err;
3527 	}
3528 
3529 	data->synth_event = event;
3530  out:
3531 	return ret;
3532  err:
3533 	event->ref--;
3534 
3535 	goto out;
3536 }
3537 
action_create(struct hist_trigger_data * hist_data,struct action_data * data)3538 static int action_create(struct hist_trigger_data *hist_data,
3539 			 struct action_data *data)
3540 {
3541 	struct trace_event_file *file = hist_data->event_file;
3542 	struct trace_array *tr = file->tr;
3543 	struct track_data *track_data;
3544 	struct field_var *field_var;
3545 	unsigned int i;
3546 	char *param;
3547 	int ret = 0;
3548 
3549 	if (data->action == ACTION_TRACE)
3550 		return trace_action_create(hist_data, data);
3551 
3552 	if (data->action == ACTION_SNAPSHOT) {
3553 		track_data = track_data_alloc(hist_data->key_size, data, hist_data);
3554 		if (IS_ERR(track_data)) {
3555 			ret = PTR_ERR(track_data);
3556 			goto out;
3557 		}
3558 
3559 		ret = tracing_snapshot_cond_enable(file->tr, track_data,
3560 						   cond_snapshot_update);
3561 		if (ret)
3562 			track_data_free(track_data);
3563 
3564 		goto out;
3565 	}
3566 
3567 	if (data->action == ACTION_SAVE) {
3568 		if (hist_data->n_save_vars) {
3569 			ret = -EEXIST;
3570 			hist_err(tr, HIST_ERR_TOO_MANY_SAVE_ACTIONS, 0);
3571 			goto out;
3572 		}
3573 
3574 		for (i = 0; i < data->n_params; i++) {
3575 			param = kstrdup(data->params[i], GFP_KERNEL);
3576 			if (!param) {
3577 				ret = -ENOMEM;
3578 				goto out;
3579 			}
3580 
3581 			field_var = create_target_field_var(hist_data, NULL, NULL, param);
3582 			if (IS_ERR(field_var)) {
3583 				hist_err(tr, HIST_ERR_FIELD_VAR_CREATE_FAIL,
3584 					 errpos(param));
3585 				ret = PTR_ERR(field_var);
3586 				kfree(param);
3587 				goto out;
3588 			}
3589 
3590 			hist_data->save_vars[hist_data->n_save_vars++] = field_var;
3591 			if (field_var->val->flags & HIST_FIELD_FL_STRING)
3592 				hist_data->n_save_var_str++;
3593 			kfree(param);
3594 		}
3595 	}
3596  out:
3597 	return ret;
3598 }
3599 
onmatch_create(struct hist_trigger_data * hist_data,struct action_data * data)3600 static int onmatch_create(struct hist_trigger_data *hist_data,
3601 			  struct action_data *data)
3602 {
3603 	return action_create(hist_data, data);
3604 }
3605 
onmatch_parse(struct trace_array * tr,char * str)3606 static struct action_data *onmatch_parse(struct trace_array *tr, char *str)
3607 {
3608 	char *match_event, *match_event_system;
3609 	struct action_data *data;
3610 	int ret = -EINVAL;
3611 
3612 	data = kzalloc(sizeof(*data), GFP_KERNEL);
3613 	if (!data)
3614 		return ERR_PTR(-ENOMEM);
3615 
3616 	match_event = strsep(&str, ")");
3617 	if (!match_event || !str) {
3618 		hist_err(tr, HIST_ERR_NO_CLOSING_PAREN, errpos(match_event));
3619 		goto free;
3620 	}
3621 
3622 	match_event_system = strsep(&match_event, ".");
3623 	if (!match_event) {
3624 		hist_err(tr, HIST_ERR_SUBSYS_NOT_FOUND, errpos(match_event_system));
3625 		goto free;
3626 	}
3627 
3628 	if (IS_ERR(event_file(tr, match_event_system, match_event))) {
3629 		hist_err(tr, HIST_ERR_INVALID_SUBSYS_EVENT, errpos(match_event));
3630 		goto free;
3631 	}
3632 
3633 	data->match_data.event = kstrdup(match_event, GFP_KERNEL);
3634 	if (!data->match_data.event) {
3635 		ret = -ENOMEM;
3636 		goto free;
3637 	}
3638 
3639 	data->match_data.event_system = kstrdup(match_event_system, GFP_KERNEL);
3640 	if (!data->match_data.event_system) {
3641 		ret = -ENOMEM;
3642 		goto free;
3643 	}
3644 
3645 	ret = action_parse(tr, str, data, HANDLER_ONMATCH);
3646 	if (ret)
3647 		goto free;
3648  out:
3649 	return data;
3650  free:
3651 	onmatch_destroy(data);
3652 	data = ERR_PTR(ret);
3653 	goto out;
3654 }
3655 
create_hitcount_val(struct hist_trigger_data * hist_data)3656 static int create_hitcount_val(struct hist_trigger_data *hist_data)
3657 {
3658 	hist_data->fields[HITCOUNT_IDX] =
3659 		create_hist_field(hist_data, NULL, HIST_FIELD_FL_HITCOUNT, NULL);
3660 	if (!hist_data->fields[HITCOUNT_IDX])
3661 		return -ENOMEM;
3662 
3663 	hist_data->n_vals++;
3664 	hist_data->n_fields++;
3665 
3666 	if (WARN_ON(hist_data->n_vals > TRACING_MAP_VALS_MAX))
3667 		return -EINVAL;
3668 
3669 	return 0;
3670 }
3671 
__create_val_field(struct hist_trigger_data * hist_data,unsigned int val_idx,struct trace_event_file * file,char * var_name,char * field_str,unsigned long flags)3672 static int __create_val_field(struct hist_trigger_data *hist_data,
3673 			      unsigned int val_idx,
3674 			      struct trace_event_file *file,
3675 			      char *var_name, char *field_str,
3676 			      unsigned long flags)
3677 {
3678 	struct hist_field *hist_field;
3679 	int ret = 0;
3680 
3681 	hist_field = parse_expr(hist_data, file, field_str, flags, var_name, 0);
3682 	if (IS_ERR(hist_field)) {
3683 		ret = PTR_ERR(hist_field);
3684 		goto out;
3685 	}
3686 
3687 	hist_data->fields[val_idx] = hist_field;
3688 
3689 	++hist_data->n_vals;
3690 	++hist_data->n_fields;
3691 
3692 	if (WARN_ON(hist_data->n_vals > TRACING_MAP_VALS_MAX + TRACING_MAP_VARS_MAX))
3693 		ret = -EINVAL;
3694  out:
3695 	return ret;
3696 }
3697 
create_val_field(struct hist_trigger_data * hist_data,unsigned int val_idx,struct trace_event_file * file,char * field_str)3698 static int create_val_field(struct hist_trigger_data *hist_data,
3699 			    unsigned int val_idx,
3700 			    struct trace_event_file *file,
3701 			    char *field_str)
3702 {
3703 	if (WARN_ON(val_idx >= TRACING_MAP_VALS_MAX))
3704 		return -EINVAL;
3705 
3706 	return __create_val_field(hist_data, val_idx, file, NULL, field_str, 0);
3707 }
3708 
create_var_field(struct hist_trigger_data * hist_data,unsigned int val_idx,struct trace_event_file * file,char * var_name,char * expr_str)3709 static int create_var_field(struct hist_trigger_data *hist_data,
3710 			    unsigned int val_idx,
3711 			    struct trace_event_file *file,
3712 			    char *var_name, char *expr_str)
3713 {
3714 	struct trace_array *tr = hist_data->event_file->tr;
3715 	unsigned long flags = 0;
3716 	int ret;
3717 
3718 	if (WARN_ON(val_idx >= TRACING_MAP_VALS_MAX + TRACING_MAP_VARS_MAX))
3719 		return -EINVAL;
3720 
3721 	if (find_var(hist_data, file, var_name) && !hist_data->remove) {
3722 		hist_err(tr, HIST_ERR_DUPLICATE_VAR, errpos(var_name));
3723 		return -EINVAL;
3724 	}
3725 
3726 	flags |= HIST_FIELD_FL_VAR;
3727 	hist_data->n_vars++;
3728 	if (WARN_ON(hist_data->n_vars > TRACING_MAP_VARS_MAX))
3729 		return -EINVAL;
3730 
3731 	ret = __create_val_field(hist_data, val_idx, file, var_name, expr_str, flags);
3732 
3733 	if (!ret && hist_data->fields[val_idx]->flags & HIST_FIELD_FL_STRING)
3734 		hist_data->fields[val_idx]->var_str_idx = hist_data->n_var_str++;
3735 
3736 	return ret;
3737 }
3738 
create_val_fields(struct hist_trigger_data * hist_data,struct trace_event_file * file)3739 static int create_val_fields(struct hist_trigger_data *hist_data,
3740 			     struct trace_event_file *file)
3741 {
3742 	char *fields_str, *field_str;
3743 	unsigned int i, j = 1;
3744 	int ret;
3745 
3746 	ret = create_hitcount_val(hist_data);
3747 	if (ret)
3748 		goto out;
3749 
3750 	fields_str = hist_data->attrs->vals_str;
3751 	if (!fields_str)
3752 		goto out;
3753 
3754 	for (i = 0, j = 1; i < TRACING_MAP_VALS_MAX &&
3755 		     j < TRACING_MAP_VALS_MAX; i++) {
3756 		field_str = strsep(&fields_str, ",");
3757 		if (!field_str)
3758 			break;
3759 
3760 		if (strcmp(field_str, "hitcount") == 0)
3761 			continue;
3762 
3763 		ret = create_val_field(hist_data, j++, file, field_str);
3764 		if (ret)
3765 			goto out;
3766 	}
3767 
3768 	if (fields_str && (strcmp(fields_str, "hitcount") != 0))
3769 		ret = -EINVAL;
3770  out:
3771 	return ret;
3772 }
3773 
create_key_field(struct hist_trigger_data * hist_data,unsigned int key_idx,unsigned int key_offset,struct trace_event_file * file,char * field_str)3774 static int create_key_field(struct hist_trigger_data *hist_data,
3775 			    unsigned int key_idx,
3776 			    unsigned int key_offset,
3777 			    struct trace_event_file *file,
3778 			    char *field_str)
3779 {
3780 	struct trace_array *tr = hist_data->event_file->tr;
3781 	struct hist_field *hist_field = NULL;
3782 	unsigned long flags = 0;
3783 	unsigned int key_size;
3784 	int ret = 0;
3785 
3786 	if (WARN_ON(key_idx >= HIST_FIELDS_MAX))
3787 		return -EINVAL;
3788 
3789 	flags |= HIST_FIELD_FL_KEY;
3790 
3791 	if (strcmp(field_str, "stacktrace") == 0) {
3792 		flags |= HIST_FIELD_FL_STACKTRACE;
3793 		key_size = sizeof(unsigned long) * HIST_STACKTRACE_DEPTH;
3794 		hist_field = create_hist_field(hist_data, NULL, flags, NULL);
3795 	} else {
3796 		hist_field = parse_expr(hist_data, file, field_str, flags,
3797 					NULL, 0);
3798 		if (IS_ERR(hist_field)) {
3799 			ret = PTR_ERR(hist_field);
3800 			goto out;
3801 		}
3802 
3803 		if (field_has_hist_vars(hist_field, 0))	{
3804 			hist_err(tr, HIST_ERR_INVALID_REF_KEY, errpos(field_str));
3805 			destroy_hist_field(hist_field, 0);
3806 			ret = -EINVAL;
3807 			goto out;
3808 		}
3809 
3810 		key_size = hist_field->size;
3811 	}
3812 
3813 	hist_data->fields[key_idx] = hist_field;
3814 
3815 	key_size = ALIGN(key_size, sizeof(u64));
3816 	hist_data->fields[key_idx]->size = key_size;
3817 	hist_data->fields[key_idx]->offset = key_offset;
3818 
3819 	hist_data->key_size += key_size;
3820 
3821 	if (hist_data->key_size > HIST_KEY_SIZE_MAX) {
3822 		ret = -EINVAL;
3823 		goto out;
3824 	}
3825 
3826 	hist_data->n_keys++;
3827 	hist_data->n_fields++;
3828 
3829 	if (WARN_ON(hist_data->n_keys > TRACING_MAP_KEYS_MAX))
3830 		return -EINVAL;
3831 
3832 	ret = key_size;
3833  out:
3834 	return ret;
3835 }
3836 
create_key_fields(struct hist_trigger_data * hist_data,struct trace_event_file * file)3837 static int create_key_fields(struct hist_trigger_data *hist_data,
3838 			     struct trace_event_file *file)
3839 {
3840 	unsigned int i, key_offset = 0, n_vals = hist_data->n_vals;
3841 	char *fields_str, *field_str;
3842 	int ret = -EINVAL;
3843 
3844 	fields_str = hist_data->attrs->keys_str;
3845 	if (!fields_str)
3846 		goto out;
3847 
3848 	for (i = n_vals; i < n_vals + TRACING_MAP_KEYS_MAX; i++) {
3849 		field_str = strsep(&fields_str, ",");
3850 		if (!field_str)
3851 			break;
3852 		ret = create_key_field(hist_data, i, key_offset,
3853 				       file, field_str);
3854 		if (ret < 0)
3855 			goto out;
3856 		key_offset += ret;
3857 	}
3858 	if (fields_str) {
3859 		ret = -EINVAL;
3860 		goto out;
3861 	}
3862 	ret = 0;
3863  out:
3864 	return ret;
3865 }
3866 
create_var_fields(struct hist_trigger_data * hist_data,struct trace_event_file * file)3867 static int create_var_fields(struct hist_trigger_data *hist_data,
3868 			     struct trace_event_file *file)
3869 {
3870 	unsigned int i, j = hist_data->n_vals;
3871 	int ret = 0;
3872 
3873 	unsigned int n_vars = hist_data->attrs->var_defs.n_vars;
3874 
3875 	for (i = 0; i < n_vars; i++) {
3876 		char *var_name = hist_data->attrs->var_defs.name[i];
3877 		char *expr = hist_data->attrs->var_defs.expr[i];
3878 
3879 		ret = create_var_field(hist_data, j++, file, var_name, expr);
3880 		if (ret)
3881 			goto out;
3882 	}
3883  out:
3884 	return ret;
3885 }
3886 
free_var_defs(struct hist_trigger_data * hist_data)3887 static void free_var_defs(struct hist_trigger_data *hist_data)
3888 {
3889 	unsigned int i;
3890 
3891 	for (i = 0; i < hist_data->attrs->var_defs.n_vars; i++) {
3892 		kfree(hist_data->attrs->var_defs.name[i]);
3893 		kfree(hist_data->attrs->var_defs.expr[i]);
3894 	}
3895 
3896 	hist_data->attrs->var_defs.n_vars = 0;
3897 }
3898 
parse_var_defs(struct hist_trigger_data * hist_data)3899 static int parse_var_defs(struct hist_trigger_data *hist_data)
3900 {
3901 	struct trace_array *tr = hist_data->event_file->tr;
3902 	char *s, *str, *var_name, *field_str;
3903 	unsigned int i, j, n_vars = 0;
3904 	int ret = 0;
3905 
3906 	for (i = 0; i < hist_data->attrs->n_assignments; i++) {
3907 		str = hist_data->attrs->assignment_str[i];
3908 		for (j = 0; j < TRACING_MAP_VARS_MAX; j++) {
3909 			field_str = strsep(&str, ",");
3910 			if (!field_str)
3911 				break;
3912 
3913 			var_name = strsep(&field_str, "=");
3914 			if (!var_name || !field_str) {
3915 				hist_err(tr, HIST_ERR_MALFORMED_ASSIGNMENT,
3916 					 errpos(var_name));
3917 				ret = -EINVAL;
3918 				goto free;
3919 			}
3920 
3921 			if (n_vars == TRACING_MAP_VARS_MAX) {
3922 				hist_err(tr, HIST_ERR_TOO_MANY_VARS, errpos(var_name));
3923 				ret = -EINVAL;
3924 				goto free;
3925 			}
3926 
3927 			s = kstrdup(var_name, GFP_KERNEL);
3928 			if (!s) {
3929 				ret = -ENOMEM;
3930 				goto free;
3931 			}
3932 			hist_data->attrs->var_defs.name[n_vars] = s;
3933 
3934 			s = kstrdup(field_str, GFP_KERNEL);
3935 			if (!s) {
3936 				ret = -ENOMEM;
3937 				goto free;
3938 			}
3939 			hist_data->attrs->var_defs.expr[n_vars++] = s;
3940 
3941 			hist_data->attrs->var_defs.n_vars = n_vars;
3942 		}
3943 	}
3944 
3945 	return ret;
3946  free:
3947 	free_var_defs(hist_data);
3948 
3949 	return ret;
3950 }
3951 
create_hist_fields(struct hist_trigger_data * hist_data,struct trace_event_file * file)3952 static int create_hist_fields(struct hist_trigger_data *hist_data,
3953 			      struct trace_event_file *file)
3954 {
3955 	int ret;
3956 
3957 	ret = parse_var_defs(hist_data);
3958 	if (ret)
3959 		goto out;
3960 
3961 	ret = create_val_fields(hist_data, file);
3962 	if (ret)
3963 		goto out;
3964 
3965 	ret = create_var_fields(hist_data, file);
3966 	if (ret)
3967 		goto out;
3968 
3969 	ret = create_key_fields(hist_data, file);
3970 	if (ret)
3971 		goto out;
3972  out:
3973 	free_var_defs(hist_data);
3974 
3975 	return ret;
3976 }
3977 
is_descending(struct trace_array * tr,const char * str)3978 static int is_descending(struct trace_array *tr, const char *str)
3979 {
3980 	if (!str)
3981 		return 0;
3982 
3983 	if (strcmp(str, "descending") == 0)
3984 		return 1;
3985 
3986 	if (strcmp(str, "ascending") == 0)
3987 		return 0;
3988 
3989 	hist_err(tr, HIST_ERR_INVALID_SORT_MODIFIER, errpos((char *)str));
3990 
3991 	return -EINVAL;
3992 }
3993 
create_sort_keys(struct hist_trigger_data * hist_data)3994 static int create_sort_keys(struct hist_trigger_data *hist_data)
3995 {
3996 	struct trace_array *tr = hist_data->event_file->tr;
3997 	char *fields_str = hist_data->attrs->sort_key_str;
3998 	struct tracing_map_sort_key *sort_key;
3999 	int descending, ret = 0;
4000 	unsigned int i, j, k;
4001 
4002 	hist_data->n_sort_keys = 1; /* we always have at least one, hitcount */
4003 
4004 	if (!fields_str)
4005 		goto out;
4006 
4007 	for (i = 0; i < TRACING_MAP_SORT_KEYS_MAX; i++) {
4008 		struct hist_field *hist_field;
4009 		char *field_str, *field_name;
4010 		const char *test_name;
4011 
4012 		sort_key = &hist_data->sort_keys[i];
4013 
4014 		field_str = strsep(&fields_str, ",");
4015 		if (!field_str)
4016 			break;
4017 
4018 		if (!*field_str) {
4019 			ret = -EINVAL;
4020 			hist_err(tr, HIST_ERR_EMPTY_SORT_FIELD, errpos("sort="));
4021 			break;
4022 		}
4023 
4024 		if ((i == TRACING_MAP_SORT_KEYS_MAX - 1) && fields_str) {
4025 			hist_err(tr, HIST_ERR_TOO_MANY_SORT_FIELDS, errpos("sort="));
4026 			ret = -EINVAL;
4027 			break;
4028 		}
4029 
4030 		field_name = strsep(&field_str, ".");
4031 		if (!field_name || !*field_name) {
4032 			ret = -EINVAL;
4033 			hist_err(tr, HIST_ERR_EMPTY_SORT_FIELD, errpos("sort="));
4034 			break;
4035 		}
4036 
4037 		if (strcmp(field_name, "hitcount") == 0) {
4038 			descending = is_descending(tr, field_str);
4039 			if (descending < 0) {
4040 				ret = descending;
4041 				break;
4042 			}
4043 			sort_key->descending = descending;
4044 			continue;
4045 		}
4046 
4047 		for (j = 1, k = 1; j < hist_data->n_fields; j++) {
4048 			unsigned int idx;
4049 
4050 			hist_field = hist_data->fields[j];
4051 			if (hist_field->flags & HIST_FIELD_FL_VAR)
4052 				continue;
4053 
4054 			idx = k++;
4055 
4056 			test_name = hist_field_name(hist_field, 0);
4057 
4058 			if (strcmp(field_name, test_name) == 0) {
4059 				sort_key->field_idx = idx;
4060 				descending = is_descending(tr, field_str);
4061 				if (descending < 0) {
4062 					ret = descending;
4063 					goto out;
4064 				}
4065 				sort_key->descending = descending;
4066 				break;
4067 			}
4068 		}
4069 		if (j == hist_data->n_fields) {
4070 			ret = -EINVAL;
4071 			hist_err(tr, HIST_ERR_INVALID_SORT_FIELD, errpos(field_name));
4072 			break;
4073 		}
4074 	}
4075 
4076 	hist_data->n_sort_keys = i;
4077  out:
4078 	return ret;
4079 }
4080 
destroy_actions(struct hist_trigger_data * hist_data)4081 static void destroy_actions(struct hist_trigger_data *hist_data)
4082 {
4083 	unsigned int i;
4084 
4085 	for (i = 0; i < hist_data->n_actions; i++) {
4086 		struct action_data *data = hist_data->actions[i];
4087 
4088 		if (data->handler == HANDLER_ONMATCH)
4089 			onmatch_destroy(data);
4090 		else if (data->handler == HANDLER_ONMAX ||
4091 			 data->handler == HANDLER_ONCHANGE)
4092 			track_data_destroy(hist_data, data);
4093 		else
4094 			kfree(data);
4095 	}
4096 }
4097 
parse_actions(struct hist_trigger_data * hist_data)4098 static int parse_actions(struct hist_trigger_data *hist_data)
4099 {
4100 	struct trace_array *tr = hist_data->event_file->tr;
4101 	struct action_data *data;
4102 	unsigned int i;
4103 	int ret = 0;
4104 	char *str;
4105 	int len;
4106 
4107 	for (i = 0; i < hist_data->attrs->n_actions; i++) {
4108 		str = hist_data->attrs->action_str[i];
4109 
4110 		if ((len = str_has_prefix(str, "onmatch("))) {
4111 			char *action_str = str + len;
4112 
4113 			data = onmatch_parse(tr, action_str);
4114 			if (IS_ERR(data)) {
4115 				ret = PTR_ERR(data);
4116 				break;
4117 			}
4118 		} else if ((len = str_has_prefix(str, "onmax("))) {
4119 			char *action_str = str + len;
4120 
4121 			data = track_data_parse(hist_data, action_str,
4122 						HANDLER_ONMAX);
4123 			if (IS_ERR(data)) {
4124 				ret = PTR_ERR(data);
4125 				break;
4126 			}
4127 		} else if ((len = str_has_prefix(str, "onchange("))) {
4128 			char *action_str = str + len;
4129 
4130 			data = track_data_parse(hist_data, action_str,
4131 						HANDLER_ONCHANGE);
4132 			if (IS_ERR(data)) {
4133 				ret = PTR_ERR(data);
4134 				break;
4135 			}
4136 		} else {
4137 			ret = -EINVAL;
4138 			break;
4139 		}
4140 
4141 		hist_data->actions[hist_data->n_actions++] = data;
4142 	}
4143 
4144 	return ret;
4145 }
4146 
create_actions(struct hist_trigger_data * hist_data)4147 static int create_actions(struct hist_trigger_data *hist_data)
4148 {
4149 	struct action_data *data;
4150 	unsigned int i;
4151 	int ret = 0;
4152 
4153 	for (i = 0; i < hist_data->attrs->n_actions; i++) {
4154 		data = hist_data->actions[i];
4155 
4156 		if (data->handler == HANDLER_ONMATCH) {
4157 			ret = onmatch_create(hist_data, data);
4158 			if (ret)
4159 				break;
4160 		} else if (data->handler == HANDLER_ONMAX ||
4161 			   data->handler == HANDLER_ONCHANGE) {
4162 			ret = track_data_create(hist_data, data);
4163 			if (ret)
4164 				break;
4165 		} else {
4166 			ret = -EINVAL;
4167 			break;
4168 		}
4169 	}
4170 
4171 	return ret;
4172 }
4173 
print_actions(struct seq_file * m,struct hist_trigger_data * hist_data,struct tracing_map_elt * elt)4174 static void print_actions(struct seq_file *m,
4175 			  struct hist_trigger_data *hist_data,
4176 			  struct tracing_map_elt *elt)
4177 {
4178 	unsigned int i;
4179 
4180 	for (i = 0; i < hist_data->n_actions; i++) {
4181 		struct action_data *data = hist_data->actions[i];
4182 
4183 		if (data->action == ACTION_SNAPSHOT)
4184 			continue;
4185 
4186 		if (data->handler == HANDLER_ONMAX ||
4187 		    data->handler == HANDLER_ONCHANGE)
4188 			track_data_print(m, hist_data, elt, data);
4189 	}
4190 }
4191 
print_action_spec(struct seq_file * m,struct hist_trigger_data * hist_data,struct action_data * data)4192 static void print_action_spec(struct seq_file *m,
4193 			      struct hist_trigger_data *hist_data,
4194 			      struct action_data *data)
4195 {
4196 	unsigned int i;
4197 
4198 	if (data->action == ACTION_SAVE) {
4199 		for (i = 0; i < hist_data->n_save_vars; i++) {
4200 			seq_printf(m, "%s", hist_data->save_vars[i]->var->var.name);
4201 			if (i < hist_data->n_save_vars - 1)
4202 				seq_puts(m, ",");
4203 		}
4204 	} else if (data->action == ACTION_TRACE) {
4205 		if (data->use_trace_keyword)
4206 			seq_printf(m, "%s", data->synth_event_name);
4207 		for (i = 0; i < data->n_params; i++) {
4208 			if (i || data->use_trace_keyword)
4209 				seq_puts(m, ",");
4210 			seq_printf(m, "%s", data->params[i]);
4211 		}
4212 	}
4213 }
4214 
print_track_data_spec(struct seq_file * m,struct hist_trigger_data * hist_data,struct action_data * data)4215 static void print_track_data_spec(struct seq_file *m,
4216 				  struct hist_trigger_data *hist_data,
4217 				  struct action_data *data)
4218 {
4219 	if (data->handler == HANDLER_ONMAX)
4220 		seq_puts(m, ":onmax(");
4221 	else if (data->handler == HANDLER_ONCHANGE)
4222 		seq_puts(m, ":onchange(");
4223 	seq_printf(m, "%s", data->track_data.var_str);
4224 	seq_printf(m, ").%s(", data->action_name);
4225 
4226 	print_action_spec(m, hist_data, data);
4227 
4228 	seq_puts(m, ")");
4229 }
4230 
print_onmatch_spec(struct seq_file * m,struct hist_trigger_data * hist_data,struct action_data * data)4231 static void print_onmatch_spec(struct seq_file *m,
4232 			       struct hist_trigger_data *hist_data,
4233 			       struct action_data *data)
4234 {
4235 	seq_printf(m, ":onmatch(%s.%s).", data->match_data.event_system,
4236 		   data->match_data.event);
4237 
4238 	seq_printf(m, "%s(", data->action_name);
4239 
4240 	print_action_spec(m, hist_data, data);
4241 
4242 	seq_puts(m, ")");
4243 }
4244 
actions_match(struct hist_trigger_data * hist_data,struct hist_trigger_data * hist_data_test)4245 static bool actions_match(struct hist_trigger_data *hist_data,
4246 			  struct hist_trigger_data *hist_data_test)
4247 {
4248 	unsigned int i, j;
4249 
4250 	if (hist_data->n_actions != hist_data_test->n_actions)
4251 		return false;
4252 
4253 	for (i = 0; i < hist_data->n_actions; i++) {
4254 		struct action_data *data = hist_data->actions[i];
4255 		struct action_data *data_test = hist_data_test->actions[i];
4256 		char *action_name, *action_name_test;
4257 
4258 		if (data->handler != data_test->handler)
4259 			return false;
4260 		if (data->action != data_test->action)
4261 			return false;
4262 
4263 		if (data->n_params != data_test->n_params)
4264 			return false;
4265 
4266 		for (j = 0; j < data->n_params; j++) {
4267 			if (strcmp(data->params[j], data_test->params[j]) != 0)
4268 				return false;
4269 		}
4270 
4271 		if (data->use_trace_keyword)
4272 			action_name = data->synth_event_name;
4273 		else
4274 			action_name = data->action_name;
4275 
4276 		if (data_test->use_trace_keyword)
4277 			action_name_test = data_test->synth_event_name;
4278 		else
4279 			action_name_test = data_test->action_name;
4280 
4281 		if (strcmp(action_name, action_name_test) != 0)
4282 			return false;
4283 
4284 		if (data->handler == HANDLER_ONMATCH) {
4285 			if (strcmp(data->match_data.event_system,
4286 				   data_test->match_data.event_system) != 0)
4287 				return false;
4288 			if (strcmp(data->match_data.event,
4289 				   data_test->match_data.event) != 0)
4290 				return false;
4291 		} else if (data->handler == HANDLER_ONMAX ||
4292 			   data->handler == HANDLER_ONCHANGE) {
4293 			if (strcmp(data->track_data.var_str,
4294 				   data_test->track_data.var_str) != 0)
4295 				return false;
4296 		}
4297 	}
4298 
4299 	return true;
4300 }
4301 
4302 
print_actions_spec(struct seq_file * m,struct hist_trigger_data * hist_data)4303 static void print_actions_spec(struct seq_file *m,
4304 			       struct hist_trigger_data *hist_data)
4305 {
4306 	unsigned int i;
4307 
4308 	for (i = 0; i < hist_data->n_actions; i++) {
4309 		struct action_data *data = hist_data->actions[i];
4310 
4311 		if (data->handler == HANDLER_ONMATCH)
4312 			print_onmatch_spec(m, hist_data, data);
4313 		else if (data->handler == HANDLER_ONMAX ||
4314 			 data->handler == HANDLER_ONCHANGE)
4315 			print_track_data_spec(m, hist_data, data);
4316 	}
4317 }
4318 
destroy_field_var_hists(struct hist_trigger_data * hist_data)4319 static void destroy_field_var_hists(struct hist_trigger_data *hist_data)
4320 {
4321 	unsigned int i;
4322 
4323 	for (i = 0; i < hist_data->n_field_var_hists; i++) {
4324 		kfree(hist_data->field_var_hists[i]->cmd);
4325 		kfree(hist_data->field_var_hists[i]);
4326 	}
4327 }
4328 
destroy_hist_data(struct hist_trigger_data * hist_data)4329 static void destroy_hist_data(struct hist_trigger_data *hist_data)
4330 {
4331 	if (!hist_data)
4332 		return;
4333 
4334 	destroy_hist_trigger_attrs(hist_data->attrs);
4335 	destroy_hist_fields(hist_data);
4336 	tracing_map_destroy(hist_data->map);
4337 
4338 	destroy_actions(hist_data);
4339 	destroy_field_vars(hist_data);
4340 	destroy_field_var_hists(hist_data);
4341 
4342 	kfree(hist_data);
4343 }
4344 
create_tracing_map_fields(struct hist_trigger_data * hist_data)4345 static int create_tracing_map_fields(struct hist_trigger_data *hist_data)
4346 {
4347 	struct tracing_map *map = hist_data->map;
4348 	struct ftrace_event_field *field;
4349 	struct hist_field *hist_field;
4350 	int i, idx = 0;
4351 
4352 	for_each_hist_field(i, hist_data) {
4353 		hist_field = hist_data->fields[i];
4354 		if (hist_field->flags & HIST_FIELD_FL_KEY) {
4355 			tracing_map_cmp_fn_t cmp_fn;
4356 
4357 			field = hist_field->field;
4358 
4359 			if (hist_field->flags & HIST_FIELD_FL_STACKTRACE)
4360 				cmp_fn = tracing_map_cmp_none;
4361 			else if (!field)
4362 				cmp_fn = tracing_map_cmp_num(hist_field->size,
4363 							     hist_field->is_signed);
4364 			else if (is_string_field(field))
4365 				cmp_fn = tracing_map_cmp_string;
4366 			else
4367 				cmp_fn = tracing_map_cmp_num(field->size,
4368 							     field->is_signed);
4369 			idx = tracing_map_add_key_field(map,
4370 							hist_field->offset,
4371 							cmp_fn);
4372 		} else if (!(hist_field->flags & HIST_FIELD_FL_VAR))
4373 			idx = tracing_map_add_sum_field(map);
4374 
4375 		if (idx < 0)
4376 			return idx;
4377 
4378 		if (hist_field->flags & HIST_FIELD_FL_VAR) {
4379 			idx = tracing_map_add_var(map);
4380 			if (idx < 0)
4381 				return idx;
4382 			hist_field->var.idx = idx;
4383 			hist_field->var.hist_data = hist_data;
4384 		}
4385 	}
4386 
4387 	return 0;
4388 }
4389 
4390 static struct hist_trigger_data *
create_hist_data(unsigned int map_bits,struct hist_trigger_attrs * attrs,struct trace_event_file * file,bool remove)4391 create_hist_data(unsigned int map_bits,
4392 		 struct hist_trigger_attrs *attrs,
4393 		 struct trace_event_file *file,
4394 		 bool remove)
4395 {
4396 	const struct tracing_map_ops *map_ops = NULL;
4397 	struct hist_trigger_data *hist_data;
4398 	int ret = 0;
4399 
4400 	hist_data = kzalloc(sizeof(*hist_data), GFP_KERNEL);
4401 	if (!hist_data)
4402 		return ERR_PTR(-ENOMEM);
4403 
4404 	hist_data->attrs = attrs;
4405 	hist_data->remove = remove;
4406 	hist_data->event_file = file;
4407 
4408 	ret = parse_actions(hist_data);
4409 	if (ret)
4410 		goto free;
4411 
4412 	ret = create_hist_fields(hist_data, file);
4413 	if (ret)
4414 		goto free;
4415 
4416 	ret = create_sort_keys(hist_data);
4417 	if (ret)
4418 		goto free;
4419 
4420 	map_ops = &hist_trigger_elt_data_ops;
4421 
4422 	hist_data->map = tracing_map_create(map_bits, hist_data->key_size,
4423 					    map_ops, hist_data);
4424 	if (IS_ERR(hist_data->map)) {
4425 		ret = PTR_ERR(hist_data->map);
4426 		hist_data->map = NULL;
4427 		goto free;
4428 	}
4429 
4430 	ret = create_tracing_map_fields(hist_data);
4431 	if (ret)
4432 		goto free;
4433  out:
4434 	return hist_data;
4435  free:
4436 	hist_data->attrs = NULL;
4437 
4438 	destroy_hist_data(hist_data);
4439 
4440 	hist_data = ERR_PTR(ret);
4441 
4442 	goto out;
4443 }
4444 
hist_trigger_elt_update(struct hist_trigger_data * hist_data,struct tracing_map_elt * elt,void * rec,struct ring_buffer_event * rbe,u64 * var_ref_vals)4445 static void hist_trigger_elt_update(struct hist_trigger_data *hist_data,
4446 				    struct tracing_map_elt *elt, void *rec,
4447 				    struct ring_buffer_event *rbe,
4448 				    u64 *var_ref_vals)
4449 {
4450 	struct hist_elt_data *elt_data;
4451 	struct hist_field *hist_field;
4452 	unsigned int i, var_idx;
4453 	u64 hist_val;
4454 
4455 	elt_data = elt->private_data;
4456 	elt_data->var_ref_vals = var_ref_vals;
4457 
4458 	for_each_hist_val_field(i, hist_data) {
4459 		hist_field = hist_data->fields[i];
4460 		hist_val = hist_field->fn(hist_field, elt, rbe, rec);
4461 		if (hist_field->flags & HIST_FIELD_FL_VAR) {
4462 			var_idx = hist_field->var.idx;
4463 
4464 			if (hist_field->flags & HIST_FIELD_FL_STRING) {
4465 				unsigned int str_start, var_str_idx, idx;
4466 				char *str, *val_str;
4467 
4468 				str_start = hist_data->n_field_var_str +
4469 					hist_data->n_save_var_str;
4470 				var_str_idx = hist_field->var_str_idx;
4471 				idx = str_start + var_str_idx;
4472 
4473 				str = elt_data->field_var_str[idx];
4474 				val_str = (char *)(uintptr_t)hist_val;
4475 				strscpy(str, val_str, STR_VAR_LEN_MAX);
4476 
4477 				hist_val = (u64)(uintptr_t)str;
4478 			}
4479 			tracing_map_set_var(elt, var_idx, hist_val);
4480 			continue;
4481 		}
4482 		tracing_map_update_sum(elt, i, hist_val);
4483 	}
4484 
4485 	for_each_hist_key_field(i, hist_data) {
4486 		hist_field = hist_data->fields[i];
4487 		if (hist_field->flags & HIST_FIELD_FL_VAR) {
4488 			hist_val = hist_field->fn(hist_field, elt, rbe, rec);
4489 			var_idx = hist_field->var.idx;
4490 			tracing_map_set_var(elt, var_idx, hist_val);
4491 		}
4492 	}
4493 
4494 	update_field_vars(hist_data, elt, rbe, rec);
4495 }
4496 
add_to_key(char * compound_key,void * key,struct hist_field * key_field,void * rec)4497 static inline void add_to_key(char *compound_key, void *key,
4498 			      struct hist_field *key_field, void *rec)
4499 {
4500 	size_t size = key_field->size;
4501 
4502 	if (key_field->flags & HIST_FIELD_FL_STRING) {
4503 		struct ftrace_event_field *field;
4504 
4505 		field = key_field->field;
4506 		if (field->filter_type == FILTER_DYN_STRING)
4507 			size = *(u32 *)(rec + field->offset) >> 16;
4508 		else if (field->filter_type == FILTER_STATIC_STRING)
4509 			size = field->size;
4510 
4511 		/* ensure NULL-termination */
4512 		if (size > key_field->size - 1)
4513 			size = key_field->size - 1;
4514 
4515 		strncpy(compound_key + key_field->offset, (char *)key, size);
4516 	} else
4517 		memcpy(compound_key + key_field->offset, key, size);
4518 }
4519 
4520 static void
hist_trigger_actions(struct hist_trigger_data * hist_data,struct tracing_map_elt * elt,void * rec,struct ring_buffer_event * rbe,void * key,u64 * var_ref_vals)4521 hist_trigger_actions(struct hist_trigger_data *hist_data,
4522 		     struct tracing_map_elt *elt, void *rec,
4523 		     struct ring_buffer_event *rbe, void *key,
4524 		     u64 *var_ref_vals)
4525 {
4526 	struct action_data *data;
4527 	unsigned int i;
4528 
4529 	for (i = 0; i < hist_data->n_actions; i++) {
4530 		data = hist_data->actions[i];
4531 		data->fn(hist_data, elt, rec, rbe, key, data, var_ref_vals);
4532 	}
4533 }
4534 
event_hist_trigger(struct event_trigger_data * data,void * rec,struct ring_buffer_event * rbe)4535 static void event_hist_trigger(struct event_trigger_data *data, void *rec,
4536 			       struct ring_buffer_event *rbe)
4537 {
4538 	struct hist_trigger_data *hist_data = data->private_data;
4539 	bool use_compound_key = (hist_data->n_keys > 1);
4540 	unsigned long entries[HIST_STACKTRACE_DEPTH];
4541 	u64 var_ref_vals[TRACING_MAP_VARS_MAX];
4542 	char compound_key[HIST_KEY_SIZE_MAX];
4543 	struct tracing_map_elt *elt = NULL;
4544 	struct hist_field *key_field;
4545 	u64 field_contents;
4546 	void *key = NULL;
4547 	unsigned int i;
4548 
4549 	memset(compound_key, 0, hist_data->key_size);
4550 
4551 	for_each_hist_key_field(i, hist_data) {
4552 		key_field = hist_data->fields[i];
4553 
4554 		if (key_field->flags & HIST_FIELD_FL_STACKTRACE) {
4555 			memset(entries, 0, HIST_STACKTRACE_SIZE);
4556 			stack_trace_save(entries, HIST_STACKTRACE_DEPTH,
4557 					 HIST_STACKTRACE_SKIP);
4558 			key = entries;
4559 		} else {
4560 			field_contents = key_field->fn(key_field, elt, rbe, rec);
4561 			if (key_field->flags & HIST_FIELD_FL_STRING) {
4562 				key = (void *)(unsigned long)field_contents;
4563 				use_compound_key = true;
4564 			} else
4565 				key = (void *)&field_contents;
4566 		}
4567 
4568 		if (use_compound_key)
4569 			add_to_key(compound_key, key, key_field, rec);
4570 	}
4571 
4572 	if (use_compound_key)
4573 		key = compound_key;
4574 
4575 	if (hist_data->n_var_refs &&
4576 	    !resolve_var_refs(hist_data, key, var_ref_vals, false))
4577 		return;
4578 
4579 	elt = tracing_map_insert(hist_data->map, key);
4580 	if (!elt)
4581 		return;
4582 
4583 	hist_trigger_elt_update(hist_data, elt, rec, rbe, var_ref_vals);
4584 
4585 	if (resolve_var_refs(hist_data, key, var_ref_vals, true))
4586 		hist_trigger_actions(hist_data, elt, rec, rbe, key, var_ref_vals);
4587 }
4588 
hist_trigger_stacktrace_print(struct seq_file * m,unsigned long * stacktrace_entries,unsigned int max_entries)4589 static void hist_trigger_stacktrace_print(struct seq_file *m,
4590 					  unsigned long *stacktrace_entries,
4591 					  unsigned int max_entries)
4592 {
4593 	char str[KSYM_SYMBOL_LEN];
4594 	unsigned int spaces = 8;
4595 	unsigned int i;
4596 
4597 	for (i = 0; i < max_entries; i++) {
4598 		if (!stacktrace_entries[i])
4599 			return;
4600 
4601 		seq_printf(m, "%*c", 1 + spaces, ' ');
4602 		sprint_symbol(str, stacktrace_entries[i]);
4603 		seq_printf(m, "%s\n", str);
4604 	}
4605 }
4606 
hist_trigger_print_key(struct seq_file * m,struct hist_trigger_data * hist_data,void * key,struct tracing_map_elt * elt)4607 static void hist_trigger_print_key(struct seq_file *m,
4608 				   struct hist_trigger_data *hist_data,
4609 				   void *key,
4610 				   struct tracing_map_elt *elt)
4611 {
4612 	struct hist_field *key_field;
4613 	char str[KSYM_SYMBOL_LEN];
4614 	bool multiline = false;
4615 	const char *field_name;
4616 	unsigned int i;
4617 	u64 uval;
4618 
4619 	seq_puts(m, "{ ");
4620 
4621 	for_each_hist_key_field(i, hist_data) {
4622 		key_field = hist_data->fields[i];
4623 
4624 		if (i > hist_data->n_vals)
4625 			seq_puts(m, ", ");
4626 
4627 		field_name = hist_field_name(key_field, 0);
4628 
4629 		if (key_field->flags & HIST_FIELD_FL_HEX) {
4630 			uval = *(u64 *)(key + key_field->offset);
4631 			seq_printf(m, "%s: %llx", field_name, uval);
4632 		} else if (key_field->flags & HIST_FIELD_FL_SYM) {
4633 			uval = *(u64 *)(key + key_field->offset);
4634 			sprint_symbol_no_offset(str, uval);
4635 			seq_printf(m, "%s: [%llx] %-45s", field_name,
4636 				   uval, str);
4637 		} else if (key_field->flags & HIST_FIELD_FL_SYM_OFFSET) {
4638 			uval = *(u64 *)(key + key_field->offset);
4639 			sprint_symbol(str, uval);
4640 			seq_printf(m, "%s: [%llx] %-55s", field_name,
4641 				   uval, str);
4642 		} else if (key_field->flags & HIST_FIELD_FL_EXECNAME) {
4643 			struct hist_elt_data *elt_data = elt->private_data;
4644 			char *comm;
4645 
4646 			if (WARN_ON_ONCE(!elt_data))
4647 				return;
4648 
4649 			comm = elt_data->comm;
4650 
4651 			uval = *(u64 *)(key + key_field->offset);
4652 			seq_printf(m, "%s: %-16s[%10llu]", field_name,
4653 				   comm, uval);
4654 		} else if (key_field->flags & HIST_FIELD_FL_SYSCALL) {
4655 			const char *syscall_name;
4656 
4657 			uval = *(u64 *)(key + key_field->offset);
4658 			syscall_name = get_syscall_name(uval);
4659 			if (!syscall_name)
4660 				syscall_name = "unknown_syscall";
4661 
4662 			seq_printf(m, "%s: %-30s[%3llu]", field_name,
4663 				   syscall_name, uval);
4664 		} else if (key_field->flags & HIST_FIELD_FL_STACKTRACE) {
4665 			seq_puts(m, "stacktrace:\n");
4666 			hist_trigger_stacktrace_print(m,
4667 						      key + key_field->offset,
4668 						      HIST_STACKTRACE_DEPTH);
4669 			multiline = true;
4670 		} else if (key_field->flags & HIST_FIELD_FL_LOG2) {
4671 			seq_printf(m, "%s: ~ 2^%-2llu", field_name,
4672 				   *(u64 *)(key + key_field->offset));
4673 		} else if (key_field->flags & HIST_FIELD_FL_STRING) {
4674 			seq_printf(m, "%s: %-50s", field_name,
4675 				   (char *)(key + key_field->offset));
4676 		} else {
4677 			uval = *(u64 *)(key + key_field->offset);
4678 			seq_printf(m, "%s: %10llu", field_name, uval);
4679 		}
4680 	}
4681 
4682 	if (!multiline)
4683 		seq_puts(m, " ");
4684 
4685 	seq_puts(m, "}");
4686 }
4687 
hist_trigger_entry_print(struct seq_file * m,struct hist_trigger_data * hist_data,void * key,struct tracing_map_elt * elt)4688 static void hist_trigger_entry_print(struct seq_file *m,
4689 				     struct hist_trigger_data *hist_data,
4690 				     void *key,
4691 				     struct tracing_map_elt *elt)
4692 {
4693 	const char *field_name;
4694 	unsigned int i;
4695 
4696 	hist_trigger_print_key(m, hist_data, key, elt);
4697 
4698 	seq_printf(m, " hitcount: %10llu",
4699 		   tracing_map_read_sum(elt, HITCOUNT_IDX));
4700 
4701 	for (i = 1; i < hist_data->n_vals; i++) {
4702 		field_name = hist_field_name(hist_data->fields[i], 0);
4703 
4704 		if (hist_data->fields[i]->flags & HIST_FIELD_FL_VAR ||
4705 		    hist_data->fields[i]->flags & HIST_FIELD_FL_EXPR)
4706 			continue;
4707 
4708 		if (hist_data->fields[i]->flags & HIST_FIELD_FL_HEX) {
4709 			seq_printf(m, "  %s: %10llx", field_name,
4710 				   tracing_map_read_sum(elt, i));
4711 		} else {
4712 			seq_printf(m, "  %s: %10llu", field_name,
4713 				   tracing_map_read_sum(elt, i));
4714 		}
4715 	}
4716 
4717 	print_actions(m, hist_data, elt);
4718 
4719 	seq_puts(m, "\n");
4720 }
4721 
print_entries(struct seq_file * m,struct hist_trigger_data * hist_data)4722 static int print_entries(struct seq_file *m,
4723 			 struct hist_trigger_data *hist_data)
4724 {
4725 	struct tracing_map_sort_entry **sort_entries = NULL;
4726 	struct tracing_map *map = hist_data->map;
4727 	int i, n_entries;
4728 
4729 	n_entries = tracing_map_sort_entries(map, hist_data->sort_keys,
4730 					     hist_data->n_sort_keys,
4731 					     &sort_entries);
4732 	if (n_entries < 0)
4733 		return n_entries;
4734 
4735 	for (i = 0; i < n_entries; i++)
4736 		hist_trigger_entry_print(m, hist_data,
4737 					 sort_entries[i]->key,
4738 					 sort_entries[i]->elt);
4739 
4740 	tracing_map_destroy_sort_entries(sort_entries, n_entries);
4741 
4742 	return n_entries;
4743 }
4744 
hist_trigger_show(struct seq_file * m,struct event_trigger_data * data,int n)4745 static void hist_trigger_show(struct seq_file *m,
4746 			      struct event_trigger_data *data, int n)
4747 {
4748 	struct hist_trigger_data *hist_data;
4749 	int n_entries;
4750 
4751 	if (n > 0)
4752 		seq_puts(m, "\n\n");
4753 
4754 	seq_puts(m, "# event histogram\n#\n# trigger info: ");
4755 	data->ops->print(m, data->ops, data);
4756 	seq_puts(m, "#\n\n");
4757 
4758 	hist_data = data->private_data;
4759 	n_entries = print_entries(m, hist_data);
4760 	if (n_entries < 0)
4761 		n_entries = 0;
4762 
4763 	track_data_snapshot_print(m, hist_data);
4764 
4765 	seq_printf(m, "\nTotals:\n    Hits: %llu\n    Entries: %u\n    Dropped: %llu\n",
4766 		   (u64)atomic64_read(&hist_data->map->hits),
4767 		   n_entries, (u64)atomic64_read(&hist_data->map->drops));
4768 }
4769 
hist_show(struct seq_file * m,void * v)4770 static int hist_show(struct seq_file *m, void *v)
4771 {
4772 	struct event_trigger_data *data;
4773 	struct trace_event_file *event_file;
4774 	int n = 0, ret = 0;
4775 
4776 	mutex_lock(&event_mutex);
4777 
4778 	event_file = event_file_data(m->private);
4779 	if (unlikely(!event_file)) {
4780 		ret = -ENODEV;
4781 		goto out_unlock;
4782 	}
4783 
4784 	list_for_each_entry(data, &event_file->triggers, list) {
4785 		if (data->cmd_ops->trigger_type == ETT_EVENT_HIST)
4786 			hist_trigger_show(m, data, n++);
4787 	}
4788 
4789  out_unlock:
4790 	mutex_unlock(&event_mutex);
4791 
4792 	return ret;
4793 }
4794 
event_hist_open(struct inode * inode,struct file * file)4795 static int event_hist_open(struct inode *inode, struct file *file)
4796 {
4797 	int ret;
4798 
4799 	ret = security_locked_down(LOCKDOWN_TRACEFS);
4800 	if (ret)
4801 		return ret;
4802 
4803 	return single_open(file, hist_show, file);
4804 }
4805 
4806 const struct file_operations event_hist_fops = {
4807 	.open = event_hist_open,
4808 	.read = seq_read,
4809 	.llseek = seq_lseek,
4810 	.release = single_release,
4811 };
4812 
4813 #ifdef CONFIG_HIST_TRIGGERS_DEBUG
hist_field_debug_show_flags(struct seq_file * m,unsigned long flags)4814 static void hist_field_debug_show_flags(struct seq_file *m,
4815 					unsigned long flags)
4816 {
4817 	seq_puts(m, "      flags:\n");
4818 
4819 	if (flags & HIST_FIELD_FL_KEY)
4820 		seq_puts(m, "        HIST_FIELD_FL_KEY\n");
4821 	else if (flags & HIST_FIELD_FL_HITCOUNT)
4822 		seq_puts(m, "        VAL: HIST_FIELD_FL_HITCOUNT\n");
4823 	else if (flags & HIST_FIELD_FL_VAR)
4824 		seq_puts(m, "        HIST_FIELD_FL_VAR\n");
4825 	else if (flags & HIST_FIELD_FL_VAR_REF)
4826 		seq_puts(m, "        HIST_FIELD_FL_VAR_REF\n");
4827 	else
4828 		seq_puts(m, "        VAL: normal u64 value\n");
4829 
4830 	if (flags & HIST_FIELD_FL_ALIAS)
4831 		seq_puts(m, "        HIST_FIELD_FL_ALIAS\n");
4832 }
4833 
hist_field_debug_show(struct seq_file * m,struct hist_field * field,unsigned long flags)4834 static int hist_field_debug_show(struct seq_file *m,
4835 				 struct hist_field *field, unsigned long flags)
4836 {
4837 	if ((field->flags & flags) != flags) {
4838 		seq_printf(m, "ERROR: bad flags - %lx\n", flags);
4839 		return -EINVAL;
4840 	}
4841 
4842 	hist_field_debug_show_flags(m, field->flags);
4843 	if (field->field)
4844 		seq_printf(m, "      ftrace_event_field name: %s\n",
4845 			   field->field->name);
4846 
4847 	if (field->flags & HIST_FIELD_FL_VAR) {
4848 		seq_printf(m, "      var.name: %s\n", field->var.name);
4849 		seq_printf(m, "      var.idx (into tracing_map_elt.vars[]): %u\n",
4850 			   field->var.idx);
4851 	}
4852 
4853 	if (field->flags & HIST_FIELD_FL_ALIAS)
4854 		seq_printf(m, "      var_ref_idx (into hist_data->var_refs[]): %u\n",
4855 			   field->var_ref_idx);
4856 
4857 	if (field->flags & HIST_FIELD_FL_VAR_REF) {
4858 		seq_printf(m, "      name: %s\n", field->name);
4859 		seq_printf(m, "      var.idx (into tracing_map_elt.vars[]): %u\n",
4860 			   field->var.idx);
4861 		seq_printf(m, "      var.hist_data: %p\n", field->var.hist_data);
4862 		seq_printf(m, "      var_ref_idx (into hist_data->var_refs[]): %u\n",
4863 			   field->var_ref_idx);
4864 		if (field->system)
4865 			seq_printf(m, "      system: %s\n", field->system);
4866 		if (field->event_name)
4867 			seq_printf(m, "      event_name: %s\n", field->event_name);
4868 	}
4869 
4870 	seq_printf(m, "      type: %s\n", field->type);
4871 	seq_printf(m, "      size: %u\n", field->size);
4872 	seq_printf(m, "      is_signed: %u\n", field->is_signed);
4873 
4874 	return 0;
4875 }
4876 
field_var_debug_show(struct seq_file * m,struct field_var * field_var,unsigned int i,bool save_vars)4877 static int field_var_debug_show(struct seq_file *m,
4878 				struct field_var *field_var, unsigned int i,
4879 				bool save_vars)
4880 {
4881 	const char *vars_name = save_vars ? "save_vars" : "field_vars";
4882 	struct hist_field *field;
4883 	int ret = 0;
4884 
4885 	seq_printf(m, "\n    hist_data->%s[%d]:\n", vars_name, i);
4886 
4887 	field = field_var->var;
4888 
4889 	seq_printf(m, "\n      %s[%d].var:\n", vars_name, i);
4890 
4891 	hist_field_debug_show_flags(m, field->flags);
4892 	seq_printf(m, "      var.name: %s\n", field->var.name);
4893 	seq_printf(m, "      var.idx (into tracing_map_elt.vars[]): %u\n",
4894 		   field->var.idx);
4895 
4896 	field = field_var->val;
4897 
4898 	seq_printf(m, "\n      %s[%d].val:\n", vars_name, i);
4899 	if (field->field)
4900 		seq_printf(m, "      ftrace_event_field name: %s\n",
4901 			   field->field->name);
4902 	else {
4903 		ret = -EINVAL;
4904 		goto out;
4905 	}
4906 
4907 	seq_printf(m, "      type: %s\n", field->type);
4908 	seq_printf(m, "      size: %u\n", field->size);
4909 	seq_printf(m, "      is_signed: %u\n", field->is_signed);
4910 out:
4911 	return ret;
4912 }
4913 
hist_action_debug_show(struct seq_file * m,struct action_data * data,int i)4914 static int hist_action_debug_show(struct seq_file *m,
4915 				  struct action_data *data, int i)
4916 {
4917 	int ret = 0;
4918 
4919 	if (data->handler == HANDLER_ONMAX ||
4920 	    data->handler == HANDLER_ONCHANGE) {
4921 		seq_printf(m, "\n    hist_data->actions[%d].track_data.var_ref:\n", i);
4922 		ret = hist_field_debug_show(m, data->track_data.var_ref,
4923 					    HIST_FIELD_FL_VAR_REF);
4924 		if (ret)
4925 			goto out;
4926 
4927 		seq_printf(m, "\n    hist_data->actions[%d].track_data.track_var:\n", i);
4928 		ret = hist_field_debug_show(m, data->track_data.track_var,
4929 					    HIST_FIELD_FL_VAR);
4930 		if (ret)
4931 			goto out;
4932 	}
4933 
4934 	if (data->handler == HANDLER_ONMATCH) {
4935 		seq_printf(m, "\n    hist_data->actions[%d].match_data.event_system: %s\n",
4936 			   i, data->match_data.event_system);
4937 		seq_printf(m, "    hist_data->actions[%d].match_data.event: %s\n",
4938 			   i, data->match_data.event);
4939 	}
4940 out:
4941 	return ret;
4942 }
4943 
hist_actions_debug_show(struct seq_file * m,struct hist_trigger_data * hist_data)4944 static int hist_actions_debug_show(struct seq_file *m,
4945 				   struct hist_trigger_data *hist_data)
4946 {
4947 	int i, ret = 0;
4948 
4949 	if (hist_data->n_actions)
4950 		seq_puts(m, "\n  action tracking variables (for onmax()/onchange()/onmatch()):\n");
4951 
4952 	for (i = 0; i < hist_data->n_actions; i++) {
4953 		struct action_data *action = hist_data->actions[i];
4954 
4955 		ret = hist_action_debug_show(m, action, i);
4956 		if (ret)
4957 			goto out;
4958 	}
4959 
4960 	if (hist_data->n_save_vars)
4961 		seq_puts(m, "\n  save action variables (save() params):\n");
4962 
4963 	for (i = 0; i < hist_data->n_save_vars; i++) {
4964 		ret = field_var_debug_show(m, hist_data->save_vars[i], i, true);
4965 		if (ret)
4966 			goto out;
4967 	}
4968 out:
4969 	return ret;
4970 }
4971 
hist_trigger_debug_show(struct seq_file * m,struct event_trigger_data * data,int n)4972 static void hist_trigger_debug_show(struct seq_file *m,
4973 				    struct event_trigger_data *data, int n)
4974 {
4975 	struct hist_trigger_data *hist_data;
4976 	int i, ret;
4977 
4978 	if (n > 0)
4979 		seq_puts(m, "\n\n");
4980 
4981 	seq_puts(m, "# event histogram\n#\n# trigger info: ");
4982 	data->ops->print(m, data->ops, data);
4983 	seq_puts(m, "#\n\n");
4984 
4985 	hist_data = data->private_data;
4986 
4987 	seq_printf(m, "hist_data: %p\n\n", hist_data);
4988 	seq_printf(m, "  n_vals: %u\n", hist_data->n_vals);
4989 	seq_printf(m, "  n_keys: %u\n", hist_data->n_keys);
4990 	seq_printf(m, "  n_fields: %u\n", hist_data->n_fields);
4991 
4992 	seq_puts(m, "\n  val fields:\n\n");
4993 
4994 	seq_puts(m, "    hist_data->fields[0]:\n");
4995 	ret = hist_field_debug_show(m, hist_data->fields[0],
4996 				    HIST_FIELD_FL_HITCOUNT);
4997 	if (ret)
4998 		return;
4999 
5000 	for (i = 1; i < hist_data->n_vals; i++) {
5001 		seq_printf(m, "\n    hist_data->fields[%d]:\n", i);
5002 		ret = hist_field_debug_show(m, hist_data->fields[i], 0);
5003 		if (ret)
5004 			return;
5005 	}
5006 
5007 	seq_puts(m, "\n  key fields:\n");
5008 
5009 	for (i = hist_data->n_vals; i < hist_data->n_fields; i++) {
5010 		seq_printf(m, "\n    hist_data->fields[%d]:\n", i);
5011 		ret = hist_field_debug_show(m, hist_data->fields[i],
5012 					    HIST_FIELD_FL_KEY);
5013 		if (ret)
5014 			return;
5015 	}
5016 
5017 	if (hist_data->n_var_refs)
5018 		seq_puts(m, "\n  variable reference fields:\n");
5019 
5020 	for (i = 0; i < hist_data->n_var_refs; i++) {
5021 		seq_printf(m, "\n    hist_data->var_refs[%d]:\n", i);
5022 		ret = hist_field_debug_show(m, hist_data->var_refs[i],
5023 					    HIST_FIELD_FL_VAR_REF);
5024 		if (ret)
5025 			return;
5026 	}
5027 
5028 	if (hist_data->n_field_vars)
5029 		seq_puts(m, "\n  field variables:\n");
5030 
5031 	for (i = 0; i < hist_data->n_field_vars; i++) {
5032 		ret = field_var_debug_show(m, hist_data->field_vars[i], i, false);
5033 		if (ret)
5034 			return;
5035 	}
5036 
5037 	ret = hist_actions_debug_show(m, hist_data);
5038 	if (ret)
5039 		return;
5040 }
5041 
hist_debug_show(struct seq_file * m,void * v)5042 static int hist_debug_show(struct seq_file *m, void *v)
5043 {
5044 	struct event_trigger_data *data;
5045 	struct trace_event_file *event_file;
5046 	int n = 0, ret = 0;
5047 
5048 	mutex_lock(&event_mutex);
5049 
5050 	event_file = event_file_data(m->private);
5051 	if (unlikely(!event_file)) {
5052 		ret = -ENODEV;
5053 		goto out_unlock;
5054 	}
5055 
5056 	list_for_each_entry(data, &event_file->triggers, list) {
5057 		if (data->cmd_ops->trigger_type == ETT_EVENT_HIST)
5058 			hist_trigger_debug_show(m, data, n++);
5059 	}
5060 
5061  out_unlock:
5062 	mutex_unlock(&event_mutex);
5063 
5064 	return ret;
5065 }
5066 
event_hist_debug_open(struct inode * inode,struct file * file)5067 static int event_hist_debug_open(struct inode *inode, struct file *file)
5068 {
5069 	int ret;
5070 
5071 	ret = security_locked_down(LOCKDOWN_TRACEFS);
5072 	if (ret)
5073 		return ret;
5074 
5075 	return single_open(file, hist_debug_show, file);
5076 }
5077 
5078 const struct file_operations event_hist_debug_fops = {
5079 	.open = event_hist_debug_open,
5080 	.read = seq_read,
5081 	.llseek = seq_lseek,
5082 	.release = single_release,
5083 };
5084 #endif
5085 
hist_field_print(struct seq_file * m,struct hist_field * hist_field)5086 static void hist_field_print(struct seq_file *m, struct hist_field *hist_field)
5087 {
5088 	const char *field_name = hist_field_name(hist_field, 0);
5089 
5090 	if (hist_field->var.name)
5091 		seq_printf(m, "%s=", hist_field->var.name);
5092 
5093 	if (hist_field->flags & HIST_FIELD_FL_CPU)
5094 		seq_puts(m, "common_cpu");
5095 	else if (field_name) {
5096 		if (hist_field->flags & HIST_FIELD_FL_VAR_REF ||
5097 		    hist_field->flags & HIST_FIELD_FL_ALIAS)
5098 			seq_putc(m, '$');
5099 		seq_printf(m, "%s", field_name);
5100 	} else if (hist_field->flags & HIST_FIELD_FL_TIMESTAMP)
5101 		seq_puts(m, "common_timestamp");
5102 
5103 	if (hist_field->flags) {
5104 		if (!(hist_field->flags & HIST_FIELD_FL_VAR_REF) &&
5105 		    !(hist_field->flags & HIST_FIELD_FL_EXPR)) {
5106 			const char *flags = get_hist_field_flags(hist_field);
5107 
5108 			if (flags)
5109 				seq_printf(m, ".%s", flags);
5110 		}
5111 	}
5112 }
5113 
event_hist_trigger_print(struct seq_file * m,struct event_trigger_ops * ops,struct event_trigger_data * data)5114 static int event_hist_trigger_print(struct seq_file *m,
5115 				    struct event_trigger_ops *ops,
5116 				    struct event_trigger_data *data)
5117 {
5118 	struct hist_trigger_data *hist_data = data->private_data;
5119 	struct hist_field *field;
5120 	bool have_var = false;
5121 	unsigned int i;
5122 
5123 	seq_puts(m, "hist:");
5124 
5125 	if (data->name)
5126 		seq_printf(m, "%s:", data->name);
5127 
5128 	seq_puts(m, "keys=");
5129 
5130 	for_each_hist_key_field(i, hist_data) {
5131 		field = hist_data->fields[i];
5132 
5133 		if (i > hist_data->n_vals)
5134 			seq_puts(m, ",");
5135 
5136 		if (field->flags & HIST_FIELD_FL_STACKTRACE)
5137 			seq_puts(m, "stacktrace");
5138 		else
5139 			hist_field_print(m, field);
5140 	}
5141 
5142 	seq_puts(m, ":vals=");
5143 
5144 	for_each_hist_val_field(i, hist_data) {
5145 		field = hist_data->fields[i];
5146 		if (field->flags & HIST_FIELD_FL_VAR) {
5147 			have_var = true;
5148 			continue;
5149 		}
5150 
5151 		if (i == HITCOUNT_IDX)
5152 			seq_puts(m, "hitcount");
5153 		else {
5154 			seq_puts(m, ",");
5155 			hist_field_print(m, field);
5156 		}
5157 	}
5158 
5159 	if (have_var) {
5160 		unsigned int n = 0;
5161 
5162 		seq_puts(m, ":");
5163 
5164 		for_each_hist_val_field(i, hist_data) {
5165 			field = hist_data->fields[i];
5166 
5167 			if (field->flags & HIST_FIELD_FL_VAR) {
5168 				if (n++)
5169 					seq_puts(m, ",");
5170 				hist_field_print(m, field);
5171 			}
5172 		}
5173 	}
5174 
5175 	seq_puts(m, ":sort=");
5176 
5177 	for (i = 0; i < hist_data->n_sort_keys; i++) {
5178 		struct tracing_map_sort_key *sort_key;
5179 		unsigned int idx, first_key_idx;
5180 
5181 		/* skip VAR vals */
5182 		first_key_idx = hist_data->n_vals - hist_data->n_vars;
5183 
5184 		sort_key = &hist_data->sort_keys[i];
5185 		idx = sort_key->field_idx;
5186 
5187 		if (WARN_ON(idx >= HIST_FIELDS_MAX))
5188 			return -EINVAL;
5189 
5190 		if (i > 0)
5191 			seq_puts(m, ",");
5192 
5193 		if (idx == HITCOUNT_IDX)
5194 			seq_puts(m, "hitcount");
5195 		else {
5196 			if (idx >= first_key_idx)
5197 				idx += hist_data->n_vars;
5198 			hist_field_print(m, hist_data->fields[idx]);
5199 		}
5200 
5201 		if (sort_key->descending)
5202 			seq_puts(m, ".descending");
5203 	}
5204 	seq_printf(m, ":size=%u", (1 << hist_data->map->map_bits));
5205 	if (hist_data->enable_timestamps)
5206 		seq_printf(m, ":clock=%s", hist_data->attrs->clock);
5207 
5208 	print_actions_spec(m, hist_data);
5209 
5210 	if (data->filter_str)
5211 		seq_printf(m, " if %s", data->filter_str);
5212 
5213 	if (data->paused)
5214 		seq_puts(m, " [paused]");
5215 	else
5216 		seq_puts(m, " [active]");
5217 
5218 	seq_putc(m, '\n');
5219 
5220 	return 0;
5221 }
5222 
event_hist_trigger_init(struct event_trigger_ops * ops,struct event_trigger_data * data)5223 static int event_hist_trigger_init(struct event_trigger_ops *ops,
5224 				   struct event_trigger_data *data)
5225 {
5226 	struct hist_trigger_data *hist_data = data->private_data;
5227 
5228 	if (!data->ref && hist_data->attrs->name)
5229 		save_named_trigger(hist_data->attrs->name, data);
5230 
5231 	data->ref++;
5232 
5233 	return 0;
5234 }
5235 
unregister_field_var_hists(struct hist_trigger_data * hist_data)5236 static void unregister_field_var_hists(struct hist_trigger_data *hist_data)
5237 {
5238 	struct trace_event_file *file;
5239 	unsigned int i;
5240 	char *cmd;
5241 	int ret;
5242 
5243 	for (i = 0; i < hist_data->n_field_var_hists; i++) {
5244 		file = hist_data->field_var_hists[i]->hist_data->event_file;
5245 		cmd = hist_data->field_var_hists[i]->cmd;
5246 		ret = event_hist_trigger_func(&trigger_hist_cmd, file,
5247 					      "!hist", "hist", cmd);
5248 	}
5249 }
5250 
event_hist_trigger_free(struct event_trigger_ops * ops,struct event_trigger_data * data)5251 static void event_hist_trigger_free(struct event_trigger_ops *ops,
5252 				    struct event_trigger_data *data)
5253 {
5254 	struct hist_trigger_data *hist_data = data->private_data;
5255 
5256 	if (WARN_ON_ONCE(data->ref <= 0))
5257 		return;
5258 
5259 	data->ref--;
5260 	if (!data->ref) {
5261 		if (data->name)
5262 			del_named_trigger(data);
5263 
5264 		trigger_data_free(data);
5265 
5266 		remove_hist_vars(hist_data);
5267 
5268 		unregister_field_var_hists(hist_data);
5269 
5270 		destroy_hist_data(hist_data);
5271 	}
5272 }
5273 
5274 static struct event_trigger_ops event_hist_trigger_ops = {
5275 	.func			= event_hist_trigger,
5276 	.print			= event_hist_trigger_print,
5277 	.init			= event_hist_trigger_init,
5278 	.free			= event_hist_trigger_free,
5279 };
5280 
event_hist_trigger_named_init(struct event_trigger_ops * ops,struct event_trigger_data * data)5281 static int event_hist_trigger_named_init(struct event_trigger_ops *ops,
5282 					 struct event_trigger_data *data)
5283 {
5284 	data->ref++;
5285 
5286 	save_named_trigger(data->named_data->name, data);
5287 
5288 	event_hist_trigger_init(ops, data->named_data);
5289 
5290 	return 0;
5291 }
5292 
event_hist_trigger_named_free(struct event_trigger_ops * ops,struct event_trigger_data * data)5293 static void event_hist_trigger_named_free(struct event_trigger_ops *ops,
5294 					  struct event_trigger_data *data)
5295 {
5296 	if (WARN_ON_ONCE(data->ref <= 0))
5297 		return;
5298 
5299 	event_hist_trigger_free(ops, data->named_data);
5300 
5301 	data->ref--;
5302 	if (!data->ref) {
5303 		del_named_trigger(data);
5304 		trigger_data_free(data);
5305 	}
5306 }
5307 
5308 static struct event_trigger_ops event_hist_trigger_named_ops = {
5309 	.func			= event_hist_trigger,
5310 	.print			= event_hist_trigger_print,
5311 	.init			= event_hist_trigger_named_init,
5312 	.free			= event_hist_trigger_named_free,
5313 };
5314 
event_hist_get_trigger_ops(char * cmd,char * param)5315 static struct event_trigger_ops *event_hist_get_trigger_ops(char *cmd,
5316 							    char *param)
5317 {
5318 	return &event_hist_trigger_ops;
5319 }
5320 
hist_clear(struct event_trigger_data * data)5321 static void hist_clear(struct event_trigger_data *data)
5322 {
5323 	struct hist_trigger_data *hist_data = data->private_data;
5324 
5325 	if (data->name)
5326 		pause_named_trigger(data);
5327 
5328 	tracepoint_synchronize_unregister();
5329 
5330 	tracing_map_clear(hist_data->map);
5331 
5332 	if (data->name)
5333 		unpause_named_trigger(data);
5334 }
5335 
compatible_field(struct ftrace_event_field * field,struct ftrace_event_field * test_field)5336 static bool compatible_field(struct ftrace_event_field *field,
5337 			     struct ftrace_event_field *test_field)
5338 {
5339 	if (field == test_field)
5340 		return true;
5341 	if (field == NULL || test_field == NULL)
5342 		return false;
5343 	if (strcmp(field->name, test_field->name) != 0)
5344 		return false;
5345 	if (strcmp(field->type, test_field->type) != 0)
5346 		return false;
5347 	if (field->size != test_field->size)
5348 		return false;
5349 	if (field->is_signed != test_field->is_signed)
5350 		return false;
5351 
5352 	return true;
5353 }
5354 
hist_trigger_match(struct event_trigger_data * data,struct event_trigger_data * data_test,struct event_trigger_data * named_data,bool ignore_filter)5355 static bool hist_trigger_match(struct event_trigger_data *data,
5356 			       struct event_trigger_data *data_test,
5357 			       struct event_trigger_data *named_data,
5358 			       bool ignore_filter)
5359 {
5360 	struct tracing_map_sort_key *sort_key, *sort_key_test;
5361 	struct hist_trigger_data *hist_data, *hist_data_test;
5362 	struct hist_field *key_field, *key_field_test;
5363 	unsigned int i;
5364 
5365 	if (named_data && (named_data != data_test) &&
5366 	    (named_data != data_test->named_data))
5367 		return false;
5368 
5369 	if (!named_data && is_named_trigger(data_test))
5370 		return false;
5371 
5372 	hist_data = data->private_data;
5373 	hist_data_test = data_test->private_data;
5374 
5375 	if (hist_data->n_vals != hist_data_test->n_vals ||
5376 	    hist_data->n_fields != hist_data_test->n_fields ||
5377 	    hist_data->n_sort_keys != hist_data_test->n_sort_keys)
5378 		return false;
5379 
5380 	if (!ignore_filter) {
5381 		if ((data->filter_str && !data_test->filter_str) ||
5382 		   (!data->filter_str && data_test->filter_str))
5383 			return false;
5384 	}
5385 
5386 	for_each_hist_field(i, hist_data) {
5387 		key_field = hist_data->fields[i];
5388 		key_field_test = hist_data_test->fields[i];
5389 
5390 		if (key_field->flags != key_field_test->flags)
5391 			return false;
5392 		if (!compatible_field(key_field->field, key_field_test->field))
5393 			return false;
5394 		if (key_field->offset != key_field_test->offset)
5395 			return false;
5396 		if (key_field->size != key_field_test->size)
5397 			return false;
5398 		if (key_field->is_signed != key_field_test->is_signed)
5399 			return false;
5400 		if (!!key_field->var.name != !!key_field_test->var.name)
5401 			return false;
5402 		if (key_field->var.name &&
5403 		    strcmp(key_field->var.name, key_field_test->var.name) != 0)
5404 			return false;
5405 	}
5406 
5407 	for (i = 0; i < hist_data->n_sort_keys; i++) {
5408 		sort_key = &hist_data->sort_keys[i];
5409 		sort_key_test = &hist_data_test->sort_keys[i];
5410 
5411 		if (sort_key->field_idx != sort_key_test->field_idx ||
5412 		    sort_key->descending != sort_key_test->descending)
5413 			return false;
5414 	}
5415 
5416 	if (!ignore_filter && data->filter_str &&
5417 	    (strcmp(data->filter_str, data_test->filter_str) != 0))
5418 		return false;
5419 
5420 	if (!actions_match(hist_data, hist_data_test))
5421 		return false;
5422 
5423 	return true;
5424 }
5425 
hist_register_trigger(char * glob,struct event_trigger_ops * ops,struct event_trigger_data * data,struct trace_event_file * file)5426 static int hist_register_trigger(char *glob, struct event_trigger_ops *ops,
5427 				 struct event_trigger_data *data,
5428 				 struct trace_event_file *file)
5429 {
5430 	struct hist_trigger_data *hist_data = data->private_data;
5431 	struct event_trigger_data *test, *named_data = NULL;
5432 	struct trace_array *tr = file->tr;
5433 	int ret = 0;
5434 
5435 	if (hist_data->attrs->name) {
5436 		named_data = find_named_trigger(hist_data->attrs->name);
5437 		if (named_data) {
5438 			if (!hist_trigger_match(data, named_data, named_data,
5439 						true)) {
5440 				hist_err(tr, HIST_ERR_NAMED_MISMATCH, errpos(hist_data->attrs->name));
5441 				ret = -EINVAL;
5442 				goto out;
5443 			}
5444 		}
5445 	}
5446 
5447 	if (hist_data->attrs->name && !named_data)
5448 		goto new;
5449 
5450 	lockdep_assert_held(&event_mutex);
5451 
5452 	list_for_each_entry(test, &file->triggers, list) {
5453 		if (test->cmd_ops->trigger_type == ETT_EVENT_HIST) {
5454 			if (!hist_trigger_match(data, test, named_data, false))
5455 				continue;
5456 			if (hist_data->attrs->pause)
5457 				test->paused = true;
5458 			else if (hist_data->attrs->cont)
5459 				test->paused = false;
5460 			else if (hist_data->attrs->clear)
5461 				hist_clear(test);
5462 			else {
5463 				hist_err(tr, HIST_ERR_TRIGGER_EEXIST, 0);
5464 				ret = -EEXIST;
5465 			}
5466 			goto out;
5467 		}
5468 	}
5469  new:
5470 	if (hist_data->attrs->cont || hist_data->attrs->clear) {
5471 		hist_err(tr, HIST_ERR_TRIGGER_ENOENT_CLEAR, 0);
5472 		ret = -ENOENT;
5473 		goto out;
5474 	}
5475 
5476 	if (hist_data->attrs->pause)
5477 		data->paused = true;
5478 
5479 	if (named_data) {
5480 		data->private_data = named_data->private_data;
5481 		set_named_trigger_data(data, named_data);
5482 		data->ops = &event_hist_trigger_named_ops;
5483 	}
5484 
5485 	if (data->ops->init) {
5486 		ret = data->ops->init(data->ops, data);
5487 		if (ret < 0)
5488 			goto out;
5489 	}
5490 
5491 	if (hist_data->enable_timestamps) {
5492 		char *clock = hist_data->attrs->clock;
5493 
5494 		ret = tracing_set_clock(file->tr, hist_data->attrs->clock);
5495 		if (ret) {
5496 			hist_err(tr, HIST_ERR_SET_CLOCK_FAIL, errpos(clock));
5497 			goto out;
5498 		}
5499 
5500 		tracing_set_time_stamp_abs(file->tr, true);
5501 	}
5502 
5503 	if (named_data)
5504 		destroy_hist_data(hist_data);
5505 
5506 	ret++;
5507  out:
5508 	return ret;
5509 }
5510 
hist_trigger_enable(struct event_trigger_data * data,struct trace_event_file * file)5511 static int hist_trigger_enable(struct event_trigger_data *data,
5512 			       struct trace_event_file *file)
5513 {
5514 	int ret = 0;
5515 
5516 	list_add_tail_rcu(&data->list, &file->triggers);
5517 
5518 	update_cond_flag(file);
5519 
5520 	if (trace_event_trigger_enable_disable(file, 1) < 0) {
5521 		list_del_rcu(&data->list);
5522 		update_cond_flag(file);
5523 		ret--;
5524 	}
5525 
5526 	return ret;
5527 }
5528 
have_hist_trigger_match(struct event_trigger_data * data,struct trace_event_file * file)5529 static bool have_hist_trigger_match(struct event_trigger_data *data,
5530 				    struct trace_event_file *file)
5531 {
5532 	struct hist_trigger_data *hist_data = data->private_data;
5533 	struct event_trigger_data *test, *named_data = NULL;
5534 	bool match = false;
5535 
5536 	lockdep_assert_held(&event_mutex);
5537 
5538 	if (hist_data->attrs->name)
5539 		named_data = find_named_trigger(hist_data->attrs->name);
5540 
5541 	list_for_each_entry(test, &file->triggers, list) {
5542 		if (test->cmd_ops->trigger_type == ETT_EVENT_HIST) {
5543 			if (hist_trigger_match(data, test, named_data, false)) {
5544 				match = true;
5545 				break;
5546 			}
5547 		}
5548 	}
5549 
5550 	return match;
5551 }
5552 
hist_trigger_check_refs(struct event_trigger_data * data,struct trace_event_file * file)5553 static bool hist_trigger_check_refs(struct event_trigger_data *data,
5554 				    struct trace_event_file *file)
5555 {
5556 	struct hist_trigger_data *hist_data = data->private_data;
5557 	struct event_trigger_data *test, *named_data = NULL;
5558 
5559 	lockdep_assert_held(&event_mutex);
5560 
5561 	if (hist_data->attrs->name)
5562 		named_data = find_named_trigger(hist_data->attrs->name);
5563 
5564 	list_for_each_entry(test, &file->triggers, list) {
5565 		if (test->cmd_ops->trigger_type == ETT_EVENT_HIST) {
5566 			if (!hist_trigger_match(data, test, named_data, false))
5567 				continue;
5568 			hist_data = test->private_data;
5569 			if (check_var_refs(hist_data))
5570 				return true;
5571 			break;
5572 		}
5573 	}
5574 
5575 	return false;
5576 }
5577 
hist_unregister_trigger(char * glob,struct event_trigger_ops * ops,struct event_trigger_data * data,struct trace_event_file * file)5578 static void hist_unregister_trigger(char *glob, struct event_trigger_ops *ops,
5579 				    struct event_trigger_data *data,
5580 				    struct trace_event_file *file)
5581 {
5582 	struct hist_trigger_data *hist_data = data->private_data;
5583 	struct event_trigger_data *test, *named_data = NULL;
5584 	bool unregistered = false;
5585 
5586 	lockdep_assert_held(&event_mutex);
5587 
5588 	if (hist_data->attrs->name)
5589 		named_data = find_named_trigger(hist_data->attrs->name);
5590 
5591 	list_for_each_entry(test, &file->triggers, list) {
5592 		if (test->cmd_ops->trigger_type == ETT_EVENT_HIST) {
5593 			if (!hist_trigger_match(data, test, named_data, false))
5594 				continue;
5595 			unregistered = true;
5596 			list_del_rcu(&test->list);
5597 			trace_event_trigger_enable_disable(file, 0);
5598 			update_cond_flag(file);
5599 			break;
5600 		}
5601 	}
5602 
5603 	if (unregistered && test->ops->free)
5604 		test->ops->free(test->ops, test);
5605 
5606 	if (hist_data->enable_timestamps) {
5607 		if (!hist_data->remove || unregistered)
5608 			tracing_set_time_stamp_abs(file->tr, false);
5609 	}
5610 }
5611 
hist_file_check_refs(struct trace_event_file * file)5612 static bool hist_file_check_refs(struct trace_event_file *file)
5613 {
5614 	struct hist_trigger_data *hist_data;
5615 	struct event_trigger_data *test;
5616 
5617 	lockdep_assert_held(&event_mutex);
5618 
5619 	list_for_each_entry(test, &file->triggers, list) {
5620 		if (test->cmd_ops->trigger_type == ETT_EVENT_HIST) {
5621 			hist_data = test->private_data;
5622 			if (check_var_refs(hist_data))
5623 				return true;
5624 		}
5625 	}
5626 
5627 	return false;
5628 }
5629 
hist_unreg_all(struct trace_event_file * file)5630 static void hist_unreg_all(struct trace_event_file *file)
5631 {
5632 	struct event_trigger_data *test, *n;
5633 	struct hist_trigger_data *hist_data;
5634 	struct synth_event *se;
5635 	const char *se_name;
5636 
5637 	lockdep_assert_held(&event_mutex);
5638 
5639 	if (hist_file_check_refs(file))
5640 		return;
5641 
5642 	list_for_each_entry_safe(test, n, &file->triggers, list) {
5643 		if (test->cmd_ops->trigger_type == ETT_EVENT_HIST) {
5644 			hist_data = test->private_data;
5645 			list_del_rcu(&test->list);
5646 			trace_event_trigger_enable_disable(file, 0);
5647 
5648 			se_name = trace_event_name(file->event_call);
5649 			se = find_synth_event(se_name);
5650 			if (se)
5651 				se->ref--;
5652 
5653 			update_cond_flag(file);
5654 			if (hist_data->enable_timestamps)
5655 				tracing_set_time_stamp_abs(file->tr, false);
5656 			if (test->ops->free)
5657 				test->ops->free(test->ops, test);
5658 		}
5659 	}
5660 }
5661 
event_hist_trigger_func(struct event_command * cmd_ops,struct trace_event_file * file,char * glob,char * cmd,char * param)5662 static int event_hist_trigger_func(struct event_command *cmd_ops,
5663 				   struct trace_event_file *file,
5664 				   char *glob, char *cmd, char *param)
5665 {
5666 	unsigned int hist_trigger_bits = TRACING_MAP_BITS_DEFAULT;
5667 	struct event_trigger_data *trigger_data;
5668 	struct hist_trigger_attrs *attrs;
5669 	struct event_trigger_ops *trigger_ops;
5670 	struct hist_trigger_data *hist_data;
5671 	struct synth_event *se;
5672 	const char *se_name;
5673 	bool remove = false;
5674 	char *trigger, *p;
5675 	int ret = 0;
5676 
5677 	lockdep_assert_held(&event_mutex);
5678 
5679 	if (glob && strlen(glob)) {
5680 		hist_err_clear();
5681 		last_cmd_set(file, param);
5682 	}
5683 
5684 	if (!param)
5685 		return -EINVAL;
5686 
5687 	if (glob[0] == '!')
5688 		remove = true;
5689 
5690 	/*
5691 	 * separate the trigger from the filter (k:v [if filter])
5692 	 * allowing for whitespace in the trigger
5693 	 */
5694 	p = trigger = param;
5695 	do {
5696 		p = strstr(p, "if");
5697 		if (!p)
5698 			break;
5699 		if (p == param)
5700 			return -EINVAL;
5701 		if (*(p - 1) != ' ' && *(p - 1) != '\t') {
5702 			p++;
5703 			continue;
5704 		}
5705 		if (p >= param + strlen(param) - (sizeof("if") - 1) - 1)
5706 			return -EINVAL;
5707 		if (*(p + sizeof("if") - 1) != ' ' && *(p + sizeof("if") - 1) != '\t') {
5708 			p++;
5709 			continue;
5710 		}
5711 		break;
5712 	} while (p);
5713 
5714 	if (!p)
5715 		param = NULL;
5716 	else {
5717 		*(p - 1) = '\0';
5718 		param = strstrip(p);
5719 		trigger = strstrip(trigger);
5720 	}
5721 
5722 	attrs = parse_hist_trigger_attrs(file->tr, trigger);
5723 	if (IS_ERR(attrs))
5724 		return PTR_ERR(attrs);
5725 
5726 	if (attrs->map_bits)
5727 		hist_trigger_bits = attrs->map_bits;
5728 
5729 	hist_data = create_hist_data(hist_trigger_bits, attrs, file, remove);
5730 	if (IS_ERR(hist_data)) {
5731 		destroy_hist_trigger_attrs(attrs);
5732 		return PTR_ERR(hist_data);
5733 	}
5734 
5735 	trigger_ops = cmd_ops->get_trigger_ops(cmd, trigger);
5736 
5737 	trigger_data = kzalloc(sizeof(*trigger_data), GFP_KERNEL);
5738 	if (!trigger_data) {
5739 		ret = -ENOMEM;
5740 		goto out_free;
5741 	}
5742 
5743 	trigger_data->count = -1;
5744 	trigger_data->ops = trigger_ops;
5745 	trigger_data->cmd_ops = cmd_ops;
5746 
5747 	INIT_LIST_HEAD(&trigger_data->list);
5748 	RCU_INIT_POINTER(trigger_data->filter, NULL);
5749 
5750 	trigger_data->private_data = hist_data;
5751 
5752 	/* if param is non-empty, it's supposed to be a filter */
5753 	if (param && cmd_ops->set_filter) {
5754 		ret = cmd_ops->set_filter(param, trigger_data, file);
5755 		if (ret < 0)
5756 			goto out_free;
5757 	}
5758 
5759 	if (remove) {
5760 		if (!have_hist_trigger_match(trigger_data, file))
5761 			goto out_free;
5762 
5763 		if (hist_trigger_check_refs(trigger_data, file)) {
5764 			ret = -EBUSY;
5765 			goto out_free;
5766 		}
5767 
5768 		cmd_ops->unreg(glob+1, trigger_ops, trigger_data, file);
5769 		se_name = trace_event_name(file->event_call);
5770 		se = find_synth_event(se_name);
5771 		if (se)
5772 			se->ref--;
5773 		ret = 0;
5774 		goto out_free;
5775 	}
5776 
5777 	ret = cmd_ops->reg(glob, trigger_ops, trigger_data, file);
5778 	/*
5779 	 * The above returns on success the # of triggers registered,
5780 	 * but if it didn't register any it returns zero.  Consider no
5781 	 * triggers registered a failure too.
5782 	 */
5783 	if (!ret) {
5784 		if (!(attrs->pause || attrs->cont || attrs->clear))
5785 			ret = -ENOENT;
5786 		goto out_free;
5787 	} else if (ret < 0)
5788 		goto out_free;
5789 
5790 	if (get_named_trigger_data(trigger_data))
5791 		goto enable;
5792 
5793 	if (has_hist_vars(hist_data))
5794 		save_hist_vars(hist_data);
5795 
5796 	ret = create_actions(hist_data);
5797 	if (ret)
5798 		goto out_unreg;
5799 
5800 	ret = tracing_map_init(hist_data->map);
5801 	if (ret)
5802 		goto out_unreg;
5803 enable:
5804 	ret = hist_trigger_enable(trigger_data, file);
5805 	if (ret)
5806 		goto out_unreg;
5807 
5808 	se_name = trace_event_name(file->event_call);
5809 	se = find_synth_event(se_name);
5810 	if (se)
5811 		se->ref++;
5812 	/* Just return zero, not the number of registered triggers */
5813 	ret = 0;
5814  out:
5815 	if (ret == 0)
5816 		hist_err_clear();
5817 
5818 	return ret;
5819  out_unreg:
5820 	cmd_ops->unreg(glob+1, trigger_ops, trigger_data, file);
5821  out_free:
5822 	if (cmd_ops->set_filter)
5823 		cmd_ops->set_filter(NULL, trigger_data, NULL);
5824 
5825 	remove_hist_vars(hist_data);
5826 
5827 	kfree(trigger_data);
5828 
5829 	destroy_hist_data(hist_data);
5830 	goto out;
5831 }
5832 
5833 static struct event_command trigger_hist_cmd = {
5834 	.name			= "hist",
5835 	.trigger_type		= ETT_EVENT_HIST,
5836 	.flags			= EVENT_CMD_FL_NEEDS_REC,
5837 	.func			= event_hist_trigger_func,
5838 	.reg			= hist_register_trigger,
5839 	.unreg			= hist_unregister_trigger,
5840 	.unreg_all		= hist_unreg_all,
5841 	.get_trigger_ops	= event_hist_get_trigger_ops,
5842 	.set_filter		= set_trigger_filter,
5843 };
5844 
register_trigger_hist_cmd(void)5845 __init int register_trigger_hist_cmd(void)
5846 {
5847 	int ret;
5848 
5849 	ret = register_event_command(&trigger_hist_cmd);
5850 	WARN_ON(ret < 0);
5851 
5852 	return ret;
5853 }
5854 
5855 static void
hist_enable_trigger(struct event_trigger_data * data,void * rec,struct ring_buffer_event * event)5856 hist_enable_trigger(struct event_trigger_data *data, void *rec,
5857 		    struct ring_buffer_event *event)
5858 {
5859 	struct enable_trigger_data *enable_data = data->private_data;
5860 	struct event_trigger_data *test;
5861 
5862 	list_for_each_entry_rcu(test, &enable_data->file->triggers, list,
5863 				lockdep_is_held(&event_mutex)) {
5864 		if (test->cmd_ops->trigger_type == ETT_EVENT_HIST) {
5865 			if (enable_data->enable)
5866 				test->paused = false;
5867 			else
5868 				test->paused = true;
5869 		}
5870 	}
5871 }
5872 
5873 static void
hist_enable_count_trigger(struct event_trigger_data * data,void * rec,struct ring_buffer_event * event)5874 hist_enable_count_trigger(struct event_trigger_data *data, void *rec,
5875 			  struct ring_buffer_event *event)
5876 {
5877 	if (!data->count)
5878 		return;
5879 
5880 	if (data->count != -1)
5881 		(data->count)--;
5882 
5883 	hist_enable_trigger(data, rec, event);
5884 }
5885 
5886 static struct event_trigger_ops hist_enable_trigger_ops = {
5887 	.func			= hist_enable_trigger,
5888 	.print			= event_enable_trigger_print,
5889 	.init			= event_trigger_init,
5890 	.free			= event_enable_trigger_free,
5891 };
5892 
5893 static struct event_trigger_ops hist_enable_count_trigger_ops = {
5894 	.func			= hist_enable_count_trigger,
5895 	.print			= event_enable_trigger_print,
5896 	.init			= event_trigger_init,
5897 	.free			= event_enable_trigger_free,
5898 };
5899 
5900 static struct event_trigger_ops hist_disable_trigger_ops = {
5901 	.func			= hist_enable_trigger,
5902 	.print			= event_enable_trigger_print,
5903 	.init			= event_trigger_init,
5904 	.free			= event_enable_trigger_free,
5905 };
5906 
5907 static struct event_trigger_ops hist_disable_count_trigger_ops = {
5908 	.func			= hist_enable_count_trigger,
5909 	.print			= event_enable_trigger_print,
5910 	.init			= event_trigger_init,
5911 	.free			= event_enable_trigger_free,
5912 };
5913 
5914 static struct event_trigger_ops *
hist_enable_get_trigger_ops(char * cmd,char * param)5915 hist_enable_get_trigger_ops(char *cmd, char *param)
5916 {
5917 	struct event_trigger_ops *ops;
5918 	bool enable;
5919 
5920 	enable = (strcmp(cmd, ENABLE_HIST_STR) == 0);
5921 
5922 	if (enable)
5923 		ops = param ? &hist_enable_count_trigger_ops :
5924 			&hist_enable_trigger_ops;
5925 	else
5926 		ops = param ? &hist_disable_count_trigger_ops :
5927 			&hist_disable_trigger_ops;
5928 
5929 	return ops;
5930 }
5931 
hist_enable_unreg_all(struct trace_event_file * file)5932 static void hist_enable_unreg_all(struct trace_event_file *file)
5933 {
5934 	struct event_trigger_data *test, *n;
5935 
5936 	list_for_each_entry_safe(test, n, &file->triggers, list) {
5937 		if (test->cmd_ops->trigger_type == ETT_HIST_ENABLE) {
5938 			list_del_rcu(&test->list);
5939 			update_cond_flag(file);
5940 			trace_event_trigger_enable_disable(file, 0);
5941 			if (test->ops->free)
5942 				test->ops->free(test->ops, test);
5943 		}
5944 	}
5945 }
5946 
5947 static struct event_command trigger_hist_enable_cmd = {
5948 	.name			= ENABLE_HIST_STR,
5949 	.trigger_type		= ETT_HIST_ENABLE,
5950 	.func			= event_enable_trigger_func,
5951 	.reg			= event_enable_register_trigger,
5952 	.unreg			= event_enable_unregister_trigger,
5953 	.unreg_all		= hist_enable_unreg_all,
5954 	.get_trigger_ops	= hist_enable_get_trigger_ops,
5955 	.set_filter		= set_trigger_filter,
5956 };
5957 
5958 static struct event_command trigger_hist_disable_cmd = {
5959 	.name			= DISABLE_HIST_STR,
5960 	.trigger_type		= ETT_HIST_ENABLE,
5961 	.func			= event_enable_trigger_func,
5962 	.reg			= event_enable_register_trigger,
5963 	.unreg			= event_enable_unregister_trigger,
5964 	.unreg_all		= hist_enable_unreg_all,
5965 	.get_trigger_ops	= hist_enable_get_trigger_ops,
5966 	.set_filter		= set_trigger_filter,
5967 };
5968 
unregister_trigger_hist_enable_disable_cmds(void)5969 static __init void unregister_trigger_hist_enable_disable_cmds(void)
5970 {
5971 	unregister_event_command(&trigger_hist_enable_cmd);
5972 	unregister_event_command(&trigger_hist_disable_cmd);
5973 }
5974 
register_trigger_hist_enable_disable_cmds(void)5975 __init int register_trigger_hist_enable_disable_cmds(void)
5976 {
5977 	int ret;
5978 
5979 	ret = register_event_command(&trigger_hist_enable_cmd);
5980 	if (WARN_ON(ret < 0))
5981 		return ret;
5982 	ret = register_event_command(&trigger_hist_disable_cmd);
5983 	if (WARN_ON(ret < 0))
5984 		unregister_trigger_hist_enable_disable_cmds();
5985 
5986 	return ret;
5987 }
5988