Lines Matching full:e
15 static struct expr *expr_eliminate_yn(struct expr *e);
19 struct expr *e = xcalloc(1, sizeof(*e)); in expr_alloc_symbol() local
20 e->type = E_SYMBOL; in expr_alloc_symbol()
21 e->left.sym = sym; in expr_alloc_symbol()
22 return e; in expr_alloc_symbol()
27 struct expr *e = xcalloc(1, sizeof(*e)); in expr_alloc_one() local
28 e->type = type; in expr_alloc_one()
29 e->left.expr = ce; in expr_alloc_one()
30 return e; in expr_alloc_one()
35 struct expr *e = xcalloc(1, sizeof(*e)); in expr_alloc_two() local
36 e->type = type; in expr_alloc_two()
37 e->left.expr = e1; in expr_alloc_two()
38 e->right.expr = e2; in expr_alloc_two()
39 return e; in expr_alloc_two()
44 struct expr *e = xcalloc(1, sizeof(*e)); in expr_alloc_comp() local
45 e->type = type; in expr_alloc_comp()
46 e->left.sym = s1; in expr_alloc_comp()
47 e->right.sym = s2; in expr_alloc_comp()
48 return e; in expr_alloc_comp()
67 struct expr *e; in expr_copy() local
72 e = xmalloc(sizeof(*org)); in expr_copy()
73 memcpy(e, org, sizeof(*org)); in expr_copy()
76 e->left = org->left; in expr_copy()
79 e->left.expr = expr_copy(org->left.expr); in expr_copy()
87 e->left.sym = org->left.sym; in expr_copy()
88 e->right.sym = org->right.sym; in expr_copy()
93 e->left.expr = expr_copy(org->left.expr); in expr_copy()
94 e->right.expr = expr_copy(org->right.expr); in expr_copy()
97 fprintf(stderr, "can't copy type %d\n", e->type); in expr_copy()
98 free(e); in expr_copy()
99 e = NULL; in expr_copy()
103 return e; in expr_copy()
106 void expr_free(struct expr *e) in expr_free() argument
108 if (!e) in expr_free()
111 switch (e->type) { in expr_free()
115 expr_free(e->left.expr); in expr_free()
126 expr_free(e->left.expr); in expr_free()
127 expr_free(e->right.expr); in expr_free()
130 fprintf(stderr, "how to free type %d?\n", e->type); in expr_free()
133 free(e); in expr_free()
315 static struct expr *expr_eliminate_yn(struct expr *e) in expr_eliminate_yn() argument
319 if (e) switch (e->type) { in expr_eliminate_yn()
321 e->left.expr = expr_eliminate_yn(e->left.expr); in expr_eliminate_yn()
322 e->right.expr = expr_eliminate_yn(e->right.expr); in expr_eliminate_yn()
323 if (e->left.expr->type == E_SYMBOL) { in expr_eliminate_yn()
324 if (e->left.expr->left.sym == &symbol_no) { in expr_eliminate_yn()
325 expr_free(e->left.expr); in expr_eliminate_yn()
326 expr_free(e->right.expr); in expr_eliminate_yn()
327 e->type = E_SYMBOL; in expr_eliminate_yn()
328 e->left.sym = &symbol_no; in expr_eliminate_yn()
329 e->right.expr = NULL; in expr_eliminate_yn()
330 return e; in expr_eliminate_yn()
331 } else if (e->left.expr->left.sym == &symbol_yes) { in expr_eliminate_yn()
332 free(e->left.expr); in expr_eliminate_yn()
333 tmp = e->right.expr; in expr_eliminate_yn()
334 *e = *(e->right.expr); in expr_eliminate_yn()
336 return e; in expr_eliminate_yn()
339 if (e->right.expr->type == E_SYMBOL) { in expr_eliminate_yn()
340 if (e->right.expr->left.sym == &symbol_no) { in expr_eliminate_yn()
341 expr_free(e->left.expr); in expr_eliminate_yn()
342 expr_free(e->right.expr); in expr_eliminate_yn()
343 e->type = E_SYMBOL; in expr_eliminate_yn()
344 e->left.sym = &symbol_no; in expr_eliminate_yn()
345 e->right.expr = NULL; in expr_eliminate_yn()
346 return e; in expr_eliminate_yn()
347 } else if (e->right.expr->left.sym == &symbol_yes) { in expr_eliminate_yn()
348 free(e->right.expr); in expr_eliminate_yn()
349 tmp = e->left.expr; in expr_eliminate_yn()
350 *e = *(e->left.expr); in expr_eliminate_yn()
352 return e; in expr_eliminate_yn()
357 e->left.expr = expr_eliminate_yn(e->left.expr); in expr_eliminate_yn()
358 e->right.expr = expr_eliminate_yn(e->right.expr); in expr_eliminate_yn()
359 if (e->left.expr->type == E_SYMBOL) { in expr_eliminate_yn()
360 if (e->left.expr->left.sym == &symbol_no) { in expr_eliminate_yn()
361 free(e->left.expr); in expr_eliminate_yn()
362 tmp = e->right.expr; in expr_eliminate_yn()
363 *e = *(e->right.expr); in expr_eliminate_yn()
365 return e; in expr_eliminate_yn()
366 } else if (e->left.expr->left.sym == &symbol_yes) { in expr_eliminate_yn()
367 expr_free(e->left.expr); in expr_eliminate_yn()
368 expr_free(e->right.expr); in expr_eliminate_yn()
369 e->type = E_SYMBOL; in expr_eliminate_yn()
370 e->left.sym = &symbol_yes; in expr_eliminate_yn()
371 e->right.expr = NULL; in expr_eliminate_yn()
372 return e; in expr_eliminate_yn()
375 if (e->right.expr->type == E_SYMBOL) { in expr_eliminate_yn()
376 if (e->right.expr->left.sym == &symbol_no) { in expr_eliminate_yn()
377 free(e->right.expr); in expr_eliminate_yn()
378 tmp = e->left.expr; in expr_eliminate_yn()
379 *e = *(e->left.expr); in expr_eliminate_yn()
381 return e; in expr_eliminate_yn()
382 } else if (e->right.expr->left.sym == &symbol_yes) { in expr_eliminate_yn()
383 expr_free(e->left.expr); in expr_eliminate_yn()
384 expr_free(e->right.expr); in expr_eliminate_yn()
385 e->type = E_SYMBOL; in expr_eliminate_yn()
386 e->left.sym = &symbol_yes; in expr_eliminate_yn()
387 e->right.expr = NULL; in expr_eliminate_yn()
388 return e; in expr_eliminate_yn()
395 return e; in expr_eliminate_yn()
401 struct expr *expr_trans_bool(struct expr *e) in expr_trans_bool() argument
403 if (!e) in expr_trans_bool()
405 switch (e->type) { in expr_trans_bool()
409 e->left.expr = expr_trans_bool(e->left.expr); in expr_trans_bool()
410 e->right.expr = expr_trans_bool(e->right.expr); in expr_trans_bool()
414 if (e->left.sym->type == S_TRISTATE) { in expr_trans_bool()
415 if (e->right.sym == &symbol_no) { in expr_trans_bool()
416 e->type = E_SYMBOL; in expr_trans_bool()
417 e->right.sym = NULL; in expr_trans_bool()
424 return e; in expr_trans_bool()
653 * Rewrites 'e' in-place to remove ("join") duplicate and other redundant
663 struct expr *expr_eliminate_dups(struct expr *e) in expr_eliminate_dups() argument
666 if (!e) in expr_eliminate_dups()
667 return e; in expr_eliminate_dups()
672 switch (e->type) { in expr_eliminate_dups()
674 expr_eliminate_dups1(e->type, &e, &e); in expr_eliminate_dups()
681 e = expr_eliminate_yn(e); in expr_eliminate_dups()
684 return e; in expr_eliminate_dups()
693 struct expr *expr_transform(struct expr *e) in expr_transform() argument
697 if (!e) in expr_transform()
699 switch (e->type) { in expr_transform()
710 e->left.expr = expr_transform(e->left.expr); in expr_transform()
711 e->right.expr = expr_transform(e->right.expr); in expr_transform()
714 switch (e->type) { in expr_transform()
716 if (e->left.sym->type != S_BOOLEAN) in expr_transform()
718 if (e->right.sym == &symbol_no) { in expr_transform()
719 e->type = E_NOT; in expr_transform()
720 e->left.expr = expr_alloc_symbol(e->left.sym); in expr_transform()
721 e->right.sym = NULL; in expr_transform()
724 if (e->right.sym == &symbol_mod) { in expr_transform()
725 printf("boolean symbol %s tested for 'm'? test forced to 'n'\n", e->left.sym->name); in expr_transform()
726 e->type = E_SYMBOL; in expr_transform()
727 e->left.sym = &symbol_no; in expr_transform()
728 e->right.sym = NULL; in expr_transform()
731 if (e->right.sym == &symbol_yes) { in expr_transform()
732 e->type = E_SYMBOL; in expr_transform()
733 e->right.sym = NULL; in expr_transform()
738 if (e->left.sym->type != S_BOOLEAN) in expr_transform()
740 if (e->right.sym == &symbol_no) { in expr_transform()
741 e->type = E_SYMBOL; in expr_transform()
742 e->right.sym = NULL; in expr_transform()
745 if (e->right.sym == &symbol_mod) { in expr_transform()
746 printf("boolean symbol %s tested for 'm'? test forced to 'y'\n", e->left.sym->name); in expr_transform()
747 e->type = E_SYMBOL; in expr_transform()
748 e->left.sym = &symbol_yes; in expr_transform()
749 e->right.sym = NULL; in expr_transform()
752 if (e->right.sym == &symbol_yes) { in expr_transform()
753 e->type = E_NOT; in expr_transform()
754 e->left.expr = expr_alloc_symbol(e->left.sym); in expr_transform()
755 e->right.sym = NULL; in expr_transform()
760 switch (e->left.expr->type) { in expr_transform()
763 tmp = e->left.expr->left.expr; in expr_transform()
764 free(e->left.expr); in expr_transform()
765 free(e); in expr_transform()
766 e = tmp; in expr_transform()
767 e = expr_transform(e); in expr_transform()
772 tmp = e->left.expr; in expr_transform()
773 free(e); in expr_transform()
774 e = tmp; in expr_transform()
775 e->type = e->type == E_EQUAL ? E_UNEQUAL : E_EQUAL; in expr_transform()
780 tmp = e->left.expr; in expr_transform()
781 free(e); in expr_transform()
782 e = tmp; in expr_transform()
783 e->type = e->type == E_LEQ ? E_GTH : E_LTH; in expr_transform()
788 tmp = e->left.expr; in expr_transform()
789 free(e); in expr_transform()
790 e = tmp; in expr_transform()
791 e->type = e->type == E_LTH ? E_GEQ : E_LEQ; in expr_transform()
795 tmp = e->left.expr; in expr_transform()
796 e->type = E_AND; in expr_transform()
797 e->right.expr = expr_alloc_one(E_NOT, tmp->right.expr); in expr_transform()
800 e = expr_transform(e); in expr_transform()
804 tmp = e->left.expr; in expr_transform()
805 e->type = E_OR; in expr_transform()
806 e->right.expr = expr_alloc_one(E_NOT, tmp->right.expr); in expr_transform()
809 e = expr_transform(e); in expr_transform()
812 if (e->left.expr->left.sym == &symbol_yes) { in expr_transform()
814 tmp = e->left.expr; in expr_transform()
815 free(e); in expr_transform()
816 e = tmp; in expr_transform()
817 e->type = E_SYMBOL; in expr_transform()
818 e->left.sym = &symbol_no; in expr_transform()
821 if (e->left.expr->left.sym == &symbol_mod) { in expr_transform()
823 tmp = e->left.expr; in expr_transform()
824 free(e); in expr_transform()
825 e = tmp; in expr_transform()
826 e->type = E_SYMBOL; in expr_transform()
827 e->left.sym = &symbol_mod; in expr_transform()
830 if (e->left.expr->left.sym == &symbol_no) { in expr_transform()
832 tmp = e->left.expr; in expr_transform()
833 free(e); in expr_transform()
834 e = tmp; in expr_transform()
835 e->type = E_SYMBOL; in expr_transform()
836 e->left.sym = &symbol_yes; in expr_transform()
847 return e; in expr_transform()
909 * expression 'e'.
921 struct expr *expr_trans_compare(struct expr *e, enum expr_type type, struct symbol *sym) in expr_trans_compare() argument
925 if (!e) { in expr_trans_compare()
926 e = expr_alloc_symbol(sym); in expr_trans_compare()
928 e = expr_alloc_one(E_NOT, e); in expr_trans_compare()
929 return e; in expr_trans_compare()
931 switch (e->type) { in expr_trans_compare()
933 e1 = expr_trans_compare(e->left.expr, E_EQUAL, sym); in expr_trans_compare()
934 e2 = expr_trans_compare(e->right.expr, E_EQUAL, sym); in expr_trans_compare()
936 e = expr_alloc_two(E_AND, e1, e2); in expr_trans_compare()
938 e = expr_alloc_two(E_OR, e1, e2); in expr_trans_compare()
940 e = expr_alloc_one(E_NOT, e); in expr_trans_compare()
941 return e; in expr_trans_compare()
943 e1 = expr_trans_compare(e->left.expr, E_EQUAL, sym); in expr_trans_compare()
944 e2 = expr_trans_compare(e->right.expr, E_EQUAL, sym); in expr_trans_compare()
946 e = expr_alloc_two(E_OR, e1, e2); in expr_trans_compare()
948 e = expr_alloc_two(E_AND, e1, e2); in expr_trans_compare()
950 e = expr_alloc_one(E_NOT, e); in expr_trans_compare()
951 return e; in expr_trans_compare()
953 return expr_trans_compare(e->left.expr, type == E_EQUAL ? E_UNEQUAL : E_EQUAL, sym); in expr_trans_compare()
962 return expr_copy(e); in expr_trans_compare()
966 return expr_alloc_one(E_NOT, expr_copy(e)); in expr_trans_compare()
969 return expr_alloc_one(E_NOT, expr_copy(e)); in expr_trans_compare()
973 return expr_copy(e); in expr_trans_compare()
977 return expr_alloc_comp(type, e->left.sym, sym); in expr_trans_compare()
1033 tristate expr_calc_value(struct expr *e) in expr_calc_value() argument
1041 if (!e) in expr_calc_value()
1044 switch (e->type) { in expr_calc_value()
1046 sym_calc_value(e->left.sym); in expr_calc_value()
1047 return e->left.sym->curr.tri; in expr_calc_value()
1049 val1 = expr_calc_value(e->left.expr); in expr_calc_value()
1050 val2 = expr_calc_value(e->right.expr); in expr_calc_value()
1053 val1 = expr_calc_value(e->left.expr); in expr_calc_value()
1054 val2 = expr_calc_value(e->right.expr); in expr_calc_value()
1057 val1 = expr_calc_value(e->left.expr); in expr_calc_value()
1067 printf("expr_calc_value: %d?\n", e->type); in expr_calc_value()
1071 sym_calc_value(e->left.sym); in expr_calc_value()
1072 sym_calc_value(e->right.sym); in expr_calc_value()
1073 str1 = sym_get_string_value(e->left.sym); in expr_calc_value()
1074 str2 = sym_get_string_value(e->right.sym); in expr_calc_value()
1076 if (e->left.sym->type != S_STRING || e->right.sym->type != S_STRING) { in expr_calc_value()
1077 k1 = expr_parse_string(str1, e->left.sym->type, &lval); in expr_calc_value()
1078 k2 = expr_parse_string(str2, e->right.sym->type, &rval); in expr_calc_value()
1084 if (e->type != E_EQUAL && e->type != E_UNEQUAL) { in expr_calc_value()
1094 switch(e->type) { in expr_calc_value()
1108 printf("expr_calc_value: relation %d?\n", e->type); in expr_calc_value()
1147 void expr_print(struct expr *e, in expr_print() argument
1151 if (!e) { in expr_print()
1156 if (expr_compare_type(prevtoken, e->type) > 0) in expr_print()
1158 switch (e->type) { in expr_print()
1160 if (e->left.sym->name) in expr_print()
1161 fn(data, e->left.sym, e->left.sym->name); in expr_print()
1167 expr_print(e->left.expr, fn, data, E_NOT); in expr_print()
1170 if (e->left.sym->name) in expr_print()
1171 fn(data, e->left.sym, e->left.sym->name); in expr_print()
1175 fn(data, e->right.sym, e->right.sym->name); in expr_print()
1179 if (e->left.sym->name) in expr_print()
1180 fn(data, e->left.sym, e->left.sym->name); in expr_print()
1183 fn(data, NULL, e->type == E_LEQ ? "<=" : "<"); in expr_print()
1184 fn(data, e->right.sym, e->right.sym->name); in expr_print()
1188 if (e->left.sym->name) in expr_print()
1189 fn(data, e->left.sym, e->left.sym->name); in expr_print()
1192 fn(data, NULL, e->type == E_GEQ ? ">=" : ">"); in expr_print()
1193 fn(data, e->right.sym, e->right.sym->name); in expr_print()
1196 if (e->left.sym->name) in expr_print()
1197 fn(data, e->left.sym, e->left.sym->name); in expr_print()
1201 fn(data, e->right.sym, e->right.sym->name); in expr_print()
1204 expr_print(e->left.expr, fn, data, E_OR); in expr_print()
1206 expr_print(e->right.expr, fn, data, E_OR); in expr_print()
1209 expr_print(e->left.expr, fn, data, E_AND); in expr_print()
1211 expr_print(e->right.expr, fn, data, E_AND); in expr_print()
1214 fn(data, e->right.sym, e->right.sym->name); in expr_print()
1215 if (e->left.expr) { in expr_print()
1217 expr_print(e->left.expr, fn, data, E_LIST); in expr_print()
1222 fn(data, e->left.sym, e->left.sym->name); in expr_print()
1224 fn(data, e->right.sym, e->right.sym->name); in expr_print()
1230 sprintf(buf, "<unknown type %d>", e->type); in expr_print()
1235 if (expr_compare_type(prevtoken, e->type) > 0) in expr_print()
1244 void expr_fprint(struct expr *e, FILE *out) in expr_fprint() argument
1246 expr_print(e, expr_print_file_helper, out, E_NONE); in expr_fprint()
1279 void expr_gstr_print(struct expr *e, struct gstr *gs) in expr_gstr_print() argument
1281 expr_print(e, expr_print_gstr_helper, gs, E_NONE); in expr_gstr_print()
1289 static void expr_print_revdep(struct expr *e, in expr_print_revdep() argument
1293 if (e->type == E_OR) { in expr_print_revdep()
1294 expr_print_revdep(e->left.expr, fn, data, pr_type, title); in expr_print_revdep()
1295 expr_print_revdep(e->right.expr, fn, data, pr_type, title); in expr_print_revdep()
1296 } else if (expr_calc_value(e) == pr_type) { in expr_print_revdep()
1303 expr_print(e, fn, data, E_NONE); in expr_print_revdep()
1308 void expr_gstr_print_revdep(struct expr *e, struct gstr *gs, in expr_gstr_print_revdep() argument
1311 expr_print_revdep(e, expr_print_gstr_helper, gs, pr_type, &title); in expr_gstr_print_revdep()