44 double (*
const *
funcs1)(
void *,
double a);
46 double (*
const *
funcs2)(
void *,
double a,
double b);
87 if (next[0] ==
'd' && next[1] ==
'B') {
91 }
else if (*next >=
'E' && *next <=
'z') {
116 #define IS_IDENTIFIER_CHAR(c) ((c) - '0' <= 9U || (c) - 'a' <= 25U || (c) - 'A' <= 25U || (c) == '_')
118 static int strmatch(
const char *s,
const char *prefix)
121 for (i=0; prefix[i]; i++) {
122 if (prefix[i] != s[i])
return 0;
142 double (*
func2)(
void *, double, double);
175 case e_mod:
return e->
value * (d - floor(d/d2)*d2);
176 case e_max:
return e->
value * (d > d2 ? d : d2);
177 case e_min:
return e->
value * (d < d2 ? d : d2);
178 case e_eq:
return e->
value * (d == d2 ? 1.0 : 0.0);
179 case e_gt:
return e->
value * (d > d2 ? 1.0 : 0.0);
180 case e_gte:
return e->
value * (d >= d2 ? 1.0 : 0.0);
206 char *next = p->
s, *s0 = p->
s;
233 p->
s= strchr(p->
s,
'(');
245 if (p->
s[0] !=
')') {
262 if (p->
s[0] !=
')') {
344 *sign= (*p->
s ==
'+') - (*p->
s ==
'-');
356 if (next != p->
s && next[0] ==
'd' && next[1] ==
'B') {
366 int sign, sign2, ret;
368 if ((ret =
parse_dB(&e0, p, &sign)) < 0)
373 if ((ret =
parse_dB(&e2, p, &sign2)) < 0) {
385 if (e0) e0->
value *= (sign|1);
397 while (p->
s[0]==
'*' || p->
s[0]==
'/') {
421 while (*p->
s ==
'+' || *p->
s ==
'-') {
449 while (*p->
s ==
';') {
494 const char *
const *func1_names,
double (*
const *
funcs1)(
void *,
double),
495 const char *
const *func2_names,
double (*
const *funcs2)(
void *,
double,
double),
496 int log_offset,
void *log_ctx)
552 const char *
const *const_names,
const double *
const_values,
553 const char *
const *func1_names,
double (*
const *
funcs1)(
void *,
double),
554 const char *
const *func2_names,
double (*
const *funcs2)(
void *,
double,
double),
555 void *opaque,
int log_offset,
void *log_ctx)
558 int ret =
av_expr_parse(&e, s, const_names, func1_names,
funcs1, func2_names, funcs2, log_offset, log_ctx);
572 static const double const_values[] = {
578 static const char *
const const_names[] = {
584 int main(
int argc,
char **argv)
588 const char *
const *expr;
589 static const char *
const exprs[] = {
595 "1+(5-2)^(3-1)+1/2+sin(PI)-max(-2.2,-3.1)",
616 "bar + PI + E + 100f*2 + foo",
617 "13k + 12f - foo(1, 2)",
631 "st(0, 1); while(lte(ld(0), 100), st(1, ld(1)+ld(0));st(0, ld(0)+1)); ld(1)",
633 "st(1, 1); st(2, 2); st(0, 1); while(lte(ld(0),10), st(3, ld(1)+ld(2)); st(1, ld(2)); st(2, ld(3)); st(0, ld(0)+1)); ld(3)",
635 "st(0, 1); while(lte(ld(0),100), st(1, ld(1)+ld(0)); st(0, ld(0)+1))",
659 for (expr = exprs; *expr; expr++) {
660 printf(
"Evaluating '%s'\n", *expr);
662 const_names, const_values,
665 printf(
"'%s' -> nan\n\n", *expr);
667 printf(
"'%s' -> %f\n\n", *expr, d);
671 const_names, const_values,
673 printf(
"%f == 12.7\n", d);
675 const_names, const_values,
677 printf(
"%f == 0.931322575\n", d);
679 if (argc > 1 && !strcmp(argv[1],
"-t")) {
680 for (i = 0; i < 1050; i++) {
683 const_names, const_values,