?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Document how to enable the name aliasing support in Winbind.
[Samba.git] / source / libsmb / cliconnect.c
blob8ef14d7973540b76ce9d23873bac193f236f8c4a
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 DATA_BLOB blob;
801 const char *p = NULL;
802 char *account = NULL;
803
804 DEBUG(3,("Doing spnego session setup (blob length=%lu)\n", (unsigned long)cli->secblob.length));
805
806 /* the server might not even do spnego */
807 if (cli->secblob.length <= 16) {
808 DEBUG(3,("server didn't supply a full spnego negprot\n"));
809 goto ntlmssp;
810 }
811
812 #if 0
813 file_save("negprot.dat", cli->secblob.data, cli->secblob.length);
814 #endif
815
816 /* there is 16 bytes of GUID before the real spnego packet starts */
817 blob = data_blob(cli->secblob.data+16, cli->secblob.length-16);
818
819 /* The server sent us the first part of the SPNEGO exchange in the
820 * negprot reply. It is WRONG to depend on the principal sent in the
821 * negprot reply, but right now we do it. If we don't receive one,
822 * we try to best guess, then fall back to NTLM. */
823 if (!spnego_parse_negTokenInit(blob, OIDs, &principal)) {
824 data_blob_free(&blob);
825 return ADS_ERROR_NT(NT_STATUS_INVALID_PARAMETER);
826 }
827 data_blob_free(&blob);
828
829 /* make sure the server understands kerberos */
830 for (i=0;OIDs[i];i++) {
831 DEBUG(3,("got OID=%s\n", OIDs[i]));
832 if (strcmp(OIDs[i], OID_KERBEROS5_OLD) == 0 ||
833 strcmp(OIDs[i], OID_KERBEROS5) == 0) {
834 cli->got_kerberos_mechanism = True;
835 }
836 free(OIDs[i]);
837 }
838
839 DEBUG(3,("got principal=%s\n", principal ? principal : "<null>"));
840
841 fstrcpy(cli->user_name, user);
842
843 #ifdef HAVE_KRB5
844 /* If password is set we reauthenticate to kerberos server
845 * and do not store results */
846
847 if (cli->got_kerberos_mechanism && cli->use_kerberos) {
848 ADS_STATUS rc;
849
850 if (pass && *pass) {
851 int ret;
852
853 use_in_memory_ccache();
854 ret = kerberos_kinit_password(user, pass, 0 /* no time correction for now */, NULL);
855
856 if (ret){
857 SAFE_FREE(principal);
858 DEBUG(0, ("Kinit failed: %s\n", error_message(ret)));
859 if (cli->fallback_after_kerberos)
860 goto ntlmssp;
861 return ADS_ERROR_KRB5(ret);
862 }
863 }
864
865 /* If we get a bad principal, try to guess it if
866 we have a valid host NetBIOS name.
867 */
868 if (strequal(principal, ADS_IGNORE_PRINCIPAL)) {
869 SAFE_FREE(principal);
870 }
871
872 if (principal == NULL &&
873 !is_ipaddress(cli->desthost) &&
874 !strequal(star_smbserver_name,
875 cli->desthost)) {
876 char *realm = NULL;
877 char *machine = NULL;
878 char *host = NULL;
879 DEBUG(3,("cli_session_setup_spnego: got a "
880 "bad server principal, trying to guess ...\n"));
881
882 host = strchr_m(cli->desthost, '.');
883 if (host) {
884 machine = SMB_STRNDUP(cli->desthost,
885 host - cli->desthost);
886 } else {
887 machine = SMB_STRDUP(cli->desthost);
888 }
889 if (machine == NULL) {
890 return ADS_ERROR_NT(NT_STATUS_NO_MEMORY);
891 }
892
893 if (dest_realm) {
894 realm = SMB_STRDUP(dest_realm);
895 strupper_m(realm);
896 } else {
897 realm = kerberos_get_default_realm_from_ccache();
898 }
899 if (realm && *realm) {
900 if (asprintf(&principal, "%s$@%s",
901 machine, realm) < 0) {
902 SAFE_FREE(machine);
903 SAFE_FREE(realm);
904 return ADS_ERROR_NT(NT_STATUS_NO_MEMORY);
905 }
906 DEBUG(3,("cli_session_setup_spnego: guessed "
907 "server principal=%s\n",
908 principal ? principal : "<null>"));
909 }
910 SAFE_FREE(machine);
911 SAFE_FREE(realm);
912 }
913
914 if (principal) {
915 rc = cli_session_setup_kerberos(cli, principal,
916 dest_realm);
917 if (ADS_ERR_OK(rc) || !cli->fallback_after_kerberos) {
918 SAFE_FREE(principal);
919 return rc;
920 }
921 }
922 }
923 #endif
924
925 SAFE_FREE(principal);
926
927 ntlmssp:
928
929 account = talloc_strdup(talloc_tos(), user);
930 if (!account) {
931 return ADS_ERROR_NT(NT_STATUS_NO_MEMORY);
932 }
933
934 /* when falling back to ntlmssp while authenticating with a machine
935 * account strip off the realm - gd */
936
937 if ((p = strchr_m(user, '@')) != NULL) {
938 account[PTR_DIFF(p,user)] = '\0';
939 }
940
941 return ADS_ERROR_NT(cli_session_setup_ntlmssp(cli, account, pass, user_domain));
942 }
943
944 /****************************************************************************
945 Send a session setup. The username and workgroup is in UNIX character
946 format and must be converted to DOS codepage format before sending. If the
947 password is in plaintext, the same should be done.
948 ****************************************************************************/
949
950 NTSTATUS cli_session_setup(struct cli_state *cli,
951 const char *user,
952 const char *pass, int passlen,
953 const char *ntpass, int ntpasslen,
954 const char *workgroup)
955 {
956 char *p;
957 fstring user2;
958
959 if (user) {
960 fstrcpy(user2, user);
961 } else {
962 user2[0] ='\0';
963 }
964
965 if (!workgroup) {
966 workgroup = "";
967 }
968
969 /* allow for workgroups as part of the username */
970 if ((p=strchr_m(user2,'\\')) || (p=strchr_m(user2,'/')) ||
971 (p=strchr_m(user2,*lp_winbind_separator()))) {
972 *p = 0;
973 user = p+1;
974 workgroup = user2;
975 }
976
977 if (cli->protocol < PROTOCOL_LANMAN1) {
978 return NT_STATUS_OK;
979 }
980
981 /* now work out what sort of session setup we are going to
982 do. I have split this into separate functions to make the
983 flow a bit easier to understand (tridge) */
984
985 /* if its an older server then we have to use the older request format */
986
987 if (cli->protocol < PROTOCOL_NT1) {
988 if (!lp_client_lanman_auth() && passlen != 24 && (*pass)) {
989 DEBUG(1, ("Server requested LM password but 'client lanman auth'"
990 " is disabled\n"));
991 return NT_STATUS_ACCESS_DENIED;
992 }
993
994 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) == 0 &&
995 !lp_client_plaintext_auth() && (*pass)) {
996 DEBUG(1, ("Server requested plaintext password but "
997 "'client plaintext auth' is disabled\n"));
998 return NT_STATUS_ACCESS_DENIED;
999 }
1000
1001 return cli_session_setup_lanman2(cli, user, pass, passlen,
1002 workgroup);
1003 }
1004
1005 /* if no user is supplied then we have to do an anonymous connection.
1006 passwords are ignored */
1007
1008 if (!user || !*user)
1009 return cli_session_setup_guest(cli);
1010
1011 /* if the server is share level then send a plaintext null
1012 password at this point. The password is sent in the tree
1013 connect */
1014
1015 if ((cli->sec_mode & NEGOTIATE_SECURITY_USER_LEVEL) == 0)
1016 return cli_session_setup_plaintext(cli, user, "", workgroup);
1017
1018 /* if the server doesn't support encryption then we have to use
1019 plaintext. The second password is ignored */
1020
1021 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) == 0) {
1022 if (!lp_client_plaintext_auth() && (*pass)) {
1023 DEBUG(1, ("Server requested plaintext password but "
1024 "'client plaintext auth' is disabled\n"));
1025 return NT_STATUS_ACCESS_DENIED;
1026 }
1027 return cli_session_setup_plaintext(cli, user, pass, workgroup);
1028 }
1029
1030 /* if the server supports extended security then use SPNEGO */
1031
1032 if (cli->capabilities & CAP_EXTENDED_SECURITY) {
1033 ADS_STATUS status = cli_session_setup_spnego(cli, user, pass,
1034 workgroup, NULL);
1035 if (!ADS_ERR_OK(status)) {
1036 DEBUG(3, ("SPNEGO login failed: %s\n", ads_errstr(status)));
1037 return ads_ntstatus(status);
1038 }
1039 } else {
1040 NTSTATUS status;
1041
1042 /* otherwise do a NT1 style session setup */
1043 status = cli_session_setup_nt1(cli, user, pass, passlen,
1044 ntpass, ntpasslen, workgroup);
1045 if (!NT_STATUS_IS_OK(status)) {
1046 DEBUG(3,("cli_session_setup: NT1 session setup "
1047 "failed: %s\n", nt_errstr(status)));
1048 return status;
1049 }
1050 }
1051
1052 if (strstr(cli->server_type, "Samba")) {
1053 cli->is_samba = True;
1054 }
1055
1056 return NT_STATUS_OK;
1057 }
1058
1059 /****************************************************************************
1060 Send a uloggoff.
1061 *****************************************************************************/
1062
1063 bool cli_ulogoff(struct cli_state *cli)
1064 {
1065 memset(cli->outbuf,'\0',smb_size);
1066 cli_set_message(cli->outbuf,2,0,True);
1067 SCVAL(cli->outbuf,smb_com,SMBulogoffX);
1068 cli_setup_packet(cli);
1069 SSVAL(cli->outbuf,smb_vwv0,0xFF);
1070 SSVAL(cli->outbuf,smb_vwv2,0); /* no additional info */
1071
1072 cli_send_smb(cli);
1073 if (!cli_receive_smb(cli))
1074 return False;
1075
1076 if (cli_is_error(cli)) {
1077 return False;
1078 }
1079
1080 cli->cnum = -1;
1081 return True;
1082 }
1083
1084 /****************************************************************************
1085 Send a tconX.
1086 ****************************************************************************/
1087
1088 bool cli_send_tconX(struct cli_state *cli,
1089 const char *share, const char *dev, const char *pass, int passlen)
1090 {
1091 fstring fullshare, pword;
1092 char *p;
1093 memset(cli->outbuf,'\0',smb_size);
1094 memset(cli->inbuf,'\0',smb_size);
1095
1096 fstrcpy(cli->share, share);
1097
1098 /* in user level security don't send a password now */
1099 if (cli->sec_mode & NEGOTIATE_SECURITY_USER_LEVEL) {
1100 passlen = 1;
1101 pass = "";
1102 } else if (!pass) {
1103 DEBUG(1, ("Server not using user level security and no password supplied.\n"));
1104 return False;
1105 }
1106
1107 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) &&
1108 *pass && passlen != 24) {
1109 if (!lp_client_lanman_auth()) {
1110 DEBUG(1, ("Server requested LANMAN password "
1111 "(share-level security) but "
1112 "'client lanman auth' is disabled\n"));
1113 return False;
1114 }
1115
1116 /*
1117 * Non-encrypted passwords - convert to DOS codepage before encryption.
1118 */
1119 passlen = 24;
1120 SMBencrypt(pass,cli->secblob.data,(uchar *)pword);
1121 } else {
1122 if((cli->sec_mode & (NEGOTIATE_SECURITY_USER_LEVEL|NEGOTIATE_SECURITY_CHALLENGE_RESPONSE)) == 0) {
1123 if (!lp_client_plaintext_auth() && (*pass)) {
1124 DEBUG(1, ("Server requested plaintext "
1125 "password but 'client plaintext "
1126 "auth' is disabled\n"));
1127 return False;
1128 }
1129
1130 /*
1131 * Non-encrypted passwords - convert to DOS codepage before using.
1132 */
1133 passlen = clistr_push(cli, pword, pass, sizeof(pword), STR_TERMINATE);
1134
1135 } else {
1136 if (passlen) {
1137 memcpy(pword, pass, passlen);
1138 }
1139 }
1140 }
1141
1142 slprintf(fullshare, sizeof(fullshare)-1,
1143 "\\\\%s\\%s", cli->desthost, share);
1144
1145 cli_set_message(cli->outbuf,4, 0, True);
1146 SCVAL(cli->outbuf,smb_com,SMBtconX);
1147 cli_setup_packet(cli);
1148
1149 SSVAL(cli->outbuf,smb_vwv0,0xFF);
1150 SSVAL(cli->outbuf,smb_vwv2,TCONX_FLAG_EXTENDED_RESPONSE);
1151 SSVAL(cli->outbuf,smb_vwv3,passlen);
1152
1153 p = smb_buf(cli->outbuf);
1154 if (passlen) {
1155 memcpy(p,pword,passlen);
1156 }
1157 p += passlen;
1158 p += clistr_push(cli, p, fullshare, -1, STR_TERMINATE |STR_UPPER);
1159 p += clistr_push(cli, p, dev, -1, STR_TERMINATE |STR_UPPER | STR_ASCII);
1160
1161 cli_setup_bcc(cli, p);
1162
1163 cli_send_smb(cli);
1164 if (!cli_receive_smb(cli))
1165 return False;
1166
1167 if (cli_is_error(cli))
1168 return False;
1169
1170 clistr_pull(cli, cli->dev, smb_buf(cli->inbuf), sizeof(fstring), -1, STR_TERMINATE|STR_ASCII);
1171
1172 if (cli->protocol >= PROTOCOL_NT1 &&
1173 smb_buflen(cli->inbuf) == 3) {
1174 /* almost certainly win95 - enable bug fixes */
1175 cli->win95 = True;
1176 }
1177
1178 /* Make sure that we have the optional support 16-bit field. WCT > 2 */
1179 /* Avoids issues when connecting to Win9x boxes sharing files */
1180
1181 cli->dfsroot = False;
1182 if ( (CVAL(cli->inbuf, smb_wct))>2 && cli->protocol >= PROTOCOL_LANMAN2 )
1183 cli->dfsroot = (SVAL( cli->inbuf, smb_vwv2 ) & SMB_SHARE_IN_DFS) ? True : False;
1184
1185 cli->cnum = SVAL(cli->inbuf,smb_tid);
1186 return True;
1187 }
1188
1189 /****************************************************************************
1190 Send a tree disconnect.
1191 ****************************************************************************/
1192
1193 bool cli_tdis(struct cli_state *cli)
1194 {
1195 memset(cli->outbuf,'\0',smb_size);
1196 cli_set_message(cli->outbuf,0,0,True);
1197 SCVAL(cli->outbuf,smb_com,SMBtdis);
1198 SSVAL(cli->outbuf,smb_tid,cli->cnum);
1199 cli_setup_packet(cli);
1200
1201 cli_send_smb(cli);
1202 if (!cli_receive_smb(cli))
1203 return False;
1204
1205 if (cli_is_error(cli)) {
1206 return False;
1207 }
1208
1209 cli->cnum = -1;
1210 return True;
1211 }
1212
1213 /****************************************************************************
1214 Send a negprot command.
1215 ****************************************************************************/
1216
1217 void cli_negprot_send(struct cli_state *cli)
1218 {
1219 char *p;
1220 int numprots;
1221
1222 if (cli->protocol < PROTOCOL_NT1)
1223 cli->use_spnego = False;
1224
1225 memset(cli->outbuf,'\0',smb_size);
1226
1227 /* setup the protocol strings */
1228 cli_set_message(cli->outbuf,0,0,True);
1229
1230 p = smb_buf(cli->outbuf);
1231 for (numprots=0;
1232 prots[numprots].name && prots[numprots].prot<=cli->protocol;
1233 numprots++) {
1234 *p++ = 2;
1235 p += clistr_push(cli, p, prots[numprots].name, -1, STR_TERMINATE);
1236 }
1237
1238 SCVAL(cli->outbuf,smb_com,SMBnegprot);
1239 cli_setup_bcc(cli, p);
1240 cli_setup_packet(cli);
1241
1242 SCVAL(smb_buf(cli->outbuf),0,2);
1243
1244 cli_send_smb(cli);
1245 }
1246
1247 /****************************************************************************
1248 Send a negprot command.
1249 ****************************************************************************/
1250
1251 bool cli_negprot(struct cli_state *cli)
1252 {
1253 char *p;
1254 int numprots;
1255 int plength;
1256
1257 if (cli->protocol < PROTOCOL_NT1)
1258 cli->use_spnego = False;
1259
1260 memset(cli->outbuf,'\0',smb_size);
1261
1262 /* setup the protocol strings */
1263 for (plength=0,numprots=0;
1264 prots[numprots].name && prots[numprots].prot<=cli->protocol;
1265 numprots++)
1266 plength += strlen(prots[numprots].name)+2;
1267
1268 cli_set_message(cli->outbuf,0,plength,True);
1269
1270 p = smb_buf(cli->outbuf);
1271 for (numprots=0;
1272 prots[numprots].name && prots[numprots].prot<=cli->protocol;
1273 numprots++) {
1274 *p++ = 2;
1275 p += clistr_push(cli, p, prots[numprots].name, -1, STR_TERMINATE);
1276 }
1277
1278 SCVAL(cli->outbuf,smb_com,SMBnegprot);
1279 cli_setup_packet(cli);
1280
1281 SCVAL(smb_buf(cli->outbuf),0,2);
1282
1283 cli_send_smb(cli);
1284 if (!cli_receive_smb(cli))
1285 return False;
1286
1287 show_msg(cli->inbuf);
1288
1289 if (cli_is_error(cli) ||
1290 ((int)SVAL(cli->inbuf,smb_vwv0) >= numprots)) {
1291 return(False);
1292 }
1293
1294 cli->protocol = prots[SVAL(cli->inbuf,smb_vwv0)].prot;
1295
1296 if ((cli->protocol < PROTOCOL_NT1) && cli->sign_info.mandatory_signing) {
1297 DEBUG(0,("cli_negprot: SMB signing is mandatory and the selected protocol level doesn't support it.\n"));
1298 return False;
1299 }
1300
1301 if (cli->protocol >= PROTOCOL_NT1) {
1302 struct timespec ts;
1303 /* NT protocol */
1304 cli->sec_mode = CVAL(cli->inbuf,smb_vwv1);
1305 cli->max_mux = SVAL(cli->inbuf, smb_vwv1+1);
1306 cli->max_xmit = IVAL(cli->inbuf,smb_vwv3+1);
1307 cli->sesskey = IVAL(cli->inbuf,smb_vwv7+1);
1308 cli->serverzone = SVALS(cli->inbuf,smb_vwv15+1);
1309 cli->serverzone *= 60;
1310 /* this time arrives in real GMT */
1311 ts = interpret_long_date(cli->inbuf+smb_vwv11+1);
1312 cli->servertime = ts.tv_sec;
1313 cli->secblob = data_blob(smb_buf(cli->inbuf),smb_buflen(cli->inbuf));
1314 cli->capabilities = IVAL(cli->inbuf,smb_vwv9+1);
1315 if (cli->capabilities & CAP_RAW_MODE) {
1316 cli->readbraw_supported = True;
1317 cli->writebraw_supported = True;
1318 }
1319 /* work out if they sent us a workgroup */
1320 if (!(cli->capabilities & CAP_EXTENDED_SECURITY) &&
1321 smb_buflen(cli->inbuf) > 8) {
1322 clistr_pull(cli, cli->server_domain,
1323 smb_buf(cli->inbuf)+8, sizeof(cli->server_domain),
1324 smb_buflen(cli->inbuf)-8, STR_UNICODE|STR_NOALIGN);
1325 }
1326
1327 /*
1328 * As signing is slow we only turn it on if either the client or
1329 * the server require it. JRA.
1330 */
1331
1332 if (cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_REQUIRED) {
1333 /* Fail if server says signing is mandatory and we don't want to support it. */
1334 if (!cli->sign_info.allow_smb_signing) {
1335 DEBUG(0,("cli_negprot: SMB signing is mandatory and we have disabled it.\n"));
1336 return False;
1337 }
1338 cli->sign_info.negotiated_smb_signing = True;
1339 cli->sign_info.mandatory_signing = True;
1340 } else if (cli->sign_info.mandatory_signing && cli->sign_info.allow_smb_signing) {
1341 /* Fail if client says signing is mandatory and the server doesn't support it. */
1342 if (!(cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_ENABLED)) {
1343 DEBUG(1,("cli_negprot: SMB signing is mandatory and the server doesn't support it.\n"));
1344 return False;
1345 }
1346 cli->sign_info.negotiated_smb_signing = True;
1347 cli->sign_info.mandatory_signing = True;
1348 } else if (cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_ENABLED) {
1349 cli->sign_info.negotiated_smb_signing = True;
1350 }
1351
1352 if (cli->capabilities & (CAP_LARGE_READX|CAP_LARGE_WRITEX)) {
1353 SAFE_FREE(cli->outbuf);
1354 SAFE_FREE(cli->inbuf);
1355 cli->outbuf = (char *)SMB_MALLOC(CLI_SAMBA_MAX_LARGE_READX_SIZE+LARGE_WRITEX_HDR_SIZE+SAFETY_MARGIN);
1356 cli->inbuf = (char *)SMB_MALLOC(CLI_SAMBA_MAX_LARGE_READX_SIZE+LARGE_WRITEX_HDR_SIZE+SAFETY_MARGIN);
1357 cli->bufsize = CLI_SAMBA_MAX_LARGE_READX_SIZE + LARGE_WRITEX_HDR_SIZE;
1358 }
1359
1360 } else if (cli->protocol >= PROTOCOL_LANMAN1) {
1361 cli->use_spnego = False;
1362 cli->sec_mode = SVAL(cli->inbuf,smb_vwv1);
1363 cli->max_xmit = SVAL(cli->inbuf,smb_vwv2);
1364 cli->max_mux = SVAL(cli->inbuf, smb_vwv3);
1365 cli->sesskey = IVAL(cli->inbuf,smb_vwv6);
1366 cli->serverzone = SVALS(cli->inbuf,smb_vwv10);
1367 cli->serverzone *= 60;
1368 /* this time is converted to GMT by make_unix_date */
1369 cli->servertime = cli_make_unix_date(cli,cli->inbuf+smb_vwv8);
1370 cli->readbraw_supported = ((SVAL(cli->inbuf,smb_vwv5) & 0x1) != 0);
1371 cli->writebraw_supported = ((SVAL(cli->inbuf,smb_vwv5) & 0x2) != 0);
1372 cli->secblob = data_blob(smb_buf(cli->inbuf),smb_buflen(cli->inbuf));
1373 } else {
1374 /* the old core protocol */
1375 cli->use_spnego = False;
1376 cli->sec_mode = 0;
1377 cli->serverzone = get_time_zone(time(NULL));
1378 }
1379
1380 cli->max_xmit = MIN(cli->max_xmit, CLI_BUFFER_SIZE);
1381
1382 /* a way to force ascii SMB */
1383 if (getenv("CLI_FORCE_ASCII"))
1384 cli->capabilities &= ~CAP_UNICODE;
1385
1386 return True;
1387 }
1388
1389 /****************************************************************************
1390 Send a session request. See rfc1002.txt 4.3 and 4.3.2.
1391 ****************************************************************************/
1392
1393 bool cli_session_request(struct cli_state *cli,
1394 struct nmb_name *calling, struct nmb_name *called)
1395 {
1396 char *p;
1397 int len = 4;
1398
1399 memcpy(&(cli->calling), calling, sizeof(*calling));
1400 memcpy(&(cli->called ), called , sizeof(*called ));
1401
1402 /* put in the destination name */
1403 p = cli->outbuf+len;
1404 name_mangle(cli->called .name, p, cli->called .name_type);
1405 len += name_len(p);
1406
1407 /* and my name */
1408 p = cli->outbuf+len;
1409 name_mangle(cli->calling.name, p, cli->calling.name_type);
1410 len += name_len(p);
1411
1412 /* 445 doesn't have session request */
1413 if (cli->port == 445)
1414 return True;
1415
1416 /* send a session request (RFC 1002) */
1417 /* setup the packet length
1418 * Remove four bytes from the length count, since the length
1419 * field in the NBT Session Service header counts the number
1420 * of bytes which follow. The cli_send_smb() function knows
1421 * about this and accounts for those four bytes.
1422 * CRH.
1423 */
1424 len -= 4;
1425 _smb_setlen(cli->outbuf,len);
1426 SCVAL(cli->outbuf,0,0x81);
1427
1428 cli_send_smb(cli);
1429 DEBUG(5,("Sent session request\n"));
1430
1431 if (!cli_receive_smb(cli))
1432 return False;
1433
1434 if (CVAL(cli->inbuf,0) == 0x84) {
1435 /* C. Hoch 9/14/95 Start */
1436 /* For information, here is the response structure.
1437 * We do the byte-twiddling to for portability.
1438 struct RetargetResponse{
1439 unsigned char type;
1440 unsigned char flags;
1441 int16 length;
1442 int32 ip_addr;
1443 int16 port;
1444 };
1445 */
1446 uint16_t port = (CVAL(cli->inbuf,8)<<8)+CVAL(cli->inbuf,9);
1447 struct in_addr dest_ip;
1448
1449 /* SESSION RETARGET */
1450 putip((char *)&dest_ip,cli->inbuf+4);
1451 in_addr_to_sockaddr_storage(&cli->dest_ss, dest_ip);
1452
1453 cli->fd = open_socket_out(SOCK_STREAM,
1454 &cli->dest_ss,
1455 port,
1456 LONG_CONNECT_TIMEOUT);
1457 if (cli->fd == -1)
1458 return False;
1459
1460 DEBUG(3,("Retargeted\n"));
1461
1462 set_socket_options(cli->fd, lp_socket_options());
1463
1464 /* Try again */
1465 {
1466 static int depth;
1467 bool ret;
1468 if (depth > 4) {
1469 DEBUG(0,("Retarget recursion - failing\n"));
1470 return False;
1471 }
1472 depth++;
1473 ret = cli_session_request(cli, calling, called);
1474 depth--;
1475 return ret;
1476 }
1477 } /* C. Hoch 9/14/95 End */
1478
1479 if (CVAL(cli->inbuf,0) != 0x82) {
1480 /* This is the wrong place to put the error... JRA. */
1481 cli->rap_error = CVAL(cli->inbuf,4);
1482 return False;
1483 }
1484 return(True);
1485 }
1486
1487 /****************************************************************************
1488 Open the client sockets.
1489 ****************************************************************************/
1490
1491 NTSTATUS cli_connect(struct cli_state *cli,
1492 const char *host,
1493 struct sockaddr_storage *dest_ss)
1494
1495 {
1496 int name_type = 0x20;
1497 TALLOC_CTX *frame = talloc_stackframe();
1498 unsigned int num_addrs = 0;
1499 unsigned int i = 0;
1500 struct sockaddr_storage *ss_arr = NULL;
1501 char *p = NULL;
1502
1503 /* reasonable default hostname */
1504 if (!host) {
1505 host = star_smbserver_name;
1506 }
1507
1508 fstrcpy(cli->desthost, host);
1509
1510 /* allow hostnames of the form NAME#xx and do a netbios lookup */
1511 if ((p = strchr(cli->desthost, '#'))) {
1512 name_type = strtol(p+1, NULL, 16);
1513 *p = 0;
1514 }
1515
1516 if (!dest_ss || is_zero_addr(dest_ss)) {
1517 NTSTATUS status =resolve_name_list(frame,
1518 cli->desthost,
1519 name_type,
1520 &ss_arr,
1521 &num_addrs);
1522 if (!NT_STATUS_IS_OK(status)) {
1523 TALLOC_FREE(frame);
1524 return NT_STATUS_BAD_NETWORK_NAME;
1525 }
1526 } else {
1527 num_addrs = 1;
1528 ss_arr = TALLOC_P(frame, struct sockaddr_storage);
1529 if (!ss_arr) {
1530 TALLOC_FREE(frame);
1531 return NT_STATUS_NO_MEMORY;
1532 }
1533 *ss_arr = *dest_ss;
1534 }
1535
1536 for (i = 0; i < num_addrs; i++) {
1537 cli->dest_ss = ss_arr[i];
1538 if (getenv("LIBSMB_PROG")) {
1539 cli->fd = sock_exec(getenv("LIBSMB_PROG"));
1540 } else {
1541 /* try 445 first, then 139 */
1542 uint16_t port = cli->port?cli->port:445;
1543 cli->fd = open_socket_out(SOCK_STREAM, &cli->dest_ss,
1544 port, cli->timeout);
1545 if (cli->fd == -1 && cli->port == 0) {
1546 port = 139;
1547 cli->fd = open_socket_out(SOCK_STREAM, &cli->dest_ss,
1548 port, cli->timeout);
1549 }
1550 if (cli->fd != -1) {
1551 cli->port = port;
1552 }
1553 }
1554 if (cli->fd == -1) {
1555 char addr[INET6_ADDRSTRLEN];
1556 print_sockaddr(addr, sizeof(addr), &ss_arr[i]);
1557 DEBUG(2,("Error connecting to %s (%s)\n",
1558 dest_ss?addr:host,strerror(errno)));
1559 } else {
1560 /* Exit from loop on first connection. */
1561 break;
1562 }
1563 }
1564
1565 if (cli->fd == -1) {
1566 TALLOC_FREE(frame);
1567 return map_nt_error_from_unix(errno);
1568 }
1569
1570 if (dest_ss) {
1571 *dest_ss = cli->dest_ss;
1572 }
1573
1574 set_socket_options(cli->fd, lp_socket_options());
1575
1576 TALLOC_FREE(frame);
1577 return NT_STATUS_OK;
1578 }
1579
1580 /**
1581 establishes a connection to after the negprot.
1582 @param output_cli A fully initialised cli structure, non-null only on success
1583 @param dest_host The netbios name of the remote host
1584 @param dest_ss (optional) The the destination IP, NULL for name based lookup
1585 @param port (optional) The destination port (0 for default)
1586 @param retry bool. Did this connection fail with a retryable error ?
1587
1588 */
1589 NTSTATUS cli_start_connection(struct cli_state **output_cli,
1590 const char *my_name,
1591 const char *dest_host,
1592 struct sockaddr_storage *dest_ss, int port,
1593 int signing_state, int flags,
1594 bool *retry)
1595 {
1596 NTSTATUS nt_status;
1597 struct nmb_name calling;
1598 struct nmb_name called;
1599 struct cli_state *cli;
1600 struct sockaddr_storage ss;
1601
1602 if (retry)
1603 *retry = False;
1604
1605 if (!my_name)
1606 my_name = global_myname();
1607
1608 if (!(cli = cli_initialise())) {
1609 return NT_STATUS_NO_MEMORY;
1610 }
1611
1612 make_nmb_name(&calling, my_name, 0x0);
1613 make_nmb_name(&called , dest_host, 0x20);
1614
1615 if (cli_set_port(cli, port) != port) {
1616 cli_shutdown(cli);
1617 return NT_STATUS_UNSUCCESSFUL;
1618 }
1619
1620 cli_set_timeout(cli, 10000); /* 10 seconds. */
1621
1622 if (dest_ss) {
1623 ss = *dest_ss;
1624 } else {
1625 zero_addr(&ss);
1626 }
1627
1628 again:
1629
1630 DEBUG(3,("Connecting to host=%s\n", dest_host));
1631
1632 nt_status = cli_connect(cli, dest_host, &ss);
1633 if (!NT_STATUS_IS_OK(nt_status)) {
1634 char addr[INET6_ADDRSTRLEN];
1635 print_sockaddr(addr, sizeof(addr), &ss);
1636 DEBUG(1,("cli_start_connection: failed to connect to %s (%s). Error %s\n",
1637 nmb_namestr(&called), addr, nt_errstr(nt_status) ));
1638 cli_shutdown(cli);
1639 return nt_status;
1640 }
1641
1642 if (retry)
1643 *retry = True;
1644
1645 if (!cli_session_request(cli, &calling, &called)) {
1646 char *p;
1647 DEBUG(1,("session request to %s failed (%s)\n",
1648 called.name, cli_errstr(cli)));
1649 if ((p=strchr(called.name, '.')) && !is_ipaddress(called.name)) {
1650 *p = 0;
1651 goto again;
1652 }
1653 if (strcmp(called.name, star_smbserver_name)) {
1654 make_nmb_name(&called , star_smbserver_name, 0x20);
1655 goto again;
1656 }
1657 return NT_STATUS_BAD_NETWORK_NAME;
1658 }
1659
1660 cli_setup_signing_state(cli, signing_state);
1661
1662 if (flags & CLI_FULL_CONNECTION_DONT_SPNEGO)
1663 cli->use_spnego = False;
1664 else if (flags & CLI_FULL_CONNECTION_USE_KERBEROS)
1665 cli->use_kerberos = True;
1666
1667 if ((flags & CLI_FULL_CONNECTION_FALLBACK_AFTER_KERBEROS) &&
1668 cli->use_kerberos) {
1669 cli->fallback_after_kerberos = true;
1670 }
1671
1672 if (!cli_negprot(cli)) {
1673 DEBUG(1,("failed negprot\n"));
1674 nt_status = cli_nt_error(cli);
1675 if (NT_STATUS_IS_OK(nt_status)) {
1676 nt_status = NT_STATUS_UNSUCCESSFUL;
1677 }
1678 cli_shutdown(cli);
1679 return nt_status;
1680 }
1681
1682 *output_cli = cli;
1683 return NT_STATUS_OK;
1684 }
1685
1686
1687 /**
1688 establishes a connection right up to doing tconX, password specified.
1689 @param output_cli A fully initialised cli structure, non-null only on success
1690 @param dest_host The netbios name of the remote host
1691 @param dest_ip (optional) The the destination IP, NULL for name based lookup
1692 @param port (optional) The destination port (0 for default)
1693 @param service (optional) The share to make the connection to. Should be 'unqualified' in any way.
1694 @param service_type The 'type' of serivice.
1695 @param user Username, unix string
1696 @param domain User's domain
1697 @param password User's password, unencrypted unix string.
1698 @param retry bool. Did this connection fail with a retryable error ?
1699 */
1700
1701 NTSTATUS cli_full_connection(struct cli_state **output_cli,
1702 const char *my_name,
1703 const char *dest_host,
1704 struct sockaddr_storage *dest_ss, int port,
1705 const char *service, const char *service_type,
1706 const char *user, const char *domain,
1707 const char *password, int flags,
1708 int signing_state,
1709 bool *retry)
1710 {
1711 NTSTATUS nt_status;
1712 struct cli_state *cli = NULL;
1713 int pw_len = password ? strlen(password)+1 : 0;
1714
1715 *output_cli = NULL;
1716
1717 if (password == NULL) {
1718 password = "";
1719 }
1720
1721 nt_status = cli_start_connection(&cli, my_name, dest_host,
1722 dest_ss, port, signing_state,
1723 flags, retry);
1724
1725 if (!NT_STATUS_IS_OK(nt_status)) {
1726 return nt_status;
1727 }
1728
1729 nt_status = cli_session_setup(cli, user, password, pw_len, password,
1730 pw_len, domain);
1731 if (!NT_STATUS_IS_OK(nt_status)) {
1732
1733 if (!(flags & CLI_FULL_CONNECTION_ANONYMOUS_FALLBACK)) {
1734 DEBUG(1,("failed session setup with %s\n",
1735 nt_errstr(nt_status)));
1736 cli_shutdown(cli);
1737 return nt_status;
1738 }
1739
1740 nt_status = cli_session_setup(cli, "", "", 0, "", 0, domain);
1741 if (!NT_STATUS_IS_OK(nt_status)) {
1742 DEBUG(1,("anonymous failed session setup with %s\n",
1743 nt_errstr(nt_status)));
1744 cli_shutdown(cli);
1745 return nt_status;
1746 }
1747 }
1748
1749 if (service) {
1750 if (!cli_send_tconX(cli, service, service_type, password, pw_len)) {
1751 nt_status = cli_nt_error(cli);
1752 DEBUG(1,("failed tcon_X with %s\n", nt_errstr(nt_status)));
1753 cli_shutdown(cli);
1754 if (NT_STATUS_IS_OK(nt_status)) {
1755 nt_status = NT_STATUS_UNSUCCESSFUL;
1756 }
1757 return nt_status;
1758 }
1759 }
1760
1761 cli_init_creds(cli, user, domain, password);
1762
1763 *output_cli = cli;
1764 return NT_STATUS_OK;
1765 }
1766
1767 /****************************************************************************
1768 Attempt a NetBIOS session request, falling back to *SMBSERVER if needed.
1769 ****************************************************************************/
1770
1771 bool attempt_netbios_session_request(struct cli_state **ppcli, const char *srchost, const char *desthost,
1772 struct sockaddr_storage *pdest_ss)
1773 {
1774 struct nmb_name calling, called;
1775
1776 make_nmb_name(&calling, srchost, 0x0);
1777
1778 /*
1779 * If the called name is an IP address
1780 * then use *SMBSERVER immediately.
1781 */
1782
1783 if(is_ipaddress(desthost)) {
1784 make_nmb_name(&called, star_smbserver_name, 0x20);
1785 } else {
1786 make_nmb_name(&called, desthost, 0x20);
1787 }
1788
1789 if (!cli_session_request(*ppcli, &calling, &called)) {
1790 NTSTATUS status;
1791 struct nmb_name smbservername;
1792
1793 make_nmb_name(&smbservername, star_smbserver_name, 0x20);
1794
1795 /*
1796 * If the name wasn't *SMBSERVER then
1797 * try with *SMBSERVER if the first name fails.
1798 */
1799
1800 if (nmb_name_equal(&called, &smbservername)) {
1801
1802 /*
1803 * The name used was *SMBSERVER, don't bother with another name.
1804 */
1805
1806 DEBUG(0,("attempt_netbios_session_request: %s rejected the session for name *SMBSERVER \
1807 with error %s.\n", desthost, cli_errstr(*ppcli) ));
1808 return False;
1809 }
1810
1811 /* Try again... */
1812 cli_shutdown(*ppcli);
1813
1814 *ppcli = cli_initialise();
1815 if (!*ppcli) {
1816 /* Out of memory... */
1817 return False;
1818 }
1819
1820 status = cli_connect(*ppcli, desthost, pdest_ss);
1821 if (!NT_STATUS_IS_OK(status) ||
1822 !cli_session_request(*ppcli, &calling, &smbservername)) {
1823 DEBUG(0,("attempt_netbios_session_request: %s rejected the session for \
1824 name *SMBSERVER with error %s\n", desthost, cli_errstr(*ppcli) ));
1825 return False;
1826 }
1827 }
1828
1829 return True;
1830 }
1831
1832 /****************************************************************************
1833 Send an old style tcon.
1834 ****************************************************************************/
1835 NTSTATUS cli_raw_tcon(struct cli_state *cli,
1836 const char *service, const char *pass, const char *dev,
1837 uint16 *max_xmit, uint16 *tid)
1838 {
1839 char *p;
1840
1841 if (!lp_client_plaintext_auth() && (*pass)) {
1842 DEBUG(1, ("Server requested plaintext password but 'client "
1843 "plaintext auth' is disabled\n"));
1844 return NT_STATUS_ACCESS_DENIED;
1845 }
1846
1847 memset(cli->outbuf,'\0',smb_size);
1848 memset(cli->inbuf,'\0',smb_size);
1849
1850 cli_set_message(cli->outbuf, 0, 0, True);
1851 SCVAL(cli->outbuf,smb_com,SMBtcon);
1852 cli_setup_packet(cli);
1853
1854 p = smb_buf(cli->outbuf);
1855 *p++ = 4; p += clistr_push(cli, p, service, -1, STR_TERMINATE | STR_NOALIGN);
1856 *p++ = 4; p += clistr_push(cli, p, pass, -1, STR_TERMINATE | STR_NOALIGN);
1857 *p++ = 4; p += clistr_push(cli, p, dev, -1, STR_TERMINATE | STR_NOALIGN);
1858
1859 cli_setup_bcc(cli, p);
1860
1861 cli_send_smb(cli);
1862 if (!cli_receive_smb(cli)) {
1863 return NT_STATUS_UNEXPECTED_NETWORK_ERROR;
1864 }
1865
1866 if (cli_is_error(cli)) {
1867 return cli_nt_error(cli);
1868 }
1869
1870 *max_xmit = SVAL(cli->inbuf, smb_vwv0);
1871 *tid = SVAL(cli->inbuf, smb_vwv1);
1872
1873 return NT_STATUS_OK;
1874 }
1875
1876 /* Return a cli_state pointing at the IPC$ share for the given server */
1877
1878 struct cli_state *get_ipc_connect(char *server,
1879 struct sockaddr_storage *server_ss,
1880 const struct user_auth_info *user_info)
1881 {
1882 struct cli_state *cli;
1883 NTSTATUS nt_status;
1884 uint32_t flags = CLI_FULL_CONNECTION_ANONYMOUS_FALLBACK;
1885
1886 if (user_info->use_kerberos) {
1887 flags |= CLI_FULL_CONNECTION_USE_KERBEROS;
1888 }
1889
1890 nt_status = cli_full_connection(&cli, NULL, server, server_ss, 0, "IPC$", "IPC",
1891 user_info->username ? user_info->username : "",
1892 lp_workgroup(),
1893 user_info->password ? user_info->password : "",
1894 flags,
1895 Undefined, NULL);
1896
1897 if (NT_STATUS_IS_OK(nt_status)) {
1898 return cli;
1899 } else if (is_ipaddress(server)) {
1900 /* windows 9* needs a correct NMB name for connections */
1901 fstring remote_name;
1902
1903 if (name_status_find("*", 0, 0, server_ss, remote_name)) {
1904 cli = get_ipc_connect(remote_name, server_ss, user_info);
1905 if (cli)
1906 return cli;
1907 }
1908 }
1909 return NULL;
1910 }
1911
1912 /*
1913 * Given the IP address of a master browser on the network, return its
1914 * workgroup and connect to it.
1915 *
1916 * This function is provided to allow additional processing beyond what
1917 * get_ipc_connect_master_ip_bcast() does, e.g. to retrieve the list of master
1918 * browsers and obtain each master browsers' list of domains (in case the
1919 * first master browser is recently on the network and has not yet
1920 * synchronized with other master browsers and therefore does not yet have the
1921 * entire network browse list)
1922 */
1923
1924 struct cli_state *get_ipc_connect_master_ip(TALLOC_CTX *ctx,
1925 struct ip_service *mb_ip,
1926 const struct user_auth_info *user_info,
1927 char **pp_workgroup_out)
1928 {
1929 char addr[INET6_ADDRSTRLEN];
1930 fstring name;
1931 struct cli_state *cli;
1932 struct sockaddr_storage server_ss;
1933
1934 *pp_workgroup_out = NULL;
1935
1936 print_sockaddr(addr, sizeof(addr), &mb_ip->ss);
1937 DEBUG(99, ("Looking up name of master browser %s\n",
1938 addr));
1939
1940 /*
1941 * Do a name status query to find out the name of the master browser.
1942 * We use <01><02>__MSBROWSE__<02>#01 if *#00 fails because a domain
1943 * master browser will not respond to a wildcard query (or, at least,
1944 * an NT4 server acting as the domain master browser will not).
1945 *
1946 * We might be able to use ONLY the query on MSBROWSE, but that's not
1947 * yet been tested with all Windows versions, so until it is, leave
1948 * the original wildcard query as the first choice and fall back to
1949 * MSBROWSE if the wildcard query fails.
1950 */
1951 if (!name_status_find("*", 0, 0x1d, &mb_ip->ss, name) &&
1952 !name_status_find(MSBROWSE, 1, 0x1d, &mb_ip->ss, name)) {
1953
1954 DEBUG(99, ("Could not retrieve name status for %s\n",
1955 addr));
1956 return NULL;
1957 }
1958
1959 if (!find_master_ip(name, &server_ss)) {
1960 DEBUG(99, ("Could not find master ip for %s\n", name));
1961 return NULL;
1962 }
1963
1964 *pp_workgroup_out = talloc_strdup(ctx, name);
1965
1966 DEBUG(4, ("found master browser %s, %s\n", name, addr));
1967
1968 print_sockaddr(addr, sizeof(addr), &server_ss);
1969 cli = get_ipc_connect(addr, &server_ss, user_info);
1970
1971 return cli;
1972 }
1973
1974 /*
1975 * Return the IP address and workgroup of a master browser on the network, and
1976 * connect to it.
1977 */
1978
1979 struct cli_state *get_ipc_connect_master_ip_bcast(TALLOC_CTX *ctx,
1980 const struct user_auth_info *user_info,
1981 char **pp_workgroup_out)
1982 {
1983 struct ip_service *ip_list;
1984 struct cli_state *cli;
1985 int i, count;
1986
1987 *pp_workgroup_out = NULL;
1988
1989 DEBUG(99, ("Do broadcast lookup for workgroups on local network\n"));
1990
1991 /* Go looking for workgroups by broadcasting on the local network */
1992
1993 if (!NT_STATUS_IS_OK(name_resolve_bcast(MSBROWSE, 1, &ip_list,
1994 &count))) {
1995 DEBUG(99, ("No master browsers responded\n"));
1996 return False;
1997 }
1998
1999 for (i = 0; i < count; i++) {
2000 char addr[INET6_ADDRSTRLEN];
2001 print_sockaddr(addr, sizeof(addr), &ip_list[i].ss);
2002 DEBUG(99, ("Found master browser %s\n", addr));
2003
2004 cli = get_ipc_connect_master_ip(ctx, &ip_list[i],
2005 user_info, pp_workgroup_out);
2006 if (cli)
2007 return(cli);
2008 }
2009
2010 return NULL;
2011 }
Samba GIT mirror