GNU Linux-libre 4.19.211-gnu1
[releases.git] / scripts / kconfig / 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 <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
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
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. */
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
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
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
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
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
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
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
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
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 (input_mode == savedefconfig) {
695                 if (conf_write_defconfig(defconfig_file)) {
696                         fprintf(stderr, "n*** Error while saving defconfig to: %s\n\n",
697                                 defconfig_file);
698                         return 1;
699                 }
700         } else if (input_mode != listnewconfig) {
701                 if (!no_conf_write && conf_write(NULL)) {
702                         fprintf(stderr, "\n*** Error during writing of the configuration.\n\n");
703                         exit(1);
704                 }
705
706                 /*
707                  * Create auto.conf if it does not exist.
708                  * This prevents GNU Make 4.1 or older from emitting
709                  * "include/config/auto.conf: No such file or directory"
710                  * in the top-level Makefile
711                  *
712                  * syncconfig always creates or updates auto.conf because it is
713                  * used during the build.
714                  */
715                 if (conf_write_autoconf(sync_kconfig) && sync_kconfig) {
716                         fprintf(stderr,
717                                 "\n*** Error during sync of the configuration.\n\n");
718                         return 1;
719                 }
720         }
721         return 0;
722 }