b1fa968b21820a12c511daa4798c38feea748777
[olsrd.git] / src / main.c
1 /*
2  * The olsr.org Optimized Link-State Routing daemon(olsrd)
3  * Copyright (c) 2004, Andreas Tonnesen(andreto@olsr.org)
4  * All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  *
10  * * Redistributions of source code must retain the above copyright
11  *   notice, this list of conditions and the following disclaimer.
12  * * Redistributions in binary form must reproduce the above copyright
13  *   notice, this list of conditions and the following disclaimer in
14  *   the documentation and/or other materials provided with the
15  *   distribution.
16  * * Neither the name of olsr.org, olsrd nor the names of its
17  *   contributors may be used to endorse or promote products derived
18  *   from this software without specific prior written permission.
19  *
20  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
21  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
22  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
23  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
24  * COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
25  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
26  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
27  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
28  * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
30  * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
31  * POSSIBILITY OF SUCH DAMAGE.
32  *
33  * Visit http://www.olsr.org for more information.
34  *
35  * If you find this software useful feel free to make a donation
36  * to the project. For more information see the website or contact
37  * the copyright holders.
38  *
39  */
40
41 #include <unistd.h>
42 #include <signal.h>
43 #include <sys/stat.h>
44 #include <assert.h>
45 #include <fcntl.h>
46
47 #include "ipcalc.h"
48 #include "defs.h"
49 #include "olsr.h"
50 #include "log.h"
51 #include "scheduler.h"
52 #include "parser.h"
53 #include "generate_msg.h"
54 #include "plugin_loader.h"
55 #include "apm.h"
56 #include "net_os.h"
57 #include "build_msg.h"
58 #include "net_olsr.h"
59 #include "mid_set.h"
60 #include "mpr_selector_set.h"
61 #include "gateway.h"
62 #include "olsr_niit.h"
63
64 #ifdef LINUX_NETLINK_ROUTING
65 #include <linux/types.h>
66 #include <linux/rtnetlink.h>
67 #include "kernel_routes.h"
68
69 #endif
70
71 #ifdef WIN32
72 #include <winbase.h>
73 #define close(x) closesocket(x)
74 int __stdcall SignalHandler(unsigned long signo) __attribute__ ((noreturn));
75 void ListInterfaces(void);
76 void DisableIcmpRedirects(void);
77 bool olsr_win32_end_request = false;
78 bool olsr_win32_end_flag = false;
79 #else
80 static void olsr_shutdown(int) __attribute__ ((noreturn));
81 #endif
82
83 #if defined linux || __FreeBSD__ || defined __NetBSD__ || defined __OpenBSD__
84 #define DEFAULT_LOCKFILE_PREFIX "/var/run/olsrd"
85 #elif defined WIN32
86 #define DEFAULT_LOCKFILE_PREFIX "C:\\olsrd"
87 #else
88 #define DEFAULT_LOCKFILE_PREFIX "olsrd"
89 #endif
90
91 /*
92  * Local function prototypes
93  */
94 void olsr_reconfigure(int) __attribute__ ((noreturn));
95
96 static void print_usage(bool error);
97
98 static int set_default_ifcnfs(struct olsr_if *, struct if_config_options *);
99
100 static int olsr_process_arguments(int, char *[], struct olsrd_config *,
101     struct if_config_options *);
102
103 #ifndef WIN32
104 static char **olsr_argv;
105 #endif
106
107 static char
108     copyright_string[] __attribute__ ((unused)) =
109         "The olsr.org Optimized Link-State Routing daemon(olsrd) Copyright (c) 2004, Andreas Tonnesen(andreto@olsr.org) All rights reserved.";
110
111 /* Data for OLSR locking */
112 #ifndef WIN32
113 static int lock_fd = 0;
114 #endif
115 static char lock_file_name[FILENAME_MAX];
116 struct olsr_cookie_info *def_timer_ci = NULL;
117
118 /*
119  * Creates a zero-length locking file and use fcntl to
120  * place an exclusive lock over it. The lock will be
121  * automatically erased when the olsrd process ends,
122  * so it will even work well with a SIGKILL.
123  *
124  * Additionally the lock can be killed by removing the
125  * locking file.
126  */
127 static void olsr_create_lock_file(void) {
128 #ifdef WIN32
129   HANDLE lck = CreateEvent(NULL, TRUE, FALSE, lock_file_name);
130   if (NULL == lck || ERROR_ALREADY_EXISTS == GetLastError()) {
131     if (NULL == lck) {
132       fprintf(stderr,
133           "Error, cannot create OLSR lock '%s'.\n",
134           lock_file_name);
135     } else {
136       CloseHandle(lck);
137       fprintf(stderr,
138           "Error, cannot aquire OLSR lock '%s'.\n"
139           "Another OLSR instance might be running.\n",
140           lock_file_name);
141     }
142     olsr_exit("", EXIT_FAILURE);
143   }
144 #else
145   struct flock lck;
146
147   /* create file for lock */
148   lock_fd = open(lock_file_name, O_WRONLY | O_CREAT, S_IRWXU);
149   if (lock_fd == 0) {
150     close(lock_fd);
151     fprintf(stderr,
152         "Error, cannot create OLSR lock '%s'.\n",
153         lock_file_name);
154     olsr_exit("", EXIT_FAILURE);
155   }
156
157   /* create exclusive lock for the whole file */
158   lck.l_type = F_WRLCK;
159   lck.l_whence = SEEK_SET;
160   lck.l_start = 0;
161   lck.l_len = 0;
162   lck.l_pid = 0;
163
164   if (fcntl(lock_fd, F_SETLK, &lck) == -1) {
165     close(lock_fd);
166     fprintf(stderr,
167         "Error, cannot aquire OLSR lock '%s'.\n"
168         "Another OLSR instance might be running.\n",
169         lock_file_name);
170     olsr_exit("", EXIT_FAILURE);
171   }
172 #endif
173   return;
174 }
175
176 /**
177  * loads a config file
178  * @return <0 if load failed, 0 otherwise
179  */
180 static int
181 olsrmain_load_config(char *file) {
182   struct stat statbuf;
183
184   if (stat(file, &statbuf) < 0) {
185     fprintf(stderr, "Could not find specified config file %s!\n%s\n\n",
186         file, strerror(errno));
187     return -1;
188   }
189
190   if (olsrd_parse_cnf(file) < 0) {
191     fprintf(stderr, "Error while reading config file %s!\n", file);
192     return -1;
193   }
194   return 0;
195 }
196
197 /**
198  * Main entrypoint
199  */
200
201 int main(int argc, char *argv[]) {
202   struct if_config_options *default_ifcnf;
203   char conf_file_name[FILENAME_MAX];
204   struct ipaddr_str buf;
205   bool loadedConfig = false;
206   int i;
207 #ifdef WIN32
208   WSADATA WsaData;
209   size_t len;
210 #endif
211
212   /* paranoia checks */
213   assert(sizeof(uint8_t) == 1);
214   assert(sizeof(uint16_t) == 2);
215   assert(sizeof(uint32_t) == 4);
216   assert(sizeof(int8_t) == 1);
217   assert(sizeof(int16_t) == 2);
218   assert(sizeof(int32_t) == 4);
219
220   printf("\n *** %s ***\n Build date: %s on %s\n http://www.olsr.org\n\n",
221       olsrd_version, build_date, build_host);
222
223   if (argc == 2) {
224     if (strcmp(argv[1], "-h") == 0 || strcmp(argv[1], "/?") == 0) {
225       print_usage(false);
226       exit(0);
227     }
228     if (strcmp(argv[1], "-v") == 0) {
229       exit(0);
230     }
231   }
232
233   debug_handle = stdout;
234 #ifndef WIN32
235   olsr_argv = argv;
236 #endif
237   setbuf(stdout, NULL);
238   setbuf(stderr, NULL);
239
240 #ifndef WIN32
241   /* Check if user is root */
242   if (geteuid()) {
243     fprintf(stderr, "You must be root(uid = 0) to run olsrd!\nExiting\n\n");
244     exit(EXIT_FAILURE);
245   }
246 #else
247   DisableIcmpRedirects();
248
249   if (WSAStartup(0x0202, &WsaData)) {
250     fprintf(stderr, "Could not initialize WinSock.\n");
251     olsr_exit(__func__, EXIT_FAILURE);
252   }
253 #endif
254
255   /* Open syslog */
256   olsr_openlog("olsrd");
257
258   /* Using PID as random seed */
259   srandom(getpid());
260
261   /* Init widely used statics */
262   memset(&all_zero, 0, sizeof(union olsr_ip_addr));
263
264   /*
265    * Set configfile name and
266    * check if a configfile name was given as parameter
267    */
268 #ifdef WIN32
269 #ifndef WINCE
270   GetWindowsDirectory(conf_file_name, FILENAME_MAX - 11);
271 #else
272   conf_file_name[0] = 0;
273 #endif
274
275   len = strlen(conf_file_name);
276
277   if (len == 0 || conf_file_name[len - 1] != '\\')
278   conf_file_name[len++] = '\\';
279
280   strscpy(conf_file_name + len, "olsrd.conf", sizeof(conf_file_name) - len);
281 #else
282   strscpy(conf_file_name, OLSRD_GLOBAL_CONF_FILE, sizeof(conf_file_name));
283 #endif
284
285   olsr_cnf = olsrd_get_default_cnf();
286   for (i=1; i < argc-1;) {
287     if (strcmp(argv[i], "-f") == 0) {
288       loadedConfig = true;
289
290       if (olsrmain_load_config(argv[i+1]) < 0) {
291         exit(EXIT_FAILURE);
292       }
293
294       if (i+2 < argc) {
295         memmove(&argv[i], &argv[i+2], sizeof(*argv) * (argc-i-1));
296       }
297       argc -= 2;
298     }
299     else {
300       i++;
301     }
302   }
303
304   /*
305    * set up configuration prior to processing commandline options
306    */
307   if (!loadedConfig && olsrmain_load_config(conf_file_name) == 0) {
308     loadedConfig = true;
309   }
310
311   if (!loadedConfig) {
312     olsrd_free_cnf(olsr_cnf);
313     olsr_cnf = olsrd_get_default_cnf();
314   }
315
316   default_ifcnf = get_default_if_config();
317   if (default_ifcnf == NULL) {
318     fprintf(stderr, "No default ifconfig found!\n");
319     exit(EXIT_FAILURE);
320   }
321
322   /* Initialize timers */
323   olsr_init_timers();
324
325   /*
326    * Process olsrd options.
327    */
328   if (olsr_process_arguments(argc, argv, olsr_cnf, default_ifcnf) < 0) {
329     print_usage(true);
330     olsr_exit(__func__, EXIT_FAILURE);
331   }
332
333   /*
334    * Set configuration for command-line specified interfaces
335    */
336   set_default_ifcnfs(olsr_cnf->interfaces, default_ifcnf);
337
338   /* free the default ifcnf */
339   free(default_ifcnf);
340
341   /* Sanity check configuration */
342   if (olsrd_sanity_check_cnf(olsr_cnf) < 0) {
343     fprintf(stderr, "Bad configuration!\n");
344     olsr_exit(__func__, EXIT_FAILURE);
345   }
346
347   /*
348    * Establish file lock to prevent multiple instances
349    */
350   if (olsr_cnf->lock_file) {
351     strscpy(lock_file_name, olsr_cnf->lock_file, sizeof(lock_file_name));
352   } else {
353     size_t l;
354 #ifdef DEFAULT_LOCKFILE_PREFIX
355     strscpy(lock_file_name, DEFAULT_LOCKFILE_PREFIX, sizeof(lock_file_name));
356 #else
357     strscpy(lock_file_name, conf_file_name, sizeof(lock_file_name));
358 #endif
359     l = strlen(lock_file_name);
360     snprintf(&lock_file_name[l], sizeof(lock_file_name) - l, "-ipv%d.lock",
361         olsr_cnf->ip_version == AF_INET ? 4 : 6);
362   }
363
364   /*
365    * Print configuration
366    */
367   if (olsr_cnf->debug_level > 1) {
368     olsrd_print_cnf(olsr_cnf);
369   }
370
371   def_timer_ci = olsr_alloc_cookie("Default Timer Cookie", OLSR_COOKIE_TYPE_TIMER);
372
373   /*
374    * socket for ioctl calls
375    */
376   olsr_cnf->ioctl_s = socket(olsr_cnf->ip_version, SOCK_DGRAM, 0);
377   if (olsr_cnf->ioctl_s < 0) {
378 #ifndef WIN32
379     olsr_syslog(OLSR_LOG_ERR, "ioctl socket: %m");
380 #endif
381     olsr_exit(__func__, 0);
382   }
383 #ifdef LINUX_NETLINK_ROUTING
384   olsr_cnf->rtnl_s = socket(PF_NETLINK, SOCK_DGRAM, NETLINK_ROUTE);
385   if (olsr_cnf->rtnl_s < 0) {
386     olsr_syslog(OLSR_LOG_ERR, "rtnetlink socket: %m");
387     olsr_exit(__func__, 0);
388   }
389   fcntl(olsr_cnf->rtnl_s, F_SETFL, O_NONBLOCK);
390
391   if ((olsr_cnf->rt_monitor_socket = rtnetlink_register_socket(RTMGRP_LINK)) < 0) {
392     olsr_syslog(OLSR_LOG_ERR, "rtmonitor socket: %m");
393     olsr_exit(__func__, 0);
394   }
395 #endif
396
397   /*
398    * create routing socket
399    */
400 #if defined __FreeBSD__ || __FreeBSD_kernel__ || defined __MacOSX__ || defined __NetBSD__ || defined __OpenBSD__
401   olsr_cnf->rts = socket(PF_ROUTE, SOCK_RAW, 0);
402   if (olsr_cnf->rts < 0) {
403     olsr_syslog(OLSR_LOG_ERR, "routing socket: %m");
404     olsr_exit(__func__, 0);
405   }
406 #endif
407
408 #ifdef LINUX_NETLINK_ROUTING
409   /* initialize gateway system */
410   if (olsr_cnf->smart_gw_active) {
411     if (olsr_init_gateways()) {
412       olsr_exit("Cannot initialize gateway tunnels", 1);
413     }
414   }
415
416   /* initialize niit if index */
417   if (olsr_cnf->use_niit) {
418     olsr_init_niit();
419   }
420 #endif
421
422   /* Init empty TC timer */
423   set_empty_tc_timer(GET_TIMESTAMP(0));
424
425   /* enable ip forwarding on host */
426   /* Disable redirects globally */
427 #ifndef WIN32
428   net_os_set_global_ifoptions();
429 #endif
430
431   /* Initialize parser */
432   olsr_init_parser();
433
434   /* Initialize route-exporter */
435   olsr_init_export_route();
436
437   /* Initialize message sequencnumber */
438   init_msg_seqno();
439
440   /* Initialize dynamic willingness calculation */
441   olsr_init_willingness();
442
443   /*
444    *Set up willingness/APM
445    */
446   if (olsr_cnf->willingness_auto) {
447     if (apm_init() < 0) {
448       OLSR_PRINTF(1, "Could not read APM info - setting default willingness(%d)\n", WILL_DEFAULT);
449
450       olsr_syslog(OLSR_LOG_ERR,
451           "Could not read APM info - setting default willingness(%d)\n",
452           WILL_DEFAULT);
453
454       olsr_cnf->willingness_auto = 0;
455       olsr_cnf->willingness = WILL_DEFAULT;
456     } else {
457       olsr_cnf->willingness = olsr_calculate_willingness();
458
459       OLSR_PRINTF(1, "Willingness set to %d - next update in %.1f secs\n", olsr_cnf->willingness, olsr_cnf->will_int);
460     }
461   }
462
463   /* Initialize net */
464   init_net();
465
466   /* Initializing networkinterfaces */
467   if (!olsr_init_interfacedb()) {
468     if (olsr_cnf->allow_no_interfaces) {
469       fprintf(
470           stderr,
471           "No interfaces detected! This might be intentional, but it also might mean that your configuration is fubar.\nI will continue after 5 seconds...\n");
472       olsr_startup_sleep(5);
473     } else {
474       fprintf(stderr, "No interfaces detected!\nBailing out!\n");
475       olsr_exit(__func__, EXIT_FAILURE);
476     }
477   }
478
479   olsr_do_startup_sleep();
480
481   /* Print heartbeat to stdout */
482
483 #if !defined WINCE
484   if (olsr_cnf->debug_level > 0 && isatty(STDOUT_FILENO)) {
485     olsr_start_timer(STDOUT_PULSE_INT, 0, OLSR_TIMER_PERIODIC,
486         &generate_stdout_pulse, NULL, 0);
487   }
488 #endif
489
490   /* Initialize the IPC socket */
491
492   if (olsr_cnf->ipc_connections > 0) {
493     ipc_init();
494   }
495   /* Initialisation of different tables to be used. */
496   olsr_init_tables();
497
498   /* daemon mode */
499 #ifndef WIN32
500   if (olsr_cnf->debug_level == 0 && !olsr_cnf->no_fork) {
501     printf("%s detaching from the current process...\n", olsrd_version);
502     if (daemon(0, 0) < 0) {
503       printf("daemon(3) failed: %s\n", strerror(errno));
504       exit(EXIT_FAILURE);
505     }
506   }
507 #endif
508
509   /*
510    * Create locking file for olsrd, will be cleared after olsrd exits
511    */
512   olsr_create_lock_file();
513
514   /* Load plugins */
515   olsr_load_plugins();
516
517   OLSR_PRINTF(1, "Main address: %s\n\n", olsr_ip_to_string(&buf, &olsr_cnf->main_addr));
518
519 #ifdef LINUX_NETLINK_ROUTING
520   /* create policy routing priorities if necessary */
521   if (olsr_cnf->smart_gw_active) {
522     struct interface *ifn;
523     if (olsr_cnf->rt_table_pri) {
524       olsr_os_policy_rule(olsr_cnf->ip_version,
525           olsr_cnf->rt_table, olsr_cnf->rt_table_pri, NULL, true);
526     }
527     if (olsr_cnf->rt_table_tunnel_pri) {
528       olsr_os_policy_rule(olsr_cnf->ip_version,
529           olsr_cnf->rt_table_tunnel, olsr_cnf->rt_table_tunnel_pri, NULL, true);
530     }
531     if (olsr_cnf->rt_table_default_pri) {
532       olsr_os_policy_rule(olsr_cnf->ip_version,
533           olsr_cnf->rt_table_default, olsr_cnf->rt_table_default_pri, NULL, true);
534     }
535
536     /* OLSR sockets */
537     if (olsr_cnf->rt_table_defaultolsr_pri) {
538       for (ifn = ifnet; ifn; ifn = ifn->int_next) {
539         olsr_os_policy_rule(olsr_cnf->ip_version, olsr_cnf->rt_table_default,
540             olsr_cnf->rt_table_defaultolsr_pri, ifn->int_name, true);
541       }
542     }
543   }
544   /* trigger gateway selection */
545   if (olsr_cnf->smart_gw_active) {
546     olsr_trigger_inetgw_startup();
547   }
548
549   /* trigger niit static route setup */
550   if (olsr_cnf->use_niit) {
551     olsr_setup_niit_routes();
552   }
553
554   /* create lo:olsr interface */
555   if (olsr_cnf->use_src_ip_routes) {
556     olsr_os_localhost_if(&olsr_cnf->main_addr, true);
557   }
558 #endif
559
560   /* Start syslog entry */
561   olsr_syslog(OLSR_LOG_INFO, "%s successfully started", olsrd_version);
562
563   /*
564    *signal-handlers
565    */
566
567   /* ctrl-C and friends */
568 #ifdef WIN32
569 #ifndef WINCE
570   SetConsoleCtrlHandler(SignalHandler, true);
571 #endif
572 #else
573   signal(SIGHUP, olsr_reconfigure);
574   signal(SIGINT, olsr_shutdown);
575   signal(SIGQUIT, olsr_shutdown);
576   signal(SIGILL, olsr_shutdown);
577   signal(SIGABRT, olsr_shutdown);
578   //  signal(SIGSEGV, olsr_shutdown);
579   signal(SIGTERM, olsr_shutdown);
580   signal(SIGPIPE, SIG_IGN);
581 #endif
582
583   link_changes = false;
584
585   /* Starting scheduler */
586   olsr_scheduler();
587
588   /* Like we're ever going to reach this ;-) */
589   return 1;
590 } /* main */
591
592 /**
593  * Reconfigure olsrd. Currently kind of a hack...
594  *
595  *@param signal the signal that triggered this callback
596  */
597 #ifndef WIN32
598 void olsr_reconfigure(int signo __attribute__ ((unused))) {
599   /* if we are started with -nofork, we do not weant to go into the
600    * background here. So we can simply stop on -HUP
601    */
602   olsr_syslog(OLSR_LOG_INFO, "sot: olsr_reconfigure()\n");
603   if (!olsr_cnf->no_fork) {
604     if (!fork()) {
605       int i;
606       sigset_t sigs;
607       /* New process */
608       sleep(3);
609       sigemptyset(&sigs);
610       sigaddset(&sigs, SIGHUP);
611       sigprocmask(SIG_UNBLOCK, &sigs, NULL);
612       for (i = sysconf(_SC_OPEN_MAX); --i > STDERR_FILENO;) {
613         close(i);
614       }
615       printf("Restarting %s\n", olsr_argv[0]);
616       olsr_syslog(OLSR_LOG_INFO, "Restarting %s\n", olsr_argv[0]);
617       execv(olsr_argv[0], olsr_argv);
618       olsr_syslog(OLSR_LOG_ERR, "execv(%s) fails: %s!\n", olsr_argv[0],
619           strerror(errno));
620     } else {
621       olsr_syslog(OLSR_LOG_INFO, "RECONFIGURING!\n");
622     }
623   }
624   olsr_shutdown(0);
625 }
626 #endif
627
628 static void olsr_shutdown_messages(void) {
629   struct interface *ifn;
630
631   /* send TC reset */
632   for (ifn = ifnet; ifn; ifn = ifn->int_next) {
633     /* clean output buffer */
634     net_output(ifn);
635
636     /* send 'I'm gone' messages */
637     if (olsr_cnf->lq_level > 0) {
638       olsr_output_lq_tc(ifn);
639       olsr_output_lq_hello(ifn);
640     }
641     else {
642       generate_tc(ifn);
643       generate_hello(ifn);
644     }
645     net_output(ifn);
646   }
647 }
648
649 /**
650  *Function called at shutdown. Signal handler
651  *
652  * @param signal the signal that triggered this call
653  */
654 #ifdef WIN32
655 int __stdcall
656 SignalHandler(unsigned long signo)
657 #else
658 static void olsr_shutdown(int signo __attribute__ ((unused)))
659 #endif
660 {
661   struct interface *ifn;
662   int exit_value;
663
664   OLSR_PRINTF(1, "Received signal %d - shutting down\n", (int)signo);
665
666 #ifdef WIN32
667   OLSR_PRINTF(1, "Waiting for the scheduler to stop.\n");
668
669   olsr_win32_end_request = TRUE;
670
671   while (!olsr_win32_end_flag)
672   Sleep(100);
673
674   OLSR_PRINTF(1, "Scheduler stopped.\n");
675 #endif
676
677   /* clear all links and send empty hellos/tcs */
678   olsr_reset_all_links();
679
680   /* deactivate fisheye and immediate TCs */
681   olsr_cnf->lq_fish = 0;
682   for (ifn = ifnet; ifn; ifn = ifn->int_next) {
683     ifn->immediate_send_tc = false;
684   }
685   increase_local_ansn();
686
687   /* send first shutdown message burst */
688   olsr_shutdown_messages();
689
690   /* delete all routes */
691   olsr_delete_all_kernel_routes();
692
693   /* send second shutdown message burst */
694   olsr_shutdown_messages();
695
696   /* now try to cleanup the rest of the mess */
697   olsr_delete_all_tc_entries();
698
699   olsr_delete_all_mid_entries();
700
701 #ifdef LINUX_NETLINK_ROUTING
702   /* trigger gateway selection */
703   if (olsr_cnf->smart_gw_active) {
704     olsr_cleanup_gateways();
705   }
706
707   /* trigger niit static route cleanup */
708   if (olsr_cnf->use_niit) {
709     olsr_cleanup_niit_routes();
710   }
711
712   /* cleanup lo:olsr interface */
713   if (olsr_cnf->use_src_ip_routes) {
714     olsr_os_localhost_if(&olsr_cnf->main_addr, false);
715   }
716 #endif
717
718   olsr_destroy_parser();
719
720   OLSR_PRINTF(1, "Closing sockets...\n");
721
722   /* front-end IPC socket */
723   if (olsr_cnf->ipc_connections > 0) {
724     shutdown_ipc();
725   }
726
727   /* OLSR sockets */
728   for (ifn = ifnet; ifn; ifn = ifn->int_next) {
729     close(ifn->olsr_socket);
730     close(ifn->send_socket);
731
732 #ifdef LINUX_NETLINK_ROUTING
733     if (olsr_cnf->smart_gw_active && olsr_cnf->rt_table_defaultolsr_pri) {
734       olsr_os_policy_rule(olsr_cnf->ip_version, olsr_cnf->rt_table_default,
735           olsr_cnf->rt_table_defaultolsr_pri, ifn->int_name, false);
736     }
737 #endif
738   }
739
740   /* Closing plug-ins */
741   olsr_close_plugins();
742
743   /* Reset network settings */
744   net_os_restore_ifoptions();
745
746   /* ioctl socket */
747   close(olsr_cnf->ioctl_s);
748
749 #ifdef LINUX_NETLINK_ROUTING
750   if (olsr_cnf->smart_gw_active) {
751     if (olsr_cnf->rt_table_pri) {
752       olsr_os_policy_rule(olsr_cnf->ip_version,
753           olsr_cnf->rt_table, olsr_cnf->rt_table_pri, NULL, false);
754     }
755     if (olsr_cnf->rt_table_tunnel_pri) {
756       olsr_os_policy_rule(olsr_cnf->ip_version,
757           olsr_cnf->rt_table_tunnel, olsr_cnf->rt_table_tunnel_pri, NULL, false);
758     }
759     if (olsr_cnf->rt_table_default_pri) {
760       olsr_os_policy_rule(olsr_cnf->ip_version,
761           olsr_cnf->rt_table_default, olsr_cnf->rt_table_default_pri, NULL, false);
762     }
763   }
764   close(olsr_cnf->rtnl_s);
765   close (olsr_cnf->rt_monitor_socket);
766 #endif
767
768 #if defined __FreeBSD__ || defined __FreeBSD_kernel__ || defined __MacOSX__ || defined __NetBSD__ || defined __OpenBSD__
769   /* routing socket */
770   close(olsr_cnf->rts);
771 #endif
772
773   /* Free cookies and memory pools attached. */
774   OLSR_PRINTF(0, "Free all memory...\n");
775   olsr_delete_all_cookies();
776
777   olsr_syslog(OLSR_LOG_INFO, "%s stopped", olsrd_version);
778
779   OLSR_PRINTF(1, "\n <<<< %s - terminating >>>>\n           http://www.olsr.org\n", olsrd_version);
780
781   exit_value = olsr_cnf->exit_value;
782   olsrd_free_cnf(olsr_cnf);
783
784   exit(exit_value);
785 }
786
787 /**
788  * Print the command line usage
789  */
790 static void print_usage(bool error) {
791   fprintf(
792       stderr,
793         "%s"
794         "usage: olsrd [-f <configfile>] [ -i interface1 interface2 ... ]\n"
795         "  [-d <debug_level>] [-ipv6] [-multi <IPv6 multicast address>]\n"
796         "  [-lql <LQ level>] [-lqw <LQ winsize>] [-lqnt <nat threshold>]\n"
797         "  [-bcast <broadcastaddr>] [-ipc] [-dispin] [-dispout] [-delgw]\n"
798         "  [-hint <hello interval (secs)>] [-tcint <tc interval (secs)>]\n"
799         "  [-midint <mid interval (secs)>] [-hnaint <hna interval (secs)>]\n"
800         "  [-T <Polling Rate (secs)>] [-nofork] [-hemu <ip_address>]\n"
801         "  [-lql <LQ level>] [-lqa <LQ aging factor>]\n",
802         error ? "An error occured somwhere between your keyboard and your chair!\n" : "");
803 }
804
805 /**
806  * Sets the provided configuration on all unconfigured
807  * interfaces
808  *
809  * @param ifs a linked list of interfaces to check and possible update
810  * @param cnf the default configuration to set on unconfigured interfaces
811  */
812 int set_default_ifcnfs(struct olsr_if *ifs, struct if_config_options *cnf) {
813   int changes = 0;
814
815   while (ifs) {
816     if (ifs->cnf == NULL) {
817       ifs->cnf = olsr_malloc(sizeof(struct if_config_options),
818           "Set default config");
819       *ifs->cnf = *cnf;
820       changes++;
821     }
822     ifs = ifs->next;
823   }
824   return changes;
825 }
826
827 #define NEXT_ARG do { argv++;argc--; } while (0)
828 #define CHECK_ARGC do { if(!argc) { \
829       if((argc - 1) == 1){ \
830       fprintf(stderr, "Error parsing command line options!\n"); \
831       } else { \
832       argv--; \
833       fprintf(stderr, "You must provide a parameter when using the %s switch!\n", *argv); \
834      } \
835      olsr_exit(__func__, EXIT_FAILURE); \
836      } } while (0)
837
838 /**
839  * Process command line arguments passed to olsrd
840  *
841  */
842 static int olsr_process_arguments(int argc, char *argv[],
843     struct olsrd_config *cnf, struct if_config_options *ifcnf) {
844   while (argc > 1) {
845     NEXT_ARG;
846 #ifdef WIN32
847     /*
848      *Interface list
849      */
850     if (strcmp(*argv, "-int") == 0) {
851       ListInterfaces();
852       exit(0);
853     }
854 #endif
855
856     /*
857      *Configfilename
858      */
859     if (strcmp(*argv, "-f") == 0) {
860       fprintf(stderr, "Configfilename must ALWAYS be first argument!\n\n");
861       olsr_exit(__func__, EXIT_FAILURE);
862     }
863
864     /*
865      *Use IP version 6
866      */
867     if (strcmp(*argv, "-ipv6") == 0) {
868       cnf->ip_version = AF_INET6;
869       continue;
870     }
871
872     /*
873      *Broadcast address
874      */
875     if (strcmp(*argv, "-bcast") == 0) {
876       struct in_addr in;
877       NEXT_ARG;
878       CHECK_ARGC;
879
880       if (inet_aton(*argv, &in) == 0) {
881         printf("Invalid broadcast address! %s\nSkipping it!\n", *argv);
882         continue;
883       }
884       memcpy(&ifcnf->ipv4_multicast.v4, &in.s_addr, sizeof(ifcnf->ipv4_multicast.v4));
885       continue;
886     }
887
888     /*
889      * Set LQ level
890      */
891     if (strcmp(*argv, "-lql") == 0) {
892       int tmp_lq_level;
893       NEXT_ARG;
894       CHECK_ARGC;
895
896       /* Sanity checking is done later */
897       sscanf(*argv, "%d", &tmp_lq_level);
898       olsr_cnf->lq_level = tmp_lq_level;
899       continue;
900     }
901
902     /*
903      * Set LQ winsize
904      */
905     if (strcmp(*argv, "-lqa") == 0) {
906       float tmp_lq_aging;
907       NEXT_ARG;
908       CHECK_ARGC;
909
910       sscanf(*argv, "%f", &tmp_lq_aging);
911
912       if (tmp_lq_aging < MIN_LQ_AGING || tmp_lq_aging > MAX_LQ_AGING) {
913         printf("LQ aging factor %f not allowed. Range [%f-%f]\n", tmp_lq_aging,
914             MIN_LQ_AGING, MAX_LQ_AGING);
915         olsr_exit(__func__, EXIT_FAILURE);
916       }
917       olsr_cnf->lq_aging = tmp_lq_aging;
918       continue;
919     }
920
921     /*
922      * Set NAT threshold
923      */
924     if (strcmp(*argv, "-lqnt") == 0) {
925       float tmp_lq_nat_thresh;
926       NEXT_ARG;
927       CHECK_ARGC;
928
929       sscanf(*argv, "%f", &tmp_lq_nat_thresh);
930
931       if (tmp_lq_nat_thresh < 0.1 || tmp_lq_nat_thresh > 1.0) {
932         printf("NAT threshold %f not allowed. Range [%f-%f]\n",
933             tmp_lq_nat_thresh, 0.1, 1.0);
934         olsr_exit(__func__, EXIT_FAILURE);
935       }
936       olsr_cnf->lq_nat_thresh = tmp_lq_nat_thresh;
937       continue;
938     }
939
940     /*
941      * Enable additional debugging information to be logged.
942      */
943     if (strcmp(*argv, "-d") == 0) {
944       NEXT_ARG;
945       CHECK_ARGC;
946
947       sscanf(*argv, "%d", &cnf->debug_level);
948       continue;
949     }
950
951     /*
952      * Interfaces to be used by olsrd.
953      */
954     if (strcmp(*argv, "-i") == 0) {
955       NEXT_ARG;
956       CHECK_ARGC;
957
958       if (*argv[0] == '-') {
959         fprintf(stderr, "You must provide an interface label!\n");
960         olsr_exit(__func__, EXIT_FAILURE);
961       }
962       printf("Queuing if %s\n", *argv);
963       olsr_create_olsrif(*argv, false);
964
965       while ((argc - 1) && (argv[1][0] != '-')) {
966         NEXT_ARG;
967         printf("Queuing if %s\n", *argv);
968         olsr_create_olsrif(*argv, false);
969       }
970
971       continue;
972     }
973     /*
974      * Set the hello interval to be used by olsrd.
975      *
976      */
977     if (strcmp(*argv, "-hint") == 0) {
978       NEXT_ARG;
979       CHECK_ARGC;
980       sscanf(*argv, "%f", &ifcnf->hello_params.emission_interval);
981       ifcnf->hello_params.validity_time = ifcnf->hello_params.emission_interval
982           * 3;
983       continue;
984     }
985
986     /*
987      * Set the HNA interval to be used by olsrd.
988      *
989      */
990     if (strcmp(*argv, "-hnaint") == 0) {
991       NEXT_ARG;
992       CHECK_ARGC;
993       sscanf(*argv, "%f", &ifcnf->hna_params.emission_interval);
994       ifcnf->hna_params.validity_time = ifcnf->hna_params.emission_interval * 3;
995       continue;
996     }
997
998     /*
999      * Set the MID interval to be used by olsrd.
1000      *
1001      */
1002     if (strcmp(*argv, "-midint") == 0) {
1003       NEXT_ARG;
1004       CHECK_ARGC;
1005       sscanf(*argv, "%f", &ifcnf->mid_params.emission_interval);
1006       ifcnf->mid_params.validity_time = ifcnf->mid_params.emission_interval * 3;
1007       continue;
1008     }
1009
1010     /*
1011      * Set the tc interval to be used by olsrd.
1012      *
1013      */
1014     if (strcmp(*argv, "-tcint") == 0) {
1015       NEXT_ARG;
1016       CHECK_ARGC;
1017       sscanf(*argv, "%f", &ifcnf->tc_params.emission_interval);
1018       ifcnf->tc_params.validity_time = ifcnf->tc_params.emission_interval * 3;
1019       continue;
1020     }
1021
1022     /*
1023      * Set the polling interval to be used by olsrd.
1024      */
1025     if (strcmp(*argv, "-T") == 0) {
1026       NEXT_ARG;
1027       CHECK_ARGC;
1028       sscanf(*argv, "%f", &cnf->pollrate);
1029       continue;
1030     }
1031
1032     /*
1033      * Should we display the contents of packages beeing sent?
1034      */
1035     if (strcmp(*argv, "-dispin") == 0) {
1036       parser_set_disp_pack_in(true);
1037       continue;
1038     }
1039
1040     /*
1041      * Should we display the contents of incoming packages?
1042      */
1043     if (strcmp(*argv, "-dispout") == 0) {
1044       net_set_disp_pack_out(true);
1045       continue;
1046     }
1047
1048     /*
1049      * Should we set up and send on a IPC socket for the front-end?
1050      */
1051     if (strcmp(*argv, "-ipc") == 0) {
1052       cnf->ipc_connections = 1;
1053       continue;
1054     }
1055
1056     /*
1057      * IPv6 multicast addr
1058      */
1059     if (strcmp(*argv, "-multi") == 0) {
1060       struct in6_addr in6;
1061       NEXT_ARG;
1062       CHECK_ARGC;
1063       if (inet_pton(AF_INET6, *argv, &in6) <= 0) {
1064         fprintf(stderr, "Failed converting IP address %s\n", *argv);
1065         exit(EXIT_FAILURE);
1066       }
1067
1068       memcpy(&ifcnf->ipv6_multicast, &in6, sizeof(struct in6_addr));
1069
1070       continue;
1071     }
1072
1073     /*
1074      * Host emulation
1075      */
1076     if (strcmp(*argv, "-hemu") == 0) {
1077       struct in_addr in;
1078       struct olsr_if *ifa;
1079
1080       NEXT_ARG;
1081       CHECK_ARGC;
1082       if (inet_pton(AF_INET, *argv, &in) <= 0) {
1083         fprintf(stderr, "Failed converting IP address %s\n", *argv);
1084         exit(EXIT_FAILURE);
1085       }
1086       /* Add hemu interface */
1087
1088       ifa = olsr_create_olsrif("hcif01", true);
1089
1090       if (!ifa)
1091         continue;
1092
1093       ifa->cnf = get_default_if_config();
1094       ifa->host_emul = true;
1095       memcpy(&ifa->hemu_ip, &in, sizeof(union olsr_ip_addr));
1096       cnf->host_emul = true;
1097
1098       continue;
1099     }
1100
1101     /*
1102      * Delete possible default GWs
1103      */
1104     if (strcmp(*argv, "-delgw") == 0) {
1105       olsr_cnf->del_gws = true;
1106       continue;
1107     }
1108
1109     if (strcmp(*argv, "-nofork") == 0) {
1110       cnf->no_fork = true;
1111       continue;
1112     }
1113
1114     return -1;
1115   }
1116   return 0;
1117 }
1118
1119 /*
1120  * Local Variables:
1121  * c-basic-offset: 2
1122  * indent-tabs-mode: nil
1123  * End:
1124  */