?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
dsgetdcname: add map_ds_flags_to_nt_version.
[Samba.git] / source / libsmb / cliconnect.c
blob3b97beb225a094a881481fee902288cfe8bfbe1e
1 /*
2 Unix SMB/CIFS implementation.
3 client connect/disconnect routines
4 Copyright (C) Andrew Tridgell 1994-1998
5 Copyright (C) Andrew Bartlett 2001-2003
6
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
11
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.
16
17 You should have received a copy of the GNU General Public License
18 along with this program. If not, see <http://www.gnu.org/licenses/>.
19 */
20
21 #include "includes.h"
22
23 static const struct {
24 int prot;
25 const char *name;
26 } prots[] = {
27 {PROTOCOL_CORE,"PC NETWORK PROGRAM 1.0"},
28 {PROTOCOL_COREPLUS,"MICROSOFT NETWORKS 1.03"},
29 {PROTOCOL_LANMAN1,"MICROSOFT NETWORKS 3.0"},
30 {PROTOCOL_LANMAN1,"LANMAN1.0"},
31 {PROTOCOL_LANMAN2,"LM1.2X002"},
32 {PROTOCOL_LANMAN2,"DOS LANMAN2.1"},
33 {PROTOCOL_LANMAN2,"LANMAN2.1"},
34 {PROTOCOL_LANMAN2,"Samba"},
35 {PROTOCOL_NT1,"NT LANMAN 1.0"},
36 {PROTOCOL_NT1,"NT LM 0.12"},
37 {-1,NULL}
38 };
39
40 static const char *star_smbserver_name = "*SMBSERVER";
41
42 /**
43 * Set the user session key for a connection
44 * @param cli The cli structure to add it too
45 * @param session_key The session key used. (A copy of this is taken for the cli struct)
46 *
47 */
48
49 static void cli_set_session_key (struct cli_state *cli, const DATA_BLOB session_key)
50 {
51 cli->user_session_key = data_blob(session_key.data, session_key.length);
52 }
53
54 /****************************************************************************
55 Do an old lanman2 style session setup.
56 ****************************************************************************/
57
58 static NTSTATUS cli_session_setup_lanman2(struct cli_state *cli,
59 const char *user,
60 const char *pass, size_t passlen,
61 const char *workgroup)
62 {
63 DATA_BLOB session_key = data_blob_null;
64 DATA_BLOB lm_response = data_blob_null;
65 fstring pword;
66 char *p;
67
68 if (passlen > sizeof(pword)-1) {
69 return NT_STATUS_INVALID_PARAMETER;
70 }
71
72 /* LANMAN servers predate NT status codes and Unicode and ignore those
73 smb flags so we must disable the corresponding default capabilities
74 that would otherwise cause the Unicode and NT Status flags to be
75 set (and even returned by the server) */
76
77 cli->capabilities &= ~(CAP_UNICODE | CAP_STATUS32);
78
79 /* if in share level security then don't send a password now */
80 if (!(cli->sec_mode & NEGOTIATE_SECURITY_USER_LEVEL))
81 passlen = 0;
82
83 if (passlen > 0 && (cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) && passlen != 24) {
84 /* Encrypted mode needed, and non encrypted password supplied. */
85 lm_response = data_blob(NULL, 24);
86 if (!SMBencrypt(pass, cli->secblob.data,(uchar *)lm_response.data)) {
87 DEBUG(1, ("Password is > 14 chars in length, and is therefore incompatible with Lanman authentication\n"));
88 return NT_STATUS_ACCESS_DENIED;
89 }
90 } else if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) && passlen == 24) {
91 /* Encrypted mode needed, and encrypted password supplied. */
92 lm_response = data_blob(pass, passlen);
93 } else if (passlen > 0) {
94 /* Plaintext mode needed, assume plaintext supplied. */
95 passlen = clistr_push(cli, pword, pass, sizeof(pword), STR_TERMINATE);
96 lm_response = data_blob(pass, passlen);
97 }
98
99 /* send a session setup command */
100 memset(cli->outbuf,'\0',smb_size);
101 cli_set_message(cli->outbuf,10, 0, True);
102 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
103 cli_setup_packet(cli);
104
105 SCVAL(cli->outbuf,smb_vwv0,0xFF);
106 SSVAL(cli->outbuf,smb_vwv2,cli->max_xmit);
107 SSVAL(cli->outbuf,smb_vwv3,2);
108 SSVAL(cli->outbuf,smb_vwv4,1);
109 SIVAL(cli->outbuf,smb_vwv5,cli->sesskey);
110 SSVAL(cli->outbuf,smb_vwv7,lm_response.length);
111
112 p = smb_buf(cli->outbuf);
113 memcpy(p,lm_response.data,lm_response.length);
114 p += lm_response.length;
115 p += clistr_push(cli, p, user, -1, STR_TERMINATE|STR_UPPER);
116 p += clistr_push(cli, p, workgroup, -1, STR_TERMINATE|STR_UPPER);
117 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
118 p += clistr_push(cli, p, "Samba", -1, STR_TERMINATE);
119 cli_setup_bcc(cli, p);
120
121 if (!cli_send_smb(cli) || !cli_receive_smb(cli)) {
122 return cli_nt_error(cli);
123 }
124
125 show_msg(cli->inbuf);
126
127 if (cli_is_error(cli)) {
128 return cli_nt_error(cli);
129 }
130
131 /* use the returned vuid from now on */
132 cli->vuid = SVAL(cli->inbuf,smb_uid);
133 fstrcpy(cli->user_name, user);
134
135 if (session_key.data) {
136 /* Have plaintext orginal */
137 cli_set_session_key(cli, session_key);
138 }
139
140 return NT_STATUS_OK;
141 }
142
143 /****************************************************************************
144 Work out suitable capabilities to offer the server.
145 ****************************************************************************/
146
147 static uint32 cli_session_setup_capabilities(struct cli_state *cli)
148 {
149 uint32 capabilities = CAP_NT_SMBS;
150
151 if (!cli->force_dos_errors)
152 capabilities |= CAP_STATUS32;
153
154 if (cli->use_level_II_oplocks)
155 capabilities |= CAP_LEVEL_II_OPLOCKS;
156
157 capabilities |= (cli->capabilities & (CAP_UNICODE|CAP_LARGE_FILES|CAP_LARGE_READX|CAP_LARGE_WRITEX|CAP_DFS));
158 return capabilities;
159 }
160
161 /****************************************************************************
162 Do a NT1 guest session setup.
163 ****************************************************************************/
164
165 static NTSTATUS cli_session_setup_guest(struct cli_state *cli)
166 {
167 char *p;
168 uint32 capabilities = cli_session_setup_capabilities(cli);
169
170 memset(cli->outbuf, '\0', smb_size);
171 cli_set_message(cli->outbuf,13,0,True);
172 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
173 cli_setup_packet(cli);
174
175 SCVAL(cli->outbuf,smb_vwv0,0xFF);
176 SSVAL(cli->outbuf,smb_vwv2,CLI_BUFFER_SIZE);
177 SSVAL(cli->outbuf,smb_vwv3,2);
178 SSVAL(cli->outbuf,smb_vwv4,cli->pid);
179 SIVAL(cli->outbuf,smb_vwv5,cli->sesskey);
180 SSVAL(cli->outbuf,smb_vwv7,0);
181 SSVAL(cli->outbuf,smb_vwv8,0);
182 SIVAL(cli->outbuf,smb_vwv11,capabilities);
183 p = smb_buf(cli->outbuf);
184 p += clistr_push(cli, p, "", -1, STR_TERMINATE); /* username */
185 p += clistr_push(cli, p, "", -1, STR_TERMINATE); /* workgroup */
186 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
187 p += clistr_push(cli, p, "Samba", -1, STR_TERMINATE);
188 cli_setup_bcc(cli, p);
189
190 if (!cli_send_smb(cli) || !cli_receive_smb(cli)) {
191 return cli_nt_error(cli);
192 }
193
194 show_msg(cli->inbuf);
195
196 if (cli_is_error(cli)) {
197 return cli_nt_error(cli);
198 }
199
200 cli->vuid = SVAL(cli->inbuf,smb_uid);
201
202 p = smb_buf(cli->inbuf);
203 p += clistr_pull(cli, cli->server_os, p, sizeof(fstring), -1, STR_TERMINATE);
204 p += clistr_pull(cli, cli->server_type, p, sizeof(fstring), -1, STR_TERMINATE);
205 p += clistr_pull(cli, cli->server_domain, p, sizeof(fstring), -1, STR_TERMINATE);
206
207 if (strstr(cli->server_type, "Samba")) {
208 cli->is_samba = True;
209 }
210
211 fstrcpy(cli->user_name, "");
212
213 return NT_STATUS_OK;
214 }
215
216 /****************************************************************************
217 Do a NT1 plaintext session setup.
218 ****************************************************************************/
219
220 static NTSTATUS cli_session_setup_plaintext(struct cli_state *cli,
221 const char *user, const char *pass,
222 const char *workgroup)
223 {
224 uint32 capabilities = cli_session_setup_capabilities(cli);
225 char *p;
226 fstring lanman;
227
228 fstr_sprintf( lanman, "Samba %s", SAMBA_VERSION_STRING);
229
230 memset(cli->outbuf, '\0', smb_size);
231 cli_set_message(cli->outbuf,13,0,True);
232 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
233 cli_setup_packet(cli);
234
235 SCVAL(cli->outbuf,smb_vwv0,0xFF);
236 SSVAL(cli->outbuf,smb_vwv2,CLI_BUFFER_SIZE);
237 SSVAL(cli->outbuf,smb_vwv3,2);
238 SSVAL(cli->outbuf,smb_vwv4,cli->pid);
239 SIVAL(cli->outbuf,smb_vwv5,cli->sesskey);
240 SSVAL(cli->outbuf,smb_vwv8,0);
241 SIVAL(cli->outbuf,smb_vwv11,capabilities);
242 p = smb_buf(cli->outbuf);
243
244 /* check wether to send the ASCII or UNICODE version of the password */
245
246 if ( (capabilities & CAP_UNICODE) == 0 ) {
247 p += clistr_push(cli, p, pass, -1, STR_TERMINATE); /* password */
248 SSVAL(cli->outbuf,smb_vwv7,PTR_DIFF(p, smb_buf(cli->outbuf)));
249 }
250 else {
251 /* For ucs2 passwords clistr_push calls ucs2_align, which causes
252 * the space taken by the unicode password to be one byte too
253 * long (as we're on an odd byte boundary here). Reduce the
254 * count by 1 to cope with this. Fixes smbclient against NetApp
255 * servers which can't cope. Fix from
256 * bryan.kolodziej@allenlund.com in bug #3840.
257 */
258 p += clistr_push(cli, p, pass, -1, STR_UNICODE|STR_TERMINATE); /* unicode password */
259 SSVAL(cli->outbuf,smb_vwv8,PTR_DIFF(p, smb_buf(cli->outbuf))-1);
260 }
261
262 p += clistr_push(cli, p, user, -1, STR_TERMINATE); /* username */
263 p += clistr_push(cli, p, workgroup, -1, STR_TERMINATE); /* workgroup */
264 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
265 p += clistr_push(cli, p, lanman, -1, STR_TERMINATE);
266 cli_setup_bcc(cli, p);
267
268 if (!cli_send_smb(cli) || !cli_receive_smb(cli)) {
269 return cli_nt_error(cli);
270 }
271
272 show_msg(cli->inbuf);
273
274 if (cli_is_error(cli)) {
275 return cli_nt_error(cli);
276 }
277
278 cli->vuid = SVAL(cli->inbuf,smb_uid);
279 p = smb_buf(cli->inbuf);
280 p += clistr_pull(cli, cli->server_os, p, sizeof(fstring), -1, STR_TERMINATE);
281 p += clistr_pull(cli, cli->server_type, p, sizeof(fstring), -1, STR_TERMINATE);
282 p += clistr_pull(cli, cli->server_domain, p, sizeof(fstring), -1, STR_TERMINATE);
283 fstrcpy(cli->user_name, user);
284
285 if (strstr(cli->server_type, "Samba")) {
286 cli->is_samba = True;
287 }
288
289 return NT_STATUS_OK;
290 }
291
292 /****************************************************************************
293 do a NT1 NTLM/LM encrypted session setup - for when extended security
294 is not negotiated.
295 @param cli client state to create do session setup on
296 @param user username
297 @param pass *either* cleartext password (passlen !=24) or LM response.
298 @param ntpass NT response, implies ntpasslen >=24, implies pass is not clear
299 @param workgroup The user's domain.
300 ****************************************************************************/
301
302 static NTSTATUS cli_session_setup_nt1(struct cli_state *cli, const char *user,
303 const char *pass, size_t passlen,
304 const char *ntpass, size_t ntpasslen,
305 const char *workgroup)
306 {
307 uint32 capabilities = cli_session_setup_capabilities(cli);
308 DATA_BLOB lm_response = data_blob_null;
309 DATA_BLOB nt_response = data_blob_null;
310 DATA_BLOB session_key = data_blob_null;
311 NTSTATUS result;
312 char *p;
313
314 if (passlen == 0) {
315 /* do nothing - guest login */
316 } else if (passlen != 24) {
317 if (lp_client_ntlmv2_auth()) {
318 DATA_BLOB server_chal;
319 DATA_BLOB names_blob;
320 server_chal = data_blob(cli->secblob.data, MIN(cli->secblob.length, 8));
321
322 /* note that the 'workgroup' here is a best guess - we don't know
323 the server's domain at this point. The 'server name' is also
324 dodgy...
325 */
326 names_blob = NTLMv2_generate_names_blob(cli->called.name, workgroup);
327
328 if (!SMBNTLMv2encrypt(user, workgroup, pass, &server_chal,
329 &names_blob,
330 &lm_response, &nt_response, &session_key)) {
331 data_blob_free(&names_blob);
332 data_blob_free(&server_chal);
333 return NT_STATUS_ACCESS_DENIED;
334 }
335 data_blob_free(&names_blob);
336 data_blob_free(&server_chal);
337
338 } else {
339 uchar nt_hash[16];
340 E_md4hash(pass, nt_hash);
341
342 #ifdef LANMAN_ONLY
343 nt_response = data_blob_null;
344 #else
345 nt_response = data_blob(NULL, 24);
346 SMBNTencrypt(pass,cli->secblob.data,nt_response.data);
347 #endif
348 /* non encrypted password supplied. Ignore ntpass. */
349 if (lp_client_lanman_auth()) {
350 lm_response = data_blob(NULL, 24);
351 if (!SMBencrypt(pass,cli->secblob.data, lm_response.data)) {
352 /* Oops, the LM response is invalid, just put
353 the NT response there instead */
354 data_blob_free(&lm_response);
355 lm_response = data_blob(nt_response.data, nt_response.length);
356 }
357 } else {
358 /* LM disabled, place NT# in LM field instead */
359 lm_response = data_blob(nt_response.data, nt_response.length);
360 }
361
362 session_key = data_blob(NULL, 16);
363 #ifdef LANMAN_ONLY
364 E_deshash(pass, session_key.data);
365 memset(&session_key.data[8], '\0', 8);
366 #else
367 SMBsesskeygen_ntv1(nt_hash, NULL, session_key.data);
368 #endif
369 }
370 #ifdef LANMAN_ONLY
371 cli_simple_set_signing(cli, session_key, lm_response);
372 #else
373 cli_simple_set_signing(cli, session_key, nt_response);
374 #endif
375 } else {
376 /* pre-encrypted password supplied. Only used for
377 security=server, can't do
378 signing because we don't have original key */
379
380 lm_response = data_blob(pass, passlen);
381 nt_response = data_blob(ntpass, ntpasslen);
382 }
383
384 /* send a session setup command */
385 memset(cli->outbuf,'\0',smb_size);
386
387 cli_set_message(cli->outbuf,13,0,True);
388 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
389 cli_setup_packet(cli);
390
391 SCVAL(cli->outbuf,smb_vwv0,0xFF);
392 SSVAL(cli->outbuf,smb_vwv2,CLI_BUFFER_SIZE);
393 SSVAL(cli->outbuf,smb_vwv3,2);
394 SSVAL(cli->outbuf,smb_vwv4,cli->pid);
395 SIVAL(cli->outbuf,smb_vwv5,cli->sesskey);
396 SSVAL(cli->outbuf,smb_vwv7,lm_response.length);
397 SSVAL(cli->outbuf,smb_vwv8,nt_response.length);
398 SIVAL(cli->outbuf,smb_vwv11,capabilities);
399 p = smb_buf(cli->outbuf);
400 if (lm_response.length) {
401 memcpy(p,lm_response.data, lm_response.length); p += lm_response.length;
402 }
403 if (nt_response.length) {
404 memcpy(p,nt_response.data, nt_response.length); p += nt_response.length;
405 }
406 p += clistr_push(cli, p, user, -1, STR_TERMINATE);
407
408 /* Upper case here might help some NTLMv2 implementations */
409 p += clistr_push(cli, p, workgroup, -1, STR_TERMINATE|STR_UPPER);
410 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
411 p += clistr_push(cli, p, "Samba", -1, STR_TERMINATE);
412 cli_setup_bcc(cli, p);
413
414 if (!cli_send_smb(cli) || !cli_receive_smb(cli)) {
415 result = cli_nt_error(cli);
416 goto end;
417 }
418
419 /* show_msg(cli->inbuf); */
420
421 if (cli_is_error(cli)) {
422 result = cli_nt_error(cli);
423 goto end;
424 }
425
426 /* use the returned vuid from now on */
427 cli->vuid = SVAL(cli->inbuf,smb_uid);
428
429 p = smb_buf(cli->inbuf);
430 p += clistr_pull(cli, cli->server_os, p, sizeof(fstring), -1, STR_TERMINATE);
431 p += clistr_pull(cli, cli->server_type, p, sizeof(fstring), -1, STR_TERMINATE);
432 p += clistr_pull(cli, cli->server_domain, p, sizeof(fstring), -1, STR_TERMINATE);
433
434 if (strstr(cli->server_type, "Samba")) {
435 cli->is_samba = True;
436 }
437
438 fstrcpy(cli->user_name, user);
439
440 if (session_key.data) {
441 /* Have plaintext orginal */
442 cli_set_session_key(cli, session_key);
443 }
444
445 result = NT_STATUS_OK;
446 end:
447 data_blob_free(&lm_response);
448 data_blob_free(&nt_response);
449 data_blob_free(&session_key);
450 return result;
451 }
452
453 /****************************************************************************
454 Send a extended security session setup blob
455 ****************************************************************************/
456
457 static bool cli_session_setup_blob_send(struct cli_state *cli, DATA_BLOB blob)
458 {
459 uint32 capabilities = cli_session_setup_capabilities(cli);
460 char *p;
461
462 capabilities |= CAP_EXTENDED_SECURITY;
463
464 /* send a session setup command */
465 memset(cli->outbuf,'\0',smb_size);
466
467 cli_set_message(cli->outbuf,12,0,True);
468 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
469
470 cli_setup_packet(cli);
471
472 SCVAL(cli->outbuf,smb_vwv0,0xFF);
473 SSVAL(cli->outbuf,smb_vwv2,CLI_BUFFER_SIZE);
474 SSVAL(cli->outbuf,smb_vwv3,2);
475 SSVAL(cli->outbuf,smb_vwv4,1);
476 SIVAL(cli->outbuf,smb_vwv5,0);
477 SSVAL(cli->outbuf,smb_vwv7,blob.length);
478 SIVAL(cli->outbuf,smb_vwv10,capabilities);
479 p = smb_buf(cli->outbuf);
480 memcpy(p, blob.data, blob.length);
481 p += blob.length;
482 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
483 p += clistr_push(cli, p, "Samba", -1, STR_TERMINATE);
484 cli_setup_bcc(cli, p);
485 return cli_send_smb(cli);
486 }
487
488 /****************************************************************************
489 Send a extended security session setup blob, returning a reply blob.
490 ****************************************************************************/
491
492 static DATA_BLOB cli_session_setup_blob_receive(struct cli_state *cli)
493 {
494 DATA_BLOB blob2 = data_blob_null;
495 char *p;
496 size_t len;
497
498 if (!cli_receive_smb(cli))
499 return blob2;
500
501 show_msg(cli->inbuf);
502
503 if (cli_is_error(cli) && !NT_STATUS_EQUAL(cli_nt_error(cli),
504 NT_STATUS_MORE_PROCESSING_REQUIRED)) {
505 return blob2;
506 }
507
508 /* use the returned vuid from now on */
509 cli->vuid = SVAL(cli->inbuf,smb_uid);
510
511 p = smb_buf(cli->inbuf);
512
513 blob2 = data_blob(p, SVAL(cli->inbuf, smb_vwv3));
514
515 p += blob2.length;
516 p += clistr_pull(cli, cli->server_os, p, sizeof(fstring), -1, STR_TERMINATE);
517
518 /* w2k with kerberos doesn't properly null terminate this field */
519 len = smb_buflen(cli->inbuf) - PTR_DIFF(p, smb_buf(cli->inbuf));
520 p += clistr_pull(cli, cli->server_type, p, sizeof(fstring), len, 0);
521
522 return blob2;
523 }
524
525 #ifdef HAVE_KRB5
526 /****************************************************************************
527 Send a extended security session setup blob, returning a reply blob.
528 ****************************************************************************/
529
530 /* The following is calculated from :
531 * (smb_size-4) = 35
532 * (smb_wcnt * 2) = 24 (smb_wcnt == 12 in cli_session_setup_blob_send() )
533 * (strlen("Unix") + 1 + strlen("Samba") + 1) * 2 = 22 (unicode strings at
534 * end of packet.
535 */
536
537 #define BASE_SESSSETUP_BLOB_PACKET_SIZE (35 + 24 + 22)
538
539 static bool cli_session_setup_blob(struct cli_state *cli, DATA_BLOB blob, DATA_BLOB session_key_krb5)
540 {
541 int32 remaining = blob.length;
542 int32 cur = 0;
543 DATA_BLOB send_blob = data_blob_null;
544 int32 max_blob_size = 0;
545 DATA_BLOB receive_blob = data_blob_null;
546
547 if (cli->max_xmit < BASE_SESSSETUP_BLOB_PACKET_SIZE + 1) {
548 DEBUG(0,("cli_session_setup_blob: cli->max_xmit too small "
549 "(was %u, need minimum %u)\n",
550 (unsigned int)cli->max_xmit,
551 BASE_SESSSETUP_BLOB_PACKET_SIZE));
552 cli_set_nt_error(cli, NT_STATUS_INVALID_PARAMETER);
553 return False;
554 }
555
556 max_blob_size = cli->max_xmit - BASE_SESSSETUP_BLOB_PACKET_SIZE;
557
558 while ( remaining > 0) {
559 if (remaining >= max_blob_size) {
560 send_blob.length = max_blob_size;
561 remaining -= max_blob_size;
562 } else {
563 DATA_BLOB null_blob = data_blob_null;
564
565 send_blob.length = remaining;
566 remaining = 0;
567
568 /* This is the last packet in the sequence - turn signing on. */
569 cli_simple_set_signing(cli, session_key_krb5, null_blob);
570 }
571
572 send_blob.data = &blob.data[cur];
573 cur += send_blob.length;
574
575 DEBUG(10, ("cli_session_setup_blob: Remaining (%u) sending (%u) current (%u)\n",
576 (unsigned int)remaining,
577 (unsigned int)send_blob.length,
578 (unsigned int)cur ));
579
580 if (!cli_session_setup_blob_send(cli, send_blob)) {
581 DEBUG(0, ("cli_session_setup_blob: send failed\n"));
582 return False;
583 }
584
585 receive_blob = cli_session_setup_blob_receive(cli);
586 data_blob_free(&receive_blob);
587
588 if (cli_is_error(cli) &&
589 !NT_STATUS_EQUAL( cli_get_nt_error(cli),
590 NT_STATUS_MORE_PROCESSING_REQUIRED)) {
591 DEBUG(0, ("cli_session_setup_blob: receive failed "
592 "(%s)\n", nt_errstr(cli_get_nt_error(cli))));
593 cli->vuid = 0;
594 return False;
595 }
596 }
597
598 return True;
599 }
600
601 /****************************************************************************
602 Use in-memory credentials cache
603 ****************************************************************************/
604
605 static void use_in_memory_ccache(void) {
606 setenv(KRB5_ENV_CCNAME, "MEMORY:cliconnect", 1);
607 }
608
609 /****************************************************************************
610 Do a spnego/kerberos encrypted session setup.
611 ****************************************************************************/
612
613 static ADS_STATUS cli_session_setup_kerberos(struct cli_state *cli, const char *principal, const char *workgroup)
614 {
615 DATA_BLOB negTokenTarg;
616 DATA_BLOB session_key_krb5;
617 int rc;
618
619 DEBUG(2,("Doing kerberos session setup\n"));
620
621 /* generate the encapsulated kerberos5 ticket */
622 rc = spnego_gen_negTokenTarg(principal, 0, &negTokenTarg, &session_key_krb5, 0, NULL);
623
624 if (rc) {
625 DEBUG(1, ("cli_session_setup_kerberos: spnego_gen_negTokenTarg failed: %s\n",
626 error_message(rc)));
627 return ADS_ERROR_KRB5(rc);
628 }
629
630 #if 0
631 file_save("negTokenTarg.dat", negTokenTarg.data, negTokenTarg.length);
632 #endif
633
634 if (!cli_session_setup_blob(cli, negTokenTarg, session_key_krb5)) {
635 data_blob_free(&negTokenTarg);
636 data_blob_free(&session_key_krb5);
637 return ADS_ERROR_NT(cli_nt_error(cli));
638 }
639
640 cli_set_session_key(cli, session_key_krb5);
641
642 data_blob_free(&negTokenTarg);
643 data_blob_free(&session_key_krb5);
644
645 if (cli_is_error(cli)) {
646 if (NT_STATUS_IS_OK(cli_nt_error(cli))) {
647 return ADS_ERROR_NT(NT_STATUS_UNSUCCESSFUL);
648 }
649 }
650 return ADS_ERROR_NT(cli_nt_error(cli));
651 }
652 #endif /* HAVE_KRB5 */
653
654
655 /****************************************************************************
656 Do a spnego/NTLMSSP encrypted session setup.
657 ****************************************************************************/
658
659 static NTSTATUS cli_session_setup_ntlmssp(struct cli_state *cli, const char *user,
660 const char *pass, const char *domain)
661 {
662 struct ntlmssp_state *ntlmssp_state;
663 NTSTATUS nt_status;
664 int turn = 1;
665 DATA_BLOB msg1;
666 DATA_BLOB blob = data_blob_null;
667 DATA_BLOB blob_in = data_blob_null;
668 DATA_BLOB blob_out = data_blob_null;
669
670 cli_temp_set_signing(cli);
671
672 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_client_start(&ntlmssp_state))) {
673 return nt_status;
674 }
675 ntlmssp_want_feature(ntlmssp_state, NTLMSSP_FEATURE_SESSION_KEY);
676
677 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_set_username(ntlmssp_state, user))) {
678 return nt_status;
679 }
680 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_set_domain(ntlmssp_state, domain))) {
681 return nt_status;
682 }
683 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_set_password(ntlmssp_state, pass))) {
684 return nt_status;
685 }
686
687 do {
688 nt_status = ntlmssp_update(ntlmssp_state,
689 blob_in, &blob_out);
690 data_blob_free(&blob_in);
691 if (NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED) || NT_STATUS_IS_OK(nt_status)) {
692 if (turn == 1) {
693 /* and wrap it in a SPNEGO wrapper */
694 msg1 = gen_negTokenInit(OID_NTLMSSP, blob_out);
695 } else {
696 /* wrap it in SPNEGO */
697 msg1 = spnego_gen_auth(blob_out);
698 }
699
700 /* now send that blob on its way */
701 if (!cli_session_setup_blob_send(cli, msg1)) {
702 DEBUG(3, ("Failed to send NTLMSSP/SPNEGO blob to server!\n"));
703 nt_status = NT_STATUS_UNSUCCESSFUL;
704 } else {
705 blob = cli_session_setup_blob_receive(cli);
706
707 nt_status = cli_nt_error(cli);
708 if (cli_is_error(cli) && NT_STATUS_IS_OK(nt_status)) {
709 if (cli->smb_rw_error == SMB_READ_BAD_SIG) {
710 nt_status = NT_STATUS_ACCESS_DENIED;
711 } else {
712 nt_status = NT_STATUS_UNSUCCESSFUL;
713 }
714 }
715 }
716 data_blob_free(&msg1);
717 }
718
719 if (!blob.length) {
720 if (NT_STATUS_IS_OK(nt_status)) {
721 nt_status = NT_STATUS_UNSUCCESSFUL;
722 }
723 } else if ((turn == 1) &&
724 NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED)) {
725 DATA_BLOB tmp_blob = data_blob_null;
726 /* the server might give us back two challenges */
727 if (!spnego_parse_challenge(blob, &blob_in,
728 &tmp_blob)) {
729 DEBUG(3,("Failed to parse challenges\n"));
730 nt_status = NT_STATUS_INVALID_PARAMETER;
731 }
732 data_blob_free(&tmp_blob);
733 } else {
734 if (!spnego_parse_auth_response(blob, nt_status, OID_NTLMSSP,
735 &blob_in)) {
736 DEBUG(3,("Failed to parse auth response\n"));
737 if (NT_STATUS_IS_OK(nt_status)
738 || NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED))
739 nt_status = NT_STATUS_INVALID_PARAMETER;
740 }
741 }
742 data_blob_free(&blob);
743 data_blob_free(&blob_out);
744 turn++;
745 } while (NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED));
746
747 data_blob_free(&blob_in);
748
749 if (NT_STATUS_IS_OK(nt_status)) {
750
751 DATA_BLOB key = data_blob(ntlmssp_state->session_key.data,
752 ntlmssp_state->session_key.length);
753 DATA_BLOB null_blob = data_blob_null;
754 bool res;
755
756 fstrcpy(cli->server_domain, ntlmssp_state->server_domain);
757 cli_set_session_key(cli, ntlmssp_state->session_key);
758
759 res = cli_simple_set_signing(cli, key, null_blob);
760
761 data_blob_free(&key);
762
763 if (res) {
764
765 /* 'resign' the last message, so we get the right sequence numbers
766 for checking the first reply from the server */
767 cli_calculate_sign_mac(cli, cli->outbuf);
768
769 if (!cli_check_sign_mac(cli, cli->inbuf)) {
770 nt_status = NT_STATUS_ACCESS_DENIED;
771 }
772 }
773 }
774
775 /* we have a reference conter on ntlmssp_state, if we are signing
776 then the state will be kept by the signing engine */
777
778 ntlmssp_end(&ntlmssp_state);
779
780 if (!NT_STATUS_IS_OK(nt_status)) {
781 cli->vuid = 0;
782 }
783 return nt_status;
784 }
785
786 /****************************************************************************
787 Do a spnego encrypted session setup.
788
789 user_domain: The shortname of the domain the user/machine is a member of.
790 dest_realm: The realm we're connecting to, if NULL we use our default realm.
791 ****************************************************************************/
792
793 ADS_STATUS cli_session_setup_spnego(struct cli_state *cli, const char *user,
794 const char *pass, const char *user_domain,
795 const char * dest_realm)
796 {
797 char *principal = NULL;
798 char *OIDs[ASN1_MAX_OIDS];
799 int i;
800 bool got_kerberos_mechanism = False;
801 DATA_BLOB blob;
802 const char *p = NULL;
803 char *account = NULL;
804
805 DEBUG(3,("Doing spnego session setup (blob length=%lu)\n", (unsigned long)cli->secblob.length));
806
807 /* the server might not even do spnego */
808 if (cli->secblob.length <= 16) {
809 DEBUG(3,("server didn't supply a full spnego negprot\n"));
810 goto ntlmssp;
811 }
812
813 #if 0
814 file_save("negprot.dat", cli->secblob.data, cli->secblob.length);
815 #endif
816
817 /* there is 16 bytes of GUID before the real spnego packet starts */
818 blob = data_blob(cli->secblob.data+16, cli->secblob.length-16);
819
820 /* The server sent us the first part of the SPNEGO exchange in the
821 * negprot reply. It is WRONG to depend on the principal sent in the
822 * negprot reply, but right now we do it. If we don't receive one,
823 * we try to best guess, then fall back to NTLM. */
824 if (!spnego_parse_negTokenInit(blob, OIDs, &principal)) {
825 data_blob_free(&blob);
826 return ADS_ERROR_NT(NT_STATUS_INVALID_PARAMETER);
827 }
828 data_blob_free(&blob);
829
830 /* make sure the server understands kerberos */
831 for (i=0;OIDs[i];i++) {
832 DEBUG(3,("got OID=%s\n", OIDs[i]));
833 if (strcmp(OIDs[i], OID_KERBEROS5_OLD) == 0 ||
834 strcmp(OIDs[i], OID_KERBEROS5) == 0) {
835 got_kerberos_mechanism = True;
836 }
837 free(OIDs[i]);
838 }
839
840 DEBUG(3,("got principal=%s\n", principal ? principal : "<null>"));
841
842 fstrcpy(cli->user_name, user);
843
844 #ifdef HAVE_KRB5
845 /* If password is set we reauthenticate to kerberos server
846 * and do not store results */
847
848 if (got_kerberos_mechanism && cli->use_kerberos) {
849 ADS_STATUS rc;
850
851 if (pass && *pass) {
852 int ret;
853
854 use_in_memory_ccache();
855 ret = kerberos_kinit_password(user, pass, 0 /* no time correction for now */, NULL);
856
857 if (ret){
858 SAFE_FREE(principal);
859 DEBUG(0, ("Kinit failed: %s\n", error_message(ret)));
860 if (cli->fallback_after_kerberos)
861 goto ntlmssp;
862 return ADS_ERROR_KRB5(ret);
863 }
864 }
865
866 /* If we get a bad principal, try to guess it if
867 we have a valid host NetBIOS name.
868 */
869 if (strequal(principal, ADS_IGNORE_PRINCIPAL)) {
870 SAFE_FREE(principal);
871 }
872
873 if (principal == NULL &&
874 !is_ipaddress(cli->desthost) &&
875 !strequal(star_smbserver_name,
876 cli->desthost)) {
877 char *realm = NULL;
878 char *machine = NULL;
879 char *host = NULL;
880 DEBUG(3,("cli_session_setup_spnego: got a "
881 "bad server principal, trying to guess ...\n"));
882
883 host = strchr_m(cli->desthost, '.');
884 if (host) {
885 machine = SMB_STRNDUP(cli->desthost,
886 host - cli->desthost);
887 } else {
888 machine = SMB_STRDUP(cli->desthost);
889 }
890 if (machine == NULL) {
891 return ADS_ERROR_NT(NT_STATUS_NO_MEMORY);
892 }
893
894 if (dest_realm) {
895 realm = SMB_STRDUP(dest_realm);
896 strupper_m(realm);
897 } else {
898 realm = kerberos_get_default_realm_from_ccache();
899 }
900 if (realm && *realm) {
901 if (asprintf(&principal, "%s$@%s",
902 machine, realm) < 0) {
903 SAFE_FREE(machine);
904 SAFE_FREE(realm);
905 return ADS_ERROR_NT(NT_STATUS_NO_MEMORY);
906 }
907 DEBUG(3,("cli_session_setup_spnego: guessed "
908 "server principal=%s\n",
909 principal ? principal : "<null>"));
910 }
911 SAFE_FREE(machine);
912 SAFE_FREE(realm);
913 }
914
915 if (principal) {
916 rc = cli_session_setup_kerberos(cli, principal,
917 dest_realm);
918 if (ADS_ERR_OK(rc) || !cli->fallback_after_kerberos) {
919 SAFE_FREE(principal);
920 return rc;
921 }
922 }
923 }
924 #endif
925
926 SAFE_FREE(principal);
927
928 ntlmssp:
929
930 account = talloc_strdup(talloc_tos(), user);
931 if (!account) {
932 return ADS_ERROR_NT(NT_STATUS_NO_MEMORY);
933 }
934
935 /* when falling back to ntlmssp while authenticating with a machine
936 * account strip off the realm - gd */
937
938 if ((p = strchr_m(user, '@')) != NULL) {
939 account[PTR_DIFF(p,user)] = '\0';
940 }
941
942 return ADS_ERROR_NT(cli_session_setup_ntlmssp(cli, account, pass, user_domain));
943 }
944
945 /****************************************************************************
946 Send a session setup. The username and workgroup is in UNIX character
947 format and must be converted to DOS codepage format before sending. If the
948 password is in plaintext, the same should be done.
949 ****************************************************************************/
950
951 NTSTATUS cli_session_setup(struct cli_state *cli,
952 const char *user,
953 const char *pass, int passlen,
954 const char *ntpass, int ntpasslen,
955 const char *workgroup)
956 {
957 char *p;
958 fstring user2;
959
960 if (user) {
961 fstrcpy(user2, user);
962 } else {
963 user2[0] ='\0';
964 }
965
966 if (!workgroup) {
967 workgroup = "";
968 }
969
970 /* allow for workgroups as part of the username */
971 if ((p=strchr_m(user2,'\\')) || (p=strchr_m(user2,'/')) ||
972 (p=strchr_m(user2,*lp_winbind_separator()))) {
973 *p = 0;
974 user = p+1;
975 workgroup = user2;
976 }
977
978 if (cli->protocol < PROTOCOL_LANMAN1) {
979 return NT_STATUS_OK;
980 }
981
982 /* now work out what sort of session setup we are going to
983 do. I have split this into separate functions to make the
984 flow a bit easier to understand (tridge) */
985
986 /* if its an older server then we have to use the older request format */
987
988 if (cli->protocol < PROTOCOL_NT1) {
989 if (!lp_client_lanman_auth() && passlen != 24 && (*pass)) {
990 DEBUG(1, ("Server requested LM password but 'client lanman auth'"
991 " is disabled\n"));
992 return NT_STATUS_ACCESS_DENIED;
993 }
994
995 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) == 0 &&
996 !lp_client_plaintext_auth() && (*pass)) {
997 DEBUG(1, ("Server requested plaintext password but "
998 "'client plaintext auth' is disabled\n"));
999 return NT_STATUS_ACCESS_DENIED;
1000 }
1001
1002 return cli_session_setup_lanman2(cli, user, pass, passlen,
1003 workgroup);
1004 }
1005
1006 /* if no user is supplied then we have to do an anonymous connection.
1007 passwords are ignored */
1008
1009 if (!user || !*user)
1010 return cli_session_setup_guest(cli);
1011
1012 /* if the server is share level then send a plaintext null
1013 password at this point. The password is sent in the tree
1014 connect */
1015
1016 if ((cli->sec_mode & NEGOTIATE_SECURITY_USER_LEVEL) == 0)
1017 return cli_session_setup_plaintext(cli, user, "", workgroup);
1018
1019 /* if the server doesn't support encryption then we have to use
1020 plaintext. The second password is ignored */
1021
1022 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) == 0) {
1023 if (!lp_client_plaintext_auth() && (*pass)) {
1024 DEBUG(1, ("Server requested plaintext password but "
1025 "'client plaintext auth' is disabled\n"));
1026 return NT_STATUS_ACCESS_DENIED;
1027 }
1028 return cli_session_setup_plaintext(cli, user, pass, workgroup);
1029 }
1030
1031 /* if the server supports extended security then use SPNEGO */
1032
1033 if (cli->capabilities & CAP_EXTENDED_SECURITY) {
1034 ADS_STATUS status = cli_session_setup_spnego(cli, user, pass,
1035 workgroup, NULL);
1036 if (!ADS_ERR_OK(status)) {
1037 DEBUG(3, ("SPNEGO login failed: %s\n", ads_errstr(status)));
1038 return ads_ntstatus(status);
1039 }
1040 } else {
1041 NTSTATUS status;
1042
1043 /* otherwise do a NT1 style session setup */
1044 status = cli_session_setup_nt1(cli, user, pass, passlen,
1045 ntpass, ntpasslen, workgroup);
1046 if (!NT_STATUS_IS_OK(status)) {
1047 DEBUG(3,("cli_session_setup: NT1 session setup "
1048 "failed: %s\n", nt_errstr(status)));
1049 return status;
1050 }
1051 }
1052
1053 if (strstr(cli->server_type, "Samba")) {
1054 cli->is_samba = True;
1055 }
1056
1057 return NT_STATUS_OK;
1058 }
1059
1060 /****************************************************************************
1061 Send a uloggoff.
1062 *****************************************************************************/
1063
1064 bool cli_ulogoff(struct cli_state *cli)
1065 {
1066 memset(cli->outbuf,'\0',smb_size);
1067 cli_set_message(cli->outbuf,2,0,True);
1068 SCVAL(cli->outbuf,smb_com,SMBulogoffX);
1069 cli_setup_packet(cli);
1070 SSVAL(cli->outbuf,smb_vwv0,0xFF);
1071 SSVAL(cli->outbuf,smb_vwv2,0); /* no additional info */
1072
1073 cli_send_smb(cli);
1074 if (!cli_receive_smb(cli))
1075 return False;
1076
1077 if (cli_is_error(cli)) {
1078 return False;
1079 }
1080
1081 cli->cnum = -1;
1082 return True;
1083 }
1084
1085 /****************************************************************************
1086 Send a tconX.
1087 ****************************************************************************/
1088
1089 bool cli_send_tconX(struct cli_state *cli,
1090 const char *share, const char *dev, const char *pass, int passlen)
1091 {
1092 fstring fullshare, pword;
1093 char *p;
1094 memset(cli->outbuf,'\0',smb_size);
1095 memset(cli->inbuf,'\0',smb_size);
1096
1097 fstrcpy(cli->share, share);
1098
1099 /* in user level security don't send a password now */
1100 if (cli->sec_mode & NEGOTIATE_SECURITY_USER_LEVEL) {
1101 passlen = 1;
1102 pass = "";
1103 } else if (!pass) {
1104 DEBUG(1, ("Server not using user level security and no password supplied.\n"));
1105 return False;
1106 }
1107
1108 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) &&
1109 *pass && passlen != 24) {
1110 if (!lp_client_lanman_auth()) {
1111 DEBUG(1, ("Server requested LANMAN password "
1112 "(share-level security) but "
1113 "'client lanman auth' is disabled\n"));
1114 return False;
1115 }
1116
1117 /*
1118 * Non-encrypted passwords - convert to DOS codepage before encryption.
1119 */
1120 passlen = 24;
1121 SMBencrypt(pass,cli->secblob.data,(uchar *)pword);
1122 } else {
1123 if((cli->sec_mode & (NEGOTIATE_SECURITY_USER_LEVEL|NEGOTIATE_SECURITY_CHALLENGE_RESPONSE)) == 0) {
1124 if (!lp_client_plaintext_auth() && (*pass)) {
1125 DEBUG(1, ("Server requested plaintext "
1126 "password but 'client plaintext "
1127 "auth' is disabled\n"));
1128 return False;
1129 }
1130
1131 /*
1132 * Non-encrypted passwords - convert to DOS codepage before using.
1133 */
1134 passlen = clistr_push(cli, pword, pass, sizeof(pword), STR_TERMINATE);
1135
1136 } else {
1137 if (passlen) {
1138 memcpy(pword, pass, passlen);
1139 }
1140 }
1141 }
1142
1143 slprintf(fullshare, sizeof(fullshare)-1,
1144 "\\\\%s\\%s", cli->desthost, share);
1145
1146 cli_set_message(cli->outbuf,4, 0, True);
1147 SCVAL(cli->outbuf,smb_com,SMBtconX);
1148 cli_setup_packet(cli);
1149
1150 SSVAL(cli->outbuf,smb_vwv0,0xFF);
1151 SSVAL(cli->outbuf,smb_vwv2,TCONX_FLAG_EXTENDED_RESPONSE);
1152 SSVAL(cli->outbuf,smb_vwv3,passlen);
1153
1154 p = smb_buf(cli->outbuf);
1155 if (passlen) {
1156 memcpy(p,pword,passlen);
1157 }
1158 p += passlen;
1159 p += clistr_push(cli, p, fullshare, -1, STR_TERMINATE |STR_UPPER);
1160 p += clistr_push(cli, p, dev, -1, STR_TERMINATE |STR_UPPER | STR_ASCII);
1161
1162 cli_setup_bcc(cli, p);
1163
1164 cli_send_smb(cli);
1165 if (!cli_receive_smb(cli))
1166 return False;
1167
1168 if (cli_is_error(cli))
1169 return False;
1170
1171 clistr_pull(cli, cli->dev, smb_buf(cli->inbuf), sizeof(fstring), -1, STR_TERMINATE|STR_ASCII);
1172
1173 if (cli->protocol >= PROTOCOL_NT1 &&
1174 smb_buflen(cli->inbuf) == 3) {
1175 /* almost certainly win95 - enable bug fixes */
1176 cli->win95 = True;
1177 }
1178
1179 /* Make sure that we have the optional support 16-bit field. WCT > 2 */
1180 /* Avoids issues when connecting to Win9x boxes sharing files */
1181
1182 cli->dfsroot = False;
1183 if ( (CVAL(cli->inbuf, smb_wct))>2 && cli->protocol >= PROTOCOL_LANMAN2 )
1184 cli->dfsroot = (SVAL( cli->inbuf, smb_vwv2 ) & SMB_SHARE_IN_DFS) ? True : False;
1185
1186 cli->cnum = SVAL(cli->inbuf,smb_tid);
1187 return True;
1188 }
1189
1190 /****************************************************************************
1191 Send a tree disconnect.
1192 ****************************************************************************/
1193
1194 bool cli_tdis(struct cli_state *cli)
1195 {
1196 memset(cli->outbuf,'\0',smb_size);
1197 cli_set_message(cli->outbuf,0,0,True);
1198 SCVAL(cli->outbuf,smb_com,SMBtdis);
1199 SSVAL(cli->outbuf,smb_tid,cli->cnum);
1200 cli_setup_packet(cli);
1201
1202 cli_send_smb(cli);
1203 if (!cli_receive_smb(cli))
1204 return False;
1205
1206 if (cli_is_error(cli)) {
1207 return False;
1208 }
1209
1210 cli->cnum = -1;
1211 return True;
1212 }
1213
1214 /****************************************************************************
1215 Send a negprot command.
1216 ****************************************************************************/
1217
1218 void cli_negprot_send(struct cli_state *cli)
1219 {
1220 char *p;
1221 int numprots;
1222
1223 if (cli->protocol < PROTOCOL_NT1)
1224 cli->use_spnego = False;
1225
1226 memset(cli->outbuf,'\0',smb_size);
1227
1228 /* setup the protocol strings */
1229 cli_set_message(cli->outbuf,0,0,True);
1230
1231 p = smb_buf(cli->outbuf);
1232 for (numprots=0;
1233 prots[numprots].name && prots[numprots].prot<=cli->protocol;
1234 numprots++) {
1235 *p++ = 2;
1236 p += clistr_push(cli, p, prots[numprots].name, -1, STR_TERMINATE);
1237 }
1238
1239 SCVAL(cli->outbuf,smb_com,SMBnegprot);
1240 cli_setup_bcc(cli, p);
1241 cli_setup_packet(cli);
1242
1243 SCVAL(smb_buf(cli->outbuf),0,2);
1244
1245 cli_send_smb(cli);
1246 }
1247
1248 /****************************************************************************
1249 Send a negprot command.
1250 ****************************************************************************/
1251
1252 bool cli_negprot(struct cli_state *cli)
1253 {
1254 char *p;
1255 int numprots;
1256 int plength;
1257
1258 if (cli->protocol < PROTOCOL_NT1)
1259 cli->use_spnego = False;
1260
1261 memset(cli->outbuf,'\0',smb_size);
1262
1263 /* setup the protocol strings */
1264 for (plength=0,numprots=0;
1265 prots[numprots].name && prots[numprots].prot<=cli->protocol;
1266 numprots++)
1267 plength += strlen(prots[numprots].name)+2;
1268
1269 cli_set_message(cli->outbuf,0,plength,True);
1270
1271 p = smb_buf(cli->outbuf);
1272 for (numprots=0;
1273 prots[numprots].name && prots[numprots].prot<=cli->protocol;
1274 numprots++) {
1275 *p++ = 2;
1276 p += clistr_push(cli, p, prots[numprots].name, -1, STR_TERMINATE);
1277 }
1278
1279 SCVAL(cli->outbuf,smb_com,SMBnegprot);
1280 cli_setup_packet(cli);
1281
1282 SCVAL(smb_buf(cli->outbuf),0,2);
1283
1284 cli_send_smb(cli);
1285 if (!cli_receive_smb(cli))
1286 return False;
1287
1288 show_msg(cli->inbuf);
1289
1290 if (cli_is_error(cli) ||
1291 ((int)SVAL(cli->inbuf,smb_vwv0) >= numprots)) {
1292 return(False);
1293 }
1294
1295 cli->protocol = prots[SVAL(cli->inbuf,smb_vwv0)].prot;
1296
1297 if ((cli->protocol < PROTOCOL_NT1) && cli->sign_info.mandatory_signing) {
1298 DEBUG(0,("cli_negprot: SMB signing is mandatory and the selected protocol level doesn't support it.\n"));
1299 return False;
1300 }
1301
1302 if (cli->protocol >= PROTOCOL_NT1) {
1303 struct timespec ts;
1304 /* NT protocol */
1305 cli->sec_mode = CVAL(cli->inbuf,smb_vwv1);
1306 cli->max_mux = SVAL(cli->inbuf, smb_vwv1+1);
1307 cli->max_xmit = IVAL(cli->inbuf,smb_vwv3+1);
1308 cli->sesskey = IVAL(cli->inbuf,smb_vwv7+1);
1309 cli->serverzone = SVALS(cli->inbuf,smb_vwv15+1);
1310 cli->serverzone *= 60;
1311 /* this time arrives in real GMT */
1312 ts = interpret_long_date(cli->inbuf+smb_vwv11+1);
1313 cli->servertime = ts.tv_sec;
1314 cli->secblob = data_blob(smb_buf(cli->inbuf),smb_buflen(cli->inbuf));
1315 cli->capabilities = IVAL(cli->inbuf,smb_vwv9+1);
1316 if (cli->capabilities & CAP_RAW_MODE) {
1317 cli->readbraw_supported = True;
1318 cli->writebraw_supported = True;
1319 }
1320 /* work out if they sent us a workgroup */
1321 if (!(cli->capabilities & CAP_EXTENDED_SECURITY) &&
1322 smb_buflen(cli->inbuf) > 8) {
1323 clistr_pull(cli, cli->server_domain,
1324 smb_buf(cli->inbuf)+8, sizeof(cli->server_domain),
1325 smb_buflen(cli->inbuf)-8, STR_UNICODE|STR_NOALIGN);
1326 }
1327
1328 /*
1329 * As signing is slow we only turn it on if either the client or
1330 * the server require it. JRA.
1331 */
1332
1333 if (cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_REQUIRED) {
1334 /* Fail if server says signing is mandatory and we don't want to support it. */
1335 if (!cli->sign_info.allow_smb_signing) {
1336 DEBUG(0,("cli_negprot: SMB signing is mandatory and we have disabled it.\n"));
1337 return False;
1338 }
1339 cli->sign_info.negotiated_smb_signing = True;
1340 cli->sign_info.mandatory_signing = True;
1341 } else if (cli->sign_info.mandatory_signing && cli->sign_info.allow_smb_signing) {
1342 /* Fail if client says signing is mandatory and the server doesn't support it. */
1343 if (!(cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_ENABLED)) {
1344 DEBUG(1,("cli_negprot: SMB signing is mandatory and the server doesn't support it.\n"));
1345 return False;
1346 }
1347 cli->sign_info.negotiated_smb_signing = True;
1348 cli->sign_info.mandatory_signing = True;
1349 } else if (cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_ENABLED) {
1350 cli->sign_info.negotiated_smb_signing = True;
1351 }
1352
1353 if (cli->capabilities & (CAP_LARGE_READX|CAP_LARGE_WRITEX)) {
1354 SAFE_FREE(cli->outbuf);
1355 SAFE_FREE(cli->inbuf);
1356 cli->outbuf = (char *)SMB_MALLOC(CLI_SAMBA_MAX_LARGE_READX_SIZE+SAFETY_MARGIN);
1357 cli->inbuf = (char *)SMB_MALLOC(CLI_SAMBA_MAX_LARGE_READX_SIZE+SAFETY_MARGIN);
1358 cli->bufsize = CLI_SAMBA_MAX_LARGE_READX_SIZE;
1359 }
1360
1361 } else if (cli->protocol >= PROTOCOL_LANMAN1) {
1362 cli->use_spnego = False;
1363 cli->sec_mode = SVAL(cli->inbuf,smb_vwv1);
1364 cli->max_xmit = SVAL(cli->inbuf,smb_vwv2);
1365 cli->max_mux = SVAL(cli->inbuf, smb_vwv3);
1366 cli->sesskey = IVAL(cli->inbuf,smb_vwv6);
1367 cli->serverzone = SVALS(cli->inbuf,smb_vwv10);
1368 cli->serverzone *= 60;
1369 /* this time is converted to GMT by make_unix_date */
1370 cli->servertime = cli_make_unix_date(cli,cli->inbuf+smb_vwv8);
1371 cli->readbraw_supported = ((SVAL(cli->inbuf,smb_vwv5) & 0x1) != 0);
1372 cli->writebraw_supported = ((SVAL(cli->inbuf,smb_vwv5) & 0x2) != 0);
1373 cli->secblob = data_blob(smb_buf(cli->inbuf),smb_buflen(cli->inbuf));
1374 } else {
1375 /* the old core protocol */
1376 cli->use_spnego = False;
1377 cli->sec_mode = 0;
1378 cli->serverzone = get_time_zone(time(NULL));
1379 }
1380
1381 cli->max_xmit = MIN(cli->max_xmit, CLI_BUFFER_SIZE);
1382
1383 /* a way to force ascii SMB */
1384 if (getenv("CLI_FORCE_ASCII"))
1385 cli->capabilities &= ~CAP_UNICODE;
1386
1387 return True;
1388 }
1389
1390 /****************************************************************************
1391 Send a session request. See rfc1002.txt 4.3 and 4.3.2.
1392 ****************************************************************************/
1393
1394 bool cli_session_request(struct cli_state *cli,
1395 struct nmb_name *calling, struct nmb_name *called)
1396 {
1397 char *p;
1398 int len = 4;
1399
1400 memcpy(&(cli->calling), calling, sizeof(*calling));
1401 memcpy(&(cli->called ), called , sizeof(*called ));
1402
1403 /* put in the destination name */
1404 p = cli->outbuf+len;
1405 name_mangle(cli->called .name, p, cli->called .name_type);
1406 len += name_len(p);
1407
1408 /* and my name */
1409 p = cli->outbuf+len;
1410 name_mangle(cli->calling.name, p, cli->calling.name_type);
1411 len += name_len(p);
1412
1413 /* 445 doesn't have session request */
1414 if (cli->port == 445)
1415 return True;
1416
1417 /* send a session request (RFC 1002) */
1418 /* setup the packet length
1419 * Remove four bytes from the length count, since the length
1420 * field in the NBT Session Service header counts the number
1421 * of bytes which follow. The cli_send_smb() function knows
1422 * about this and accounts for those four bytes.
1423 * CRH.
1424 */
1425 len -= 4;
1426 _smb_setlen(cli->outbuf,len);
1427 SCVAL(cli->outbuf,0,0x81);
1428
1429 cli_send_smb(cli);
1430 DEBUG(5,("Sent session request\n"));
1431
1432 if (!cli_receive_smb(cli))
1433 return False;
1434
1435 if (CVAL(cli->inbuf,0) == 0x84) {
1436 /* C. Hoch 9/14/95 Start */
1437 /* For information, here is the response structure.
1438 * We do the byte-twiddling to for portability.
1439 struct RetargetResponse{
1440 unsigned char type;
1441 unsigned char flags;
1442 int16 length;
1443 int32 ip_addr;
1444 int16 port;
1445 };
1446 */
1447 uint16_t port = (CVAL(cli->inbuf,8)<<8)+CVAL(cli->inbuf,9);
1448 struct in_addr dest_ip;
1449
1450 /* SESSION RETARGET */
1451 putip((char *)&dest_ip,cli->inbuf+4);
1452 in_addr_to_sockaddr_storage(&cli->dest_ss, dest_ip);
1453
1454 cli->fd = open_socket_out(SOCK_STREAM,
1455 &cli->dest_ss,
1456 port,
1457 LONG_CONNECT_TIMEOUT);
1458 if (cli->fd == -1)
1459 return False;
1460
1461 DEBUG(3,("Retargeted\n"));
1462
1463 set_socket_options(cli->fd, lp_socket_options());
1464
1465 /* Try again */
1466 {
1467 static int depth;
1468 bool ret;
1469 if (depth > 4) {
1470 DEBUG(0,("Retarget recursion - failing\n"));
1471 return False;
1472 }
1473 depth++;
1474 ret = cli_session_request(cli, calling, called);
1475 depth--;
1476 return ret;
1477 }
1478 } /* C. Hoch 9/14/95 End */
1479
1480 if (CVAL(cli->inbuf,0) != 0x82) {
1481 /* This is the wrong place to put the error... JRA. */
1482 cli->rap_error = CVAL(cli->inbuf,4);
1483 return False;
1484 }
1485 return(True);
1486 }
1487
1488 /****************************************************************************
1489 Open the client sockets.
1490 ****************************************************************************/
1491
1492 NTSTATUS cli_connect(struct cli_state *cli,
1493 const char *host,
1494 struct sockaddr_storage *dest_ss)
1495
1496 {
1497 int name_type = 0x20;
1498 TALLOC_CTX *frame = talloc_stackframe();
1499 unsigned int num_addrs = 0;
1500 unsigned int i = 0;
1501 struct sockaddr_storage *ss_arr = NULL;
1502 char *p = NULL;
1503
1504 /* reasonable default hostname */
1505 if (!host) {
1506 host = star_smbserver_name;
1507 }
1508
1509 fstrcpy(cli->desthost, host);
1510 fstr_sprintf(cli->srv_name_slash, "\\\\%s", cli->desthost);
1511 strupper_m(cli->srv_name_slash);
1512
1513 /* allow hostnames of the form NAME#xx and do a netbios lookup */
1514 if ((p = strchr(cli->desthost, '#'))) {
1515 name_type = strtol(p+1, NULL, 16);
1516 *p = 0;
1517 }
1518
1519 if (!dest_ss || is_zero_addr(dest_ss)) {
1520 NTSTATUS status =resolve_name_list(frame,
1521 cli->desthost,
1522 name_type,
1523 &ss_arr,
1524 &num_addrs);
1525 if (!NT_STATUS_IS_OK(status)) {
1526 TALLOC_FREE(frame);
1527 return NT_STATUS_BAD_NETWORK_NAME;
1528 }
1529 } else {
1530 num_addrs = 1;
1531 ss_arr = TALLOC_P(frame, struct sockaddr_storage);
1532 if (!ss_arr) {
1533 TALLOC_FREE(frame);
1534 return NT_STATUS_NO_MEMORY;
1535 }
1536 *ss_arr = *dest_ss;
1537 }
1538
1539 for (i = 0; i < num_addrs; i++) {
1540 cli->dest_ss = ss_arr[i];
1541 if (getenv("LIBSMB_PROG")) {
1542 cli->fd = sock_exec(getenv("LIBSMB_PROG"));
1543 } else {
1544 /* try 445 first, then 139 */
1545 uint16_t port = cli->port?cli->port:445;
1546 cli->fd = open_socket_out(SOCK_STREAM, &cli->dest_ss,
1547 port, cli->timeout);
1548 if (cli->fd == -1 && cli->port == 0) {
1549 port = 139;
1550 cli->fd = open_socket_out(SOCK_STREAM, &cli->dest_ss,
1551 port, cli->timeout);
1552 }
1553 if (cli->fd != -1) {
1554 cli->port = port;
1555 }
1556 }
1557 if (cli->fd == -1) {
1558 char addr[INET6_ADDRSTRLEN];
1559 print_sockaddr(addr, sizeof(addr), &ss_arr[i]);
1560 DEBUG(2,("Error connecting to %s (%s)\n",
1561 dest_ss?addr:host,strerror(errno)));
1562 } else {
1563 /* Exit from loop on first connection. */
1564 break;
1565 }
1566 }
1567
1568 if (cli->fd == -1) {
1569 TALLOC_FREE(frame);
1570 return map_nt_error_from_unix(errno);
1571 }
1572
1573 if (dest_ss) {
1574 *dest_ss = cli->dest_ss;
1575 }
1576
1577 set_socket_options(cli->fd, lp_socket_options());
1578
1579 TALLOC_FREE(frame);
1580 return NT_STATUS_OK;
1581 }
1582
1583 /**
1584 establishes a connection to after the negprot.
1585 @param output_cli A fully initialised cli structure, non-null only on success
1586 @param dest_host The netbios name of the remote host
1587 @param dest_ss (optional) The the destination IP, NULL for name based lookup
1588 @param port (optional) The destination port (0 for default)
1589 @param retry bool. Did this connection fail with a retryable error ?
1590
1591 */
1592 NTSTATUS cli_start_connection(struct cli_state **output_cli,
1593 const char *my_name,
1594 const char *dest_host,
1595 struct sockaddr_storage *dest_ss, int port,
1596 int signing_state, int flags,
1597 bool *retry)
1598 {
1599 NTSTATUS nt_status;
1600 struct nmb_name calling;
1601 struct nmb_name called;
1602 struct cli_state *cli;
1603 struct sockaddr_storage ss;
1604
1605 if (retry)
1606 *retry = False;
1607
1608 if (!my_name)
1609 my_name = global_myname();
1610
1611 if (!(cli = cli_initialise())) {
1612 return NT_STATUS_NO_MEMORY;
1613 }
1614
1615 make_nmb_name(&calling, my_name, 0x0);
1616 make_nmb_name(&called , dest_host, 0x20);
1617
1618 if (cli_set_port(cli, port) != port) {
1619 cli_shutdown(cli);
1620 return NT_STATUS_UNSUCCESSFUL;
1621 }
1622
1623 cli_set_timeout(cli, 10000); /* 10 seconds. */
1624
1625 if (dest_ss) {
1626 ss = *dest_ss;
1627 } else {
1628 zero_addr(&ss);
1629 }
1630
1631 again:
1632
1633 DEBUG(3,("Connecting to host=%s\n", dest_host));
1634
1635 nt_status = cli_connect(cli, dest_host, &ss);
1636 if (!NT_STATUS_IS_OK(nt_status)) {
1637 char addr[INET6_ADDRSTRLEN];
1638 print_sockaddr(addr, sizeof(addr), &ss);
1639 DEBUG(1,("cli_start_connection: failed to connect to %s (%s). Error %s\n",
1640 nmb_namestr(&called), addr, nt_errstr(nt_status) ));
1641 cli_shutdown(cli);
1642 return nt_status;
1643 }
1644
1645 if (retry)
1646 *retry = True;
1647
1648 if (!cli_session_request(cli, &calling, &called)) {
1649 char *p;
1650 DEBUG(1,("session request to %s failed (%s)\n",
1651 called.name, cli_errstr(cli)));
1652 if ((p=strchr(called.name, '.')) && !is_ipaddress(called.name)) {
1653 *p = 0;
1654 goto again;
1655 }
1656 if (strcmp(called.name, star_smbserver_name)) {
1657 make_nmb_name(&called , star_smbserver_name, 0x20);
1658 goto again;
1659 }
1660 return NT_STATUS_BAD_NETWORK_NAME;
1661 }
1662
1663 cli_setup_signing_state(cli, signing_state);
1664
1665 if (flags & CLI_FULL_CONNECTION_DONT_SPNEGO)
1666 cli->use_spnego = False;
1667 else if (flags & CLI_FULL_CONNECTION_USE_KERBEROS)
1668 cli->use_kerberos = True;
1669
1670 if ((flags & CLI_FULL_CONNECTION_FALLBACK_AFTER_KERBEROS) &&
1671 cli->use_kerberos) {
1672 cli->fallback_after_kerberos = true;
1673 }
1674
1675 if (!cli_negprot(cli)) {
1676 DEBUG(1,("failed negprot\n"));
1677 nt_status = cli_nt_error(cli);
1678 if (NT_STATUS_IS_OK(nt_status)) {
1679 nt_status = NT_STATUS_UNSUCCESSFUL;
1680 }
1681 cli_shutdown(cli);
1682 return nt_status;
1683 }
1684
1685 *output_cli = cli;
1686 return NT_STATUS_OK;
1687 }
1688
1689
1690 /**
1691 establishes a connection right up to doing tconX, password specified.
1692 @param output_cli A fully initialised cli structure, non-null only on success
1693 @param dest_host The netbios name of the remote host
1694 @param dest_ip (optional) The the destination IP, NULL for name based lookup
1695 @param port (optional) The destination port (0 for default)
1696 @param service (optional) The share to make the connection to. Should be 'unqualified' in any way.
1697 @param service_type The 'type' of serivice.
1698 @param user Username, unix string
1699 @param domain User's domain
1700 @param password User's password, unencrypted unix string.
1701 @param retry bool. Did this connection fail with a retryable error ?
1702 */
1703
1704 NTSTATUS cli_full_connection(struct cli_state **output_cli,
1705 const char *my_name,
1706 const char *dest_host,
1707 struct sockaddr_storage *dest_ss, int port,
1708 const char *service, const char *service_type,
1709 const char *user, const char *domain,
1710 const char *password, int flags,
1711 int signing_state,
1712 bool *retry)
1713 {
1714 NTSTATUS nt_status;
1715 struct cli_state *cli = NULL;
1716 int pw_len = password ? strlen(password)+1 : 0;
1717
1718 *output_cli = NULL;
1719
1720 if (password == NULL) {
1721 password = "";
1722 }
1723
1724 nt_status = cli_start_connection(&cli, my_name, dest_host,
1725 dest_ss, port, signing_state,
1726 flags, retry);
1727
1728 if (!NT_STATUS_IS_OK(nt_status)) {
1729 return nt_status;
1730 }
1731
1732 nt_status = cli_session_setup(cli, user, password, pw_len, password,
1733 pw_len, domain);
1734 if (!NT_STATUS_IS_OK(nt_status)) {
1735
1736 if (!(flags & CLI_FULL_CONNECTION_ANONYMOUS_FALLBACK)) {
1737 DEBUG(1,("failed session setup with %s\n",
1738 nt_errstr(nt_status)));
1739 cli_shutdown(cli);
1740 return nt_status;
1741 }
1742
1743 nt_status = cli_session_setup(cli, "", "", 0, "", 0, domain);
1744 if (!NT_STATUS_IS_OK(nt_status)) {
1745 DEBUG(1,("anonymous failed session setup with %s\n",
1746 nt_errstr(nt_status)));
1747 cli_shutdown(cli);
1748 return nt_status;
1749 }
1750 }
1751
1752 if (service) {
1753 if (!cli_send_tconX(cli, service, service_type, password, pw_len)) {
1754 nt_status = cli_nt_error(cli);
1755 DEBUG(1,("failed tcon_X with %s\n", nt_errstr(nt_status)));
1756 cli_shutdown(cli);
1757 if (NT_STATUS_IS_OK(nt_status)) {
1758 nt_status = NT_STATUS_UNSUCCESSFUL;
1759 }
1760 return nt_status;
1761 }
1762 }
1763
1764 cli_init_creds(cli, user, domain, password);
1765
1766 *output_cli = cli;
1767 return NT_STATUS_OK;
1768 }
1769
1770 /****************************************************************************
1771 Attempt a NetBIOS session request, falling back to *SMBSERVER if needed.
1772 ****************************************************************************/
1773
1774 bool attempt_netbios_session_request(struct cli_state **ppcli, const char *srchost, const char *desthost,
1775 struct sockaddr_storage *pdest_ss)
1776 {
1777 struct nmb_name calling, called;
1778
1779 make_nmb_name(&calling, srchost, 0x0);
1780
1781 /*
1782 * If the called name is an IP address
1783 * then use *SMBSERVER immediately.
1784 */
1785
1786 if(is_ipaddress(desthost)) {
1787 make_nmb_name(&called, star_smbserver_name, 0x20);
1788 } else {
1789 make_nmb_name(&called, desthost, 0x20);
1790 }
1791
1792 if (!cli_session_request(*ppcli, &calling, &called)) {
1793 NTSTATUS status;
1794 struct nmb_name smbservername;
1795
1796 make_nmb_name(&smbservername, star_smbserver_name, 0x20);
1797
1798 /*
1799 * If the name wasn't *SMBSERVER then
1800 * try with *SMBSERVER if the first name fails.
1801 */
1802
1803 if (nmb_name_equal(&called, &smbservername)) {
1804
1805 /*
1806 * The name used was *SMBSERVER, don't bother with another name.
1807 */
1808
1809 DEBUG(0,("attempt_netbios_session_request: %s rejected the session for name *SMBSERVER \
1810 with error %s.\n", desthost, cli_errstr(*ppcli) ));
1811 return False;
1812 }
1813
1814 /* Try again... */
1815 cli_shutdown(*ppcli);
1816
1817 *ppcli = cli_initialise();
1818 if (!*ppcli) {
1819 /* Out of memory... */
1820 return False;
1821 }
1822
1823 status = cli_connect(*ppcli, desthost, pdest_ss);
1824 if (!NT_STATUS_IS_OK(status) ||
1825 !cli_session_request(*ppcli, &calling, &smbservername)) {
1826 DEBUG(0,("attempt_netbios_session_request: %s rejected the session for \
1827 name *SMBSERVER with error %s\n", desthost, cli_errstr(*ppcli) ));
1828 return False;
1829 }
1830 }
1831
1832 return True;
1833 }
1834
1835 /****************************************************************************
1836 Send an old style tcon.
1837 ****************************************************************************/
1838 NTSTATUS cli_raw_tcon(struct cli_state *cli,
1839 const char *service, const char *pass, const char *dev,
1840 uint16 *max_xmit, uint16 *tid)
1841 {
1842 char *p;
1843
1844 if (!lp_client_plaintext_auth() && (*pass)) {
1845 DEBUG(1, ("Server requested plaintext password but 'client "
1846 "plaintext auth' is disabled\n"));
1847 return NT_STATUS_ACCESS_DENIED;
1848 }
1849
1850 memset(cli->outbuf,'\0',smb_size);
1851 memset(cli->inbuf,'\0',smb_size);
1852
1853 cli_set_message(cli->outbuf, 0, 0, True);
1854 SCVAL(cli->outbuf,smb_com,SMBtcon);
1855 cli_setup_packet(cli);
1856
1857 p = smb_buf(cli->outbuf);
1858 *p++ = 4; p += clistr_push(cli, p, service, -1, STR_TERMINATE | STR_NOALIGN);
1859 *p++ = 4; p += clistr_push(cli, p, pass, -1, STR_TERMINATE | STR_NOALIGN);
1860 *p++ = 4; p += clistr_push(cli, p, dev, -1, STR_TERMINATE | STR_NOALIGN);
1861
1862 cli_setup_bcc(cli, p);
1863
1864 cli_send_smb(cli);
1865 if (!cli_receive_smb(cli)) {
1866 return NT_STATUS_UNEXPECTED_NETWORK_ERROR;
1867 }
1868
1869 if (cli_is_error(cli)) {
1870 return cli_nt_error(cli);
1871 }
1872
1873 *max_xmit = SVAL(cli->inbuf, smb_vwv0);
1874 *tid = SVAL(cli->inbuf, smb_vwv1);
1875
1876 return NT_STATUS_OK;
1877 }
1878
1879 /* Return a cli_state pointing at the IPC$ share for the given server */
1880
1881 struct cli_state *get_ipc_connect(char *server,
1882 struct sockaddr_storage *server_ss,
1883 const struct user_auth_info *user_info)
1884 {
1885 struct cli_state *cli;
1886 NTSTATUS nt_status;
1887 uint32_t flags = CLI_FULL_CONNECTION_ANONYMOUS_FALLBACK;
1888
1889 if (user_info->use_kerberos) {
1890 flags |= CLI_FULL_CONNECTION_USE_KERBEROS;
1891 }
1892
1893 nt_status = cli_full_connection(&cli, NULL, server, server_ss, 0, "IPC$", "IPC",
1894 user_info->username ? user_info->username : "",
1895 lp_workgroup(),
1896 user_info->password ? user_info->password : "",
1897 flags,
1898 Undefined, NULL);
1899
1900 if (NT_STATUS_IS_OK(nt_status)) {
1901 return cli;
1902 } else if (is_ipaddress(server)) {
1903 /* windows 9* needs a correct NMB name for connections */
1904 fstring remote_name;
1905
1906 if (name_status_find("*", 0, 0, server_ss, remote_name)) {
1907 cli = get_ipc_connect(remote_name, server_ss, user_info);
1908 if (cli)
1909 return cli;
1910 }
1911 }
1912 return NULL;
1913 }
1914
1915 /*
1916 * Given the IP address of a master browser on the network, return its
1917 * workgroup and connect to it.
1918 *
1919 * This function is provided to allow additional processing beyond what
1920 * get_ipc_connect_master_ip_bcast() does, e.g. to retrieve the list of master
1921 * browsers and obtain each master browsers' list of domains (in case the
1922 * first master browser is recently on the network and has not yet
1923 * synchronized with other master browsers and therefore does not yet have the
1924 * entire network browse list)
1925 */
1926
1927 struct cli_state *get_ipc_connect_master_ip(TALLOC_CTX *ctx,
1928 struct ip_service *mb_ip,
1929 const struct user_auth_info *user_info,
1930 char **pp_workgroup_out)
1931 {
1932 char addr[INET6_ADDRSTRLEN];
1933 fstring name;
1934 struct cli_state *cli;
1935 struct sockaddr_storage server_ss;
1936
1937 *pp_workgroup_out = NULL;
1938
1939 print_sockaddr(addr, sizeof(addr), &mb_ip->ss);
1940 DEBUG(99, ("Looking up name of master browser %s\n",
1941 addr));
1942
1943 /*
1944 * Do a name status query to find out the name of the master browser.
1945 * We use <01><02>__MSBROWSE__<02>#01 if *#00 fails because a domain
1946 * master browser will not respond to a wildcard query (or, at least,
1947 * an NT4 server acting as the domain master browser will not).
1948 *
1949 * We might be able to use ONLY the query on MSBROWSE, but that's not
1950 * yet been tested with all Windows versions, so until it is, leave
1951 * the original wildcard query as the first choice and fall back to
1952 * MSBROWSE if the wildcard query fails.
1953 */
1954 if (!name_status_find("*", 0, 0x1d, &mb_ip->ss, name) &&
1955 !name_status_find(MSBROWSE, 1, 0x1d, &mb_ip->ss, name)) {
1956
1957 DEBUG(99, ("Could not retrieve name status for %s\n",
1958 addr));
1959 return NULL;
1960 }
1961
1962 if (!find_master_ip(name, &server_ss)) {
1963 DEBUG(99, ("Could not find master ip for %s\n", name));
1964 return NULL;
1965 }
1966
1967 *pp_workgroup_out = talloc_strdup(ctx, name);
1968
1969 DEBUG(4, ("found master browser %s, %s\n", name, addr));
1970
1971 print_sockaddr(addr, sizeof(addr), &server_ss);
1972 cli = get_ipc_connect(addr, &server_ss, user_info);
1973
1974 return cli;
1975 }
1976
1977 /*
1978 * Return the IP address and workgroup of a master browser on the network, and
1979 * connect to it.
1980 */
1981
1982 struct cli_state *get_ipc_connect_master_ip_bcast(TALLOC_CTX *ctx,
1983 const struct user_auth_info *user_info,
1984 char **pp_workgroup_out)
1985 {
1986 struct ip_service *ip_list;
1987 struct cli_state *cli;
1988 int i, count;
1989
1990 *pp_workgroup_out = NULL;
1991
1992 DEBUG(99, ("Do broadcast lookup for workgroups on local network\n"));
1993
1994 /* Go looking for workgroups by broadcasting on the local network */
1995
1996 if (!NT_STATUS_IS_OK(name_resolve_bcast(MSBROWSE, 1, &ip_list,
1997 &count))) {
1998 DEBUG(99, ("No master browsers responded\n"));
1999 return False;
2000 }
2001
2002 for (i = 0; i < count; i++) {
2003 char addr[INET6_ADDRSTRLEN];
2004 print_sockaddr(addr, sizeof(addr), &ip_list[i].ss);
2005 DEBUG(99, ("Found master browser %s\n", addr));
2006
2007 cli = get_ipc_connect_master_ip(ctx, &ip_list[i],
2008 user_info, pp_workgroup_out);
2009 if (cli)
2010 return(cli);
2011 }
2012
2013 return NULL;
2014 }
Samba GIT mirror