fix static linking for FDPIC toolchains
[uclibc-ng.git] / extra / config / conf.c
blob34bb4f587c30127fdf6cfdf27309aa8f1993ebe9
1 /*
2 * Copyright (C) 2002 Roman Zippel <zippel@linux-m68k.org>
3 * Released under the terms of the GNU GPL v2.0.
4 */
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 <sys/stat.h>
15 #include <sys/time.h>
16 #include <errno.h>
18 #include "lkc.h"
20 static void conf(struct menu *menu);
21 static void check_conf(struct menu *menu);
22 static void xfgets(char *str, int size, FILE *in);
24 enum input_mode {
25 oldaskconfig,
26 silentoldconfig,
27 oldconfig,
28 allnoconfig,
29 allyesconfig,
30 allmodconfig,
31 alldefconfig,
32 randconfig,
33 defconfig,
34 savedefconfig,
35 listnewconfig,
36 olddefconfig,
37 } input_mode = oldaskconfig;
39 static int indent = 1;
40 static int tty_stdio;
41 static int valid_stdin = 1;
42 static int sync_kconfig;
43 static int conf_cnt;
44 static char line[PATH_MAX];
45 static struct menu *rootEntry;
47 static void print_help(struct menu *menu)
49 struct gstr help = str_new();
51 menu_get_ext_help(menu, &help);
53 printf("\n%s\n", str_get(&help));
54 str_free(&help);
57 static void strip(char *str)
59 char *p = str;
60 int l;
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;
74 static void check_stdin(void)
76 if (!valid_stdin) {
77 printf(_("aborted!\n\n"));
78 printf(_("Console input/output is redirected. "));
79 printf(_("Run 'make oldconfig' to update configuration.\n\n"));
80 exit(1);
84 static int conf_askvalue(struct symbol *sym, const char *def)
86 enum symbol_type type = sym_get_type(sym);
88 if (!sym_has_value(sym))
89 printf(_("(NEW) "));
91 line[0] = '\n';
92 line[1] = 0;
94 if (!sym_is_changable(sym)) {
95 printf("%s\n", def);
96 line[0] = '\n';
97 line[1] = 0;
98 return 0;
101 switch (input_mode) {
102 case oldconfig:
103 case silentoldconfig:
104 if (sym_has_value(sym)) {
105 printf("%s\n", def);
106 return 0;
108 check_stdin();
109 /* fall through */
110 case oldaskconfig:
111 fflush(stdout);
112 xfgets(line, sizeof(line), stdin);
113 if (!tty_stdio)
114 printf("\n");
115 return 1;
116 default:
117 break;
120 switch (type) {
121 case S_INT:
122 case S_HEX:
123 case S_STRING:
124 printf("%s\n", def);
125 return 1;
126 default:
129 printf("%s", line);
130 return 1;
133 static int conf_string(struct menu *menu)
135 struct symbol *sym = menu->sym;
136 const char *def;
138 while (1) {
139 printf("%*s%s ", indent - 1, "", _(menu->prompt->text));
140 printf("(%s) ", sym->name);
141 def = sym_get_string_value(sym);
142 if (sym_get_string_value(sym))
143 printf("[%s] ", def);
144 if (!conf_askvalue(sym, def))
145 return 0;
146 switch (line[0]) {
147 case '\n':
148 break;
149 case '?':
150 /* print help */
151 if (line[1] == '\n') {
152 print_help(menu);
153 def = NULL;
154 break;
156 /* fall through */
157 default:
158 line[strlen(line)-1] = 0;
159 def = line;
161 if (def && sym_set_string_value(sym, def))
162 return 0;
166 static int conf_sym(struct menu *menu)
168 struct symbol *sym = menu->sym;
169 tristate oldval, newval;
171 while (1) {
172 printf("%*s%s ", indent - 1, "", _(menu->prompt->text));
173 if (sym->name)
174 printf("(%s) ", sym->name);
175 putchar('[');
176 oldval = sym_get_tristate_value(sym);
177 switch (oldval) {
178 case no:
179 putchar('N');
180 break;
181 case mod:
182 putchar('M');
183 break;
184 case yes:
185 putchar('Y');
186 break;
188 if (oldval != no && sym_tristate_within_range(sym, no))
189 printf("/n");
190 if (oldval != mod && sym_tristate_within_range(sym, mod))
191 printf("/m");
192 if (oldval != yes && sym_tristate_within_range(sym, yes))
193 printf("/y");
194 if (menu_has_help(menu))
195 printf("/?");
196 printf("] ");
197 if (!conf_askvalue(sym, sym_get_string_value(sym)))
198 return 0;
199 strip(line);
201 switch (line[0]) {
202 case 'n':
203 case 'N':
204 newval = no;
205 if (!line[1] || !strcmp(&line[1], "o"))
206 break;
207 continue;
208 case 'm':
209 case 'M':
210 newval = mod;
211 if (!line[1])
212 break;
213 continue;
214 case 'y':
215 case 'Y':
216 newval = yes;
217 if (!line[1] || !strcmp(&line[1], "es"))
218 break;
219 continue;
220 case 0:
221 newval = oldval;
222 break;
223 case '?':
224 goto help;
225 default:
226 continue;
228 if (sym_set_tristate_value(sym, newval))
229 return 0;
230 help:
231 print_help(menu);
235 static int conf_choice(struct menu *menu)
237 struct symbol *sym, *def_sym;
238 struct menu *child;
239 bool is_new;
241 sym = menu->sym;
242 is_new = !sym_has_value(sym);
243 if (sym_is_changable(sym)) {
244 conf_sym(menu);
245 sym_calc_value(sym);
246 switch (sym_get_tristate_value(sym)) {
247 case no:
248 return 1;
249 case mod:
250 return 0;
251 case yes:
252 break;
254 } else {
255 switch (sym_get_tristate_value(sym)) {
256 case no:
257 return 1;
258 case mod:
259 printf("%*s%s\n", indent - 1, "", _(menu_get_prompt(menu)));
260 return 0;
261 case yes:
262 break;
266 while (1) {
267 int cnt, def;
269 printf("%*s%s\n", indent - 1, "", _(menu_get_prompt(menu)));
270 def_sym = sym_get_choice_value(sym);
271 cnt = def = 0;
272 line[0] = 0;
273 for (child = menu->list; child; child = child->next) {
274 if (!menu_is_visible(child))
275 continue;
276 if (!child->sym) {
277 printf("%*c %s\n", indent, '*', _(menu_get_prompt(child)));
278 continue;
280 cnt++;
281 if (child->sym == def_sym) {
282 def = cnt;
283 printf("%*c", indent, '>');
284 } else
285 printf("%*c", indent, ' ');
286 printf(" %d. %s", cnt, _(menu_get_prompt(child)));
287 if (child->sym->name)
288 printf(" (%s)", child->sym->name);
289 if (!sym_has_value(child->sym))
290 printf(_(" (NEW)"));
291 printf("\n");
293 printf(_("%*schoice"), indent - 1, "");
294 if (cnt == 1) {
295 printf("[1]: 1\n");
296 goto conf_childs;
298 printf("[1-%d", cnt);
299 if (menu_has_help(menu))
300 printf("?");
301 printf("]: ");
302 switch (input_mode) {
303 case oldconfig:
304 case silentoldconfig:
305 if (!is_new) {
306 cnt = def;
307 printf("%d\n", cnt);
308 break;
310 check_stdin();
311 /* fall through */
312 case oldaskconfig:
313 fflush(stdout);
314 xfgets(line, sizeof(line), stdin);
315 strip(line);
316 if (line[0] == '?') {
317 print_help(menu);
318 continue;
320 if (!line[0])
321 cnt = def;
322 else if (isdigit(line[0]))
323 cnt = atoi(line);
324 else
325 continue;
326 break;
327 default:
328 break;
331 conf_childs:
332 for (child = menu->list; child; child = child->next) {
333 if (!child->sym || !menu_is_visible(child))
334 continue;
335 if (!--cnt)
336 break;
338 if (!child)
339 continue;
340 if (line[0] && line[strlen(line) - 1] == '?') {
341 print_help(child);
342 continue;
344 sym_set_choice_value(sym, child->sym);
345 for (child = child->list; child; child = child->next) {
346 indent += 2;
347 conf(child);
348 indent -= 2;
350 return 1;
354 static void conf(struct menu *menu)
356 struct symbol *sym;
357 struct property *prop;
358 struct menu *child;
360 if (!menu_is_visible(menu))
361 return;
363 sym = menu->sym;
364 prop = menu->prompt;
365 if (prop) {
366 const char *prompt;
368 switch (prop->type) {
369 case P_MENU:
370 if ((input_mode == silentoldconfig ||
371 input_mode == listnewconfig ||
372 input_mode == olddefconfig) &&
373 rootEntry != menu) {
374 check_conf(menu);
375 return;
377 /* fall through */
378 case P_COMMENT:
379 prompt = menu_get_prompt(menu);
380 if (prompt)
381 printf("%*c\n%*c %s\n%*c\n",
382 indent, '*',
383 indent, '*', _(prompt),
384 indent, '*');
385 default:
390 if (!sym)
391 goto conf_childs;
393 if (sym_is_choice(sym)) {
394 conf_choice(menu);
395 if (sym->curr.tri != mod)
396 return;
397 goto conf_childs;
400 switch (sym->type) {
401 case S_INT:
402 case S_HEX:
403 case S_STRING:
404 conf_string(menu);
405 break;
406 default:
407 conf_sym(menu);
408 break;
411 conf_childs:
412 if (sym)
413 indent += 2;
414 for (child = menu->list; child; child = child->next)
415 conf(child);
416 if (sym)
417 indent -= 2;
420 static void check_conf(struct menu *menu)
422 struct symbol *sym;
423 struct menu *child;
425 if (!menu_is_visible(menu))
426 return;
428 sym = menu->sym;
429 if (sym && !sym_has_value(sym)) {
430 if (sym_is_changable(sym) ||
431 (sym_is_choice(sym) && sym_get_tristate_value(sym) == yes)) {
432 if (input_mode == listnewconfig) {
433 if (sym->name && !sym_is_choice_value(sym)) {
434 printf("%s%s\n", CONFIG_, sym->name);
436 } else if (input_mode != olddefconfig) {
437 if (!conf_cnt++)
438 printf(_("*\n* Restart config...\n*\n"));
439 rootEntry = menu_get_parent_menu(menu);
440 conf(rootEntry);
445 for (child = menu->list; child; child = child->next)
446 check_conf(child);
449 #if 00 // || !defined __UCLIBC__ || \
450 defined __UCLIBC_HAS_GETOPT_LONG__
451 static struct option long_opts[] = {
452 {"oldaskconfig", no_argument, NULL, oldaskconfig},
453 {"oldconfig", no_argument, NULL, oldconfig},
454 {"silentoldconfig", no_argument, NULL, silentoldconfig},
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},
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.
469 {"oldnoconfig", no_argument, NULL, olddefconfig},
470 {NULL, 0, NULL, 0}
473 static void conf_usage(const char *progname)
476 printf("Usage: %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(" --silentoldconfig Same as oldconfig, but quietly, additionally update deps\n");
482 printf(" --olddefconfig Same as silentoldconfig 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");
492 #else
493 static void conf_usage(const char *progname)
496 printf("Usage: %s [option] <kconfig-file>\n", progname);
497 printf("[option] is _one_ of the following:\n");
498 printf(" -a, --oldaskconfig Start a new configuration using a line-oriented program\n");
499 printf(" -s, --silentoldconfig Same as oldconfig, but quietly, additionally update deps\n");
500 printf(" -o, --oldconfig Update a configuration using a provided .config as base\n");
501 printf(" -n, --allnoconfig New config where all options are answered with no\n");
502 printf(" -y, --allyesconfig New config where all options are answered with yes\n");
503 printf(" -m, --allmodconfig New config where all options are answered with mod\n");
504 printf(" -A, --alldefconfig New config with all symbols set to default\n");
505 printf(" -r, --randconfig New config with random answer to all options\n");
506 printf(" -D, --defconfig <file> New config with default defined in <file>\n");
507 printf(" -S, --savedefconfig <file> Save the minimal current configuration to <file>\n");
508 printf(" -l, --listnewconfig List new options\n");
509 printf(" -d, --olddefconfig Same as silentoldconfig but sets new symbols to their default value\n");
510 printf(" --oldnoconfig An alias of olddefconfig\n");
513 #endif
515 int main(int ac, char **av)
517 const char *progname = av[0];
518 int opt;
519 const char *name, *defconfig_file = NULL /* gcc uninit */;
520 struct stat tmpstat;
522 setlocale(LC_ALL, "");
523 bindtextdomain(PACKAGE, LOCALEDIR);
524 textdomain(PACKAGE);
526 tty_stdio = isatty(0) && isatty(1) && isatty(2);
528 #if 00// !defined __UCLIBC__ || \
529 defined __UCLIBC_HAS_GETOPT_LONG__
530 while ((opt = getopt_long(ac, av, "", long_opts, NULL)) != -1)
531 #else
532 char *gch = "asonymArDSld";
533 while ((opt = getopt(ac, av, "asonymArD:S:ldh")) != -1)
534 #endif
536 char *x = memchr(gch, opt, strlen(gch));
537 if (x == NULL)
538 opt = '?';
539 else
540 opt = x - gch;
541 input_mode = (enum input_mode)opt;
542 switch (opt) {
543 case silentoldconfig:
544 sync_kconfig = 1;
545 break;
546 case defconfig:
547 case savedefconfig:
548 defconfig_file = optarg;
549 break;
550 case randconfig:
552 struct timeval now;
553 unsigned int seed;
554 char *seed_env;
557 * Use microseconds derived seed,
558 * compensate for systems where it may be zero
560 gettimeofday(&now, NULL);
561 seed = (unsigned int)((now.tv_sec + 1) * (now.tv_usec + 1));
563 seed_env = getenv("KCONFIG_SEED");
564 if( seed_env && *seed_env ) {
565 char *endp;
566 int tmp = (int)strtol(seed_env, &endp, 0);
567 if (*endp == '\0') {
568 seed = tmp;
571 fprintf( stderr, "KCONFIG_SEED=0x%X\n", seed );
572 srand(seed);
573 break;
575 case oldaskconfig:
576 case oldconfig:
577 case allnoconfig:
578 case allyesconfig:
579 case allmodconfig:
580 case alldefconfig:
581 case listnewconfig:
582 case olddefconfig:
583 break;
584 case '?':
585 conf_usage(progname);
586 exit(1);
587 break;
590 if (ac == optind) {
591 printf(_("%s: Kconfig file missing\n"), av[0]);
592 conf_usage(progname);
593 exit(1);
595 name = av[optind];
596 conf_parse(name);
597 //zconfdump(stdout);
598 if (sync_kconfig) {
599 name = conf_get_configname();
600 if (stat(name, &tmpstat)) {
601 fprintf(stderr, _("***\n"
602 "*** Configuration file \"%s\" not found!\n"
603 "***\n"
604 "*** Please run some configurator (e.g. \"make oldconfig\" or\n"
605 "*** \"make menuconfig\" or \"make xconfig\").\n"
606 "***\n"), name);
607 exit(1);
611 switch (input_mode) {
612 case defconfig:
613 if (!defconfig_file)
614 defconfig_file = conf_get_default_confname();
615 if (conf_read(defconfig_file)) {
616 printf(_("***\n"
617 "*** Can't find default configuration \"%s\"!\n"
618 "***\n"), defconfig_file);
619 exit(1);
621 break;
622 case savedefconfig:
623 case silentoldconfig:
624 case oldaskconfig:
625 case oldconfig:
626 case listnewconfig:
627 case olddefconfig:
628 conf_read(NULL);
629 break;
630 case allnoconfig:
631 case allyesconfig:
632 case allmodconfig:
633 case alldefconfig:
634 case randconfig:
635 name = getenv("KCONFIG_ALLCONFIG");
636 if (!name)
637 break;
638 if ((strcmp(name, "") != 0) && (strcmp(name, "1") != 0)) {
639 if (conf_read_simple(name, S_DEF_USER)) {
640 fprintf(stderr,
641 _("*** Can't read seed configuration \"%s\"!\n"),
642 name);
643 exit(1);
645 break;
647 switch (input_mode) {
648 case allnoconfig: name = "allno.config"; break;
649 case allyesconfig: name = "allyes.config"; break;
650 case allmodconfig: name = "allmod.config"; break;
651 case alldefconfig: name = "alldef.config"; break;
652 case randconfig: name = "allrandom.config"; break;
653 default: break;
655 if (conf_read_simple(name, S_DEF_USER) &&
656 conf_read_simple("all.config", S_DEF_USER)) {
657 fprintf(stderr,
658 _("*** KCONFIG_ALLCONFIG set, but no \"%s\" or \"all.config\" file found\n"),
659 name);
660 exit(1);
662 break;
663 default:
664 break;
667 if (sync_kconfig) {
668 if (conf_get_changed()) {
669 name = getenv("KCONFIG_NOSILENTUPDATE");
670 if (name && *name) {
671 fprintf(stderr,
672 _("\n*** The configuration requires explicit update.\n\n"));
673 return 1;
676 valid_stdin = tty_stdio;
679 switch (input_mode) {
680 case allnoconfig:
681 conf_set_all_new_symbols(def_no);
682 break;
683 case allyesconfig:
684 conf_set_all_new_symbols(def_yes);
685 break;
686 case allmodconfig:
687 conf_set_all_new_symbols(def_mod);
688 break;
689 case alldefconfig:
690 conf_set_all_new_symbols(def_default);
691 break;
692 case randconfig:
693 /* Really nothing to do in this loop */
694 while (conf_set_all_new_symbols(def_random)) ;
695 break;
696 case defconfig:
697 conf_set_all_new_symbols(def_default);
698 break;
699 case savedefconfig:
700 break;
701 case oldaskconfig:
702 rootEntry = &rootmenu;
703 conf(&rootmenu);
704 input_mode = silentoldconfig;
705 /* fall through */
706 case oldconfig:
707 case listnewconfig:
708 case olddefconfig:
709 case silentoldconfig:
710 /* Update until a loop caused no more changes */
711 do {
712 conf_cnt = 0;
713 check_conf(&rootmenu);
714 } while (conf_cnt &&
715 (input_mode != listnewconfig &&
716 input_mode != olddefconfig));
717 break;
720 if (sync_kconfig) {
721 /* silentoldconfig is used during the build so we shall update autoconf.
722 * All other commands are only used to generate a config.
724 if (conf_get_changed() && conf_write(NULL)) {
725 fprintf(stderr, _("\n*** Error during writing of the configuration.\n\n"));
726 exit(1);
728 if (conf_write_autoconf()) {
729 fprintf(stderr, _("\n*** Error during update of the configuration.\n\n"));
730 return 1;
732 } else if (input_mode == savedefconfig) {
733 if (conf_write_defconfig(defconfig_file)) {
734 fprintf(stderr, _("n*** Error while saving defconfig to: %s\n\n"),
735 defconfig_file);
736 return 1;
738 } else if (input_mode != listnewconfig) {
739 if (conf_write(NULL)) {
740 fprintf(stderr, _("\n*** Error during writing of the configuration.\n\n"));
741 exit(1);
744 return 0;
748 * Helper function to facilitate fgets() by Jean Sacren.
750 void xfgets(char *str, int size, FILE *in)
752 if (fgets(str, size, in) == NULL)
753 fprintf(stderr, "\nError in reading or end of file.\n");