2 Unix SMB/CIFS implementation.
3 SMB client generic functions
4 Copyright (C) Andrew Tridgell 1994-1998
5 Copyright (C) Jeremy Allison 2007.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program. If not, see <http://www.gnu.org/licenses/>.
22 #include "libsmb/libsmb.h"
23 #include "../lib/util/tevent_ntstatus.h"
24 #include "smb_signing.h"
25 #include "async_smb.h"
27 /*******************************************************************
28 Setup the word count and byte count for a client smb message.
29 ********************************************************************/
31 int cli_set_message(char *buf,int num_words,int num_bytes,bool zero)
33 if (zero && (num_words || num_bytes)) {
34 memset(buf + smb_size,'\0',num_words*2 + num_bytes);
36 SCVAL(buf,smb_wct,num_words);
37 SSVAL(buf,smb_vwv + num_words*SIZEOFWORD,num_bytes);
38 smb_setlen(buf,smb_size + num_words*2 + num_bytes - 4);
39 return (smb_size + num_words*2 + num_bytes);
42 /****************************************************************************
43 Change the timeout (in milliseconds).
44 ****************************************************************************/
46 unsigned int cli_set_timeout(struct cli_state *cli, unsigned int timeout)
48 unsigned int old_timeout = cli->timeout;
49 cli->timeout = timeout;
53 /****************************************************************************
54 Change the port number used to call on.
55 ****************************************************************************/
57 void cli_set_port(struct cli_state *cli, int port)
62 /****************************************************************************
63 convenience routine to find if we negotiated ucs2
64 ****************************************************************************/
66 bool cli_ucs2(struct cli_state *cli)
68 return ((cli->capabilities & CAP_UNICODE) != 0);
71 /****************************************************************************
72 Setup basics in a outgoing packet.
73 ****************************************************************************/
75 void cli_setup_packet_buf(struct cli_state *cli, char *buf)
79 SIVAL(buf,smb_rcls,0);
80 SSVAL(buf,smb_pid,cli->pid);
81 memset(buf+smb_pidhigh, 0, 12);
82 SSVAL(buf,smb_uid,cli->vuid);
83 SSVAL(buf,smb_mid,cli->mid);
85 if (cli->protocol <= PROTOCOL_CORE) {
89 if (cli->case_sensitive) {
90 SCVAL(buf,smb_flg,0x0);
92 /* Default setting, case insensitive. */
93 SCVAL(buf,smb_flg,0x8);
95 flags2 = FLAGS2_LONG_PATH_COMPONENTS;
96 if (cli->capabilities & CAP_UNICODE)
97 flags2 |= FLAGS2_UNICODE_STRINGS;
98 if ((cli->capabilities & CAP_DFS) && cli->dfsroot)
99 flags2 |= FLAGS2_DFS_PATHNAMES;
100 if (cli->capabilities & CAP_STATUS32)
101 flags2 |= FLAGS2_32_BIT_ERROR_CODES;
103 flags2 |= FLAGS2_EXTENDED_SECURITY;
104 SSVAL(buf,smb_flg2, flags2);
107 /****************************************************************************
108 Initialize Domain, user or password.
109 ****************************************************************************/
111 NTSTATUS cli_set_domain(struct cli_state *cli, const char *domain)
113 TALLOC_FREE(cli->domain);
114 cli->domain = talloc_strdup(cli, domain ? domain : "");
115 if (cli->domain == NULL) {
116 return NT_STATUS_NO_MEMORY;
121 NTSTATUS cli_set_username(struct cli_state *cli, const char *username)
123 TALLOC_FREE(cli->user_name);
124 cli->user_name = talloc_strdup(cli, username ? username : "");
125 if (cli->user_name == NULL) {
126 return NT_STATUS_NO_MEMORY;
131 NTSTATUS cli_set_password(struct cli_state *cli, const char *password)
133 TALLOC_FREE(cli->password);
135 /* Password can be NULL. */
137 cli->password = talloc_strdup(cli, password);
138 if (cli->password == NULL) {
139 return NT_STATUS_NO_MEMORY;
142 /* Use zero NTLMSSP hashes and session key. */
143 cli->password = NULL;
149 /****************************************************************************
150 Initialise credentials of a client structure.
151 ****************************************************************************/
153 NTSTATUS cli_init_creds(struct cli_state *cli, const char *username, const char *domain, const char *password)
155 NTSTATUS status = cli_set_username(cli, username);
156 if (!NT_STATUS_IS_OK(status)) {
159 status = cli_set_domain(cli, domain);
160 if (!NT_STATUS_IS_OK(status)) {
163 DEBUG(10,("cli_init_creds: user %s domain %s\n", cli->user_name, cli->domain));
165 return cli_set_password(cli, password);
168 /****************************************************************************
169 Initialise a client structure. Always returns a talloc'ed struct.
170 Set the signing state (used from the command line).
171 ****************************************************************************/
173 struct cli_state *cli_initialise_ex(int signing_state)
175 struct cli_state *cli = NULL;
176 bool allow_smb_signing = false;
177 bool mandatory_signing = false;
179 /* Check the effective uid - make sure we are not setuid */
180 if (is_setuid_root()) {
181 DEBUG(0,("libsmb based programs must *NOT* be setuid root.\n"));
185 cli = talloc_zero(NULL, struct cli_state);
190 cli->dfs_mountpoint = talloc_strdup(cli, "");
191 if (!cli->dfs_mountpoint) {
196 cli->raw_status = NT_STATUS_INTERNAL_ERROR;
198 cli->pid = (uint16)sys_getpid();
200 cli->vuid = UID_FIELD_INVALID;
201 cli->protocol = PROTOCOL_NT1;
202 cli->timeout = 20000; /* Timeout is in milliseconds. */
203 cli->bufsize = CLI_BUFFER_SIZE+4;
204 cli->max_xmit = cli->bufsize;
205 cli->inbuf = (char *)SMB_MALLOC(cli->bufsize+SAFETY_MARGIN);
206 cli->oplock_handler = cli_oplock_ack;
207 cli->case_sensitive = false;
209 cli->use_spnego = lp_client_use_spnego();
211 cli->capabilities = CAP_UNICODE | CAP_STATUS32 | CAP_DFS;
213 /* Set the CLI_FORCE_DOSERR environment variable to test
214 client routines using DOS errors instead of STATUS32
215 ones. This intended only as a temporary hack. */
216 if (getenv("CLI_FORCE_DOSERR"))
217 cli->force_dos_errors = true;
219 if (lp_client_signing()) {
220 allow_smb_signing = true;
223 if (lp_client_signing() == Required) {
224 mandatory_signing = true;
227 if (signing_state != Undefined) {
228 allow_smb_signing = true;
231 if (signing_state == false) {
232 allow_smb_signing = false;
233 mandatory_signing = false;
236 if (signing_state == Required) {
237 mandatory_signing = true;
243 memset(cli->inbuf, 0, cli->bufsize);
245 /* initialise signing */
246 cli->signing_state = smb_signing_init(cli,
249 if (!cli->signing_state) {
253 cli->outgoing = tevent_queue_create(cli, "cli_outgoing");
254 if (cli->outgoing == NULL) {
259 cli->initialised = 1;
263 /* Clean up after malloc() error */
267 SAFE_FREE(cli->inbuf);
272 struct cli_state *cli_initialise(void)
274 return cli_initialise_ex(Undefined);
277 /****************************************************************************
278 Close all pipes open on this session.
279 ****************************************************************************/
281 void cli_nt_pipes_close(struct cli_state *cli)
283 while (cli->pipe_list != NULL) {
285 * No TALLOC_FREE here!
287 talloc_free(cli->pipe_list);
291 /****************************************************************************
292 Shutdown a client structure.
293 ****************************************************************************/
295 static void _cli_shutdown(struct cli_state *cli)
297 cli_nt_pipes_close(cli);
300 * tell our peer to free his resources. Wihtout this, when an
301 * application attempts to do a graceful shutdown and calls
302 * smbc_free_context() to clean up all connections, some connections
303 * can remain active on the peer end, until some (long) timeout period
304 * later. This tree disconnect forces the peer to clean up, since the
305 * connection will be going away.
307 if (cli->cnum != (uint16)-1) {
311 SAFE_FREE(cli->inbuf);
313 data_blob_free(&cli->secblob);
314 data_blob_free(&cli->user_session_key);
322 * Need to free pending first, they remove themselves
324 while (cli->pending) {
325 talloc_free(cli->pending[0]);
330 void cli_shutdown(struct cli_state *cli)
332 struct cli_state *cli_head;
336 DLIST_HEAD(cli, cli_head);
337 if (cli_head == cli) {
339 * head of a DFS list, shutdown all subsidiary DFS
342 struct cli_state *p, *next;
344 for (p = cli_head->next; p; p = next) {
346 DLIST_REMOVE(cli_head, p);
350 DLIST_REMOVE(cli_head, cli);
356 /****************************************************************************
357 Set socket options on a open connection.
358 ****************************************************************************/
360 void cli_sockopt(struct cli_state *cli, const char *options)
362 set_socket_options(cli->fd, options);
365 /****************************************************************************
366 Set the PID to use for smb messages. Return the old pid.
367 ****************************************************************************/
369 uint16 cli_setpid(struct cli_state *cli, uint16 pid)
371 uint16 ret = cli->pid;
376 /****************************************************************************
377 Set the case sensitivity flag on the packets. Returns old state.
378 ****************************************************************************/
380 bool cli_set_case_sensitive(struct cli_state *cli, bool case_sensitive)
382 bool ret = cli->case_sensitive;
383 cli->case_sensitive = case_sensitive;
387 struct cli_echo_state {
393 static void cli_echo_done(struct tevent_req *subreq);
395 struct tevent_req *cli_echo_send(TALLOC_CTX *mem_ctx, struct event_context *ev,
396 struct cli_state *cli, uint16_t num_echos,
399 struct tevent_req *req, *subreq;
400 struct cli_echo_state *state;
402 req = tevent_req_create(mem_ctx, &state, struct cli_echo_state);
406 SSVAL(state->vwv, 0, num_echos);
408 state->num_echos = num_echos;
410 subreq = cli_smb_send(state, ev, cli, SMBecho, 0, 1, state->vwv,
411 data.length, data.data);
412 if (subreq == NULL) {
415 tevent_req_set_callback(subreq, cli_echo_done, req);
422 static void cli_echo_done(struct tevent_req *subreq)
424 struct tevent_req *req = tevent_req_callback_data(
425 subreq, struct tevent_req);
426 struct cli_echo_state *state = tevent_req_data(
427 req, struct cli_echo_state);
433 status = cli_smb_recv(subreq, state, &inbuf, 0, NULL, NULL,
435 if (!NT_STATUS_IS_OK(status)) {
436 tevent_req_nterror(req, status);
439 if ((num_bytes != state->data.length)
440 || (memcmp(bytes, state->data.data, num_bytes) != 0)) {
441 tevent_req_nterror(req, NT_STATUS_INVALID_NETWORK_RESPONSE);
445 state->num_echos -=1;
446 if (state->num_echos == 0) {
447 tevent_req_done(req);
451 if (!cli_smb_req_set_pending(subreq)) {
452 tevent_req_nterror(req, NT_STATUS_NO_MEMORY);
458 * Get the result out from an echo request
459 * @param[in] req The async_req from cli_echo_send
460 * @retval Did the server reply correctly?
463 NTSTATUS cli_echo_recv(struct tevent_req *req)
465 return tevent_req_simple_recv_ntstatus(req);
469 * @brief Send/Receive SMBEcho requests
470 * @param[in] mem_ctx The memory context to put the async_req on
471 * @param[in] ev The event context that will call us back
472 * @param[in] cli The connection to send the echo to
473 * @param[in] num_echos How many times do we want to get the reply?
474 * @param[in] data The data we want to get back
475 * @retval Did the server reply correctly?
478 NTSTATUS cli_echo(struct cli_state *cli, uint16_t num_echos, DATA_BLOB data)
480 TALLOC_CTX *frame = talloc_stackframe();
481 struct event_context *ev;
482 struct tevent_req *req;
483 NTSTATUS status = NT_STATUS_OK;
485 if (cli_has_async_calls(cli)) {
487 * Can't use sync call while an async call is in flight
489 status = NT_STATUS_INVALID_PARAMETER;
493 ev = event_context_init(frame);
495 status = NT_STATUS_NO_MEMORY;
499 req = cli_echo_send(frame, ev, cli, num_echos, data);
501 status = NT_STATUS_NO_MEMORY;
505 if (!tevent_req_poll(req, ev)) {
506 status = map_nt_error_from_unix(errno);
510 status = cli_echo_recv(req);
517 * Is the SMB command able to hold an AND_X successor
518 * @param[in] cmd The SMB command in question
519 * @retval Can we add a chained request after "cmd"?
521 bool is_andx_req(uint8_t cmd)
541 NTSTATUS cli_smb(TALLOC_CTX *mem_ctx, struct cli_state *cli,
542 uint8_t smb_command, uint8_t additional_flags,
543 uint8_t wct, uint16_t *vwv,
544 uint32_t num_bytes, const uint8_t *bytes,
545 struct tevent_req **result_parent,
546 uint8_t min_wct, uint8_t *pwct, uint16_t **pvwv,
547 uint32_t *pnum_bytes, uint8_t **pbytes)
549 struct tevent_context *ev;
550 struct tevent_req *req = NULL;
551 NTSTATUS status = NT_STATUS_NO_MEMORY;
553 if (cli_has_async_calls(cli)) {
554 return NT_STATUS_INVALID_PARAMETER;
556 ev = tevent_context_init(mem_ctx);
560 req = cli_smb_send(mem_ctx, ev, cli, smb_command, additional_flags,
561 wct, vwv, num_bytes, bytes);
565 if (!tevent_req_poll_ntstatus(req, ev, &status)) {
568 status = cli_smb_recv(req, NULL, NULL, min_wct, pwct, pvwv,
572 if (NT_STATUS_IS_OK(status) && (result_parent != NULL)) {
573 *result_parent = req;