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