]> rtime.felk.cvut.cz Git - l4.git/blob - l4/pkg/uclibc/lib/contrib/uclibc/extra/config/conf.c
update
[l4.git] / l4 / pkg / uclibc / lib / contrib / uclibc / extra / config / conf.c
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 <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 static void xfgets(char *str, int size, FILE *in);
23
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;
38
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[128];
45 static struct menu *rootEntry;
46
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
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 static void check_stdin(void)
75 {
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);
81         }
82 }
83
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 silentoldconfig:
104                 if (sym_has_value(sym)) {
105                         printf("%s\n", def);
106                         return 0;
107                 }
108                 check_stdin();
109                 /* fall through */
110         case oldaskconfig:
111                 fflush(stdout);
112                 xfgets(line, 128, stdin);
113                 if (!tty_stdio)
114                         printf("\n");
115                 return 1;
116         default:
117                 break;
118         }
119
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:
127                 ;
128         }
129         printf("%s", line);
130         return 1;
131 }
132
133 static int conf_string(struct menu *menu)
134 {
135         struct symbol *sym = menu->sym;
136         const char *def;
137
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;
155                         }
156                         /* fall through */
157                 default:
158                         line[strlen(line)-1] = 0;
159                         def = line;
160                 }
161                 if (def && sym_set_string_value(sym, def))
162                         return 0;
163         }
164 }
165
166 static int conf_sym(struct menu *menu)
167 {
168         struct symbol *sym = menu->sym;
169         tristate oldval, newval;
170
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;
187                 }
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);
200
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;
227                 }
228                 if (sym_set_tristate_value(sym, newval))
229                         return 0;
230 help:
231                 print_help(menu);
232         }
233 }
234
235 static int conf_choice(struct menu *menu)
236 {
237         struct symbol *sym, *def_sym;
238         struct menu *child;
239         bool is_new;
240
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;
253                 }
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;
263                 }
264         }
265
266         while (1) {
267                 int cnt, def;
268
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;
279                         }
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");
292                 }
293                 printf(_("%*schoice"), indent - 1, "");
294                 if (cnt == 1) {
295                         printf("[1]: 1\n");
296                         goto conf_childs;
297                 }
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;
309                         }
310                         check_stdin();
311                         /* fall through */
312                 case oldaskconfig:
313                         fflush(stdout);
314                         xfgets(line, 128, stdin);
315                         strip(line);
316                         if (line[0] == '?') {
317                                 print_help(menu);
318                                 continue;
319                         }
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;
329                 }
330
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;
337                 }
338                 if (!child)
339                         continue;
340                 if (line[0] && line[strlen(line) - 1] == '?') {
341                         print_help(child);
342                         continue;
343                 }
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;
349                 }
350                 return 1;
351         }
352 }
353
354 static void conf(struct menu *menu)
355 {
356         struct symbol *sym;
357         struct property *prop;
358         struct menu *child;
359
360         if (!menu_is_visible(menu))
361                 return;
362
363         sym = menu->sym;
364         prop = menu->prompt;
365         if (prop) {
366                 const char *prompt;
367
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;
376                         }
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:
386                         ;
387                 }
388         }
389
390         if (!sym)
391                 goto conf_childs;
392
393         if (sym_is_choice(sym)) {
394                 conf_choice(menu);
395                 if (sym->curr.tri != mod)
396                         return;
397                 goto conf_childs;
398         }
399
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;
409         }
410
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;
418 }
419
420 static void check_conf(struct menu *menu)
421 {
422         struct symbol *sym;
423         struct menu *child;
424
425         if (!menu_is_visible(menu))
426                 return;
427
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);
435                                 }
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);
441                         }
442                 }
443         }
444
445         for (child = menu->list; child; child = child->next)
446                 check_conf(child);
447 }
448
449 #if 00 // || !defined __UCLIBC__ || \
450         (defined UCLIBC_HAS_GETOPT_LONG || defined UCLIBC_HAS_GNU_GETOPT)
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},
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
473 static void conf_usage(const char *progname)
474 {
475
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");
491 }
492 #else
493 static void conf_usage(const char *progname)
494 {
495
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");
511
512 }
513 #endif
514
515 int main(int ac, char **av)
516 {
517         const char *progname = av[0];
518         int opt;
519         const char *name, *defconfig_file = NULL /* gcc uninit */;
520         struct stat tmpstat;
521
522         setlocale(LC_ALL, "");
523         bindtextdomain(PACKAGE, LOCALEDIR);
524         textdomain(PACKAGE);
525
526         tty_stdio = isatty(0) && isatty(1) && isatty(2);
527
528 #if 00// !defined __UCLIBC__ || \
529         (defined UCLIBC_HAS_GETOPT_LONG || defined UCLIBC_HAS_GNU_GETOPT)
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
535         {
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:
551                 {
552                         struct timeval now;
553                         unsigned int seed;
554                         char *seed_env;
555
556                         /*
557                          * Use microseconds derived seed,
558                          * compensate for systems where it may be zero
559                          */
560                         gettimeofday(&now, NULL);
561                         seed = (unsigned int)((now.tv_sec + 1) * (now.tv_usec + 1));
562
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;
569                                 }
570                         }
571                         fprintf( stderr, "KCONFIG_SEED=0x%X\n", seed );
572                         srand(seed);
573                         break;
574                 }
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;
588                 }
589         }
590         if (ac == optind) {
591                 printf(_("%s: Kconfig file missing\n"), av[0]);
592                 conf_usage(progname);
593                 exit(1);
594         }
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);
608                 }
609         }
610
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);
620                 }
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);
644                         }
645                         break;
646                 }
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;
654                 }
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);
661                 }
662                 break;
663         default:
664                 break;
665         }
666
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;
674                         }
675                 }
676                 valid_stdin = tty_stdio;
677         }
678
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;
718         }
719
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.
723                  */
724                 if (conf_get_changed() && conf_write(NULL)) {
725                         fprintf(stderr, _("\n*** Error during writing of the configuration.\n\n"));
726                         exit(1);
727                 }
728                 if (conf_write_autoconf()) {
729                         fprintf(stderr, _("\n*** Error during update of the configuration.\n\n"));
730                         return 1;
731                 }
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;
737                 }
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);
742                 }
743         }
744         return 0;
745 }
746
747 /*
748  * Helper function to facilitate fgets() by Jean Sacren.
749  */
750 void xfgets(char *str, int size, FILE *in)
751 {
752         if (fgets(str, size, in) == NULL)
753                 fprintf(stderr, "\nError in reading or end of file.\n");
754 }