1 // SPDX-License-Identifier: GPL-2.0
3 * Copyright (C) 2002 Roman Zippel <zippel@linux-m68k.org>
13 static const char nohelp_text
[] = "There is no help available for this option.";
16 static struct menu
**last_entry_ptr
;
18 struct file
*file_list
;
19 struct file
*current_file
;
21 void menu_warn(struct menu
*menu
, const char *fmt
, ...)
25 fprintf(stderr
, "%s:%d:warning: ", menu
->file
->name
, menu
->lineno
);
26 vfprintf(stderr
, fmt
, ap
);
27 fprintf(stderr
, "\n");
31 static void prop_warn(struct property
*prop
, const char *fmt
, ...)
35 fprintf(stderr
, "%s:%d:warning: ", prop
->file
->name
, prop
->lineno
);
36 vfprintf(stderr
, fmt
, ap
);
37 fprintf(stderr
, "\n");
43 current_entry
= current_menu
= &rootmenu
;
44 last_entry_ptr
= &rootmenu
.list
;
47 void menu_add_entry(struct symbol
*sym
)
51 menu
= xmalloc(sizeof(*menu
));
52 memset(menu
, 0, sizeof(*menu
));
54 menu
->parent
= current_menu
;
55 menu
->file
= current_file
;
56 menu
->lineno
= zconf_lineno();
58 *last_entry_ptr
= menu
;
59 last_entry_ptr
= &menu
->next
;
62 menu_add_symbol(P_SYMBOL
, sym
, NULL
);
65 struct menu
*menu_add_menu(void)
67 last_entry_ptr
= ¤t_entry
->list
;
68 current_menu
= current_entry
;
72 void menu_end_menu(void)
74 last_entry_ptr
= ¤t_menu
->next
;
75 current_menu
= current_menu
->parent
;
79 * Rewrites 'm' to 'm' && MODULES, so that it evaluates to 'n' when running
82 static struct expr
*rewrite_m(struct expr
*e
)
89 e
->left
.expr
= rewrite_m(e
->left
.expr
);
93 e
->left
.expr
= rewrite_m(e
->left
.expr
);
94 e
->right
.expr
= rewrite_m(e
->right
.expr
);
97 /* change 'm' into 'm' && MODULES */
98 if (e
->left
.sym
== &symbol_mod
)
99 return expr_alloc_and(e
, expr_alloc_symbol(modules_sym
));
107 void menu_add_dep(struct expr
*dep
)
109 current_entry
->dep
= expr_alloc_and(current_entry
->dep
, dep
);
112 void menu_set_type(int type
)
114 struct symbol
*sym
= current_entry
->sym
;
116 if (sym
->type
== type
)
118 if (sym
->type
== S_UNKNOWN
) {
122 menu_warn(current_entry
,
123 "ignoring type redefinition of '%s' from '%s' to '%s'",
124 sym
->name
? sym
->name
: "<choice>",
125 sym_type_name(sym
->type
), sym_type_name(type
));
128 static struct property
*menu_add_prop(enum prop_type type
, struct expr
*expr
,
131 struct property
*prop
;
133 prop
= xmalloc(sizeof(*prop
));
134 memset(prop
, 0, sizeof(*prop
));
136 prop
->file
= current_file
;
137 prop
->lineno
= zconf_lineno();
138 prop
->menu
= current_entry
;
140 prop
->visible
.expr
= dep
;
142 /* append property to the prop list of symbol */
143 if (current_entry
->sym
) {
144 struct property
**propp
;
146 for (propp
= ¤t_entry
->sym
->prop
;
148 propp
= &(*propp
)->next
)
156 struct property
*menu_add_prompt(enum prop_type type
, char *prompt
,
159 struct property
*prop
= menu_add_prop(type
, NULL
, dep
);
161 if (isspace(*prompt
)) {
162 prop_warn(prop
, "leading whitespace ignored");
163 while (isspace(*prompt
))
166 if (current_entry
->prompt
)
167 prop_warn(prop
, "prompt redefined");
169 /* Apply all upper menus' visibilities to actual prompts. */
170 if (type
== P_PROMPT
) {
171 struct menu
*menu
= current_entry
;
173 while ((menu
= menu
->parent
) != NULL
) {
174 struct expr
*dup_expr
;
176 if (!menu
->visibility
)
179 * Do not add a reference to the menu's visibility
180 * expression but use a copy of it. Otherwise the
181 * expression reduction functions will modify
182 * expressions that have multiple references which
183 * can cause unwanted side effects.
185 dup_expr
= expr_copy(menu
->visibility
);
187 prop
->visible
.expr
= expr_alloc_and(prop
->visible
.expr
,
192 current_entry
->prompt
= prop
;
198 void menu_add_visibility(struct expr
*expr
)
200 current_entry
->visibility
= expr_alloc_and(current_entry
->visibility
,
204 void menu_add_expr(enum prop_type type
, struct expr
*expr
, struct expr
*dep
)
206 menu_add_prop(type
, expr
, dep
);
209 void menu_add_symbol(enum prop_type type
, struct symbol
*sym
, struct expr
*dep
)
211 menu_add_prop(type
, expr_alloc_symbol(sym
), dep
);
214 void menu_add_option_modules(void)
217 zconf_error("symbol '%s' redefines option 'modules' already defined by symbol '%s'",
218 current_entry
->sym
->name
, modules_sym
->name
);
219 modules_sym
= current_entry
->sym
;
222 void menu_add_option_defconfig_list(void)
224 if (!sym_defconfig_list
)
225 sym_defconfig_list
= current_entry
->sym
;
226 else if (sym_defconfig_list
!= current_entry
->sym
)
227 zconf_error("trying to redefine defconfig symbol");
228 sym_defconfig_list
->flags
|= SYMBOL_NO_WRITE
;
231 void menu_add_option_allnoconfig_y(void)
233 current_entry
->sym
->flags
|= SYMBOL_ALLNOCONFIG_Y
;
236 static int menu_validate_number(struct symbol
*sym
, struct symbol
*sym2
)
238 return sym2
->type
== S_INT
|| sym2
->type
== S_HEX
||
239 (sym2
->type
== S_UNKNOWN
&& sym_string_valid(sym
, sym2
->name
));
242 static void sym_check_prop(struct symbol
*sym
)
244 struct property
*prop
;
248 for (prop
= sym
->prop
; prop
; prop
= prop
->next
) {
249 switch (prop
->type
) {
251 if ((sym
->type
== S_STRING
|| sym
->type
== S_INT
|| sym
->type
== S_HEX
) &&
252 prop
->expr
->type
!= E_SYMBOL
)
254 "default for config symbol '%s'"
255 " must be a single symbol", sym
->name
);
256 if (prop
->expr
->type
!= E_SYMBOL
)
258 sym2
= prop_get_symbol(prop
);
259 if (sym
->type
== S_HEX
|| sym
->type
== S_INT
) {
260 if (!menu_validate_number(sym
, sym2
))
262 "'%s': number is invalid",
265 if (sym_is_choice(sym
)) {
266 struct property
*choice_prop
=
267 sym_get_choice_prop(sym2
);
270 prop_get_symbol(choice_prop
) != sym
)
272 "choice default symbol '%s' is not contained in the choice",
278 use
= prop
->type
== P_SELECT
? "select" : "imply";
279 sym2
= prop_get_symbol(prop
);
280 if (sym
->type
!= S_BOOLEAN
&& sym
->type
!= S_TRISTATE
)
282 "config symbol '%s' uses %s, but is "
283 "not bool or tristate", sym
->name
, use
);
284 else if (sym2
->type
!= S_UNKNOWN
&&
285 sym2
->type
!= S_BOOLEAN
&&
286 sym2
->type
!= S_TRISTATE
)
288 "'%s' has wrong type. '%s' only "
289 "accept arguments of bool and "
290 "tristate type", sym2
->name
, use
);
293 if (sym
->type
!= S_INT
&& sym
->type
!= S_HEX
)
294 prop_warn(prop
, "range is only allowed "
295 "for int or hex symbols");
296 if (!menu_validate_number(sym
, prop
->expr
->left
.sym
) ||
297 !menu_validate_number(sym
, prop
->expr
->right
.sym
))
298 prop_warn(prop
, "range is invalid");
306 void menu_finalize(struct menu
*parent
)
308 struct menu
*menu
, *last_menu
;
310 struct property
*prop
;
311 struct expr
*parentdep
, *basedep
, *dep
, *dep2
, **ep
;
316 * This menu node has children. We (recursively) process them
317 * and propagate parent dependencies before moving on.
320 if (sym
&& sym_is_choice(sym
)) {
321 if (sym
->type
== S_UNKNOWN
) {
322 /* find the first choice value to find out choice type */
323 current_entry
= parent
;
324 for (menu
= parent
->list
; menu
; menu
= menu
->next
) {
325 if (menu
->sym
&& menu
->sym
->type
!= S_UNKNOWN
) {
326 menu_set_type(menu
->sym
->type
);
331 /* set the type of the remaining choice values */
332 for (menu
= parent
->list
; menu
; menu
= menu
->next
) {
333 current_entry
= menu
;
334 if (menu
->sym
&& menu
->sym
->type
== S_UNKNOWN
)
335 menu_set_type(sym
->type
);
339 * Use the choice itself as the parent dependency of
340 * the contained items. This turns the mode of the
341 * choice into an upper bound on the visibility of the
342 * choice value symbols.
344 parentdep
= expr_alloc_symbol(sym
);
346 /* Menu node for 'menu', 'if' */
347 parentdep
= parent
->dep
;
350 /* For each child menu node... */
351 for (menu
= parent
->list
; menu
; menu
= menu
->next
) {
353 * Propagate parent dependencies to the child menu
354 * node, also rewriting and simplifying expressions
356 basedep
= rewrite_m(menu
->dep
);
357 basedep
= expr_transform(basedep
);
358 basedep
= expr_alloc_and(expr_copy(parentdep
), basedep
);
359 basedep
= expr_eliminate_dups(basedep
);
364 * Note: For symbols, all prompts are included
365 * too in the symbol's own property list
367 prop
= menu
->sym
->prop
;
370 * For non-symbol menu nodes, we just need to
375 /* For each property... */
376 for (; prop
; prop
= prop
->next
) {
377 if (prop
->menu
!= menu
)
381 * 1. The property lacks dependencies
382 * and so isn't location-specific,
385 * 2. The property belongs to a symbol
386 * defined in multiple locations and
387 * is from some other location. It
388 * will be handled there in that
396 * Propagate parent dependencies to the
397 * property's condition, rewriting and
398 * simplifying expressions at the same time
400 dep
= rewrite_m(prop
->visible
.expr
);
401 dep
= expr_transform(dep
);
402 dep
= expr_alloc_and(expr_copy(basedep
), dep
);
403 dep
= expr_eliminate_dups(dep
);
404 if (menu
->sym
&& menu
->sym
->type
!= S_TRISTATE
)
405 dep
= expr_trans_bool(dep
);
406 prop
->visible
.expr
= dep
;
409 * Handle selects and implies, which modify the
410 * dependencies of the selected/implied symbol
412 if (prop
->type
== P_SELECT
) {
413 struct symbol
*es
= prop_get_symbol(prop
);
414 es
->rev_dep
.expr
= expr_alloc_or(es
->rev_dep
.expr
,
415 expr_alloc_and(expr_alloc_symbol(menu
->sym
), expr_copy(dep
)));
416 } else if (prop
->type
== P_IMPLY
) {
417 struct symbol
*es
= prop_get_symbol(prop
);
418 es
->implied
.expr
= expr_alloc_or(es
->implied
.expr
,
419 expr_alloc_and(expr_alloc_symbol(menu
->sym
), expr_copy(dep
)));
424 if (sym
&& sym_is_choice(sym
))
425 expr_free(parentdep
);
428 * Recursively process children in the same fashion before
431 for (menu
= parent
->list
; menu
; menu
= menu
->next
)
435 * Automatic submenu creation. If sym is a symbol and A, B, C,
436 * ... are consecutive items (symbols, menus, ifs, etc.) that
437 * all depend on sym, then the following menu structure is
446 * This also works recursively, giving the following structure
447 * if A is a symbol and B depends on A:
456 basedep
= parent
->prompt
? parent
->prompt
->visible
.expr
: NULL
;
457 basedep
= expr_trans_compare(basedep
, E_UNEQUAL
, &symbol_no
);
458 basedep
= expr_eliminate_dups(expr_transform(basedep
));
460 /* Examine consecutive elements after sym */
462 for (menu
= parent
->next
; menu
; menu
= menu
->next
) {
463 dep
= menu
->prompt
? menu
->prompt
->visible
.expr
: menu
->dep
;
464 if (!expr_contains_symbol(dep
, sym
))
465 /* No dependency, quit */
467 if (expr_depends_symbol(dep
, sym
))
468 /* Absolute dependency, put in submenu */
472 * Also consider it a dependency on sym if our
473 * dependencies contain sym and are a "superset" of
474 * sym's dependencies, e.g. '(sym || Q) && R' when sym
477 * Note that 'R' might be from an enclosing menu or if,
478 * making this a more common case than it might seem.
480 dep
= expr_trans_compare(dep
, E_UNEQUAL
, &symbol_no
);
481 dep
= expr_eliminate_dups(expr_transform(dep
));
482 dep2
= expr_copy(basedep
);
483 expr_eliminate_eq(&dep
, &dep2
);
485 if (!expr_is_yes(dep2
)) {
486 /* Not superset, quit */
490 /* Superset, put in submenu */
494 menu
->parent
= parent
;
499 parent
->list
= parent
->next
;
500 parent
->next
= last_menu
->next
;
501 last_menu
->next
= NULL
;
504 sym
->dir_dep
.expr
= expr_alloc_or(sym
->dir_dep
.expr
, parent
->dep
);
506 for (menu
= parent
->list
; menu
; menu
= menu
->next
) {
507 if (sym
&& sym_is_choice(sym
) &&
508 menu
->sym
&& !sym_is_choice_value(menu
->sym
)) {
509 current_entry
= menu
;
510 menu
->sym
->flags
|= SYMBOL_CHOICEVAL
;
512 menu_warn(menu
, "choice value must have a prompt");
513 for (prop
= menu
->sym
->prop
; prop
; prop
= prop
->next
) {
514 if (prop
->type
== P_DEFAULT
)
515 prop_warn(prop
, "defaults for choice "
516 "values not supported");
517 if (prop
->menu
== menu
)
519 if (prop
->type
== P_PROMPT
&&
520 prop
->menu
->parent
->sym
!= sym
)
521 prop_warn(prop
, "choice value used outside its choice group");
523 /* Non-tristate choice values of tristate choices must
524 * depend on the choice being set to Y. The choice
525 * values' dependencies were propagated to their
526 * properties above, so the change here must be re-
529 if (sym
->type
== S_TRISTATE
&& menu
->sym
->type
!= S_TRISTATE
) {
530 basedep
= expr_alloc_comp(E_EQUAL
, sym
, &symbol_yes
);
531 menu
->dep
= expr_alloc_and(basedep
, menu
->dep
);
532 for (prop
= menu
->sym
->prop
; prop
; prop
= prop
->next
) {
533 if (prop
->menu
!= menu
)
535 prop
->visible
.expr
= expr_alloc_and(expr_copy(basedep
),
539 menu_add_symbol(P_CHOICE
, sym
, NULL
);
540 prop
= sym_get_choice_prop(sym
);
541 for (ep
= &prop
->expr
; *ep
; ep
= &(*ep
)->left
.expr
)
543 *ep
= expr_alloc_one(E_LIST
, NULL
);
544 (*ep
)->right
.sym
= menu
->sym
;
548 * This code serves two purposes:
550 * (1) Flattening 'if' blocks, which do not specify a submenu
551 * and only add dependencies.
553 * (Automatic submenu creation might still create a submenu
554 * from an 'if' before this code runs.)
556 * (2) "Undoing" any automatic submenus created earlier below
557 * promptless symbols.
562 * if ... (or promptless symbol)
570 * if ... (or promptless symbol)
575 if (menu
->list
&& (!menu
->prompt
|| !menu
->prompt
->text
)) {
576 for (last_menu
= menu
->list
; ; last_menu
= last_menu
->next
) {
577 last_menu
->parent
= parent
;
578 if (!last_menu
->next
)
581 last_menu
->next
= menu
->next
;
582 menu
->next
= menu
->list
;
587 if (sym
&& !(sym
->flags
& SYMBOL_WARNED
)) {
588 if (sym
->type
== S_UNKNOWN
)
589 menu_warn(parent
, "config symbol defined without type");
591 if (sym_is_choice(sym
) && !parent
->prompt
)
592 menu_warn(parent
, "choice must have a prompt");
594 /* Check properties connected to this symbol */
596 sym
->flags
|= SYMBOL_WARNED
;
600 * For non-optional choices, add a reverse dependency (corresponding to
601 * a select) of '<visibility> && m'. This prevents the user from
602 * setting the choice mode to 'n' when the choice is visible.
604 * This would also work for non-choice symbols, but only non-optional
605 * choices clear SYMBOL_OPTIONAL as of writing. Choices are implemented
606 * as a type of symbol.
608 if (sym
&& !sym_is_optional(sym
) && parent
->prompt
) {
609 sym
->rev_dep
.expr
= expr_alloc_or(sym
->rev_dep
.expr
,
610 expr_alloc_and(parent
->prompt
->visible
.expr
,
611 expr_alloc_symbol(&symbol_mod
)));
615 bool menu_has_prompt(struct menu
*menu
)
623 * Determine if a menu is empty.
624 * A menu is considered empty if it contains no or only
627 bool menu_is_empty(struct menu
*menu
)
631 for (child
= menu
->list
; child
; child
= child
->next
) {
632 if (menu_is_visible(child
))
638 bool menu_is_visible(struct menu
*menu
)
647 if (menu
->visibility
) {
648 if (expr_calc_value(menu
->visibility
) == no
)
655 visible
= menu
->prompt
->visible
.tri
;
657 visible
= menu
->prompt
->visible
.tri
= expr_calc_value(menu
->prompt
->visible
.expr
);
662 if (!sym
|| sym_get_tristate_value(menu
->sym
) == no
)
665 for (child
= menu
->list
; child
; child
= child
->next
) {
666 if (menu_is_visible(child
)) {
668 sym
->flags
|= SYMBOL_DEF_USER
;
676 const char *menu_get_prompt(struct menu
*menu
)
679 return menu
->prompt
->text
;
681 return menu
->sym
->name
;
685 struct menu
*menu_get_root_menu(struct menu
*menu
)
690 struct menu
*menu_get_parent_menu(struct menu
*menu
)
694 for (; menu
!= &rootmenu
; menu
= menu
->parent
) {
695 type
= menu
->prompt
? menu
->prompt
->type
: 0;
702 bool menu_has_help(struct menu
*menu
)
704 return menu
->help
!= NULL
;
707 const char *menu_get_help(struct menu
*menu
)
715 static void get_def_str(struct gstr
*r
, struct menu
*menu
)
717 str_printf(r
, "Defined at %s:%d\n",
718 menu
->file
->name
, menu
->lineno
);
721 static void get_dep_str(struct gstr
*r
, struct expr
*expr
, const char *prefix
)
723 if (!expr_is_yes(expr
)) {
724 str_append(r
, prefix
);
725 expr_gstr_print(expr
, r
);
730 static void get_prompt_str(struct gstr
*r
, struct property
*prop
,
731 struct list_head
*head
)
734 struct menu
*submenu
[8], *menu
, *location
= NULL
;
735 struct jump_key
*jump
= NULL
;
737 str_printf(r
, " Prompt: %s\n", prop
->text
);
739 get_dep_str(r
, prop
->menu
->dep
, " Depends on: ");
741 * Most prompts in Linux have visibility that exactly matches their
742 * dependencies. For these, we print only the dependencies to improve
743 * readability. However, prompts with inline "if" expressions and
744 * prompts with a parent that has a "visible if" expression have
745 * differing dependencies and visibility. In these rare cases, we
748 if (!expr_eq(prop
->menu
->dep
, prop
->visible
.expr
))
749 get_dep_str(r
, prop
->visible
.expr
, " Visible if: ");
751 menu
= prop
->menu
->parent
;
752 for (i
= 0; menu
!= &rootmenu
&& i
< 8; menu
= menu
->parent
) {
753 bool accessible
= menu_is_visible(menu
);
756 if (location
== NULL
&& accessible
)
759 if (head
&& location
) {
760 jump
= xmalloc(sizeof(struct jump_key
));
762 if (menu_is_visible(prop
->menu
)) {
764 * There is not enough room to put the hint at the
765 * beginning of the "Prompt" line. Put the hint on the
766 * last "Location" line even when it would belong on
769 jump
->target
= prop
->menu
;
771 jump
->target
= location
;
773 if (list_empty(head
))
776 jump
->index
= list_entry(head
->prev
, struct jump_key
,
779 list_add_tail(&jump
->entries
, head
);
783 str_printf(r
, " Location:\n");
784 for (j
= 4; --i
>= 0; j
+= 2) {
786 if (jump
&& menu
== location
)
787 jump
->offset
= strlen(r
->s
);
788 str_printf(r
, "%*c-> %s", j
, ' ',
789 menu_get_prompt(menu
));
791 str_printf(r
, " (%s [=%s])", menu
->sym
->name
?
792 menu
->sym
->name
: "<choice>",
793 sym_get_string_value(menu
->sym
));
800 static void get_symbol_props_str(struct gstr
*r
, struct symbol
*sym
,
801 enum prop_type tok
, const char *prefix
)
804 struct property
*prop
;
806 for_all_properties(sym
, prop
, tok
) {
808 str_append(r
, prefix
);
811 str_printf(r
, " && ");
812 expr_gstr_print(prop
->expr
, r
);
819 * head is optional and may be NULL
821 static void get_symbol_str(struct gstr
*r
, struct symbol
*sym
,
822 struct list_head
*head
)
824 struct property
*prop
;
826 if (sym
&& sym
->name
) {
827 str_printf(r
, "Symbol: %s [=%s]\n", sym
->name
,
828 sym_get_string_value(sym
));
829 str_printf(r
, "Type : %s\n", sym_type_name(sym
->type
));
830 if (sym
->type
== S_INT
|| sym
->type
== S_HEX
) {
831 prop
= sym_get_range_prop(sym
);
833 str_printf(r
, "Range : ");
834 expr_gstr_print(prop
->expr
, r
);
840 /* Print the definitions with prompts before the ones without */
841 for_all_properties(sym
, prop
, P_SYMBOL
) {
842 if (prop
->menu
->prompt
) {
843 get_def_str(r
, prop
->menu
);
844 get_prompt_str(r
, prop
->menu
->prompt
, head
);
848 for_all_properties(sym
, prop
, P_SYMBOL
) {
849 if (!prop
->menu
->prompt
) {
850 get_def_str(r
, prop
->menu
);
851 get_dep_str(r
, prop
->menu
->dep
, " Depends on: ");
855 get_symbol_props_str(r
, sym
, P_SELECT
, "Selects: ");
856 if (sym
->rev_dep
.expr
) {
857 expr_gstr_print_revdep(sym
->rev_dep
.expr
, r
, yes
, "Selected by [y]:\n");
858 expr_gstr_print_revdep(sym
->rev_dep
.expr
, r
, mod
, "Selected by [m]:\n");
859 expr_gstr_print_revdep(sym
->rev_dep
.expr
, r
, no
, "Selected by [n]:\n");
862 get_symbol_props_str(r
, sym
, P_IMPLY
, "Implies: ");
863 if (sym
->implied
.expr
) {
864 expr_gstr_print_revdep(sym
->implied
.expr
, r
, yes
, "Implied by [y]:\n");
865 expr_gstr_print_revdep(sym
->implied
.expr
, r
, mod
, "Implied by [m]:\n");
866 expr_gstr_print_revdep(sym
->implied
.expr
, r
, no
, "Implied by [n]:\n");
869 str_append(r
, "\n\n");
872 struct gstr
get_relations_str(struct symbol
**sym_arr
, struct list_head
*head
)
875 struct gstr res
= str_new();
878 for (i
= 0; sym_arr
&& (sym
= sym_arr
[i
]); i
++)
879 get_symbol_str(&res
, sym
, head
);
881 str_append(&res
, "No matches found.\n");
886 void menu_get_ext_help(struct menu
*menu
, struct gstr
*help
)
888 struct symbol
*sym
= menu
->sym
;
889 const char *help_text
= nohelp_text
;
891 if (menu_has_help(menu
)) {
893 str_printf(help
, "%s%s:\n\n", CONFIG_
, sym
->name
);
894 help_text
= menu_get_help(menu
);
896 str_printf(help
, "%s\n", help_text
);
898 get_symbol_str(help
, sym
, NULL
);