6c7b71f49019ac232a42a5b22df1e8c7aaf499e9
[olsrd.git] / src / cfgparser / olsrd_conf.c
1 /*
2  * OLSR ad-hoc routing table management protocol config parser
3  * Copyright (C) 2004 Andreas T√łnnesen (andreto@olsr.org)
4  *
5  * This file is part of the olsr.org OLSR daemon.
6  *
7  * olsr.org is free software; you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License as published by
9  * the Free Software Foundation; either version 2 of the License, or
10  * (at your option) any later version.
11  *
12  * olsr.org is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with olsr.org; if not, write to the Free Software
19  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
20  * 
21  * 
22  * $Id: olsrd_conf.c,v 1.6 2004/10/18 13:13:37 kattemat Exp $
23  *
24  */
25
26
27 #include <stdio.h>
28 #include <string.h>
29 #include <errno.h>
30 #include <stdlib.h>
31 #include <sys/socket.h>
32 #include <netinet/in.h>
33 #include <arpa/inet.h>
34
35 #include "olsrd_conf.h"
36
37
38 extern FILE *yyin;
39 extern int yyparse(void);
40
41
42 #ifdef MAKELIB
43
44 /* Build as DLL */
45
46 void __attribute__ ((constructor)) 
47 my_init(void);
48
49 void __attribute__ ((destructor)) 
50 my_fini(void);
51
52
53 /**
54  *Constructor
55  */
56 void
57 my_init()
58 {
59   /* Print plugin info to stdout */
60   printf("olsrd config file parser %s loaded\n", SOFTWARE_VERSION);
61
62   return;
63 }
64
65 /**
66  *Destructor
67  */
68 void
69 my_fini()
70 {
71   printf("See you around!\n");
72   return;
73 }
74
75 #else
76
77 #ifdef MAKEBIN
78
79 /* Build as standalone binary */
80 int 
81 main(int argc, char *argv[])
82 {
83   struct olsrd_config *cnf;
84
85   if(argc == 1)
86     {
87       fprintf(stderr, "Usage: olsrd_cfgparser [filename] -print\n\n");
88       exit(EXIT_FAILURE);
89     }
90
91   if((cnf = olsrd_parse_cnf(argv[1])) != NULL)
92     {
93       if((argc > 2) && (!strcmp(argv[2], "-print")))
94         {
95           olsrd_print_cnf(cnf);  
96           olsrd_write_cnf(cnf, "./out.conf");
97         }
98       else
99         printf("Use -print to view parsed values\n");
100       printf("Configfile parsed OK\n");
101     }
102   else
103     {
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
115 #endif
116
117 #endif
118
119 struct olsrd_config *
120 olsrd_parse_cnf(char *filename)
121 {
122   struct olsr_if *in;
123   struct if_config_options *io;
124
125   cnf = malloc(sizeof(struct olsrd_config));
126   if (cnf == NULL)
127     {
128       fprintf(stderr, "Out of memory %s\n", __func__);
129       return NULL;
130   }
131
132   set_default_cnf(cnf);
133
134   printf("Parsing file: \"%s\"\n", filename);
135
136   yyin = fopen(filename, "r");
137   
138   if (yyin == NULL)
139     {
140       fprintf(stderr, "Cannot open configuration file '%s': %s.\n",
141               filename, strerror(errno));
142       free(cnf);
143       return NULL;
144   }
145
146   current_line = 1;
147
148   if (yyparse() != 0)
149     {
150       fclose(yyin);
151       olsrd_free_cnf(cnf);
152       exit(0);
153     }
154   
155   fclose(yyin);
156
157   /* Add default ruleset */
158
159   io = get_default_if_config();
160   io->name = malloc(strlen(DEFAULT_IF_CONFIG_NAME) + 1);
161   strcpy(io->name, DEFAULT_IF_CONFIG_NAME);
162
163   /* Queue */
164   io->next = cnf->if_options;
165   cnf->if_options = io;
166
167   /* Verify interface rulesets */
168   in = cnf->interfaces;
169
170   while(in)
171     {
172       in->if_options = find_if_rule_by_name(cnf->if_options, in->config);
173
174       if(in->if_options == NULL)
175         {
176           fprintf(stderr, "ERROR: Could not find a matching ruleset \"%s\" for %s\n", in->config, in->name);
177           olsrd_free_cnf(cnf);
178           exit(0);
179         }
180       in = in->next;
181     }
182
183   return cnf;
184 }
185
186
187
188
189 struct olsrd_config *
190 olsrd_get_default_cnf()
191 {
192   cnf = malloc(sizeof(struct olsrd_config));
193   if (cnf == NULL)
194     {
195       fprintf(stderr, "Out of memory %s\n", __func__);
196       return NULL;
197   }
198
199   set_default_cnf(cnf);
200
201   cnf->if_options = get_default_if_config();
202   cnf->if_options->name = malloc(strlen(DEFAULT_IF_CONFIG_NAME) + 1);
203   strcpy(cnf->if_options->name, DEFAULT_IF_CONFIG_NAME);
204
205   return cnf;
206 }
207
208
209
210
211
212
213
214 void
215 olsrd_free_cnf(struct olsrd_config *cnf)
216 {
217   struct hna4_entry        *h4d, *h4 = cnf->hna4_entries;
218   struct hna6_entry        *h6d, *h6 = cnf->hna6_entries;
219   struct olsr_if           *ind, *in = cnf->interfaces;
220   struct plugin_entry      *ped, *pe = cnf->plugins;
221   struct if_config_options *iod, *io = cnf->if_options;
222   
223   while(h4)
224     {
225       h4d = h4;
226       h4 = h4->next;
227       free(h4d);
228     }
229
230   while(h6)
231     {
232       h6d = h6;
233       h6 = h6->next;
234       free(h6d);
235     }
236
237   while(in)
238     {
239       ind = in;
240       in = in->next;
241       free(ind->name);
242       free(ind->config);
243       free(ind);
244     }
245
246   while(pe)
247     {
248       ped = pe;
249       pe = pe->next;
250       free(ped->name);
251       free(ped);
252     }
253
254   while(io)
255     {
256       iod = io;
257       io = io->next;
258       free(iod->name);
259       free(iod);
260     }
261
262   return;
263 }
264
265
266
267 void
268 set_default_cnf(struct olsrd_config *cnf)
269 {
270     memset(cnf, 0, sizeof(struct olsrd_config));
271     
272     cnf->debug_level = 1;
273     cnf->ip_version  = AF_INET;
274     cnf->allow_no_interfaces = 1;
275     cnf->tos = 16;
276     cnf->willingness_auto = 1;
277     cnf->open_ipc = 0;
278
279     cnf->use_hysteresis = 1;
280     cnf->hysteresis_param.scaling = HYST_SCALING;
281     cnf->hysteresis_param.thr_high = HYST_THRESHOLD_HIGH;
282     cnf->hysteresis_param.thr_low = HYST_THRESHOLD_LOW;
283
284     cnf->pollrate = 0.1;
285
286     cnf->tc_redundancy = TC_REDUNDANCY;
287     cnf->mpr_coverage = MPR_COVERAGE;
288 }
289
290
291
292
293 struct if_config_options *
294 get_default_if_config()
295 {
296   struct if_config_options *io = malloc(sizeof(struct if_config_options));
297   struct in6_addr in6;
298  
299   memset(io, 0, sizeof(struct if_config_options));
300
301   io->ipv6_addrtype = 1;
302
303   if(inet_pton(AF_INET6, OLSR_IPV6_MCAST_SITE_LOCAL, &in6) < 0)
304     {
305       fprintf(stderr, "Failed converting IP address %s\n", OLSR_IPV6_MCAST_SITE_LOCAL);
306       exit(EXIT_FAILURE);
307     }
308   memcpy(&io->ipv6_multi_site.v6, &in6, sizeof(struct in6_addr));
309
310   if(inet_pton(AF_INET6, OLSR_IPV6_MCAST_GLOBAL, &in6) < 0)
311     {
312       fprintf(stderr, "Failed converting IP address %s\n", OLSR_IPV6_MCAST_GLOBAL);
313       exit(EXIT_FAILURE);
314     }
315   memcpy(&io->ipv6_multi_glbl.v6, &in6, sizeof(struct in6_addr));
316
317
318   io->hello_params.emission_interval = HELLO_INTERVAL;
319   io->hello_params.validity_time = NEIGHB_HOLD_TIME;
320   io->tc_params.emission_interval = TC_INTERVAL;
321   io->tc_params.validity_time = TOP_HOLD_TIME;
322   io->mid_params.emission_interval = MID_INTERVAL;
323   io->mid_params.validity_time = MID_HOLD_TIME;
324   io->hna_params.emission_interval = HNA_INTERVAL;
325   io->hna_params.validity_time = HNA_HOLD_TIME;
326
327   return io;
328
329 }
330
331
332
333
334
335 int
336 olsrd_write_cnf(struct olsrd_config *cnf, char *fname)
337 {
338   struct hna4_entry        *h4 = cnf->hna4_entries;
339   struct hna6_entry        *h6 = cnf->hna6_entries;
340   struct olsr_if           *in = cnf->interfaces;
341   struct plugin_entry      *pe = cnf->plugins;
342   struct if_config_options *io = cnf->if_options;
343   char ipv6_buf[100];             /* buffer for IPv6 inet_htop */
344   struct in_addr in4;
345
346   FILE *fd;
347
348   fd = fopen(fname, "w");
349
350   if(fd == NULL)
351     {
352       fprintf(stderr, "Could not open file %s for writing\n%s\n", fname, strerror(errno));
353       return -1;
354     }
355
356   printf("Writing config to file \"%s\".... ", fname);
357
358   fprintf(fd, "#\n# Configuration file for olsr.org olsrd\n# automatically generated by olsrd-cnf %s\n#\n\n\n", SOFTWARE_VERSION);
359
360   /* Debug level */
361   fprintf(fd, "# Debug level(0-9)\n# If set to 0 the daemon runs in the background\n\nDebugLevel\t%d\n\n", cnf->debug_level);
362
363   /* IP version */
364   fprintf(fd, "# IP version to use (4 or 6)\n\nIpVersion\t%d\n\n", cnf->ip_version);
365
366
367   /* HNA IPv4 */
368   fprintf(fd, "# HNA IPv4 routes\n# syntax: netaddr netmask\n# Example Internet gateway:\n# 0.0.0.0 0.0.0.0\n\nHna4\n{\n");
369   while(h4)
370     {
371       in4.s_addr=h4->net;
372       fprintf(fd, "    %s ", inet_ntoa(in4));
373       in4.s_addr=h4->netmask;
374       fprintf(fd, "%s\n", inet_ntoa(in4));
375       h4 = h4->next;
376     }
377   fprintf(fd, "}\n\n");
378
379
380   /* HNA IPv6 */
381   fprintf(fd, "# HNA IPv6 routes\n# syntax: netaddr prefix\n# Example Internet gateway:\nHna6\n{\n");
382   while(h6)
383     {
384       fprintf(fd, "    %s/%d\n", (char *)inet_ntop(AF_INET6, &h6->net.v6, ipv6_buf, sizeof(ipv6_buf)), h6->prefix_len);
385       h6 = h6->next;
386     }
387
388   fprintf(fd, "}\n\n");
389
390
391   /* Interfaces */
392   fprintf(fd, "# Interfaces and their rulesets\n\n");
393   /* Interfaces */
394   if(in)
395     {
396       while(in)
397         {
398           fprintf(fd, "Interface \"%s\"\n{\n", in->name);
399           fprintf(fd, "    Setup\"%s\"\n", in->config);
400           fprintf(fd, "}\n\n");
401           in = in->next;
402         }
403     }
404   fprintf(fd, "\n");
405
406
407   /* No interfaces */
408   fprintf(fd, "# Should olsrd keep on running even if there are\n# no interfaces available? This is a good idea\n# for a PCMCIA/USB hotswap environment.\n# \"yes\" OR \"no\"\n\nAllowNoInt\t");
409   if(cnf->allow_no_interfaces)
410     fprintf(fd, "yes\n\n");
411   else
412     fprintf(fd, "no\n\n");
413
414   /* TOS */
415   fprintf(fd, "# TOS(type of service) value for\n# the IP header of control traffic.\n# default is 16\n\n");
416   fprintf(fd, "TosValue\t%d\n\n", cnf->tos);
417
418   /* Willingness */
419   fprintf(fd, "# The fixed willingness to use(0-7)\n# or \"auto\" to set willingness dynammically\n# based on battery/power status\n\n");
420   if(cnf->willingness_auto)
421     fprintf(fd, "Willingness\tauto\n\n");
422   else
423     fprintf(fd, "Willingness%d\n\n", cnf->willingness);
424
425   /* IPC */
426   fprintf(fd, "# Allow processes like the GUI front-end\n# to connect to the daemon. 'yes' or 'no'\n\n");
427   if(cnf->open_ipc)
428     fprintf(fd, "IpcConnect\tyes\n\n");
429   else
430     fprintf(fd, "IpcConnect\tno\n\n");
431
432
433
434   /* Hysteresis */
435   fprintf(fd, "# Wether to use hysteresis or not\n# Hysteresis adds more robustness to the\n# link sensing but delays neighbor registration.\n# Used by default. 'yes' or 'no'\n\n");
436
437   if(cnf->use_hysteresis)
438     {
439       fprintf(fd, "UseHysteresis\tyes\n\n");
440       fprintf(fd, "# Hysteresis parameters\n# Do not alter these unless you know \n# what you are doing!\n# Set to auto by default. Allowed\n# values are floating point values\n# in the interval 0,1\n# THR_LOW must always be lower than\n# THR_HIGH!!\n\n");
441       fprintf(fd, "HystScaling\t%0.2f\n", cnf->hysteresis_param.scaling);
442       fprintf(fd, "HystThrHigh\t%0.2f\n", cnf->hysteresis_param.thr_high);
443       fprintf(fd, "HystThrLow\t%0.2f\n", cnf->hysteresis_param.thr_low);
444     }
445   else
446     fprintf(fd, "UseHysteresis\tno\n\n");
447
448   fprintf(fd, "\n\n");
449
450   /* Pollrate */
451   fprintf(fd, "# Polling rate in seconds(float).\n# Auto uses default value 0.1 sec\n\n");
452   fprintf(fd, "Pollrate\t%0.2f\n", cnf->pollrate);
453
454   /* TC redundancy */
455   fprintf(fd, "# TC redundancy\n# Specifies how much neighbor info should\n# be sent in TC messages\n# Possible values are:\n# 0 - only send MPR selectors\n# 1 - send MPR selectors and MPRs\n# 2 - send all neighbors\n#\n# defaults to 0\n\n");
456   fprintf(fd, "TcRedundancy\t%d\n\n", cnf->tc_redundancy);
457
458   /* MPR coverage */
459   fprintf(fd, "# MPR coverage\n# Specifies how many MPRs a node should\n# try select to reach every 2 hop neighbor\n# Can be set to any integer >0\n# defaults to 1\n\n");
460
461   fprintf(fd, "MprCoverage\t%d\n\n", cnf->mpr_coverage);
462    
463
464
465   /* Plugins */
466   fprintf(fd, "# Olsrd plugins to load\n# This must be the absolute path to the file\n# or the loader will use the following scheme:\n# - Try the paths in the LD_LIBRARY_PATH \n#   environment variable.\n# - The list of libraries cached in /etc/ld.so.cache\n# - /lib, followed by /usr/lib\n\n");
467   if(pe)
468     {
469       while(pe)
470         {
471           fprintf(fd, "LoadPlugin \"%s\"\n{\n", pe->name);
472           pe = pe->next;
473           fprintf(fd, "}\n");
474         }
475     }
476           fprintf(fd, "\n");
477
478   /* Rulesets */
479   while(io)
480     {
481       fprintf(fd, "IfSetup \"%s\"\n{\n", io->name);
482
483       
484       fprintf(fd, "    # IPv4 broadcast address to use. The\n    # one usefull example would be 255.255.255.255\n    # If not defined the broadcastaddress\n    # every card is configured with is used\n\n");
485
486       if(io->ipv4_broadcast.v4)
487         {
488           in4.s_addr = io->ipv4_broadcast.v4;
489           fprintf(fd, "    Ip4Broadcast\t %s\n\n", inet_ntoa(in4));
490         }
491       else
492         {
493           fprintf(fd, "    #Ip4Broadcast\t255.255.255.255\n\n");
494         }
495
496
497       fprintf(fd, "    # IPv6 address scope to use.\n    # Must be 'site-local' or 'global'\n\n");
498       if(io->ipv6_addrtype)
499         fprintf(fd, "    Ip6AddrType \tsite-local\n\n");
500       else
501         fprintf(fd, "    Ip6AddrType \tglobal\n\n");
502
503       fprintf(fd, "    # IPv6 multicast address to use when\n    # using site-local addresses.\n    # If not defined, ff05::15 is used\n");
504       fprintf(fd, "    Ip6MulticastSite\t%s\n\n", (char *)inet_ntop(AF_INET6, &io->ipv6_multi_site.v6, ipv6_buf, sizeof(ipv6_buf)));
505       fprintf(fd, "    # IPv6 multicast address to use when\n    # using global addresses\n    # If not defined, ff0e::1 is used\n");
506       fprintf(fd, "    Ip6MulticastGlobal\t%s\n\n", (char *)inet_ntop(AF_INET6, &io->ipv6_multi_glbl.v6, ipv6_buf, sizeof(ipv6_buf)));
507
508
509
510       fprintf(fd, "    # Emission intervals.\n    # If not defined, RFC proposed values will\n    # in most cases be used.\n\n");
511
512
513       fprintf(fd, "    HelloInterval\t%0.2f\n", io->hello_params.emission_interval);
514       fprintf(fd, "    HelloValidityTime\t%0.2f\n", io->hello_params.validity_time);
515       fprintf(fd, "    TcInterval\t\t%0.2f\n", io->tc_params.emission_interval);
516       fprintf(fd, "    TcValidityTime\t%0.2f\n", io->tc_params.validity_time);
517       fprintf(fd, "    MidInterval\t\t%0.2f\n", io->mid_params.emission_interval);
518       fprintf(fd, "    MidValidityTime\t%0.2f\n", io->mid_params.validity_time);
519       fprintf(fd, "    HnaInterval\t\t%0.2f\n", io->hna_params.emission_interval);
520       fprintf(fd, "    HnaValidityTime\t%0.2f\n", io->hna_params.validity_time);
521
522
523
524       io = io->next;
525
526       fprintf(fd, "}\n\n\n");
527     }
528
529   fprintf(fd, "\n# END AUTOGENERATED CONFIG\n");
530
531   fclose(fd);
532   printf("DONE\n");
533
534   return 1;
535 }
536
537
538
539
540
541 void
542 olsrd_print_cnf(struct olsrd_config *cnf)
543 {
544   struct hna4_entry        *h4 = cnf->hna4_entries;
545   struct hna6_entry        *h6 = cnf->hna6_entries;
546   struct olsr_if           *in = cnf->interfaces;
547   struct plugin_entry      *pe = cnf->plugins;
548   struct if_config_options *io = cnf->if_options;
549   char ipv6_buf[100];             /* buffer for IPv6 inet_htop */
550   struct in_addr in4;
551
552   printf(" *** olsrd configuration ***\n");
553
554   printf("Debug Level      : %d\n", cnf->debug_level);
555   printf("IpVersion        : %d\n", cnf->ip_version);
556   if(cnf->allow_no_interfaces)
557     printf("No interfaces    : ALLOWED\n");
558   else
559     printf("No interfaces    : NOT ALLOWED\n");
560   printf("TOS              : 0x%02x\n", cnf->tos);
561   if(cnf->willingness_auto)
562     printf("Willingness      : AUTO\n");
563   else
564     printf("Willingness      : %d\n", cnf->willingness);
565
566   if(cnf->open_ipc)
567     printf("IPC              : ENABLED\n");
568   else
569     printf("IPC              : DISABLED\n");
570
571   printf("Pollrate         : %0.2f\n", cnf->pollrate);
572
573   printf("TC redundancy    : %d\n", cnf->tc_redundancy);
574
575   printf("MPR coverage     : %d\n", cnf->mpr_coverage);
576    
577   /* Interfaces */
578   if(in)
579     {
580       printf("Interfaces:\n");
581       while(in)
582         {
583           printf("\tdev: \"%s\" ruleset: \"%s\"\n", in->name, in->config);
584           in = in->next;
585         }
586     }
587
588   /* Rulesets */
589   while(io)
590     {
591       printf("Interface ruleset \"%s\":\n", io->name);
592
593       
594       if(io->ipv4_broadcast.v4)
595         {
596           in4.s_addr = io->ipv4_broadcast.v4;
597           printf("\tIPv4 broadcast        : %s\n", inet_ntoa(in4));
598         }
599       else
600         {
601           printf("\tIPv4 broadcast        : AUTO\n");
602         }
603
604       if(io->ipv6_addrtype)
605         printf("\tIPv6 addrtype         : site-local\n");
606       else
607         printf("\tIPv6 addrtype         : global\n");
608
609       //union olsr_ip_addr       ipv6_multi_site;
610       //union olsr_ip_addr       ipv6_multi_glbl;
611       printf("\tIPv6 multicast site   : %s\n", (char *)inet_ntop(AF_INET6, &io->ipv6_multi_site.v6, ipv6_buf, sizeof(ipv6_buf)));
612       printf("\tIPv6 multicast global : %s\n", (char *)inet_ntop(AF_INET6, &io->ipv6_multi_glbl.v6, ipv6_buf, sizeof(ipv6_buf)));
613
614       printf("\tHELLO emission int    : %0.2f\n", io->hello_params.emission_interval);
615       printf("\tHELLO validity time   : %0.2f\n", io->hello_params.validity_time);
616       printf("\tTC emission int       : %0.2f\n", io->tc_params.emission_interval);
617       printf("\tTC validity time      : %0.2f\n", io->tc_params.validity_time);
618       printf("\tMID emission int      : %0.2f\n", io->mid_params.emission_interval);
619       printf("\tMID validity time     : %0.2f\n", io->mid_params.validity_time);
620       printf("\tHNA emission int      : %0.2f\n", io->hna_params.emission_interval);
621       printf("\tHNA validity time     : %0.2f\n", io->hna_params.validity_time);
622
623
624
625       io = io->next;
626     }
627
628   /* Plugins */
629   if(pe)
630     {
631       printf("Plugins:\n");
632
633       while(pe)
634         {
635           printf("\tName: \"%s\"\n", pe->name);
636           pe = pe->next;
637         }
638     }
639
640   /* Hysteresis */
641   if(cnf->use_hysteresis)
642     {
643       printf("Using hysteresis:\n");
644       printf("\tScaling : %0.2f\n", cnf->hysteresis_param.scaling);
645       printf("\tThr high: %0.2f\n", cnf->hysteresis_param.thr_high);
646       printf("\tThr low : %0.2f\n", cnf->hysteresis_param.thr_low);
647     }
648   else
649     printf("Not using hysteresis\n");
650
651   /* HNA IPv4 */
652   if(h4)
653     {
654
655       printf("HNA4 entries:\n");
656       while(h4)
657         {
658           in4.s_addr=h4->net;
659           printf("\t%s/", inet_ntoa(in4));
660           in4.s_addr=h4->netmask;
661           printf("%s\n", inet_ntoa(in4));
662
663           h4 = h4->next;
664         }
665     }
666
667   /* HNA IPv6 */
668   if(h6)
669     {
670       printf("HNA6 entries:\n");
671       while(h6)
672         {
673           printf("\t%s/%d\n", (char *)inet_ntop(AF_INET6, &h6->net.v6, ipv6_buf, sizeof(ipv6_buf)), h6->prefix_len);
674           h6 = h6->next;
675         }
676     }
677 }
678
679
680
681
682 struct if_config_options *
683 find_if_rule_by_name(struct if_config_options *io, char *name)
684 {
685
686   while(io)
687     {
688       if(strcmp(io->name, name) == 0)
689         return io;
690       io = io->next;
691     }
692   return NULL;
693 }