source: trunk/server/source3/libsmb/cliconnect.c@ 593

Last change on this file since 593 was 590, checked in by Herwig Bauernfeind, 14 years ago

Samba 3.5: Update trunk to 3.5.6
File size: 72.2 KB
Line 
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#include "../libcli/auth/libcli_auth.h"
23#include "../libcli/auth/spnego.h"
24#include "smb_krb5.h"
25
26static const struct {
27 int prot;
28 const char name[24];
29} prots[10] = {
30 {PROTOCOL_CORE, "PC NETWORK PROGRAM 1.0"},
31 {PROTOCOL_COREPLUS, "MICROSOFT NETWORKS 1.03"},
32 {PROTOCOL_LANMAN1, "MICROSOFT NETWORKS 3.0"},
33 {PROTOCOL_LANMAN1, "LANMAN1.0"},
34 {PROTOCOL_LANMAN2, "LM1.2X002"},
35 {PROTOCOL_LANMAN2, "DOS LANMAN2.1"},
36 {PROTOCOL_LANMAN2, "LANMAN2.1"},
37 {PROTOCOL_LANMAN2, "Samba"},
38 {PROTOCOL_NT1, "NT LANMAN 1.0"},
39 {PROTOCOL_NT1, "NT LM 0.12"},
40};
41
42#define STAR_SMBSERVER "*SMBSERVER"
43
44/**
45 * Set the user session key for a connection
46 * @param cli The cli structure to add it too
47 * @param session_key The session key used. (A copy of this is taken for the cli struct)
48 *
49 */
50
51static void cli_set_session_key (struct cli_state *cli, const DATA_BLOB session_key)
52{
53 cli->user_session_key = data_blob(session_key.data, session_key.length);
54}
55
56/****************************************************************************
57 Do an old lanman2 style session setup.
58****************************************************************************/
59
60static NTSTATUS cli_session_setup_lanman2(struct cli_state *cli,
61 const char *user,
62 const char *pass, size_t passlen,
63 const char *workgroup)
64{
65 DATA_BLOB session_key = data_blob_null;
66 DATA_BLOB lm_response = data_blob_null;
67 NTSTATUS status;
68 fstring pword;
69 char *p;
70
71 if (passlen > sizeof(pword)-1) {
72 return NT_STATUS_INVALID_PARAMETER;
73 }
74
75 /* LANMAN servers predate NT status codes and Unicode and ignore those
76 smb flags so we must disable the corresponding default capabilities
77 that would otherwise cause the Unicode and NT Status flags to be
78 set (and even returned by the server) */
79
80 cli->capabilities &= ~(CAP_UNICODE | CAP_STATUS32);
81
82 /* if in share level security then don't send a password now */
83 if (!(cli->sec_mode & NEGOTIATE_SECURITY_USER_LEVEL))
84 passlen = 0;
85
86 if (passlen > 0 && (cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) && passlen != 24) {
87 /* Encrypted mode needed, and non encrypted password supplied. */
88 lm_response = data_blob(NULL, 24);
89 if (!SMBencrypt(pass, cli->secblob.data,(uchar *)lm_response.data)) {
90 DEBUG(1, ("Password is > 14 chars in length, and is therefore incompatible with Lanman authentication\n"));
91 return NT_STATUS_ACCESS_DENIED;
92 }
93 } else if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) && passlen == 24) {
94 /* Encrypted mode needed, and encrypted password supplied. */
95 lm_response = data_blob(pass, passlen);
96 } else if (passlen > 0) {
97 /* Plaintext mode needed, assume plaintext supplied. */
98 passlen = clistr_push(cli, pword, pass, sizeof(pword), STR_TERMINATE);
99 lm_response = data_blob(pass, passlen);
100 }
101
102 /* send a session setup command */
103 memset(cli->outbuf,'\0',smb_size);
104 cli_set_message(cli->outbuf,10, 0, True);
105 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
106 cli_setup_packet(cli);
107
108 SCVAL(cli->outbuf,smb_vwv0,0xFF);
109 SSVAL(cli->outbuf,smb_vwv2,cli->max_xmit);
110 SSVAL(cli->outbuf,smb_vwv3,2);
111 SSVAL(cli->outbuf,smb_vwv4,1);
112 SIVAL(cli->outbuf,smb_vwv5,cli->sesskey);
113 SSVAL(cli->outbuf,smb_vwv7,lm_response.length);
114
115 p = smb_buf(cli->outbuf);
116 memcpy(p,lm_response.data,lm_response.length);
117 p += lm_response.length;
118 p += clistr_push(cli, p, user, -1, STR_TERMINATE|STR_UPPER);
119 p += clistr_push(cli, p, workgroup, -1, STR_TERMINATE|STR_UPPER);
120 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
121 p += clistr_push(cli, p, "Samba", -1, STR_TERMINATE);
122 cli_setup_bcc(cli, p);
123
124 if (!cli_send_smb(cli) || !cli_receive_smb(cli)) {
125 return cli_nt_error(cli);
126 }
127
128 show_msg(cli->inbuf);
129
130 if (cli_is_error(cli)) {
131 return cli_nt_error(cli);
132 }
133
134 /* use the returned vuid from now on */
135 cli->vuid = SVAL(cli->inbuf,smb_uid);
136 status = cli_set_username(cli, user);
137 if (!NT_STATUS_IS_OK(status)) {
138 return status;
139 }
140
141 if (session_key.data) {
142 /* Have plaintext orginal */
143 cli_set_session_key(cli, session_key);
144 }
145
146 return NT_STATUS_OK;
147}
148
149/****************************************************************************
150 Work out suitable capabilities to offer the server.
151****************************************************************************/
152
153static uint32 cli_session_setup_capabilities(struct cli_state *cli)
154{
155 uint32 capabilities = CAP_NT_SMBS;
156
157 if (!cli->force_dos_errors)
158 capabilities |= CAP_STATUS32;
159
160 if (cli->use_level_II_oplocks)
161 capabilities |= CAP_LEVEL_II_OPLOCKS;
162
163 capabilities |= (cli->capabilities & (CAP_UNICODE|CAP_LARGE_FILES|CAP_LARGE_READX|CAP_LARGE_WRITEX|CAP_DFS));
164 return capabilities;
165}
166
167/****************************************************************************
168 Do a NT1 guest session setup.
169****************************************************************************/
170
171struct cli_session_setup_guest_state {
172 struct cli_state *cli;
173 uint16_t vwv[16];
174 struct iovec bytes;
175};
176
177static void cli_session_setup_guest_done(struct tevent_req *subreq);
178
179struct tevent_req *cli_session_setup_guest_create(TALLOC_CTX *mem_ctx,
180 struct event_context *ev,
181 struct cli_state *cli,
182 struct tevent_req **psmbreq)
183{
184 struct tevent_req *req, *subreq;
185 struct cli_session_setup_guest_state *state;
186 uint16_t *vwv;
187 uint8_t *bytes;
188
189 req = tevent_req_create(mem_ctx, &state,
190 struct cli_session_setup_guest_state);
191 if (req == NULL) {
192 return NULL;
193 }
194 state->cli = cli;
195 vwv = state->vwv;
196
197 SCVAL(vwv+0, 0, 0xFF);
198 SCVAL(vwv+0, 1, 0);
199 SSVAL(vwv+1, 0, 0);
200 SSVAL(vwv+2, 0, CLI_BUFFER_SIZE);
201 SSVAL(vwv+3, 0, 2);
202 SSVAL(vwv+4, 0, cli->pid);
203 SIVAL(vwv+5, 0, cli->sesskey);
204 SSVAL(vwv+7, 0, 0);
205 SSVAL(vwv+8, 0, 0);
206 SSVAL(vwv+9, 0, 0);
207 SSVAL(vwv+10, 0, 0);
208 SIVAL(vwv+11, 0, cli_session_setup_capabilities(cli));
209
210 bytes = talloc_array(state, uint8_t, 0);
211
212 bytes = smb_bytes_push_str(bytes, cli_ucs2(cli), "", 1, /* username */
213 NULL);
214 bytes = smb_bytes_push_str(bytes, cli_ucs2(cli), "", 1, /* workgroup */
215 NULL);
216 bytes = smb_bytes_push_str(bytes, cli_ucs2(cli), "Unix", 5, NULL);
217 bytes = smb_bytes_push_str(bytes, cli_ucs2(cli), "Samba", 6, NULL);
218
219 if (bytes == NULL) {
220 TALLOC_FREE(req);
221 return NULL;
222 }
223
224 state->bytes.iov_base = (void *)bytes;
225 state->bytes.iov_len = talloc_get_size(bytes);
226
227 subreq = cli_smb_req_create(state, ev, cli, SMBsesssetupX, 0, 13, vwv,
228 1, &state->bytes);
229 if (subreq == NULL) {
230 TALLOC_FREE(req);
231 return NULL;
232 }
233 tevent_req_set_callback(subreq, cli_session_setup_guest_done, req);
234 *psmbreq = subreq;
235 return req;
236}
237
238struct tevent_req *cli_session_setup_guest_send(TALLOC_CTX *mem_ctx,
239 struct event_context *ev,
240 struct cli_state *cli)
241{
242 struct tevent_req *req, *subreq;
243 NTSTATUS status;
244
245 req = cli_session_setup_guest_create(mem_ctx, ev, cli, &subreq);
246 if (req == NULL) {
247 return NULL;
248 }
249
250 status = cli_smb_req_send(subreq);
251 if (NT_STATUS_IS_OK(status)) {
252 tevent_req_nterror(req, status);
253 return tevent_req_post(req, ev);
254 }
255 return req;
256}
257
258static void cli_session_setup_guest_done(struct tevent_req *subreq)
259{
260 struct tevent_req *req = tevent_req_callback_data(
261 subreq, struct tevent_req);
262 struct cli_session_setup_guest_state *state = tevent_req_data(
263 req, struct cli_session_setup_guest_state);
264 struct cli_state *cli = state->cli;
265 uint32_t num_bytes;
266 char *inbuf;
267 uint8_t *bytes;
268 uint8_t *p;
269 NTSTATUS status;
270
271 status = cli_smb_recv(subreq, 0, NULL, NULL, &num_bytes, &bytes);
272 if (!NT_STATUS_IS_OK(status)) {
273 TALLOC_FREE(subreq);
274 tevent_req_nterror(req, status);
275 return;
276 }
277
278 inbuf = (char *)cli_smb_inbuf(subreq);
279 p = bytes;
280
281 cli->vuid = SVAL(inbuf, smb_uid);
282
283 p += clistr_pull(inbuf, cli->server_os, (char *)p, sizeof(fstring),
284 bytes+num_bytes-p, STR_TERMINATE);
285 p += clistr_pull(inbuf, cli->server_type, (char *)p, sizeof(fstring),
286 bytes+num_bytes-p, STR_TERMINATE);
287 p += clistr_pull(inbuf, cli->server_domain, (char *)p, sizeof(fstring),
288 bytes+num_bytes-p, STR_TERMINATE);
289
290 if (strstr(cli->server_type, "Samba")) {
291 cli->is_samba = True;
292 }
293
294 TALLOC_FREE(subreq);
295
296 status = cli_set_username(cli, "");
297 if (!NT_STATUS_IS_OK(status)) {
298 tevent_req_nterror(req, status);
299 return;
300 }
301 tevent_req_done(req);
302}
303
304NTSTATUS cli_session_setup_guest_recv(struct tevent_req *req)
305{
306 return tevent_req_simple_recv_ntstatus(req);
307}
308
309static NTSTATUS cli_session_setup_guest(struct cli_state *cli)
310{
311 TALLOC_CTX *frame = talloc_stackframe();
312 struct event_context *ev;
313 struct tevent_req *req;
314 NTSTATUS status = NT_STATUS_OK;
315
316 if (cli_has_async_calls(cli)) {
317 /*
318 * Can't use sync call while an async call is in flight
319 */
320 status = NT_STATUS_INVALID_PARAMETER;
321 goto fail;
322 }
323
324 ev = event_context_init(frame);
325 if (ev == NULL) {
326 status = NT_STATUS_NO_MEMORY;
327 goto fail;
328 }
329
330 req = cli_session_setup_guest_send(frame, ev, cli);
331 if (req == NULL) {
332 status = NT_STATUS_NO_MEMORY;
333 goto fail;
334 }
335
336 if (!tevent_req_poll(req, ev)) {
337 status = map_nt_error_from_unix(errno);
338 goto fail;
339 }
340
341 status = cli_session_setup_guest_recv(req);
342 fail:
343 TALLOC_FREE(frame);
344 if (!NT_STATUS_IS_OK(status)) {
345 cli_set_error(cli, status);
346 }
347 return status;
348}
349
350/****************************************************************************
351 Do a NT1 plaintext session setup.
352****************************************************************************/
353
354static NTSTATUS cli_session_setup_plaintext(struct cli_state *cli,
355 const char *user, const char *pass,
356 const char *workgroup)
357{
358 uint32 capabilities = cli_session_setup_capabilities(cli);
359 char *p;
360 NTSTATUS status;
361 fstring lanman;
362
363 fstr_sprintf( lanman, "Samba %s", samba_version_string());
364
365 memset(cli->outbuf, '\0', smb_size);
366 cli_set_message(cli->outbuf,13,0,True);
367 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
368 cli_setup_packet(cli);
369
370 SCVAL(cli->outbuf,smb_vwv0,0xFF);
371 SSVAL(cli->outbuf,smb_vwv2,CLI_BUFFER_SIZE);
372 SSVAL(cli->outbuf,smb_vwv3,2);
373 SSVAL(cli->outbuf,smb_vwv4,cli->pid);
374 SIVAL(cli->outbuf,smb_vwv5,cli->sesskey);
375 SSVAL(cli->outbuf,smb_vwv8,0);
376 SIVAL(cli->outbuf,smb_vwv11,capabilities);
377 p = smb_buf(cli->outbuf);
378
379 /* check wether to send the ASCII or UNICODE version of the password */
380
381 if ( (capabilities & CAP_UNICODE) == 0 ) {
382 p += clistr_push(cli, p, pass, -1, STR_TERMINATE); /* password */
383 SSVAL(cli->outbuf,smb_vwv7,PTR_DIFF(p, smb_buf(cli->outbuf)));
384 }
385 else {
386 /* For ucs2 passwords clistr_push calls ucs2_align, which causes
387 * the space taken by the unicode password to be one byte too
388 * long (as we're on an odd byte boundary here). Reduce the
389 * count by 1 to cope with this. Fixes smbclient against NetApp
390 * servers which can't cope. Fix from
391 * bryan.kolodziej@allenlund.com in bug #3840.
392 */
393 p += clistr_push(cli, p, pass, -1, STR_UNICODE|STR_TERMINATE); /* unicode password */
394 SSVAL(cli->outbuf,smb_vwv8,PTR_DIFF(p, smb_buf(cli->outbuf))-1);
395 }
396
397 p += clistr_push(cli, p, user, -1, STR_TERMINATE); /* username */
398 p += clistr_push(cli, p, workgroup, -1, STR_TERMINATE); /* workgroup */
399 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
400 p += clistr_push(cli, p, lanman, -1, STR_TERMINATE);
401 cli_setup_bcc(cli, p);
402
403 if (!cli_send_smb(cli) || !cli_receive_smb(cli)) {
404 return cli_nt_error(cli);
405 }
406
407 show_msg(cli->inbuf);
408
409 if (cli_is_error(cli)) {
410 return cli_nt_error(cli);
411 }
412
413 cli->vuid = SVAL(cli->inbuf,smb_uid);
414 p = smb_buf(cli->inbuf);
415 p += clistr_pull(cli->inbuf, cli->server_os, p, sizeof(fstring),
416 -1, STR_TERMINATE);
417 p += clistr_pull(cli->inbuf, cli->server_type, p, sizeof(fstring),
418 -1, STR_TERMINATE);
419 p += clistr_pull(cli->inbuf, cli->server_domain, p, sizeof(fstring),
420 -1, STR_TERMINATE);
421 status = cli_set_username(cli, user);
422 if (!NT_STATUS_IS_OK(status)) {
423 return status;
424 }
425 if (strstr(cli->server_type, "Samba")) {
426 cli->is_samba = True;
427 }
428
429 return NT_STATUS_OK;
430}
431
432/****************************************************************************
433 do a NT1 NTLM/LM encrypted session setup - for when extended security
434 is not negotiated.
435 @param cli client state to create do session setup on
436 @param user username
437 @param pass *either* cleartext password (passlen !=24) or LM response.
438 @param ntpass NT response, implies ntpasslen >=24, implies pass is not clear
439 @param workgroup The user's domain.
440****************************************************************************/
441
442static NTSTATUS cli_session_setup_nt1(struct cli_state *cli, const char *user,
443 const char *pass, size_t passlen,
444 const char *ntpass, size_t ntpasslen,
445 const char *workgroup)
446{
447 uint32 capabilities = cli_session_setup_capabilities(cli);
448 DATA_BLOB lm_response = data_blob_null;
449 DATA_BLOB nt_response = data_blob_null;
450 DATA_BLOB session_key = data_blob_null;
451 NTSTATUS result;
452 char *p;
453 bool ok;
454
455 if (passlen == 0) {
456 /* do nothing - guest login */
457 } else if (passlen != 24) {
458 if (lp_client_ntlmv2_auth()) {
459 DATA_BLOB server_chal;
460 DATA_BLOB names_blob;
461 server_chal = data_blob(cli->secblob.data, MIN(cli->secblob.length, 8));
462
463 /* note that the 'workgroup' here is a best guess - we don't know
464 the server's domain at this point. The 'server name' is also
465 dodgy...
466 */
467 names_blob = NTLMv2_generate_names_blob(NULL, cli->called.name, workgroup);
468
469 if (!SMBNTLMv2encrypt(NULL, user, workgroup, pass, &server_chal,
470 &names_blob,
471 &lm_response, &nt_response, NULL, &session_key)) {
472 data_blob_free(&names_blob);
473 data_blob_free(&server_chal);
474 return NT_STATUS_ACCESS_DENIED;
475 }
476 data_blob_free(&names_blob);
477 data_blob_free(&server_chal);
478
479 } else {
480 uchar nt_hash[16];
481 E_md4hash(pass, nt_hash);
482
483#ifdef LANMAN_ONLY
484 nt_response = data_blob_null;
485#else
486 nt_response = data_blob(NULL, 24);
487 SMBNTencrypt(pass,cli->secblob.data,nt_response.data);
488#endif
489 /* non encrypted password supplied. Ignore ntpass. */
490 if (lp_client_lanman_auth()) {
491 lm_response = data_blob(NULL, 24);
492 if (!SMBencrypt(pass,cli->secblob.data, lm_response.data)) {
493 /* Oops, the LM response is invalid, just put
494 the NT response there instead */
495 data_blob_free(&lm_response);
496 lm_response = data_blob(nt_response.data, nt_response.length);
497 }
498 } else {
499 /* LM disabled, place NT# in LM field instead */
500 lm_response = data_blob(nt_response.data, nt_response.length);
501 }
502
503 session_key = data_blob(NULL, 16);
504#ifdef LANMAN_ONLY
505 E_deshash(pass, session_key.data);
506 memset(&session_key.data[8], '\0', 8);
507#else
508 SMBsesskeygen_ntv1(nt_hash, session_key.data);
509#endif
510 }
511 cli_temp_set_signing(cli);
512 } else {
513 /* pre-encrypted password supplied. Only used for
514 security=server, can't do
515 signing because we don't have original key */
516
517 lm_response = data_blob(pass, passlen);
518 nt_response = data_blob(ntpass, ntpasslen);
519 }
520
521 /* send a session setup command */
522 memset(cli->outbuf,'\0',smb_size);
523
524 cli_set_message(cli->outbuf,13,0,True);
525 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
526 cli_setup_packet(cli);
527
528 SCVAL(cli->outbuf,smb_vwv0,0xFF);
529 SSVAL(cli->outbuf,smb_vwv2,CLI_BUFFER_SIZE);
530 SSVAL(cli->outbuf,smb_vwv3,2);
531 SSVAL(cli->outbuf,smb_vwv4,cli->pid);
532 SIVAL(cli->outbuf,smb_vwv5,cli->sesskey);
533 SSVAL(cli->outbuf,smb_vwv7,lm_response.length);
534 SSVAL(cli->outbuf,smb_vwv8,nt_response.length);
535 SIVAL(cli->outbuf,smb_vwv11,capabilities);
536 p = smb_buf(cli->outbuf);
537 if (lm_response.length) {
538 memcpy(p,lm_response.data, lm_response.length); p += lm_response.length;
539 }
540 if (nt_response.length) {
541 memcpy(p,nt_response.data, nt_response.length); p += nt_response.length;
542 }
543 p += clistr_push(cli, p, user, -1, STR_TERMINATE);
544
545 /* Upper case here might help some NTLMv2 implementations */
546 p += clistr_push(cli, p, workgroup, -1, STR_TERMINATE|STR_UPPER);
547 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
548 p += clistr_push(cli, p, "Samba", -1, STR_TERMINATE);
549 cli_setup_bcc(cli, p);
550
551 if (!cli_send_smb(cli) || !cli_receive_smb(cli)) {
552 result = cli_nt_error(cli);
553 goto end;
554 }
555
556 /* show_msg(cli->inbuf); */
557
558 if (cli_is_error(cli)) {
559 result = cli_nt_error(cli);
560 goto end;
561 }
562
563#ifdef LANMAN_ONLY
564 ok = cli_simple_set_signing(cli, session_key, lm_response);
565#else
566 ok = cli_simple_set_signing(cli, session_key, nt_response);
567#endif
568 if (ok) {
569 if (!cli_check_sign_mac(cli, cli->inbuf, 1)) {
570 result = NT_STATUS_ACCESS_DENIED;
571 goto end;
572 }
573 }
574
575 /* use the returned vuid from now on */
576 cli->vuid = SVAL(cli->inbuf,smb_uid);
577
578 p = smb_buf(cli->inbuf);
579 p += clistr_pull(cli->inbuf, cli->server_os, p, sizeof(fstring),
580 -1, STR_TERMINATE);
581 p += clistr_pull(cli->inbuf, cli->server_type, p, sizeof(fstring),
582 -1, STR_TERMINATE);
583 p += clistr_pull(cli->inbuf, cli->server_domain, p, sizeof(fstring),
584 -1, STR_TERMINATE);
585
586 if (strstr(cli->server_type, "Samba")) {
587 cli->is_samba = True;
588 }
589
590 result = cli_set_username(cli, user);
591 if (!NT_STATUS_IS_OK(result)) {
592 goto end;
593 }
594
595 if (session_key.data) {
596 /* Have plaintext orginal */
597 cli_set_session_key(cli, session_key);
598 }
599
600 result = NT_STATUS_OK;
601end:
602 data_blob_free(&lm_response);
603 data_blob_free(&nt_response);
604 data_blob_free(&session_key);
605 return result;
606}
607
608/****************************************************************************
609 Send a extended security session setup blob
610****************************************************************************/
611
612static bool cli_session_setup_blob_send(struct cli_state *cli, DATA_BLOB blob)
613{
614 uint32 capabilities = cli_session_setup_capabilities(cli);
615 char *p;
616
617 capabilities |= CAP_EXTENDED_SECURITY;
618
619 /* send a session setup command */
620 memset(cli->outbuf,'\0',smb_size);
621
622 cli_set_message(cli->outbuf,12,0,True);
623 SCVAL(cli->outbuf,smb_com,SMBsesssetupX);
624
625 cli_setup_packet(cli);
626
627 SCVAL(cli->outbuf,smb_vwv0,0xFF);
628 SSVAL(cli->outbuf,smb_vwv2,CLI_BUFFER_SIZE);
629 SSVAL(cli->outbuf,smb_vwv3,2);
630 SSVAL(cli->outbuf,smb_vwv4,1);
631 SIVAL(cli->outbuf,smb_vwv5,0);
632 SSVAL(cli->outbuf,smb_vwv7,blob.length);
633 SIVAL(cli->outbuf,smb_vwv10,capabilities);
634 p = smb_buf(cli->outbuf);
635 memcpy(p, blob.data, blob.length);
636 p += blob.length;
637 p += clistr_push(cli, p, "Unix", -1, STR_TERMINATE);
638 p += clistr_push(cli, p, "Samba", -1, STR_TERMINATE);
639 cli_setup_bcc(cli, p);
640 return cli_send_smb(cli);
641}
642
643/****************************************************************************
644 Send a extended security session setup blob, returning a reply blob.
645****************************************************************************/
646
647static DATA_BLOB cli_session_setup_blob_receive(struct cli_state *cli)
648{
649 DATA_BLOB blob2 = data_blob_null;
650 char *p;
651 size_t len;
652
653 if (!cli_receive_smb(cli))
654 return blob2;
655
656 show_msg(cli->inbuf);
657
658 if (cli_is_error(cli) && !NT_STATUS_EQUAL(cli_nt_error(cli),
659 NT_STATUS_MORE_PROCESSING_REQUIRED)) {
660 return blob2;
661 }
662
663 /* use the returned vuid from now on */
664 cli->vuid = SVAL(cli->inbuf,smb_uid);
665
666 p = smb_buf(cli->inbuf);
667
668 blob2 = data_blob(p, SVAL(cli->inbuf, smb_vwv3));
669
670 p += blob2.length;
671 p += clistr_pull(cli->inbuf, cli->server_os, p, sizeof(fstring),
672 -1, STR_TERMINATE);
673
674 /* w2k with kerberos doesn't properly null terminate this field */
675 len = smb_bufrem(cli->inbuf, p);
676 if (p + len < cli->inbuf + cli->bufsize+SAFETY_MARGIN - 2) {
677 char *end_of_buf = p + len;
678
679 SSVAL(p, len, 0);
680 /* Now it's null terminated. */
681 p += clistr_pull(cli->inbuf, cli->server_type, p, sizeof(fstring),
682 -1, STR_TERMINATE);
683 /*
684 * See if there's another string. If so it's the
685 * server domain (part of the 'standard' Samba
686 * server signature).
687 */
688 if (p < end_of_buf) {
689 p += clistr_pull(cli->inbuf, cli->server_domain, p, sizeof(fstring),
690 -1, STR_TERMINATE);
691 }
692 } else {
693 /*
694 * No room to null terminate so we can't see if there
695 * is another string (server_domain) afterwards.
696 */
697 p += clistr_pull(cli->inbuf, cli->server_type, p, sizeof(fstring),
698 len, 0);
699 }
700 return blob2;
701}
702
703#ifdef HAVE_KRB5
704/****************************************************************************
705 Send a extended security session setup blob, returning a reply blob.
706****************************************************************************/
707
708/* The following is calculated from :
709 * (smb_size-4) = 35
710 * (smb_wcnt * 2) = 24 (smb_wcnt == 12 in cli_session_setup_blob_send() )
711 * (strlen("Unix") + 1 + strlen("Samba") + 1) * 2 = 22 (unicode strings at
712 * end of packet.
713 */
714
715#define BASE_SESSSETUP_BLOB_PACKET_SIZE (35 + 24 + 22)
716
717static bool cli_session_setup_blob(struct cli_state *cli, DATA_BLOB blob)
718{
719 int32 remaining = blob.length;
720 int32 cur = 0;
721 DATA_BLOB send_blob = data_blob_null;
722 int32 max_blob_size = 0;
723 DATA_BLOB receive_blob = data_blob_null;
724
725 if (cli->max_xmit < BASE_SESSSETUP_BLOB_PACKET_SIZE + 1) {
726 DEBUG(0,("cli_session_setup_blob: cli->max_xmit too small "
727 "(was %u, need minimum %u)\n",
728 (unsigned int)cli->max_xmit,
729 BASE_SESSSETUP_BLOB_PACKET_SIZE));
730 cli_set_nt_error(cli, NT_STATUS_INVALID_PARAMETER);
731 return False;
732 }
733
734 max_blob_size = cli->max_xmit - BASE_SESSSETUP_BLOB_PACKET_SIZE;
735
736 while ( remaining > 0) {
737 if (remaining >= max_blob_size) {
738 send_blob.length = max_blob_size;
739 remaining -= max_blob_size;
740 } else {
741 send_blob.length = remaining;
742 remaining = 0;
743 }
744
745 send_blob.data = &blob.data[cur];
746 cur += send_blob.length;
747
748 DEBUG(10, ("cli_session_setup_blob: Remaining (%u) sending (%u) current (%u)\n",
749 (unsigned int)remaining,
750 (unsigned int)send_blob.length,
751 (unsigned int)cur ));
752
753 if (!cli_session_setup_blob_send(cli, send_blob)) {
754 DEBUG(0, ("cli_session_setup_blob: send failed\n"));
755 return False;
756 }
757
758 receive_blob = cli_session_setup_blob_receive(cli);
759 data_blob_free(&receive_blob);
760
761 if (cli_is_error(cli) &&
762 !NT_STATUS_EQUAL( cli_get_nt_error(cli),
763 NT_STATUS_MORE_PROCESSING_REQUIRED)) {
764 DEBUG(0, ("cli_session_setup_blob: receive failed "
765 "(%s)\n", nt_errstr(cli_get_nt_error(cli))));
766 cli->vuid = 0;
767 return False;
768 }
769 }
770
771 return True;
772}
773
774/****************************************************************************
775 Use in-memory credentials cache
776****************************************************************************/
777
778static void use_in_memory_ccache(void) {
779 setenv(KRB5_ENV_CCNAME, "MEMORY:cliconnect", 1);
780}
781
782/****************************************************************************
783 Do a spnego/kerberos encrypted session setup.
784****************************************************************************/
785
786static ADS_STATUS cli_session_setup_kerberos(struct cli_state *cli, const char *principal, const char *workgroup)
787{
788 DATA_BLOB negTokenTarg;
789 DATA_BLOB session_key_krb5;
790 NTSTATUS nt_status;
791 int rc;
792
793 cli_temp_set_signing(cli);
794
795 DEBUG(2,("Doing kerberos session setup\n"));
796
797 /* generate the encapsulated kerberos5 ticket */
798 rc = spnego_gen_negTokenTarg(principal, 0, &negTokenTarg, &session_key_krb5, 0, NULL);
799
800 if (rc) {
801 DEBUG(1, ("cli_session_setup_kerberos: spnego_gen_negTokenTarg failed: %s\n",
802 error_message(rc)));
803 return ADS_ERROR_KRB5(rc);
804 }
805
806#if 0
807 file_save("negTokenTarg.dat", negTokenTarg.data, negTokenTarg.length);
808#endif
809
810 if (!cli_session_setup_blob(cli, negTokenTarg)) {
811 nt_status = cli_nt_error(cli);
812 goto nt_error;
813 }
814
815 if (cli_is_error(cli)) {
816 nt_status = cli_nt_error(cli);
817 if (NT_STATUS_IS_OK(nt_status)) {
818 nt_status = NT_STATUS_UNSUCCESSFUL;
819 }
820 goto nt_error;
821 }
822
823 cli_set_session_key(cli, session_key_krb5);
824
825 if (cli_simple_set_signing(
826 cli, session_key_krb5, data_blob_null)) {
827
828 if (!cli_check_sign_mac(cli, cli->inbuf, 1)) {
829 nt_status = NT_STATUS_ACCESS_DENIED;
830 goto nt_error;
831 }
832 }
833
834 data_blob_free(&negTokenTarg);
835 data_blob_free(&session_key_krb5);
836
837 return ADS_ERROR_NT(NT_STATUS_OK);
838
839nt_error:
840 data_blob_free(&negTokenTarg);
841 data_blob_free(&session_key_krb5);
842 cli->vuid = 0;
843 return ADS_ERROR_NT(nt_status);
844}
845#endif /* HAVE_KRB5 */
846
847
848/****************************************************************************
849 Do a spnego/NTLMSSP encrypted session setup.
850****************************************************************************/
851
852static NTSTATUS cli_session_setup_ntlmssp(struct cli_state *cli, const char *user,
853 const char *pass, const char *domain)
854{
855 struct ntlmssp_state *ntlmssp_state;
856 NTSTATUS nt_status;
857 int turn = 1;
858 DATA_BLOB msg1;
859 DATA_BLOB blob = data_blob_null;
860 DATA_BLOB blob_in = data_blob_null;
861 DATA_BLOB blob_out = data_blob_null;
862
863 cli_temp_set_signing(cli);
864
865 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_client_start(&ntlmssp_state))) {
866 return nt_status;
867 }
868 ntlmssp_want_feature(ntlmssp_state, NTLMSSP_FEATURE_SESSION_KEY);
869 if (cli->use_ccache) {
870 ntlmssp_want_feature(ntlmssp_state, NTLMSSP_FEATURE_CCACHE);
871 }
872
873 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_set_username(ntlmssp_state, user))) {
874 return nt_status;
875 }
876 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_set_domain(ntlmssp_state, domain))) {
877 return nt_status;
878 }
879 if (!NT_STATUS_IS_OK(nt_status = ntlmssp_set_password(ntlmssp_state, pass))) {
880 return nt_status;
881 }
882
883 do {
884 nt_status = ntlmssp_update(ntlmssp_state,
885 blob_in, &blob_out);
886 data_blob_free(&blob_in);
887 if (NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED) || NT_STATUS_IS_OK(nt_status)) {
888 if (turn == 1) {
889 /* and wrap it in a SPNEGO wrapper */
890 msg1 = gen_negTokenInit(OID_NTLMSSP, blob_out);
891 } else {
892 /* wrap it in SPNEGO */
893 msg1 = spnego_gen_auth(blob_out);
894 }
895
896 /* now send that blob on its way */
897 if (!cli_session_setup_blob_send(cli, msg1)) {
898 DEBUG(3, ("Failed to send NTLMSSP/SPNEGO blob to server!\n"));
899 nt_status = NT_STATUS_UNSUCCESSFUL;
900 } else {
901 blob = cli_session_setup_blob_receive(cli);
902
903 nt_status = cli_nt_error(cli);
904 if (cli_is_error(cli) && NT_STATUS_IS_OK(nt_status)) {
905 if (cli->smb_rw_error == SMB_READ_BAD_SIG) {
906 nt_status = NT_STATUS_ACCESS_DENIED;
907 } else {
908 nt_status = NT_STATUS_UNSUCCESSFUL;
909 }
910 }
911 }
912 data_blob_free(&msg1);
913 }
914
915 if (!blob.length) {
916 if (NT_STATUS_IS_OK(nt_status)) {
917 nt_status = NT_STATUS_UNSUCCESSFUL;
918 }
919 } else if ((turn == 1) &&
920 NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED)) {
921 DATA_BLOB tmp_blob = data_blob_null;
922 /* the server might give us back two challenges */
923 if (!spnego_parse_challenge(blob, &blob_in,
924 &tmp_blob)) {
925 DEBUG(3,("Failed to parse challenges\n"));
926 nt_status = NT_STATUS_INVALID_PARAMETER;
927 }
928 data_blob_free(&tmp_blob);
929 } else {
930 if (!spnego_parse_auth_response(blob, nt_status, OID_NTLMSSP,
931 &blob_in)) {
932 DEBUG(3,("Failed to parse auth response\n"));
933 if (NT_STATUS_IS_OK(nt_status)
934 || NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED))
935 nt_status = NT_STATUS_INVALID_PARAMETER;
936 }
937 }
938 data_blob_free(&blob);
939 data_blob_free(&blob_out);
940 turn++;
941 } while (NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED));
942
943 data_blob_free(&blob_in);
944
945 if (NT_STATUS_IS_OK(nt_status)) {
946
947 if (cli->server_domain[0] == '\0') {
948 fstrcpy(cli->server_domain, ntlmssp_state->server_domain);
949 }
950 cli_set_session_key(cli, ntlmssp_state->session_key);
951
952 if (cli_simple_set_signing(
953 cli, ntlmssp_state->session_key, data_blob_null)) {
954
955 if (!cli_check_sign_mac(cli, cli->inbuf, 1)) {
956 nt_status = NT_STATUS_ACCESS_DENIED;
957 }
958 }
959 }
960
961 /* we have a reference conter on ntlmssp_state, if we are signing
962 then the state will be kept by the signing engine */
963
964 ntlmssp_end(&ntlmssp_state);
965
966 if (!NT_STATUS_IS_OK(nt_status)) {
967 cli->vuid = 0;
968 }
969 return nt_status;
970}
971
972/****************************************************************************
973 Do a spnego encrypted session setup.
974
975 user_domain: The shortname of the domain the user/machine is a member of.
976 dest_realm: The realm we're connecting to, if NULL we use our default realm.
977****************************************************************************/
978
979ADS_STATUS cli_session_setup_spnego(struct cli_state *cli, const char *user,
980 const char *pass, const char *user_domain,
981 const char * dest_realm)
982{
983 char *principal = NULL;
984 char *OIDs[ASN1_MAX_OIDS];
985 int i;
986 DATA_BLOB blob;
987 const char *p = NULL;
988 char *account = NULL;
989 NTSTATUS status;
990
991 DEBUG(3,("Doing spnego session setup (blob length=%lu)\n", (unsigned long)cli->secblob.length));
992
993 /* the server might not even do spnego */
994 if (cli->secblob.length <= 16) {
995 DEBUG(3,("server didn't supply a full spnego negprot\n"));
996 goto ntlmssp;
997 }
998
999#if 0
1000 file_save("negprot.dat", cli->secblob.data, cli->secblob.length);
1001#endif
1002
1003 /* there is 16 bytes of GUID before the real spnego packet starts */
1004 blob = data_blob(cli->secblob.data+16, cli->secblob.length-16);
1005
1006 /* The server sent us the first part of the SPNEGO exchange in the
1007 * negprot reply. It is WRONG to depend on the principal sent in the
1008 * negprot reply, but right now we do it. If we don't receive one,
1009 * we try to best guess, then fall back to NTLM. */
1010 if (!spnego_parse_negTokenInit(blob, OIDs, &principal) ||
1011 OIDs[0] == NULL) {
1012 data_blob_free(&blob);
1013 return ADS_ERROR_NT(NT_STATUS_INVALID_PARAMETER);
1014 }
1015 data_blob_free(&blob);
1016
1017 /* make sure the server understands kerberos */
1018 for (i=0;OIDs[i];i++) {
1019 if (i == 0)
1020 DEBUG(3,("got OID=%s\n", OIDs[i]));
1021 else
1022 DEBUGADD(3,("got OID=%s\n", OIDs[i]));
1023 if (strcmp(OIDs[i], OID_KERBEROS5_OLD) == 0 ||
1024 strcmp(OIDs[i], OID_KERBEROS5) == 0) {
1025 cli->got_kerberos_mechanism = True;
1026 }
1027 talloc_free(OIDs[i]);
1028 }
1029
1030 DEBUG(3,("got principal=%s\n", principal ? principal : "<null>"));
1031
1032 status = cli_set_username(cli, user);
1033 if (!NT_STATUS_IS_OK(status)) {
1034 return ADS_ERROR_NT(status);
1035 }
1036
1037#ifdef HAVE_KRB5
1038 /* If password is set we reauthenticate to kerberos server
1039 * and do not store results */
1040
1041 if (cli->got_kerberos_mechanism && cli->use_kerberos) {
1042 ADS_STATUS rc;
1043
1044 if (pass && *pass) {
1045 int ret;
1046
1047 use_in_memory_ccache();
1048 ret = kerberos_kinit_password(user, pass, 0 /* no time correction for now */, NULL);
1049
1050 if (ret){
1051 TALLOC_FREE(principal);
1052 DEBUG(0, ("Kinit failed: %s\n", error_message(ret)));
1053 if (cli->fallback_after_kerberos)
1054 goto ntlmssp;
1055 return ADS_ERROR_KRB5(ret);
1056 }
1057 }
1058
1059 /* If we get a bad principal, try to guess it if
1060 we have a valid host NetBIOS name.
1061 */
1062 if (strequal(principal, ADS_IGNORE_PRINCIPAL)) {
1063 TALLOC_FREE(principal);
1064 }
1065
1066 if (principal == NULL &&
1067 !is_ipaddress(cli->desthost) &&
1068 !strequal(STAR_SMBSERVER,
1069 cli->desthost)) {
1070 char *realm = NULL;
1071 char *machine = NULL;
1072 char *host = NULL;
1073 DEBUG(3,("cli_session_setup_spnego: got a "
1074 "bad server principal, trying to guess ...\n"));
1075
1076 host = strchr_m(cli->desthost, '.');
1077 if (host) {
1078 /* We had a '.' in the name. */
1079 machine = SMB_STRNDUP(cli->desthost,
1080 host - cli->desthost);
1081 } else {
1082 machine = SMB_STRDUP(cli->desthost);
1083 }
1084 if (machine == NULL) {
1085 return ADS_ERROR_NT(NT_STATUS_NO_MEMORY);
1086 }
1087
1088 if (dest_realm) {
1089 realm = SMB_STRDUP(dest_realm);
1090 strupper_m(realm);
1091 } else {
1092 if (host) {
1093 /* DNS name. */
1094 realm = kerberos_get_realm_from_hostname(cli->desthost);
1095 } else {
1096 /* NetBIOS name - use our realm. */
1097 realm = kerberos_get_default_realm_from_ccache();
1098 }
1099 }
1100
1101 if (realm && *realm) {
1102 if (host) {
1103 /* DNS name. */
1104 principal = talloc_asprintf(talloc_tos(),
1105 "cifs/%s@%s",
1106 cli->desthost,
1107 realm);
1108 } else {
1109 /* NetBIOS name, use machine account. */
1110 principal = talloc_asprintf(talloc_tos(),
1111 "%s$@%s",
1112 machine,
1113 realm);
1114 }
1115 if (!principal) {
1116 SAFE_FREE(machine);
1117 SAFE_FREE(realm);
1118 return ADS_ERROR_NT(NT_STATUS_NO_MEMORY);
1119 }
1120 DEBUG(3,("cli_session_setup_spnego: guessed "
1121 "server principal=%s\n",
1122 principal ? principal : "<null>"));
1123 }
1124 SAFE_FREE(machine);
1125 SAFE_FREE(realm);
1126 }
1127
1128 if (principal) {
1129 rc = cli_session_setup_kerberos(cli, principal,
1130 dest_realm);
1131 if (ADS_ERR_OK(rc) || !cli->fallback_after_kerberos) {
1132 TALLOC_FREE(principal);
1133 return rc;
1134 }
1135 }
1136 }
1137#endif
1138
1139 TALLOC_FREE(principal);
1140
1141ntlmssp:
1142
1143 account = talloc_strdup(talloc_tos(), user);
1144 if (!account) {
1145 return ADS_ERROR_NT(NT_STATUS_NO_MEMORY);
1146 }
1147
1148 /* when falling back to ntlmssp while authenticating with a machine
1149 * account strip off the realm - gd */
1150
1151 if ((p = strchr_m(user, '@')) != NULL) {
1152 account[PTR_DIFF(p,user)] = '\0';
1153 }
1154
1155 return ADS_ERROR_NT(cli_session_setup_ntlmssp(cli, account, pass, user_domain));
1156}
1157
1158/****************************************************************************
1159 Send a session setup. The username and workgroup is in UNIX character
1160 format and must be converted to DOS codepage format before sending. If the
1161 password is in plaintext, the same should be done.
1162****************************************************************************/
1163
1164NTSTATUS cli_session_setup(struct cli_state *cli,
1165 const char *user,
1166 const char *pass, int passlen,
1167 const char *ntpass, int ntpasslen,
1168 const char *workgroup)
1169{
1170 char *p;
1171 fstring user2;
1172
1173 if (user) {
1174 fstrcpy(user2, user);
1175 } else {
1176 user2[0] ='\0';
1177 }
1178
1179 if (!workgroup) {
1180 workgroup = "";
1181 }
1182
1183 /* allow for workgroups as part of the username */
1184 if ((p=strchr_m(user2,'\\')) || (p=strchr_m(user2,'/')) ||
1185 (p=strchr_m(user2,*lp_winbind_separator()))) {
1186 *p = 0;
1187 user = p+1;
1188 workgroup = user2;
1189 }
1190
1191 if (cli->protocol < PROTOCOL_LANMAN1) {
1192 return NT_STATUS_OK;
1193 }
1194
1195 /* now work out what sort of session setup we are going to
1196 do. I have split this into separate functions to make the
1197 flow a bit easier to understand (tridge) */
1198
1199 /* if its an older server then we have to use the older request format */
1200
1201 if (cli->protocol < PROTOCOL_NT1) {
1202 if (!lp_client_lanman_auth() && passlen != 24 && (*pass)) {
1203 DEBUG(1, ("Server requested LM password but 'client lanman auth'"
1204 " is disabled\n"));
1205 return NT_STATUS_ACCESS_DENIED;
1206 }
1207
1208 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) == 0 &&
1209 !lp_client_plaintext_auth() && (*pass)) {
1210 DEBUG(1, ("Server requested plaintext password but "
1211 "'client plaintext auth' is disabled\n"));
1212 return NT_STATUS_ACCESS_DENIED;
1213 }
1214
1215 return cli_session_setup_lanman2(cli, user, pass, passlen,
1216 workgroup);
1217 }
1218
1219 /* if no user is supplied then we have to do an anonymous connection.
1220 passwords are ignored */
1221
1222 if (!user || !*user)
1223 return cli_session_setup_guest(cli);
1224
1225 /* if the server is share level then send a plaintext null
1226 password at this point. The password is sent in the tree
1227 connect */
1228
1229 if ((cli->sec_mode & NEGOTIATE_SECURITY_USER_LEVEL) == 0)
1230 return cli_session_setup_plaintext(cli, user, "", workgroup);
1231
1232 /* if the server doesn't support encryption then we have to use
1233 plaintext. The second password is ignored */
1234
1235 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) == 0) {
1236 if (!lp_client_plaintext_auth() && (*pass)) {
1237 DEBUG(1, ("Server requested plaintext password but "
1238 "'client plaintext auth' is disabled\n"));
1239 return NT_STATUS_ACCESS_DENIED;
1240 }
1241 return cli_session_setup_plaintext(cli, user, pass, workgroup);
1242 }
1243
1244 /* if the server supports extended security then use SPNEGO */
1245
1246 if (cli->capabilities & CAP_EXTENDED_SECURITY) {
1247 ADS_STATUS status = cli_session_setup_spnego(cli, user, pass,
1248 workgroup, NULL);
1249 if (!ADS_ERR_OK(status)) {
1250 DEBUG(3, ("SPNEGO login failed: %s\n", ads_errstr(status)));
1251 return ads_ntstatus(status);
1252 }
1253 } else {
1254 NTSTATUS status;
1255
1256 /* otherwise do a NT1 style session setup */
1257 status = cli_session_setup_nt1(cli, user, pass, passlen,
1258 ntpass, ntpasslen, workgroup);
1259 if (!NT_STATUS_IS_OK(status)) {
1260 DEBUG(3,("cli_session_setup: NT1 session setup "
1261 "failed: %s\n", nt_errstr(status)));
1262 return status;
1263 }
1264 }
1265
1266 if (strstr(cli->server_type, "Samba")) {
1267 cli->is_samba = True;
1268 }
1269
1270 return NT_STATUS_OK;
1271}
1272
1273/****************************************************************************
1274 Send a uloggoff.
1275*****************************************************************************/
1276
1277bool cli_ulogoff(struct cli_state *cli)
1278{
1279 memset(cli->outbuf,'\0',smb_size);
1280 cli_set_message(cli->outbuf,2,0,True);
1281 SCVAL(cli->outbuf,smb_com,SMBulogoffX);
1282 cli_setup_packet(cli);
1283 SSVAL(cli->outbuf,smb_vwv0,0xFF);
1284 SSVAL(cli->outbuf,smb_vwv2,0); /* no additional info */
1285
1286 cli_send_smb(cli);
1287 if (!cli_receive_smb(cli))
1288 return False;
1289
1290 if (cli_is_error(cli)) {
1291 return False;
1292 }
1293
1294 cli->vuid = -1;
1295 return True;
1296}
1297
1298/****************************************************************************
1299 Send a tconX.
1300****************************************************************************/
1301
1302struct cli_tcon_andx_state {
1303 struct cli_state *cli;
1304 uint16_t vwv[4];
1305 struct iovec bytes;
1306};
1307
1308static void cli_tcon_andx_done(struct tevent_req *subreq);
1309
1310struct tevent_req *cli_tcon_andx_create(TALLOC_CTX *mem_ctx,
1311 struct event_context *ev,
1312 struct cli_state *cli,
1313 const char *share, const char *dev,
1314 const char *pass, int passlen,
1315 struct tevent_req **psmbreq)
1316{
1317 struct tevent_req *req, *subreq;
1318 struct cli_tcon_andx_state *state;
1319 fstring pword;
1320 uint16_t *vwv;
1321 char *tmp = NULL;
1322 uint8_t *bytes;
1323
1324 *psmbreq = NULL;
1325
1326 req = tevent_req_create(mem_ctx, &state, struct cli_tcon_andx_state);
1327 if (req == NULL) {
1328 return NULL;
1329 }
1330 state->cli = cli;
1331 vwv = state->vwv;
1332
1333 fstrcpy(cli->share, share);
1334
1335 /* in user level security don't send a password now */
1336 if (cli->sec_mode & NEGOTIATE_SECURITY_USER_LEVEL) {
1337 passlen = 1;
1338 pass = "";
1339 } else if (pass == NULL) {
1340 DEBUG(1, ("Server not using user level security and no "
1341 "password supplied.\n"));
1342 goto access_denied;
1343 }
1344
1345 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) &&
1346 *pass && passlen != 24) {
1347 if (!lp_client_lanman_auth()) {
1348 DEBUG(1, ("Server requested LANMAN password "
1349 "(share-level security) but "
1350 "'client lanman auth' is disabled\n"));
1351 goto access_denied;
1352 }
1353
1354 /*
1355 * Non-encrypted passwords - convert to DOS codepage before
1356 * encryption.
1357 */
1358 passlen = 24;
1359 SMBencrypt(pass, cli->secblob.data, (uchar *)pword);
1360 } else {
1361 if((cli->sec_mode & (NEGOTIATE_SECURITY_USER_LEVEL
1362 |NEGOTIATE_SECURITY_CHALLENGE_RESPONSE))
1363 == 0) {
1364 if (!lp_client_plaintext_auth() && (*pass)) {
1365 DEBUG(1, ("Server requested plaintext "
1366 "password but 'client plaintext "
1367 "auth' is disabled\n"));
1368 goto access_denied;
1369 }
1370
1371 /*
1372 * Non-encrypted passwords - convert to DOS codepage
1373 * before using.
1374 */
1375 passlen = clistr_push(cli, pword, pass, sizeof(pword),
1376 STR_TERMINATE);
1377 if (passlen == -1) {
1378 DEBUG(1, ("clistr_push(pword) failed\n"));
1379 goto access_denied;
1380 }
1381 } else {
1382 if (passlen) {
1383 memcpy(pword, pass, passlen);
1384 }
1385 }
1386 }
1387
1388 SCVAL(vwv+0, 0, 0xFF);
1389 SCVAL(vwv+0, 1, 0);
1390 SSVAL(vwv+1, 0, 0);
1391 SSVAL(vwv+2, 0, TCONX_FLAG_EXTENDED_RESPONSE);
1392 SSVAL(vwv+3, 0, passlen);
1393
1394 if (passlen) {
1395 bytes = (uint8_t *)talloc_memdup(state, pword, passlen);
1396 } else {
1397 bytes = talloc_array(state, uint8_t, 0);
1398 }
1399
1400 /*
1401 * Add the sharename
1402 */
1403 tmp = talloc_asprintf_strupper_m(talloc_tos(), "\\\\%s\\%s",
1404 cli->desthost, share);
1405 if (tmp == NULL) {
1406 TALLOC_FREE(req);
1407 return NULL;
1408 }
1409 bytes = smb_bytes_push_str(bytes, cli_ucs2(cli), tmp, strlen(tmp)+1,
1410 NULL);
1411 TALLOC_FREE(tmp);
1412
1413 /*
1414 * Add the devicetype
1415 */
1416 tmp = talloc_strdup_upper(talloc_tos(), dev);
1417 if (tmp == NULL) {
1418 TALLOC_FREE(req);
1419 return NULL;
1420 }
1421 bytes = smb_bytes_push_str(bytes, false, tmp, strlen(tmp)+1, NULL);
1422 TALLOC_FREE(tmp);
1423
1424 if (bytes == NULL) {
1425 TALLOC_FREE(req);
1426 return NULL;
1427 }
1428
1429 state->bytes.iov_base = (void *)bytes;
1430 state->bytes.iov_len = talloc_get_size(bytes);
1431
1432 subreq = cli_smb_req_create(state, ev, cli, SMBtconX, 0, 4, vwv,
1433 1, &state->bytes);
1434 if (subreq == NULL) {
1435 TALLOC_FREE(req);
1436 return NULL;
1437 }
1438 tevent_req_set_callback(subreq, cli_tcon_andx_done, req);
1439 *psmbreq = subreq;
1440 return req;
1441
1442 access_denied:
1443 tevent_req_nterror(req, NT_STATUS_ACCESS_DENIED);
1444 return tevent_req_post(req, ev);
1445}
1446
1447struct tevent_req *cli_tcon_andx_send(TALLOC_CTX *mem_ctx,
1448 struct event_context *ev,
1449 struct cli_state *cli,
1450 const char *share, const char *dev,
1451 const char *pass, int passlen)
1452{
1453 struct tevent_req *req, *subreq;
1454 NTSTATUS status;
1455
1456 req = cli_tcon_andx_create(mem_ctx, ev, cli, share, dev, pass, passlen,
1457 &subreq);
1458 if (req == NULL) {
1459 return NULL;
1460 }
1461 if (subreq == NULL) {
1462 return req;
1463 }
1464 status = cli_smb_req_send(subreq);
1465 if (!NT_STATUS_IS_OK(status)) {
1466 tevent_req_nterror(req, status);
1467 return tevent_req_post(req, ev);
1468 }
1469 return req;
1470}
1471
1472static void cli_tcon_andx_done(struct tevent_req *subreq)
1473{
1474 struct tevent_req *req = tevent_req_callback_data(
1475 subreq, struct tevent_req);
1476 struct cli_tcon_andx_state *state = tevent_req_data(
1477 req, struct cli_tcon_andx_state);
1478 struct cli_state *cli = state->cli;
1479 char *inbuf = (char *)cli_smb_inbuf(subreq);
1480 uint8_t wct;
1481 uint16_t *vwv;
1482 uint32_t num_bytes;
1483 uint8_t *bytes;
1484 NTSTATUS status;
1485
1486 status = cli_smb_recv(subreq, 0, &wct, &vwv, &num_bytes, &bytes);
1487 if (!NT_STATUS_IS_OK(status)) {
1488 TALLOC_FREE(subreq);
1489 tevent_req_nterror(req, status);
1490 return;
1491 }
1492
1493 clistr_pull(inbuf, cli->dev, bytes, sizeof(fstring), num_bytes,
1494 STR_TERMINATE|STR_ASCII);
1495
1496 if ((cli->protocol >= PROTOCOL_NT1) && (num_bytes == 3)) {
1497 /* almost certainly win95 - enable bug fixes */
1498 cli->win95 = True;
1499 }
1500
1501 /*
1502 * Make sure that we have the optional support 16-bit field. WCT > 2.
1503 * Avoids issues when connecting to Win9x boxes sharing files
1504 */
1505
1506 cli->dfsroot = false;
1507
1508 if ((wct > 2) && (cli->protocol >= PROTOCOL_LANMAN2)) {
1509 cli->dfsroot = ((SVAL(vwv+2, 0) & SMB_SHARE_IN_DFS) != 0);
1510 }
1511
1512 cli->cnum = SVAL(inbuf,smb_tid);
1513 tevent_req_done(req);
1514}
1515
1516NTSTATUS cli_tcon_andx_recv(struct tevent_req *req)
1517{
1518 return tevent_req_simple_recv_ntstatus(req);
1519}
1520
1521NTSTATUS cli_tcon_andx(struct cli_state *cli, const char *share,
1522 const char *dev, const char *pass, int passlen)
1523{
1524 TALLOC_CTX *frame = talloc_stackframe();
1525 struct event_context *ev;
1526 struct tevent_req *req;
1527 NTSTATUS status = NT_STATUS_OK;
1528
1529 if (cli_has_async_calls(cli)) {
1530 /*
1531 * Can't use sync call while an async call is in flight
1532 */
1533 status = NT_STATUS_INVALID_PARAMETER;
1534 goto fail;
1535 }
1536
1537 ev = event_context_init(frame);
1538 if (ev == NULL) {
1539 status = NT_STATUS_NO_MEMORY;
1540 goto fail;
1541 }
1542
1543 req = cli_tcon_andx_send(frame, ev, cli, share, dev, pass, passlen);
1544 if (req == NULL) {
1545 status = NT_STATUS_NO_MEMORY;
1546 goto fail;
1547 }
1548
1549 if (!tevent_req_poll(req, ev)) {
1550 status = map_nt_error_from_unix(errno);
1551 goto fail;
1552 }
1553
1554 status = cli_tcon_andx_recv(req);
1555 fail:
1556 TALLOC_FREE(frame);
1557 if (!NT_STATUS_IS_OK(status)) {
1558 cli_set_error(cli, status);
1559 }
1560 return status;
1561}
1562
1563/****************************************************************************
1564 Send a tree disconnect.
1565****************************************************************************/
1566
1567bool cli_tdis(struct cli_state *cli)
1568{
1569 memset(cli->outbuf,'\0',smb_size);
1570 cli_set_message(cli->outbuf,0,0,True);
1571 SCVAL(cli->outbuf,smb_com,SMBtdis);
1572 SSVAL(cli->outbuf,smb_tid,cli->cnum);
1573 cli_setup_packet(cli);
1574
1575 cli_send_smb(cli);
1576 if (!cli_receive_smb(cli))
1577 return False;
1578
1579 if (cli_is_error(cli)) {
1580 return False;
1581 }
1582
1583 cli->cnum = -1;
1584 return True;
1585}
1586
1587/****************************************************************************
1588 Send a negprot command.
1589****************************************************************************/
1590
1591void cli_negprot_sendsync(struct cli_state *cli)
1592{
1593 char *p;
1594 int numprots;
1595
1596 if (cli->protocol < PROTOCOL_NT1)
1597 cli->use_spnego = False;
1598
1599 memset(cli->outbuf,'\0',smb_size);
1600
1601 /* setup the protocol strings */
1602 cli_set_message(cli->outbuf,0,0,True);
1603
1604 p = smb_buf(cli->outbuf);
1605 for (numprots=0; numprots < ARRAY_SIZE(prots); numprots++) {
1606 if (prots[numprots].prot > cli->protocol) {
1607 break;
1608 }
1609 *p++ = 2;
1610 p += clistr_push(cli, p, prots[numprots].name, -1, STR_TERMINATE);
1611 }
1612
1613 SCVAL(cli->outbuf,smb_com,SMBnegprot);
1614 cli_setup_bcc(cli, p);
1615 cli_setup_packet(cli);
1616
1617 SCVAL(smb_buf(cli->outbuf),0,2);
1618
1619 cli_send_smb(cli);
1620}
1621
1622/****************************************************************************
1623 Send a negprot command.
1624****************************************************************************/
1625
1626struct cli_negprot_state {
1627 struct cli_state *cli;
1628};
1629
1630static void cli_negprot_done(struct tevent_req *subreq);
1631
1632struct tevent_req *cli_negprot_send(TALLOC_CTX *mem_ctx,
1633 struct event_context *ev,
1634 struct cli_state *cli)
1635{
1636 struct tevent_req *req, *subreq;
1637 struct cli_negprot_state *state;
1638 uint8_t *bytes = NULL;
1639 int numprots;
1640 uint16_t cnum;
1641
1642 req = tevent_req_create(mem_ctx, &state, struct cli_negprot_state);
1643 if (req == NULL) {
1644 return NULL;
1645 }
1646 state->cli = cli;
1647
1648 if (cli->protocol < PROTOCOL_NT1)
1649 cli->use_spnego = False;
1650
1651 /* setup the protocol strings */
1652 for (numprots=0; numprots < ARRAY_SIZE(prots); numprots++) {
1653 uint8_t c = 2;
1654 if (prots[numprots].prot > cli->protocol) {
1655 break;
1656 }
1657 bytes = (uint8_t *)talloc_append_blob(
1658 state, bytes, data_blob_const(&c, sizeof(c)));
1659 if (tevent_req_nomem(bytes, req)) {
1660 return tevent_req_post(req, ev);
1661 }
1662 bytes = smb_bytes_push_str(bytes, false,
1663 prots[numprots].name,
1664 strlen(prots[numprots].name)+1,
1665 NULL);
1666 if (tevent_req_nomem(bytes, req)) {
1667 return tevent_req_post(req, ev);
1668 }
1669 }
1670
1671 cnum = cli->cnum;
1672
1673 cli->cnum = 0;
1674 subreq = cli_smb_send(state, ev, cli, SMBnegprot, 0, 0, NULL,
1675 talloc_get_size(bytes), bytes);
1676 cli->cnum = cnum;
1677
1678 if (tevent_req_nomem(subreq, req)) {
1679 return tevent_req_post(req, ev);
1680 }
1681 tevent_req_set_callback(subreq, cli_negprot_done, req);
1682 return req;
1683}
1684
1685static void cli_negprot_done(struct tevent_req *subreq)
1686{
1687 struct tevent_req *req = tevent_req_callback_data(
1688 subreq, struct tevent_req);
1689 struct cli_negprot_state *state = tevent_req_data(
1690 req, struct cli_negprot_state);
1691 struct cli_state *cli = state->cli;
1692 uint8_t wct;
1693 uint16_t *vwv;
1694 uint32_t num_bytes;
1695 uint8_t *bytes;
1696 NTSTATUS status;
1697 uint16_t protnum;
1698
1699 status = cli_smb_recv(subreq, 1, &wct, &vwv, &num_bytes, &bytes);
1700 if (!NT_STATUS_IS_OK(status)) {
1701 TALLOC_FREE(subreq);
1702 tevent_req_nterror(req, status);
1703 return;
1704 }
1705
1706 protnum = SVAL(vwv, 0);
1707
1708 if ((protnum >= ARRAY_SIZE(prots))
1709 || (prots[protnum].prot > cli->protocol)) {
1710 tevent_req_nterror(req, NT_STATUS_INVALID_NETWORK_RESPONSE);
1711 return;
1712 }
1713
1714 cli->protocol = prots[protnum].prot;
1715
1716 if ((cli->protocol < PROTOCOL_NT1) &&
1717 client_is_signing_mandatory(cli)) {
1718 DEBUG(0,("cli_negprot: SMB signing is mandatory and the selected protocol level doesn't support it.\n"));
1719 tevent_req_nterror(req, NT_STATUS_ACCESS_DENIED);
1720 return;
1721 }
1722
1723 if (cli->protocol >= PROTOCOL_NT1) {
1724 struct timespec ts;
1725 bool negotiated_smb_signing = false;
1726
1727 /* NT protocol */
1728 cli->sec_mode = CVAL(vwv + 1, 0);
1729 cli->max_mux = SVAL(vwv + 1, 1);
1730 cli->max_xmit = IVAL(vwv + 3, 1);
1731 cli->sesskey = IVAL(vwv + 7, 1);
1732 cli->serverzone = SVALS(vwv + 15, 1);
1733 cli->serverzone *= 60;
1734 /* this time arrives in real GMT */
1735 ts = interpret_long_date(((char *)(vwv+11))+1);
1736 cli->servertime = ts.tv_sec;
1737 cli->secblob = data_blob(bytes, num_bytes);
1738 cli->capabilities = IVAL(vwv + 9, 1);
1739 if (cli->capabilities & CAP_RAW_MODE) {
1740 cli->readbraw_supported = True;
1741 cli->writebraw_supported = True;
1742 }
1743 /* work out if they sent us a workgroup */
1744 if (!(cli->capabilities & CAP_EXTENDED_SECURITY) &&
1745 smb_buflen(cli->inbuf) > 8) {
1746 clistr_pull(cli->inbuf, cli->server_domain,
1747 bytes+8, sizeof(cli->server_domain),
1748 num_bytes-8,
1749 STR_UNICODE|STR_NOALIGN);
1750 }
1751
1752 /*
1753 * As signing is slow we only turn it on if either the client or
1754 * the server require it. JRA.
1755 */
1756
1757 if (cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_REQUIRED) {
1758 /* Fail if server says signing is mandatory and we don't want to support it. */
1759 if (!client_is_signing_allowed(cli)) {
1760 DEBUG(0,("cli_negprot: SMB signing is mandatory and we have disabled it.\n"));
1761 tevent_req_nterror(req,
1762 NT_STATUS_ACCESS_DENIED);
1763 return;
1764 }
1765 negotiated_smb_signing = true;
1766 } else if (client_is_signing_mandatory(cli) && client_is_signing_allowed(cli)) {
1767 /* Fail if client says signing is mandatory and the server doesn't support it. */
1768 if (!(cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_ENABLED)) {
1769 DEBUG(1,("cli_negprot: SMB signing is mandatory and the server doesn't support it.\n"));
1770 tevent_req_nterror(req,
1771 NT_STATUS_ACCESS_DENIED);
1772 return;
1773 }
1774 negotiated_smb_signing = true;
1775 } else if (cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_ENABLED) {
1776 negotiated_smb_signing = true;
1777 }
1778
1779 if (negotiated_smb_signing) {
1780 cli_set_signing_negotiated(cli);
1781 }
1782
1783 if (cli->capabilities & (CAP_LARGE_READX|CAP_LARGE_WRITEX)) {
1784 SAFE_FREE(cli->outbuf);
1785 SAFE_FREE(cli->inbuf);
1786 cli->outbuf = (char *)SMB_MALLOC(CLI_SAMBA_MAX_LARGE_READX_SIZE+LARGE_WRITEX_HDR_SIZE+SAFETY_MARGIN);
1787 cli->inbuf = (char *)SMB_MALLOC(CLI_SAMBA_MAX_LARGE_READX_SIZE+LARGE_WRITEX_HDR_SIZE+SAFETY_MARGIN);
1788 cli->bufsize = CLI_SAMBA_MAX_LARGE_READX_SIZE + LARGE_WRITEX_HDR_SIZE;
1789 }
1790
1791 } else if (cli->protocol >= PROTOCOL_LANMAN1) {
1792 cli->use_spnego = False;
1793 cli->sec_mode = SVAL(vwv + 1, 0);
1794 cli->max_xmit = SVAL(vwv + 2, 0);
1795 cli->max_mux = SVAL(vwv + 3, 0);
1796 cli->sesskey = IVAL(vwv + 6, 0);
1797 cli->serverzone = SVALS(vwv + 10, 0);
1798 cli->serverzone *= 60;
1799 /* this time is converted to GMT by make_unix_date */
1800 cli->servertime = cli_make_unix_date(
1801 cli, (char *)(vwv + 8));
1802 cli->readbraw_supported = ((SVAL(vwv + 5, 0) & 0x1) != 0);
1803 cli->writebraw_supported = ((SVAL(vwv + 5, 0) & 0x2) != 0);
1804 cli->secblob = data_blob(bytes, num_bytes);
1805 } else {
1806 /* the old core protocol */
1807 cli->use_spnego = False;
1808 cli->sec_mode = 0;
1809 cli->serverzone = get_time_zone(time(NULL));
1810 }
1811
1812 cli->max_xmit = MIN(cli->max_xmit, CLI_BUFFER_SIZE);
1813
1814 /* a way to force ascii SMB */
1815 if (getenv("CLI_FORCE_ASCII"))
1816 cli->capabilities &= ~CAP_UNICODE;
1817
1818 tevent_req_done(req);
1819}
1820
1821NTSTATUS cli_negprot_recv(struct tevent_req *req)
1822{
1823 return tevent_req_simple_recv_ntstatus(req);
1824}
1825
1826NTSTATUS cli_negprot(struct cli_state *cli)
1827{
1828 TALLOC_CTX *frame = talloc_stackframe();
1829 struct event_context *ev;
1830 struct tevent_req *req;
1831 NTSTATUS status = NT_STATUS_OK;
1832
1833 if (cli_has_async_calls(cli)) {
1834 /*
1835 * Can't use sync call while an async call is in flight
1836 */
1837 status = NT_STATUS_INVALID_PARAMETER;
1838 goto fail;
1839 }
1840
1841 ev = event_context_init(frame);
1842 if (ev == NULL) {
1843 status = NT_STATUS_NO_MEMORY;
1844 goto fail;
1845 }
1846
1847 req = cli_negprot_send(frame, ev, cli);
1848 if (req == NULL) {
1849 status = NT_STATUS_NO_MEMORY;
1850 goto fail;
1851 }
1852
1853 if (!tevent_req_poll(req, ev)) {
1854 status = map_nt_error_from_unix(errno);
1855 goto fail;
1856 }
1857
1858 status = cli_negprot_recv(req);
1859 fail:
1860 TALLOC_FREE(frame);
1861 if (!NT_STATUS_IS_OK(status)) {
1862 cli_set_error(cli, status);
1863 }
1864 return status;
1865}
1866
1867/****************************************************************************
1868 Send a session request. See rfc1002.txt 4.3 and 4.3.2.
1869****************************************************************************/
1870
1871bool cli_session_request(struct cli_state *cli,
1872 struct nmb_name *calling, struct nmb_name *called)
1873{
1874 char *p;
1875 int len = 4;
1876 int namelen = 0;
1877 char *tmp;
1878
1879 /* 445 doesn't have session request */
1880 if (cli->port == 445)
1881 return True;
1882
1883 memcpy(&(cli->calling), calling, sizeof(*calling));
1884 memcpy(&(cli->called ), called , sizeof(*called ));
1885
1886 /* put in the destination name */
1887
1888 tmp = name_mangle(talloc_tos(), cli->called.name,
1889 cli->called.name_type);
1890 if (tmp == NULL) {
1891 return false;
1892 }
1893
1894 p = cli->outbuf+len;
1895 namelen = name_len((unsigned char *)tmp, talloc_get_size(tmp));
1896 if (namelen > 0) {
1897 memcpy(p, tmp, namelen);
1898 len += namelen;
1899 }
1900 TALLOC_FREE(tmp);
1901
1902 /* and my name */
1903
1904 tmp = name_mangle(talloc_tos(), cli->calling.name,
1905 cli->calling.name_type);
1906 if (tmp == NULL) {
1907 return false;
1908 }
1909
1910 p = cli->outbuf+len;
1911 namelen = name_len((unsigned char *)tmp, talloc_get_size(tmp));
1912 if (namelen > 0) {
1913 memcpy(p, tmp, namelen);
1914 len += namelen;
1915 }
1916 TALLOC_FREE(tmp);
1917
1918 /* send a session request (RFC 1002) */
1919 /* setup the packet length
1920 * Remove four bytes from the length count, since the length
1921 * field in the NBT Session Service header counts the number
1922 * of bytes which follow. The cli_send_smb() function knows
1923 * about this and accounts for those four bytes.
1924 * CRH.
1925 */
1926 len -= 4;
1927 _smb_setlen(cli->outbuf,len);
1928 SCVAL(cli->outbuf,0,0x81);
1929
1930 cli_send_smb(cli);
1931 DEBUG(5,("Sent session request\n"));
1932
1933 if (!cli_receive_smb(cli))
1934 return False;
1935
1936 if (CVAL(cli->inbuf,0) == 0x84) {
1937 /* C. Hoch 9/14/95 Start */
1938 /* For information, here is the response structure.
1939 * We do the byte-twiddling to for portability.
1940 struct RetargetResponse{
1941 unsigned char type;
1942 unsigned char flags;
1943 int16 length;
1944 int32 ip_addr;
1945 int16 port;
1946 };
1947 */
1948 uint16_t port = (CVAL(cli->inbuf,8)<<8)+CVAL(cli->inbuf,9);
1949 struct in_addr dest_ip;
1950 NTSTATUS status;
1951
1952 /* SESSION RETARGET */
1953 putip((char *)&dest_ip,cli->inbuf+4);
1954 in_addr_to_sockaddr_storage(&cli->dest_ss, dest_ip);
1955
1956 status = open_socket_out(&cli->dest_ss, port,
1957 LONG_CONNECT_TIMEOUT, &cli->fd);
1958 if (!NT_STATUS_IS_OK(status)) {
1959 return False;
1960 }
1961
1962 DEBUG(3,("Retargeted\n"));
1963
1964 set_socket_options(cli->fd, lp_socket_options());
1965
1966 /* Try again */
1967 {
1968 static int depth;
1969 bool ret;
1970 if (depth > 4) {
1971 DEBUG(0,("Retarget recursion - failing\n"));
1972 return False;
1973 }
1974 depth++;
1975 ret = cli_session_request(cli, calling, called);
1976 depth--;
1977 return ret;
1978 }
1979 } /* C. Hoch 9/14/95 End */
1980
1981 if (CVAL(cli->inbuf,0) != 0x82) {
1982 /* This is the wrong place to put the error... JRA. */
1983 cli->rap_error = CVAL(cli->inbuf,4);
1984 return False;
1985 }
1986 return(True);
1987}
1988
1989struct fd_struct {
1990 int fd;
1991};
1992
1993static void smb_sock_connected(struct tevent_req *req)
1994{
1995 struct fd_struct *pfd = tevent_req_callback_data(
1996 req, struct fd_struct);
1997 int fd;
1998 NTSTATUS status;
1999
2000 status = open_socket_out_defer_recv(req, &fd);
2001 if (NT_STATUS_IS_OK(status)) {
2002 pfd->fd = fd;
2003 }
2004}
2005
2006static NTSTATUS open_smb_socket(const struct sockaddr_storage *pss,
2007 uint16_t *port, int timeout, int *pfd)
2008{
2009 struct event_context *ev;
2010 struct tevent_req *r139, *r445;
2011 struct fd_struct *fd139, *fd445;
2012 NTSTATUS status = NT_STATUS_NO_MEMORY;
2013
2014 if (*port != 0) {
2015 return open_socket_out(pss, *port, timeout, pfd);
2016 }
2017
2018 ev = event_context_init(talloc_tos());
2019 if (ev == NULL) {
2020 return NT_STATUS_NO_MEMORY;
2021 }
2022
2023 fd139 = talloc(ev, struct fd_struct);
2024 if (fd139 == NULL) {
2025 goto done;
2026 }
2027 fd139->fd = -1;
2028
2029 fd445 = talloc(ev, struct fd_struct);
2030 if (fd445 == NULL) {
2031 goto done;
2032 }
2033 fd445->fd = -1;
2034
2035 r445 = open_socket_out_defer_send(ev, ev, timeval_set(0, 0),
2036 pss, 445, timeout);
2037 r139 = open_socket_out_defer_send(ev, ev, timeval_set(0, 3000),
2038 pss, 139, timeout);
2039 if ((r445 == NULL) || (r139 == NULL)) {
2040 goto done;
2041 }
2042 tevent_req_set_callback(r445, smb_sock_connected, fd445);
2043 tevent_req_set_callback(r139, smb_sock_connected, fd139);
2044
2045 while ((fd445->fd == -1) && (fd139->fd == -1)
2046 && (tevent_req_is_in_progress(r139)
2047 || tevent_req_is_in_progress(r445))) {
2048 event_loop_once(ev);
2049 }
2050
2051 if ((fd139->fd != -1) && (fd445->fd != -1)) {
2052 close(fd139->fd);
2053 fd139->fd = -1;
2054 }
2055
2056 if (fd445->fd != -1) {
2057 *port = 445;
2058 *pfd = fd445->fd;
2059 status = NT_STATUS_OK;
2060 goto done;
2061 }
2062 if (fd139->fd != -1) {
2063 *port = 139;
2064 *pfd = fd139->fd;
2065 status = NT_STATUS_OK;
2066 goto done;
2067 }
2068
2069 status = open_socket_out_defer_recv(r445, &fd445->fd);
2070 done:
2071 TALLOC_FREE(ev);
2072 return status;
2073}
2074
2075/****************************************************************************
2076 Open the client sockets.
2077****************************************************************************/
2078
2079NTSTATUS cli_connect(struct cli_state *cli,
2080 const char *host,
2081 struct sockaddr_storage *dest_ss)
2082
2083{
2084 int name_type = 0x20;
2085 TALLOC_CTX *frame = talloc_stackframe();
2086 unsigned int num_addrs = 0;
2087 unsigned int i = 0;
2088 struct sockaddr_storage *ss_arr = NULL;
2089 char *p = NULL;
2090
2091 /* reasonable default hostname */
2092 if (!host) {
2093 host = STAR_SMBSERVER;
2094 }
2095
2096 fstrcpy(cli->desthost, host);
2097
2098 /* allow hostnames of the form NAME#xx and do a netbios lookup */
2099 if ((p = strchr(cli->desthost, '#'))) {
2100 name_type = strtol(p+1, NULL, 16);
2101 *p = 0;
2102 }
2103
2104 if (!dest_ss || is_zero_addr((struct sockaddr *)dest_ss)) {
2105 NTSTATUS status =resolve_name_list(frame,
2106 cli->desthost,
2107 name_type,
2108 &ss_arr,
2109 &num_addrs);
2110 if (!NT_STATUS_IS_OK(status)) {
2111 TALLOC_FREE(frame);
2112 return NT_STATUS_BAD_NETWORK_NAME;
2113 }
2114 } else {
2115 num_addrs = 1;
2116 ss_arr = TALLOC_P(frame, struct sockaddr_storage);
2117 if (!ss_arr) {
2118 TALLOC_FREE(frame);
2119 return NT_STATUS_NO_MEMORY;
2120 }
2121 *ss_arr = *dest_ss;
2122 }
2123
2124 for (i = 0; i < num_addrs; i++) {
2125 cli->dest_ss = ss_arr[i];
2126 if (getenv("LIBSMB_PROG")) {
2127 cli->fd = sock_exec(getenv("LIBSMB_PROG"));
2128 } else {
2129 uint16_t port = cli->port;
2130 NTSTATUS status;
2131 status = open_smb_socket(&cli->dest_ss, &port,
2132 cli->timeout, &cli->fd);
2133 if (NT_STATUS_IS_OK(status)) {
2134 cli->port = port;
2135 }
2136 }
2137 if (cli->fd == -1) {
2138 char addr[INET6_ADDRSTRLEN];
2139 print_sockaddr(addr, sizeof(addr), &ss_arr[i]);
2140 DEBUG(2,("Error connecting to %s (%s)\n",
2141 dest_ss?addr:host,strerror(errno)));
2142 } else {
2143 /* Exit from loop on first connection. */
2144 break;
2145 }
2146 }
2147
2148 if (cli->fd == -1) {
2149 TALLOC_FREE(frame);
2150 return map_nt_error_from_unix(errno);
2151 }
2152
2153 if (dest_ss) {
2154 *dest_ss = cli->dest_ss;
2155 }
2156
2157 set_socket_options(cli->fd, lp_socket_options());
2158
2159 TALLOC_FREE(frame);
2160 return NT_STATUS_OK;
2161}
2162
2163/**
2164 establishes a connection to after the negprot.
2165 @param output_cli A fully initialised cli structure, non-null only on success
2166 @param dest_host The netbios name of the remote host
2167 @param dest_ss (optional) The the destination IP, NULL for name based lookup
2168 @param port (optional) The destination port (0 for default)
2169 @param retry bool. Did this connection fail with a retryable error ?
2170
2171*/
2172NTSTATUS cli_start_connection(struct cli_state **output_cli,
2173 const char *my_name,
2174 const char *dest_host,
2175 struct sockaddr_storage *dest_ss, int port,
2176 int signing_state, int flags,
2177 bool *retry)
2178{
2179 NTSTATUS nt_status;
2180 struct nmb_name calling;
2181 struct nmb_name called;
2182 struct cli_state *cli;
2183 struct sockaddr_storage ss;
2184
2185 if (retry)
2186 *retry = False;
2187
2188 if (!my_name)
2189 my_name = global_myname();
2190
2191 if (!(cli = cli_initialise_ex(signing_state))) {
2192 return NT_STATUS_NO_MEMORY;
2193 }
2194
2195 make_nmb_name(&calling, my_name, 0x0);
2196 make_nmb_name(&called , dest_host, 0x20);
2197
2198 cli_set_port(cli, port);
2199 cli_set_timeout(cli, 10000); /* 10 seconds. */
2200
2201 if (dest_ss) {
2202 ss = *dest_ss;
2203 } else {
2204 zero_sockaddr(&ss);
2205 }
2206
2207again:
2208
2209 DEBUG(3,("Connecting to host=%s\n", dest_host));
2210
2211 nt_status = cli_connect(cli, dest_host, &ss);
2212 if (!NT_STATUS_IS_OK(nt_status)) {
2213 char addr[INET6_ADDRSTRLEN];
2214 print_sockaddr(addr, sizeof(addr), &ss);
2215 DEBUG(1,("cli_start_connection: failed to connect to %s (%s). Error %s\n",
2216 nmb_namestr(&called), addr, nt_errstr(nt_status) ));
2217 cli_shutdown(cli);
2218 return nt_status;
2219 }
2220
2221 if (retry)
2222 *retry = True;
2223
2224 if (!cli_session_request(cli, &calling, &called)) {
2225 char *p;
2226 DEBUG(1,("session request to %s failed (%s)\n",
2227 called.name, cli_errstr(cli)));
2228 if ((p=strchr(called.name, '.')) && !is_ipaddress(called.name)) {
2229 *p = 0;
2230 goto again;
2231 }
2232 if (strcmp(called.name, STAR_SMBSERVER)) {
2233 make_nmb_name(&called , STAR_SMBSERVER, 0x20);
2234 goto again;
2235 }
2236 return NT_STATUS_BAD_NETWORK_NAME;
2237 }
2238
2239 if (flags & CLI_FULL_CONNECTION_DONT_SPNEGO)
2240 cli->use_spnego = False;
2241 else if (flags & CLI_FULL_CONNECTION_USE_KERBEROS)
2242 cli->use_kerberos = True;
2243
2244 if ((flags & CLI_FULL_CONNECTION_FALLBACK_AFTER_KERBEROS) &&
2245 cli->use_kerberos) {
2246 cli->fallback_after_kerberos = true;
2247 }
2248 if (flags & CLI_FULL_CONNECTION_USE_CCACHE) {
2249 cli->use_ccache = true;
2250 }
2251
2252 nt_status = cli_negprot(cli);
2253 if (!NT_STATUS_IS_OK(nt_status)) {
2254 DEBUG(1, ("failed negprot: %s\n", nt_errstr(nt_status)));
2255 cli_shutdown(cli);
2256 return nt_status;
2257 }
2258
2259 *output_cli = cli;
2260 return NT_STATUS_OK;
2261}
2262
2263
2264/**
2265 establishes a connection right up to doing tconX, password specified.
2266 @param output_cli A fully initialised cli structure, non-null only on success
2267 @param dest_host The netbios name of the remote host
2268 @param dest_ip (optional) The the destination IP, NULL for name based lookup
2269 @param port (optional) The destination port (0 for default)
2270 @param service (optional) The share to make the connection to. Should be 'unqualified' in any way.
2271 @param service_type The 'type' of serivice.
2272 @param user Username, unix string
2273 @param domain User's domain
2274 @param password User's password, unencrypted unix string.
2275 @param retry bool. Did this connection fail with a retryable error ?
2276*/
2277
2278NTSTATUS cli_full_connection(struct cli_state **output_cli,
2279 const char *my_name,
2280 const char *dest_host,
2281 struct sockaddr_storage *dest_ss, int port,
2282 const char *service, const char *service_type,
2283 const char *user, const char *domain,
2284 const char *password, int flags,
2285 int signing_state,
2286 bool *retry)
2287{
2288 NTSTATUS nt_status;
2289 struct cli_state *cli = NULL;
2290 int pw_len = password ? strlen(password)+1 : 0;
2291
2292 *output_cli = NULL;
2293
2294 if (password == NULL) {
2295 password = "";
2296 }
2297
2298 nt_status = cli_start_connection(&cli, my_name, dest_host,
2299 dest_ss, port, signing_state,
2300 flags, retry);
2301
2302 if (!NT_STATUS_IS_OK(nt_status)) {
2303 return nt_status;
2304 }
2305
2306 cli->use_oplocks = ((flags & CLI_FULL_CONNECTION_OPLOCKS) != 0);
2307 cli->use_level_II_oplocks =
2308 ((flags & CLI_FULL_CONNECTION_LEVEL_II_OPLOCKS) != 0);
2309
2310 nt_status = cli_session_setup(cli, user, password, pw_len, password,
2311 pw_len, domain);
2312 if (!NT_STATUS_IS_OK(nt_status)) {
2313
2314 if (!(flags & CLI_FULL_CONNECTION_ANONYMOUS_FALLBACK)) {
2315 DEBUG(1,("failed session setup with %s\n",
2316 nt_errstr(nt_status)));
2317 cli_shutdown(cli);
2318 return nt_status;
2319 }
2320
2321 nt_status = cli_session_setup(cli, "", "", 0, "", 0, domain);
2322 if (!NT_STATUS_IS_OK(nt_status)) {
2323 DEBUG(1,("anonymous failed session setup with %s\n",
2324 nt_errstr(nt_status)));
2325 cli_shutdown(cli);
2326 return nt_status;
2327 }
2328 }
2329
2330 if (service) {
2331 nt_status = cli_tcon_andx(cli, service, service_type, password,
2332 pw_len);
2333 if (!NT_STATUS_IS_OK(nt_status)) {
2334 DEBUG(1,("failed tcon_X with %s\n", nt_errstr(nt_status)));
2335 cli_shutdown(cli);
2336 if (NT_STATUS_IS_OK(nt_status)) {
2337 nt_status = NT_STATUS_UNSUCCESSFUL;
2338 }
2339 return nt_status;
2340 }
2341 }
2342
2343 nt_status = cli_init_creds(cli, user, domain, password);
2344 if (!NT_STATUS_IS_OK(nt_status)) {
2345 cli_shutdown(cli);
2346 return nt_status;
2347 }
2348
2349 *output_cli = cli;
2350 return NT_STATUS_OK;
2351}
2352
2353/****************************************************************************
2354 Attempt a NetBIOS session request, falling back to *SMBSERVER if needed.
2355****************************************************************************/
2356
2357bool attempt_netbios_session_request(struct cli_state **ppcli, const char *srchost, const char *desthost,
2358 struct sockaddr_storage *pdest_ss)
2359{
2360 struct nmb_name calling, called;
2361
2362 make_nmb_name(&calling, srchost, 0x0);
2363
2364 /*
2365 * If the called name is an IP address
2366 * then use *SMBSERVER immediately.
2367 */
2368
2369 if(is_ipaddress(desthost)) {
2370 make_nmb_name(&called, STAR_SMBSERVER, 0x20);
2371 } else {
2372 make_nmb_name(&called, desthost, 0x20);
2373 }
2374
2375 if (!cli_session_request(*ppcli, &calling, &called)) {
2376 NTSTATUS status;
2377 struct nmb_name smbservername;
2378
2379 make_nmb_name(&smbservername, STAR_SMBSERVER, 0x20);
2380
2381 /*
2382 * If the name wasn't *SMBSERVER then
2383 * try with *SMBSERVER if the first name fails.
2384 */
2385
2386 if (nmb_name_equal(&called, &smbservername)) {
2387
2388 /*
2389 * The name used was *SMBSERVER, don't bother with another name.
2390 */
2391
2392 DEBUG(0,("attempt_netbios_session_request: %s rejected the session for name *SMBSERVER \
2393with error %s.\n", desthost, cli_errstr(*ppcli) ));
2394 return False;
2395 }
2396
2397 /* Try again... */
2398 cli_shutdown(*ppcli);
2399
2400 *ppcli = cli_initialise();
2401 if (!*ppcli) {
2402 /* Out of memory... */
2403 return False;
2404 }
2405
2406 status = cli_connect(*ppcli, desthost, pdest_ss);
2407 if (!NT_STATUS_IS_OK(status) ||
2408 !cli_session_request(*ppcli, &calling, &smbservername)) {
2409 DEBUG(0,("attempt_netbios_session_request: %s rejected the session for \
2410name *SMBSERVER with error %s\n", desthost, cli_errstr(*ppcli) ));
2411 return False;
2412 }
2413 }
2414
2415 return True;
2416}
2417
2418/****************************************************************************
2419 Send an old style tcon.
2420****************************************************************************/
2421NTSTATUS cli_raw_tcon(struct cli_state *cli,
2422 const char *service, const char *pass, const char *dev,
2423 uint16 *max_xmit, uint16 *tid)
2424{
2425 char *p;
2426
2427 if (!lp_client_plaintext_auth() && (*pass)) {
2428 DEBUG(1, ("Server requested plaintext password but 'client "
2429 "plaintext auth' is disabled\n"));
2430 return NT_STATUS_ACCESS_DENIED;
2431 }
2432
2433 memset(cli->outbuf,'\0',smb_size);
2434 memset(cli->inbuf,'\0',smb_size);
2435
2436 cli_set_message(cli->outbuf, 0, 0, True);
2437 SCVAL(cli->outbuf,smb_com,SMBtcon);
2438 cli_setup_packet(cli);
2439
2440 p = smb_buf(cli->outbuf);
2441 *p++ = 4; p += clistr_push(cli, p, service, -1, STR_TERMINATE | STR_NOALIGN);
2442 *p++ = 4; p += clistr_push(cli, p, pass, -1, STR_TERMINATE | STR_NOALIGN);
2443 *p++ = 4; p += clistr_push(cli, p, dev, -1, STR_TERMINATE | STR_NOALIGN);
2444
2445 cli_setup_bcc(cli, p);
2446
2447 cli_send_smb(cli);
2448 if (!cli_receive_smb(cli)) {
2449 return NT_STATUS_UNEXPECTED_NETWORK_ERROR;
2450 }
2451
2452 if (cli_is_error(cli)) {
2453 return cli_nt_error(cli);
2454 }
2455
2456 *max_xmit = SVAL(cli->inbuf, smb_vwv0);
2457 *tid = SVAL(cli->inbuf, smb_vwv1);
2458
2459 return NT_STATUS_OK;
2460}
2461
2462/* Return a cli_state pointing at the IPC$ share for the given server */
2463
2464struct cli_state *get_ipc_connect(char *server,
2465 struct sockaddr_storage *server_ss,
2466 const struct user_auth_info *user_info)
2467{
2468 struct cli_state *cli;
2469 NTSTATUS nt_status;
2470 uint32_t flags = CLI_FULL_CONNECTION_ANONYMOUS_FALLBACK;
2471
2472 if (user_info->use_kerberos) {
2473 flags |= CLI_FULL_CONNECTION_USE_KERBEROS;
2474 }
2475
2476 nt_status = cli_full_connection(&cli, NULL, server, server_ss, 0, "IPC$", "IPC",
2477 user_info->username ? user_info->username : "",
2478 lp_workgroup(),
2479 user_info->password ? user_info->password : "",
2480 flags,
2481 Undefined, NULL);
2482
2483 if (NT_STATUS_IS_OK(nt_status)) {
2484 return cli;
2485 } else if (is_ipaddress(server)) {
2486 /* windows 9* needs a correct NMB name for connections */
2487 fstring remote_name;
2488
2489 if (name_status_find("*", 0, 0, server_ss, remote_name)) {
2490 cli = get_ipc_connect(remote_name, server_ss, user_info);
2491 if (cli)
2492 return cli;
2493 }
2494 }
2495 return NULL;
2496}
2497
2498/*
2499 * Given the IP address of a master browser on the network, return its
2500 * workgroup and connect to it.
2501 *
2502 * This function is provided to allow additional processing beyond what
2503 * get_ipc_connect_master_ip_bcast() does, e.g. to retrieve the list of master
2504 * browsers and obtain each master browsers' list of domains (in case the
2505 * first master browser is recently on the network and has not yet
2506 * synchronized with other master browsers and therefore does not yet have the
2507 * entire network browse list)
2508 */
2509
2510struct cli_state *get_ipc_connect_master_ip(TALLOC_CTX *ctx,
2511 struct ip_service *mb_ip,
2512 const struct user_auth_info *user_info,
2513 char **pp_workgroup_out)
2514{
2515 char addr[INET6_ADDRSTRLEN];
2516 fstring name;
2517 struct cli_state *cli;
2518 struct sockaddr_storage server_ss;
2519
2520 *pp_workgroup_out = NULL;
2521
2522 print_sockaddr(addr, sizeof(addr), &mb_ip->ss);
2523 DEBUG(99, ("Looking up name of master browser %s\n",
2524 addr));
2525
2526 /*
2527 * Do a name status query to find out the name of the master browser.
2528 * We use <01><02>__MSBROWSE__<02>#01 if *#00 fails because a domain
2529 * master browser will not respond to a wildcard query (or, at least,
2530 * an NT4 server acting as the domain master browser will not).
2531 *
2532 * We might be able to use ONLY the query on MSBROWSE, but that's not
2533 * yet been tested with all Windows versions, so until it is, leave
2534 * the original wildcard query as the first choice and fall back to
2535 * MSBROWSE if the wildcard query fails.
2536 */
2537 if (!name_status_find("*", 0, 0x1d, &mb_ip->ss, name) &&
2538 !name_status_find(MSBROWSE, 1, 0x1d, &mb_ip->ss, name)) {
2539
2540 DEBUG(99, ("Could not retrieve name status for %s\n",
2541 addr));
2542 return NULL;
2543 }
2544
2545 if (!find_master_ip(name, &server_ss)) {
2546 DEBUG(99, ("Could not find master ip for %s\n", name));
2547 return NULL;
2548 }
2549
2550 *pp_workgroup_out = talloc_strdup(ctx, name);
2551
2552 DEBUG(4, ("found master browser %s, %s\n", name, addr));
2553
2554 print_sockaddr(addr, sizeof(addr), &server_ss);
2555 cli = get_ipc_connect(addr, &server_ss, user_info);
2556
2557 return cli;
2558}
2559
2560/*
2561 * Return the IP address and workgroup of a master browser on the network, and
2562 * connect to it.
2563 */
2564
2565struct cli_state *get_ipc_connect_master_ip_bcast(TALLOC_CTX *ctx,
2566 const struct user_auth_info *user_info,
2567 char **pp_workgroup_out)
2568{
2569 struct ip_service *ip_list;
2570 struct cli_state *cli;
2571 int i, count;
2572
2573 *pp_workgroup_out = NULL;
2574
2575 DEBUG(99, ("Do broadcast lookup for workgroups on local network\n"));
2576
2577 /* Go looking for workgroups by broadcasting on the local network */
2578
2579 if (!NT_STATUS_IS_OK(name_resolve_bcast(MSBROWSE, 1, &ip_list,
2580 &count))) {
2581 DEBUG(99, ("No master browsers responded\n"));
2582 return False;
2583 }
2584
2585 for (i = 0; i < count; i++) {
2586 char addr[INET6_ADDRSTRLEN];
2587 print_sockaddr(addr, sizeof(addr), &ip_list[i].ss);
2588 DEBUG(99, ("Found master browser %s\n", addr));
2589
2590 cli = get_ipc_connect_master_ip(ctx, &ip_list[i],
2591 user_info, pp_workgroup_out);
2592 if (cli)
2593 return(cli);
2594 }
2595
2596 return NULL;
2597}
Note: See TracBrowser for help on using the repository browser.