+bool read_config_file(avl_tree_t *config_tree, const char *fname) {
+ FILE *fp;
+ char buffer[MAX_STRING_SIZE];
+ char *line;
+ int lineno = 0;
+ bool ignore = false;
+ config_t *cfg;
+ bool result = false;
+
+ fp = fopen(fname, "r");
+
+ if(!fp) {
+ logger(LOG_ERR, "Cannot open config file %s: %s", fname, strerror(errno));
+ return false;
+ }
+
+ for(;;) {
+ line = readline(fp, buffer, sizeof(buffer));
+
+ if(!line) {
+ if(feof(fp)) {
+ result = true;
+ }
+
+ break;
+ }
+
+ lineno++;
+
+ if(!*line || *line == '#') {
+ continue;
+ }
+
+ if(ignore) {
+ if(!strncmp(line, "-----END", 8)) {
+ ignore = false;
+ }
+
+ continue;
+ }
+
+ if(!strncmp(line, "-----BEGIN", 10)) {
+ ignore = true;
+ continue;
+ }
+
+ cfg = parse_config_line(line, fname, lineno);
+
+ if(!cfg) {
+ break;
+ }
+
+ config_add(config_tree, cfg);
+ }
+
+ fclose(fp);
+
+ return result;
+}
+
+void read_config_options(avl_tree_t *config_tree, const char *prefix) {
+ size_t prefix_len = prefix ? strlen(prefix) : 0;
+
+ for(const list_node_t *node = cmdline_conf->tail; node; node = node->prev) {
+ const config_t *cfg = node->data;
+
+ if(!prefix) {
+ if(strchr(cfg->variable, '.')) {
+ continue;
+ }
+ } else {
+ if(strncmp(prefix, cfg->variable, prefix_len) ||
+ cfg->variable[prefix_len] != '.') {
+ continue;
+ }
+ }
+
+ config_t *new = new_config();
+
+ if(prefix) {
+ new->variable = xstrdup(cfg->variable + prefix_len + 1);
+ } else {
+ new->variable = xstrdup(cfg->variable);
+ }
+
+ new->value = xstrdup(cfg->value);
+ new->file = NULL;
+ new->line = cfg->line;
+
+ config_add(config_tree, new);
+ }
+}
+
+bool read_server_config(void) {
+ char fname[PATH_MAX];
+ bool x;
+
+ read_config_options(config_tree, NULL);
+
+ snprintf(fname, sizeof(fname), "%s/tinc.conf", confbase);
+ errno = 0;
+ x = read_config_file(config_tree, fname);
+
+ // We will try to read the conf files in the "conf.d" dir
+ if(x) {
+ char dname[PATH_MAX];
+ snprintf(dname, sizeof(dname), "%s/conf.d", confbase);
+ DIR *dir = opendir(dname);
+
+ // If we can find this dir
+ if(dir) {
+ struct dirent *ep;
+
+ // We list all the files in it
+ while(x && (ep = readdir(dir))) {
+ size_t l = strlen(ep->d_name);
+
+ // And we try to read the ones that end with ".conf"
+ if(l > 5 && !strcmp(".conf", & ep->d_name[ l - 5 ])) {
+ if((size_t)snprintf(fname, sizeof(fname), "%s/%s", dname, ep->d_name) >= sizeof(fname)) {
+ logger(LOG_ERR, "Pathname too long: %s/%s", dname, ep->d_name);
+ return false;
+ }
+
+ x = read_config_file(config_tree, fname);
+ }
+ }
+
+ closedir(dir);
+ }
+ }
+
+ if(!x && errno) {
+ logger(LOG_ERR, "Failed to read `%s': %s", fname, strerror(errno));
+ }
+
+ return x;
+}
+
+bool read_connection_config(connection_t *c) {
+ char fname[PATH_MAX];
+ bool x;
+
+ read_config_options(c->config_tree, c->name);
+
+ snprintf(fname, sizeof(fname), "%s/hosts/%s", confbase, c->name);
+ x = read_config_file(c->config_tree, fname);
+
+ return x;
+}
+
+static void disable_old_keys(const char *filename) {
+ char tmpfile[PATH_MAX] = "";
+ char buf[1024];
+ bool disabled = false;
+ FILE *r, *w;
+
+ r = fopen(filename, "r");
+
+ if(!r) {
+ return;
+ }
+
+ int len = snprintf(tmpfile, sizeof(tmpfile), "%s.tmp", filename);
+
+ if(len < 0 || len >= PATH_MAX) {
+ fprintf(stderr, "Pathname too long: %s.tmp\n", filename);
+ w = NULL;
+ } else {
+ w = fopen(tmpfile, "w");
+ }
+
+ while(fgets(buf, sizeof(buf), r)) {
+ if(!strncmp(buf, "-----BEGIN RSA", 14)) {
+ buf[11] = 'O';
+ buf[12] = 'L';
+ buf[13] = 'D';
+ disabled = true;
+ } else if(!strncmp(buf, "-----END RSA", 12)) {
+ buf[ 9] = 'O';
+ buf[10] = 'L';
+ buf[11] = 'D';
+ disabled = true;
+ }
+
+ if(w && fputs(buf, w) < 0) {
+ disabled = false;
+ break;
+ }
+ }
+
+ if(w) {
+ fclose(w);
+ }
+
+ fclose(r);
+
+ if(!w && disabled) {
+ fprintf(stderr, "Warning: old key(s) found, remove them by hand!\n");
+ return;
+ }
+
+ if(disabled) {
+#ifdef HAVE_MINGW
+ // We cannot atomically replace files on Windows.
+ char bakfile[PATH_MAX] = "";
+ snprintf(bakfile, sizeof(bakfile), "%s.bak", filename);
+
+ if(rename(filename, bakfile) || rename(tmpfile, filename)) {
+ rename(bakfile, filename);
+#else
+
+ if(rename(tmpfile, filename)) {
+#endif
+ fprintf(stderr, "Warning: old key(s) found, remove them by hand!\n");
+ } else {
+#ifdef HAVE_MINGW
+ unlink(bakfile);
+#endif
+ fprintf(stderr, "Warning: old key(s) found and disabled.\n");
+ }
+ }
+
+ unlink(tmpfile);