Commit | Line | Data |
---|---|---|
0f78b815 | 1 | /* |
d5d4b282 | 2 | * Socket functions used in rsync. |
362099a5 | 3 | * |
0f78b815 WD |
4 | * Copyright (C) 1992-2001 Andrew Tridgell <tridge@samba.org> |
5 | * Copyright (C) 2001, 2002 Martin Pool <mbp@samba.org> | |
b3bf9b9d | 6 | * Copyright (C) 2003-2009 Wayne Davison |
0f78b815 WD |
7 | * |
8 | * This program is free software; you can redistribute it and/or modify | |
8e41b68e WD |
9 | * it under the terms of the GNU General Public License as published by |
10 | * the Free Software Foundation; either version 3 of the License, or | |
11 | * (at your option) any later version. | |
0f78b815 WD |
12 | * |
13 | * This program is distributed in the hope that it will be useful, | |
14 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
15 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
16 | * GNU General Public License for more details. | |
17 | * | |
e7c67065 | 18 | * You should have received a copy of the GNU General Public License along |
4fd842f9 | 19 | * with this program; if not, visit the http://fsf.org website. |
0f78b815 WD |
20 | */ |
21 | ||
22 | /* This file is now converted to use the new-style getaddrinfo() | |
362099a5 MP |
23 | * interface, which supports IPv6 but is also supported on recent |
24 | * IPv4-only machines. On systems that don't have that interface, we | |
0f78b815 | 25 | * emulate it using the KAME implementation. */ |
bc2e93eb | 26 | |
f0fca04e | 27 | #include "rsync.h" |
5dd14f0c | 28 | #include "itypes.h" |
5899b8cf WD |
29 | #include <netinet/in_systm.h> |
30 | #include <netinet/ip.h> | |
0f5c1c19 | 31 | #include <netinet/tcp.h> |
f0fca04e | 32 | |
2c7d63c7 | 33 | extern char *bind_address; |
1c3e6e8b | 34 | extern char *sockopts; |
2c7d63c7 | 35 | extern int default_af_hint; |
ba22c9e2 | 36 | extern int connect_timeout; |
9a5a8673 | 37 | |
44e604f4 | 38 | #ifdef HAVE_SIGACTION |
2b28968d WD |
39 | static struct sigaction sigact; |
40 | #endif | |
41 | ||
a7dc44d2 MP |
42 | /** |
43 | * Establish a proxy connection on an open socket to a web proxy by | |
a3a84107 WD |
44 | * using the CONNECT method. If proxy_user and proxy_pass are not NULL, |
45 | * they are used to authenticate to the proxy using the "Basic" | |
46 | * proxy-authorization protocol | |
a7dc44d2 | 47 | **/ |
a3a84107 WD |
48 | static int establish_proxy_connection(int fd, char *host, int port, |
49 | char *proxy_user, char *proxy_pass) | |
4c3b4b25 | 50 | { |
a3a84107 WD |
51 | char *cp, buffer[1024]; |
52 | char *authhdr, authbuf[1024]; | |
53 | int len; | |
54 | ||
55 | if (proxy_user && proxy_pass) { | |
893c4cc0 WD |
56 | stringjoin(buffer, sizeof buffer, |
57 | proxy_user, ":", proxy_pass, NULL); | |
a3a84107 | 58 | len = strlen(buffer); |
4c3b4b25 | 59 | |
8030b28f | 60 | if ((len*8 + 5) / 6 >= (int)sizeof authbuf - 3) { |
a3a84107 WD |
61 | rprintf(FERROR, |
62 | "authentication information is too long\n"); | |
63 | return -1; | |
64 | } | |
65 | ||
6854bf69 | 66 | base64_encode(buffer, len, authbuf, 1); |
a3a84107 WD |
67 | authhdr = "\r\nProxy-Authorization: Basic "; |
68 | } else { | |
69 | *authbuf = '\0'; | |
70 | authhdr = ""; | |
71 | } | |
72 | ||
73 | snprintf(buffer, sizeof buffer, "CONNECT %s:%d HTTP/1.0%s%s\r\n\r\n", | |
74 | host, port, authhdr, authbuf); | |
75 | len = strlen(buffer); | |
76 | if (write(fd, buffer, len) != len) { | |
d62bcc17 | 77 | rsyserr(FERROR, errno, "failed to write to proxy"); |
4c3b4b25 AT |
78 | return -1; |
79 | } | |
80 | ||
a3a84107 | 81 | for (cp = buffer; cp < &buffer[sizeof buffer - 1]; cp++) { |
4c3b4b25 | 82 | if (read(fd, cp, 1) != 1) { |
d62bcc17 | 83 | rsyserr(FERROR, errno, "failed to read from proxy"); |
4c3b4b25 AT |
84 | return -1; |
85 | } | |
86 | if (*cp == '\n') | |
87 | break; | |
88 | } | |
89 | ||
90 | if (*cp != '\n') | |
91 | cp++; | |
92 | *cp-- = '\0'; | |
93 | if (*cp == '\r') | |
94 | *cp = '\0'; | |
95 | if (strncmp(buffer, "HTTP/", 5) != 0) { | |
4ccfd96c | 96 | rprintf(FERROR, "bad response from proxy -- %s\n", |
4c3b4b25 AT |
97 | buffer); |
98 | return -1; | |
99 | } | |
2dc7b8bd | 100 | for (cp = &buffer[5]; isDigit(cp) || *cp == '.'; cp++) {} |
4c3b4b25 AT |
101 | while (*cp == ' ') |
102 | cp++; | |
103 | if (*cp != '2') { | |
4ccfd96c | 104 | rprintf(FERROR, "bad response from proxy -- %s\n", |
4c3b4b25 AT |
105 | buffer); |
106 | return -1; | |
107 | } | |
108 | /* throw away the rest of the HTTP header */ | |
109 | while (1) { | |
a3a84107 | 110 | for (cp = buffer; cp < &buffer[sizeof buffer - 1]; cp++) { |
4c3b4b25 | 111 | if (read(fd, cp, 1) != 1) { |
d62bcc17 WD |
112 | rsyserr(FERROR, errno, |
113 | "failed to read from proxy"); | |
4c3b4b25 AT |
114 | return -1; |
115 | } | |
116 | if (*cp == '\n') | |
117 | break; | |
118 | } | |
9c07d253 | 119 | if (cp > buffer && *cp == '\n') |
4c3b4b25 | 120 | cp--; |
9c07d253 | 121 | if (cp == buffer && (*cp == '\n' || *cp == '\r')) |
4c3b4b25 AT |
122 | break; |
123 | } | |
124 | return 0; | |
125 | } | |
126 | ||
127 | ||
f8be7d42 MP |
128 | /** |
129 | * Try to set the local address for a newly-created socket. Return -1 | |
130 | * if this fails. | |
131 | **/ | |
e028b9ff | 132 | int try_bind_local(int s, int ai_family, int ai_socktype, |
4313d6f9 | 133 | const char *bind_addr) |
f8be7d42 MP |
134 | { |
135 | int error; | |
136 | struct addrinfo bhints, *bres_all, *r; | |
137 | ||
a3a84107 | 138 | memset(&bhints, 0, sizeof bhints); |
f8be7d42 MP |
139 | bhints.ai_family = ai_family; |
140 | bhints.ai_socktype = ai_socktype; | |
141 | bhints.ai_flags = AI_PASSIVE; | |
4313d6f9 | 142 | if ((error = getaddrinfo(bind_addr, NULL, &bhints, &bres_all))) { |
f8be7d42 | 143 | rprintf(FERROR, RSYNC_NAME ": getaddrinfo %s: %s\n", |
4313d6f9 | 144 | bind_addr, gai_strerror(error)); |
f8be7d42 MP |
145 | return -1; |
146 | } | |
147 | ||
148 | for (r = bres_all; r; r = r->ai_next) { | |
9ec75284 | 149 | if (bind(s, r->ai_addr, r->ai_addrlen) == -1) |
f8be7d42 | 150 | continue; |
6b2d24de | 151 | freeaddrinfo(bres_all); |
f8be7d42 MP |
152 | return s; |
153 | } | |
154 | ||
155 | /* no error message; there might be some problem that allows | |
156 | * creation of the socket but not binding, perhaps if the | |
157 | * machine has no ipv6 address of this name. */ | |
6b2d24de | 158 | freeaddrinfo(bres_all); |
f8be7d42 MP |
159 | return -1; |
160 | } | |
161 | ||
ba22c9e2 WD |
162 | /* connect() timeout handler based on alarm() */ |
163 | static RETSIGTYPE contimeout_handler(UNUSED(int val)) | |
164 | { | |
165 | connect_timeout = -1; | |
166 | } | |
eecd22ff | 167 | |
d5d4b282 MP |
168 | /** |
169 | * Open a socket to a tcp remote host with the specified port . | |
06963d0f | 170 | * |
d5d4b282 MP |
171 | * Based on code from Warren. Proxy support by Stephen Rothwell. |
172 | * getaddrinfo() rewrite contributed by KAME.net. | |
06963d0f | 173 | * |
d5d4b282 MP |
174 | * Now that we support IPv6 we need to look up the remote machine's |
175 | * address first, using @p af_hint to set a preference for the type | |
176 | * of address. Then depending on whether it has v4 or v6 addresses we | |
177 | * try to open a connection. | |
06963d0f | 178 | * |
d5d4b282 MP |
179 | * The loop allows for machines with some addresses which may not be |
180 | * reachable, perhaps because we can't e.g. route ipv6 to that network | |
181 | * but we can get ip4 packets through. | |
182 | * | |
4313d6f9 | 183 | * @param bind_addr Local address to use. Normally NULL to bind |
d5d4b282 MP |
184 | * the wildcard address. |
185 | * | |
186 | * @param af_hint Address family, e.g. AF_INET or AF_INET6. | |
06963d0f | 187 | **/ |
4313d6f9 | 188 | int open_socket_out(char *host, int port, const char *bind_addr, |
d5d4b282 | 189 | int af_hint) |
bc2e93eb | 190 | { |
f0fca04e | 191 | int type = SOCK_STREAM; |
a3a84107 | 192 | int error, s; |
06963d0f MP |
193 | struct addrinfo hints, *res0, *res; |
194 | char portbuf[10]; | |
a3a84107 | 195 | char *h, *cp; |
4c3b4b25 AT |
196 | int proxied = 0; |
197 | char buffer[1024]; | |
a3a84107 | 198 | char *proxy_user = NULL, *proxy_pass = NULL; |
4c3b4b25 | 199 | |
660c6fbd | 200 | /* if we have a RSYNC_PROXY env variable then redirect our |
a3a84107 | 201 | * connetcion via a web proxy at the given address. */ |
4c3b4b25 | 202 | h = getenv("RSYNC_PROXY"); |
9c07d253 | 203 | proxied = h != NULL && *h != '\0'; |
4c3b4b25 AT |
204 | |
205 | if (proxied) { | |
a3a84107 WD |
206 | strlcpy(buffer, h, sizeof buffer); |
207 | ||
208 | /* Is the USER:PASS@ prefix present? */ | |
b31c92ed | 209 | if ((cp = strrchr(buffer, '@')) != NULL) { |
a3a84107 WD |
210 | *cp++ = '\0'; |
211 | /* The remainder is the HOST:PORT part. */ | |
212 | h = cp; | |
213 | ||
214 | if ((cp = strchr(buffer, ':')) == NULL) { | |
215 | rprintf(FERROR, | |
216 | "invalid proxy specification: should be USER:PASS@HOST:PORT\n"); | |
217 | return -1; | |
218 | } | |
219 | *cp++ = '\0'; | |
220 | ||
221 | proxy_user = buffer; | |
222 | proxy_pass = cp; | |
223 | } else { | |
224 | /* The whole buffer is the HOST:PORT part. */ | |
225 | h = buffer; | |
226 | } | |
227 | ||
228 | if ((cp = strchr(h, ':')) == NULL) { | |
660c6fbd MP |
229 | rprintf(FERROR, |
230 | "invalid proxy specification: should be HOST:PORT\n"); | |
4c3b4b25 AT |
231 | return -1; |
232 | } | |
233 | *cp++ = '\0'; | |
a3a84107 | 234 | strlcpy(portbuf, cp, sizeof portbuf); |
951e826b | 235 | if (DEBUG_GTE(CONNECT, 1)) { |
7bea78ce MP |
236 | rprintf(FINFO, "connection via http proxy %s port %s\n", |
237 | h, portbuf); | |
238 | } | |
4c3b4b25 | 239 | } else { |
a3a84107 | 240 | snprintf(portbuf, sizeof portbuf, "%d", port); |
4c3b4b25 | 241 | h = host; |
4c3b4b25 | 242 | } |
f0fca04e | 243 | |
a3a84107 | 244 | memset(&hints, 0, sizeof hints); |
d5d4b282 | 245 | hints.ai_family = af_hint; |
06963d0f MP |
246 | hints.ai_socktype = type; |
247 | error = getaddrinfo(h, portbuf, &hints, &res0); | |
248 | if (error) { | |
d5d4b282 MP |
249 | rprintf(FERROR, RSYNC_NAME ": getaddrinfo: %s %s: %s\n", |
250 | h, portbuf, gai_strerror(error)); | |
f0fca04e AT |
251 | return -1; |
252 | } | |
253 | ||
06963d0f | 254 | s = -1; |
2d6dbe29 MP |
255 | /* Try to connect to all addresses for this machine until we get |
256 | * through. It might e.g. be multi-homed, or have both IPv4 and IPv6 | |
257 | * addresses. We need to create a socket for each record, since the | |
258 | * address record tells us what protocol to use to try to connect. */ | |
06963d0f MP |
259 | for (res = res0; res; res = res->ai_next) { |
260 | s = socket(res->ai_family, res->ai_socktype, res->ai_protocol); | |
261 | if (s < 0) | |
262 | continue; | |
f0fca04e | 263 | |
4313d6f9 | 264 | if (bind_addr |
a3a84107 | 265 | && try_bind_local(s, res->ai_family, type, |
4313d6f9 | 266 | bind_addr) == -1) { |
a3a84107 WD |
267 | close(s); |
268 | s = -1; | |
269 | continue; | |
270 | } | |
ba22c9e2 WD |
271 | if (connect_timeout > 0) { |
272 | SIGACTION(SIGALRM, contimeout_handler); | |
273 | alarm(connect_timeout); | |
274 | } | |
275 | ||
1c3e6e8b | 276 | set_socket_options(s, sockopts); |
ba22c9e2 WD |
277 | while (connect(s, res->ai_addr, res->ai_addrlen) < 0) { |
278 | if (connect_timeout < 0) | |
279 | exit_cleanup(RERR_CONTIMEOUT); | |
280 | if (errno == EINTR) | |
281 | continue; | |
06963d0f MP |
282 | close(s); |
283 | s = -1; | |
ba22c9e2 | 284 | break; |
06963d0f | 285 | } |
ba22c9e2 WD |
286 | |
287 | if (connect_timeout > 0) | |
288 | alarm(0); | |
289 | ||
290 | if (s < 0) | |
291 | continue; | |
292 | ||
a3a84107 WD |
293 | if (proxied |
294 | && establish_proxy_connection(s, host, port, | |
295 | proxy_user, proxy_pass) != 0) { | |
06963d0f MP |
296 | close(s); |
297 | s = -1; | |
298 | continue; | |
a3a84107 WD |
299 | } |
300 | break; | |
4c3b4b25 | 301 | } |
06963d0f MP |
302 | freeaddrinfo(res0); |
303 | if (s < 0) { | |
d62bcc17 | 304 | rsyserr(FERROR, errno, "failed to connect to %s", h); |
f0fca04e AT |
305 | return -1; |
306 | } | |
06963d0f | 307 | return s; |
f0fca04e AT |
308 | } |
309 | ||
310 | ||
eecd22ff MP |
311 | /** |
312 | * Open an outgoing socket, but allow for it to be intercepted by | |
313 | * $RSYNC_CONNECT_PROG, which will execute a program across a TCP | |
314 | * socketpair rather than really opening a socket. | |
315 | * | |
316 | * We use this primarily in testing to detect TCP flow bugs, but not | |
317 | * cause security problems by really opening remote connections. | |
318 | * | |
319 | * This is based on the Samba LIBSMB_PROG feature. | |
06963d0f | 320 | * |
4313d6f9 | 321 | * @param bind_addr Local address to use. Normally NULL to get the stack default. |
eecd22ff | 322 | **/ |
4313d6f9 | 323 | int open_socket_out_wrapped(char *host, int port, const char *bind_addr, |
9c07d253 | 324 | int af_hint) |
eecd22ff | 325 | { |
df5cd107 | 326 | char *prog = getenv("RSYNC_CONNECT_PROG"); |
eecd22ff | 327 | |
4eff3051 | 328 | if (prog && strchr(prog, '%')) { |
e5f1a96f WD |
329 | int hlen = strlen(host); |
330 | int len = strlen(prog) + 1; | |
331 | char *f, *t; | |
332 | for (f = prog; *f; f++) { | |
333 | if (*f != '%') | |
334 | continue; | |
335 | /* Compute more than enough room. */ | |
336 | if (f[1] == '%') | |
337 | f++; | |
338 | else | |
339 | len += hlen; | |
340 | } | |
341 | f = prog; | |
342 | if (!(prog = new_array(char, len))) | |
343 | out_of_memory("open_socket_out_wrapped"); | |
344 | for (t = prog; *f; f++) { | |
345 | if (*f == '%') { | |
346 | switch (*++f) { | |
347 | case '%': | |
348 | /* Just skips the extra '%'. */ | |
349 | break; | |
350 | case 'H': | |
351 | memcpy(t, host, hlen); | |
352 | t += hlen; | |
353 | continue; | |
354 | default: | |
355 | f--; /* pass % through */ | |
356 | break; | |
357 | } | |
358 | } | |
359 | *t++ = *f; | |
360 | } | |
361 | *t = '\0'; | |
362 | } | |
363 | ||
951e826b | 364 | if (DEBUG_GTE(CONNECT, 1)) { |
df5cd107 WD |
365 | rprintf(FINFO, "%sopening tcp connection to %s port %d\n", |
366 | prog ? "Using RSYNC_CONNECT_PROG instead of " : "", | |
367 | host, port); | |
368 | } | |
369 | if (prog) | |
9c07d253 | 370 | return sock_exec(prog); |
4313d6f9 | 371 | return open_socket_out(host, port, bind_addr, af_hint); |
eecd22ff MP |
372 | } |
373 | ||
374 | ||
375 | ||
06963d0f | 376 | /** |
2c7d63c7 WD |
377 | * Open one or more sockets for incoming data using the specified type, |
378 | * port, and address. | |
06963d0f | 379 | * |
2c7d63c7 WD |
380 | * The getaddrinfo() call may return several address results, e.g. for |
381 | * the machine's IPv4 and IPv6 name. | |
9c07d253 | 382 | * |
2c7d63c7 WD |
383 | * We return an array of file-descriptors to the sockets, with a trailing |
384 | * -1 value to indicate the end of the list. | |
9c07d253 | 385 | * |
4313d6f9 | 386 | * @param bind_addr Local address to bind, or NULL to allow it to |
06963d0f MP |
387 | * default. |
388 | **/ | |
4313d6f9 | 389 | static int *open_socket_in(int type, int port, const char *bind_addr, |
b0fd253a | 390 | int af_hint) |
f0fca04e | 391 | { |
2c7d63c7 | 392 | int one = 1; |
5c6d4632 | 393 | int s, *socks, maxs, i, ecnt; |
13e29995 | 394 | struct addrinfo hints, *all_ai, *resp; |
5c6d4632 | 395 | char portbuf[10], **errmsgs; |
06963d0f MP |
396 | int error; |
397 | ||
a3a84107 | 398 | memset(&hints, 0, sizeof hints); |
d5d4b282 | 399 | hints.ai_family = af_hint; |
06963d0f MP |
400 | hints.ai_socktype = type; |
401 | hints.ai_flags = AI_PASSIVE; | |
a3a84107 | 402 | snprintf(portbuf, sizeof portbuf, "%d", port); |
4313d6f9 | 403 | error = getaddrinfo(bind_addr, portbuf, &hints, &all_ai); |
06963d0f | 404 | if (error) { |
7ef6aa64 | 405 | rprintf(FERROR, RSYNC_NAME ": getaddrinfo: bind address %s: %s\n", |
4313d6f9 | 406 | bind_addr, gai_strerror(error)); |
b0fd253a WD |
407 | return NULL; |
408 | } | |
409 | ||
410 | /* Count max number of sockets we might open. */ | |
411 | for (maxs = 0, resp = all_ai; resp; resp = resp->ai_next, maxs++) {} | |
2c7d63c7 | 412 | |
5c6d4632 WD |
413 | socks = new_array(int, maxs + 1); |
414 | errmsgs = new_array(char *, maxs); | |
415 | if (!socks || !errmsgs) | |
2c7d63c7 | 416 | out_of_memory("open_socket_in"); |
06963d0f | 417 | |
13e29995 MP |
418 | /* We may not be able to create the socket, if for example the |
419 | * machine knows about IPv6 in the C library, but not in the | |
420 | * kernel. */ | |
5c6d4632 | 421 | for (resp = all_ai, i = ecnt = 0; resp; resp = resp->ai_next) { |
13e29995 MP |
422 | s = socket(resp->ai_family, resp->ai_socktype, |
423 | resp->ai_protocol); | |
424 | ||
b0fd253a | 425 | if (s == -1) { |
5c6d4632 WD |
426 | int r = asprintf(&errmsgs[ecnt++], |
427 | "socket(%d,%d,%d) failed: %s\n", | |
428 | (int)resp->ai_family, (int)resp->ai_socktype, | |
429 | (int)resp->ai_protocol, strerror(errno)); | |
430 | if (r < 0) | |
431 | out_of_memory("open_socket_in"); | |
13e29995 MP |
432 | /* See if there's another address that will work... */ |
433 | continue; | |
b0fd253a | 434 | } |
9c07d253 | 435 | |
13e29995 MP |
436 | setsockopt(s, SOL_SOCKET, SO_REUSEADDR, |
437 | (char *)&one, sizeof one); | |
1c3e6e8b WD |
438 | if (sockopts) |
439 | set_socket_options(s, sockopts); | |
440 | else | |
441 | set_socket_options(s, lp_socket_options()); | |
9c07d253 | 442 | |
b0fd253a WD |
443 | #ifdef IPV6_V6ONLY |
444 | if (resp->ai_family == AF_INET6) { | |
dcd08dc5 WD |
445 | if (setsockopt(s, IPPROTO_IPV6, IPV6_V6ONLY, |
446 | (char *)&one, sizeof one) < 0 | |
447 | && default_af_hint != AF_INET6) { | |
448 | close(s); | |
449 | continue; | |
450 | } | |
b0fd253a WD |
451 | } |
452 | #endif | |
453 | ||
e028b9ff WD |
454 | /* Now we've got a socket - we need to bind it. */ |
455 | if (bind(s, resp->ai_addr, resp->ai_addrlen) < 0) { | |
13e29995 | 456 | /* Nope, try another */ |
5c6d4632 | 457 | int r = asprintf(&errmsgs[ecnt++], |
e2d774cd WD |
458 | "bind() failed: %s (address-family %d)\n", |
459 | strerror(errno), (int)resp->ai_family); | |
5c6d4632 WD |
460 | if (r < 0) |
461 | out_of_memory("open_socket_in"); | |
13e29995 MP |
462 | close(s); |
463 | continue; | |
b8771f96 | 464 | } |
e23d790f | 465 | |
2c7d63c7 | 466 | socks[i++] = s; |
f0fca04e | 467 | } |
2c7d63c7 | 468 | socks[i] = -1; |
f0fca04e | 469 | |
b0fd253a WD |
470 | if (all_ai) |
471 | freeaddrinfo(all_ai); | |
b8771f96 | 472 | |
5c6d4632 WD |
473 | /* Only output the socket()/bind() messages if we were totally |
474 | * unsuccessful, or if the daemon is being run with -vv. */ | |
475 | for (s = 0; s < ecnt; s++) { | |
951e826b | 476 | if (!i || DEBUG_GTE(BIND, 1)) |
332cf6df | 477 | rwrite(FLOG, errmsgs[s], strlen(errmsgs[s]), 0); |
5c6d4632 WD |
478 | free(errmsgs[s]); |
479 | } | |
480 | free(errmsgs); | |
481 | ||
2c7d63c7 | 482 | if (!i) { |
b0fd253a | 483 | rprintf(FERROR, |
2c7d63c7 WD |
484 | "unable to bind any inbound sockets on port %d\n", |
485 | port); | |
b0fd253a WD |
486 | free(socks); |
487 | return NULL; | |
488 | } | |
489 | return socks; | |
f0fca04e AT |
490 | } |
491 | ||
492 | ||
7c1b4daa MP |
493 | /* |
494 | * Determine if a file descriptor is in fact a socket | |
495 | */ | |
f0fca04e AT |
496 | int is_a_socket(int fd) |
497 | { | |
ac2a1a44 | 498 | int v; |
a3a84107 WD |
499 | socklen_t l = sizeof (int); |
500 | ||
501 | /* Parameters to getsockopt, setsockopt etc are very | |
502 | * unstandardized across platforms, so don't be surprised if | |
503 | * there are compiler warnings on e.g. SCO OpenSwerver or AIX. | |
504 | * It seems they all eventually get the right idea. | |
505 | * | |
506 | * Debian says: ``The fifth argument of getsockopt and | |
507 | * setsockopt is in reality an int [*] (and this is what BSD | |
508 | * 4.* and libc4 and libc5 have). Some POSIX confusion | |
509 | * resulted in the present socklen_t. The draft standard has | |
510 | * not been adopted yet, but glibc2 already follows it and | |
511 | * also has socklen_t [*]. See also accept(2).'' | |
512 | * | |
513 | * We now return to your regularly scheduled programming. */ | |
9c07d253 | 514 | return getsockopt(fd, SOL_SOCKET, SO_TYPE, (char *)&v, &l) == 0; |
f0fca04e AT |
515 | } |
516 | ||
517 | ||
067669da WD |
518 | static RETSIGTYPE sigchld_handler(UNUSED(int val)) |
519 | { | |
ca20c7fd WD |
520 | #ifdef WNOHANG |
521 | while (waitpid(-1, NULL, WNOHANG) > 0) {} | |
522 | #endif | |
44e604f4 | 523 | #ifndef HAVE_SIGACTION |
cb984e62 | 524 | signal(SIGCHLD, sigchld_handler); |
2b28968d | 525 | #endif |
ca20c7fd WD |
526 | } |
527 | ||
528 | ||
39993af5 | 529 | void start_accept_loop(int port, int (*fn)(int, int)) |
f0fca04e | 530 | { |
b0fd253a | 531 | fd_set deffds; |
d8d36af4 | 532 | int *sp, maxfd, i; |
f0fca04e | 533 | |
44e604f4 | 534 | #ifdef HAVE_SIGACTION |
2b28968d WD |
535 | sigact.sa_flags = SA_NOCLDSTOP; |
536 | #endif | |
537 | ||
f0fca04e | 538 | /* open an incoming socket */ |
b0fd253a WD |
539 | sp = open_socket_in(SOCK_STREAM, port, bind_address, default_af_hint); |
540 | if (sp == NULL) | |
65417579 | 541 | exit_cleanup(RERR_SOCKETIO); |
f0fca04e AT |
542 | |
543 | /* ready to listen */ | |
b0fd253a | 544 | FD_ZERO(&deffds); |
2c7d63c7 WD |
545 | for (i = 0, maxfd = -1; sp[i] >= 0; i++) { |
546 | if (listen(sp[i], 5) < 0) { | |
d62bcc17 | 547 | rsyserr(FERROR, errno, "listen() on socket failed"); |
4f5b0756 | 548 | #ifdef INET6 |
2c7d63c7 WD |
549 | if (errno == EADDRINUSE && i > 0) { |
550 | rprintf(FINFO, | |
880570f2 | 551 | "Try using --ipv4 or --ipv6 to avoid this listen() error.\n"); |
2c7d63c7 WD |
552 | } |
553 | #endif | |
b0fd253a WD |
554 | exit_cleanup(RERR_SOCKETIO); |
555 | } | |
556 | FD_SET(sp[i], &deffds); | |
557 | if (maxfd < sp[i]) | |
558 | maxfd = sp[i]; | |
f0fca04e AT |
559 | } |
560 | ||
f0fca04e | 561 | /* now accept incoming connections - forking a new process |
a3a84107 | 562 | * for each incoming connection */ |
f0fca04e AT |
563 | while (1) { |
564 | fd_set fds; | |
c4a5c57d | 565 | pid_t pid; |
f0fca04e | 566 | int fd; |
2d6dbe29 | 567 | struct sockaddr_storage addr; |
d54765c4 | 568 | socklen_t addrlen = sizeof addr; |
f0fca04e | 569 | |
15b84e14 | 570 | /* close log file before the potentially very long select so |
a3a84107 WD |
571 | * file can be trimmed by another process instead of growing |
572 | * forever */ | |
8ee6adef | 573 | logfile_close(); |
45a83540 | 574 | |
b0fd253a WD |
575 | #ifdef FD_COPY |
576 | FD_COPY(&deffds, &fds); | |
577 | #else | |
578 | fds = deffds; | |
579 | #endif | |
f0fca04e | 580 | |
bb499bd7 | 581 | if (select(maxfd + 1, &fds, NULL, NULL, NULL) < 1) |
9c07d253 | 582 | continue; |
f0fca04e | 583 | |
2c7d63c7 | 584 | for (i = 0, fd = -1; sp[i] >= 0; i++) { |
b0fd253a WD |
585 | if (FD_ISSET(sp[i], &fds)) { |
586 | fd = accept(sp[i], (struct sockaddr *)&addr, | |
587 | &addrlen); | |
588 | break; | |
589 | } | |
590 | } | |
f0fca04e | 591 | |
b0fd253a | 592 | if (fd < 0) |
9c07d253 | 593 | continue; |
f0fca04e | 594 | |
2b28968d | 595 | SIGACTION(SIGCHLD, sigchld_handler); |
31f440e6 | 596 | |
c4a5c57d | 597 | if ((pid = fork()) == 0) { |
9f639210 | 598 | int ret; |
2c7d63c7 WD |
599 | for (i = 0; sp[i] >= 0; i++) |
600 | close(sp[i]); | |
1da05366 | 601 | /* Re-open log file in child before possibly giving |
8ee6adef WD |
602 | * up privileges (see logfile_close() above). */ |
603 | logfile_reopen(); | |
9f639210 DD |
604 | ret = fn(fd, fd); |
605 | close_all(); | |
606 | _exit(ret); | |
c4a5c57d | 607 | } else if (pid < 0) { |
d62bcc17 WD |
608 | rsyserr(FERROR, errno, |
609 | "could not create child server process"); | |
c4a5c57d MP |
610 | close(fd); |
611 | /* This might have happened because we're | |
612 | * overloaded. Sleep briefly before trying to | |
613 | * accept again. */ | |
614 | sleep(2); | |
bd37c666 | 615 | } else { |
79845f28 | 616 | /* Parent doesn't need this fd anymore. */ |
bd37c666 | 617 | close(fd); |
f0fca04e | 618 | } |
f0fca04e | 619 | } |
f0fca04e AT |
620 | } |
621 | ||
622 | ||
623 | enum SOCK_OPT_TYPES {OPT_BOOL,OPT_INT,OPT_ON}; | |
624 | ||
625 | struct | |
626 | { | |
627 | char *name; | |
628 | int level; | |
629 | int option; | |
630 | int value; | |
631 | int opttype; | |
632 | } socket_options[] = { | |
633 | {"SO_KEEPALIVE", SOL_SOCKET, SO_KEEPALIVE, 0, OPT_BOOL}, | |
634 | {"SO_REUSEADDR", SOL_SOCKET, SO_REUSEADDR, 0, OPT_BOOL}, | |
635 | {"SO_BROADCAST", SOL_SOCKET, SO_BROADCAST, 0, OPT_BOOL}, | |
636 | #ifdef TCP_NODELAY | |
637 | {"TCP_NODELAY", IPPROTO_TCP, TCP_NODELAY, 0, OPT_BOOL}, | |
638 | #endif | |
639 | #ifdef IPTOS_LOWDELAY | |
640 | {"IPTOS_LOWDELAY", IPPROTO_IP, IP_TOS, IPTOS_LOWDELAY, OPT_ON}, | |
641 | #endif | |
642 | #ifdef IPTOS_THROUGHPUT | |
643 | {"IPTOS_THROUGHPUT", IPPROTO_IP, IP_TOS, IPTOS_THROUGHPUT, OPT_ON}, | |
644 | #endif | |
645 | #ifdef SO_SNDBUF | |
646 | {"SO_SNDBUF", SOL_SOCKET, SO_SNDBUF, 0, OPT_INT}, | |
647 | #endif | |
648 | #ifdef SO_RCVBUF | |
649 | {"SO_RCVBUF", SOL_SOCKET, SO_RCVBUF, 0, OPT_INT}, | |
650 | #endif | |
651 | #ifdef SO_SNDLOWAT | |
652 | {"SO_SNDLOWAT", SOL_SOCKET, SO_SNDLOWAT, 0, OPT_INT}, | |
653 | #endif | |
654 | #ifdef SO_RCVLOWAT | |
655 | {"SO_RCVLOWAT", SOL_SOCKET, SO_RCVLOWAT, 0, OPT_INT}, | |
656 | #endif | |
657 | #ifdef SO_SNDTIMEO | |
658 | {"SO_SNDTIMEO", SOL_SOCKET, SO_SNDTIMEO, 0, OPT_INT}, | |
659 | #endif | |
660 | #ifdef SO_RCVTIMEO | |
661 | {"SO_RCVTIMEO", SOL_SOCKET, SO_RCVTIMEO, 0, OPT_INT}, | |
662 | #endif | |
663 | {NULL,0,0,0,0}}; | |
664 | ||
9c07d253 | 665 | |
f0fca04e | 666 | |
a7dc44d2 MP |
667 | /** |
668 | * Set user socket options | |
669 | **/ | |
f0fca04e AT |
670 | void set_socket_options(int fd, char *options) |
671 | { | |
672 | char *tok; | |
9c07d253 WD |
673 | |
674 | if (!options || !*options) | |
675 | return; | |
a6801c39 | 676 | |
f0fca04e | 677 | options = strdup(options); |
f0fca04e | 678 | |
9c07d253 WD |
679 | if (!options) |
680 | out_of_memory("set_socket_options"); | |
681 | ||
682 | for (tok = strtok(options, " \t,"); tok; tok = strtok(NULL," \t,")) { | |
f0fca04e AT |
683 | int ret=0,i; |
684 | int value = 1; | |
685 | char *p; | |
686 | int got_value = 0; | |
687 | ||
688 | if ((p = strchr(tok,'='))) { | |
689 | *p = 0; | |
690 | value = atoi(p+1); | |
691 | got_value = 1; | |
692 | } | |
693 | ||
9c07d253 | 694 | for (i = 0; socket_options[i].name; i++) { |
f0fca04e AT |
695 | if (strcmp(socket_options[i].name,tok)==0) |
696 | break; | |
9c07d253 | 697 | } |
f0fca04e AT |
698 | |
699 | if (!socket_options[i].name) { | |
700 | rprintf(FERROR,"Unknown socket option %s\n",tok); | |
701 | continue; | |
702 | } | |
703 | ||
704 | switch (socket_options[i].opttype) { | |
705 | case OPT_BOOL: | |
706 | case OPT_INT: | |
707 | ret = setsockopt(fd,socket_options[i].level, | |
a3a84107 WD |
708 | socket_options[i].option, |
709 | (char *)&value, sizeof (int)); | |
f0fca04e | 710 | break; |
9c07d253 | 711 | |
f0fca04e AT |
712 | case OPT_ON: |
713 | if (got_value) | |
4ccfd96c | 714 | rprintf(FERROR,"syntax error -- %s does not take a value\n",tok); |
f0fca04e AT |
715 | |
716 | { | |
717 | int on = socket_options[i].value; | |
718 | ret = setsockopt(fd,socket_options[i].level, | |
a3a84107 WD |
719 | socket_options[i].option, |
720 | (char *)&on, sizeof (int)); | |
f0fca04e | 721 | } |
9c07d253 | 722 | break; |
f0fca04e | 723 | } |
9c07d253 | 724 | |
d62bcc17 WD |
725 | if (ret != 0) { |
726 | rsyserr(FERROR, errno, | |
727 | "failed to set socket option %s", tok); | |
728 | } | |
f0fca04e AT |
729 | } |
730 | ||
731 | free(options); | |
732 | } | |
733 | ||
eecd22ff | 734 | |
a7dc44d2 MP |
735 | /** |
736 | * This is like socketpair but uses tcp. It is used by the Samba | |
737 | * regression test code. | |
9c07d253 | 738 | * |
a7dc44d2 MP |
739 | * The function guarantees that nobody else can attach to the socket, |
740 | * or if they do that this function fails and the socket gets closed | |
741 | * returns 0 on success, -1 on failure the resulting file descriptors | |
742 | * are symmetrical. | |
743 | **/ | |
eecd22ff MP |
744 | static int socketpair_tcp(int fd[2]) |
745 | { | |
746 | int listener; | |
747 | struct sockaddr_in sock; | |
748 | struct sockaddr_in sock2; | |
a3a84107 | 749 | socklen_t socklen = sizeof sock; |
eb8ffa90 | 750 | int connect_done = 0; |
9c07d253 | 751 | |
eecd22ff MP |
752 | fd[0] = fd[1] = listener = -1; |
753 | ||
a3a84107 | 754 | memset(&sock, 0, sizeof sock); |
9c07d253 WD |
755 | |
756 | if ((listener = socket(PF_INET, SOCK_STREAM, 0)) == -1) | |
757 | goto failed; | |
eecd22ff | 758 | |
a3a84107 | 759 | memset(&sock2, 0, sizeof sock2); |
4f5b0756 | 760 | #ifdef HAVE_SOCKADDR_IN_LEN |
a3a84107 | 761 | sock2.sin_len = sizeof sock2; |
eecd22ff | 762 | #endif |
a3a84107 | 763 | sock2.sin_family = PF_INET; |
eecd22ff | 764 | |
a3a84107 | 765 | bind(listener, (struct sockaddr *)&sock2, sizeof sock2); |
eecd22ff | 766 | |
9c07d253 WD |
767 | if (listen(listener, 1) != 0) |
768 | goto failed; | |
eecd22ff | 769 | |
9c07d253 WD |
770 | if (getsockname(listener, (struct sockaddr *)&sock, &socklen) != 0) |
771 | goto failed; | |
eecd22ff | 772 | |
9c07d253 WD |
773 | if ((fd[1] = socket(PF_INET, SOCK_STREAM, 0)) == -1) |
774 | goto failed; | |
eecd22ff MP |
775 | |
776 | set_nonblocking(fd[1]); | |
777 | ||
778 | sock.sin_addr.s_addr = htonl(INADDR_LOOPBACK); | |
779 | ||
a3a84107 | 780 | if (connect(fd[1], (struct sockaddr *)&sock, sizeof sock) == -1) { |
9c07d253 WD |
781 | if (errno != EINPROGRESS) |
782 | goto failed; | |
783 | } else | |
eecd22ff | 784 | connect_done = 1; |
eecd22ff | 785 | |
9c07d253 WD |
786 | if ((fd[0] = accept(listener, (struct sockaddr *)&sock, &socklen)) == -1) |
787 | goto failed; | |
eecd22ff MP |
788 | |
789 | close(listener); | |
ab217f7f WD |
790 | listener = -1; |
791 | ||
792 | set_blocking(fd[1]); | |
793 | ||
eecd22ff | 794 | if (connect_done == 0) { |
a3a84107 | 795 | if (connect(fd[1], (struct sockaddr *)&sock, sizeof sock) != 0 |
9c07d253 WD |
796 | && errno != EISCONN) |
797 | goto failed; | |
eecd22ff MP |
798 | } |
799 | ||
eecd22ff MP |
800 | /* all OK! */ |
801 | return 0; | |
802 | ||
803 | failed: | |
9c07d253 WD |
804 | if (fd[0] != -1) |
805 | close(fd[0]); | |
806 | if (fd[1] != -1) | |
807 | close(fd[1]); | |
808 | if (listener != -1) | |
809 | close(listener); | |
eecd22ff MP |
810 | return -1; |
811 | } | |
812 | ||
813 | ||
d02984bb MP |
814 | |
815 | /** | |
816 | * Run a program on a local tcp socket, so that we can talk to it's | |
255810c0 MP |
817 | * stdin and stdout. This is used to fake a connection to a daemon |
818 | * for testing -- not for the normal case of running SSH. | |
d02984bb MP |
819 | * |
820 | * @return a socket which is attached to a subprocess running | |
821 | * "prog". stdin and stdout are attached. stderr is left attached to | |
822 | * the original stderr | |
823 | **/ | |
eecd22ff MP |
824 | int sock_exec(const char *prog) |
825 | { | |
94112924 | 826 | pid_t pid; |
eecd22ff | 827 | int fd[2]; |
9c07d253 | 828 | |
eecd22ff | 829 | if (socketpair_tcp(fd) != 0) { |
d62bcc17 | 830 | rsyserr(FERROR, errno, "socketpair_tcp failed"); |
eecd22ff MP |
831 | return -1; |
832 | } | |
951e826b | 833 | if (DEBUG_GTE(CMD, 1)) |
df5cd107 | 834 | rprintf(FINFO, "Running socket program: \"%s\"\n", prog); |
94112924 WD |
835 | |
836 | pid = fork(); | |
837 | if (pid < 0) { | |
838 | rsyserr(FERROR, errno, "fork"); | |
839 | exit_cleanup(RERR_IPC); | |
840 | } | |
841 | ||
842 | if (pid == 0) { | |
eecd22ff | 843 | close(fd[0]); |
94112924 WD |
844 | if (dup2(fd[1], STDIN_FILENO) < 0 |
845 | || dup2(fd[1], STDOUT_FILENO) < 0) { | |
846 | fprintf(stderr, "Failed to run \"%s\"\n", prog); | |
847 | exit(1); | |
848 | } | |
9c07d253 | 849 | exit(system(prog)); |
eecd22ff | 850 | } |
94112924 | 851 | |
9c07d253 | 852 | close(fd[1]); |
eecd22ff MP |
853 | return fd[0]; |
854 | } |