chiark - git - mdw - tripe/blob - server/tun-unet.c

   1 /* -*-c-*-
   2  *
   3  * Tunnel interface based on Linux Usernet
   4  *
   5  * (c) 2001 Straylight/Edgeware
   6  */
   7
   8 /*----- Licensing notice --------------------------------------------------*
   9  *
  10  * This file is part of Trivial IP Encryption (TrIPE).
  11  *
  12  * TrIPE is free software; you can redistribute it and/or modify
  13  * it under the terms of the GNU General Public License as published by
  14  * the Free Software Foundation; either version 2 of the License, or
  15  * (at your option) any later version.
  16  *
  17  * TrIPE is distributed in the hope that it will be useful,
  18  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  19  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20  * GNU General Public License for more details.
  21  *
  22  * You should have received a copy of the GNU General Public License
  23  * along with TrIPE; if not, write to the Free Software Foundation,
  24  * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  25  */
  26
  27 /*----- Header files ------------------------------------------------------*/
  28
  29 #define TUN_INTERNALS
  30
  31 #include "tripe.h"
  32
  33 #ifdef TUN_UNET
  34 #  include <sys/ioctl.h>
  35 #  include <net/if.h>
  36 #  include <unet.h>
  37 #endif
  38
  39 /*----- Main code ---------------------------------------------------------*/
  40
  41 #ifdef TUN_UNET
  42
  43 struct tunnel {
  44   const tunnel_ops *ops;                /* Pointer to operations */
  45   sel_file f;                           /* Selector for Usernet device */
  46   struct peer *p;                       /* Pointer to my peer */
  47 };
  48
  49 /* --- @t_read@ --- *
  50  *
  51  * Arguments:   @int fd@ = file descriptor to read
  52  *              @unsigned mode@ = what's happened
  53  *              @void *v@ = pointer to tunnel block
  54  *
  55  * Returns:     ---
  56  *
  57  * Use:         Reads data from the tunnel.
  58  */
  59
  60 static void t_read(int fd, unsigned mode, void *v)
  61 {
  62   tunnel *t = v;
  63   ssize_t n;
  64   buf b;
  65
  66   n = read(fd, buf_i, sizeof(buf_i));
  67   if (n < 0) {
  68     a_warn("TUN", "%s", p_ifname(t->p), "read-error", "?ERRNO", A_END);
  69     return;
  70   }
  71   IF_TRACING(T_TUNNEL, {
  72     trace(T_TUNNEL, "tun-unet: packet arrived");
  73     trace_block(T_PACKET, "tun-unet: packet contents", buf_i, n);
  74   })
  75   buf_init(&b, buf_i, n);
  76   p_tun(t->p, &b);
  77 }
  78
  79 /* --- @t_init@ --- *
  80  *
  81  * Arguments:   ---
  82  *
  83  * Returns:     ---
  84  *
  85  * Use:         Initializes the tunneling system.  Maybe this will require
  86  *              opening file descriptors or something.
  87  */
  88
  89 static void t_init(void) { return; }
  90
  91 /* --- @t_open@ --- *
  92  *
  93  * Arguments:   @char **ifn@ = where to put the interface name
  94  *
  95  * Returns:     A file descriptor, or @-1@ on failure.
  96  *
  97  * Use:         Opens a tunnel device.  This will run with root privileges
  98  *              even if the rest of the server has dropped them.
  99  */
 100
 101 static int t_open(char **ifn)
 102 {
 103   int fd;
 104   int f;
 105   struct unet_info uni;
 106
 107   if ((fd = open("/dev/unet", O_RDWR)) < 0) {
 108     a_warn("TUN", "-", "unet", "open-error", "/dev/unet", "?ERRNO", A_END);
 109     goto fail_0;
 110   }
 111   if ((f = ioctl(fd, UNIOCGIFFLAGS)) < 0 ||
 112       ioctl(fd, UNIOCSIFFLAGS, f | IFF_POINTOPOINT)) {
 113     a_warn("TUN", "-", "unet", "config-error", "?ERRNO", A_END);
 114     goto fail_1;
 115   }
 116   if (ioctl(t->f.fd, UNIOCGINFO, &uni)) {
 117     a_warn("TUN", "-", "unet", "getinfo-error", "?ERRNO", A_END);
 118     goto fail_1;
 119   }
 120   *ifn = xstrdup(uni.uni_ifname);
 121   return (fd);
 122
 123 fail_1:
 124   close(fd);
 125 fail_0:
 126   return (-1);
 127 }
 128
 129 /* --- @t_create@ --- *
 130  *
 131  * Arguments:   @peer *p@ = pointer to peer block
 132  *              @int fd@ = file descriptor of tunnel device
 133  *              @char **ifn@ = where to put the interface name
 134  *
 135  * Returns:     A tunnel block if it worked, or null on failure.
 136  *
 137  * Use:         Initializes a new tunnel.
 138  */
 139
 140 static tunnel *t_create(peer *p, int fd, char **ifn)
 141 {
 142   tunnel *t;
 143
 144   fdflags(fd, O_NONBLOCK, O_NONBLOCK, FD_CLOEXEC, FD_CLOEXEC);
 145   t = CREATE(tunnel);
 146   t->ops = &tun_unet;
 147   t->p = p;
 148   sel_initfile(&sel, &t->f, fd, SEL_READ, t_read, t);
 149   sel_addfile(&t->f);
 150   return (t);
 151 }
 152
 153 /* --- @t_inject@ --- *
 154  *
 155  * Arguments:   @tunnel *t@ = pointer to tunnel block
 156  *              @buf *b@ = buffer to send
 157  *
 158  * Returns:     ---
 159  *
 160  * Use:         Injects a packet into the local network stack.
 161  */
 162
 163 static void t_inject(tunnel *t, buf *b)
 164 {
 165   IF_TRACING(T_TUNNEL, {
 166     trace(T_TUNNEL, "tun-unet: inject decrypted packet");
 167     trace_block(T_PACKET, "tun-unet: packet contents", BBASE(b), BLEN(b));
 168   })
 169   write(t->f.fd, BBASE(b), BLEN(b));
 170 }
 171
 172 /* --- @t_destroy@ --- *
 173  *
 174  * Arguments:   @tunnel *t@ = pointer to tunnel block
 175  *
 176  * Returns:     ---
 177  *
 178  * Use:         Destroys a tunnel.
 179  */
 180
 181 static void t_destroy(tunnel *t)
 182   { sel_rmfile(&t->f); close(t->f.fd); DESTROY(t); }
 183
 184 const tunnel_ops tun_unet = {
 185   "unet",
 186   t_init,
 187   t_open,
 188   t_create,
 189   0,
 190   t_inject,
 191   t_destroy
 192 };
 193
 194 #endif
 195
 196 /*----- That's all, folks -------------------------------------------------*/