Em Tue, Mar 21, 2017 at 04:14:23PM -0300, Arnaldo Carvalho de Melo escreveu:
> Em Mon, Mar 20, 2017 at 01:17:05PM -0700, Andi Kleen escreveu:
> > From: Andi Kleen <a...@linux.intel.com>
> >
> > Add a simple expression parser good enough to parse JSON relation
> > expressions. The parser is implemented using bison.
>
> Renaming 'foo_expr' to 'foo_json_expr', as 'expr' is _way_ too
> generic...
I retract that, it is used with JSON, but isn't strictly tied to it,
keeping as is, nevermind.
- Arnaldo
> - Arnaldo
>
> > This is just intended as an simple parser for internal usage
> > in the event lists, not the beginning of a "perf scripting language"
> >
> > v2: Use expr__ prefix instead of expr_
> > Support multiple free variables for parser
> > Signed-off-by: Andi Kleen <a...@linux.intel.com>
> > ---
> > tools/perf/tests/Build | 1 +
> > tools/perf/tests/builtin-test.c | 4 +
> > tools/perf/tests/expr.c | 55 +++++++++++++
> > tools/perf/tests/tests.h | 1 +
> > tools/perf/util/Build | 5 ++
> > tools/perf/util/expr.h | 25 ++++++
> > tools/perf/util/expr.y | 173
> > ++++++++++++++++++++++++++++++++++++++++
> > 7 files changed, 264 insertions(+)
> > create mode 100644 tools/perf/tests/expr.c
> > create mode 100644 tools/perf/util/expr.h
> > create mode 100644 tools/perf/util/expr.y
> >
> > diff --git a/tools/perf/tests/Build b/tools/perf/tests/Build
> > index 1cb3d9b540e9..af58ebc243ef 100644
> > --- a/tools/perf/tests/Build
> > +++ b/tools/perf/tests/Build
> > @@ -38,6 +38,7 @@ perf-y += cpumap.o
> > perf-y += stat.o
> > perf-y += event_update.o
> > perf-y += event-times.o
> > +perf-y += expr.o
> > perf-y += backward-ring-buffer.o
> > perf-y += sdt.o
> > perf-y += is_printable_array.o
> > diff --git a/tools/perf/tests/builtin-test.c
> > b/tools/perf/tests/builtin-test.c
> > index 83c4669cbc5b..86822969e8a8 100644
> > --- a/tools/perf/tests/builtin-test.c
> > +++ b/tools/perf/tests/builtin-test.c
> > @@ -44,6 +44,10 @@ static struct test generic_tests[] = {
> > .func = test__parse_events,
> > },
> > {
> > + .desc = "Simple expression parser",
> > + .func = test__expr,
> > + },
> > + {
> > .desc = "PERF_RECORD_* events & perf_sample fields",
> > .func = test__PERF_RECORD,
> > },
> > diff --git a/tools/perf/tests/expr.c b/tools/perf/tests/expr.c
> > new file mode 100644
> > index 000000000000..554695c06c5b
> > --- /dev/null
> > +++ b/tools/perf/tests/expr.c
> > @@ -0,0 +1,55 @@
> > +#include "util/debug.h"
> > +#include "util/expr.h"
> > +#include "tests.h"
> > +
> > +static int test(struct parse_ctx *ctx, const char *e, double val2)
> > +{
> > + double val;
> > +
> > + if (expr__parse(&val, ctx, &e))
> > + TEST_ASSERT_VAL("parse test failed", 0);
> > + TEST_ASSERT_VAL("unexpected value", val == val2);
> > + return 0;
> > +}
> > +
> > +int test__expr(int subtest __maybe_unused)
> > +{
> > + const char *p;
> > + const char **other;
> > + double val;
> > + int ret;
> > + struct parse_ctx ctx;
> > + int num_other;
> > +
> > + expr__ctx_init(&ctx);
> > + expr__add_id(&ctx, "FOO", 1);
> > + expr__add_id(&ctx, "BAR", 2);
> > +
> > + ret = test(&ctx, "1+1", 2);
> > + ret |= test(&ctx, "FOO+BAR", 3);
> > + ret |= test(&ctx, "(BAR/2)%2", 1);
> > + ret |= test(&ctx, "1 - -4", 5);
> > + ret |= test(&ctx, "(FOO-1)*2 + (BAR/2)%2 - -4", 5);
> > +
> > + if (ret)
> > + return ret;
> > +
> > + p = "FOO/0";
> > + ret = expr__parse(&val, &ctx, &p);
> > + TEST_ASSERT_VAL("division by zero", ret == 1);
> > +
> > + p = "BAR/";
> > + ret = expr__parse(&val, &ctx, &p);
> > + TEST_ASSERT_VAL("missing operand", ret == 1);
> > +
> > + TEST_ASSERT_VAL("find other",
> > + expr__find_other("FOO + BAR + BAZ + BOZO", "FOO",
> > &other, &num_other) == 0);
> > + TEST_ASSERT_VAL("find other", num_other == 3);
> > + TEST_ASSERT_VAL("find other", !strcmp(other[0], "BAR"));
> > + TEST_ASSERT_VAL("find other", !strcmp(other[1], "BAZ"));
> > + TEST_ASSERT_VAL("find other", !strcmp(other[2], "BOZO"));
> > + TEST_ASSERT_VAL("find other", other[3] == NULL);
> > + free((void *)other);
> > +
> > + return 0;
> > +}
> > diff --git a/tools/perf/tests/tests.h b/tools/perf/tests/tests.h
> > index 1fa9b9d83aa5..631859629403 100644
> > --- a/tools/perf/tests/tests.h
> > +++ b/tools/perf/tests/tests.h
> > @@ -62,6 +62,7 @@ int test__sample_parsing(int subtest);
> > int test__keep_tracking(int subtest);
> > int test__parse_no_sample_id_all(int subtest);
> > int test__dwarf_unwind(int subtest);
> > +int test__expr(int subtest);
> > int test__hists_filter(int subtest);
> > int test__mmap_thread_lookup(int subtest);
> > int test__thread_mg_share(int subtest);
> > diff --git a/tools/perf/util/Build b/tools/perf/util/Build
> > index fb4f42f1bb38..0b98534a9ea1 100644
> > --- a/tools/perf/util/Build
> > +++ b/tools/perf/util/Build
> > @@ -90,6 +90,7 @@ libperf-y += mem-events.o
> > libperf-y += vsprintf.o
> > libperf-y += drv_configs.o
> > libperf-y += time-utils.o
> > +libperf-y += expr-bison.o
> >
> > libperf-$(CONFIG_LIBBPF) += bpf-loader.o
> > libperf-$(CONFIG_BPF_PROLOGUE) += bpf-prologue.o
> > @@ -142,6 +143,10 @@ $(OUTPUT)util/parse-events-bison.c: util/parse-events.y
> > $(call rule_mkdir)
> > $(Q)$(call echo-cmd,bison)$(BISON) -v util/parse-events.y -d
> > $(PARSER_DEBUG_BISON) -o $@ -p parse_events_
> >
> > +$(OUTPUT)util/expr-bison.c: util/expr.y
> > + $(call rule_mkdir)
> > + $(Q)$(call echo-cmd,bison)$(BISON) -v util/expr.y -d
> > $(PARSER_DEBUG_BISON) -o $@ -p expr__
> > +
> > $(OUTPUT)util/pmu-flex.c: util/pmu.l $(OUTPUT)util/pmu-bison.c
> > $(call rule_mkdir)
> > $(Q)$(call echo-cmd,flex)$(FLEX) -o $@
> > --header-file=$(OUTPUT)util/pmu-flex.h util/pmu.l
> > diff --git a/tools/perf/util/expr.h b/tools/perf/util/expr.h
> > new file mode 100644
> > index 000000000000..9c2760a1a96e
> > --- /dev/null
> > +++ b/tools/perf/util/expr.h
> > @@ -0,0 +1,25 @@
> > +#ifndef PARSE_CTX_H
> > +#define PARSE_CTX_H 1
> > +
> > +#define EXPR_MAX_OTHER 8
> > +#define MAX_PARSE_ID EXPR_MAX_OTHER
> > +
> > +struct parse_id {
> > + const char *name;
> > + double val;
> > +};
> > +
> > +struct parse_ctx {
> > + int num_ids;
> > + struct parse_id ids[MAX_PARSE_ID];
> > +};
> > +
> > +void expr__ctx_init(struct parse_ctx *ctx);
> > +void expr__add_id(struct parse_ctx *ctx, const char *id, double val);
> > +#ifndef IN_EXPR_Y
> > +int expr__parse(double *final_val, struct parse_ctx *ctx, const char **pp);
> > +#endif
> > +int expr__find_other(const char *p, const char *one, const char ***other,
> > + int *num_other);
> > +
> > +#endif
> > diff --git a/tools/perf/util/expr.y b/tools/perf/util/expr.y
> > new file mode 100644
> > index 000000000000..a8daa7a93605
> > --- /dev/null
> > +++ b/tools/perf/util/expr.y
> > @@ -0,0 +1,173 @@
> > +/* Simple expression parser */
> > +%{
> > +#include "util.h"
> > +#include "util/debug.h"
> > +#define IN_EXPR_Y 1
> > +#include "expr.h"
> > +#include <string.h>
> > +
> > +#define MAXIDLEN 256
> > +%}
> > +
> > +%define api.pure full
> > +%parse-param { double *final_val }
> > +%parse-param { struct parse_ctx *ctx }
> > +%parse-param { const char **pp }
> > +%lex-param { const char **pp }
> > +
> > +%union {
> > + double num;
> > + char id[MAXIDLEN+1];
> > +}
> > +
> > +%token <num> NUMBER
> > +%token <id> ID
> > +%left '|'
> > +%left '^'
> > +%left '&'
> > +%left '-' '+'
> > +%left '*' '/' '%'
> > +%left NEG NOT
> > +%type <num> expr
> > +
> > +%{
> > +static int expr__lex(YYSTYPE *res, const char **pp);
> > +
> > +static void expr__error(double *final_val __maybe_unused,
> > + struct parse_ctx *ctx __maybe_unused,
> > + const char **pp __maybe_unused,
> > + const char *s)
> > +{
> > + pr_debug("%s\n", s);
> > +}
> > +
> > +static int lookup_id(struct parse_ctx *ctx, char *id, double *val)
> > +{
> > + int i;
> > +
> > + for (i = 0; i < ctx->num_ids; i++) {
> > + if (!strcasecmp(ctx->ids[i].name, id)) {
> > + *val = ctx->ids[i].val;
> > + return 0;
> > + }
> > + }
> > + return -1;
> > +}
> > +
> > +%}
> > +%%
> > +
> > +all_expr: expr { *final_val = $1; }
> > + ;
> > +
> > +expr: NUMBER
> > + | ID { if (lookup_id(ctx, $1, &$$) < 0) {
> > + pr_debug("%s not found", $1);
> > + YYABORT;
> > + }
> > + }
> > + | expr '+' expr { $$ = $1 + $3; }
> > + | expr '-' expr { $$ = $1 - $3; }
> > + | expr '*' expr { $$ = $1 * $3; }
> > + | expr '/' expr { if ($3 == 0) YYABORT; $$ = $1 / $3; }
> > + | expr '%' expr { if ((long)$3 == 0) YYABORT; $$ = (long)$1 %
> > (long)$3; }
> > + | '-' expr %prec NEG { $$ = -$2; }
> > + | '(' expr ')' { $$ = $2; }
> > + ;
> > +
> > +%%
> > +
> > +static int expr__symbol(YYSTYPE *res, const char *p, const char **pp)
> > +{
> > + char *dst = res->id;
> > + const char *s = p;
> > +
> > + while (isalnum(*p) || *p == '_' || *p == '.') {
> > + if (p - s >= MAXIDLEN)
> > + return -1;
> > + *dst++ = *p++;
> > + }
> > + *dst = 0;
> > + *pp = p;
> > + return ID;
> > +}
> > +
> > +static int expr__lex(YYSTYPE *res, const char **pp)
> > +{
> > + int tok;
> > + const char *s;
> > + const char *p = *pp;
> > +
> > + while (isspace(*p))
> > + p++;
> > + s = p;
> > + switch (*p++) {
> > + case 'a' ... 'z':
> > + case 'A' ... 'Z':
> > + return expr__symbol(res, p - 1, pp);
> > + case '0' ... '9': case '.':
> > + res->num = strtod(s, (char **)&p);
> > + tok = NUMBER;
> > + break;
> > + default:
> > + tok = *s;
> > + break;
> > + }
> > + *pp = p;
> > + return tok;
> > +}
> > +
> > +/* Caller must make sure id is allocated */
> > +void expr__add_id(struct parse_ctx *ctx, const char *name, double val)
> > +{
> > + int idx;
> > + assert(ctx->num_ids < MAX_PARSE_ID);
> > + idx = ctx->num_ids++;
> > + ctx->ids[idx].name = name;
> > + ctx->ids[idx].val = val;
> > +}
> > +
> > +void expr__ctx_init(struct parse_ctx *ctx)
> > +{
> > + ctx->num_ids = 0;
> > +}
> > +
> > +int expr__find_other(const char *p, const char *one, const char ***other,
> > + int *num_otherp)
> > +{
> > + const char *orig = p;
> > + int err = -1;
> > + int num_other;
> > +
> > + *other = malloc((EXPR_MAX_OTHER + 1) * sizeof(char *));
> > + if (!*other)
> > + return -1;
> > +
> > + num_other = 0;
> > + for (;;) {
> > + YYSTYPE val;
> > + int tok = expr__lex(&val, &p);
> > + if (tok == 0) {
> > + err = 0;
> > + break;
> > + }
> > + if (tok == ID && strcasecmp(one, val.id)) {
> > + if (num_other >= EXPR_MAX_OTHER - 1) {
> > + pr_debug("Too many extra events in %s\n", orig);
> > + break;
> > + }
> > + (*other)[num_other] = strdup(val.id);
> > + if (!(*other)[num_other])
> > + return -1;
> > + num_other++;
> > + }
> > + }
> > + (*other)[num_other] = NULL;
> > + *num_otherp = num_other;
> > + if (err) {
> > + *num_otherp = 0;
> > + free(*other);
> > + *other = NULL;
> > + }
> > + return err;
> > +}
> > --
> > 2.9.3
