2eab4a364f0a8d9e3e30220004b97822730e9ee1
[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/types.h>
60 #include <linux/rtnetlink.h>
61 #include <linux/version.h>
62 #endif
63
64 extern FILE *yyin;
65 extern int yyparse(void);
66
67 static char interface_defaults_name[] = "[InterfaceDefaults]";
68
69 const char *FIB_METRIC_TXT[] = {
70   "flat",
71   "correct",
72   "approx",
73 };
74
75 const char *GW_UPLINK_TXT[] = {
76   "none",
77   "ipv4",
78   "ipv6",
79   "both"
80 };
81
82 const char *OLSR_IF_MODE[] = {
83   "mesh",
84   "ether"
85 };
86
87 static char copyright_string[] __attribute__ ((unused)) =
88   "The olsr.org Optimized Link-State Routing daemon(olsrd) Copyright (c) 2004, Andreas Tonnesen(andreto@olsr.org) All rights reserved.";
89
90 int current_line;
91
92 /* Global stuff externed in defs.h */
93 FILE *debug_handle;                    /* Where to send debug(defaults to stdout) */
94 struct olsrd_config *olsr_cnf;         /* The global configuration */
95
96 #ifdef MAKEBIN
97
98 /* Build as standalone binary */
99 int
100 main(int argc, char *argv[])
101 {
102   struct olsrd_config *cnf;
103
104   if (argc == 1) {
105     fprintf(stderr, "Usage: olsrd_cfgparser [filename] -print\n\n");
106     exit(EXIT_FAILURE);
107   }
108
109   if ((cnf = olsrd_parse_cnf(argv[1])) != NULL) {
110     if ((argc > 2) && (!strcmp(argv[2], "-print"))) {
111       olsrd_print_cnf(cnf);
112       olsrd_write_cnf(cnf, "./out.conf");
113     } else
114       printf("Use -print to view parsed values\n");
115     printf("Configfile parsed OK\n");
116   } else {
117     printf("Failed parsing \"%s\"\n", argv[1]);
118   }
119
120   return 0;
121 }
122
123 #else
124
125 /* Build as part of olsrd */
126
127 #endif
128
129 int
130 olsrd_parse_cnf(const char *filename)
131 {
132   struct olsr_if *in, *new_ifqueue;
133   int rc;
134
135   fprintf(stderr, "Parsing file: \"%s\"\n", filename);
136
137   yyin = fopen(filename, "r");
138   if (yyin == NULL) {
139     fprintf(stderr, "Cannot open configuration file '%s': %s.\n", filename, strerror(errno));
140     return -1;
141   }
142
143   current_line = 1;
144   rc = yyparse();
145   fclose(yyin);
146   if (rc != 0) {
147     return -1;
148   }
149
150   /* Reverse the queue (added by user request) */
151   in = olsr_cnf->interfaces;
152   new_ifqueue = NULL;
153
154   while (in) {
155     struct olsr_if *in_tmp = in;
156     in = in->next;
157
158     in_tmp->next = new_ifqueue;
159     new_ifqueue = in_tmp;
160   }
161
162   olsr_cnf->interfaces = new_ifqueue;
163
164   for (in = olsr_cnf->interfaces; in != NULL; in = in->next) {
165     /* set various stuff */
166     in->configured = false;
167     in->interf = NULL;
168     in->host_emul = false;
169   }
170   return 0;
171 }
172
173 /* prints an interface (and checks it againt the default config) and the inverted config */
174 static void
175 olsrd_print_interface_cnf(struct if_config_options *cnf, struct if_config_options *cnfi, bool defcnf)
176 {
177   struct olsr_lq_mult *mult;
178   int lq_mult_cnt = 0;
179   char ipv6_buf[INET6_ADDRSTRLEN];                  /* buffer for IPv6 inet_htop */
180
181   if (cnf->ipv4_multicast.v4.s_addr) {
182     printf("\tIPv4 broadcast/multicast : %s%s\n", inet_ntoa(cnf->ipv4_multicast.v4),DEFAULT_STR(ipv4_multicast.v4.s_addr));
183   } else {
184     printf("\tIPv4 broadcast/multicast : AUTO%s\n",DEFAULT_STR(ipv4_multicast.v4.s_addr));
185   }
186
187   if (cnf->mode==IF_MODE_ETHER){
188     printf("\tMode           : ether%s\n",DEFAULT_STR(mode));
189   } else {
190     printf("\tMode           : mesh%s\n",DEFAULT_STR(mode));
191   }
192
193   printf("\tIPv6 multicast           : %s%s\n", inet_ntop(AF_INET6, &cnf->ipv6_multicast.v6, ipv6_buf, sizeof(ipv6_buf)),DEFAULT_STR(ipv6_multicast.v6));
194
195   printf("\tHELLO emission/validity  : %0.2f%s/%0.2f%s\n", cnf->hello_params.emission_interval, DEFAULT_STR(hello_params.emission_interval),
196          cnf->hello_params.validity_time,DEFAULT_STR(hello_params.validity_time));
197   printf("\tTC emission/validity     : %0.2f%s/%0.2f%s\n", cnf->tc_params.emission_interval, DEFAULT_STR(tc_params.emission_interval),
198          cnf->tc_params.validity_time,DEFAULT_STR(tc_params.validity_time));
199   printf("\tMID emission/validity    : %0.2f%s/%0.2f%s\n", cnf->mid_params.emission_interval, DEFAULT_STR(mid_params.emission_interval),
200          cnf->mid_params.validity_time,DEFAULT_STR(mid_params.validity_time));
201   printf("\tHNA emission/validity    : %0.2f%s/%0.2f%s\n", cnf->hna_params.emission_interval, DEFAULT_STR(hna_params.emission_interval),
202          cnf->hna_params.validity_time,DEFAULT_STR(hna_params.validity_time));
203
204   for (mult = cnf->lq_mult; mult != NULL; mult = mult->next) {
205     lq_mult_cnt++;
206     printf("\tLinkQualityMult          : %s %0.2f %s\n", inet_ntop(olsr_cnf->ip_version, &mult->addr, ipv6_buf, sizeof(ipv6_buf)),
207       (float)(mult->value) / 65536.0, ((lq_mult_cnt > cnf->orig_lq_mult_cnt)?" (d)":""));
208   }
209
210   printf("\tAutodetect changes       : %s%s\n", cnf->autodetect_chg ? "yes" : "no",DEFAULT_STR(autodetect_chg));
211 }
212
213 static 
214 int olsrd_sanity_check_interface_cnf(struct if_config_options * io, struct olsrd_config * cnf, char* name) {
215   struct olsr_lq_mult *mult;
216
217   /* HELLO interval */
218
219   if (io->hello_params.validity_time < 0.0) {
220     if (cnf->lq_level == 0)
221       io->hello_params.validity_time = NEIGHB_HOLD_TIME;
222
223     else
224       io->hello_params.validity_time = (int)(REFRESH_INTERVAL / cnf->lq_aging);
225   }
226
227   if (io->hello_params.emission_interval < cnf->pollrate || io->hello_params.emission_interval > io->hello_params.validity_time) {
228     fprintf(stderr, "Bad HELLO parameters! (em: %0.2f, vt: %0.2f) for dev %s\n", io->hello_params.emission_interval,
229             io->hello_params.validity_time, name);
230     return -1;
231   }
232
233   /* TC interval */
234   if (io->tc_params.emission_interval < cnf->pollrate || io->tc_params.emission_interval > io->tc_params.validity_time) {
235     fprintf(stderr, "Bad TC parameters! (em: %0.2f, vt: %0.2f) for dev %s\n", io->tc_params.emission_interval,
236         io->tc_params.validity_time, name);
237     return -1;
238   }
239
240   if (cnf->min_tc_vtime > 0.0 && (io->tc_params.validity_time / io->tc_params.emission_interval) < 128) {
241     fprintf(stderr, "Please use a tc vtime at least 128 times the emission interval while using the min_tc_vtime hack.\n");
242     return -1;
243   }
244   /* MID interval */
245   if (io->mid_params.emission_interval < cnf->pollrate || io->mid_params.emission_interval > io->mid_params.validity_time) {
246     fprintf(stderr, "Bad MID parameters! (em: %0.2f, vt: %0.2f) for dev %s\n", io->mid_params.emission_interval,
247             io->mid_params.validity_time, name);
248     return -1;
249   }
250
251   /* HNA interval */
252   if (io->hna_params.emission_interval < cnf->pollrate || io->hna_params.emission_interval > io->hna_params.validity_time) {
253     fprintf(stderr, "Bad HNA parameters! (em: %0.2f, vt: %0.2f) for dev %s\n", io->hna_params.emission_interval,
254             io->hna_params.validity_time, name);
255     return -1;
256   }
257
258   for (mult = io->lq_mult; mult; mult=mult->next) {
259     if (mult->value > LINK_LOSS_MULTIPLIER) {
260       struct ipaddr_str buf;
261
262       fprintf(stderr, "Bad Linkquality multiplier ('%s' on IP %s: %0.2f)\n",
263           name, olsr_ip_to_string(&buf, &mult->addr), (float)mult->value / (float)LINK_LOSS_MULTIPLIER);
264       return -1;
265     }
266   }
267   return 0;
268 }
269
270
271 int
272 olsrd_sanity_check_cnf(struct olsrd_config *cnf)
273 {
274   struct olsr_if *in = cnf->interfaces;
275   struct if_config_options *io;
276
277   /* Debug level */
278   if (cnf->debug_level < MIN_DEBUGLVL || cnf->debug_level > MAX_DEBUGLVL) {
279     fprintf(stderr, "Debuglevel %d is not allowed\n", cnf->debug_level);
280     return -1;
281   }
282
283   /* IP version */
284   if (cnf->ip_version != AF_INET && cnf->ip_version != AF_INET6) {
285     fprintf(stderr, "Ipversion %d not allowed!\n", cnf->ip_version);
286     return -1;
287   }
288
289   /* TOS */
290   if (cnf->tos > MAX_TOS) {
291     fprintf(stderr, "TOS %d is not allowed\n", cnf->tos);
292     return -1;
293   }
294
295   if (cnf->willingness_auto == false && (cnf->willingness > MAX_WILLINGNESS)) {
296     fprintf(stderr, "Willingness %d is not allowed\n", cnf->willingness);
297     return -1;
298   }
299
300   /* Hysteresis */
301   if (cnf->use_hysteresis == true) {
302     if (cnf->hysteresis_param.scaling < MIN_HYST_PARAM || cnf->hysteresis_param.scaling > MAX_HYST_PARAM) {
303       fprintf(stderr, "Hyst scaling %0.2f is not allowed\n", cnf->hysteresis_param.scaling);
304       return -1;
305     }
306
307     if (cnf->hysteresis_param.thr_high <= cnf->hysteresis_param.thr_low) {
308       fprintf(stderr, "Hyst upper(%0.2f) thr must be bigger than lower(%0.2f) threshold!\n", cnf->hysteresis_param.thr_high,
309               cnf->hysteresis_param.thr_low);
310       return -1;
311     }
312
313     if (cnf->hysteresis_param.thr_high < MIN_HYST_PARAM || cnf->hysteresis_param.thr_high > MAX_HYST_PARAM) {
314       fprintf(stderr, "Hyst upper thr %0.2f is not allowed\n", cnf->hysteresis_param.thr_high);
315       return -1;
316     }
317
318     if (cnf->hysteresis_param.thr_low < MIN_HYST_PARAM || cnf->hysteresis_param.thr_low > MAX_HYST_PARAM) {
319       fprintf(stderr, "Hyst lower thr %0.2f is not allowed\n", cnf->hysteresis_param.thr_low);
320       return -1;
321     }
322   }
323
324   /* Pollrate */
325   if (cnf->pollrate < MIN_POLLRATE || cnf->pollrate > MAX_POLLRATE) {
326     fprintf(stderr, "Pollrate %0.2f is not allowed\n", cnf->pollrate);
327     return -1;
328   }
329
330   /* NIC Changes Pollrate */
331
332   if (cnf->nic_chgs_pollrate < MIN_NICCHGPOLLRT || cnf->nic_chgs_pollrate > MAX_NICCHGPOLLRT) {
333     fprintf(stderr, "NIC Changes Pollrate %0.2f is not allowed\n", cnf->nic_chgs_pollrate);
334     return -1;
335   }
336
337   /* TC redundancy */
338   if (cnf->tc_redundancy != 2) {
339     fprintf(stderr, "Sorry, tc-redundancy 0/1 are not working on 0.5.6. "
340         "It was discovered late in the stable tree development and cannot "
341         "be solved without a difficult change in the dijkstra code. "
342         "Feel free to contact the olsr-user mailinglist "
343         "(http://www.olsr.org/?q=mailing-lists) to learn more "
344         "about the problem. The next version of OLSR will have working "
345         "tc-redundancy again.\n");
346     return -1;
347   }
348
349   /* MPR coverage */
350   if (cnf->mpr_coverage < MIN_MPR_COVERAGE || cnf->mpr_coverage > MAX_MPR_COVERAGE) {
351     fprintf(stderr, "MPR coverage %d is not allowed\n", cnf->mpr_coverage);
352     return -1;
353   }
354
355   /* Link Q and hysteresis cannot be activated at the same time */
356   if (cnf->use_hysteresis == true && cnf->lq_level) {
357     fprintf(stderr, "Hysteresis and LinkQuality cannot both be active! Deactivate one of them.\n");
358     return -1;
359   }
360
361   /* Link quality level */
362   if (cnf->lq_level != 0 && cnf->lq_level != 2) {
363     fprintf(stderr, "LQ level %d is not allowed\n", cnf->lq_level);
364     return -1;
365   }
366
367   /* Link quality window size */
368   if (cnf->lq_level && (cnf->lq_aging < MIN_LQ_AGING || cnf->lq_aging > MAX_LQ_AGING)) {
369     fprintf(stderr, "LQ aging factor %f is not allowed\n", cnf->lq_aging);
370     return -1;
371   }
372
373   /* NAT threshold value */
374   if (cnf->lq_level && (cnf->lq_nat_thresh < 0.1 || cnf->lq_nat_thresh > 1.0)) {
375     fprintf(stderr, "NAT threshold %f is not allowed\n", cnf->lq_nat_thresh);
376     return -1;
377   }
378
379 #if defined linux
380 #if LINUX_VERSION_CODE < KERNEL_VERSION(2,6,0)
381   if (cnf->ip_version == AF_INET6 && cnf->smart_gw_active) {
382     fprintf(stderr, "Smart gateways are not supported for linux kernel 2.4 and ipv6\n");
383     return -1;
384   }
385 #endif
386 #endif
387
388 #ifdef linux
389   if (olsr_cnf->smart_gw_active) {
390     if (0 == cnf->rt_table_default) {
391       cnf->rt_table_default = DEF_RTTABLE_DEFAULT;
392       fprintf(stderr, "Choose table %u for rt_table_default\n", cnf->rt_table_default);
393     }
394     /* check tables */
395     if (cnf->rt_table == cnf->rt_table_default
396         || cnf->rt_table == cnf->rt_table_tunnel
397         || cnf->rt_table_default == cnf->rt_table_tunnel) {
398       fprintf(stderr, "all three rttables must be unique\n");
399       return -1;
400     }
401
402     /* check priorities */
403     if (cnf->rt_table_pri && cnf->rt_table_pri >= cnf->rt_table_defaultolsr_pri) {
404       fprintf(stderr, "rttable priority must be lesser than rttable_defaultolsr priority\n");
405       return -1;
406     }
407     if (cnf->rt_table_defaultolsr_pri && cnf->rt_table_defaultolsr_pri >= cnf->rt_table_tunnel_pri) {
408       fprintf(stderr, "rttable_defaultolsr priority must be lesser than rttable_tunnel priority\n");
409       return -1;
410     }
411     if (cnf->rt_table_tunnel_pri && cnf->rt_table_tunnel_pri >= cnf->rt_table_default_pri) {
412       fprintf(stderr, "rttable_tunnel priority must be lesser than rttable_default priority\n");
413       return -1;
414     }
415   }
416   else {
417     if (0 == cnf->rt_table_default) {
418       cnf->rt_table_default = DEF_RTTABLE;
419       fprintf(stderr, "Choose table %u for rt_table_default\n", cnf->rt_table_default);
420     }
421   }
422
423   /* filter rt_proto entry */
424   if (cnf->rt_proto == 1) {
425     /* protocol 1 is reserved, so better use 0 */
426     cnf->rt_proto = 0;
427   }
428   else if (cnf->rt_proto == 0) {
429     cnf->rt_proto = RTPROT_BOOT;
430   }
431 #endif
432
433   if (in == NULL) {
434     fprintf(stderr, "No interfaces configured!\n");
435     return -1;
436   }
437
438   if (cnf->min_tc_vtime < 0.0) {
439     fprintf(stderr, "Error, negative minimal tc time not allowed.\n");
440     return -1;
441   }
442   if (cnf->min_tc_vtime > 0.0) {
443           fprintf(stderr, "Warning, you are using the min_tc_vtime hack. We hope you know what you are doing... contact olsr.org otherwise.\n");
444   }
445
446   if (cnf->smart_gw_type >= GW_UPLINK_CNT) {
447     fprintf(stderr, "Error, illegal gateway uplink type: %d\n", cnf->smart_gw_type);
448     return -1;
449   }
450   if (cnf->smart_gw_downlink < MIN_SMARTGW_SPEED || cnf->smart_gw_downlink > MAX_SMARTGW_SPEED) {
451     fprintf(stderr, "Error, bad gateway downlink speed: %d kbit/s (should be %d-%d)\n",
452         cnf->smart_gw_downlink, MIN_SMARTGW_SPEED, MAX_SMARTGW_SPEED);
453     return -1;
454   }
455   if (cnf->smart_gw_uplink < MIN_SMARTGW_SPEED || cnf->smart_gw_uplink > MAX_SMARTGW_SPEED) {
456     fprintf(stderr, "Error, bad gateway uplink speed: %d kbit/s (should be %d-%d)\n",
457         cnf->smart_gw_uplink, MIN_SMARTGW_SPEED, MAX_SMARTGW_SPEED);
458     return -1;
459   }
460
461   if (cnf->interface_defaults == NULL) {
462     /* get a default configuration if the user did not specify one */
463     cnf->interface_defaults = get_default_if_config();
464   } else {
465     olsrd_print_interface_cnf(cnf->interface_defaults, cnf->interface_defaults, false);
466     olsrd_sanity_check_interface_cnf(cnf->interface_defaults, cnf, interface_defaults_name);
467   }
468
469   /* Interfaces */
470   while (in) {
471     struct olsr_lq_mult *mult, *mult_orig;
472
473     io = in->cnf;
474
475     olsrd_print_interface_cnf(in->cnf, in->cnfi, false);
476
477     /*apply defaults*/
478     {
479       size_t pos;
480       struct olsr_lq_mult *mult_temp, *mult_orig_walk;
481       uint8_t *cnfptr = (uint8_t*)in->cnf;
482       uint8_t *cnfiptr = (uint8_t*)in->cnfi;
483       uint8_t *defptr = (uint8_t*)cnf->interface_defaults;
484
485       /*save interface specific lqmults, as they are merged togehter later*/
486       mult_orig = io->lq_mult;
487
488       assert(in->cnf);
489       assert(in->cnfi);
490       for (pos = 0; pos < sizeof(*in->cnf); pos++) {
491         if (cnfptr[pos] != cnfiptr[pos]) {
492           cnfptr[pos] = defptr[pos]; cnfiptr[pos]=0x00;
493         }
494         else cnfiptr[pos]=0xFF;
495       }
496
497       io->lq_mult=NULL;
498       /*copy default lqmults into this interface*/
499       for (mult = cnf->interface_defaults->lq_mult; mult; mult=mult->next) {
500         /*search same lqmult in orig_list*/
501         for (mult_orig_walk = mult_orig; mult_orig_walk; mult_orig_walk=mult_orig_walk->next) {
502           if (ipequal(&mult_orig_walk->addr,&mult->addr)) {
503             break;
504           }
505         }
506         if (mult_orig_walk == NULL) {
507           mult_temp=malloc(sizeof(struct olsr_lq_mult));
508           memcpy(mult_temp,mult,sizeof(struct olsr_lq_mult));
509           mult_temp->next=io->lq_mult;
510           io->lq_mult=mult_temp;
511         }
512       }
513     }
514
515     if (in->name == NULL || !strlen(in->name)) {
516       fprintf(stderr, "Interface has no name!\n");
517       return -1;
518     }
519
520     if (io == NULL) {
521       fprintf(stderr, "Interface %s has no configuration!\n", in->name);
522       return -1;
523     }
524
525     /*merge lqmults*/
526     if (mult_orig!=NULL) {
527       io->orig_lq_mult_cnt=1;
528       /*search last of interface specific lqmults*/
529       mult = mult_orig;
530       while (mult->next!=NULL) {
531         mult=mult->next;
532       }
533       /*append default lqmults ath the end of the interface specific (to ensure they can overwrite them)*/
534       mult->next=io->lq_mult;
535       io->lq_mult=mult_orig;
536     }
537
538     if (olsrd_sanity_check_interface_cnf(io, cnf, in->name)) return -1;
539
540     in = in->next;
541   }
542
543   return 0;
544 }
545
546 void
547 olsrd_free_cnf(struct olsrd_config *cnf)
548 {
549   struct ip_prefix_list *hd, *h = cnf->hna_entries;
550   struct olsr_if *ind, *in = cnf->interfaces;
551   struct plugin_entry *ped, *pe = cnf->plugins;
552   struct olsr_lq_mult *mult, *next_mult;
553
554   while (h) {
555     hd = h;
556     h = h->next;
557     free(hd);
558   }
559
560   while (in) {
561     for (mult = in->cnf->lq_mult; mult != NULL; mult = next_mult) {
562       next_mult = mult->next;
563       free(mult);
564     }
565
566     free(in->cnf);
567     free(in->cnfi);
568
569     ind = in;
570     in = in->next;
571
572     free(ind);
573   }
574
575   while (pe) {
576     ped = pe;
577     pe = pe->next;
578     free(ped->name);
579     free(ped);
580   }
581
582   return;
583 }
584
585 struct olsrd_config *
586 olsrd_get_default_cnf(void)
587 {
588   struct olsrd_config *c = malloc(sizeof(struct olsrd_config));
589   if (c == NULL) {
590     fprintf(stderr, "Out of memory %s\n", __func__);
591     return NULL;
592   }
593
594   set_default_cnf(c);
595   return c;
596 }
597
598 void
599 set_default_cnf(struct olsrd_config *cnf)
600 {
601   memset(cnf, 0, sizeof(*cnf));
602
603   cnf->debug_level = DEF_DEBUGLVL;
604   cnf->no_fork = false;
605   cnf->host_emul = false;
606   cnf->ip_version = AF_INET;
607   cnf->ipsize = sizeof(struct in_addr);
608   cnf->maxplen = 32;
609   cnf->allow_no_interfaces = DEF_ALLOW_NO_INTS;
610   cnf->tos = DEF_TOS;
611   cnf->olsrport = DEF_OLSRPORT;
612   cnf->rt_proto = DEF_RTPROTO;
613   cnf->rt_table = DEF_RTTABLE;
614   cnf->rt_table_default = 0;
615   cnf->rt_table_tunnel = DEF_RTTABLE_TUNNEL;
616   cnf->rt_table_pri = 0x7FFE; /* 32766, main table prio */
617   cnf->rt_table_defaultolsr_pri = 0x7FFE + 10;
618   cnf->rt_table_tunnel_pri = 0x7FFE + 20;
619   cnf->rt_table_default_pri = 0x7FFE + 30;
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 if_config_options *io = malloc(sizeof(*io));
674
675   if (io == NULL) {
676     fprintf(stderr, "Out of memory %s\n", __func__);
677     return NULL;
678   }
679
680   memset(io, 0, sizeof(*io));
681
682   io->mode = DEF_IF_MODE;
683
684   io->ipv6_multicast = ipv6_def_multicast;
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  */