4f0cbfe9e799da791356e831396eb7863da02923
[olsrd.git] / src / cfgparser / olsrd_conf.c
1
2 /*
3  * The olsr.org Optimized Link-State Routing daemon(olsrd)
4  * Copyright (c) 2004, Andreas Tonnesen(andreto@olsr.org)
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  *
11  * * Redistributions of source code must retain the above copyright
12  *   notice, this list of conditions and the following disclaimer.
13  * * Redistributions in binary form must reproduce the above copyright
14  *   notice, this list of conditions and the following disclaimer in
15  *   the documentation and/or other materials provided with the
16  *   distribution.
17  * * Neither the name of olsr.org, olsrd nor the names of its
18  *   contributors may be used to endorse or promote products derived
19  *   from this software without specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
22  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
23  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
24  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
25  * COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
26  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
27  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
28  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
29  * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
31  * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
32  * POSSIBILITY OF SUCH DAMAGE.
33  *
34  * Visit http://www.olsr.org for more information.
35  *
36  * If you find this software useful feel free to make a donation
37  * to the project. For more information see the website or contact
38  * the copyright holders.
39  *
40  */
41
42 #include "olsrd_conf.h"
43 #include "ipcalc.h"
44 #include "olsr_cfg.h"
45 #include "defs.h"
46 #include "net_olsr.h"
47 #include "olsr.h"
48
49 #include <assert.h>
50 #include <stdio.h>
51 #include <string.h>
52 #include <errno.h>
53 #include <stdlib.h>
54 #include <sys/types.h>
55 #include <sys/socket.h>
56 #include <netinet/in.h>
57 #include <arpa/inet.h>
58 #ifdef linux
59 #include <linux/rtnetlink.h>
60 #endif
61
62 extern FILE *yyin;
63 extern int yyparse(void);
64
65 static char interface_defaults_name[] = "[InterfaceDefaults]";
66
67 const char *GW_UPLINK_TXT[] = {
68   "none",
69   "ipv4",
70   "ipv6",
71   "both"
72 };
73
74 static char copyright_string[] __attribute__ ((unused)) =
75   "The olsr.org Optimized Link-State Routing daemon(olsrd) Copyright (c) 2004, Andreas Tonnesen(andreto@olsr.org) All rights reserved.";
76
77 int current_line;
78
79 /* Global stuff externed in defs.h */
80 FILE *debug_handle;                    /* Where to send debug(defaults to stdout) */
81 struct olsrd_config *olsr_cnf;         /* The global configuration */
82
83 #ifdef MAKEBIN
84
85 /* Build as standalone binary */
86 int
87 main(int argc, char *argv[])
88 {
89   struct olsrd_config *cnf;
90
91   if (argc == 1) {
92     fprintf(stderr, "Usage: olsrd_cfgparser [filename] -print\n\n");
93     exit(EXIT_FAILURE);
94   }
95
96   if ((cnf = olsrd_parse_cnf(argv[1])) != NULL) {
97     if ((argc > 2) && (!strcmp(argv[2], "-print"))) {
98       olsrd_print_cnf(cnf);
99       olsrd_write_cnf(cnf, "./out.conf");
100     } else
101       printf("Use -print to view parsed values\n");
102     printf("Configfile parsed OK\n");
103   } else {
104     printf("Failed parsing \"%s\"\n", argv[1]);
105   }
106
107   return 0;
108 }
109
110 #else
111
112 /* Build as part of olsrd */
113
114 #endif
115
116 int
117 olsrd_parse_cnf(const char *filename)
118 {
119   struct olsr_if *in, *new_ifqueue;
120   int rc;
121
122   fprintf(stderr, "Parsing file: \"%s\"\n", filename);
123
124   yyin = fopen(filename, "r");
125   if (yyin == NULL) {
126     fprintf(stderr, "Cannot open configuration file '%s': %s.\n", filename, strerror(errno));
127     return -1;
128   }
129
130   current_line = 1;
131   rc = yyparse();
132   fclose(yyin);
133   if (rc != 0) {
134     return -1;
135   }
136
137   /* Reverse the queue (added by user request) */
138   in = olsr_cnf->interfaces;
139   new_ifqueue = NULL;
140
141   while (in) {
142     struct olsr_if *in_tmp = in;
143     in = in->next;
144
145     in_tmp->next = new_ifqueue;
146     new_ifqueue = in_tmp;
147   }
148
149   olsr_cnf->interfaces = new_ifqueue;
150
151   for (in = olsr_cnf->interfaces; in != NULL; in = in->next) {
152     /* set various stuff */
153     in->configured = false;
154     in->interf = NULL;
155     in->host_emul = false;
156   }
157   return 0;
158 }
159
160 /* prints an interface (and checks it againt the default config) and the inverted config */
161 static void
162 olsrd_print_interface_cnf(struct if_config_options *cnf, struct if_config_options *cnfi, bool defcnf)
163 {
164   struct olsr_lq_mult *mult;
165   int lq_mult_cnt = 0;
166   char ipv6_buf[INET6_ADDRSTRLEN];                  /* buffer for IPv6 inet_htop */
167
168   if (cnf->ipv4_multicast.v4.s_addr) {
169     printf("\tIPv4 broadcast/multicast : %s%s\n", inet_ntoa(cnf->ipv4_multicast.v4),DEFAULT_STR(ipv4_multicast.v4.s_addr));
170   } else {
171     printf("\tIPv4 broadcast/multicast : AUTO%s\n",DEFAULT_STR(ipv4_multicast.v4.s_addr));
172   }
173
174   if (cnf->mode==IF_MODE_ETHER){
175     printf("\tMode           : ether%s\n",DEFAULT_STR(mode));
176   } else {
177     printf("\tMode           : mesh%s\n",DEFAULT_STR(mode));
178   }
179
180   printf("\tIPv6 multicast           : %s%s\n", inet_ntop(AF_INET6, &cnf->ipv6_multicast.v6, ipv6_buf, sizeof(ipv6_buf)),DEFAULT_STR(ipv6_multicast.v6));
181
182   printf("\tHELLO emission/validity  : %0.2f%s/%0.2f%s\n", cnf->hello_params.emission_interval, DEFAULT_STR(hello_params.emission_interval),
183          cnf->hello_params.validity_time,DEFAULT_STR(hello_params.validity_time));
184   printf("\tTC emission/validity     : %0.2f%s/%0.2f%s\n", cnf->tc_params.emission_interval, DEFAULT_STR(tc_params.emission_interval),
185          cnf->tc_params.validity_time,DEFAULT_STR(tc_params.validity_time));
186   printf("\tMID emission/validity    : %0.2f%s/%0.2f%s\n", cnf->mid_params.emission_interval, DEFAULT_STR(mid_params.emission_interval),
187          cnf->mid_params.validity_time,DEFAULT_STR(mid_params.validity_time));
188   printf("\tHNA emission/validity    : %0.2f%s/%0.2f%s\n", cnf->hna_params.emission_interval, DEFAULT_STR(hna_params.emission_interval),
189          cnf->hna_params.validity_time,DEFAULT_STR(hna_params.validity_time));
190
191   for (mult = cnf->lq_mult; mult != NULL; mult = mult->next) {
192     lq_mult_cnt++;
193     printf("\tLinkQualityMult          : %s %0.2f %s\n", inet_ntop(olsr_cnf->ip_version, &mult->addr, ipv6_buf, sizeof(ipv6_buf)),
194       (float)(mult->value) / 65536.0, ((lq_mult_cnt > cnf->orig_lq_mult_cnt)?" (d)":""));
195   }
196
197   printf("\tAutodetect changes       : %s%s\n", cnf->autodetect_chg ? "yes" : "no",DEFAULT_STR(autodetect_chg));
198 }
199
200 static 
201 int olsrd_sanity_check_interface_cnf(struct if_config_options * io, struct olsrd_config * cnf, char* name) {
202   struct olsr_lq_mult *mult;
203
204   /* HELLO interval */
205
206   if (io->hello_params.validity_time < 0.0) {
207     if (cnf->lq_level == 0)
208       io->hello_params.validity_time = NEIGHB_HOLD_TIME;
209
210     else
211       io->hello_params.validity_time = (int)(REFRESH_INTERVAL / cnf->lq_aging);
212   }
213
214   if (io->hello_params.emission_interval < cnf->pollrate || io->hello_params.emission_interval > io->hello_params.validity_time) {
215     fprintf(stderr, "Bad HELLO parameters! (em: %0.2f, vt: %0.2f) for dev %s\n", io->hello_params.emission_interval,
216             io->hello_params.validity_time, name);
217     return -1;
218   }
219
220   /* TC interval */
221   if (io->tc_params.emission_interval < cnf->pollrate || io->tc_params.emission_interval > io->tc_params.validity_time) {
222     fprintf(stderr, "Bad TC parameters! (em: %0.2f, vt: %0.2f) for dev %s\n", io->tc_params.emission_interval,
223         io->tc_params.validity_time, name);
224     return -1;
225   }
226
227   if (cnf->min_tc_vtime > 0.0 && (io->tc_params.validity_time / io->tc_params.emission_interval) < 128) {
228     fprintf(stderr, "Please use a tc vtime at least 128 times the emission interval while using the min_tc_vtime hack.\n");
229     return -1;
230   }
231   /* MID interval */
232   if (io->mid_params.emission_interval < cnf->pollrate || io->mid_params.emission_interval > io->mid_params.validity_time) {
233     fprintf(stderr, "Bad MID parameters! (em: %0.2f, vt: %0.2f) for dev %s\n", io->mid_params.emission_interval,
234             io->mid_params.validity_time, name);
235     return -1;
236   }
237
238   /* HNA interval */
239   if (io->hna_params.emission_interval < cnf->pollrate || io->hna_params.emission_interval > io->hna_params.validity_time) {
240     fprintf(stderr, "Bad HNA parameters! (em: %0.2f, vt: %0.2f) for dev %s\n", io->hna_params.emission_interval,
241             io->hna_params.validity_time, name);
242     return -1;
243   }
244
245   for (mult = io->lq_mult; mult; mult=mult->next) {
246     if (mult->value > LINK_LOSS_MULTIPLIER) {
247       struct ipaddr_str buf;
248
249       fprintf(stderr, "Bad Linkquality multiplier ('%s' on IP %s: %0.2f)\n",
250           name, olsr_ip_to_string(&buf, &mult->addr), (float)mult->value / (float)LINK_LOSS_MULTIPLIER);
251       return -1;
252     }
253   }
254   return 0;
255 }
256
257
258 int
259 olsrd_sanity_check_cnf(struct olsrd_config *cnf)
260 {
261   struct olsr_if *in = cnf->interfaces;
262   struct if_config_options *io;
263
264   /* Debug level */
265   if (cnf->debug_level < MIN_DEBUGLVL || cnf->debug_level > MAX_DEBUGLVL) {
266     fprintf(stderr, "Debuglevel %d is not allowed\n", cnf->debug_level);
267     return -1;
268   }
269
270   /* IP version */
271   if (cnf->ip_version != AF_INET && cnf->ip_version != AF_INET6) {
272     fprintf(stderr, "Ipversion %d not allowed!\n", cnf->ip_version);
273     return -1;
274   }
275
276   /* TOS */
277   if (cnf->tos > MAX_TOS) {
278     fprintf(stderr, "TOS %d is not allowed\n", cnf->tos);
279     return -1;
280   }
281
282   if (cnf->willingness_auto == false && (cnf->willingness > MAX_WILLINGNESS)) {
283     fprintf(stderr, "Willingness %d is not allowed\n", cnf->willingness);
284     return -1;
285   }
286
287   /* Hysteresis */
288   if (cnf->use_hysteresis == true) {
289     if (cnf->hysteresis_param.scaling < MIN_HYST_PARAM || cnf->hysteresis_param.scaling > MAX_HYST_PARAM) {
290       fprintf(stderr, "Hyst scaling %0.2f is not allowed\n", cnf->hysteresis_param.scaling);
291       return -1;
292     }
293
294     if (cnf->hysteresis_param.thr_high <= cnf->hysteresis_param.thr_low) {
295       fprintf(stderr, "Hyst upper(%0.2f) thr must be bigger than lower(%0.2f) threshold!\n", cnf->hysteresis_param.thr_high,
296               cnf->hysteresis_param.thr_low);
297       return -1;
298     }
299
300     if (cnf->hysteresis_param.thr_high < MIN_HYST_PARAM || cnf->hysteresis_param.thr_high > MAX_HYST_PARAM) {
301       fprintf(stderr, "Hyst upper thr %0.2f is not allowed\n", cnf->hysteresis_param.thr_high);
302       return -1;
303     }
304
305     if (cnf->hysteresis_param.thr_low < MIN_HYST_PARAM || cnf->hysteresis_param.thr_low > MAX_HYST_PARAM) {
306       fprintf(stderr, "Hyst lower thr %0.2f is not allowed\n", cnf->hysteresis_param.thr_low);
307       return -1;
308     }
309   }
310
311   /* Pollrate */
312   if (cnf->pollrate < MIN_POLLRATE || cnf->pollrate > MAX_POLLRATE) {
313     fprintf(stderr, "Pollrate %0.2f is not allowed\n", cnf->pollrate);
314     return -1;
315   }
316
317   /* NIC Changes Pollrate */
318
319   if (cnf->nic_chgs_pollrate < MIN_NICCHGPOLLRT || cnf->nic_chgs_pollrate > MAX_NICCHGPOLLRT) {
320     fprintf(stderr, "NIC Changes Pollrate %0.2f is not allowed\n", cnf->nic_chgs_pollrate);
321     return -1;
322   }
323
324   /* TC redundancy */
325   if (cnf->tc_redundancy != 2) {
326     fprintf(stderr, "Sorry, tc-redundancy 0/1 are not working on 0.5.6. "
327         "It was discovered late in the stable tree development and cannot "
328         "be solved without a difficult change in the dijkstra code. "
329         "Feel free to contact the olsr-user mailinglist "
330         "(http://www.olsr.org/?q=mailing-lists) to learn more "
331         "about the problem. The next version of OLSR will have working "
332         "tc-redundancy again.\n");
333     return -1;
334   }
335
336   /* MPR coverage */
337   if (cnf->mpr_coverage < MIN_MPR_COVERAGE || cnf->mpr_coverage > MAX_MPR_COVERAGE) {
338     fprintf(stderr, "MPR coverage %d is not allowed\n", cnf->mpr_coverage);
339     return -1;
340   }
341
342   /* Link Q and hysteresis cannot be activated at the same time */
343   if (cnf->use_hysteresis == true && cnf->lq_level) {
344     fprintf(stderr, "Hysteresis and LinkQuality cannot both be active! Deactivate one of them.\n");
345     return -1;
346   }
347
348   /* Link quality level */
349   if (cnf->lq_level != 0 && cnf->lq_level != 2) {
350     fprintf(stderr, "LQ level %d is not allowed\n", cnf->lq_level);
351     return -1;
352   }
353
354   /* Link quality window size */
355   if (cnf->lq_level && (cnf->lq_aging < MIN_LQ_AGING || cnf->lq_aging > MAX_LQ_AGING)) {
356     fprintf(stderr, "LQ aging factor %f is not allowed\n", cnf->lq_aging);
357     return -1;
358   }
359
360   /* NAT threshold value */
361   if (cnf->lq_level && (cnf->lq_nat_thresh < 0.1 || cnf->lq_nat_thresh > 1.0)) {
362     fprintf(stderr, "NAT threshold %f is not allowed\n", cnf->lq_nat_thresh);
363     return -1;
364   }
365
366   if (cnf->smart_gw_active && cnf->lq_nat_thresh < 1.0) {
367     fprintf(stderr, "Don't use Nat threshold together with smart gateway mode.\n");
368     return -1;
369   }
370
371 #ifdef linux
372   /* calculate rt_policy defaults if necessary */
373   if (!cnf->rt_policy) {
374     /* get non policy routing entries */
375     cnf->rt_table = DEF_RTTABLE;
376     cnf->rt_table_default = DEF_RTTABLE;
377     cnf->rt_table_tunnel = DEF_RTTABLE;
378
379     cnf->rt_table_pri = 0;
380     cnf->rt_table_default_pri = 0;
381     cnf->rt_table_defaultolsr_pri = 0;
382     cnf->rt_table_tunnel_pri = 0;
383   }
384   else {
385     /* first fill in missing values */
386     if (cnf->rt_table_pri == 0) {
387       cnf->rt_table_pri = 32766; /* main table */
388       fprintf(stderr, "Choose priority %u for rt_table_pri\n", cnf->rt_table_pri);
389     }
390     if (cnf->rt_table_defaultolsr_pri == 0) {
391       cnf->rt_table_defaultolsr_pri = cnf->rt_table_pri + 10;
392       fprintf(stderr, "Choose priority %u for rt_table_defaultolsr_pri\n", cnf->rt_table_defaultolsr_pri);
393     }
394     if (cnf->rt_table_tunnel_pri == 0) {
395       cnf->rt_table_tunnel_pri = cnf->rt_table_defaultolsr_pri + 10;
396       fprintf(stderr, "Choose priority %u for rt_table_tunnel_pri\n", cnf->rt_table_tunnel_pri);
397     }
398     if (cnf->rt_table_default_pri == 0) {
399       cnf->rt_table_default_pri = cnf->rt_table_tunnel_pri + 10;
400       fprintf(stderr, "Choose priority %u for rt_table_default_pri\n", cnf->rt_table_default_pri);
401     }
402
403     /* check tables */
404     if (cnf->rt_table == cnf->rt_table_default
405         || cnf->rt_table == cnf->rt_table_tunnel
406         || cnf->rt_table_default == cnf->rt_table_tunnel) {
407       fprintf(stderr, "all three rttables must be unique\n");
408       return -1;
409     }
410
411     /* check priorities */
412     if (cnf->rt_table_pri >= cnf->rt_table_defaultolsr_pri) {
413       fprintf(stderr, "rttable priority must be lesser than rttable_defaultolsr priority\n");
414       return -1;
415     }
416     if (cnf->rt_table_defaultolsr_pri >= cnf->rt_table_tunnel_pri) {
417       fprintf(stderr, "rttable_defaultolsr priority must be lesser than rttable_tunnel priority\n");
418       return -1;
419     }
420     if (cnf->rt_table_tunnel_pri >= cnf->rt_table_default_pri) {
421       fprintf(stderr, "rttable_tunnel priority must be lesser than rttable_default priority\n");
422       return -1;
423     }
424   }
425
426   /* filter rt_proto entry */
427   if (cnf->rt_proto == 1) {
428     /* protocol 1 is reserved, so better use 0 */
429     cnf->rt_proto = 0;
430   }
431   else if (cnf->rt_proto == 0) {
432     cnf->rt_proto = RTPROT_BOOT;
433   }
434 #endif
435
436   if (in == NULL) {
437     fprintf(stderr, "No interfaces configured!\n");
438     return -1;
439   }
440
441   if (cnf->min_tc_vtime < 0.0) {
442     fprintf(stderr, "Error, negative minimal tc time not allowed.\n");
443     return -1;
444   }
445   if (cnf->min_tc_vtime > 0.0) {
446           fprintf(stderr, "Warning, you are using the min_tc_vtime hack. We hope you know what you are doing... contact olsr.org otherwise.\n");
447   }
448
449   if (cnf->smart_gw_type >= GW_UPLINK_CNT) {
450     fprintf(stderr, "Error, illegal gateway uplink type: %d\n", cnf->smart_gw_type);
451     return -1;
452   }
453   if (cnf->smart_gw_downlink < MIN_SMARTGW_SPEED || cnf->smart_gw_downlink > MAX_SMARTGW_SPEED) {
454     fprintf(stderr, "Error, bad gateway downlink speed: %d kbit/s (should be %d-%d)\n",
455         cnf->smart_gw_downlink, MIN_SMARTGW_SPEED, MAX_SMARTGW_SPEED);
456     return -1;
457   }
458   if (cnf->smart_gw_uplink < MIN_SMARTGW_SPEED || cnf->smart_gw_uplink > MAX_SMARTGW_SPEED) {
459     fprintf(stderr, "Error, bad gateway uplink speed: %d kbit/s (should be %d-%d)\n",
460         cnf->smart_gw_uplink, MIN_SMARTGW_SPEED, MAX_SMARTGW_SPEED);
461     return -1;
462   }
463
464   if (cnf->interface_defaults == NULL) {
465     /* get a default configuration if the user did not specify one */
466     cnf->interface_defaults = get_default_if_config();
467   } else {
468     olsrd_print_interface_cnf(cnf->interface_defaults, cnf->interface_defaults, false);
469     olsrd_sanity_check_interface_cnf(cnf->interface_defaults, cnf, interface_defaults_name);
470   }
471
472   /* Interfaces */
473   while (in) {
474     struct olsr_lq_mult *mult, *mult_orig;
475
476     io = in->cnf;
477
478     olsrd_print_interface_cnf(in->cnf, in->cnfi, false);
479
480     /*apply defaults*/
481     {
482       size_t pos;
483       struct olsr_lq_mult *mult_temp, *mult_orig_walk;
484       uint8_t *cnfptr = (uint8_t*)in->cnf;
485       uint8_t *cnfiptr = (uint8_t*)in->cnfi;
486       uint8_t *defptr = (uint8_t*)cnf->interface_defaults;
487
488       /*save interface specific lqmults, as they are merged togehter later*/
489       mult_orig = io->lq_mult;
490
491       assert(in->cnf);
492       assert(in->cnfi);
493       for (pos = 0; pos < sizeof(*in->cnf); pos++) {
494         if (cnfptr[pos] != cnfiptr[pos]) {
495           cnfptr[pos] = defptr[pos]; cnfiptr[pos]=0x00;
496         }
497         else cnfiptr[pos]=0xFF;
498       }
499
500       io->lq_mult=NULL;
501       /*copy default lqmults into this interface*/
502       for (mult = cnf->interface_defaults->lq_mult; mult; mult=mult->next) {
503         /*search same lqmult in orig_list*/
504         for (mult_orig_walk = mult_orig; mult_orig_walk; mult_orig_walk=mult_orig_walk->next) {
505           if (ipequal(&mult_orig_walk->addr,&mult->addr)) {
506             break;
507           }
508         }
509         if (mult_orig_walk == NULL) {
510           mult_temp=malloc(sizeof(struct olsr_lq_mult));
511           memcpy(mult_temp,mult,sizeof(struct olsr_lq_mult));
512           mult_temp->next=io->lq_mult;
513           io->lq_mult=mult_temp;
514         }
515       }
516     }
517
518     if (in->name == NULL || !strlen(in->name)) {
519       fprintf(stderr, "Interface has no name!\n");
520       return -1;
521     }
522
523     if (io == NULL) {
524       fprintf(stderr, "Interface %s has no configuration!\n", in->name);
525       return -1;
526     }
527
528     /*merge lqmults*/
529     if (mult_orig!=NULL) {
530       io->orig_lq_mult_cnt=1;
531       /*search last of interface specific lqmults*/
532       mult = mult_orig;
533       while (mult->next!=NULL) {
534         mult=mult->next;
535       }
536       /*append default lqmults ath the end of the interface specific (to ensure they can overwrite them)*/
537       mult->next=io->lq_mult;
538       io->lq_mult=mult_orig;
539     }
540
541     if (olsrd_sanity_check_interface_cnf(io, cnf, in->name)) return -1;
542
543     in = in->next;
544   }
545
546   return 0;
547 }
548
549 void
550 olsrd_free_cnf(struct olsrd_config *cnf)
551 {
552   struct ip_prefix_list *hd, *h = cnf->hna_entries;
553   struct olsr_if *ind, *in = cnf->interfaces;
554   struct plugin_entry *ped, *pe = cnf->plugins;
555   struct olsr_lq_mult *mult, *next_mult;
556
557   while (h) {
558     hd = h;
559     h = h->next;
560     free(hd);
561   }
562
563   while (in) {
564     for (mult = in->cnf->lq_mult; mult != NULL; mult = next_mult) {
565       next_mult = mult->next;
566       free(mult);
567     }
568
569     free(in->cnf);
570     free(in->cnfi);
571
572     ind = in;
573     in = in->next;
574
575     free(ind);
576   }
577
578   while (pe) {
579     ped = pe;
580     pe = pe->next;
581     free(ped->name);
582     free(ped);
583   }
584
585   return;
586 }
587
588 struct olsrd_config *
589 olsrd_get_default_cnf(void)
590 {
591   struct olsrd_config *c = malloc(sizeof(struct olsrd_config));
592   if (c == NULL) {
593     fprintf(stderr, "Out of memory %s\n", __func__);
594     return NULL;
595   }
596
597   set_default_cnf(c);
598   return c;
599 }
600
601 void
602 set_default_cnf(struct olsrd_config *cnf)
603 {
604   memset(cnf, 0, sizeof(*cnf));
605
606   cnf->debug_level = DEF_DEBUGLVL;
607   cnf->no_fork = false;
608   cnf->host_emul = false;
609   cnf->ip_version = AF_INET;
610   cnf->ipsize = sizeof(struct in_addr);
611   cnf->maxplen = 32;
612   cnf->allow_no_interfaces = DEF_ALLOW_NO_INTS;
613   cnf->tos = DEF_TOS;
614   cnf->olsrport = DEF_OLSRPORT;
615   cnf->rt_policy = DEF_RTPOLICY;
616   cnf->rt_proto = DEF_RTPROTO;
617   cnf->rt_table = DEF_RTTABLE;
618   cnf->rt_table_default = DEF_RTTABLE_DEFAULT;
619   cnf->rt_table_tunnel = DEF_RTTABLE_TUNNEL;
620   cnf->willingness_auto = DEF_WILL_AUTO;
621   cnf->willingness = DEF_WILLINGNESS;
622   cnf->ipc_connections = DEF_IPC_CONNECTIONS;
623   cnf->fib_metric = DEF_FIB_METRIC;
624
625   cnf->use_hysteresis = DEF_USE_HYST;
626   cnf->hysteresis_param.scaling = HYST_SCALING;
627   cnf->hysteresis_param.thr_high = HYST_THRESHOLD_HIGH;
628   cnf->hysteresis_param.thr_low = HYST_THRESHOLD_LOW;
629
630   cnf->pollrate = DEF_POLLRATE;
631   cnf->nic_chgs_pollrate = DEF_NICCHGPOLLRT;
632
633   cnf->tc_redundancy = TC_REDUNDANCY;
634   cnf->mpr_coverage = MPR_COVERAGE;
635   cnf->lq_level = DEF_LQ_LEVEL;
636   cnf->lq_fish = DEF_LQ_FISH;
637   cnf->lq_aging = DEF_LQ_AGING;
638   cnf->lq_algorithm = NULL;
639   cnf->lq_nat_thresh = DEF_LQ_NAT_THRESH;
640   cnf->clear_screen = DEF_CLEAR_SCREEN;
641
642   cnf->del_gws = false;
643   cnf->will_int = 10 * HELLO_INTERVAL;
644   cnf->max_jitter = 0.0;
645   cnf->exit_value = EXIT_SUCCESS;
646   cnf->max_tc_vtime = 0.0;
647   cnf->ioctl_s = 0;
648   cnf->use_niit = DEF_USE_NIIT;
649   cnf->niit4to6_if_index = 0;
650   cnf->niit6to4_if_index = 0;
651
652   cnf->smart_gw_active = DEF_SMART_GW;
653   cnf->smart_gw_allow_nat = DEF_GW_ALLOW_NAT;
654   cnf->smart_gw_type = DEF_GW_TYPE;
655   cnf->smart_gw_uplink = DEF_UPLINK_SPEED;
656   cnf->smart_gw_uplink_nat = DEF_GW_UPLINK_NAT;
657   cnf->smart_gw_downlink = DEF_DOWNLINK_SPEED;
658
659   cnf->use_src_ip_routes = DEF_USE_SRCIP_ROUTES;
660
661 #ifdef LINUX_NETLINK_ROUTING
662   cnf->rtnl_s = 0;
663 #endif
664
665 #if defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __MacOSX__ || defined __NetBSD__ || defined __OpenBSD__
666   cnf->rts = 0;
667 #endif
668 }
669
670 struct if_config_options *
671 get_default_if_config(void)
672 {
673   struct in6_addr in6;
674   struct if_config_options *io = malloc(sizeof(*io));
675
676   if (io == NULL) {
677     fprintf(stderr, "Out of memory %s\n", __func__);
678     return NULL;
679   }
680
681   memset(io, 0, sizeof(*io));
682
683   inet_pton(AF_INET6, OLSR_IPV6_MCAST, &in6);
684   io->ipv6_multicast.v6 = in6;
685
686   io->lq_mult = NULL;
687
688   io->weight.fixed = false;
689   io->weight.value = 0;
690
691   io->hello_params.emission_interval = HELLO_INTERVAL;
692   io->hello_params.validity_time = NEIGHB_HOLD_TIME;
693   io->tc_params.emission_interval = TC_INTERVAL;
694   io->tc_params.validity_time = TOP_HOLD_TIME;
695   io->mid_params.emission_interval = MID_INTERVAL;
696   io->mid_params.validity_time = MID_HOLD_TIME;
697   io->hna_params.emission_interval = HNA_INTERVAL;
698   io->hna_params.validity_time = HNA_HOLD_TIME;
699   io->autodetect_chg = true;
700
701   return io;
702
703 }
704
705 void
706 olsrd_print_cnf(struct olsrd_config *cnf)
707 {
708   struct ip_prefix_list *h = cnf->hna_entries;
709   struct olsr_if *in = cnf->interfaces;
710   struct plugin_entry *pe = cnf->plugins;
711   struct ip_prefix_list *ie = cnf->ipc_nets;
712
713   printf(" *** olsrd configuration ***\n");
714
715   printf("Debug Level      : %d\n", cnf->debug_level);
716   if (cnf->ip_version == AF_INET6)
717     printf("IpVersion        : 6\n");
718   else
719     printf("IpVersion        : 4\n");
720   if (cnf->allow_no_interfaces)
721     printf("No interfaces    : ALLOWED\n");
722   else
723     printf("No interfaces    : NOT ALLOWED\n");
724   printf("TOS              : 0x%02x\n", cnf->tos);
725   printf("OlsrPort          : 0x%03x\n", cnf->olsrport);
726   printf("RtTable          : %u\n", cnf->rt_table);
727   printf("RtTableDefault   : %u\n", cnf->rt_table_default);
728   printf("RtTableTunnel    : %u\n", cnf->rt_table_tunnel);
729   if (cnf->willingness_auto)
730     printf("Willingness      : AUTO\n");
731   else
732     printf("Willingness      : %d\n", cnf->willingness);
733
734   printf("IPC connections  : %d\n", cnf->ipc_connections);
735   while (ie) {
736     struct ipaddr_str strbuf;
737     if (ie->net.prefix_len == olsr_cnf->maxplen) {
738       printf("\tHost %s\n", olsr_ip_to_string(&strbuf, &ie->net.prefix));
739     } else {
740       printf("\tNet %s/%d\n", olsr_ip_to_string(&strbuf, &ie->net.prefix), ie->net.prefix_len);
741     }
742     ie = ie->next;
743   }
744
745   printf("Pollrate         : %0.2f\n", cnf->pollrate);
746
747   printf("NIC ChangPollrate: %0.2f\n", cnf->nic_chgs_pollrate);
748
749   printf("TC redundancy    : %d\n", cnf->tc_redundancy);
750
751   printf("MPR coverage     : %d\n", cnf->mpr_coverage);
752
753   printf("LQ level         : %d\n", cnf->lq_level);
754
755   printf("LQ fish eye      : %d\n", cnf->lq_fish);
756
757   printf("LQ aging factor  : %f\n", cnf->lq_aging);
758
759   printf("LQ algorithm name: %s\n", cnf->lq_algorithm ? cnf->lq_algorithm : "default");
760
761   printf("NAT threshold    : %f\n", cnf->lq_nat_thresh);
762
763   printf("Clear screen     : %s\n", cnf->clear_screen ? "yes" : "no");
764
765   printf("Use niit         : %s\n", cnf->use_niit ? "yes" : "no");
766
767   printf("Smart Gateway    : %s\n", cnf->smart_gw_active ? "yes" : "no");
768
769   printf("SmGw. Allow NAT  : %s\n", cnf->smart_gw_allow_nat ? "yes" : "no");
770
771   printf("Smart Gw. Uplink : %s\n", GW_UPLINK_TXT[cnf->smart_gw_type]);
772
773   printf("SmGw. Uplink NAT : %s\n", cnf->smart_gw_uplink_nat ? "yes" : "no");
774
775   printf("Smart Gw. speed  : %d kbit/s up, %d kbit/s down\n",
776       cnf->smart_gw_uplink, cnf->smart_gw_downlink);
777
778   if (olsr_cnf->smart_gw_prefix.prefix_len == 0) {
779     printf("# Smart Gw. prefix : ::/0\n");
780   }
781   else {
782     printf("Smart Gw. prefix : %s\n", olsr_ip_prefix_to_string(&cnf->smart_gw_prefix));
783   }
784
785   /* Interfaces */
786   if (in) {
787     /*print interface default config*/
788     printf(" InterfaceDefaults: \n");
789     olsrd_print_interface_cnf(cnf->interface_defaults, cnf->interface_defaults, true);
790
791     while (in)
792     { 
793       if (cnf->interface_defaults!=in->cnf)
794       {
795         printf(" dev: \"%s\"\n", in->name);
796
797         olsrd_print_interface_cnf(in->cnf, in->cnfi, false);
798       }
799       in = in->next;
800     }
801   }
802
803   /* Plugins */
804   if (pe) {
805     printf("Plugins:\n");
806
807     while (pe) {
808       printf("\tName: \"%s\"\n", pe->name);
809       pe = pe->next;
810     }
811   }
812
813   /* Hysteresis */
814   if (cnf->use_hysteresis) {
815     printf("Using hysteresis:\n");
816     printf("\tScaling      : %0.2f\n", cnf->hysteresis_param.scaling);
817     printf("\tThr high/low : %0.2f/%0.2f\n", cnf->hysteresis_param.thr_high, cnf->hysteresis_param.thr_low);
818   } else {
819     printf("Not using hysteresis\n");
820   }
821
822   /* HNA IPv4 and IPv6 */
823   if (h) {
824     printf("HNA%d entries:\n", cnf->ip_version == AF_INET ? 4 : 6);
825     while (h) {
826       struct ipaddr_str buf;
827       printf("\t%s/", olsr_ip_to_string(&buf, &h->net.prefix));
828       if (cnf->ip_version == AF_INET) {
829         union olsr_ip_addr ip;
830         olsr_prefix_to_netmask(&ip, h->net.prefix_len);
831         printf("%s\n", olsr_ip_to_string(&buf, &ip));
832       } else {
833         printf("%d\n", h->net.prefix_len);
834       }
835       h = h->next;
836     }
837   }
838 }
839
840 #if defined WIN32
841 struct ioinfo {
842   unsigned int handle;
843   unsigned char attr;
844   char buff;
845   int flag;
846   CRITICAL_SECTION lock;
847 };
848
849 void
850 win32_stdio_hack(unsigned int handle)
851 {
852   HMODULE lib;
853   struct ioinfo **info;
854
855   lib = LoadLibrary("msvcrt.dll");
856
857   info = (struct ioinfo **)GetProcAddress(lib, "__pioinfo");
858
859   // (*info)[1].handle = handle;
860   // (*info)[1].attr = 0x89; // FOPEN | FTEXT | FPIPE;
861
862   (*info)[2].handle = handle;
863   (*info)[2].attr = 0x89;
864
865   // stdout->_file = 1;
866   stderr->_file = 2;
867
868   // setbuf(stdout, NULL);
869   setbuf(stderr, NULL);
870 }
871
872 void *
873 win32_olsrd_malloc(size_t size)
874 {
875   return malloc(size);
876 }
877
878 void
879 win32_olsrd_free(void *ptr)
880 {
881   free(ptr);
882 }
883 #endif
884
885 static void update_has_gateway_fields(void) {
886   struct ip_prefix_list *h;
887
888   olsr_cnf->has_ipv4_gateway = false;
889   olsr_cnf->has_ipv6_gateway = false;
890
891   for (h = olsr_cnf->hna_entries; h != NULL; h = h->next) {
892     olsr_cnf->has_ipv4_gateway |= ip_prefix_is_v4_inetgw(&h->net) || ip_prefix_is_mappedv4_inetgw(&h->net);
893     olsr_cnf->has_ipv6_gateway |= ip_prefix_is_v6_inetgw(&h->net);
894   }
895 }
896
897 void
898 ip_prefix_list_add(struct ip_prefix_list **list, const union olsr_ip_addr *net, uint8_t prefix_len)
899 {
900   struct ip_prefix_list *new_entry = malloc(sizeof(*new_entry));
901
902   new_entry->net.prefix = *net;
903   new_entry->net.prefix_len = prefix_len;
904
905   /* Queue */
906   new_entry->next = *list;
907   *list = new_entry;
908
909   /* update gateway flags */
910   update_has_gateway_fields();
911 }
912
913 int
914 ip_prefix_list_remove(struct ip_prefix_list **list, const union olsr_ip_addr *net, uint8_t prefix_len)
915 {
916   struct ip_prefix_list *h = *list, *prev = NULL;
917
918   while (h != NULL) {
919     if (ipequal(net, &h->net.prefix) && h->net.prefix_len == prefix_len) {
920       /* Dequeue */
921       if (prev == NULL) {
922         *list = h->next;
923       } else {
924         prev->next = h->next;
925       }
926       free(h);
927
928       /* update gateway flags */
929       update_has_gateway_fields();
930       return 1;
931     }
932     prev = h;
933     h = h->next;
934   }
935   return 0;
936 }
937
938 struct ip_prefix_list *
939 ip_prefix_list_find(struct ip_prefix_list *list, const union olsr_ip_addr *net, uint8_t prefix_len)
940 {
941   struct ip_prefix_list *h;
942   for (h = list; h != NULL; h = h->next) {
943     if (prefix_len == h->net.prefix_len && ipequal(net, &h->net.prefix)) {
944       return h;
945     }
946   }
947   return NULL;
948 }
949
950 /*
951  * Local Variables:
952  * c-basic-offset: 2
953  * indent-tabs-mode: nil
954  * End:
955  */