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,"LANMAN2.1"},
37 {PROTOCOL_LANMAN2,"Samba"},
38 {PROTOCOL_NT1,"NT LANMAN 1.0"},
39 {PROTOCOL_NT1,"NT LM 0.12"},
44 * Set the user session key for a connection
45 * @param cli The cli structure to add it too
46 * @param session_key The session key used. (A copy of this is taken for the cli struct)
50 static void cli_set_session_key (struct cli_state *cli, const DATA_BLOB session_key)
52 cli->user_session_key = data_blob(session_key.data, session_key.length);
55 /****************************************************************************
56 Do an old lanman2 style session setup.
57 ****************************************************************************/
59 static NTSTATUS cli_session_setup_lanman2(struct cli_state *cli,
61 const char *pass, size_t passlen,
62 const char *workgroup)
64 DATA_BLOB session_key = data_blob(NULL, 0);
65 DATA_BLOB lm_response = data_blob(NULL, 0);
69 if (passlen > sizeof(pword)-1) {
70 return NT_STATUS_INVALID_PARAMETER;
73 /* LANMAN servers predate NT status codes and Unicode and ignore those
74 smb flags so we must disable the corresponding default capabilities
75 that would otherwise cause the Unicode and NT Status flags to be
76 set (and even returned by the server) */
78 cli->capabilities &= ~(CAP_UNICODE | CAP_STATUS32);
80 /* if in share level security then don't send a password now */
81 if (!(cli->sec_mode & NEGOTIATE_SECURITY_USER_LEVEL))
84 if (passlen > 0 && (cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) && passlen != 24) {
85 /* Encrypted mode needed, and non encrypted password supplied. */
86 lm_response = data_blob(NULL, 24);
87 if (!SMBencrypt(pass, cli->secblob.data,(uchar *)lm_response.data)) {
88 DEBUG(1, ("Password is > 14 chars in length, and is therefore incompatible with Lanman authentication\n"));
89 return NT_STATUS_ACCESS_DENIED;
91 } else if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) && passlen == 24) {
92 /* Encrypted mode needed, and encrypted password supplied. */
93 lm_response = data_blob(pass, passlen);
94 } else if (passlen > 0) {
95 /* Plaintext mode needed, assume plaintext supplied. */
96 passlen = clistr_push(cli, pword, pass, sizeof(pword), STR_TERMINATE);
97 lm_response = data_blob(pass, passlen);
100 /* send a session setup command */
101 memset(cli->outbuf,'\0',smb_size);
102 set_message(cli->outbuf,10, 0, True);
103 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
104 cli_setup_packet(cli);
106 SCVAL(cli->outbuf,smb_vwv0,0xFF);
107 SSVAL(cli->outbuf,smb_vwv2,cli->max_xmit);
108 SSVAL(cli->outbuf,smb_vwv3,2);
109 SSVAL(cli->outbuf,smb_vwv4,1);
110 SIVAL(cli->outbuf,smb_vwv5,cli->sesskey);
111 SSVAL(cli->outbuf,smb_vwv7,lm_response.length);
113 p = smb_buf(cli->outbuf);
114 memcpy(p,lm_response.data,lm_response.length);
115 p += lm_response.length;
116 p += clistr_push(cli, p, user, -1, STR_TERMINATE|STR_UPPER);
117 p += clistr_push(cli, p, workgroup, -1, STR_TERMINATE|STR_UPPER);
118 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
119 p += clistr_push(cli, p, "Samba", -1, STR_TERMINATE);
120 cli_setup_bcc(cli, p);
122 if (!cli_send_smb(cli) || !cli_receive_smb(cli)) {
123 return cli_nt_error(cli);
126 show_msg(cli->inbuf);
128 if (cli_is_error(cli)) {
129 return cli_nt_error(cli);
132 /* use the returned vuid from now on */
133 cli->vuid = SVAL(cli->inbuf,smb_uid);
134 fstrcpy(cli->user_name, user);
136 if (session_key.data) {
137 /* Have plaintext orginal */
138 cli_set_session_key(cli, session_key);
144 /****************************************************************************
145 Work out suitable capabilities to offer the server.
146 ****************************************************************************/
148 static uint32 cli_session_setup_capabilities(struct cli_state *cli)
150 uint32 capabilities = CAP_NT_SMBS;
152 if (!cli->force_dos_errors)
153 capabilities |= CAP_STATUS32;
155 if (cli->use_level_II_oplocks)
156 capabilities |= CAP_LEVEL_II_OPLOCKS;
158 capabilities |= (cli->capabilities & (CAP_UNICODE|CAP_LARGE_FILES|CAP_LARGE_READX|CAP_LARGE_WRITEX|CAP_DFS));
162 /****************************************************************************
163 Do a NT1 guest session setup.
164 ****************************************************************************/
166 static NTSTATUS cli_session_setup_guest(struct cli_state *cli)
169 uint32 capabilities = cli_session_setup_capabilities(cli);
171 memset(cli->outbuf, '\0', smb_size);
172 set_message(cli->outbuf,13,0,True);
173 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
174 cli_setup_packet(cli);
176 SCVAL(cli->outbuf,smb_vwv0,0xFF);
177 SSVAL(cli->outbuf,smb_vwv2,CLI_BUFFER_SIZE);
178 SSVAL(cli->outbuf,smb_vwv3,2);
179 SSVAL(cli->outbuf,smb_vwv4,cli->pid);
180 SIVAL(cli->outbuf,smb_vwv5,cli->sesskey);
181 SSVAL(cli->outbuf,smb_vwv7,0);
182 SSVAL(cli->outbuf,smb_vwv8,0);
183 SIVAL(cli->outbuf,smb_vwv11,capabilities);
184 p = smb_buf(cli->outbuf);
185 p += clistr_push(cli, p, "", -1, STR_TERMINATE); /* username */
186 p += clistr_push(cli, p, "", -1, STR_TERMINATE); /* workgroup */
187 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
188 p += clistr_push(cli, p, "Samba", -1, STR_TERMINATE);
189 cli_setup_bcc(cli, p);
191 if (!cli_send_smb(cli) || !cli_receive_smb(cli)) {
192 return cli_nt_error(cli);
195 show_msg(cli->inbuf);
197 if (cli_is_error(cli)) {
198 return cli_nt_error(cli);
201 cli->vuid = SVAL(cli->inbuf,smb_uid);
203 p = smb_buf(cli->inbuf);
204 p += clistr_pull(cli, cli->server_os, p, sizeof(fstring), -1, STR_TERMINATE);
205 p += clistr_pull(cli, cli->server_type, p, sizeof(fstring), -1, STR_TERMINATE);
206 p += clistr_pull(cli, cli->server_domain, p, sizeof(fstring), -1, STR_TERMINATE);
208 if (strstr(cli->server_type, "Samba")) {
209 cli->is_samba = True;
212 fstrcpy(cli->user_name, "");
217 /****************************************************************************
218 Do a NT1 plaintext session setup.
219 ****************************************************************************/
221 static NTSTATUS cli_session_setup_plaintext(struct cli_state *cli,
222 const char *user, const char *pass,
223 const char *workgroup)
225 uint32 capabilities = cli_session_setup_capabilities(cli);
229 fstr_sprintf( lanman, "Samba %s", SAMBA_VERSION_STRING);
231 memset(cli->outbuf, '\0', smb_size);
232 set_message(cli->outbuf,13,0,True);
233 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
234 cli_setup_packet(cli);
236 SCVAL(cli->outbuf,smb_vwv0,0xFF);
237 SSVAL(cli->outbuf,smb_vwv2,CLI_BUFFER_SIZE);
238 SSVAL(cli->outbuf,smb_vwv3,2);
239 SSVAL(cli->outbuf,smb_vwv4,cli->pid);
240 SIVAL(cli->outbuf,smb_vwv5,cli->sesskey);
241 SSVAL(cli->outbuf,smb_vwv8,0);
242 SIVAL(cli->outbuf,smb_vwv11,capabilities);
243 p = smb_buf(cli->outbuf);
245 /* check wether to send the ASCII or UNICODE version of the password */
247 if ( (capabilities & CAP_UNICODE) == 0 ) {
248 p += clistr_push(cli, p, pass, -1, STR_TERMINATE); /* password */
249 SSVAL(cli->outbuf,smb_vwv7,PTR_DIFF(p, smb_buf(cli->outbuf)));
252 p += clistr_push(cli, p, pass, -1, STR_UNICODE|STR_TERMINATE); /* unicode password */
253 SSVAL(cli->outbuf,smb_vwv8,PTR_DIFF(p, smb_buf(cli->outbuf)));
256 p += clistr_push(cli, p, user, -1, STR_TERMINATE); /* username */
257 p += clistr_push(cli, p, workgroup, -1, STR_TERMINATE); /* workgroup */
258 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
259 p += clistr_push(cli, p, lanman, -1, STR_TERMINATE);
260 cli_setup_bcc(cli, p);
262 if (!cli_send_smb(cli) || !cli_receive_smb(cli)) {
263 return cli_nt_error(cli);
266 show_msg(cli->inbuf);
268 if (cli_is_error(cli)) {
269 return cli_nt_error(cli);
272 cli->vuid = SVAL(cli->inbuf,smb_uid);
273 p = smb_buf(cli->inbuf);
274 p += clistr_pull(cli, cli->server_os, p, sizeof(fstring), -1, STR_TERMINATE);
275 p += clistr_pull(cli, cli->server_type, p, sizeof(fstring), -1, STR_TERMINATE);
276 p += clistr_pull(cli, cli->server_domain, p, sizeof(fstring), -1, STR_TERMINATE);
277 fstrcpy(cli->user_name, user);
279 if (strstr(cli->server_type, "Samba")) {
280 cli->is_samba = True;
286 /****************************************************************************
287 do a NT1 NTLM/LM encrypted session setup - for when extended security
289 @param cli client state to create do session setup on
291 @param pass *either* cleartext password (passlen !=24) or LM response.
292 @param ntpass NT response, implies ntpasslen >=24, implies pass is not clear
293 @param workgroup The user's domain.
294 ****************************************************************************/
296 static NTSTATUS cli_session_setup_nt1(struct cli_state *cli, const char *user,
297 const char *pass, size_t passlen,
298 const char *ntpass, size_t ntpasslen,
299 const char *workgroup)
301 uint32 capabilities = cli_session_setup_capabilities(cli);
302 DATA_BLOB lm_response = data_blob(NULL, 0);
303 DATA_BLOB nt_response = data_blob(NULL, 0);
304 DATA_BLOB session_key = data_blob(NULL, 0);
309 /* do nothing - guest login */
310 } else if (passlen != 24) {
311 if (lp_client_ntlmv2_auth()) {
312 DATA_BLOB server_chal;
313 DATA_BLOB names_blob;
314 server_chal = data_blob(cli->secblob.data, MIN(cli->secblob.length, 8));
316 /* note that the 'workgroup' here is a best guess - we don't know
317 the server's domain at this point. The 'server name' is also
320 names_blob = NTLMv2_generate_names_blob(cli->called.name, workgroup);
322 if (!SMBNTLMv2encrypt(user, workgroup, pass, &server_chal,
324 &lm_response, &nt_response, &session_key)) {
325 data_blob_free(&names_blob);
326 data_blob_free(&server_chal);
327 return NT_STATUS_ACCESS_DENIED;
329 data_blob_free(&names_blob);
330 data_blob_free(&server_chal);
334 E_md4hash(pass, nt_hash);
337 nt_response = data_blob(NULL, 0);
339 nt_response = data_blob(NULL, 24);
340 SMBNTencrypt(pass,cli->secblob.data,nt_response.data);
342 /* non encrypted password supplied. Ignore ntpass. */
343 if (lp_client_lanman_auth()) {
344 lm_response = data_blob(NULL, 24);
345 if (!SMBencrypt(pass,cli->secblob.data, lm_response.data)) {
346 /* Oops, the LM response is invalid, just put
347 the NT response there instead */
348 data_blob_free(&lm_response);
349 lm_response = data_blob(nt_response.data, nt_response.length);
352 /* LM disabled, place NT# in LM field instead */
353 lm_response = data_blob(nt_response.data, nt_response.length);
356 session_key = data_blob(NULL, 16);
358 E_deshash(pass, session_key.data);
359 memset(&session_key.data[8], '\0', 8);
361 SMBsesskeygen_ntv1(nt_hash, NULL, session_key.data);
365 cli_simple_set_signing(cli, session_key, lm_response);
367 cli_simple_set_signing(cli, session_key, nt_response);
370 /* pre-encrypted password supplied. Only used for
371 security=server, can't do
372 signing because we don't have original key */
374 lm_response = data_blob(pass, passlen);
375 nt_response = data_blob(ntpass, ntpasslen);
378 /* send a session setup command */
379 memset(cli->outbuf,'\0',smb_size);
381 set_message(cli->outbuf,13,0,True);
382 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
383 cli_setup_packet(cli);
385 SCVAL(cli->outbuf,smb_vwv0,0xFF);
386 SSVAL(cli->outbuf,smb_vwv2,CLI_BUFFER_SIZE);
387 SSVAL(cli->outbuf,smb_vwv3,2);
388 SSVAL(cli->outbuf,smb_vwv4,cli->pid);
389 SIVAL(cli->outbuf,smb_vwv5,cli->sesskey);
390 SSVAL(cli->outbuf,smb_vwv7,lm_response.length);
391 SSVAL(cli->outbuf,smb_vwv8,nt_response.length);
392 SIVAL(cli->outbuf,smb_vwv11,capabilities);
393 p = smb_buf(cli->outbuf);
394 if (lm_response.length) {
395 memcpy(p,lm_response.data, lm_response.length); p += lm_response.length;
397 if (nt_response.length) {
398 memcpy(p,nt_response.data, nt_response.length); p += nt_response.length;
400 p += clistr_push(cli, p, user, -1, STR_TERMINATE);
402 /* Upper case here might help some NTLMv2 implementations */
403 p += clistr_push(cli, p, workgroup, -1, STR_TERMINATE|STR_UPPER);
404 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
405 p += clistr_push(cli, p, "Samba", -1, STR_TERMINATE);
406 cli_setup_bcc(cli, p);
408 if (!cli_send_smb(cli) || !cli_receive_smb(cli)) {
409 result = cli_nt_error(cli);
413 /* show_msg(cli->inbuf); */
415 if (cli_is_error(cli)) {
416 result = cli_nt_error(cli);
420 /* use the returned vuid from now on */
421 cli->vuid = SVAL(cli->inbuf,smb_uid);
423 p = smb_buf(cli->inbuf);
424 p += clistr_pull(cli, cli->server_os, p, sizeof(fstring), -1, STR_TERMINATE);
425 p += clistr_pull(cli, cli->server_type, p, sizeof(fstring), -1, STR_TERMINATE);
426 p += clistr_pull(cli, cli->server_domain, p, sizeof(fstring), -1, STR_TERMINATE);
428 if (strstr(cli->server_type, "Samba")) {
429 cli->is_samba = True;
432 fstrcpy(cli->user_name, user);
434 if (session_key.data) {
435 /* Have plaintext orginal */
436 cli_set_session_key(cli, session_key);
439 result = NT_STATUS_OK;
441 data_blob_free(&lm_response);
442 data_blob_free(&nt_response);
443 data_blob_free(&session_key);
447 /****************************************************************************
448 Send a extended security session setup blob
449 ****************************************************************************/
451 static BOOL cli_session_setup_blob_send(struct cli_state *cli, DATA_BLOB blob)
453 uint32 capabilities = cli_session_setup_capabilities(cli);
456 capabilities |= CAP_EXTENDED_SECURITY;
458 /* send a session setup command */
459 memset(cli->outbuf,'\0',smb_size);
461 set_message(cli->outbuf,12,0,True);
462 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
464 cli_setup_packet(cli);
466 SCVAL(cli->outbuf,smb_vwv0,0xFF);
467 SSVAL(cli->outbuf,smb_vwv2,CLI_BUFFER_SIZE);
468 SSVAL(cli->outbuf,smb_vwv3,2);
469 SSVAL(cli->outbuf,smb_vwv4,1);
470 SIVAL(cli->outbuf,smb_vwv5,0);
471 SSVAL(cli->outbuf,smb_vwv7,blob.length);
472 SIVAL(cli->outbuf,smb_vwv10,capabilities);
473 p = smb_buf(cli->outbuf);
474 memcpy(p, blob.data, blob.length);
476 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
477 p += clistr_push(cli, p, "Samba", -1, STR_TERMINATE);
478 cli_setup_bcc(cli, p);
479 return cli_send_smb(cli);
482 /****************************************************************************
483 Send a extended security session setup blob, returning a reply blob.
484 ****************************************************************************/
486 static DATA_BLOB cli_session_setup_blob_receive(struct cli_state *cli)
488 DATA_BLOB blob2 = data_blob(NULL, 0);
492 if (!cli_receive_smb(cli))
495 show_msg(cli->inbuf);
497 if (cli_is_error(cli) && !NT_STATUS_EQUAL(cli_nt_error(cli),
498 NT_STATUS_MORE_PROCESSING_REQUIRED)) {
502 /* use the returned vuid from now on */
503 cli->vuid = SVAL(cli->inbuf,smb_uid);
505 p = smb_buf(cli->inbuf);
507 blob2 = data_blob(p, SVAL(cli->inbuf, smb_vwv3));
510 p += clistr_pull(cli, cli->server_os, p, sizeof(fstring), -1, STR_TERMINATE);
512 /* w2k with kerberos doesn't properly null terminate this field */
513 len = smb_buflen(cli->inbuf) - PTR_DIFF(p, smb_buf(cli->inbuf));
514 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 /* The following is calculated from :
526 * (smb_wcnt * 2) = 24 (smb_wcnt == 12 in cli_session_setup_blob_send() )
527 * (strlen("Unix") + 1 + strlen("Samba") + 1) * 2 = 22 (unicode strings at
531 #define BASE_SESSSETUP_BLOB_PACKET_SIZE (35 + 24 + 22)
533 static BOOL cli_session_setup_blob(struct cli_state *cli, DATA_BLOB blob, DATA_BLOB session_key_krb5)
535 int32 remaining = blob.length;
537 DATA_BLOB send_blob = data_blob(NULL, 0);
538 int32 max_blob_size = 0;
540 if (cli->max_xmit < BASE_SESSSETUP_BLOB_PACKET_SIZE + 1) {
541 DEBUG(0,("cli_session_setup_blob: cli->max_xmit too small "
542 "(was %u, need minimum %u)\n",
543 (unsigned int)cli->max_xmit,
544 BASE_SESSSETUP_BLOB_PACKET_SIZE));
545 cli_set_nt_error(cli, NT_STATUS_INVALID_PARAMETER);
549 max_blob_size = cli->max_xmit - BASE_SESSSETUP_BLOB_PACKET_SIZE;
551 while ( remaining > 0) {
552 if (remaining >= max_blob_size) {
553 send_blob.length = max_blob_size;
554 remaining -= max_blob_size;
556 DATA_BLOB null_blob = data_blob(NULL, 0);
558 send_blob.length = remaining;
561 /* This is the last packet in the sequence - turn signing on. */
562 cli_simple_set_signing(cli, session_key_krb5, null_blob);
565 send_blob.data = &blob.data[cur];
566 cur += send_blob.length;
568 DEBUG(10, ("cli_session_setup_blob: Remaining (%u) sending (%u) current (%u)\n",
569 (unsigned int)remaining,
570 (unsigned int)send_blob.length,
571 (unsigned int)cur ));
573 if (!cli_session_setup_blob_send(cli, send_blob)) {
574 DEBUG(0, ("cli_session_setup_blob: send failed\n"));
578 cli_session_setup_blob_receive(cli);
580 if (cli_is_error(cli) &&
581 !NT_STATUS_EQUAL( cli_get_nt_error(cli),
582 NT_STATUS_MORE_PROCESSING_REQUIRED)) {
583 DEBUG(0, ("cli_session_setup_blob: recieve failed (%s)\n",
584 nt_errstr(cli_get_nt_error(cli)) ));
592 /****************************************************************************
593 Use in-memory credentials cache
594 ****************************************************************************/
596 static void use_in_memory_ccache(void) {
597 setenv(KRB5_ENV_CCNAME, "MEMORY:cliconnect", 1);
600 /****************************************************************************
601 Do a spnego/kerberos encrypted session setup.
602 ****************************************************************************/
604 static ADS_STATUS cli_session_setup_kerberos(struct cli_state *cli, const char *principal, const char *workgroup)
606 DATA_BLOB negTokenTarg;
607 DATA_BLOB session_key_krb5;
610 DEBUG(2,("Doing kerberos session setup\n"));
612 /* generate the encapsulated kerberos5 ticket */
613 rc = spnego_gen_negTokenTarg(principal, 0, &negTokenTarg, &session_key_krb5, 0, NULL);
616 DEBUG(1, ("cli_session_setup_kerberos: spnego_gen_negTokenTarg failed: %s\n",
618 return ADS_ERROR_KRB5(rc);
622 file_save("negTokenTarg.dat", negTokenTarg.data, negTokenTarg.length);
625 if (!cli_session_setup_blob(cli, negTokenTarg, session_key_krb5)) {
626 data_blob_free(&negTokenTarg);
627 data_blob_free(&session_key_krb5);
628 ADS_ERROR_NT(cli_nt_error(cli));
631 cli_set_session_key(cli, session_key_krb5);
633 data_blob_free(&negTokenTarg);
634 data_blob_free(&session_key_krb5);
636 if (cli_is_error(cli)) {
637 if (NT_STATUS_IS_OK(cli_nt_error(cli))) {
638 return ADS_ERROR_NT(NT_STATUS_UNSUCCESSFUL);
641 return ADS_ERROR_NT(cli_nt_error(cli));
643 #endif /* HAVE_KRB5 */
646 /****************************************************************************
647 Do a spnego/NTLMSSP encrypted session setup.
648 ****************************************************************************/
650 static NTSTATUS cli_session_setup_ntlmssp(struct cli_state *cli, const char *user,
651 const char *pass, const char *domain)
653 struct ntlmssp_state *ntlmssp_state;
657 DATA_BLOB blob = data_blob(NULL, 0);
658 DATA_BLOB blob_in = data_blob(NULL, 0);
659 DATA_BLOB blob_out = data_blob(NULL, 0);
661 cli_temp_set_signing(cli);
663 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_client_start(&ntlmssp_state))) {
666 ntlmssp_want_feature(ntlmssp_state, NTLMSSP_FEATURE_SESSION_KEY);
668 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_set_username(ntlmssp_state, user))) {
671 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_set_domain(ntlmssp_state, domain))) {
674 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_set_password(ntlmssp_state, pass))) {
679 nt_status = ntlmssp_update(ntlmssp_state,
681 data_blob_free(&blob_in);
682 if (NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED) || NT_STATUS_IS_OK(nt_status)) {
684 /* and wrap it in a SPNEGO wrapper */
685 msg1 = gen_negTokenInit(OID_NTLMSSP, blob_out);
687 /* wrap it in SPNEGO */
688 msg1 = spnego_gen_auth(blob_out);
691 /* now send that blob on its way */
692 if (!cli_session_setup_blob_send(cli, msg1)) {
693 DEBUG(3, ("Failed to send NTLMSSP/SPNEGO blob to server!\n"));
694 nt_status = NT_STATUS_UNSUCCESSFUL;
696 blob = cli_session_setup_blob_receive(cli);
698 nt_status = cli_nt_error(cli);
699 if (cli_is_error(cli) && NT_STATUS_IS_OK(nt_status)) {
700 if (cli->smb_rw_error == READ_BAD_SIG) {
701 nt_status = NT_STATUS_ACCESS_DENIED;
703 nt_status = NT_STATUS_UNSUCCESSFUL;
707 data_blob_free(&msg1);
711 if (NT_STATUS_IS_OK(nt_status)) {
712 nt_status = NT_STATUS_UNSUCCESSFUL;
714 } else if ((turn == 1) &&
715 NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED)) {
716 DATA_BLOB tmp_blob = data_blob(NULL, 0);
717 /* the server might give us back two challenges */
718 if (!spnego_parse_challenge(blob, &blob_in,
720 DEBUG(3,("Failed to parse challenges\n"));
721 nt_status = NT_STATUS_INVALID_PARAMETER;
723 data_blob_free(&tmp_blob);
725 if (!spnego_parse_auth_response(blob, nt_status,
727 DEBUG(3,("Failed to parse auth response\n"));
728 if (NT_STATUS_IS_OK(nt_status)
729 || NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED))
730 nt_status = NT_STATUS_INVALID_PARAMETER;
733 data_blob_free(&blob);
734 data_blob_free(&blob_out);
736 } while (NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED));
738 data_blob_free(&blob_in);
740 if (NT_STATUS_IS_OK(nt_status)) {
742 DATA_BLOB key = data_blob(ntlmssp_state->session_key.data,
743 ntlmssp_state->session_key.length);
744 DATA_BLOB null_blob = data_blob(NULL, 0);
747 fstrcpy(cli->server_domain, ntlmssp_state->server_domain);
748 cli_set_session_key(cli, ntlmssp_state->session_key);
750 res = cli_simple_set_signing(cli, key, null_blob);
752 data_blob_free(&key);
756 /* 'resign' the last message, so we get the right sequence numbers
757 for checking the first reply from the server */
758 cli_calculate_sign_mac(cli);
760 if (!cli_check_sign_mac(cli)) {
761 nt_status = NT_STATUS_ACCESS_DENIED;
766 /* we have a reference counter on ntlmssp_state, if we are signing
767 then the state will be kept by the signing engine */
769 ntlmssp_end(&ntlmssp_state);
774 /****************************************************************************
775 Do a spnego encrypted session setup.
776 ****************************************************************************/
778 ADS_STATUS cli_session_setup_spnego(struct cli_state *cli, const char *user,
779 const char *pass, const char *domain)
782 char *OIDs[ASN1_MAX_OIDS];
784 BOOL got_kerberos_mechanism = False;
787 DEBUG(3,("Doing spnego session setup (blob length=%lu)\n", (unsigned long)cli->secblob.length));
789 /* the server might not even do spnego */
790 if (cli->secblob.length <= 16) {
791 DEBUG(3,("server didn't supply a full spnego negprot\n"));
796 file_save("negprot.dat", cli->secblob.data, cli->secblob.length);
799 /* there is 16 bytes of GUID before the real spnego packet starts */
800 blob = data_blob(cli->secblob.data+16, cli->secblob.length-16);
802 /* the server sent us the first part of the SPNEGO exchange in the negprot
804 if (!spnego_parse_negTokenInit(blob, OIDs, &principal)) {
805 data_blob_free(&blob);
806 return ADS_ERROR_NT(NT_STATUS_INVALID_PARAMETER);
808 data_blob_free(&blob);
810 /* make sure the server understands kerberos */
811 for (i=0;OIDs[i];i++) {
812 DEBUG(3,("got OID=%s\n", OIDs[i]));
813 if (strcmp(OIDs[i], OID_KERBEROS5_OLD) == 0 ||
814 strcmp(OIDs[i], OID_KERBEROS5) == 0) {
815 got_kerberos_mechanism = True;
820 DEBUG(3,("got principal=%s\n", principal ? principal : "<null>"));
822 if (got_kerberos_mechanism && (principal == NULL)) {
824 * It is WRONG to depend on the principal sent in the negprot
825 * reply, but right now we do it. So for safety (don't
826 * segfault later) disable Kerberos when no principal was
829 DEBUG(1, ("Kerberos mech was offered, but no principal was "
830 "sent, disabling Kerberos\n"));
831 cli->use_kerberos = False;
834 fstrcpy(cli->user_name, user);
837 /* If password is set we reauthenticate to kerberos server
838 * and do not store results */
840 if (got_kerberos_mechanism && cli->use_kerberos) {
846 use_in_memory_ccache();
847 ret = kerberos_kinit_password(user, pass, 0 /* no time correction for now */, NULL);
850 SAFE_FREE(principal);
851 DEBUG(0, ("Kinit failed: %s\n", error_message(ret)));
852 if (cli->fallback_after_kerberos)
854 return ADS_ERROR_KRB5(ret);
858 rc = cli_session_setup_kerberos(cli, principal, domain);
859 if (ADS_ERR_OK(rc) || !cli->fallback_after_kerberos) {
860 SAFE_FREE(principal);
866 SAFE_FREE(principal);
870 return ADS_ERROR_NT(cli_session_setup_ntlmssp(cli, user, pass, domain));
873 /****************************************************************************
874 Send a session setup. The username and workgroup is in UNIX character
875 format and must be converted to DOS codepage format before sending. If the
876 password is in plaintext, the same should be done.
877 ****************************************************************************/
879 NTSTATUS cli_session_setup(struct cli_state *cli,
881 const char *pass, int passlen,
882 const char *ntpass, int ntpasslen,
883 const char *workgroup)
888 /* allow for workgroups as part of the username */
889 fstrcpy(user2, user);
890 if ((p=strchr_m(user2,'\\')) || (p=strchr_m(user2,'/')) ||
891 (p=strchr_m(user2,*lp_winbind_separator()))) {
897 if (cli->protocol < PROTOCOL_LANMAN1) {
901 /* now work out what sort of session setup we are going to
902 do. I have split this into separate functions to make the
903 flow a bit easier to understand (tridge) */
905 /* if its an older server then we have to use the older request format */
907 if (cli->protocol < PROTOCOL_NT1) {
908 if (!lp_client_lanman_auth() && passlen != 24 && (*pass)) {
909 DEBUG(1, ("Server requested LM password but 'client lanman auth'"
911 return NT_STATUS_ACCESS_DENIED;
914 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) == 0 &&
915 !lp_client_plaintext_auth() && (*pass)) {
916 DEBUG(1, ("Server requested plaintext password but 'client use plaintext auth'"
918 return NT_STATUS_ACCESS_DENIED;
921 return cli_session_setup_lanman2(cli, user, pass, passlen,
925 /* if no user is supplied then we have to do an anonymous connection.
926 passwords are ignored */
929 return cli_session_setup_guest(cli);
931 /* if the server is share level then send a plaintext null
932 password at this point. The password is sent in the tree
935 if ((cli->sec_mode & NEGOTIATE_SECURITY_USER_LEVEL) == 0)
936 return cli_session_setup_plaintext(cli, user, "", workgroup);
938 /* if the server doesn't support encryption then we have to use
939 plaintext. The second password is ignored */
941 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) == 0) {
942 if (!lp_client_plaintext_auth() && (*pass)) {
943 DEBUG(1, ("Server requested plaintext password but 'client use plaintext auth'"
945 return NT_STATUS_ACCESS_DENIED;
947 return cli_session_setup_plaintext(cli, user, pass, workgroup);
950 /* if the server supports extended security then use SPNEGO */
952 if (cli->capabilities & CAP_EXTENDED_SECURITY) {
953 ADS_STATUS status = cli_session_setup_spnego(cli, user, pass, workgroup);
954 if (!ADS_ERR_OK(status)) {
955 DEBUG(3, ("SPNEGO login failed: %s\n", ads_errstr(status)));
956 return ads_ntstatus(status);
961 /* otherwise do a NT1 style session setup */
962 status = cli_session_setup_nt1(cli, user, pass, passlen,
963 ntpass, ntpasslen, workgroup);
964 if (!NT_STATUS_IS_OK(status)) {
965 DEBUG(3,("cli_session_setup: NT1 session setup "
966 "failed: %s\n", nt_errstr(status)));
971 if (strstr(cli->server_type, "Samba")) {
972 cli->is_samba = True;
978 /****************************************************************************
980 *****************************************************************************/
982 BOOL cli_ulogoff(struct cli_state *cli)
984 memset(cli->outbuf,'\0',smb_size);
985 set_message(cli->outbuf,2,0,True);
986 SCVAL(cli->outbuf,smb_com,SMBulogoffX);
987 cli_setup_packet(cli);
988 SSVAL(cli->outbuf,smb_vwv0,0xFF);
989 SSVAL(cli->outbuf,smb_vwv2,0); /* no additional info */
992 if (!cli_receive_smb(cli))
995 if (cli_is_error(cli)) {
1003 /****************************************************************************
1005 ****************************************************************************/
1007 BOOL cli_send_tconX(struct cli_state *cli,
1008 const char *share, const char *dev, const char *pass, int passlen)
1010 fstring fullshare, pword;
1012 memset(cli->outbuf,'\0',smb_size);
1013 memset(cli->inbuf,'\0',smb_size);
1015 fstrcpy(cli->share, share);
1017 /* in user level security don't send a password now */
1018 if (cli->sec_mode & NEGOTIATE_SECURITY_USER_LEVEL) {
1022 DEBUG(1, ("Server not using user level security and no password supplied.\n"));
1026 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) &&
1027 *pass && passlen != 24) {
1028 if (!lp_client_lanman_auth()) {
1029 DEBUG(1, ("Server requested LANMAN password (share-level security) but 'client use lanman auth'"
1035 * Non-encrypted passwords - convert to DOS codepage before encryption.
1038 SMBencrypt(pass,cli->secblob.data,(uchar *)pword);
1040 if((cli->sec_mode & (NEGOTIATE_SECURITY_USER_LEVEL|NEGOTIATE_SECURITY_CHALLENGE_RESPONSE)) == 0) {
1041 if (!lp_client_plaintext_auth() && (*pass)) {
1042 DEBUG(1, ("Server requested plaintext password but 'client use plaintext auth'"
1048 * Non-encrypted passwords - convert to DOS codepage before using.
1050 passlen = clistr_push(cli, pword, pass, sizeof(pword), STR_TERMINATE);
1054 memcpy(pword, pass, passlen);
1059 slprintf(fullshare, sizeof(fullshare)-1,
1060 "\\\\%s\\%s", cli->desthost, share);
1062 set_message(cli->outbuf,4, 0, True);
1063 SCVAL(cli->outbuf,smb_com,SMBtconX);
1064 cli_setup_packet(cli);
1066 SSVAL(cli->outbuf,smb_vwv0,0xFF);
1067 SSVAL(cli->outbuf,smb_vwv3,passlen);
1069 p = smb_buf(cli->outbuf);
1071 memcpy(p,pword,passlen);
1074 p += clistr_push(cli, p, fullshare, -1, STR_TERMINATE |STR_UPPER);
1075 p += clistr_push(cli, p, dev, -1, STR_TERMINATE |STR_UPPER | STR_ASCII);
1077 cli_setup_bcc(cli, p);
1080 if (!cli_receive_smb(cli))
1083 if (cli_is_error(cli))
1086 clistr_pull(cli, cli->dev, smb_buf(cli->inbuf), sizeof(fstring), -1, STR_TERMINATE|STR_ASCII);
1088 if (cli->protocol >= PROTOCOL_NT1 &&
1089 smb_buflen(cli->inbuf) == 3) {
1090 /* almost certainly win95 - enable bug fixes */
1094 /* Make sure that we have the optional support 16-bit field. WCT > 2 */
1095 /* Avoids issues when connecting to Win9x boxes sharing files */
1097 cli->dfsroot = False;
1098 if ( (CVAL(cli->inbuf, smb_wct))>2 && cli->protocol >= PROTOCOL_LANMAN2 )
1099 cli->dfsroot = (SVAL( cli->inbuf, smb_vwv2 ) & SMB_SHARE_IN_DFS) ? True : False;
1101 cli->cnum = SVAL(cli->inbuf,smb_tid);
1105 /****************************************************************************
1106 Send a tree disconnect.
1107 ****************************************************************************/
1109 BOOL cli_tdis(struct cli_state *cli)
1111 memset(cli->outbuf,'\0',smb_size);
1112 set_message(cli->outbuf,0,0,True);
1113 SCVAL(cli->outbuf,smb_com,SMBtdis);
1114 SSVAL(cli->outbuf,smb_tid,cli->cnum);
1115 cli_setup_packet(cli);
1118 if (!cli_receive_smb(cli))
1121 if (cli_is_error(cli)) {
1129 /****************************************************************************
1130 Send a negprot command.
1131 ****************************************************************************/
1133 void cli_negprot_send(struct cli_state *cli)
1138 if (cli->protocol < PROTOCOL_NT1)
1139 cli->use_spnego = False;
1141 memset(cli->outbuf,'\0',smb_size);
1143 /* setup the protocol strings */
1144 set_message(cli->outbuf,0,0,True);
1146 p = smb_buf(cli->outbuf);
1148 prots[numprots].name && prots[numprots].prot<=cli->protocol;
1151 p += clistr_push(cli, p, prots[numprots].name, -1, STR_TERMINATE);
1154 SCVAL(cli->outbuf,smb_com,SMBnegprot);
1155 cli_setup_bcc(cli, p);
1156 cli_setup_packet(cli);
1158 SCVAL(smb_buf(cli->outbuf),0,2);
1163 /****************************************************************************
1164 Send a negprot command.
1165 ****************************************************************************/
1167 BOOL cli_negprot(struct cli_state *cli)
1173 if (cli->protocol < PROTOCOL_NT1)
1174 cli->use_spnego = False;
1176 memset(cli->outbuf,'\0',smb_size);
1178 /* setup the protocol strings */
1179 for (plength=0,numprots=0;
1180 prots[numprots].name && prots[numprots].prot<=cli->protocol;
1182 plength += strlen(prots[numprots].name)+2;
1184 set_message(cli->outbuf,0,plength,True);
1186 p = smb_buf(cli->outbuf);
1188 prots[numprots].name && prots[numprots].prot<=cli->protocol;
1191 p += clistr_push(cli, p, prots[numprots].name, -1, STR_TERMINATE);
1194 SCVAL(cli->outbuf,smb_com,SMBnegprot);
1195 cli_setup_packet(cli);
1197 SCVAL(smb_buf(cli->outbuf),0,2);
1200 if (!cli_receive_smb(cli))
1203 show_msg(cli->inbuf);
1205 if (cli_is_error(cli) ||
1206 ((int)SVAL(cli->inbuf,smb_vwv0) >= numprots)) {
1210 cli->protocol = prots[SVAL(cli->inbuf,smb_vwv0)].prot;
1212 if ((cli->protocol < PROTOCOL_NT1) && cli->sign_info.mandatory_signing) {
1213 DEBUG(0,("cli_negprot: SMB signing is mandatory and the selected protocol level doesn't support it.\n"));
1217 if (cli->protocol >= PROTOCOL_NT1) {
1220 cli->sec_mode = CVAL(cli->inbuf,smb_vwv1);
1221 cli->max_mux = SVAL(cli->inbuf, smb_vwv1+1);
1222 cli->max_xmit = IVAL(cli->inbuf,smb_vwv3+1);
1223 cli->sesskey = IVAL(cli->inbuf,smb_vwv7+1);
1224 cli->serverzone = SVALS(cli->inbuf,smb_vwv15+1);
1225 cli->serverzone *= 60;
1226 /* this time arrives in real GMT */
1227 ts = interpret_long_date(cli->inbuf+smb_vwv11+1);
1228 cli->servertime = ts.tv_sec;
1229 cli->secblob = data_blob(smb_buf(cli->inbuf),smb_buflen(cli->inbuf));
1230 cli->capabilities = IVAL(cli->inbuf,smb_vwv9+1);
1231 if (cli->capabilities & CAP_RAW_MODE) {
1232 cli->readbraw_supported = True;
1233 cli->writebraw_supported = True;
1235 /* work out if they sent us a workgroup */
1236 if (!(cli->capabilities & CAP_EXTENDED_SECURITY) &&
1237 smb_buflen(cli->inbuf) > 8) {
1238 clistr_pull(cli, cli->server_domain,
1239 smb_buf(cli->inbuf)+8, sizeof(cli->server_domain),
1240 smb_buflen(cli->inbuf)-8, STR_UNICODE|STR_NOALIGN);
1244 * As signing is slow we only turn it on if either the client or
1245 * the server require it. JRA.
1248 if (cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_REQUIRED) {
1249 /* Fail if server says signing is mandatory and we don't want to support it. */
1250 if (!cli->sign_info.allow_smb_signing) {
1251 DEBUG(0,("cli_negprot: SMB signing is mandatory and we have disabled it.\n"));
1254 cli->sign_info.negotiated_smb_signing = True;
1255 cli->sign_info.mandatory_signing = True;
1256 } else if (cli->sign_info.mandatory_signing && cli->sign_info.allow_smb_signing) {
1257 /* Fail if client says signing is mandatory and the server doesn't support it. */
1258 if (!(cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_ENABLED)) {
1259 DEBUG(1,("cli_negprot: SMB signing is mandatory and the server doesn't support it.\n"));
1262 cli->sign_info.negotiated_smb_signing = True;
1263 cli->sign_info.mandatory_signing = True;
1264 } else if (cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_ENABLED) {
1265 cli->sign_info.negotiated_smb_signing = True;
1268 if (cli->capabilities & (CAP_LARGE_READX|CAP_LARGE_WRITEX)) {
1269 SAFE_FREE(cli->outbuf);
1270 SAFE_FREE(cli->inbuf);
1271 cli->outbuf = (char *)SMB_MALLOC(CLI_SAMBA_MAX_LARGE_READX_SIZE+SAFETY_MARGIN);
1272 cli->inbuf = (char *)SMB_MALLOC(CLI_SAMBA_MAX_LARGE_READX_SIZE+SAFETY_MARGIN);
1273 cli->bufsize = CLI_SAMBA_MAX_LARGE_READX_SIZE;
1276 } else if (cli->protocol >= PROTOCOL_LANMAN1) {
1277 cli->use_spnego = False;
1278 cli->sec_mode = SVAL(cli->inbuf,smb_vwv1);
1279 cli->max_xmit = SVAL(cli->inbuf,smb_vwv2);
1280 cli->max_mux = SVAL(cli->inbuf, smb_vwv3);
1281 cli->sesskey = IVAL(cli->inbuf,smb_vwv6);
1282 cli->serverzone = SVALS(cli->inbuf,smb_vwv10);
1283 cli->serverzone *= 60;
1284 /* this time is converted to GMT by make_unix_date */
1285 cli->servertime = cli_make_unix_date(cli,cli->inbuf+smb_vwv8);
1286 cli->readbraw_supported = ((SVAL(cli->inbuf,smb_vwv5) & 0x1) != 0);
1287 cli->writebraw_supported = ((SVAL(cli->inbuf,smb_vwv5) & 0x2) != 0);
1288 cli->secblob = data_blob(smb_buf(cli->inbuf),smb_buflen(cli->inbuf));
1290 /* the old core protocol */
1291 cli->use_spnego = False;
1293 cli->serverzone = get_time_zone(time(NULL));
1296 cli->max_xmit = MIN(cli->max_xmit, CLI_BUFFER_SIZE);
1298 /* a way to force ascii SMB */
1299 if (getenv("CLI_FORCE_ASCII"))
1300 cli->capabilities &= ~CAP_UNICODE;
1305 /****************************************************************************
1306 Send a session request. See rfc1002.txt 4.3 and 4.3.2.
1307 ****************************************************************************/
1309 BOOL cli_session_request(struct cli_state *cli,
1310 struct nmb_name *calling, struct nmb_name *called)
1315 memcpy(&(cli->calling), calling, sizeof(*calling));
1316 memcpy(&(cli->called ), called , sizeof(*called ));
1318 /* put in the destination name */
1319 p = cli->outbuf+len;
1320 name_mangle(cli->called .name, p, cli->called .name_type);
1324 p = cli->outbuf+len;
1325 name_mangle(cli->calling.name, p, cli->calling.name_type);
1328 /* 445 doesn't have session request */
1329 if (cli->port == 445)
1332 /* send a session request (RFC 1002) */
1333 /* setup the packet length
1334 * Remove four bytes from the length count, since the length
1335 * field in the NBT Session Service header counts the number
1336 * of bytes which follow. The cli_send_smb() function knows
1337 * about this and accounts for those four bytes.
1341 _smb_setlen(cli->outbuf,len);
1342 SCVAL(cli->outbuf,0,0x81);
1345 DEBUG(5,("Sent session request\n"));
1347 if (!cli_receive_smb(cli))
1350 if (CVAL(cli->inbuf,0) == 0x84) {
1351 /* C. Hoch 9/14/95 Start */
1352 /* For information, here is the response structure.
1353 * We do the byte-twiddling to for portability.
1354 struct RetargetResponse{
1356 unsigned char flags;
1362 int port = (CVAL(cli->inbuf,8)<<8)+CVAL(cli->inbuf,9);
1363 /* SESSION RETARGET */
1364 putip((char *)&cli->dest_ip,cli->inbuf+4);
1366 cli->fd = open_socket_out(SOCK_STREAM, &cli->dest_ip, port, LONG_CONNECT_TIMEOUT);
1370 DEBUG(3,("Retargeted\n"));
1372 set_socket_options(cli->fd,user_socket_options);
1379 DEBUG(0,("Retarget recursion - failing\n"));
1383 ret = cli_session_request(cli, calling, called);
1387 } /* C. Hoch 9/14/95 End */
1389 if (CVAL(cli->inbuf,0) != 0x82) {
1390 /* This is the wrong place to put the error... JRA. */
1391 cli->rap_error = CVAL(cli->inbuf,4);
1397 /****************************************************************************
1398 Open the client sockets.
1399 ****************************************************************************/
1401 BOOL cli_connect(struct cli_state *cli, const char *host, struct in_addr *ip)
1403 int name_type = 0x20;
1406 /* reasonable default hostname */
1407 if (!host) host = "*SMBSERVER";
1409 fstrcpy(cli->desthost, host);
1411 /* allow hostnames of the form NAME#xx and do a netbios lookup */
1412 if ((p = strchr(cli->desthost, '#'))) {
1413 name_type = strtol(p+1, NULL, 16);
1417 if (!ip || is_zero_ip(*ip)) {
1418 if (!resolve_name(cli->desthost, &cli->dest_ip, name_type)) {
1421 if (ip) *ip = cli->dest_ip;
1426 if (getenv("LIBSMB_PROG")) {
1427 cli->fd = sock_exec(getenv("LIBSMB_PROG"));
1429 /* try 445 first, then 139 */
1430 int port = cli->port?cli->port:445;
1431 cli->fd = open_socket_out(SOCK_STREAM, &cli->dest_ip,
1432 port, cli->timeout);
1433 if (cli->fd == -1 && cli->port == 0) {
1435 cli->fd = open_socket_out(SOCK_STREAM, &cli->dest_ip,
1436 port, cli->timeout);
1441 if (cli->fd == -1) {
1442 DEBUG(1,("Error connecting to %s (%s)\n",
1443 ip?inet_ntoa(*ip):host,strerror(errno)));
1447 set_socket_options(cli->fd,user_socket_options);
1453 establishes a connection to after the negprot.
1454 @param output_cli A fully initialised cli structure, non-null only on success
1455 @param dest_host The netbios name of the remote host
1456 @param dest_ip (optional) The the destination IP, NULL for name based lookup
1457 @param port (optional) The destination port (0 for default)
1458 @param retry BOOL. Did this connection fail with a retryable error ?
1461 NTSTATUS cli_start_connection(struct cli_state **output_cli,
1462 const char *my_name,
1463 const char *dest_host,
1464 struct in_addr *dest_ip, int port,
1465 int signing_state, int flags,
1469 struct nmb_name calling;
1470 struct nmb_name called;
1471 struct cli_state *cli;
1478 my_name = global_myname();
1480 if (!(cli = cli_initialise())) {
1481 return NT_STATUS_NO_MEMORY;
1484 make_nmb_name(&calling, my_name, 0x0);
1485 make_nmb_name(&called , dest_host, 0x20);
1487 if (cli_set_port(cli, port) != port) {
1489 return NT_STATUS_UNSUCCESSFUL;
1492 cli_set_timeout(cli, 10000); /* 10 seconds. */
1501 DEBUG(3,("Connecting to host=%s\n", dest_host));
1503 if (!cli_connect(cli, dest_host, &ip)) {
1504 DEBUG(1,("cli_start_connection: failed to connect to %s (%s)\n",
1505 nmb_namestr(&called), inet_ntoa(ip)));
1507 if (is_zero_ip(ip)) {
1508 return NT_STATUS_BAD_NETWORK_NAME;
1510 return NT_STATUS_CONNECTION_REFUSED;
1517 if (!cli_session_request(cli, &calling, &called)) {
1519 DEBUG(1,("session request to %s failed (%s)\n",
1520 called.name, cli_errstr(cli)));
1521 if ((p=strchr(called.name, '.')) && !is_ipaddress(called.name)) {
1525 if (strcmp(called.name, "*SMBSERVER")) {
1526 make_nmb_name(&called , "*SMBSERVER", 0x20);
1529 return NT_STATUS_BAD_NETWORK_NAME;
1532 cli_setup_signing_state(cli, signing_state);
1534 if (flags & CLI_FULL_CONNECTION_DONT_SPNEGO)
1535 cli->use_spnego = False;
1536 else if (flags & CLI_FULL_CONNECTION_USE_KERBEROS)
1537 cli->use_kerberos = True;
1539 if (!cli_negprot(cli)) {
1540 DEBUG(1,("failed negprot\n"));
1541 nt_status = cli_nt_error(cli);
1542 if (NT_STATUS_IS_OK(nt_status)) {
1543 nt_status = NT_STATUS_UNSUCCESSFUL;
1550 return NT_STATUS_OK;
1555 establishes a connection right up to doing tconX, password specified.
1556 @param output_cli A fully initialised cli structure, non-null only on success
1557 @param dest_host The netbios name of the remote host
1558 @param dest_ip (optional) The the destination IP, NULL for name based lookup
1559 @param port (optional) The destination port (0 for default)
1560 @param service (optional) The share to make the connection to. Should be 'unqualified' in any way.
1561 @param service_type The 'type' of serivice.
1562 @param user Username, unix string
1563 @param domain User's domain
1564 @param password User's password, unencrypted unix string.
1565 @param retry BOOL. Did this connection fail with a retryable error ?
1568 NTSTATUS cli_full_connection(struct cli_state **output_cli,
1569 const char *my_name,
1570 const char *dest_host,
1571 struct in_addr *dest_ip, int port,
1572 const char *service, const char *service_type,
1573 const char *user, const char *domain,
1574 const char *password, int flags,
1579 struct cli_state *cli = NULL;
1580 int pw_len = password ? strlen(password)+1 : 0;
1584 if (password == NULL) {
1588 nt_status = cli_start_connection(&cli, my_name, dest_host,
1589 dest_ip, port, signing_state, flags, retry);
1591 if (!NT_STATUS_IS_OK(nt_status)) {
1595 nt_status = cli_session_setup(cli, user, password, pw_len, password,
1597 if (!NT_STATUS_IS_OK(nt_status)) {
1599 if (!(flags & CLI_FULL_CONNECTION_ANONYMOUS_FALLBACK)) {
1600 DEBUG(1,("failed session setup with %s\n",
1601 nt_errstr(nt_status)));
1606 nt_status = cli_session_setup(cli, "", "", 0, "", 0, domain);
1607 if (!NT_STATUS_IS_OK(nt_status)) {
1608 DEBUG(1,("anonymous failed session setup with %s\n",
1609 nt_errstr(nt_status)));
1616 if (!cli_send_tconX(cli, service, service_type, password, pw_len)) {
1617 nt_status = cli_nt_error(cli);
1618 DEBUG(1,("failed tcon_X with %s\n", nt_errstr(nt_status)));
1620 if (NT_STATUS_IS_OK(nt_status)) {
1621 nt_status = NT_STATUS_UNSUCCESSFUL;
1627 cli_init_creds(cli, user, domain, password);
1630 return NT_STATUS_OK;
1633 /****************************************************************************
1634 Attempt a NetBIOS session request, falling back to *SMBSERVER if needed.
1635 ****************************************************************************/
1637 BOOL attempt_netbios_session_request(struct cli_state **ppcli, const char *srchost, const char *desthost,
1638 struct in_addr *pdest_ip)
1640 struct nmb_name calling, called;
1642 make_nmb_name(&calling, srchost, 0x0);
1645 * If the called name is an IP address
1646 * then use *SMBSERVER immediately.
1649 if(is_ipaddress(desthost)) {
1650 make_nmb_name(&called, "*SMBSERVER", 0x20);
1652 make_nmb_name(&called, desthost, 0x20);
1655 if (!cli_session_request(*ppcli, &calling, &called)) {
1656 struct nmb_name smbservername;
1658 make_nmb_name(&smbservername , "*SMBSERVER", 0x20);
1661 * If the name wasn't *SMBSERVER then
1662 * try with *SMBSERVER if the first name fails.
1665 if (nmb_name_equal(&called, &smbservername)) {
1668 * The name used was *SMBSERVER, don't bother with another name.
1671 DEBUG(0,("attempt_netbios_session_request: %s rejected the session for name *SMBSERVER \
1672 with error %s.\n", desthost, cli_errstr(*ppcli) ));
1677 cli_shutdown(*ppcli);
1679 *ppcli = cli_initialise();
1681 /* Out of memory... */
1685 if (!cli_connect(*ppcli, desthost, pdest_ip) ||
1686 !cli_session_request(*ppcli, &calling, &smbservername)) {
1687 DEBUG(0,("attempt_netbios_session_request: %s rejected the session for \
1688 name *SMBSERVER with error %s\n", desthost, cli_errstr(*ppcli) ));
1700 /****************************************************************************
1701 Send an old style tcon.
1702 ****************************************************************************/
1703 NTSTATUS cli_raw_tcon(struct cli_state *cli,
1704 const char *service, const char *pass, const char *dev,
1705 uint16 *max_xmit, uint16 *tid)
1709 if (!lp_client_plaintext_auth() && (*pass)) {
1710 DEBUG(1, ("Server requested plaintext password but 'client use plaintext auth'"
1712 return NT_STATUS_ACCESS_DENIED;
1715 memset(cli->outbuf,'\0',smb_size);
1716 memset(cli->inbuf,'\0',smb_size);
1718 set_message(cli->outbuf, 0, 0, True);
1719 SCVAL(cli->outbuf,smb_com,SMBtcon);
1720 cli_setup_packet(cli);
1722 p = smb_buf(cli->outbuf);
1723 *p++ = 4; p += clistr_push(cli, p, service, -1, STR_TERMINATE | STR_NOALIGN);
1724 *p++ = 4; p += clistr_push(cli, p, pass, -1, STR_TERMINATE | STR_NOALIGN);
1725 *p++ = 4; p += clistr_push(cli, p, dev, -1, STR_TERMINATE | STR_NOALIGN);
1727 cli_setup_bcc(cli, p);
1730 if (!cli_receive_smb(cli)) {
1731 return NT_STATUS_UNEXPECTED_NETWORK_ERROR;
1734 if (cli_is_error(cli)) {
1735 return cli_nt_error(cli);
1738 *max_xmit = SVAL(cli->inbuf, smb_vwv0);
1739 *tid = SVAL(cli->inbuf, smb_vwv1);
1741 return NT_STATUS_OK;
1744 /* Return a cli_state pointing at the IPC$ share for the given server */
1746 struct cli_state *get_ipc_connect(char *server, struct in_addr *server_ip,
1747 struct user_auth_info *user_info)
1749 struct cli_state *cli;
1755 nt_status = cli_full_connection(&cli, myname, server, server_ip, 0, "IPC$", "IPC",
1756 user_info->username, lp_workgroup(), user_info->password,
1757 CLI_FULL_CONNECTION_ANONYMOUS_FALLBACK, Undefined, NULL);
1759 if (NT_STATUS_IS_OK(nt_status)) {
1761 } else if (is_ipaddress(server)) {
1762 /* windows 9* needs a correct NMB name for connections */
1763 fstring remote_name;
1765 if (name_status_find("*", 0, 0, *server_ip, remote_name)) {
1766 cli = get_ipc_connect(remote_name, server_ip, user_info);
1775 * Given the IP address of a master browser on the network, return its
1776 * workgroup and connect to it.
1778 * This function is provided to allow additional processing beyond what
1779 * get_ipc_connect_master_ip_bcast() does, e.g. to retrieve the list of master
1780 * browsers and obtain each master browsers' list of domains (in case the
1781 * first master browser is recently on the network and has not yet
1782 * synchronized with other master browsers and therefore does not yet have the
1783 * entire network browse list)
1786 struct cli_state *get_ipc_connect_master_ip(struct ip_service * mb_ip, pstring workgroup, struct user_auth_info *user_info)
1788 static fstring name;
1789 struct cli_state *cli;
1790 struct in_addr server_ip;
1792 DEBUG(99, ("Looking up name of master browser %s\n",
1793 inet_ntoa(mb_ip->ip)));
1796 * Do a name status query to find out the name of the master browser.
1797 * We use <01><02>__MSBROWSE__<02>#01 if *#00 fails because a domain
1798 * master browser will not respond to a wildcard query (or, at least,
1799 * an NT4 server acting as the domain master browser will not).
1801 * We might be able to use ONLY the query on MSBROWSE, but that's not
1802 * yet been tested with all Windows versions, so until it is, leave
1803 * the original wildcard query as the first choice and fall back to
1804 * MSBROWSE if the wildcard query fails.
1806 if (!name_status_find("*", 0, 0x1d, mb_ip->ip, name) &&
1807 !name_status_find(MSBROWSE, 1, 0x1d, mb_ip->ip, name)) {
1809 DEBUG(99, ("Could not retrieve name status for %s\n",
1810 inet_ntoa(mb_ip->ip)));
1814 if (!find_master_ip(name, &server_ip)) {
1815 DEBUG(99, ("Could not find master ip for %s\n", name));
1819 pstrcpy(workgroup, name);
1821 DEBUG(4, ("found master browser %s, %s\n",
1822 name, inet_ntoa(mb_ip->ip)));
1824 cli = get_ipc_connect(inet_ntoa(server_ip), &server_ip, user_info);
1831 * Return the IP address and workgroup of a master browser on the network, and
1835 struct cli_state *get_ipc_connect_master_ip_bcast(pstring workgroup, struct user_auth_info *user_info)
1837 struct ip_service *ip_list;
1838 struct cli_state *cli;
1841 DEBUG(99, ("Do broadcast lookup for workgroups on local network\n"));
1843 /* Go looking for workgroups by broadcasting on the local network */
1845 if (!name_resolve_bcast(MSBROWSE, 1, &ip_list, &count)) {
1846 DEBUG(99, ("No master browsers responded\n"));
1850 for (i = 0; i < count; i++) {
1851 DEBUG(99, ("Found master browser %s\n", inet_ntoa(ip_list[i].ip)));
1853 cli = get_ipc_connect_master_ip(&ip_list[i], workgroup, user_info);