1 /*
2 * Copyright (C) 2002 Roman Zippel <zippel@linux-m68k.org>
3 * Released under the terms of the GNU GPL v2.0.
4 */
5
6 #include <ctype.h>
7 #include <limits.h>
8 #include <stdio.h>
9 #include <stdlib.h>
10 #include <string.h>
11 #include <time.h>
12 #include <unistd.h>
13 #include <getopt.h>
14 #include <sys/stat.h>
15 #include <sys/time.h>
16 #include <errno.h>
17
18 #include "lkc.h"
19
20 static void conf(struct menu *menu);
21 static void check_conf(struct menu *menu);
22
23 enum input_mode {
24 oldaskconfig,
25 syncconfig,
26 oldconfig,
27 allnoconfig,
28 allyesconfig,
29 allmodconfig,
30 alldefconfig,
31 randconfig,
32 defconfig,
33 savedefconfig,
34 listnewconfig,
35 olddefconfig,
36 };
37 static enum input_mode input_mode = oldaskconfig;
38
39 static int indent = 1;
40 static int tty_stdio;
41 static int sync_kconfig;
42 static int conf_cnt;
43 static char line[PATH_MAX];
44 static struct menu *rootEntry;
45
print_help(struct menu * menu)46 static void print_help(struct menu *menu)
47 {
48 struct gstr help = str_new();
49
50 menu_get_ext_help(menu, &help);
51
52 printf("\n%s\n", str_get(&help));
53 str_free(&help);
54 }
55
strip(char * str)56 static void strip(char *str)
57 {
58 char *p = str;
59 int l;
60
61 while ((isspace(*p)))
62 p++;
63 l = strlen(p);
64 if (p != str)
65 memmove(str, p, l + 1);
66 if (!l)
67 return;
68 p = str + l - 1;
69 while ((isspace(*p)))
70 *p-- = 0;
71 }
72
73 /* Helper function to facilitate fgets() by Jean Sacren. */
xfgets(char * str,int size,FILE * in)74 static void xfgets(char *str, int size, FILE *in)
75 {
76 if (!fgets(str, size, in))
77 fprintf(stderr, "\nError in reading or end of file.\n");
78
79 if (!tty_stdio)
80 printf("%s", str);
81 }
82
conf_askvalue(struct symbol * sym,const char * def)83 static int conf_askvalue(struct symbol *sym, const char *def)
84 {
85 enum symbol_type type = sym_get_type(sym);
86
87 if (!sym_has_value(sym))
88 printf("(NEW) ");
89
90 line[0] = '\n';
91 line[1] = 0;
92
93 if (!sym_is_changable(sym)) {
94 printf("%s\n", def);
95 line[0] = '\n';
96 line[1] = 0;
97 return 0;
98 }
99
100 switch (input_mode) {
101 case oldconfig:
102 case syncconfig:
103 if (sym_has_value(sym)) {
104 printf("%s\n", def);
105 return 0;
106 }
107 /* fall through */
108 case oldaskconfig:
109 fflush(stdout);
110 xfgets(line, sizeof(line), stdin);
111 return 1;
112 default:
113 break;
114 }
115
116 switch (type) {
117 case S_INT:
118 case S_HEX:
119 case S_STRING:
120 printf("%s\n", def);
121 return 1;
122 default:
123 ;
124 }
125 printf("%s", line);
126 return 1;
127 }
128
conf_string(struct menu * menu)129 static int conf_string(struct menu *menu)
130 {
131 struct symbol *sym = menu->sym;
132 const char *def;
133
134 while (1) {
135 printf("%*s%s ", indent - 1, "", menu->prompt->text);
136 printf("(%s) ", sym->name);
137 def = sym_get_string_value(sym);
138 if (sym_get_string_value(sym))
139 printf("[%s] ", def);
140 if (!conf_askvalue(sym, def))
141 return 0;
142 switch (line[0]) {
143 case '\n':
144 break;
145 case '?':
146 /* print help */
147 if (line[1] == '\n') {
148 print_help(menu);
149 def = NULL;
150 break;
151 }
152 /* fall through */
153 default:
154 line[strlen(line)-1] = 0;
155 def = line;
156 }
157 if (def && sym_set_string_value(sym, def))
158 return 0;
159 }
160 }
161
conf_sym(struct menu * menu)162 static int conf_sym(struct menu *menu)
163 {
164 struct symbol *sym = menu->sym;
165 tristate oldval, newval;
166
167 while (1) {
168 printf("%*s%s ", indent - 1, "", menu->prompt->text);
169 if (sym->name)
170 printf("(%s) ", sym->name);
171 putchar('[');
172 oldval = sym_get_tristate_value(sym);
173 switch (oldval) {
174 case no:
175 putchar('N');
176 break;
177 case mod:
178 putchar('M');
179 break;
180 case yes:
181 putchar('Y');
182 break;
183 }
184 if (oldval != no && sym_tristate_within_range(sym, no))
185 printf("/n");
186 if (oldval != mod && sym_tristate_within_range(sym, mod))
187 printf("/m");
188 if (oldval != yes && sym_tristate_within_range(sym, yes))
189 printf("/y");
190 printf("/?] ");
191 if (!conf_askvalue(sym, sym_get_string_value(sym)))
192 return 0;
193 strip(line);
194
195 switch (line[0]) {
196 case 'n':
197 case 'N':
198 newval = no;
199 if (!line[1] || !strcmp(&line[1], "o"))
200 break;
201 continue;
202 case 'm':
203 case 'M':
204 newval = mod;
205 if (!line[1])
206 break;
207 continue;
208 case 'y':
209 case 'Y':
210 newval = yes;
211 if (!line[1] || !strcmp(&line[1], "es"))
212 break;
213 continue;
214 case 0:
215 newval = oldval;
216 break;
217 case '?':
218 goto help;
219 default:
220 continue;
221 }
222 if (sym_set_tristate_value(sym, newval))
223 return 0;
224 help:
225 print_help(menu);
226 }
227 }
228
conf_choice(struct menu * menu)229 static int conf_choice(struct menu *menu)
230 {
231 struct symbol *sym, *def_sym;
232 struct menu *child;
233 bool is_new;
234
235 sym = menu->sym;
236 is_new = !sym_has_value(sym);
237 if (sym_is_changable(sym)) {
238 conf_sym(menu);
239 sym_calc_value(sym);
240 switch (sym_get_tristate_value(sym)) {
241 case no:
242 return 1;
243 case mod:
244 return 0;
245 case yes:
246 break;
247 }
248 } else {
249 switch (sym_get_tristate_value(sym)) {
250 case no:
251 return 1;
252 case mod:
253 printf("%*s%s\n", indent - 1, "", menu_get_prompt(menu));
254 return 0;
255 case yes:
256 break;
257 }
258 }
259
260 while (1) {
261 int cnt, def;
262
263 printf("%*s%s\n", indent - 1, "", menu_get_prompt(menu));
264 def_sym = sym_get_choice_value(sym);
265 cnt = def = 0;
266 line[0] = 0;
267 for (child = menu->list; child; child = child->next) {
268 if (!menu_is_visible(child))
269 continue;
270 if (!child->sym) {
271 printf("%*c %s\n", indent, '*', menu_get_prompt(child));
272 continue;
273 }
274 cnt++;
275 if (child->sym == def_sym) {
276 def = cnt;
277 printf("%*c", indent, '>');
278 } else
279 printf("%*c", indent, ' ');
280 printf(" %d. %s", cnt, menu_get_prompt(child));
281 if (child->sym->name)
282 printf(" (%s)", child->sym->name);
283 if (!sym_has_value(child->sym))
284 printf(" (NEW)");
285 printf("\n");
286 }
287 printf("%*schoice", indent - 1, "");
288 if (cnt == 1) {
289 printf("[1]: 1\n");
290 goto conf_childs;
291 }
292 printf("[1-%d?]: ", cnt);
293 switch (input_mode) {
294 case oldconfig:
295 case syncconfig:
296 if (!is_new) {
297 cnt = def;
298 printf("%d\n", cnt);
299 break;
300 }
301 /* fall through */
302 case oldaskconfig:
303 fflush(stdout);
304 xfgets(line, sizeof(line), stdin);
305 strip(line);
306 if (line[0] == '?') {
307 print_help(menu);
308 continue;
309 }
310 if (!line[0])
311 cnt = def;
312 else if (isdigit(line[0]))
313 cnt = atoi(line);
314 else
315 continue;
316 break;
317 default:
318 break;
319 }
320
321 conf_childs:
322 for (child = menu->list; child; child = child->next) {
323 if (!child->sym || !menu_is_visible(child))
324 continue;
325 if (!--cnt)
326 break;
327 }
328 if (!child)
329 continue;
330 if (line[0] && line[strlen(line) - 1] == '?') {
331 print_help(child);
332 continue;
333 }
334 sym_set_choice_value(sym, child->sym);
335 for (child = child->list; child; child = child->next) {
336 indent += 2;
337 conf(child);
338 indent -= 2;
339 }
340 return 1;
341 }
342 }
343
conf(struct menu * menu)344 static void conf(struct menu *menu)
345 {
346 struct symbol *sym;
347 struct property *prop;
348 struct menu *child;
349
350 if (!menu_is_visible(menu))
351 return;
352
353 sym = menu->sym;
354 prop = menu->prompt;
355 if (prop) {
356 const char *prompt;
357
358 switch (prop->type) {
359 case P_MENU:
360 /*
361 * Except in oldaskconfig mode, we show only menus that
362 * contain new symbols.
363 */
364 if (input_mode != oldaskconfig && rootEntry != menu) {
365 check_conf(menu);
366 return;
367 }
368 /* fall through */
369 case P_COMMENT:
370 prompt = menu_get_prompt(menu);
371 if (prompt)
372 printf("%*c\n%*c %s\n%*c\n",
373 indent, '*',
374 indent, '*', prompt,
375 indent, '*');
376 default:
377 ;
378 }
379 }
380
381 if (!sym)
382 goto conf_childs;
383
384 if (sym_is_choice(sym)) {
385 conf_choice(menu);
386 if (sym->curr.tri != mod)
387 return;
388 goto conf_childs;
389 }
390
391 switch (sym->type) {
392 case S_INT:
393 case S_HEX:
394 case S_STRING:
395 conf_string(menu);
396 break;
397 default:
398 conf_sym(menu);
399 break;
400 }
401
402 conf_childs:
403 if (sym)
404 indent += 2;
405 for (child = menu->list; child; child = child->next)
406 conf(child);
407 if (sym)
408 indent -= 2;
409 }
410
check_conf(struct menu * menu)411 static void check_conf(struct menu *menu)
412 {
413 struct symbol *sym;
414 struct menu *child;
415
416 if (!menu_is_visible(menu))
417 return;
418
419 sym = menu->sym;
420 if (sym && !sym_has_value(sym)) {
421 if (sym_is_changable(sym) ||
422 (sym_is_choice(sym) && sym_get_tristate_value(sym) == yes)) {
423 if (input_mode == listnewconfig) {
424 if (sym->name) {
425 const char *str;
426
427 if (sym->type == S_STRING) {
428 str = sym_get_string_value(sym);
429 str = sym_escape_string_value(str);
430 printf("%s%s=%s\n", CONFIG_, sym->name, str);
431 free((void *)str);
432 } else {
433 str = sym_get_string_value(sym);
434 printf("%s%s=%s\n", CONFIG_, sym->name, str);
435 }
436 }
437 } else {
438 if (!conf_cnt++)
439 printf("*\n* Restart config...\n*\n");
440 rootEntry = menu_get_parent_menu(menu);
441 conf(rootEntry);
442 }
443 }
444 }
445
446 for (child = menu->list; child; child = child->next)
447 check_conf(child);
448 }
449
450 static struct option long_opts[] = {
451 {"oldaskconfig", no_argument, NULL, oldaskconfig},
452 {"oldconfig", no_argument, NULL, oldconfig},
453 {"syncconfig", no_argument, NULL, syncconfig},
454 {"defconfig", optional_argument, NULL, defconfig},
455 {"savedefconfig", required_argument, NULL, savedefconfig},
456 {"allnoconfig", no_argument, NULL, allnoconfig},
457 {"allyesconfig", no_argument, NULL, allyesconfig},
458 {"allmodconfig", no_argument, NULL, allmodconfig},
459 {"alldefconfig", no_argument, NULL, alldefconfig},
460 {"randconfig", no_argument, NULL, randconfig},
461 {"listnewconfig", no_argument, NULL, listnewconfig},
462 {"olddefconfig", no_argument, NULL, olddefconfig},
463 /*
464 * oldnoconfig is an alias of olddefconfig, because people already
465 * are dependent on its behavior(sets new symbols to their default
466 * value but not 'n') with the counter-intuitive name.
467 */
468 {"oldnoconfig", no_argument, NULL, olddefconfig},
469 {NULL, 0, NULL, 0}
470 };
471
conf_usage(const char * progname)472 static void conf_usage(const char *progname)
473 {
474
475 printf("Usage: %s [-s] [option] <kconfig-file>\n", progname);
476 printf("[option] is _one_ of the following:\n");
477 printf(" --listnewconfig List new options\n");
478 printf(" --oldaskconfig Start a new configuration using a line-oriented program\n");
479 printf(" --oldconfig Update a configuration using a provided .config as base\n");
480 printf(" --syncconfig Similar to oldconfig but generates configuration in\n"
481 " include/{generated/,config/}\n");
482 printf(" --olddefconfig Same as oldconfig but sets new symbols to their default value\n");
483 printf(" --oldnoconfig An alias of olddefconfig\n");
484 printf(" --defconfig <file> New config with default defined in <file>\n");
485 printf(" --savedefconfig <file> Save the minimal current configuration to <file>\n");
486 printf(" --allnoconfig New config where all options are answered with no\n");
487 printf(" --allyesconfig New config where all options are answered with yes\n");
488 printf(" --allmodconfig New config where all options are answered with mod\n");
489 printf(" --alldefconfig New config with all symbols set to default\n");
490 printf(" --randconfig New config with random answer to all options\n");
491 }
492
main(int ac,char ** av)493 int main(int ac, char **av)
494 {
495 const char *progname = av[0];
496 int opt;
497 const char *name, *defconfig_file = NULL /* gcc uninit */;
498 struct stat tmpstat;
499 int no_conf_write = 0;
500
501 tty_stdio = isatty(0) && isatty(1);
502
503 while ((opt = getopt_long(ac, av, "s", long_opts, NULL)) != -1) {
504 if (opt == 's') {
505 conf_set_message_callback(NULL);
506 continue;
507 }
508 input_mode = (enum input_mode)opt;
509 switch (opt) {
510 case syncconfig:
511 /*
512 * syncconfig is invoked during the build stage.
513 * Suppress distracting "configuration written to ..."
514 */
515 conf_set_message_callback(NULL);
516 sync_kconfig = 1;
517 break;
518 case defconfig:
519 case savedefconfig:
520 defconfig_file = optarg;
521 break;
522 case randconfig:
523 {
524 struct timeval now;
525 unsigned int seed;
526 char *seed_env;
527
528 /*
529 * Use microseconds derived seed,
530 * compensate for systems where it may be zero
531 */
532 gettimeofday(&now, NULL);
533 seed = (unsigned int)((now.tv_sec + 1) * (now.tv_usec + 1));
534
535 seed_env = getenv("KCONFIG_SEED");
536 if( seed_env && *seed_env ) {
537 char *endp;
538 int tmp = (int)strtol(seed_env, &endp, 0);
539 if (*endp == '\0') {
540 seed = tmp;
541 }
542 }
543 fprintf( stderr, "KCONFIG_SEED=0x%X\n", seed );
544 srand(seed);
545 break;
546 }
547 case oldaskconfig:
548 case oldconfig:
549 case allnoconfig:
550 case allyesconfig:
551 case allmodconfig:
552 case alldefconfig:
553 case listnewconfig:
554 case olddefconfig:
555 break;
556 case '?':
557 conf_usage(progname);
558 exit(1);
559 break;
560 }
561 }
562 if (ac == optind) {
563 fprintf(stderr, "%s: Kconfig file missing\n", av[0]);
564 conf_usage(progname);
565 exit(1);
566 }
567 name = av[optind];
568 conf_parse(name);
569 //zconfdump(stdout);
570 if (sync_kconfig) {
571 name = conf_get_configname();
572 if (stat(name, &tmpstat)) {
573 fprintf(stderr, "***\n"
574 "*** Configuration file \"%s\" not found!\n"
575 "***\n"
576 "*** Please run some configurator (e.g. \"make oldconfig\" or\n"
577 "*** \"make menuconfig\" or \"make xconfig\").\n"
578 "***\n", name);
579 exit(1);
580 }
581 }
582
583 switch (input_mode) {
584 case defconfig:
585 if (!defconfig_file)
586 defconfig_file = conf_get_default_confname();
587 if (conf_read(defconfig_file)) {
588 fprintf(stderr,
589 "***\n"
590 "*** Can't find default configuration \"%s\"!\n"
591 "***\n",
592 defconfig_file);
593 exit(1);
594 }
595 break;
596 case savedefconfig:
597 case syncconfig:
598 case oldaskconfig:
599 case oldconfig:
600 case listnewconfig:
601 case olddefconfig:
602 conf_read(NULL);
603 break;
604 case allnoconfig:
605 case allyesconfig:
606 case allmodconfig:
607 case alldefconfig:
608 case randconfig:
609 name = getenv("KCONFIG_ALLCONFIG");
610 if (!name)
611 break;
612 if ((strcmp(name, "") != 0) && (strcmp(name, "1") != 0)) {
613 if (conf_read_simple(name, S_DEF_USER)) {
614 fprintf(stderr,
615 "*** Can't read seed configuration \"%s\"!\n",
616 name);
617 exit(1);
618 }
619 break;
620 }
621 switch (input_mode) {
622 case allnoconfig: name = "allno.config"; break;
623 case allyesconfig: name = "allyes.config"; break;
624 case allmodconfig: name = "allmod.config"; break;
625 case alldefconfig: name = "alldef.config"; break;
626 case randconfig: name = "allrandom.config"; break;
627 default: break;
628 }
629 if (conf_read_simple(name, S_DEF_USER) &&
630 conf_read_simple("all.config", S_DEF_USER)) {
631 fprintf(stderr,
632 "*** KCONFIG_ALLCONFIG set, but no \"%s\" or \"all.config\" file found\n",
633 name);
634 exit(1);
635 }
636 break;
637 default:
638 break;
639 }
640
641 if (sync_kconfig) {
642 name = getenv("KCONFIG_NOSILENTUPDATE");
643 if (name && *name) {
644 if (conf_get_changed()) {
645 fprintf(stderr,
646 "\n*** The configuration requires explicit update.\n\n");
647 return 1;
648 }
649 no_conf_write = 1;
650 }
651 }
652
653 switch (input_mode) {
654 case allnoconfig:
655 conf_set_all_new_symbols(def_no);
656 break;
657 case allyesconfig:
658 conf_set_all_new_symbols(def_yes);
659 break;
660 case allmodconfig:
661 conf_set_all_new_symbols(def_mod);
662 break;
663 case alldefconfig:
664 conf_set_all_new_symbols(def_default);
665 break;
666 case randconfig:
667 /* Really nothing to do in this loop */
668 while (conf_set_all_new_symbols(def_random)) ;
669 break;
670 case defconfig:
671 conf_set_all_new_symbols(def_default);
672 break;
673 case savedefconfig:
674 break;
675 case oldaskconfig:
676 rootEntry = &rootmenu;
677 conf(&rootmenu);
678 input_mode = oldconfig;
679 /* fall through */
680 case oldconfig:
681 case listnewconfig:
682 case syncconfig:
683 /* Update until a loop caused no more changes */
684 do {
685 conf_cnt = 0;
686 check_conf(&rootmenu);
687 } while (conf_cnt);
688 break;
689 case olddefconfig:
690 default:
691 break;
692 }
693
694 if (sync_kconfig) {
695 /* syncconfig is used during the build so we shall update autoconf.
696 * All other commands are only used to generate a config.
697 */
698 if (!no_conf_write && conf_write(NULL)) {
699 fprintf(stderr, "\n*** Error during writing of the configuration.\n\n");
700 exit(1);
701 }
702 if (conf_write_autoconf()) {
703 fprintf(stderr, "\n*** Error during update of the configuration.\n\n");
704 return 1;
705 }
706 } else if (input_mode == savedefconfig) {
707 if (conf_write_defconfig(defconfig_file)) {
708 fprintf(stderr, "n*** Error while saving defconfig to: %s\n\n",
709 defconfig_file);
710 return 1;
711 }
712 } else if (input_mode != listnewconfig) {
713 if (conf_write(NULL)) {
714 fprintf(stderr, "\n*** Error during writing of the configuration.\n\n");
715 exit(1);
716 }
717 }
718 return 0;
719 }
720