gvpe/src/gvpe.C

/*
    gvpe.C -- the main file for gvpe
    Copyright (C) 1998-2002 Ivo Timmermans <ivo@o2w.nl>
                  2000-2002 Guus Sliepen <guus@sliepen.eu.org>
                  2003-2008 Marc Lehmann <gvpe@schmorp.de>
 
    This file is part of GVPE.

    GVPE is free software; you can redistribute it and/or modify it
    under the terms of the GNU General Public License as published by the
    Free Software Foundation; either version 3 of the License, or (at your
    option) any later version.
   
    This program is distributed in the hope that it will be useful, but
    WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General
    Public License for more details.
   
    You should have received a copy of the GNU General Public License along
    with this program; if not, see <http://www.gnu.org/licenses/>.
   
    Additional permission under GNU GPL version 3 section 7
   
    If you modify this Program, or any covered work, by linking or
    combining it with the OpenSSL project's OpenSSL library (or a modified
    version of that library), containing parts covered by the terms of the
    OpenSSL or SSLeay licenses, the licensors of this Program grant you
    additional permission to convey the resulting work.  Corresponding
    Source for a non-source form of such a combination shall include the
    source code for the parts of OpenSSL used as well as that of the
    covered work.
*/

#include "config.h"

#include <cstdio>
#include <cstring>
#include <cstdlib>

#include <errno.h>
#include <fcntl.h>
#include <getopt.h>
#include <signal.h>
#include <sys/types.h>
#include <unistd.h>
#include <signal.h>
#include <termios.h>

#if HAVE_SYS_MMAN_H
# include <sys/mman.h>
#endif

#include <openssl/err.h>
#include <openssl/rand.h>

#include "gettext.h"
#include "pidfile.h"

#include "conf.h"
#include "slog.h"
#include "util.h"
#include "vpn.h"
#include "ev_cpp.h"

static loglevel llevel = L_NONE;

/* If nonzero, display usage information and exit. */
static int show_help;

/* If nonzero, print the version on standard output and exit.  */
static int show_version;

/* If nonzero, disable swapping for this process. */
static int do_mlock = 0;

/* If zero, don't detach from the terminal. */
static int do_detach = 1;

static struct option const long_options[] =
    {
      {"config", required_argument, NULL, 'c'},
      {"help", no_argument, &show_help, 1},
      {"version", no_argument, &show_version, 1},
      {"no-detach", no_argument, &do_detach, 0},
      {"log-level", required_argument, NULL, 'l'},
      {"mlock", no_argument, &do_mlock, 1},
      {NULL, 0, NULL, 0}
    };

static void
usage (int status)
{
  if (status != 0)
    fprintf (stderr, _("Try `%s --help\' for more information.\n"), get_identity ());
  else
    {
      printf (_("Usage: %s [option]... NODENAME\n\n"), get_identity ());
      printf (_
              ("  -c, --config=DIR           Read configuration options from DIR.\n"
               "  -D, --no-detach            Don't fork and detach.\n"
               "  -l, --log-level=LEVEL      Set logging level (info, notice, warn are common).\n"
               "  -L, --mlock                Lock tinc into main memory.\n"
               "      --help                 Display this help and exit.\n"
               "      --version              Output version information and exit.\n\n"));
      printf (_("Report bugs to <gvpe@schmorp.de>.\n"));
    }

  exit (status);
}

void
parse_options (int argc, char **argv, char **envp)
{
  int r;
  int option_index = 0;

  while ((r = getopt_long (argc, argv, "c:DLl:", long_options, &option_index)) != EOF)
    {
      switch (r)
        {
        case 0:         /* long option */
          break;

        case 'c':               /* config file */
          confbase = strdup (optarg);
          break;

        case 'D':               /* no detach */
          do_detach = 0;
          break;

        case 'L':               /* lock into memory */
          do_mlock = 1;
          break;

        case 'l':               /* inc debug level */
          {
            llevel = string_to_loglevel (optarg);

            if (llevel == L_NONE)
              slog (L_WARN, "'%s': %s", optarg, UNKNOWN_LOGLEVEL);
          }
          break;

        case '?':
          usage (1);

        default:
          break;
        }
    }
}

