[RFC v3 06/12] Add files for building constraints

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

 



Co-developed-by: Patrick Franz <deltaone@xxxxxxxxxx>
Signed-off-by: Patrick Franz <deltaone@xxxxxxxxxx>
Co-developed-by: Ibrahim Fayaz <phayax@xxxxxxxxx>
Signed-off-by: Ibrahim Fayaz <phayax@xxxxxxxxx>
Reviewed-by: Luis Chamberlain <mcgrof@xxxxxxxx>
Tested-by: Evgeny Groshev <eugene.groshev@xxxxxxxxx>
Suggested-by: Sarah Nadi <nadi@xxxxxxxxxxx>
Suggested-by: Thorsten Berger <thorsten.berger@xxxxxx>
Signed-off-by: Thorsten Berger <thorsten.berger@xxxxxx>

These files translate the Kconfig-model into propositional logic and store
the constraints for each symbol in the corresponding struct.

---
 scripts/kconfig/cf_constraints.c | 1219 ++++++++++++++++++++++++++++++
 scripts/kconfig/cf_constraints.h |   23 +
 2 files changed, 1242 insertions(+)
 create mode 100644 scripts/kconfig/cf_constraints.c
 create mode 100644 scripts/kconfig/cf_constraints.h

diff --git a/scripts/kconfig/cf_constraints.c b/scripts/kconfig/cf_constraints.c
new file mode 100644
index 000000000000..d1f3b2bd9945
--- /dev/null
+++ b/scripts/kconfig/cf_constraints.c
@@ -0,0 +1,1219 @@
+/* SPDX-License-Identifier: GPL-2.0 */
+/*
+ * Copyright (C) 2021 Patrick Franz <deltaone@xxxxxxxxxx>
+ */
+
+#define _GNU_SOURCE
+#include <assert.h>
+#include <locale.h>
+#include <stdarg.h>
+#include <stdbool.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <time.h>
+#include <unistd.h>
+#include <ctype.h>
+
+#include "configfix.h"
+
+#define KCR_CMP false
+#define NPC_OPTIMISATION true
+
+static void init_constraints(void);
+static void get_constraints_bool(void);
+static void get_constraints_select(void);
+static void get_constraints_nonbool(void);
+
+static void build_tristate_constraint_clause(struct symbol *sym);
+
+static void add_selects_kcr(struct symbol *sym);
+static void add_selects(struct symbol *sym);
+
+static void add_dependencies_bool(struct symbol* sym);
+static void add_dependencies_bool_kcr(struct symbol* sym);
+static void add_dependencies_nonbool(struct symbol *sym);
+
+static void add_choice_prompt_cond(struct symbol *sym);
+static void add_choice_dependencies(struct symbol *sym);
+static void add_choice_constraints(struct symbol *sym);
+static void add_invisible_constraints(struct symbol *sym);
+static void sym_nonbool_at_least_1(struct symbol *sym);
+static void sym_nonbool_at_most_1(struct symbol *sym);
+static void sym_add_nonbool_values_from_default_range(struct symbol *sym);
+static void sym_add_range_constraints(struct symbol *sym);
+static void sym_add_nonbool_prompt_constraint(struct symbol *sym);
+
+static struct default_map * create_default_map_entry(struct fexpr *val, struct pexpr *e);
+static struct defm_list * get_defaults(struct symbol *sym);
+static struct pexpr * get_default_y(struct defm_list *list);
+static struct pexpr * get_default_m(struct defm_list *list);
+static struct pexpr *get_default_any(struct symbol *sym);
+static long sym_get_range_val(struct symbol *sym, int base);
+
+/* -------------------------------------- */
+
+/*
+ * build the constraints for each symbol
+ */
+void get_constraints(void)
+{
+    printd("Building constraints...");
+
+    init_constraints();
+    get_constraints_bool();
+    get_constraints_select();
+    get_constraints_nonbool();
+}
+
+/*
+ * need to go through the constraints once to find all "known values"
+ * for the non-Boolean symbols
+ */
+static void init_constraints(void)
+{
+    unsigned int i;
+    struct symbol *sym;
+    struct property *p;
+    for_all_symbols(i, sym) {
+        if (sym->type == S_UNKNOWN)
+            continue;
+
+        if (sym_is_boolean(sym)) {
+            for_all_properties(sym, p, P_SELECT)
+                expr_calculate_pexpr_both(p->visible.expr);
+
+            for_all_properties(sym, p, P_IMPLY)
+                expr_calculate_pexpr_both(p->visible.expr);
+        }
+
+        if (sym->dir_dep.expr)
+            expr_calculate_pexpr_both(sym->dir_dep.expr);
+
+        struct property *prompt = sym_get_prompt(sym);
+        if (prompt != NULL && prompt->visible.expr) {
+            expr_calculate_pexpr_both(prompt->visible.expr);
+            get_defaults(sym);
+        }
+
+        if (sym_is_nonboolean(sym)) {
+            for_all_defaults(sym, p) {
+                if (p == NULL)
+                    continue;
+
+                sym_create_nonbool_fexpr(sym, p->expr->left.sym->name);
+            }
+            for_all_properties(sym, p, P_RANGE) {
+                if (p == NULL)
+                    continue;
+
+                sym_create_nonbool_fexpr(sym, p->expr->left.sym->name);
+                sym_create_nonbool_fexpr(sym, p->expr->right.sym->name);
+            }
+            const char *curr = sym_get_string_value(sym);
+            if (strcmp(curr, "") != 0)
+                sym_create_nonbool_fexpr(sym, (char *) curr);
+        }
+
+        if (sym->type == S_HEX || sym->type == S_INT)
+            sym_add_nonbool_values_from_default_range(sym);
+    }
+}
+
+
+/*
+ *  build constraints for boolean symbols
+ */
+static void get_constraints_bool(void)
+{
+    unsigned int i;
+    struct symbol *sym;
+    for_all_symbols(i, sym) {
+
+        if (!sym_is_boolean(sym))
+            continue;
+
+        /* build tristate constraints */
+        if (sym->type == S_TRISTATE)
+            build_tristate_constraint_clause(sym);
+
+        /* build constraints for select statements
+         * need to treat choice symbols seperately */
+        if (!KCR_CMP) {
+            add_selects(sym);
+        } else {
+            if (sym->rev_dep.expr && !sym_is_choice(sym) && !sym_is_choice_value(sym))
+                add_selects_kcr(sym);
+        }
+
+        /* build constraints for dependencies for booleans */
+        if (sym->dir_dep.expr && !sym_is_choice(sym) && !sym_is_choice_value(sym)) {
+            if (!KCR_CMP)
+                add_dependencies_bool(sym);
+            else
+                add_dependencies_bool_kcr(sym);
+        }
+
+        /* build constraints for choice prompts */
+        if (sym_is_choice(sym))
+            add_choice_prompt_cond(sym);
+
+        /* build constraints for dependencies (choice symbols and options) */
+        if (sym_is_choice(sym) || sym_is_choice_value(sym))
+            add_choice_dependencies(sym);
+
+        /* build constraints for the choice groups */
+        if (sym_is_choice(sym))
+            add_choice_constraints(sym);
+
+
+        /* build invisible constraints */
+        add_invisible_constraints(sym);
+    }
+}
+
+/*
+* build the constraints for select-variables
+* skip non-Booleans, choice symbols/options och symbols without rev_dir
+*/
+static void get_constraints_select(void)
+{
+    unsigned int i;
+    struct symbol *sym;
+    for_all_symbols(i, sym) {
+        if (KCR_CMP)
+            continue;
+
+        if (!sym_is_boolean(sym))
+            continue;
+
+        if (sym_is_choice(sym) || sym_is_choice_value(sym))
+            continue;
+
+        if (!sym->rev_dep.expr)
+            continue;
+
+        if (sym->list_sel_y == NULL)
+            continue;
+
+        struct pexpr *sel_y = pexpr_implies(
+                    pexf(sym->fexpr_sel_y),
+                    pexf(sym->fexpr_y));
+        sym_add_constraint(sym, sel_y);
+
+        struct pexpr *c1 = pexpr_implies(
+                    pexf(sym->fexpr_sel_y),
+                    sym->list_sel_y);
+        sym_add_constraint(sym, c1);
+
+        /* only continue for tristates */
+        if (sym->type == S_BOOLEAN)
+            continue;
+
+        struct pexpr *sel_m = pexpr_implies(
+                    pexf(sym->fexpr_sel_m),
+                    sym_get_fexpr_both(sym));
+        sym_add_constraint(sym, sel_m);
+
+        struct pexpr *c2 = pexpr_implies(
+                    pexf(sym->fexpr_sel_m),
+                    sym->list_sel_m);
+        sym_add_constraint(sym, c2);
+    }
+}
+
+/*
+ * build constraints for non-booleans
+ */
+static void get_constraints_nonbool(void)
+{
+    unsigned int i;
+    struct symbol *sym;
+    for_all_symbols(i, sym) {
+
+        if (!sym_is_nonboolean(sym))
+            continue;
+
+        /* the symbol must have a value, if there is a prompt */
+        if (sym_has_prompt(sym))
+            sym_add_nonbool_prompt_constraint(sym);
+
+        /* build the range constraints for int/hex */
+        if (sym->type == S_HEX || sym->type == S_INT)
+            sym_add_range_constraints(sym);
+
+        /* build constraints for dependencies for non-booleans */
+        if (sym->dir_dep.expr)
+            add_dependencies_nonbool(sym);
+
+        /* build invisible constraints */
+        add_invisible_constraints(sym);
+
+        /* exactly one of the symbols must be true */
+        sym_nonbool_at_least_1(sym);
+        sym_nonbool_at_most_1(sym);
+    }
+}
+
+/*
+ * enforce tristate constraints
+ */
+static void build_tristate_constraint_clause(struct symbol *sym)
+{
+    if (sym->type != S_TRISTATE)
+        return;
+
+    struct pexpr *X = pexf(sym->fexpr_y), *X_m = pexf(sym->fexpr_m), *modules = pexf(modules_sym->fexpr_y);
+
+    /* -X v -X_m */
+    struct pexpr *c = pexpr_or(pexpr_not(X), pexpr_not(X_m));
+    sym_add_constraint(sym, c);
+
+    /* X_m -> MODULES */
+    if (modules_sym->fexpr_y != NULL) {
+        struct pexpr *c2 = pexpr_implies(X_m, modules);
+        sym_add_constraint(sym, c2);
+    }
+}
+
+/*
+ * build the select constraints
+ * - RDep(X) implies X
+ */
+static void add_selects_kcr(struct symbol *sym)
+{
+    struct pexpr *rdep_y = expr_calculate_pexpr_y(sym->rev_dep.expr);
+    struct pexpr *c1 = pexpr_implies(rdep_y, pexf(sym->fexpr_y));
+    sym_add_constraint(sym, c1);
+
+    struct pexpr *rdep_both = expr_calculate_pexpr_both(sym->rev_dep.expr);
+    struct pexpr *c2 = pexpr_implies(rdep_both, sym_get_fexpr_both(sym));
+    sym_add_constraint(sym, c2);
+}
+
+/*
+ * build the select constraints simplified
+ * - RDep(X) implies X
+ */
+static void add_selects(struct symbol *sym)
+{
+    if (!sym_is_boolean(sym))
+        return;
+
+    struct property *p;
+    for_all_properties(sym, p, P_SELECT) {
+        struct symbol *selected = p->expr->left.sym;
+
+        if (selected->type == S_UNKNOWN)
+            continue;
+
+        if (!selected->rev_dep.expr)
+            continue;
+
+        struct pexpr *cond_y = pexf(const_true);
+        struct pexpr *cond_both = pexf(const_true);
+        if (p->visible.expr) {
+            cond_y = expr_calculate_pexpr_y(p->visible.expr);
+            cond_both = expr_calculate_pexpr_both(p->visible.expr);
+        }
+
+        if (selected->type == S_BOOLEAN) {
+            /* imply that symbol is selected to y */
+            struct pexpr *e1 = pexpr_and(cond_both, sym_get_fexpr_both(sym));
+            struct pexpr *c1 = pexpr_implies(e1, pexf(selected->fexpr_sel_y));
+            sym_add_constraint(selected, c1);
+
+            if (selected->list_sel_y == NULL)
+                selected->list_sel_y = e1;
+            else
+                selected->list_sel_y = pexpr_or(selected->list_sel_y, e1);
+        }
+
+        if (selected->type == S_TRISTATE) {
+            /* imply that symbol is selected to y */
+            struct pexpr *e2 = pexpr_and(cond_y, pexf(sym->fexpr_y));
+            struct pexpr *c2 = pexpr_implies(e2, pexf(selected->fexpr_sel_y));
+            sym_add_constraint(selected, c2);
+
+            if (selected->list_sel_y == NULL)
+                selected->list_sel_y = e2;
+            else
+                selected->list_sel_y = pexpr_or(selected->list_sel_y, e2);
+
+            /* imply that symbol is selected to m */
+            struct pexpr *e3 = pexpr_and(cond_both, sym_get_fexpr_both(sym));
+            struct pexpr *c3 = pexpr_implies(e3, pexf(selected->fexpr_sel_m));
+            sym_add_constraint(selected, c3);
+
+            if (selected->list_sel_m == NULL)
+                selected->list_sel_m = e3;
+            else
+                selected->list_sel_m = pexpr_or(selected->list_sel_m, e3);
+        }
+    }
+}
+
+/*
+ * build the dependency constraints for booleans
+ *  - X implies Dep(X) or RDep(X)
+ */
+static void add_dependencies_bool(struct symbol *sym)
+{
+    if (!sym_is_boolean(sym) || !sym->dir_dep.expr)
+        return;
+
+    struct pexpr *dep_both = expr_calculate_pexpr_both(sym->dir_dep.expr);
+
+    if (sym->type == S_TRISTATE) {
+        struct pexpr *dep_y = expr_calculate_pexpr_y(sym->dir_dep.expr);
+        struct pexpr *sel_y = sym->rev_dep.expr ? pexf(sym->fexpr_sel_y) : pexf(const_false);
+
+        struct pexpr *c1 = pexpr_implies(pexf(sym->fexpr_y), pexpr_or(dep_y, sel_y));
+
+        sym_add_constraint(sym, c1);
+
+        struct pexpr *c2 = pexpr_implies(pexf(sym->fexpr_m), pexpr_or(dep_both, sym_get_fexpr_sel_both(sym)));
+
+        sym_add_constraint(sym, c2);
+    } else if (sym->type == S_BOOLEAN) {
+        struct pexpr *c = pexpr_implies(pexf(sym->fexpr_y), pexpr_or(dep_both, sym_get_fexpr_sel_both(sym)));
+        sym_add_constraint(sym, c);
+    }
+}
+
+/*
+ * build the dependency constraints for booleans (KCR)
+ *  - X implies Dep(X) or RDep(X)
+ */
+static void add_dependencies_bool_kcr(struct symbol *sym)
+{
+    if (!sym_is_boolean(sym) || !sym->dir_dep.expr)
+        return;
+
+    struct pexpr *dep_both = expr_calculate_pexpr_both(sym->dir_dep.expr);
+
+    struct pexpr *sel_both = sym->rev_dep.expr ? expr_calculate_pexpr_both(sym->rev_dep.expr) : pexf(const_false);
+
+    if (sym->type == S_TRISTATE) {
+        struct pexpr *dep_y = expr_calculate_pexpr_y(sym->dir_dep.expr);
+        struct pexpr *sel_y = sym->rev_dep.expr ? expr_calculate_pexpr_y(sym->rev_dep.expr) : pexf(const_false);
+        struct pexpr *c1 = pexpr_implies(pexf(sym->fexpr_y), pexpr_or(dep_y, sel_y));
+        sym_add_constraint(sym, c1);
+
+        struct pexpr *c2 = pexpr_implies(pexf(sym->fexpr_m), pexpr_or(dep_both, sel_both));
+        sym_add_constraint(sym, c2);
+    } else if (sym->type == S_BOOLEAN) {
+        struct pexpr *c = pexpr_implies(pexf(sym->fexpr_y), pexpr_or(dep_both, sel_both));
+        sym_add_constraint(sym, c);
+    }
+}
+
+/*
+ * build the dependency constraints for non-booleans
+ * X_i implies Dep(X)
+ */
+static void add_dependencies_nonbool(struct symbol *sym)
+{
+    if (!sym_is_nonboolean(sym) || !sym->dir_dep.expr || sym->rev_dep.expr)
+        return;
+
+    struct pexpr *dep_both = expr_calculate_pexpr_both(sym->dir_dep.expr);
+
+    struct pexpr *nb_vals = pexf(const_false);
+    struct fexpr_node *node;
+    /* can skip the first non-boolean value, since this is 'n' */
+    fexpr_list_for_each(node, sym->nb_vals) {
+        if (node->prev == NULL)
+            continue;
+
+        nb_vals = pexpr_or(nb_vals, pexf(node->elem));
+    }
+
+    struct pexpr *c = pexpr_implies(nb_vals, dep_both);
+    sym_add_constraint(sym, c);
+}
+
+/*
+ * build the constraints for the choice prompt
+ */
+static void add_choice_prompt_cond(struct symbol* sym)
+{
+    if (!sym_is_boolean(sym))
+        return;
+
+    struct property *prompt = sym_get_prompt(sym);
+    if (prompt == NULL)
+        return;
+
+    struct pexpr *promptCondition = prompt->visible.expr ? expr_calculate_pexpr_both(prompt->visible.expr) : pexf(const_true);
+
+    struct pexpr *fe_both = sym_get_fexpr_both(sym);
+
+    if (!sym_is_optional(sym)) {
+        struct pexpr *req_cond = pexpr_implies(promptCondition, fe_both);
+        sym_add_constraint(sym, req_cond);
+    }
+
+    struct pexpr *pr_cond = pexpr_implies(fe_both, promptCondition);
+    sym_add_constraint(sym, pr_cond);
+}
+
+/*
+ * build constraints for dependencies (choice symbols and options)
+ */
+static void add_choice_dependencies(struct symbol *sym)
+{
+    if (!sym_is_choice(sym) || !sym_is_choice_value(sym))
+        return;
+
+    struct property *prompt = sym_get_prompt(sym);
+    if (prompt == NULL)
+        return;
+
+    struct expr *to_parse;
+    if (sym_is_choice(sym)) {
+        if (!prompt->visible.expr)
+            return;
+        to_parse = prompt->visible.expr;
+    } else {
+        if (!sym->dir_dep.expr)
+            return;
+        to_parse = sym->dir_dep.expr;
+    }
+
+    struct pexpr *dep_both = expr_calculate_pexpr_both(to_parse);
+
+    if (sym->type == S_TRISTATE) {
+        struct pexpr *dep_y = expr_calculate_pexpr_y(to_parse);
+        struct pexpr *c1 = pexpr_implies(pexf(sym->fexpr_y), dep_y);
+        sym_add_constraint_eq(sym, c1);
+
+        struct pexpr *c2 = pexpr_implies(pexf(sym->fexpr_m), dep_both);
+        sym_add_constraint_eq(sym, c2);
+    } else if (sym->type == S_BOOLEAN) {
+        struct pexpr *c = pexpr_implies(pexf(sym->fexpr_y), dep_both);
+        sym_add_constraint_eq(sym, c);
+    }
+}
+
+/*
+ * build constraints for the choice groups
+ */
+static void add_choice_constraints(struct symbol *sym)
+{
+    if (!sym_is_boolean(sym))
+        return;
+
+    struct property *prompt = sym_get_prompt(sym);
+    if (prompt == NULL)
+        return;
+
+    struct symbol *choice, *choice2;
+    struct sym_node *node, *node2;
+
+    /* create list of all choice options */
+    struct sym_list *items = sym_list_init();
+    /* create list of choice options with a prompt */
+    struct sym_list *promptItems = sym_list_init();
+
+    struct property *prop;
+    for_all_choices(sym, prop) {
+        struct expr *expr;
+        expr_list_for_each_sym(prop->expr, expr, choice) {
+            sym_list_add(items, choice);
+            if (sym_get_prompt(choice) != NULL)
+                sym_list_add(promptItems, choice);
+        }
+    }
+
+    /* if the choice is set to yes, at least one child must be set to yes */
+    struct pexpr *c1 = NULL;
+    sym_list_for_each(node, promptItems) {
+        choice = node->elem;
+        c1 = node->prev == NULL ? pexf(choice->fexpr_y) : pexpr_or(c1, pexf(choice->fexpr_y));
+    }
+    if (c1 != NULL) {
+        struct pexpr *c2 = pexpr_implies(pexf(sym->fexpr_y), c1);
+        sym_add_constraint(sym, c2);
+    }
+
+    /* every choice option (even those without a prompt) implies the choice */
+    sym_list_for_each(node, items) {
+        choice = node->elem;
+        c1 = pexpr_implies(sym_get_fexpr_both(choice), sym_get_fexpr_both(sym));
+        sym_add_constraint(sym, c1);
+    }
+
+    /* choice options can only select mod, if the entire choice is mod */
+    if (sym->type == S_TRISTATE) {
+        sym_list_for_each(node, items) {
+            choice = node->elem;
+            if (choice->type == S_TRISTATE) {
+                c1 = pexpr_implies(pexf(choice->fexpr_m), pexf(sym->fexpr_m));
+                sym_add_constraint(sym, c1);
+            }
+        }
+    }
+
+    /* tristate options cannot be m, if the choice symbol is boolean */
+    if (sym->type == S_BOOLEAN) {
+        sym_list_for_each(node, items) {
+            choice = node->elem;
+            if (choice->type == S_TRISTATE)
+                sym_add_constraint(sym, pexpr_not(pexf(choice->fexpr_m)));
+        }
+    }
+
+    /* all choice options are mutually exclusive for yes */
+    sym_list_for_each(node, promptItems) {
+        choice = node->elem;
+        for (node2 = node->next; node2 != NULL; node2 = node2->next) {
+            choice2 = node2->elem;
+            c1 = pexpr_or(pexpr_not(pexf(choice->fexpr_y)), pexpr_not(pexf(choice2->fexpr_y)));
+            sym_add_constraint(sym, c1);
+        }
+    }
+
+    /* if one choice option with a prompt is set to yes,
+     * then no other option may be set to mod */
+    if (sym->type == S_TRISTATE) {
+        sym_list_for_each(node, promptItems) {
+            choice = node->elem;
+
+            struct sym_list *tmp = sym_list_init();
+            for (node2 = node->next; node2 != NULL; node2 = node2->next) {
+                choice2 = node2->elem;
+                if (choice2->type == S_TRISTATE)
+                    sym_list_add(tmp, choice2);
+            }
+            if (tmp->size == 0) continue;
+
+            sym_list_for_each(node2, tmp) {
+                choice2 = node2->elem;
+                if (node2->prev == NULL)
+                    c1 = pexpr_not(pexf(choice2->fexpr_m));
+                else
+                    c1 = pexpr_and(c1, pexpr_not(pexf(choice2->fexpr_m)));
+            }
+            c1 = pexpr_implies(pexf(choice->fexpr_y), c1);
+            sym_add_constraint(sym, c1);
+        }
+    }
+}
+
+/*
+ * build the constraints for invisible options such as defaults
+ */
+static void add_invisible_constraints(struct symbol *sym)
+{
+    struct property *prompt = sym_get_prompt(sym);
+
+    /* no constraints for the prompt, nothing to do here */
+    if (prompt != NULL && !prompt->visible.expr)
+        return;
+
+    struct pexpr *promptCondition_both, *promptCondition_yes, *noPromptCond;
+    if (prompt == NULL) {
+        promptCondition_both = pexf(const_false);
+        promptCondition_yes = pexf(const_false);
+        noPromptCond = pexf(const_true);
+    } else {
+        promptCondition_both = pexf(const_false);
+        promptCondition_yes = pexf(const_false);
+
+        /* some symbols have multiple prompts */
+        struct property *p;
+        for_all_prompts(sym, p) {
+            promptCondition_both = pexpr_or(promptCondition_both,
+                expr_calculate_pexpr_both(p->visible.expr));
+            promptCondition_yes = pexpr_or(promptCondition_yes,
+                expr_calculate_pexpr_y(p->visible.expr));
+        }
+        noPromptCond = pexpr_not(promptCondition_both);
+    }
+
+    struct pexpr *npc;
+    if (NPC_OPTIMISATION) {
+        struct fexpr * npc_fe = fexpr_create(sat_variable_nr++, FE_NPC, "");
+        if (sym_is_choice(sym))
+            str_append(&npc_fe->name, "Choice_");
+
+        str_append(&npc_fe->name, sym_get_name(sym));
+        str_append(&npc_fe->name, "_NPC");
+        sym->noPromptCond = npc_fe;
+        fexpr_add_to_satmap(npc_fe);
+
+        npc = pexf(npc_fe);
+
+        struct pexpr *c = pexpr_implies(noPromptCond, npc);
+
+        if (!sym_is_choice_value(sym) && !sym_is_choice(sym))
+            sym_add_constraint(sym, c);
+    } else {
+        npc = noPromptCond;
+    }
+
+    struct defm_list *defaults = get_defaults(sym);
+    struct pexpr *default_y = get_default_y(defaults);
+    struct pexpr *default_m = get_default_m(defaults);
+    struct pexpr *default_both = pexpr_or(default_y, default_m);
+
+    /* tristate elements are only selectable as yes, if they are visible as yes */
+    if (sym->type == S_TRISTATE) {
+        struct pexpr *e1 = pexpr_implies(promptCondition_both, pexpr_implies(pexf(sym->fexpr_y), promptCondition_yes));
+        sym_add_constraint(sym, e1);
+    }
+
+    /* if invisible and off by default, then a symbol can only be deactivated by its reverse dependencies */
+    if (sym->type == S_TRISTATE) {
+        struct pexpr *sel_y, *sel_m, *sel_both;
+        if (sym->fexpr_sel_y != NULL) {
+            sel_y = pexpr_implies(pexf(sym->fexpr_y), pexf(sym->fexpr_sel_y));
+            sel_m = pexpr_implies(pexf(sym->fexpr_m), pexf(sym->fexpr_sel_m));
+            sel_both = pexpr_implies(pexf(sym->fexpr_y), pexpr_or(pexf(sym->fexpr_sel_m), pexf(sym->fexpr_sel_y)));
+        } else {
+            sel_y = pexpr_not(pexf(sym->fexpr_y));
+            sel_m = pexpr_not(pexf(sym->fexpr_m));
+            sel_both = sel_y;
+        }
+
+        struct pexpr *c1 = pexpr_implies(pexpr_not(default_y), sel_y);
+        struct pexpr *c2 = pexpr_implies(pexf(modules_sym->fexpr_y), c1);
+        struct pexpr *c3 = pexpr_implies(npc, c2);
+        sym_add_constraint(sym, c3);
+
+        struct pexpr *d1 = pexpr_implies(pexpr_not(default_m), sel_m);
+        struct pexpr *d2 = pexpr_implies(pexf(modules_sym->fexpr_y), d1);
+        struct pexpr *d3 = pexpr_implies(npc, d2);
+        sym_add_constraint(sym, d3);
+
+        struct pexpr *e1 = pexpr_implies(pexpr_not(default_both), sel_both);
+        struct pexpr *e2 = pexpr_implies(pexpr_not(pexf(modules_sym->fexpr_y)), e1);
+        struct pexpr *e3 = pexpr_implies(npc, e2);
+        sym_add_constraint(sym, e3);
+    } else if (sym->type == S_BOOLEAN) {
+        struct pexpr *sel_y;
+        if (sym->fexpr_sel_y != NULL)
+            sel_y = pexpr_implies(pexf(sym->fexpr_y), pexf(sym->fexpr_sel_y)); //sym->fexpr_sel_y;
+        else
+            sel_y = pexpr_not(pexf(sym->fexpr_y));
+
+        struct pexpr *e1 = pexpr_implies(pexpr_not(default_both), sel_y);
+        struct pexpr *e2 = pexpr_implies(npc, e1);
+
+        sym_add_constraint_eq(sym, e2);
+    } else {
+        struct pexpr *default_any = get_default_any(sym);
+        struct pexpr *e1 = pexf(const_true);
+        struct fexpr_node *node;
+        for (node = sym->nb_vals->head->next; node != NULL; node = node->next)
+            e1 = pexpr_and(e1, pexpr_not(pexf(node->elem)));
+
+        struct pexpr *e2 = pexpr_implies(pexpr_not(default_any), e1);
+        struct pexpr *e3 = pexpr_implies(npc, e2);
+
+        sym_add_constraint(sym, e3);
+    }
+
+    /* if invisible and on by default, then a symbol can only be deactivated by its dependencies */
+    if (sym->type == S_TRISTATE) {
+        if (defaults->size == 0)
+            return;
+
+        struct pexpr *e1 = pexpr_implies(npc, pexpr_implies(default_y, pexf(sym->fexpr_y)));
+        sym_add_constraint(sym, e1);
+
+        struct pexpr *e2 = pexpr_implies(npc, pexpr_implies(default_m, sym_get_fexpr_both(sym)));
+        sym_add_constraint(sym, e2);
+    } else if (sym->type == S_BOOLEAN) {
+        if (defaults->size == 0)
+            return;
+
+        struct pexpr *c = pexpr_implies(default_both, pexf(sym->fexpr_y));
+
+        // TODO tristate choice hack
+
+        struct pexpr *c2 = pexpr_implies(npc, c);
+        sym_add_constraint(sym, c2);
+    } else {
+        struct defm_node *node;
+        struct pexpr *cond, *c;
+        struct fexpr *f;
+        defm_list_for_each(node, defaults) {
+            f = node->elem->val;
+            cond = node->elem->e;
+            c = pexpr_implies(npc, pexpr_implies(cond, pexf(f)));
+            sym_add_constraint(sym, c);
+        }
+    }
+}
+
+/*
+ * add the known values from the default and range properties
+ */
+static void sym_add_nonbool_values_from_default_range(struct symbol *sym)
+{
+    struct property *p;
+
+    for_all_defaults(sym, p) {
+        if (p == NULL)
+            continue;
+
+        /* add the value to known values, if it doesn't exist yet */
+        sym_create_nonbool_fexpr(sym, p->expr->left.sym->name);
+    }
+
+    for_all_properties(sym, p, P_RANGE) {
+        if (p == NULL)
+            continue;
+
+        /* add the values to known values, if they don't exist yet */
+        sym_create_nonbool_fexpr(sym, p->expr->left.sym->name);
+        sym_create_nonbool_fexpr(sym, p->expr->right.sym->name);
+    }
+}
+
+/*
+ * build the range constraints for int/hex
+ */
+static void sym_add_range_constraints(struct symbol *sym)
+{
+    struct property *prop;
+    struct pexpr *prevs, *propCond;
+    struct pexpr_list *prevCond = pexpr_list_init();
+    for_all_properties(sym, prop, P_RANGE) {
+        if (prop == NULL)
+            continue;
+
+        prevs = pexf(const_true);
+        propCond = prop_get_condition(prop);
+
+        if (prevCond->size == 0) {
+            prevs = propCond;
+        } else {
+            struct pexpr_node *node;
+            pexpr_list_for_each(node, prevCond)
+                prevs = pexpr_and(pexpr_not(node->elem), prevs);
+
+            prevs = pexpr_and(propCond, prevs);
+        }
+        pexpr_list_add(prevCond, propCond);
+
+        int base;
+        long long range_min, range_max, tmp;
+
+        switch (sym->type) {
+        case S_INT:
+            base = 10;
+            break;
+        case S_HEX:
+            base = 16;
+            break;
+        default:
+            return;
+        }
+
+        range_min = sym_get_range_val(prop->expr->left.sym, base);
+        range_max = sym_get_range_val(prop->expr->right.sym, base);
+
+        /* can skip the first non-boolean value, since this is 'n' */
+        struct fexpr_node *node;
+        fexpr_list_for_each(node, sym->nb_vals) {
+            if (node->prev == NULL)
+                continue;
+
+            tmp = strtoll(str_get(&node->elem->nb_val), NULL, base);
+
+            /* known value is in range, nothing to do here */
+            if (tmp >= range_min && tmp <= range_max)
+                continue;
+
+            struct pexpr *not_nb_val = pexpr_not(pexf(node->elem));
+            if (tmp < range_min) {
+                struct pexpr *c = pexpr_implies(prevs, not_nb_val);
+                sym_add_constraint(sym, c);
+            }
+
+            if (tmp > range_max) {
+                struct pexpr *c = pexpr_implies(prevs, not_nb_val);
+                sym_add_constraint(sym, c);
+            }
+        }
+    }
+}
+
+/*
+ * at least 1 of the known values for a non-boolean symbol must be true
+ */
+static void sym_nonbool_at_least_1(struct symbol *sym)
+{
+    if (!sym_is_nonboolean(sym))
+        return;
+
+    struct pexpr *e = NULL;
+    struct fexpr_node *node;
+    fexpr_list_for_each(node, sym->nb_vals) {
+        if (node->prev == NULL)
+            e = pexf(node->elem);
+        else
+            e = pexpr_or(e, pexf(node->elem));
+    }
+    sym_add_constraint(sym, e);
+}
+
+/*
+ * at most 1 of the known values for a non-boolean symbol can be true
+ */
+static void sym_nonbool_at_most_1(struct symbol *sym)
+{
+    if (!sym_is_nonboolean(sym))
+        return;
+
+    struct pexpr *e1, *e2;
+    struct fexpr_node *node1, *node2;
+    fexpr_list_for_each(node1, sym->nb_vals) {
+        e1 = pexf(node1->elem);
+        for (node2 = node1->next; node2 != NULL; node2 = node2->next) {
+            e2 = pexf(node2->elem);
+            struct pexpr *e = pexpr_or(pexpr_not(e1), pexpr_not(e2));
+            sym_add_constraint(sym, e);
+        }
+    }
+}
+
+/*
+ * a visible prompt for a non-boolean implies a value for the symbol
+ */
+static void sym_add_nonbool_prompt_constraint(struct symbol *sym)
+{
+    struct property *prompt = sym_get_prompt(sym);
+    if (prompt == NULL)
+        return;
+
+    struct pexpr *promptCondition = prop_get_condition(prompt);
+    struct pexpr *n = pexf(sym_get_nonbool_fexpr(sym, "n"));
+
+    if (n->type != PE_SYMBOL)
+        return;
+    if (n->left.fexpr == NULL)
+        return;
+
+    struct pexpr *c = pexpr_implies(promptCondition, pexpr_not(n));
+
+    sym_add_constraint(sym, c);
+}
+
+static struct default_map * create_default_map_entry(struct fexpr *val, struct pexpr *e)
+{
+    struct default_map *map = malloc(sizeof(struct default_map));
+    map->val = val;
+    map->e = e;
+
+    return map;
+}
+
+static struct pexpr * findDefaultEntry(struct fexpr *val, struct defm_list *defaults)
+{
+    struct defm_node *node;
+    defm_list_for_each(node, defaults)
+        if (val == node->elem->val)
+            return node->elem->e;
+
+    return pexf(const_false);
+}
+
+/* add a default value to the list */
+
+/*
+ * return all defaults for a symbol
+ */
+static struct pexpr *covered;
+static bool is_tri_as_num(struct symbol *sym) {
+    if (!sym->name)
+        return false;
+
+    return !strcmp(sym->name, "0") ||
+        !strcmp(sym->name, "1") ||
+        !strcmp(sym->name, "2");
+}
+static void add_to_default_map(struct defm_list *defaults, struct default_map *entry, struct symbol *sym)
+{
+    /* as this is a map, the entry must be replaced if it already exists */
+    if (sym_is_boolean(sym)) {
+        struct default_map *map;
+        struct defm_node *node;
+        defm_list_for_each(node, defaults) {
+            map = node->elem;
+            if (map->val->sym == entry->val->sym) {
+                map->e = entry->e;
+                return;
+            }
+        }
+        defm_list_add(defaults, entry);
+    } else {
+        struct default_map *map;
+        struct defm_node *node;
+        defm_list_for_each(node, defaults) {
+            map = node->elem;
+            if (map->val->satval == entry->val->satval) {
+                map->e = entry->e;
+                return;
+            }
+        }
+        defm_list_add(defaults, entry);
+    }
+}
+static void updateDefaultList(struct fexpr *val, struct pexpr *newCond, struct defm_list *result, struct symbol *sym)
+{
+    struct pexpr *prevCond = findDefaultEntry(val, result);
+    struct pexpr *cond = pexpr_or(prevCond, pexpr_and(newCond, pexpr_not(covered)));
+    struct default_map *entry = create_default_map_entry(val, cond);
+    add_to_default_map(result, entry, sym);
+    covered = pexpr_or(covered, newCond);
+}
+static void add_defaults(struct prop_list *defaults, struct expr *ctx, struct defm_list *result, struct symbol *sym)
+{
+    struct prop_node *node;
+    struct property *p;
+    struct expr *expr;
+
+    prop_list_for_each(node, defaults) {
+        p = node->elem;
+        if (p->visible.expr) {
+            if (ctx == NULL)
+                expr = p->visible.expr;
+            else
+                expr = expr_alloc_and(p->visible.expr, ctx);
+        } else {
+            if (ctx == NULL)
+                expr = expr_alloc_symbol(&symbol_yes);
+            else
+                expr = expr_alloc_and(expr_alloc_symbol(&symbol_yes), ctx);
+        }
+
+        /* if tristate and def.value = y */
+        if (p->expr->type == E_SYMBOL && sym->type == S_TRISTATE && p->expr->left.sym == &symbol_yes) {
+            struct pexpr *expr_y = expr_calculate_pexpr_y(expr);
+            struct pexpr *expr_m = expr_calculate_pexpr_m(expr);
+
+            updateDefaultList(symbol_yes_fexpr, expr_y, result, sym);
+            updateDefaultList(symbol_mod_fexpr, expr_m, result, sym);
+        }
+        /* if def.value = n/m/y */
+        else if (p->expr->type == E_SYMBOL && sym_is_tristate_constant(p->expr->left.sym)) {
+            struct fexpr *s;
+            if (p->expr->left.sym == &symbol_yes)
+                s = symbol_yes_fexpr;
+            else if (p->expr->left.sym == &symbol_mod)
+                s = symbol_mod_fexpr;
+            else
+                s = symbol_no_fexpr;
+
+            updateDefaultList(s, expr_calculate_pexpr_both(expr), result, sym);
+        }
+        /* if def.value = n/m/y, but written as 0/1/2 for a boolean */
+        else if (sym_is_boolean(sym) &&
+            p->expr->type == E_SYMBOL &&
+            p->expr->left.sym->type == S_UNKNOWN &&
+            is_tri_as_num(p->expr->left.sym)) {
+
+            struct fexpr *s;
+            if (!strcmp(p->expr->left.sym->name, "0"))
+                s = symbol_no_fexpr;
+            else if (!strcmp(p->expr->left.sym->name, "1"))
+                s = symbol_mod_fexpr;
+            else
+                s = symbol_yes_fexpr;
+
+            updateDefaultList(s, expr_calculate_pexpr_both(expr), result, sym);
+        }
+        /* if def.value = non-boolean constant */
+        else if (expr_is_nonbool_constant(p->expr)) {
+            struct fexpr *s = sym_get_or_create_nonbool_fexpr(sym, p->expr->left.sym->name);
+            updateDefaultList(s, expr_calculate_pexpr_both(expr), result, sym);
+        }
+        /* any expression which evaluates to n/m/y for a tristate */
+        else if (sym->type == S_TRISTATE) {
+            struct expr *e_tmp = expr_alloc_and(p->expr, expr);
+            struct pexpr *expr_y = expr_calculate_pexpr_y(e_tmp);
+            struct pexpr *expr_m = expr_calculate_pexpr_m(e_tmp);
+            updateDefaultList(symbol_yes_fexpr, expr_y, result, sym);
+            updateDefaultList(symbol_mod_fexpr, expr_m, result, sym);
+        }
+        /* if non-boolean && def.value = non-boolean symbol */
+        else if (p->expr->type == E_SYMBOL && sym_is_nonboolean(sym) && sym_is_nonboolean(p->expr->left.sym)) {
+            struct prop_list *nb_sym_defaults = prop_list_init();
+            struct property *p_tmp;
+            for_all_defaults(p->expr->left.sym, p_tmp)
+                prop_list_add(nb_sym_defaults, p_tmp);
+
+            add_defaults(nb_sym_defaults, expr, result, sym);
+        }
+        /* any expression which evaluates to n/m/y */
+        else {
+            struct expr *e_tmp = expr_alloc_and(p->expr, expr);
+            struct pexpr *expr_both = expr_calculate_pexpr_both(e_tmp);
+            updateDefaultList(symbol_yes_fexpr, expr_both, result, sym);
+        }
+    }
+}
+static struct defm_list * get_defaults(struct symbol *sym)
+{
+    struct defm_list *result = defm_list_init();
+    covered = pexf(const_false);
+
+    struct prop_list *defaults = prop_list_init();
+    struct property *p;
+    for_all_defaults(sym, p)
+        prop_list_add(defaults, p);
+
+    add_defaults(defaults, NULL, result, sym);
+
+    return result;
+}
+
+/*
+ * return the default_map for "y", False if it doesn't exist
+ */
+static struct pexpr * get_default_y(struct defm_list *list)
+{
+    struct default_map *entry;
+    struct defm_node *node;
+
+    defm_list_for_each(node, list) {
+        entry = node->elem;
+        if (entry->val->type == FE_SYMBOL && entry->val->sym == &symbol_yes)
+            return entry->e;
+    }
+
+    return pexf(const_false);
+}
+
+/*
+ * return the default map for "m", False if it doesn't exist
+ */
+static struct pexpr *get_default_m(struct defm_list *list)
+{
+    struct default_map *entry;
+    struct defm_node *node;
+
+    defm_list_for_each(node, list) {
+        entry = node->elem;
+        if (entry->val->type == FE_SYMBOL && entry->val->sym == &symbol_mod)
+            return entry->e;
+    }
+
+    return pexf(const_false);
+}
+
+/*
+ * return the constraint when _some_ default value will be applied
+ */
+static struct pexpr *get_default_any(struct symbol *sym)
+{
+    if (!sym_is_nonboolean(sym))
+        return NULL;
+
+    struct property *prop;
+    struct expr *e;
+    struct pexpr *p = pexf(const_false);
+    for_all_defaults(sym, prop) {
+        if (prop->visible.expr)
+            e = prop->visible.expr;
+        else
+            e = expr_alloc_symbol(&symbol_yes);
+
+        if (expr_can_evaluate_to_mod(e))
+            p = pexpr_or(p, expr_calculate_pexpr_both(e));
+
+        p = pexpr_or(p, expr_calculate_pexpr_y(e));
+    }
+
+    return p;
+}
+
+/*
+ * get the value for the range
+ */
+static long sym_get_range_val(struct symbol *sym, int base)
+{
+    sym_calc_value(sym);
+    switch (sym->type) {
+    case S_INT:
+        base = 10;
+        break;
+    case S_HEX:
+        base = 16;
+        break;
+    default:
+        break;
+    }
+    return strtol(sym->curr.val, NULL, base);
+}
+
+/*
+ * count the number of all constraints
+ */
+unsigned int count_counstraints(void)
+{
+    unsigned int i, c = 0;
+    struct symbol *sym;
+    for_all_symbols(i, sym) {
+        if (sym->type == S_UNKNOWN)
+            continue;
+
+        c += sym->constraints->size;
+    }
+
+    return c;
+}
+
+/*
+ * add a constraint for a symbol
+ */
+void sym_add_constraint(struct symbol *sym, struct pexpr *constraint)
+{
+    if (!constraint)
+        return;
+
+    /* no need to add that */
+    if (constraint->type == PE_SYMBOL && constraint->left.fexpr == const_true)
+        return;
+
+    /* this should never happen */
+    if (constraint->type == PE_SYMBOL && constraint->left.fexpr == const_false)
+        perror("Adding const_false.");
+
+    pexpr_list_add(sym->constraints, constraint);
+
+    if (!pexpr_is_nnf(constraint))
+        pexpr_print("Not NNF:", constraint, -1);
+}
+
+/*
+ * add a constraint for a symbol, but check for duplicate constraints
+ */
+void sym_add_constraint_eq(struct symbol *sym, struct pexpr *constraint)
+{
+    if (!constraint)
+        return;
+
+    /* no need to add that */
+    if (constraint->type == PE_SYMBOL && constraint->left.fexpr == const_true)
+        return;
+
+    /* this should never happen */
+    if (constraint->type == PE_SYMBOL && constraint->left.fexpr == const_false)
+        perror("Adding const_false.");
+
+    /* check the constraints for the same symbol */
+    struct pexpr_node *node;
+    pexpr_list_for_each(node, sym->constraints)
+        if (pexpr_eq(constraint, node->elem))
+            return;
+
+    pexpr_list_add(sym->constraints, constraint);
+
+    if (!pexpr_is_nnf(constraint))
+        pexpr_print("Not NNF:", constraint, -1);
+}
diff --git a/scripts/kconfig/cf_constraints.h b/scripts/kconfig/cf_constraints.h
new file mode 100644
index 000000000000..dca89ca1640e
--- /dev/null
+++ b/scripts/kconfig/cf_constraints.h
@@ -0,0 +1,23 @@
+/* SPDX-License-Identifier: GPL-2.0 */
+/*
+ * Copyright (C) 2021 Patrick Franz <deltaone@xxxxxxxxxx>
+ */
+
+#ifndef CF_CONSTRAINTS_H
+#define CF_CONSTRAINTS_H
+
+/* build the constraints for each symbol */
+void get_constraints(void);
+
+/* count the number of all constraints */
+unsigned int count_counstraints(void);
+
+/* add a constraint for a symbol */
+void sym_add_constraint(struct symbol *sym, struct pexpr *constraint);
+
+void sym_add_constraint_fexpr(struct symbol *sym, struct fexpr *constraint);
+
+/* add a constraint for a symbol, but check for duplicate constraints */
+void sym_add_constraint_eq(struct symbol *sym, struct pexpr *constraint);
+
+#endif
-- 
2.33.0






[Index of Archives]     [Linux&nblp;USB Development]     [Linux Media]     [Video for Linux]     [Linux Audio Users]     [Yosemite Secrets]     [Linux Kernel]     [Linux SCSI]

  Powered by Linux