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;
67 if (passlen > sizeof(pword)-1) {
68 return NT_STATUS_INVALID_PARAMETER;
71 /* LANMAN servers predate NT status codes and Unicode and ignore those
72 smb flags so we must disable the corresponding default capabilities
73 that would otherwise cause the Unicode and NT Status flags to be
74 set (and even returned by the server) */
76 cli->capabilities &= ~(CAP_UNICODE | CAP_STATUS32);
78 /* if in share level security then don't send a password now */
79 if (!(cli->sec_mode & NEGOTIATE_SECURITY_USER_LEVEL))
82 if (passlen > 0 && (cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) && passlen != 24) {
83 /* Encrypted mode needed, and non encrypted password supplied. */
84 lm_response = data_blob(NULL, 24);
85 if (!SMBencrypt(pass, cli->secblob.data,(uchar *)lm_response.data)) {
86 DEBUG(1, ("Password is > 14 chars in length, and is therefore incompatible with Lanman authentication\n"));
87 return NT_STATUS_ACCESS_DENIED;
89 } else if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) && passlen == 24) {
90 /* Encrypted mode needed, and encrypted password supplied. */
91 lm_response = data_blob(pass, passlen);
92 } else if (passlen > 0) {
93 /* Plaintext mode needed, assume plaintext supplied. */
94 passlen = clistr_push(cli, pword, pass, sizeof(pword), STR_TERMINATE);
95 lm_response = data_blob(pass, passlen);
98 /* send a session setup command */
99 memset(cli->outbuf,'\0',smb_size);
100 cli_set_message(cli->outbuf,10, 0, True);
101 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
102 cli_setup_packet(cli);
104 SCVAL(cli->outbuf,smb_vwv0,0xFF);
105 SSVAL(cli->outbuf,smb_vwv2,cli->max_xmit);
106 SSVAL(cli->outbuf,smb_vwv3,2);
107 SSVAL(cli->outbuf,smb_vwv4,1);
108 SIVAL(cli->outbuf,smb_vwv5,cli->sesskey);
109 SSVAL(cli->outbuf,smb_vwv7,lm_response.length);
111 p = smb_buf(cli->outbuf);
112 memcpy(p,lm_response.data,lm_response.length);
113 p += lm_response.length;
114 p += clistr_push(cli, p, user, -1, STR_TERMINATE|STR_UPPER);
115 p += clistr_push(cli, p, workgroup, -1, STR_TERMINATE|STR_UPPER);
116 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
117 p += clistr_push(cli, p, "Samba", -1, STR_TERMINATE);
118 cli_setup_bcc(cli, p);
120 if (!cli_send_smb(cli) || !cli_receive_smb(cli)) {
121 return cli_nt_error(cli);
124 show_msg(cli->inbuf);
126 if (cli_is_error(cli)) {
127 return cli_nt_error(cli);
130 /* use the returned vuid from now on */
131 cli->vuid = SVAL(cli->inbuf,smb_uid);
132 fstrcpy(cli->user_name, user);
134 if (session_key.data) {
135 /* Have plaintext orginal */
136 cli_set_session_key(cli, session_key);
142 /****************************************************************************
143 Work out suitable capabilities to offer the server.
144 ****************************************************************************/
146 static uint32 cli_session_setup_capabilities(struct cli_state *cli)
148 uint32 capabilities = CAP_NT_SMBS;
150 if (!cli->force_dos_errors)
151 capabilities |= CAP_STATUS32;
153 if (cli->use_level_II_oplocks)
154 capabilities |= CAP_LEVEL_II_OPLOCKS;
156 capabilities |= (cli->capabilities & (CAP_UNICODE|CAP_LARGE_FILES|CAP_LARGE_READX|CAP_LARGE_WRITEX|CAP_DFS));
160 /****************************************************************************
161 Do a NT1 guest session setup.
162 ****************************************************************************/
164 static NTSTATUS cli_session_setup_guest(struct cli_state *cli)
167 uint32 capabilities = cli_session_setup_capabilities(cli);
169 memset(cli->outbuf, '\0', smb_size);
170 cli_set_message(cli->outbuf,13,0,True);
171 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
172 cli_setup_packet(cli);
174 SCVAL(cli->outbuf,smb_vwv0,0xFF);
175 SSVAL(cli->outbuf,smb_vwv2,CLI_BUFFER_SIZE);
176 SSVAL(cli->outbuf,smb_vwv3,2);
177 SSVAL(cli->outbuf,smb_vwv4,cli->pid);
178 SIVAL(cli->outbuf,smb_vwv5,cli->sesskey);
179 SSVAL(cli->outbuf,smb_vwv7,0);
180 SSVAL(cli->outbuf,smb_vwv8,0);
181 SIVAL(cli->outbuf,smb_vwv11,capabilities);
182 p = smb_buf(cli->outbuf);
183 p += clistr_push(cli, p, "", -1, STR_TERMINATE); /* username */
184 p += clistr_push(cli, p, "", -1, STR_TERMINATE); /* workgroup */
185 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
186 p += clistr_push(cli, p, "Samba", -1, STR_TERMINATE);
187 cli_setup_bcc(cli, p);
189 if (!cli_send_smb(cli) || !cli_receive_smb(cli)) {
190 return cli_nt_error(cli);
193 show_msg(cli->inbuf);
195 if (cli_is_error(cli)) {
196 return cli_nt_error(cli);
199 cli->vuid = SVAL(cli->inbuf,smb_uid);
201 p = smb_buf(cli->inbuf);
202 p += clistr_pull(cli, cli->server_os, p, sizeof(fstring), -1, STR_TERMINATE);
203 p += clistr_pull(cli, cli->server_type, p, sizeof(fstring), -1, STR_TERMINATE);
204 p += clistr_pull(cli, cli->server_domain, p, sizeof(fstring), -1, STR_TERMINATE);
206 if (strstr(cli->server_type, "Samba")) {
207 cli->is_samba = True;
210 fstrcpy(cli->user_name, "");
215 /****************************************************************************
216 Do a NT1 plaintext session setup.
217 ****************************************************************************/
219 static NTSTATUS cli_session_setup_plaintext(struct cli_state *cli,
220 const char *user, const char *pass,
221 const char *workgroup)
223 uint32 capabilities = cli_session_setup_capabilities(cli);
227 fstr_sprintf( lanman, "Samba %s", samba_version_string());
229 memset(cli->outbuf, '\0', smb_size);
230 cli_set_message(cli->outbuf,13,0,True);
231 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
232 cli_setup_packet(cli);
234 SCVAL(cli->outbuf,smb_vwv0,0xFF);
235 SSVAL(cli->outbuf,smb_vwv2,CLI_BUFFER_SIZE);
236 SSVAL(cli->outbuf,smb_vwv3,2);
237 SSVAL(cli->outbuf,smb_vwv4,cli->pid);
238 SIVAL(cli->outbuf,smb_vwv5,cli->sesskey);
239 SSVAL(cli->outbuf,smb_vwv8,0);
240 SIVAL(cli->outbuf,smb_vwv11,capabilities);
241 p = smb_buf(cli->outbuf);
243 /* check wether to send the ASCII or UNICODE version of the password */
245 if ( (capabilities & CAP_UNICODE) == 0 ) {
246 p += clistr_push(cli, p, pass, -1, STR_TERMINATE); /* password */
247 SSVAL(cli->outbuf,smb_vwv7,PTR_DIFF(p, smb_buf(cli->outbuf)));
250 /* For ucs2 passwords clistr_push calls ucs2_align, which causes
251 * the space taken by the unicode password to be one byte too
252 * long (as we're on an odd byte boundary here). Reduce the
253 * count by 1 to cope with this. Fixes smbclient against NetApp
254 * servers which can't cope. Fix from
255 * bryan.kolodziej@allenlund.com in bug #3840.
257 p += clistr_push(cli, p, pass, -1, STR_UNICODE|STR_TERMINATE); /* unicode password */
258 SSVAL(cli->outbuf,smb_vwv8,PTR_DIFF(p, smb_buf(cli->outbuf))-1);
261 p += clistr_push(cli, p, user, -1, STR_TERMINATE); /* username */
262 p += clistr_push(cli, p, workgroup, -1, STR_TERMINATE); /* workgroup */
263 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
264 p += clistr_push(cli, p, lanman, -1, STR_TERMINATE);
265 cli_setup_bcc(cli, p);
267 if (!cli_send_smb(cli) || !cli_receive_smb(cli)) {
268 return cli_nt_error(cli);
271 show_msg(cli->inbuf);
273 if (cli_is_error(cli)) {
274 return cli_nt_error(cli);
277 cli->vuid = SVAL(cli->inbuf,smb_uid);
278 p = smb_buf(cli->inbuf);
279 p += clistr_pull(cli, cli->server_os, p, sizeof(fstring), -1, STR_TERMINATE);
280 p += clistr_pull(cli, cli->server_type, p, sizeof(fstring), -1, STR_TERMINATE);
281 p += clistr_pull(cli, cli->server_domain, p, sizeof(fstring), -1, STR_TERMINATE);
282 fstrcpy(cli->user_name, user);
284 if (strstr(cli->server_type, "Samba")) {
285 cli->is_samba = True;
291 /****************************************************************************
292 do a NT1 NTLM/LM encrypted session setup - for when extended security
294 @param cli client state to create do session setup on
296 @param pass *either* cleartext password (passlen !=24) or LM response.
297 @param ntpass NT response, implies ntpasslen >=24, implies pass is not clear
298 @param workgroup The user's domain.
299 ****************************************************************************/
301 static NTSTATUS cli_session_setup_nt1(struct cli_state *cli, const char *user,
302 const char *pass, size_t passlen,
303 const char *ntpass, size_t ntpasslen,
304 const char *workgroup)
306 uint32 capabilities = cli_session_setup_capabilities(cli);
307 DATA_BLOB lm_response = data_blob_null;
308 DATA_BLOB nt_response = data_blob_null;
309 DATA_BLOB session_key = data_blob_null;
314 /* do nothing - guest login */
315 } else if (passlen != 24) {
316 if (lp_client_ntlmv2_auth()) {
317 DATA_BLOB server_chal;
318 DATA_BLOB names_blob;
319 server_chal = data_blob(cli->secblob.data, MIN(cli->secblob.length, 8));
321 /* note that the 'workgroup' here is a best guess - we don't know
322 the server's domain at this point. The 'server name' is also
325 names_blob = NTLMv2_generate_names_blob(cli->called.name, workgroup);
327 if (!SMBNTLMv2encrypt(user, workgroup, pass, &server_chal,
329 &lm_response, &nt_response, &session_key)) {
330 data_blob_free(&names_blob);
331 data_blob_free(&server_chal);
332 return NT_STATUS_ACCESS_DENIED;
334 data_blob_free(&names_blob);
335 data_blob_free(&server_chal);
339 E_md4hash(pass, nt_hash);
342 nt_response = data_blob_null;
344 nt_response = data_blob(NULL, 24);
345 SMBNTencrypt(pass,cli->secblob.data,nt_response.data);
347 /* non encrypted password supplied. Ignore ntpass. */
348 if (lp_client_lanman_auth()) {
349 lm_response = data_blob(NULL, 24);
350 if (!SMBencrypt(pass,cli->secblob.data, lm_response.data)) {
351 /* Oops, the LM response is invalid, just put
352 the NT response there instead */
353 data_blob_free(&lm_response);
354 lm_response = data_blob(nt_response.data, nt_response.length);
357 /* LM disabled, place NT# in LM field instead */
358 lm_response = data_blob(nt_response.data, nt_response.length);
361 session_key = data_blob(NULL, 16);
363 E_deshash(pass, session_key.data);
364 memset(&session_key.data[8], '\0', 8);
366 SMBsesskeygen_ntv1(nt_hash, NULL, session_key.data);
370 cli_simple_set_signing(cli, session_key, lm_response);
372 cli_simple_set_signing(cli, session_key, nt_response);
375 /* pre-encrypted password supplied. Only used for
376 security=server, can't do
377 signing because we don't have original key */
379 lm_response = data_blob(pass, passlen);
380 nt_response = data_blob(ntpass, ntpasslen);
383 /* send a session setup command */
384 memset(cli->outbuf,'\0',smb_size);
386 cli_set_message(cli->outbuf,13,0,True);
387 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
388 cli_setup_packet(cli);
390 SCVAL(cli->outbuf,smb_vwv0,0xFF);
391 SSVAL(cli->outbuf,smb_vwv2,CLI_BUFFER_SIZE);
392 SSVAL(cli->outbuf,smb_vwv3,2);
393 SSVAL(cli->outbuf,smb_vwv4,cli->pid);
394 SIVAL(cli->outbuf,smb_vwv5,cli->sesskey);
395 SSVAL(cli->outbuf,smb_vwv7,lm_response.length);
396 SSVAL(cli->outbuf,smb_vwv8,nt_response.length);
397 SIVAL(cli->outbuf,smb_vwv11,capabilities);
398 p = smb_buf(cli->outbuf);
399 if (lm_response.length) {
400 memcpy(p,lm_response.data, lm_response.length); p += lm_response.length;
402 if (nt_response.length) {
403 memcpy(p,nt_response.data, nt_response.length); p += nt_response.length;
405 p += clistr_push(cli, p, user, -1, STR_TERMINATE);
407 /* Upper case here might help some NTLMv2 implementations */
408 p += clistr_push(cli, p, workgroup, -1, STR_TERMINATE|STR_UPPER);
409 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
410 p += clistr_push(cli, p, "Samba", -1, STR_TERMINATE);
411 cli_setup_bcc(cli, p);
413 if (!cli_send_smb(cli) || !cli_receive_smb(cli)) {
414 result = cli_nt_error(cli);
418 /* show_msg(cli->inbuf); */
420 if (cli_is_error(cli)) {
421 result = cli_nt_error(cli);
425 /* use the returned vuid from now on */
426 cli->vuid = SVAL(cli->inbuf,smb_uid);
428 p = smb_buf(cli->inbuf);
429 p += clistr_pull(cli, cli->server_os, p, sizeof(fstring), -1, STR_TERMINATE);
430 p += clistr_pull(cli, cli->server_type, p, sizeof(fstring), -1, STR_TERMINATE);
431 p += clistr_pull(cli, cli->server_domain, p, sizeof(fstring), -1, STR_TERMINATE);
433 if (strstr(cli->server_type, "Samba")) {
434 cli->is_samba = True;
437 fstrcpy(cli->user_name, user);
439 if (session_key.data) {
440 /* Have plaintext orginal */
441 cli_set_session_key(cli, session_key);
444 result = NT_STATUS_OK;
446 data_blob_free(&lm_response);
447 data_blob_free(&nt_response);
448 data_blob_free(&session_key);
452 /****************************************************************************
453 Send a extended security session setup blob
454 ****************************************************************************/
456 static bool cli_session_setup_blob_send(struct cli_state *cli, DATA_BLOB blob)
458 uint32 capabilities = cli_session_setup_capabilities(cli);
461 capabilities |= CAP_EXTENDED_SECURITY;
463 /* send a session setup command */
464 memset(cli->outbuf,'\0',smb_size);
466 cli_set_message(cli->outbuf,12,0,True);
467 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
469 cli_setup_packet(cli);
471 SCVAL(cli->outbuf,smb_vwv0,0xFF);
472 SSVAL(cli->outbuf,smb_vwv2,CLI_BUFFER_SIZE);
473 SSVAL(cli->outbuf,smb_vwv3,2);
474 SSVAL(cli->outbuf,smb_vwv4,1);
475 SIVAL(cli->outbuf,smb_vwv5,0);
476 SSVAL(cli->outbuf,smb_vwv7,blob.length);
477 SIVAL(cli->outbuf,smb_vwv10,capabilities);
478 p = smb_buf(cli->outbuf);
479 memcpy(p, blob.data, blob.length);
481 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
482 p += clistr_push(cli, p, "Samba", -1, STR_TERMINATE);
483 cli_setup_bcc(cli, p);
484 return cli_send_smb(cli);
487 /****************************************************************************
488 Send a extended security session setup blob, returning a reply blob.
489 ****************************************************************************/
491 static DATA_BLOB cli_session_setup_blob_receive(struct cli_state *cli)
493 DATA_BLOB blob2 = data_blob_null;
497 if (!cli_receive_smb(cli))
500 show_msg(cli->inbuf);
502 if (cli_is_error(cli) && !NT_STATUS_EQUAL(cli_nt_error(cli),
503 NT_STATUS_MORE_PROCESSING_REQUIRED)) {
507 /* use the returned vuid from now on */
508 cli->vuid = SVAL(cli->inbuf,smb_uid);
510 p = smb_buf(cli->inbuf);
512 blob2 = data_blob(p, SVAL(cli->inbuf, smb_vwv3));
515 p += clistr_pull(cli, cli->server_os, p, sizeof(fstring), -1, STR_TERMINATE);
517 /* w2k with kerberos doesn't properly null terminate this field */
518 len = smb_bufrem(cli->inbuf, p);
519 p += clistr_pull(cli, cli->server_type, p, sizeof(fstring), len, 0);
525 /****************************************************************************
526 Send a extended security session setup blob, returning a reply blob.
527 ****************************************************************************/
529 /* The following is calculated from :
531 * (smb_wcnt * 2) = 24 (smb_wcnt == 12 in cli_session_setup_blob_send() )
532 * (strlen("Unix") + 1 + strlen("Samba") + 1) * 2 = 22 (unicode strings at
536 #define BASE_SESSSETUP_BLOB_PACKET_SIZE (35 + 24 + 22)
538 static bool cli_session_setup_blob(struct cli_state *cli, DATA_BLOB blob)
540 int32 remaining = blob.length;
542 DATA_BLOB send_blob = data_blob_null;
543 int32 max_blob_size = 0;
544 DATA_BLOB receive_blob = data_blob_null;
546 if (cli->max_xmit < BASE_SESSSETUP_BLOB_PACKET_SIZE + 1) {
547 DEBUG(0,("cli_session_setup_blob: cli->max_xmit too small "
548 "(was %u, need minimum %u)\n",
549 (unsigned int)cli->max_xmit,
550 BASE_SESSSETUP_BLOB_PACKET_SIZE));
551 cli_set_nt_error(cli, NT_STATUS_INVALID_PARAMETER);
555 max_blob_size = cli->max_xmit - BASE_SESSSETUP_BLOB_PACKET_SIZE;
557 while ( remaining > 0) {
558 if (remaining >= max_blob_size) {
559 send_blob.length = max_blob_size;
560 remaining -= max_blob_size;
562 send_blob.length = remaining;
566 send_blob.data = &blob.data[cur];
567 cur += send_blob.length;
569 DEBUG(10, ("cli_session_setup_blob: Remaining (%u) sending (%u) current (%u)\n",
570 (unsigned int)remaining,
571 (unsigned int)send_blob.length,
572 (unsigned int)cur ));
574 if (!cli_session_setup_blob_send(cli, send_blob)) {
575 DEBUG(0, ("cli_session_setup_blob: send failed\n"));
579 receive_blob = cli_session_setup_blob_receive(cli);
580 data_blob_free(&receive_blob);
582 if (cli_is_error(cli) &&
583 !NT_STATUS_EQUAL( cli_get_nt_error(cli),
584 NT_STATUS_MORE_PROCESSING_REQUIRED)) {
585 DEBUG(0, ("cli_session_setup_blob: receive failed "
586 "(%s)\n", nt_errstr(cli_get_nt_error(cli))));
595 /****************************************************************************
596 Use in-memory credentials cache
597 ****************************************************************************/
599 static void use_in_memory_ccache(void) {
600 setenv(KRB5_ENV_CCNAME, "MEMORY:cliconnect", 1);
603 /****************************************************************************
604 Do a spnego/kerberos encrypted session setup.
605 ****************************************************************************/
607 static ADS_STATUS cli_session_setup_kerberos(struct cli_state *cli, const char *principal, const char *workgroup)
609 DATA_BLOB negTokenTarg;
610 DATA_BLOB session_key_krb5;
614 cli_temp_set_signing(cli);
616 DEBUG(2,("Doing kerberos session setup\n"));
618 /* generate the encapsulated kerberos5 ticket */
619 rc = spnego_gen_negTokenTarg(principal, 0, &negTokenTarg, &session_key_krb5, 0, NULL);
622 DEBUG(1, ("cli_session_setup_kerberos: spnego_gen_negTokenTarg failed: %s\n",
624 return ADS_ERROR_KRB5(rc);
628 file_save("negTokenTarg.dat", negTokenTarg.data, negTokenTarg.length);
631 if (!cli_session_setup_blob(cli, negTokenTarg)) {
632 nt_status = cli_nt_error(cli);
636 if (cli_is_error(cli)) {
637 nt_status = cli_nt_error(cli);
638 if (NT_STATUS_IS_OK(nt_status)) {
639 nt_status = NT_STATUS_UNSUCCESSFUL;
644 cli_set_session_key(cli, session_key_krb5);
646 if (cli_simple_set_signing(
647 cli, session_key_krb5, data_blob_null)) {
649 /* 'resign' the last message, so we get the right sequence numbers
650 for checking the first reply from the server */
651 cli_calculate_sign_mac(cli, cli->outbuf);
653 if (!cli_check_sign_mac(cli, cli->inbuf)) {
654 nt_status = NT_STATUS_ACCESS_DENIED;
659 data_blob_free(&negTokenTarg);
660 data_blob_free(&session_key_krb5);
662 return ADS_ERROR_NT(NT_STATUS_OK);
665 data_blob_free(&negTokenTarg);
666 data_blob_free(&session_key_krb5);
668 return ADS_ERROR_NT(nt_status);
670 #endif /* HAVE_KRB5 */
673 /****************************************************************************
674 Do a spnego/NTLMSSP encrypted session setup.
675 ****************************************************************************/
677 static NTSTATUS cli_session_setup_ntlmssp(struct cli_state *cli, const char *user,
678 const char *pass, const char *domain)
680 struct ntlmssp_state *ntlmssp_state;
684 DATA_BLOB blob = data_blob_null;
685 DATA_BLOB blob_in = data_blob_null;
686 DATA_BLOB blob_out = data_blob_null;
688 cli_temp_set_signing(cli);
690 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_client_start(&ntlmssp_state))) {
693 ntlmssp_want_feature(ntlmssp_state, NTLMSSP_FEATURE_SESSION_KEY);
695 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_set_username(ntlmssp_state, user))) {
698 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_set_domain(ntlmssp_state, domain))) {
701 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_set_password(ntlmssp_state, pass))) {
706 nt_status = ntlmssp_update(ntlmssp_state,
708 data_blob_free(&blob_in);
709 if (NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED) || NT_STATUS_IS_OK(nt_status)) {
711 /* and wrap it in a SPNEGO wrapper */
712 msg1 = gen_negTokenInit(OID_NTLMSSP, blob_out);
714 /* wrap it in SPNEGO */
715 msg1 = spnego_gen_auth(blob_out);
718 /* now send that blob on its way */
719 if (!cli_session_setup_blob_send(cli, msg1)) {
720 DEBUG(3, ("Failed to send NTLMSSP/SPNEGO blob to server!\n"));
721 nt_status = NT_STATUS_UNSUCCESSFUL;
723 blob = cli_session_setup_blob_receive(cli);
725 nt_status = cli_nt_error(cli);
726 if (cli_is_error(cli) && NT_STATUS_IS_OK(nt_status)) {
727 if (cli->smb_rw_error == SMB_READ_BAD_SIG) {
728 nt_status = NT_STATUS_ACCESS_DENIED;
730 nt_status = NT_STATUS_UNSUCCESSFUL;
734 data_blob_free(&msg1);
738 if (NT_STATUS_IS_OK(nt_status)) {
739 nt_status = NT_STATUS_UNSUCCESSFUL;
741 } else if ((turn == 1) &&
742 NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED)) {
743 DATA_BLOB tmp_blob = data_blob_null;
744 /* the server might give us back two challenges */
745 if (!spnego_parse_challenge(blob, &blob_in,
747 DEBUG(3,("Failed to parse challenges\n"));
748 nt_status = NT_STATUS_INVALID_PARAMETER;
750 data_blob_free(&tmp_blob);
752 if (!spnego_parse_auth_response(blob, nt_status, OID_NTLMSSP,
754 DEBUG(3,("Failed to parse auth response\n"));
755 if (NT_STATUS_IS_OK(nt_status)
756 || NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED))
757 nt_status = NT_STATUS_INVALID_PARAMETER;
760 data_blob_free(&blob);
761 data_blob_free(&blob_out);
763 } while (NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED));
765 data_blob_free(&blob_in);
767 if (NT_STATUS_IS_OK(nt_status)) {
769 fstrcpy(cli->server_domain, ntlmssp_state->server_domain);
770 cli_set_session_key(cli, ntlmssp_state->session_key);
772 if (cli_simple_set_signing(
773 cli, ntlmssp_state->session_key, data_blob_null)) {
775 /* 'resign' the last message, so we get the right sequence numbers
776 for checking the first reply from the server */
777 cli_calculate_sign_mac(cli, cli->outbuf);
779 if (!cli_check_sign_mac(cli, cli->inbuf)) {
780 nt_status = NT_STATUS_ACCESS_DENIED;
785 /* we have a reference conter on ntlmssp_state, if we are signing
786 then the state will be kept by the signing engine */
788 ntlmssp_end(&ntlmssp_state);
790 if (!NT_STATUS_IS_OK(nt_status)) {
796 /****************************************************************************
797 Do a spnego encrypted session setup.
799 user_domain: The shortname of the domain the user/machine is a member of.
800 dest_realm: The realm we're connecting to, if NULL we use our default realm.
801 ****************************************************************************/
803 ADS_STATUS cli_session_setup_spnego(struct cli_state *cli, const char *user,
804 const char *pass, const char *user_domain,
805 const char * dest_realm)
807 char *principal = NULL;
808 char *OIDs[ASN1_MAX_OIDS];
811 const char *p = NULL;
812 char *account = NULL;
814 DEBUG(3,("Doing spnego session setup (blob length=%lu)\n", (unsigned long)cli->secblob.length));
816 /* the server might not even do spnego */
817 if (cli->secblob.length <= 16) {
818 DEBUG(3,("server didn't supply a full spnego negprot\n"));
823 file_save("negprot.dat", cli->secblob.data, cli->secblob.length);
826 /* there is 16 bytes of GUID before the real spnego packet starts */
827 blob = data_blob(cli->secblob.data+16, cli->secblob.length-16);
829 /* The server sent us the first part of the SPNEGO exchange in the
830 * negprot reply. It is WRONG to depend on the principal sent in the
831 * negprot reply, but right now we do it. If we don't receive one,
832 * we try to best guess, then fall back to NTLM. */
833 if (!spnego_parse_negTokenInit(blob, OIDs, &principal)) {
834 data_blob_free(&blob);
835 return ADS_ERROR_NT(NT_STATUS_INVALID_PARAMETER);
837 data_blob_free(&blob);
839 /* make sure the server understands kerberos */
840 for (i=0;OIDs[i];i++) {
841 DEBUG(3,("got OID=%s\n", OIDs[i]));
842 if (strcmp(OIDs[i], OID_KERBEROS5_OLD) == 0 ||
843 strcmp(OIDs[i], OID_KERBEROS5) == 0) {
844 cli->got_kerberos_mechanism = True;
846 talloc_free(OIDs[i]);
849 DEBUG(3,("got principal=%s\n", principal ? principal : "<null>"));
851 fstrcpy(cli->user_name, user);
854 /* If password is set we reauthenticate to kerberos server
855 * and do not store results */
857 if (cli->got_kerberos_mechanism && cli->use_kerberos) {
863 use_in_memory_ccache();
864 ret = kerberos_kinit_password(user, pass, 0 /* no time correction for now */, NULL);
867 TALLOC_FREE(principal);
868 DEBUG(0, ("Kinit failed: %s\n", error_message(ret)));
869 if (cli->fallback_after_kerberos)
871 return ADS_ERROR_KRB5(ret);
875 /* If we get a bad principal, try to guess it if
876 we have a valid host NetBIOS name.
878 if (strequal(principal, ADS_IGNORE_PRINCIPAL)) {
879 TALLOC_FREE(principal);
882 if (principal == NULL &&
883 !is_ipaddress(cli->desthost) &&
884 !strequal(STAR_SMBSERVER,
887 char *machine = NULL;
889 DEBUG(3,("cli_session_setup_spnego: got a "
890 "bad server principal, trying to guess ...\n"));
892 host = strchr_m(cli->desthost, '.');
894 machine = SMB_STRNDUP(cli->desthost,
895 host - cli->desthost);
897 machine = SMB_STRDUP(cli->desthost);
899 if (machine == NULL) {
900 return ADS_ERROR_NT(NT_STATUS_NO_MEMORY);
904 realm = SMB_STRDUP(dest_realm);
907 realm = kerberos_get_default_realm_from_ccache();
909 if (realm && *realm) {
910 principal = talloc_asprintf(NULL, "%s$@%s",
915 return ADS_ERROR_NT(NT_STATUS_NO_MEMORY);
917 DEBUG(3,("cli_session_setup_spnego: guessed "
918 "server principal=%s\n",
919 principal ? principal : "<null>"));
926 rc = cli_session_setup_kerberos(cli, principal,
928 if (ADS_ERR_OK(rc) || !cli->fallback_after_kerberos) {
929 TALLOC_FREE(principal);
936 TALLOC_FREE(principal);
940 account = talloc_strdup(talloc_tos(), user);
942 return ADS_ERROR_NT(NT_STATUS_NO_MEMORY);
945 /* when falling back to ntlmssp while authenticating with a machine
946 * account strip off the realm - gd */
948 if ((p = strchr_m(user, '@')) != NULL) {
949 account[PTR_DIFF(p,user)] = '\0';
952 return ADS_ERROR_NT(cli_session_setup_ntlmssp(cli, account, pass, user_domain));
955 /****************************************************************************
956 Send a session setup. The username and workgroup is in UNIX character
957 format and must be converted to DOS codepage format before sending. If the
958 password is in plaintext, the same should be done.
959 ****************************************************************************/
961 NTSTATUS cli_session_setup(struct cli_state *cli,
963 const char *pass, int passlen,
964 const char *ntpass, int ntpasslen,
965 const char *workgroup)
971 fstrcpy(user2, user);
980 /* allow for workgroups as part of the username */
981 if ((p=strchr_m(user2,'\\')) || (p=strchr_m(user2,'/')) ||
982 (p=strchr_m(user2,*lp_winbind_separator()))) {
988 if (cli->protocol < PROTOCOL_LANMAN1) {
992 /* now work out what sort of session setup we are going to
993 do. I have split this into separate functions to make the
994 flow a bit easier to understand (tridge) */
996 /* if its an older server then we have to use the older request format */
998 if (cli->protocol < PROTOCOL_NT1) {
999 if (!lp_client_lanman_auth() && passlen != 24 && (*pass)) {
1000 DEBUG(1, ("Server requested LM password but 'client lanman auth'"
1002 return NT_STATUS_ACCESS_DENIED;
1005 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) == 0 &&
1006 !lp_client_plaintext_auth() && (*pass)) {
1007 DEBUG(1, ("Server requested plaintext password but "
1008 "'client plaintext auth' is disabled\n"));
1009 return NT_STATUS_ACCESS_DENIED;
1012 return cli_session_setup_lanman2(cli, user, pass, passlen,
1016 /* if no user is supplied then we have to do an anonymous connection.
1017 passwords are ignored */
1019 if (!user || !*user)
1020 return cli_session_setup_guest(cli);
1022 /* if the server is share level then send a plaintext null
1023 password at this point. The password is sent in the tree
1026 if ((cli->sec_mode & NEGOTIATE_SECURITY_USER_LEVEL) == 0)
1027 return cli_session_setup_plaintext(cli, user, "", workgroup);
1029 /* if the server doesn't support encryption then we have to use
1030 plaintext. The second password is ignored */
1032 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) == 0) {
1033 if (!lp_client_plaintext_auth() && (*pass)) {
1034 DEBUG(1, ("Server requested plaintext password but "
1035 "'client plaintext auth' is disabled\n"));
1036 return NT_STATUS_ACCESS_DENIED;
1038 return cli_session_setup_plaintext(cli, user, pass, workgroup);
1041 /* if the server supports extended security then use SPNEGO */
1043 if (cli->capabilities & CAP_EXTENDED_SECURITY) {
1044 ADS_STATUS status = cli_session_setup_spnego(cli, user, pass,
1046 if (!ADS_ERR_OK(status)) {
1047 DEBUG(3, ("SPNEGO login failed: %s\n", ads_errstr(status)));
1048 return ads_ntstatus(status);
1053 /* otherwise do a NT1 style session setup */
1054 status = cli_session_setup_nt1(cli, user, pass, passlen,
1055 ntpass, ntpasslen, workgroup);
1056 if (!NT_STATUS_IS_OK(status)) {
1057 DEBUG(3,("cli_session_setup: NT1 session setup "
1058 "failed: %s\n", nt_errstr(status)));
1063 if (strstr(cli->server_type, "Samba")) {
1064 cli->is_samba = True;
1067 return NT_STATUS_OK;
1070 /****************************************************************************
1072 *****************************************************************************/
1074 bool cli_ulogoff(struct cli_state *cli)
1076 memset(cli->outbuf,'\0',smb_size);
1077 cli_set_message(cli->outbuf,2,0,True);
1078 SCVAL(cli->outbuf,smb_com,SMBulogoffX);
1079 cli_setup_packet(cli);
1080 SSVAL(cli->outbuf,smb_vwv0,0xFF);
1081 SSVAL(cli->outbuf,smb_vwv2,0); /* no additional info */
1084 if (!cli_receive_smb(cli))
1087 if (cli_is_error(cli)) {
1095 /****************************************************************************
1097 ****************************************************************************/
1099 bool cli_send_tconX(struct cli_state *cli,
1100 const char *share, const char *dev, const char *pass, int passlen)
1102 fstring fullshare, pword;
1104 memset(cli->outbuf,'\0',smb_size);
1105 memset(cli->inbuf,'\0',smb_size);
1107 fstrcpy(cli->share, share);
1109 /* in user level security don't send a password now */
1110 if (cli->sec_mode & NEGOTIATE_SECURITY_USER_LEVEL) {
1114 DEBUG(1, ("Server not using user level security and no password supplied.\n"));
1118 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) &&
1119 *pass && passlen != 24) {
1120 if (!lp_client_lanman_auth()) {
1121 DEBUG(1, ("Server requested LANMAN password "
1122 "(share-level security) but "
1123 "'client lanman auth' is disabled\n"));
1128 * Non-encrypted passwords - convert to DOS codepage before encryption.
1131 SMBencrypt(pass,cli->secblob.data,(uchar *)pword);
1133 if((cli->sec_mode & (NEGOTIATE_SECURITY_USER_LEVEL|NEGOTIATE_SECURITY_CHALLENGE_RESPONSE)) == 0) {
1134 if (!lp_client_plaintext_auth() && (*pass)) {
1135 DEBUG(1, ("Server requested plaintext "
1136 "password but 'client plaintext "
1137 "auth' is disabled\n"));
1142 * Non-encrypted passwords - convert to DOS codepage before using.
1144 passlen = clistr_push(cli, pword, pass, sizeof(pword), STR_TERMINATE);
1148 memcpy(pword, pass, passlen);
1153 slprintf(fullshare, sizeof(fullshare)-1,
1154 "\\\\%s\\%s", cli->desthost, share);
1156 cli_set_message(cli->outbuf,4, 0, True);
1157 SCVAL(cli->outbuf,smb_com,SMBtconX);
1158 cli_setup_packet(cli);
1160 SSVAL(cli->outbuf,smb_vwv0,0xFF);
1161 SSVAL(cli->outbuf,smb_vwv2,TCONX_FLAG_EXTENDED_RESPONSE);
1162 SSVAL(cli->outbuf,smb_vwv3,passlen);
1164 p = smb_buf(cli->outbuf);
1166 memcpy(p,pword,passlen);
1169 p += clistr_push(cli, p, fullshare, -1, STR_TERMINATE |STR_UPPER);
1170 p += clistr_push(cli, p, dev, -1, STR_TERMINATE |STR_UPPER | STR_ASCII);
1172 cli_setup_bcc(cli, p);
1175 if (!cli_receive_smb(cli))
1178 if (cli_is_error(cli))
1181 clistr_pull(cli, cli->dev, smb_buf(cli->inbuf), sizeof(fstring), -1, STR_TERMINATE|STR_ASCII);
1183 if (cli->protocol >= PROTOCOL_NT1 &&
1184 smb_buflen(cli->inbuf) == 3) {
1185 /* almost certainly win95 - enable bug fixes */
1189 /* Make sure that we have the optional support 16-bit field. WCT > 2 */
1190 /* Avoids issues when connecting to Win9x boxes sharing files */
1192 cli->dfsroot = False;
1193 if ( (CVAL(cli->inbuf, smb_wct))>2 && cli->protocol >= PROTOCOL_LANMAN2 )
1194 cli->dfsroot = (SVAL( cli->inbuf, smb_vwv2 ) & SMB_SHARE_IN_DFS) ? True : False;
1196 cli->cnum = SVAL(cli->inbuf,smb_tid);
1200 /****************************************************************************
1201 Send a tree disconnect.
1202 ****************************************************************************/
1204 bool cli_tdis(struct cli_state *cli)
1206 memset(cli->outbuf,'\0',smb_size);
1207 cli_set_message(cli->outbuf,0,0,True);
1208 SCVAL(cli->outbuf,smb_com,SMBtdis);
1209 SSVAL(cli->outbuf,smb_tid,cli->cnum);
1210 cli_setup_packet(cli);
1213 if (!cli_receive_smb(cli))
1216 if (cli_is_error(cli)) {
1224 /****************************************************************************
1225 Send a negprot command.
1226 ****************************************************************************/
1228 void cli_negprot_sendsync(struct cli_state *cli)
1233 if (cli->protocol < PROTOCOL_NT1)
1234 cli->use_spnego = False;
1236 memset(cli->outbuf,'\0',smb_size);
1238 /* setup the protocol strings */
1239 cli_set_message(cli->outbuf,0,0,True);
1241 p = smb_buf(cli->outbuf);
1242 for (numprots=0; numprots < ARRAY_SIZE(prots); numprots++) {
1243 if (prots[numprots].prot > cli->protocol) {
1247 p += clistr_push(cli, p, prots[numprots].name, -1, STR_TERMINATE);
1250 SCVAL(cli->outbuf,smb_com,SMBnegprot);
1251 cli_setup_bcc(cli, p);
1252 cli_setup_packet(cli);
1254 SCVAL(smb_buf(cli->outbuf),0,2);
1259 /****************************************************************************
1260 Send a negprot command.
1261 ****************************************************************************/
1263 struct async_req *cli_negprot_send(TALLOC_CTX *mem_ctx,
1264 struct event_context *ev,
1265 struct cli_state *cli)
1267 struct async_req *result;
1268 uint8_t *bytes = NULL;
1271 if (cli->protocol < PROTOCOL_NT1)
1272 cli->use_spnego = False;
1274 /* setup the protocol strings */
1275 for (numprots=0; numprots < ARRAY_SIZE(prots); numprots++) {
1277 if (prots[numprots].prot > cli->protocol) {
1280 bytes = (uint8_t *)talloc_append_blob(
1281 talloc_tos(), bytes, data_blob_const(&c, sizeof(c)));
1282 if (bytes == NULL) {
1285 bytes = smb_bytes_push_str(bytes, false, prots[numprots].name);
1286 if (bytes == NULL) {
1291 result = cli_request_send(mem_ctx, ev, cli, SMBnegprot, 0, 0, NULL, 0,
1292 talloc_get_size(bytes), bytes);
1297 NTSTATUS cli_negprot_recv(struct async_req *req)
1299 struct cli_request *cli_req = talloc_get_type_abort(
1300 req->private_data, struct cli_request);
1301 struct cli_state *cli = cli_req->cli;
1309 if (async_req_is_error(req, &status)) {
1313 status = cli_pull_reply(req, &wct, &vwv, &num_bytes, &bytes);
1314 if (!NT_STATUS_IS_OK(status)) {
1318 protnum = SVAL(vwv, 0);
1320 if ((protnum >= ARRAY_SIZE(prots))
1321 || (prots[protnum].prot > cli_req->cli->protocol)) {
1322 return NT_STATUS_INVALID_NETWORK_RESPONSE;
1325 cli->protocol = prots[protnum].prot;
1327 if ((cli->protocol < PROTOCOL_NT1) && cli->sign_info.mandatory_signing) {
1328 DEBUG(0,("cli_negprot: SMB signing is mandatory and the selected protocol level doesn't support it.\n"));
1329 return NT_STATUS_ACCESS_DENIED;
1332 if (cli->protocol >= PROTOCOL_NT1) {
1335 cli->sec_mode = CVAL(vwv + 1, 0);
1336 cli->max_mux = SVAL(vwv + 1, 1);
1337 cli->max_xmit = IVAL(vwv + 3, 1);
1338 cli->sesskey = IVAL(vwv + 7, 1);
1339 cli->serverzone = SVALS(vwv + 15, 1);
1340 cli->serverzone *= 60;
1341 /* this time arrives in real GMT */
1342 ts = interpret_long_date(((char *)(vwv+11))+1);
1343 cli->servertime = ts.tv_sec;
1344 cli->secblob = data_blob(bytes, num_bytes);
1345 cli->capabilities = IVAL(vwv + 9, 1);
1346 if (cli->capabilities & CAP_RAW_MODE) {
1347 cli->readbraw_supported = True;
1348 cli->writebraw_supported = True;
1350 /* work out if they sent us a workgroup */
1351 if (!(cli->capabilities & CAP_EXTENDED_SECURITY) &&
1352 smb_buflen(cli->inbuf) > 8) {
1353 clistr_pull(cli, cli->server_domain,
1354 bytes+8, sizeof(cli->server_domain),
1356 STR_UNICODE|STR_NOALIGN);
1360 * As signing is slow we only turn it on if either the client or
1361 * the server require it. JRA.
1364 if (cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_REQUIRED) {
1365 /* Fail if server says signing is mandatory and we don't want to support it. */
1366 if (!cli->sign_info.allow_smb_signing) {
1367 DEBUG(0,("cli_negprot: SMB signing is mandatory and we have disabled it.\n"));
1368 return NT_STATUS_ACCESS_DENIED;
1370 cli->sign_info.negotiated_smb_signing = True;
1371 cli->sign_info.mandatory_signing = True;
1372 } else if (cli->sign_info.mandatory_signing && cli->sign_info.allow_smb_signing) {
1373 /* Fail if client says signing is mandatory and the server doesn't support it. */
1374 if (!(cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_ENABLED)) {
1375 DEBUG(1,("cli_negprot: SMB signing is mandatory and the server doesn't support it.\n"));
1376 return NT_STATUS_ACCESS_DENIED;
1378 cli->sign_info.negotiated_smb_signing = True;
1379 cli->sign_info.mandatory_signing = True;
1380 } else if (cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_ENABLED) {
1381 cli->sign_info.negotiated_smb_signing = True;
1384 if (cli->capabilities & (CAP_LARGE_READX|CAP_LARGE_WRITEX)) {
1385 SAFE_FREE(cli->outbuf);
1386 SAFE_FREE(cli->inbuf);
1387 cli->outbuf = (char *)SMB_MALLOC(CLI_SAMBA_MAX_LARGE_READX_SIZE+LARGE_WRITEX_HDR_SIZE+SAFETY_MARGIN);
1388 cli->inbuf = (char *)SMB_MALLOC(CLI_SAMBA_MAX_LARGE_READX_SIZE+LARGE_WRITEX_HDR_SIZE+SAFETY_MARGIN);
1389 cli->bufsize = CLI_SAMBA_MAX_LARGE_READX_SIZE + LARGE_WRITEX_HDR_SIZE;
1392 } else if (cli->protocol >= PROTOCOL_LANMAN1) {
1393 cli->use_spnego = False;
1394 cli->sec_mode = SVAL(vwv + 1, 0);
1395 cli->max_xmit = SVAL(vwv + 2, 0);
1396 cli->max_mux = SVAL(vwv + 3, 0);
1397 cli->sesskey = IVAL(vwv + 6, 0);
1398 cli->serverzone = SVALS(vwv + 10, 0);
1399 cli->serverzone *= 60;
1400 /* this time is converted to GMT by make_unix_date */
1401 cli->servertime = cli_make_unix_date(
1402 cli, (char *)(vwv + 8));
1403 cli->readbraw_supported = ((SVAL(vwv + 5, 0) & 0x1) != 0);
1404 cli->writebraw_supported = ((SVAL(vwv + 5, 0) & 0x2) != 0);
1405 cli->secblob = data_blob(bytes, num_bytes);
1407 /* the old core protocol */
1408 cli->use_spnego = False;
1410 cli->serverzone = get_time_zone(time(NULL));
1413 cli->max_xmit = MIN(cli->max_xmit, CLI_BUFFER_SIZE);
1415 /* a way to force ascii SMB */
1416 if (getenv("CLI_FORCE_ASCII"))
1417 cli->capabilities &= ~CAP_UNICODE;
1419 return NT_STATUS_OK;
1422 NTSTATUS cli_negprot(struct cli_state *cli)
1424 TALLOC_CTX *frame = talloc_stackframe();
1425 struct event_context *ev;
1426 struct async_req *req;
1427 NTSTATUS status = NT_STATUS_NO_MEMORY;
1429 if (cli->fd_event != NULL) {
1431 * Can't use sync call while an async call is in flight
1433 cli_set_error(cli, NT_STATUS_INVALID_PARAMETER);
1437 ev = event_context_init(frame);
1442 req = cli_negprot_send(frame, ev, cli);
1447 while (req->state < ASYNC_REQ_DONE) {
1448 event_loop_once(ev);
1451 status = cli_negprot_recv(req);
1457 /****************************************************************************
1458 Send a session request. See rfc1002.txt 4.3 and 4.3.2.
1459 ****************************************************************************/
1461 bool cli_session_request(struct cli_state *cli,
1462 struct nmb_name *calling, struct nmb_name *called)
1467 /* 445 doesn't have session request */
1468 if (cli->port == 445)
1471 memcpy(&(cli->calling), calling, sizeof(*calling));
1472 memcpy(&(cli->called ), called , sizeof(*called ));
1474 /* put in the destination name */
1475 p = cli->outbuf+len;
1476 name_mangle(cli->called .name, p, cli->called .name_type);
1480 p = cli->outbuf+len;
1481 name_mangle(cli->calling.name, p, cli->calling.name_type);
1484 /* send a session request (RFC 1002) */
1485 /* setup the packet length
1486 * Remove four bytes from the length count, since the length
1487 * field in the NBT Session Service header counts the number
1488 * of bytes which follow. The cli_send_smb() function knows
1489 * about this and accounts for those four bytes.
1493 _smb_setlen(cli->outbuf,len);
1494 SCVAL(cli->outbuf,0,0x81);
1497 DEBUG(5,("Sent session request\n"));
1499 if (!cli_receive_smb(cli))
1502 if (CVAL(cli->inbuf,0) == 0x84) {
1503 /* C. Hoch 9/14/95 Start */
1504 /* For information, here is the response structure.
1505 * We do the byte-twiddling to for portability.
1506 struct RetargetResponse{
1508 unsigned char flags;
1514 uint16_t port = (CVAL(cli->inbuf,8)<<8)+CVAL(cli->inbuf,9);
1515 struct in_addr dest_ip;
1518 /* SESSION RETARGET */
1519 putip((char *)&dest_ip,cli->inbuf+4);
1520 in_addr_to_sockaddr_storage(&cli->dest_ss, dest_ip);
1522 status = open_socket_out(&cli->dest_ss, port,
1523 LONG_CONNECT_TIMEOUT, &cli->fd);
1524 if (!NT_STATUS_IS_OK(status)) {
1528 DEBUG(3,("Retargeted\n"));
1530 set_socket_options(cli->fd, lp_socket_options());
1537 DEBUG(0,("Retarget recursion - failing\n"));
1541 ret = cli_session_request(cli, calling, called);
1545 } /* C. Hoch 9/14/95 End */
1547 if (CVAL(cli->inbuf,0) != 0x82) {
1548 /* This is the wrong place to put the error... JRA. */
1549 cli->rap_error = CVAL(cli->inbuf,4);
1555 static void smb_sock_connected(struct async_req *req)
1557 int *pfd = (int *)req->async.priv;
1561 status = open_socket_out_defer_recv(req, &fd);
1562 if (NT_STATUS_IS_OK(status)) {
1567 static NTSTATUS open_smb_socket(const struct sockaddr_storage *pss,
1568 uint16_t *port, int timeout, int *pfd)
1570 struct event_context *ev;
1571 struct async_req *r139, *r445;
1577 return open_socket_out(pss, *port, timeout, pfd);
1580 ev = event_context_init(talloc_tos());
1582 return NT_STATUS_NO_MEMORY;
1585 r445 = open_socket_out_defer_send(ev, ev, timeval_set(0, 0),
1587 r139 = open_socket_out_defer_send(ev, ev, timeval_set(0, 3000),
1589 if ((r445 == NULL) || (r139 == NULL)) {
1590 status = NT_STATUS_NO_MEMORY;
1593 r445->async.fn = smb_sock_connected;
1594 r445->async.priv = &fd445;
1595 r139->async.fn = smb_sock_connected;
1596 r139->async.priv = &fd139;
1598 while ((fd139 == -1) && (r139->state < ASYNC_REQ_DONE)
1599 && (fd445 == -1) && (r445->state < ASYNC_REQ_DONE)) {
1600 event_loop_once(ev);
1603 if ((fd139 != -1) && (fd445 != -1)) {
1611 status = NT_STATUS_OK;
1617 status = NT_STATUS_OK;
1621 status = open_socket_out_defer_recv(r445, &fd445);
1627 /****************************************************************************
1628 Open the client sockets.
1629 ****************************************************************************/
1631 NTSTATUS cli_connect(struct cli_state *cli,
1633 struct sockaddr_storage *dest_ss)
1636 int name_type = 0x20;
1637 TALLOC_CTX *frame = talloc_stackframe();
1638 unsigned int num_addrs = 0;
1640 struct sockaddr_storage *ss_arr = NULL;
1643 /* reasonable default hostname */
1645 host = STAR_SMBSERVER;
1648 fstrcpy(cli->desthost, host);
1650 /* allow hostnames of the form NAME#xx and do a netbios lookup */
1651 if ((p = strchr(cli->desthost, '#'))) {
1652 name_type = strtol(p+1, NULL, 16);
1656 if (!dest_ss || is_zero_addr((struct sockaddr *)dest_ss)) {
1657 NTSTATUS status =resolve_name_list(frame,
1662 if (!NT_STATUS_IS_OK(status)) {
1664 return NT_STATUS_BAD_NETWORK_NAME;
1668 ss_arr = TALLOC_P(frame, struct sockaddr_storage);
1671 return NT_STATUS_NO_MEMORY;
1676 for (i = 0; i < num_addrs; i++) {
1677 cli->dest_ss = ss_arr[i];
1678 if (getenv("LIBSMB_PROG")) {
1679 cli->fd = sock_exec(getenv("LIBSMB_PROG"));
1681 uint16_t port = cli->port;
1683 status = open_smb_socket(&cli->dest_ss, &port,
1684 cli->timeout, &cli->fd);
1685 if (NT_STATUS_IS_OK(status)) {
1689 if (cli->fd == -1) {
1690 char addr[INET6_ADDRSTRLEN];
1691 print_sockaddr(addr, sizeof(addr), &ss_arr[i]);
1692 DEBUG(2,("Error connecting to %s (%s)\n",
1693 dest_ss?addr:host,strerror(errno)));
1695 /* Exit from loop on first connection. */
1700 if (cli->fd == -1) {
1702 return map_nt_error_from_unix(errno);
1706 *dest_ss = cli->dest_ss;
1709 set_socket_options(cli->fd, lp_socket_options());
1712 return NT_STATUS_OK;
1716 establishes a connection to after the negprot.
1717 @param output_cli A fully initialised cli structure, non-null only on success
1718 @param dest_host The netbios name of the remote host
1719 @param dest_ss (optional) The the destination IP, NULL for name based lookup
1720 @param port (optional) The destination port (0 for default)
1721 @param retry bool. Did this connection fail with a retryable error ?
1724 NTSTATUS cli_start_connection(struct cli_state **output_cli,
1725 const char *my_name,
1726 const char *dest_host,
1727 struct sockaddr_storage *dest_ss, int port,
1728 int signing_state, int flags,
1732 struct nmb_name calling;
1733 struct nmb_name called;
1734 struct cli_state *cli;
1735 struct sockaddr_storage ss;
1741 my_name = global_myname();
1743 if (!(cli = cli_initialise())) {
1744 return NT_STATUS_NO_MEMORY;
1747 make_nmb_name(&calling, my_name, 0x0);
1748 make_nmb_name(&called , dest_host, 0x20);
1750 cli_set_port(cli, port);
1751 cli_set_timeout(cli, 10000); /* 10 seconds. */
1761 DEBUG(3,("Connecting to host=%s\n", dest_host));
1763 nt_status = cli_connect(cli, dest_host, &ss);
1764 if (!NT_STATUS_IS_OK(nt_status)) {
1765 char addr[INET6_ADDRSTRLEN];
1766 print_sockaddr(addr, sizeof(addr), &ss);
1767 DEBUG(1,("cli_start_connection: failed to connect to %s (%s). Error %s\n",
1768 nmb_namestr(&called), addr, nt_errstr(nt_status) ));
1776 if (!cli_session_request(cli, &calling, &called)) {
1778 DEBUG(1,("session request to %s failed (%s)\n",
1779 called.name, cli_errstr(cli)));
1780 if ((p=strchr(called.name, '.')) && !is_ipaddress(called.name)) {
1784 if (strcmp(called.name, STAR_SMBSERVER)) {
1785 make_nmb_name(&called , STAR_SMBSERVER, 0x20);
1788 return NT_STATUS_BAD_NETWORK_NAME;
1791 cli_setup_signing_state(cli, signing_state);
1793 if (flags & CLI_FULL_CONNECTION_DONT_SPNEGO)
1794 cli->use_spnego = False;
1795 else if (flags & CLI_FULL_CONNECTION_USE_KERBEROS)
1796 cli->use_kerberos = True;
1798 if ((flags & CLI_FULL_CONNECTION_FALLBACK_AFTER_KERBEROS) &&
1799 cli->use_kerberos) {
1800 cli->fallback_after_kerberos = true;
1803 nt_status = cli_negprot(cli);
1804 if (!NT_STATUS_IS_OK(nt_status)) {
1805 DEBUG(1, ("failed negprot: %s\n", nt_errstr(nt_status)));
1811 return NT_STATUS_OK;
1816 establishes a connection right up to doing tconX, password specified.
1817 @param output_cli A fully initialised cli structure, non-null only on success
1818 @param dest_host The netbios name of the remote host
1819 @param dest_ip (optional) The the destination IP, NULL for name based lookup
1820 @param port (optional) The destination port (0 for default)
1821 @param service (optional) The share to make the connection to. Should be 'unqualified' in any way.
1822 @param service_type The 'type' of serivice.
1823 @param user Username, unix string
1824 @param domain User's domain
1825 @param password User's password, unencrypted unix string.
1826 @param retry bool. Did this connection fail with a retryable error ?
1829 NTSTATUS cli_full_connection(struct cli_state **output_cli,
1830 const char *my_name,
1831 const char *dest_host,
1832 struct sockaddr_storage *dest_ss, int port,
1833 const char *service, const char *service_type,
1834 const char *user, const char *domain,
1835 const char *password, int flags,
1840 struct cli_state *cli = NULL;
1841 int pw_len = password ? strlen(password)+1 : 0;
1845 if (password == NULL) {
1849 nt_status = cli_start_connection(&cli, my_name, dest_host,
1850 dest_ss, port, signing_state,
1853 if (!NT_STATUS_IS_OK(nt_status)) {
1857 nt_status = cli_session_setup(cli, user, password, pw_len, password,
1859 if (!NT_STATUS_IS_OK(nt_status)) {
1861 if (!(flags & CLI_FULL_CONNECTION_ANONYMOUS_FALLBACK)) {
1862 DEBUG(1,("failed session setup with %s\n",
1863 nt_errstr(nt_status)));
1868 nt_status = cli_session_setup(cli, "", "", 0, "", 0, domain);
1869 if (!NT_STATUS_IS_OK(nt_status)) {
1870 DEBUG(1,("anonymous failed session setup with %s\n",
1871 nt_errstr(nt_status)));
1878 if (!cli_send_tconX(cli, service, service_type, password, pw_len)) {
1879 nt_status = cli_nt_error(cli);
1880 DEBUG(1,("failed tcon_X with %s\n", nt_errstr(nt_status)));
1882 if (NT_STATUS_IS_OK(nt_status)) {
1883 nt_status = NT_STATUS_UNSUCCESSFUL;
1889 cli_init_creds(cli, user, domain, password);
1892 return NT_STATUS_OK;
1895 /****************************************************************************
1896 Attempt a NetBIOS session request, falling back to *SMBSERVER if needed.
1897 ****************************************************************************/
1899 bool attempt_netbios_session_request(struct cli_state **ppcli, const char *srchost, const char *desthost,
1900 struct sockaddr_storage *pdest_ss)
1902 struct nmb_name calling, called;
1904 make_nmb_name(&calling, srchost, 0x0);
1907 * If the called name is an IP address
1908 * then use *SMBSERVER immediately.
1911 if(is_ipaddress(desthost)) {
1912 make_nmb_name(&called, STAR_SMBSERVER, 0x20);
1914 make_nmb_name(&called, desthost, 0x20);
1917 if (!cli_session_request(*ppcli, &calling, &called)) {
1919 struct nmb_name smbservername;
1921 make_nmb_name(&smbservername, STAR_SMBSERVER, 0x20);
1924 * If the name wasn't *SMBSERVER then
1925 * try with *SMBSERVER if the first name fails.
1928 if (nmb_name_equal(&called, &smbservername)) {
1931 * The name used was *SMBSERVER, don't bother with another name.
1934 DEBUG(0,("attempt_netbios_session_request: %s rejected the session for name *SMBSERVER \
1935 with error %s.\n", desthost, cli_errstr(*ppcli) ));
1940 cli_shutdown(*ppcli);
1942 *ppcli = cli_initialise();
1944 /* Out of memory... */
1948 status = cli_connect(*ppcli, desthost, pdest_ss);
1949 if (!NT_STATUS_IS_OK(status) ||
1950 !cli_session_request(*ppcli, &calling, &smbservername)) {
1951 DEBUG(0,("attempt_netbios_session_request: %s rejected the session for \
1952 name *SMBSERVER with error %s\n", desthost, cli_errstr(*ppcli) ));
1960 /****************************************************************************
1961 Send an old style tcon.
1962 ****************************************************************************/
1963 NTSTATUS cli_raw_tcon(struct cli_state *cli,
1964 const char *service, const char *pass, const char *dev,
1965 uint16 *max_xmit, uint16 *tid)
1969 if (!lp_client_plaintext_auth() && (*pass)) {
1970 DEBUG(1, ("Server requested plaintext password but 'client "
1971 "plaintext auth' is disabled\n"));
1972 return NT_STATUS_ACCESS_DENIED;
1975 memset(cli->outbuf,'\0',smb_size);
1976 memset(cli->inbuf,'\0',smb_size);
1978 cli_set_message(cli->outbuf, 0, 0, True);
1979 SCVAL(cli->outbuf,smb_com,SMBtcon);
1980 cli_setup_packet(cli);
1982 p = smb_buf(cli->outbuf);
1983 *p++ = 4; p += clistr_push(cli, p, service, -1, STR_TERMINATE | STR_NOALIGN);
1984 *p++ = 4; p += clistr_push(cli, p, pass, -1, STR_TERMINATE | STR_NOALIGN);
1985 *p++ = 4; p += clistr_push(cli, p, dev, -1, STR_TERMINATE | STR_NOALIGN);
1987 cli_setup_bcc(cli, p);
1990 if (!cli_receive_smb(cli)) {
1991 return NT_STATUS_UNEXPECTED_NETWORK_ERROR;
1994 if (cli_is_error(cli)) {
1995 return cli_nt_error(cli);
1998 *max_xmit = SVAL(cli->inbuf, smb_vwv0);
1999 *tid = SVAL(cli->inbuf, smb_vwv1);
2001 return NT_STATUS_OK;
2004 /* Return a cli_state pointing at the IPC$ share for the given server */
2006 struct cli_state *get_ipc_connect(char *server,
2007 struct sockaddr_storage *server_ss,
2008 const struct user_auth_info *user_info)
2010 struct cli_state *cli;
2012 uint32_t flags = CLI_FULL_CONNECTION_ANONYMOUS_FALLBACK;
2014 if (user_info->use_kerberos) {
2015 flags |= CLI_FULL_CONNECTION_USE_KERBEROS;
2018 nt_status = cli_full_connection(&cli, NULL, server, server_ss, 0, "IPC$", "IPC",
2019 user_info->username ? user_info->username : "",
2021 user_info->password ? user_info->password : "",
2025 if (NT_STATUS_IS_OK(nt_status)) {
2027 } else if (is_ipaddress(server)) {
2028 /* windows 9* needs a correct NMB name for connections */
2029 fstring remote_name;
2031 if (name_status_find("*", 0, 0, server_ss, remote_name)) {
2032 cli = get_ipc_connect(remote_name, server_ss, user_info);
2041 * Given the IP address of a master browser on the network, return its
2042 * workgroup and connect to it.
2044 * This function is provided to allow additional processing beyond what
2045 * get_ipc_connect_master_ip_bcast() does, e.g. to retrieve the list of master
2046 * browsers and obtain each master browsers' list of domains (in case the
2047 * first master browser is recently on the network and has not yet
2048 * synchronized with other master browsers and therefore does not yet have the
2049 * entire network browse list)
2052 struct cli_state *get_ipc_connect_master_ip(TALLOC_CTX *ctx,
2053 struct ip_service *mb_ip,
2054 const struct user_auth_info *user_info,
2055 char **pp_workgroup_out)
2057 char addr[INET6_ADDRSTRLEN];
2059 struct cli_state *cli;
2060 struct sockaddr_storage server_ss;
2062 *pp_workgroup_out = NULL;
2064 print_sockaddr(addr, sizeof(addr), &mb_ip->ss);
2065 DEBUG(99, ("Looking up name of master browser %s\n",
2069 * Do a name status query to find out the name of the master browser.
2070 * We use <01><02>__MSBROWSE__<02>#01 if *#00 fails because a domain
2071 * master browser will not respond to a wildcard query (or, at least,
2072 * an NT4 server acting as the domain master browser will not).
2074 * We might be able to use ONLY the query on MSBROWSE, but that's not
2075 * yet been tested with all Windows versions, so until it is, leave
2076 * the original wildcard query as the first choice and fall back to
2077 * MSBROWSE if the wildcard query fails.
2079 if (!name_status_find("*", 0, 0x1d, &mb_ip->ss, name) &&
2080 !name_status_find(MSBROWSE, 1, 0x1d, &mb_ip->ss, name)) {
2082 DEBUG(99, ("Could not retrieve name status for %s\n",
2087 if (!find_master_ip(name, &server_ss)) {
2088 DEBUG(99, ("Could not find master ip for %s\n", name));
2092 *pp_workgroup_out = talloc_strdup(ctx, name);
2094 DEBUG(4, ("found master browser %s, %s\n", name, addr));
2096 print_sockaddr(addr, sizeof(addr), &server_ss);
2097 cli = get_ipc_connect(addr, &server_ss, user_info);
2103 * Return the IP address and workgroup of a master browser on the network, and
2107 struct cli_state *get_ipc_connect_master_ip_bcast(TALLOC_CTX *ctx,
2108 const struct user_auth_info *user_info,
2109 char **pp_workgroup_out)
2111 struct ip_service *ip_list;
2112 struct cli_state *cli;
2115 *pp_workgroup_out = NULL;
2117 DEBUG(99, ("Do broadcast lookup for workgroups on local network\n"));
2119 /* Go looking for workgroups by broadcasting on the local network */
2121 if (!NT_STATUS_IS_OK(name_resolve_bcast(MSBROWSE, 1, &ip_list,
2123 DEBUG(99, ("No master browsers responded\n"));
2127 for (i = 0; i < count; i++) {
2128 char addr[INET6_ADDRSTRLEN];
2129 print_sockaddr(addr, sizeof(addr), &ip_list[i].ss);
2130 DEBUG(99, ("Found master browser %s\n", addr));
2132 cli = get_ipc_connect_master_ip(ctx, &ip_list[i],
2133 user_info, pp_workgroup_out);