200b5d9325a65fecf3c9d1a831b533ee10079bb2
[tripe] / server / tun-bsd.c
1 /* -*-c-*-
2 *
3 * Tunnel interface for 4.4BSD-derived systems
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 /*----- Main code ---------------------------------------------------------*/
34
35 #ifdef TUN_BSD
36
37 struct tunnel {
38 const tunnel_ops *ops; /* Pointer to operations */
39 sel_file f; /* Selector for tunnel device */
40 struct peer *p; /* Pointer to my peer */
41 };
42
43 /* --- @t_read@ --- *
44 *
45 * Arguments: @int fd@ = file descriptor to read
46 * @unsigned mode@ = what's happened
47 * @void *v@ = pointer to tunnel block
48 *
49 * Returns: ---
50 *
51 * Use: Reads data from the tunnel.
52 */
53
54 static void t_read(int fd, unsigned mode, void *v)
55 {
56 tunnel *t = v;
57 ssize_t n;
58 buf b;
59
60 n = read(fd, buf_i, sizeof(buf_i));
61 if (n < 0) {
62 a_warn("TUN", "%s", p_ifname(t->p), "read-error", "?ERRNO", A_END);
63 return;
64 }
65 IF_TRACING(T_TUNNEL, {
66 trace(T_TUNNEL, "tun-bsd: packet arrived");
67 trace_block(T_PACKET, "tun-bsd: packet contents", buf_i, n);
68 })
69 buf_init(&b, buf_i, n);
70 p_tun(t->p, &b);
71 }
72
73 /* --- @t_init@ --- *
74 *
75 * Arguments: ---
76 *
77 * Returns: ---
78 *
79 * Use: Initializes the tunneling system. Maybe this will require
80 * opening file descriptors or something.
81 */
82
83 static void t_init(void) { return; }
84
85 /* --- @t_open@ --- *
86 *
87 * Arguments: @char **ifn@ = where to put the interface name
88 *
89 * Returns: A file descriptor, or @-1@ on failure.
90 *
91 * Use: Opens a tunnel device. This will run with root privileges
92 * even if the rest of the server has dropped them.
93 */
94
95 static int t_open(char **ifn)
96 {
97 int fd;
98 unsigned n;
99 char buf[16];
100
101 n = 0;
102 for (;;) {
103 sprintf(buf, "/dev/tun%u", n);
104 if ((fd = open(buf, O_RDWR)) >= 0)
105 break;
106 switch (errno) {
107 case EBUSY:
108 T( trace(T_TUNNEL, "tunnel device %u busy: skipping", n); )
109 break;
110 case ENOENT:
111 a_warn("TUN", "-", "bsd", "no-tunnel-devices", A_END);
112 return (-1);
113 default:
114 a_warn("TUN", "-", "open-error", "%s", buf, "?ERRNO", A_END);
115 break;
116 }
117 n++;
118 }
119 return (fd);
120 }
121
122 /* --- @t_create@ --- *
123 *
124 * Arguments: @peer *p@ = pointer to peer block
125 * @int fd@ = file descriptor of tunnel device
126 * @char **ifn@ = where to put the interface name
127 *
128 * Returns: A tunnel block if it worked, or null on failure.
129 *
130 * Use: Initializes a new tunnel.
131 */
132
133 static tunnel *t_create(peer *p, int fd, char **ifn)
134 {
135 tunnel *t;
136
137 fdflags(fd, O_NONBLOCK, O_NONBLOCK, FD_CLOEXEC, FD_CLOEXEC);
138 t = CREATE(tunnel);
139 t->ops = &tun_bsd;
140 t->p = p;
141 sel_initfile(&sel, &t->f, fd, SEL_READ, t_read, t);
142 sel_addfile(&t->f);
143 return (t);
144 }
145
146 /* --- @t_inject@ --- *
147 *
148 * Arguments: @tunnel *t@ = pointer to tunnel block
149 * @buf *b@ = buffer to send
150 *
151 * Returns: ---
152 *
153 * Use: Injects a packet into the local network stack.
154 */
155
156 static void t_inject(tunnel *t, buf *b)
157 {
158 IF_TRACING(T_TUNNEL, {
159 trace(T_TUNNEL, "tun-bsd: inject decrypted packet");
160 trace_block(T_PACKET, "tun-bsd: packet contents", BBASE(b), BLEN(b));
161 })
162 write(t->f.fd, BBASE(b), BLEN(b));
163 }
164
165 /* --- @t_destroy@ --- *
166 *
167 * Arguments: @tunnel *t@ = pointer to tunnel block
168 *
169 * Returns: ---
170 *
171 * Use: Destroys a tunnel.
172 */
173
174 static void t_destroy(tunnel *t)
175 { sel_rmfile(&t->f); close(t->f.fd); DESTROY(t); }
176
177 const tunnel_ops tun_bsd = {
178 "bsd",
179 t_init,
180 t_open,
181 t_create,
182 0,
183 t_inject,
184 t_destroy
185 };
186
187 #endif
188
189 /*----- That's all, folks -------------------------------------------------*/