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