Fix spelling s/openened/opened/
[samba.git] / source3 / rpc_server / rpc_server.c
index 2a0f67549799e0c753a44fd8cc7929b20512c0a7..2864495c24ea11b5e9bac39fc6eeea47422f6964 100644 (file)
@@ -22,6 +22,7 @@
 #include "includes.h"
 #include "rpc_server/rpc_pipes.h"
 #include "rpc_server/rpc_server.h"
+#include "rpc_server/rpc_config.h"
 #include "rpc_dce.h"
 #include "librpc/gen_ndr/netlogon.h"
 #include "librpc/gen_ndr/auth.h"
 #include "rpc_server/srv_pipe_hnd.h"
 #include "rpc_server/srv_pipe.h"
 
-#define SERVER_TCP_LOW_PORT  1024
-#define SERVER_TCP_HIGH_PORT 1300
-
-static NTSTATUS auth_anonymous_session_info(TALLOC_CTX *mem_ctx,
-                                           struct auth_session_info **session_info)
-{
-       NTSTATUS status;
-
-       status = make_session_info_guest(mem_ctx, session_info);
-       if (!NT_STATUS_IS_OK(status)) {
-               return status;
-       }
-
-       return NT_STATUS_OK;
-}
-
 /* Creates a pipes_struct and initializes it with the information
  * sent from the client */
