s3:libsmb: keep a cli_smb_state->one_way
[idra/samba.git] / source3 / libsmb / async_smb.c
index 87614bd3265381ab818aa030aa71c4a1ccfb9ac1..5f2a6441e351eea66ea20c41a7d8b0269b483048 100644 (file)
@@ -89,6 +89,8 @@ struct cli_smb_state {
        int chain_num;
        int chain_length;
        struct tevent_req **chained_requests;
+
+       bool one_way;
 };
 
 static uint16_t cli_alloc_mid(struct cli_state *cli)
@@ -132,6 +134,8 @@ void cli_smb_req_unset_pending(struct tevent_req *req)
                return;
        }
 
+       talloc_set_destructor(req, NULL);
+
        if (num_pending == 1) {
                /*
                 * The pending read_smb tevent_req is a child of
@@ -139,6 +143,7 @@ void cli_smb_req_unset_pending(struct tevent_req *req)
                 * delete the socket read fde.
                 */
                TALLOC_FREE(cli->conn.pending);
+               cli->conn.read_smb_req = NULL;
                return;
        }
 
@@ -159,7 +164,9 @@ void cli_smb_req_unset_pending(struct tevent_req *req)
        /*
         * Remove ourselves from the cli->conn.pending array
         */
-       cli->conn.pending[i] = cli->conn.pending[num_pending-1];
+       for (; i < (num_pending - 1); i++) {
+               cli->conn.pending[i] = cli->conn.pending[i+1];
+       }
 
        /*
         * No NULL check here, we're shrinking by sizeof(void *), and
@@ -184,7 +191,8 @@ static int cli_smb_req_destructor(struct tevent_req *req)
        return 0;
 }
 
-static void cli_smb_received(struct tevent_req *subreq);
+static bool cli_state_receive_next(struct cli_state *cli);
+static void cli_state_notify_pending(struct cli_state *cli, NTSTATUS status);
 
 bool cli_smb_req_set_pending(struct tevent_req *req)
 {
@@ -193,7 +201,6 @@ bool cli_smb_req_set_pending(struct tevent_req *req)
        struct cli_state *cli;
        struct tevent_req **pending;
        int num_pending;
-       struct tevent_req *subreq;
 
        cli = state->cli;
        num_pending = talloc_array_length(cli->conn.pending);
@@ -207,23 +214,85 @@ bool cli_smb_req_set_pending(struct tevent_req *req)
        cli->conn.pending = pending;
        talloc_set_destructor(req, cli_smb_req_destructor);
 
-       if (num_pending > 0) {
+       if (!cli_state_receive_next(cli)) {
+               /*
+                * the caller should notify the current request
+                *
+                * And all other pending requests get notified
+                * by cli_state_notify_pending().
+                */
+               cli_smb_req_unset_pending(req);
+               cli_state_notify_pending(cli, NT_STATUS_NO_MEMORY);
+               return false;
+       }
+
+       return true;
+}
+
+static void cli_smb_received(struct tevent_req *subreq);
+static NTSTATUS cli_state_dispatch_smb1(struct cli_state *cli,
+                                       TALLOC_CTX *frame,
+                                       uint8_t *inbuf);
+
+static bool cli_state_receive_next(struct cli_state *cli)
+{
+       size_t num_pending = talloc_array_length(cli->conn.pending);
+       struct tevent_req *req;
+       struct cli_smb_state *state;
+
+       if (cli->conn.read_smb_req != NULL) {
                return true;
        }
 
+       if (num_pending == 0) {
+               return true;
+       }
+
+       req = cli->conn.pending[0];
+       state = tevent_req_data(req, struct cli_smb_state);
+
+       cli->conn.dispatch_incoming = cli_state_dispatch_smb1;
+
        /*
         * We're the first ones, add the read_smb request that waits for the
         * answer from the server
         */
-       subreq = read_smb_send(cli->conn.pending, state->ev, cli->conn.fd);
-       if (subreq == NULL) {
-               cli_smb_req_unset_pending(req);
+       cli->conn.read_smb_req = read_smb_send(cli->conn.pending, state->ev,
+                                              cli->conn.fd);
+       if (cli->conn.read_smb_req == NULL) {
                return false;
        }
-       tevent_req_set_callback(subreq, cli_smb_received, cli);
+       tevent_req_set_callback(cli->conn.read_smb_req, cli_smb_received, cli);
        return true;
 }
 
+static void cli_state_notify_pending(struct cli_state *cli, NTSTATUS status)
+{
+       cli_state_disconnect(cli);
+
+       /*
+        * Cancel all pending requests. We do not do a for-loop walking
+        * cli->conn.pending because that array changes in
+        * cli_smb_req_destructor().
+        */
+       while (talloc_array_length(cli->conn.pending) > 0) {
+               struct tevent_req *req;
+               struct cli_smb_state *state;
+
+               req = cli->conn.pending[0];
+               state = tevent_req_data(req, struct cli_smb_state);
+
+               cli_smb_req_unset_pending(req);
+
+               /*
+                * we need to defer the callback, because we may notify more
+                * then one caller.
+                */
+               tevent_req_defer_callback(req, state->ev);
+               tevent_req_nterror(req, status);
+       }
+}
+
 /*
  * Fetch a smb request's mid. Only valid after the request has been sent by
  * cli_smb_req_send().
@@ -344,6 +413,22 @@ struct tevent_req *cli_smb_req_create(TALLOC_CTX *mem_ctx,
                        tevent_req_oom(result);
                }
        }
+
+       switch (smb_command) {
+       case SMBtranss:
+       case SMBtranss2:
+       case SMBnttranss:
+       case SMBntcancel:
+               state->one_way = true;
+               break;
+       case SMBlockingX:
+               if ((wct == 8) &&
+                   (CVAL(vwv+3, 0) == LOCKING_ANDX_OPLOCK_RELEASE)) {
+                       state->one_way = true;
+               }
+               break;
+       }
+
        return result;
 }
 
@@ -489,26 +574,15 @@ static void cli_smb_sent(struct tevent_req *subreq)
        nwritten = writev_recv(subreq, &err);
        TALLOC_FREE(subreq);
        if (nwritten == -1) {
-               cli_state_disconnect(state->cli);
-               tevent_req_nterror(req, map_nt_error_from_unix(err));
+               NTSTATUS status = map_nt_error_from_unix(err);
+               cli_state_notify_pending(state->cli, status);
                return;
        }
 
-       switch (CVAL(state->header, smb_com)) {
-       case SMBtranss:
-       case SMBtranss2:
-       case SMBnttranss:
-       case SMBntcancel:
+       if (state->one_way) {
                state->inbuf = NULL;
                tevent_req_done(req);
                return;
-       case SMBlockingX:
-               if ((CVAL(state->header, smb_wct) == 8) &&
-                   (CVAL(state->vwv+3, 0) == LOCKING_ANDX_OPLOCK_RELEASE)) {
-                       state->inbuf = NULL;
-                       tevent_req_done(req);
-                       return;
-               }
        }
 
        if (!cli_smb_req_set_pending(req)) {
@@ -521,29 +595,73 @@ static void cli_smb_received(struct tevent_req *subreq)
 {
        struct cli_state *cli = tevent_req_callback_data(
                subreq, struct cli_state);
-       struct tevent_req *req;
-       struct cli_smb_state *state;
+       TALLOC_CTX *frame = talloc_stackframe();
        NTSTATUS status;
        uint8_t *inbuf;
        ssize_t received;
-       int num_pending;
-       int i, err;
-       uint16_t mid;
-       bool oplock_break;
+       int err;
 
-       received = read_smb_recv(subreq, talloc_tos(), &inbuf, &err);
+       if (subreq != cli->conn.read_smb_req) {
+               DEBUG(1, ("Internal error: cli_smb_received called with "
+                         "unexpected subreq\n"));
+               status = NT_STATUS_INTERNAL_ERROR;
+               cli_state_notify_pending(cli, status);
+               TALLOC_FREE(frame);
+               return;
+       }
+
+       received = read_smb_recv(subreq, frame, &inbuf, &err);
        TALLOC_FREE(subreq);
+       cli->conn.read_smb_req = NULL;
        if (received == -1) {
-               cli_state_disconnect(cli);
                status = map_nt_error_from_unix(err);
-               goto fail;
+               cli_state_notify_pending(cli, status);
+               TALLOC_FREE(frame);
+               return;
+       }
+
+       status = cli->conn.dispatch_incoming(cli, frame, inbuf);
+       TALLOC_FREE(frame);
+       if (NT_STATUS_IS_OK(status)) {
+               /*
+                * We should not do any more processing
+                * as the dispatch function called
+                * tevent_req_done().
+                */
+               return;
+       } else if (!NT_STATUS_EQUAL(status, NT_STATUS_RETRY)) {
+               /*
+                * We got an error, so notify all pending requests
+                */
+               cli_state_notify_pending(cli, status);
+               return;
        }
 
