?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Patch for bug #8156 - net ads join fails to use the user's kerberos ticket.
[Samba.git] / source3 / libsmb / cliconnect.c
blobe858280cd95c56cab054a985479b2275313deb48
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
26 static 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
51 static 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
60 static 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
153 static 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
171 struct cli_session_setup_guest_state {
172 struct cli_state *cli;
173 uint16_t vwv[16];
174 struct iovec bytes;
175 };
176
177 static void cli_session_setup_guest_done(struct tevent_req *subreq);
178
179 struct 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
238 struct 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
258 static 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
304 NTSTATUS cli_session_setup_guest_recv(struct tevent_req *req)
305 {
306 return tevent_req_simple_recv_ntstatus(req);
307 }
308
309 static 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
354 static 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
442 static 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;
601 end:
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
612 static 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
647 static 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
717 static 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
778 static 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
786 static 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
839 nt_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
852 static 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
979 ADS_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 /* We may not be allowed to use the server-supplied SPNEGO principal, or it may not have been supplied to us
1060 */
1061 if (!lp_client_use_spnego_principal() || strequal(principal, ADS_IGNORE_PRINCIPAL)) {
1062 TALLOC_FREE(principal);
1063 }
1064
1065 if (principal == NULL &&
1066 !is_ipaddress(cli->desthost) &&
1067 !strequal(STAR_SMBSERVER,
1068 cli->desthost)) {
1069 char *realm = NULL;
1070 char *host = NULL;
1071 DEBUG(3,("cli_session_setup_spnego: using target "
1072 "hostname not SPNEGO principal\n"));
1073
1074 host = strchr_m(cli->desthost, '.');
1075 if (dest_realm) {
1076 realm = SMB_STRDUP(dest_realm);
1077 if (!realm) {
1078 return ADS_ERROR_NT(NT_STATUS_NO_MEMORY);
1079 }
1080 strupper_m(realm);
1081 } else {
1082 if (host) {
1083 /* DNS name. */
1084 realm = kerberos_get_realm_from_hostname(cli->desthost);
1085 } else {
1086 /* NetBIOS name - use our realm. */
1087 realm = kerberos_get_default_realm_from_ccache();
1088 }
1089 }
1090
1091 if (realm == NULL || *realm == '\0') {
1092 realm = SMB_STRDUP(lp_realm());
1093 if (!realm) {
1094 return ADS_ERROR_NT(NT_STATUS_NO_MEMORY);
1095 }
1096 strupper_m(realm);
1097 DEBUG(3,("cli_session_setup_spnego: cannot "
1098 "get realm from dest_realm %s, "
1099 "desthost %s. Using default "
1100 "smb.conf realm %s\n",
1101 dest_realm ? dest_realm : "<null>",
1102 cli->desthost,
1103 realm));
1104 }
1105
1106 principal = talloc_asprintf(talloc_tos(),
1107 "cifs/%s@%s",
1108 cli->desthost,
1109 realm);
1110 if (!principal) {
1111 SAFE_FREE(realm);
1112 return ADS_ERROR_NT(NT_STATUS_NO_MEMORY);
1113 }
1114 DEBUG(3,("cli_session_setup_spnego: guessed "
1115 "server principal=%s\n",
1116 principal ? principal : "<null>"));
1117
1118 SAFE_FREE(realm);
1119 }
1120
1121 if (principal) {
1122 rc = cli_session_setup_kerberos(cli, principal,
1123 dest_realm);
1124 if (ADS_ERR_OK(rc) || !cli->fallback_after_kerberos) {
1125 TALLOC_FREE(principal);
1126 return rc;
1127 }
1128 }
1129 }
1130 #endif
1131
1132 TALLOC_FREE(principal);
1133
1134 ntlmssp:
1135
1136 account = talloc_strdup(talloc_tos(), user);
1137 if (!account) {
1138 return ADS_ERROR_NT(NT_STATUS_NO_MEMORY);
1139 }
1140
1141 /* when falling back to ntlmssp while authenticating with a machine
1142 * account strip off the realm - gd */
1143
1144 if ((p = strchr_m(user, '@')) != NULL) {
1145 account[PTR_DIFF(p,user)] = '\0';
1146 }
1147
1148 return ADS_ERROR_NT(cli_session_setup_ntlmssp(cli, account, pass, user_domain));
1149 }
1150
1151 /****************************************************************************
1152 Send a session setup. The username and workgroup is in UNIX character
1153 format and must be converted to DOS codepage format before sending. If the
1154 password is in plaintext, the same should be done.
1155 ****************************************************************************/
1156
1157 NTSTATUS cli_session_setup(struct cli_state *cli,
1158 const char *user,
1159 const char *pass, int passlen,
1160 const char *ntpass, int ntpasslen,
1161 const char *workgroup)
1162 {
1163 char *p;
1164 fstring user2;
1165
1166 if (user) {
1167 fstrcpy(user2, user);
1168 } else {
1169 user2[0] ='\0';
1170 }
1171
1172 if (!workgroup) {
1173 workgroup = "";
1174 }
1175
1176 /* allow for workgroups as part of the username */
1177 if ((p=strchr_m(user2,'\\')) || (p=strchr_m(user2,'/')) ||
1178 (p=strchr_m(user2,*lp_winbind_separator()))) {
1179 *p = 0;
1180 user = p+1;
1181 workgroup = user2;
1182 }
1183
1184 if (cli->protocol < PROTOCOL_LANMAN1) {
1185 return NT_STATUS_OK;
1186 }
1187
1188 /* now work out what sort of session setup we are going to
1189 do. I have split this into separate functions to make the
1190 flow a bit easier to understand (tridge) */
1191
1192 /* if its an older server then we have to use the older request format */
1193
1194 if (cli->protocol < PROTOCOL_NT1) {
1195 if (!lp_client_lanman_auth() && passlen != 24 && (*pass)) {
1196 DEBUG(1, ("Server requested LM password but 'client lanman auth'"
1197 " is disabled\n"));
1198 return NT_STATUS_ACCESS_DENIED;
1199 }
1200
1201 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) == 0 &&
1202 !lp_client_plaintext_auth() && (*pass)) {
1203 DEBUG(1, ("Server requested plaintext password but "
1204 "'client plaintext auth' is disabled\n"));
1205 return NT_STATUS_ACCESS_DENIED;
1206 }
1207
1208 return cli_session_setup_lanman2(cli, user, pass, passlen,
1209 workgroup);
1210 }
1211
1212 /* if no user is supplied then we have to do an anonymous connection.
1213 passwords are ignored */
1214
1215 if (!user || !*user)
1216 return cli_session_setup_guest(cli);
1217
1218 /* if the server is share level then send a plaintext null
1219 password at this point. The password is sent in the tree
1220 connect */
1221
1222 if ((cli->sec_mode & NEGOTIATE_SECURITY_USER_LEVEL) == 0)
1223 return cli_session_setup_plaintext(cli, user, "", workgroup);
1224
1225 /* if the server doesn't support encryption then we have to use
1226 plaintext. The second password is ignored */
1227
1228 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) == 0) {
1229 if (!lp_client_plaintext_auth() && (*pass)) {
1230 DEBUG(1, ("Server requested plaintext password but "
1231 "'client plaintext auth' is disabled\n"));
1232 return NT_STATUS_ACCESS_DENIED;
1233 }
1234 return cli_session_setup_plaintext(cli, user, pass, workgroup);
1235 }
1236
1237 /* if the server supports extended security then use SPNEGO */
1238
1239 if (cli->capabilities & CAP_EXTENDED_SECURITY) {
1240 ADS_STATUS status = cli_session_setup_spnego(cli, user, pass,
1241 workgroup, NULL);
1242 if (!ADS_ERR_OK(status)) {
1243 DEBUG(3, ("SPNEGO login failed: %s\n", ads_errstr(status)));
1244 return ads_ntstatus(status);
1245 }
1246 } else {
1247 NTSTATUS status;
1248
1249 /* otherwise do a NT1 style session setup */
1250 status = cli_session_setup_nt1(cli, user, pass, passlen,
1251 ntpass, ntpasslen, workgroup);
1252 if (!NT_STATUS_IS_OK(status)) {
1253 DEBUG(3,("cli_session_setup: NT1 session setup "
1254 "failed: %s\n", nt_errstr(status)));
1255 return status;
1256 }
1257 }
1258
1259 if (strstr(cli->server_type, "Samba")) {
1260 cli->is_samba = True;
1261 }
1262
1263 return NT_STATUS_OK;
1264 }
1265
1266 /****************************************************************************
1267 Send a uloggoff.
1268 *****************************************************************************/
1269
1270 bool cli_ulogoff(struct cli_state *cli)
1271 {
1272 memset(cli->outbuf,'\0',smb_size);
1273 cli_set_message(cli->outbuf,2,0,True);
1274 SCVAL(cli->outbuf,smb_com,SMBulogoffX);
1275 cli_setup_packet(cli);
1276 SSVAL(cli->outbuf,smb_vwv0,0xFF);
1277 SSVAL(cli->outbuf,smb_vwv2,0); /* no additional info */
1278
1279 cli_send_smb(cli);
1280 if (!cli_receive_smb(cli))
1281 return False;
1282
1283 if (cli_is_error(cli)) {
1284 return False;
1285 }
1286
1287 cli->vuid = -1;
1288 return True;
1289 }
1290
1291 /****************************************************************************
1292 Send a tconX.
1293 ****************************************************************************/
1294
1295 struct cli_tcon_andx_state {
1296 struct cli_state *cli;
1297 uint16_t vwv[4];
1298 struct iovec bytes;
1299 };
1300
1301 static void cli_tcon_andx_done(struct tevent_req *subreq);
1302
1303 struct tevent_req *cli_tcon_andx_create(TALLOC_CTX *mem_ctx,
1304 struct event_context *ev,
1305 struct cli_state *cli,
1306 const char *share, const char *dev,
1307 const char *pass, int passlen,
1308 struct tevent_req **psmbreq)
1309 {
1310 struct tevent_req *req, *subreq;
1311 struct cli_tcon_andx_state *state;
1312 fstring pword;
1313 uint16_t *vwv;
1314 char *tmp = NULL;
1315 uint8_t *bytes;
1316
1317 *psmbreq = NULL;
1318
1319 req = tevent_req_create(mem_ctx, &state, struct cli_tcon_andx_state);
1320 if (req == NULL) {
1321 return NULL;
1322 }
1323 state->cli = cli;
1324 vwv = state->vwv;
1325
1326 fstrcpy(cli->share, share);
1327
1328 /* in user level security don't send a password now */
1329 if (cli->sec_mode & NEGOTIATE_SECURITY_USER_LEVEL) {
1330 passlen = 1;
1331 pass = "";
1332 } else if (pass == NULL) {
1333 DEBUG(1, ("Server not using user level security and no "
1334 "password supplied.\n"));
1335 goto access_denied;
1336 }
1337
1338 if ((cli->sec_mode & NEGOTIATE_SECURITY_CHALLENGE_RESPONSE) &&
1339 *pass && passlen != 24) {
1340 if (!lp_client_lanman_auth()) {
1341 DEBUG(1, ("Server requested LANMAN password "
1342 "(share-level security) but "
1343 "'client lanman auth' is disabled\n"));
1344 goto access_denied;
1345 }
1346
1347 /*
1348 * Non-encrypted passwords - convert to DOS codepage before
1349 * encryption.
1350 */
1351 passlen = 24;
1352 SMBencrypt(pass, cli->secblob.data, (uchar *)pword);
1353 } else {
1354 if((cli->sec_mode & (NEGOTIATE_SECURITY_USER_LEVEL
1355 |NEGOTIATE_SECURITY_CHALLENGE_RESPONSE))
1356 == 0) {
1357 if (!lp_client_plaintext_auth() && (*pass)) {
1358 DEBUG(1, ("Server requested plaintext "
1359 "password but 'client plaintext "
1360 "auth' is disabled\n"));
1361 goto access_denied;
1362 }
1363
1364 /*
1365 * Non-encrypted passwords - convert to DOS codepage
1366 * before using.
1367 */
1368 passlen = clistr_push(cli, pword, pass, sizeof(pword),
1369 STR_TERMINATE);
1370 if (passlen == -1) {
1371 DEBUG(1, ("clistr_push(pword) failed\n"));
1372 goto access_denied;
1373 }
1374 } else {
1375 if (passlen) {
1376 memcpy(pword, pass, passlen);
1377 }
1378 }
1379 }
1380
1381 SCVAL(vwv+0, 0, 0xFF);
1382 SCVAL(vwv+0, 1, 0);
1383 SSVAL(vwv+1, 0, 0);
1384 SSVAL(vwv+2, 0, TCONX_FLAG_EXTENDED_RESPONSE);
1385 SSVAL(vwv+3, 0, passlen);
1386
1387 if (passlen) {
1388 bytes = (uint8_t *)talloc_memdup(state, pword, passlen);
1389 } else {
1390 bytes = talloc_array(state, uint8_t, 0);
1391 }
1392
1393 /*
1394 * Add the sharename
1395 */
1396 tmp = talloc_asprintf_strupper_m(talloc_tos(), "\\\\%s\\%s",
1397 cli->desthost, share);
1398 if (tmp == NULL) {
1399 TALLOC_FREE(req);
1400 return NULL;
1401 }
1402 bytes = smb_bytes_push_str(bytes, cli_ucs2(cli), tmp, strlen(tmp)+1,
1403 NULL);
1404 TALLOC_FREE(tmp);
1405
1406 /*
1407 * Add the devicetype
1408 */
1409 tmp = talloc_strdup_upper(talloc_tos(), dev);
1410 if (tmp == NULL) {
1411 TALLOC_FREE(req);
1412 return NULL;
1413 }
1414 bytes = smb_bytes_push_str(bytes, false, tmp, strlen(tmp)+1, NULL);
1415 TALLOC_FREE(tmp);
1416
1417 if (bytes == NULL) {
1418 TALLOC_FREE(req);
1419 return NULL;
1420 }
1421
1422 state->bytes.iov_base = (void *)bytes;
1423 state->bytes.iov_len = talloc_get_size(bytes);
1424
1425 subreq = cli_smb_req_create(state, ev, cli, SMBtconX, 0, 4, vwv,
1426 1, &state->bytes);
1427 if (subreq == NULL) {
1428 TALLOC_FREE(req);
1429 return NULL;
1430 }
1431 tevent_req_set_callback(subreq, cli_tcon_andx_done, req);
1432 *psmbreq = subreq;
1433 return req;
1434
1435 access_denied:
1436 tevent_req_nterror(req, NT_STATUS_ACCESS_DENIED);
1437 return tevent_req_post(req, ev);
1438 }
1439
1440 struct tevent_req *cli_tcon_andx_send(TALLOC_CTX *mem_ctx,
1441 struct event_context *ev,
1442 struct cli_state *cli,
1443 const char *share, const char *dev,
1444 const char *pass, int passlen)
1445 {
1446 struct tevent_req *req, *subreq;
1447 NTSTATUS status;
1448
1449 req = cli_tcon_andx_create(mem_ctx, ev, cli, share, dev, pass, passlen,
1450 &subreq);
1451 if (req == NULL) {
1452 return NULL;
1453 }
1454 if (subreq == NULL) {
1455 return req;
1456 }
1457 status = cli_smb_req_send(subreq);
1458 if (!NT_STATUS_IS_OK(status)) {
1459 tevent_req_nterror(req, status);
1460 return tevent_req_post(req, ev);
1461 }
1462 return req;
1463 }
1464
1465 static void cli_tcon_andx_done(struct tevent_req *subreq)
1466 {
1467 struct tevent_req *req = tevent_req_callback_data(
1468 subreq, struct tevent_req);
1469 struct cli_tcon_andx_state *state = tevent_req_data(
1470 req, struct cli_tcon_andx_state);
1471 struct cli_state *cli = state->cli;
1472 char *inbuf = (char *)cli_smb_inbuf(subreq);
1473 uint8_t wct;
1474 uint16_t *vwv;
1475 uint32_t num_bytes;
1476 uint8_t *bytes;
1477 NTSTATUS status;
1478
1479 status = cli_smb_recv(subreq, 0, &wct, &vwv, &num_bytes, &bytes);
1480 if (!NT_STATUS_IS_OK(status)) {
1481 TALLOC_FREE(subreq);
1482 tevent_req_nterror(req, status);
1483 return;
1484 }
1485
1486 clistr_pull(inbuf, cli->dev, bytes, sizeof(fstring), num_bytes,
1487 STR_TERMINATE|STR_ASCII);
1488
1489 if ((cli->protocol >= PROTOCOL_NT1) && (num_bytes == 3)) {
1490 /* almost certainly win95 - enable bug fixes */
1491 cli->win95 = True;
1492 }
1493
1494 /*
1495 * Make sure that we have the optional support 16-bit field. WCT > 2.
1496 * Avoids issues when connecting to Win9x boxes sharing files
1497 */
1498
1499 cli->dfsroot = false;
1500
1501 if ((wct > 2) && (cli->protocol >= PROTOCOL_LANMAN2)) {
1502 cli->dfsroot = ((SVAL(vwv+2, 0) & SMB_SHARE_IN_DFS) != 0);
1503 }
1504
1505 cli->cnum = SVAL(inbuf,smb_tid);
1506 tevent_req_done(req);
1507 }
1508
1509 NTSTATUS cli_tcon_andx_recv(struct tevent_req *req)
1510 {
1511 return tevent_req_simple_recv_ntstatus(req);
1512 }
1513
1514 NTSTATUS cli_tcon_andx(struct cli_state *cli, const char *share,
1515 const char *dev, const char *pass, int passlen)
1516 {
1517 TALLOC_CTX *frame = talloc_stackframe();
1518 struct event_context *ev;
1519 struct tevent_req *req;
1520 NTSTATUS status = NT_STATUS_OK;
1521
1522 if (cli_has_async_calls(cli)) {
1523 /*
1524 * Can't use sync call while an async call is in flight
1525 */
1526 status = NT_STATUS_INVALID_PARAMETER;
1527 goto fail;
1528 }
1529
1530 ev = event_context_init(frame);
1531 if (ev == NULL) {
1532 status = NT_STATUS_NO_MEMORY;
1533 goto fail;
1534 }
1535
1536 req = cli_tcon_andx_send(frame, ev, cli, share, dev, pass, passlen);
1537 if (req == NULL) {
1538 status = NT_STATUS_NO_MEMORY;
1539 goto fail;
1540 }
1541
1542 if (!tevent_req_poll(req, ev)) {
1543 status = map_nt_error_from_unix(errno);
1544 goto fail;
1545 }
1546
1547 status = cli_tcon_andx_recv(req);
1548 fail:
1549 TALLOC_FREE(frame);
1550 if (!NT_STATUS_IS_OK(status)) {
1551 cli_set_error(cli, status);
1552 }
1553 return status;
1554 }
1555
1556 /****************************************************************************
1557 Send a tree disconnect.
1558 ****************************************************************************/
1559
1560 bool cli_tdis(struct cli_state *cli)
1561 {
1562 memset(cli->outbuf,'\0',smb_size);
1563 cli_set_message(cli->outbuf,0,0,True);
1564 SCVAL(cli->outbuf,smb_com,SMBtdis);
1565 SSVAL(cli->outbuf,smb_tid,cli->cnum);
1566 cli_setup_packet(cli);
1567
1568 cli_send_smb(cli);
1569 if (!cli_receive_smb(cli))
1570 return False;
1571
1572 if (cli_is_error(cli)) {
1573 return False;
1574 }
1575
1576 cli->cnum = -1;
1577 return True;
1578 }
1579
1580 /****************************************************************************
1581 Send a negprot command.
1582 ****************************************************************************/
1583
1584 void cli_negprot_sendsync(struct cli_state *cli)
1585 {
1586 char *p;
1587 int numprots;
1588
1589 if (cli->protocol < PROTOCOL_NT1)
1590 cli->use_spnego = False;
1591
1592 memset(cli->outbuf,'\0',smb_size);
1593
1594 /* setup the protocol strings */
1595 cli_set_message(cli->outbuf,0,0,True);
1596
1597 p = smb_buf(cli->outbuf);
1598 for (numprots=0; numprots < ARRAY_SIZE(prots); numprots++) {
1599 if (prots[numprots].prot > cli->protocol) {
1600 break;
1601 }
1602 *p++ = 2;
1603 p += clistr_push(cli, p, prots[numprots].name, -1, STR_TERMINATE);
1604 }
1605
1606 SCVAL(cli->outbuf,smb_com,SMBnegprot);
1607 cli_setup_bcc(cli, p);
1608 cli_setup_packet(cli);
1609
1610 SCVAL(smb_buf(cli->outbuf),0,2);
1611
1612 cli_send_smb(cli);
1613 }
1614
1615 /****************************************************************************
1616 Send a negprot command.
1617 ****************************************************************************/
1618
1619 struct cli_negprot_state {
1620 struct cli_state *cli;
1621 };
1622
1623 static void cli_negprot_done(struct tevent_req *subreq);
1624
1625 struct tevent_req *cli_negprot_send(TALLOC_CTX *mem_ctx,
1626 struct event_context *ev,
1627 struct cli_state *cli)
1628 {
1629 struct tevent_req *req, *subreq;
1630 struct cli_negprot_state *state;
1631 uint8_t *bytes = NULL;
1632 int numprots;
1633 uint16_t cnum;
1634
1635 req = tevent_req_create(mem_ctx, &state, struct cli_negprot_state);
1636 if (req == NULL) {
1637 return NULL;
1638 }
1639 state->cli = cli;
1640
1641 if (cli->protocol < PROTOCOL_NT1)
1642 cli->use_spnego = False;
1643
1644 /* setup the protocol strings */
1645 for (numprots=0; numprots < ARRAY_SIZE(prots); numprots++) {
1646 uint8_t c = 2;
1647 if (prots[numprots].prot > cli->protocol) {
1648 break;
1649 }
1650 bytes = (uint8_t *)talloc_append_blob(
1651 state, bytes, data_blob_const(&c, sizeof(c)));
1652 if (tevent_req_nomem(bytes, req)) {
1653 return tevent_req_post(req, ev);
1654 }
1655 bytes = smb_bytes_push_str(bytes, false,
1656 prots[numprots].name,
1657 strlen(prots[numprots].name)+1,
1658 NULL);
1659 if (tevent_req_nomem(bytes, req)) {
1660 return tevent_req_post(req, ev);
1661 }
1662 }
1663
1664 cnum = cli->cnum;
1665
1666 cli->cnum = 0;
1667 subreq = cli_smb_send(state, ev, cli, SMBnegprot, 0, 0, NULL,
1668 talloc_get_size(bytes), bytes);
1669 cli->cnum = cnum;
1670
1671 if (tevent_req_nomem(subreq, req)) {
1672 return tevent_req_post(req, ev);
1673 }
1674 tevent_req_set_callback(subreq, cli_negprot_done, req);
1675 return req;
1676 }
1677
1678 static void cli_negprot_done(struct tevent_req *subreq)
1679 {
1680 struct tevent_req *req = tevent_req_callback_data(
1681 subreq, struct tevent_req);
1682 struct cli_negprot_state *state = tevent_req_data(
1683 req, struct cli_negprot_state);
1684 struct cli_state *cli = state->cli;
1685 uint8_t wct;
1686 uint16_t *vwv;
1687 uint32_t num_bytes;
1688 uint8_t *bytes;
1689 NTSTATUS status;
1690 uint16_t protnum;
1691
1692 status = cli_smb_recv(subreq, 1, &wct, &vwv, &num_bytes, &bytes);
1693 if (!NT_STATUS_IS_OK(status)) {
1694 TALLOC_FREE(subreq);
1695 tevent_req_nterror(req, status);
1696 return;
1697 }
1698
1699 protnum = SVAL(vwv, 0);
1700
1701 if ((protnum >= ARRAY_SIZE(prots))
1702 || (prots[protnum].prot > cli->protocol)) {
1703 tevent_req_nterror(req, NT_STATUS_INVALID_NETWORK_RESPONSE);
1704 return;
1705 }
1706
1707 cli->protocol = prots[protnum].prot;
1708
1709 if ((cli->protocol < PROTOCOL_NT1) &&
1710 client_is_signing_mandatory(cli)) {
1711 DEBUG(0,("cli_negprot: SMB signing is mandatory and the selected protocol level doesn't support it.\n"));
1712 tevent_req_nterror(req, NT_STATUS_ACCESS_DENIED);
1713 return;
1714 }
1715
1716 if (cli->protocol >= PROTOCOL_NT1) {
1717 struct timespec ts;
1718 bool negotiated_smb_signing = false;
1719
1720 if (wct != 0x11) {
1721 tevent_req_nterror(req, NT_STATUS_INVALID_NETWORK_RESPONSE);
1722 return;
1723 }
1724
1725 /* NT protocol */
1726 cli->sec_mode = CVAL(vwv + 1, 0);
1727 cli->max_mux = SVAL(vwv + 1, 1);
1728 cli->max_xmit = IVAL(vwv + 3, 1);
1729 cli->sesskey = IVAL(vwv + 7, 1);
1730 cli->serverzone = SVALS(vwv + 15, 1);
1731 cli->serverzone *= 60;
1732 /* this time arrives in real GMT */
1733 ts = interpret_long_date(((char *)(vwv+11))+1);
1734 cli->servertime = ts.tv_sec;
1735 cli->secblob = data_blob(bytes, num_bytes);
1736 cli->capabilities = IVAL(vwv + 9, 1);
1737 if (cli->capabilities & CAP_RAW_MODE) {
1738 cli->readbraw_supported = True;
1739 cli->writebraw_supported = True;
1740 }
1741 /* work out if they sent us a workgroup */
1742 if (!(cli->capabilities & CAP_EXTENDED_SECURITY) &&
1743 smb_buflen(cli->inbuf) > 8) {
1744 clistr_pull(cli->inbuf, cli->server_domain,
1745 bytes+8, sizeof(cli->server_domain),
1746 num_bytes-8,
1747 STR_UNICODE|STR_NOALIGN);
1748 }
1749
1750 /*
1751 * As signing is slow we only turn it on if either the client or
1752 * the server require it. JRA.
1753 */
1754
1755 if (cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_REQUIRED) {
1756 /* Fail if server says signing is mandatory and we don't want to support it. */
1757 if (!client_is_signing_allowed(cli)) {
1758 DEBUG(0,("cli_negprot: SMB signing is mandatory and we have disabled it.\n"));
1759 tevent_req_nterror(req,
1760 NT_STATUS_ACCESS_DENIED);
1761 return;
1762 }
1763 negotiated_smb_signing = true;
1764 } else if (client_is_signing_mandatory(cli) && client_is_signing_allowed(cli)) {
1765 /* Fail if client says signing is mandatory and the server doesn't support it. */
1766 if (!(cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_ENABLED)) {
1767 DEBUG(1,("cli_negprot: SMB signing is mandatory and the server doesn't support it.\n"));
1768 tevent_req_nterror(req,
1769 NT_STATUS_ACCESS_DENIED);
1770 return;
1771 }
1772 negotiated_smb_signing = true;
1773 } else if (cli->sec_mode & NEGOTIATE_SECURITY_SIGNATURES_ENABLED) {
1774 negotiated_smb_signing = true;
1775 }
1776
1777 if (negotiated_smb_signing) {
1778 cli_set_signing_negotiated(cli);
1779 }
1780
1781 if (cli->capabilities & (CAP_LARGE_READX|CAP_LARGE_WRITEX)) {
1782 SAFE_FREE(cli->outbuf);
1783 SAFE_FREE(cli->inbuf);
1784 cli->outbuf = (char *)SMB_MALLOC(CLI_SAMBA_MAX_LARGE_READX_SIZE+LARGE_WRITEX_HDR_SIZE+SAFETY_MARGIN);
1785 cli->inbuf = (char *)SMB_MALLOC(CLI_SAMBA_MAX_LARGE_READX_SIZE+LARGE_WRITEX_HDR_SIZE+SAFETY_MARGIN);
1786 cli->bufsize = CLI_SAMBA_MAX_LARGE_READX_SIZE + LARGE_WRITEX_HDR_SIZE;
1787 }
1788
1789 } else if (cli->protocol >= PROTOCOL_LANMAN1) {
1790 if (wct != 0x0D) {
1791 tevent_req_nterror(req, NT_STATUS_INVALID_NETWORK_RESPONSE);
1792 return;
1793 }
1794
1795 cli->use_spnego = False;
1796 cli->sec_mode = SVAL(vwv + 1, 0);
1797 cli->max_xmit = SVAL(vwv + 2, 0);
1798 cli->max_mux = SVAL(vwv + 3, 0);
1799 cli->sesskey = IVAL(vwv + 6, 0);
1800 cli->serverzone = SVALS(vwv + 10, 0);
1801 cli->serverzone *= 60;
1802 /* this time is converted to GMT by make_unix_date */
1803 cli->servertime = cli_make_unix_date(
1804 cli, (char *)(vwv + 8));
1805 cli->readbraw_supported = ((SVAL(vwv + 5, 0) & 0x1) != 0);
1806 cli->writebraw_supported = ((SVAL(vwv + 5, 0) & 0x2) != 0);
1807 cli->secblob = data_blob(bytes, num_bytes);
1808 } else {
1809 /* the old core protocol */
1810 cli->use_spnego = False;
1811 cli->sec_mode = 0;
1812 cli->serverzone = get_time_zone(time(NULL));
1813 }
1814
1815 cli->max_xmit = MIN(cli->max_xmit, CLI_BUFFER_SIZE);
1816
1817 /* a way to force ascii SMB */
1818 if (getenv("CLI_FORCE_ASCII"))
1819 cli->capabilities &= ~CAP_UNICODE;
1820
1821 tevent_req_done(req);
1822 }
1823
1824 NTSTATUS cli_negprot_recv(struct tevent_req *req)
1825 {
1826 return tevent_req_simple_recv_ntstatus(req);
1827 }
1828
1829 NTSTATUS cli_negprot(struct cli_state *cli)
1830 {
1831 TALLOC_CTX *frame = talloc_stackframe();
1832 struct event_context *ev;
1833 struct tevent_req *req;
1834 NTSTATUS status = NT_STATUS_OK;
1835
1836 if (cli_has_async_calls(cli)) {
1837 /*
1838 * Can't use sync call while an async call is in flight
1839 */
1840 status = NT_STATUS_INVALID_PARAMETER;
1841 goto fail;
1842 }
1843
1844 ev = event_context_init(frame);
1845 if (ev == NULL) {
1846 status = NT_STATUS_NO_MEMORY;
1847 goto fail;
1848 }
1849
1850 req = cli_negprot_send(frame, ev, cli);
1851 if (req == NULL) {
1852 status = NT_STATUS_NO_MEMORY;
1853 goto fail;
1854 }
1855
1856 if (!tevent_req_poll(req, ev)) {
1857 status = map_nt_error_from_unix(errno);
1858 goto fail;
1859 }
1860
1861 status = cli_negprot_recv(req);
1862 fail:
1863 TALLOC_FREE(frame);
1864 if (!NT_STATUS_IS_OK(status)) {
1865 cli_set_error(cli, status);
1866 }
1867 return status;
1868 }
1869
1870 /****************************************************************************
1871 Send a session request. See rfc1002.txt 4.3 and 4.3.2.
1872 ****************************************************************************/
1873
1874 bool cli_session_request(struct cli_state *cli,
1875 struct nmb_name *calling, struct nmb_name *called)
1876 {
1877 char *p;
1878 int len = 4;
1879 int namelen = 0;
1880 char *tmp;
1881
1882 /* 445 doesn't have session request */
1883 if (cli->port == 445)
1884 return True;
1885
1886 memcpy(&(cli->calling), calling, sizeof(*calling));
1887 memcpy(&(cli->called ), called , sizeof(*called ));
1888
1889 /* put in the destination name */
1890
1891 tmp = name_mangle(talloc_tos(), cli->called.name,
1892 cli->called.name_type);
1893 if (tmp == NULL) {
1894 return false;
1895 }
1896
1897 p = cli->outbuf+len;
1898 namelen = name_len((unsigned char *)tmp, talloc_get_size(tmp));
1899 if (namelen > 0) {
1900 memcpy(p, tmp, namelen);
1901 len += namelen;
1902 }
1903 TALLOC_FREE(tmp);
1904
1905 /* and my name */
1906
1907 tmp = name_mangle(talloc_tos(), cli->calling.name,
1908 cli->calling.name_type);
1909 if (tmp == NULL) {
1910 return false;
1911 }
1912
1913 p = cli->outbuf+len;
1914 namelen = name_len((unsigned char *)tmp, talloc_get_size(tmp));
1915 if (namelen > 0) {
1916 memcpy(p, tmp, namelen);
1917 len += namelen;
1918 }
1919 TALLOC_FREE(tmp);
1920
1921 /* send a session request (RFC 1002) */
1922 /* setup the packet length
1923 * Remove four bytes from the length count, since the length
1924 * field in the NBT Session Service header counts the number
1925 * of bytes which follow. The cli_send_smb() function knows
1926 * about this and accounts for those four bytes.
1927 * CRH.
1928 */
1929 len -= 4;
1930 _smb_setlen(cli->outbuf,len);
1931 SCVAL(cli->outbuf,0,0x81);
1932
1933 cli_send_smb(cli);
1934 DEBUG(5,("Sent session request\n"));
1935
1936 if (!cli_receive_smb(cli))
1937 return False;
1938
1939 if (CVAL(cli->inbuf,0) == 0x84) {
1940 /* C. Hoch 9/14/95 Start */
1941 /* For information, here is the response structure.
1942 * We do the byte-twiddling to for portability.
1943 struct RetargetResponse{
1944 unsigned char type;
1945 unsigned char flags;
1946 int16 length;
1947 int32 ip_addr;
1948 int16 port;
1949 };
1950 */
1951 uint16_t port = (CVAL(cli->inbuf,8)<<8)+CVAL(cli->inbuf,9);
1952 struct in_addr dest_ip;
1953 NTSTATUS status;
1954
1955 /* SESSION RETARGET */
1956 putip((char *)&dest_ip,cli->inbuf+4);
1957 in_addr_to_sockaddr_storage(&cli->dest_ss, dest_ip);
1958
1959 status = open_socket_out(&cli->dest_ss, port,
1960 LONG_CONNECT_TIMEOUT, &cli->fd);
1961 if (!NT_STATUS_IS_OK(status)) {
1962 return False;
1963 }
1964
1965 DEBUG(3,("Retargeted\n"));
1966
1967 set_socket_options(cli->fd, lp_socket_options());
1968
1969 /* Try again */
1970 {
1971 static int depth;
1972 bool ret;
1973 if (depth > 4) {
1974 DEBUG(0,("Retarget recursion - failing\n"));
1975 return False;
1976 }
1977 depth++;
1978 ret = cli_session_request(cli, calling, called);
1979 depth--;
1980 return ret;
1981 }
1982 } /* C. Hoch 9/14/95 End */
1983
1984 if (CVAL(cli->inbuf,0) != 0x82) {
1985 /* This is the wrong place to put the error... JRA. */
1986 cli->rap_error = CVAL(cli->inbuf,4);
1987 return False;
1988 }
1989 return(True);
1990 }
1991
1992 struct fd_struct {
1993 int fd;
1994 };
1995
1996 static void smb_sock_connected(struct tevent_req *req)
1997 {
1998 struct fd_struct *pfd = tevent_req_callback_data(
1999 req, struct fd_struct);
2000 int fd;
2001 NTSTATUS status;
2002
2003 status = open_socket_out_defer_recv(req, &fd);
2004 if (NT_STATUS_IS_OK(status)) {
2005 pfd->fd = fd;
2006 }
2007 }
2008
2009 static NTSTATUS open_smb_socket(const struct sockaddr_storage *pss,
2010 uint16_t *port, int timeout, int *pfd)
2011 {
2012 struct event_context *ev;
2013 struct tevent_req *r139, *r445;
2014 struct fd_struct *fd139, *fd445;
2015 NTSTATUS status = NT_STATUS_NO_MEMORY;
2016
2017 if (*port != 0) {
2018 return open_socket_out(pss, *port, timeout, pfd);
2019 }
2020
2021 ev = event_context_init(talloc_tos());
2022 if (ev == NULL) {
2023 return NT_STATUS_NO_MEMORY;
2024 }
2025
2026 fd139 = talloc(ev, struct fd_struct);
2027 if (fd139 == NULL) {
2028 goto done;
2029 }
2030 fd139->fd = -1;
2031
2032 fd445 = talloc(ev, struct fd_struct);
2033 if (fd445 == NULL) {
2034 goto done;
2035 }
2036 fd445->fd = -1;
2037
2038 r445 = open_socket_out_defer_send(ev, ev, timeval_set(0, 0),
2039 pss, 445, timeout);
2040 r139 = open_socket_out_defer_send(ev, ev, timeval_set(0, 3000),
2041 pss, 139, timeout);
2042 if ((r445 == NULL) || (r139 == NULL)) {
2043 goto done;
2044 }
2045 tevent_req_set_callback(r445, smb_sock_connected, fd445);
2046 tevent_req_set_callback(r139, smb_sock_connected, fd139);
2047
2048 while ((fd445->fd == -1) && (fd139->fd == -1)
2049 && (tevent_req_is_in_progress(r139)
2050 || tevent_req_is_in_progress(r445))) {
2051 event_loop_once(ev);
2052 }
2053
2054 if ((fd139->fd != -1) && (fd445->fd != -1)) {
2055 close(fd139->fd);
2056 fd139->fd = -1;
2057 }
2058
2059 if (fd445->fd != -1) {
2060 *port = 445;
2061 *pfd = fd445->fd;
2062 status = NT_STATUS_OK;
2063 goto done;
2064 }
2065 if (fd139->fd != -1) {
2066 *port = 139;
2067 *pfd = fd139->fd;
2068 status = NT_STATUS_OK;
2069 goto done;
2070 }
2071
2072 status = open_socket_out_defer_recv(r445, &fd445->fd);
2073 done:
2074 TALLOC_FREE(ev);
2075 return status;
2076 }
2077
2078 /****************************************************************************
2079 Open the client sockets.
2080 ****************************************************************************/
2081
2082 NTSTATUS cli_connect(struct cli_state *cli,
2083 const char *host,
2084 struct sockaddr_storage *dest_ss)
2085
2086 {
2087 int name_type = 0x20;
2088 TALLOC_CTX *frame = talloc_stackframe();
2089 unsigned int num_addrs = 0;
2090 unsigned int i = 0;
2091 struct sockaddr_storage *ss_arr = NULL;
2092 char *p = NULL;
2093
2094 /* reasonable default hostname */
2095 if (!host) {
2096 host = STAR_SMBSERVER;
2097 }
2098
2099 fstrcpy(cli->desthost, host);
2100
2101 /* allow hostnames of the form NAME#xx and do a netbios lookup */
2102 if ((p = strchr(cli->desthost, '#'))) {
2103 name_type = strtol(p+1, NULL, 16);
2104 *p = 0;
2105 }
2106
2107 if (!dest_ss || is_zero_addr((struct sockaddr *)dest_ss)) {
2108 NTSTATUS status =resolve_name_list(frame,
2109 cli->desthost,
2110 name_type,
2111 &ss_arr,
2112 &num_addrs);
2113 if (!NT_STATUS_IS_OK(status)) {
2114 TALLOC_FREE(frame);
2115 return NT_STATUS_BAD_NETWORK_NAME;
2116 }
2117 } else {
2118 num_addrs = 1;
2119 ss_arr = TALLOC_P(frame, struct sockaddr_storage);
2120 if (!ss_arr) {
2121 TALLOC_FREE(frame);
2122 return NT_STATUS_NO_MEMORY;
2123 }
2124 *ss_arr = *dest_ss;
2125 }
2126
2127 for (i = 0; i < num_addrs; i++) {
2128 cli->dest_ss = ss_arr[i];
2129 if (getenv("LIBSMB_PROG")) {
2130 cli->fd = sock_exec(getenv("LIBSMB_PROG"));
2131 } else {
2132 uint16_t port = cli->port;
2133 NTSTATUS status;
2134 status = open_smb_socket(&cli->dest_ss, &port,
2135 cli->timeout, &cli->fd);
2136 if (NT_STATUS_IS_OK(status)) {
2137 cli->port = port;
2138 }
2139 }
2140 if (cli->fd == -1) {
2141 char addr[INET6_ADDRSTRLEN];
2142 print_sockaddr(addr, sizeof(addr), &ss_arr[i]);
2143 DEBUG(2,("Error connecting to %s (%s)\n",
2144 dest_ss?addr:host,strerror(errno)));
2145 } else {
2146 /* Exit from loop on first connection. */
2147 break;
2148 }
2149 }
2150
2151 if (cli->fd == -1) {
2152 TALLOC_FREE(frame);
2153 return map_nt_error_from_unix(errno);
2154 }
2155
2156 if (dest_ss) {
2157 *dest_ss = cli->dest_ss;
2158 }
2159
2160 set_socket_options(cli->fd, lp_socket_options());
2161
2162 TALLOC_FREE(frame);
2163 return NT_STATUS_OK;
2164 }
2165
2166 /**
2167 establishes a connection to after the negprot.
2168 @param output_cli A fully initialised cli structure, non-null only on success
2169 @param dest_host The netbios name of the remote host
2170 @param dest_ss (optional) The the destination IP, NULL for name based lookup
2171 @param port (optional) The destination port (0 for default)
2172 @param retry bool. Did this connection fail with a retryable error ?
2173
2174 */
2175 NTSTATUS cli_start_connection(struct cli_state **output_cli,
2176 const char *my_name,
2177 const char *dest_host,
2178 struct sockaddr_storage *dest_ss, int port,
2179 int signing_state, int flags,
2180 bool *retry)
2181 {
2182 NTSTATUS nt_status;
2183 struct nmb_name calling;
2184 struct nmb_name called;
2185 struct cli_state *cli;
2186 struct sockaddr_storage ss;
2187
2188 if (retry)
2189 *retry = False;
2190
2191 if (!my_name)
2192 my_name = global_myname();
2193
2194 if (!(cli = cli_initialise_ex(signing_state))) {
2195 return NT_STATUS_NO_MEMORY;
2196 }
2197
2198 make_nmb_name(&calling, my_name, 0x0);
2199 make_nmb_name(&called , dest_host, 0x20);
2200
2201 cli_set_port(cli, port);
2202 cli_set_timeout(cli, 10000); /* 10 seconds. */
2203
2204 if (dest_ss) {
2205 ss = *dest_ss;
2206 } else {
2207 zero_sockaddr(&ss);
2208 }
2209
2210 again:
2211
2212 DEBUG(3,("Connecting to host=%s\n", dest_host));
2213
2214 nt_status = cli_connect(cli, dest_host, &ss);
2215 if (!NT_STATUS_IS_OK(nt_status)) {
2216 char addr[INET6_ADDRSTRLEN];
2217 print_sockaddr(addr, sizeof(addr), &ss);
2218 DEBUG(1,("cli_start_connection: failed to connect to %s (%s). Error %s\n",
2219 nmb_namestr(&called), addr, nt_errstr(nt_status) ));
2220 cli_shutdown(cli);
2221 return nt_status;
2222 }
2223
2224 if (retry)
2225 *retry = True;
2226
2227 if (!cli_session_request(cli, &calling, &called)) {
2228 char *p;
2229 DEBUG(1,("session request to %s failed (%s)\n",
2230 called.name, cli_errstr(cli)));
2231 if ((p=strchr(called.name, '.')) && !is_ipaddress(called.name)) {
2232 *p = 0;
2233 goto again;
2234 }
2235 if (strcmp(called.name, STAR_SMBSERVER)) {
2236 make_nmb_name(&called , STAR_SMBSERVER, 0x20);
2237 goto again;
2238 }
2239 return NT_STATUS_BAD_NETWORK_NAME;
2240 }
2241
2242 if (flags & CLI_FULL_CONNECTION_DONT_SPNEGO)
2243 cli->use_spnego = False;
2244 else if (flags & CLI_FULL_CONNECTION_USE_KERBEROS)
2245 cli->use_kerberos = True;
2246
2247 if ((flags & CLI_FULL_CONNECTION_FALLBACK_AFTER_KERBEROS) &&
2248 cli->use_kerberos) {
2249 cli->fallback_after_kerberos = true;
2250 }
2251 if (flags & CLI_FULL_CONNECTION_USE_CCACHE) {
2252 cli->use_ccache = true;
2253 }
2254
2255 nt_status = cli_negprot(cli);
2256 if (!NT_STATUS_IS_OK(nt_status)) {
2257 DEBUG(1, ("failed negprot: %s\n", nt_errstr(nt_status)));
2258 cli_shutdown(cli);
2259 return nt_status;
2260 }
2261
2262 *output_cli = cli;
2263 return NT_STATUS_OK;
2264 }
2265
2266
2267 /**
2268 establishes a connection right up to doing tconX, password specified.
2269 @param output_cli A fully initialised cli structure, non-null only on success
2270 @param dest_host The netbios name of the remote host
2271 @param dest_ip (optional) The the destination IP, NULL for name based lookup
2272 @param port (optional) The destination port (0 for default)
2273 @param service (optional) The share to make the connection to. Should be 'unqualified' in any way.
2274 @param service_type The 'type' of serivice.
2275 @param user Username, unix string
2276 @param domain User's domain
2277 @param password User's password, unencrypted unix string.
2278 @param retry bool. Did this connection fail with a retryable error ?
2279 */
2280
2281 NTSTATUS cli_full_connection(struct cli_state **output_cli,
2282 const char *my_name,
2283 const char *dest_host,
2284 struct sockaddr_storage *dest_ss, int port,
2285 const char *service, const char *service_type,
2286 const char *user, const char *domain,
2287 const char *password, int flags,
2288 int signing_state,
2289 bool *retry)
2290 {
2291 NTSTATUS nt_status;
2292 struct cli_state *cli = NULL;
2293 int pw_len = password ? strlen(password)+1 : 0;
2294
2295 *output_cli = NULL;
2296
2297 if (password == NULL) {
2298 password = "";
2299 }
2300
2301 nt_status = cli_start_connection(&cli, my_name, dest_host,
2302 dest_ss, port, signing_state,
2303 flags, retry);
2304
2305 if (!NT_STATUS_IS_OK(nt_status)) {
2306 return nt_status;
2307 }
2308
2309 cli->use_oplocks = ((flags & CLI_FULL_CONNECTION_OPLOCKS) != 0);
2310 cli->use_level_II_oplocks =
2311 ((flags & CLI_FULL_CONNECTION_LEVEL_II_OPLOCKS) != 0);
2312
2313 nt_status = cli_session_setup(cli, user, password, pw_len, password,
2314 pw_len, domain);
2315 if (!NT_STATUS_IS_OK(nt_status)) {
2316
2317 if (!(flags & CLI_FULL_CONNECTION_ANONYMOUS_FALLBACK)) {
2318 DEBUG(1,("failed session setup with %s\n",
2319 nt_errstr(nt_status)));
2320 cli_shutdown(cli);
2321 return nt_status;
2322 }
2323
2324 nt_status = cli_session_setup(cli, "", "", 0, "", 0, domain);
2325 if (!NT_STATUS_IS_OK(nt_status)) {
2326 DEBUG(1,("anonymous failed session setup with %s\n",
2327 nt_errstr(nt_status)));
2328 cli_shutdown(cli);
2329 return nt_status;
2330 }
2331 }
2332
2333 if (service) {
2334 nt_status = cli_tcon_andx(cli, service, service_type, password,
2335 pw_len);
2336 if (!NT_STATUS_IS_OK(nt_status)) {
2337 DEBUG(1,("failed tcon_X with %s\n", nt_errstr(nt_status)));
2338 cli_shutdown(cli);
2339 if (NT_STATUS_IS_OK(nt_status)) {
2340 nt_status = NT_STATUS_UNSUCCESSFUL;
2341 }
2342 return nt_status;
2343 }
2344 }
2345
2346 nt_status = cli_init_creds(cli, user, domain, password);
2347 if (!NT_STATUS_IS_OK(nt_status)) {
2348 cli_shutdown(cli);
2349 return nt_status;
2350 }
2351
2352 *output_cli = cli;
2353 return NT_STATUS_OK;
2354 }
2355
2356 /****************************************************************************
2357 Attempt a NetBIOS session request, falling back to *SMBSERVER if needed.
2358 ****************************************************************************/
2359
2360 bool attempt_netbios_session_request(struct cli_state **ppcli, const char *srchost, const char *desthost,
2361 struct sockaddr_storage *pdest_ss)
2362 {
2363 struct nmb_name calling, called;
2364
2365 make_nmb_name(&calling, srchost, 0x0);
2366
2367 /*
2368 * If the called name is an IP address
2369 * then use *SMBSERVER immediately.
2370 */
2371
2372 if(is_ipaddress(desthost)) {
2373 make_nmb_name(&called, STAR_SMBSERVER, 0x20);
2374 } else {
2375 make_nmb_name(&called, desthost, 0x20);
2376 }
2377
2378 if (!cli_session_request(*ppcli, &calling, &called)) {
2379 NTSTATUS status;
2380 struct nmb_name smbservername;
2381
2382 make_nmb_name(&smbservername, STAR_SMBSERVER, 0x20);
2383
2384 /*
2385 * If the name wasn't *SMBSERVER then
2386 * try with *SMBSERVER if the first name fails.
2387 */
2388
2389 if (nmb_name_equal(&called, &smbservername)) {
2390
2391 /*
2392 * The name used was *SMBSERVER, don't bother with another name.
2393 */
2394
2395 DEBUG(0,("attempt_netbios_session_request: %s rejected the session for name *SMBSERVER \
2396 with error %s.\n", desthost, cli_errstr(*ppcli) ));
2397 return False;
2398 }
2399
2400 /* Try again... */
2401 cli_shutdown(*ppcli);
2402
2403 *ppcli = cli_initialise();
2404 if (!*ppcli) {
2405 /* Out of memory... */
2406 return False;
2407 }
2408
2409 status = cli_connect(*ppcli, desthost, pdest_ss);
2410 if (!NT_STATUS_IS_OK(status) ||
2411 !cli_session_request(*ppcli, &calling, &smbservername)) {
2412 DEBUG(0,("attempt_netbios_session_request: %s rejected the session for \
2413 name *SMBSERVER with error %s\n", desthost, cli_errstr(*ppcli) ));
2414 return False;
2415 }
2416 }
2417
2418 return True;
2419 }
2420
2421 /****************************************************************************
2422 Send an old style tcon.
2423 ****************************************************************************/
2424 NTSTATUS cli_raw_tcon(struct cli_state *cli,
2425 const char *service, const char *pass, const char *dev,
2426 uint16 *max_xmit, uint16 *tid)
2427 {
2428 char *p;
2429
2430 if (!lp_client_plaintext_auth() && (*pass)) {
2431 DEBUG(1, ("Server requested plaintext password but 'client "
2432 "plaintext auth' is disabled\n"));
2433 return NT_STATUS_ACCESS_DENIED;
2434 }
2435
2436 memset(cli->outbuf,'\0',smb_size);
2437 memset(cli->inbuf,'\0',smb_size);
2438
2439 cli_set_message(cli->outbuf, 0, 0, True);
2440 SCVAL(cli->outbuf,smb_com,SMBtcon);
2441 cli_setup_packet(cli);
2442
2443 p = smb_buf(cli->outbuf);
2444 *p++ = 4; p += clistr_push(cli, p, service, -1, STR_TERMINATE | STR_NOALIGN);
2445 *p++ = 4; p += clistr_push(cli, p, pass, -1, STR_TERMINATE | STR_NOALIGN);
2446 *p++ = 4; p += clistr_push(cli, p, dev, -1, STR_TERMINATE | STR_NOALIGN);
2447
2448 cli_setup_bcc(cli, p);
2449
2450 cli_send_smb(cli);
2451 if (!cli_receive_smb(cli)) {
2452 return NT_STATUS_UNEXPECTED_NETWORK_ERROR;
2453 }
2454
2455 if (cli_is_error(cli)) {
2456 return cli_nt_error(cli);
2457 }
2458
2459 *max_xmit = SVAL(cli->inbuf, smb_vwv0);
2460 *tid = SVAL(cli->inbuf, smb_vwv1);
2461
2462 return NT_STATUS_OK;
2463 }
2464
2465 /* Return a cli_state pointing at the IPC$ share for the given server */
2466
2467 struct cli_state *get_ipc_connect(char *server,
2468 struct sockaddr_storage *server_ss,
2469 const struct user_auth_info *user_info)
2470 {
2471 struct cli_state *cli;
2472 NTSTATUS nt_status;
2473 uint32_t flags = CLI_FULL_CONNECTION_ANONYMOUS_FALLBACK;
2474
2475 if (user_info->use_kerberos) {
2476 flags |= CLI_FULL_CONNECTION_USE_KERBEROS;
2477 }
2478
2479 nt_status = cli_full_connection(&cli, NULL, server, server_ss, 0, "IPC$", "IPC",
2480 user_info->username ? user_info->username : "",
2481 lp_workgroup(),
2482 user_info->password ? user_info->password : "",
2483 flags,
2484 Undefined, NULL);
2485
2486 if (NT_STATUS_IS_OK(nt_status)) {
2487 return cli;
2488 } else if (is_ipaddress(server)) {
2489 /* windows 9* needs a correct NMB name for connections */
2490 fstring remote_name;
2491
2492 if (name_status_find("*", 0, 0, server_ss, remote_name)) {
2493 cli = get_ipc_connect(remote_name, server_ss, user_info);
2494 if (cli)
2495 return cli;
2496 }
2497 }
2498 return NULL;
2499 }
2500
2501 /*
2502 * Given the IP address of a master browser on the network, return its
2503 * workgroup and connect to it.
2504 *
2505 * This function is provided to allow additional processing beyond what
2506 * get_ipc_connect_master_ip_bcast() does, e.g. to retrieve the list of master
2507 * browsers and obtain each master browsers' list of domains (in case the
2508 * first master browser is recently on the network and has not yet
2509 * synchronized with other master browsers and therefore does not yet have the
2510 * entire network browse list)
2511 */
2512
2513 struct cli_state *get_ipc_connect_master_ip(TALLOC_CTX *ctx,
2514 struct ip_service *mb_ip,
2515 const struct user_auth_info *user_info,
2516 char **pp_workgroup_out)
2517 {
2518 char addr[INET6_ADDRSTRLEN];
2519 fstring name;
2520 struct cli_state *cli;
2521 struct sockaddr_storage server_ss;
2522
2523 *pp_workgroup_out = NULL;
2524
2525 print_sockaddr(addr, sizeof(addr), &mb_ip->ss);
2526 DEBUG(99, ("Looking up name of master browser %s\n",
2527 addr));
2528
2529 /*
2530 * Do a name status query to find out the name of the master browser.
2531 * We use <01><02>__MSBROWSE__<02>#01 if *#00 fails because a domain
2532 * master browser will not respond to a wildcard query (or, at least,
2533 * an NT4 server acting as the domain master browser will not).
2534 *
2535 * We might be able to use ONLY the query on MSBROWSE, but that's not
2536 * yet been tested with all Windows versions, so until it is, leave
2537 * the original wildcard query as the first choice and fall back to
2538 * MSBROWSE if the wildcard query fails.
2539 */
2540 if (!name_status_find("*", 0, 0x1d, &mb_ip->ss, name) &&
2541 !name_status_find(MSBROWSE, 1, 0x1d, &mb_ip->ss, name)) {
2542
2543 DEBUG(99, ("Could not retrieve name status for %s\n",
2544 addr));
2545 return NULL;
2546 }
2547
2548 if (!find_master_ip(name, &server_ss)) {
2549 DEBUG(99, ("Could not find master ip for %s\n", name));
2550 return NULL;
2551 }
2552
2553 *pp_workgroup_out = talloc_strdup(ctx, name);
2554
2555 DEBUG(4, ("found master browser %s, %s\n", name, addr));
2556
2557 print_sockaddr(addr, sizeof(addr), &server_ss);
2558 cli = get_ipc_connect(addr, &server_ss, user_info);
2559
2560 return cli;
2561 }
2562
2563 /*
2564 * Return the IP address and workgroup of a master browser on the network, and
2565 * connect to it.
2566 */
2567
2568 struct cli_state *get_ipc_connect_master_ip_bcast(TALLOC_CTX *ctx,
2569 const struct user_auth_info *user_info,
2570 char **pp_workgroup_out)
2571 {
2572 struct ip_service *ip_list;
2573 struct cli_state *cli;
2574 int i, count;
2575
2576 *pp_workgroup_out = NULL;
2577
2578 DEBUG(99, ("Do broadcast lookup for workgroups on local network\n"));
2579
2580 /* Go looking for workgroups by broadcasting on the local network */
2581
2582 if (!NT_STATUS_IS_OK(name_resolve_bcast(MSBROWSE, 1, &ip_list,
2583 &count))) {
2584 DEBUG(99, ("No master browsers responded\n"));
2585 return False;
2586 }
2587
2588 for (i = 0; i < count; i++) {
2589 char addr[INET6_ADDRSTRLEN];
2590 print_sockaddr(addr, sizeof(addr), &ip_list[i].ss);
2591 DEBUG(99, ("Found master browser %s\n", addr));
2592
2593 cli = get_ipc_connect_master_ip(ctx, &ip_list[i],
2594 user_info, pp_workgroup_out);
2595 if (cli)
2596 return(cli);
2597 }
2598
2599 return NULL;
2600 }
Samba GIT mirror