diff options
Diffstat (limited to 'tools/perf/util/scripting-engines/trace-event-perl.c')
-rw-r--r-- | tools/perf/util/scripting-engines/trace-event-perl.c | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/tools/perf/util/scripting-engines/trace-event-perl.c b/tools/perf/util/scripting-engines/trace-event-perl.c index 1bb0b0c685b7..5d6a55183ad6 100644 --- a/tools/perf/util/scripting-engines/trace-event-perl.c +++ b/tools/perf/util/scripting-engines/trace-event-perl.c | |||
@@ -388,9 +388,9 @@ static void perl_process_tracepoint(struct perf_sample *sample, | |||
388 | /* common fields other than pid can be accessed via xsub fns */ | 388 | /* common fields other than pid can be accessed via xsub fns */ |
389 | 389 | ||
390 | for (field = event->format.fields; field; field = field->next) { | 390 | for (field = event->format.fields; field; field = field->next) { |
391 | if (field->flags & FIELD_IS_STRING) { | 391 | if (field->flags & TEP_FIELD_IS_STRING) { |
392 | int offset; | 392 | int offset; |
393 | if (field->flags & FIELD_IS_DYNAMIC) { | 393 | if (field->flags & TEP_FIELD_IS_DYNAMIC) { |
394 | offset = *(int *)(data + field->offset); | 394 | offset = *(int *)(data + field->offset); |
395 | offset &= 0xffff; | 395 | offset &= 0xffff; |
396 | } else | 396 | } else |
@@ -399,7 +399,7 @@ static void perl_process_tracepoint(struct perf_sample *sample, | |||
399 | } else { /* FIELD_IS_NUMERIC */ | 399 | } else { /* FIELD_IS_NUMERIC */ |
400 | val = read_size(event, data + field->offset, | 400 | val = read_size(event, data + field->offset, |
401 | field->size); | 401 | field->size); |
402 | if (field->flags & FIELD_IS_SIGNED) { | 402 | if (field->flags & TEP_FIELD_IS_SIGNED) { |
403 | XPUSHs(sv_2mortal(newSViv(val))); | 403 | XPUSHs(sv_2mortal(newSViv(val))); |
404 | } else { | 404 | } else { |
405 | XPUSHs(sv_2mortal(newSVuv(val))); | 405 | XPUSHs(sv_2mortal(newSVuv(val))); |
@@ -646,11 +646,11 @@ sub print_backtrace\n\ | |||
646 | count++; | 646 | count++; |
647 | 647 | ||
648 | fprintf(ofp, "%s=", f->name); | 648 | fprintf(ofp, "%s=", f->name); |
649 | if (f->flags & FIELD_IS_STRING || | 649 | if (f->flags & TEP_FIELD_IS_STRING || |
650 | f->flags & FIELD_IS_FLAG || | 650 | f->flags & TEP_FIELD_IS_FLAG || |
651 | f->flags & FIELD_IS_SYMBOLIC) | 651 | f->flags & TEP_FIELD_IS_SYMBOLIC) |
652 | fprintf(ofp, "%%s"); | 652 | fprintf(ofp, "%%s"); |
653 | else if (f->flags & FIELD_IS_SIGNED) | 653 | else if (f->flags & TEP_FIELD_IS_SIGNED) |
654 | fprintf(ofp, "%%d"); | 654 | fprintf(ofp, "%%d"); |
655 | else | 655 | else |
656 | fprintf(ofp, "%%u"); | 656 | fprintf(ofp, "%%u"); |
@@ -668,7 +668,7 @@ sub print_backtrace\n\ | |||
668 | if (++count % 5 == 0) | 668 | if (++count % 5 == 0) |
669 | fprintf(ofp, "\n\t "); | 669 | fprintf(ofp, "\n\t "); |
670 | 670 | ||
671 | if (f->flags & FIELD_IS_FLAG) { | 671 | if (f->flags & TEP_FIELD_IS_FLAG) { |
672 | if ((count - 1) % 5 != 0) { | 672 | if ((count - 1) % 5 != 0) { |
673 | fprintf(ofp, "\n\t "); | 673 | fprintf(ofp, "\n\t "); |
674 | count = 4; | 674 | count = 4; |
@@ -678,7 +678,7 @@ sub print_backtrace\n\ | |||
678 | event->name); | 678 | event->name); |
679 | fprintf(ofp, "\"%s\", $%s)", f->name, | 679 | fprintf(ofp, "\"%s\", $%s)", f->name, |
680 | f->name); | 680 | f->name); |
681 | } else if (f->flags & FIELD_IS_SYMBOLIC) { | 681 | } else if (f->flags & TEP_FIELD_IS_SYMBOLIC) { |
682 | if ((count - 1) % 5 != 0) { | 682 | if ((count - 1) % 5 != 0) { |
683 | fprintf(ofp, "\n\t "); | 683 | fprintf(ofp, "\n\t "); |
684 | count = 4; | 684 | count = 4; |