+       /*
+        * We got NT_STATUS_RETRY, so we may ask for a
+        * next incoming pdu.
+        */
+       if (!cli_state_receive_next(cli)) {
+               cli_state_notify_pending(cli, NT_STATUS_NO_MEMORY);
+       }
+}
+
+static NTSTATUS cli_state_dispatch_smb1(struct cli_state *cli,
+                                       TALLOC_CTX *frame,
+                                       uint8_t *inbuf)
+{
+       struct tevent_req *req;
+       struct cli_smb_state *state;
+       NTSTATUS status;
+       int num_pending;
+       int i;
+       uint16_t mid;
+       bool oplock_break;
+
        if ((IVAL(inbuf, 4) != 0x424d53ff) /* 0xFF"SMB" */
            && (SVAL(inbuf, 4) != 0x45ff)) /* 0xFF"E" */ {
                DEBUG(10, ("Got non-SMB PDU\n"));
-               status = NT_STATUS_INVALID_NETWORK_RESPONSE;
-               goto fail;
+               return NT_STATUS_INVALID_NETWORK_RESPONSE;
        }
 
        if (cli_encryption_on(cli) && (CVAL(inbuf, 0) == 0)) {
@@ -553,15 +671,14 @@ static void cli_smb_received(struct tevent_req *subreq)
                if (!NT_STATUS_IS_OK(status)) {
                        DEBUG(10, ("get_enc_ctx_num returned %s\n",
                                   nt_errstr(status)));
-                       goto fail;
+                       return status;
                }
 
                if (enc_ctx_num != cli->trans_enc_state->enc_ctx_num) {
                        DEBUG(10, ("wrong enc_ctx %d, expected %d\n",
                                   enc_ctx_num,
                                   cli->trans_enc_state->enc_ctx_num));
-                       status = NT_STATUS_INVALID_HANDLE;
-                       goto fail;
+                       return NT_STATUS_INVALID_HANDLE;
                }
 
                status = common_decrypt_buffer(cli->trans_enc_state,
@@ -569,7 +686,7 @@ static void cli_smb_received(struct tevent_req *subreq)
                if (!NT_STATUS_IS_OK(status)) {
                        DEBUG(10, ("common_decrypt_buffer returned %s\n",
                                   nt_errstr(status)));
-                       goto fail;
+                       return status;
                }
        }
 
@@ -583,8 +700,7 @@ static void cli_smb_received(struct tevent_req *subreq)
        }
        if (i == num_pending) {
                /* Dump unexpected reply */
-               TALLOC_FREE(inbuf);
-               goto done;
+               return NT_STATUS_RETRY;
        }
 
        oplock_break = false;
@@ -601,8 +717,7 @@ static void cli_smb_received(struct tevent_req *subreq)
 
                if (!oplock_break) {
                        /* Dump unexpected reply */
-                       TALLOC_FREE(inbuf);
-                       goto done;
+                       return NT_STATUS_RETRY;
                }
        }
 
