crypto/openssh/openbsd-compat/port-tun.c

   1 /*
   2  * Copyright (c) 2005 Reyk Floeter <reyk@openbsd.org>
   3  *
   4  * Permission to use, copy, modify, and distribute this software for any
   5  * purpose with or without fee is hereby granted, provided that the above
   6  * copyright notice and this permission notice appear in all copies.
   7  *
   8  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
   9  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
  10  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
  11  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  12  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
  13  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
  14  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  15  */
  16
  17 #include "includes.h"
  18
  19 #include <sys/types.h>
  20 #include <sys/ioctl.h>
  21
  22 #include <netinet/in.h>
  23 #include <arpa/inet.h>
  24 #include <netinet/ip.h>
  25
  26 #include <errno.h>
  27 #include <fcntl.h>
  28 #include <stdarg.h>
  29 #include <string.h>
  30 #include <unistd.h>
  31
  32 #include "openbsd-compat/sys-queue.h"
  33 #include "log.h"
  34 #include "misc.h"
  35 #include "sshbuf.h"
  36 #include "channels.h"
  37 #include "ssherr.h"
  38
  39 /*
  40  * This is the portable version of the SSH tunnel forwarding, it
  41  * uses some preprocessor definitions for various platform-specific
  42  * settings.
  43  *
  44  * SSH_TUN_LINUX        Use the (newer) Linux tun/tap device
  45  * SSH_TUN_FREEBSD      Use the FreeBSD tun/tap device
  46  * SSH_TUN_COMPAT_AF    Translate the OpenBSD address family
  47  * SSH_TUN_PREPEND_AF   Prepend/remove the address family
  48  */
  49
  50 /*
  51  * System-specific tunnel open function
  52  */
  53
  54 #if defined(SSH_TUN_LINUX)
  55 #include <linux/if.h>
  56 #include <linux/if_tun.h>
  57
  58 int
  59 sys_tun_open(int tun, int mode)
  60 {
  61         struct ifreq ifr;
  62         int fd = -1;
  63         const char *name = NULL;
  64
  65         if ((fd = open("/dev/net/tun", O_RDWR)) == -1) {
  66                 debug("%s: failed to open tunnel control interface: %s",
  67                     __func__, strerror(errno));
  68                 return (-1);
  69         }
  70
  71         bzero(&ifr, sizeof(ifr));
  72
  73         if (mode == SSH_TUNMODE_ETHERNET) {
  74                 ifr.ifr_flags = IFF_TAP;
  75                 name = "tap%d";
  76         } else {
  77                 ifr.ifr_flags = IFF_TUN;
  78                 name = "tun%d";
  79         }
  80         ifr.ifr_flags |= IFF_NO_PI;
  81
  82         if (tun != SSH_TUNID_ANY) {
  83                 if (tun > SSH_TUNID_MAX) {
  84                         debug("%s: invalid tunnel id %x: %s", __func__,
  85                             tun, strerror(errno));
  86                         goto failed;
  87                 }
  88                 snprintf(ifr.ifr_name, sizeof(ifr.ifr_name), name, tun);
  89         }
  90
  91         if (ioctl(fd, TUNSETIFF, &ifr) == -1) {
  92                 debug("%s: failed to configure tunnel (mode %d): %s", __func__,
  93                     mode, strerror(errno));
  94                 goto failed;
  95         }
  96
  97         if (tun == SSH_TUNID_ANY)
  98                 debug("%s: tunnel mode %d fd %d", __func__, mode, fd);
  99         else
 100                 debug("%s: %s mode %d fd %d", __func__, ifr.ifr_name, mode, fd);
 101
 102         return (fd);
 103
 104  failed:
 105         close(fd);
 106         return (-1);
 107 }
 108 #endif /* SSH_TUN_LINUX */
 109
 110 #ifdef SSH_TUN_FREEBSD
 111 #include <sys/socket.h>
 112 #include <net/if.h>
 113
 114 #ifdef HAVE_NET_IF_TUN_H
 115 #include <net/tun/if_tun.h>
 116 #endif
 117
 118 int
 119 sys_tun_open(int tun, int mode)
 120 {
 121         struct ifreq ifr;
 122         char name[100];
 123         int fd = -1, sock, flag;
 124         const char *tunbase = "tun";
 125
 126         if (mode == SSH_TUNMODE_ETHERNET) {
 127 #ifdef SSH_TUN_NO_L2
 128                 debug("%s: no layer 2 tunnelling support", __func__);
 129                 return (-1);
 130 #else
 131                 tunbase = "tap";
 132 #endif
 133         }
 134
 135         /* Open the tunnel device */
 136         if (tun <= SSH_TUNID_MAX) {
 137                 snprintf(name, sizeof(name), "/dev/%s%d", tunbase, tun);
 138                 fd = open(name, O_RDWR);
 139         } else if (tun == SSH_TUNID_ANY) {
 140                 for (tun = 100; tun >= 0; tun--) {
 141                         snprintf(name, sizeof(name), "/dev/%s%d",
 142                             tunbase, tun);
 143                         if ((fd = open(name, O_RDWR)) >= 0)
 144                                 break;
 145                 }
 146         } else {
 147                 debug("%s: invalid tunnel %u\n", __func__, tun);
 148                 return (-1);
 149         }
 150
 151         if (fd < 0) {
 152                 debug("%s: %s open failed: %s", __func__, name,
 153                     strerror(errno));
 154                 return (-1);
 155         }
 156
 157         /* Turn on tunnel headers */
 158         flag = 1;
 159 #if defined(TUNSIFHEAD) && !defined(SSH_TUN_PREPEND_AF)
 160         if (mode != SSH_TUNMODE_ETHERNET &&
 161             ioctl(fd, TUNSIFHEAD, &flag) == -1) {
 162                 debug("%s: ioctl(%d, TUNSIFHEAD, 1): %s", __func__, fd,
 163                     strerror(errno));
 164                 close(fd);
 165         }
 166 #endif
 167
 168         debug("%s: %s mode %d fd %d", __func__, name, mode, fd);
 169
 170         /* Set the tunnel device operation mode */
 171         snprintf(ifr.ifr_name, sizeof(ifr.ifr_name), "%s%d", tunbase, tun);
 172         if ((sock = socket(PF_UNIX, SOCK_STREAM, 0)) == -1)
 173                 goto failed;
 174
 175         if (ioctl(sock, SIOCGIFFLAGS, &ifr) == -1)
 176                 goto failed;
 177         if ((ifr.ifr_flags & IFF_UP) == 0) {
 178                 ifr.ifr_flags |= IFF_UP;
 179                 if (ioctl(sock, SIOCSIFFLAGS, &ifr) == -1)
 180                         goto failed;
 181         }
 182
 183         close(sock);
 184         return (fd);
 185
 186  failed:
 187         if (fd >= 0)
 188                 close(fd);
 189         if (sock >= 0)
 190                 close(sock);
 191         debug("%s: failed to set %s mode %d: %s", __func__, name,
 192             mode, strerror(errno));
 193         return (-1);
 194 }
 195 #endif /* SSH_TUN_FREEBSD */
 196
 197 /*
 198  * System-specific channel filters
 199  */
 200
 201 #if defined(SSH_TUN_FILTER)
 202 /*
 203  * The tunnel forwarding protocol prepends the address family of forwarded
 204  * IP packets using OpenBSD's numbers.
 205  */
 206 #define OPENBSD_AF_INET         2
 207 #define OPENBSD_AF_INET6        24
 208
 209 int
 210 sys_tun_infilter(struct ssh *ssh, struct Channel *c, char *buf, int _len)
 211 {
 212         int r;
 213         size_t len;
 214         char *ptr = buf;
 215 #if defined(SSH_TUN_PREPEND_AF)
 216         char rbuf[CHAN_RBUF];
 217         struct ip iph;
 218 #endif
 219 #if defined(SSH_TUN_PREPEND_AF) || defined(SSH_TUN_COMPAT_AF)
 220         u_int32_t af;
 221 #endif
 222
 223         /* XXX update channel input filter API to use unsigned length */
 224         if (_len < 0)
 225                 return -1;
 226         len = _len;
 227
 228 #if defined(SSH_TUN_PREPEND_AF)
 229         if (len <= sizeof(iph) || len > sizeof(rbuf) - 4)
 230                 return -1;
 231         /* Determine address family from packet IP header. */
 232         memcpy(&iph, buf, sizeof(iph));
 233         af = iph.ip_v == 6 ? OPENBSD_AF_INET6 : OPENBSD_AF_INET;
 234         /* Prepend address family to packet using OpenBSD constants */
 235         memcpy(rbuf + 4, buf, len);
 236         len += 4;
 237         POKE_U32(rbuf, af);
 238         ptr = rbuf;
 239 #elif defined(SSH_TUN_COMPAT_AF)
 240         /* Convert existing address family header to OpenBSD value */
 241         if (len <= 4)
 242                 return -1;
 243         af = PEEK_U32(buf);
 244         /* Put it back */
 245         POKE_U32(buf, af == AF_INET6 ? OPENBSD_AF_INET6 : OPENBSD_AF_INET);
 246 #endif
 247
 248         if ((r = sshbuf_put_string(c->input, ptr, len)) != 0)
 249                 fatal("%s: buffer error: %s", __func__, ssh_err(r));
 250         return (0);
 251 }
 252
 253 u_char *
 254 sys_tun_outfilter(struct ssh *ssh, struct Channel *c,
 255     u_char **data, size_t *dlen)
 256 {
 257         u_char *buf;
 258         u_int32_t af;
 259         int r;
 260
 261         /* XXX new API is incompatible with this signature. */
 262         if ((r = sshbuf_get_string(c->output, data, dlen)) != 0)
 263                 fatal("%s: buffer error: %s", __func__, ssh_err(r));
 264         if (*dlen < sizeof(af))
 265                 return (NULL);
 266         buf = *data;
 267
 268 #if defined(SSH_TUN_PREPEND_AF)
 269         /* skip address family */
 270         *dlen -= sizeof(af);
 271         buf = *data + sizeof(af);
 272 #elif defined(SSH_TUN_COMPAT_AF)
 273         /* translate address family */
 274         af = (PEEK_U32(buf) == OPENBSD_AF_INET6) ? AF_INET6 : AF_INET;
 275         POKE_U32(buf, af);
 276 #endif
 277         return (buf);
 278 }
 279 #endif /* SSH_TUN_FILTER */