/*
* OpenConnect (SSL + DTLS) VPN client
*
- * Copyright © 2008-2010 Intel Corporation.
+ * Copyright © 2008-2012 Intel Corporation.
*
* Author: David Woodhouse <dwmw2@infradead.org>
*
#include <sys/stat.h>
#include <sys/socket.h>
#include <sys/ioctl.h>
+#include <sys/wait.h>
#include <string.h>
#include <signal.h>
#include <fcntl.h>
#include <arpa/inet.h>
#include <errno.h>
#include <ctype.h>
+#include <stdio.h>
+#include <stdlib.h>
#if defined(__sun__)
#include <stropts.h>
#include <sys/sockio.h>
*/
#if defined(__OpenBSD__) || defined(TUNSIFHEAD)
#define TUN_HAS_AF_PREFIX 1
-#define AF_PREFIX_SIZE (sizeof(int))
-#else
-#define AF_PREFIX_SIZE (0)
#endif
-#ifdef __sun__
-static int local_config_tun(struct openconnect_info *vpninfo, int mtu_only)
-{
- if (!mtu_only)
- vpn_progress(vpninfo, PRG_ERR,
- _("No vpnc-script configured. Need Solaris IP-setting code\n"));
- return 0;
-}
-#else
-static int local_config_tun(struct openconnect_info *vpninfo, int mtu_only)
+static int set_tun_mtu(struct openconnect_info *vpninfo)
{
+#ifndef __sun__ /* We don't know how to do this on Solaris */
struct ifreq ifr;
int net_fd;
perror(_("open net"));
return -EINVAL;
}
+
memset(&ifr, 0, sizeof(ifr));
strncpy(ifr.ifr_name, vpninfo->ifname, sizeof(ifr.ifr_name) - 1);
+ ifr.ifr_mtu = vpninfo->actual_mtu;
- if (!mtu_only) {
- struct sockaddr_in addr;
-
- if (ioctl(net_fd, SIOCGIFFLAGS, &ifr) < 0)
- perror(_("SIOCGIFFLAGS"));
-
- ifr.ifr_flags |= IFF_UP | IFF_POINTOPOINT;
- if (ioctl(net_fd, SIOCSIFFLAGS, &ifr) < 0)
- perror(_("SIOCSIFFLAGS"));
-
- addr.sin_family = AF_INET;
- addr.sin_addr.s_addr = inet_addr(vpninfo->vpn_addr);
- memcpy(&ifr.ifr_addr, &addr, sizeof(addr));
- if (ioctl(net_fd, SIOCSIFADDR, &ifr) < 0)
- perror(_("SIOCSIFADDR"));
- }
-
- ifr.ifr_mtu = vpninfo->mtu;
if (ioctl(net_fd, SIOCSIFMTU, &ifr) < 0)
perror(_("SIOCSIFMTU"));
close(net_fd);
-
+#endif
return 0;
}
-#endif
+
static int setenv_int(const char *opt, int value)
{
char *banner, *q;
const char *p;
- if (!vpninfo->banner || !(banner = malloc(strlen(vpninfo->banner)))) {
+ if (!vpninfo->banner || !(banner = malloc(strlen(vpninfo->banner)+1))) {
unsetenv("CISCO_BANNER");
return;
}
if (!ret)
setenv("VPNGATEWAY", host, 1);
- setenv("reason", "connect", 1);
set_banner(vpninfo);
unsetenv("CISCO_SPLIT_INC");
unsetenv("CISCO_SPLIT_EXC");
- setenv_int("INTERNAL_IP4_MTU", vpninfo->mtu);
+ setenv_int("INTERNAL_IP4_MTU", vpninfo->actual_mtu);
if (vpninfo->vpn_addr) {
setenv("INTERNAL_IP4_ADDRESS", vpninfo->vpn_addr, 1);
if (vpninfo->vpn_proxy_pac)
setenv("CISCO_PROXY_PAC", vpninfo->vpn_proxy_pac, 1);
+ if (vpninfo->split_dns) {
+ char *list;
+ int len = 0;
+ struct split_include *dns = vpninfo->split_dns;
+
+ while (dns) {
+ len += strlen(dns->route) + 1;
+ dns = dns->next;
+ }
+ list = malloc(len);
+ if (list) {
+ char *p = list;
+
+ dns = vpninfo->split_dns;
+ while (1) {
+ strcpy(p, dns->route);
+ p += strlen(p);
+ dns = dns->next;
+ if (!dns)
+ break;
+ *(p++) = ',';
+ }
+ setenv("CISCO_SPLIT_DNS", list, 1);
+ free(list);
+ }
+ }
if (vpninfo->split_includes) {
struct split_include *this = vpninfo->split_includes;
int nr_split_includes = 0;
setenv_cstp_opts(vpninfo);
}
-static int script_config_tun(struct openconnect_info *vpninfo)
+int script_config_tun(struct openconnect_info *vpninfo, const char *reason)
{
- if (system(vpninfo->vpnc_script)) {
+ int ret;
+
+ if (!vpninfo->vpnc_script || vpninfo->script_tun)
+ return 0;
+
+ setenv("reason", reason, 1);
+ ret = system(vpninfo->vpnc_script);
+ if (ret == -1) {
int e = errno;
vpn_progress(vpninfo, PRG_ERR,
- _("Failed to spawn script '%s': %s\n"),
- vpninfo->vpnc_script, strerror(e));
+ _("Failed to spawn script '%s' for %s: %s\n"),
+ vpninfo->vpnc_script, reason, strerror(e));
return -e;
}
+ if (!WIFEXITED(ret)) {
+ vpn_progress(vpninfo, PRG_ERR,
+ _("Script '%s' exited abnormally (%x)\n"),
+ vpninfo->vpnc_script, ret);
+ return -EIO;
+ }
+ ret = WEXITSTATUS(ret);
+ if (ret) {
+ vpn_progress(vpninfo, PRG_ERR,
+ _("Script '%s' returned error %d\n"),
+ vpninfo->vpnc_script, ret);
+ return -EIO;
+ }
return 0;
}
-void script_reconnect (struct openconnect_info *vpninfo)
-{
- setenv("reason", "reconnect", 1);
- script_config_tun(vpninfo);
-}
-
#ifdef __sun__
static int link_proto(int unit_nr, const char *devname, uint64_t flags)
{
tun2_fd = open("/dev/tun", O_RDWR);
if (tun2_fd < 0) {
- perror(_("Could not /dev/tun for plumbing"));
+ perror(_("Could not open /dev/tun for plumbing"));
return -EIO;
}
if (ioctl(tun2_fd, I_PUSH, "ip") < 0) {
close(tun2_fd);
return -1;
}
- if (ioctl(ip_fd, I_PUSH, "arp") < 0) {
- perror(_("Can't push ARP"));
- close(tun2_fd);
- close(ip_fd);
- return -1;
- }
mux_id = ioctl(ip_fd, I_LINK, tun2_fd);
if (mux_id < 0) {
return ip_fd;
}
#endif
+
+#ifdef SIOCIFCREATE
+static int bsd_open_tun(char *tun_name)
+{
+ int fd;
+ int s;
+ struct ifreq ifr;
+
+ fd = open(tun_name, O_RDWR);
+ if (fd >= 0) {
+ return fd;
+
+ s = socket(AF_INET, SOCK_DGRAM, 0);
+ if (s < 0)
+ return -1;
+
+ memset(&ifr, 0, sizeof(ifr));
+ strncpy(ifr.ifr_name, tun_name + 5, sizeof(ifr.ifr_name) - 1);
+ if (!ioctl(s, SIOCIFCREATE, &ifr))
+ fd = open(tun_name, O_RDWR);
+
+ close(s);
+ }
+ return fd;
+}
+#else
+#define bsd_open_tun(tun_name) open(tun_name, O_RDWR)
+#endif
+
+static int os_setup_tun(struct openconnect_info *vpninfo)
+{
+ int tun_fd = -1;
+
+#ifdef IFF_TUN /* Linux */
+ struct ifreq ifr;
+ int tunerr;
+
+ tun_fd = open("/dev/net/tun", O_RDWR);
+ if (tun_fd < 0) {
+ /* Android has /dev/tun instead of /dev/net/tun
+ Since other systems might have too, just try it
+ as a fallback instead of using ifdef __ANDROID__ */
+ tunerr = errno;
+ tun_fd = open("/dev/tun", O_RDWR);
+ }
+ if (tun_fd < 0) {
+ /* If the error on /dev/tun is ENOENT, that's boring.
+ Use the error we got on /dev/net/tun instead */
+ if (errno != ENOENT)
+ tunerr = errno;
+
+ vpn_progress(vpninfo, PRG_ERR,
+ _("Failed to open tun device: %s\n"),
+ strerror(tunerr));
+ exit(1);
+ }
+ memset(&ifr, 0, sizeof(ifr));
+ ifr.ifr_flags = IFF_TUN | IFF_NO_PI;
+ if (vpninfo->ifname)
+ strncpy(ifr.ifr_name, vpninfo->ifname,
+ sizeof(ifr.ifr_name) - 1);
+ if (ioctl(tun_fd, TUNSETIFF, (void *) &ifr) < 0) {
+ vpn_progress(vpninfo, PRG_ERR,
+ _("TUNSETIFF failed: %s\n"),
+ strerror(errno));
+ exit(1);
+ }
+ if (!vpninfo->ifname)
+ vpninfo->ifname = strdup(ifr.ifr_name);
+#elif defined (__sun__)
+ static char tun_name[80];
+ int unit_nr;
+
+ tun_fd = open("/dev/tun", O_RDWR);
+ if (tun_fd < 0) {
+ perror(_("open /dev/tun"));
+ return -EIO;
+ }
+
+ unit_nr = ioctl(tun_fd, TUNNEWPPA, -1);
+ if (unit_nr < 0) {
+ perror(_("Failed to create new tun"));
+ close(tun_fd);
+ return -EIO;
+ }
+
+ if (ioctl(tun_fd, I_SRDOPT, RMSGD) < 0) {
+ perror(_("Failed to put tun file descriptor into message-discard mode"));
+ close(tun_fd);
+ return -EIO;
+ }
+
+ sprintf(tun_name, "tun%d", unit_nr);
+ vpninfo->ifname = strdup(tun_name);
+
+ vpninfo->ip_fd = link_proto(unit_nr, "/dev/udp", IFF_IPV4);
+ if (vpninfo->ip_fd < 0) {
+ close(tun_fd);
+ return -EIO;
+ }
+
+ if (vpninfo->vpn_addr6) {
+ vpninfo->ip6_fd = link_proto(unit_nr, "/dev/udp6", IFF_IPV6);
+ if (vpninfo->ip6_fd < 0) {
+ close(tun_fd);
+ close(vpninfo->ip_fd);
+ vpninfo->ip_fd = -1;
+ return -EIO;
+ }
+ } else
+ vpninfo->ip6_fd = -1;
+
+#else /* BSD et al have /dev/tun$x devices */
+ static char tun_name[80];
+ int i;
+
+ if (vpninfo->ifname) {
+ char *endp = NULL;
+ if (strncmp(vpninfo->ifname, "tun", 3) ||
+ ((void)strtol(vpninfo->ifname + 3, &endp, 10), !endp) ||
+ *endp) {
+ vpn_progress(vpninfo, PRG_ERR,
+ _("Invalid interface name '%s'; must match 'tun%%d'\n"),
+ vpninfo->ifname);
+ return -EINVAL;
+ }
+ snprintf(tun_name, sizeof(tun_name),
+ "/dev/%s", vpninfo->ifname);
+ tun_fd = bsd_open_tun(tun_name);
+ if (tun_fd < 0) {
+ int err = errno;
+ vpn_progress(vpninfo, PRG_ERR,
+ _("Cannot open '%s': %s\n"),
+ tun_name, strerror(err));
+ return -EINVAL;
+ }
+ }
+#ifdef HAVE_FDEVNAME_R
+ /* We don't have to iterate over the possible devices; on FreeBSD
+ at least, opening /dev/tun will give us the next available
+ device. */
+ if (tun_fd < 0) {
+ tun_fd = open("/dev/tun", O_RDWR);
+ if (tun_fd >= 0) {
+ if (!fdevname_r(tun_fd, tun_name, sizeof(tun_name)) ||
+ strncmp(tun_name, "tun", 3)) {
+ close(tun_fd);
+ tun_fd = -1;
+ } else
+ vpninfo->ifname = strdup(tun_name);
+ }
+ }
+#endif
+ if (tun_fd < 0) {
+ for (i = 0; i < 255; i++) {
+ sprintf(tun_name, "/dev/tun%d", i);
+ tun_fd = bsd_open_tun(tun_name);
+ if (tun_fd >= 0)
+ break;
+ }
+ if (tun_fd < 0) {
+ perror(_("open tun"));
+ exit(1);
+ }
+ vpninfo->ifname = strdup(tun_name + 5);
+ }
+#ifdef TUNSIFHEAD
+ i = 1;
+ if (ioctl(tun_fd, TUNSIFHEAD, &i) < 0) {
+ perror(_("TUNSIFHEAD"));
+ exit(1);
+ }
+#endif
+#endif
+ return tun_fd;
+}
+
/* Set up a tuntap device. */
int setup_tun(struct openconnect_info *vpninfo)
{
perror(_("fork"));
exit(1);
} else if (!child) {
+ if (setpgid(0, getpid()) < 0)
+ perror(_("setpgid"));
close(tun_fd);
setenv_int("VPNFD", fds[1]);
execl("/bin/sh", "/bin/sh", "-c", vpninfo->vpnc_script, NULL);
vpninfo->script_tun = child;
vpninfo->ifname = strdup(_("(script)"));
} else {
-#ifdef IFF_TUN /* Linux */
- struct ifreq ifr;
- int tunerr;
-
- tun_fd = open("/dev/net/tun", O_RDWR);
- if (tun_fd < 0) {
- /* Android has /dev/tun instead of /dev/net/tun
- Since other systems might have too, just try it
- as a fallback instead of using ifdef __ANDROID__ */
- tunerr = errno;
- tun_fd = open("/dev/tun", O_RDWR);
- }
- if (tun_fd < 0) {
- /* If the error on /dev/tun is ENOENT, that's boring.
- Use the error we got on /dev/net/tun instead */
- if (errno != -ENOENT)
- tunerr = errno;
-
- vpn_progress(vpninfo, PRG_ERR,
- _("Failed to open tun device: %s\n"),
- strerror(tunerr));
- exit(1);
- }
- memset(&ifr, 0, sizeof(ifr));
- ifr.ifr_flags = IFF_TUN | IFF_NO_PI;
- if (vpninfo->ifname)
- strncpy(ifr.ifr_name, vpninfo->ifname,
- sizeof(ifr.ifr_name) - 1);
- if (ioctl(tun_fd, TUNSETIFF, (void *) &ifr) < 0) {
- vpn_progress(vpninfo, PRG_ERR,
- _("TUNSETIFF failed: %s\n"),
- strerror(errno));
- exit(1);
- }
- if (!vpninfo->ifname)
- vpninfo->ifname = strdup(ifr.ifr_name);
-#elif defined (__sun__)
- static char tun_name[80];
- int unit_nr;
-
- tun_fd = open("/dev/tun", O_RDWR);
- if (tun_fd < 0) {
- perror(_("open /dev/tun"));
- return -EIO;
- }
+ script_config_tun(vpninfo, "pre-init");
- unit_nr = ioctl(tun_fd, TUNNEWPPA, -1);
- if (unit_nr < 0) {
- perror(_("Failed to create new tun"));
- close(tun_fd);
- return -EIO;
- }
-
- sprintf(tun_name, "tun%d", unit_nr);
- vpninfo->ifname = strdup(tun_name);
-
- vpninfo->ip_fd = link_proto(unit_nr, "/dev/udp", IFF_IPV4);
- if (vpninfo->ip_fd < 0) {
- close(tun_fd);
- return -EIO;
- }
+ tun_fd = os_setup_tun(vpninfo);
+ if (tun_fd < 0)
+ return tun_fd;
- if (vpninfo->vpn_addr6) {
- vpninfo->ip6_fd = link_proto(unit_nr, "/dev/udp6", IFF_IPV6);
- if (vpninfo->ip6_fd < 0) {
- close(tun_fd);
- close(vpninfo->ip_fd);
- vpninfo->ip_fd = -1;
- return -EIO;
- }
- } else
- vpninfo->ip6_fd = -1;
+ setenv("TUNDEV", vpninfo->ifname, 1);
+ script_config_tun(vpninfo, "connect");
-#else /* BSD et al have /dev/tun$x devices */
- static char tun_name[80];
- int i;
- for (i = 0; i < 255; i++) {
- sprintf(tun_name, "/dev/tun%d", i);
- tun_fd = open(tun_name, O_RDWR);
- if (tun_fd >= 0)
- break;
- }
- if (tun_fd < 0) {
- perror(_("open tun"));
- exit(1);
- }
- vpninfo->ifname = strdup(tun_name + 5);
-#ifdef TUNSIFHEAD
- i = 1;
- if (ioctl(tun_fd, TUNSIFHEAD, &i) < 0) {
- perror(_("TUNSIFHEAD"));
- exit(1);
- }
-#endif
-#endif
- if (vpninfo->vpnc_script) {
- setenv("TUNDEV", vpninfo->ifname, 1);
- script_config_tun(vpninfo);
- /* We have to set the MTU for ourselves, because the script doesn't */
- local_config_tun(vpninfo, 1);
- } else
- local_config_tun(vpninfo, 0);
+ /* Ancient vpnc-scripts might not get this right */
+ set_tun_mtu(vpninfo);
}
fcntl(tun_fd, F_SETFD, FD_CLOEXEC);
int tun_mainloop(struct openconnect_info *vpninfo, int *timeout)
{
int work_done = 0;
- int moredata = 1;
+ int prefix_size = 0;
+
+#ifdef TUN_HAS_AF_PREFIX
+ if (!vpninfo->script_tun)
+ prefix_size = sizeof(int);
+#endif
if (FD_ISSET(vpninfo->tun_fd, &vpninfo->select_rfds)) {
- while (moredata) {
- int len = vpninfo->mtu;
+ while (1) {
+ int len = vpninfo->actual_mtu;
if (!out_pkt) {
out_pkt = malloc(sizeof(struct pkt) + len);
}
}
-#ifdef __sun__
- /* On Solaris, if we're actually using tuntap and *not* just
- passing packets through a UNIX socket to a child process,
- we have to use getmsg() to ensure that we only get *one*
- packet at a time. */
- if (!vpninfo->script_tun) {
- struct strbuf strb;
- int flags = 0;
- int ret;
-
- strb.buf = (caddr_t)out_pkt->data;
- strb.maxlen = len;
- strb.len = 0;
- ret = getmsg(vpninfo->tun_fd, NULL, &strb, &flags);
- if (ret < 0)
- break;
-
- if (!(ret & MOREDATA))
- moredata = 0;
- out_pkt->len = strb.len;
- } else
-#endif /* __sun__ ... */
- {
- len = read(vpninfo->tun_fd, out_pkt->data - AF_PREFIX_SIZE, len + AF_PREFIX_SIZE);
- if (len <= 0)
- break;
-
- out_pkt->len = len - AF_PREFIX_SIZE;
- }
+ len = read(vpninfo->tun_fd, out_pkt->data - prefix_size, len + prefix_size);
+ if (len <= prefix_size)
+ break;
+ out_pkt->len = len - prefix_size;
queue_packet(&vpninfo->outgoing_queue, out_pkt);
out_pkt = NULL;
void shutdown_tun(struct openconnect_info *vpninfo)
{
if (vpninfo->script_tun) {
- kill(vpninfo->script_tun, SIGHUP);
+ /* nuke the whole process group */
+ kill(-vpninfo->script_tun, SIGHUP);
} else {
- if (vpninfo->vpnc_script) {
- setenv("reason", "disconnect", 1);
- if (system(vpninfo->vpnc_script) == -1) {
- vpn_progress(vpninfo, PRG_ERR,
- _("Failed to spawn script '%s': %s\n"),
- vpninfo->vpnc_script,
- strerror(errno));
- }
- }
+ script_config_tun(vpninfo, "disconnect");
#ifdef __sun__
close(vpninfo->ip_fd);
vpninfo->ip_fd = -1;