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