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