gvpe/src/device-tincd.C

/*
    device-tincd.C -- include one of the tincd low level implementations.
    Copyright (C) 2003 Marc Lehmann <pcg@goof.com>
 
    This program 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 2 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, write to the Free Software
    Foundation, Inc. 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
*/

#include <cstdio>
#include <cstring>
#include <cerrno>

#include <sys/types.h>
#include <sys/stat.h>
#include <sys/ioctl.h>
#include <unistd.h>
#include <syslog.h>
#include <fcntl.h>

#include "conf.h"

// following headers used by cygwin (maybe others)
#include "netcompat.h"
#include <signal.h>

#define xstrdup(strd) strdup(str)

/* make the tincd sources feel comfortable in our environment. */
/* this was reasonably easy to do. */
#define routing_mode 1
#define RMODE_ROUTER 0

#define LOG_TO_L(level)                         \
    (level) == LOG_ERR     ? L_ERR              \
  : (level) == LOG_DEBUG   ? L_DEBUG            \
  : (level) == LOG_WARNING ? L_WARN             \
  : (level) == LOG_INFO    ? L_INFO             \
                           : L_NOTICE

#if __STDC_VERSION__ > 199900
# define logger(level, ...) slog (LOG_TO_L(level), __VA_ARGS__)
#elif __GNUC__
# define logger(level, args...) slog (LOG_TO_L(level), ## args)
#else
# error either need ISO-C 99 compliant compiler or gcc.
#endif

#define ifdebug(subsys) if (0)

#define cp()
#define lookup_config(config_tree,key) (key)

#define MTU MAXSIZE

// BIGGEST hack of 'em all
// will be casted to data_packet, due to structural similarity
struct vpn_packet_t : net_packet {
  u8 data[MAXSIZE];
};

static tap_device *self;

static bool overwrite_mac;

static bool
get_config_string(const char *key, char **res)
{
  if (!strcmp (key, "Interface"))
    *res = conf.ifname;
  else if (!strcmp (key, "Device"))
    *res = 0;
  else
    {
      slog (L_ERR, _("tincd layer asking for unknown config '%s'"), key);
      *res = 0;
    }

  return *res;
}

#define netname conf.ifname

#if IF_linux
# include "tincd/linux/device.c"

#elif IF_freebsd
# include "tincd/freebsd/device.c"

#elif IF_netbsd
#define IF_istun 1
# include "tincd/netbsd/device.c"

#elif IF_openbsd
#define IF_istun 1
# include "tincd/openbsd/device.c"

#elif IF_solaris
# include "tincd/solaris/device.c"

#elif IF_cygwin
# include "tincd/cygwin/device.c"

#elif IF_mingw
# include "tincd/mingw/device.c"

#elif IF_darwin
#define IF_istun 1
# include "tincd/darwin/device.c"

#elif IF_raw_socket
#define IF_istun 1
# include "tincd/raw_socket/device.c"

#else
# error No interface implementation for your IFTYPE/IFSUBTYPE combination.
#endif

#if IF_istun
# include "ether_emu.C"
#endif

const char *
tap_device::info ()
{
  return _("tincd compatibility layer");
}

tap_device::tap_device ()
{
  self = this;

  if (setup_device ())
    {
      //slog (L_DEBUG, _("%s is a %s"), device, info ());
      fd = device_fd;
      strcpy (ifrname, iface);
    }
  else
    {
      slog (L_ERR, _("error while configuring tincd device (%s/%s)"), device, info ());
      exit (1);
    }
}

tap_device::~tap_device ()
{
  close_device ();
}

tap_packet *
tap_device::recv ()
{
  tap_packet *pkt = new tap_packet;

  if (!read_packet (reinterpret_cast<vpn_packet_t *>(pkt)))
    {
      delete pkt;
      slog (L_ERR, _("can't read from to %s %s: %s"), info (), DEFAULT_DEVICE,
            strerror (errno));
      return 0;
    }
    
#if IF_istun
  // assume ipv4
  (*pkt)[12] = 0x08;
  (*pkt)[13] = 0x00;

  if (!ether_emu.tun_to_tap (pkt))
  {
    delete pkt;
    return 0;
  }
#endif

  return pkt;
}

void
tap_device::send (tap_packet *pkt)
{
  if (
#if IF_istun
      ether_emu.tap_to_tun (pkt) &&
#endif
      !write_packet (reinterpret_cast<vpn_packet_t *>(pkt)))
    slog (L_ERR, _("can't write to %s %s: %s"), info (), DEFAULT_DEVICE,
          strerror (errno));
}
    

