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.
31 {PROTOCOL_CORE
,"PC NETWORK PROGRAM 1.0"},
32 {PROTOCOL_COREPLUS
,"MICROSOFT NETWORKS 1.03"},
33 {PROTOCOL_LANMAN1
,"MICROSOFT NETWORKS 3.0"},
34 {PROTOCOL_LANMAN1
,"LANMAN1.0"},
35 {PROTOCOL_LANMAN2
,"LM1.2X002"},
36 {PROTOCOL_LANMAN2
,"DOS LANMAN2.1"},
37 {PROTOCOL_LANMAN2
,"Samba"},
38 {PROTOCOL_NT1
,"NT LANMAN 1.0"},
39 {PROTOCOL_NT1
,"NT LM 0.12"},
43 /****************************************************************************
44 Do an old lanman2 style session setup.
45 ****************************************************************************/
47 static BOOL
cli_session_setup_lanman2(struct cli_state
*cli
, const char *user
,
48 const char *pass
, size_t passlen
, const char *workgroup
)
53 if (passlen
> sizeof(pword
)-1)
56 /* LANMAN servers predate NT status codes and Unicode and ignore those
57 smb flags so we must disable the corresponding default capabilities
58 that would otherwise cause the Unicode and NT Status flags to be
59 set (and even returned by the server) */
61 cli
->capabilities
&= ~(CAP_UNICODE
| CAP_STATUS32
);
63 /* if in share level security then don't send a password now */
64 if (!(cli
->sec_mode
& NEGOTIATE_SECURITY_USER_LEVEL
))
67 if (passlen
> 0 && (cli
->sec_mode
& NEGOTIATE_SECURITY_CHALLENGE_RESPONSE
) && passlen
!= 24) {
68 /* Encrypted mode needed, and non encrypted password supplied. */
70 SMBencrypt(pass
,cli
->secblob
.data
,(uchar
*)pword
);
71 } else if ((cli
->sec_mode
& NEGOTIATE_SECURITY_CHALLENGE_RESPONSE
) && passlen
== 24) {
72 /* Encrypted mode needed, and encrypted password supplied. */
73 memcpy(pword
, pass
, passlen
);
74 } else if (passlen
> 0) {
75 /* Plaintext mode needed, assume plaintext supplied. */
76 passlen
= clistr_push(cli
, pword
, pass
, sizeof(pword
), STR_TERMINATE
);
79 /* send a session setup command */
80 memset(cli
->outbuf
,'\0',smb_size
);
81 set_message(cli
->outbuf
,10, 0, True
);
82 SCVAL(cli
->outbuf
,smb_com
,SMBsesssetupX
);
83 cli_setup_packet(cli
);
85 SCVAL(cli
->outbuf
,smb_vwv0
,0xFF);
86 SSVAL(cli
->outbuf
,smb_vwv2
,cli
->max_xmit
);
87 SSVAL(cli
->outbuf
,smb_vwv3
,2);
88 SSVAL(cli
->outbuf
,smb_vwv4
,1);
89 SIVAL(cli
->outbuf
,smb_vwv5
,cli
->sesskey
);
90 SSVAL(cli
->outbuf
,smb_vwv7
,passlen
);
92 p
= smb_buf(cli
->outbuf
);
93 memcpy(p
,pword
,passlen
);
95 p
+= clistr_push(cli
, p
, user
, -1, STR_TERMINATE
|STR_UPPER
);
96 p
+= clistr_push(cli
, p
, workgroup
, -1, STR_TERMINATE
|STR_UPPER
);
97 p
+= clistr_push(cli
, p
, "Unix", -1, STR_TERMINATE
);
98 p
+= clistr_push(cli
, p
, "Samba", -1, STR_TERMINATE
);
99 cli_setup_bcc(cli
, p
);
102 if (!cli_receive_smb(cli
))
105 show_msg(cli
->inbuf
);
107 if (cli_is_error(cli
))
110 /* use the returned vuid from now on */
111 cli
->vuid
= SVAL(cli
->inbuf
,smb_uid
);
112 fstrcpy(cli
->user_name
, user
);
117 /****************************************************************************
118 Work out suitable capabilities to offer the server.
119 ****************************************************************************/
121 static uint32
cli_session_setup_capabilities(struct cli_state
*cli
)
123 uint32 capabilities
= CAP_NT_SMBS
;
125 if (!cli
->force_dos_errors
)
126 capabilities
|= CAP_STATUS32
;
128 if (cli
->use_level_II_oplocks
)
129 capabilities
|= CAP_LEVEL_II_OPLOCKS
;
131 if (cli
->capabilities
& CAP_UNICODE
)
132 capabilities
|= CAP_UNICODE
;
134 if (cli
->capabilities
& CAP_LARGE_FILES
)
135 capabilities
|= CAP_LARGE_FILES
;
140 /****************************************************************************
141 Do a NT1 guest session setup.
142 ****************************************************************************/
144 static BOOL
cli_session_setup_guest(struct cli_state
*cli
)
147 uint32 capabilities
= cli_session_setup_capabilities(cli
);
149 set_message(cli
->outbuf
,13,0,True
);
150 SCVAL(cli
->outbuf
,smb_com
,SMBsesssetupX
);
151 cli_setup_packet(cli
);
153 SCVAL(cli
->outbuf
,smb_vwv0
,0xFF);
154 SSVAL(cli
->outbuf
,smb_vwv2
,CLI_BUFFER_SIZE
);
155 SSVAL(cli
->outbuf
,smb_vwv3
,2);
156 SSVAL(cli
->outbuf
,smb_vwv4
,cli
->pid
);
157 SIVAL(cli
->outbuf
,smb_vwv5
,cli
->sesskey
);
158 SSVAL(cli
->outbuf
,smb_vwv7
,0);
159 SSVAL(cli
->outbuf
,smb_vwv8
,0);
160 SIVAL(cli
->outbuf
,smb_vwv11
,capabilities
);
161 p
= smb_buf(cli
->outbuf
);
162 p
+= clistr_push(cli
, p
, "", -1, STR_TERMINATE
); /* username */
163 p
+= clistr_push(cli
, p
, "", -1, STR_TERMINATE
); /* workgroup */
164 p
+= clistr_push(cli
, p
, "Unix", -1, STR_TERMINATE
);
165 p
+= clistr_push(cli
, p
, "Samba", -1, STR_TERMINATE
);
166 cli_setup_bcc(cli
, p
);
169 if (!cli_receive_smb(cli
))
172 show_msg(cli
->inbuf
);
174 if (cli_is_error(cli
))
177 cli
->vuid
= SVAL(cli
->inbuf
,smb_uid
);
179 p
= smb_buf(cli
->inbuf
);
180 p
+= clistr_pull(cli
, cli
->server_os
, p
, sizeof(fstring
), -1, STR_TERMINATE
);
181 p
+= clistr_pull(cli
, cli
->server_type
, p
, sizeof(fstring
), -1, STR_TERMINATE
);
182 p
+= clistr_pull(cli
, cli
->server_domain
, p
, sizeof(fstring
), -1, STR_TERMINATE
);
184 fstrcpy(cli
->user_name
, "");
189 /****************************************************************************
190 Do a NT1 plaintext session setup.
191 ****************************************************************************/
193 static BOOL
cli_session_setup_plaintext(struct cli_state
*cli
, const char *user
,
194 const char *pass
, const char *workgroup
)
196 uint32 capabilities
= cli_session_setup_capabilities(cli
);
200 fstr_sprintf( lanman
, "Samba %s", SAMBA_VERSION_STRING
);
202 set_message(cli
->outbuf
,13,0,True
);
203 SCVAL(cli
->outbuf
,smb_com
,SMBsesssetupX
);
204 cli_setup_packet(cli
);
206 SCVAL(cli
->outbuf
,smb_vwv0
,0xFF);
207 SSVAL(cli
->outbuf
,smb_vwv2
,CLI_BUFFER_SIZE
);
208 SSVAL(cli
->outbuf
,smb_vwv3
,2);
209 SSVAL(cli
->outbuf
,smb_vwv4
,cli
->pid
);
210 SIVAL(cli
->outbuf
,smb_vwv5
,cli
->sesskey
);
211 SSVAL(cli
->outbuf
,smb_vwv8
,0);
212 SIVAL(cli
->outbuf
,smb_vwv11
,capabilities
);
213 p
= smb_buf(cli
->outbuf
);
215 /* check wether to send the ASCII or UNICODE version of the password */
217 if ( (capabilities
& CAP_UNICODE
) == 0 ) {
218 p
+= clistr_push(cli
, p
, pass
, -1, STR_TERMINATE
); /* password */
219 SSVAL(cli
->outbuf
,smb_vwv7
,PTR_DIFF(p
, smb_buf(cli
->outbuf
)));
222 p
+= clistr_push(cli
, p
, pass
, -1, STR_UNICODE
|STR_TERMINATE
); /* unicode password */
223 SSVAL(cli
->outbuf
,smb_vwv8
,PTR_DIFF(p
, smb_buf(cli
->outbuf
)));
226 p
+= clistr_push(cli
, p
, user
, -1, STR_TERMINATE
); /* username */
227 p
+= clistr_push(cli
, p
, workgroup
, -1, STR_TERMINATE
); /* workgroup */
228 p
+= clistr_push(cli
, p
, "Unix", -1, STR_TERMINATE
);
229 p
+= clistr_push(cli
, p
, lanman
, -1, STR_TERMINATE
);
230 cli_setup_bcc(cli
, p
);
233 if (!cli_receive_smb(cli
))
236 show_msg(cli
->inbuf
);
238 if (cli_is_error(cli
))
241 cli
->vuid
= SVAL(cli
->inbuf
,smb_uid
);
242 p
= smb_buf(cli
->inbuf
);
243 p
+= clistr_pull(cli
, cli
->server_os
, p
, sizeof(fstring
), -1, STR_TERMINATE
);
244 p
+= clistr_pull(cli
, cli
->server_type
, p
, sizeof(fstring
), -1, STR_TERMINATE
);
245 p
+= clistr_pull(cli
, cli
->server_domain
, p
, sizeof(fstring
), -1, STR_TERMINATE
);
246 fstrcpy(cli
->user_name
, user
);
252 * Set the user session key for a connection
253 * @param cli The cli structure to add it too
254 * @param session_key The session key used. (A copy of this is taken for the cli struct)
258 static void cli_set_session_key (struct cli_state
*cli
, const DATA_BLOB session_key
)
260 cli
->user_session_key
= data_blob(session_key
.data
, session_key
.length
);
263 /****************************************************************************
264 do a NT1 NTLM/LM encrypted session setup - for when extended security
266 @param cli client state to create do session setup on
268 @param pass *either* cleartext password (passlen !=24) or LM response.
269 @param ntpass NT response, implies ntpasslen >=24, implies pass is not clear
270 @param workgroup The user's domain.
271 ****************************************************************************/
273 static BOOL
cli_session_setup_nt1(struct cli_state
*cli
, const char *user
,
274 const char *pass
, size_t passlen
,
275 const char *ntpass
, size_t ntpasslen
,
276 const char *workgroup
)
278 uint32 capabilities
= cli_session_setup_capabilities(cli
);
279 DATA_BLOB lm_response
= data_blob(NULL
, 0);
280 DATA_BLOB nt_response
= data_blob(NULL
, 0);
281 DATA_BLOB session_key
= data_blob(NULL
, 0);
286 /* do nothing - guest login */
287 } else if (passlen
!= 24) {
288 if (lp_client_ntlmv2_auth()) {
289 DATA_BLOB server_chal
;
290 DATA_BLOB names_blob
;
291 server_chal
= data_blob(cli
->secblob
.data
, MIN(cli
->secblob
.length
, 8));
293 /* note that the 'workgroup' here is a best guess - we don't know
294 the server's domain at this point. The 'server name' is also
297 names_blob
= NTLMv2_generate_names_blob(cli
->called
.name
, workgroup
);
299 if (!SMBNTLMv2encrypt(user
, workgroup
, pass
, &server_chal
,
301 &lm_response
, &nt_response
, &session_key
)) {
302 data_blob_free(&names_blob
);
303 data_blob_free(&server_chal
);
306 data_blob_free(&names_blob
);
307 data_blob_free(&server_chal
);
311 E_md4hash(pass
, nt_hash
);
313 nt_response
= data_blob(NULL
, 24);
314 SMBNTencrypt(pass
,cli
->secblob
.data
,nt_response
.data
);
316 /* non encrypted password supplied. Ignore ntpass. */
317 if (lp_client_lanman_auth()) {
318 lm_response
= data_blob(NULL
, 24);
319 SMBencrypt(pass
,cli
->secblob
.data
, lm_response
.data
);
321 /* LM disabled, place NT# in LM field instead */
322 lm_response
= data_blob(nt_response
.data
, nt_response
.length
);
325 session_key
= data_blob(NULL
, 16);
326 SMBsesskeygen_ntv1(nt_hash
, NULL
, session_key
.data
);
328 cli_simple_set_signing(cli
, session_key
, nt_response
);
330 /* pre-encrypted password supplied. Only used for
331 security=server, can't do
332 signing because we don't have original key */
334 lm_response
= data_blob(pass
, passlen
);
335 nt_response
= data_blob(ntpass
, ntpasslen
);
338 /* send a session setup command */
339 memset(cli
->outbuf
,'\0',smb_size
);
341 set_message(cli
->outbuf
,13,0,True
);
342 SCVAL(cli
->outbuf
,smb_com
,SMBsesssetupX
);
343 cli_setup_packet(cli
);
345 SCVAL(cli
->outbuf
,smb_vwv0
,0xFF);
346 SSVAL(cli
->outbuf
,smb_vwv2
,CLI_BUFFER_SIZE
);
347 SSVAL(cli
->outbuf
,smb_vwv3
,2);
348 SSVAL(cli
->outbuf
,smb_vwv4
,cli
->pid
);
349 SIVAL(cli
->outbuf
,smb_vwv5
,cli
->sesskey
);
350 SSVAL(cli
->outbuf
,smb_vwv7
,lm_response
.length
);
351 SSVAL(cli
->outbuf
,smb_vwv8
,nt_response
.length
);
352 SIVAL(cli
->outbuf
,smb_vwv11
,capabilities
);
353 p
= smb_buf(cli
->outbuf
);
354 if (lm_response
.length
) {
355 memcpy(p
,lm_response
.data
, lm_response
.length
); p
+= lm_response
.length
;
357 if (nt_response
.length
) {
358 memcpy(p
,nt_response
.data
, nt_response
.length
); p
+= nt_response
.length
;
360 p
+= clistr_push(cli
, p
, user
, -1, STR_TERMINATE
);
361 p
+= clistr_push(cli
, p
, workgroup
, -1, STR_TERMINATE
);
362 p
+= clistr_push(cli
, p
, "Unix", -1, STR_TERMINATE
);
363 p
+= clistr_push(cli
, p
, "Samba", -1, STR_TERMINATE
);
364 cli_setup_bcc(cli
, p
);
366 if (!cli_send_smb(cli
) || !cli_receive_smb(cli
)) {
371 /* show_msg(cli->inbuf); */
373 if (cli_is_error(cli
)) {
378 /* use the returned vuid from now on */
379 cli
->vuid
= SVAL(cli
->inbuf
,smb_uid
);
381 p
= smb_buf(cli
->inbuf
);
382 p
+= clistr_pull(cli
, cli
->server_os
, p
, sizeof(fstring
), -1, STR_TERMINATE
);
383 p
+= clistr_pull(cli
, cli
->server_type
, p
, sizeof(fstring
), -1, STR_TERMINATE
);
384 p
+= clistr_pull(cli
, cli
->server_domain
, p
, sizeof(fstring
), -1, STR_TERMINATE
);
386 fstrcpy(cli
->user_name
, user
);
388 if (session_key
.data
) {
389 /* Have plaintext orginal */
390 cli_set_session_key(cli
, session_key
);
395 data_blob_free(&lm_response
);
396 data_blob_free(&nt_response
);
399 data_blob_free(&session_key
);
403 /****************************************************************************
404 Send a extended security session setup blob
405 ****************************************************************************/
407 static BOOL
cli_session_setup_blob_send(struct cli_state
*cli
, DATA_BLOB blob
)
409 uint32 capabilities
= cli_session_setup_capabilities(cli
);
412 capabilities
|= CAP_EXTENDED_SECURITY
;
414 /* send a session setup command */
415 memset(cli
->outbuf
,'\0',smb_size
);
417 set_message(cli
->outbuf
,12,0,True
);
418 SCVAL(cli
->outbuf
,smb_com
,SMBsesssetupX
);
420 cli_setup_packet(cli
);
422 SCVAL(cli
->outbuf
,smb_vwv0
,0xFF);
423 SSVAL(cli
->outbuf
,smb_vwv2
,CLI_BUFFER_SIZE
);
424 SSVAL(cli
->outbuf
,smb_vwv3
,2);
425 SSVAL(cli
->outbuf
,smb_vwv4
,1);
426 SIVAL(cli
->outbuf
,smb_vwv5
,0);
427 SSVAL(cli
->outbuf
,smb_vwv7
,blob
.length
);
428 SIVAL(cli
->outbuf
,smb_vwv10
,capabilities
);
429 p
= smb_buf(cli
->outbuf
);
430 memcpy(p
, blob
.data
, blob
.length
);
432 p
+= clistr_push(cli
, p
, "Unix", -1, STR_TERMINATE
);
433 p
+= clistr_push(cli
, p
, "Samba", -1, STR_TERMINATE
);
434 cli_setup_bcc(cli
, p
);
435 return cli_send_smb(cli
);
438 /****************************************************************************
439 Send a extended security session setup blob, returning a reply blob.
440 ****************************************************************************/
442 static DATA_BLOB
cli_session_setup_blob_receive(struct cli_state
*cli
)
444 DATA_BLOB blob2
= data_blob(NULL
, 0);
448 if (!cli_receive_smb(cli
))
451 show_msg(cli
->inbuf
);
453 if (cli_is_error(cli
) && !NT_STATUS_EQUAL(cli_nt_error(cli
),
454 NT_STATUS_MORE_PROCESSING_REQUIRED
)) {
458 /* use the returned vuid from now on */
459 cli
->vuid
= SVAL(cli
->inbuf
,smb_uid
);
461 p
= smb_buf(cli
->inbuf
);
463 blob2
= data_blob(p
, SVAL(cli
->inbuf
, smb_vwv3
));
466 p
+= clistr_pull(cli
, cli
->server_os
, p
, sizeof(fstring
), -1, STR_TERMINATE
);
468 /* w2k with kerberos doesn't properly null terminate this field */
469 len
= smb_buflen(cli
->inbuf
) - PTR_DIFF(p
, smb_buf(cli
->inbuf
));
470 p
+= clistr_pull(cli
, cli
->server_type
, p
, sizeof(fstring
), len
, 0);
477 /****************************************************************************
478 Send a extended security session setup blob, returning a reply blob.
479 ****************************************************************************/
481 static DATA_BLOB
cli_session_setup_blob(struct cli_state
*cli
, DATA_BLOB blob
)
483 DATA_BLOB blob2
= data_blob(NULL
, 0);
484 if (!cli_session_setup_blob_send(cli
, blob
)) {
488 return cli_session_setup_blob_receive(cli
);
491 /****************************************************************************
492 Use in-memory credentials cache
493 ****************************************************************************/
495 static void use_in_memory_ccache(void) {
496 setenv(KRB5_ENV_CCNAME
, "MEMORY:cliconnect", 1);
499 /****************************************************************************
500 Do a spnego/kerberos encrypted session setup.
501 ****************************************************************************/
503 static ADS_STATUS
cli_session_setup_kerberos(struct cli_state
*cli
, const char *principal
, const char *workgroup
)
505 DATA_BLOB blob2
, negTokenTarg
;
506 DATA_BLOB session_key_krb5
;
507 DATA_BLOB null_blob
= data_blob(NULL
, 0);
510 DEBUG(2,("Doing kerberos session setup\n"));
512 /* generate the encapsulated kerberos5 ticket */
513 rc
= spnego_gen_negTokenTarg(principal
, 0, &negTokenTarg
, &session_key_krb5
);
516 DEBUG(1, ("spnego_gen_negTokenTarg failed: %s\n", error_message(rc
)));
517 return ADS_ERROR_KRB5(rc
);
521 file_save("negTokenTarg.dat", negTokenTarg
.data
, negTokenTarg
.length
);
524 cli_simple_set_signing(cli
, session_key_krb5
, null_blob
);
526 blob2
= cli_session_setup_blob(cli
, negTokenTarg
);
528 /* we don't need this blob for kerberos */
529 data_blob_free(&blob2
);
531 cli_set_session_key(cli
, session_key_krb5
);
533 data_blob_free(&negTokenTarg
);
535 if (cli_is_error(cli
)) {
536 if (NT_STATUS_IS_OK(cli_nt_error(cli
))) {
537 return ADS_ERROR_NT(NT_STATUS_UNSUCCESSFUL
);
540 return ADS_ERROR_NT(cli_nt_error(cli
));
542 #endif /* HAVE_KRB5 */
545 /****************************************************************************
546 Do a spnego/NTLMSSP encrypted session setup.
547 ****************************************************************************/
549 static NTSTATUS
cli_session_setup_ntlmssp(struct cli_state
*cli
, const char *user
,
550 const char *pass
, const char *domain
)
552 struct ntlmssp_state
*ntlmssp_state
;
557 DATA_BLOB blob_in
= data_blob(NULL
, 0);
560 cli_temp_set_signing(cli
);
562 if (!NT_STATUS_IS_OK(nt_status
= ntlmssp_client_start(&ntlmssp_state
))) {
566 if (!NT_STATUS_IS_OK(nt_status
= ntlmssp_set_username(ntlmssp_state
, user
))) {
569 if (!NT_STATUS_IS_OK(nt_status
= ntlmssp_set_domain(ntlmssp_state
, domain
))) {
572 if (!NT_STATUS_IS_OK(nt_status
= ntlmssp_set_password(ntlmssp_state
, pass
))) {
577 nt_status
= ntlmssp_update(ntlmssp_state
,
579 data_blob_free(&blob_in
);
580 if (NT_STATUS_EQUAL(nt_status
, NT_STATUS_MORE_PROCESSING_REQUIRED
)) {
582 /* and wrap it in a SPNEGO wrapper */
583 msg1
= gen_negTokenInit(OID_NTLMSSP
, blob_out
);
585 /* wrap it in SPNEGO */
586 msg1
= spnego_gen_auth(blob_out
);
589 /* now send that blob on its way */
590 if (!cli_session_setup_blob_send(cli
, msg1
)) {
591 DEBUG(3, ("Failed to send NTLMSSP/SPENGO blob to server!\n"));
592 nt_status
= NT_STATUS_UNSUCCESSFUL
;
594 data_blob_free(&msg1
);
596 blob
= cli_session_setup_blob_receive(cli
);
598 nt_status
= cli_nt_error(cli
);
599 if (cli_is_error(cli
) && NT_STATUS_IS_OK(nt_status
)) {
600 if (cli
->smb_rw_error
== READ_BAD_SIG
) {
601 nt_status
= NT_STATUS_ACCESS_DENIED
;
603 nt_status
= NT_STATUS_UNSUCCESSFUL
;
610 if (NT_STATUS_IS_OK(nt_status
)) {
611 nt_status
= NT_STATUS_UNSUCCESSFUL
;
613 } else if ((turn
== 1) &&
614 NT_STATUS_EQUAL(nt_status
, NT_STATUS_MORE_PROCESSING_REQUIRED
)) {
615 DATA_BLOB tmp_blob
= data_blob(NULL
, 0);
616 /* the server might give us back two challenges */
617 if (!spnego_parse_challenge(blob
, &blob_in
,
619 DEBUG(3,("Failed to parse challenges\n"));
620 nt_status
= NT_STATUS_INVALID_PARAMETER
;
622 data_blob_free(&tmp_blob
);
624 if (!spnego_parse_auth_response(blob
, nt_status
,
626 DEBUG(3,("Failed to parse auth response\n"));
627 if (NT_STATUS_IS_OK(nt_status
)
628 || NT_STATUS_EQUAL(nt_status
, NT_STATUS_MORE_PROCESSING_REQUIRED
))
629 nt_status
= NT_STATUS_INVALID_PARAMETER
;
632 data_blob_free(&blob
);
633 data_blob_free(&blob_out
);
635 } while (NT_STATUS_EQUAL(nt_status
, NT_STATUS_MORE_PROCESSING_REQUIRED
));
637 if (NT_STATUS_IS_OK(nt_status
)) {
639 DATA_BLOB key
= data_blob(ntlmssp_state
->session_key
.data
,
640 ntlmssp_state
->session_key
.length
);
641 DATA_BLOB null_blob
= data_blob(NULL
, 0);
643 fstrcpy(cli
->server_domain
, ntlmssp_state
->server_domain
);
644 cli_set_session_key(cli
, ntlmssp_state
->session_key
);
646 if (cli_simple_set_signing(cli
, key
, null_blob
)) {
648 /* 'resign' the last message, so we get the right sequence numbers
649 for checking the first reply from the server */
650 cli_calculate_sign_mac(cli
);
652 if (!cli_check_sign_mac(cli
, True
)) {
653 nt_status
= NT_STATUS_ACCESS_DENIED
;
658 /* we have a reference conter on ntlmssp_state, if we are signing
659 then the state will be kept by the signing engine */
661 ntlmssp_end(&ntlmssp_state
);
666 /****************************************************************************
667 Do a spnego encrypted session setup.
668 ****************************************************************************/
670 ADS_STATUS
cli_session_setup_spnego(struct cli_state
*cli
, const char *user
,
671 const char *pass
, const char *domain
)
674 char *OIDs
[ASN1_MAX_OIDS
];
676 BOOL got_kerberos_mechanism
= False
;
679 DEBUG(3,("Doing spnego session setup (blob length=%lu)\n", (unsigned long)cli
->secblob
.length
));
681 /* the server might not even do spnego */
682 if (cli
->secblob
.length
<= 16) {
683 DEBUG(3,("server didn't supply a full spnego negprot\n"));
688 file_save("negprot.dat", cli
->secblob
.data
, cli
->secblob
.length
);
691 /* there is 16 bytes of GUID before the real spnego packet starts */
692 blob
= data_blob(cli
->secblob
.data
+16, cli
->secblob
.length
-16);
694 /* the server sent us the first part of the SPNEGO exchange in the negprot
696 if (!spnego_parse_negTokenInit(blob
, OIDs
, &principal
)) {
697 data_blob_free(&blob
);
698 return ADS_ERROR_NT(NT_STATUS_INVALID_PARAMETER
);
700 data_blob_free(&blob
);
702 /* make sure the server understands kerberos */
703 for (i
=0;OIDs
[i
];i
++) {
704 DEBUG(3,("got OID=%s\n", OIDs
[i
]));
705 if (strcmp(OIDs
[i
], OID_KERBEROS5_OLD
) == 0 ||
706 strcmp(OIDs
[i
], OID_KERBEROS5
) == 0) {
707 got_kerberos_mechanism
= True
;
711 DEBUG(3,("got principal=%s\n", principal
));
713 fstrcpy(cli
->user_name
, user
);
716 /* If password is set we reauthenticate to kerberos server
717 * and do not store results */
719 if (got_kerberos_mechanism
&& cli
->use_kerberos
) {
723 use_in_memory_ccache();
724 ret
= kerberos_kinit_password(user
, pass
, 0 /* no time correction for now */, NULL
);
727 DEBUG(0, ("Kinit failed: %s\n", error_message(ret
)));
728 return ADS_ERROR_KRB5(ret
);
732 return cli_session_setup_kerberos(cli
, principal
, domain
);
740 return ADS_ERROR_NT(cli_session_setup_ntlmssp(cli
, user
, pass
, domain
));
743 /****************************************************************************
744 Send a session setup. The username and workgroup is in UNIX character
745 format and must be converted to DOS codepage format before sending. If the
746 password is in plaintext, the same should be done.
747 ****************************************************************************/
749 BOOL
cli_session_setup(struct cli_state
*cli
,
751 const char *pass
, int passlen
,
752 const char *ntpass
, int ntpasslen
,
753 const char *workgroup
)
758 /* allow for workgroups as part of the username */
759 fstrcpy(user2
, user
);
760 if ((p
=strchr_m(user2
,'\\')) || (p
=strchr_m(user2
,'/')) ||
761 (p
=strchr_m(user2
,*lp_winbind_separator()))) {
767 if (cli
->protocol
< PROTOCOL_LANMAN1
)
770 /* now work out what sort of session setup we are going to
771 do. I have split this into separate functions to make the
772 flow a bit easier to understand (tridge) */
774 /* if its an older server then we have to use the older request format */
776 if (cli
->protocol
< PROTOCOL_NT1
) {
777 if (!lp_client_lanman_auth() && passlen
!= 24 && (*pass
)) {
778 DEBUG(1, ("Server requested LM password but 'client lanman auth'"
783 if ((cli
->sec_mode
& NEGOTIATE_SECURITY_CHALLENGE_RESPONSE
) == 0 &&
784 !lp_client_plaintext_auth() && (*pass
)) {
785 DEBUG(1, ("Server requested plaintext password but 'client use plaintext auth'"
790 return cli_session_setup_lanman2(cli
, user
, pass
, passlen
, workgroup
);
793 /* if no user is supplied then we have to do an anonymous connection.
794 passwords are ignored */
797 return cli_session_setup_guest(cli
);
799 /* if the server is share level then send a plaintext null
800 password at this point. The password is sent in the tree
803 if ((cli
->sec_mode
& NEGOTIATE_SECURITY_USER_LEVEL
) == 0)
804 return cli_session_setup_plaintext(cli
, user
, "", workgroup
);
806 /* if the server doesn't support encryption then we have to use
807 plaintext. The second password is ignored */
809 if ((cli
->sec_mode
& NEGOTIATE_SECURITY_CHALLENGE_RESPONSE
) == 0) {
810 if (!lp_client_plaintext_auth() && (*pass
)) {
811 DEBUG(1, ("Server requested plaintext password but 'client use plaintext auth'"
815 return cli_session_setup_plaintext(cli
, user
, pass
, workgroup
);
818 /* if the server supports extended security then use SPNEGO */
820 if (cli
->capabilities
& CAP_EXTENDED_SECURITY
) {
821 ADS_STATUS status
= cli_session_setup_spnego(cli
, user
, pass
, workgroup
);
822 if (!ADS_ERR_OK(status
)) {
823 DEBUG(3, ("SPENGO login failed: %s\n", ads_errstr(status
)));
829 /* otherwise do a NT1 style session setup */
831 return cli_session_setup_nt1(cli
, user
,
832 pass
, passlen
, ntpass
, ntpasslen
,
836 /****************************************************************************
838 *****************************************************************************/
840 BOOL
cli_ulogoff(struct cli_state
*cli
)
842 memset(cli
->outbuf
,'\0',smb_size
);
843 set_message(cli
->outbuf
,2,0,True
);
844 SCVAL(cli
->outbuf
,smb_com
,SMBulogoffX
);
845 cli_setup_packet(cli
);
846 SSVAL(cli
->outbuf
,smb_vwv0
,0xFF);
847 SSVAL(cli
->outbuf
,smb_vwv2
,0); /* no additional info */
850 if (!cli_receive_smb(cli
))
853 return !cli_is_error(cli
);
856 /****************************************************************************
858 ****************************************************************************/
859 BOOL
cli_send_tconX(struct cli_state
*cli
,
860 const char *share
, const char *dev
, const char *pass
, int passlen
)
862 fstring fullshare
, pword
;
864 memset(cli
->outbuf
,'\0',smb_size
);
865 memset(cli
->inbuf
,'\0',smb_size
);
867 fstrcpy(cli
->share
, share
);
869 /* in user level security don't send a password now */
870 if (cli
->sec_mode
& NEGOTIATE_SECURITY_USER_LEVEL
) {
875 if ((cli
->sec_mode
& NEGOTIATE_SECURITY_CHALLENGE_RESPONSE
) && *pass
&& passlen
!= 24) {
876 if (!lp_client_lanman_auth()) {
877 DEBUG(1, ("Server requested LANMAN password but 'client use lanman auth'"
883 * Non-encrypted passwords - convert to DOS codepage before encryption.
886 SMBencrypt(pass
,cli
->secblob
.data
,(uchar
*)pword
);
888 if((cli
->sec_mode
& (NEGOTIATE_SECURITY_USER_LEVEL
|NEGOTIATE_SECURITY_CHALLENGE_RESPONSE
)) == 0) {
889 if (!lp_client_plaintext_auth() && (*pass
)) {
890 DEBUG(1, ("Server requested plaintext password but 'client use plaintext auth'"
896 * Non-encrypted passwords - convert to DOS codepage before using.
898 passlen
= clistr_push(cli
, pword
, pass
, sizeof(pword
), STR_TERMINATE
);
901 memcpy(pword
, pass
, passlen
);
905 slprintf(fullshare
, sizeof(fullshare
)-1,
906 "\\\\%s\\%s", cli
->desthost
, share
);
908 set_message(cli
->outbuf
,4, 0, True
);
909 SCVAL(cli
->outbuf
,smb_com
,SMBtconX
);
910 cli_setup_packet(cli
);
912 SSVAL(cli
->outbuf
,smb_vwv0
,0xFF);
913 SSVAL(cli
->outbuf
,smb_vwv3
,passlen
);
915 p
= smb_buf(cli
->outbuf
);
916 memcpy(p
,pword
,passlen
);
918 p
+= clistr_push(cli
, p
, fullshare
, -1, STR_TERMINATE
|STR_UPPER
);
919 p
+= clistr_push(cli
, p
, dev
, -1, STR_TERMINATE
|STR_UPPER
| STR_ASCII
);
921 cli_setup_bcc(cli
, p
);
924 if (!cli_receive_smb(cli
))
927 if (cli_is_error(cli
))
930 clistr_pull(cli
, cli
->dev
, smb_buf(cli
->inbuf
), sizeof(fstring
), -1, STR_TERMINATE
|STR_ASCII
);
932 if (cli
->protocol
>= PROTOCOL_NT1
&&
933 smb_buflen(cli
->inbuf
) == 3) {
934 /* almost certainly win95 - enable bug fixes */
938 cli
->cnum
= SVAL(cli
->inbuf
,smb_tid
);
942 /****************************************************************************
943 Send a tree disconnect.
944 ****************************************************************************/
946 BOOL
cli_tdis(struct cli_state
*cli
)
948 memset(cli
->outbuf
,'\0',smb_size
);
949 set_message(cli
->outbuf
,0,0,True
);
950 SCVAL(cli
->outbuf
,smb_com
,SMBtdis
);
951 SSVAL(cli
->outbuf
,smb_tid
,cli
->cnum
);
952 cli_setup_packet(cli
);
955 if (!cli_receive_smb(cli
))
958 return !cli_is_error(cli
);
961 /****************************************************************************
962 Send a negprot command.
963 ****************************************************************************/
965 void cli_negprot_send(struct cli_state
*cli
)
970 if (cli
->protocol
< PROTOCOL_NT1
)
971 cli
->use_spnego
= False
;
973 memset(cli
->outbuf
,'\0',smb_size
);
975 /* setup the protocol strings */
976 set_message(cli
->outbuf
,0,0,True
);
978 p
= smb_buf(cli
->outbuf
);
980 prots
[numprots
].name
&& prots
[numprots
].prot
<=cli
->protocol
;
983 p
+= clistr_push(cli
, p
, prots
[numprots
].name
, -1, STR_TERMINATE
);
986 SCVAL(cli
->outbuf
,smb_com
,SMBnegprot
);
987 cli_setup_bcc(cli
, p
);
988 cli_setup_packet(cli
);
990 SCVAL(smb_buf(cli
->outbuf
),0,2);
995 /****************************************************************************
996 Send a negprot command.
997 ****************************************************************************/
999 BOOL
cli_negprot(struct cli_state
*cli
)
1005 if (cli
->protocol
< PROTOCOL_NT1
)
1006 cli
->use_spnego
= False
;
1008 memset(cli
->outbuf
,'\0',smb_size
);
1010 /* setup the protocol strings */
1011 for (plength
=0,numprots
=0;
1012 prots
[numprots
].name
&& prots
[numprots
].prot
<=cli
->protocol
;
1014 plength
+= strlen(prots
[numprots
].name
)+2;
1016 set_message(cli
->outbuf
,0,plength
,True
);
1018 p
= smb_buf(cli
->outbuf
);
1020 prots
[numprots
].name
&& prots
[numprots
].prot
<=cli
->protocol
;
1023 p
+= clistr_push(cli
, p
, prots
[numprots
].name
, -1, STR_TERMINATE
);
1026 SCVAL(cli
->outbuf
,smb_com
,SMBnegprot
);
1027 cli_setup_packet(cli
);
1029 SCVAL(smb_buf(cli
->outbuf
),0,2);
1032 if (!cli_receive_smb(cli
))
1035 show_msg(cli
->inbuf
);
1037 if (cli_is_error(cli
) ||
1038 ((int)SVAL(cli
->inbuf
,smb_vwv0
) >= numprots
)) {
1042 cli
->protocol
= prots
[SVAL(cli
->inbuf
,smb_vwv0
)].prot
;
1044 if ((cli
->protocol
< PROTOCOL_NT1
) && cli
->sign_info
.mandatory_signing
) {
1045 DEBUG(0,("cli_negprot: SMB signing is mandatory and the selected protocol level doesn't support it.\n"));
1049 if (cli
->protocol
>= PROTOCOL_NT1
) {
1051 cli
->sec_mode
= CVAL(cli
->inbuf
,smb_vwv1
);
1052 cli
->max_mux
= SVAL(cli
->inbuf
, smb_vwv1
+1);
1053 cli
->max_xmit
= IVAL(cli
->inbuf
,smb_vwv3
+1);
1054 cli
->sesskey
= IVAL(cli
->inbuf
,smb_vwv7
+1);
1055 cli
->serverzone
= SVALS(cli
->inbuf
,smb_vwv15
+1);
1056 cli
->serverzone
*= 60;
1057 /* this time arrives in real GMT */
1058 cli
->servertime
= interpret_long_date(cli
->inbuf
+smb_vwv11
+1);
1059 cli
->secblob
= data_blob(smb_buf(cli
->inbuf
),smb_buflen(cli
->inbuf
));
1060 cli
->capabilities
= IVAL(cli
->inbuf
,smb_vwv9
+1);
1061 if (cli
->capabilities
& CAP_RAW_MODE
) {
1062 cli
->readbraw_supported
= True
;
1063 cli
->writebraw_supported
= True
;
1065 /* work out if they sent us a workgroup */
1066 if (!(cli
->capabilities
& CAP_EXTENDED_SECURITY
) &&
1067 smb_buflen(cli
->inbuf
) > 8) {
1068 clistr_pull(cli
, cli
->server_domain
,
1069 smb_buf(cli
->inbuf
)+8, sizeof(cli
->server_domain
),
1070 smb_buflen(cli
->inbuf
)-8, STR_UNICODE
|STR_NOALIGN
);
1074 * As signing is slow we only turn it on if either the client or
1075 * the server require it. JRA.
1078 if (cli
->sec_mode
& NEGOTIATE_SECURITY_SIGNATURES_REQUIRED
) {
1079 /* Fail if server says signing is mandatory and we don't want to support it. */
1080 if (!cli
->sign_info
.allow_smb_signing
) {
1081 DEBUG(0,("cli_negprot: SMB signing is mandatory and we have disabled it.\n"));
1084 cli
->sign_info
.negotiated_smb_signing
= True
;
1085 cli
->sign_info
.mandatory_signing
= True
;
1086 } else if (cli
->sign_info
.mandatory_signing
&& cli
->sign_info
.allow_smb_signing
) {
1087 /* Fail if client says signing is mandatory and the server doesn't support it. */
1088 if (!(cli
->sec_mode
& NEGOTIATE_SECURITY_SIGNATURES_ENABLED
)) {
1089 DEBUG(1,("cli_negprot: SMB signing is mandatory and the server doesn't support it.\n"));
1092 cli
->sign_info
.negotiated_smb_signing
= True
;
1093 cli
->sign_info
.mandatory_signing
= True
;
1094 } else if (cli
->sec_mode
& NEGOTIATE_SECURITY_SIGNATURES_ENABLED
) {
1095 cli
->sign_info
.negotiated_smb_signing
= True
;
1098 } else if (cli
->protocol
>= PROTOCOL_LANMAN1
) {
1099 cli
->use_spnego
= False
;
1100 cli
->sec_mode
= SVAL(cli
->inbuf
,smb_vwv1
);
1101 cli
->max_xmit
= SVAL(cli
->inbuf
,smb_vwv2
);
1102 cli
->sesskey
= IVAL(cli
->inbuf
,smb_vwv6
);
1103 cli
->serverzone
= SVALS(cli
->inbuf
,smb_vwv10
);
1104 cli
->serverzone
*= 60;
1105 /* this time is converted to GMT by make_unix_date */
1106 cli
->servertime
= make_unix_date(cli
->inbuf
+smb_vwv8
);
1107 cli
->readbraw_supported
= ((SVAL(cli
->inbuf
,smb_vwv5
) & 0x1) != 0);
1108 cli
->writebraw_supported
= ((SVAL(cli
->inbuf
,smb_vwv5
) & 0x2) != 0);
1109 cli
->secblob
= data_blob(smb_buf(cli
->inbuf
),smb_buflen(cli
->inbuf
));
1111 /* the old core protocol */
1112 cli
->use_spnego
= False
;
1114 cli
->serverzone
= TimeDiff(time(NULL
));
1117 cli
->max_xmit
= MIN(cli
->max_xmit
, CLI_BUFFER_SIZE
);
1119 /* a way to force ascii SMB */
1120 if (getenv("CLI_FORCE_ASCII"))
1121 cli
->capabilities
&= ~CAP_UNICODE
;
1126 /****************************************************************************
1127 Send a session request. See rfc1002.txt 4.3 and 4.3.2.
1128 ****************************************************************************/
1130 BOOL
cli_session_request(struct cli_state
*cli
,
1131 struct nmb_name
*calling
, struct nmb_name
*called
)
1135 extern pstring user_socket_options
;
1137 memcpy(&(cli
->calling
), calling
, sizeof(*calling
));
1138 memcpy(&(cli
->called
), called
, sizeof(*called
));
1140 /* put in the destination name */
1141 p
= cli
->outbuf
+len
;
1142 name_mangle(cli
->called
.name
, p
, cli
->called
.name_type
);
1146 p
= cli
->outbuf
+len
;
1147 name_mangle(cli
->calling
.name
, p
, cli
->calling
.name_type
);
1150 /* 445 doesn't have session request */
1151 if (cli
->port
== 445)
1154 /* send a session request (RFC 1002) */
1155 /* setup the packet length
1156 * Remove four bytes from the length count, since the length
1157 * field in the NBT Session Service header counts the number
1158 * of bytes which follow. The cli_send_smb() function knows
1159 * about this and accounts for those four bytes.
1163 _smb_setlen(cli
->outbuf
,len
);
1164 SCVAL(cli
->outbuf
,0,0x81);
1167 DEBUG(5,("Sent session request\n"));
1169 if (!cli_receive_smb(cli
))
1172 if (CVAL(cli
->inbuf
,0) == 0x84) {
1173 /* C. Hoch 9/14/95 Start */
1174 /* For information, here is the response structure.
1175 * We do the byte-twiddling to for portability.
1176 struct RetargetResponse{
1178 unsigned char flags;
1184 int port
= (CVAL(cli
->inbuf
,8)<<8)+CVAL(cli
->inbuf
,9);
1185 /* SESSION RETARGET */
1186 putip((char *)&cli
->dest_ip
,cli
->inbuf
+4);
1188 cli
->fd
= open_socket_out(SOCK_STREAM
, &cli
->dest_ip
, port
, LONG_CONNECT_TIMEOUT
);
1192 DEBUG(3,("Retargeted\n"));
1194 set_socket_options(cli
->fd
,user_socket_options
);
1201 DEBUG(0,("Retarget recursion - failing\n"));
1205 ret
= cli_session_request(cli
, calling
, called
);
1209 } /* C. Hoch 9/14/95 End */
1211 if (CVAL(cli
->inbuf
,0) != 0x82) {
1212 /* This is the wrong place to put the error... JRA. */
1213 cli
->rap_error
= CVAL(cli
->inbuf
,4);
1219 /****************************************************************************
1220 Open the client sockets.
1221 ****************************************************************************/
1223 BOOL
cli_connect(struct cli_state
*cli
, const char *host
, struct in_addr
*ip
)
1225 extern pstring user_socket_options
;
1226 int name_type
= 0x20;
1229 /* reasonable default hostname */
1230 if (!host
) host
= "*SMBSERVER";
1232 fstrcpy(cli
->desthost
, host
);
1234 /* allow hostnames of the form NAME#xx and do a netbios lookup */
1235 if ((p
= strchr(cli
->desthost
, '#'))) {
1236 name_type
= strtol(p
+1, NULL
, 16);
1240 if (!ip
|| is_zero_ip(*ip
)) {
1241 if (!resolve_name(cli
->desthost
, &cli
->dest_ip
, name_type
)) {
1244 if (ip
) *ip
= cli
->dest_ip
;
1249 if (getenv("LIBSMB_PROG")) {
1250 cli
->fd
= sock_exec(getenv("LIBSMB_PROG"));
1252 /* try 445 first, then 139 */
1253 int port
= cli
->port
?cli
->port
:445;
1254 cli
->fd
= open_socket_out(SOCK_STREAM
, &cli
->dest_ip
,
1255 port
, cli
->timeout
);
1256 if (cli
->fd
== -1 && cli
->port
== 0) {
1258 cli
->fd
= open_socket_out(SOCK_STREAM
, &cli
->dest_ip
,
1259 port
, cli
->timeout
);
1264 if (cli
->fd
== -1) {
1265 DEBUG(1,("Error connecting to %s (%s)\n",
1266 ip
?inet_ntoa(*ip
):host
,strerror(errno
)));
1270 set_socket_options(cli
->fd
,user_socket_options
);
1275 /****************************************************************************
1276 Initialise client credentials for authenticated pipe access.
1277 ****************************************************************************/
1279 void init_creds(struct ntuser_creds
*creds
, const char* username
,
1280 const char* domain
, const char* password
)
1282 ZERO_STRUCTP(creds
);
1284 pwd_set_cleartext(&creds
->pwd
, password
);
1286 fstrcpy(creds
->user_name
, username
);
1287 fstrcpy(creds
->domain
, domain
);
1290 creds
->pwd
.null_pwd
= True
;
1295 establishes a connection to after the negprot.
1296 @param output_cli A fully initialised cli structure, non-null only on success
1297 @param dest_host The netbios name of the remote host
1298 @param dest_ip (optional) The the destination IP, NULL for name based lookup
1299 @param port (optional) The destination port (0 for default)
1300 @param retry BOOL. Did this connection fail with a retryable error ?
1303 NTSTATUS
cli_start_connection(struct cli_state
**output_cli
,
1304 const char *my_name
,
1305 const char *dest_host
,
1306 struct in_addr
*dest_ip
, int port
,
1307 int signing_state
, int flags
,
1311 struct nmb_name calling
;
1312 struct nmb_name called
;
1313 struct cli_state
*cli
;
1320 my_name
= global_myname();
1322 if (!(cli
= cli_initialise(NULL
)))
1323 return NT_STATUS_NO_MEMORY
;
1325 make_nmb_name(&calling
, my_name
, 0x0);
1326 make_nmb_name(&called
, dest_host
, 0x20);
1328 if (cli_set_port(cli
, port
) != port
) {
1330 return NT_STATUS_UNSUCCESSFUL
;
1333 cli_set_timeout(cli
, 10000); /* 10 seconds. */
1342 DEBUG(3,("Connecting to host=%s\n", dest_host
));
1344 if (!cli_connect(cli
, dest_host
, &ip
)) {
1345 DEBUG(1,("cli_full_connection: failed to connect to %s (%s)\n",
1346 nmb_namestr(&called
), inet_ntoa(ip
)));
1348 return NT_STATUS_UNSUCCESSFUL
;
1354 if (!cli_session_request(cli
, &calling
, &called
)) {
1356 DEBUG(1,("session request to %s failed (%s)\n",
1357 called
.name
, cli_errstr(cli
)));
1358 if ((p
=strchr(called
.name
, '.')) && !is_ipaddress(called
.name
)) {
1362 if (strcmp(called
.name
, "*SMBSERVER")) {
1363 make_nmb_name(&called
, "*SMBSERVER", 0x20);
1366 return NT_STATUS_UNSUCCESSFUL
;
1369 cli_setup_signing_state(cli
, signing_state
);
1371 if (flags
& CLI_FULL_CONNECTION_DONT_SPNEGO
)
1372 cli
->use_spnego
= False
;
1373 else if (flags
& CLI_FULL_CONNECTION_USE_KERBEROS
)
1374 cli
->use_kerberos
= True
;
1376 if (!cli_negprot(cli
)) {
1377 DEBUG(1,("failed negprot\n"));
1378 nt_status
= NT_STATUS_UNSUCCESSFUL
;
1384 return NT_STATUS_OK
;
1389 establishes a connection right up to doing tconX, password specified.
1390 @param output_cli A fully initialised cli structure, non-null only on success
1391 @param dest_host The netbios name of the remote host
1392 @param dest_ip (optional) The the destination IP, NULL for name based lookup
1393 @param port (optional) The destination port (0 for default)
1394 @param service (optional) The share to make the connection to. Should be 'unqualified' in any way.
1395 @param service_type The 'type' of serivice.
1396 @param user Username, unix string
1397 @param domain User's domain
1398 @param password User's password, unencrypted unix string.
1399 @param retry BOOL. Did this connection fail with a retryable error ?
1402 NTSTATUS
cli_full_connection(struct cli_state
**output_cli
,
1403 const char *my_name
,
1404 const char *dest_host
,
1405 struct in_addr
*dest_ip
, int port
,
1406 const char *service
, const char *service_type
,
1407 const char *user
, const char *domain
,
1408 const char *password
, int flags
,
1412 struct ntuser_creds creds
;
1414 struct cli_state
*cli
= NULL
;
1416 nt_status
= cli_start_connection(&cli
, my_name
, dest_host
,
1417 dest_ip
, port
, signing_state
, flags
, retry
);
1419 if (!NT_STATUS_IS_OK(nt_status
)) {
1423 if (!cli_session_setup(cli
, user
, password
, strlen(password
)+1,
1424 password
, strlen(password
)+1,
1426 if ((flags
& CLI_FULL_CONNECTION_ANNONYMOUS_FALLBACK
)
1427 && cli_session_setup(cli
, "", "", 0, "", 0, domain
)) {
1429 nt_status
= cli_nt_error(cli
);
1430 DEBUG(1,("failed session setup with %s\n", nt_errstr(nt_status
)));
1432 if (NT_STATUS_IS_OK(nt_status
))
1433 nt_status
= NT_STATUS_UNSUCCESSFUL
;
1439 if (!cli_send_tconX(cli
, service
, service_type
,
1440 password
, strlen(password
)+1)) {
1441 nt_status
= cli_nt_error(cli
);
1442 DEBUG(1,("failed tcon_X with %s\n", nt_errstr(nt_status
)));
1444 if (NT_STATUS_IS_OK(nt_status
)) {
1445 nt_status
= NT_STATUS_UNSUCCESSFUL
;
1451 init_creds(&creds
, user
, domain
, password
);
1452 cli_init_creds(cli
, &creds
);
1455 return NT_STATUS_OK
;
1458 /****************************************************************************
1459 Attempt a NetBIOS session request, falling back to *SMBSERVER if needed.
1460 ****************************************************************************/
1462 BOOL
attempt_netbios_session_request(struct cli_state
*cli
, const char *srchost
, const char *desthost
,
1463 struct in_addr
*pdest_ip
)
1465 struct nmb_name calling
, called
;
1467 make_nmb_name(&calling
, srchost
, 0x0);
1470 * If the called name is an IP address
1471 * then use *SMBSERVER immediately.
1474 if(is_ipaddress(desthost
))
1475 make_nmb_name(&called
, "*SMBSERVER", 0x20);
1477 make_nmb_name(&called
, desthost
, 0x20);
1479 if (!cli_session_request(cli
, &calling
, &called
)) {
1480 struct nmb_name smbservername
;
1482 make_nmb_name(&smbservername
, "*SMBSERVER", 0x20);
1485 * If the name wasn't *SMBSERVER then
1486 * try with *SMBSERVER if the first name fails.
1489 if (nmb_name_equal(&called
, &smbservername
)) {
1492 * The name used was *SMBSERVER, don't bother with another name.
1495 DEBUG(0,("attempt_netbios_session_request: %s rejected the session for name *SMBSERVER \
1496 with error %s.\n", desthost
, cli_errstr(cli
) ));
1501 * We need to close the connection here but can't call cli_shutdown as
1502 * will free an allocated cli struct. cli_close_connection was invented
1503 * for this purpose. JRA. Based on work by "Kim R. Pedersen" <krp@filanet.dk>.
1506 cli_close_connection(cli
);
1508 if (!cli_initialise(cli
) ||
1509 !cli_connect(cli
, desthost
, pdest_ip
) ||
1510 !cli_session_request(cli
, &calling
, &smbservername
)) {
1511 DEBUG(0,("attempt_netbios_session_request: %s rejected the session for \
1512 name *SMBSERVER with error %s\n", desthost
, cli_errstr(cli
) ));
1524 /****************************************************************************
1525 Send an old style tcon.
1526 ****************************************************************************/
1527 NTSTATUS
cli_raw_tcon(struct cli_state
*cli
,
1528 const char *service
, const char *pass
, const char *dev
,
1529 uint16
*max_xmit
, uint16
*tid
)
1533 if (!lp_client_plaintext_auth() && (*pass
)) {
1534 DEBUG(1, ("Server requested plaintext password but 'client use plaintext auth'"
1536 return NT_STATUS_ACCESS_DENIED
;
1539 memset(cli
->outbuf
,'\0',smb_size
);
1540 memset(cli
->inbuf
,'\0',smb_size
);
1542 set_message(cli
->outbuf
, 0, 0, True
);
1543 SCVAL(cli
->outbuf
,smb_com
,SMBtcon
);
1544 cli_setup_packet(cli
);
1546 p
= smb_buf(cli
->outbuf
);
1547 *p
++ = 4; p
+= clistr_push(cli
, p
, service
, -1, STR_TERMINATE
| STR_NOALIGN
);
1548 *p
++ = 4; p
+= clistr_push(cli
, p
, pass
, -1, STR_TERMINATE
| STR_NOALIGN
);
1549 *p
++ = 4; p
+= clistr_push(cli
, p
, dev
, -1, STR_TERMINATE
| STR_NOALIGN
);
1551 cli_setup_bcc(cli
, p
);
1554 if (!cli_receive_smb(cli
)) {
1555 return NT_STATUS_UNEXPECTED_NETWORK_ERROR
;
1558 if (cli_is_error(cli
)) {
1559 return cli_nt_error(cli
);
1562 *max_xmit
= SVAL(cli
->inbuf
, smb_vwv0
);
1563 *tid
= SVAL(cli
->inbuf
, smb_vwv1
);
1565 return NT_STATUS_OK
;
1568 /* Return a cli_state pointing at the IPC$ share for the given server */
1570 struct cli_state
*get_ipc_connect(char *server
, struct in_addr
*server_ip
,
1571 struct user_auth_info
*user_info
)
1573 struct cli_state
*cli
;
1579 nt_status
= cli_full_connection(&cli
, myname
, server
, server_ip
, 0, "IPC$", "IPC",
1580 user_info
->username
, lp_workgroup(), user_info
->password
,
1581 CLI_FULL_CONNECTION_ANNONYMOUS_FALLBACK
, Undefined
, NULL
);
1583 if (NT_STATUS_IS_OK(nt_status
)) {
1585 } else if (is_ipaddress(server
)) {
1586 /* windows 9* needs a correct NMB name for connections */
1587 fstring remote_name
;
1589 if (name_status_find("*", 0, 0, *server_ip
, remote_name
)) {
1590 cli
= get_ipc_connect(remote_name
, server_ip
, user_info
);
1599 * Given the IP address of a master browser on the network, return its
1600 * workgroup and connect to it.
1602 * This function is provided to allow additional processing beyond what
1603 * get_ipc_connect_master_ip_bcast() does, e.g. to retrieve the list of master
1604 * browsers and obtain each master browsers' list of domains (in case the
1605 * first master browser is recently on the network and has not yet
1606 * synchronized with other master browsers and therefore does not yet have the
1607 * entire network browse list)
1610 struct cli_state
*get_ipc_connect_master_ip(struct ip_service
* mb_ip
, pstring workgroup
, struct user_auth_info
*user_info
)
1612 static fstring name
;
1613 struct cli_state
*cli
;
1614 struct in_addr server_ip
;
1616 DEBUG(99, ("Looking up name of master browser %s\n",
1617 inet_ntoa(mb_ip
->ip
)));
1620 * Do a name status query to find out the name of the master browser.
1621 * We use <01><02>__MSBROWSE__<02>#01 if *#00 fails because a domain
1622 * master browser will not respond to a wildcard query (or, at least,
1623 * an NT4 server acting as the domain master browser will not).
1625 * We might be able to use ONLY the query on MSBROWSE, but that's not
1626 * yet been tested with all Windows versions, so until it is, leave
1627 * the original wildcard query as the first choice and fall back to
1628 * MSBROWSE if the wildcard query fails.
1630 if (!name_status_find("*", 0, 0x1d, mb_ip
->ip
, name
) &&
1631 !name_status_find(MSBROWSE
, 1, 0x1d, mb_ip
->ip
, name
)) {
1633 DEBUG(99, ("Could not retrieve name status for %s\n",
1634 inet_ntoa(mb_ip
->ip
)));
1638 if (!find_master_ip(name
, &server_ip
)) {
1639 DEBUG(99, ("Could not find master ip for %s\n", name
));
1643 pstrcpy(workgroup
, name
);
1645 DEBUG(4, ("found master browser %s, %s\n",
1646 name
, inet_ntoa(mb_ip
->ip
)));
1648 cli
= get_ipc_connect(inet_ntoa(server_ip
), &server_ip
, user_info
);
1655 * Return the IP address and workgroup of a master browser on the network, and
1659 struct cli_state
*get_ipc_connect_master_ip_bcast(pstring workgroup
, struct user_auth_info
*user_info
)
1661 struct ip_service
*ip_list
;
1662 struct cli_state
*cli
;
1665 DEBUG(99, ("Do broadcast lookup for workgroups on local network\n"));
1667 /* Go looking for workgroups by broadcasting on the local network */
1669 if (!name_resolve_bcast(MSBROWSE
, 1, &ip_list
, &count
)) {
1670 DEBUG(99, ("No master browsers responded\n"));
1674 for (i
= 0; i
< count
; i
++) {
1675 DEBUG(99, ("Found master browser %s\n", inet_ntoa(ip_list
[i
].ip
)));
1677 cli
= get_ipc_connect_master_ip(&ip_list
[i
], workgroup
, user_info
);