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 2 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, write to the Free Software
19 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
24 extern pstring user_socket_options;
30 {PROTOCOL_CORE,"PC NETWORK PROGRAM 1.0"},
31 {PROTOCOL_COREPLUS,"MICROSOFT NETWORKS 1.03"},
32 {PROTOCOL_LANMAN1,"MICROSOFT NETWORKS 3.0"},
33 {PROTOCOL_LANMAN1,"LANMAN1.0"},
34 {PROTOCOL_LANMAN2,"LM1.2X002"},
35 {PROTOCOL_LANMAN2,"DOS LANMAN2.1"},
36 {PROTOCOL_LANMAN2,"Samba"},
37 {PROTOCOL_NT1,"NT LANMAN 1.0"},
38 {PROTOCOL_NT1,"NT LM 0.12"},
43 * Set the user session key for a connection
44 * @param cli The cli structure to add it too
45 * @param session_key The session key used. (A copy of this is taken for the cli struct)
49 static void cli_set_session_key (struct cli_state *cli, const DATA_BLOB session_key)
51 cli->user_session_key = data_blob(session_key.data, session_key.length);
54 /****************************************************************************
55 Do an old lanman2 style session setup.
56 ****************************************************************************/
58 static NTSTATUS cli_session_setup_lanman2(struct cli_state *cli,
60 const char *pass, size_t passlen,
61 const char *workgroup)
63 DATA_BLOB session_key = data_blob(NULL, 0);
64 DATA_BLOB lm_response = data_blob(NULL, 0);
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 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 fstrcpy(cli->user_name, user);
135 if (session_key.data) {
136 /* Have plaintext orginal */
137 cli_set_session_key(cli, session_key);
143 /****************************************************************************
144 Work out suitable capabilities to offer the server.
145 ****************************************************************************/
147 static uint32 cli_session_setup_capabilities(struct cli_state *cli)
149 uint32 capabilities = CAP_NT_SMBS;
151 if (!cli->force_dos_errors)
152 capabilities |= CAP_STATUS32;
154 if (cli->use_level_II_oplocks)
155 capabilities |= CAP_LEVEL_II_OPLOCKS;
157 capabilities |= (cli->capabilities & (CAP_UNICODE|CAP_LARGE_FILES|CAP_LARGE_READX|CAP_LARGE_WRITEX|CAP_DFS));
161 /****************************************************************************
162 Do a NT1 guest session setup.
163 ****************************************************************************/
165 static NTSTATUS cli_session_setup_guest(struct cli_state *cli)
168 uint32 capabilities = cli_session_setup_capabilities(cli);
170 memset(cli->outbuf, '\0', smb_size);
171 set_message(cli->outbuf,13,0,True);
172 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
173 cli_setup_packet(cli);
175 SCVAL(cli->outbuf,smb_vwv0,0xFF);
176 SSVAL(cli->outbuf,smb_vwv2,CLI_BUFFER_SIZE);
177 SSVAL(cli->outbuf,smb_vwv3,2);
178 SSVAL(cli->outbuf,smb_vwv4,cli->pid);
179 SIVAL(cli->outbuf,smb_vwv5,cli->sesskey);
180 SSVAL(cli->outbuf,smb_vwv7,0);
181 SSVAL(cli->outbuf,smb_vwv8,0);
182 SIVAL(cli->outbuf,smb_vwv11,capabilities);
183 p = smb_buf(cli->outbuf);
184 p += clistr_push(cli, p, "", -1, STR_TERMINATE); /* username */
185 p += clistr_push(cli, p, "", -1, STR_TERMINATE); /* workgroup */
186 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
187 p += clistr_push(cli, p, "Samba", -1, STR_TERMINATE);
188 cli_setup_bcc(cli, p);
190 if (!cli_send_smb(cli) || !cli_receive_smb(cli)) {
191 return cli_nt_error(cli);
194 show_msg(cli->inbuf);
196 if (cli_is_error(cli)) {
197 return cli_nt_error(cli);
200 cli->vuid = SVAL(cli->inbuf,smb_uid);
202 p = smb_buf(cli->inbuf);
203 p += clistr_pull(cli, cli->server_os, p, sizeof(fstring), -1, STR_TERMINATE);
204 p += clistr_pull(cli, cli->server_type, p, sizeof(fstring), -1, STR_TERMINATE);
205 p += clistr_pull(cli, cli->server_domain, p, sizeof(fstring), -1, STR_TERMINATE);
207 if (strstr(cli->server_type, "Samba")) {
208 cli->is_samba = True;
211 fstrcpy(cli->user_name, "");
216 /****************************************************************************
217 Do a NT1 plaintext session setup.
218 ****************************************************************************/
220 static NTSTATUS cli_session_setup_plaintext(struct cli_state *cli,
221 const char *user, const char *pass,
222 const char *workgroup)
224 uint32 capabilities = cli_session_setup_capabilities(cli);
228 fstr_sprintf( lanman, "Samba %s", SAMBA_VERSION_STRING);
230 memset(cli->outbuf, '\0', smb_size);
231 set_message(cli->outbuf,13,0,True);
232 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
233 cli_setup_packet(cli);
235 SCVAL(cli->outbuf,smb_vwv0,0xFF);
236 SSVAL(cli->outbuf,smb_vwv2,CLI_BUFFER_SIZE);
237 SSVAL(cli->outbuf,smb_vwv3,2);
238 SSVAL(cli->outbuf,smb_vwv4,cli->pid);
239 SIVAL(cli->outbuf,smb_vwv5,cli->sesskey);
240 SSVAL(cli->outbuf,smb_vwv8,0);
241 SIVAL(cli->outbuf,smb_vwv11,capabilities);
242 p = smb_buf(cli->outbuf);
244 /* check wether to send the ASCII or UNICODE version of the password */
246 if ( (capabilities & CAP_UNICODE) == 0 ) {
247 p += clistr_push(cli, p, pass, -1, STR_TERMINATE); /* password */
248 SSVAL(cli->outbuf,smb_vwv7,PTR_DIFF(p, smb_buf(cli->outbuf)));
251 p += clistr_push(cli, p, pass, -1, STR_UNICODE|STR_TERMINATE); /* unicode password */
252 SSVAL(cli->outbuf,smb_vwv8,PTR_DIFF(p, smb_buf(cli->outbuf)));
255 p += clistr_push(cli, p, user, -1, STR_TERMINATE); /* username */
256 p += clistr_push(cli, p, workgroup, -1, STR_TERMINATE); /* workgroup */
257 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
258 p += clistr_push(cli, p, lanman, -1, STR_TERMINATE);
259 cli_setup_bcc(cli, p);
261 if (!cli_send_smb(cli) || !cli_receive_smb(cli)) {
262 return cli_nt_error(cli);
265 show_msg(cli->inbuf);
267 if (cli_is_error(cli)) {
268 return cli_nt_error(cli);
271 cli->vuid = SVAL(cli->inbuf,smb_uid);
272 p = smb_buf(cli->inbuf);
273 p += clistr_pull(cli, cli->server_os, p, sizeof(fstring), -1, STR_TERMINATE);
274 p += clistr_pull(cli, cli->server_type, p, sizeof(fstring), -1, STR_TERMINATE);
275 p += clistr_pull(cli, cli->server_domain, p, sizeof(fstring), -1, STR_TERMINATE);
276 fstrcpy(cli->user_name, user);
278 if (strstr(cli->server_type, "Samba")) {
279 cli->is_samba = True;
285 /****************************************************************************
286 do a NT1 NTLM/LM encrypted session setup - for when extended security
288 @param cli client state to create do session setup on
290 @param pass *either* cleartext password (passlen !=24) or LM response.
291 @param ntpass NT response, implies ntpasslen >=24, implies pass is not clear
292 @param workgroup The user's domain.
293 ****************************************************************************/
295 static NTSTATUS cli_session_setup_nt1(struct cli_state *cli, const char *user,
296 const char *pass, size_t passlen,
297 const char *ntpass, size_t ntpasslen,
298 const char *workgroup)
300 uint32 capabilities = cli_session_setup_capabilities(cli);
301 DATA_BLOB lm_response = data_blob(NULL, 0);
302 DATA_BLOB nt_response = data_blob(NULL, 0);
303 DATA_BLOB session_key = data_blob(NULL, 0);
308 /* do nothing - guest login */
309 } else if (passlen != 24) {
310 if (lp_client_ntlmv2_auth()) {
311 DATA_BLOB server_chal;
312 DATA_BLOB names_blob;
313 server_chal = data_blob(cli->secblob.data, MIN(cli->secblob.length, 8));
315 /* note that the 'workgroup' here is a best guess - we don't know
316 the server's domain at this point. The 'server name' is also
319 names_blob = NTLMv2_generate_names_blob(cli->called.name, workgroup);
321 if (!SMBNTLMv2encrypt(user, workgroup, pass, &server_chal,
323 &lm_response, &nt_response, &session_key)) {
324 data_blob_free(&names_blob);
325 data_blob_free(&server_chal);
326 return NT_STATUS_ACCESS_DENIED;
328 data_blob_free(&names_blob);
329 data_blob_free(&server_chal);
333 E_md4hash(pass, nt_hash);
336 nt_response = data_blob(NULL, 0);
338 nt_response = data_blob(NULL, 24);
339 SMBNTencrypt(pass,cli->secblob.data,nt_response.data);
341 /* non encrypted password supplied. Ignore ntpass. */
342 if (lp_client_lanman_auth()) {
343 lm_response = data_blob(NULL, 24);
344 if (!SMBencrypt(pass,cli->secblob.data, lm_response.data)) {
345 /* Oops, the LM response is invalid, just put
346 the NT response there instead */
347 data_blob_free(&lm_response);
348 lm_response = data_blob(nt_response.data, nt_response.length);
351 /* LM disabled, place NT# in LM field instead */
352 lm_response = data_blob(nt_response.data, nt_response.length);
355 session_key = data_blob(NULL, 16);
357 E_deshash(pass, session_key.data);
358 memset(&session_key.data[8], '\0', 8);
360 SMBsesskeygen_ntv1(nt_hash, NULL, session_key.data);
364 cli_simple_set_signing(cli, session_key, lm_response);
366 cli_simple_set_signing(cli, session_key, nt_response);
369 /* pre-encrypted password supplied. Only used for
370 security=server, can't do
371 signing because we don't have original key */
373 lm_response = data_blob(pass, passlen);
374 nt_response = data_blob(ntpass, ntpasslen);
377 /* send a session setup command */
378 memset(cli->outbuf,'\0',smb_size);
380 set_message(cli->outbuf,13,0,True);
381 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
382 cli_setup_packet(cli);
384 SCVAL(cli->outbuf,smb_vwv0,0xFF);
385 SSVAL(cli->outbuf,smb_vwv2,CLI_BUFFER_SIZE);
386 SSVAL(cli->outbuf,smb_vwv3,2);
387 SSVAL(cli->outbuf,smb_vwv4,cli->pid);
388 SIVAL(cli->outbuf,smb_vwv5,cli->sesskey);
389 SSVAL(cli->outbuf,smb_vwv7,lm_response.length);
390 SSVAL(cli->outbuf,smb_vwv8,nt_response.length);
391 SIVAL(cli->outbuf,smb_vwv11,capabilities);
392 p = smb_buf(cli->outbuf);
393 if (lm_response.length) {
394 memcpy(p,lm_response.data, lm_response.length); p += lm_response.length;
396 if (nt_response.length) {
397 memcpy(p,nt_response.data, nt_response.length); p += nt_response.length;
399 p += clistr_push(cli, p, user, -1, STR_TERMINATE);
401 /* Upper case here might help some NTLMv2 implementations */
402 p += clistr_push(cli, p, workgroup, -1, STR_TERMINATE|STR_UPPER);
403 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
404 p += clistr_push(cli, p, "Samba", -1, STR_TERMINATE);
405 cli_setup_bcc(cli, p);
407 if (!cli_send_smb(cli) || !cli_receive_smb(cli)) {
408 result = cli_nt_error(cli);
412 /* show_msg(cli->inbuf); */
414 if (cli_is_error(cli)) {
415 result = cli_nt_error(cli);
419 /* use the returned vuid from now on */
420 cli->vuid = SVAL(cli->inbuf,smb_uid);
422 p = smb_buf(cli->inbuf);
423 p += clistr_pull(cli, cli->server_os, p, sizeof(fstring), -1, STR_TERMINATE);
424 p += clistr_pull(cli, cli->server_type, p, sizeof(fstring), -1, STR_TERMINATE);
425 p += clistr_pull(cli, cli->server_domain, p, sizeof(fstring), -1, STR_TERMINATE);
427 if (strstr(cli->server_type, "Samba")) {
428 cli->is_samba = True;
431 fstrcpy(cli->user_name, user);
433 if (session_key.data) {
434 /* Have plaintext orginal */
435 cli_set_session_key(cli, session_key);
438 result = NT_STATUS_OK;
440 data_blob_free(&lm_response);
441 data_blob_free(&nt_response);
442 data_blob_free(&session_key);
446 /****************************************************************************
447 Send a extended security session setup blob
448 ****************************************************************************/
450 static BOOL cli_session_setup_blob_send(struct cli_state *cli, DATA_BLOB blob)
452 uint32 capabilities = cli_session_setup_capabilities(cli);
455 capabilities |= CAP_EXTENDED_SECURITY;
457 /* send a session setup command */
458 memset(cli->outbuf,'\0',smb_size);
460 set_message(cli->outbuf,12,0,True);
461 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
463 cli_setup_packet(cli);
465 SCVAL(cli->outbuf,smb_vwv0,0xFF);
466 SSVAL(cli->outbuf,smb_vwv2,CLI_BUFFER_SIZE);
467 SSVAL(cli->outbuf,smb_vwv3,2);
468 SSVAL(cli->outbuf,smb_vwv4,1);
469 SIVAL(cli->outbuf,smb_vwv5,0);
470 SSVAL(cli->outbuf,smb_vwv7,blob.length);
471 SIVAL(cli->outbuf,smb_vwv10,capabilities);
472 p = smb_buf(cli->outbuf);
473 memcpy(p, blob.data, blob.length);
475 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
476 p += clistr_push(cli, p, "Samba", -1, STR_TERMINATE);
477 cli_setup_bcc(cli, p);
478 return cli_send_smb(cli);
481 /****************************************************************************
482 Send a extended security session setup blob, returning a reply blob.
483 ****************************************************************************/
485 static DATA_BLOB cli_session_setup_blob_receive(struct cli_state *cli)
487 DATA_BLOB blob2 = data_blob(NULL, 0);
491 if (!cli_receive_smb(cli))
494 show_msg(cli->inbuf);
496 if (cli_is_error(cli) && !NT_STATUS_EQUAL(cli_nt_error(cli),
497 NT_STATUS_MORE_PROCESSING_REQUIRED)) {
501 /* use the returned vuid from now on */
502 cli->vuid = SVAL(cli->inbuf,smb_uid);
504 p = smb_buf(cli->inbuf);
506 blob2 = data_blob(p, SVAL(cli->inbuf, smb_vwv3));
509 p += clistr_pull(cli, cli->server_os, p, sizeof(fstring), -1, STR_TERMINATE);
511 /* w2k with kerberos doesn't properly null terminate this field */
512 len = smb_buflen(cli->inbuf) - PTR_DIFF(p, smb_buf(cli->inbuf));
513 p += clistr_pull(cli, cli->server_type, p, sizeof(fstring), len, 0);
520 /****************************************************************************
521 Send a extended security session setup blob, returning a reply blob.
522 ****************************************************************************/
524 static DATA_BLOB cli_session_setup_blob(struct cli_state *cli, DATA_BLOB blob)
526 DATA_BLOB blob2 = data_blob(NULL, 0);
527 if (!cli_session_setup_blob_send(cli, blob)) {
531 return cli_session_setup_blob_receive(cli);
534 /****************************************************************************
535 Use in-memory credentials cache
536 ****************************************************************************/
538 static void use_in_memory_ccache(void) {
539 setenv(KRB5_ENV_CCNAME, "MEMORY:cliconnect", 1);
542 /****************************************************************************
543 Do a spnego/kerberos encrypted session setup.
544 ****************************************************************************/
546 static ADS_STATUS cli_session_setup_kerberos(struct cli_state *cli, const char *principal, const char *workgroup)
548 DATA_BLOB blob2, negTokenTarg;
549 DATA_BLOB session_key_krb5;
550 DATA_BLOB null_blob = data_blob(NULL, 0);
553 DEBUG(2,("Doing kerberos session setup\n"));
555 /* generate the encapsulated kerberos5 ticket */
556 rc = spnego_gen_negTokenTarg(principal, 0, &negTokenTarg, &session_key_krb5, 0);
559 DEBUG(1, ("spnego_gen_negTokenTarg failed: %s\n", error_message(rc)));
560 return ADS_ERROR_KRB5(rc);
564 file_save("negTokenTarg.dat", negTokenTarg.data, negTokenTarg.length);
567 cli_simple_set_signing(cli, session_key_krb5, null_blob);
569 blob2 = cli_session_setup_blob(cli, negTokenTarg);
571 /* we don't need this blob for kerberos */
572 data_blob_free(&blob2);
574 cli_set_session_key(cli, session_key_krb5);
576 data_blob_free(&negTokenTarg);
577 data_blob_free(&session_key_krb5);
579 if (cli_is_error(cli)) {
580 if (NT_STATUS_IS_OK(cli_nt_error(cli))) {
581 return ADS_ERROR_NT(NT_STATUS_UNSUCCESSFUL);
584 return ADS_ERROR_NT(cli_nt_error(cli));
586 #endif /* HAVE_KRB5 */
589 /****************************************************************************
590 Do a spnego/NTLMSSP encrypted session setup.
591 ****************************************************************************/
593 static NTSTATUS cli_session_setup_ntlmssp(struct cli_state *cli, const char *user,
594 const char *pass, const char *domain)
596 struct ntlmssp_state *ntlmssp_state;
600 DATA_BLOB blob = data_blob(NULL, 0);
601 DATA_BLOB blob_in = data_blob(NULL, 0);
602 DATA_BLOB blob_out = data_blob(NULL, 0);
604 cli_temp_set_signing(cli);
606 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_client_start(&ntlmssp_state))) {
609 ntlmssp_want_feature(ntlmssp_state, NTLMSSP_FEATURE_SESSION_KEY);
611 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_set_username(ntlmssp_state, user))) {
614 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_set_domain(ntlmssp_state, domain))) {
617 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_set_password(ntlmssp_state, pass))) {
622 nt_status = ntlmssp_update(ntlmssp_state,
624 data_blob_free(&blob_in);
625 if (NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED) || NT_STATUS_IS_OK(nt_status)) {
627 /* and wrap it in a SPNEGO wrapper */
628 msg1 = gen_negTokenInit(OID_NTLMSSP, blob_out);
630 /* wrap it in SPNEGO */
631 msg1 = spnego_gen_auth(blob_out);
634 /* now send that blob on its way */
635 if (!cli_session_setup_blob_send(cli, msg1)) {
636 DEBUG(3, ("Failed to send NTLMSSP/SPNEGO blob to server!\n"));
637 nt_status = NT_STATUS_UNSUCCESSFUL;
639 data_blob_free(&msg1);
641 blob = cli_session_setup_blob_receive(cli);
643 nt_status = cli_nt_error(cli);
644 if (cli_is_error(cli) && NT_STATUS_IS_OK(nt_status)) {
645 if (cli->smb_rw_error == READ_BAD_SIG) {
646 nt_status = NT_STATUS_ACCESS_DENIED;
648 nt_status = NT_STATUS_UNSUCCESSFUL;
655 if (NT_STATUS_IS_OK(nt_status)) {
656 nt_status = NT_STATUS_UNSUCCESSFUL;
658 } else if ((turn == 1) &&
659 NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED)) {
660 DATA_BLOB tmp_blob = data_blob(NULL, 0);
661 /* the server might give us back two challenges */
662 if (!spnego_parse_challenge(blob, &blob_in,
664 DEBUG(3,("Failed to parse challenges\n"));
665 nt_status = NT_STATUS_INVALID_PARAMETER;
667 data_blob_free(&tmp_blob);
669 if (!spnego_parse_auth_response(blob, nt_status,
671 DEBUG(3,("Failed to parse auth response\n"));
672 if (NT_STATUS_IS_OK(nt_status)
673 || NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED))
674 nt_status = NT_STATUS_INVALID_PARAMETER;
677 data_blob_free(&blob);
678 data_blob_free(&blob_out);
680 } while (NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED));
682 if (NT_STATUS_IS_OK(nt_status)) {
684 DATA_BLOB key = data_blob(ntlmssp_state->session_key.data,
685 ntlmssp_state->session_key.length);
686 DATA_BLOB null_blob = data_blob(NULL, 0);
689 fstrcpy(cli->server_domain, ntlmssp_state->server_domain);
690 cli_set_session_key(cli, ntlmssp_state->session_key);
692 res = cli_simple_set_signing(cli, key, null_blob);
694 data_blob_free(&key);
698 /* 'resign' the last message, so we get the right sequence numbers
699 for checking the first reply from the server */
700 cli_calculate_sign_mac(cli);
702 if (!cli_check_sign_mac(cli)) {
703 nt_status = NT_STATUS_ACCESS_DENIED;
708 /* we have a reference conter on ntlmssp_state, if we are signing
709 then the state will be kept by the signing engine */
711 ntlmssp_end(&ntlmssp_state);
716 /****************************************************************************
717 Do a spnego encrypted session setup.
718 ****************************************************************************/
720 ADS_STATUS cli_session_setup_spnego(struct cli_state *cli, const char *user,
721 const char *pass, const char *domain)
724 char *OIDs[ASN1_MAX_OIDS];
727 BOOL got_kerberos_mechanism = False;
731 DEBUG(3,("Doing spnego session setup (blob length=%lu)\n", (unsigned long)cli->secblob.length));
733 /* the server might not even do spnego */
734 if (cli->secblob.length <= 16) {
735 DEBUG(3,("server didn't supply a full spnego negprot\n"));
740 file_save("negprot.dat", cli->secblob.data, cli->secblob.length);
743 /* there is 16 bytes of GUID before the real spnego packet starts */
744 blob = data_blob(cli->secblob.data+16, cli->secblob.length-16);
746 /* the server sent us the first part of the SPNEGO exchange in the negprot
748 if (!spnego_parse_negTokenInit(blob, OIDs, &principal)) {
749 data_blob_free(&blob);
750 return ADS_ERROR_NT(NT_STATUS_INVALID_PARAMETER);
752 data_blob_free(&blob);
754 /* make sure the server understands kerberos */
755 for (i=0;OIDs[i];i++) {
756 DEBUG(3,("got OID=%s\n", OIDs[i]));
758 if (strcmp(OIDs[i], OID_KERBEROS5_OLD) == 0 ||
759 strcmp(OIDs[i], OID_KERBEROS5) == 0) {
760 got_kerberos_mechanism = True;
766 DEBUG(3,("got principal=%s\n", principal ? principal : "<null>"));
768 if (got_kerberos_mechanism && (principal == NULL)) {
770 * It is WRONG to depend on the principal sent in the negprot
771 * reply, but right now we do it. So for safety (don't
772 * segfault later) disable Kerberos when no principal was
775 DEBUG(1, ("Kerberos mech was offered, but no principal was sent\n"));
776 DEBUGADD(1, ("Disabling Kerberos\n"));
777 cli->use_kerberos = False;
780 fstrcpy(cli->user_name, user);
783 /* If password is set we reauthenticate to kerberos server
784 * and do not store results */
786 if (got_kerberos_mechanism && cli->use_kerberos) {
792 use_in_memory_ccache();
793 ret = kerberos_kinit_password(user, pass, 0 /* no time correction for now */, NULL);
796 SAFE_FREE(principal);
797 DEBUG(0, ("Kinit failed: %s\n", error_message(ret)));
798 if (cli->fallback_after_kerberos)
800 return ADS_ERROR_KRB5(ret);
804 rc = cli_session_setup_kerberos(cli, principal, domain);
805 if (ADS_ERR_OK(rc) || !cli->fallback_after_kerberos) {
806 SAFE_FREE(principal);
812 SAFE_FREE(principal);
816 return ADS_ERROR_NT(cli_session_setup_ntlmssp(cli, user, pass, domain));
819 /****************************************************************************
820 Send a session setup. The username and workgroup is in UNIX character
821 format and must be converted to DOS codepage format before sending. If the
822 password is in plaintext, the same should be done.
823 ****************************************************************************/
825 NTSTATUS cli_session_setup(struct cli_state *cli,
827 const char *pass, int passlen,
828 const char *ntpass, int ntpasslen,
829 const char *workgroup)
834 /* allow for workgroups as part of the username */
835 fstrcpy(user2, user);
836 if ((p=strchr_m(user2,'\\')) || (p=strchr_m(user2,'/')) ||
837 (p=strchr_m(user2,*lp_winbind_separator()))) {
843 if (cli->protocol < PROTOCOL_LANMAN1) {
847 /* now work out what sort of session setup we are going to
848 do. I have split this into separate functions to make the
849 flow a bit easier to understand (tridge) */
851 /* if its an older server then we have to use the older request format */
853 if (cli->protocol < PROTOCOL_NT1) {
854 if (!lp_client_lanman_auth() && passlen != 24 && (*pass)) {
855 DEBUG(1, ("Server requested LM password but 'client lanman auth'"
857 return NT_STATUS_ACCESS_DENIED;
860 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) == 0 &&
861 !lp_client_plaintext_auth() && (*pass)) {
862 DEBUG(1, ("Server requested plaintext password but 'client use plaintext auth'"
864 return NT_STATUS_ACCESS_DENIED;
867 return cli_session_setup_lanman2(cli, user, pass, passlen,
871 /* if no user is supplied then we have to do an anonymous connection.
872 passwords are ignored */
875 return cli_session_setup_guest(cli);
877 /* if the server is share level then send a plaintext null
878 password at this point. The password is sent in the tree
881 if ((cli->sec_mode & NEGOTIATE_SECURITY_USER_LEVEL) == 0)
882 return cli_session_setup_plaintext(cli, user, "", workgroup);
884 /* if the server doesn't support encryption then we have to use
885 plaintext. The second password is ignored */
887 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) == 0) {
888 if (!lp_client_plaintext_auth() && (*pass)) {
889 DEBUG(1, ("Server requested plaintext password but 'client use plaintext auth'"
891 return NT_STATUS_ACCESS_DENIED;
893 return cli_session_setup_plaintext(cli, user, pass, workgroup);
896 /* if the server supports extended security then use SPNEGO */
898 if (cli->capabilities & CAP_EXTENDED_SECURITY) {
899 ADS_STATUS status = cli_session_setup_spnego(cli, user, pass, workgroup);
900 if (!ADS_ERR_OK(status)) {
901 DEBUG(3, ("SPNEGO login failed: %s\n", ads_errstr(status)));
902 return ads_ntstatus(status);
907 /* otherwise do a NT1 style session setup */
908 status = cli_session_setup_nt1(cli, user, pass, passlen,
909 ntpass, ntpasslen, workgroup);
910 if (!NT_STATUS_IS_OK(status)) {
911 DEBUG(3,("cli_session_setup: NT1 session setup "
912 "failed: %s\n", nt_errstr(status)));
917 if (strstr(cli->server_type, "Samba")) {
918 cli->is_samba = True;
925 /****************************************************************************
927 *****************************************************************************/
929 BOOL cli_ulogoff(struct cli_state *cli)
931 memset(cli->outbuf,'\0',smb_size);
932 set_message(cli->outbuf,2,0,True);
933 SCVAL(cli->outbuf,smb_com,SMBulogoffX);
934 cli_setup_packet(cli);
935 SSVAL(cli->outbuf,smb_vwv0,0xFF);
936 SSVAL(cli->outbuf,smb_vwv2,0); /* no additional info */
939 if (!cli_receive_smb(cli))
942 if (cli_is_error(cli)) {
950 /****************************************************************************
952 ****************************************************************************/
954 BOOL cli_send_tconX(struct cli_state *cli,
955 const char *share, const char *dev, const char *pass, int passlen)
957 fstring fullshare, pword;
959 memset(cli->outbuf,'\0',smb_size);
960 memset(cli->inbuf,'\0',smb_size);
962 fstrcpy(cli->share, share);
964 /* in user level security don't send a password now */
965 if (cli->sec_mode & NEGOTIATE_SECURITY_USER_LEVEL) {
969 DEBUG(1, ("Server not using user level security and no password supplied.\n"));
973 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) &&
974 *pass && passlen != 24) {
975 if (!lp_client_lanman_auth()) {
976 DEBUG(1, ("Server requested LANMAN password (share-level security) but 'client use lanman auth'"
982 * Non-encrypted passwords - convert to DOS codepage before encryption.
985 SMBencrypt(pass,cli->secblob.data,(uchar *)pword);
987 if((cli->sec_mode & (NEGOTIATE_SECURITY_USER_LEVEL|NEGOTIATE_SECURITY_CHALLENGE_RESPONSE)) == 0) {
988 if (!lp_client_plaintext_auth() && (*pass)) {
989 DEBUG(1, ("Server requested plaintext password but 'client use plaintext auth'"
995 * Non-encrypted passwords - convert to DOS codepage before using.
997 passlen = clistr_push(cli, pword, pass, sizeof(pword), STR_TERMINATE);
1001 memcpy(pword, pass, passlen);
1006 slprintf(fullshare, sizeof(fullshare)-1,
1007 "\\\\%s\\%s", cli->desthost, share);
1009 set_message(cli->outbuf,4, 0, True);
1010 SCVAL(cli->outbuf,smb_com,SMBtconX);
1011 cli_setup_packet(cli);
1013 SSVAL(cli->outbuf,smb_vwv0,0xFF);
1014 SSVAL(cli->outbuf,smb_vwv3,passlen);
1016 p = smb_buf(cli->outbuf);
1018 memcpy(p,pword,passlen);
1021 p += clistr_push(cli, p, fullshare, -1, STR_TERMINATE |STR_UPPER);
1022 p += clistr_push(cli, p, dev, -1, STR_TERMINATE |STR_UPPER | STR_ASCII);
1024 cli_setup_bcc(cli, p);
1027 if (!cli_receive_smb(cli))
1030 if (cli_is_error(cli))
1033 clistr_pull(cli, cli->dev, smb_buf(cli->inbuf), sizeof(fstring), -1, STR_TERMINATE|STR_ASCII);
1035 if (cli->protocol >= PROTOCOL_NT1 &&
1036 smb_buflen(cli->inbuf) == 3) {
1037 /* almost certainly win95 - enable bug fixes */
1041 /* Make sure that we have the optional support 16-bit field. WCT > 2 */
1042 /* Avoids issues when connecting to Win9x boxes sharing files */
1044 cli->dfsroot = False;
1045 if ( (CVAL(cli->inbuf, smb_wct))>2 && cli->protocol >= PROTOCOL_LANMAN2 )
1046 cli->dfsroot = (SVAL( cli->inbuf, smb_vwv2 ) & SMB_SHARE_IN_DFS) ? True : False;
1048 cli->cnum = SVAL(cli->inbuf,smb_tid);
1052 /****************************************************************************
1053 Send a tree disconnect.
1054 ****************************************************************************/
1056 BOOL cli_tdis(struct cli_state *cli)
1058 memset(cli->outbuf,'\0',smb_size);
1059 set_message(cli->outbuf,0,0,True);
1060 SCVAL(cli->outbuf,smb_com,SMBtdis);
1061 SSVAL(cli->outbuf,smb_tid,cli->cnum);
1062 cli_setup_packet(cli);
1065 if (!cli_receive_smb(cli))
1068 if (cli_is_error(cli)) {
1076 /****************************************************************************
1077 Send a negprot command.
1078 ****************************************************************************/
1080 void cli_negprot_send(struct cli_state *cli)
1085 if (cli->protocol < PROTOCOL_NT1)
1086 cli->use_spnego = False;
1088 memset(cli->outbuf,'\0',smb_size);
1090 /* setup the protocol strings */
1091 set_message(cli->outbuf,0,0,True);
1093 p = smb_buf(cli->outbuf);
1095 prots[numprots].name && prots[numprots].prot<=cli->protocol;
1098 p += clistr_push(cli, p, prots[numprots].name, -1, STR_TERMINATE);
1101 SCVAL(cli->outbuf,smb_com,SMBnegprot);
1102 cli_setup_bcc(cli, p);
1103 cli_setup_packet(cli);
1105 SCVAL(smb_buf(cli->outbuf),0,2);
1110 /****************************************************************************
1111 Send a negprot command.
1112 ****************************************************************************/
1114 BOOL cli_negprot(struct cli_state *cli)
1120 if (cli->protocol < PROTOCOL_NT1)
1121 cli->use_spnego = False;
1123 memset(cli->outbuf,'\0',smb_size);
1125 /* setup the protocol strings */
1126 for (plength=0,numprots=0;
1127 prots[numprots].name && prots[numprots].prot<=cli->protocol;
1129 plength += strlen(prots[numprots].name)+2;
1131 set_message(cli->outbuf,0,plength,True);
1133 p = smb_buf(cli->outbuf);
1135 prots[numprots].name && prots[numprots].prot<=cli->protocol;
1138 p += clistr_push(cli, p, prots[numprots].name, -1, STR_TERMINATE);
1141 SCVAL(cli->outbuf,smb_com,SMBnegprot);
1142 cli_setup_packet(cli);
1144 SCVAL(smb_buf(cli->outbuf),0,2);
1147 if (!cli_receive_smb(cli))
1150 show_msg(cli->inbuf);
1152 if (cli_is_error(cli) ||
1153 ((int)SVAL(cli->inbuf,smb_vwv0) >= numprots)) {
1157 cli->protocol = prots[SVAL(cli->inbuf,smb_vwv0)].prot;
1159 if ((cli->protocol < PROTOCOL_NT1) && cli->sign_info.mandatory_signing) {
1160 DEBUG(0,("cli_negprot: SMB signing is mandatory and the selected protocol level doesn't support it.\n"));
1164 if (cli->protocol >= PROTOCOL_NT1) {
1167 cli->sec_mode = CVAL(cli->inbuf,smb_vwv1);
1168 cli->max_mux = SVAL(cli->inbuf, smb_vwv1+1);
1169 cli->max_xmit = IVAL(cli->inbuf,smb_vwv3+1);
1170 cli->sesskey = IVAL(cli->inbuf,smb_vwv7+1);
1171 cli->serverzone = SVALS(cli->inbuf,smb_vwv15+1);
1172 cli->serverzone *= 60;
1173 /* this time arrives in real GMT */
1174 ts = interpret_long_date(cli->inbuf+smb_vwv11+1);
1175 cli->servertime = ts.tv_sec;
1176 cli->secblob = data_blob(smb_buf(cli->inbuf),smb_buflen(cli->inbuf));
1177 cli->capabilities = IVAL(cli->inbuf,smb_vwv9+1);
1178 if (cli->capabilities & CAP_RAW_MODE) {
1179 cli->readbraw_supported = True;
1180 cli->writebraw_supported = True;
1182 /* work out if they sent us a workgroup */
1183 if (!(cli->capabilities & CAP_EXTENDED_SECURITY) &&
1184 smb_buflen(cli->inbuf) > 8) {
1185 clistr_pull(cli, cli->server_domain,
1186 smb_buf(cli->inbuf)+8, sizeof(cli->server_domain),
1187 smb_buflen(cli->inbuf)-8, STR_UNICODE|STR_NOALIGN);
1191 * As signing is slow we only turn it on if either the client or
1192 * the server require it. JRA.
1195 if (cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_REQUIRED) {
1196 /* Fail if server says signing is mandatory and we don't want to support it. */
1197 if (!cli->sign_info.allow_smb_signing) {
1198 DEBUG(0,("cli_negprot: SMB signing is mandatory and we have disabled it.\n"));
1201 cli->sign_info.negotiated_smb_signing = True;
1202 cli->sign_info.mandatory_signing = True;
1203 } else if (cli->sign_info.mandatory_signing && cli->sign_info.allow_smb_signing) {
1204 /* Fail if client says signing is mandatory and the server doesn't support it. */
1205 if (!(cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_ENABLED)) {
1206 DEBUG(1,("cli_negprot: SMB signing is mandatory and the server doesn't support it.\n"));
1209 cli->sign_info.negotiated_smb_signing = True;
1210 cli->sign_info.mandatory_signing = True;
1211 } else if (cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_ENABLED) {
1212 cli->sign_info.negotiated_smb_signing = True;
1215 if (cli->capabilities & (CAP_LARGE_READX|CAP_LARGE_WRITEX)) {
1216 SAFE_FREE(cli->outbuf);
1217 SAFE_FREE(cli->inbuf);
1218 cli->outbuf = (char *)SMB_MALLOC(CLI_SAMBA_MAX_LARGE_READX_SIZE+SAFETY_MARGIN);
1219 cli->inbuf = (char *)SMB_MALLOC(CLI_SAMBA_MAX_LARGE_READX_SIZE+SAFETY_MARGIN);
1220 cli->bufsize = CLI_SAMBA_MAX_LARGE_READX_SIZE;
1223 } else if (cli->protocol >= PROTOCOL_LANMAN1) {
1224 cli->use_spnego = False;
1225 cli->sec_mode = SVAL(cli->inbuf,smb_vwv1);
1226 cli->max_xmit = SVAL(cli->inbuf,smb_vwv2);
1227 cli->max_mux = SVAL(cli->inbuf, smb_vwv3);
1228 cli->sesskey = IVAL(cli->inbuf,smb_vwv6);
1229 cli->serverzone = SVALS(cli->inbuf,smb_vwv10);
1230 cli->serverzone *= 60;
1231 /* this time is converted to GMT by make_unix_date */
1232 cli->servertime = cli_make_unix_date(cli,cli->inbuf+smb_vwv8);
1233 cli->readbraw_supported = ((SVAL(cli->inbuf,smb_vwv5) & 0x1) != 0);
1234 cli->writebraw_supported = ((SVAL(cli->inbuf,smb_vwv5) & 0x2) != 0);
1235 cli->secblob = data_blob(smb_buf(cli->inbuf),smb_buflen(cli->inbuf));
1237 /* the old core protocol */
1238 cli->use_spnego = False;
1240 cli->serverzone = get_time_zone(time(NULL));
1243 cli->max_xmit = MIN(cli->max_xmit, CLI_BUFFER_SIZE);
1245 /* a way to force ascii SMB */
1246 if (getenv("CLI_FORCE_ASCII"))
1247 cli->capabilities &= ~CAP_UNICODE;
1252 /****************************************************************************
1253 Send a session request. See rfc1002.txt 4.3 and 4.3.2.
1254 ****************************************************************************/
1256 BOOL cli_session_request(struct cli_state *cli,
1257 struct nmb_name *calling, struct nmb_name *called)
1262 memcpy(&(cli->calling), calling, sizeof(*calling));
1263 memcpy(&(cli->called ), called , sizeof(*called ));
1265 /* put in the destination name */
1266 p = cli->outbuf+len;
1267 name_mangle(cli->called .name, p, cli->called .name_type);
1271 p = cli->outbuf+len;
1272 name_mangle(cli->calling.name, p, cli->calling.name_type);
1275 /* 445 doesn't have session request */
1276 if (cli->port == 445)
1279 /* send a session request (RFC 1002) */
1280 /* setup the packet length
1281 * Remove four bytes from the length count, since the length
1282 * field in the NBT Session Service header counts the number
1283 * of bytes which follow. The cli_send_smb() function knows
1284 * about this and accounts for those four bytes.
1288 _smb_setlen(cli->outbuf,len);
1289 SCVAL(cli->outbuf,0,0x81);
1292 DEBUG(5,("Sent session request\n"));
1294 if (!cli_receive_smb(cli))
1297 if (CVAL(cli->inbuf,0) == 0x84) {
1298 /* C. Hoch 9/14/95 Start */
1299 /* For information, here is the response structure.
1300 * We do the byte-twiddling to for portability.
1301 struct RetargetResponse{
1303 unsigned char flags;
1309 int port = (CVAL(cli->inbuf,8)<<8)+CVAL(cli->inbuf,9);
1310 /* SESSION RETARGET */
1311 putip((char *)&cli->dest_ip,cli->inbuf+4);
1313 cli->fd = open_socket_out(SOCK_STREAM, &cli->dest_ip, port, LONG_CONNECT_TIMEOUT);
1317 DEBUG(3,("Retargeted\n"));
1319 set_socket_options(cli->fd,user_socket_options);
1326 DEBUG(0,("Retarget recursion - failing\n"));
1330 ret = cli_session_request(cli, calling, called);
1334 } /* C. Hoch 9/14/95 End */
1336 if (CVAL(cli->inbuf,0) != 0x82) {
1337 /* This is the wrong place to put the error... JRA. */
1338 cli->rap_error = CVAL(cli->inbuf,4);
1344 /****************************************************************************
1345 Open the client sockets.
1346 ****************************************************************************/
1348 BOOL cli_connect(struct cli_state *cli, const char *host, struct in_addr *ip)
1350 int name_type = 0x20;
1353 /* reasonable default hostname */
1354 if (!host) host = "*SMBSERVER";
1356 fstrcpy(cli->desthost, host);
1358 /* allow hostnames of the form NAME#xx and do a netbios lookup */
1359 if ((p = strchr(cli->desthost, '#'))) {
1360 name_type = strtol(p+1, NULL, 16);
1364 if (!ip || is_zero_ip(*ip)) {
1365 if (!resolve_name(cli->desthost, &cli->dest_ip, name_type)) {
1368 if (ip) *ip = cli->dest_ip;
1373 if (getenv("LIBSMB_PROG")) {
1374 cli->fd = sock_exec(getenv("LIBSMB_PROG"));
1376 /* try 445 first, then 139 */
1377 int port = cli->port?cli->port:445;
1378 cli->fd = open_socket_out(SOCK_STREAM, &cli->dest_ip,
1379 port, cli->timeout);
1380 if (cli->fd == -1 && cli->port == 0) {
1382 cli->fd = open_socket_out(SOCK_STREAM, &cli->dest_ip,
1383 port, cli->timeout);
1388 if (cli->fd == -1) {
1389 DEBUG(1,("Error connecting to %s (%s)\n",
1390 ip?inet_ntoa(*ip):host,strerror(errno)));
1394 set_socket_options(cli->fd,user_socket_options);
1400 establishes a connection to after the negprot.
1401 @param output_cli A fully initialised cli structure, non-null only on success
1402 @param dest_host The netbios name of the remote host
1403 @param dest_ip (optional) The the destination IP, NULL for name based lookup
1404 @param port (optional) The destination port (0 for default)
1405 @param retry BOOL. Did this connection fail with a retryable error ?
1408 NTSTATUS cli_start_connection(struct cli_state **output_cli,
1409 const char *my_name,
1410 const char *dest_host,
1411 struct in_addr *dest_ip, int port,
1412 int signing_state, int flags,
1416 struct nmb_name calling;
1417 struct nmb_name called;
1418 struct cli_state *cli;
1425 my_name = global_myname();
1427 if (!(cli = cli_initialise())) {
1428 return NT_STATUS_NO_MEMORY;
1431 make_nmb_name(&calling, my_name, 0x0);
1432 make_nmb_name(&called , dest_host, 0x20);
1434 if (cli_set_port(cli, port) != port) {
1436 return NT_STATUS_UNSUCCESSFUL;
1439 cli_set_timeout(cli, 10000); /* 10 seconds. */
1448 DEBUG(3,("Connecting to host=%s\n", dest_host));
1450 if (!cli_connect(cli, dest_host, &ip)) {
1451 DEBUG(1,("cli_start_connection: failed to connect to %s (%s)\n",
1452 nmb_namestr(&called), inet_ntoa(ip)));
1454 if (is_zero_ip(ip)) {
1455 return NT_STATUS_BAD_NETWORK_NAME;
1457 return NT_STATUS_CONNECTION_REFUSED;
1464 if (!cli_session_request(cli, &calling, &called)) {
1466 DEBUG(1,("session request to %s failed (%s)\n",
1467 called.name, cli_errstr(cli)));
1468 if ((p=strchr(called.name, '.')) && !is_ipaddress(called.name)) {
1472 if (strcmp(called.name, "*SMBSERVER")) {
1473 make_nmb_name(&called , "*SMBSERVER", 0x20);
1476 return NT_STATUS_BAD_NETWORK_NAME;
1479 cli_setup_signing_state(cli, signing_state);
1481 if (flags & CLI_FULL_CONNECTION_DONT_SPNEGO)
1482 cli->use_spnego = False;
1483 else if (flags & CLI_FULL_CONNECTION_USE_KERBEROS)
1484 cli->use_kerberos = True;
1486 if (!cli_negprot(cli)) {
1487 DEBUG(1,("failed negprot\n"));
1488 nt_status = cli_nt_error(cli);
1489 if (NT_STATUS_IS_OK(nt_status)) {
1490 nt_status = NT_STATUS_UNSUCCESSFUL;
1497 return NT_STATUS_OK;
1502 establishes a connection right up to doing tconX, password specified.
1503 @param output_cli A fully initialised cli structure, non-null only on success
1504 @param dest_host The netbios name of the remote host
1505 @param dest_ip (optional) The the destination IP, NULL for name based lookup
1506 @param port (optional) The destination port (0 for default)
1507 @param service (optional) The share to make the connection to. Should be 'unqualified' in any way.
1508 @param service_type The 'type' of serivice.
1509 @param user Username, unix string
1510 @param domain User's domain
1511 @param password User's password, unencrypted unix string.
1512 @param retry BOOL. Did this connection fail with a retryable error ?
1515 NTSTATUS cli_full_connection(struct cli_state **output_cli,
1516 const char *my_name,
1517 const char *dest_host,
1518 struct in_addr *dest_ip, int port,
1519 const char *service, const char *service_type,
1520 const char *user, const char *domain,
1521 const char *password, int flags,
1526 struct cli_state *cli = NULL;
1527 int pw_len = password ? strlen(password)+1 : 0;
1531 if (password == NULL) {
1535 nt_status = cli_start_connection(&cli, my_name, dest_host,
1536 dest_ip, port, signing_state, flags, retry);
1538 if (!NT_STATUS_IS_OK(nt_status)) {
1542 nt_status = cli_session_setup(cli, user, password, pw_len, password,
1544 if (!NT_STATUS_IS_OK(nt_status)) {
1546 if (!(flags & CLI_FULL_CONNECTION_ANONYMOUS_FALLBACK)) {
1547 DEBUG(1,("failed session setup with %s\n",
1548 nt_errstr(nt_status)));
1553 nt_status = cli_session_setup(cli, "", "", 0, "", 0, domain);
1554 if (!NT_STATUS_IS_OK(nt_status)) {
1555 DEBUG(1,("anonymous failed session setup with %s\n",
1556 nt_errstr(nt_status)));
1563 if (!cli_send_tconX(cli, service, service_type, password, pw_len)) {
1564 nt_status = cli_nt_error(cli);
1565 DEBUG(1,("failed tcon_X with %s\n", nt_errstr(nt_status)));
1567 if (NT_STATUS_IS_OK(nt_status)) {
1568 nt_status = NT_STATUS_UNSUCCESSFUL;
1574 cli_init_creds(cli, user, domain, password);
1577 return NT_STATUS_OK;
1580 /****************************************************************************
1581 Attempt a NetBIOS session request, falling back to *SMBSERVER if needed.
1582 ****************************************************************************/
1584 BOOL attempt_netbios_session_request(struct cli_state **ppcli, const char *srchost, const char *desthost,
1585 struct in_addr *pdest_ip)
1587 struct nmb_name calling, called;
1589 make_nmb_name(&calling, srchost, 0x0);
1592 * If the called name is an IP address
1593 * then use *SMBSERVER immediately.
1596 if(is_ipaddress(desthost)) {
1597 make_nmb_name(&called, "*SMBSERVER", 0x20);
1599 make_nmb_name(&called, desthost, 0x20);
1602 if (!cli_session_request(*ppcli, &calling, &called)) {
1603 struct nmb_name smbservername;
1605 make_nmb_name(&smbservername , "*SMBSERVER", 0x20);
1608 * If the name wasn't *SMBSERVER then
1609 * try with *SMBSERVER if the first name fails.
1612 if (nmb_name_equal(&called, &smbservername)) {
1615 * The name used was *SMBSERVER, don't bother with another name.
1618 DEBUG(0,("attempt_netbios_session_request: %s rejected the session for name *SMBSERVER \
1619 with error %s.\n", desthost, cli_errstr(*ppcli) ));
1624 cli_shutdown(*ppcli);
1626 *ppcli = cli_initialise();
1628 /* Out of memory... */
1632 if (!cli_connect(*ppcli, desthost, pdest_ip) ||
1633 !cli_session_request(*ppcli, &calling, &smbservername)) {
1634 DEBUG(0,("attempt_netbios_session_request: %s rejected the session for \
1635 name *SMBSERVER with error %s\n", desthost, cli_errstr(*ppcli) ));
1647 /****************************************************************************
1648 Send an old style tcon.
1649 ****************************************************************************/
1650 NTSTATUS cli_raw_tcon(struct cli_state *cli,
1651 const char *service, const char *pass, const char *dev,
1652 uint16 *max_xmit, uint16 *tid)
1656 if (!lp_client_plaintext_auth() && (*pass)) {
1657 DEBUG(1, ("Server requested plaintext password but 'client use plaintext auth'"
1659 return NT_STATUS_ACCESS_DENIED;
1662 memset(cli->outbuf,'\0',smb_size);
1663 memset(cli->inbuf,'\0',smb_size);
1665 set_message(cli->outbuf, 0, 0, True);
1666 SCVAL(cli->outbuf,smb_com,SMBtcon);
1667 cli_setup_packet(cli);
1669 p = smb_buf(cli->outbuf);
1670 *p++ = 4; p += clistr_push(cli, p, service, -1, STR_TERMINATE | STR_NOALIGN);
1671 *p++ = 4; p += clistr_push(cli, p, pass, -1, STR_TERMINATE | STR_NOALIGN);
1672 *p++ = 4; p += clistr_push(cli, p, dev, -1, STR_TERMINATE | STR_NOALIGN);
1674 cli_setup_bcc(cli, p);
1677 if (!cli_receive_smb(cli)) {
1678 return NT_STATUS_UNEXPECTED_NETWORK_ERROR;
1681 if (cli_is_error(cli)) {
1682 return cli_nt_error(cli);
1685 *max_xmit = SVAL(cli->inbuf, smb_vwv0);
1686 *tid = SVAL(cli->inbuf, smb_vwv1);
1688 return NT_STATUS_OK;
1691 /* Return a cli_state pointing at the IPC$ share for the given server */
1693 struct cli_state *get_ipc_connect(char *server, struct in_addr *server_ip,
1694 struct user_auth_info *user_info)
1696 struct cli_state *cli;
1702 nt_status = cli_full_connection(&cli, myname, server, server_ip, 0, "IPC$", "IPC",
1703 user_info->username, lp_workgroup(), user_info->password,
1704 CLI_FULL_CONNECTION_ANONYMOUS_FALLBACK, Undefined, NULL);
1706 if (NT_STATUS_IS_OK(nt_status)) {
1708 } else if (is_ipaddress(server)) {
1709 /* windows 9* needs a correct NMB name for connections */
1710 fstring remote_name;
1712 if (name_status_find("*", 0, 0, *server_ip, remote_name)) {
1713 cli = get_ipc_connect(remote_name, server_ip, user_info);
1722 * Given the IP address of a master browser on the network, return its
1723 * workgroup and connect to it.
1725 * This function is provided to allow additional processing beyond what
1726 * get_ipc_connect_master_ip_bcast() does, e.g. to retrieve the list of master
1727 * browsers and obtain each master browsers' list of domains (in case the
1728 * first master browser is recently on the network and has not yet
1729 * synchronized with other master browsers and therefore does not yet have the
1730 * entire network browse list)
1733 struct cli_state *get_ipc_connect_master_ip(struct ip_service * mb_ip, pstring workgroup, struct user_auth_info *user_info)
1735 static fstring name;
1736 struct cli_state *cli;
1737 struct in_addr server_ip;
1739 DEBUG(99, ("Looking up name of master browser %s\n",
1740 inet_ntoa(mb_ip->ip)));
1743 * Do a name status query to find out the name of the master browser.
1744 * We use <01><02>__MSBROWSE__<02>#01 if *#00 fails because a domain
1745 * master browser will not respond to a wildcard query (or, at least,
1746 * an NT4 server acting as the domain master browser will not).
1748 * We might be able to use ONLY the query on MSBROWSE, but that's not
1749 * yet been tested with all Windows versions, so until it is, leave
1750 * the original wildcard query as the first choice and fall back to
1751 * MSBROWSE if the wildcard query fails.
1753 if (!name_status_find("*", 0, 0x1d, mb_ip->ip, name) &&
1754 !name_status_find(MSBROWSE, 1, 0x1d, mb_ip->ip, name)) {
1756 DEBUG(99, ("Could not retrieve name status for %s\n",
1757 inet_ntoa(mb_ip->ip)));
1761 if (!find_master_ip(name, &server_ip)) {
1762 DEBUG(99, ("Could not find master ip for %s\n", name));
1766 pstrcpy(workgroup, name);
1768 DEBUG(4, ("found master browser %s, %s\n",
1769 name, inet_ntoa(mb_ip->ip)));
1771 cli = get_ipc_connect(inet_ntoa(server_ip), &server_ip, user_info);
1778 * Return the IP address and workgroup of a master browser on the network, and
1782 struct cli_state *get_ipc_connect_master_ip_bcast(pstring workgroup, struct user_auth_info *user_info)
1784 struct ip_service *ip_list;
1785 struct cli_state *cli;
1788 DEBUG(99, ("Do broadcast lookup for workgroups on local network\n"));
1790 /* Go looking for workgroups by broadcasting on the local network */
1792 if (!name_resolve_bcast(MSBROWSE, 1, &ip_list, &count)) {
1793 DEBUG(99, ("No master browsers responded\n"));
1797 for (i = 0; i < count; i++) {
1798 DEBUG(99, ("Found master browser %s\n", inet_ntoa(ip_list[i].ip)));
1800 cli = get_ipc_connect_master_ip(&ip_list[i], workgroup, user_info);