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