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