aboutsummaryrefslogtreecommitdiffstats
path: root/tools/perf/util/scripting-engines/trace-event-perl.c
diff options
context:
space:
mode:
authorLen Brown <len.brown@intel.com>2012-06-04 00:35:19 -0400
committerLen Brown <len.brown@intel.com>2012-06-04 00:35:19 -0400
commit7e1bd6e38b1f30860ce25a014c6d6adfb0079f4a (patch)
tree65c5898ba93007d4399150c7a127a670bcfbc30d /tools/perf/util/scripting-engines/trace-event-perl.c
parent301f33fbcf4ced53b3de114846ecece5d6aafeeb (diff)
parentf8f5701bdaf9134b1f90e5044a82c66324d2073f (diff)
Merge branch 'upstream' into bugfix-video
Update bugfix-video branch to 2.5-rc1 so I don't have to again resolve the conflict in these patches vs. upstream. Conflicts: drivers/gpu/drm/gma500/psb_drv.c text conflict: add comment vs delete neighboring line keep just this: /* igd_opregion_init(&dev_priv->opregion_dev); */ /* acpi_video_register(); */ Signed-off-by: Len Brown <len.brown@intel.com>
Diffstat (limited to 'tools/perf/util/scripting-engines/trace-event-perl.c')
-rw-r--r--tools/perf/util/scripting-engines/trace-event-perl.c16
1 files changed, 10 insertions, 6 deletions
diff --git a/tools/perf/util/scripting-engines/trace-event-perl.c b/tools/perf/util/scripting-engines/trace-event-perl.c
index e30749e38a9b..4c1b3d72a1d2 100644
--- a/tools/perf/util/scripting-engines/trace-event-perl.c
+++ b/tools/perf/util/scripting-engines/trace-event-perl.c
@@ -56,7 +56,7 @@ INTERP my_perl;
56#define FTRACE_MAX_EVENT \ 56#define FTRACE_MAX_EVENT \
57 ((1 << (sizeof(unsigned short) * 8)) - 1) 57 ((1 << (sizeof(unsigned short) * 8)) - 1)
58 58
59struct event *events[FTRACE_MAX_EVENT]; 59struct event_format *events[FTRACE_MAX_EVENT];
60 60
61extern struct scripting_context *scripting_context; 61extern struct scripting_context *scripting_context;
62 62
@@ -181,7 +181,7 @@ static void define_flag_field(const char *ev_name,
181 LEAVE; 181 LEAVE;
182} 182}
183 183
184static void define_event_symbols(struct event *event, 184static void define_event_symbols(struct event_format *event,
185 const char *ev_name, 185 const char *ev_name,
186 struct print_arg *args) 186 struct print_arg *args)
187{ 187{
@@ -209,6 +209,8 @@ static void define_event_symbols(struct event *event,
209 define_symbolic_values(args->symbol.symbols, ev_name, 209 define_symbolic_values(args->symbol.symbols, ev_name,
210 cur_field_name); 210 cur_field_name);
211 break; 211 break;
212 case PRINT_BSTRING:
213 case PRINT_DYNAMIC_ARRAY:
212 case PRINT_STRING: 214 case PRINT_STRING:
213 break; 215 break;
214 case PRINT_TYPE: 216 case PRINT_TYPE:
@@ -220,7 +222,9 @@ static void define_event_symbols(struct event *event,
220 define_event_symbols(event, ev_name, args->op.left); 222 define_event_symbols(event, ev_name, args->op.left);
221 define_event_symbols(event, ev_name, args->op.right); 223 define_event_symbols(event, ev_name, args->op.right);
222 break; 224 break;
225 case PRINT_FUNC:
223 default: 226 default:
227 pr_err("Unsupported print arg type\n");
224 /* we should warn... */ 228 /* we should warn... */
225 return; 229 return;
226 } 230 }
@@ -229,10 +233,10 @@ static void define_event_symbols(struct event *event,
229 define_event_symbols(event, ev_name, args->next); 233 define_event_symbols(event, ev_name, args->next);
230} 234}
231 235
232static inline struct event *find_cache_event(int type) 236static inline struct event_format *find_cache_event(int type)
233{ 237{
234 static char ev_name[256]; 238 static char ev_name[256];
235 struct event *event; 239 struct event_format *event;
236 240
237 if (events[type]) 241 if (events[type])
238 return events[type]; 242 return events[type];
@@ -258,7 +262,7 @@ static void perl_process_tracepoint(union perf_event *pevent __unused,
258 static char handler[256]; 262 static char handler[256];
259 unsigned long long val; 263 unsigned long long val;
260 unsigned long s, ns; 264 unsigned long s, ns;
261 struct event *event; 265 struct event_format *event;
262 int type; 266 int type;
263 int pid; 267 int pid;
264 int cpu = sample->cpu; 268 int cpu = sample->cpu;
@@ -446,7 +450,7 @@ static int perl_stop_script(void)
446 450
447static int perl_generate_script(const char *outfile) 451static int perl_generate_script(const char *outfile)
448{ 452{
449 struct event *event = NULL; 453 struct event_format *event = NULL;
450 struct format_field *f; 454 struct format_field *f;
451 char fname[PATH_MAX]; 455 char fname[PATH_MAX];
452 int not_first, count; 456 int not_first, count;