/*
  Close network connections, and terminate neatly
*/
void cleanup_and_exit(int c)
{
  network.shutdown_all ();

  if (conf.pidfilename)
    remove_pid (conf.pidfilename);

  slog (L_INFO, _("terminating with exit code %d"), c);

  exit (c);
}

/*
  Signal handlers.
*/
RETSIGTYPE
sigterm_handler (int a)
{
  network.events |= vpn::EVENT_SHUTDOWN;
  network.event.start ();
}

RETSIGTYPE
sighup_handler (int a)
{
  network.events |= vpn::EVENT_RECONNECT;
  network.event.start ();
}

RETSIGTYPE
sigusr1_handler (int a)
{
  network.dump_status ();
}

RETSIGTYPE
sigusr2_handler (int a)
{
}

void
setup_signals (void)
{
  struct sigaction act;

  sigfillset (&act.sa_mask);
  act.sa_flags = 0;

  act.sa_handler = sighup_handler;  sigaction (SIGHUP , &act, NULL);
  act.sa_handler = sigusr1_handler; sigaction (SIGUSR1, &act, NULL);
  act.sa_handler = sigusr2_handler; sigaction (SIGUSR2, &act, NULL);
  act.sa_handler = SIG_IGN;         sigaction (SIGCHLD, &act, NULL);
  act.sa_handler = SIG_IGN;         sigaction (SIGPIPE, &act, NULL);
  act.sa_flags = SA_RESETHAND;
  act.sa_handler = sigterm_handler; sigaction (SIGINT , &act, NULL);
  act.sa_handler = sigterm_handler; sigaction (SIGTERM, &act, NULL);
}

int
main (int argc, char **argv, char **envp)
{
  ERR_load_crypto_strings (); // we have the RAM

  set_loglevel (L_INFO);
  set_identity (argv[0]);
  log_to (LOGTO_SYSLOG | LOGTO_STDERR);

  setlocale (LC_ALL, "");
  bindtextdomain (PACKAGE, LOCALEDIR);
  textdomain (PACKAGE);

  parse_options (argc, argv, envp);

  argc -= optind;
  argv += optind;

  if (show_version)
    {
      printf (_("%s version %s (built %s %s, protocol version %d.%d)\n"), get_identity (),
              VERSION, __DATE__, __TIME__, PROTOCOL_MAJOR, PROTOCOL_MINOR);
      printf (_("Built with kernel interface %s/%s.\n"), IFTYPE, IFSUBTYPE);
      printf (_
              ("Copyright (C) 2003 Marc Lehmann <gvpe@schmorp.de> and others.\n"
               "See the AUTHORS file for a complete list.\n\n"
               "tinc comes with ABSOLUTELY NO WARRANTY.  This is free software,\n"
               "and you are welcome to redistribute it under certain conditions;\n"
               "see the file COPYING for details.\n"));

      return 0;
    }

  if (show_help)
    usage (0);

  log_to (LOGTO_SYSLOG | LOGTO_STDERR);

  /* Lock all pages into memory if requested */

#if HAVE_MLOCKALL && HAVE_SYS_MMAN_H && _POSIX_MEMLOCK
  if (do_mlock)
    if (mlockall (MCL_CURRENT | MCL_FUTURE))
      slog (L_ERR, _("system call `%s' failed: %s"), "mlockall", strerror (errno));
#endif

  if (argc >= 1)
    {
      thisnode = *argv++;
      argc--;
    }

  if (!ev_default_loop (0))
    {
      slog (L_ERR, _("unable to initialise the event loop (bad $LIBEV_METHODS?)"));
      exit (EXIT_FAILURE);
    }

  {
    configuration_parser (conf, true, argc, argv);
  }

  set_loglevel (llevel != L_NONE ? llevel : conf.llevel);

  RAND_load_file ("/dev/urandom", 1024);

  if (!THISNODE)
    {
      slog (L_ERR, _("current node not set, or node '%s' not found in configfile, specify the nodename when starting gvpe."),
            thisnode ? thisnode : "<unset>");
      exit (EXIT_FAILURE);
    }

  if (detach (do_detach))
    exit (EXIT_SUCCESS);

  setup_signals ();

  if (!network.setup ())
    {
      ev_loop (EV_DEFAULT_ 0);
      cleanup_and_exit (EXIT_FAILURE);
    }

  slog (L_ERR, _("unable to setup network, unrecoverable error, exiting."));
  cleanup_and_exit (EXIT_FAILURE);
}

