s3 async: Fix the build on systems that have ETIMEDOUT but not ETIME
[tprouty/samba.git] / source3 / lib / util_sock.c
index 7fe8ed82a21b82ecca5205c4bd060d396b14f844..c46aa2ac49b75c7b43f5fd66416473a894b2853f 100644 (file)
@@ -635,40 +635,105 @@ NTSTATUS read_data(int fd, char *buffer, size_t N)
 }
 
 /****************************************************************************
- Write data to a fd.
+ Write all data from an iov array
 ****************************************************************************/
 
-ssize_t write_data(int fd, const char *buffer, size_t N)
+ssize_t write_data_iov(int fd, const struct iovec *orig_iov, int iovcnt)
 {
-       size_t total=0;
-       ssize_t ret;
-       char addr[INET6_ADDRSTRLEN];
+       int i;
+       size_t to_send;
+       ssize_t thistime;
+       size_t sent;
+       struct iovec *iov_copy, *iov;
 
-       while (total < N) {
-               ret = sys_write(fd,buffer + total,N - total);
+       to_send = 0;
+       for (i=0; i<iovcnt; i++) {
+               to_send += orig_iov[i].iov_len;
+       }
 
-               if (ret == -1) {
-                       if (fd == get_client_fd()) {
-                               /* Try and give an error message saying
-                                * what client failed. */
-                               DEBUG(0,("write_data: write failure in "
-                                       "writing to client %s. Error %s\n",
-                                       get_peer_addr(fd,addr,sizeof(addr)),
-                                       strerror(errno) ));
-                       } else {
-                               DEBUG(0,("write_data: write failure. "
-                                       "Error = %s\n", strerror(errno) ));
+       thistime = sys_writev(fd, orig_iov, iovcnt);
+       if ((thistime <= 0) || (thistime == to_send)) {
+               return thistime;
+       }
+       sent = thistime;
+
+       /*
+        * We could not send everything in one call. Make a copy of iov that
+        * we can mess with. We keep a copy of the array start in iov_copy for
+        * the TALLOC_FREE, because we're going to modify iov later on,
+        * discarding elements.
+        */
+
+       iov_copy = (struct iovec *)TALLOC_MEMDUP(
+               talloc_tos(), orig_iov, sizeof(struct iovec) * iovcnt);
+
+       if (iov_copy == NULL) {
+               errno = ENOMEM;
+               return -1;
+       }
+       iov = iov_copy;
+
+       while (sent < to_send) {
+               /*
+                * We have to discard "thistime" bytes from the beginning
+                * iov array, "thistime" contains the number of bytes sent
+                * via writev last.
+                */
+               while (thistime > 0) {
+                       if (thistime < iov[0].iov_len) {
+                               char *new_base =
+                                       (char *)iov[0].iov_base + thistime;
+                               iov[0].iov_base = new_base;
+                               iov[0].iov_len -= thistime;
+                               break;
                        }
-                       return -1;
+                       thistime -= iov[0].iov_len;
+                       iov += 1;
+                       iovcnt -= 1;
                }
 
-               if (ret == 0) {
-                       return total;
+               thistime = sys_writev(fd, iov, iovcnt);
+               if (thistime <= 0) {
+                       break;
                }
+               sent += thistime;
+       }
 
-               total += ret;
+       TALLOC_FREE(iov_copy);
+       return sent;
+}
+
+/****************************************************************************
+ Write data to a fd.
+****************************************************************************/
+
+ssize_t write_data(int fd, const char *buffer, size_t N)
+{
+       ssize_t ret;
+       struct iovec iov;
+
+       iov.iov_base = CONST_DISCARD(char *, buffer);
+       iov.iov_len = N;
+
+       ret = write_data_iov(fd, &iov, 1);
+       if (ret >= 0) {
+               return ret;
        }
-       return (ssize_t)total;
+
+       if (fd == get_client_fd()) {
+               char addr[INET6_ADDRSTRLEN];
+               /*
+                * Try and give an error message saying what client failed.
+                */
+               DEBUG(0, ("write_data: write failure in writing to client %s. "
+                         "Error %s\n", get_peer_addr(fd,addr,sizeof(addr)),
+                         strerror(errno)));
+       } else {
+               DEBUG(0,("write_data: write failure. Error = %s\n",
+                        strerror(errno) ));
+       }
+
+       return -1;
 }
 
 /****************************************************************************
@@ -879,102 +944,310 @@ int open_socket_in(int type,
        return( res );
  }
 
+struct open_socket_out_state {
+       int fd;
+       struct event_context *ev;
+       struct sockaddr_storage ss;
+       socklen_t salen;
+       uint16_t port;
+       int wait_nsec;
+};
+
+static void open_socket_out_connected(struct async_req *subreq);
+
+static int open_socket_out_state_destructor(struct open_socket_out_state *s)
+{
+       if (s->fd != -1) {
+               close(s->fd);
+       }
+       return 0;
+}
+
 /****************************************************************************
  Create an outgoing socket. timeout is in milliseconds.
 **************************************************************************/
 
-int open_socket_out(int type,
-               const struct sockaddr_storage *pss,
-               uint16_t port,
-               int timeout)
+struct async_req *open_socket_out_send(TALLOC_CTX *mem_ctx,
+                                      struct event_context *ev,
+                                      const struct sockaddr_storage *pss,
+                                      uint16_t port,
+                                      int timeout)
 {
        char addr[INET6_ADDRSTRLEN];
-       struct sockaddr_storage sock_out = *pss;
-       int res,ret;
-       int connect_loop = 10;
-       int increment = 10;
+       struct async_req *result, *subreq;
+       struct open_socket_out_state *state;
+       NTSTATUS status;
 
-       /* create a socket to write to */
-       res = socket(pss->ss_family, type, 0);
-       if (res == -1) {
-                DEBUG(0,("socket error (%s)\n", strerror(errno)));
-               return -1;
+       if (!async_req_setup(mem_ctx, &result, &state,
+                            struct open_socket_out_state)) {
+               return NULL;
+       }
+       state->ev = ev;
+       state->ss = *pss;
+       state->port = port;
+       state->wait_nsec = 10000;
+       state->salen = -1;
+
+       state->fd = socket(state->ss.ss_family, SOCK_STREAM, 0);
+       if (state->fd == -1) {
+               status = map_nt_error_from_unix(errno);
+               goto post_status;
        }
+       talloc_set_destructor(state, open_socket_out_state_destructor);
 
-       if (type != SOCK_STREAM) {
-               return res;
+       if (!async_req_set_timeout(result, ev, timeval_set(0, timeout*1000))) {
+               goto fail;
        }
 
 #if defined(HAVE_IPV6)
        if (pss->ss_family == AF_INET6) {
-               struct sockaddr_in6 *psa6 = (struct sockaddr_in6 *)&sock_out;
+               struct sockaddr_in6 *psa6;
+               psa6 = (struct sockaddr_in6 *)&state->ss;
                psa6->sin6_port = htons(port);
-               if (psa6->sin6_scope_id == 0 &&
-                               IN6_IS_ADDR_LINKLOCAL(&psa6->sin6_addr)) {
-                       setup_linklocal_scope_id((struct sockaddr *)&sock_out);
+               if (psa6->sin6_scope_id == 0
+                   && IN6_IS_ADDR_LINKLOCAL(&psa6->sin6_addr)) {
+                       setup_linklocal_scope_id(
+                               (struct sockaddr *)&(state->ss));
                }
+               state->salen = sizeof(struct sockaddr_in6);
        }
 #endif
        if (pss->ss_family == AF_INET) {
-               struct sockaddr_in *psa = (struct sockaddr_in *)&sock_out;
+               struct sockaddr_in *psa;
+               psa = (struct sockaddr_in *)&state->ss;
                psa->sin_port = htons(port);
+               state->salen = sizeof(struct sockaddr_in);
+       }
+
+       print_sockaddr(addr, sizeof(addr), &state->ss);
+       DEBUG(3,("Connecting to %s at port %u\n", addr, (unsigned int)port));
+
+       subreq = async_connect_send(state, state->ev, state->fd,
+                                   (struct sockaddr *)&state->ss,
+                                   state->salen);
+       if ((subreq == NULL)
+           || !async_req_set_timeout(subreq, state->ev,
+                                     timeval_set(0, state->wait_nsec))) {
+               status = NT_STATUS_NO_MEMORY;
+               goto post_status;
        }
+       subreq->async.fn = open_socket_out_connected;
+       subreq->async.priv = result;
+       return result;
 
-       /* set it non-blocking */
-       set_blocking(res,false);
+ post_status:
+       if (!async_post_ntstatus(result, ev, status)) {
+               goto fail;
+       }
+       return result;
+ fail:
+       TALLOC_FREE(result);
+       return NULL;
+}
 
-       print_sockaddr(addr, sizeof(addr), &sock_out);
-       DEBUG(3,("Connecting to %s at port %u\n",
-                               addr,
-                               (unsigned int)port));
+static void open_socket_out_connected(struct async_req *subreq)
+{
+       struct async_req *req = talloc_get_type_abort(
+               subreq->async.priv, struct async_req);
+       struct open_socket_out_state *state = talloc_get_type_abort(
+               req->private_data, struct open_socket_out_state);
+       int err;
+       int sys_errno;
+
+       err = async_connect_recv(subreq, &sys_errno);
+       TALLOC_FREE(subreq);
+       if (err == 0) {
+               async_req_done(req);
+               return;
+       }
 
-       /* and connect it to the destination */
-  connect_again:
+       if (
+#ifdef ETIMEDOUT
+               (sys_errno == ETIMEDOUT) ||
+#endif
+               (sys_errno == EINPROGRESS) ||
+               (sys_errno == EALREADY) ||
+               (sys_errno == EAGAIN)) {
 
-       ret = sys_connect(res, (struct sockaddr *)&sock_out);
+               /*
+                * retry
+                */
 
-       /* Some systems return EAGAIN when they mean EINPROGRESS */
-       if (ret < 0 && (errno == EINPROGRESS || errno == EALREADY ||
-                       errno == EAGAIN) && (connect_loop < timeout) ) {
-               smb_msleep(connect_loop);
-               timeout -= connect_loop;
-               connect_loop += increment;
-               if (increment < 250) {
-                       /* After 8 rounds we end up at a max of 255 msec */
-                       increment *= 1.5;
+               if (state->wait_nsec < 250000) {
+                       state->wait_nsec *= 1.5;
                }
-               goto connect_again;
-       }
 
-       if (ret < 0 && (errno == EINPROGRESS || errno == EALREADY ||
-                       errno == EAGAIN)) {
-               DEBUG(1,("timeout connecting to %s:%u\n",
-                                       addr,
-                                       (unsigned int)port));
-               close(res);
-               return -1;
+               subreq = async_connect_send(state, state->ev, state->fd,
+                                           (struct sockaddr *)&state->ss,
+                                           state->salen);
+               if (async_req_nomem(subreq, req)) {
+                       return;
+               }
+               if (!async_req_set_timeout(subreq, state->ev,
+                                          timeval_set(0, state->wait_nsec))) {
+                       async_req_error(req, ENOMEM);
+                       return;
+               }
+               subreq->async.fn = open_socket_out_connected;
+               subreq->async.priv = req;
+               return;
        }
 
 #ifdef EISCONN
-       if (ret < 0 && errno == EISCONN) {
-               errno = 0;
-               ret = 0;
+       if (sys_errno == EISCONN) {
+               async_req_done(req);
+               return;
        }
 #endif
 
-       if (ret < 0) {
-               DEBUG(2,("error connecting to %s:%d (%s)\n",
-                               addr,
-                               (unsigned int)port,
-                               strerror(errno)));
-               close(res);
-               return -1;
+       /* real error */
+       async_req_error(req, sys_errno);
+}
+
+NTSTATUS open_socket_out_recv(struct async_req *req, int *pfd)
+{
+       struct open_socket_out_state *state = talloc_get_type_abort(
+               req->private_data, struct open_socket_out_state);
+       int err;
+
+       if (async_req_is_errno(req, &err)) {
+               return map_nt_error_from_unix(err);
+       }
+       *pfd = state->fd;
+       state->fd = -1;
+       return NT_STATUS_OK;
+}
+
+NTSTATUS open_socket_out(const struct sockaddr_storage *pss, uint16_t port,
+                        int timeout, int *pfd)
+{
+       TALLOC_CTX *frame = talloc_stackframe();
+       struct event_context *ev;
+       struct async_req *req;
+       NTSTATUS status = NT_STATUS_NO_MEMORY;
+
+       ev = event_context_init(frame);
+       if (ev == NULL) {
+               goto fail;
        }
 
-       /* set it blocking again */
-       set_blocking(res,true);
+       req = open_socket_out_send(frame, ev, pss, port, timeout);
+       if (req == NULL) {
+               goto fail;
+       }
+       while (req->state < ASYNC_REQ_DONE) {
+               event_loop_once(ev);
+       }
 
-       return res;
+       status = open_socket_out_recv(req, pfd);
+ fail:
+       TALLOC_FREE(frame);
+       return status;
+}
+
+struct open_socket_out_defer_state {
+       struct event_context *ev;
+       struct sockaddr_storage ss;
+       uint16_t port;
+       int timeout;
+       int fd;
+};
+
+static void open_socket_out_defer_waited(struct async_req *subreq);
+static void open_socket_out_defer_connected(struct async_req *subreq);
+
+struct async_req *open_socket_out_defer_send(TALLOC_CTX *mem_ctx,
+                                            struct event_context *ev,
+                                            struct timeval wait_time,
+                                            const struct sockaddr_storage *pss,
+                                            uint16_t port,
+                                            int timeout)
+{
+       struct async_req *result, *subreq;
+       struct open_socket_out_defer_state *state;
+       NTSTATUS status;
+
+       if (!async_req_setup(mem_ctx, &result, &state,
+                            struct open_socket_out_defer_state)) {
+               return NULL;
+       }
+       state->ev = ev;
+       state->ss = *pss;
+       state->port = port;
+       state->timeout = timeout;
+
+       subreq = async_wait_send(state, ev, wait_time);
+       if (subreq == NULL) {
+               status = NT_STATUS_NO_MEMORY;
+               goto post_status;
+       }
+       subreq->async.fn = open_socket_out_defer_waited;
+       subreq->async.priv = result;
+       return result;
+
+ post_status:
+       if (!async_post_ntstatus(result, ev, status)) {
+               goto fail;
+       }
+       return result;
+ fail:
+       TALLOC_FREE(result);
+       return NULL;
+}
+
+static void open_socket_out_defer_waited(struct async_req *subreq)
+{
+       struct async_req *req = talloc_get_type_abort(
+               subreq->async.priv, struct async_req);
+       struct open_socket_out_defer_state *state = talloc_get_type_abort(
+               req->private_data, struct open_socket_out_defer_state);
+       bool ret;
+
+       ret = async_wait_recv(subreq);
+       TALLOC_FREE(subreq);
+       if (!ret) {
+               async_req_nterror(req, NT_STATUS_INTERNAL_ERROR);
+               return;
+       }
+
+       subreq = open_socket_out_send(state, state->ev, &state->ss,
+                                     state->port, state->timeout);
+       if (async_req_nomem(subreq, req)) {
+               return;
+       }
+       subreq->async.fn = open_socket_out_defer_connected;
+       subreq->async.priv = req;
+}
+
+static void open_socket_out_defer_connected(struct async_req *subreq)
+{
+       struct async_req *req = talloc_get_type_abort(
+               subreq->async.priv, struct async_req);
+       struct open_socket_out_defer_state *state = talloc_get_type_abort(
+               req->private_data, struct open_socket_out_defer_state);
+       NTSTATUS status;
+
+       status = open_socket_out_recv(subreq, &state->fd);
+       TALLOC_FREE(subreq);
+       if (!NT_STATUS_IS_OK(status)) {
+               async_req_nterror(req, status);
+               return;
+       }
+       async_req_done(req);
+}
+
+NTSTATUS open_socket_out_defer_recv(struct async_req *req, int *pfd)
+{
+       struct open_socket_out_defer_state *state = talloc_get_type_abort(
+               req->private_data, struct open_socket_out_defer_state);
+       NTSTATUS status;
+
+       if (async_req_is_nterror(req, &status)) {
+               return status;
+       }
+       *pfd = state->fd;
+       state->fd = -1;
+       return NT_STATUS_OK;
 }
 
 /*******************************************************************
@@ -1607,6 +1880,7 @@ const char *get_mydnsfullname(void)
 bool is_myname_or_ipaddr(const char *s)
 {
        TALLOC_CTX *ctx = talloc_tos();
+       char addr[INET6_ADDRSTRLEN];
        char *name = NULL;
        const char *dnsname;
        char *servername = NULL;
@@ -1658,11 +1932,11 @@ bool is_myname_or_ipaddr(const char *s)
        if (!is_ipaddress(servername)) {
                /* Use DNS to resolve the name, but only the first address */
                struct sockaddr_storage ss;
-               if (interpret_string_addr(&ss, servername,0)) {
-                       print_sockaddr(name,
-                                       sizeof(name),
+               if (interpret_string_addr(&ss, servername, 0)) {
+                       print_sockaddr(addr,
+                                       sizeof(addr),
                                        &ss);
-                       servername = name;
+                       servername = addr;
                }
        }