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