Call bind() with the right ai_addr/ai_addrlen info.
[rsync/rsync.git] / socket.c
index f299bc6..7298351 100644 (file)
--- a/socket.c
+++ b/socket.c
@@ -1,20 +1,20 @@
 /* -*- c-file-style: "linux" -*-
-   
+
    rsync -- fast file replication program
-   
+
    Copyright (C) 1992-2001 by Andrew Tridgell <tridge@samba.org>
    Copyright (C) 2001, 2002 by Martin Pool <mbp@samba.org>
-   
+
    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation; either version 2 of the License, or
    (at your option) any later version.
-   
+
    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.
-   
+
    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
@@ -22,7 +22,7 @@
 
 /**
  * @file socket.c
- * 
+ *
  * Socket functions used in rsync.
  *
  * This file is now converted to use the new-style getaddrinfo()
 
 #include "rsync.h"
 
-static const char default_name[] = "UNKNOWN";
 
-
-/* Establish a proxy connection on an open socket to a web roxy by
- * using the CONNECT method. */
+/**
+ * Establish a proxy connection on an open socket to a web proxy by
+ * using the HTTP CONNECT method.
+ **/
 static int establish_proxy_connection(int fd, char *host, int port)
 {
        char buffer[1024];
        char *cp;
 
        snprintf(buffer, sizeof(buffer), "CONNECT %s:%d HTTP/1.0\r\n\r\n", host, port);
-       if (write(fd, buffer, strlen(buffer)) != strlen(buffer)) {
+       if (write(fd, buffer, strlen(buffer)) != (int)strlen(buffer)) {
                rprintf(FERROR, "failed to write to proxy: %s\n",
                        strerror(errno));
                return -1;
        }
 
-       for (cp = buffer; cp < &buffer[sizeof(buffer) - 1]; cp++) {
+       for (cp = buffer; cp < &buffer[sizeof (buffer) - 1]; cp++) {
                if (read(fd, cp, 1) != 1) {
                        rprintf(FERROR, "failed to read from proxy: %s\n",
                                strerror(errno));
@@ -70,8 +70,7 @@ static int establish_proxy_connection(int fd, char *host, int port)
                        buffer);
                return -1;
        }
-       for (cp = &buffer[5]; isdigit(*cp) || (*cp == '.'); cp++)
-               ;
+       for (cp = &buffer[5]; isdigit(*(uchar*)cp) || *cp == '.'; cp++) {}
        while (*cp == ' ')
                cp++;
        if (*cp != '2') {
@@ -81,8 +80,7 @@ static int establish_proxy_connection(int fd, char *host, int port)
        }
        /* throw away the rest of the HTTP header */
        while (1) {
-               for (cp = buffer; cp < &buffer[sizeof(buffer) - 1];
-                    cp++) {
+               for (cp = buffer; cp < &buffer[sizeof (buffer) - 1]; cp++) {
                        if (read(fd, cp, 1) != 1) {
                                rprintf(FERROR, "failed to read from proxy: %s\n",
                                        strerror(errno));
@@ -91,9 +89,9 @@ static int establish_proxy_connection(int fd, char *host, int port)
                        if (*cp == '\n')
                                break;
                }
-               if ((cp > buffer) && (*cp == '\n'))
+               if (cp > buffer && *cp == '\n')
                        cp--;
-               if ((cp == buffer) && ((*cp == '\n') || (*cp == '\r')))
+               if (cp == buffer && (*cp == '\n' || *cp == '\r'))
                        break;
        }
        return 0;
@@ -104,8 +102,7 @@ static int establish_proxy_connection(int fd, char *host, int port)
  * Try to set the local address for a newly-created socket.  Return -1
  * if this fails.
  **/
-int try_bind_local(int s,
-                  int ai_family, int ai_socktype,
+int try_bind_local(int s, int ai_family, int ai_socktype,
                   const char *bind_address)
 {
        int error;
@@ -124,12 +121,14 @@ int try_bind_local(int s,
        for (r = bres_all; r; r = r->ai_next) {
                if (bind(s, r->ai_addr, r->ai_addrlen) == -1)
                        continue;
+               freeaddrinfo(bres_all);
                return s;
        }
 
        /* no error message; there might be some problem that allows
         * creation of the socket but not binding, perhaps if the
         * machine has no ipv6 address of this name. */
+       freeaddrinfo(bres_all);
        return -1;
 }
 
@@ -171,7 +170,7 @@ int open_socket_out(char *host, int port, const char *bind_address,
         * connetcion via a web proxy at the given address. The format
         * is hostname:port */
        h = getenv("RSYNC_PROXY");
-       proxied = (h != NULL) && (*h != '\0');
+       proxied = h != NULL && *h != '\0';
 
        if (proxied) {
                strlcpy(buffer, h, sizeof(buffer));
@@ -184,6 +183,10 @@ int open_socket_out(char *host, int port, const char *bind_address,
                *cp++ = '\0';
                strcpy(portbuf, cp);
                h = buffer;
+               if (verbose >= 2) {
+                       rprintf(FINFO, "connection via http proxy %s port %s\n",
+                               h, portbuf);
+               }
        } else {
                snprintf(portbuf, sizeof(portbuf), "%d", port);
                h = host;
@@ -252,18 +255,14 @@ int open_socket_out(char *host, int port, const char *bind_address,
  *
  * @param bind_address Local address to use.  Normally NULL to get the stack default.
  **/
-int open_socket_out_wrapped (char *host,
-                            int port,
-                            const char *bind_address,
-                            int af_hint)
+int open_socket_out_wrapped(char *host, int port, const char *bind_address,
+                           int af_hint)
 {
        char *prog;
 
-       if ((prog = getenv ("RSYNC_CONNECT_PROG")) != NULL) 
-               return sock_exec (prog);
-       else 
-               return open_socket_out (host, port, bind_address,
-                                       af_hint);
+       if ((prog = getenv("RSYNC_CONNECT_PROG")) != NULL)
+               return sock_exec(prog);
+       return open_socket_out(host, port, bind_address, af_hint);
 }
 
 
@@ -273,16 +272,16 @@ int open_socket_out_wrapped (char *host,
  *
  * Try to be better about handling the results of getaddrinfo(): when
  * opening an inbound socket, we might get several address results,
- * e.g. for the machine's ipv4 and ipv6 name.  
- * 
+ * e.g. for the machine's ipv4 and ipv6 name.
+ *
  * If binding a wildcard, then any one of them should do.  If an address
  * was specified but it's insufficiently specific then that's not our
- * fault.  
- * 
+ * fault.
+ *
  * However, some of the advertized addresses may not work because e.g. we
  * don't have IPv6 support in the kernel.  In that case go on and try all
  * addresses until one succeeds.
- * 
+ *
  * @param bind_address Local address to bind, or NULL to allow it to
  * default.
  **/
@@ -314,30 +313,31 @@ static int open_socket_in(int type, int port, const char *bind_address,
                s = socket(resp->ai_family, resp->ai_socktype,
                           resp->ai_protocol);
 
-               if (s == -1) 
+               if (s == -1)
                        /* See if there's another address that will work... */
                        continue;
-               
+
                setsockopt(s, SOL_SOCKET, SO_REUSEADDR,
                           (char *)&one, sizeof one);
-               
-               /* now we've got a socket - we need to bind it */
-               if (bind(s, all_ai->ai_addr, all_ai->ai_addrlen) < 0) {
+
+               /* Now we've got a socket - we need to bind it. */
+               if (bind(s, resp->ai_addr, resp->ai_addrlen) < 0) {
                        /* Nope, try another */
                        close(s);
                        continue;
                }
-               
+
+               freeaddrinfo(all_ai);
                return s;
        }
 
        rprintf(FERROR, RSYNC_NAME ": open inbound socket on port %d failed: "
                "%s\n",
-               port, 
+               port,
                strerror(errno));
 
        freeaddrinfo(all_ai);
-       return -1; 
+       return -1;
 }
 
 
@@ -363,11 +363,20 @@ int is_a_socket(int fd)
          * also has socklen_t [*]. See also accept(2).''
          *
          * We now return to your regularly scheduled programming.  */
-       return(getsockopt(fd, SOL_SOCKET, SO_TYPE, (char *)&v, &l) == 0);
+       return getsockopt(fd, SOL_SOCKET, SO_TYPE, (char *)&v, &l) == 0;
+}
+
+
+static RETSIGTYPE sigchld_handler(UNUSED(int val))
+{
+       signal(SIGCHLD, sigchld_handler);
+#ifdef WNOHANG
+       while (waitpid(-1, NULL, WNOHANG) > 0) {}
+#endif
 }
 
 
-void start_accept_loop(int port, int (*fn)(int ))
+void start_accept_loop(int port, int (*fn)(int, int))
 {
        int s;
        extern char *bind_address;
@@ -389,6 +398,7 @@ void start_accept_loop(int port, int (*fn)(int ))
           for each incoming connection */
        while (1) {
                fd_set fds;
+               pid_t pid;
                int fd;
                struct sockaddr_storage addr;
                socklen_t addrlen = sizeof addr;
@@ -401,34 +411,42 @@ void start_accept_loop(int port, int (*fn)(int ))
                FD_ZERO(&fds);
                FD_SET(s, &fds);
 
-               if (select(s+1, &fds, NULL, NULL, NULL) != 1) {
+               if (select(s+1, &fds, NULL, NULL, NULL) != 1)
                        continue;
-               }
 
-               if(!FD_ISSET(s, &fds)) continue;
+               if (!FD_ISSET(s, &fds))
+                       continue;
 
                fd = accept(s,(struct sockaddr *)&addr,&addrlen);
 
-               if (fd == -1) continue;
+               if (fd == -1)
+                       continue;
 
-               signal(SIGCHLD, SIG_IGN);
+               signal(SIGCHLD, sigchld_handler);
 
-               /* we shouldn't have any children left hanging around
-                  but I have had reports that on Digital Unix zombies
-                  are produced, so this ensures that they are reaped */
-#ifdef WNOHANG
-                while (waitpid(-1, NULL, WNOHANG) > 0);
-#endif
-
-               if (fork()==0) {
+               if ((pid = fork()) == 0) {
+                       int ret;
                        close(s);
                        /* open log file in child before possibly giving
                           up privileges  */
                        log_open();
-                       _exit(fn(fd));
+                       ret = fn(fd, fd);
+                       close_all();
+                       _exit(ret);
+               } else if (pid < 0) {
+                       rprintf(FERROR,
+                               RSYNC_NAME
+                               ": could not create child server process: %s\n",
+                               strerror(errno));
+                       close(fd);
+                       /* This might have happened because we're
+                        * overloaded.  Sleep briefly before trying to
+                        * accept again. */
+                       sleep(2);
+               } else {
+                       /* Parent doesn't need this fd anymore. */
+                       close(fd);
                }
-
-               close(fd);
        }
 }
 
@@ -475,21 +493,24 @@ struct
 #endif
   {NULL,0,0,0,0}};
 
-       
 
-/****************************************************************************
-set user socket options
-****************************************************************************/
+
+/**
+ * Set user socket options
+ **/
 void set_socket_options(int fd, char *options)
 {
        char *tok;
-       if (!options || !*options) return;
+
+       if (!options || !*options)
+               return;
 
        options = strdup(options);
-       
-       if (!options) out_of_memory("set_socket_options");
 
-       for (tok=strtok(options, " \t,"); tok; tok=strtok(NULL," \t,")) {
+       if (!options)
+               out_of_memory("set_socket_options");
+
+       for (tok = strtok(options, " \t,"); tok; tok = strtok(NULL," \t,")) {
                int ret=0,i;
                int value = 1;
                char *p;
@@ -501,9 +522,10 @@ void set_socket_options(int fd, char *options)
                        got_value = 1;
                }
 
-               for (i=0;socket_options[i].name;i++)
+               for (i = 0; socket_options[i].name; i++) {
                        if (strcmp(socket_options[i].name,tok)==0)
                                break;
+               }
 
                if (!socket_options[i].name) {
                        rprintf(FERROR,"Unknown socket option %s\n",tok);
@@ -516,7 +538,7 @@ void set_socket_options(int fd, char *options)
                        ret = setsockopt(fd,socket_options[i].level,
                                         socket_options[i].option,(char *)&value,sizeof(int));
                        break;
-                       
+
                case OPT_ON:
                        if (got_value)
                                rprintf(FERROR,"syntax error - %s does not take a value\n",tok);
@@ -526,9 +548,9 @@ void set_socket_options(int fd, char *options)
                                ret = setsockopt(fd,socket_options[i].level,
                                                 socket_options[i].option,(char *)&on,sizeof(int));
                        }
-                       break;    
+                       break;
                }
-               
+
                if (ret != 0)
                        rprintf(FERROR, "failed to set socket option %s: %s\n", tok,
                                strerror(errno));
@@ -537,9 +559,9 @@ void set_socket_options(int fd, char *options)
        free(options);
 }
 
-/****************************************************************************
-become a daemon, discarding the controlling terminal
-****************************************************************************/
+/**
+ * Become a daemon, discarding the controlling terminal
+ **/
 void become_daemon(void)
 {
        int i;
@@ -555,204 +577,29 @@ void become_daemon(void)
 #ifdef TIOCNOTTY
        i = open("/dev/tty", O_RDWR);
        if (i >= 0) {
-               ioctl(i, (int) TIOCNOTTY, (char *)0);      
+               ioctl(i, (int)TIOCNOTTY, (char *)0);
                close(i);
        }
 #endif /* TIOCNOTTY */
 #endif
        /* make sure that stdin, stdout an stderr don't stuff things
            up (library functions, for example) */
-       for (i=0;i<3;i++) {
-               close(i); 
+       for (i = 0; i < 3; i++) {
+               close(i);
                open("/dev/null", O_RDWR);
        }
 }
 
-/**
- * Return the IP addr of the client as a string 
- **/
-char *client_addr(int fd)
-{
-       struct sockaddr_storage ss;
-       socklen_t length = sizeof ss;
-       static char addr_buf[100];
-       static int initialised;
-
-       if (initialised) return addr_buf;
-
-       initialised = 1;
-
-       if (getpeername(fd, (struct sockaddr *)&ss, &length)) {
-               exit_cleanup(RERR_SOCKETIO);
-       }
-
-       getnameinfo((struct sockaddr *)&ss, length,
-               addr_buf, sizeof(addr_buf), NULL, 0, NI_NUMERICHOST);
-       return addr_buf;
-}
-
-
-static int get_sockaddr_family(const struct sockaddr_storage *ss)
-{
-       return ((struct sockaddr *) ss)->sa_family;
-}
-
 
 /**
- * Return the DNS name of the client.
+ * This is like socketpair but uses tcp. It is used by the Samba
+ * regression test code.
  *
- * The name is statically cached so that repeated lookups are quick,
- * so there is a limit of one lookup per customer.
- *
- * If anything goes wrong, including the name->addr->name check, then
- * we just use "UNKNOWN", so you can use that value in hosts allow
- * lines.
+ * The function guarantees that nobody else can attach to the socket,
+ * or if they do that this function fails and the socket gets closed
+ * returns 0 on success, -1 on failure the resulting file descriptors
+ * are symmetrical.
  **/
-char *client_name(int fd)
-{
-       struct sockaddr_storage ss;
-       socklen_t ss_len = sizeof ss;
-       static char name_buf[100];
-       static char port_buf[100];
-       static int initialised;
-
-       if (initialised) return name_buf;
-
-       strcpy(name_buf, default_name);
-       initialised = 1;
-
-       if (getpeername(fd, (struct sockaddr *)&ss, &ss_len)) {
-               /* FIXME: Can we really not continue? */
-               rprintf(FERROR, RSYNC_NAME ": getpeername on fd%d failed: %s\n",
-                       fd, strerror(errno));
-               exit_cleanup(RERR_SOCKETIO);
-       }
-
-       if (!lookup_name(fd, &ss, ss_len, name_buf, sizeof name_buf, port_buf, sizeof port_buf))
-               check_name(fd, &ss, ss_len, name_buf, port_buf);
-
-       return name_buf;
-}
-
-
-/**
- * Look up a name from @p ss into @p name_buf.
- **/
-int lookup_name(int fd, const struct sockaddr_storage *ss,
-               socklen_t ss_len,
-               char *name_buf, size_t name_buf_len,
-               char *port_buf, size_t port_buf_len)
-{
-       int name_err;
-       
-#ifdef INET6
-        if (get_sockaddr_family(ss) == AF_INET6 && 
-           IN6_IS_ADDR_V4MAPPED(&((struct sockaddr_in6 *)ss)->sin6_addr)) {
-               /* OK, so ss is in the IPv6 family, but it is really
-                * an IPv4 address: something like
-                * "::ffff:10.130.1.2".  If we use it as-is, then the
-                * reverse lookup might fail or perhaps something else
-                * bad might happen.  So instead we convert it to an
-                * equivalent address in the IPv4 address family.  */
-               struct sockaddr_in6 sin6;
-               struct sockaddr_in *sin;
-
-               memcpy(&sin6, ss, sizeof(sin6));
-               sin = (struct sockaddr_in *)ss;
-               memset(sin, 0, sizeof(*sin));
-               sin->sin_family = AF_INET;
-               ss_len = sizeof(struct sockaddr_in);
-#ifdef HAVE_SOCKADDR_LEN
-               sin->sin_len = ss_len;
-#endif
-               sin->sin_port = sin6.sin6_port;
-               /* FIXME: Isn't there a macro we can use here rather
-                * than grovelling through the struct?  It might be
-                * wrong on some systems. */
-               memcpy(&sin->sin_addr, &sin6.sin6_addr.s6_addr[12],
-                       sizeof(sin->sin_addr));
-        }
-#endif
-
-       /* reverse lookup */
-       name_err = getnameinfo((struct sockaddr *) ss, ss_len,
-                              name_buf, name_buf_len,
-                              port_buf, port_buf_len,
-                              NI_NAMEREQD | NI_NUMERICSERV);
-       if (name_err != 0) {
-               strcpy(name_buf, default_name);
-               rprintf(FERROR, RSYNC_NAME ": name lookup failed for %s: %s\n",
-                       client_addr(fd),
-                       gai_strerror(name_err));
-               return name_err;
-       }
-
-       return 0;
-}
-
-
-
-/* Do a forward lookup on name_buf and make sure it corresponds to ss
- * -- otherwise we may be being spoofed.  If we suspect we are, then
- * we don't abort the connection but just emit a warning. */
-int check_name(int fd,
-              const struct sockaddr_storage *ss,
-              socklen_t ss_len,
-              char *name_buf,
-              const char *port_buf)
-{
-       struct addrinfo hints, *res, *res0;
-       int error;
-
-       memset(&hints, 0, sizeof(hints));
-       hints.ai_family = PF_UNSPEC;
-       hints.ai_flags = AI_CANONNAME;
-       hints.ai_socktype = SOCK_STREAM;
-       error = getaddrinfo(name_buf, port_buf, &hints, &res0);
-       if (error) {
-               strcpy(name_buf, default_name);
-               rprintf(FERROR,
-                       RSYNC_NAME ": forward name lookup for %s:%s failed: %s\n",
-                       name_buf, port_buf,
-                       gai_strerror(error));
-               return error;
-       }
-
-
-       /* We expect that one of the results will be the same as ss. */
-       for (res = res0; res; res = res->ai_next) {
-               if (res->ai_family != get_sockaddr_family(ss))
-                       continue;
-               if (res->ai_addrlen != ss_len)
-                       continue;
-               if (memcmp(res->ai_addr, ss, res->ai_addrlen) == 0)
-                       break;
-       }
-
-       if (res == NULL) {
-               strcpy(name_buf, default_name);
-               /* We hit the end of the list without finding an
-                * address that was the same as ss. */
-               rprintf(FERROR, RSYNC_NAME
-                       ": no address record for \"%s\" corresponds to address %s: "
-                       "spoofed address?\n",
-                       name_buf,
-                       client_addr(fd));
-       }
-
-       freeaddrinfo(res0);
-       return 0;
-}
-
-
-/*******************************************************************
-this is like socketpair but uses tcp. It is used by the Samba
-regression test code
-The function guarantees that nobody else can attach to the socket,
-or if they do that this function fails and the socket gets closed
-returns 0 on success, -1 on failure
-the resulting file descriptors are symmetrical
- ******************************************************************/
 static int socketpair_tcp(int fd[2])
 {
        int listener;
@@ -760,54 +607,63 @@ static int socketpair_tcp(int fd[2])
        struct sockaddr_in sock2;
        socklen_t socklen = sizeof(sock);
        int connect_done = 0;
-       
+
        fd[0] = fd[1] = listener = -1;
 
        memset(&sock, 0, sizeof(sock));
-       
-       if ((listener = socket(PF_INET, SOCK_STREAM, 0)) == -1) goto failed;
+
+       if ((listener = socket(PF_INET, SOCK_STREAM, 0)) == -1)
+               goto failed;
 
         memset(&sock2, 0, sizeof(sock2));
-#ifdef HAVE_SOCK_SIN_LEN
+#ifdef HAVE_SOCKADDR_LEN
         sock2.sin_len = sizeof(sock2);
 #endif
         sock2.sin_family = PF_INET;
 
         bind(listener, (struct sockaddr *)&sock2, sizeof(sock2));
 
-       if (listen(listener, 1) != 0) goto failed;
+       if (listen(listener, 1) != 0)
+               goto failed;
 
-       if (getsockname(listener, (struct sockaddr *)&sock, &socklen) != 0) goto failed;
+       if (getsockname(listener, (struct sockaddr *)&sock, &socklen) != 0)
+               goto failed;
 
-       if ((fd[1] = socket(PF_INET, SOCK_STREAM, 0)) == -1) goto failed;
+       if ((fd[1] = socket(PF_INET, SOCK_STREAM, 0)) == -1)
+               goto failed;
 
        set_nonblocking(fd[1]);
 
        sock.sin_addr.s_addr = htonl(INADDR_LOOPBACK);
 
        if (connect(fd[1],(struct sockaddr *)&sock,sizeof(sock)) == -1) {
-               if (errno != EINPROGRESS) goto failed;
-       } else {
+               if (errno != EINPROGRESS)
+                       goto failed;
+       } else
                connect_done = 1;
-       }
 
-       if ((fd[0] = accept(listener, (struct sockaddr *)&sock, &socklen)) == -1) goto failed;
+       if ((fd[0] = accept(listener, (struct sockaddr *)&sock, &socklen)) == -1)
+               goto failed;
 
        close(listener);
        if (connect_done == 0) {
                if (connect(fd[1],(struct sockaddr *)&sock,sizeof(sock)) != 0
-                   && errno != EISCONN) goto failed;
+                   && errno != EISCONN)
+                       goto failed;
        }
 
-       set_blocking (fd[1]);
+       set_blocking(fd[1]);
 
        /* all OK! */
        return 0;
 
  failed:
-       if (fd[0] != -1) close(fd[0]);
-       if (fd[1] != -1) close(fd[1]);
-       if (listener != -1) close(listener);
+       if (fd[0] != -1)
+               close(fd[0]);
+       if (fd[1] != -1)
+               close(fd[1]);
+       if (listener != -1)
+               close(listener);
        return -1;
 }
 
@@ -825,11 +681,10 @@ static int socketpair_tcp(int fd[2])
 int sock_exec(const char *prog)
 {
        int fd[2];
-       
+
        if (socketpair_tcp(fd) != 0) {
-               rprintf (FERROR, RSYNC_NAME
-                        ": socketpair_tcp failed (%s)\n",
-                        strerror(errno));
+               rprintf(FERROR, RSYNC_NAME ": socketpair_tcp failed (%s)\n",
+                       strerror(errno));
                return -1;
        }
        if (fork() == 0) {
@@ -840,15 +695,12 @@ int sock_exec(const char *prog)
                dup(fd[1]);
                if (verbose > 3) {
                        /* Can't use rprintf because we've forked. */
-                       fprintf (stderr,
-                                RSYNC_NAME ": execute socket program \"%s\"\n",
-                                prog);
+                       fprintf(stderr,
+                               RSYNC_NAME ": execute socket program \"%s\"\n",
+                               prog);
                }
-               exit (system (prog));
+               exit(system(prog));
        }
-       close (fd[1]);
+       close(fd[1]);
        return fd[0];
 }
-
-
-