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