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