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