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
) {
197 cli
->pid
= (uint16
)sys_getpid();
199 cli
->vuid
= UID_FIELD_INVALID
;
200 cli
->protocol
= PROTOCOL_NT1
;
201 cli
->timeout
= 20000; /* Timeout is in milliseconds. */
202 cli
->bufsize
= CLI_BUFFER_SIZE
+4;
203 cli
->max_xmit
= cli
->bufsize
;
204 cli
->inbuf
= (char *)SMB_MALLOC(cli
->bufsize
+SAFETY_MARGIN
);
205 cli
->oplock_handler
= cli_oplock_ack
;
206 cli
->case_sensitive
= false;
207 cli
->smb_rw_error
= SMB_READ_OK
;
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 * Also, do not do tree disconnect when cli->smb_rw_error is SMB_DO_NOT_DO_TDIS
308 * the only user for this so far is smbmount which passes opened connection
309 * down to kernel's smbfs module.
311 if ( (cli
->cnum
!= (uint16
)-1) && (cli
->smb_rw_error
!= SMB_DO_NOT_DO_TDIS
) ) {
315 SAFE_FREE(cli
->inbuf
);
317 data_blob_free(&cli
->secblob
);
318 data_blob_free(&cli
->user_session_key
);
324 cli
->smb_rw_error
= SMB_READ_OK
;
327 * Need to free pending first, they remove themselves
329 while (cli
->pending
) {
330 talloc_free(cli
->pending
[0]);
335 void cli_shutdown(struct cli_state
*cli
)
337 struct cli_state
*cli_head
;
341 DLIST_HEAD(cli
, cli_head
);
342 if (cli_head
== cli
) {
344 * head of a DFS list, shutdown all subsidiary DFS
347 struct cli_state
*p
, *next
;
349 for (p
= cli_head
->next
; p
; p
= next
) {
351 DLIST_REMOVE(cli_head
, p
);
355 DLIST_REMOVE(cli_head
, cli
);
361 /****************************************************************************
362 Set socket options on a open connection.
363 ****************************************************************************/
365 void cli_sockopt(struct cli_state
*cli
, const char *options
)
367 set_socket_options(cli
->fd
, options
);
370 /****************************************************************************
371 Set the PID to use for smb messages. Return the old pid.
372 ****************************************************************************/
374 uint16
cli_setpid(struct cli_state
*cli
, uint16 pid
)
376 uint16 ret
= cli
->pid
;
381 /****************************************************************************
382 Set the case sensitivity flag on the packets. Returns old state.
383 ****************************************************************************/
385 bool cli_set_case_sensitive(struct cli_state
*cli
, bool case_sensitive
)
387 bool ret
= cli
->case_sensitive
;
388 cli
->case_sensitive
= case_sensitive
;
392 struct cli_echo_state
{
398 static void cli_echo_done(struct tevent_req
*subreq
);
400 struct tevent_req
*cli_echo_send(TALLOC_CTX
*mem_ctx
, struct event_context
*ev
,
401 struct cli_state
*cli
, uint16_t num_echos
,
404 struct tevent_req
*req
, *subreq
;
405 struct cli_echo_state
*state
;
407 req
= tevent_req_create(mem_ctx
, &state
, struct cli_echo_state
);
411 SSVAL(state
->vwv
, 0, num_echos
);
413 state
->num_echos
= num_echos
;
415 subreq
= cli_smb_send(state
, ev
, cli
, SMBecho
, 0, 1, state
->vwv
,
416 data
.length
, data
.data
);
417 if (subreq
== NULL
) {
420 tevent_req_set_callback(subreq
, cli_echo_done
, req
);
427 static void cli_echo_done(struct tevent_req
*subreq
)
429 struct tevent_req
*req
= tevent_req_callback_data(
430 subreq
, struct tevent_req
);
431 struct cli_echo_state
*state
= tevent_req_data(
432 req
, struct cli_echo_state
);
438 status
= cli_smb_recv(subreq
, state
, &inbuf
, 0, NULL
, NULL
,
440 if (!NT_STATUS_IS_OK(status
)) {
441 tevent_req_nterror(req
, status
);
444 if ((num_bytes
!= state
->data
.length
)
445 || (memcmp(bytes
, state
->data
.data
, num_bytes
) != 0)) {
446 tevent_req_nterror(req
, NT_STATUS_INVALID_NETWORK_RESPONSE
);
450 state
->num_echos
-=1;
451 if (state
->num_echos
== 0) {
452 tevent_req_done(req
);
456 if (!cli_smb_req_set_pending(subreq
)) {
457 tevent_req_nterror(req
, NT_STATUS_NO_MEMORY
);
463 * Get the result out from an echo request
464 * @param[in] req The async_req from cli_echo_send
465 * @retval Did the server reply correctly?
468 NTSTATUS
cli_echo_recv(struct tevent_req
*req
)
470 return tevent_req_simple_recv_ntstatus(req
);
474 * @brief Send/Receive SMBEcho requests
475 * @param[in] mem_ctx The memory context to put the async_req on
476 * @param[in] ev The event context that will call us back
477 * @param[in] cli The connection to send the echo to
478 * @param[in] num_echos How many times do we want to get the reply?
479 * @param[in] data The data we want to get back
480 * @retval Did the server reply correctly?
483 NTSTATUS
cli_echo(struct cli_state
*cli
, uint16_t num_echos
, DATA_BLOB data
)
485 TALLOC_CTX
*frame
= talloc_stackframe();
486 struct event_context
*ev
;
487 struct tevent_req
*req
;
488 NTSTATUS status
= NT_STATUS_OK
;
490 if (cli_has_async_calls(cli
)) {
492 * Can't use sync call while an async call is in flight
494 status
= NT_STATUS_INVALID_PARAMETER
;
498 ev
= event_context_init(frame
);
500 status
= NT_STATUS_NO_MEMORY
;
504 req
= cli_echo_send(frame
, ev
, cli
, num_echos
, data
);
506 status
= NT_STATUS_NO_MEMORY
;
510 if (!tevent_req_poll(req
, ev
)) {
511 status
= map_nt_error_from_unix(errno
);
515 status
= cli_echo_recv(req
);
518 if (!NT_STATUS_IS_OK(status
)) {
519 cli_set_error(cli
, status
);
525 * Is the SMB command able to hold an AND_X successor
526 * @param[in] cmd The SMB command in question
527 * @retval Can we add a chained request after "cmd"?
529 bool is_andx_req(uint8_t cmd
)
549 NTSTATUS
cli_smb(TALLOC_CTX
*mem_ctx
, struct cli_state
*cli
,
550 uint8_t smb_command
, uint8_t additional_flags
,
551 uint8_t wct
, uint16_t *vwv
,
552 uint32_t num_bytes
, const uint8_t *bytes
,
553 struct tevent_req
**result_parent
,
554 uint8_t min_wct
, uint8_t *pwct
, uint16_t **pvwv
,
555 uint32_t *pnum_bytes
, uint8_t **pbytes
)
557 struct tevent_context
*ev
;
558 struct tevent_req
*req
= NULL
;
559 NTSTATUS status
= NT_STATUS_NO_MEMORY
;
561 if (cli_has_async_calls(cli
)) {
562 return NT_STATUS_INVALID_PARAMETER
;
564 ev
= tevent_context_init(mem_ctx
);
568 req
= cli_smb_send(mem_ctx
, ev
, cli
, smb_command
, additional_flags
,
569 wct
, vwv
, num_bytes
, bytes
);
573 if (!tevent_req_poll_ntstatus(req
, ev
, &status
)) {
576 status
= cli_smb_recv(req
, NULL
, NULL
, min_wct
, pwct
, pvwv
,
580 if (NT_STATUS_IS_OK(status
) && (result_parent
!= NULL
)) {
581 *result_parent
= req
;