1 | /* |
1 | /* |
2 | vpn_tcp.C -- handle the tcp part of the protocol. |
2 | vpn_tcp.C -- handle the tcp part of the protocol. |
|
|
3 | Copyright (C) 2003-2007 Marc Lehmann <gvpe@schmorp.de> |
3 | |
4 | |
|
|
5 | This file is part of GVPE. |
|
|
6 | |
4 | This program is free software; you can redistribute it and/or modify |
7 | GVPE is free software; you can redistribute it and/or modify |
5 | it under the terms of the GNU General Public License as published by |
8 | it under the terms of the GNU General Public License as published by |
6 | the Free Software Foundation; either version 2 of the License, or |
9 | the Free Software Foundation; either version 2 of the License, or |
7 | (at your option) any later version. |
10 | (at your option) any later version. |
8 | |
11 | |
9 | This program is distributed in the hope that it will be useful, |
12 | This program is distributed in the hope that it will be useful, |
10 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
11 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
14 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
12 | GNU General Public License for more details. |
15 | GNU General Public License for more details. |
13 | |
16 | |
14 | You should have received a copy of the GNU General Public License |
17 | You should have received a copy of the GNU General Public License |
15 | along with this program; if not, write to the Free Software |
18 | along with gvpe; if not, write to the Free Software |
16 | Foundation, Inc. 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
19 | Foundation, Inc. 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
17 | */ |
20 | */ |
18 | |
21 | |
19 | #include "config.h" |
22 | #include "config.h" |
20 | |
23 | |
21 | #if ENABLE_TCP |
24 | #if ENABLE_TCP |
22 | |
25 | |
23 | // tcp processing is extremely ugly, since the vpe protocol is simply |
26 | // tcp processing is extremely ugly, since the gvpe protocol is simply |
24 | // designed for unreliable datagram networks. tcp is implemented by |
27 | // designed for unreliable datagram networks. tcp is implemented by |
25 | // multiplexing packets over tcp. errors are completely ignored, as we |
28 | // multiplexing packets over tcp. errors are completely ignored, as we |
26 | // rely on the higher level protocol to time out and reconnect. |
29 | // rely on the higher level layers to time out and reconnect. |
27 | |
30 | |
28 | #include <cstring> |
31 | #include <cstring> |
29 | |
32 | |
30 | #include <sys/types.h> |
33 | #include <sys/types.h> |
31 | #include <sys/socket.h> |
34 | #include <sys/socket.h> |
32 | #include <sys/poll.h> |
|
|
33 | #include <sys/wait.h> |
35 | #include <sys/wait.h> |
34 | #include <netinet/in.h> |
|
|
35 | #include <sys/uio.h> |
36 | #include <sys/uio.h> |
36 | #include <arpa/inet.h> |
|
|
37 | #include <errno.h> |
37 | #include <errno.h> |
38 | #include <time.h> |
38 | #include <time.h> |
39 | #include <unistd.h> |
39 | #include <unistd.h> |
|
|
40 | #include <fcntl.h> |
40 | |
41 | |
41 | #include <map> |
42 | #include <map> |
42 | #include <unistd.h> |
43 | |
43 | #include <fcntl.h> |
44 | #include "netcompat.h" |
44 | #include <sys/poll.h> |
|
|
45 | |
45 | |
46 | #include "vpn.h" |
46 | #include "vpn.h" |
47 | |
47 | |
48 | #if ENABLE_HTTP_PROXY |
48 | #if ENABLE_HTTP_PROXY |
49 | # include "conf.h" |
49 | # include "conf.h" |
… | |
… | |
57 | { |
57 | { |
58 | return *a < *b; |
58 | return *a < *b; |
59 | } |
59 | } |
60 | }; |
60 | }; |
61 | |
61 | |
62 | struct tcp_si_map : public map<const sockinfo *, tcp_connection *, lt_sockinfo> { |
62 | struct tcp_si_map : public map<const sockinfo *, tcp_connection *, lt_sockinfo> |
63 | void cleaner_cb (time_watcher &w); time_watcher cleaner; |
63 | { |
|
|
64 | inline void cleaner_cb (ev::timer &w, int revents); ev::timer cleaner; |
64 | |
65 | |
65 | tcp_si_map () |
66 | tcp_si_map () |
66 | : cleaner(this, &tcp_si_map::cleaner_cb) |
|
|
67 | { |
67 | { |
68 | cleaner.start (0); |
68 | ev_default_loop (0); |
|
|
69 | cleaner.set<tcp_si_map, &tcp_si_map::cleaner_cb> (this); |
|
|
70 | cleaner.start (::conf.keepalive / 2, ::conf.keepalive / 2); |
69 | } |
71 | } |
|
|
72 | |
70 | } tcp_si; |
73 | } tcp_si; |
71 | |
74 | |
72 | struct tcp_connection : io_watcher { |
75 | struct tcp_connection : ev::io |
|
|
76 | { |
|
|
77 | int tos; |
73 | tstamp last_activity; |
78 | tstamp last_activity; |
74 | const sockinfo si; |
79 | const sockinfo si; |
75 | vpn &v; |
80 | vpn &v; |
76 | bool active; // this connection has been actively established |
81 | bool active; // this connection has been actively established |
77 | enum { ERROR, IDLE, CONNECTING, CONNECTING_PROXY, ESTABLISHED } state; |
82 | enum { ERROR, IDLE, CONNECTING, CONNECTING_PROXY, ESTABLISHED } state; |
… | |
… | |
85 | #if ENABLE_HTTP_PROXY |
90 | #if ENABLE_HTTP_PROXY |
86 | char *proxy_req; |
91 | char *proxy_req; |
87 | int proxy_req_len; |
92 | int proxy_req_len; |
88 | #endif |
93 | #endif |
89 | |
94 | |
90 | void tcpv4_ev (io_watcher &w, short revents); |
95 | inline void tcpv4_ev (ev::io &w, int revents); |
91 | |
96 | |
92 | bool send_packet (vpn_packet *pkt, int tos); |
97 | bool send_packet (vpn_packet *pkt, int tos); |
93 | bool write_packet (); |
98 | bool write_packet (); |
94 | |
99 | |
95 | void error (); // abort conenction && cleanup |
100 | void error (); // abort conenction && cleanup |
96 | |
101 | |
97 | operator tcp_si_map::value_type() |
102 | operator tcp_si_map::value_type() |
98 | { |
103 | { |
99 | return tcp_si_map::value_type (&si, this); |
104 | return tcp_si_map::value_type (&si, this); |
100 | } |
105 | } |
101 | |
106 | |
102 | tcp_connection (int fd_, const sockinfo &si_, vpn &v_); |
107 | tcp_connection (int fd_, const sockinfo &si_, vpn &v_); |
103 | ~tcp_connection (); |
108 | ~tcp_connection (); |
104 | }; |
109 | }; |
105 | |
110 | |
106 | void tcp_si_map::cleaner_cb (time_watcher &w) |
111 | void tcp_si_map::cleaner_cb (ev::timer &w, int revents) |
107 | { |
112 | { |
108 | w.at = NOW + 600; |
|
|
109 | tstamp to = NOW - ::conf.keepalive - 30 - 60; |
113 | tstamp to = ev_now () - ::conf.keepalive - 30 - 60; |
110 | |
114 | |
111 | for (iterator i = begin (); i != end(); ) |
115 | for (iterator i = begin (); i != end(); ) |
112 | if (i->second->last_activity >= to) |
116 | if (i->second->last_activity >= to) |
113 | ++i; |
117 | ++i; |
114 | else |
118 | else |
115 | { |
119 | { |
|
|
120 | delete i->second; |
116 | erase (i); |
121 | erase (i); |
117 | i = begin (); |
122 | i = begin (); |
118 | } |
123 | } |
119 | } |
124 | } |
120 | |
125 | |
121 | void |
126 | void |
122 | vpn::tcpv4_ev (io_watcher &w, short revents) |
127 | vpn::tcpv4_ev (ev::io &w, int revents) |
123 | { |
128 | { |
124 | if (revents & (POLLIN | POLLERR)) |
129 | if (revents & EV_READ) |
125 | { |
130 | { |
126 | struct sockaddr_in sa; |
131 | struct sockaddr_in sa; |
127 | socklen_t sa_len = sizeof (sa); |
132 | socklen_t sa_len = sizeof (sa); |
128 | int len; |
133 | int len; |
129 | |
134 | |
130 | int fd = accept (w.fd, (sockaddr *)&sa, &sa_len); |
135 | int fd = accept (w.fd, (sockaddr *)&sa, &sa_len); |
131 | |
136 | |
132 | if (fd >= 0) |
137 | if (fd >= 0) |
133 | { |
138 | { |
|
|
139 | fcntl (fd, F_SETFL, O_NONBLOCK); |
|
|
140 | fcntl (fd, F_SETFD, FD_CLOEXEC); |
|
|
141 | |
134 | sockinfo si(sa, PROT_TCPv4); |
142 | sockinfo si(sa, PROT_TCPv4); |
135 | |
143 | |
136 | slog (L_DEBUG, _("%s: accepted tcp connection"), (const char *)si);//D |
144 | slog (L_DEBUG, _("%s: accepted tcp connection"), (const char *)si);//D |
137 | |
|
|
138 | fcntl (fd, F_SETFL, O_NONBLOCK); |
|
|
139 | |
145 | |
140 | tcp_connection *i = new tcp_connection (fd, si, *this); |
146 | tcp_connection *i = new tcp_connection (fd, si, *this); |
141 | tcp_si.insert (*i); |
147 | tcp_si.insert (*i); |
142 | } |
148 | } |
143 | } |
149 | } |
… | |
… | |
197 | return false; |
203 | return false; |
198 | } |
204 | } |
199 | } |
205 | } |
200 | |
206 | |
201 | void |
207 | void |
202 | tcp_connection::tcpv4_ev (io_watcher &w, short revents) |
208 | tcp_connection::tcpv4_ev (ev::io &w, int revents) |
203 | { |
209 | { |
204 | last_activity = NOW; |
210 | last_activity = ev_now (); |
205 | |
211 | |
206 | if (revents & (POLLERR | POLLHUP)) |
212 | if (revents & EV_WRITE) |
207 | { |
|
|
208 | error (); |
|
|
209 | return; |
|
|
210 | } |
|
|
211 | |
|
|
212 | if (revents & POLLOUT) |
|
|
213 | { |
213 | { |
214 | if (state == CONNECTING) |
214 | if (state == CONNECTING) |
215 | { |
215 | { |
216 | state = ESTABLISHED; |
216 | state = ESTABLISHED; |
217 | set (POLLIN); |
217 | set (EV_READ); |
218 | #if ENABLE_HTTP_PROXY |
218 | #if ENABLE_HTTP_PROXY |
219 | if (::conf.proxy_host && ::conf.proxy_port) |
219 | if (::conf.proxy_host && ::conf.proxy_port) |
220 | { |
220 | { |
221 | state = CONNECTING_PROXY; |
221 | state = CONNECTING_PROXY; |
|
|
222 | |
222 | write (fd, proxy_req, proxy_req_len); |
223 | if (write (fd, proxy_req, proxy_req_len) == 0) |
|
|
224 | { |
|
|
225 | error (); |
|
|
226 | return; |
|
|
227 | } |
|
|
228 | |
223 | free (proxy_req); proxy_req = 0; |
229 | free (proxy_req); proxy_req = 0; |
224 | } |
230 | } |
225 | #endif |
231 | #endif |
226 | } |
232 | } |
227 | else if (state == ESTABLISHED) |
233 | else if (state == ESTABLISHED) |
… | |
… | |
230 | { |
236 | { |
231 | if (write_packet ()) |
237 | if (write_packet ()) |
232 | { |
238 | { |
233 | delete w_pkt; w_pkt = 0; |
239 | delete w_pkt; w_pkt = 0; |
234 | |
240 | |
235 | set (POLLIN); |
241 | set (EV_READ); |
236 | } |
242 | } |
237 | } |
243 | } |
238 | else |
244 | else |
239 | set (POLLIN); |
245 | set (EV_READ); |
240 | } |
246 | } |
241 | else |
247 | else |
242 | set (POLLIN); |
248 | set (EV_READ); |
243 | } |
249 | } |
244 | |
250 | |
245 | if (revents & POLLIN) |
251 | if (revents & EV_READ) |
246 | { |
252 | { |
247 | if (state == ESTABLISHED) |
253 | if (state == ESTABLISHED) |
248 | for (;;) |
254 | for (;;) |
249 | { |
255 | { |
250 | if (!r_pkt) |
256 | if (!r_pkt) |
… | |
… | |
284 | break; |
290 | break; |
285 | } |
291 | } |
286 | else if (len < 0 && (errno == EINTR || errno == EAGAIN)) |
292 | else if (len < 0 && (errno == EINTR || errno == EAGAIN)) |
287 | break; |
293 | break; |
288 | |
294 | |
|
|
295 | // len == 0 <-> EOF |
289 | error (); |
296 | error (); |
290 | break; |
297 | break; |
291 | } |
298 | } |
292 | #if ENABLE_HTTP_PROXY |
299 | #if ENABLE_HTTP_PROXY |
293 | else if (state == CONNECTING_PROXY) |
300 | else if (state == CONNECTING_PROXY) |
… | |
… | |
343 | } |
350 | } |
344 | |
351 | |
345 | bool |
352 | bool |
346 | tcp_connection::send_packet (vpn_packet *pkt, int tos) |
353 | tcp_connection::send_packet (vpn_packet *pkt, int tos) |
347 | { |
354 | { |
348 | last_activity = NOW; |
355 | last_activity = ev_now (); |
349 | |
356 | |
350 | if (state == IDLE) |
357 | if (state == IDLE) |
351 | { |
358 | { |
352 | // woaw, the first lost packet ;) |
359 | // woaw, the first lost packet ;) |
353 | fd = socket (PF_INET, SOCK_STREAM, IPPROTO_TCP); |
360 | fd = socket (PF_INET, SOCK_STREAM, IPPROTO_TCP); |
… | |
… | |
387 | fcntl (fd, F_SETFL, O_NONBLOCK); |
394 | fcntl (fd, F_SETFL, O_NONBLOCK); |
388 | |
395 | |
389 | if (connect (fd, csi->sav4 (), csi->salenv4 ()) >= 0 |
396 | if (connect (fd, csi->sav4 (), csi->salenv4 ()) >= 0 |
390 | || errno == EINPROGRESS) |
397 | || errno == EINPROGRESS) |
391 | { |
398 | { |
|
|
399 | fcntl (fd, F_SETFL, O_NONBLOCK); |
|
|
400 | fcntl (fd, F_SETFD, FD_CLOEXEC); |
|
|
401 | |
392 | state = CONNECTING; |
402 | state = CONNECTING; |
393 | start (fd, POLLOUT); |
403 | start (fd, EV_WRITE); |
394 | } |
404 | } |
395 | else |
405 | else |
396 | close (fd); |
406 | close (fd); |
397 | } |
407 | } |
398 | } |
408 | } |
… | |
… | |
403 | if (!w_pkt) |
413 | if (!w_pkt) |
404 | { |
414 | { |
405 | // how this maps to the underlying tcp packets we don't know |
415 | // how this maps to the underlying tcp packets we don't know |
406 | // and we don't care. at least we tried ;) |
416 | // and we don't care. at least we tried ;) |
407 | #if defined(SOL_IP) && defined(IP_TOS) |
417 | #if defined(SOL_IP) && defined(IP_TOS) |
|
|
418 | if (tos != this->tos) |
|
|
419 | { |
|
|
420 | this->tos = tos; |
408 | setsockopt (fd, SOL_IP, IP_TOS, &tos, sizeof tos); |
421 | setsockopt (fd, SOL_IP, IP_TOS, &tos, sizeof tos); |
|
|
422 | } |
409 | #endif |
423 | #endif |
410 | |
424 | |
411 | w_pkt = pkt; |
425 | w_pkt = pkt; |
412 | w_ofs = 0; |
426 | w_ofs = 0; |
413 | w_len = pkt->len + 2; // length + size header |
427 | w_len = pkt->len + 2; // length + size header |
… | |
… | |
417 | else |
431 | else |
418 | { |
432 | { |
419 | w_pkt = new vpn_packet; |
433 | w_pkt = new vpn_packet; |
420 | w_pkt->set (*pkt); |
434 | w_pkt->set (*pkt); |
421 | |
435 | |
422 | set (POLLIN | POLLOUT); |
436 | set (EV_READ | EV_WRITE); |
423 | } |
437 | } |
424 | } |
438 | } |
425 | } |
439 | } |
426 | |
440 | |
427 | return state != ERROR; |
441 | return state != ERROR; |
428 | } |
442 | } |
429 | |
443 | |
430 | void tcp_connection::error () |
444 | void tcp_connection::error () |
431 | { |
445 | { |
|
|
446 | stop (); |
|
|
447 | |
432 | if (fd >= 0) |
448 | if (fd >= 0) |
433 | { |
449 | { |
434 | close (fd); |
450 | close (fd); |
|
|
451 | tos = -1; |
435 | fd = -1; |
452 | fd = -1; |
436 | } |
453 | } |
437 | |
454 | |
438 | delete r_pkt; r_pkt = 0; |
455 | delete r_pkt; r_pkt = 0; |
439 | delete w_pkt; w_pkt = 0; |
456 | delete w_pkt; w_pkt = 0; |
440 | #if ENABLE_HTTP_PROXY |
457 | #if ENABLE_HTTP_PROXY |
441 | free (proxy_req); proxy_req = 0; |
458 | free (proxy_req); proxy_req = 0; |
442 | #endif |
459 | #endif |
443 | |
460 | |
444 | stop (); |
|
|
445 | state = active ? IDLE : ERROR; |
461 | state = active ? IDLE : ERROR; |
446 | } |
462 | } |
447 | |
463 | |
448 | tcp_connection::tcp_connection (int fd_, const sockinfo &si_, vpn &v_) |
464 | tcp_connection::tcp_connection (int fd_, const sockinfo &si_, vpn &v_) |
449 | : v(v_), si(si_), io_watcher(this, &tcp_connection::tcpv4_ev) |
465 | : v(v_), si(si_) |
450 | { |
466 | { |
|
|
467 | set<tcp_connection, &tcp_connection::tcpv4_ev> (this); |
|
|
468 | |
451 | last_activity = NOW; |
469 | last_activity = ev_now (); |
452 | r_pkt = 0; |
470 | r_pkt = 0; |
453 | w_pkt = 0; |
471 | w_pkt = 0; |
|
|
472 | tos = -1; |
454 | fd = fd_; |
473 | fd = fd_; |
455 | #if ENABLE_HTTP_PROXY |
474 | #if ENABLE_HTTP_PROXY |
456 | proxy_req = 0; |
475 | proxy_req = 0; |
457 | #endif |
476 | #endif |
458 | |
477 | |
… | |
… | |
463 | } |
482 | } |
464 | else |
483 | else |
465 | { |
484 | { |
466 | active = false; |
485 | active = false; |
467 | state = ESTABLISHED; |
486 | state = ESTABLISHED; |
468 | start (fd, POLLIN); |
487 | start (fd, EV_READ); |
469 | } |
488 | } |
470 | } |
489 | } |
471 | |
490 | |
472 | tcp_connection::~tcp_connection () |
491 | tcp_connection::~tcp_connection () |
473 | { |
492 | { |