Implement struct scripting_ops::(process_stat|process_stat_interval)
handlers - calling scripting handlers from stat events handlers.

Tested-by: Kan Liang <kan.li...@intel.com>
Link: http://lkml.kernel.org/n/tip-3iu6vmvuur1bntbnh43v3...@git.kernel.org
Signed-off-by: Jiri Olsa <jo...@kernel.org>
---
 tools/perf/builtin-script.c | 33 +++++++++++++++++++++++++++++++++
 1 file changed, 33 insertions(+)

diff --git a/tools/perf/builtin-script.c b/tools/perf/builtin-script.c
index a90bc0b81e70..521e3e0e7625 100644
--- a/tools/perf/builtin-script.c
+++ b/tools/perf/builtin-script.c
@@ -221,6 +221,9 @@ static int perf_evsel__check_attr(struct perf_evsel *evsel,
        struct perf_event_attr *attr = &evsel->attr;
        bool allow_user_set;
 
+       if (perf_header__has_feat(&session->header, HEADER_STAT))
+               return 0;
+
        allow_user_set = perf_header__has_feat(&session->header,
                                               HEADER_AUXTRACE);
 
@@ -674,6 +677,18 @@ static void process_event(struct perf_script *script 
__maybe_unused, union perf_
 
 static struct scripting_ops    *scripting_ops;
 
+static void process_stat(struct perf_evsel *counter, u64 time)
+{
+       if (scripting_ops && scripting_ops->process_stat)
+               scripting_ops->process_stat(&stat_config, counter, time);
+}
+
+static void process_stat_interval(u64 time)
+{
+       if (scripting_ops && scripting_ops->process_stat_interval)
+               scripting_ops->process_stat_interval(time);
+}
+
 static void setup_scripting(void)
 {
        setup_perl_scripting();
@@ -1690,6 +1705,22 @@ static void script__setup_sample_type(struct perf_script 
*script)
        }
 }
 
+static int process_stat_round_event(struct perf_tool *tool __maybe_unused,
+                                   union perf_event *event,
+                                   struct perf_session *session)
+{
+       struct stat_round_event *round = &event->stat_round;
+       struct perf_evsel *counter;
+
+       evlist__for_each(session->evlist, counter) {
+               perf_stat_process_counter(&stat_config, counter);
+               process_stat(counter, round->time);
+       }
+
+       process_stat_interval(round->time);
+       return 0;
+}
+
 static int process_stat_config_event(struct perf_tool *tool __maybe_unused,
                                     union perf_event *event,
                                     struct perf_session *session 
__maybe_unused)
@@ -1783,6 +1814,8 @@ int cmd_script(int argc, const char **argv, const char 
*prefix __maybe_unused)
                        .auxtrace_info   = perf_event__process_auxtrace_info,
                        .auxtrace        = perf_event__process_auxtrace,
                        .auxtrace_error  = perf_event__process_auxtrace_error,
+                       .stat            = perf_event__process_stat_event,
+                       .stat_round      = process_stat_round_event,
                        .stat_config     = process_stat_config_event,
                        .thread_map      = process_thread_map_event,
                        .cpu_map         = process_cpu_map_event,
-- 
2.4.3

--
To unsubscribe from this list: send the line "unsubscribe linux-kernel" in
the body of a message to majord...@vger.kernel.org
More majordomo info at  http://vger.kernel.org/majordomo-info.html
Please read the FAQ at  http://www.tux.org/lkml/

Reply via email to