Revision:	1.6
Committed:	Thu Oct 16 13:37:52 2003 UTC (20 years, 7 months ago) by pcg
Content type:	text/plain
Branch:	MAIN
Changes since 1.5:	+12 -0 lines
Log Message:	* empty log message *
#	User	Rev	Content
1	pcg	1.1	/*
2			device-tincd.C -- include one of the tincd low level implementations.
3	pcg	1.4	Copyright (C) 2003 Marc Lehmann <pcg@goof.com>
4	pcg	1.1
5			This program is free software; you can redistribute it and/or modify
6			it under the terms of the GNU General Public License as published by
7			the Free Software Foundation; either version 2 of the License, or
8			(at your option) any later version.
9
10			This program is distributed in the hope that it will be useful,
11			but WITHOUT ANY WARRANTY; without even the implied warranty of
12			MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13			GNU General Public License for more details.
14
15			You should have received a copy of the GNU General Public License
16			along with this program; if not, write to the Free Software
17			Foundation, Inc. 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
18			*/
19
20			#include <cstdio>
21			#include <cstring>
22			#include <cerrno>
23
24			#include <sys/types.h>
25			#include <sys/stat.h>
26			#include <sys/ioctl.h>
27			#include <unistd.h>
28			#include <syslog.h>
29			#include <fcntl.h>
30
31			#include "conf.h"
32
33	pcg	1.3	// following headers used by cygwin (maybe others)
34			#include "netcompat.h"
35			#include <signal.h>
36
37			#define xstrdup(strd) strdup(str)
38
39	pcg	1.2	/* make the tincd sources feel comfortable in our environment. */
40			/* this was reasonably easy to do. */
41	pcg	1.1	#define routing_mode 1
42			#define RMODE_ROUTER 0
43
44	pcg	1.2	#define LOG_TO_L(level) \
45	pcg	1.1	(level) == LOG_ERR ? L_ERR \
46			: (level) == LOG_DEBUG ? L_DEBUG \
47			: (level) == LOG_WARNING ? L_WARN \
48			: (level) == LOG_INFO ? L_INFO \
49	pcg	1.2	: L_NOTICE
50
51			#if __STDC_VERSION__ > 199900
52			# define logger(level, ...) slog (LOG_TO_L(level), __VA_ARGS__)
53			#elif __GNUC__
54			# define logger(level, args...) slog (LOG_TO_L(level), ## args)
55			#else
56			# error either need ISO-C 99 compliant compiler or gcc.
57			#endif
58	pcg	1.1
59			#define ifdebug(subsys) if (0)
60
61			#define cp()
62			#define lookup_config(config_tree,key) (key)
63
64			#define MTU MAXSIZE
65
66			// BIGGEST hack of 'em all
67			// will be casted to data_packet, due to structural similarity
68			struct vpn_packet_t : net_packet {
69			u8 data[MAXSIZE];
70			};
71
72			static tap_device *self;
73
74			static bool overwrite_mac;
75
76			static bool
77			get_config_string(const char key, char *res)
78			{
79			if (!strcmp (key, "Interface"))
80			*res = conf.ifname;
81			else if (!strcmp (key, "Device"))
82			*res = 0;
83			else
84			{
85			slog (L_ERR, _("tincd layer asking for unknown config '%s'"), key);
86			*res = 0;
87			}
88
89			return *res;
90			}
91
92			#define netname conf.ifname
93
94			#if IF_linux
95			# include "tincd/linux/device.c"
96	pcg	1.6
97	pcg	1.1	#elif IF_freebsd
98			# include "tincd/freebsd/device.c"
99	pcg	1.6
100	pcg	1.1	#elif IF_netbsd
101	pcg	1.5	#define IF_istun 1
102	pcg	1.1	# include "tincd/netbsd/device.c"
103	pcg	1.6
104			#elif IF_openbsd
105			#define IF_istun 1
106			# include "tincd/openbsd/device.c"
107
108	pcg	1.1	#elif IF_solaris
109			# include "tincd/solaris/device.c"
110	pcg	1.6
111	pcg	1.1	#elif IF_cygwin
112			# include "tincd/cygwin/device.c"
113	pcg	1.6
114	pcg	1.1	#elif IF_mingw
115			# include "tincd/mingw/device.c"
116	pcg	1.6
117	pcg	1.1	#elif IF_darwin
118	pcg	1.5	#define IF_istun 1
119	pcg	1.1	# include "tincd/darwin/device.c"
120	pcg	1.6
121	pcg	1.1	#elif IF_raw_socket
122	pcg	1.5	#define IF_istun 1
123	pcg	1.1	# include "tincd/raw_socket/device.c"
124	pcg	1.6
125	pcg	1.1	#else
126			# error No interface implementation for your IFTYPE/IFSUBTYPE combination.
127			#endif
128
129	pcg	1.5	#if IF_istun
130			# include "ether_emu.C"
131			#endif
132
133	pcg	1.1	const char *
134			tap_device::info ()
135			{
136			return _("tincd compatibility layer");
137			}
138
139			tap_device::tap_device ()
140			{
141			self = this;
142
143			if (setup_device ())
144			{
145			//slog (L_DEBUG, _("%s is a %s"), device, info ());
146			fd = device_fd;
147			strcpy (ifrname, iface);
148			}
149			else
150			{
151			slog (L_ERR, _("error while configuring tincd device (%s/%s)"), device, info ());
152			exit (1);
153			}
154			}
155
156			tap_device::~tap_device ()
157			{
158			close_device ();
159			}
160
161			tap_packet *
162			tap_device::recv ()
163			{
164			tap_packet *pkt = new tap_packet;
165
166			if (!read_packet (reinterpret_cast<vpn_packet_t *>(pkt)))
167			{
168			delete pkt;
169			slog (L_ERR, _("can't read from to %s %s: %s"), info (), DEFAULT_DEVICE,
170			strerror (errno));
171			return 0;
172			}
173
174	pcg	1.5	#if IF_istun
175			// assume ipv4
176			(*pkt)[12] = 0x08;
177			(*pkt)[13] = 0x00;
178
179			if (!ether_emu.tun_to_tap (pkt))
180			{
181			delete pkt;
182			return 0;
183			}
184			#endif
185
186	pcg	1.1	return pkt;
187			}
188
189			void
190			tap_device::send (tap_packet *pkt)
191			{
192	pcg	1.5	if (
193			#if IF_istun
194			ether_emu.tap_to_tun (pkt) &&
195			#endif
196			!write_packet (reinterpret_cast<vpn_packet_t *>(pkt)))
197	pcg	1.1	slog (L_ERR, _("can't write to %s %s: %s"), info (), DEFAULT_DEVICE,
198			strerror (errno));
199			}
200
201