Loading...
1// SPDX-License-Identifier: GPL-2.0
2/*
3 * Copyright (C) 2002 Roman Zippel <zippel@linux-m68k.org>
4 */
5
6#include <sys/mman.h>
7#include <sys/stat.h>
8#include <sys/types.h>
9#include <ctype.h>
10#include <errno.h>
11#include <fcntl.h>
12#include <limits.h>
13#include <stdarg.h>
14#include <stdbool.h>
15#include <stdio.h>
16#include <stdlib.h>
17#include <string.h>
18#include <time.h>
19#include <unistd.h>
20
21#include "lkc.h"
22
23/* return true if 'path' exists, false otherwise */
24static bool is_present(const char *path)
25{
26 struct stat st;
27
28 return !stat(path, &st);
29}
30
31/* return true if 'path' exists and it is a directory, false otherwise */
32static bool is_dir(const char *path)
33{
34 struct stat st;
35
36 if (stat(path, &st))
37 return false;
38
39 return S_ISDIR(st.st_mode);
40}
41
42/* return true if the given two files are the same, false otherwise */
43static bool is_same(const char *file1, const char *file2)
44{
45 int fd1, fd2;
46 struct stat st1, st2;
47 void *map1, *map2;
48 bool ret = false;
49
50 fd1 = open(file1, O_RDONLY);
51 if (fd1 < 0)
52 return ret;
53
54 fd2 = open(file2, O_RDONLY);
55 if (fd2 < 0)
56 goto close1;
57
58 ret = fstat(fd1, &st1);
59 if (ret)
60 goto close2;
61 ret = fstat(fd2, &st2);
62 if (ret)
63 goto close2;
64
65 if (st1.st_size != st2.st_size)
66 goto close2;
67
68 map1 = mmap(NULL, st1.st_size, PROT_READ, MAP_PRIVATE, fd1, 0);
69 if (map1 == MAP_FAILED)
70 goto close2;
71
72 map2 = mmap(NULL, st2.st_size, PROT_READ, MAP_PRIVATE, fd2, 0);
73 if (map2 == MAP_FAILED)
74 goto close2;
75
76 if (bcmp(map1, map2, st1.st_size))
77 goto close2;
78
79 ret = true;
80close2:
81 close(fd2);
82close1:
83 close(fd1);
84
85 return ret;
86}
87
88/*
89 * Create the parent directory of the given path.
90 *
91 * For example, if 'include/config/auto.conf' is given, create 'include/config'.
92 */
93static int make_parent_dir(const char *path)
94{
95 char tmp[PATH_MAX + 1];
96 char *p;
97
98 strncpy(tmp, path, sizeof(tmp));
99 tmp[sizeof(tmp) - 1] = 0;
100
101 /* Remove the base name. Just return if nothing is left */
102 p = strrchr(tmp, '/');
103 if (!p)
104 return 0;
105 *(p + 1) = 0;
106
107 /* Just in case it is an absolute path */
108 p = tmp;
109 while (*p == '/')
110 p++;
111
112 while ((p = strchr(p, '/'))) {
113 *p = 0;
114
115 /* skip if the directory exists */
116 if (!is_dir(tmp) && mkdir(tmp, 0755))
117 return -1;
118
119 *p = '/';
120 while (*p == '/')
121 p++;
122 }
123
124 return 0;
125}
126
127static char depfile_path[PATH_MAX];
128static size_t depfile_prefix_len;
129
130/* touch depfile for symbol 'name' */
131static int conf_touch_dep(const char *name)
132{
133 int fd;
134
135 /* check overflow: prefix + name + '\0' must fit in buffer. */
136 if (depfile_prefix_len + strlen(name) + 1 > sizeof(depfile_path))
137 return -1;
138
139 strcpy(depfile_path + depfile_prefix_len, name);
140
141 fd = open(depfile_path, O_WRONLY | O_CREAT | O_TRUNC, 0644);
142 if (fd == -1)
143 return -1;
144 close(fd);
145
146 return 0;
147}
148
149static void conf_warning(const char *fmt, ...)
150 __attribute__ ((format (printf, 1, 2)));
151
152static void conf_message(const char *fmt, ...)
153 __attribute__ ((format (printf, 1, 2)));
154
155static const char *conf_filename;
156static int conf_lineno, conf_warnings;
157
158static void conf_warning(const char *fmt, ...)
159{
160 va_list ap;
161 va_start(ap, fmt);
162 fprintf(stderr, "%s:%d:warning: ", conf_filename, conf_lineno);
163 vfprintf(stderr, fmt, ap);
164 fprintf(stderr, "\n");
165 va_end(ap);
166 conf_warnings++;
167}
168
169static void conf_default_message_callback(const char *s)
170{
171 printf("#\n# ");
172 printf("%s", s);
173 printf("\n#\n");
174}
175
176static void (*conf_message_callback)(const char *s) =
177 conf_default_message_callback;
178void conf_set_message_callback(void (*fn)(const char *s))
179{
180 conf_message_callback = fn;
181}
182
183static void conf_message(const char *fmt, ...)
184{
185 va_list ap;
186 char buf[4096];
187
188 if (!conf_message_callback)
189 return;
190
191 va_start(ap, fmt);
192
193 vsnprintf(buf, sizeof(buf), fmt, ap);
194 conf_message_callback(buf);
195 va_end(ap);
196}
197
198const char *conf_get_configname(void)
199{
200 char *name = getenv("KCONFIG_CONFIG");
201
202 return name ? name : ".config";
203}
204
205static const char *conf_get_autoconfig_name(void)
206{
207 char *name = getenv("KCONFIG_AUTOCONFIG");
208
209 return name ? name : "include/config/auto.conf";
210}
211
212static const char *conf_get_autoheader_name(void)
213{
214 char *name = getenv("KCONFIG_AUTOHEADER");
215
216 return name ? name : "include/generated/autoconf.h";
217}
218
219static const char *conf_get_rustccfg_name(void)
220{
221 char *name = getenv("KCONFIG_RUSTCCFG");
222
223 return name ? name : "include/generated/rustc_cfg";
224}
225
226static int conf_set_sym_val(struct symbol *sym, int def, int def_flags, char *p)
227{
228 char *p2;
229
230 switch (sym->type) {
231 case S_TRISTATE:
232 if (p[0] == 'm') {
233 sym->def[def].tri = mod;
234 sym->flags |= def_flags;
235 break;
236 }
237 /* fall through */
238 case S_BOOLEAN:
239 if (p[0] == 'y') {
240 sym->def[def].tri = yes;
241 sym->flags |= def_flags;
242 break;
243 }
244 if (p[0] == 'n') {
245 sym->def[def].tri = no;
246 sym->flags |= def_flags;
247 break;
248 }
249 if (def != S_DEF_AUTO)
250 conf_warning("symbol value '%s' invalid for %s",
251 p, sym->name);
252 return 1;
253 case S_STRING:
254 /* No escaping for S_DEF_AUTO (include/config/auto.conf) */
255 if (def != S_DEF_AUTO) {
256 if (*p++ != '"')
257 break;
258 for (p2 = p; (p2 = strpbrk(p2, "\"\\")); p2++) {
259 if (*p2 == '"') {
260 *p2 = 0;
261 break;
262 }
263 memmove(p2, p2 + 1, strlen(p2));
264 }
265 if (!p2) {
266 conf_warning("invalid string found");
267 return 1;
268 }
269 }
270 /* fall through */
271 case S_INT:
272 case S_HEX:
273 if (sym_string_valid(sym, p)) {
274 sym->def[def].val = xstrdup(p);
275 sym->flags |= def_flags;
276 } else {
277 if (def != S_DEF_AUTO)
278 conf_warning("symbol value '%s' invalid for %s",
279 p, sym->name);
280 return 1;
281 }
282 break;
283 default:
284 ;
285 }
286 return 0;
287}
288
289#define LINE_GROWTH 16
290static int add_byte(int c, char **lineptr, size_t slen, size_t *n)
291{
292 char *nline;
293 size_t new_size = slen + 1;
294 if (new_size > *n) {
295 new_size += LINE_GROWTH - 1;
296 new_size *= 2;
297 nline = xrealloc(*lineptr, new_size);
298 if (!nline)
299 return -1;
300
301 *lineptr = nline;
302 *n = new_size;
303 }
304
305 (*lineptr)[slen] = c;
306
307 return 0;
308}
309
310static ssize_t compat_getline(char **lineptr, size_t *n, FILE *stream)
311{
312 char *line = *lineptr;
313 size_t slen = 0;
314
315 for (;;) {
316 int c = getc(stream);
317
318 switch (c) {
319 case '\n':
320 if (add_byte(c, &line, slen, n) < 0)
321 goto e_out;
322 slen++;
323 /* fall through */
324 case EOF:
325 if (add_byte('\0', &line, slen, n) < 0)
326 goto e_out;
327 *lineptr = line;
328 if (slen == 0)
329 return -1;
330 return slen;
331 default:
332 if (add_byte(c, &line, slen, n) < 0)
333 goto e_out;
334 slen++;
335 }
336 }
337
338e_out:
339 line[slen-1] = '\0';
340 *lineptr = line;
341 return -1;
342}
343
344int conf_read_simple(const char *name, int def)
345{
346 FILE *in = NULL;
347 char *line = NULL;
348 size_t line_asize = 0;
349 char *p, *p2;
350 struct symbol *sym;
351 int i, def_flags;
352
353 if (name) {
354 in = zconf_fopen(name);
355 } else {
356 char *env;
357
358 name = conf_get_configname();
359 in = zconf_fopen(name);
360 if (in)
361 goto load;
362 conf_set_changed(true);
363
364 env = getenv("KCONFIG_DEFCONFIG_LIST");
365 if (!env)
366 return 1;
367
368 while (1) {
369 bool is_last;
370
371 while (isspace(*env))
372 env++;
373
374 if (!*env)
375 break;
376
377 p = env;
378 while (*p && !isspace(*p))
379 p++;
380
381 is_last = (*p == '\0');
382
383 *p = '\0';
384
385 in = zconf_fopen(env);
386 if (in) {
387 conf_message("using defaults found in %s",
388 env);
389 goto load;
390 }
391
392 if (is_last)
393 break;
394
395 env = p + 1;
396 }
397 }
398 if (!in)
399 return 1;
400
401load:
402 conf_filename = name;
403 conf_lineno = 0;
404 conf_warnings = 0;
405
406 def_flags = SYMBOL_DEF << def;
407 for_all_symbols(i, sym) {
408 sym->flags |= SYMBOL_CHANGED;
409 sym->flags &= ~(def_flags|SYMBOL_VALID);
410 if (sym_is_choice(sym))
411 sym->flags |= def_flags;
412 switch (sym->type) {
413 case S_INT:
414 case S_HEX:
415 case S_STRING:
416 if (sym->def[def].val)
417 free(sym->def[def].val);
418 /* fall through */
419 default:
420 sym->def[def].val = NULL;
421 sym->def[def].tri = no;
422 }
423 }
424
425 while (compat_getline(&line, &line_asize, in) != -1) {
426 conf_lineno++;
427 sym = NULL;
428 if (line[0] == '#') {
429 if (memcmp(line + 2, CONFIG_, strlen(CONFIG_)))
430 continue;
431 p = strchr(line + 2 + strlen(CONFIG_), ' ');
432 if (!p)
433 continue;
434 *p++ = 0;
435 if (strncmp(p, "is not set", 10))
436 continue;
437 if (def == S_DEF_USER) {
438 sym = sym_find(line + 2 + strlen(CONFIG_));
439 if (!sym) {
440 conf_set_changed(true);
441 continue;
442 }
443 } else {
444 sym = sym_lookup(line + 2 + strlen(CONFIG_), 0);
445 if (sym->type == S_UNKNOWN)
446 sym->type = S_BOOLEAN;
447 }
448 if (sym->flags & def_flags) {
449 conf_warning("override: reassigning to symbol %s", sym->name);
450 }
451 switch (sym->type) {
452 case S_BOOLEAN:
453 case S_TRISTATE:
454 sym->def[def].tri = no;
455 sym->flags |= def_flags;
456 break;
457 default:
458 ;
459 }
460 } else if (memcmp(line, CONFIG_, strlen(CONFIG_)) == 0) {
461 p = strchr(line + strlen(CONFIG_), '=');
462 if (!p)
463 continue;
464 *p++ = 0;
465 p2 = strchr(p, '\n');
466 if (p2) {
467 *p2-- = 0;
468 if (*p2 == '\r')
469 *p2 = 0;
470 }
471
472 sym = sym_find(line + strlen(CONFIG_));
473 if (!sym) {
474 if (def == S_DEF_AUTO)
475 /*
476 * Reading from include/config/auto.conf
477 * If CONFIG_FOO previously existed in
478 * auto.conf but it is missing now,
479 * include/config/FOO must be touched.
480 */
481 conf_touch_dep(line + strlen(CONFIG_));
482 else
483 conf_set_changed(true);
484 continue;
485 }
486
487 if (sym->flags & def_flags) {
488 conf_warning("override: reassigning to symbol %s", sym->name);
489 }
490 if (conf_set_sym_val(sym, def, def_flags, p))
491 continue;
492 } else {
493 if (line[0] != '\r' && line[0] != '\n')
494 conf_warning("unexpected data: %.*s",
495 (int)strcspn(line, "\r\n"), line);
496
497 continue;
498 }
499
500 if (sym && sym_is_choice_value(sym)) {
501 struct symbol *cs = prop_get_symbol(sym_get_choice_prop(sym));
502 switch (sym->def[def].tri) {
503 case no:
504 break;
505 case mod:
506 if (cs->def[def].tri == yes) {
507 conf_warning("%s creates inconsistent choice state", sym->name);
508 cs->flags &= ~def_flags;
509 }
510 break;
511 case yes:
512 if (cs->def[def].tri != no)
513 conf_warning("override: %s changes choice state", sym->name);
514 cs->def[def].val = sym;
515 break;
516 }
517 cs->def[def].tri = EXPR_OR(cs->def[def].tri, sym->def[def].tri);
518 }
519 }
520 free(line);
521 fclose(in);
522 return 0;
523}
524
525int conf_read(const char *name)
526{
527 struct symbol *sym;
528 int conf_unsaved = 0;
529 int i;
530
531 conf_set_changed(false);
532
533 if (conf_read_simple(name, S_DEF_USER)) {
534 sym_calc_value(modules_sym);
535 return 1;
536 }
537
538 sym_calc_value(modules_sym);
539
540 for_all_symbols(i, sym) {
541 sym_calc_value(sym);
542 if (sym_is_choice(sym) || (sym->flags & SYMBOL_NO_WRITE))
543 continue;
544 if (sym_has_value(sym) && (sym->flags & SYMBOL_WRITE)) {
545 /* check that calculated value agrees with saved value */
546 switch (sym->type) {
547 case S_BOOLEAN:
548 case S_TRISTATE:
549 if (sym->def[S_DEF_USER].tri == sym_get_tristate_value(sym))
550 continue;
551 break;
552 default:
553 if (!strcmp(sym->curr.val, sym->def[S_DEF_USER].val))
554 continue;
555 break;
556 }
557 } else if (!sym_has_value(sym) && !(sym->flags & SYMBOL_WRITE))
558 /* no previous value and not saved */
559 continue;
560 conf_unsaved++;
561 /* maybe print value in verbose mode... */
562 }
563
564 for_all_symbols(i, sym) {
565 if (sym_has_value(sym) && !sym_is_choice_value(sym)) {
566 /* Reset values of generates values, so they'll appear
567 * as new, if they should become visible, but that
568 * doesn't quite work if the Kconfig and the saved
569 * configuration disagree.
570 */
571 if (sym->visible == no && !conf_unsaved)
572 sym->flags &= ~SYMBOL_DEF_USER;
573 switch (sym->type) {
574 case S_STRING:
575 case S_INT:
576 case S_HEX:
577 /* Reset a string value if it's out of range */
578 if (sym_string_within_range(sym, sym->def[S_DEF_USER].val))
579 break;
580 sym->flags &= ~(SYMBOL_VALID|SYMBOL_DEF_USER);
581 conf_unsaved++;
582 break;
583 default:
584 break;
585 }
586 }
587 }
588
589 if (conf_warnings || conf_unsaved)
590 conf_set_changed(true);
591
592 return 0;
593}
594
595struct comment_style {
596 const char *decoration;
597 const char *prefix;
598 const char *postfix;
599};
600
601static const struct comment_style comment_style_pound = {
602 .decoration = "#",
603 .prefix = "#",
604 .postfix = "#",
605};
606
607static const struct comment_style comment_style_c = {
608 .decoration = " *",
609 .prefix = "/*",
610 .postfix = " */",
611};
612
613static void conf_write_heading(FILE *fp, const struct comment_style *cs)
614{
615 if (!cs)
616 return;
617
618 fprintf(fp, "%s\n", cs->prefix);
619
620 fprintf(fp, "%s Automatically generated file; DO NOT EDIT.\n",
621 cs->decoration);
622
623 fprintf(fp, "%s %s\n", cs->decoration, rootmenu.prompt->text);
624
625 fprintf(fp, "%s\n", cs->postfix);
626}
627
628/* The returned pointer must be freed on the caller side */
629static char *escape_string_value(const char *in)
630{
631 const char *p;
632 char *out;
633 size_t len;
634
635 len = strlen(in) + strlen("\"\"") + 1;
636
637 p = in;
638 while (1) {
639 p += strcspn(p, "\"\\");
640
641 if (p[0] == '\0')
642 break;
643
644 len++;
645 p++;
646 }
647
648 out = xmalloc(len);
649 out[0] = '\0';
650
651 strcat(out, "\"");
652
653 p = in;
654 while (1) {
655 len = strcspn(p, "\"\\");
656 strncat(out, p, len);
657 p += len;
658
659 if (p[0] == '\0')
660 break;
661
662 strcat(out, "\\");
663 strncat(out, p++, 1);
664 }
665
666 strcat(out, "\"");
667
668 return out;
669}
670
671enum output_n { OUTPUT_N, OUTPUT_N_AS_UNSET, OUTPUT_N_NONE };
672
673static void __print_symbol(FILE *fp, struct symbol *sym, enum output_n output_n,
674 bool escape_string)
675{
676 const char *val;
677 char *escaped = NULL;
678
679 if (sym->type == S_UNKNOWN)
680 return;
681
682 val = sym_get_string_value(sym);
683
684 if ((sym->type == S_BOOLEAN || sym->type == S_TRISTATE) &&
685 output_n != OUTPUT_N && *val == 'n') {
686 if (output_n == OUTPUT_N_AS_UNSET)
687 fprintf(fp, "# %s%s is not set\n", CONFIG_, sym->name);
688 return;
689 }
690
691 if (sym->type == S_STRING && escape_string) {
692 escaped = escape_string_value(val);
693 val = escaped;
694 }
695
696 fprintf(fp, "%s%s=%s\n", CONFIG_, sym->name, val);
697
698 free(escaped);
699}
700
701static void print_symbol_for_dotconfig(FILE *fp, struct symbol *sym)
702{
703 __print_symbol(fp, sym, OUTPUT_N_AS_UNSET, true);
704}
705
706static void print_symbol_for_autoconf(FILE *fp, struct symbol *sym)
707{
708 __print_symbol(fp, sym, OUTPUT_N_NONE, false);
709}
710
711void print_symbol_for_listconfig(struct symbol *sym)
712{
713 __print_symbol(stdout, sym, OUTPUT_N, true);
714}
715
716static void print_symbol_for_c(FILE *fp, struct symbol *sym)
717{
718 const char *val;
719 const char *sym_suffix = "";
720 const char *val_prefix = "";
721 char *escaped = NULL;
722
723 if (sym->type == S_UNKNOWN)
724 return;
725
726 val = sym_get_string_value(sym);
727
728 switch (sym->type) {
729 case S_BOOLEAN:
730 case S_TRISTATE:
731 switch (*val) {
732 case 'n':
733 return;
734 case 'm':
735 sym_suffix = "_MODULE";
736 /* fall through */
737 default:
738 val = "1";
739 }
740 break;
741 case S_HEX:
742 if (val[0] != '0' || (val[1] != 'x' && val[1] != 'X'))
743 val_prefix = "0x";
744 break;
745 case S_STRING:
746 escaped = escape_string_value(val);
747 val = escaped;
748 default:
749 break;
750 }
751
752 fprintf(fp, "#define %s%s%s %s%s\n", CONFIG_, sym->name, sym_suffix,
753 val_prefix, val);
754
755 free(escaped);
756}
757
758static void print_symbol_for_rustccfg(FILE *fp, struct symbol *sym)
759{
760 const char *val;
761 const char *val_prefix = "";
762 char *val_prefixed = NULL;
763 size_t val_prefixed_len;
764 char *escaped = NULL;
765
766 if (sym->type == S_UNKNOWN)
767 return;
768
769 val = sym_get_string_value(sym);
770
771 switch (sym->type) {
772 case S_BOOLEAN:
773 case S_TRISTATE:
774 /*
775 * We do not care about disabled ones, i.e. no need for
776 * what otherwise are "comments" in other printers.
777 */
778 if (*val == 'n')
779 return;
780
781 /*
782 * To have similar functionality to the C macro `IS_ENABLED()`
783 * we provide an empty `--cfg CONFIG_X` here in both `y`
784 * and `m` cases.
785 *
786 * Then, the common `fprintf()` below will also give us
787 * a `--cfg CONFIG_X="y"` or `--cfg CONFIG_X="m"`, which can
788 * be used as the equivalent of `IS_BUILTIN()`/`IS_MODULE()`.
789 */
790 fprintf(fp, "--cfg=%s%s\n", CONFIG_, sym->name);
791 break;
792 case S_HEX:
793 if (val[0] != '0' || (val[1] != 'x' && val[1] != 'X'))
794 val_prefix = "0x";
795 break;
796 default:
797 break;
798 }
799
800 if (strlen(val_prefix) > 0) {
801 val_prefixed_len = strlen(val) + strlen(val_prefix) + 1;
802 val_prefixed = xmalloc(val_prefixed_len);
803 snprintf(val_prefixed, val_prefixed_len, "%s%s", val_prefix, val);
804 val = val_prefixed;
805 }
806
807 /* All values get escaped: the `--cfg` option only takes strings */
808 escaped = escape_string_value(val);
809 val = escaped;
810
811 fprintf(fp, "--cfg=%s%s=%s\n", CONFIG_, sym->name, val);
812
813 free(escaped);
814 free(val_prefixed);
815}
816
817/*
818 * Write out a minimal config.
819 * All values that has default values are skipped as this is redundant.
820 */
821int conf_write_defconfig(const char *filename)
822{
823 struct symbol *sym;
824 struct menu *menu;
825 FILE *out;
826
827 out = fopen(filename, "w");
828 if (!out)
829 return 1;
830
831 sym_clear_all_valid();
832
833 /* Traverse all menus to find all relevant symbols */
834 menu = rootmenu.list;
835
836 while (menu != NULL)
837 {
838 sym = menu->sym;
839 if (sym == NULL) {
840 if (!menu_is_visible(menu))
841 goto next_menu;
842 } else if (!sym_is_choice(sym)) {
843 sym_calc_value(sym);
844 if (!(sym->flags & SYMBOL_WRITE))
845 goto next_menu;
846 sym->flags &= ~SYMBOL_WRITE;
847 /* If we cannot change the symbol - skip */
848 if (!sym_is_changeable(sym))
849 goto next_menu;
850 /* If symbol equals to default value - skip */
851 if (strcmp(sym_get_string_value(sym), sym_get_string_default(sym)) == 0)
852 goto next_menu;
853
854 /*
855 * If symbol is a choice value and equals to the
856 * default for a choice - skip.
857 * But only if value is bool and equal to "y" and
858 * choice is not "optional".
859 * (If choice is "optional" then all values can be "n")
860 */
861 if (sym_is_choice_value(sym)) {
862 struct symbol *cs;
863 struct symbol *ds;
864
865 cs = prop_get_symbol(sym_get_choice_prop(sym));
866 ds = sym_choice_default(cs);
867 if (!sym_is_optional(cs) && sym == ds) {
868 if ((sym->type == S_BOOLEAN) &&
869 sym_get_tristate_value(sym) == yes)
870 goto next_menu;
871 }
872 }
873 print_symbol_for_dotconfig(out, sym);
874 }
875next_menu:
876 if (menu->list != NULL) {
877 menu = menu->list;
878 }
879 else if (menu->next != NULL) {
880 menu = menu->next;
881 } else {
882 while ((menu = menu->parent)) {
883 if (menu->next != NULL) {
884 menu = menu->next;
885 break;
886 }
887 }
888 }
889 }
890 fclose(out);
891 return 0;
892}
893
894int conf_write(const char *name)
895{
896 FILE *out;
897 struct symbol *sym;
898 struct menu *menu;
899 const char *str;
900 char tmpname[PATH_MAX + 1], oldname[PATH_MAX + 1];
901 char *env;
902 int i;
903 bool need_newline = false;
904
905 if (!name)
906 name = conf_get_configname();
907
908 if (!*name) {
909 fprintf(stderr, "config name is empty\n");
910 return -1;
911 }
912
913 if (is_dir(name)) {
914 fprintf(stderr, "%s: Is a directory\n", name);
915 return -1;
916 }
917
918 if (make_parent_dir(name))
919 return -1;
920
921 env = getenv("KCONFIG_OVERWRITECONFIG");
922 if (env && *env) {
923 *tmpname = 0;
924 out = fopen(name, "w");
925 } else {
926 snprintf(tmpname, sizeof(tmpname), "%s.%d.tmp",
927 name, (int)getpid());
928 out = fopen(tmpname, "w");
929 }
930 if (!out)
931 return 1;
932
933 conf_write_heading(out, &comment_style_pound);
934
935 if (!conf_get_changed())
936 sym_clear_all_valid();
937
938 menu = rootmenu.list;
939 while (menu) {
940 sym = menu->sym;
941 if (!sym) {
942 if (!menu_is_visible(menu))
943 goto next;
944 str = menu_get_prompt(menu);
945 fprintf(out, "\n"
946 "#\n"
947 "# %s\n"
948 "#\n", str);
949 need_newline = false;
950 } else if (!(sym->flags & SYMBOL_CHOICE) &&
951 !(sym->flags & SYMBOL_WRITTEN)) {
952 sym_calc_value(sym);
953 if (!(sym->flags & SYMBOL_WRITE))
954 goto next;
955 if (need_newline) {
956 fprintf(out, "\n");
957 need_newline = false;
958 }
959 sym->flags |= SYMBOL_WRITTEN;
960 print_symbol_for_dotconfig(out, sym);
961 }
962
963next:
964 if (menu->list) {
965 menu = menu->list;
966 continue;
967 }
968
969end_check:
970 if (!menu->sym && menu_is_visible(menu) && menu != &rootmenu &&
971 menu->prompt->type == P_MENU) {
972 fprintf(out, "# end of %s\n", menu_get_prompt(menu));
973 need_newline = true;
974 }
975
976 if (menu->next) {
977 menu = menu->next;
978 } else {
979 menu = menu->parent;
980 if (menu)
981 goto end_check;
982 }
983 }
984 fclose(out);
985
986 for_all_symbols(i, sym)
987 sym->flags &= ~SYMBOL_WRITTEN;
988
989 if (*tmpname) {
990 if (is_same(name, tmpname)) {
991 conf_message("No change to %s", name);
992 unlink(tmpname);
993 conf_set_changed(false);
994 return 0;
995 }
996
997 snprintf(oldname, sizeof(oldname), "%s.old", name);
998 rename(name, oldname);
999 if (rename(tmpname, name))
1000 return 1;
1001 }
1002
1003 conf_message("configuration written to %s", name);
1004
1005 conf_set_changed(false);
1006
1007 return 0;
1008}
1009
1010/* write a dependency file as used by kbuild to track dependencies */
1011static int conf_write_autoconf_cmd(const char *autoconf_name)
1012{
1013 char name[PATH_MAX], tmp[PATH_MAX];
1014 struct file *file;
1015 FILE *out;
1016 int ret;
1017
1018 ret = snprintf(name, sizeof(name), "%s.cmd", autoconf_name);
1019 if (ret >= sizeof(name)) /* check truncation */
1020 return -1;
1021
1022 if (make_parent_dir(name))
1023 return -1;
1024
1025 ret = snprintf(tmp, sizeof(tmp), "%s.cmd.tmp", autoconf_name);
1026 if (ret >= sizeof(tmp)) /* check truncation */
1027 return -1;
1028
1029 out = fopen(tmp, "w");
1030 if (!out) {
1031 perror("fopen");
1032 return -1;
1033 }
1034
1035 fprintf(out, "deps_config := \\\n");
1036 for (file = file_list; file; file = file->next)
1037 fprintf(out, "\t%s \\\n", file->name);
1038
1039 fprintf(out, "\n%s: $(deps_config)\n\n", autoconf_name);
1040
1041 env_write_dep(out, autoconf_name);
1042
1043 fprintf(out, "\n$(deps_config): ;\n");
1044
1045 fflush(out);
1046 ret = ferror(out); /* error check for all fprintf() calls */
1047 fclose(out);
1048 if (ret)
1049 return -1;
1050
1051 if (rename(tmp, name)) {
1052 perror("rename");
1053 return -1;
1054 }
1055
1056 return 0;
1057}
1058
1059static int conf_touch_deps(void)
1060{
1061 const char *name, *tmp;
1062 struct symbol *sym;
1063 int res, i;
1064
1065 name = conf_get_autoconfig_name();
1066 tmp = strrchr(name, '/');
1067 depfile_prefix_len = tmp ? tmp - name + 1 : 0;
1068 if (depfile_prefix_len + 1 > sizeof(depfile_path))
1069 return -1;
1070
1071 strncpy(depfile_path, name, depfile_prefix_len);
1072 depfile_path[depfile_prefix_len] = 0;
1073
1074 conf_read_simple(name, S_DEF_AUTO);
1075 sym_calc_value(modules_sym);
1076
1077 for_all_symbols(i, sym) {
1078 sym_calc_value(sym);
1079 if ((sym->flags & SYMBOL_NO_WRITE) || !sym->name)
1080 continue;
1081 if (sym->flags & SYMBOL_WRITE) {
1082 if (sym->flags & SYMBOL_DEF_AUTO) {
1083 /*
1084 * symbol has old and new value,
1085 * so compare them...
1086 */
1087 switch (sym->type) {
1088 case S_BOOLEAN:
1089 case S_TRISTATE:
1090 if (sym_get_tristate_value(sym) ==
1091 sym->def[S_DEF_AUTO].tri)
1092 continue;
1093 break;
1094 case S_STRING:
1095 case S_HEX:
1096 case S_INT:
1097 if (!strcmp(sym_get_string_value(sym),
1098 sym->def[S_DEF_AUTO].val))
1099 continue;
1100 break;
1101 default:
1102 break;
1103 }
1104 } else {
1105 /*
1106 * If there is no old value, only 'no' (unset)
1107 * is allowed as new value.
1108 */
1109 switch (sym->type) {
1110 case S_BOOLEAN:
1111 case S_TRISTATE:
1112 if (sym_get_tristate_value(sym) == no)
1113 continue;
1114 break;
1115 default:
1116 break;
1117 }
1118 }
1119 } else if (!(sym->flags & SYMBOL_DEF_AUTO))
1120 /* There is neither an old nor a new value. */
1121 continue;
1122 /* else
1123 * There is an old value, but no new value ('no' (unset)
1124 * isn't saved in auto.conf, so the old value is always
1125 * different from 'no').
1126 */
1127
1128 res = conf_touch_dep(sym->name);
1129 if (res)
1130 return res;
1131 }
1132
1133 return 0;
1134}
1135
1136static int __conf_write_autoconf(const char *filename,
1137 void (*print_symbol)(FILE *, struct symbol *),
1138 const struct comment_style *comment_style)
1139{
1140 char tmp[PATH_MAX];
1141 FILE *file;
1142 struct symbol *sym;
1143 int ret, i;
1144
1145 if (make_parent_dir(filename))
1146 return -1;
1147
1148 ret = snprintf(tmp, sizeof(tmp), "%s.tmp", filename);
1149 if (ret >= sizeof(tmp)) /* check truncation */
1150 return -1;
1151
1152 file = fopen(tmp, "w");
1153 if (!file) {
1154 perror("fopen");
1155 return -1;
1156 }
1157
1158 conf_write_heading(file, comment_style);
1159
1160 for_all_symbols(i, sym)
1161 if ((sym->flags & SYMBOL_WRITE) && sym->name)
1162 print_symbol(file, sym);
1163
1164 fflush(file);
1165 /* check possible errors in conf_write_heading() and print_symbol() */
1166 ret = ferror(file);
1167 fclose(file);
1168 if (ret)
1169 return -1;
1170
1171 if (rename(tmp, filename)) {
1172 perror("rename");
1173 return -1;
1174 }
1175
1176 return 0;
1177}
1178
1179int conf_write_autoconf(int overwrite)
1180{
1181 struct symbol *sym;
1182 const char *autoconf_name = conf_get_autoconfig_name();
1183 int ret, i;
1184
1185 if (!overwrite && is_present(autoconf_name))
1186 return 0;
1187
1188 ret = conf_write_autoconf_cmd(autoconf_name);
1189 if (ret)
1190 return -1;
1191
1192 if (conf_touch_deps())
1193 return 1;
1194
1195 for_all_symbols(i, sym)
1196 sym_calc_value(sym);
1197
1198 ret = __conf_write_autoconf(conf_get_autoheader_name(),
1199 print_symbol_for_c,
1200 &comment_style_c);
1201 if (ret)
1202 return ret;
1203
1204 ret = __conf_write_autoconf(conf_get_rustccfg_name(),
1205 print_symbol_for_rustccfg,
1206 NULL);
1207 if (ret)
1208 return ret;
1209
1210 /*
1211 * Create include/config/auto.conf. This must be the last step because
1212 * Kbuild has a dependency on auto.conf and this marks the successful
1213 * completion of the previous steps.
1214 */
1215 ret = __conf_write_autoconf(conf_get_autoconfig_name(),
1216 print_symbol_for_autoconf,
1217 &comment_style_pound);
1218 if (ret)
1219 return ret;
1220
1221 return 0;
1222}
1223
1224static bool conf_changed;
1225static void (*conf_changed_callback)(void);
1226
1227void conf_set_changed(bool val)
1228{
1229 if (conf_changed_callback && conf_changed != val)
1230 conf_changed_callback();
1231
1232 conf_changed = val;
1233}
1234
1235bool conf_get_changed(void)
1236{
1237 return conf_changed;
1238}
1239
1240void conf_set_changed_callback(void (*fn)(void))
1241{
1242 conf_changed_callback = fn;
1243}
1244
1245void set_all_choice_values(struct symbol *csym)
1246{
1247 struct property *prop;
1248 struct symbol *sym;
1249 struct expr *e;
1250
1251 prop = sym_get_choice_prop(csym);
1252
1253 /*
1254 * Set all non-assinged choice values to no
1255 */
1256 expr_list_for_each_sym(prop->expr, e, sym) {
1257 if (!sym_has_value(sym))
1258 sym->def[S_DEF_USER].tri = no;
1259 }
1260 csym->flags |= SYMBOL_DEF_USER;
1261 /* clear VALID to get value calculated */
1262 csym->flags &= ~(SYMBOL_VALID | SYMBOL_NEED_SET_CHOICE_VALUES);
1263}
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 <sys/stat.h>
7#include <ctype.h>
8#include <errno.h>
9#include <fcntl.h>
10#include <stdarg.h>
11#include <stdio.h>
12#include <stdlib.h>
13#include <string.h>
14#include <time.h>
15#include <unistd.h>
16
17#include "lkc.h"
18
19struct conf_printer {
20 void (*print_symbol)(FILE *, struct symbol *, const char *, void *);
21 void (*print_comment)(FILE *, const char *, void *);
22};
23
24static void conf_warning(const char *fmt, ...)
25 __attribute__ ((format (printf, 1, 2)));
26
27static void conf_message(const char *fmt, ...)
28 __attribute__ ((format (printf, 1, 2)));
29
30static const char *conf_filename;
31static int conf_lineno, conf_warnings, conf_unsaved;
32
33const char conf_defname[] = "arch/$ARCH/defconfig";
34
35static void conf_warning(const char *fmt, ...)
36{
37 va_list ap;
38 va_start(ap, fmt);
39 fprintf(stderr, "%s:%d:warning: ", conf_filename, conf_lineno);
40 vfprintf(stderr, fmt, ap);
41 fprintf(stderr, "\n");
42 va_end(ap);
43 conf_warnings++;
44}
45
46static void conf_default_message_callback(const char *fmt, va_list ap)
47{
48 printf("#\n# ");
49 vprintf(fmt, ap);
50 printf("\n#\n");
51}
52
53static void (*conf_message_callback) (const char *fmt, va_list ap) =
54 conf_default_message_callback;
55void conf_set_message_callback(void (*fn) (const char *fmt, va_list ap))
56{
57 conf_message_callback = fn;
58}
59
60static void conf_message(const char *fmt, ...)
61{
62 va_list ap;
63
64 va_start(ap, fmt);
65 if (conf_message_callback)
66 conf_message_callback(fmt, ap);
67 va_end(ap);
68}
69
70const char *conf_get_configname(void)
71{
72 char *name = getenv("KCONFIG_CONFIG");
73
74 return name ? name : ".config";
75}
76
77const char *conf_get_autoconfig_name(void)
78{
79 char *name = getenv("KCONFIG_AUTOCONFIG");
80
81 return name ? name : "include/config/auto.conf";
82}
83
84static char *conf_expand_value(const char *in)
85{
86 struct symbol *sym;
87 const char *src;
88 static char res_value[SYMBOL_MAXLENGTH];
89 char *dst, name[SYMBOL_MAXLENGTH];
90
91 res_value[0] = 0;
92 dst = name;
93 while ((src = strchr(in, '$'))) {
94 strncat(res_value, in, src - in);
95 src++;
96 dst = name;
97 while (isalnum(*src) || *src == '_')
98 *dst++ = *src++;
99 *dst = 0;
100 sym = sym_lookup(name, 0);
101 sym_calc_value(sym);
102 strcat(res_value, sym_get_string_value(sym));
103 in = src;
104 }
105 strcat(res_value, in);
106
107 return res_value;
108}
109
110char *conf_get_default_confname(void)
111{
112 struct stat buf;
113 static char fullname[PATH_MAX+1];
114 char *env, *name;
115
116 name = conf_expand_value(conf_defname);
117 env = getenv(SRCTREE);
118 if (env) {
119 sprintf(fullname, "%s/%s", env, name);
120 if (!stat(fullname, &buf))
121 return fullname;
122 }
123 return name;
124}
125
126static int conf_set_sym_val(struct symbol *sym, int def, int def_flags, char *p)
127{
128 char *p2;
129
130 switch (sym->type) {
131 case S_TRISTATE:
132 if (p[0] == 'm') {
133 sym->def[def].tri = mod;
134 sym->flags |= def_flags;
135 break;
136 }
137 /* fall through */
138 case S_BOOLEAN:
139 if (p[0] == 'y') {
140 sym->def[def].tri = yes;
141 sym->flags |= def_flags;
142 break;
143 }
144 if (p[0] == 'n') {
145 sym->def[def].tri = no;
146 sym->flags |= def_flags;
147 break;
148 }
149 if (def != S_DEF_AUTO)
150 conf_warning("symbol value '%s' invalid for %s",
151 p, sym->name);
152 return 1;
153 case S_OTHER:
154 if (*p != '"') {
155 for (p2 = p; *p2 && !isspace(*p2); p2++)
156 ;
157 sym->type = S_STRING;
158 goto done;
159 }
160 /* fall through */
161 case S_STRING:
162 if (*p++ != '"')
163 break;
164 for (p2 = p; (p2 = strpbrk(p2, "\"\\")); p2++) {
165 if (*p2 == '"') {
166 *p2 = 0;
167 break;
168 }
169 memmove(p2, p2 + 1, strlen(p2));
170 }
171 if (!p2) {
172 if (def != S_DEF_AUTO)
173 conf_warning("invalid string found");
174 return 1;
175 }
176 /* fall through */
177 case S_INT:
178 case S_HEX:
179 done:
180 if (sym_string_valid(sym, p)) {
181 sym->def[def].val = strdup(p);
182 sym->flags |= def_flags;
183 } else {
184 if (def != S_DEF_AUTO)
185 conf_warning("symbol value '%s' invalid for %s",
186 p, sym->name);
187 return 1;
188 }
189 break;
190 default:
191 ;
192 }
193 return 0;
194}
195
196#define LINE_GROWTH 16
197static int add_byte(int c, char **lineptr, size_t slen, size_t *n)
198{
199 char *nline;
200 size_t new_size = slen + 1;
201 if (new_size > *n) {
202 new_size += LINE_GROWTH - 1;
203 new_size *= 2;
204 nline = realloc(*lineptr, new_size);
205 if (!nline)
206 return -1;
207
208 *lineptr = nline;
209 *n = new_size;
210 }
211
212 (*lineptr)[slen] = c;
213
214 return 0;
215}
216
217static ssize_t compat_getline(char **lineptr, size_t *n, FILE *stream)
218{
219 char *line = *lineptr;
220 size_t slen = 0;
221
222 for (;;) {
223 int c = getc(stream);
224
225 switch (c) {
226 case '\n':
227 if (add_byte(c, &line, slen, n) < 0)
228 goto e_out;
229 slen++;
230 /* fall through */
231 case EOF:
232 if (add_byte('\0', &line, slen, n) < 0)
233 goto e_out;
234 *lineptr = line;
235 if (slen == 0)
236 return -1;
237 return slen;
238 default:
239 if (add_byte(c, &line, slen, n) < 0)
240 goto e_out;
241 slen++;
242 }
243 }
244
245e_out:
246 line[slen-1] = '\0';
247 *lineptr = line;
248 return -1;
249}
250
251int conf_read_simple(const char *name, int def)
252{
253 FILE *in = NULL;
254 char *line = NULL;
255 size_t line_asize = 0;
256 char *p, *p2;
257 struct symbol *sym;
258 int i, def_flags;
259
260 if (name) {
261 in = zconf_fopen(name);
262 } else {
263 struct property *prop;
264
265 name = conf_get_configname();
266 in = zconf_fopen(name);
267 if (in)
268 goto load;
269 sym_add_change_count(1);
270 if (!sym_defconfig_list)
271 return 1;
272
273 for_all_defaults(sym_defconfig_list, prop) {
274 if (expr_calc_value(prop->visible.expr) == no ||
275 prop->expr->type != E_SYMBOL)
276 continue;
277 name = conf_expand_value(prop->expr->left.sym->name);
278 in = zconf_fopen(name);
279 if (in) {
280 conf_message(_("using defaults found in %s"),
281 name);
282 goto load;
283 }
284 }
285 }
286 if (!in)
287 return 1;
288
289load:
290 conf_filename = name;
291 conf_lineno = 0;
292 conf_warnings = 0;
293 conf_unsaved = 0;
294
295 def_flags = SYMBOL_DEF << def;
296 for_all_symbols(i, sym) {
297 sym->flags |= SYMBOL_CHANGED;
298 sym->flags &= ~(def_flags|SYMBOL_VALID);
299 if (sym_is_choice(sym))
300 sym->flags |= def_flags;
301 switch (sym->type) {
302 case S_INT:
303 case S_HEX:
304 case S_STRING:
305 if (sym->def[def].val)
306 free(sym->def[def].val);
307 /* fall through */
308 default:
309 sym->def[def].val = NULL;
310 sym->def[def].tri = no;
311 }
312 }
313
314 while (compat_getline(&line, &line_asize, in) != -1) {
315 conf_lineno++;
316 sym = NULL;
317 if (line[0] == '#') {
318 if (memcmp(line + 2, CONFIG_, strlen(CONFIG_)))
319 continue;
320 p = strchr(line + 2 + strlen(CONFIG_), ' ');
321 if (!p)
322 continue;
323 *p++ = 0;
324 if (strncmp(p, "is not set", 10))
325 continue;
326 if (def == S_DEF_USER) {
327 sym = sym_find(line + 2 + strlen(CONFIG_));
328 if (!sym) {
329 sym_add_change_count(1);
330 goto setsym;
331 }
332 } else {
333 sym = sym_lookup(line + 2 + strlen(CONFIG_), 0);
334 if (sym->type == S_UNKNOWN)
335 sym->type = S_BOOLEAN;
336 }
337 if (sym->flags & def_flags) {
338 conf_warning("override: reassigning to symbol %s", sym->name);
339 }
340 switch (sym->type) {
341 case S_BOOLEAN:
342 case S_TRISTATE:
343 sym->def[def].tri = no;
344 sym->flags |= def_flags;
345 break;
346 default:
347 ;
348 }
349 } else if (memcmp(line, CONFIG_, strlen(CONFIG_)) == 0) {
350 p = strchr(line + strlen(CONFIG_), '=');
351 if (!p)
352 continue;
353 *p++ = 0;
354 p2 = strchr(p, '\n');
355 if (p2) {
356 *p2-- = 0;
357 if (*p2 == '\r')
358 *p2 = 0;
359 }
360 if (def == S_DEF_USER) {
361 sym = sym_find(line + strlen(CONFIG_));
362 if (!sym) {
363 sym_add_change_count(1);
364 goto setsym;
365 }
366 } else {
367 sym = sym_lookup(line + strlen(CONFIG_), 0);
368 if (sym->type == S_UNKNOWN)
369 sym->type = S_OTHER;
370 }
371 if (sym->flags & def_flags) {
372 conf_warning("override: reassigning to symbol %s", sym->name);
373 }
374 if (conf_set_sym_val(sym, def, def_flags, p))
375 continue;
376 } else {
377 if (line[0] != '\r' && line[0] != '\n')
378 conf_warning("unexpected data: %.*s",
379 (int)strcspn(line, "\r\n"), line);
380
381 continue;
382 }
383setsym:
384 if (sym && sym_is_choice_value(sym)) {
385 struct symbol *cs = prop_get_symbol(sym_get_choice_prop(sym));
386 switch (sym->def[def].tri) {
387 case no:
388 break;
389 case mod:
390 if (cs->def[def].tri == yes) {
391 conf_warning("%s creates inconsistent choice state", sym->name);
392 cs->flags &= ~def_flags;
393 }
394 break;
395 case yes:
396 if (cs->def[def].tri != no)
397 conf_warning("override: %s changes choice state", sym->name);
398 cs->def[def].val = sym;
399 break;
400 }
401 cs->def[def].tri = EXPR_OR(cs->def[def].tri, sym->def[def].tri);
402 }
403 }
404 free(line);
405 fclose(in);
406 return 0;
407}
408
409int conf_read(const char *name)
410{
411 struct symbol *sym;
412 int i;
413
414 sym_set_change_count(0);
415
416 if (conf_read_simple(name, S_DEF_USER)) {
417 sym_calc_value(modules_sym);
418 return 1;
419 }
420
421 sym_calc_value(modules_sym);
422
423 for_all_symbols(i, sym) {
424 sym_calc_value(sym);
425 if (sym_is_choice(sym) || (sym->flags & SYMBOL_AUTO))
426 continue;
427 if (sym_has_value(sym) && (sym->flags & SYMBOL_WRITE)) {
428 /* check that calculated value agrees with saved value */
429 switch (sym->type) {
430 case S_BOOLEAN:
431 case S_TRISTATE:
432 if (sym->def[S_DEF_USER].tri != sym_get_tristate_value(sym))
433 break;
434 if (!sym_is_choice(sym))
435 continue;
436 /* fall through */
437 default:
438 if (!strcmp(sym->curr.val, sym->def[S_DEF_USER].val))
439 continue;
440 break;
441 }
442 } else if (!sym_has_value(sym) && !(sym->flags & SYMBOL_WRITE))
443 /* no previous value and not saved */
444 continue;
445 conf_unsaved++;
446 /* maybe print value in verbose mode... */
447 }
448
449 for_all_symbols(i, sym) {
450 if (sym_has_value(sym) && !sym_is_choice_value(sym)) {
451 /* Reset values of generates values, so they'll appear
452 * as new, if they should become visible, but that
453 * doesn't quite work if the Kconfig and the saved
454 * configuration disagree.
455 */
456 if (sym->visible == no && !conf_unsaved)
457 sym->flags &= ~SYMBOL_DEF_USER;
458 switch (sym->type) {
459 case S_STRING:
460 case S_INT:
461 case S_HEX:
462 /* Reset a string value if it's out of range */
463 if (sym_string_within_range(sym, sym->def[S_DEF_USER].val))
464 break;
465 sym->flags &= ~(SYMBOL_VALID|SYMBOL_DEF_USER);
466 conf_unsaved++;
467 break;
468 default:
469 break;
470 }
471 }
472 }
473
474 sym_add_change_count(conf_warnings || conf_unsaved);
475
476 return 0;
477}
478
479/*
480 * Kconfig configuration printer
481 *
482 * This printer is used when generating the resulting configuration after
483 * kconfig invocation and `defconfig' files. Unset symbol might be omitted by
484 * passing a non-NULL argument to the printer.
485 *
486 */
487static void
488kconfig_print_symbol(FILE *fp, struct symbol *sym, const char *value, void *arg)
489{
490
491 switch (sym->type) {
492 case S_BOOLEAN:
493 case S_TRISTATE:
494 if (*value == 'n') {
495 bool skip_unset = (arg != NULL);
496
497 if (!skip_unset)
498 fprintf(fp, "# %s%s is not set\n",
499 CONFIG_, sym->name);
500 return;
501 }
502 break;
503 default:
504 break;
505 }
506
507 fprintf(fp, "%s%s=%s\n", CONFIG_, sym->name, value);
508}
509
510static void
511kconfig_print_comment(FILE *fp, const char *value, void *arg)
512{
513 const char *p = value;
514 size_t l;
515
516 for (;;) {
517 l = strcspn(p, "\n");
518 fprintf(fp, "#");
519 if (l) {
520 fprintf(fp, " ");
521 xfwrite(p, l, 1, fp);
522 p += l;
523 }
524 fprintf(fp, "\n");
525 if (*p++ == '\0')
526 break;
527 }
528}
529
530static struct conf_printer kconfig_printer_cb =
531{
532 .print_symbol = kconfig_print_symbol,
533 .print_comment = kconfig_print_comment,
534};
535
536/*
537 * Header printer
538 *
539 * This printer is used when generating the `include/generated/autoconf.h' file.
540 */
541static void
542header_print_symbol(FILE *fp, struct symbol *sym, const char *value, void *arg)
543{
544
545 switch (sym->type) {
546 case S_BOOLEAN:
547 case S_TRISTATE: {
548 const char *suffix = "";
549
550 switch (*value) {
551 case 'n':
552 break;
553 case 'm':
554 suffix = "_MODULE";
555 /* fall through */
556 default:
557 fprintf(fp, "#define %s%s%s 1\n",
558 CONFIG_, sym->name, suffix);
559 }
560 break;
561 }
562 case S_HEX: {
563 const char *prefix = "";
564
565 if (value[0] != '0' || (value[1] != 'x' && value[1] != 'X'))
566 prefix = "0x";
567 fprintf(fp, "#define %s%s %s%s\n",
568 CONFIG_, sym->name, prefix, value);
569 break;
570 }
571 case S_STRING:
572 case S_INT:
573 fprintf(fp, "#define %s%s %s\n",
574 CONFIG_, sym->name, value);
575 break;
576 default:
577 break;
578 }
579
580}
581
582static void
583header_print_comment(FILE *fp, const char *value, void *arg)
584{
585 const char *p = value;
586 size_t l;
587
588 fprintf(fp, "/*\n");
589 for (;;) {
590 l = strcspn(p, "\n");
591 fprintf(fp, " *");
592 if (l) {
593 fprintf(fp, " ");
594 xfwrite(p, l, 1, fp);
595 p += l;
596 }
597 fprintf(fp, "\n");
598 if (*p++ == '\0')
599 break;
600 }
601 fprintf(fp, " */\n");
602}
603
604static struct conf_printer header_printer_cb =
605{
606 .print_symbol = header_print_symbol,
607 .print_comment = header_print_comment,
608};
609
610/*
611 * Tristate printer
612 *
613 * This printer is used when generating the `include/config/tristate.conf' file.
614 */
615static void
616tristate_print_symbol(FILE *fp, struct symbol *sym, const char *value, void *arg)
617{
618
619 if (sym->type == S_TRISTATE && *value != 'n')
620 fprintf(fp, "%s%s=%c\n", CONFIG_, sym->name, (char)toupper(*value));
621}
622
623static struct conf_printer tristate_printer_cb =
624{
625 .print_symbol = tristate_print_symbol,
626 .print_comment = kconfig_print_comment,
627};
628
629static void conf_write_symbol(FILE *fp, struct symbol *sym,
630 struct conf_printer *printer, void *printer_arg)
631{
632 const char *str;
633
634 switch (sym->type) {
635 case S_OTHER:
636 case S_UNKNOWN:
637 break;
638 case S_STRING:
639 str = sym_get_string_value(sym);
640 str = sym_escape_string_value(str);
641 printer->print_symbol(fp, sym, str, printer_arg);
642 free((void *)str);
643 break;
644 default:
645 str = sym_get_string_value(sym);
646 printer->print_symbol(fp, sym, str, printer_arg);
647 }
648}
649
650static void
651conf_write_heading(FILE *fp, struct conf_printer *printer, void *printer_arg)
652{
653 char buf[256];
654
655 snprintf(buf, sizeof(buf),
656 "\n"
657 "Automatically generated file; DO NOT EDIT.\n"
658 "%s\n",
659 rootmenu.prompt->text);
660
661 printer->print_comment(fp, buf, printer_arg);
662}
663
664/*
665 * Write out a minimal config.
666 * All values that has default values are skipped as this is redundant.
667 */
668int conf_write_defconfig(const char *filename)
669{
670 struct symbol *sym;
671 struct menu *menu;
672 FILE *out;
673
674 out = fopen(filename, "w");
675 if (!out)
676 return 1;
677
678 sym_clear_all_valid();
679
680 /* Traverse all menus to find all relevant symbols */
681 menu = rootmenu.list;
682
683 while (menu != NULL)
684 {
685 sym = menu->sym;
686 if (sym == NULL) {
687 if (!menu_is_visible(menu))
688 goto next_menu;
689 } else if (!sym_is_choice(sym)) {
690 sym_calc_value(sym);
691 if (!(sym->flags & SYMBOL_WRITE))
692 goto next_menu;
693 sym->flags &= ~SYMBOL_WRITE;
694 /* If we cannot change the symbol - skip */
695 if (!sym_is_changable(sym))
696 goto next_menu;
697 /* If symbol equals to default value - skip */
698 if (strcmp(sym_get_string_value(sym), sym_get_string_default(sym)) == 0)
699 goto next_menu;
700
701 /*
702 * If symbol is a choice value and equals to the
703 * default for a choice - skip.
704 * But only if value is bool and equal to "y" and
705 * choice is not "optional".
706 * (If choice is "optional" then all values can be "n")
707 */
708 if (sym_is_choice_value(sym)) {
709 struct symbol *cs;
710 struct symbol *ds;
711
712 cs = prop_get_symbol(sym_get_choice_prop(sym));
713 ds = sym_choice_default(cs);
714 if (!sym_is_optional(cs) && sym == ds) {
715 if ((sym->type == S_BOOLEAN) &&
716 sym_get_tristate_value(sym) == yes)
717 goto next_menu;
718 }
719 }
720 conf_write_symbol(out, sym, &kconfig_printer_cb, NULL);
721 }
722next_menu:
723 if (menu->list != NULL) {
724 menu = menu->list;
725 }
726 else if (menu->next != NULL) {
727 menu = menu->next;
728 } else {
729 while ((menu = menu->parent)) {
730 if (menu->next != NULL) {
731 menu = menu->next;
732 break;
733 }
734 }
735 }
736 }
737 fclose(out);
738 return 0;
739}
740
741int conf_write(const char *name)
742{
743 FILE *out;
744 struct symbol *sym;
745 struct menu *menu;
746 const char *basename;
747 const char *str;
748 char dirname[PATH_MAX+1], tmpname[PATH_MAX+1], newname[PATH_MAX+1];
749 char *env;
750
751 dirname[0] = 0;
752 if (name && name[0]) {
753 struct stat st;
754 char *slash;
755
756 if (!stat(name, &st) && S_ISDIR(st.st_mode)) {
757 strcpy(dirname, name);
758 strcat(dirname, "/");
759 basename = conf_get_configname();
760 } else if ((slash = strrchr(name, '/'))) {
761 int size = slash - name + 1;
762 memcpy(dirname, name, size);
763 dirname[size] = 0;
764 if (slash[1])
765 basename = slash + 1;
766 else
767 basename = conf_get_configname();
768 } else
769 basename = name;
770 } else
771 basename = conf_get_configname();
772
773 sprintf(newname, "%s%s", dirname, basename);
774 env = getenv("KCONFIG_OVERWRITECONFIG");
775 if (!env || !*env) {
776 sprintf(tmpname, "%s.tmpconfig.%d", dirname, (int)getpid());
777 out = fopen(tmpname, "w");
778 } else {
779 *tmpname = 0;
780 out = fopen(newname, "w");
781 }
782 if (!out)
783 return 1;
784
785 conf_write_heading(out, &kconfig_printer_cb, NULL);
786
787 if (!conf_get_changed())
788 sym_clear_all_valid();
789
790 menu = rootmenu.list;
791 while (menu) {
792 sym = menu->sym;
793 if (!sym) {
794 if (!menu_is_visible(menu))
795 goto next;
796 str = menu_get_prompt(menu);
797 fprintf(out, "\n"
798 "#\n"
799 "# %s\n"
800 "#\n", str);
801 } else if (!(sym->flags & SYMBOL_CHOICE)) {
802 sym_calc_value(sym);
803 if (!(sym->flags & SYMBOL_WRITE))
804 goto next;
805 sym->flags &= ~SYMBOL_WRITE;
806
807 conf_write_symbol(out, sym, &kconfig_printer_cb, NULL);
808 }
809
810next:
811 if (menu->list) {
812 menu = menu->list;
813 continue;
814 }
815 if (menu->next)
816 menu = menu->next;
817 else while ((menu = menu->parent)) {
818 if (menu->next) {
819 menu = menu->next;
820 break;
821 }
822 }
823 }
824 fclose(out);
825
826 if (*tmpname) {
827 strcat(dirname, basename);
828 strcat(dirname, ".old");
829 rename(newname, dirname);
830 if (rename(tmpname, newname))
831 return 1;
832 }
833
834 conf_message(_("configuration written to %s"), newname);
835
836 sym_set_change_count(0);
837
838 return 0;
839}
840
841static int conf_split_config(void)
842{
843 const char *name;
844 char path[PATH_MAX+1];
845 char *s, *d, c;
846 struct symbol *sym;
847 struct stat sb;
848 int res, i, fd;
849
850 name = conf_get_autoconfig_name();
851 conf_read_simple(name, S_DEF_AUTO);
852 sym_calc_value(modules_sym);
853
854 if (chdir("include/config"))
855 return 1;
856
857 res = 0;
858 for_all_symbols(i, sym) {
859 sym_calc_value(sym);
860 if ((sym->flags & SYMBOL_AUTO) || !sym->name)
861 continue;
862 if (sym->flags & SYMBOL_WRITE) {
863 if (sym->flags & SYMBOL_DEF_AUTO) {
864 /*
865 * symbol has old and new value,
866 * so compare them...
867 */
868 switch (sym->type) {
869 case S_BOOLEAN:
870 case S_TRISTATE:
871 if (sym_get_tristate_value(sym) ==
872 sym->def[S_DEF_AUTO].tri)
873 continue;
874 break;
875 case S_STRING:
876 case S_HEX:
877 case S_INT:
878 if (!strcmp(sym_get_string_value(sym),
879 sym->def[S_DEF_AUTO].val))
880 continue;
881 break;
882 default:
883 break;
884 }
885 } else {
886 /*
887 * If there is no old value, only 'no' (unset)
888 * is allowed as new value.
889 */
890 switch (sym->type) {
891 case S_BOOLEAN:
892 case S_TRISTATE:
893 if (sym_get_tristate_value(sym) == no)
894 continue;
895 break;
896 default:
897 break;
898 }
899 }
900 } else if (!(sym->flags & SYMBOL_DEF_AUTO))
901 /* There is neither an old nor a new value. */
902 continue;
903 /* else
904 * There is an old value, but no new value ('no' (unset)
905 * isn't saved in auto.conf, so the old value is always
906 * different from 'no').
907 */
908
909 /* Replace all '_' and append ".h" */
910 s = sym->name;
911 d = path;
912 while ((c = *s++)) {
913 c = tolower(c);
914 *d++ = (c == '_') ? '/' : c;
915 }
916 strcpy(d, ".h");
917
918 /* Assume directory path already exists. */
919 fd = open(path, O_WRONLY | O_CREAT | O_TRUNC, 0644);
920 if (fd == -1) {
921 if (errno != ENOENT) {
922 res = 1;
923 break;
924 }
925 /*
926 * Create directory components,
927 * unless they exist already.
928 */
929 d = path;
930 while ((d = strchr(d, '/'))) {
931 *d = 0;
932 if (stat(path, &sb) && mkdir(path, 0755)) {
933 res = 1;
934 goto out;
935 }
936 *d++ = '/';
937 }
938 /* Try it again. */
939 fd = open(path, O_WRONLY | O_CREAT | O_TRUNC, 0644);
940 if (fd == -1) {
941 res = 1;
942 break;
943 }
944 }
945 close(fd);
946 }
947out:
948 if (chdir("../.."))
949 return 1;
950
951 return res;
952}
953
954int conf_write_autoconf(void)
955{
956 struct symbol *sym;
957 const char *name;
958 FILE *out, *tristate, *out_h;
959 int i;
960
961 sym_clear_all_valid();
962
963 file_write_dep("include/config/auto.conf.cmd");
964
965 if (conf_split_config())
966 return 1;
967
968 out = fopen(".tmpconfig", "w");
969 if (!out)
970 return 1;
971
972 tristate = fopen(".tmpconfig_tristate", "w");
973 if (!tristate) {
974 fclose(out);
975 return 1;
976 }
977
978 out_h = fopen(".tmpconfig.h", "w");
979 if (!out_h) {
980 fclose(out);
981 fclose(tristate);
982 return 1;
983 }
984
985 conf_write_heading(out, &kconfig_printer_cb, NULL);
986
987 conf_write_heading(tristate, &tristate_printer_cb, NULL);
988
989 conf_write_heading(out_h, &header_printer_cb, NULL);
990
991 for_all_symbols(i, sym) {
992 sym_calc_value(sym);
993 if (!(sym->flags & SYMBOL_WRITE) || !sym->name)
994 continue;
995
996 /* write symbol to auto.conf, tristate and header files */
997 conf_write_symbol(out, sym, &kconfig_printer_cb, (void *)1);
998
999 conf_write_symbol(tristate, sym, &tristate_printer_cb, (void *)1);
1000
1001 conf_write_symbol(out_h, sym, &header_printer_cb, NULL);
1002 }
1003 fclose(out);
1004 fclose(tristate);
1005 fclose(out_h);
1006
1007 name = getenv("KCONFIG_AUTOHEADER");
1008 if (!name)
1009 name = "include/generated/autoconf.h";
1010 if (rename(".tmpconfig.h", name))
1011 return 1;
1012 name = getenv("KCONFIG_TRISTATE");
1013 if (!name)
1014 name = "include/config/tristate.conf";
1015 if (rename(".tmpconfig_tristate", name))
1016 return 1;
1017 name = conf_get_autoconfig_name();
1018 /*
1019 * This must be the last step, kbuild has a dependency on auto.conf
1020 * and this marks the successful completion of the previous steps.
1021 */
1022 if (rename(".tmpconfig", name))
1023 return 1;
1024
1025 return 0;
1026}
1027
1028static int sym_change_count;
1029static void (*conf_changed_callback)(void);
1030
1031void sym_set_change_count(int count)
1032{
1033 int _sym_change_count = sym_change_count;
1034 sym_change_count = count;
1035 if (conf_changed_callback &&
1036 (bool)_sym_change_count != (bool)count)
1037 conf_changed_callback();
1038}
1039
1040void sym_add_change_count(int count)
1041{
1042 sym_set_change_count(count + sym_change_count);
1043}
1044
1045bool conf_get_changed(void)
1046{
1047 return sym_change_count;
1048}
1049
1050void conf_set_changed_callback(void (*fn)(void))
1051{
1052 conf_changed_callback = fn;
1053}
1054
1055static bool randomize_choice_values(struct symbol *csym)
1056{
1057 struct property *prop;
1058 struct symbol *sym;
1059 struct expr *e;
1060 int cnt, def;
1061
1062 /*
1063 * If choice is mod then we may have more items selected
1064 * and if no then no-one.
1065 * In both cases stop.
1066 */
1067 if (csym->curr.tri != yes)
1068 return false;
1069
1070 prop = sym_get_choice_prop(csym);
1071
1072 /* count entries in choice block */
1073 cnt = 0;
1074 expr_list_for_each_sym(prop->expr, e, sym)
1075 cnt++;
1076
1077 /*
1078 * find a random value and set it to yes,
1079 * set the rest to no so we have only one set
1080 */
1081 def = (rand() % cnt);
1082
1083 cnt = 0;
1084 expr_list_for_each_sym(prop->expr, e, sym) {
1085 if (def == cnt++) {
1086 sym->def[S_DEF_USER].tri = yes;
1087 csym->def[S_DEF_USER].val = sym;
1088 }
1089 else {
1090 sym->def[S_DEF_USER].tri = no;
1091 }
1092 sym->flags |= SYMBOL_DEF_USER;
1093 /* clear VALID to get value calculated */
1094 sym->flags &= ~SYMBOL_VALID;
1095 }
1096 csym->flags |= SYMBOL_DEF_USER;
1097 /* clear VALID to get value calculated */
1098 csym->flags &= ~(SYMBOL_VALID);
1099
1100 return true;
1101}
1102
1103void set_all_choice_values(struct symbol *csym)
1104{
1105 struct property *prop;
1106 struct symbol *sym;
1107 struct expr *e;
1108
1109 prop = sym_get_choice_prop(csym);
1110
1111 /*
1112 * Set all non-assinged choice values to no
1113 */
1114 expr_list_for_each_sym(prop->expr, e, sym) {
1115 if (!sym_has_value(sym))
1116 sym->def[S_DEF_USER].tri = no;
1117 }
1118 csym->flags |= SYMBOL_DEF_USER;
1119 /* clear VALID to get value calculated */
1120 csym->flags &= ~(SYMBOL_VALID | SYMBOL_NEED_SET_CHOICE_VALUES);
1121}
1122
1123bool conf_set_all_new_symbols(enum conf_def_mode mode)
1124{
1125 struct symbol *sym, *csym;
1126 int i, cnt, pby, pty, ptm; /* pby: probability of boolean = y
1127 * pty: probability of tristate = y
1128 * ptm: probability of tristate = m
1129 */
1130
1131 pby = 50; pty = ptm = 33; /* can't go as the default in switch-case
1132 * below, otherwise gcc whines about
1133 * -Wmaybe-uninitialized */
1134 if (mode == def_random) {
1135 int n, p[3];
1136 char *env = getenv("KCONFIG_PROBABILITY");
1137 n = 0;
1138 while( env && *env ) {
1139 char *endp;
1140 int tmp = strtol( env, &endp, 10 );
1141 if( tmp >= 0 && tmp <= 100 ) {
1142 p[n++] = tmp;
1143 } else {
1144 errno = ERANGE;
1145 perror( "KCONFIG_PROBABILITY" );
1146 exit( 1 );
1147 }
1148 env = (*endp == ':') ? endp+1 : endp;
1149 if( n >=3 ) {
1150 break;
1151 }
1152 }
1153 switch( n ) {
1154 case 1:
1155 pby = p[0]; ptm = pby/2; pty = pby-ptm;
1156 break;
1157 case 2:
1158 pty = p[0]; ptm = p[1]; pby = pty + ptm;
1159 break;
1160 case 3:
1161 pby = p[0]; pty = p[1]; ptm = p[2];
1162 break;
1163 }
1164
1165 if( pty+ptm > 100 ) {
1166 errno = ERANGE;
1167 perror( "KCONFIG_PROBABILITY" );
1168 exit( 1 );
1169 }
1170 }
1171 bool has_changed = false;
1172
1173 for_all_symbols(i, sym) {
1174 if (sym_has_value(sym) || (sym->flags & SYMBOL_VALID))
1175 continue;
1176 switch (sym_get_type(sym)) {
1177 case S_BOOLEAN:
1178 case S_TRISTATE:
1179 has_changed = true;
1180 switch (mode) {
1181 case def_yes:
1182 sym->def[S_DEF_USER].tri = yes;
1183 break;
1184 case def_mod:
1185 sym->def[S_DEF_USER].tri = mod;
1186 break;
1187 case def_no:
1188 if (sym->flags & SYMBOL_ALLNOCONFIG_Y)
1189 sym->def[S_DEF_USER].tri = yes;
1190 else
1191 sym->def[S_DEF_USER].tri = no;
1192 break;
1193 case def_random:
1194 sym->def[S_DEF_USER].tri = no;
1195 cnt = rand() % 100;
1196 if (sym->type == S_TRISTATE) {
1197 if (cnt < pty)
1198 sym->def[S_DEF_USER].tri = yes;
1199 else if (cnt < (pty+ptm))
1200 sym->def[S_DEF_USER].tri = mod;
1201 } else if (cnt < pby)
1202 sym->def[S_DEF_USER].tri = yes;
1203 break;
1204 default:
1205 continue;
1206 }
1207 if (!(sym_is_choice(sym) && mode == def_random))
1208 sym->flags |= SYMBOL_DEF_USER;
1209 break;
1210 default:
1211 break;
1212 }
1213
1214 }
1215
1216 sym_clear_all_valid();
1217
1218 /*
1219 * We have different type of choice blocks.
1220 * If curr.tri equals to mod then we can select several
1221 * choice symbols in one block.
1222 * In this case we do nothing.
1223 * If curr.tri equals yes then only one symbol can be
1224 * selected in a choice block and we set it to yes,
1225 * and the rest to no.
1226 */
1227 if (mode != def_random) {
1228 for_all_symbols(i, csym) {
1229 if ((sym_is_choice(csym) && !sym_has_value(csym)) ||
1230 sym_is_choice_value(csym))
1231 csym->flags |= SYMBOL_NEED_SET_CHOICE_VALUES;
1232 }
1233 }
1234
1235 for_all_symbols(i, csym) {
1236 if (sym_has_value(csym) || !sym_is_choice(csym))
1237 continue;
1238
1239 sym_calc_value(csym);
1240 if (mode == def_random)
1241 has_changed = randomize_choice_values(csym);
1242 else {
1243 set_all_choice_values(csym);
1244 has_changed = true;
1245 }
1246 }
1247
1248 return has_changed;
1249}