@@ -612,63 +727,70 @@ static void cli_smb_received(struct tevent_req *subreq)
        if (!oplock_break /* oplock breaks are not signed */
            && !cli_check_sign_mac(cli, (char *)inbuf, state->seqnum+1)) {
                DEBUG(10, ("cli_check_sign_mac failed\n"));
-               TALLOC_FREE(inbuf);
-               status = NT_STATUS_ACCESS_DENIED;
-               cli_state_disconnect(cli);
-               goto fail;
+               return NT_STATUS_ACCESS_DENIED;
        }
 
-       if (state->chained_requests == NULL) {
-               state->inbuf = talloc_move(state, &inbuf);
-               talloc_set_destructor(req, NULL);
-               cli_smb_req_unset_pending(req);
-               state->chain_num = 0;
-               state->chain_length = 1;
-               tevent_req_done(req);
-       } else {
-               struct tevent_req **chain = talloc_move(
-                       talloc_tos(), &state->chained_requests);
+       if (state->chained_requests != NULL) {
+               struct tevent_req **chain = talloc_move(frame,
+                                           &state->chained_requests);
                int num_chained = talloc_array_length(chain);
 
+               /*
+                * We steal the inbuf to the chain,
+                * so that it will stay until all
+                * requests of the chain are finished.
+                *
+                * Each requests in the chain will
+                * hold a talloc reference to the chain.
+                * This way we do not expose the talloc_reference()
+                * behavior to the callers.
+                */
+               talloc_steal(chain, inbuf);
+
                for (i=0; i<num_chained; i++) {
-                       state = tevent_req_data(chain[i], struct
-                                               cli_smb_state);
+                       struct tevent_req **ref;
+
+                       req = chain[i];
+                       state = tevent_req_data(req, struct cli_smb_state);
+
+                       cli_smb_req_unset_pending(req);
+
+                       /*
+                        * as we finish multiple requests here
+                        * we need to defer the callbacks as
+                        * they could destroy our current stack state.
+                        */
+                       tevent_req_defer_callback(req, state->ev);
+
+                       ref = talloc_reference(state, chain);
+                       if (tevent_req_nomem(ref, req)) {
+                               continue;
+                       }
+
                        state->inbuf = inbuf;
                        state->chain_num = i;
                        state->chain_length = num_chained;
-                       tevent_req_done(chain[i]);
-               }
-               TALLOC_FREE(inbuf);
-               TALLOC_FREE(chain);
-       }
- done:
-       if (talloc_array_length(cli->conn.pending) > 0) {
-               /*
-                * Set up another read request for the other pending cli_smb
-                * requests
-                */
-               state = tevent_req_data(cli->conn.pending[0],
-                                       struct cli_smb_state);
-               subreq = read_smb_send(cli->conn.pending, state->ev, cli->conn.fd);
-               if (subreq == NULL) {
-                       status = NT_STATUS_NO_MEMORY;
-                       goto fail;
+
+                       tevent_req_done(req);
                }
-               tevent_req_set_callback(subreq, cli_smb_received, cli);
+
+               return NT_STATUS_RETRY;
        }
-       return;
- fail:
-       /*
-        * Cancel all pending requests. We don't do a for-loop walking
-        * cli->conn.pending because that array changes in
-        * cli_smb_req_destructor().
-        */
-       while (talloc_array_length(cli->conn.pending) > 0) {
-               req = cli->conn.pending[0];
-               talloc_set_destructor(req, NULL);
-               cli_smb_req_unset_pending(req);
-               tevent_req_nterror(req, status);
+
+       cli_smb_req_unset_pending(req);
+
+       state->inbuf = talloc_move(state, &inbuf);
+       state->chain_num = 0;
+       state->chain_length = 1;
+
+       if (talloc_array_length(cli->conn.pending) == 0) {
+               tevent_req_done(req);
+               return NT_STATUS_OK;
        }
+
+       tevent_req_defer_callback(req, state->ev);
+       tevent_req_done(req);
+       return NT_STATUS_RETRY;
 }
 
 NTSTATUS cli_smb_recv(struct tevent_req *req,