2 Unix SMB/CIFS implementation.
3 client connect/disconnect routines
4 Copyright (C) Andrew Tridgell 1994-1998
5 Copyright (C) Andrew Bartlett 2001-2003
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/>.
27 {PROTOCOL_CORE, "PC NETWORK PROGRAM 1.0"},
28 {PROTOCOL_COREPLUS, "MICROSOFT NETWORKS 1.03"},
29 {PROTOCOL_LANMAN1, "MICROSOFT NETWORKS 3.0"},
30 {PROTOCOL_LANMAN1, "LANMAN1.0"},
31 {PROTOCOL_LANMAN2, "LM1.2X002"},
32 {PROTOCOL_LANMAN2, "DOS LANMAN2.1"},
33 {PROTOCOL_LANMAN2, "LANMAN2.1"},
34 {PROTOCOL_LANMAN2, "Samba"},
35 {PROTOCOL_NT1, "NT LANMAN 1.0"},
36 {PROTOCOL_NT1, "NT LM 0.12"},
39 #define STAR_SMBSERVER "*SMBSERVER"
42 * Set the user session key for a connection
43 * @param cli The cli structure to add it too
44 * @param session_key The session key used. (A copy of this is taken for the cli struct)
48 static void cli_set_session_key (struct cli_state *cli, const DATA_BLOB session_key)
50 cli->user_session_key = data_blob(session_key.data, session_key.length);
53 /****************************************************************************
54 Do an old lanman2 style session setup.
55 ****************************************************************************/
57 static NTSTATUS cli_session_setup_lanman2(struct cli_state *cli,
59 const char *pass, size_t passlen,
60 const char *workgroup)
62 DATA_BLOB session_key = data_blob_null;
63 DATA_BLOB lm_response = data_blob_null;
68 if (passlen > sizeof(pword)-1) {
69 return NT_STATUS_INVALID_PARAMETER;
72 /* LANMAN servers predate NT status codes and Unicode and ignore those
73 smb flags so we must disable the corresponding default capabilities
74 that would otherwise cause the Unicode and NT Status flags to be
75 set (and even returned by the server) */
77 cli->capabilities &= ~(CAP_UNICODE | CAP_STATUS32);
79 /* if in share level security then don't send a password now */
80 if (!(cli->sec_mode & NEGOTIATE_SECURITY_USER_LEVEL))
83 if (passlen > 0 && (cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) && passlen != 24) {
84 /* Encrypted mode needed, and non encrypted password supplied. */
85 lm_response = data_blob(NULL, 24);
86 if (!SMBencrypt(pass, cli->secblob.data,(uchar *)lm_response.data)) {
87 DEBUG(1, ("Password is > 14 chars in length, and is therefore incompatible with Lanman authentication\n"));
88 return NT_STATUS_ACCESS_DENIED;
90 } else if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) && passlen == 24) {
91 /* Encrypted mode needed, and encrypted password supplied. */
92 lm_response = data_blob(pass, passlen);
93 } else if (passlen > 0) {
94 /* Plaintext mode needed, assume plaintext supplied. */
95 passlen = clistr_push(cli, pword, pass, sizeof(pword), STR_TERMINATE);
96 lm_response = data_blob(pass, passlen);
99 /* send a session setup command */
100 memset(cli->outbuf,'\0',smb_size);
101 cli_set_message(cli->outbuf,10, 0, True);
102 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
103 cli_setup_packet(cli);
105 SCVAL(cli->outbuf,smb_vwv0,0xFF);
106 SSVAL(cli->outbuf,smb_vwv2,cli->max_xmit);
107 SSVAL(cli->outbuf,smb_vwv3,2);
108 SSVAL(cli->outbuf,smb_vwv4,1);
109 SIVAL(cli->outbuf,smb_vwv5,cli->sesskey);
110 SSVAL(cli->outbuf,smb_vwv7,lm_response.length);
112 p = smb_buf(cli->outbuf);
113 memcpy(p,lm_response.data,lm_response.length);
114 p += lm_response.length;
115 p += clistr_push(cli, p, user, -1, STR_TERMINATE|STR_UPPER);
116 p += clistr_push(cli, p, workgroup, -1, STR_TERMINATE|STR_UPPER);
117 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
118 p += clistr_push(cli, p, "Samba", -1, STR_TERMINATE);
119 cli_setup_bcc(cli, p);
121 if (!cli_send_smb(cli) || !cli_receive_smb(cli)) {
122 return cli_nt_error(cli);
125 show_msg(cli->inbuf);
127 if (cli_is_error(cli)) {
128 return cli_nt_error(cli);
131 /* use the returned vuid from now on */
132 cli->vuid = SVAL(cli->inbuf,smb_uid);
133 status = cli_set_username(cli, user);
134 if (!NT_STATUS_IS_OK(status)) {
138 if (session_key.data) {
139 /* Have plaintext orginal */
140 cli_set_session_key(cli, session_key);
146 /****************************************************************************
147 Work out suitable capabilities to offer the server.
148 ****************************************************************************/
150 static uint32 cli_session_setup_capabilities(struct cli_state *cli)
152 uint32 capabilities = CAP_NT_SMBS;
154 if (!cli->force_dos_errors)
155 capabilities |= CAP_STATUS32;
157 if (cli->use_level_II_oplocks)
158 capabilities |= CAP_LEVEL_II_OPLOCKS;
160 capabilities |= (cli->capabilities & (CAP_UNICODE|CAP_LARGE_FILES|CAP_LARGE_READX|CAP_LARGE_WRITEX|CAP_DFS));
164 /****************************************************************************
165 Do a NT1 guest session setup.
166 ****************************************************************************/
168 struct async_req *cli_session_setup_guest_send(TALLOC_CTX *mem_ctx,
169 struct event_context *ev,
170 struct cli_state *cli)
172 struct async_req *result;
176 SCVAL(vwv+0, 0, 0xFF);
179 SSVAL(vwv+2, 0, CLI_BUFFER_SIZE);
181 SSVAL(vwv+4, 0, cli->pid);
182 SIVAL(vwv+5, 0, cli->sesskey);
187 SIVAL(vwv+11, 0, cli_session_setup_capabilities(cli));
189 bytes = talloc_array(talloc_tos(), uint8_t, 0);
191 bytes = smb_bytes_push_str(bytes, cli_ucs2(cli), "", 1, /* username */
193 bytes = smb_bytes_push_str(bytes, cli_ucs2(cli), "", 1, /* workgroup */
195 bytes = smb_bytes_push_str(bytes, cli_ucs2(cli), "Unix", 5, NULL);
196 bytes = smb_bytes_push_str(bytes, cli_ucs2(cli), "Samba", 6, NULL);
202 result = cli_request_send(mem_ctx, ev, cli, SMBsesssetupX, 0,
203 13, vwv, 0, talloc_get_size(bytes), bytes);
208 NTSTATUS cli_session_setup_guest_recv(struct async_req *req)
210 struct cli_request *cli_req = talloc_get_type_abort(
211 req->private_data, struct cli_request);
212 struct cli_state *cli = cli_req->cli;
220 if (async_req_is_nterror(req, &status)) {
224 status = cli_pull_reply(req, &wct, &vwv, &num_bytes, &bytes);
225 if (!NT_STATUS_IS_OK(status)) {
231 cli->vuid = SVAL(cli_req->inbuf, smb_uid);
233 p += clistr_pull(cli_req->inbuf, cli->server_os, (char *)p,
234 sizeof(fstring), bytes+num_bytes-p, STR_TERMINATE);
235 p += clistr_pull(cli_req->inbuf, cli->server_type, (char *)p,
236 sizeof(fstring), bytes+num_bytes-p, STR_TERMINATE);
237 p += clistr_pull(cli_req->inbuf, cli->server_domain, (char *)p,
238 sizeof(fstring), bytes+num_bytes-p, STR_TERMINATE);
240 if (strstr(cli->server_type, "Samba")) {
241 cli->is_samba = True;
244 status = cli_set_username(cli, "");
245 if (!NT_STATUS_IS_OK(status)) {
252 static NTSTATUS cli_session_setup_guest(struct cli_state *cli)
254 TALLOC_CTX *frame = talloc_stackframe();
255 struct event_context *ev;
256 struct async_req *req;
259 if (cli->fd_event != NULL) {
261 * Can't use sync call while an async call is in flight
263 status = NT_STATUS_INVALID_PARAMETER;
267 ev = event_context_init(frame);
269 status = NT_STATUS_NO_MEMORY;
273 req = cli_session_setup_guest_send(frame, ev, cli);
275 status = NT_STATUS_NO_MEMORY;
279 while (req->state < ASYNC_REQ_DONE) {
283 status = cli_session_setup_guest_recv(req);
289 /****************************************************************************
290 Do a NT1 plaintext session setup.
291 ****************************************************************************/
293 static NTSTATUS cli_session_setup_plaintext(struct cli_state *cli,
294 const char *user, const char *pass,
295 const char *workgroup)
297 uint32 capabilities = cli_session_setup_capabilities(cli);
302 fstr_sprintf( lanman, "Samba %s", samba_version_string());
304 memset(cli->outbuf, '\0', smb_size);
305 cli_set_message(cli->outbuf,13,0,True);
306 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
307 cli_setup_packet(cli);
309 SCVAL(cli->outbuf,smb_vwv0,0xFF);
310 SSVAL(cli->outbuf,smb_vwv2,CLI_BUFFER_SIZE);
311 SSVAL(cli->outbuf,smb_vwv3,2);
312 SSVAL(cli->outbuf,smb_vwv4,cli->pid);
313 SIVAL(cli->outbuf,smb_vwv5,cli->sesskey);
314 SSVAL(cli->outbuf,smb_vwv8,0);
315 SIVAL(cli->outbuf,smb_vwv11,capabilities);
316 p = smb_buf(cli->outbuf);
318 /* check wether to send the ASCII or UNICODE version of the password */
320 if ( (capabilities & CAP_UNICODE) == 0 ) {
321 p += clistr_push(cli, p, pass, -1, STR_TERMINATE); /* password */
322 SSVAL(cli->outbuf,smb_vwv7,PTR_DIFF(p, smb_buf(cli->outbuf)));
325 /* For ucs2 passwords clistr_push calls ucs2_align, which causes
326 * the space taken by the unicode password to be one byte too
327 * long (as we're on an odd byte boundary here). Reduce the
328 * count by 1 to cope with this. Fixes smbclient against NetApp
329 * servers which can't cope. Fix from
330 * bryan.kolodziej@allenlund.com in bug #3840.
332 p += clistr_push(cli, p, pass, -1, STR_UNICODE|STR_TERMINATE); /* unicode password */
333 SSVAL(cli->outbuf,smb_vwv8,PTR_DIFF(p, smb_buf(cli->outbuf))-1);
336 p += clistr_push(cli, p, user, -1, STR_TERMINATE); /* username */
337 p += clistr_push(cli, p, workgroup, -1, STR_TERMINATE); /* workgroup */
338 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
339 p += clistr_push(cli, p, lanman, -1, STR_TERMINATE);
340 cli_setup_bcc(cli, p);
342 if (!cli_send_smb(cli) || !cli_receive_smb(cli)) {
343 return cli_nt_error(cli);
346 show_msg(cli->inbuf);
348 if (cli_is_error(cli)) {
349 return cli_nt_error(cli);
352 cli->vuid = SVAL(cli->inbuf,smb_uid);
353 p = smb_buf(cli->inbuf);
354 p += clistr_pull(cli->inbuf, cli->server_os, p, sizeof(fstring),
356 p += clistr_pull(cli->inbuf, cli->server_type, p, sizeof(fstring),
358 p += clistr_pull(cli->inbuf, cli->server_domain, p, sizeof(fstring),
360 status = cli_set_username(cli, user);
361 if (!NT_STATUS_IS_OK(status)) {
364 if (strstr(cli->server_type, "Samba")) {
365 cli->is_samba = True;
371 /****************************************************************************
372 do a NT1 NTLM/LM encrypted session setup - for when extended security
374 @param cli client state to create do session setup on
376 @param pass *either* cleartext password (passlen !=24) or LM response.
377 @param ntpass NT response, implies ntpasslen >=24, implies pass is not clear
378 @param workgroup The user's domain.
379 ****************************************************************************/
381 static NTSTATUS cli_session_setup_nt1(struct cli_state *cli, const char *user,
382 const char *pass, size_t passlen,
383 const char *ntpass, size_t ntpasslen,
384 const char *workgroup)
386 uint32 capabilities = cli_session_setup_capabilities(cli);
387 DATA_BLOB lm_response = data_blob_null;
388 DATA_BLOB nt_response = data_blob_null;
389 DATA_BLOB session_key = data_blob_null;
395 /* do nothing - guest login */
396 } else if (passlen != 24) {
397 if (lp_client_ntlmv2_auth()) {
398 DATA_BLOB server_chal;
399 DATA_BLOB names_blob;
400 server_chal = data_blob(cli->secblob.data, MIN(cli->secblob.length, 8));
402 /* note that the 'workgroup' here is a best guess - we don't know
403 the server's domain at this point. The 'server name' is also
406 names_blob = NTLMv2_generate_names_blob(cli->called.name, workgroup);
408 if (!SMBNTLMv2encrypt(user, workgroup, pass, &server_chal,
410 &lm_response, &nt_response, &session_key)) {
411 data_blob_free(&names_blob);
412 data_blob_free(&server_chal);
413 return NT_STATUS_ACCESS_DENIED;
415 data_blob_free(&names_blob);
416 data_blob_free(&server_chal);
420 E_md4hash(pass, nt_hash);
423 nt_response = data_blob_null;
425 nt_response = data_blob(NULL, 24);
426 SMBNTencrypt(pass,cli->secblob.data,nt_response.data);
428 /* non encrypted password supplied. Ignore ntpass. */
429 if (lp_client_lanman_auth()) {
430 lm_response = data_blob(NULL, 24);
431 if (!SMBencrypt(pass,cli->secblob.data, lm_response.data)) {
432 /* Oops, the LM response is invalid, just put
433 the NT response there instead */
434 data_blob_free(&lm_response);
435 lm_response = data_blob(nt_response.data, nt_response.length);
438 /* LM disabled, place NT# in LM field instead */
439 lm_response = data_blob(nt_response.data, nt_response.length);
442 session_key = data_blob(NULL, 16);
444 E_deshash(pass, session_key.data);
445 memset(&session_key.data[8], '\0', 8);
447 SMBsesskeygen_ntv1(nt_hash, NULL, session_key.data);
450 cli_temp_set_signing(cli);
452 /* pre-encrypted password supplied. Only used for
453 security=server, can't do
454 signing because we don't have original key */
456 lm_response = data_blob(pass, passlen);
457 nt_response = data_blob(ntpass, ntpasslen);
460 /* send a session setup command */
461 memset(cli->outbuf,'\0',smb_size);
463 cli_set_message(cli->outbuf,13,0,True);
464 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
465 cli_setup_packet(cli);
467 SCVAL(cli->outbuf,smb_vwv0,0xFF);
468 SSVAL(cli->outbuf,smb_vwv2,CLI_BUFFER_SIZE);
469 SSVAL(cli->outbuf,smb_vwv3,2);
470 SSVAL(cli->outbuf,smb_vwv4,cli->pid);
471 SIVAL(cli->outbuf,smb_vwv5,cli->sesskey);
472 SSVAL(cli->outbuf,smb_vwv7,lm_response.length);
473 SSVAL(cli->outbuf,smb_vwv8,nt_response.length);
474 SIVAL(cli->outbuf,smb_vwv11,capabilities);
475 p = smb_buf(cli->outbuf);
476 if (lm_response.length) {
477 memcpy(p,lm_response.data, lm_response.length); p += lm_response.length;
479 if (nt_response.length) {
480 memcpy(p,nt_response.data, nt_response.length); p += nt_response.length;
482 p += clistr_push(cli, p, user, -1, STR_TERMINATE);
484 /* Upper case here might help some NTLMv2 implementations */
485 p += clistr_push(cli, p, workgroup, -1, STR_TERMINATE|STR_UPPER);
486 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
487 p += clistr_push(cli, p, "Samba", -1, STR_TERMINATE);
488 cli_setup_bcc(cli, p);
490 if (!cli_send_smb(cli) || !cli_receive_smb(cli)) {
491 result = cli_nt_error(cli);
495 /* show_msg(cli->inbuf); */
497 if (cli_is_error(cli)) {
498 result = cli_nt_error(cli);
503 ok = cli_simple_set_signing(cli, session_key, lm_response);
505 ok = cli_simple_set_signing(cli, session_key, nt_response);
508 if (!cli_check_sign_mac(cli, cli->inbuf, 1)) {
509 result = NT_STATUS_ACCESS_DENIED;
514 /* use the returned vuid from now on */
515 cli->vuid = SVAL(cli->inbuf,smb_uid);
517 p = smb_buf(cli->inbuf);
518 p += clistr_pull(cli->inbuf, cli->server_os, p, sizeof(fstring),
520 p += clistr_pull(cli->inbuf, cli->server_type, p, sizeof(fstring),
522 p += clistr_pull(cli->inbuf, cli->server_domain, p, sizeof(fstring),
525 if (strstr(cli->server_type, "Samba")) {
526 cli->is_samba = True;
529 result = cli_set_username(cli, user);
530 if (!NT_STATUS_IS_OK(result)) {
534 if (session_key.data) {
535 /* Have plaintext orginal */
536 cli_set_session_key(cli, session_key);
539 result = NT_STATUS_OK;
541 data_blob_free(&lm_response);
542 data_blob_free(&nt_response);
543 data_blob_free(&session_key);
547 /****************************************************************************
548 Send a extended security session setup blob
549 ****************************************************************************/
551 static bool cli_session_setup_blob_send(struct cli_state *cli, DATA_BLOB blob)
553 uint32 capabilities = cli_session_setup_capabilities(cli);
556 capabilities |= CAP_EXTENDED_SECURITY;
558 /* send a session setup command */
559 memset(cli->outbuf,'\0',smb_size);
561 cli_set_message(cli->outbuf,12,0,True);
562 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
564 cli_setup_packet(cli);
566 SCVAL(cli->outbuf,smb_vwv0,0xFF);
567 SSVAL(cli->outbuf,smb_vwv2,CLI_BUFFER_SIZE);
568 SSVAL(cli->outbuf,smb_vwv3,2);
569 SSVAL(cli->outbuf,smb_vwv4,1);
570 SIVAL(cli->outbuf,smb_vwv5,0);
571 SSVAL(cli->outbuf,smb_vwv7,blob.length);
572 SIVAL(cli->outbuf,smb_vwv10,capabilities);
573 p = smb_buf(cli->outbuf);
574 memcpy(p, blob.data, blob.length);
576 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
577 p += clistr_push(cli, p, "Samba", -1, STR_TERMINATE);
578 cli_setup_bcc(cli, p);
579 return cli_send_smb(cli);
582 /****************************************************************************
583 Send a extended security session setup blob, returning a reply blob.
584 ****************************************************************************/
586 static DATA_BLOB cli_session_setup_blob_receive(struct cli_state *cli)
588 DATA_BLOB blob2 = data_blob_null;
592 if (!cli_receive_smb(cli))
595 show_msg(cli->inbuf);
597 if (cli_is_error(cli) && !NT_STATUS_EQUAL(cli_nt_error(cli),
598 NT_STATUS_MORE_PROCESSING_REQUIRED)) {
602 /* use the returned vuid from now on */
603 cli->vuid = SVAL(cli->inbuf,smb_uid);
605 p = smb_buf(cli->inbuf);
607 blob2 = data_blob(p, SVAL(cli->inbuf, smb_vwv3));
610 p += clistr_pull(cli->inbuf, cli->server_os, p, sizeof(fstring),
613 /* w2k with kerberos doesn't properly null terminate this field */
614 len = smb_bufrem(cli->inbuf, p);
615 p += clistr_pull(cli->inbuf, cli->server_type, p, sizeof(fstring),
622 /****************************************************************************
623 Send a extended security session setup blob, returning a reply blob.
624 ****************************************************************************/
626 /* The following is calculated from :
628 * (smb_wcnt * 2) = 24 (smb_wcnt == 12 in cli_session_setup_blob_send() )
629 * (strlen("Unix") + 1 + strlen("Samba") + 1) * 2 = 22 (unicode strings at
633 #define BASE_SESSSETUP_BLOB_PACKET_SIZE (35 + 24 + 22)
635 static bool cli_session_setup_blob(struct cli_state *cli, DATA_BLOB blob)
637 int32 remaining = blob.length;
639 DATA_BLOB send_blob = data_blob_null;
640 int32 max_blob_size = 0;
641 DATA_BLOB receive_blob = data_blob_null;
643 if (cli->max_xmit < BASE_SESSSETUP_BLOB_PACKET_SIZE + 1) {
644 DEBUG(0,("cli_session_setup_blob: cli->max_xmit too small "
645 "(was %u, need minimum %u)\n",
646 (unsigned int)cli->max_xmit,
647 BASE_SESSSETUP_BLOB_PACKET_SIZE));
648 cli_set_nt_error(cli, NT_STATUS_INVALID_PARAMETER);
652 max_blob_size = cli->max_xmit - BASE_SESSSETUP_BLOB_PACKET_SIZE;
654 while ( remaining > 0) {
655 if (remaining >= max_blob_size) {
656 send_blob.length = max_blob_size;
657 remaining -= max_blob_size;
659 send_blob.length = remaining;
663 send_blob.data = &blob.data[cur];
664 cur += send_blob.length;
666 DEBUG(10, ("cli_session_setup_blob: Remaining (%u) sending (%u) current (%u)\n",
667 (unsigned int)remaining,
668 (unsigned int)send_blob.length,
669 (unsigned int)cur ));
671 if (!cli_session_setup_blob_send(cli, send_blob)) {
672 DEBUG(0, ("cli_session_setup_blob: send failed\n"));
676 receive_blob = cli_session_setup_blob_receive(cli);
677 data_blob_free(&receive_blob);
679 if (cli_is_error(cli) &&
680 !NT_STATUS_EQUAL( cli_get_nt_error(cli),
681 NT_STATUS_MORE_PROCESSING_REQUIRED)) {
682 DEBUG(0, ("cli_session_setup_blob: receive failed "
683 "(%s)\n", nt_errstr(cli_get_nt_error(cli))));
692 /****************************************************************************
693 Use in-memory credentials cache
694 ****************************************************************************/
696 static void use_in_memory_ccache(void) {
697 setenv(KRB5_ENV_CCNAME, "MEMORY:cliconnect", 1);
700 /****************************************************************************
701 Do a spnego/kerberos encrypted session setup.
702 ****************************************************************************/
704 static ADS_STATUS cli_session_setup_kerberos(struct cli_state *cli, const char *principal, const char *workgroup)
706 DATA_BLOB negTokenTarg;
707 DATA_BLOB session_key_krb5;
711 cli_temp_set_signing(cli);
713 DEBUG(2,("Doing kerberos session setup\n"));
715 /* generate the encapsulated kerberos5 ticket */
716 rc = spnego_gen_negTokenTarg(principal, 0, &negTokenTarg, &session_key_krb5, 0, NULL);
719 DEBUG(1, ("cli_session_setup_kerberos: spnego_gen_negTokenTarg failed: %s\n",
721 return ADS_ERROR_KRB5(rc);
725 file_save("negTokenTarg.dat", negTokenTarg.data, negTokenTarg.length);
728 if (!cli_session_setup_blob(cli, negTokenTarg)) {
729 nt_status = cli_nt_error(cli);
733 if (cli_is_error(cli)) {
734 nt_status = cli_nt_error(cli);
735 if (NT_STATUS_IS_OK(nt_status)) {
736 nt_status = NT_STATUS_UNSUCCESSFUL;
741 cli_set_session_key(cli, session_key_krb5);
743 if (cli_simple_set_signing(
744 cli, session_key_krb5, data_blob_null)) {
746 if (!cli_check_sign_mac(cli, cli->inbuf, 1)) {
747 nt_status = NT_STATUS_ACCESS_DENIED;
752 data_blob_free(&negTokenTarg);
753 data_blob_free(&session_key_krb5);
755 return ADS_ERROR_NT(NT_STATUS_OK);
758 data_blob_free(&negTokenTarg);
759 data_blob_free(&session_key_krb5);
761 return ADS_ERROR_NT(nt_status);
763 #endif /* HAVE_KRB5 */
766 /****************************************************************************
767 Do a spnego/NTLMSSP encrypted session setup.
768 ****************************************************************************/
770 static NTSTATUS cli_session_setup_ntlmssp(struct cli_state *cli, const char *user,
771 const char *pass, const char *domain)
773 struct ntlmssp_state *ntlmssp_state;
777 DATA_BLOB blob = data_blob_null;
778 DATA_BLOB blob_in = data_blob_null;
779 DATA_BLOB blob_out = data_blob_null;
781 cli_temp_set_signing(cli);
783 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_client_start(&ntlmssp_state))) {
786 ntlmssp_want_feature(ntlmssp_state, NTLMSSP_FEATURE_SESSION_KEY);
788 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_set_username(ntlmssp_state, user))) {
791 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_set_domain(ntlmssp_state, domain))) {
794 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_set_password(ntlmssp_state, pass))) {
799 nt_status = ntlmssp_update(ntlmssp_state,
801 data_blob_free(&blob_in);
802 if (NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED) || NT_STATUS_IS_OK(nt_status)) {
804 /* and wrap it in a SPNEGO wrapper */
805 msg1 = gen_negTokenInit(OID_NTLMSSP, blob_out);
807 /* wrap it in SPNEGO */
808 msg1 = spnego_gen_auth(blob_out);
811 /* now send that blob on its way */
812 if (!cli_session_setup_blob_send(cli, msg1)) {
813 DEBUG(3, ("Failed to send NTLMSSP/SPNEGO blob to server!\n"));
814 nt_status = NT_STATUS_UNSUCCESSFUL;
816 blob = cli_session_setup_blob_receive(cli);
818 nt_status = cli_nt_error(cli);
819 if (cli_is_error(cli) && NT_STATUS_IS_OK(nt_status)) {
820 if (cli->smb_rw_error == SMB_READ_BAD_SIG) {
821 nt_status = NT_STATUS_ACCESS_DENIED;
823 nt_status = NT_STATUS_UNSUCCESSFUL;
827 data_blob_free(&msg1);
831 if (NT_STATUS_IS_OK(nt_status)) {
832 nt_status = NT_STATUS_UNSUCCESSFUL;
834 } else if ((turn == 1) &&
835 NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED)) {
836 DATA_BLOB tmp_blob = data_blob_null;
837 /* the server might give us back two challenges */
838 if (!spnego_parse_challenge(blob, &blob_in,
840 DEBUG(3,("Failed to parse challenges\n"));
841 nt_status = NT_STATUS_INVALID_PARAMETER;
843 data_blob_free(&tmp_blob);
845 if (!spnego_parse_auth_response(blob, nt_status, OID_NTLMSSP,
847 DEBUG(3,("Failed to parse auth response\n"));
848 if (NT_STATUS_IS_OK(nt_status)
849 || NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED))
850 nt_status = NT_STATUS_INVALID_PARAMETER;
853 data_blob_free(&blob);
854 data_blob_free(&blob_out);
856 } while (NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED));
858 data_blob_free(&blob_in);
860 if (NT_STATUS_IS_OK(nt_status)) {
862 fstrcpy(cli->server_domain, ntlmssp_state->server_domain);
863 cli_set_session_key(cli, ntlmssp_state->session_key);
865 if (cli_simple_set_signing(
866 cli, ntlmssp_state->session_key, data_blob_null)) {
868 if (!cli_check_sign_mac(cli, cli->inbuf, 1)) {
869 nt_status = NT_STATUS_ACCESS_DENIED;
874 /* we have a reference conter on ntlmssp_state, if we are signing
875 then the state will be kept by the signing engine */
877 ntlmssp_end(&ntlmssp_state);
879 if (!NT_STATUS_IS_OK(nt_status)) {
885 /****************************************************************************
886 Do a spnego encrypted session setup.
888 user_domain: The shortname of the domain the user/machine is a member of.
889 dest_realm: The realm we're connecting to, if NULL we use our default realm.
890 ****************************************************************************/
892 ADS_STATUS cli_session_setup_spnego(struct cli_state *cli, const char *user,
893 const char *pass, const char *user_domain,
894 const char * dest_realm)
896 char *principal = NULL;
897 char *OIDs[ASN1_MAX_OIDS];
900 const char *p = NULL;
901 char *account = NULL;
904 DEBUG(3,("Doing spnego session setup (blob length=%lu)\n", (unsigned long)cli->secblob.length));
906 /* the server might not even do spnego */
907 if (cli->secblob.length <= 16) {
908 DEBUG(3,("server didn't supply a full spnego negprot\n"));
913 file_save("negprot.dat", cli->secblob.data, cli->secblob.length);
916 /* there is 16 bytes of GUID before the real spnego packet starts */
917 blob = data_blob(cli->secblob.data+16, cli->secblob.length-16);
919 /* The server sent us the first part of the SPNEGO exchange in the
920 * negprot reply. It is WRONG to depend on the principal sent in the
921 * negprot reply, but right now we do it. If we don't receive one,
922 * we try to best guess, then fall back to NTLM. */
923 if (!spnego_parse_negTokenInit(blob, OIDs, &principal)) {
924 data_blob_free(&blob);
925 return ADS_ERROR_NT(NT_STATUS_INVALID_PARAMETER);
927 data_blob_free(&blob);
929 /* make sure the server understands kerberos */
930 for (i=0;OIDs[i];i++) {
931 DEBUG(3,("got OID=%s\n", OIDs[i]));
932 if (strcmp(OIDs[i], OID_KERBEROS5_OLD) == 0 ||
933 strcmp(OIDs[i], OID_KERBEROS5) == 0) {
934 cli->got_kerberos_mechanism = True;
936 talloc_free(OIDs[i]);
939 DEBUG(3,("got principal=%s\n", principal ? principal : "<null>"));
941 status = cli_set_username(cli, user);
942 if (!NT_STATUS_IS_OK(status)) {
943 return ADS_ERROR_NT(status);
947 /* If password is set we reauthenticate to kerberos server
948 * and do not store results */
950 if (cli->got_kerberos_mechanism && cli->use_kerberos) {
956 use_in_memory_ccache();
957 ret = kerberos_kinit_password(user, pass, 0 /* no time correction for now */, NULL);
960 TALLOC_FREE(principal);
961 DEBUG(0, ("Kinit failed: %s\n", error_message(ret)));
962 if (cli->fallback_after_kerberos)
964 return ADS_ERROR_KRB5(ret);
968 /* If we get a bad principal, try to guess it if
969 we have a valid host NetBIOS name.
971 if (strequal(principal, ADS_IGNORE_PRINCIPAL)) {
972 TALLOC_FREE(principal);
975 if (principal == NULL &&
976 !is_ipaddress(cli->desthost) &&
977 !strequal(STAR_SMBSERVER,
980 char *machine = NULL;
982 DEBUG(3,("cli_session_setup_spnego: got a "
983 "bad server principal, trying to guess ...\n"));
985 host = strchr_m(cli->desthost, '.');
987 machine = SMB_STRNDUP(cli->desthost,
988 host - cli->desthost);
990 machine = SMB_STRDUP(cli->desthost);
992 if (machine == NULL) {
993 return ADS_ERROR_NT(NT_STATUS_NO_MEMORY);
997 realm = SMB_STRDUP(dest_realm);
1000 realm = kerberos_get_default_realm_from_ccache();
1002 if (realm && *realm) {
1003 principal = talloc_asprintf(NULL, "%s$@%s",
1008 return ADS_ERROR_NT(NT_STATUS_NO_MEMORY);
1010 DEBUG(3,("cli_session_setup_spnego: guessed "
1011 "server principal=%s\n",
1012 principal ? principal : "<null>"));
1019 rc = cli_session_setup_kerberos(cli, principal,
1021 if (ADS_ERR_OK(rc) || !cli->fallback_after_kerberos) {
1022 TALLOC_FREE(principal);
1029 TALLOC_FREE(principal);
1033 account = talloc_strdup(talloc_tos(), user);
1035 return ADS_ERROR_NT(NT_STATUS_NO_MEMORY);
1038 /* when falling back to ntlmssp while authenticating with a machine
1039 * account strip off the realm - gd */
1041 if ((p = strchr_m(user, '@')) != NULL) {
1042 account[PTR_DIFF(p,user)] = '\0';
1045 return ADS_ERROR_NT(cli_session_setup_ntlmssp(cli, account, pass, user_domain));
1048 /****************************************************************************
1049 Send a session setup. The username and workgroup is in UNIX character
1050 format and must be converted to DOS codepage format before sending. If the
1051 password is in plaintext, the same should be done.
1052 ****************************************************************************/
1054 NTSTATUS cli_session_setup(struct cli_state *cli,
1056 const char *pass, int passlen,
1057 const char *ntpass, int ntpasslen,
1058 const char *workgroup)
1064 fstrcpy(user2, user);
1073 /* allow for workgroups as part of the username */
1074 if ((p=strchr_m(user2,'\\')) || (p=strchr_m(user2,'/')) ||
1075 (p=strchr_m(user2,*lp_winbind_separator()))) {
1081 if (cli->protocol < PROTOCOL_LANMAN1) {
1082 return NT_STATUS_OK;
1085 /* now work out what sort of session setup we are going to
1086 do. I have split this into separate functions to make the
1087 flow a bit easier to understand (tridge) */
1089 /* if its an older server then we have to use the older request format */
1091 if (cli->protocol < PROTOCOL_NT1) {
1092 if (!lp_client_lanman_auth() && passlen != 24 && (*pass)) {
1093 DEBUG(1, ("Server requested LM password but 'client lanman auth'"
1095 return NT_STATUS_ACCESS_DENIED;
1098 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) == 0 &&
1099 !lp_client_plaintext_auth() && (*pass)) {
1100 DEBUG(1, ("Server requested plaintext password but "
1101 "'client plaintext auth' is disabled\n"));
1102 return NT_STATUS_ACCESS_DENIED;
1105 return cli_session_setup_lanman2(cli, user, pass, passlen,
1109 /* if no user is supplied then we have to do an anonymous connection.
1110 passwords are ignored */
1112 if (!user || !*user)
1113 return cli_session_setup_guest(cli);
1115 /* if the server is share level then send a plaintext null
1116 password at this point. The password is sent in the tree
1119 if ((cli->sec_mode & NEGOTIATE_SECURITY_USER_LEVEL) == 0)
1120 return cli_session_setup_plaintext(cli, user, "", workgroup);
1122 /* if the server doesn't support encryption then we have to use
1123 plaintext. The second password is ignored */
1125 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) == 0) {
1126 if (!lp_client_plaintext_auth() && (*pass)) {
1127 DEBUG(1, ("Server requested plaintext password but "
1128 "'client plaintext auth' is disabled\n"));
1129 return NT_STATUS_ACCESS_DENIED;
1131 return cli_session_setup_plaintext(cli, user, pass, workgroup);
1134 /* if the server supports extended security then use SPNEGO */
1136 if (cli->capabilities & CAP_EXTENDED_SECURITY) {
1137 ADS_STATUS status = cli_session_setup_spnego(cli, user, pass,
1139 if (!ADS_ERR_OK(status)) {
1140 DEBUG(3, ("SPNEGO login failed: %s\n", ads_errstr(status)));
1141 return ads_ntstatus(status);
1146 /* otherwise do a NT1 style session setup */
1147 status = cli_session_setup_nt1(cli, user, pass, passlen,
1148 ntpass, ntpasslen, workgroup);
1149 if (!NT_STATUS_IS_OK(status)) {
1150 DEBUG(3,("cli_session_setup: NT1 session setup "
1151 "failed: %s\n", nt_errstr(status)));
1156 if (strstr(cli->server_type, "Samba")) {
1157 cli->is_samba = True;
1160 return NT_STATUS_OK;
1163 /****************************************************************************
1165 *****************************************************************************/
1167 bool cli_ulogoff(struct cli_state *cli)
1169 memset(cli->outbuf,'\0',smb_size);
1170 cli_set_message(cli->outbuf,2,0,True);
1171 SCVAL(cli->outbuf,smb_com,SMBulogoffX);
1172 cli_setup_packet(cli);
1173 SSVAL(cli->outbuf,smb_vwv0,0xFF);
1174 SSVAL(cli->outbuf,smb_vwv2,0); /* no additional info */
1177 if (!cli_receive_smb(cli))
1180 if (cli_is_error(cli)) {
1188 /****************************************************************************
1190 ****************************************************************************/
1192 struct async_req *cli_tcon_andx_send(TALLOC_CTX *mem_ctx,
1193 struct event_context *ev,
1194 struct cli_state *cli,
1195 const char *share, const char *dev,
1196 const char *pass, int passlen)
1200 struct async_req *result;
1204 fstrcpy(cli->share, share);
1206 /* in user level security don't send a password now */
1207 if (cli->sec_mode & NEGOTIATE_SECURITY_USER_LEVEL) {
1210 } else if (pass == NULL) {
1211 DEBUG(1, ("Server not using user level security and no "
1212 "password supplied.\n"));
1216 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) &&
1217 *pass && passlen != 24) {
1218 if (!lp_client_lanman_auth()) {
1219 DEBUG(1, ("Server requested LANMAN password "
1220 "(share-level security) but "
1221 "'client lanman auth' is disabled\n"));
1226 * Non-encrypted passwords - convert to DOS codepage before
1230 SMBencrypt(pass, cli->secblob.data, (uchar *)pword);
1232 if((cli->sec_mode & (NEGOTIATE_SECURITY_USER_LEVEL
1233 |NEGOTIATE_SECURITY_CHALLENGE_RESPONSE))
1235 if (!lp_client_plaintext_auth() && (*pass)) {
1236 DEBUG(1, ("Server requested plaintext "
1237 "password but 'client plaintext "
1238 "auth' is disabled\n"));
1243 * Non-encrypted passwords - convert to DOS codepage
1246 passlen = clistr_push(cli, pword, pass, sizeof(pword),
1248 if (passlen == -1) {
1249 DEBUG(1, ("clistr_push(pword) failed\n"));
1254 memcpy(pword, pass, passlen);
1259 SCVAL(vwv+0, 0, 0xFF);
1262 SSVAL(vwv+2, 0, TCONX_FLAG_EXTENDED_RESPONSE);
1263 SSVAL(vwv+3, 0, passlen);
1266 bytes = (uint8_t *)talloc_memdup(talloc_tos(), pword, passlen);
1268 bytes = talloc_array(talloc_tos(), uint8_t, 0);
1274 tmp = talloc_asprintf_strupper_m(talloc_tos(), "\\\\%s\\%s",
1275 cli->desthost, share);
1280 bytes = smb_bytes_push_str(bytes, cli_ucs2(cli), tmp, strlen(tmp)+1,
1285 * Add the devicetype
1287 tmp = talloc_strdup_upper(talloc_tos(), dev);
1292 bytes = smb_bytes_push_str(bytes, false, tmp, strlen(tmp)+1, NULL);
1295 if (bytes == NULL) {
1299 result = cli_request_send(mem_ctx, ev, cli, SMBtconX, 0,
1300 4, vwv, 0, talloc_get_size(bytes), bytes);
1306 struct cli_request *state;
1307 if (!async_req_setup(mem_ctx, &result, &state,
1308 struct cli_request)) {
1311 if (async_post_ntstatus(result, ev, NT_STATUS_ACCESS_DENIED)) {
1316 TALLOC_FREE(result);
1320 NTSTATUS cli_tcon_andx_recv(struct async_req *req)
1322 struct cli_request *cli_req = talloc_get_type_abort(
1323 req->private_data, struct cli_request);
1324 struct cli_state *cli = cli_req->cli;
1331 if (async_req_is_nterror(req, &status)) {
1335 status = cli_pull_reply(req, &wct, &vwv, &num_bytes, &bytes);
1336 if (!NT_STATUS_IS_OK(status)) {
1340 clistr_pull(cli_req->inbuf, cli->dev, bytes, sizeof(fstring),
1341 num_bytes, STR_TERMINATE|STR_ASCII);
1343 if ((cli->protocol >= PROTOCOL_NT1) && (num_bytes == 3)) {
1344 /* almost certainly win95 - enable bug fixes */
1349 * Make sure that we have the optional support 16-bit field. WCT > 2.
1350 * Avoids issues when connecting to Win9x boxes sharing files
1353 cli->dfsroot = false;
1355 if ((wct > 2) && (cli->protocol >= PROTOCOL_LANMAN2)) {
1356 cli->dfsroot = ((SVAL(vwv+2, 0) & SMB_SHARE_IN_DFS) != 0);
1359 cli->cnum = SVAL(cli_req->inbuf,smb_tid);
1360 return NT_STATUS_OK;
1363 NTSTATUS cli_tcon_andx(struct cli_state *cli, const char *share,
1364 const char *dev, const char *pass, int passlen)
1366 TALLOC_CTX *frame = talloc_stackframe();
1367 struct event_context *ev;
1368 struct async_req *req;
1371 if (cli->fd_event != NULL) {
1373 * Can't use sync call while an async call is in flight
1375 status = NT_STATUS_INVALID_PARAMETER;
1379 ev = event_context_init(frame);
1381 status = NT_STATUS_NO_MEMORY;
1385 req = cli_tcon_andx_send(frame, ev, cli, share, dev, pass, passlen);
1387 status = NT_STATUS_NO_MEMORY;
1391 while (req->state < ASYNC_REQ_DONE) {
1392 event_loop_once(ev);
1395 status = cli_tcon_andx_recv(req);
1401 /****************************************************************************
1402 Send a tree disconnect.
1403 ****************************************************************************/
1405 bool cli_tdis(struct cli_state *cli)
1407 memset(cli->outbuf,'\0',smb_size);
1408 cli_set_message(cli->outbuf,0,0,True);
1409 SCVAL(cli->outbuf,smb_com,SMBtdis);
1410 SSVAL(cli->outbuf,smb_tid,cli->cnum);
1411 cli_setup_packet(cli);
1414 if (!cli_receive_smb(cli))
1417 if (cli_is_error(cli)) {
1425 /****************************************************************************
1426 Send a negprot command.
1427 ****************************************************************************/
1429 void cli_negprot_sendsync(struct cli_state *cli)
1434 if (cli->protocol < PROTOCOL_NT1)
1435 cli->use_spnego = False;
1437 memset(cli->outbuf,'\0',smb_size);
1439 /* setup the protocol strings */
1440 cli_set_message(cli->outbuf,0,0,True);
1442 p = smb_buf(cli->outbuf);
1443 for (numprots=0; numprots < ARRAY_SIZE(prots); numprots++) {
1444 if (prots[numprots].prot > cli->protocol) {
1448 p += clistr_push(cli, p, prots[numprots].name, -1, STR_TERMINATE);
1451 SCVAL(cli->outbuf,smb_com,SMBnegprot);
1452 cli_setup_bcc(cli, p);
1453 cli_setup_packet(cli);
1455 SCVAL(smb_buf(cli->outbuf),0,2);
1460 /****************************************************************************
1461 Send a negprot command.
1462 ****************************************************************************/
1464 struct async_req *cli_negprot_send(TALLOC_CTX *mem_ctx,
1465 struct event_context *ev,
1466 struct cli_state *cli)
1468 struct async_req *result;
1469 uint8_t *bytes = NULL;
1472 if (cli->protocol < PROTOCOL_NT1)
1473 cli->use_spnego = False;
1475 /* setup the protocol strings */
1476 for (numprots=0; numprots < ARRAY_SIZE(prots); numprots++) {
1478 if (prots[numprots].prot > cli->protocol) {
1481 bytes = (uint8_t *)talloc_append_blob(
1482 talloc_tos(), bytes, data_blob_const(&c, sizeof(c)));
1483 if (bytes == NULL) {
1486 bytes = smb_bytes_push_str(bytes, false,
1487 prots[numprots].name,
1488 strlen(prots[numprots].name)+1,
1490 if (bytes == NULL) {
1495 result = cli_request_send(mem_ctx, ev, cli, SMBnegprot, 0, 0, NULL, 0,
1496 talloc_get_size(bytes), bytes);
1501 NTSTATUS cli_negprot_recv(struct async_req *req)
1503 struct cli_request *cli_req = talloc_get_type_abort(
1504 req->private_data, struct cli_request);
1505 struct cli_state *cli = cli_req->cli;
1513 if (async_req_is_nterror(req, &status)) {
1517 status = cli_pull_reply(req, &wct, &vwv, &num_bytes, &bytes);
1518 if (!NT_STATUS_IS_OK(status)) {
1522 protnum = SVAL(vwv, 0);
1524 if ((protnum >= ARRAY_SIZE(prots))
1525 || (prots[protnum].prot > cli_req->cli->protocol)) {
1526 return NT_STATUS_INVALID_NETWORK_RESPONSE;
1529 cli->protocol = prots[protnum].prot;
1531 if ((cli->protocol < PROTOCOL_NT1) &&
1532 client_is_signing_mandatory(cli)) {
1533 DEBUG(0,("cli_negprot: SMB signing is mandatory and the selected protocol level doesn't support it.\n"));
1534 return NT_STATUS_ACCESS_DENIED;
1537 if (cli->protocol >= PROTOCOL_NT1) {
1539 bool negotiated_smb_signing = false;
1542 cli->sec_mode = CVAL(vwv + 1, 0);
1543 cli->max_mux = SVAL(vwv + 1, 1);
1544 cli->max_xmit = IVAL(vwv + 3, 1);
1545 cli->sesskey = IVAL(vwv + 7, 1);
1546 cli->serverzone = SVALS(vwv + 15, 1);
1547 cli->serverzone *= 60;
1548 /* this time arrives in real GMT */
1549 ts = interpret_long_date(((char *)(vwv+11))+1);
1550 cli->servertime = ts.tv_sec;
1551 cli->secblob = data_blob(bytes, num_bytes);
1552 cli->capabilities = IVAL(vwv + 9, 1);
1553 if (cli->capabilities & CAP_RAW_MODE) {
1554 cli->readbraw_supported = True;
1555 cli->writebraw_supported = True;
1557 /* work out if they sent us a workgroup */
1558 if (!(cli->capabilities & CAP_EXTENDED_SECURITY) &&
1559 smb_buflen(cli->inbuf) > 8) {
1560 clistr_pull(cli->inbuf, cli->server_domain,
1561 bytes+8, sizeof(cli->server_domain),
1563 STR_UNICODE|STR_NOALIGN);
1567 * As signing is slow we only turn it on if either the client or
1568 * the server require it. JRA.
1571 if (cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_REQUIRED) {
1572 /* Fail if server says signing is mandatory and we don't want to support it. */
1573 if (!client_is_signing_allowed(cli)) {
1574 DEBUG(0,("cli_negprot: SMB signing is mandatory and we have disabled it.\n"));
1575 return NT_STATUS_ACCESS_DENIED;
1577 negotiated_smb_signing = true;
1578 } else if (client_is_signing_mandatory(cli) && client_is_signing_allowed(cli)) {
1579 /* Fail if client says signing is mandatory and the server doesn't support it. */
1580 if (!(cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_ENABLED)) {
1581 DEBUG(1,("cli_negprot: SMB signing is mandatory and the server doesn't support it.\n"));
1582 return NT_STATUS_ACCESS_DENIED;
1584 negotiated_smb_signing = true;
1585 } else if (cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_ENABLED) {
1586 negotiated_smb_signing = true;
1589 if (negotiated_smb_signing) {
1590 cli_set_signing_negotiated(cli);
1593 if (cli->capabilities & (CAP_LARGE_READX|CAP_LARGE_WRITEX)) {
1594 SAFE_FREE(cli->outbuf);
1595 SAFE_FREE(cli->inbuf);
1596 cli->outbuf = (char *)SMB_MALLOC(CLI_SAMBA_MAX_LARGE_READX_SIZE+LARGE_WRITEX_HDR_SIZE+SAFETY_MARGIN);
1597 cli->inbuf = (char *)SMB_MALLOC(CLI_SAMBA_MAX_LARGE_READX_SIZE+LARGE_WRITEX_HDR_SIZE+SAFETY_MARGIN);
1598 cli->bufsize = CLI_SAMBA_MAX_LARGE_READX_SIZE + LARGE_WRITEX_HDR_SIZE;
1601 } else if (cli->protocol >= PROTOCOL_LANMAN1) {
1602 cli->use_spnego = False;
1603 cli->sec_mode = SVAL(vwv + 1, 0);
1604 cli->max_xmit = SVAL(vwv + 2, 0);
1605 cli->max_mux = SVAL(vwv + 3, 0);
1606 cli->sesskey = IVAL(vwv + 6, 0);
1607 cli->serverzone = SVALS(vwv + 10, 0);
1608 cli->serverzone *= 60;
1609 /* this time is converted to GMT by make_unix_date */
1610 cli->servertime = cli_make_unix_date(
1611 cli, (char *)(vwv + 8));
1612 cli->readbraw_supported = ((SVAL(vwv + 5, 0) & 0x1) != 0);
1613 cli->writebraw_supported = ((SVAL(vwv + 5, 0) & 0x2) != 0);
1614 cli->secblob = data_blob(bytes, num_bytes);
1616 /* the old core protocol */
1617 cli->use_spnego = False;
1619 cli->serverzone = get_time_zone(time(NULL));
1622 cli->max_xmit = MIN(cli->max_xmit, CLI_BUFFER_SIZE);
1624 /* a way to force ascii SMB */
1625 if (getenv("CLI_FORCE_ASCII"))
1626 cli->capabilities &= ~CAP_UNICODE;
1628 return NT_STATUS_OK;
1631 NTSTATUS cli_negprot(struct cli_state *cli)
1633 TALLOC_CTX *frame = talloc_stackframe();
1634 struct event_context *ev;
1635 struct async_req *req;
1636 NTSTATUS status = NT_STATUS_NO_MEMORY;
1638 if (cli->fd_event != NULL) {
1640 * Can't use sync call while an async call is in flight
1642 cli_set_error(cli, NT_STATUS_INVALID_PARAMETER);
1646 ev = event_context_init(frame);
1651 req = cli_negprot_send(frame, ev, cli);
1656 while (req->state < ASYNC_REQ_DONE) {
1657 event_loop_once(ev);
1660 status = cli_negprot_recv(req);
1666 /****************************************************************************
1667 Send a session request. See rfc1002.txt 4.3 and 4.3.2.
1668 ****************************************************************************/
1670 bool cli_session_request(struct cli_state *cli,
1671 struct nmb_name *calling, struct nmb_name *called)
1677 /* 445 doesn't have session request */
1678 if (cli->port == 445)
1681 memcpy(&(cli->calling), calling, sizeof(*calling));
1682 memcpy(&(cli->called ), called , sizeof(*called ));
1684 /* put in the destination name */
1686 tmp = name_mangle(talloc_tos(), cli->called.name,
1687 cli->called.name_type);
1692 p = cli->outbuf+len;
1693 memcpy(p, tmp, name_len(tmp));
1694 len += name_len(tmp);
1699 tmp = name_mangle(talloc_tos(), cli->calling.name,
1700 cli->calling.name_type);
1705 p = cli->outbuf+len;
1706 memcpy(p, tmp, name_len(tmp));
1707 len += name_len(tmp);
1710 /* send a session request (RFC 1002) */
1711 /* setup the packet length
1712 * Remove four bytes from the length count, since the length
1713 * field in the NBT Session Service header counts the number
1714 * of bytes which follow. The cli_send_smb() function knows
1715 * about this and accounts for those four bytes.
1719 _smb_setlen(cli->outbuf,len);
1720 SCVAL(cli->outbuf,0,0x81);
1723 DEBUG(5,("Sent session request\n"));
1725 if (!cli_receive_smb(cli))
1728 if (CVAL(cli->inbuf,0) == 0x84) {
1729 /* C. Hoch 9/14/95 Start */
1730 /* For information, here is the response structure.
1731 * We do the byte-twiddling to for portability.
1732 struct RetargetResponse{
1734 unsigned char flags;
1740 uint16_t port = (CVAL(cli->inbuf,8)<<8)+CVAL(cli->inbuf,9);
1741 struct in_addr dest_ip;
1744 /* SESSION RETARGET */
1745 putip((char *)&dest_ip,cli->inbuf+4);
1746 in_addr_to_sockaddr_storage(&cli->dest_ss, dest_ip);
1748 status = open_socket_out(&cli->dest_ss, port,
1749 LONG_CONNECT_TIMEOUT, &cli->fd);
1750 if (!NT_STATUS_IS_OK(status)) {
1754 DEBUG(3,("Retargeted\n"));
1756 set_socket_options(cli->fd, lp_socket_options());
1763 DEBUG(0,("Retarget recursion - failing\n"));
1767 ret = cli_session_request(cli, calling, called);
1771 } /* C. Hoch 9/14/95 End */
1773 if (CVAL(cli->inbuf,0) != 0x82) {
1774 /* This is the wrong place to put the error... JRA. */
1775 cli->rap_error = CVAL(cli->inbuf,4);
1785 static void smb_sock_connected(struct tevent_req *req)
1787 struct fd_struct *pfd = tevent_req_callback_data(
1788 req, struct fd_struct);
1792 status = open_socket_out_defer_recv(req, &fd);
1793 if (NT_STATUS_IS_OK(status)) {
1798 static NTSTATUS open_smb_socket(const struct sockaddr_storage *pss,
1799 uint16_t *port, int timeout, int *pfd)
1801 struct event_context *ev;
1802 struct tevent_req *r139, *r445;
1803 struct fd_struct *fd139, *fd445;
1804 NTSTATUS status = NT_STATUS_NO_MEMORY;
1807 return open_socket_out(pss, *port, timeout, pfd);
1810 ev = event_context_init(talloc_tos());
1812 return NT_STATUS_NO_MEMORY;
1815 fd139 = talloc(ev, struct fd_struct);
1816 if (fd139 == NULL) {
1821 fd445 = talloc(ev, struct fd_struct);
1822 if (fd445 == NULL) {
1827 r445 = open_socket_out_defer_send(ev, ev, timeval_set(0, 0),
1829 r139 = open_socket_out_defer_send(ev, ev, timeval_set(0, 3000),
1831 if ((r445 == NULL) || (r139 == NULL)) {
1834 tevent_req_set_callback(r445, smb_sock_connected, fd445);
1835 tevent_req_set_callback(r139, smb_sock_connected, fd139);
1837 while ((fd445->fd == -1) && (fd139->fd == -1)
1838 && (tevent_req_is_in_progress(r139)
1839 || tevent_req_is_in_progress(r445))) {
1840 event_loop_once(ev);
1843 if ((fd139->fd != -1) && (fd445->fd != -1)) {
1848 if (fd445->fd != -1) {
1851 status = NT_STATUS_OK;
1854 if (fd139->fd != -1) {
1857 status = NT_STATUS_OK;
1861 status = open_socket_out_defer_recv(r445, &fd445->fd);
1867 /****************************************************************************
1868 Open the client sockets.
1869 ****************************************************************************/
1871 NTSTATUS cli_connect(struct cli_state *cli,
1873 struct sockaddr_storage *dest_ss)
1876 int name_type = 0x20;
1877 TALLOC_CTX *frame = talloc_stackframe();
1878 unsigned int num_addrs = 0;
1880 struct sockaddr_storage *ss_arr = NULL;
1883 /* reasonable default hostname */
1885 host = STAR_SMBSERVER;
1888 fstrcpy(cli->desthost, host);
1890 /* allow hostnames of the form NAME#xx and do a netbios lookup */
1891 if ((p = strchr(cli->desthost, '#'))) {
1892 name_type = strtol(p+1, NULL, 16);
1896 if (!dest_ss || is_zero_addr((struct sockaddr *)dest_ss)) {
1897 NTSTATUS status =resolve_name_list(frame,
1902 if (!NT_STATUS_IS_OK(status)) {
1904 return NT_STATUS_BAD_NETWORK_NAME;
1908 ss_arr = TALLOC_P(frame, struct sockaddr_storage);
1911 return NT_STATUS_NO_MEMORY;
1916 for (i = 0; i < num_addrs; i++) {
1917 cli->dest_ss = ss_arr[i];
1918 if (getenv("LIBSMB_PROG")) {
1919 cli->fd = sock_exec(getenv("LIBSMB_PROG"));
1921 uint16_t port = cli->port;
1923 status = open_smb_socket(&cli->dest_ss, &port,
1924 cli->timeout, &cli->fd);
1925 if (NT_STATUS_IS_OK(status)) {
1929 if (cli->fd == -1) {
1930 char addr[INET6_ADDRSTRLEN];
1931 print_sockaddr(addr, sizeof(addr), &ss_arr[i]);
1932 DEBUG(2,("Error connecting to %s (%s)\n",
1933 dest_ss?addr:host,strerror(errno)));
1935 /* Exit from loop on first connection. */
1940 if (cli->fd == -1) {
1942 return map_nt_error_from_unix(errno);
1946 *dest_ss = cli->dest_ss;
1949 set_socket_options(cli->fd, lp_socket_options());
1952 return NT_STATUS_OK;
1956 establishes a connection to after the negprot.
1957 @param output_cli A fully initialised cli structure, non-null only on success
1958 @param dest_host The netbios name of the remote host
1959 @param dest_ss (optional) The the destination IP, NULL for name based lookup
1960 @param port (optional) The destination port (0 for default)
1961 @param retry bool. Did this connection fail with a retryable error ?
1964 NTSTATUS cli_start_connection(struct cli_state **output_cli,
1965 const char *my_name,
1966 const char *dest_host,
1967 struct sockaddr_storage *dest_ss, int port,
1968 int signing_state, int flags,
1972 struct nmb_name calling;
1973 struct nmb_name called;
1974 struct cli_state *cli;
1975 struct sockaddr_storage ss;
1981 my_name = global_myname();
1983 if (!(cli = cli_initialise_ex(signing_state))) {
1984 return NT_STATUS_NO_MEMORY;
1987 make_nmb_name(&calling, my_name, 0x0);
1988 make_nmb_name(&called , dest_host, 0x20);
1990 cli_set_port(cli, port);
1991 cli_set_timeout(cli, 10000); /* 10 seconds. */
2001 DEBUG(3,("Connecting to host=%s\n", dest_host));
2003 nt_status = cli_connect(cli, dest_host, &ss);
2004 if (!NT_STATUS_IS_OK(nt_status)) {
2005 char addr[INET6_ADDRSTRLEN];
2006 print_sockaddr(addr, sizeof(addr), &ss);
2007 DEBUG(1,("cli_start_connection: failed to connect to %s (%s). Error %s\n",
2008 nmb_namestr(&called), addr, nt_errstr(nt_status) ));
2016 if (!cli_session_request(cli, &calling, &called)) {
2018 DEBUG(1,("session request to %s failed (%s)\n",
2019 called.name, cli_errstr(cli)));
2020 if ((p=strchr(called.name, '.')) && !is_ipaddress(called.name)) {
2024 if (strcmp(called.name, STAR_SMBSERVER)) {
2025 make_nmb_name(&called , STAR_SMBSERVER, 0x20);
2028 return NT_STATUS_BAD_NETWORK_NAME;
2031 if (flags & CLI_FULL_CONNECTION_DONT_SPNEGO)
2032 cli->use_spnego = False;
2033 else if (flags & CLI_FULL_CONNECTION_USE_KERBEROS)
2034 cli->use_kerberos = True;
2036 if ((flags & CLI_FULL_CONNECTION_FALLBACK_AFTER_KERBEROS) &&
2037 cli->use_kerberos) {
2038 cli->fallback_after_kerberos = true;
2041 nt_status = cli_negprot(cli);
2042 if (!NT_STATUS_IS_OK(nt_status)) {
2043 DEBUG(1, ("failed negprot: %s\n", nt_errstr(nt_status)));
2049 return NT_STATUS_OK;
2054 establishes a connection right up to doing tconX, password specified.
2055 @param output_cli A fully initialised cli structure, non-null only on success
2056 @param dest_host The netbios name of the remote host
2057 @param dest_ip (optional) The the destination IP, NULL for name based lookup
2058 @param port (optional) The destination port (0 for default)
2059 @param service (optional) The share to make the connection to. Should be 'unqualified' in any way.
2060 @param service_type The 'type' of serivice.
2061 @param user Username, unix string
2062 @param domain User's domain
2063 @param password User's password, unencrypted unix string.
2064 @param retry bool. Did this connection fail with a retryable error ?
2067 NTSTATUS cli_full_connection(struct cli_state **output_cli,
2068 const char *my_name,
2069 const char *dest_host,
2070 struct sockaddr_storage *dest_ss, int port,
2071 const char *service, const char *service_type,
2072 const char *user, const char *domain,
2073 const char *password, int flags,
2078 struct cli_state *cli = NULL;
2079 int pw_len = password ? strlen(password)+1 : 0;
2083 if (password == NULL) {
2087 nt_status = cli_start_connection(&cli, my_name, dest_host,
2088 dest_ss, port, signing_state,
2091 if (!NT_STATUS_IS_OK(nt_status)) {
2095 nt_status = cli_session_setup(cli, user, password, pw_len, password,
2097 if (!NT_STATUS_IS_OK(nt_status)) {
2099 if (!(flags & CLI_FULL_CONNECTION_ANONYMOUS_FALLBACK)) {
2100 DEBUG(1,("failed session setup with %s\n",
2101 nt_errstr(nt_status)));
2106 nt_status = cli_session_setup(cli, "", "", 0, "", 0, domain);
2107 if (!NT_STATUS_IS_OK(nt_status)) {
2108 DEBUG(1,("anonymous failed session setup with %s\n",
2109 nt_errstr(nt_status)));
2116 nt_status = cli_tcon_andx(cli, service, service_type, password,
2118 if (!NT_STATUS_IS_OK(nt_status)) {
2119 DEBUG(1,("failed tcon_X with %s\n", nt_errstr(nt_status)));
2121 if (NT_STATUS_IS_OK(nt_status)) {
2122 nt_status = NT_STATUS_UNSUCCESSFUL;
2128 nt_status = cli_init_creds(cli, user, domain, password);
2129 if (!NT_STATUS_IS_OK(nt_status)) {
2135 return NT_STATUS_OK;
2138 /****************************************************************************
2139 Attempt a NetBIOS session request, falling back to *SMBSERVER if needed.
2140 ****************************************************************************/
2142 bool attempt_netbios_session_request(struct cli_state **ppcli, const char *srchost, const char *desthost,
2143 struct sockaddr_storage *pdest_ss)
2145 struct nmb_name calling, called;
2147 make_nmb_name(&calling, srchost, 0x0);
2150 * If the called name is an IP address
2151 * then use *SMBSERVER immediately.
2154 if(is_ipaddress(desthost)) {
2155 make_nmb_name(&called, STAR_SMBSERVER, 0x20);
2157 make_nmb_name(&called, desthost, 0x20);
2160 if (!cli_session_request(*ppcli, &calling, &called)) {
2162 struct nmb_name smbservername;
2164 make_nmb_name(&smbservername, STAR_SMBSERVER, 0x20);
2167 * If the name wasn't *SMBSERVER then
2168 * try with *SMBSERVER if the first name fails.
2171 if (nmb_name_equal(&called, &smbservername)) {
2174 * The name used was *SMBSERVER, don't bother with another name.
2177 DEBUG(0,("attempt_netbios_session_request: %s rejected the session for name *SMBSERVER \
2178 with error %s.\n", desthost, cli_errstr(*ppcli) ));
2183 cli_shutdown(*ppcli);
2185 *ppcli = cli_initialise();
2187 /* Out of memory... */
2191 status = cli_connect(*ppcli, desthost, pdest_ss);
2192 if (!NT_STATUS_IS_OK(status) ||
2193 !cli_session_request(*ppcli, &calling, &smbservername)) {
2194 DEBUG(0,("attempt_netbios_session_request: %s rejected the session for \
2195 name *SMBSERVER with error %s\n", desthost, cli_errstr(*ppcli) ));
2203 /****************************************************************************
2204 Send an old style tcon.
2205 ****************************************************************************/
2206 NTSTATUS cli_raw_tcon(struct cli_state *cli,
2207 const char *service, const char *pass, const char *dev,
2208 uint16 *max_xmit, uint16 *tid)
2212 if (!lp_client_plaintext_auth() && (*pass)) {
2213 DEBUG(1, ("Server requested plaintext password but 'client "
2214 "plaintext auth' is disabled\n"));
2215 return NT_STATUS_ACCESS_DENIED;
2218 memset(cli->outbuf,'\0',smb_size);
2219 memset(cli->inbuf,'\0',smb_size);
2221 cli_set_message(cli->outbuf, 0, 0, True);
2222 SCVAL(cli->outbuf,smb_com,SMBtcon);
2223 cli_setup_packet(cli);
2225 p = smb_buf(cli->outbuf);
2226 *p++ = 4; p += clistr_push(cli, p, service, -1, STR_TERMINATE | STR_NOALIGN);
2227 *p++ = 4; p += clistr_push(cli, p, pass, -1, STR_TERMINATE | STR_NOALIGN);
2228 *p++ = 4; p += clistr_push(cli, p, dev, -1, STR_TERMINATE | STR_NOALIGN);
2230 cli_setup_bcc(cli, p);
2233 if (!cli_receive_smb(cli)) {
2234 return NT_STATUS_UNEXPECTED_NETWORK_ERROR;
2237 if (cli_is_error(cli)) {
2238 return cli_nt_error(cli);
2241 *max_xmit = SVAL(cli->inbuf, smb_vwv0);
2242 *tid = SVAL(cli->inbuf, smb_vwv1);
2244 return NT_STATUS_OK;
2247 /* Return a cli_state pointing at the IPC$ share for the given server */
2249 struct cli_state *get_ipc_connect(char *server,
2250 struct sockaddr_storage *server_ss,
2251 const struct user_auth_info *user_info)
2253 struct cli_state *cli;
2255 uint32_t flags = CLI_FULL_CONNECTION_ANONYMOUS_FALLBACK;
2257 if (user_info->use_kerberos) {
2258 flags |= CLI_FULL_CONNECTION_USE_KERBEROS;
2261 nt_status = cli_full_connection(&cli, NULL, server, server_ss, 0, "IPC$", "IPC",
2262 user_info->username ? user_info->username : "",
2264 user_info->password ? user_info->password : "",
2268 if (NT_STATUS_IS_OK(nt_status)) {
2270 } else if (is_ipaddress(server)) {
2271 /* windows 9* needs a correct NMB name for connections */
2272 fstring remote_name;
2274 if (name_status_find("*", 0, 0, server_ss, remote_name)) {
2275 cli = get_ipc_connect(remote_name, server_ss, user_info);
2284 * Given the IP address of a master browser on the network, return its
2285 * workgroup and connect to it.
2287 * This function is provided to allow additional processing beyond what
2288 * get_ipc_connect_master_ip_bcast() does, e.g. to retrieve the list of master
2289 * browsers and obtain each master browsers' list of domains (in case the
2290 * first master browser is recently on the network and has not yet
2291 * synchronized with other master browsers and therefore does not yet have the
2292 * entire network browse list)
2295 struct cli_state *get_ipc_connect_master_ip(TALLOC_CTX *ctx,
2296 struct ip_service *mb_ip,
2297 const struct user_auth_info *user_info,
2298 char **pp_workgroup_out)
2300 char addr[INET6_ADDRSTRLEN];
2302 struct cli_state *cli;
2303 struct sockaddr_storage server_ss;
2305 *pp_workgroup_out = NULL;
2307 print_sockaddr(addr, sizeof(addr), &mb_ip->ss);
2308 DEBUG(99, ("Looking up name of master browser %s\n",
2312 * Do a name status query to find out the name of the master browser.
2313 * We use <01><02>__MSBROWSE__<02>#01 if *#00 fails because a domain
2314 * master browser will not respond to a wildcard query (or, at least,
2315 * an NT4 server acting as the domain master browser will not).
2317 * We might be able to use ONLY the query on MSBROWSE, but that's not
2318 * yet been tested with all Windows versions, so until it is, leave
2319 * the original wildcard query as the first choice and fall back to
2320 * MSBROWSE if the wildcard query fails.
2322 if (!name_status_find("*", 0, 0x1d, &mb_ip->ss, name) &&
2323 !name_status_find(MSBROWSE, 1, 0x1d, &mb_ip->ss, name)) {
2325 DEBUG(99, ("Could not retrieve name status for %s\n",
2330 if (!find_master_ip(name, &server_ss)) {
2331 DEBUG(99, ("Could not find master ip for %s\n", name));
2335 *pp_workgroup_out = talloc_strdup(ctx, name);
2337 DEBUG(4, ("found master browser %s, %s\n", name, addr));
2339 print_sockaddr(addr, sizeof(addr), &server_ss);
2340 cli = get_ipc_connect(addr, &server_ss, user_info);
2346 * Return the IP address and workgroup of a master browser on the network, and
2350 struct cli_state *get_ipc_connect_master_ip_bcast(TALLOC_CTX *ctx,
2351 const struct user_auth_info *user_info,
2352 char **pp_workgroup_out)
2354 struct ip_service *ip_list;
2355 struct cli_state *cli;
2358 *pp_workgroup_out = NULL;
2360 DEBUG(99, ("Do broadcast lookup for workgroups on local network\n"));
2362 /* Go looking for workgroups by broadcasting on the local network */
2364 if (!NT_STATUS_IS_OK(name_resolve_bcast(MSBROWSE, 1, &ip_list,
2366 DEBUG(99, ("No master browsers responded\n"));
2370 for (i = 0; i < count; i++) {
2371 char addr[INET6_ADDRSTRLEN];
2372 print_sockaddr(addr, sizeof(addr), &ip_list[i].ss);
2373 DEBUG(99, ("Found master browser %s\n", addr));
2375 cli = get_ipc_connect_master_ip(ctx, &ip_list[i],
2376 user_info, pp_workgroup_out);