remove cbtt, I never used it. And the makefiles just suckz
[openadk.git] / config / confdata.c
blob4a79c72bb279ab8d55893d48c55557f56d9e4325
1 /*
2 * Copyright (C) 2002 Roman Zippel <zippel@linux-m68k.org>
3 * Released under the terms of the GNU GPL v2.0.
4 */
6 #include <sys/stat.h>
7 #include <ctype.h>
8 #include <fcntl.h>
9 #include <stdio.h>
10 #include <stdlib.h>
11 #include <string.h>
12 #include <time.h>
13 #include <unistd.h>
15 #define LKC_DIRECT_LINK
16 #include "lkc.h"
18 static void conf_warning(const char *fmt, ...)
19 __attribute__ ((format (printf, 1, 2)));
21 static const char *conf_filename;
22 static int conf_lineno, conf_warnings, conf_unsaved;
24 const char conf_defname[] = "arch/$ARCH/defconfig";
26 static void conf_warning(const char *fmt, ...)
28 va_list ap;
29 va_start(ap, fmt);
30 fprintf(stderr, "%s:%d:warning: ", conf_filename, conf_lineno);
31 vfprintf(stderr, fmt, ap);
32 fprintf(stderr, "\n");
33 va_end(ap);
34 conf_warnings++;
37 const char *conf_get_configname(void)
39 char *name = getenv("KCONFIG_CONFIG");
41 return name ? name : ".config";
44 const char *conf_get_autoconfig_name(void)
46 char *name = getenv("KCONFIG_AUTOCONFIG");
48 return name ? name : "include/config/auto.conf";
51 static char *conf_expand_value(const char *in)
53 struct symbol *sym;
54 const char *src;
55 static char res_value[SYMBOL_MAXLENGTH];
56 char *dst, name[SYMBOL_MAXLENGTH];
58 res_value[0] = 0;
59 dst = name;
60 while ((src = strchr(in, '$'))) {
61 strncat(res_value, in, src - in);
62 src++;
63 dst = name;
64 while (isalnum(*src) || *src == '_')
65 *dst++ = *src++;
66 *dst = 0;
67 sym = sym_lookup(name, 0);
68 sym_calc_value(sym);
69 strcat(res_value, sym_get_string_value(sym));
70 in = src;
72 strcat(res_value, in);
74 return res_value;
77 char *conf_get_default_confname(void)
79 struct stat buf;
80 static char fullname[PATH_MAX+1];
81 char *env, *name;
83 name = conf_expand_value(conf_defname);
84 env = getenv(SRCTREE);
85 if (env) {
86 sprintf(fullname, "%s/%s", env, name);
87 if (!stat(fullname, &buf))
88 return fullname;
90 return name;
93 static int conf_set_sym_val(struct symbol *sym, int def, int def_flags, char *p)
95 char *p2;
97 switch (sym->type) {
98 case S_TRISTATE:
99 if (p[0] == 'm') {
100 sym->def[def].tri = mod;
101 sym->flags |= def_flags;
102 break;
104 case S_BOOLEAN:
105 if (p[0] == 'y') {
106 sym->def[def].tri = yes;
107 sym->flags |= def_flags;
108 break;
110 if (p[0] == 'n') {
111 sym->def[def].tri = no;
112 sym->flags |= def_flags;
113 break;
115 conf_warning("symbol value '%s' invalid for %s", p, sym->name);
116 break;
117 case S_OTHER:
118 if (*p != '"') {
119 for (p2 = p; *p2 && !isspace(*p2); p2++)
121 sym->type = S_STRING;
122 goto done;
124 case S_STRING:
125 if (*p++ != '"')
126 break;
127 for (p2 = p; (p2 = strpbrk(p2, "\"\\")); p2++) {
128 if (*p2 == '"') {
129 *p2 = 0;
130 break;
132 memmove(p2, p2 + 1, strlen(p2));
134 if (!p2) {
135 conf_warning("invalid string found");
136 return 1;
138 case S_INT:
139 case S_HEX:
140 done:
141 if (sym_string_valid(sym, p)) {
142 sym->def[def].val = strdup(p);
143 sym->flags |= def_flags;
144 } else {
145 conf_warning("symbol value '%s' invalid for %s", p, sym->name);
146 return 1;
148 break;
149 default:
152 return 0;
155 int conf_read_simple(const char *name, int def)
157 FILE *in = NULL;
158 char line[1024];
159 char *p, *p2;
160 struct symbol *sym;
161 int i, def_flags;
163 if (name) {
164 in = zconf_fopen(name);
165 } else {
166 struct property *prop;
168 name = conf_get_configname();
169 in = zconf_fopen(name);
170 if (in)
171 goto load;
172 sym_add_change_count(1);
173 if (!sym_defconfig_list)
174 return 1;
176 for_all_defaults(sym_defconfig_list, prop) {
177 if (expr_calc_value(prop->visible.expr) == no ||
178 prop->expr->type != E_SYMBOL)
179 continue;
180 name = conf_expand_value(prop->expr->left.sym->name);
181 in = zconf_fopen(name);
182 if (in) {
183 printf(_("#\n"
184 "# using defaults found in %s\n"
185 "#\n"), name);
186 goto load;
190 if (!in)
191 return 1;
193 load:
194 conf_filename = name;
195 conf_lineno = 0;
196 conf_warnings = 0;
197 conf_unsaved = 0;
199 def_flags = SYMBOL_DEF << def;
200 for_all_symbols(i, sym) {
201 sym->flags |= SYMBOL_CHANGED;
202 sym->flags &= ~(def_flags|SYMBOL_VALID);
203 if (sym_is_choice(sym))
204 sym->flags |= def_flags;
205 switch (sym->type) {
206 case S_INT:
207 case S_HEX:
208 case S_STRING:
209 if (sym->def[def].val)
210 free(sym->def[def].val);
211 default:
212 sym->def[def].val = NULL;
213 sym->def[def].tri = no;
217 while (fgets(line, sizeof(line), in)) {
218 conf_lineno++;
219 sym = NULL;
220 switch (line[0]) {
221 case '#':
222 p = strchr(line + 2, ' ');
223 if (!p)
224 continue;
225 *p++ = 0;
226 if (strncmp(p, "is not set", 10))
227 continue;
228 if (def == S_DEF_USER) {
229 sym = sym_find(line + 2);
230 if (!sym) {
231 sym_add_change_count(1);
232 break;
234 } else {
235 sym = sym_lookup(line + 2, 0);
236 if (sym->type == S_UNKNOWN)
237 sym->type = S_BOOLEAN;
239 if (sym->flags & def_flags) {
240 conf_warning("override: reassigning to symbol %s", sym->name);
242 switch (sym->type) {
243 case S_BOOLEAN:
244 case S_TRISTATE:
245 sym->def[def].tri = no;
246 sym->flags |= def_flags;
247 break;
248 default:
251 break;
252 default:
253 p = strchr(line, '=');
254 if (!p)
255 continue;
256 *p++ = 0;
257 p2 = strchr(p, '\n');
258 if (p2) {
259 *p2-- = 0;
260 if (*p2 == '\r')
261 *p2 = 0;
263 if (def == S_DEF_USER) {
264 sym = sym_find(line);
265 if (!sym) {
266 sym_add_change_count(1);
267 break;
269 } else {
270 sym = sym_lookup(line, 0);
271 if (sym->type == S_UNKNOWN)
272 sym->type = S_OTHER;
274 if (sym->flags & def_flags) {
275 conf_warning("override: reassigning to symbol %s", sym->name);
277 if (conf_set_sym_val(sym, def, def_flags, p))
278 continue;
279 break;
280 case '\r':
281 case '\n':
282 break;
284 if (sym && sym_is_choice_value(sym)) {
285 struct symbol *cs = prop_get_symbol(sym_get_choice_prop(sym));
286 switch (sym->def[def].tri) {
287 case no:
288 break;
289 case mod:
290 if (cs->def[def].tri == yes) {
291 conf_warning("%s creates inconsistent choice state", sym->name);
292 cs->flags &= ~def_flags;
294 break;
295 case yes:
296 if (cs->def[def].tri != no)
297 conf_warning("override: %s changes choice state", sym->name);
298 cs->def[def].val = sym;
299 break;
301 cs->def[def].tri = EXPR_OR(cs->def[def].tri, sym->def[def].tri);
304 fclose(in);
306 if (modules_sym)
307 sym_calc_value(modules_sym);
308 return 0;
311 int conf_read(const char *name)
313 struct symbol *sym, *choice_sym;
314 struct property *prop;
315 struct expr *e;
316 int i, flags;
318 sym_set_change_count(0);
320 if (conf_read_simple(name, S_DEF_USER))
321 return 1;
323 for_all_symbols(i, sym) {
324 sym_calc_value(sym);
325 if (sym_is_choice(sym) || (sym->flags & SYMBOL_AUTO))
326 goto sym_ok;
327 if (sym_has_value(sym) && (sym->flags & SYMBOL_WRITE)) {
328 /* check that calculated value agrees with saved value */
329 switch (sym->type) {
330 case S_BOOLEAN:
331 case S_TRISTATE:
332 if (sym->def[S_DEF_USER].tri != sym_get_tristate_value(sym))
333 break;
334 if (!sym_is_choice(sym))
335 goto sym_ok;
336 default:
337 if (!strcmp(sym->curr.val, sym->def[S_DEF_USER].val))
338 goto sym_ok;
339 break;
341 } else if (!sym_has_value(sym) && !(sym->flags & SYMBOL_WRITE))
342 /* no previous value and not saved */
343 goto sym_ok;
344 conf_unsaved++;
345 /* maybe print value in verbose mode... */
346 sym_ok:
347 if (!sym_is_choice(sym))
348 continue;
349 /* The choice symbol only has a set value (and thus is not new)
350 * if all its visible childs have values.
352 prop = sym_get_choice_prop(sym);
353 flags = sym->flags;
354 expr_list_for_each_sym(prop->expr, e, choice_sym)
355 if (choice_sym->visible != no)
356 flags &= choice_sym->flags;
357 sym->flags &= flags | ~SYMBOL_DEF_USER;
360 for_all_symbols(i, sym) {
361 if (sym_has_value(sym) && !sym_is_choice_value(sym)) {
362 /* Reset values of generates values, so they'll appear
363 * as new, if they should become visible, but that
364 * doesn't quite work if the Kconfig and the saved
365 * configuration disagree.
367 if (sym->visible == no && !conf_unsaved)
368 sym->flags &= ~SYMBOL_DEF_USER;
369 switch (sym->type) {
370 case S_STRING:
371 case S_INT:
372 case S_HEX:
373 /* Reset a string value if it's out of range */
374 if (sym_string_within_range(sym, sym->def[S_DEF_USER].val))
375 break;
376 sym->flags &= ~(SYMBOL_VALID|SYMBOL_DEF_USER);
377 conf_unsaved++;
378 break;
379 default:
380 break;
385 sym_add_change_count(conf_warnings || conf_unsaved);
387 return 0;
390 int conf_write(const char *name)
392 FILE *out;
393 struct symbol *sym;
394 struct menu *menu;
395 const char *basename;
396 char dirname[128], tmpname[128], newname[128];
397 int type, l;
398 const char *str;
399 time_t now;
400 int use_timestamp = 1;
401 char *env;
403 dirname[0] = 0;
404 if (name && name[0]) {
405 struct stat st;
406 char *slash;
408 if (!stat(name, &st) && S_ISDIR(st.st_mode)) {
409 strcpy(dirname, name);
410 strcat(dirname, "/");
411 basename = conf_get_configname();
412 } else if ((slash = strrchr(name, '/'))) {
413 int size = slash - name + 1;
414 memcpy(dirname, name, size);
415 dirname[size] = 0;
416 if (slash[1])
417 basename = slash + 1;
418 else
419 basename = conf_get_configname();
420 } else
421 basename = name;
422 } else
423 basename = conf_get_configname();
425 sprintf(newname, "%s%s", dirname, basename);
426 env = getenv("KCONFIG_OVERWRITECONFIG");
427 if (!env || !*env) {
428 sprintf(tmpname, "%s.tmpconfig.%d", dirname, (int)getpid());
429 out = fopen(tmpname, "w");
430 } else {
431 *tmpname = 0;
432 out = fopen(newname, "w");
434 if (!out)
435 return 1;
437 sym = sym_lookup("ADKVERSION", 0);
438 sym_calc_value(sym);
439 time(&now);
440 env = getenv("KCONFIG_NOTIMESTAMP");
441 if (env && *env)
442 use_timestamp = 0;
444 fprintf(out, _("#\n"
445 "# Automatically generated make config: don't edit\n"
446 "# OpenADK version: %s\n"
447 "%s%s"
448 "#\n"),
449 sym_get_string_value(sym),
450 use_timestamp ? "# " : "",
451 use_timestamp ? ctime(&now) : "");
453 if (!conf_get_changed())
454 sym_clear_all_valid();
456 menu = rootmenu.list;
457 while (menu) {
458 sym = menu->sym;
459 if (!sym) {
460 if (!menu_is_visible(menu))
461 goto next;
462 str = menu_get_prompt(menu);
463 fprintf(out, "\n"
464 "#\n"
465 "# %s\n"
466 "#\n", str);
467 } else if (!(sym->flags & SYMBOL_CHOICE)) {
468 sym_calc_value(sym);
469 if (!(sym->flags & SYMBOL_WRITE))
470 goto next;
471 sym->flags &= ~SYMBOL_WRITE;
472 type = sym->type;
473 if (type == S_TRISTATE) {
474 sym_calc_value(modules_sym);
475 if (modules_sym->curr.tri == no)
476 type = S_BOOLEAN;
478 switch (type) {
479 case S_BOOLEAN:
480 case S_TRISTATE:
481 switch (sym_get_tristate_value(sym)) {
482 case no:
483 fprintf(out, "# %s is not set\n", sym->name);
484 break;
485 case mod:
486 fprintf(out, "%s=m\n", sym->name);
487 break;
488 case yes:
489 fprintf(out, "%s=y\n", sym->name);
490 break;
492 break;
493 case S_STRING:
494 str = sym_get_string_value(sym);
495 fprintf(out, "%s=\"", sym->name);
496 while (1) {
497 l = strcspn(str, "\"\\");
498 if (l) {
499 fwrite(str, l, 1, out);
500 str += l;
502 if (!*str)
503 break;
504 fprintf(out, "\\%c", *str++);
506 fputs("\"\n", out);
507 break;
508 case S_HEX:
509 str = sym_get_string_value(sym);
510 if (str[0] != '0' || (str[1] != 'x' && str[1] != 'X')) {
511 fprintf(out, "%s=%s\n", sym->name, str);
512 break;
514 case S_INT:
515 str = sym_get_string_value(sym);
516 fprintf(out, "%s=%s\n", sym->name, str);
517 break;
521 next:
522 if (menu->list) {
523 menu = menu->list;
524 continue;
526 if (menu->next)
527 menu = menu->next;
528 else while ((menu = menu->parent)) {
529 if (menu->next) {
530 menu = menu->next;
531 break;
535 fclose(out);
537 if (*tmpname) {
538 strcat(dirname, basename);
539 strcat(dirname, ".old");
540 rename(newname, dirname);
541 if (rename(tmpname, newname))
542 return 1;
545 printf(_("#\n"
546 "# configuration written to %s\n"
547 "#\n"), newname);
549 sym_set_change_count(0);
551 return 0;
554 int conf_split_config(void)
556 const char *name;
557 char path[128];
558 char *s, *d, c;
559 struct symbol *sym;
560 struct stat sb;
561 int res, i, fd;
563 name = conf_get_autoconfig_name();
564 conf_read_simple(name, S_DEF_AUTO);
566 if (chdir("include/config"))
567 return 1;
569 res = 0;
570 for_all_symbols(i, sym) {
571 sym_calc_value(sym);
572 if ((sym->flags & SYMBOL_AUTO) || !sym->name)
573 continue;
574 if (sym->flags & SYMBOL_WRITE) {
575 if (sym->flags & SYMBOL_DEF_AUTO) {
577 * symbol has old and new value,
578 * so compare them...
580 switch (sym->type) {
581 case S_BOOLEAN:
582 case S_TRISTATE:
583 if (sym_get_tristate_value(sym) ==
584 sym->def[S_DEF_AUTO].tri)
585 continue;
586 break;
587 case S_STRING:
588 case S_HEX:
589 case S_INT:
590 if (!strcmp(sym_get_string_value(sym),
591 sym->def[S_DEF_AUTO].val))
592 continue;
593 break;
594 default:
595 break;
597 } else {
599 * If there is no old value, only 'no' (unset)
600 * is allowed as new value.
602 switch (sym->type) {
603 case S_BOOLEAN:
604 case S_TRISTATE:
605 if (sym_get_tristate_value(sym) == no)
606 continue;
607 break;
608 default:
609 break;
612 } else if (!(sym->flags & SYMBOL_DEF_AUTO))
613 /* There is neither an old nor a new value. */
614 continue;
615 /* else
616 * There is an old value, but no new value ('no' (unset)
617 * isn't saved in auto.conf, so the old value is always
618 * different from 'no').
621 /* Replace all '_' and append ".h" */
622 s = sym->name;
623 d = path;
624 while ((c = *s++)) {
625 c = tolower(c);
626 *d++ = (c == '_') ? '/' : c;
628 strcpy(d, ".h");
630 /* Assume directory path already exists. */
631 fd = open(path, O_WRONLY | O_CREAT | O_TRUNC, 0644);
632 if (fd == -1) {
633 if (errno != ENOENT) {
634 res = 1;
635 break;
638 * Create directory components,
639 * unless they exist already.
641 d = path;
642 while ((d = strchr(d, '/'))) {
643 *d = 0;
644 if (stat(path, &sb) && mkdir(path, 0755)) {
645 res = 1;
646 goto out;
648 *d++ = '/';
650 /* Try it again. */
651 fd = open(path, O_WRONLY | O_CREAT | O_TRUNC, 0644);
652 if (fd == -1) {
653 res = 1;
654 break;
657 close(fd);
659 out:
660 if (chdir("../.."))
661 return 1;
663 return res;
666 int conf_write_autoconf(void)
668 struct symbol *sym;
669 const char *str;
670 const char *name;
671 FILE *out, *out_h;
672 time_t now;
673 int i, l;
675 sym_clear_all_valid();
677 file_write_dep("include/config/auto.conf.cmd");
679 if (conf_split_config())
680 return 1;
682 out = fopen(".tmpconfig", "w");
683 if (!out)
684 return 1;
686 out_h = fopen(".tmpconfig.h", "w");
687 if (!out_h) {
688 fclose(out);
689 return 1;
692 sym = sym_lookup("ADKVERSION", 0);
693 sym_calc_value(sym);
694 time(&now);
695 fprintf(out, "#\n"
696 "# Automatically generated make config: don't edit\n"
697 "# OpenADK version: %s\n"
698 "# %s"
699 "#\n",
700 sym_get_string_value(sym), ctime(&now));
701 fprintf(out_h, "/*\n"
702 " * Automatically generated C config: don't edit\n"
703 " * OpenADK version: %s\n"
704 " * %s"
705 " */\n"
706 "#define AUTOCONF_INCLUDED\n",
707 sym_get_string_value(sym), ctime(&now));
709 for_all_symbols(i, sym) {
710 sym_calc_value(sym);
711 if (!(sym->flags & SYMBOL_WRITE) || !sym->name)
712 continue;
713 switch (sym->type) {
714 case S_BOOLEAN:
715 case S_TRISTATE:
716 switch (sym_get_tristate_value(sym)) {
717 case no:
718 break;
719 case mod:
720 fprintf(out, "%s=m\n", sym->name);
721 fprintf(out_h, "#define %s_MODULE 1\n", sym->name);
722 break;
723 case yes:
724 fprintf(out, "%s=y\n", sym->name);
725 fprintf(out_h, "#define %s 1\n", sym->name);
726 break;
728 break;
729 case S_STRING:
730 str = sym_get_string_value(sym);
731 fprintf(out, "%s=\"", sym->name);
732 fprintf(out_h, "#define %s \"", sym->name);
733 while (1) {
734 l = strcspn(str, "\"\\");
735 if (l) {
736 fwrite(str, l, 1, out);
737 fwrite(str, l, 1, out_h);
738 str += l;
740 if (!*str)
741 break;
742 fprintf(out, "\\%c", *str);
743 fprintf(out_h, "\\%c", *str);
744 str++;
746 fputs("\"\n", out);
747 fputs("\"\n", out_h);
748 break;
749 case S_HEX:
750 str = sym_get_string_value(sym);
751 if (str[0] != '0' || (str[1] != 'x' && str[1] != 'X')) {
752 fprintf(out, "%s=%s\n", sym->name, str);
753 fprintf(out_h, "#define %s 0x%s\n", sym->name, str);
754 break;
756 case S_INT:
757 str = sym_get_string_value(sym);
758 fprintf(out, "%s=%s\n", sym->name, str);
759 fprintf(out_h, "#define %s %s\n", sym->name, str);
760 break;
761 default:
762 break;
765 fclose(out);
766 fclose(out_h);
768 name = getenv("KCONFIG_AUTOHEADER");
769 if (!name)
770 name = "include/linux/autoconf.h";
771 if (rename(".tmpconfig.h", name))
772 return 1;
773 name = conf_get_autoconfig_name();
775 * This must be the last step, kbuild has a dependency on auto.conf
776 * and this marks the successful completion of the previous steps.
778 if (rename(".tmpconfig", name))
779 return 1;
781 return 0;
784 static int sym_change_count;
785 static void (*conf_changed_callback)(void);
787 void sym_set_change_count(int count)
789 int _sym_change_count = sym_change_count;
790 sym_change_count = count;
791 if (conf_changed_callback &&
792 (bool)_sym_change_count != (bool)count)
793 conf_changed_callback();
796 void sym_add_change_count(int count)
798 sym_set_change_count(count + sym_change_count);
801 bool conf_get_changed(void)
803 return sym_change_count;
806 void conf_set_changed_callback(void (*fn)(void))
808 conf_changed_callback = fn;
812 void conf_set_all_new_symbols(enum conf_def_mode mode)
814 struct symbol *sym, *csym;
815 struct property *prop;
816 struct expr *e;
817 int i, cnt, def;
819 for_all_symbols(i, sym) {
820 if (sym_has_value(sym))
821 continue;
822 switch (sym_get_type(sym)) {
823 case S_BOOLEAN:
824 case S_TRISTATE:
825 switch (mode) {
826 case def_yes:
827 sym->def[S_DEF_USER].tri = yes;
828 break;
829 case def_mod:
830 sym->def[S_DEF_USER].tri = mod;
831 break;
832 case def_no:
833 sym->def[S_DEF_USER].tri = no;
834 break;
835 case def_random:
836 sym->def[S_DEF_USER].tri = (tristate)(rand() % 3);
837 break;
838 default:
839 continue;
841 if (!(sym_is_choice(sym) && mode == def_random))
842 sym->flags |= SYMBOL_DEF_USER;
843 break;
844 default:
845 break;
850 sym_clear_all_valid();
852 if (mode != def_random)
853 return;
855 * We have different type of choice blocks.
856 * If curr.tri equal to mod then we can select several
857 * choice symbols in one block.
858 * In this case we do nothing.
859 * If curr.tri equal yes then only one symbol can be
860 * selected in a choice block and we set it to yes,
861 * and the rest to no.
863 for_all_symbols(i, csym) {
864 if (sym_has_value(csym) || !sym_is_choice(csym))
865 continue;
867 sym_calc_value(csym);
869 if (csym->curr.tri != yes)
870 continue;
872 prop = sym_get_choice_prop(csym);
874 /* count entries in choice block */
875 cnt = 0;
876 expr_list_for_each_sym(prop->expr, e, sym)
877 cnt++;
880 * find a random value and set it to yes,
881 * set the rest to no so we have only one set
883 def = (rand() % cnt);
885 cnt = 0;
886 expr_list_for_each_sym(prop->expr, e, sym) {
887 if (def == cnt++) {
888 sym->def[S_DEF_USER].tri = yes;
889 csym->def[S_DEF_USER].val = sym;
891 else {
892 sym->def[S_DEF_USER].tri = no;
895 csym->flags |= SYMBOL_DEF_USER;
896 /* clear VALID to get value calculated */
897 csym->flags &= ~(SYMBOL_VALID);