1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
1.2 +++ b/kconfig/zconf.y Tue Aug 23 21:11:26 2011 +0200
1.3 @@ -0,0 +1,749 @@
1.4 +%{
1.5 +/*
1.6 + * Copyright (C) 2002 Roman Zippel <zippel@linux-m68k.org>
1.7 + * Released under the terms of the GNU GPL v2.0.
1.8 + */
1.9 +
1.10 +#include <ctype.h>
1.11 +#include <stdarg.h>
1.12 +#include <stdio.h>
1.13 +#include <stdlib.h>
1.14 +#include <string.h>
1.15 +#include <stdbool.h>
1.16 +
1.17 +#define LKC_DIRECT_LINK
1.18 +#include "lkc.h"
1.19 +
1.20 +#define printd(mask, fmt...) if (cdebug & (mask)) printf(fmt)
1.21 +
1.22 +#define PRINTD 0x0001
1.23 +#define DEBUG_PARSE 0x0002
1.24 +
1.25 +int cdebug = PRINTD;
1.26 +
1.27 +extern int zconflex(void);
1.28 +static void zconfprint(const char *err, ...);
1.29 +static void zconf_error(const char *err, ...);
1.30 +static void zconferror(const char *err);
1.31 +static bool zconf_endtoken(struct kconf_id *id, int starttoken, int endtoken);
1.32 +
1.33 +struct symbol *symbol_hash[SYMBOL_HASHSIZE];
1.34 +
1.35 +static struct menu *current_menu, *current_entry;
1.36 +
1.37 +#define YYDEBUG 0
1.38 +#if YYDEBUG
1.39 +#define YYERROR_VERBOSE
1.40 +#endif
1.41 +%}
1.42 +%expect 30
1.43 +
1.44 +%union
1.45 +{
1.46 + char *string;
1.47 + struct file *file;
1.48 + struct symbol *symbol;
1.49 + struct expr *expr;
1.50 + struct menu *menu;
1.51 + struct kconf_id *id;
1.52 +}
1.53 +
1.54 +%token <id>T_MAINMENU
1.55 +%token <id>T_MENU
1.56 +%token <id>T_ENDMENU
1.57 +%token <id>T_SOURCE
1.58 +%token <id>T_CHOICE
1.59 +%token <id>T_ENDCHOICE
1.60 +%token <id>T_COMMENT
1.61 +%token <id>T_CONFIG
1.62 +%token <id>T_MENUCONFIG
1.63 +%token <id>T_HELP
1.64 +%token <string> T_HELPTEXT
1.65 +%token <id>T_IF
1.66 +%token <id>T_ENDIF
1.67 +%token <id>T_DEPENDS
1.68 +%token <id>T_OPTIONAL
1.69 +%token <id>T_PROMPT
1.70 +%token <id>T_TYPE
1.71 +%token <id>T_DEFAULT
1.72 +%token <id>T_SELECT
1.73 +%token <id>T_RANGE
1.74 +%token <id>T_VISIBLE
1.75 +%token <id>T_OPTION
1.76 +%token <id>T_ON
1.77 +%token <string> T_WORD
1.78 +%token <string> T_WORD_QUOTE
1.79 +%token T_UNEQUAL
1.80 +%token T_CLOSE_PAREN
1.81 +%token T_OPEN_PAREN
1.82 +%token T_EOL
1.83 +
1.84 +%left T_OR
1.85 +%left T_AND
1.86 +%left T_EQUAL T_UNEQUAL
1.87 +%nonassoc T_NOT
1.88 +
1.89 +%type <string> prompt
1.90 +%type <symbol> symbol
1.91 +%type <expr> expr
1.92 +%type <expr> if_expr
1.93 +%type <id> end
1.94 +%type <id> option_name
1.95 +%type <menu> if_entry menu_entry choice_entry
1.96 +%type <string> symbol_option_arg word_opt
1.97 +
1.98 +%destructor {
1.99 + fprintf(stderr, "%s:%d: missing end statement for this entry\n",
1.100 + $$->file->name, $$->lineno);
1.101 + if (current_menu == $$)
1.102 + menu_end_menu();
1.103 +} if_entry menu_entry choice_entry
1.104 +
1.105 +%{
1.106 +/* Include zconf.hash.c here so it can see the token constants. */
1.107 +#include "zconf.hash.c"
1.108 +%}
1.109 +
1.110 +%%
1.111 +input: nl start | start;
1.112 +
1.113 +start: mainmenu_stmt stmt_list | stmt_list;
1.114 +
1.115 +stmt_list:
1.116 + /* empty */
1.117 + | stmt_list common_stmt
1.118 + | stmt_list choice_stmt
1.119 + | stmt_list menu_stmt
1.120 + | stmt_list end { zconf_error("unexpected end statement"); }
1.121 + | stmt_list T_WORD error T_EOL { zconf_error("unknown statement \"%s\"", $2); }
1.122 + | stmt_list option_name error T_EOL
1.123 +{
1.124 + zconf_error("unexpected option \"%s\"", kconf_id_strings + $2->name);
1.125 +}
1.126 + | stmt_list error T_EOL { zconf_error("invalid statement"); }
1.127 +;
1.128 +
1.129 +option_name:
1.130 + T_DEPENDS | T_PROMPT | T_TYPE | T_SELECT | T_OPTIONAL | T_RANGE | T_DEFAULT | T_VISIBLE
1.131 +;
1.132 +
1.133 +common_stmt:
1.134 + T_EOL
1.135 + | if_stmt
1.136 + | comment_stmt
1.137 + | config_stmt
1.138 + | menuconfig_stmt
1.139 + | source_stmt
1.140 +;
1.141 +
1.142 +option_error:
1.143 + T_WORD error T_EOL { zconf_error("unknown option \"%s\"", $1); }
1.144 + | error T_EOL { zconf_error("invalid option"); }
1.145 +;
1.146 +
1.147 +
1.148 +/* config/menuconfig entry */
1.149 +
1.150 +config_entry_start: T_CONFIG T_WORD T_EOL
1.151 +{
1.152 + struct symbol *sym = sym_lookup($2, 0);
1.153 + sym->flags |= SYMBOL_OPTIONAL;
1.154 + menu_add_entry(sym);
1.155 + printd(DEBUG_PARSE, "%s:%d:config %s\n", zconf_curname(), zconf_lineno(), $2);
1.156 +};
1.157 +
1.158 +config_stmt: config_entry_start config_option_list
1.159 +{
1.160 + menu_end_entry();
1.161 + printd(DEBUG_PARSE, "%s:%d:endconfig\n", zconf_curname(), zconf_lineno());
1.162 +};
1.163 +
1.164 +menuconfig_entry_start: T_MENUCONFIG T_WORD T_EOL
1.165 +{
1.166 + struct symbol *sym = sym_lookup($2, 0);
1.167 + sym->flags |= SYMBOL_OPTIONAL;
1.168 + menu_add_entry(sym);
1.169 + printd(DEBUG_PARSE, "%s:%d:menuconfig %s\n", zconf_curname(), zconf_lineno(), $2);
1.170 +};
1.171 +
1.172 +menuconfig_stmt: menuconfig_entry_start config_option_list
1.173 +{
1.174 + if (current_entry->prompt)
1.175 + current_entry->prompt->type = P_MENU;
1.176 + else
1.177 + zconfprint("warning: menuconfig statement without prompt");
1.178 + menu_end_entry();
1.179 + printd(DEBUG_PARSE, "%s:%d:endconfig\n", zconf_curname(), zconf_lineno());
1.180 +};
1.181 +
1.182 +config_option_list:
1.183 + /* empty */
1.184 + | config_option_list config_option
1.185 + | config_option_list symbol_option
1.186 + | config_option_list depends
1.187 + | config_option_list help
1.188 + | config_option_list option_error
1.189 + | config_option_list T_EOL
1.190 +;
1.191 +
1.192 +config_option: T_TYPE prompt_stmt_opt T_EOL
1.193 +{
1.194 + menu_set_type($1->stype);
1.195 + printd(DEBUG_PARSE, "%s:%d:type(%u)\n",
1.196 + zconf_curname(), zconf_lineno(),
1.197 + $1->stype);
1.198 +};
1.199 +
1.200 +config_option: T_PROMPT prompt if_expr T_EOL
1.201 +{
1.202 + menu_add_prompt(P_PROMPT, $2, $3);
1.203 + printd(DEBUG_PARSE, "%s:%d:prompt\n", zconf_curname(), zconf_lineno());
1.204 +};
1.205 +
1.206 +config_option: T_DEFAULT expr if_expr T_EOL
1.207 +{
1.208 + menu_add_expr(P_DEFAULT, $2, $3);
1.209 + if ($1->stype != S_UNKNOWN)
1.210 + menu_set_type($1->stype);
1.211 + printd(DEBUG_PARSE, "%s:%d:default(%u)\n",
1.212 + zconf_curname(), zconf_lineno(),
1.213 + $1->stype);
1.214 +};
1.215 +
1.216 +config_option: T_SELECT T_WORD if_expr T_EOL
1.217 +{
1.218 + menu_add_symbol(P_SELECT, sym_lookup($2, 0), $3);
1.219 + printd(DEBUG_PARSE, "%s:%d:select\n", zconf_curname(), zconf_lineno());
1.220 +};
1.221 +
1.222 +config_option: T_RANGE symbol symbol if_expr T_EOL
1.223 +{
1.224 + menu_add_expr(P_RANGE, expr_alloc_comp(E_RANGE,$2, $3), $4);
1.225 + printd(DEBUG_PARSE, "%s:%d:range\n", zconf_curname(), zconf_lineno());
1.226 +};
1.227 +
1.228 +symbol_option: T_OPTION symbol_option_list T_EOL
1.229 +;
1.230 +
1.231 +symbol_option_list:
1.232 + /* empty */
1.233 + | symbol_option_list T_WORD symbol_option_arg
1.234 +{
1.235 + struct kconf_id *id = kconf_id_lookup($2, strlen($2));
1.236 + if (id && id->flags & TF_OPTION)
1.237 + menu_add_option(id->token, $3);
1.238 + else
1.239 + zconfprint("warning: ignoring unknown option %s", $2);
1.240 + free($2);
1.241 +};
1.242 +
1.243 +symbol_option_arg:
1.244 + /* empty */ { $$ = NULL; }
1.245 + | T_EQUAL prompt { $$ = $2; }
1.246 +;
1.247 +
1.248 +/* choice entry */
1.249 +
1.250 +choice: T_CHOICE word_opt T_EOL
1.251 +{
1.252 + struct symbol *sym = sym_lookup($2, SYMBOL_CHOICE);
1.253 + sym->flags |= SYMBOL_AUTO;
1.254 + menu_add_entry(sym);
1.255 + menu_add_expr(P_CHOICE, NULL, NULL);
1.256 + printd(DEBUG_PARSE, "%s:%d:choice\n", zconf_curname(), zconf_lineno());
1.257 +};
1.258 +
1.259 +choice_entry: choice choice_option_list
1.260 +{
1.261 + $$ = menu_add_menu();
1.262 +};
1.263 +
1.264 +choice_end: end
1.265 +{
1.266 + if (zconf_endtoken($1, T_CHOICE, T_ENDCHOICE)) {
1.267 + menu_end_menu();
1.268 + printd(DEBUG_PARSE, "%s:%d:endchoice\n", zconf_curname(), zconf_lineno());
1.269 + }
1.270 +};
1.271 +
1.272 +choice_stmt: choice_entry choice_block choice_end
1.273 +;
1.274 +
1.275 +choice_option_list:
1.276 + /* empty */
1.277 + | choice_option_list choice_option
1.278 + | choice_option_list depends
1.279 + | choice_option_list help
1.280 + | choice_option_list T_EOL
1.281 + | choice_option_list option_error
1.282 +;
1.283 +
1.284 +choice_option: T_PROMPT prompt if_expr T_EOL
1.285 +{
1.286 + menu_add_prompt(P_PROMPT, $2, $3);
1.287 + printd(DEBUG_PARSE, "%s:%d:prompt\n", zconf_curname(), zconf_lineno());
1.288 +};
1.289 +
1.290 +choice_option: T_TYPE prompt_stmt_opt T_EOL
1.291 +{
1.292 + if ($1->stype == S_BOOLEAN || $1->stype == S_TRISTATE) {
1.293 + menu_set_type($1->stype);
1.294 + printd(DEBUG_PARSE, "%s:%d:type(%u)\n",
1.295 + zconf_curname(), zconf_lineno(),
1.296 + $1->stype);
1.297 + } else
1.298 + YYERROR;
1.299 +};
1.300 +
1.301 +choice_option: T_OPTIONAL T_EOL
1.302 +{
1.303 + current_entry->sym->flags |= SYMBOL_OPTIONAL;
1.304 + printd(DEBUG_PARSE, "%s:%d:optional\n", zconf_curname(), zconf_lineno());
1.305 +};
1.306 +
1.307 +choice_option: T_DEFAULT T_WORD if_expr T_EOL
1.308 +{
1.309 + if ($1->stype == S_UNKNOWN) {
1.310 + menu_add_symbol(P_DEFAULT, sym_lookup($2, 0), $3);
1.311 + printd(DEBUG_PARSE, "%s:%d:default\n",
1.312 + zconf_curname(), zconf_lineno());
1.313 + } else
1.314 + YYERROR;
1.315 +};
1.316 +
1.317 +choice_block:
1.318 + /* empty */
1.319 + | choice_block common_stmt
1.320 +;
1.321 +
1.322 +/* if entry */
1.323 +
1.324 +if_entry: T_IF expr nl
1.325 +{
1.326 + printd(DEBUG_PARSE, "%s:%d:if\n", zconf_curname(), zconf_lineno());
1.327 + menu_add_entry(NULL);
1.328 + menu_add_dep($2);
1.329 + $$ = menu_add_menu();
1.330 +};
1.331 +
1.332 +if_end: end
1.333 +{
1.334 + if (zconf_endtoken($1, T_IF, T_ENDIF)) {
1.335 + menu_end_menu();
1.336 + printd(DEBUG_PARSE, "%s:%d:endif\n", zconf_curname(), zconf_lineno());
1.337 + }
1.338 +};
1.339 +
1.340 +if_stmt: if_entry if_block if_end
1.341 +;
1.342 +
1.343 +if_block:
1.344 + /* empty */
1.345 + | if_block common_stmt
1.346 + | if_block menu_stmt
1.347 + | if_block choice_stmt
1.348 +;
1.349 +
1.350 +/* mainmenu entry */
1.351 +
1.352 +mainmenu_stmt: T_MAINMENU prompt nl
1.353 +{
1.354 + menu_add_prompt(P_MENU, $2, NULL);
1.355 +};
1.356 +
1.357 +/* menu entry */
1.358 +
1.359 +menu: T_MENU prompt T_EOL
1.360 +{
1.361 + menu_add_entry(NULL);
1.362 + menu_add_prompt(P_MENU, $2, NULL);
1.363 + printd(DEBUG_PARSE, "%s:%d:menu\n", zconf_curname(), zconf_lineno());
1.364 +};
1.365 +
1.366 +menu_entry: menu visibility_list depends_list
1.367 +{
1.368 + $$ = menu_add_menu();
1.369 +};
1.370 +
1.371 +menu_end: end
1.372 +{
1.373 + if (zconf_endtoken($1, T_MENU, T_ENDMENU)) {
1.374 + menu_end_menu();
1.375 + printd(DEBUG_PARSE, "%s:%d:endmenu\n", zconf_curname(), zconf_lineno());
1.376 + }
1.377 +};
1.378 +
1.379 +menu_stmt: menu_entry menu_block menu_end
1.380 +;
1.381 +
1.382 +menu_block:
1.383 + /* empty */
1.384 + | menu_block common_stmt
1.385 + | menu_block menu_stmt
1.386 + | menu_block choice_stmt
1.387 +;
1.388 +
1.389 +source_stmt: T_SOURCE prompt T_EOL
1.390 +{
1.391 + printd(DEBUG_PARSE, "%s:%d:source %s\n", zconf_curname(), zconf_lineno(), $2);
1.392 + zconf_nextfile($2);
1.393 +};
1.394 +
1.395 +/* comment entry */
1.396 +
1.397 +comment: T_COMMENT prompt T_EOL
1.398 +{
1.399 + menu_add_entry(NULL);
1.400 + menu_add_prompt(P_COMMENT, $2, NULL);
1.401 + printd(DEBUG_PARSE, "%s:%d:comment\n", zconf_curname(), zconf_lineno());
1.402 +};
1.403 +
1.404 +comment_stmt: comment depends_list
1.405 +{
1.406 + menu_end_entry();
1.407 +};
1.408 +
1.409 +/* help option */
1.410 +
1.411 +help_start: T_HELP T_EOL
1.412 +{
1.413 + printd(DEBUG_PARSE, "%s:%d:help\n", zconf_curname(), zconf_lineno());
1.414 + zconf_starthelp();
1.415 +};
1.416 +
1.417 +help: help_start T_HELPTEXT
1.418 +{
1.419 + current_entry->help = $2;
1.420 +};
1.421 +
1.422 +/* depends option */
1.423 +
1.424 +depends_list:
1.425 + /* empty */
1.426 + | depends_list depends
1.427 + | depends_list T_EOL
1.428 + | depends_list option_error
1.429 +;
1.430 +
1.431 +depends: T_DEPENDS T_ON expr T_EOL
1.432 +{
1.433 + menu_add_dep($3);
1.434 + printd(DEBUG_PARSE, "%s:%d:depends on\n", zconf_curname(), zconf_lineno());
1.435 +};
1.436 +
1.437 +/* visibility option */
1.438 +
1.439 +visibility_list:
1.440 + /* empty */
1.441 + | visibility_list visible
1.442 + | visibility_list T_EOL
1.443 +;
1.444 +
1.445 +visible: T_VISIBLE if_expr
1.446 +{
1.447 + menu_add_visibility($2);
1.448 +};
1.449 +
1.450 +/* prompt statement */
1.451 +
1.452 +prompt_stmt_opt:
1.453 + /* empty */
1.454 + | prompt if_expr
1.455 +{
1.456 + menu_add_prompt(P_PROMPT, $1, $2);
1.457 +};
1.458 +
1.459 +prompt: T_WORD
1.460 + | T_WORD_QUOTE
1.461 +;
1.462 +
1.463 +end: T_ENDMENU T_EOL { $$ = $1; }
1.464 + | T_ENDCHOICE T_EOL { $$ = $1; }
1.465 + | T_ENDIF T_EOL { $$ = $1; }
1.466 +;
1.467 +
1.468 +nl:
1.469 + T_EOL
1.470 + | nl T_EOL
1.471 +;
1.472 +
1.473 +if_expr: /* empty */ { $$ = NULL; }
1.474 + | T_IF expr { $$ = $2; }
1.475 +;
1.476 +
1.477 +expr: symbol { $$ = expr_alloc_symbol($1); }
1.478 + | symbol T_EQUAL symbol { $$ = expr_alloc_comp(E_EQUAL, $1, $3); }
1.479 + | symbol T_UNEQUAL symbol { $$ = expr_alloc_comp(E_UNEQUAL, $1, $3); }
1.480 + | T_OPEN_PAREN expr T_CLOSE_PAREN { $$ = $2; }
1.481 + | T_NOT expr { $$ = expr_alloc_one(E_NOT, $2); }
1.482 + | expr T_OR expr { $$ = expr_alloc_two(E_OR, $1, $3); }
1.483 + | expr T_AND expr { $$ = expr_alloc_two(E_AND, $1, $3); }
1.484 +;
1.485 +
1.486 +symbol: T_WORD { $$ = sym_lookup($1, 0); free($1); }
1.487 + | T_WORD_QUOTE { $$ = sym_lookup($1, SYMBOL_CONST); free($1); }
1.488 +;
1.489 +
1.490 +word_opt: /* empty */ { $$ = NULL; }
1.491 + | T_WORD
1.492 +
1.493 +%%
1.494 +
1.495 +void conf_parse(const char *name)
1.496 +{
1.497 + struct symbol *sym;
1.498 + int i;
1.499 +
1.500 + zconf_initscan(name);
1.501 +
1.502 + sym_init();
1.503 + _menu_init();
1.504 + modules_sym = sym_lookup(NULL, 0);
1.505 + modules_sym->type = S_BOOLEAN;
1.506 + modules_sym->flags |= SYMBOL_AUTO;
1.507 + rootmenu.prompt = menu_add_prompt(P_MENU, PACKAGE " Configuration", NULL);
1.508 +
1.509 +#if YYDEBUG
1.510 + if (getenv("ZCONF_DEBUG"))
1.511 + zconfdebug = 1;
1.512 +#endif
1.513 + zconfparse();
1.514 + if (zconfnerrs)
1.515 + exit(1);
1.516 + if (!modules_sym->prop) {
1.517 + struct property *prop;
1.518 +
1.519 + prop = prop_alloc(P_DEFAULT, modules_sym);
1.520 + prop->expr = expr_alloc_symbol(sym_lookup("MODULES", 0));
1.521 + }
1.522 +
1.523 + rootmenu.prompt->text = _(rootmenu.prompt->text);
1.524 + rootmenu.prompt->text = sym_expand_string_value(rootmenu.prompt->text);
1.525 +
1.526 + menu_finalize(&rootmenu);
1.527 + for_all_symbols(i, sym) {
1.528 + if (sym_check_deps(sym))
1.529 + zconfnerrs++;
1.530 + }
1.531 + if (zconfnerrs)
1.532 + exit(1);
1.533 + sym_set_change_count(1);
1.534 +}
1.535 +
1.536 +static const char *zconf_tokenname(int token)
1.537 +{
1.538 + switch (token) {
1.539 + case T_MENU: return "menu";
1.540 + case T_ENDMENU: return "endmenu";
1.541 + case T_CHOICE: return "choice";
1.542 + case T_ENDCHOICE: return "endchoice";
1.543 + case T_IF: return "if";
1.544 + case T_ENDIF: return "endif";
1.545 + case T_DEPENDS: return "depends";
1.546 + case T_VISIBLE: return "visible";
1.547 + }
1.548 + return "<token>";
1.549 +}
1.550 +
1.551 +static bool zconf_endtoken(struct kconf_id *id, int starttoken, int endtoken)
1.552 +{
1.553 + if (id->token != endtoken) {
1.554 + zconf_error("unexpected '%s' within %s block",
1.555 + kconf_id_strings + id->name, zconf_tokenname(starttoken));
1.556 + zconfnerrs++;
1.557 + return false;
1.558 + }
1.559 + if (current_menu->file != current_file) {
1.560 + zconf_error("'%s' in different file than '%s'",
1.561 + kconf_id_strings + id->name, zconf_tokenname(starttoken));
1.562 + fprintf(stderr, "%s:%d: location of the '%s'\n",
1.563 + current_menu->file->name, current_menu->lineno,
1.564 + zconf_tokenname(starttoken));
1.565 + zconfnerrs++;
1.566 + return false;
1.567 + }
1.568 + return true;
1.569 +}
1.570 +
1.571 +static void zconfprint(const char *err, ...)
1.572 +{
1.573 + va_list ap;
1.574 +
1.575 + fprintf(stderr, "%s:%d: ", zconf_curname(), zconf_lineno());
1.576 + va_start(ap, err);
1.577 + vfprintf(stderr, err, ap);
1.578 + va_end(ap);
1.579 + fprintf(stderr, "\n");
1.580 +}
1.581 +
1.582 +static void zconf_error(const char *err, ...)
1.583 +{
1.584 + va_list ap;
1.585 +
1.586 + zconfnerrs++;
1.587 + fprintf(stderr, "%s:%d: ", zconf_curname(), zconf_lineno());
1.588 + va_start(ap, err);
1.589 + vfprintf(stderr, err, ap);
1.590 + va_end(ap);
1.591 + fprintf(stderr, "\n");
1.592 +}
1.593 +
1.594 +static void zconferror(const char *err)
1.595 +{
1.596 +#if YYDEBUG
1.597 + fprintf(stderr, "%s:%d: %s\n", zconf_curname(), zconf_lineno() + 1, err);
1.598 +#endif
1.599 +}
1.600 +
1.601 +static void print_quoted_string(FILE *out, const char *str)
1.602 +{
1.603 + const char *p;
1.604 + int len;
1.605 +
1.606 + putc('"', out);
1.607 + while ((p = strchr(str, '"'))) {
1.608 + len = p - str;
1.609 + if (len)
1.610 + fprintf(out, "%.*s", len, str);
1.611 + fputs("\\\"", out);
1.612 + str = p + 1;
1.613 + }
1.614 + fputs(str, out);
1.615 + putc('"', out);
1.616 +}
1.617 +
1.618 +static void print_symbol(FILE *out, struct menu *menu)
1.619 +{
1.620 + struct symbol *sym = menu->sym;
1.621 + struct property *prop;
1.622 +
1.623 + if (sym_is_choice(sym))
1.624 + fprintf(out, "\nchoice\n");
1.625 + else
1.626 + fprintf(out, "\nconfig %s\n", sym->name);
1.627 + switch (sym->type) {
1.628 + case S_BOOLEAN:
1.629 + fputs(" boolean\n", out);
1.630 + break;
1.631 + case S_TRISTATE:
1.632 + fputs(" tristate\n", out);
1.633 + break;
1.634 + case S_STRING:
1.635 + fputs(" string\n", out);
1.636 + break;
1.637 + case S_INT:
1.638 + fputs(" integer\n", out);
1.639 + break;
1.640 + case S_HEX:
1.641 + fputs(" hex\n", out);
1.642 + break;
1.643 + default:
1.644 + fputs(" ???\n", out);
1.645 + break;
1.646 + }
1.647 + for (prop = sym->prop; prop; prop = prop->next) {
1.648 + if (prop->menu != menu)
1.649 + continue;
1.650 + switch (prop->type) {
1.651 + case P_PROMPT:
1.652 + fputs(" prompt ", out);
1.653 + print_quoted_string(out, prop->text);
1.654 + if (!expr_is_yes(prop->visible.expr)) {
1.655 + fputs(" if ", out);
1.656 + expr_fprint(prop->visible.expr, out);
1.657 + }
1.658 + fputc('\n', out);
1.659 + break;
1.660 + case P_DEFAULT:
1.661 + fputs( " default ", out);
1.662 + expr_fprint(prop->expr, out);
1.663 + if (!expr_is_yes(prop->visible.expr)) {
1.664 + fputs(" if ", out);
1.665 + expr_fprint(prop->visible.expr, out);
1.666 + }
1.667 + fputc('\n', out);
1.668 + break;
1.669 + case P_CHOICE:
1.670 + fputs(" #choice value\n", out);
1.671 + break;
1.672 + case P_SELECT:
1.673 + fputs( " select ", out);
1.674 + expr_fprint(prop->expr, out);
1.675 + fputc('\n', out);
1.676 + break;
1.677 + case P_RANGE:
1.678 + fputs( " range ", out);
1.679 + expr_fprint(prop->expr, out);
1.680 + fputc('\n', out);
1.681 + break;
1.682 + case P_MENU:
1.683 + fputs( " menu ", out);
1.684 + print_quoted_string(out, prop->text);
1.685 + fputc('\n', out);
1.686 + break;
1.687 + default:
1.688 + fprintf(out, " unknown prop %d!\n", prop->type);
1.689 + break;
1.690 + }
1.691 + }
1.692 + if (menu->help) {
1.693 + int len = strlen(menu->help);
1.694 + while (menu->help[--len] == '\n')
1.695 + menu->help[len] = 0;
1.696 + fprintf(out, " help\n%s\n", menu->help);
1.697 + }
1.698 +}
1.699 +
1.700 +void zconfdump(FILE *out)
1.701 +{
1.702 + struct property *prop;
1.703 + struct symbol *sym;
1.704 + struct menu *menu;
1.705 +
1.706 + menu = rootmenu.list;
1.707 + while (menu) {
1.708 + if ((sym = menu->sym))
1.709 + print_symbol(out, menu);
1.710 + else if ((prop = menu->prompt)) {
1.711 + switch (prop->type) {
1.712 + case P_COMMENT:
1.713 + fputs("\ncomment ", out);
1.714 + print_quoted_string(out, prop->text);
1.715 + fputs("\n", out);
1.716 + break;
1.717 + case P_MENU:
1.718 + fputs("\nmenu ", out);
1.719 + print_quoted_string(out, prop->text);
1.720 + fputs("\n", out);
1.721 + break;
1.722 + default:
1.723 + ;
1.724 + }
1.725 + if (!expr_is_yes(prop->visible.expr)) {
1.726 + fputs(" depends ", out);
1.727 + expr_fprint(prop->visible.expr, out);
1.728 + fputc('\n', out);
1.729 + }
1.730 + }
1.731 +
1.732 + if (menu->list)
1.733 + menu = menu->list;
1.734 + else if (menu->next)
1.735 + menu = menu->next;
1.736 + else while ((menu = menu->parent)) {
1.737 + if (menu->prompt && menu->prompt->type == P_MENU)
1.738 + fputs("\nendmenu\n", out);
1.739 + if (menu->next) {
1.740 + menu = menu->next;
1.741 + break;
1.742 + }
1.743 + }
1.744 + }
1.745 +}
1.746 +
1.747 +#include "lex.zconf.c"
1.748 +#include "util.c"
1.749 +#include "confdata.c"
1.750 +#include "expr.c"
1.751 +#include "symbol.c"
1.752 +#include "menu.c"