3 * Copyright (C) 2002 Roman Zippel <zippel@linux-m68k.org>
4 * Released under the terms of the GNU GPL v2.0.
14 #define LKC_DIRECT_LINK
17 #include "zconf.hash.c"
19 #define printd(mask, fmt...) if (cdebug & (mask)) printf(fmt)
22 #define DEBUG_PARSE 0x0002
26 extern
int zconflex
(void);
27 static void zconfprint
(const char *err
, ...
);
28 static void zconferror
(const char *err
);
29 static bool zconf_endtoken
(int token
, int starttoken
, int endtoken
);
31 struct symbol
*symbol_hash
[257];
33 static struct menu
*current_menu
, *current_entry
;
35 #define YYERROR_VERBOSE
43 struct symbol
*symbol
;
54 %token
<id
>T_ENDCHOICE
57 %token
<id
>T_MENUCONFIG
59 %token
<string> T_HELPTEXT
71 %token
<string> T_WORD
72 %token
<string> T_WORD_QUOTE
81 %left T_EQUAL T_UNEQUAL
99 | T_MAINMENU prompt nl_or_eof
100 | T_ENDMENU
{ zconfprint
("unexpected 'endmenu' statement"); }
101 | T_ENDIF
{ zconfprint
("unexpected 'endif' statement"); }
102 | T_ENDCHOICE
{ zconfprint
("unexpected 'endchoice' statement"); }
103 |
error nl_or_eof
{ zconfprint
("syntax error"); yyerrok; }
116 /* config/menuconfig entry */
118 config_entry_start: T_CONFIG T_WORD T_EOL
120 struct symbol
*sym
= sym_lookup
($2, 0);
121 sym
->flags |
= SYMBOL_OPTIONAL
;
123 printd
(DEBUG_PARSE
, "%s:%d:config %s\n", zconf_curname
(), zconf_lineno
(), $2);
126 config_stmt: config_entry_start config_option_list
129 printd
(DEBUG_PARSE
, "%s:%d:endconfig\n", zconf_curname
(), zconf_lineno
());
132 menuconfig_entry_start: T_MENUCONFIG T_WORD T_EOL
134 struct symbol
*sym
= sym_lookup
($2, 0);
135 sym
->flags |
= SYMBOL_OPTIONAL
;
137 printd
(DEBUG_PARSE
, "%s:%d:menuconfig %s\n", zconf_curname
(), zconf_lineno
(), $2);
140 menuconfig_stmt: menuconfig_entry_start config_option_list
142 if
(current_entry
->prompt
)
143 current_entry
->prompt
->type
= P_MENU
;
145 zconfprint
("warning: menuconfig statement without prompt");
147 printd
(DEBUG_PARSE
, "%s:%d:endconfig\n", zconf_curname
(), zconf_lineno
());
152 | config_option_list config_option
153 | config_option_list depends
154 | config_option_list help
155 | config_option_list T_EOL
158 config_option: T_TYPE prompt_stmt_opt T_EOL
160 menu_set_type
($1->stype
);
161 printd
(DEBUG_PARSE
, "%s:%d:type(%u)\n",
162 zconf_curname
(), zconf_lineno
(),
166 config_option: T_PROMPT prompt if_expr T_EOL
168 menu_add_prompt
(P_PROMPT
, $2, $3);
169 printd
(DEBUG_PARSE
, "%s:%d:prompt\n", zconf_curname
(), zconf_lineno
());
172 config_option: T_DEFAULT expr if_expr T_EOL
174 menu_add_expr
(P_DEFAULT
, $2, $3);
175 if
($1->stype
!= S_UNKNOWN
)
176 menu_set_type
($1->stype
);
177 printd
(DEBUG_PARSE
, "%s:%d:default(%u)\n",
178 zconf_curname
(), zconf_lineno
(),
182 config_option: T_SELECT T_WORD if_expr T_EOL
184 menu_add_symbol
(P_SELECT
, sym_lookup
($2, 0), $3);
185 printd
(DEBUG_PARSE
, "%s:%d:select\n", zconf_curname
(), zconf_lineno
());
188 config_option: T_RANGE symbol symbol if_expr T_EOL
190 menu_add_expr
(P_RANGE
, expr_alloc_comp
(E_RANGE
,$2, $3), $4);
191 printd
(DEBUG_PARSE
, "%s:%d:range\n", zconf_curname
(), zconf_lineno
());
196 choice: T_CHOICE T_EOL
198 struct symbol
*sym
= sym_lookup
(NULL
, 0);
199 sym
->flags |
= SYMBOL_CHOICE
;
201 menu_add_expr
(P_CHOICE
, NULL
, NULL
);
202 printd
(DEBUG_PARSE
, "%s:%d:choice\n", zconf_curname
(), zconf_lineno
());
205 choice_entry: choice choice_option_list
213 if
(zconf_endtoken
($1, T_CHOICE
, T_ENDCHOICE
)) {
215 printd
(DEBUG_PARSE
, "%s:%d:endchoice\n", zconf_curname
(), zconf_lineno
());
220 choice_entry choice_block choice_end
221 | choice_entry choice_block
223 printf
("%s:%d: missing 'endchoice' for this 'choice' statement\n", current_menu
->file
->name
, current_menu
->lineno
);
229 | choice_option_list choice_option
230 | choice_option_list depends
231 | choice_option_list help
232 | choice_option_list T_EOL
235 choice_option: T_PROMPT prompt if_expr T_EOL
237 menu_add_prompt
(P_PROMPT
, $2, $3);
238 printd
(DEBUG_PARSE
, "%s:%d:prompt\n", zconf_curname
(), zconf_lineno
());
241 choice_option: T_TYPE prompt_stmt_opt T_EOL
243 if
($1->stype
== S_BOOLEAN ||
$1->stype
== S_TRISTATE
) {
244 menu_set_type
($1->stype
);
245 printd
(DEBUG_PARSE
, "%s:%d:type(%u)\n",
246 zconf_curname
(), zconf_lineno
(),
252 choice_option: T_OPTIONAL T_EOL
254 current_entry
->sym
->flags |
= SYMBOL_OPTIONAL
;
255 printd
(DEBUG_PARSE
, "%s:%d:optional\n", zconf_curname
(), zconf_lineno
());
258 choice_option: T_DEFAULT T_WORD if_expr T_EOL
260 if
($1->stype
== S_UNKNOWN
) {
261 menu_add_symbol
(P_DEFAULT
, sym_lookup
($2, 0), $3);
262 printd
(DEBUG_PARSE
, "%s:%d:default\n",
263 zconf_curname
(), zconf_lineno
());
270 | choice_block common_block
277 printd
(DEBUG_PARSE
, "%s:%d:if\n", zconf_curname
(), zconf_lineno
());
278 menu_add_entry
(NULL
);
286 if
(zconf_endtoken
($1, T_IF
, T_ENDIF
)) {
288 printd
(DEBUG_PARSE
, "%s:%d:endif\n", zconf_curname
(), zconf_lineno
());
296 printf
("%s:%d: missing 'endif' for this 'if' statement\n", current_menu
->file
->name
, current_menu
->lineno
);
302 | if_block common_block
304 | if_block choice_stmt
309 menu: T_MENU prompt T_EOL
311 menu_add_entry
(NULL
);
312 menu_add_prompt
(P_MENU
, $2, NULL
);
313 printd
(DEBUG_PARSE
, "%s:%d:menu\n", zconf_curname
(), zconf_lineno
());
316 menu_entry: menu depends_list
324 if
(zconf_endtoken
($1, T_MENU
, T_ENDMENU
)) {
326 printd
(DEBUG_PARSE
, "%s:%d:endmenu\n", zconf_curname
(), zconf_lineno
());
331 menu_entry menu_block menu_end
332 | menu_entry menu_block
334 printf
("%s:%d: missing 'endmenu' for this 'menu' statement\n", current_menu
->file
->name
, current_menu
->lineno
);
340 | menu_block common_block
341 | menu_block menu_stmt
342 | menu_block choice_stmt
343 | menu_block
error T_EOL
{ zconfprint
("invalid menu option"); yyerrok; }
346 source: T_SOURCE prompt T_EOL
349 printd
(DEBUG_PARSE
, "%s:%d:source %s\n", zconf_curname
(), zconf_lineno
(), $2);
359 comment: T_COMMENT prompt T_EOL
361 menu_add_entry
(NULL
);
362 menu_add_prompt
(P_COMMENT
, $2, NULL
);
363 printd
(DEBUG_PARSE
, "%s:%d:comment\n", zconf_curname
(), zconf_lineno
());
366 comment_stmt: comment depends_list
373 help_start: T_HELP T_EOL
375 printd
(DEBUG_PARSE
, "%s:%d:help\n", zconf_curname
(), zconf_lineno
());
379 help: help_start T_HELPTEXT
381 current_entry
->sym
->help
= $2;
386 depends_list: /* empty */
387 | depends_list depends
391 depends: T_DEPENDS T_ON expr T_EOL
394 printd
(DEBUG_PARSE
, "%s:%d:depends on\n", zconf_curname
(), zconf_lineno
());
396 | T_DEPENDS expr T_EOL
399 printd
(DEBUG_PARSE
, "%s:%d:depends\n", zconf_curname
(), zconf_lineno
());
401 | T_REQUIRES expr T_EOL
404 printd
(DEBUG_PARSE
, "%s:%d:requires\n", zconf_curname
(), zconf_lineno
());
407 /* prompt statement */
413 menu_add_prompt
(P_PROMPT
, $1, $2);
420 end: T_ENDMENU nl_or_eof
{ $$
= T_ENDMENU
; }
421 | T_ENDCHOICE nl_or_eof
{ $$
= T_ENDCHOICE
; }
422 | T_ENDIF nl_or_eof
{ $$
= T_ENDIF
; }
428 if_expr: /* empty */ { $$
= NULL
; }
429 | T_IF expr
{ $$
= $2; }
432 expr: symbol
{ $$
= expr_alloc_symbol
($1); }
433 | symbol T_EQUAL symbol
{ $$
= expr_alloc_comp
(E_EQUAL
, $1, $3); }
434 | symbol T_UNEQUAL symbol
{ $$
= expr_alloc_comp
(E_UNEQUAL
, $1, $3); }
435 | T_OPEN_PAREN expr T_CLOSE_PAREN
{ $$
= $2; }
436 | T_NOT expr
{ $$
= expr_alloc_one
(E_NOT
, $2); }
437 | expr T_OR expr
{ $$
= expr_alloc_two
(E_OR
, $1, $3); }
438 | expr T_AND expr
{ $$
= expr_alloc_two
(E_AND
, $1, $3); }
441 symbol: T_WORD
{ $$
= sym_lookup
($1, 0); free
($1); }
442 | T_WORD_QUOTE
{ $$
= sym_lookup
($1, 1); free
($1); }
447 void conf_parse
(const char *name
)
452 zconf_initscan
(name
);
456 modules_sym
= sym_lookup
("MODULES", 0);
457 rootmenu.prompt
= menu_add_prompt
(P_MENU
, "Linux Kernel Configuration", NULL
);
463 menu_finalize
(&rootmenu
);
464 for_all_symbols
(i
, sym
) {
468 sym_change_count
= 1;
471 const char *zconf_tokenname
(int token
)
474 case T_MENU
: return
"menu";
475 case T_ENDMENU
: return
"endmenu";
476 case T_CHOICE
: return
"choice";
477 case T_ENDCHOICE
: return
"endchoice";
478 case T_IF
: return
"if";
479 case T_ENDIF
: return
"endif";
484 static bool zconf_endtoken
(int token
, int starttoken
, int endtoken
)
486 if
(token
!= endtoken
) {
487 zconfprint
("unexpected '%s' within %s block", zconf_tokenname
(token
), zconf_tokenname
(starttoken
));
491 if
(current_menu
->file
!= current_file
) {
492 zconfprint
("'%s' in different file than '%s'", zconf_tokenname
(token
), zconf_tokenname
(starttoken
));
493 zconfprint
("location of the '%s'", zconf_tokenname
(starttoken
));
500 static void zconfprint
(const char *err
, ...
)
504 fprintf
(stderr
, "%s:%d: ", zconf_curname
(), zconf_lineno
() + 1);
506 vfprintf
(stderr
, err
, ap
);
508 fprintf
(stderr
, "\n");
511 static void zconferror
(const char *err
)
513 fprintf
(stderr
, "%s:%d: %s\n", zconf_curname
(), zconf_lineno
() + 1, err
);
516 void print_quoted_string
(FILE *out
, const char *str
)
522 while
((p
= strchr
(str
, '"'))) {
525 fprintf
(out
, "%.*s", len
, str
);
533 void print_symbol
(FILE *out
, struct menu
*menu
)
535 struct symbol
*sym
= menu
->sym
;
536 struct property
*prop
;
538 if
(sym_is_choice
(sym
))
539 fprintf
(out
, "choice\n");
541 fprintf
(out
, "config %s\n", sym
->name
);
544 fputs
(" boolean\n", out
);
547 fputs
(" tristate\n", out
);
550 fputs
(" string\n", out
);
553 fputs
(" integer\n", out
);
556 fputs
(" hex\n", out
);
559 fputs
(" ???\n", out
);
562 for
(prop
= sym
->prop
; prop
; prop
= prop
->next
) {
563 if
(prop
->menu
!= menu
)
565 switch
(prop
->type
) {
567 fputs
(" prompt ", out
);
568 print_quoted_string
(out
, prop
->text
);
569 if
(!expr_is_yes
(prop
->visible.expr
)) {
571 expr_fprint
(prop
->visible.expr
, out
);
576 fputs
( " default ", out
);
577 expr_fprint
(prop
->expr
, out
);
578 if
(!expr_is_yes
(prop
->visible.expr
)) {
580 expr_fprint
(prop
->visible.expr
, out
);
585 fputs
(" #choice value\n", out
);
588 fprintf
(out
, " unknown prop %d!\n", prop
->type
);
593 int len
= strlen
(sym
->help
);
594 while
(sym
->help
[--len
] == '\n')
596 fprintf
(out
, " help\n%s\n", sym
->help
);
601 void zconfdump
(FILE *out
)
603 struct property
*prop
;
607 menu
= rootmenu.list
;
609 if
((sym
= menu
->sym
))
610 print_symbol
(out
, menu
);
611 else if
((prop
= menu
->prompt
)) {
612 switch
(prop
->type
) {
614 fputs
("\ncomment ", out
);
615 print_quoted_string
(out
, prop
->text
);
619 fputs
("\nmenu ", out
);
620 print_quoted_string
(out
, prop
->text
);
626 if
(!expr_is_yes
(prop
->visible.expr
)) {
627 fputs
(" depends ", out
);
628 expr_fprint
(prop
->visible.expr
, out
);
638 else while
((menu
= menu
->parent
)) {
639 if
(menu
->prompt
&& menu
->prompt
->type
== P_MENU
)
640 fputs
("\nendmenu\n", out
);
649 #include "lex.zconf.c"
651 #include "confdata.c"