Revision:	1.13
Committed:	Thu Aug 7 17:54:27 2008 UTC (15 years, 9 months ago) by pcg
Content type:	text/plain
Branch:	MAIN
Changes since 1.12:	+24 -14 lines
Log Message:	update to gplv3, finally
#	User	Rev	Content
1	pcg	1.1	/*
2	pcg	1.4	gvpe.C -- the main file for gvpe
3	pcg	1.1	Copyright (C) 1998-2002 Ivo Timmermans <ivo@o2w.nl>
4			2000-2002 Guus Sliepen <guus@sliepen.eu.org>
5	pcg	1.13	2003-2008 Marc Lehmann <gvpe@schmorp.de>
6	pcg	1.1
7			This file is part of GVPE.
8
9	pcg	1.13	GVPE is free software; you can redistribute it and/or modify it
10			under the terms of the GNU General Public License as published by the
11			Free Software Foundation; either version 3 of the License, or (at your
12			option) any later version.
13
14			This program is distributed in the hope that it will be useful, but
15			WITHOUT ANY WARRANTY; without even the implied warranty of
16			MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General
17			Public License for more details.
18
19			You should have received a copy of the GNU General Public License along
20			with this program; if not, see <http://www.gnu.org/licenses/>.
21
22			Additional permission under GNU GPL version 3 section 7
23
24			If you modify this Program, or any covered work, by linking or
25			combining it with the OpenSSL project's OpenSSL library (or a modified
26			version of that library), containing parts covered by the terms of the
27			OpenSSL or SSLeay licenses, the licensors of this Program grant you
28			additional permission to convey the resulting work. Corresponding
29			Source for a non-source form of such a combination shall include the
30			source code for the parts of OpenSSL used as well as that of the
31			covered work.
32	pcg	1.1	*/
33
34			#include "config.h"
35
36			#include <cstdio>
37			#include <cstring>
38			#include <cstdlib>
39
40			#include <errno.h>
41			#include <fcntl.h>
42			#include <getopt.h>
43			#include <signal.h>
44			#include <sys/types.h>
45			#include <unistd.h>
46			#include <signal.h>
47			#include <termios.h>
48
49			#if HAVE_SYS_MMAN_H
50			# include <sys/mman.h>
51			#endif
52
53			#include <openssl/err.h>
54			#include <openssl/rand.h>
55
56	pcg	1.2	#include "gettext.h"
57	pcg	1.1	#include "pidfile.h"
58
59			#include "conf.h"
60			#include "slog.h"
61			#include "util.h"
62			#include "vpn.h"
63	pcg	1.10	#include "ev_cpp.h"
64	pcg	1.1
65			static loglevel llevel = L_NONE;
66
67			/* If nonzero, display usage information and exit. */
68			static int show_help;
69
70			/* If nonzero, print the version on standard output and exit. */
71			static int show_version;
72
73			/* If nonzero, disable swapping for this process. */
74			static int do_mlock = 0;
75
76			/* If zero, don't detach from the terminal. */
77			static int do_detach = 1;
78
79			static struct option const long_options[] =
80			{
81			{"config", required_argument, NULL, 'c'},
82			{"help", no_argument, &show_help, 1},
83			{"version", no_argument, &show_version, 1},
84			{"no-detach", no_argument, &do_detach, 0},
85			{"log-level", required_argument, NULL, 'l'},
86			{"mlock", no_argument, &do_mlock, 1},
87			{NULL, 0, NULL, 0}
88			};
89
90			static void
91			usage (int status)
92			{
93			if (status != 0)
94			fprintf (stderr, _("Try `%s --help\' for more information.\n"), get_identity ());
95			else
96			{
97			printf (_("Usage: %s [option]... NODENAME\n\n"), get_identity ());
98			printf (_
99			(" -c, --config=DIR Read configuration options from DIR.\n"
100			" -D, --no-detach Don't fork and detach.\n"
101			" -l, --log-level=LEVEL Set logging level (info, notice, warn are common).\n"
102			" -L, --mlock Lock tinc into main memory.\n"
103			" --help Display this help and exit.\n"
104			" --version Output version information and exit.\n\n"));
105	pcg	1.9	printf (_("Report bugs to <gvpe@schmorp.de>.\n"));
106	pcg	1.1	}
107
108			exit (status);
109			}
110
111			void
112			parse_options (int argc, char argv, char envp)
113			{
114			int r;
115			int option_index = 0;
116
117	pcg	1.6	while ((r = getopt_long (argc, argv, "c:DLl:", long_options, &option_index)) != EOF)
118	pcg	1.1	{
119			switch (r)
120			{
121			case 0: /* long option */
122			break;
123
124			case 'c': /* config file */
125			confbase = strdup (optarg);
126			break;
127
128			case 'D': /* no detach */
129			do_detach = 0;
130			break;
131
132			case 'L': /* lock into memory */
133			do_mlock = 1;
134			break;
135
136			case 'l': /* inc debug level */
137			{
138			llevel = string_to_loglevel (optarg);
139
140			if (llevel == L_NONE)
141			slog (L_WARN, "'%s': %s", optarg, UNKNOWN_LOGLEVEL);
142			}
143			break;
144
145			case '?':
146			usage (1);
147
148			default:
149			break;
150			}
151			}
152			}
153
154			/*
155			Close network connections, and terminate neatly
156			*/
157			void cleanup_and_exit(int c)
158			{
159			network.shutdown_all ();
160
161			if (conf.pidfilename)
162			remove_pid (conf.pidfilename);
163
164			slog (L_INFO, _("terminating with exit code %d"), c);
165
166			exit (c);
167			}
168
169			/*
170			Signal handlers.
171			*/
172			RETSIGTYPE
173			sigterm_handler (int a)
174			{
175			network.events \|= vpn::EVENT_SHUTDOWN;
176	pcg	1.10	network.event.start ();
177	pcg	1.1	}
178
179			RETSIGTYPE
180			sighup_handler (int a)
181			{
182			network.events \|= vpn::EVENT_RECONNECT;
183	pcg	1.10	network.event.start ();
184	pcg	1.1	}
185
186			RETSIGTYPE
187			sigusr1_handler (int a)
188			{
189			network.dump_status ();
190			}
191
192			RETSIGTYPE
193			sigusr2_handler (int a)
194			{
195			}
196
197			void
198			setup_signals (void)
199			{
200			struct sigaction act;
201
202			sigfillset (&act.sa_mask);
203			act.sa_flags = 0;
204
205			act.sa_handler = sighup_handler; sigaction (SIGHUP , &act, NULL);
206			act.sa_handler = sigusr1_handler; sigaction (SIGUSR1, &act, NULL);
207			act.sa_handler = sigusr2_handler; sigaction (SIGUSR2, &act, NULL);
208	pcg	1.7	act.sa_handler = SIG_IGN; sigaction (SIGCHLD, &act, NULL);
209	pcg	1.1	act.sa_handler = SIG_IGN; sigaction (SIGPIPE, &act, NULL);
210			act.sa_flags = SA_RESETHAND;
211			act.sa_handler = sigterm_handler; sigaction (SIGINT , &act, NULL);
212			act.sa_handler = sigterm_handler; sigaction (SIGTERM, &act, NULL);
213			}
214
215			int
216			main (int argc, char argv, char envp)
217			{
218			ERR_load_crypto_strings (); // we have the RAM
219
220			set_loglevel (L_INFO);
221			set_identity (argv[0]);
222			log_to (LOGTO_SYSLOG \| LOGTO_STDERR);
223
224			setlocale (LC_ALL, "");
225			bindtextdomain (PACKAGE, LOCALEDIR);
226			textdomain (PACKAGE);
227
228			parse_options (argc, argv, envp);
229
230	pcg	1.6	argc -= optind;
231			argv += optind;
232
233	pcg	1.1	if (show_version)
234			{
235	pcg	1.9	printf (_("%s version %s (built %s %s, protocol version %d.%d)\n"), get_identity (),
236	pcg	1.1	VERSION, __DATE__, __TIME__, PROTOCOL_MAJOR, PROTOCOL_MINOR);
237			printf (_("Built with kernel interface %s/%s.\n"), IFTYPE, IFSUBTYPE);
238			printf (_
239	pcg	1.9	("Copyright (C) 2003 Marc Lehmann <gvpe@schmorp.de> and others.\n"
240	pcg	1.1	"See the AUTHORS file for a complete list.\n\n"
241			"tinc comes with ABSOLUTELY NO WARRANTY. This is free software,\n"
242			"and you are welcome to redistribute it under certain conditions;\n"
243			"see the file COPYING for details.\n"));
244
245			return 0;
246			}
247
248			if (show_help)
249			usage (0);
250
251			log_to (LOGTO_SYSLOG \| LOGTO_STDERR);
252
253			/* Lock all pages into memory if requested */
254
255			#if HAVE_MLOCKALL && HAVE_SYS_MMAN_H && _POSIX_MEMLOCK
256			if (do_mlock)
257			if (mlockall (MCL_CURRENT \| MCL_FUTURE))
258			slog (L_ERR, _("system call `%s' failed: %s"), "mlockall", strerror (errno));
259			#endif
260
261	pcg	1.6	if (argc >= 1)
262			{
263			thisnode = *argv++;
264			argc--;
265			}
266
267	pcg	1.12	if (!ev_default_loop (0))
268	pcg	1.10	{
269			slog (L_ERR, _("unable to initialise the event loop (bad $LIBEV_METHODS?)"));
270			exit (EXIT_FAILURE);
271			}
272
273	pcg	1.6	{
274			configuration_parser (conf, true, argc, argv);
275			}
276	pcg	1.1
277			set_loglevel (llevel != L_NONE ? llevel : conf.llevel);
278
279			RAND_load_file ("/dev/urandom", 1024);
280
281			if (!THISNODE)
282			{
283	pcg	1.3	slog (L_ERR, _("current node not set, or node '%s' not found in configfile, specify the nodename when starting gvpe."),
284	pcg	1.1	thisnode ? thisnode : "<unset>");
285			exit (EXIT_FAILURE);
286			}
287
288			if (detach (do_detach))
289			exit (EXIT_SUCCESS);
290
291			setup_signals ();
292
293			if (!network.setup ())
294			{
295	pcg	1.12	ev_loop (EV_DEFAULT_ 0);
296	pcg	1.1	cleanup_and_exit (EXIT_FAILURE);
297			}
298
299			slog (L_ERR, _("unable to setup network, unrecoverable error, exiting."));
300			cleanup_and_exit (EXIT_FAILURE);
301			}
302