-static int make_server_pipes_struct(TALLOC_CTX *mem_ctx,
-                                   struct messaging_context *msg_ctx,
-                                   const char *pipe_name,
-                                   enum dcerpc_transport_t transport,
-                                   bool ncalrpc_as_system,
-                                   const struct tsocket_address *local_address,
-                                   const struct tsocket_address *remote_address,
-                                   struct auth_session_info *session_info,
-                                   struct pipes_struct **_p,
-                                   int *perrno)
+int make_server_pipes_struct(TALLOC_CTX *mem_ctx,
+                            struct messaging_context *msg_ctx,
+                            const char *pipe_name,
+                            enum dcerpc_transport_t transport,
+                            const struct tsocket_address *remote_address,
+                            const struct tsocket_address *local_address,
+                            struct auth_session_info *session_info,
+                            struct pipes_struct **_p,
+                            int *perrno)
 {
        struct pipes_struct *p;
-       NTSTATUS status;
        int ret;
 
        ret = make_base_pipes_struct(mem_ctx, msg_ctx, pipe_name,
                                     transport, RPC_LITTLE_ENDIAN,
-                                    ncalrpc_as_system,
                                     remote_address, local_address, &p);
        if (ret) {
                *perrno = ret;
                return -1;
        }
-       p->msg_ctx = msg_ctx;
 
        if (session_info->unix_token && session_info->unix_info && session_info->security_token) {
                /* Don't call create_local_token(), we already have the full details here */
                p->session_info = talloc_steal(p, session_info);
 
        } else {
-               struct auth_user_info_dc *auth_user_info_dc;
-               struct auth_serversupplied_info *server_info;
-               struct netr_SamInfo3 *info3;
-
-               /* Fake up an auth_user_info_dc for now, to make an info3, to make the session_info structure */
-               auth_user_info_dc = talloc_zero(p, struct auth_user_info_dc);
-               if (!auth_user_info_dc) {
-                       TALLOC_FREE(p);
-                       *perrno = ENOMEM;
-                       return -1;
-               }
-
-               auth_user_info_dc->num_sids = session_info->security_token->num_sids;
-               auth_user_info_dc->sids = session_info->security_token->sids;
-               auth_user_info_dc->info = session_info->info;
-               auth_user_info_dc->user_session_key = session_info->session_key;
-
-               /* This creates the input structure that make_server_info_info3 is looking for */
-               status = auth_convert_user_info_dc_saminfo3(p, auth_user_info_dc,
-                                                           &info3);
-
-               if (!NT_STATUS_IS_OK(status)) {
-                       DEBUG(1, ("Failed to convert auth_user_info_dc into netr_SamInfo3\n"));
-                       TALLOC_FREE(p);
-                       *perrno = EINVAL;
-                       return -1;
-               }
-
-               status = make_server_info_info3(p,
-                                               info3->base.account_name.string,
-                                               info3->base.domain.string,
-                                               &server_info, info3);
-               if (!NT_STATUS_IS_OK(status)) {
-                       DEBUG(1, ("Failed to init server info\n"));
-                       TALLOC_FREE(p);
-                       *perrno = EINVAL;
-                       return -1;
-               }
-
-               /*
-                * Some internal functions need a local token to determine access to
-                * resources.
-                */
-               status = create_local_token(p, server_info, &session_info->session_key, &p->session_info);
-               talloc_free(server_info);
-               if (!NT_STATUS_IS_OK(status)) {
-                       DEBUG(1, ("Failed to init local auth token\n"));
-                       TALLOC_FREE(p);
-                       *perrno = EINVAL;
-                       return -1;
-               }
+               DEBUG(0, ("Supplied session_info in make_server_pipes_struct was incomplete!"));
+               *perrno = EINVAL;
+               return -1;
        }
 
        *_p = p;
@@ -160,61 +93,82 @@ static void named_pipe_listener(struct tevent_context *ev,
                                uint16_t flags,
                                void *private_data);
 
-bool setup_named_pipe_socket(const char *pipe_name,
-                            struct tevent_context *ev_ctx,
-                            struct messaging_context *msg_ctx)
+int create_named_pipe_socket(const char *pipe_name)
 {
-       struct dcerpc_ncacn_listen_state *state;
-       struct tevent_fd *fde;
-       char *np_dir;
-
-       state = talloc(ev_ctx, struct dcerpc_ncacn_listen_state);
-       if (!state) {
-               DEBUG(0, ("Out of memory\n"));
-               return false;
-       }
-       state->ep.name = talloc_strdup(state, pipe_name);
-       if (state->ep.name == NULL) {
-               DEBUG(0, ("Out of memory\n"));
-               goto out;
-       }
-       state->fd = -1;
-
-       state->ev_ctx = ev_ctx;
-       state->msg_ctx = msg_ctx;
+       char *np_dir = NULL;
+       int fd = -1;
 
        /*
         * As lp_ncalrpc_dir() should have 0755, but
         * lp_ncalrpc_dir()/np should have 0700, we need to
         * create lp_ncalrpc_dir() first.
         */
-       if (!directory_create_or_exist(lp_ncalrpc_dir(), geteuid(), 0755)) {
+       if (!directory_create_or_exist(lp_ncalrpc_dir(), 0755)) {
                DEBUG(0, ("Failed to create pipe directory %s - %s\n",
                          lp_ncalrpc_dir(), strerror(errno)));
                goto out;
        }
 
-       np_dir = talloc_asprintf(state, "%s/np", lp_ncalrpc_dir());
+       np_dir = talloc_asprintf(talloc_tos(), "%s/np", lp_ncalrpc_dir());
        if (!np_dir) {
                DEBUG(0, ("Out of memory\n"));
                goto out;
        }
 
-       if (!directory_create_or_exist(np_dir, geteuid(), 0700)) {
+       if (!directory_create_or_exist_strict(np_dir, geteuid(), 0700)) {
                DEBUG(0, ("Failed to create pipe directory %s - %s\n",
                          np_dir, strerror(errno)));
                goto out;
        }
 
-       state->fd = create_pipe_sock(np_dir, pipe_name, 0700);
-       if (state->fd == -1) {
+       fd = create_pipe_sock(np_dir, pipe_name, 0700);
+       if (fd == -1) {
                DEBUG(0, ("Failed to create pipe socket! [%s/%s]\n",
                          np_dir, pipe_name));
                goto out;
        }
+
+       DEBUG(10, ("Opened pipe socket fd %d for %s\n", fd, pipe_name));
+
+out:
        talloc_free(np_dir);
+       return fd;
+}
+
+bool setup_named_pipe_socket(const char *pipe_name,
+                            struct tevent_context *ev_ctx,
+                            struct messaging_context *msg_ctx)
+{
+       struct dcerpc_ncacn_listen_state *state;
+       struct tevent_fd *fde;
+       int rc;
 
-       DEBUG(10, ("Openened pipe socket fd %d for %s\n",
+       state = talloc(ev_ctx, struct dcerpc_ncacn_listen_state);
+       if (!state) {
+               DEBUG(0, ("Out of memory\n"));
+               return false;
+       }
+       state->ep.name = talloc_strdup(state, pipe_name);
+       if (state->ep.name == NULL) {
+               DEBUG(0, ("Out of memory\n"));
+               goto out;
+       }
+       state->fd = create_named_pipe_socket(pipe_name);
+       if (state->fd == -1) {
+               goto out;
+       }
+
+       rc = listen(state->fd, 5);
+       if (rc < 0) {
+               DEBUG(0, ("Failed to listen on pipe socket %s: %s\n",
+                         pipe_name, strerror(errno)));
+               goto out;
+       }
+
+       state->ev_ctx = ev_ctx;
+       state->msg_ctx = msg_ctx;
+
+       DEBUG(10, ("Opened pipe socket fd %d for %s\n",
                   state->fd, pipe_name));
 
        fde = tevent_add_fd(ev_ctx,
@@ -236,11 +190,6 @@ out:
        return false;
 }
 
-static void named_pipe_accept_function(struct tevent_context *ev_ctx,
-                                      struct messaging_context *msg_ctx,
-                                      const char *pipe_name,
-                                      int fd);
-
 static void named_pipe_listener(struct tevent_context *ev,
                                struct tevent_fd *fde,
                                uint16_t flags,
@@ -267,13 +216,14 @@ static void named_pipe_listener(struct tevent_context *ev,
                }
                return;
        }
+       smb_set_close_on_exec(sd);
 
        DEBUG(6, ("Accepted socket %d\n", sd));
 
        named_pipe_accept_function(state->ev_ctx,
                                   state->msg_ctx,
                                   state->ep.name,
-                                  sd);
+                                  sd, NULL, 0);
 }
 
 
@@ -281,46 +231,66 @@ static void named_pipe_listener(struct tevent_context *ev,
  * Accepts connections from clients and process requests using the appropriate
  * dispatcher table. */
 
-struct named_pipe_client {
-       const char *pipe_name;
-
-       struct tevent_context *ev;
-       struct messaging_context *msg_ctx;
-
-       uint16_t file_type;
-       uint16_t device_state;
-       uint64_t allocation_size;
+static int named_pipe_destructor(struct named_pipe_client *npc)
+{
+       if (npc->term_fn) {
+               npc->term_fn(npc->private_data);
+       }
+       return 0;
+}
 
-       struct tstream_context *tstream;
+struct named_pipe_client *named_pipe_client_init(TALLOC_CTX *mem_ctx,
+                                                struct tevent_context *ev_ctx,
+                                                struct messaging_context *msg_ctx,
+                                                const char *pipe_name,
+                                                named_pipe_termination_fn *term_fn,
+                                                uint16_t file_type,
+                                                uint16_t device_state,
+                                                uint64_t allocation_size,
+                                                void *private_data)
+{
+       struct named_pipe_client *npc;
 
-       struct tsocket_address *client;
-       char *client_name;
-       struct tsocket_address *server;
-       char *server_name;
+       npc = talloc_zero(mem_ctx, struct named_pipe_client);
+       if (npc == NULL) {
+               DEBUG(0, ("Out of memory!\n"));
+               return NULL;
+       }
+       talloc_set_destructor(npc, named_pipe_destructor);
 
-       struct auth_session_info *session_info;
+       npc->pipe_name = talloc_strdup(npc, pipe_name);
+       if (npc->pipe_name == NULL) {
+               DEBUG(0, ("Out of memory!\n"));
+               talloc_free(npc);
+               return NULL;
+       }
 
-       struct pipes_struct *p;
+       npc->ev = ev_ctx;
+       npc->msg_ctx = msg_ctx;
+       npc->term_fn = term_fn;
+       npc->private_data = private_data;
 
-       struct tevent_queue *write_queue;
+       npc->file_type = file_type;
+       npc->device_state = device_state;
+       npc->allocation_size = allocation_size;
 
-       struct iovec *iov;
-       size_t count;
-};
+       return npc;
+}
 
 static void named_pipe_accept_done(struct tevent_req *subreq);
 
-static void named_pipe_accept_function(struct tevent_context *ev_ctx,
-                                      struct messaging_context *msg_ctx,
-                                      const char *pipe_name,
-                                      int fd)
+void named_pipe_accept_function(struct tevent_context *ev_ctx,
+                               struct messaging_context *msg_ctx,
+                               const char *pipe_name, int fd,
+                               named_pipe_termination_fn *term_fn,
+                               void *private_data)
 {
        struct named_pipe_client *npc;
        struct tstream_context *plain;
        struct tevent_req *subreq;
        int ret;
 
-       npc = talloc_zero(NULL, struct named_pipe_client);
+       npc = talloc_zero(ev_ctx, struct named_pipe_client);
        if (!npc) {
                DEBUG(0, ("Out of memory!\n"));
                close(fd);
@@ -336,6 +306,10 @@ static void named_pipe_accept_function(struct tevent_context *ev_ctx,
        }
        npc->ev = ev_ctx;
        npc->msg_ctx = msg_ctx;
+       npc->term_fn = term_fn;
+       npc->private_data = private_data;
+
+       talloc_set_destructor(npc, named_pipe_destructor);
 
        /* make sure socket is in NON blocking state */
        ret = set_blocking(fd, false);
@@ -371,7 +345,6 @@ static void named_pipe_accept_function(struct tevent_context *ev_ctx,
        tevent_req_set_callback(subreq, named_pipe_accept_done, npc);
 }
 
-static void named_pipe_packet_process(struct tevent_req *subreq);
 static void named_pipe_packet_done(struct tevent_req *subreq);
 
 static void named_pipe_accept_done(struct tevent_req *subreq)
@@ -384,10 +357,10 @@ static void named_pipe_accept_done(struct tevent_req *subreq)
 
        ret = tstream_npa_accept_existing_recv(subreq, &error, npc,
                                                &npc->tstream,
-                                               &npc->client,
-                                               &npc->client_name,
-                                               &npc->server,
-                                               &npc->server_name,
+                                               &npc->remote_client_addr,
+                                               &npc->remote_client_name,
+                                               &npc->local_server_addr,
+                                               &npc->local_server_name,
                                                &session_info_transport);
 
        npc->session_info = talloc_move(npc, &session_info_transport->session_info);
@@ -403,8 +376,10 @@ static void named_pipe_accept_done(struct tevent_req *subreq)
        ret = make_server_pipes_struct(npc,
                                       npc->msg_ctx,
                                       npc->pipe_name, NCACN_NP,
-                                       false, npc->server, npc->client, npc->session_info,
-                                       &npc->p, &error);
+                                      npc->remote_client_addr,
+                                      npc->local_server_addr,
+                                      npc->session_info,
+                                      &npc->p, &error);
        if (ret != 0) {
                DEBUG(2, ("Failed to create pipes_struct! (%s)\n",
                          strerror(error)));
@@ -428,13 +403,13 @@ static void named_pipe_accept_done(struct tevent_req *subreq)
 
 fail:
        DEBUG(2, ("Fatal error. Terminating client(%s) connection!\n",
-                 npc->client_name));
+                 npc->remote_client_name));
        /* terminate client connection */
        talloc_free(npc);
        return;
 }
 
-static void named_pipe_packet_process(struct tevent_req *subreq)
+void named_pipe_packet_process(struct tevent_req *subreq)
 {
        struct named_pipe_client *npc =
                tevent_req_callback_data(subreq, struct named_pipe_client);
@@ -442,10 +417,8 @@ static void named_pipe_packet_process(struct tevent_req *subreq)
        DATA_BLOB recv_buffer = data_blob_null;
        struct ncacn_packet *pkt;
        NTSTATUS status;
-       ssize_t data_left;
-       ssize_t data_used;
-       char *data;
        uint32_t to_send;
+       size_t i;
        bool ok;
 
        status = dcerpc_read_ncacn_packet_recv(subreq, npc, &pkt, &recv_buffer);
@@ -454,23 +427,20 @@ static void named_pipe_packet_process(struct tevent_req *subreq)
                goto fail;
        }
 
-       data_left = recv_buffer.length;
-       data = (char *)recv_buffer.data;
-
-       while (data_left) {
-
-               data_used = process_incoming_data(npc->p, data, data_left);
-               if (data_used < 0) {
-                       DEBUG(3, ("Failed to process dceprc request!\n"));
-                       status = NT_STATUS_UNEXPECTED_IO_ERROR;
-                       goto fail;
-               }
-
-               data_left -= data_used;
-               data += data_used;
+       /* dcerpc_read_ncacn_packet_recv() returns a full PDU */
+       npc->p->in_data.pdu_needed_len = 0;
+       npc->p->in_data.pdu = recv_buffer;
+       if (dcerpc_get_endian_flag(&recv_buffer) & DCERPC_DREP_LE) {
+               npc->p->endian = RPC_LITTLE_ENDIAN;
+       } else {
+               npc->p->endian = RPC_BIG_ENDIAN;
        }
+       DEBUG(10, ("PDU is in %s Endian format!\n",
+                  npc->p->endian ? "Big" : "Little"));
+       process_complete_pdu(npc->p, pkt);
 
-       /* Do not leak this buffer, npc is a long lived context */
+       /* reset pipe state and free PDU */
+       npc->p->in_data.pdu.length = 0;
        talloc_free(recv_buffer.data);
        talloc_free(pkt);
 
@@ -479,13 +449,6 @@ static void named_pipe_packet_process(struct tevent_req *subreq)
        to_send = out->frag.length - out->current_pdu_sent;
        if (to_send > 0) {
 
-               DEBUG(10, ("Current_pdu_len = %u, "
-                          "current_pdu_sent = %u "
-                          "Returning %u bytes\n",
-                          (unsigned int)out->frag.length,
-                          (unsigned int)out->current_pdu_sent,
-                          (unsigned int)to_send));
-
                npc->iov = talloc_zero(npc, struct iovec);
                if (!npc->iov) {
                        status = NT_STATUS_NO_MEMORY;
@@ -522,11 +485,6 @@ static void named_pipe_packet_process(struct tevent_req *subreq)
                npc->iov[npc->count].iov_base = out->frag.data;
                npc->iov[npc->count].iov_len = out->frag.length;
 
-               DEBUG(10, ("PDU number: %d, PDU Length: %u\n",
-                          (unsigned int)npc->count,
-                          (unsigned int)npc->iov[npc->count].iov_len));
-               dump_data(11, (const uint8_t *)npc->iov[npc->count].iov_base,
-                               npc->iov[npc->count].iov_len);
                npc->count++;
        }
 
@@ -544,25 +502,37 @@ static void named_pipe_packet_process(struct tevent_req *subreq)
                return;
        }
 
-       DEBUG(10, ("Sending a total of %u bytes\n",
+       DEBUG(10, ("Sending %u fragments in a total of %u bytes\n",
+                  (unsigned int)npc->count,
                   (unsigned int)npc->p->out_data.data_sent_length));
 
-       subreq = tstream_writev_queue_send(npc, npc->ev,
-                                          npc->tstream,
-                                          npc->write_queue,
-                                          npc->iov, npc->count);
-       if (!subreq) {
-               DEBUG(2, ("Failed to send packet\n"));
-               status = NT_STATUS_NO_MEMORY;
-               goto fail;
+       for (i = 0; i < npc->count; i++) {
+               DEBUG(10, ("Sending PDU number: %d, PDU Length: %u\n",
+                         (unsigned int)i,
+                         (unsigned int)npc->iov[i].iov_len));
+               dump_data(11, (const uint8_t *)npc->iov[i].iov_base,
+                               npc->iov[i].iov_len);
+
+               subreq = tstream_writev_queue_send(npc,
+                                                  npc->ev,
+                                                  npc->tstream,
+                                                  npc->write_queue,
+                                                  (npc->iov + i),
+                                                  1);
+               if (!subreq) {
+                       DEBUG(2, ("Failed to send packet\n"));
+                       status = NT_STATUS_NO_MEMORY;
+                       goto fail;
+               }
+               tevent_req_set_callback(subreq, named_pipe_packet_done, npc);
        }
-       tevent_req_set_callback(subreq, named_pipe_packet_done, npc);
+
        return;
 
 fail:
        DEBUG(2, ("Fatal error(%s). "
                  "Terminating client(%s) connection!\n",
-                 nt_errstr(status), npc->client_name));
+                 nt_errstr(status), npc->remote_client_name));
        /* terminate client connection */
        talloc_free(npc);
        return;
@@ -582,6 +552,16 @@ static void named_pipe_packet_done(struct tevent_req *subreq)
                goto fail;
        }
 
+       if (tevent_queue_length(npc->write_queue) > 0) {
+               return;
+       }
+
+       if (npc->p->fault_state != 0) {
+               DEBUG(2, ("Disconnect after fault\n"));
+               sys_errno = EINVAL;
+               goto fail;
+       }
+
        /* clear out any data that may have been left around */
        npc->count = 0;
        TALLOC_FREE(npc->iov);
@@ -589,6 +569,8 @@ static void named_pipe_packet_done(struct tevent_req *subreq)
        data_blob_free(&npc->p->out_data.frag);
        data_blob_free(&npc->p->out_data.rdata);
 
+       talloc_free_children(npc->p->mem_ctx);
+
        /* Wait for the next packet */
        subreq = dcerpc_read_ncacn_packet_send(npc, npc->ev, npc->tstream);
        if (!subreq) {
@@ -602,21 +584,12 @@ static void named_pipe_packet_done(struct tevent_req *subreq)
 fail:
        DEBUG(2, ("Fatal error(%s). "
                  "Terminating client(%s) connection!\n",
-                 strerror(sys_errno), npc->client_name));
+                 strerror(sys_errno), npc->remote_client_name));
        /* terminate client connection */
        talloc_free(npc);
        return;
 }
 
-static void dcerpc_ncacn_accept(struct tevent_context *ev_ctx,
-                               struct messaging_context *msg_ctx,
-                               enum dcerpc_transport_t transport,
-                               const char *name,
-                               struct tsocket_address *cli_addr,
-                               struct tsocket_address *srv_addr,
-                               int s,
-                               dcerpc_ncacn_disconnect_fn fn);
-
 /********************************************************************
  * Start listening on the tcp/ip socket
  ********************************************************************/
@@ -626,6 +599,41 @@ static void dcerpc_ncacn_tcpip_listener(struct tevent_context *ev,
                                        uint16_t flags,
                                        void *private_data);
 
+int create_tcpip_socket(const struct sockaddr_storage *ifss, uint16_t *port)
+{
+       int fd = -1;
+
+       if (*port == 0) {
+               uint16_t i;
+
+               for (i = lp_rpc_low_port(); i <= lp_rpc_high_port(); i++) {
+                       fd = open_socket_in(SOCK_STREAM,
+                                           i,
+                                           0,
+                                           ifss,
+                                           false);
+                       if (fd >= 0) {
+                               *port = i;
+                               break;
+                       }
+               }
+       } else {
+               fd = open_socket_in(SOCK_STREAM,
+                                   *port,
+                                   0,
+                                   ifss,
+                                   true);
+       }
+       if (fd == -1) {
+               DEBUG(0, ("Failed to create socket on port %u!\n", *port));
+               return -1;
+       }
+
+       DEBUG(10, ("Opened tcpip socket fd %d for port %u\n", fd, *port));
+
+       return fd;
+}
+
 uint16_t setup_dcerpc_ncacn_tcpip_socket(struct tevent_context *ev_ctx,
                                         struct messaging_context *msg_ctx,
                                         const struct sockaddr_storage *ifss,
@@ -645,30 +653,8 @@ uint16_t setup_dcerpc_ncacn_tcpip_socket(struct tevent_context *ev_ctx,
        state->ep.port = port;
        state->disconnect_fn = NULL;
 
-       if (state->ep.port == 0) {
-               uint16_t i;
-
-               for (i = SERVER_TCP_LOW_PORT; i <= SERVER_TCP_HIGH_PORT; i++) {
-                       state->fd = open_socket_in(SOCK_STREAM,
-                                                  i,
-                                                  0,
-                                                  ifss,
-                                                  false);
-                       if (state->fd > 0) {
-                               state->ep.port = i;
-                               break;
-                       }
-               }
-       } else {
-               state->fd = open_socket_in(SOCK_STREAM,
-                                          state->ep.port,
-                                          0,
-                                          ifss,
-                                          true);
-       }
+       state->fd = create_tcpip_socket(ifss, &state->ep.port);
        if (state->fd == -1) {
-               DEBUG(0, ("setup_dcerpc_ncacn_tcpip_socket: Failed to create "
-                         "socket on port %u!\n", state->ep.port));
                goto out;
        }
 
@@ -688,7 +674,7 @@ uint16_t setup_dcerpc_ncacn_tcpip_socket(struct tevent_context *ev_ctx,
                goto out;
        }
 
-       DEBUG(10, ("setup_tcpip_socket: openened socket fd %d for port %u\n",
+       DEBUG(10, ("setup_tcpip_socket: opened socket fd %d for port %u\n",
                   state->fd, state->ep.port));
 
        fde = tevent_add_fd(state->ev_ctx,
@@ -737,6 +723,7 @@ static void dcerpc_ncacn_tcpip_listener(struct tevent_context *ev,
                }
                return;
        }
+       smb_set_close_on_exec(s);
 
        rc = tsocket_address_bsd_from_sockaddr(state,
                                               (struct sockaddr *)(void *) &addr,
@@ -783,6 +770,32 @@ static void dcerpc_ncalrpc_listener(struct tevent_context *ev,
                                    uint16_t flags,
                                    void *private_data);
 
+int create_dcerpc_ncalrpc_socket(const char *name)
+{
+       int fd = -1;
+
+       if (name == NULL) {
+               name = "DEFAULT";
+       }
+
+       if (!directory_create_or_exist(lp_ncalrpc_dir(), 0755)) {
+               DEBUG(0, ("Failed to create ncalrpc directory %s - %s\n",
+                         lp_ncalrpc_dir(), strerror(errno)));
+               return -1;
+       }
+
+       fd = create_pipe_sock(lp_ncalrpc_dir(), name, 0755);
+       if (fd == -1) {
+               DEBUG(0, ("Failed to create ncalrpc socket! [%s/%s]\n",
+                         lp_ncalrpc_dir(), name));
+               return -1;
+       }
+
+       DEBUG(10, ("Opened ncalrpc socket fd %d for %s\n", fd, name));
+
+       return fd;
+}
+
 bool setup_dcerpc_ncalrpc_socket(struct tevent_context *ev_ctx,
                                 struct messaging_context *msg_ctx,
                                 const char *name,
@@ -790,6 +803,7 @@ bool setup_dcerpc_ncalrpc_socket(struct tevent_context *ev_ctx,
 {
        struct dcerpc_ncacn_listen_state *state;
        struct tevent_fd *fde;
+       int rc;
 
        state = talloc(ev_ctx, struct dcerpc_ncacn_listen_state);
        if (state == NULL) {
@@ -803,29 +817,26 @@ bool setup_dcerpc_ncalrpc_socket(struct tevent_context *ev_ctx,
        if (name == NULL) {
                name = "DEFAULT";
        }
-       state->ep.name = talloc_strdup(state, name);
 
+       state->ep.name = talloc_strdup(state, name);
        if (state->ep.name == NULL) {
                DEBUG(0, ("Out of memory\n"));
                talloc_free(state);
                return false;
        }
 
-       if (!directory_create_or_exist(lp_ncalrpc_dir(), geteuid(), 0755)) {
-               DEBUG(0, ("Failed to create pipe directory %s - %s\n",
-                         lp_ncalrpc_dir(), strerror(errno)));
+       state->fd = create_dcerpc_ncalrpc_socket(name);
+       if (state->fd == -1) {
                goto out;
        }
 
-       state->fd = create_pipe_sock(lp_ncalrpc_dir(), name, 0755);
-       if (state->fd == -1) {
-               DEBUG(0, ("Failed to create pipe socket! [%s/%s]\n",
-                         lp_ncalrpc_dir(), name));
+       rc = listen(state->fd, 5);
+       if (rc < 0) {
+               DEBUG(0, ("Failed to listen on ncalrpc socket %s: %s\n",
+                         name, strerror(errno)));
                goto out;
        }
 
-       DEBUG(10, ("Openened pipe socket fd %d for %s\n", state->fd, name));
-
        state->ev_ctx = ev_ctx;
        state->msg_ctx = msg_ctx;
 
@@ -863,14 +874,18 @@ static void dcerpc_ncalrpc_listener(struct tevent_context *ev,
        struct dcerpc_ncacn_listen_state *state =
                        talloc_get_type_abort(private_data,
                                              struct dcerpc_ncacn_listen_state);
-       struct tsocket_address *cli_addr = NULL;
+       struct tsocket_address *cli_addr = NULL, *srv_addr = NULL;
        struct sockaddr_un sunaddr;
        struct sockaddr *addr = (struct sockaddr *)(void *)&sunaddr;
        socklen_t len = sizeof(sunaddr);
+       struct sockaddr_un sunaddr_server;
+       struct sockaddr *addr_server = (struct sockaddr *)(void *)&sunaddr_server;
+       socklen_t len_server = sizeof(sunaddr_server);
        int sd = -1;
        int rc;
 
        ZERO_STRUCT(sunaddr);
+       ZERO_STRUCT(sunaddr_server);
 
        sd = accept(state->fd, addr, &len);
        if (sd == -1) {
@@ -879,6 +894,7 @@ static void dcerpc_ncalrpc_listener(struct tevent_context *ev,
                }
                return;
        }
+       smb_set_close_on_exec(sd);
 
        rc = tsocket_address_bsd_from_sockaddr(state,
                                               addr, len,
@@ -888,13 +904,29 @@ static void dcerpc_ncalrpc_listener(struct tevent_context *ev,
                return;
        }
 
-       DEBUG(10, ("Accepted ncalrpc socket %d\n", sd));
+       rc = getsockname(sd, addr_server, &len_server);
+       if (rc < 0) {
+               close(sd);
+               return;
+       }
+
+       rc = tsocket_address_bsd_from_sockaddr(state,
+                                              addr_server,
+                                              len_server,
+                                              &srv_addr);
+       if (rc < 0) {
+               close(sd);
+               return;
+       }
+
+       DEBUG(10, ("Accepted ncalrpc socket %s (fd: %d)\n",
+                  sunaddr.sun_path, sd));
 
        dcerpc_ncacn_accept(state->ev_ctx,
                            state->msg_ctx,
                            NCALRPC,
                            state->ep.name,
-                           cli_addr, NULL, sd,
+                           cli_addr, srv_addr, sd,
                            state->disconnect_fn);
 }
 
@@ -912,10 +944,10 @@ struct dcerpc_ncacn_conn {
        struct tstream_context *tstream;
        struct tevent_queue *send_queue;
 
-       struct tsocket_address *client;
-       char *client_name;
-       struct tsocket_address *server;
-       char *server_name;
+       struct tsocket_address *remote_client_addr;
+       char *remote_client_name;
+       struct tsocket_address *local_server_addr;
+       char *local_server_name;
        struct auth_session_info *session_info;
 
        struct iovec *iov;
@@ -925,23 +957,21 @@ struct dcerpc_ncacn_conn {
 static void dcerpc_ncacn_packet_process(struct tevent_req *subreq);
 static void dcerpc_ncacn_packet_done(struct tevent_req *subreq);
 
-static void dcerpc_ncacn_accept(struct tevent_context *ev_ctx,
-                               struct messaging_context *msg_ctx,
-                               enum dcerpc_transport_t transport,
-                               const char *name,
-                               struct tsocket_address *cli_addr,
-                               struct tsocket_address *srv_addr,
-                               int s,
-                               dcerpc_ncacn_disconnect_fn fn) {
+void dcerpc_ncacn_accept(struct tevent_context *ev_ctx,
+                        struct messaging_context *msg_ctx,
+                        enum dcerpc_transport_t transport,
+                        const char *name,
+                        struct tsocket_address *cli_addr,
+                        struct tsocket_address *srv_addr,
+                        int s,
+                        dcerpc_ncacn_disconnect_fn fn) {
        struct dcerpc_ncacn_conn *ncacn_conn;
        struct tevent_req *subreq;
-       const char *cli_str;
-       const char *srv_str = NULL;
-       bool system_user = false;
        char *pipe_name;
        NTSTATUS status;
        int sys_errno;
        uid_t uid;
+       gid_t gid;
        int rc;
 
        DEBUG(10, ("dcerpc_ncacn_accept\n"));
@@ -959,31 +989,37 @@ static void dcerpc_ncacn_accept(struct tevent_context *ev_ctx,
        ncacn_conn->sock = s;
        ncacn_conn->disconnect_fn = fn;
 
-       ncacn_conn->client = talloc_move(ncacn_conn, &cli_addr);
-       if (tsocket_address_is_inet(ncacn_conn->client, "ip")) {
-               ncacn_conn->client_name =
-                       tsocket_address_inet_addr_string(ncacn_conn->client,
+       ncacn_conn->remote_client_addr = talloc_move(ncacn_conn, &cli_addr);
+       if (tsocket_address_is_inet(ncacn_conn->remote_client_addr, "ip")) {
+               ncacn_conn->remote_client_name =
+                       tsocket_address_inet_addr_string(ncacn_conn->remote_client_addr,
                                                         ncacn_conn);
        } else {
-               ncacn_conn->client_name =
-                       tsocket_address_unix_path(ncacn_conn->client,
+               ncacn_conn->remote_client_name =
+                       tsocket_address_unix_path(ncacn_conn->remote_client_addr,
                                                  ncacn_conn);
        }
-       if (ncacn_conn->client_name == NULL) {
-               DEBUG(0, ("Out of memory!\n"));
+       if (ncacn_conn->remote_client_name == NULL) {
+               DEBUG(0, ("Out of memory obtaining remote socket address as a string!\n"));
                talloc_free(ncacn_conn);
                close(s);
                return;
        }
 
        if (srv_addr != NULL) {
-               ncacn_conn->server = talloc_move(ncacn_conn, &srv_addr);
+               ncacn_conn->local_server_addr = talloc_move(ncacn_conn, &srv_addr);
 
-               ncacn_conn->server_name =
-                       tsocket_address_inet_addr_string(ncacn_conn->server,
-                                                        ncacn_conn);
-               if (ncacn_conn->server_name == NULL) {
-                       DEBUG(0, ("Out of memory!\n"));
+               if (tsocket_address_is_inet(ncacn_conn->local_server_addr, "ip")) {
+                       ncacn_conn->local_server_name =
+                               tsocket_address_inet_addr_string(ncacn_conn->local_server_addr,
+                                                                ncacn_conn);
+               } else {
+                       ncacn_conn->local_server_name =
+                               tsocket_address_unix_path(ncacn_conn->local_server_addr,
+                                                         ncacn_conn);
+               }
+               if (ncacn_conn->local_server_name == NULL) {
+                       DEBUG(0, ("Out of memory obtaining local socket address as a string!\n"));
                        talloc_free(ncacn_conn);
                        close(s);
                        return;
@@ -992,7 +1028,7 @@ static void dcerpc_ncacn_accept(struct tevent_context *ev_ctx,
 
        switch (transport) {
                case NCACN_IP_TCP:
-                       pipe_name = tsocket_address_string(ncacn_conn->client,
+                       pipe_name = tsocket_address_string(ncacn_conn->remote_client_addr,
                                                           ncacn_conn);
                        if (pipe_name == NULL) {
                                close(s);
@@ -1002,14 +1038,38 @@ static void dcerpc_ncacn_accept(struct tevent_context *ev_ctx,
 
                        break;
                case NCALRPC:
-                       rc = sys_getpeereid(s, &uid);
+                       rc = getpeereid(s, &uid, &gid);
                        if (rc < 0) {
-                               DEBUG(2, ("Failed to get ncalrpc connecting uid!"));
+                               DEBUG(2, ("Failed to get ncalrpc connecting "
+                                         "uid - %s!\n", strerror(errno)));
                        } else {
                                if (uid == sec_initial_uid()) {
-                                       system_user = true;
+                                       TALLOC_FREE(ncacn_conn->remote_client_addr);
+
+                                       rc = tsocket_address_unix_from_path(ncacn_conn,
+                                                                           AS_SYSTEM_MAGIC_PATH_TOKEN,
+                                                                           &ncacn_conn->remote_client_addr);
+                                       if (rc < 0) {
+                                               DEBUG(0, ("Out of memory building magic ncalrpc_as_system path!\n"));
+                                               talloc_free(ncacn_conn);
+                                               close(s);
+                                               return;
+                                       }
+
+                                       TALLOC_FREE(ncacn_conn->remote_client_name);
+                                       ncacn_conn->remote_client_name
+                                               = tsocket_address_unix_path(ncacn_conn->remote_client_addr,
+                                                                           ncacn_conn);
+                                       if (ncacn_conn->remote_client_name == NULL) {
+                                               DEBUG(0, ("Out of memory getting magic ncalrpc_as_system string!\n"));
+                                               talloc_free(ncacn_conn);
+                                               close(s);
+                                               return;
+                                       }
                                }
                        }
+
+                       FALL_THROUGH;
                case NCACN_NP:
                        pipe_name = talloc_strdup(ncacn_conn,
                                                  name);
@@ -1047,26 +1107,12 @@ static void dcerpc_ncacn_accept(struct tevent_context *ev_ctx,
                return;
        }
 
-       if (tsocket_address_is_inet(ncacn_conn->client, "ip")) {
-               cli_str = ncacn_conn->client_name;
-       } else {
-               cli_str = "";
-       }
-
-       if (ncacn_conn->server != NULL) {
-               if (tsocket_address_is_inet(ncacn_conn->server, "ip")) {
-                       srv_str = ncacn_conn->server_name;
-               } else {
-                       srv_str = NULL;
-               }
-       }
-
        if (ncacn_conn->session_info == NULL) {
-               status = auth_anonymous_session_info(ncacn_conn,
+               status = make_session_info_anonymous(ncacn_conn,
                                                     &ncacn_conn->session_info);
                if (!NT_STATUS_IS_OK(status)) {
                        DEBUG(2, ("Failed to create "
-                                 "auth_anonymous_session_info - %s\n",
+                                 "make_session_info_anonymous - %s\n",
                                  nt_errstr(status)));
                        talloc_free(ncacn_conn);
                        return;
@@ -1077,9 +1123,8 @@ static void dcerpc_ncacn_accept(struct tevent_context *ev_ctx,
                                      ncacn_conn->msg_ctx,
                                      pipe_name,
                                      ncacn_conn->transport,
-                                     system_user,
-                                     ncacn_conn->server,
-                                     ncacn_conn->client,
+                                     ncacn_conn->remote_client_addr,
+                                     ncacn_conn->local_server_addr,
                                      ncacn_conn->session_info,
                                      &ncacn_conn->p,
                                      &sys_errno);
@@ -1093,7 +1138,7 @@ static void dcerpc_ncacn_accept(struct tevent_context *ev_ctx,
        ncacn_conn->send_queue = tevent_queue_create(ncacn_conn,
                                                        "dcerpc send queue");
        if (ncacn_conn->send_queue == NULL) {
-               DEBUG(0, ("Out of memory!\n"));
+               DEBUG(0, ("Out of memory building dcerpc send queue!\n"));
                talloc_free(ncacn_conn);
                return;
        }
@@ -1122,10 +1167,7 @@ static void dcerpc_ncacn_packet_process(struct tevent_req *subreq)
        struct _output_data *out = &ncacn_conn->p->out_data;
        DATA_BLOB recv_buffer = data_blob_null;
        struct ncacn_packet *pkt;
-       ssize_t data_left;
-       ssize_t data_used;
        uint32_t to_send;
-       char *data;
        NTSTATUS status;
        bool ok;
 
@@ -1141,22 +1183,20 @@ static void dcerpc_ncacn_packet_process(struct tevent_req *subreq)
                goto fail;
        }
 
-       data_left = recv_buffer.length;
-       data = (char *) recv_buffer.data;
-
-       while (data_left) {
-               data_used = process_incoming_data(ncacn_conn->p, data, data_left);
-               if (data_used < 0) {
-                       DEBUG(3, ("Failed to process dcerpc request!\n"));
-                       status = NT_STATUS_UNEXPECTED_IO_ERROR;
-                       goto fail;
-               }
-
-               data_left -= data_used;
-               data += data_used;
+       /* dcerpc_read_ncacn_packet_recv() returns a full PDU */
+       ncacn_conn->p->in_data.pdu_needed_len = 0;
+       ncacn_conn->p->in_data.pdu = recv_buffer;
+       if (dcerpc_get_endian_flag(&recv_buffer) & DCERPC_DREP_LE) {
+               ncacn_conn->p->endian = RPC_LITTLE_ENDIAN;
+       } else {
+               ncacn_conn->p->endian = RPC_BIG_ENDIAN;
        }
+       DEBUG(10, ("PDU is in %s Endian format!\n",
+                  ncacn_conn->p->endian ? "Big" : "Little"));
+       process_complete_pdu(ncacn_conn->p, pkt);
 
-       /* Do not leak this buffer */
+       /* reset pipe state and free PDU */
+       ncacn_conn->p->in_data.pdu.length = 0;
        talloc_free(recv_buffer.data);
        talloc_free(pkt);
 
@@ -1260,7 +1300,7 @@ static void dcerpc_ncacn_packet_process(struct tevent_req *subreq)
 
 fail:
        DEBUG(3, ("Terminating client(%s) connection! - '%s'\n",
-                 ncacn_conn->client_name, nt_errstr(status)));
+                 ncacn_conn->remote_client_name, nt_errstr(status)));
 
        /* Terminate client connection */
        talloc_free(ncacn_conn);
@@ -1283,6 +1323,12 @@ static void dcerpc_ncacn_packet_done(struct tevent_req *subreq)
                goto fail;
        }
 
+       if (ncacn_conn->p->fault_state != 0) {
+               DEBUG(2, ("Disconnect after fault\n"));
+               sys_errno = EINVAL;
+               goto fail;
+       }
+
        /* clear out any data that may have been left around */
        ncacn_conn->count = 0;
        TALLOC_FREE(ncacn_conn->iov);
@@ -1290,6 +1336,8 @@ static void dcerpc_ncacn_packet_done(struct tevent_req *subreq)
        data_blob_free(&ncacn_conn->p->out_data.frag);
        data_blob_free(&ncacn_conn->p->out_data.rdata);
 
+       talloc_free_children(ncacn_conn->p->mem_ctx);
+
        /* Wait for the next packet */
        subreq = dcerpc_read_ncacn_packet_send(ncacn_conn,
                                               ncacn_conn->ev_ctx,
@@ -1305,7 +1353,7 @@ static void dcerpc_ncacn_packet_done(struct tevent_req *subreq)
 
 fail:
        DEBUG(3, ("Terminating client(%s) connection! - '%s'\n",
-                 ncacn_conn->client_name, nt_errstr(status)));
+                 ncacn_conn->remote_client_name, nt_errstr(status)));
 
        /* Terminate client connection */
        talloc_free(ncacn_conn);