source: branches/samba-3.2.x/source/utils/ntlm_auth.c@ 536

Last change on this file since 536 was 233, checked in by Herwig Bauernfeind, 17 years ago

Update 3.2 branch to 3.2.9
File size: 69.8 KB
Line 
1/*
2 Unix SMB/CIFS implementation.
3
4 Winbind status program.
5
6 Copyright (C) Tim Potter 2000-2003
7 Copyright (C) Andrew Bartlett <[email protected]> 2003-2004
8 Copyright (C) Francesco Chemolli <[email protected]> 2000
9 Copyright (C) Robert O'Callahan 2006 (added cached credential code).
10 Copyright (C) Kai Blin <[email protected]> 2008
11
12 This program is free software; you can redistribute it and/or modify
13 it under the terms of the GNU General Public License as published by
14 the Free Software Foundation; either version 3 of the License, or
15 (at your option) any later version.
16
17 This program is distributed in the hope that it will be useful,
18 but WITHOUT ANY WARRANTY; without even the implied warranty of
19 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20 GNU General Public License for more details.
21
22 You should have received a copy of the GNU General Public License
23 along with this program. If not, see <http://www.gnu.org/licenses/>.
24*/
25
26#include "includes.h"
27#include "utils/ntlm_auth.h"
28
29#undef DBGC_CLASS
30#define DBGC_CLASS DBGC_WINBIND
31
32#define INITIAL_BUFFER_SIZE 300
33#define MAX_BUFFER_SIZE 630000
34
35enum stdio_helper_mode {
36 SQUID_2_4_BASIC,
37 SQUID_2_5_BASIC,
38 SQUID_2_5_NTLMSSP,
39 NTLMSSP_CLIENT_1,
40 GSS_SPNEGO,
41 GSS_SPNEGO_CLIENT,
42 NTLM_SERVER_1,
43 NTLM_CHANGE_PASSWORD_1,
44 NUM_HELPER_MODES
45};
46
47enum ntlm_auth_cli_state {
48 CLIENT_INITIAL = 0,
49 CLIENT_RESPONSE,
50 CLIENT_FINISHED,
51 CLIENT_ERROR
52};
53
54enum ntlm_auth_svr_state {
55 SERVER_INITIAL = 0,
56 SERVER_CHALLENGE,
57 SERVER_FINISHED,
58 SERVER_ERROR
59};
60
61struct ntlm_auth_state {
62 TALLOC_CTX *mem_ctx;
63 enum stdio_helper_mode helper_mode;
64 enum ntlm_auth_cli_state cli_state;
65 enum ntlm_auth_svr_state svr_state;
66 struct ntlmssp_state *ntlmssp_state;
67 uint32_t neg_flags;
68 char *want_feature_list;
69 bool have_session_key;
70 DATA_BLOB session_key;
71 DATA_BLOB initial_message;
72};
73
74typedef void (*stdio_helper_function)(struct ntlm_auth_state *state, char *buf,
75 int length);
76
77static void manage_squid_basic_request (struct ntlm_auth_state *state,
78 char *buf, int length);
79
80static void manage_squid_ntlmssp_request (struct ntlm_auth_state *state,
81 char *buf, int length);
82
83static void manage_client_ntlmssp_request (struct ntlm_auth_state *state,
84 char *buf, int length);
85
86static void manage_gss_spnego_request (struct ntlm_auth_state *state,
87 char *buf, int length);
88
89static void manage_gss_spnego_client_request (struct ntlm_auth_state *state,
90 char *buf, int length);
91
92static void manage_ntlm_server_1_request (struct ntlm_auth_state *state,
93 char *buf, int length);
94
95static void manage_ntlm_change_password_1_request(struct ntlm_auth_state *state,
96 char *buf, int length);
97
98static const struct {
99 enum stdio_helper_mode mode;
100 const char *name;
101 stdio_helper_function fn;
102} stdio_helper_protocols[] = {
103 { SQUID_2_4_BASIC, "squid-2.4-basic", manage_squid_basic_request},
104 { SQUID_2_5_BASIC, "squid-2.5-basic", manage_squid_basic_request},
105 { SQUID_2_5_NTLMSSP, "squid-2.5-ntlmssp", manage_squid_ntlmssp_request},
106 { NTLMSSP_CLIENT_1, "ntlmssp-client-1", manage_client_ntlmssp_request},
107 { GSS_SPNEGO, "gss-spnego", manage_gss_spnego_request},
108 { GSS_SPNEGO_CLIENT, "gss-spnego-client", manage_gss_spnego_client_request},
109 { NTLM_SERVER_1, "ntlm-server-1", manage_ntlm_server_1_request},
110 { NTLM_CHANGE_PASSWORD_1, "ntlm-change-password-1", manage_ntlm_change_password_1_request},
111 { NUM_HELPER_MODES, NULL, NULL}
112};
113
114const char *opt_username;
115const char *opt_domain;
116const char *opt_workstation;
117const char *opt_password;
118static DATA_BLOB opt_challenge;
119static DATA_BLOB opt_lm_response;
120static DATA_BLOB opt_nt_response;
121static int request_lm_key;
122static int request_user_session_key;
123static int use_cached_creds;
124
125static const char *require_membership_of;
126static const char *require_membership_of_sid;
127
128static char winbind_separator(void)
129{
130 struct winbindd_response response;
131 static bool got_sep;
132 static char sep;
133
134 if (got_sep)
135 return sep;
136
137 ZERO_STRUCT(response);
138
139 /* Send off request */
140
141 if (winbindd_request_response(WINBINDD_INFO, NULL, &response) !=
142 NSS_STATUS_SUCCESS) {
143 d_printf("could not obtain winbind separator!\n");
144 return *lp_winbind_separator();
145 }
146
147 sep = response.data.info.winbind_separator;
148 got_sep = True;
149
150 if (!sep) {
151 d_printf("winbind separator was NULL!\n");
152 return *lp_winbind_separator();
153 }
154
155 return sep;
156}
157
158const char *get_winbind_domain(void)
159{
160 struct winbindd_response response;
161
162 static fstring winbind_domain;
163 if (*winbind_domain) {
164 return winbind_domain;
165 }
166
167 ZERO_STRUCT(response);
168
169 /* Send off request */
170
171 if (winbindd_request_response(WINBINDD_DOMAIN_NAME, NULL, &response) !=
172 NSS_STATUS_SUCCESS) {
173 DEBUG(0, ("could not obtain winbind domain name!\n"));
174 return lp_workgroup();
175 }
176
177 fstrcpy(winbind_domain, response.data.domain_name);
178
179 return winbind_domain;
180
181}
182
183const char *get_winbind_netbios_name(void)
184{
185 struct winbindd_response response;
186
187 static fstring winbind_netbios_name;
188
189 if (*winbind_netbios_name) {
190 return winbind_netbios_name;
191 }
192
193 ZERO_STRUCT(response);
194
195 /* Send off request */
196
197 if (winbindd_request_response(WINBINDD_NETBIOS_NAME, NULL, &response) !=
198 NSS_STATUS_SUCCESS) {
199 DEBUG(0, ("could not obtain winbind netbios name!\n"));
200 return global_myname();
201 }
202
203 fstrcpy(winbind_netbios_name, response.data.netbios_name);
204
205 return winbind_netbios_name;
206
207}
208
209DATA_BLOB get_challenge(void)
210{
211 static DATA_BLOB chal;
212 if (opt_challenge.length)
213 return opt_challenge;
214
215 chal = data_blob(NULL, 8);
216
217 generate_random_buffer(chal.data, chal.length);
218 return chal;
219}
220
221/* Copy of parse_domain_user from winbindd_util.c. Parse a string of the
222 form DOMAIN/user into a domain and a user */
223
224static bool parse_ntlm_auth_domain_user(const char *domuser, fstring domain,
225 fstring user)
226{
227
228 char *p = strchr(domuser,winbind_separator());
229
230 if (!p) {
231 return False;
232 }
233
234 fstrcpy(user, p+1);
235 fstrcpy(domain, domuser);
236 domain[PTR_DIFF(p, domuser)] = 0;
237 strupper_m(domain);
238
239 return True;
240}
241
242static bool get_require_membership_sid(void) {
243 struct winbindd_request request;
244 struct winbindd_response response;
245
246 if (!require_membership_of) {
247 return True;
248 }
249
250 if (require_membership_of_sid) {
251 return True;
252 }
253
254 /* Otherwise, ask winbindd for the name->sid request */
255
256 ZERO_STRUCT(request);
257 ZERO_STRUCT(response);
258
259 if (!parse_ntlm_auth_domain_user(require_membership_of,
260 request.data.name.dom_name,
261 request.data.name.name)) {
262 DEBUG(0, ("Could not parse %s into seperate domain/name parts!\n",
263 require_membership_of));
264 return False;
265 }
266
267 if (winbindd_request_response(WINBINDD_LOOKUPNAME, &request, &response) !=
268 NSS_STATUS_SUCCESS) {
269 DEBUG(0, ("Winbindd lookupname failed to resolve %s into a SID!\n",
270 require_membership_of));
271 return False;
272 }
273
274 require_membership_of_sid = SMB_STRDUP(response.data.sid.sid);
275
276 if (require_membership_of_sid)
277 return True;
278
279 return False;
280}
281/* Authenticate a user with a plaintext password */
282
283static bool check_plaintext_auth(const char *user, const char *pass,
284 bool stdout_diagnostics)
285{
286 struct winbindd_request request;
287 struct winbindd_response response;
288 NSS_STATUS result;
289
290 if (!get_require_membership_sid()) {
291 return False;
292 }
293
294 /* Send off request */
295
296 ZERO_STRUCT(request);
297 ZERO_STRUCT(response);
298
299 fstrcpy(request.data.auth.user, user);
300 fstrcpy(request.data.auth.pass, pass);
301 if (require_membership_of_sid) {
302 strlcpy(request.data.auth.require_membership_of_sid,
303 require_membership_of_sid,
304 sizeof(request.data.auth.require_membership_of_sid));
305 }
306
307 result = winbindd_request_response(WINBINDD_PAM_AUTH, &request, &response);
308
309 /* Display response */
310
311 if (stdout_diagnostics) {
312 if ((result != NSS_STATUS_SUCCESS) && (response.data.auth.nt_status == 0)) {
313 d_printf("Reading winbind reply failed! (0x01)\n");
314 }
315
316 d_printf("%s: %s (0x%x)\n",
317 response.data.auth.nt_status_string,
318 response.data.auth.error_string,
319 response.data.auth.nt_status);
320 } else {
321 if ((result != NSS_STATUS_SUCCESS) && (response.data.auth.nt_status == 0)) {
322 DEBUG(1, ("Reading winbind reply failed! (0x01)\n"));
323 }
324
325 DEBUG(3, ("%s: %s (0x%x)\n",
326 response.data.auth.nt_status_string,
327 response.data.auth.error_string,
328 response.data.auth.nt_status));
329 }
330
331 return (result == NSS_STATUS_SUCCESS);
332}
333
334/* authenticate a user with an encrypted username/password */
335
336NTSTATUS contact_winbind_auth_crap(const char *username,
337 const char *domain,
338 const char *workstation,
339 const DATA_BLOB *challenge,
340 const DATA_BLOB *lm_response,
341 const DATA_BLOB *nt_response,
342 uint32 flags,
343 uint8 lm_key[8],
344 uint8 user_session_key[16],
345 char **error_string,
346 char **unix_name)
347{
348 NTSTATUS nt_status;
349 NSS_STATUS result;
350 struct winbindd_request request;
351 struct winbindd_response response;
352
353 if (!get_require_membership_sid()) {
354 return NT_STATUS_INVALID_PARAMETER;
355 }
356
357 ZERO_STRUCT(request);
358 ZERO_STRUCT(response);
359
360 request.flags = flags;
361
362 request.data.auth_crap.logon_parameters = MSV1_0_ALLOW_WORKSTATION_TRUST_ACCOUNT | MSV1_0_ALLOW_SERVER_TRUST_ACCOUNT;
363
364 if (require_membership_of_sid)
365 fstrcpy(request.data.auth_crap.require_membership_of_sid, require_membership_of_sid);
366
367 fstrcpy(request.data.auth_crap.user, username);
368 fstrcpy(request.data.auth_crap.domain, domain);
369
370 fstrcpy(request.data.auth_crap.workstation,
371 workstation);
372
373 memcpy(request.data.auth_crap.chal, challenge->data, MIN(challenge->length, 8));
374
375 if (lm_response && lm_response->length) {
376 memcpy(request.data.auth_crap.lm_resp,
377 lm_response->data,
378 MIN(lm_response->length, sizeof(request.data.auth_crap.lm_resp)));
379 request.data.auth_crap.lm_resp_len = lm_response->length;
380 }
381
382 if (nt_response && nt_response->length) {
383 if (nt_response->length > sizeof(request.data.auth_crap.nt_resp)) {
384 request.flags = request.flags | WBFLAG_BIG_NTLMV2_BLOB;
385 request.extra_len = nt_response->length;
386 request.extra_data.data = SMB_MALLOC_ARRAY(char, request.extra_len);
387 if (request.extra_data.data == NULL) {
388 return NT_STATUS_NO_MEMORY;
389 }
390 memcpy(request.extra_data.data, nt_response->data,
391 nt_response->length);
392
393 } else {
394 memcpy(request.data.auth_crap.nt_resp,
395 nt_response->data, nt_response->length);
396 }
397 request.data.auth_crap.nt_resp_len = nt_response->length;
398 }
399
400 result = winbindd_request_response(WINBINDD_PAM_AUTH_CRAP, &request, &response);
401 SAFE_FREE(request.extra_data.data);
402
403 /* Display response */
404
405 if ((result != NSS_STATUS_SUCCESS) && (response.data.auth.nt_status == 0)) {
406 nt_status = NT_STATUS_UNSUCCESSFUL;
407 if (error_string)
408 *error_string = smb_xstrdup("Reading winbind reply failed!");
409 winbindd_free_response(&response);
410 return nt_status;
411 }
412
413 nt_status = (NT_STATUS(response.data.auth.nt_status));
414 if (!NT_STATUS_IS_OK(nt_status)) {
415 if (error_string)
416 *error_string = smb_xstrdup(response.data.auth.error_string);
417 winbindd_free_response(&response);
418 return nt_status;
419 }
420
421 if ((flags & WBFLAG_PAM_LMKEY) && lm_key) {
422 memcpy(lm_key, response.data.auth.first_8_lm_hash,
423 sizeof(response.data.auth.first_8_lm_hash));
424 }
425 if ((flags & WBFLAG_PAM_USER_SESSION_KEY) && user_session_key) {
426 memcpy(user_session_key, response.data.auth.user_session_key,
427 sizeof(response.data.auth.user_session_key));
428 }
429
430 if (flags & WBFLAG_PAM_UNIX_NAME) {
431 *unix_name = SMB_STRDUP(response.data.auth.unix_username);
432 if (!*unix_name) {
433 winbindd_free_response(&response);
434 return NT_STATUS_NO_MEMORY;
435 }
436 }
437
438 winbindd_free_response(&response);
439 return nt_status;
440}
441
442/* contact server to change user password using auth crap */
443static NTSTATUS contact_winbind_change_pswd_auth_crap(const char *username,
444 const char *domain,
445 const DATA_BLOB new_nt_pswd,
446 const DATA_BLOB old_nt_hash_enc,
447 const DATA_BLOB new_lm_pswd,
448 const DATA_BLOB old_lm_hash_enc,
449 char **error_string)
450{
451 NTSTATUS nt_status;
452 NSS_STATUS result;
453 struct winbindd_request request;
454 struct winbindd_response response;
455
456 if (!get_require_membership_sid())
457 {
458 if(error_string)
459 *error_string = smb_xstrdup("Can't get membership sid.");
460 return NT_STATUS_INVALID_PARAMETER;
461 }
462
463 ZERO_STRUCT(request);
464 ZERO_STRUCT(response);
465
466 if(username != NULL)
467 fstrcpy(request.data.chng_pswd_auth_crap.user, username);
468 if(domain != NULL)
469 fstrcpy(request.data.chng_pswd_auth_crap.domain,domain);
470
471 if(new_nt_pswd.length)
472 {
473 memcpy(request.data.chng_pswd_auth_crap.new_nt_pswd, new_nt_pswd.data, sizeof(request.data.chng_pswd_auth_crap.new_nt_pswd));
474 request.data.chng_pswd_auth_crap.new_nt_pswd_len = new_nt_pswd.length;
475 }
476
477 if(old_nt_hash_enc.length)
478 {
479 memcpy(request.data.chng_pswd_auth_crap.old_nt_hash_enc, old_nt_hash_enc.data, sizeof(request.data.chng_pswd_auth_crap.old_nt_hash_enc));
480 request.data.chng_pswd_auth_crap.old_nt_hash_enc_len = old_nt_hash_enc.length;
481 }
482
483 if(new_lm_pswd.length)
484 {
485 memcpy(request.data.chng_pswd_auth_crap.new_lm_pswd, new_lm_pswd.data, sizeof(request.data.chng_pswd_auth_crap.new_lm_pswd));
486 request.data.chng_pswd_auth_crap.new_lm_pswd_len = new_lm_pswd.length;
487 }
488
489 if(old_lm_hash_enc.length)
490 {
491 memcpy(request.data.chng_pswd_auth_crap.old_lm_hash_enc, old_lm_hash_enc.data, sizeof(request.data.chng_pswd_auth_crap.old_lm_hash_enc));
492 request.data.chng_pswd_auth_crap.old_lm_hash_enc_len = old_lm_hash_enc.length;
493 }
494
495 result = winbindd_request_response(WINBINDD_PAM_CHNG_PSWD_AUTH_CRAP, &request, &response);
496
497 /* Display response */
498
499 if ((result != NSS_STATUS_SUCCESS) && (response.data.auth.nt_status == 0))
500 {
501 nt_status = NT_STATUS_UNSUCCESSFUL;
502 if (error_string)
503 *error_string = smb_xstrdup("Reading winbind reply failed!");
504 winbindd_free_response(&response);
505 return nt_status;
506 }
507
508 nt_status = (NT_STATUS(response.data.auth.nt_status));
509 if (!NT_STATUS_IS_OK(nt_status))
510 {
511 if (error_string)
512 *error_string = smb_xstrdup(response.data.auth.error_string);
513 winbindd_free_response(&response);
514 return nt_status;
515 }
516
517 winbindd_free_response(&response);
518
519 return nt_status;
520}
521
522static NTSTATUS winbind_pw_check(struct ntlmssp_state *ntlmssp_state, DATA_BLOB *user_session_key, DATA_BLOB *lm_session_key)
523{
524 static const char zeros[16] = { 0, };
525 NTSTATUS nt_status;
526 char *error_string = NULL;
527 uint8 lm_key[8];
528 uint8 user_sess_key[16];
529 char *unix_name = NULL;
530
531 nt_status = contact_winbind_auth_crap(ntlmssp_state->user, ntlmssp_state->domain,
532 ntlmssp_state->workstation,
533 &ntlmssp_state->chal,
534 &ntlmssp_state->lm_resp,
535 &ntlmssp_state->nt_resp,
536 WBFLAG_PAM_LMKEY | WBFLAG_PAM_USER_SESSION_KEY | WBFLAG_PAM_UNIX_NAME,
537 lm_key, user_sess_key,
538 &error_string, &unix_name);
539
540 if (NT_STATUS_IS_OK(nt_status)) {
541 if (memcmp(lm_key, zeros, 8) != 0) {
542 *lm_session_key = data_blob(NULL, 16);
543 memcpy(lm_session_key->data, lm_key, 8);
544 memset(lm_session_key->data+8, '\0', 8);
545 }
546
547 if (memcmp(user_sess_key, zeros, 16) != 0) {
548 *user_session_key = data_blob(user_sess_key, 16);
549 }
550 ntlmssp_state->auth_context = talloc_strdup(ntlmssp_state->mem_ctx, unix_name);
551 } else {
552 DEBUG(NT_STATUS_EQUAL(nt_status, NT_STATUS_ACCESS_DENIED) ? 0 : 3,
553 ("Login for user [%s]\\[%s]@[%s] failed due to [%s]\n",
554 ntlmssp_state->domain, ntlmssp_state->user,
555 ntlmssp_state->workstation,
556 error_string ? error_string : "unknown error (NULL)"));
557 ntlmssp_state->auth_context = NULL;
558 }
559
560 SAFE_FREE(error_string);
561 SAFE_FREE(unix_name);
562 return nt_status;
563}
564
565static NTSTATUS local_pw_check(struct ntlmssp_state *ntlmssp_state, DATA_BLOB *user_session_key, DATA_BLOB *lm_session_key)
566{
567 NTSTATUS nt_status;
568 uint8 lm_pw[16], nt_pw[16];
569
570 nt_lm_owf_gen (opt_password, nt_pw, lm_pw);
571
572 nt_status = ntlm_password_check(ntlmssp_state->mem_ctx,
573 &ntlmssp_state->chal,
574 &ntlmssp_state->lm_resp,
575 &ntlmssp_state->nt_resp,
576 NULL, NULL,
577 ntlmssp_state->user,
578 ntlmssp_state->user,
579 ntlmssp_state->domain,
580 lm_pw, nt_pw, user_session_key, lm_session_key);
581
582 if (NT_STATUS_IS_OK(nt_status)) {
583 ntlmssp_state->auth_context = talloc_asprintf(ntlmssp_state->mem_ctx,
584 "%s%c%s", ntlmssp_state->domain,
585 *lp_winbind_separator(),
586 ntlmssp_state->user);
587 } else {
588 DEBUG(3, ("Login for user [%s]\\[%s]@[%s] failed due to [%s]\n",
589 ntlmssp_state->domain, ntlmssp_state->user, ntlmssp_state->workstation,
590 nt_errstr(nt_status)));
591 ntlmssp_state->auth_context = NULL;
592 }
593 return nt_status;
594}
595
596static NTSTATUS ntlm_auth_start_ntlmssp_client(NTLMSSP_STATE **client_ntlmssp_state)
597{
598 NTSTATUS status;
599 if ( (opt_username == NULL) || (opt_domain == NULL) ) {
600 status = NT_STATUS_UNSUCCESSFUL;
601 DEBUG(1, ("Need username and domain for NTLMSSP\n"));
602 return NT_STATUS_INVALID_PARAMETER;
603 }
604
605 status = ntlmssp_client_start(client_ntlmssp_state);
606
607 if (!NT_STATUS_IS_OK(status)) {
608 DEBUG(1, ("Could not start NTLMSSP client: %s\n",
609 nt_errstr(status)));
610 ntlmssp_end(client_ntlmssp_state);
611 return status;
612 }
613
614 status = ntlmssp_set_username(*client_ntlmssp_state, opt_username);
615
616 if (!NT_STATUS_IS_OK(status)) {
617 DEBUG(1, ("Could not set username: %s\n",
618 nt_errstr(status)));
619 ntlmssp_end(client_ntlmssp_state);
620 return status;
621 }
622
623 status = ntlmssp_set_domain(*client_ntlmssp_state, opt_domain);
624
625 if (!NT_STATUS_IS_OK(status)) {
626 DEBUG(1, ("Could not set domain: %s\n",
627 nt_errstr(status)));
628 ntlmssp_end(client_ntlmssp_state);
629 return status;
630 }
631
632 if (opt_password) {
633 status = ntlmssp_set_password(*client_ntlmssp_state, opt_password);
634
635 if (!NT_STATUS_IS_OK(status)) {
636 DEBUG(1, ("Could not set password: %s\n",
637 nt_errstr(status)));
638 ntlmssp_end(client_ntlmssp_state);
639 return status;
640 }
641 }
642
643 return NT_STATUS_OK;
644}
645
646static NTSTATUS ntlm_auth_start_ntlmssp_server(NTLMSSP_STATE **ntlmssp_state)
647{
648 NTSTATUS status = ntlmssp_server_start(ntlmssp_state);
649
650 if (!NT_STATUS_IS_OK(status)) {
651 DEBUG(1, ("Could not start NTLMSSP server: %s\n",
652 nt_errstr(status)));
653 return status;
654 }
655
656 /* Have we been given a local password, or should we ask winbind? */
657 if (opt_password) {
658 (*ntlmssp_state)->check_password = local_pw_check;
659 (*ntlmssp_state)->get_domain = lp_workgroup;
660 (*ntlmssp_state)->get_global_myname = global_myname;
661 } else {
662 (*ntlmssp_state)->check_password = winbind_pw_check;
663 (*ntlmssp_state)->get_domain = get_winbind_domain;
664 (*ntlmssp_state)->get_global_myname = get_winbind_netbios_name;
665 }
666 return NT_STATUS_OK;
667}
668
669/*******************************************************************
670 Used by firefox to drive NTLM auth to IIS servers.
671*******************************************************************/
672
673static NTSTATUS do_ccache_ntlm_auth(DATA_BLOB initial_msg, DATA_BLOB challenge_msg,
674 DATA_BLOB *reply)
675{
676 struct winbindd_request wb_request;
677 struct winbindd_response wb_response;
678 NSS_STATUS result;
679
680 /* get winbindd to do the ntlmssp step on our behalf */
681 ZERO_STRUCT(wb_request);
682 ZERO_STRUCT(wb_response);
683
684 fstr_sprintf(wb_request.data.ccache_ntlm_auth.user,
685 "%s%c%s", opt_domain, winbind_separator(), opt_username);
686 wb_request.data.ccache_ntlm_auth.uid = geteuid();
687 wb_request.data.ccache_ntlm_auth.initial_blob_len = initial_msg.length;
688 wb_request.data.ccache_ntlm_auth.challenge_blob_len = challenge_msg.length;
689 wb_request.extra_len = initial_msg.length + challenge_msg.length;
690
691 if (wb_request.extra_len > 0) {
692 wb_request.extra_data.data = SMB_MALLOC_ARRAY(char, wb_request.extra_len);
693 if (wb_request.extra_data.data == NULL) {
694 return NT_STATUS_NO_MEMORY;
695 }
696
697 memcpy(wb_request.extra_data.data, initial_msg.data, initial_msg.length);
698 memcpy(wb_request.extra_data.data + initial_msg.length,
699 challenge_msg.data, challenge_msg.length);
700 }
701
702 result = winbindd_request_response(WINBINDD_CCACHE_NTLMAUTH, &wb_request, &wb_response);
703 SAFE_FREE(wb_request.extra_data.data);
704
705 if (result != NSS_STATUS_SUCCESS) {
706 winbindd_free_response(&wb_response);
707 return NT_STATUS_UNSUCCESSFUL;
708 }
709
710 if (reply) {
711 *reply = data_blob(wb_response.extra_data.data,
712 wb_response.data.ccache_ntlm_auth.auth_blob_len);
713 if (wb_response.data.ccache_ntlm_auth.auth_blob_len > 0 &&
714 reply->data == NULL) {
715 winbindd_free_response(&wb_response);
716 return NT_STATUS_NO_MEMORY;
717 }
718 }
719
720 winbindd_free_response(&wb_response);
721 return NT_STATUS_MORE_PROCESSING_REQUIRED;
722}
723
724static void manage_squid_ntlmssp_request(struct ntlm_auth_state *state,
725 char *buf, int length)
726{
727 DATA_BLOB request, reply;
728 NTSTATUS nt_status;
729
730 if (strlen(buf) < 2) {
731 DEBUG(1, ("NTLMSSP query [%s] invalid", buf));
732 x_fprintf(x_stdout, "BH NTLMSSP query invalid\n");
733 return;
734 }
735
736 if (strlen(buf) > 3) {
737 if(strncmp(buf, "SF ", 3) == 0){
738 DEBUG(10, ("Setting flags to negotioate\n"));
739 TALLOC_FREE(state->want_feature_list);
740 state->want_feature_list = talloc_strdup(state->mem_ctx,
741 buf+3);
742 x_fprintf(x_stdout, "OK\n");
743 return;
744 }
745 request = base64_decode_data_blob(buf + 3);
746 } else {
747 request = data_blob_null;
748 }
749
750 if ((strncmp(buf, "PW ", 3) == 0)) {
751 /* The calling application wants us to use a local password
752 * (rather than winbindd) */
753
754 opt_password = SMB_STRNDUP((const char *)request.data,
755 request.length);
756
757 if (opt_password == NULL) {
758 DEBUG(1, ("Out of memory\n"));
759 x_fprintf(x_stdout, "BH Out of memory\n");
760 data_blob_free(&request);
761 return;
762 }
763
764 x_fprintf(x_stdout, "OK\n");
765 data_blob_free(&request);
766 return;
767 }
768
769 if (strncmp(buf, "YR", 2) == 0) {
770 if (state->ntlmssp_state)
771 ntlmssp_end(&state->ntlmssp_state);
772 state->svr_state = SERVER_INITIAL;
773 } else if (strncmp(buf, "KK", 2) == 0) {
774 /* No special preprocessing required */
775 } else if (strncmp(buf, "GF", 2) == 0) {
776 DEBUG(10, ("Requested negotiated NTLMSSP flags\n"));
777
778 if (state->svr_state == SERVER_FINISHED) {
779 x_fprintf(x_stdout, "GF 0x%08x\n", state->neg_flags);
780 }
781 else {
782 x_fprintf(x_stdout, "BH\n");
783 }
784 data_blob_free(&request);
785 return;
786 } else if (strncmp(buf, "GK", 2) == 0) {
787 DEBUG(10, ("Requested NTLMSSP session key\n"));
788 if(state->have_session_key) {
789 char *key64 = base64_encode_data_blob(state->mem_ctx,
790 state->session_key);
791 x_fprintf(x_stdout, "GK %s\n", key64?key64:"<NULL>");
792 TALLOC_FREE(key64);
793 } else {
794 x_fprintf(x_stdout, "BH\n");
795 }
796
797 data_blob_free(&request);
798 return;
799 } else {
800 DEBUG(1, ("NTLMSSP query [%s] invalid", buf));
801 x_fprintf(x_stdout, "BH NTLMSSP query invalid\n");
802 return;
803 }
804
805 if (!state->ntlmssp_state) {
806 nt_status = ntlm_auth_start_ntlmssp_server(
807 &state->ntlmssp_state);
808 if (!NT_STATUS_IS_OK(nt_status)) {
809 x_fprintf(x_stdout, "BH %s\n", nt_errstr(nt_status));
810 return;
811 }
812 ntlmssp_want_feature_list(state->ntlmssp_state,
813 state->want_feature_list);
814 }
815
816 DEBUG(10, ("got NTLMSSP packet:\n"));
817 dump_data(10, request.data, request.length);
818
819 nt_status = ntlmssp_update(state->ntlmssp_state, request, &reply);
820
821 if (NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED)) {
822 char *reply_base64 = base64_encode_data_blob(state->mem_ctx,
823 reply);
824 x_fprintf(x_stdout, "TT %s\n", reply_base64);
825 TALLOC_FREE(reply_base64);
826 data_blob_free(&reply);
827 state->svr_state = SERVER_CHALLENGE;
828 DEBUG(10, ("NTLMSSP challenge\n"));
829 } else if (NT_STATUS_EQUAL(nt_status, NT_STATUS_ACCESS_DENIED)) {
830 x_fprintf(x_stdout, "BH %s\n", nt_errstr(nt_status));
831 DEBUG(0, ("NTLMSSP BH: %s\n", nt_errstr(nt_status)));
832
833 ntlmssp_end(&state->ntlmssp_state);
834 } else if (!NT_STATUS_IS_OK(nt_status)) {
835 x_fprintf(x_stdout, "NA %s\n", nt_errstr(nt_status));
836 DEBUG(10, ("NTLMSSP %s\n", nt_errstr(nt_status)));
837 } else {
838 x_fprintf(x_stdout, "AF %s\n",
839 (char *)state->ntlmssp_state->auth_context);
840 DEBUG(10, ("NTLMSSP OK!\n"));
841
842 if(state->have_session_key)
843 data_blob_free(&state->session_key);
844 state->session_key = data_blob(
845 state->ntlmssp_state->session_key.data,
846 state->ntlmssp_state->session_key.length);
847 state->neg_flags = state->ntlmssp_state->neg_flags;
848 state->have_session_key = true;
849 state->svr_state = SERVER_FINISHED;
850 }
851
852 data_blob_free(&request);
853}
854
855static void manage_client_ntlmssp_request(struct ntlm_auth_state *state,
856 char *buf, int length)
857{
858 DATA_BLOB request, reply;
859 NTSTATUS nt_status;
860
861 if (!opt_username || !*opt_username) {
862 x_fprintf(x_stderr, "username must be specified!\n\n");
863 exit(1);
864 }
865
866 if (strlen(buf) < 2) {
867 DEBUG(1, ("NTLMSSP query [%s] invalid", buf));
868 x_fprintf(x_stdout, "BH NTLMSSP query invalid\n");
869 return;
870 }
871
872 if (strlen(buf) > 3) {
873 if(strncmp(buf, "SF ", 3) == 0) {
874 DEBUG(10, ("Looking for flags to negotiate\n"));
875 talloc_free(state->want_feature_list);
876 state->want_feature_list = talloc_strdup(state->mem_ctx,
877 buf+3);
878 x_fprintf(x_stdout, "OK\n");
879 return;
880 }
881 request = base64_decode_data_blob(buf + 3);
882 } else {
883 request = data_blob_null;
884 }
885
886 if (strncmp(buf, "PW ", 3) == 0) {
887 /* We asked for a password and obviously got it :-) */
888
889 opt_password = SMB_STRNDUP((const char *)request.data,
890 request.length);
891
892 if (opt_password == NULL) {
893 DEBUG(1, ("Out of memory\n"));
894 x_fprintf(x_stdout, "BH Out of memory\n");
895 data_blob_free(&request);
896 return;
897 }
898
899 x_fprintf(x_stdout, "OK\n");
900 data_blob_free(&request);
901 return;
902 }
903
904 if (!state->ntlmssp_state && use_cached_creds) {
905 /* check whether cached credentials are usable. */
906 DATA_BLOB empty_blob = data_blob_null;
907
908 nt_status = do_ccache_ntlm_auth(empty_blob, empty_blob, NULL);
909 if (!NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED)) {
910 /* failed to use cached creds */
911 use_cached_creds = False;
912 }
913 }
914
915 if (opt_password == NULL && !use_cached_creds) {
916 /* Request a password from the calling process. After
917 sending it, the calling process should retry asking for the
918 negotiate. */
919
920 DEBUG(10, ("Requesting password\n"));
921 x_fprintf(x_stdout, "PW\n");
922 return;
923 }
924
925 if (strncmp(buf, "YR", 2) == 0) {
926 if (state->ntlmssp_state)
927 ntlmssp_end(&state->ntlmssp_state);
928 state->cli_state = CLIENT_INITIAL;
929 } else if (strncmp(buf, "TT", 2) == 0) {
930 /* No special preprocessing required */
931 } else if (strncmp(buf, "GF", 2) == 0) {
932 DEBUG(10, ("Requested negotiated NTLMSSP flags\n"));
933
934 if(state->cli_state == CLIENT_FINISHED) {
935 x_fprintf(x_stdout, "GF 0x%08x\n", state->neg_flags);
936 }
937 else {
938 x_fprintf(x_stdout, "BH\n");
939 }
940
941 data_blob_free(&request);
942 return;
943 } else if (strncmp(buf, "GK", 2) == 0 ) {
944 DEBUG(10, ("Requested session key\n"));
945
946 if(state->cli_state == CLIENT_FINISHED) {
947 char *key64 = base64_encode_data_blob(state->mem_ctx,
948 state->session_key);
949 x_fprintf(x_stdout, "GK %s\n", key64?key64:"<NULL>");
950 TALLOC_FREE(key64);
951 }
952 else {
953 x_fprintf(x_stdout, "BH\n");
954 }
955
956 data_blob_free(&request);
957 return;
958 } else {
959 DEBUG(1, ("NTLMSSP query [%s] invalid", buf));
960 x_fprintf(x_stdout, "BH NTLMSSP query invalid\n");
961 return;
962 }
963
964 if (!state->ntlmssp_state) {
965 nt_status = ntlm_auth_start_ntlmssp_client(
966 &state->ntlmssp_state);
967 if (!NT_STATUS_IS_OK(nt_status)) {
968 x_fprintf(x_stdout, "BH %s\n", nt_errstr(nt_status));
969 return;
970 }
971 ntlmssp_want_feature_list(state->ntlmssp_state,
972 state->want_feature_list);
973 state->initial_message = data_blob_null;
974 }
975
976 DEBUG(10, ("got NTLMSSP packet:\n"));
977 dump_data(10, request.data, request.length);
978
979 if (use_cached_creds && !opt_password &&
980 (state->cli_state == CLIENT_RESPONSE)) {
981 nt_status = do_ccache_ntlm_auth(state->initial_message, request,
982 &reply);
983 } else {
984 nt_status = ntlmssp_update(state->ntlmssp_state, request,
985 &reply);
986 }
987
988 if (NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED)) {
989 char *reply_base64 = base64_encode_data_blob(state->mem_ctx,
990 reply);
991 if (state->cli_state == CLIENT_INITIAL) {
992 x_fprintf(x_stdout, "YR %s\n", reply_base64);
993 state->initial_message = reply;
994 state->cli_state = CLIENT_RESPONSE;
995 } else {
996 x_fprintf(x_stdout, "KK %s\n", reply_base64);
997 data_blob_free(&reply);
998 }
999 TALLOC_FREE(reply_base64);
1000 DEBUG(10, ("NTLMSSP challenge\n"));
1001 } else if (NT_STATUS_IS_OK(nt_status)) {
1002 char *reply_base64 = base64_encode_data_blob(talloc_tos(),
1003 reply);
1004 x_fprintf(x_stdout, "AF %s\n", reply_base64);
1005 TALLOC_FREE(reply_base64);
1006
1007 if(state->have_session_key)
1008 data_blob_free(&state->session_key);
1009
1010 state->session_key = data_blob(
1011 state->ntlmssp_state->session_key.data,
1012 state->ntlmssp_state->session_key.length);
1013 state->neg_flags = state->ntlmssp_state->neg_flags;
1014 state->have_session_key = true;
1015
1016 DEBUG(10, ("NTLMSSP OK!\n"));
1017 state->cli_state = CLIENT_FINISHED;
1018 if (state->ntlmssp_state)
1019 ntlmssp_end(&state->ntlmssp_state);
1020 } else {
1021 x_fprintf(x_stdout, "BH %s\n", nt_errstr(nt_status));
1022 DEBUG(0, ("NTLMSSP BH: %s\n", nt_errstr(nt_status)));
1023 state->cli_state = CLIENT_ERROR;
1024 if (state->ntlmssp_state)
1025 ntlmssp_end(&state->ntlmssp_state);
1026 }
1027
1028 data_blob_free(&request);
1029}
1030
1031static void manage_squid_basic_request(struct ntlm_auth_state *state,
1032 char *buf, int length)
1033{
1034 char *user, *pass;
1035 user=buf;
1036
1037 pass=(char *)memchr(buf,' ',length);
1038 if (!pass) {
1039 DEBUG(2, ("Password not found. Denying access\n"));
1040 x_fprintf(x_stdout, "ERR\n");
1041 return;
1042 }
1043 *pass='\0';
1044 pass++;
1045
1046 if (state->helper_mode == SQUID_2_5_BASIC) {
1047 rfc1738_unescape(user);
1048 rfc1738_unescape(pass);
1049 }
1050
1051 if (check_plaintext_auth(user, pass, False)) {
1052 x_fprintf(x_stdout, "OK\n");
1053 } else {
1054 x_fprintf(x_stdout, "ERR\n");
1055 }
1056}
1057
1058static void offer_gss_spnego_mechs(void) {
1059
1060 DATA_BLOB token;
1061 SPNEGO_DATA spnego;
1062 ssize_t len;
1063 char *reply_base64;
1064 TALLOC_CTX *ctx = talloc_tos();
1065 char *principal;
1066 char *myname_lower;
1067
1068 ZERO_STRUCT(spnego);
1069
1070 myname_lower = talloc_strdup(ctx, global_myname());
1071 if (!myname_lower) {
1072 return;
1073 }
1074 strlower_m(myname_lower);
1075
1076 principal = talloc_asprintf(ctx, "%s$@%s", myname_lower, lp_realm());
1077 if (!principal) {
1078 return;
1079 }
1080
1081 /* Server negTokenInit (mech offerings) */
1082 spnego.type = SPNEGO_NEG_TOKEN_INIT;
1083 spnego.negTokenInit.mechTypes = SMB_XMALLOC_ARRAY(const char *, 2);
1084#ifdef HAVE_KRB5
1085 spnego.negTokenInit.mechTypes[0] = smb_xstrdup(OID_KERBEROS5_OLD);
1086 spnego.negTokenInit.mechTypes[1] = smb_xstrdup(OID_NTLMSSP);
1087 spnego.negTokenInit.mechTypes[2] = NULL;
1088#else
1089 spnego.negTokenInit.mechTypes[0] = smb_xstrdup(OID_NTLMSSP);
1090 spnego.negTokenInit.mechTypes[1] = NULL;
1091#endif
1092
1093
1094 spnego.negTokenInit.mechListMIC = data_blob(principal,
1095 strlen(principal));
1096
1097 len = write_spnego_data(&token, &spnego);
1098 free_spnego_data(&spnego);
1099
1100 if (len == -1) {
1101 DEBUG(1, ("Could not write SPNEGO data blob\n"));
1102 x_fprintf(x_stdout, "BH Could not write SPNEGO data blob\n");
1103 return;
1104 }
1105
1106 reply_base64 = base64_encode_data_blob(talloc_tos(), token);
1107 x_fprintf(x_stdout, "TT %s *\n", reply_base64);
1108
1109 TALLOC_FREE(reply_base64);
1110 data_blob_free(&token);
1111 DEBUG(10, ("sent SPNEGO negTokenInit\n"));
1112 return;
1113}
1114
1115static void manage_gss_spnego_request(struct ntlm_auth_state *state,
1116 char *buf, int length)
1117{
1118 static NTLMSSP_STATE *ntlmssp_state = NULL;
1119 SPNEGO_DATA request, response;
1120 DATA_BLOB token;
1121 NTSTATUS status;
1122 ssize_t len;
1123 TALLOC_CTX *ctx = talloc_tos();
1124
1125 char *user = NULL;
1126 char *domain = NULL;
1127
1128 const char *reply_code;
1129 char *reply_base64;
1130 char *reply_argument = NULL;
1131
1132 if (strlen(buf) < 2) {
1133 DEBUG(1, ("SPENGO query [%s] invalid", buf));
1134 x_fprintf(x_stdout, "BH SPENGO query invalid\n");
1135 return;
1136 }
1137
1138 if (strncmp(buf, "YR", 2) == 0) {
1139 if (ntlmssp_state)
1140 ntlmssp_end(&ntlmssp_state);
1141 } else if (strncmp(buf, "KK", 2) == 0) {
1142 ;
1143 } else {
1144 DEBUG(1, ("SPENGO query [%s] invalid", buf));
1145 x_fprintf(x_stdout, "BH SPENGO query invalid\n");
1146 return;
1147 }
1148
1149 if ( (strlen(buf) == 2)) {
1150
1151 /* no client data, get the negTokenInit offering
1152 mechanisms */
1153
1154 offer_gss_spnego_mechs();
1155 return;
1156 }
1157
1158 /* All subsequent requests have a blob. This might be negTokenInit or negTokenTarg */
1159
1160 if (strlen(buf) <= 3) {
1161 DEBUG(1, ("GSS-SPNEGO query [%s] invalid\n", buf));
1162 x_fprintf(x_stdout, "BH GSS-SPNEGO query invalid\n");
1163 return;
1164 }
1165
1166 token = base64_decode_data_blob(buf + 3);
1167 len = read_spnego_data(token, &request);
1168 data_blob_free(&token);
1169
1170 if (len == -1) {
1171 DEBUG(1, ("GSS-SPNEGO query [%s] invalid", buf));
1172 x_fprintf(x_stdout, "BH GSS-SPNEGO query invalid\n");
1173 return;
1174 }
1175
1176 if (request.type == SPNEGO_NEG_TOKEN_INIT) {
1177
1178 /* Second request from Client. This is where the
1179 client offers its mechanism to use. */
1180
1181 if ( (request.negTokenInit.mechTypes == NULL) ||
1182 (request.negTokenInit.mechTypes[0] == NULL) ) {
1183 DEBUG(1, ("Client did not offer any mechanism"));
1184 x_fprintf(x_stdout, "BH Client did not offer any "
1185 "mechanism\n");
1186 return;
1187 }
1188
1189 status = NT_STATUS_UNSUCCESSFUL;
1190 if (strcmp(request.negTokenInit.mechTypes[0], OID_NTLMSSP) == 0) {
1191
1192 if ( request.negTokenInit.mechToken.data == NULL ) {
1193 DEBUG(1, ("Client did not provide NTLMSSP data\n"));
1194 x_fprintf(x_stdout, "BH Client did not provide "
1195 "NTLMSSP data\n");
1196 return;
1197 }
1198
1199 if ( ntlmssp_state != NULL ) {
1200 DEBUG(1, ("Client wants a new NTLMSSP challenge, but "
1201 "already got one\n"));
1202 x_fprintf(x_stdout, "BH Client wants a new "
1203 "NTLMSSP challenge, but "
1204 "already got one\n");
1205 ntlmssp_end(&ntlmssp_state);
1206 return;
1207 }
1208
1209 if (!NT_STATUS_IS_OK(status = ntlm_auth_start_ntlmssp_server(&ntlmssp_state))) {
1210 x_fprintf(x_stdout, "BH %s\n", nt_errstr(status));
1211 return;
1212 }
1213
1214 DEBUG(10, ("got NTLMSSP packet:\n"));
1215 dump_data(10, request.negTokenInit.mechToken.data,
1216 request.negTokenInit.mechToken.length);
1217
1218 response.type = SPNEGO_NEG_TOKEN_TARG;
1219 response.negTokenTarg.supportedMech = SMB_STRDUP(OID_NTLMSSP);
1220 response.negTokenTarg.mechListMIC = data_blob_null;
1221
1222 status = ntlmssp_update(ntlmssp_state,
1223 request.negTokenInit.mechToken,
1224 &response.negTokenTarg.responseToken);
1225 }
1226
1227#ifdef HAVE_KRB5
1228 if (strcmp(request.negTokenInit.mechTypes[0], OID_KERBEROS5_OLD) == 0) {
1229
1230 TALLOC_CTX *mem_ctx = talloc_init("manage_gss_spnego_request");
1231 char *principal;
1232 DATA_BLOB ap_rep;
1233 DATA_BLOB session_key;
1234 struct PAC_DATA *pac_data = NULL;
1235
1236 if ( request.negTokenInit.mechToken.data == NULL ) {
1237 DEBUG(1, ("Client did not provide Kerberos data\n"));
1238 x_fprintf(x_stdout, "BH Client did not provide "
1239 "Kerberos data\n");
1240 return;
1241 }
1242
1243 response.type = SPNEGO_NEG_TOKEN_TARG;
1244 response.negTokenTarg.supportedMech = SMB_STRDUP(OID_KERBEROS5_OLD);
1245 response.negTokenTarg.mechListMIC = data_blob_null;
1246 response.negTokenTarg.responseToken = data_blob_null;
1247
1248 status = ads_verify_ticket(mem_ctx, lp_realm(), 0,
1249 &request.negTokenInit.mechToken,
1250 &principal, &pac_data, &ap_rep,
1251 &session_key, True);
1252
1253 talloc_destroy(mem_ctx);
1254
1255 /* Now in "principal" we have the name we are
1256 authenticated as. */
1257
1258 if (NT_STATUS_IS_OK(status)) {
1259
1260 domain = strchr_m(principal, '@');
1261
1262 if (domain == NULL) {
1263 DEBUG(1, ("Did not get a valid principal "
1264 "from ads_verify_ticket\n"));
1265 x_fprintf(x_stdout, "BH Did not get a "
1266 "valid principal from "
1267 "ads_verify_ticket\n");
1268 return;
1269 }
1270
1271 *domain++ = '\0';
1272 domain = SMB_STRDUP(domain);
1273 user = SMB_STRDUP(principal);
1274
1275 data_blob_free(&ap_rep);
1276
1277 SAFE_FREE(principal);
1278 }
1279 }
1280#endif
1281
1282 } else {
1283
1284 if ( (request.negTokenTarg.supportedMech == NULL) ||
1285 ( strcmp(request.negTokenTarg.supportedMech, OID_NTLMSSP) != 0 ) ) {
1286 /* Kerberos should never send a negTokenTarg, OID_NTLMSSP
1287 is the only one we support that sends this stuff */
1288 DEBUG(1, ("Got a negTokenTarg for something non-NTLMSSP: %s\n",
1289 request.negTokenTarg.supportedMech));
1290 x_fprintf(x_stdout, "BH Got a negTokenTarg for "
1291 "something non-NTLMSSP\n");
1292 return;
1293 }
1294
1295 if (request.negTokenTarg.responseToken.data == NULL) {
1296 DEBUG(1, ("Got a negTokenTarg without a responseToken!\n"));
1297 x_fprintf(x_stdout, "BH Got a negTokenTarg without a "
1298 "responseToken!\n");
1299 return;
1300 }
1301
1302 status = ntlmssp_update(ntlmssp_state,
1303 request.negTokenTarg.responseToken,
1304 &response.negTokenTarg.responseToken);
1305
1306 response.type = SPNEGO_NEG_TOKEN_TARG;
1307 response.negTokenTarg.supportedMech = SMB_STRDUP(OID_NTLMSSP);
1308 response.negTokenTarg.mechListMIC = data_blob_null;
1309
1310 if (NT_STATUS_IS_OK(status)) {
1311 user = SMB_STRDUP(ntlmssp_state->user);
1312 domain = SMB_STRDUP(ntlmssp_state->domain);
1313 ntlmssp_end(&ntlmssp_state);
1314 }
1315 }
1316
1317 free_spnego_data(&request);
1318
1319 if (NT_STATUS_IS_OK(status)) {
1320 response.negTokenTarg.negResult = SPNEGO_ACCEPT_COMPLETED;
1321 reply_code = "AF";
1322 reply_argument = talloc_asprintf(ctx, "%s\\%s", domain, user);
1323 } else if (NT_STATUS_EQUAL(status,
1324 NT_STATUS_MORE_PROCESSING_REQUIRED)) {
1325 response.negTokenTarg.negResult = SPNEGO_ACCEPT_INCOMPLETE;
1326 reply_code = "TT";
1327 reply_argument = talloc_strdup(ctx, "*");
1328 } else {
1329 response.negTokenTarg.negResult = SPNEGO_REJECT;
1330 reply_code = "NA";
1331 reply_argument = talloc_strdup(ctx, nt_errstr(status));
1332 }
1333
1334 if (!reply_argument) {
1335 DEBUG(1, ("Could not write SPNEGO data blob\n"));
1336 x_fprintf(x_stdout, "BH Could not write SPNEGO data blob\n");
1337 return;
1338 }
1339
1340 SAFE_FREE(user);
1341 SAFE_FREE(domain);
1342
1343 len = write_spnego_data(&token, &response);
1344 free_spnego_data(&response);
1345
1346 if (len == -1) {
1347 DEBUG(1, ("Could not write SPNEGO data blob\n"));
1348 x_fprintf(x_stdout, "BH Could not write SPNEGO data blob\n");
1349 return;
1350 }
1351
1352 reply_base64 = base64_encode_data_blob(talloc_tos(), token);
1353
1354 x_fprintf(x_stdout, "%s %s %s\n",
1355 reply_code, reply_base64, reply_argument);
1356
1357 TALLOC_FREE(reply_base64);
1358 data_blob_free(&token);
1359
1360 return;
1361}
1362
1363static NTLMSSP_STATE *client_ntlmssp_state = NULL;
1364
1365static bool manage_client_ntlmssp_init(SPNEGO_DATA spnego)
1366{
1367 NTSTATUS status;
1368 DATA_BLOB null_blob = data_blob_null;
1369 DATA_BLOB to_server;
1370 char *to_server_base64;
1371 const char *my_mechs[] = {OID_NTLMSSP, NULL};
1372
1373 DEBUG(10, ("Got spnego negTokenInit with NTLMSSP\n"));
1374
1375 if (client_ntlmssp_state != NULL) {
1376 DEBUG(1, ("Request for initial SPNEGO request where "
1377 "we already have a state\n"));
1378 return False;
1379 }
1380
1381 if (!client_ntlmssp_state) {
1382 if (!NT_STATUS_IS_OK(status = ntlm_auth_start_ntlmssp_client(&client_ntlmssp_state))) {
1383 x_fprintf(x_stdout, "BH %s\n", nt_errstr(status));
1384 return False;
1385 }
1386 }
1387
1388
1389 if (opt_password == NULL) {
1390
1391 /* Request a password from the calling process. After
1392 sending it, the calling process should retry with
1393 the negTokenInit. */
1394
1395 DEBUG(10, ("Requesting password\n"));
1396 x_fprintf(x_stdout, "PW\n");
1397 return True;
1398 }
1399
1400 spnego.type = SPNEGO_NEG_TOKEN_INIT;
1401 spnego.negTokenInit.mechTypes = my_mechs;
1402 spnego.negTokenInit.reqFlags = 0;
1403 spnego.negTokenInit.mechListMIC = null_blob;
1404
1405 status = ntlmssp_update(client_ntlmssp_state, null_blob,
1406 &spnego.negTokenInit.mechToken);
1407
1408 if ( !(NT_STATUS_EQUAL(status, NT_STATUS_MORE_PROCESSING_REQUIRED) ||
1409 NT_STATUS_IS_OK(status)) ) {
1410 DEBUG(1, ("Expected OK or MORE_PROCESSING_REQUIRED, got: %s\n",
1411 nt_errstr(status)));
1412 ntlmssp_end(&client_ntlmssp_state);
1413 return False;
1414 }
1415
1416 write_spnego_data(&to_server, &spnego);
1417 data_blob_free(&spnego.negTokenInit.mechToken);
1418
1419 to_server_base64 = base64_encode_data_blob(talloc_tos(), to_server);
1420 data_blob_free(&to_server);
1421 x_fprintf(x_stdout, "KK %s\n", to_server_base64);
1422 TALLOC_FREE(to_server_base64);
1423 return True;
1424}
1425
1426static void manage_client_ntlmssp_targ(SPNEGO_DATA spnego)
1427{
1428 NTSTATUS status;
1429 DATA_BLOB null_blob = data_blob_null;
1430 DATA_BLOB request;
1431 DATA_BLOB to_server;
1432 char *to_server_base64;
1433
1434 DEBUG(10, ("Got spnego negTokenTarg with NTLMSSP\n"));
1435
1436 if (client_ntlmssp_state == NULL) {
1437 DEBUG(1, ("Got NTLMSSP tArg without a client state\n"));
1438 x_fprintf(x_stdout, "BH Got NTLMSSP tArg without a client state\n");
1439 return;
1440 }
1441
1442 if (spnego.negTokenTarg.negResult == SPNEGO_REJECT) {
1443 x_fprintf(x_stdout, "NA\n");
1444 ntlmssp_end(&client_ntlmssp_state);
1445 return;
1446 }
1447
1448 if (spnego.negTokenTarg.negResult == SPNEGO_ACCEPT_COMPLETED) {
1449 x_fprintf(x_stdout, "AF\n");
1450 ntlmssp_end(&client_ntlmssp_state);
1451 return;
1452 }
1453
1454 status = ntlmssp_update(client_ntlmssp_state,
1455 spnego.negTokenTarg.responseToken,
1456 &request);
1457
1458 if (!NT_STATUS_EQUAL(status, NT_STATUS_MORE_PROCESSING_REQUIRED)) {
1459 DEBUG(1, ("Expected MORE_PROCESSING_REQUIRED from "
1460 "ntlmssp_client_update, got: %s\n",
1461 nt_errstr(status)));
1462 x_fprintf(x_stdout, "BH Expected MORE_PROCESSING_REQUIRED from "
1463 "ntlmssp_client_update\n");
1464 data_blob_free(&request);
1465 ntlmssp_end(&client_ntlmssp_state);
1466 return;
1467 }
1468
1469 spnego.type = SPNEGO_NEG_TOKEN_TARG;
1470 spnego.negTokenTarg.negResult = SPNEGO_ACCEPT_INCOMPLETE;
1471 spnego.negTokenTarg.supportedMech = (char *)OID_NTLMSSP;
1472 spnego.negTokenTarg.responseToken = request;
1473 spnego.negTokenTarg.mechListMIC = null_blob;
1474
1475 write_spnego_data(&to_server, &spnego);
1476 data_blob_free(&request);
1477
1478 to_server_base64 = base64_encode_data_blob(talloc_tos(), to_server);
1479 data_blob_free(&to_server);
1480 x_fprintf(x_stdout, "KK %s\n", to_server_base64);
1481 TALLOC_FREE(to_server_base64);
1482 return;
1483}
1484
1485#ifdef HAVE_KRB5
1486
1487static bool manage_client_krb5_init(SPNEGO_DATA spnego)
1488{
1489 char *principal;
1490 DATA_BLOB tkt, to_server;
1491 DATA_BLOB session_key_krb5 = data_blob_null;
1492 SPNEGO_DATA reply;
1493 char *reply_base64;
1494 int retval;
1495
1496 const char *my_mechs[] = {OID_KERBEROS5_OLD, NULL};
1497 ssize_t len;
1498
1499 if ( (spnego.negTokenInit.mechListMIC.data == NULL) ||
1500 (spnego.negTokenInit.mechListMIC.length == 0) ) {
1501 DEBUG(1, ("Did not get a principal for krb5\n"));
1502 return False;
1503 }
1504
1505 principal = (char *)SMB_MALLOC(
1506 spnego.negTokenInit.mechListMIC.length+1);
1507
1508 if (principal == NULL) {
1509 DEBUG(1, ("Could not malloc principal\n"));
1510 return False;
1511 }
1512
1513 memcpy(principal, spnego.negTokenInit.mechListMIC.data,
1514 spnego.negTokenInit.mechListMIC.length);
1515 principal[spnego.negTokenInit.mechListMIC.length] = '\0';
1516
1517 retval = cli_krb5_get_ticket(principal, 0, &tkt, &session_key_krb5, 0, NULL, NULL);
1518
1519 if (retval) {
1520 char *user = NULL;
1521
1522 /* Let's try to first get the TGT, for that we need a
1523 password. */
1524
1525 if (opt_password == NULL) {
1526 DEBUG(10, ("Requesting password\n"));
1527 x_fprintf(x_stdout, "PW\n");
1528 return True;
1529 }
1530
1531 user = talloc_asprintf(talloc_tos(), "%s@%s", opt_username, opt_domain);
1532 if (!user) {
1533 return false;
1534 }
1535
1536 if ((retval = kerberos_kinit_password(user, opt_password, 0, NULL))) {
1537 DEBUG(10, ("Requesting TGT failed: %s\n", error_message(retval)));
1538 return False;
1539 }
1540
1541 retval = cli_krb5_get_ticket(principal, 0, &tkt, &session_key_krb5, 0, NULL, NULL);
1542
1543 if (retval) {
1544 DEBUG(10, ("Kinit suceeded, but getting a ticket failed: %s\n", error_message(retval)));
1545 return False;
1546 }
1547 }
1548
1549 data_blob_free(&session_key_krb5);
1550
1551 ZERO_STRUCT(reply);
1552
1553 reply.type = SPNEGO_NEG_TOKEN_INIT;
1554 reply.negTokenInit.mechTypes = my_mechs;
1555 reply.negTokenInit.reqFlags = 0;
1556 reply.negTokenInit.mechToken = tkt;
1557 reply.negTokenInit.mechListMIC = data_blob_null;
1558
1559 len = write_spnego_data(&to_server, &reply);
1560 data_blob_free(&tkt);
1561
1562 if (len == -1) {
1563 DEBUG(1, ("Could not write SPNEGO data blob\n"));
1564 return False;
1565 }
1566
1567 reply_base64 = base64_encode_data_blob(talloc_tos(), to_server);
1568 x_fprintf(x_stdout, "KK %s *\n", reply_base64);
1569
1570 TALLOC_FREE(reply_base64);
1571 data_blob_free(&to_server);
1572 DEBUG(10, ("sent GSS-SPNEGO KERBEROS5 negTokenInit\n"));
1573 return True;
1574}
1575
1576static void manage_client_krb5_targ(SPNEGO_DATA spnego)
1577{
1578 switch (spnego.negTokenTarg.negResult) {
1579 case SPNEGO_ACCEPT_INCOMPLETE:
1580 DEBUG(1, ("Got a Kerberos negTokenTarg with ACCEPT_INCOMPLETE\n"));
1581 x_fprintf(x_stdout, "BH Got a Kerberos negTokenTarg with "
1582 "ACCEPT_INCOMPLETE\n");
1583 break;
1584 case SPNEGO_ACCEPT_COMPLETED:
1585 DEBUG(10, ("Accept completed\n"));
1586 x_fprintf(x_stdout, "AF\n");
1587 break;
1588 case SPNEGO_REJECT:
1589 DEBUG(10, ("Rejected\n"));
1590 x_fprintf(x_stdout, "NA\n");
1591 break;
1592 default:
1593 DEBUG(1, ("Got an invalid negTokenTarg\n"));
1594 x_fprintf(x_stdout, "AF\n");
1595 }
1596}
1597
1598#endif
1599
1600static void manage_gss_spnego_client_request(struct ntlm_auth_state *state,
1601 char *buf, int length)
1602{
1603 DATA_BLOB request;
1604 SPNEGO_DATA spnego;
1605 ssize_t len;
1606
1607 if (!opt_username || !*opt_username) {
1608 x_fprintf(x_stderr, "username must be specified!\n\n");
1609 exit(1);
1610 }
1611
1612 if (strlen(buf) <= 3) {
1613 DEBUG(1, ("SPNEGO query [%s] too short\n", buf));
1614 x_fprintf(x_stdout, "BH SPNEGO query too short\n");
1615 return;
1616 }
1617
1618 request = base64_decode_data_blob(buf+3);
1619
1620 if (strncmp(buf, "PW ", 3) == 0) {
1621
1622 /* We asked for a password and obviously got it :-) */
1623
1624 opt_password = SMB_STRNDUP((const char *)request.data, request.length);
1625
1626 if (opt_password == NULL) {
1627 DEBUG(1, ("Out of memory\n"));
1628 x_fprintf(x_stdout, "BH Out of memory\n");
1629 data_blob_free(&request);
1630 return;
1631 }
1632
1633 x_fprintf(x_stdout, "OK\n");
1634 data_blob_free(&request);
1635 return;
1636 }
1637
1638 if ( (strncmp(buf, "TT ", 3) != 0) &&
1639 (strncmp(buf, "AF ", 3) != 0) &&
1640 (strncmp(buf, "NA ", 3) != 0) ) {
1641 DEBUG(1, ("SPNEGO request [%s] invalid\n", buf));
1642 x_fprintf(x_stdout, "BH SPNEGO request invalid\n");
1643 data_blob_free(&request);
1644 return;
1645 }
1646
1647 /* So we got a server challenge to generate a SPNEGO
1648 client-to-server request... */
1649
1650 len = read_spnego_data(request, &spnego);
1651 data_blob_free(&request);
1652
1653 if (len == -1) {
1654 DEBUG(1, ("Could not read SPNEGO data for [%s]\n", buf));
1655 x_fprintf(x_stdout, "BH Could not read SPNEGO data\n");
1656 return;
1657 }
1658
1659 if (spnego.type == SPNEGO_NEG_TOKEN_INIT) {
1660
1661 /* The server offers a list of mechanisms */
1662
1663 const char **mechType = (const char **)spnego.negTokenInit.mechTypes;
1664
1665 while (*mechType != NULL) {
1666
1667#ifdef HAVE_KRB5
1668 if ( (strcmp(*mechType, OID_KERBEROS5_OLD) == 0) ||
1669 (strcmp(*mechType, OID_KERBEROS5) == 0) ) {
1670 if (manage_client_krb5_init(spnego))
1671 goto out;
1672 }
1673#endif
1674
1675 if (strcmp(*mechType, OID_NTLMSSP) == 0) {
1676 if (manage_client_ntlmssp_init(spnego))
1677 goto out;
1678 }
1679
1680 mechType++;
1681 }
1682
1683 DEBUG(1, ("Server offered no compatible mechanism\n"));
1684 x_fprintf(x_stdout, "BH Server offered no compatible mechanism\n");
1685 return;
1686 }
1687
1688 if (spnego.type == SPNEGO_NEG_TOKEN_TARG) {
1689
1690 if (spnego.negTokenTarg.supportedMech == NULL) {
1691 /* On accept/reject Windows does not send the
1692 mechanism anymore. Handle that here and
1693 shut down the mechanisms. */
1694
1695 switch (spnego.negTokenTarg.negResult) {
1696 case SPNEGO_ACCEPT_COMPLETED:
1697 x_fprintf(x_stdout, "AF\n");
1698 break;
1699 case SPNEGO_REJECT:
1700 x_fprintf(x_stdout, "NA\n");
1701 break;
1702 default:
1703 DEBUG(1, ("Got a negTokenTarg with no mech and an "
1704 "unknown negResult: %d\n",
1705 spnego.negTokenTarg.negResult));
1706 x_fprintf(x_stdout, "BH Got a negTokenTarg with"
1707 " no mech and an unknown "
1708 "negResult\n");
1709 }
1710
1711 ntlmssp_end(&client_ntlmssp_state);
1712 goto out;
1713 }
1714
1715 if (strcmp(spnego.negTokenTarg.supportedMech,
1716 OID_NTLMSSP) == 0) {
1717 manage_client_ntlmssp_targ(spnego);
1718 goto out;
1719 }
1720
1721#if HAVE_KRB5
1722 if (strcmp(spnego.negTokenTarg.supportedMech,
1723 OID_KERBEROS5_OLD) == 0) {
1724 manage_client_krb5_targ(spnego);
1725 goto out;
1726 }
1727#endif
1728
1729 }
1730
1731 DEBUG(1, ("Got an SPNEGO token I could not handle [%s]!\n", buf));
1732 x_fprintf(x_stdout, "BH Got an SPNEGO token I could not handle\n");
1733 return;
1734
1735 out:
1736 free_spnego_data(&spnego);
1737 return;
1738}
1739
1740static void manage_ntlm_server_1_request(struct ntlm_auth_state *state,
1741 char *buf, int length)
1742{
1743 char *request, *parameter;
1744 static DATA_BLOB challenge;
1745 static DATA_BLOB lm_response;
1746 static DATA_BLOB nt_response;
1747 static char *full_username;
1748 static char *username;
1749 static char *domain;
1750 static char *plaintext_password;
1751 static bool ntlm_server_1_user_session_key;
1752 static bool ntlm_server_1_lm_session_key;
1753
1754 if (strequal(buf, ".")) {
1755 if (!full_username && !username) {
1756 x_fprintf(x_stdout, "Error: No username supplied!\n");
1757 } else if (plaintext_password) {
1758 /* handle this request as plaintext */
1759 if (!full_username) {
1760 if (asprintf(&full_username, "%s%c%s", domain, winbind_separator(), username) == -1) {
1761 x_fprintf(x_stdout, "Error: Out of memory in asprintf!\n.\n");
1762 return;
1763 }
1764 }
1765 if (check_plaintext_auth(full_username, plaintext_password, False)) {
1766 x_fprintf(x_stdout, "Authenticated: Yes\n");
1767 } else {
1768 x_fprintf(x_stdout, "Authenticated: No\n");
1769 }
1770 } else if (!lm_response.data && !nt_response.data) {
1771 x_fprintf(x_stdout, "Error: No password supplied!\n");
1772 } else if (!challenge.data) {
1773 x_fprintf(x_stdout, "Error: No lanman-challenge supplied!\n");
1774 } else {
1775 char *error_string = NULL;
1776 uchar lm_key[8];
1777 uchar user_session_key[16];
1778 uint32 flags = 0;
1779
1780 if (full_username && !username) {
1781 fstring fstr_user;
1782 fstring fstr_domain;
1783
1784 if (!parse_ntlm_auth_domain_user(full_username, fstr_user, fstr_domain)) {
1785 /* username might be 'tainted', don't print into our new-line deleimianted stream */
1786 x_fprintf(x_stdout, "Error: Could not parse into domain and username\n");
1787 }
1788 SAFE_FREE(username);
1789 SAFE_FREE(domain);
1790 username = smb_xstrdup(fstr_user);
1791 domain = smb_xstrdup(fstr_domain);
1792 }
1793
1794 if (!domain) {
1795 domain = smb_xstrdup(get_winbind_domain());
1796 }
1797
1798 if (ntlm_server_1_lm_session_key)
1799 flags |= WBFLAG_PAM_LMKEY;
1800
1801 if (ntlm_server_1_user_session_key)
1802 flags |= WBFLAG_PAM_USER_SESSION_KEY;
1803
1804 if (!NT_STATUS_IS_OK(
1805 contact_winbind_auth_crap(username,
1806 domain,
1807 global_myname(),
1808 &challenge,
1809 &lm_response,
1810 &nt_response,
1811 flags,
1812 lm_key,
1813 user_session_key,
1814 &error_string,
1815 NULL))) {
1816
1817 x_fprintf(x_stdout, "Authenticated: No\n");
1818 x_fprintf(x_stdout, "Authentication-Error: %s\n.\n", error_string);
1819 } else {
1820 static char zeros[16];
1821 char *hex_lm_key;
1822 char *hex_user_session_key;
1823
1824 x_fprintf(x_stdout, "Authenticated: Yes\n");
1825
1826 if (ntlm_server_1_lm_session_key
1827 && (memcmp(zeros, lm_key,
1828 sizeof(lm_key)) != 0)) {
1829 hex_lm_key = hex_encode(NULL,
1830 (const unsigned char *)lm_key,
1831 sizeof(lm_key));
1832 x_fprintf(x_stdout, "LANMAN-Session-Key: %s\n", hex_lm_key);
1833 TALLOC_FREE(hex_lm_key);
1834 }
1835
1836 if (ntlm_server_1_user_session_key
1837 && (memcmp(zeros, user_session_key,
1838 sizeof(user_session_key)) != 0)) {
1839 hex_user_session_key = hex_encode(NULL,
1840 (const unsigned char *)user_session_key,
1841 sizeof(user_session_key));
1842 x_fprintf(x_stdout, "User-Session-Key: %s\n", hex_user_session_key);
1843 TALLOC_FREE(hex_user_session_key);
1844 }
1845 }
1846 SAFE_FREE(error_string);
1847 }
1848 /* clear out the state */
1849 challenge = data_blob_null;
1850 nt_response = data_blob_null;
1851 lm_response = data_blob_null;
1852 SAFE_FREE(full_username);
1853 SAFE_FREE(username);
1854 SAFE_FREE(domain);
1855 SAFE_FREE(plaintext_password);
1856 ntlm_server_1_user_session_key = False;
1857 ntlm_server_1_lm_session_key = False;
1858 x_fprintf(x_stdout, ".\n");
1859
1860 return;
1861 }
1862
1863 request = buf;
1864
1865 /* Indicates a base64 encoded structure */
1866 parameter = strstr_m(request, ":: ");
1867 if (!parameter) {
1868 parameter = strstr_m(request, ": ");
1869
1870 if (!parameter) {
1871 DEBUG(0, ("Parameter not found!\n"));
1872 x_fprintf(x_stdout, "Error: Parameter not found!\n.\n");
1873 return;
1874 }
1875
1876 parameter[0] ='\0';
1877 parameter++;
1878 parameter[0] ='\0';
1879 parameter++;
1880
1881 } else {
1882 parameter[0] ='\0';
1883 parameter++;
1884 parameter[0] ='\0';
1885 parameter++;
1886 parameter[0] ='\0';
1887 parameter++;
1888
1889 base64_decode_inplace(parameter);
1890 }
1891
1892 if (strequal(request, "LANMAN-Challenge")) {
1893 challenge = strhex_to_data_blob(NULL, parameter);
1894 if (challenge.length != 8) {
1895 x_fprintf(x_stdout, "Error: hex decode of %s failed! (got %d bytes, expected 8)\n.\n",
1896 parameter,
1897 (int)challenge.length);
1898 challenge = data_blob_null;
1899 }
1900 } else if (strequal(request, "NT-Response")) {
1901 nt_response = strhex_to_data_blob(NULL, parameter);
1902 if (nt_response.length < 24) {
1903 x_fprintf(x_stdout, "Error: hex decode of %s failed! (only got %d bytes, needed at least 24)\n.\n",
1904 parameter,
1905 (int)nt_response.length);
1906 nt_response = data_blob_null;
1907 }
1908 } else if (strequal(request, "LANMAN-Response")) {
1909 lm_response = strhex_to_data_blob(NULL, parameter);
1910 if (lm_response.length != 24) {
1911 x_fprintf(x_stdout, "Error: hex decode of %s failed! (got %d bytes, expected 24)\n.\n",
1912 parameter,
1913 (int)lm_response.length);
1914 lm_response = data_blob_null;
1915 }
1916 } else if (strequal(request, "Password")) {
1917 plaintext_password = smb_xstrdup(parameter);
1918 } else if (strequal(request, "NT-Domain")) {
1919 domain = smb_xstrdup(parameter);
1920 } else if (strequal(request, "Username")) {
1921 username = smb_xstrdup(parameter);
1922 } else if (strequal(request, "Full-Username")) {
1923 full_username = smb_xstrdup(parameter);
1924 } else if (strequal(request, "Request-User-Session-Key")) {
1925 ntlm_server_1_user_session_key = strequal(parameter, "Yes");
1926 } else if (strequal(request, "Request-LanMan-Session-Key")) {
1927 ntlm_server_1_lm_session_key = strequal(parameter, "Yes");
1928 } else {
1929 x_fprintf(x_stdout, "Error: Unknown request %s\n.\n", request);
1930 }
1931}
1932
1933static void manage_ntlm_change_password_1_request(struct ntlm_auth_state *state,
1934 char *buf, int length)
1935{
1936 char *request, *parameter;
1937 static DATA_BLOB new_nt_pswd;
1938 static DATA_BLOB old_nt_hash_enc;
1939 static DATA_BLOB new_lm_pswd;
1940 static DATA_BLOB old_lm_hash_enc;
1941 static char *full_username = NULL;
1942 static char *username = NULL;
1943 static char *domain = NULL;
1944 static char *newpswd = NULL;
1945 static char *oldpswd = NULL;
1946
1947 if (strequal(buf, ".")) {
1948 if(newpswd && oldpswd) {
1949 uchar old_nt_hash[16];
1950 uchar old_lm_hash[16];
1951 uchar new_nt_hash[16];
1952 uchar new_lm_hash[16];
1953
1954 new_nt_pswd = data_blob(NULL, 516);
1955 old_nt_hash_enc = data_blob(NULL, 16);
1956
1957 /* Calculate the MD4 hash (NT compatible) of the
1958 * password */
1959 E_md4hash(oldpswd, old_nt_hash);
1960 E_md4hash(newpswd, new_nt_hash);
1961
1962 /* E_deshash returns false for 'long'
1963 passwords (> 14 DOS chars).
1964
1965 Therefore, don't send a buffer
1966 encrypted with the truncated hash
1967 (it could allow an even easier
1968 attack on the password)
1969
1970 Likewise, obey the admin's restriction
1971 */
1972
1973 if (lp_client_lanman_auth() &&
1974 E_deshash(newpswd, new_lm_hash) &&
1975 E_deshash(oldpswd, old_lm_hash)) {
1976 new_lm_pswd = data_blob(NULL, 516);
1977 old_lm_hash_enc = data_blob(NULL, 16);
1978 encode_pw_buffer(new_lm_pswd.data, newpswd,
1979 STR_UNICODE);
1980
1981 SamOEMhash(new_lm_pswd.data, old_nt_hash, 516);
1982 E_old_pw_hash(new_nt_hash, old_lm_hash,
1983 old_lm_hash_enc.data);
1984 } else {
1985 new_lm_pswd.data = NULL;
1986 new_lm_pswd.length = 0;
1987 old_lm_hash_enc.data = NULL;
1988 old_lm_hash_enc.length = 0;
1989 }
1990
1991 encode_pw_buffer(new_nt_pswd.data, newpswd,
1992 STR_UNICODE);
1993
1994 SamOEMhash(new_nt_pswd.data, old_nt_hash, 516);
1995 E_old_pw_hash(new_nt_hash, old_nt_hash,
1996 old_nt_hash_enc.data);
1997 }
1998
1999 if (!full_username && !username) {
2000 x_fprintf(x_stdout, "Error: No username supplied!\n");
2001 } else if ((!new_nt_pswd.data || !old_nt_hash_enc.data) &&
2002 (!new_lm_pswd.data || old_lm_hash_enc.data) ) {
2003 x_fprintf(x_stdout, "Error: No NT or LM password "
2004 "blobs supplied!\n");
2005 } else {
2006 char *error_string = NULL;
2007
2008 if (full_username && !username) {
2009 fstring fstr_user;
2010 fstring fstr_domain;
2011
2012 if (!parse_ntlm_auth_domain_user(full_username,
2013 fstr_user,
2014 fstr_domain)) {
2015 /* username might be 'tainted', don't
2016 * print into our new-line
2017 * deleimianted stream */
2018 x_fprintf(x_stdout, "Error: Could not "
2019 "parse into domain and "
2020 "username\n");
2021 SAFE_FREE(username);
2022 username = smb_xstrdup(full_username);
2023 } else {
2024 SAFE_FREE(username);
2025 SAFE_FREE(domain);
2026 username = smb_xstrdup(fstr_user);
2027 domain = smb_xstrdup(fstr_domain);
2028 }
2029
2030 }
2031
2032 if(!NT_STATUS_IS_OK(contact_winbind_change_pswd_auth_crap(
2033 username, domain,
2034 new_nt_pswd,
2035 old_nt_hash_enc,
2036 new_lm_pswd,
2037 old_lm_hash_enc,
2038 &error_string))) {
2039 x_fprintf(x_stdout, "Password-Change: No\n");
2040 x_fprintf(x_stdout, "Password-Change-Error: "
2041 "%s\n.\n", error_string);
2042 } else {
2043 x_fprintf(x_stdout, "Password-Change: Yes\n");
2044 }
2045
2046 SAFE_FREE(error_string);
2047 }
2048 /* clear out the state */
2049 new_nt_pswd = data_blob_null;
2050 old_nt_hash_enc = data_blob_null;
2051 new_lm_pswd = data_blob_null;
2052 old_nt_hash_enc = data_blob_null;
2053 SAFE_FREE(full_username);
2054 SAFE_FREE(username);
2055 SAFE_FREE(domain);
2056 SAFE_FREE(newpswd);
2057 SAFE_FREE(oldpswd);
2058 x_fprintf(x_stdout, ".\n");
2059
2060 return;
2061 }
2062
2063 request = buf;
2064
2065 /* Indicates a base64 encoded structure */
2066 parameter = strstr_m(request, ":: ");
2067 if (!parameter) {
2068 parameter = strstr_m(request, ": ");
2069
2070 if (!parameter) {
2071 DEBUG(0, ("Parameter not found!\n"));
2072 x_fprintf(x_stdout, "Error: Parameter not found!\n.\n");
2073 return;
2074 }
2075
2076 parameter[0] ='\0';
2077 parameter++;
2078 parameter[0] ='\0';
2079 parameter++;
2080 } else {
2081 parameter[0] ='\0';
2082 parameter++;
2083 parameter[0] ='\0';
2084 parameter++;
2085 parameter[0] ='\0';
2086 parameter++;
2087
2088 base64_decode_inplace(parameter);
2089 }
2090
2091 if (strequal(request, "new-nt-password-blob")) {
2092 new_nt_pswd = strhex_to_data_blob(NULL, parameter);
2093 if (new_nt_pswd.length != 516) {
2094 x_fprintf(x_stdout, "Error: hex decode of %s failed! "
2095 "(got %d bytes, expected 516)\n.\n",
2096 parameter,
2097 (int)new_nt_pswd.length);
2098 new_nt_pswd = data_blob_null;
2099 }
2100 } else if (strequal(request, "old-nt-hash-blob")) {
2101 old_nt_hash_enc = strhex_to_data_blob(NULL, parameter);
2102 if (old_nt_hash_enc.length != 16) {
2103 x_fprintf(x_stdout, "Error: hex decode of %s failed! "
2104 "(got %d bytes, expected 16)\n.\n",
2105 parameter,
2106 (int)old_nt_hash_enc.length);
2107 old_nt_hash_enc = data_blob_null;
2108 }
2109 } else if (strequal(request, "new-lm-password-blob")) {
2110 new_lm_pswd = strhex_to_data_blob(NULL, parameter);
2111 if (new_lm_pswd.length != 516) {
2112 x_fprintf(x_stdout, "Error: hex decode of %s failed! "
2113 "(got %d bytes, expected 516)\n.\n",
2114 parameter,
2115 (int)new_lm_pswd.length);
2116 new_lm_pswd = data_blob_null;
2117 }
2118 }
2119 else if (strequal(request, "old-lm-hash-blob")) {
2120 old_lm_hash_enc = strhex_to_data_blob(NULL, parameter);
2121 if (old_lm_hash_enc.length != 16)
2122 {
2123 x_fprintf(x_stdout, "Error: hex decode of %s failed! "
2124 "(got %d bytes, expected 16)\n.\n",
2125 parameter,
2126 (int)old_lm_hash_enc.length);
2127 old_lm_hash_enc = data_blob_null;
2128 }
2129 } else if (strequal(request, "nt-domain")) {
2130 domain = smb_xstrdup(parameter);
2131 } else if(strequal(request, "username")) {
2132 username = smb_xstrdup(parameter);
2133 } else if(strequal(request, "full-username")) {
2134 username = smb_xstrdup(parameter);
2135 } else if(strequal(request, "new-password")) {
2136 newpswd = smb_xstrdup(parameter);
2137 } else if (strequal(request, "old-password")) {
2138 oldpswd = smb_xstrdup(parameter);
2139 } else {
2140 x_fprintf(x_stdout, "Error: Unknown request %s\n.\n", request);
2141 }
2142}
2143
2144static void manage_squid_request(struct ntlm_auth_state *state,
2145 stdio_helper_function fn)
2146{
2147 char *buf;
2148 char tmp[INITIAL_BUFFER_SIZE+1];
2149 int length, buf_size = 0;
2150 char *c;
2151
2152 buf = talloc_strdup(state->mem_ctx, "");
2153 if (!buf) {
2154 DEBUG(0, ("Failed to allocate input buffer.\n"));
2155 x_fprintf(x_stderr, "ERR\n");
2156 exit(1);
2157 }
2158
2159 do {
2160
2161 /* this is not a typo - x_fgets doesn't work too well under
2162 * squid */
2163 if (fgets(tmp, sizeof(tmp)-1, stdin) == NULL) {
2164 if (ferror(stdin)) {
2165 DEBUG(1, ("fgets() failed! dying..... errno=%d "
2166 "(%s)\n", ferror(stdin),
2167 strerror(ferror(stdin))));
2168
2169 exit(1);
2170 }
2171 exit(0);
2172 }
2173
2174 buf = talloc_strdup_append_buffer(buf, tmp);
2175 buf_size += INITIAL_BUFFER_SIZE;
2176
2177 if (buf_size > MAX_BUFFER_SIZE) {
2178 DEBUG(2, ("Oversized message\n"));
2179 x_fprintf(x_stderr, "ERR\n");
2180 talloc_free(buf);
2181 return;
2182 }
2183
2184 c = strchr(buf, '\n');
2185 } while (c == NULL);
2186
2187 *c = '\0';
2188 length = c-buf;
2189
2190 DEBUG(10, ("Got '%s' from squid (length: %d).\n",buf,length));
2191
2192 if (buf[0] == '\0') {
2193 DEBUG(2, ("Invalid Request\n"));
2194 x_fprintf(x_stderr, "ERR\n");
2195 talloc_free(buf);
2196 return;
2197 }
2198
2199 fn(state, buf, length);
2200 talloc_free(buf);
2201}
2202
2203
2204static void squid_stream(enum stdio_helper_mode stdio_mode, stdio_helper_function fn) {
2205 TALLOC_CTX *mem_ctx;
2206 struct ntlm_auth_state *state;
2207
2208 /* initialize FDescs */
2209 x_setbuf(x_stdout, NULL);
2210 x_setbuf(x_stderr, NULL);
2211
2212 mem_ctx = talloc_init("ntlm_auth");
2213 if (!mem_ctx) {
2214 DEBUG(0, ("squid_stream: Failed to create talloc context\n"));
2215 x_fprintf(x_stderr, "ERR\n");
2216 exit(1);
2217 }
2218
2219 state = talloc_zero(mem_ctx, struct ntlm_auth_state);
2220 if (!state) {
2221 DEBUG(0, ("squid_stream: Failed to talloc ntlm_auth_state\n"));
2222 x_fprintf(x_stderr, "ERR\n");
2223 exit(1);
2224 }
2225
2226 state->mem_ctx = mem_ctx;
2227 state->helper_mode = stdio_mode;
2228
2229 while(1) {
2230 manage_squid_request(state, fn);
2231 }
2232}
2233
2234
2235/* Authenticate a user with a challenge/response */
2236
2237static bool check_auth_crap(void)
2238{
2239 NTSTATUS nt_status;
2240 uint32 flags = 0;
2241 char lm_key[8];
2242 char user_session_key[16];
2243 char *hex_lm_key;
2244 char *hex_user_session_key;
2245 char *error_string;
2246 static uint8 zeros[16];
2247
2248 x_setbuf(x_stdout, NULL);
2249
2250 if (request_lm_key)
2251 flags |= WBFLAG_PAM_LMKEY;
2252
2253 if (request_user_session_key)
2254 flags |= WBFLAG_PAM_USER_SESSION_KEY;
2255
2256 flags |= WBFLAG_PAM_NT_STATUS_SQUASH;
2257
2258 nt_status = contact_winbind_auth_crap(opt_username, opt_domain,
2259 opt_workstation,
2260 &opt_challenge,
2261 &opt_lm_response,
2262 &opt_nt_response,
2263 flags,
2264 (unsigned char *)lm_key,
2265 (unsigned char *)user_session_key,
2266 &error_string, NULL);
2267
2268 if (!NT_STATUS_IS_OK(nt_status)) {
2269 x_fprintf(x_stdout, "%s (0x%x)\n",
2270 error_string,
2271 NT_STATUS_V(nt_status));
2272 SAFE_FREE(error_string);
2273 return False;
2274 }
2275
2276 if (request_lm_key
2277 && (memcmp(zeros, lm_key,
2278 sizeof(lm_key)) != 0)) {
2279 hex_lm_key = hex_encode(NULL, (const unsigned char *)lm_key,
2280 sizeof(lm_key));
2281 x_fprintf(x_stdout, "LM_KEY: %s\n", hex_lm_key);
2282 TALLOC_FREE(hex_lm_key);
2283 }
2284 if (request_user_session_key
2285 && (memcmp(zeros, user_session_key,
2286 sizeof(user_session_key)) != 0)) {
2287 hex_user_session_key = hex_encode(NULL, (const unsigned char *)user_session_key,
2288 sizeof(user_session_key));
2289 x_fprintf(x_stdout, "NT_KEY: %s\n", hex_user_session_key);
2290 TALLOC_FREE(hex_user_session_key);
2291 }
2292
2293 return True;
2294}
2295
2296/* Main program */
2297
2298enum {
2299 OPT_USERNAME = 1000,
2300 OPT_DOMAIN,
2301 OPT_WORKSTATION,
2302 OPT_CHALLENGE,
2303 OPT_RESPONSE,
2304 OPT_LM,
2305 OPT_NT,
2306 OPT_PASSWORD,
2307 OPT_LM_KEY,
2308 OPT_USER_SESSION_KEY,
2309 OPT_DIAGNOSTICS,
2310 OPT_REQUIRE_MEMBERSHIP,
2311 OPT_USE_CACHED_CREDS
2312};
2313
2314 int main(int argc, const char **argv)
2315{
2316 TALLOC_CTX *frame = talloc_stackframe();
2317 int opt;
2318 static const char *helper_protocol;
2319 static int diagnostics;
2320
2321 static const char *hex_challenge;
2322 static const char *hex_lm_response;
2323 static const char *hex_nt_response;
2324
2325 poptContext pc;
2326
2327 /* NOTE: DO NOT change this interface without considering the implications!
2328 This is an external interface, which other programs will use to interact
2329 with this helper.
2330 */
2331
2332 /* We do not use single-letter command abbreviations, because they harm future
2333 interface stability. */
2334
2335 struct poptOption long_options[] = {
2336 POPT_AUTOHELP
2337 { "helper-protocol", 0, POPT_ARG_STRING, &helper_protocol, OPT_DOMAIN, "operate as a stdio-based helper", "helper protocol to use"},
2338 { "username", 0, POPT_ARG_STRING, &opt_username, OPT_USERNAME, "username"},
2339 { "domain", 0, POPT_ARG_STRING, &opt_domain, OPT_DOMAIN, "domain name"},
2340 { "workstation", 0, POPT_ARG_STRING, &opt_workstation, OPT_WORKSTATION, "workstation"},
2341 { "challenge", 0, POPT_ARG_STRING, &hex_challenge, OPT_CHALLENGE, "challenge (HEX encoded)"},
2342 { "lm-response", 0, POPT_ARG_STRING, &hex_lm_response, OPT_LM, "LM Response to the challenge (HEX encoded)"},
2343 { "nt-response", 0, POPT_ARG_STRING, &hex_nt_response, OPT_NT, "NT or NTLMv2 Response to the challenge (HEX encoded)"},
2344 { "password", 0, POPT_ARG_STRING, &opt_password, OPT_PASSWORD, "User's plaintext password"},
2345 { "request-lm-key", 0, POPT_ARG_NONE, &request_lm_key, OPT_LM_KEY, "Retrieve LM session key"},
2346 { "request-nt-key", 0, POPT_ARG_NONE, &request_user_session_key, OPT_USER_SESSION_KEY, "Retrieve User (NT) session key"},
2347 { "use-cached-creds", 0, POPT_ARG_NONE, &use_cached_creds, OPT_USE_CACHED_CREDS, "Use cached credentials if no password is given"},
2348 { "diagnostics", 0, POPT_ARG_NONE, &diagnostics, OPT_DIAGNOSTICS, "Perform diagnostics on the authentictaion chain"},
2349 { "require-membership-of", 0, POPT_ARG_STRING, &require_membership_of, OPT_REQUIRE_MEMBERSHIP, "Require that a user be a member of this group (either name or SID) for authentication to succeed" },
2350 POPT_COMMON_CONFIGFILE
2351 POPT_COMMON_VERSION
2352 POPT_TABLEEND
2353 };
2354
2355 /* Samba client initialisation */
2356 load_case_tables();
2357
2358 dbf = x_stderr;
2359
2360 /* Parse options */
2361
2362 pc = poptGetContext("ntlm_auth", argc, argv, long_options, 0);
2363
2364 /* Parse command line options */
2365
2366 if (argc == 1) {
2367 poptPrintHelp(pc, stderr, 0);
2368 return 1;
2369 }
2370
2371 while((opt = poptGetNextOpt(pc)) != -1) {
2372 /* Get generic config options like --configfile */
2373 }
2374
2375 poptFreeContext(pc);
2376
2377 if (!lp_load(get_dyn_CONFIGFILE(), True, False, False, True)) {
2378 d_fprintf(stderr, "ntlm_auth: error opening config file %s. Error was %s\n",
2379 get_dyn_CONFIGFILE(), strerror(errno));
2380 exit(1);
2381 }
2382
2383 pc = poptGetContext(NULL, argc, (const char **)argv, long_options,
2384 POPT_CONTEXT_KEEP_FIRST);
2385
2386 while((opt = poptGetNextOpt(pc)) != -1) {
2387 switch (opt) {
2388 case OPT_CHALLENGE:
2389 opt_challenge = strhex_to_data_blob(NULL, hex_challenge);
2390 if (opt_challenge.length != 8) {
2391 x_fprintf(x_stderr, "hex decode of %s failed! (only got %d bytes)\n",
2392 hex_challenge,
2393 (int)opt_challenge.length);
2394 exit(1);
2395 }
2396 break;
2397 case OPT_LM:
2398 opt_lm_response = strhex_to_data_blob(NULL, hex_lm_response);
2399 if (opt_lm_response.length != 24) {
2400 x_fprintf(x_stderr, "hex decode of %s failed! (only got %d bytes)\n",
2401 hex_lm_response,
2402 (int)opt_lm_response.length);
2403 exit(1);
2404 }
2405 break;
2406
2407 case OPT_NT:
2408 opt_nt_response = strhex_to_data_blob(NULL, hex_nt_response);
2409 if (opt_nt_response.length < 24) {
2410 x_fprintf(x_stderr, "hex decode of %s failed! (only got %d bytes)\n",
2411 hex_nt_response,
2412 (int)opt_nt_response.length);
2413 exit(1);
2414 }
2415 break;
2416
2417 case OPT_REQUIRE_MEMBERSHIP:
2418 if (StrnCaseCmp("S-", require_membership_of, 2) == 0) {
2419 require_membership_of_sid = require_membership_of;
2420 }
2421 break;
2422 }
2423 }
2424
2425 if (opt_username) {
2426 char *domain = SMB_STRDUP(opt_username);
2427 char *p = strchr_m(domain, *lp_winbind_separator());
2428 if (p) {
2429 opt_username = p+1;
2430 *p = '\0';
2431 if (opt_domain && !strequal(opt_domain, domain)) {
2432 x_fprintf(x_stderr, "Domain specified in username (%s) "
2433 "doesn't match specified domain (%s)!\n\n",
2434 domain, opt_domain);
2435 poptPrintHelp(pc, stderr, 0);
2436 exit(1);
2437 }
2438 opt_domain = domain;
2439 } else {
2440 SAFE_FREE(domain);
2441 }
2442 }
2443
2444 /* Note: if opt_domain is "" then send no domain */
2445 if (opt_domain == NULL) {
2446 opt_domain = get_winbind_domain();
2447 }
2448
2449 if (opt_workstation == NULL) {
2450 opt_workstation = "";
2451 }
2452
2453 if (helper_protocol) {
2454 int i;
2455 for (i=0; i<NUM_HELPER_MODES; i++) {
2456 if (strcmp(helper_protocol, stdio_helper_protocols[i].name) == 0) {
2457 squid_stream(stdio_helper_protocols[i].mode, stdio_helper_protocols[i].fn);
2458 exit(0);
2459 }
2460 }
2461 x_fprintf(x_stderr, "unknown helper protocol [%s]\n\nValid helper protools:\n\n", helper_protocol);
2462
2463 for (i=0; i<NUM_HELPER_MODES; i++) {
2464 x_fprintf(x_stderr, "%s\n", stdio_helper_protocols[i].name);
2465 }
2466
2467 exit(1);
2468 }
2469
2470 if (!opt_username || !*opt_username) {
2471 x_fprintf(x_stderr, "username must be specified!\n\n");
2472 poptPrintHelp(pc, stderr, 0);
2473 exit(1);
2474 }
2475
2476 if (opt_challenge.length) {
2477 if (!check_auth_crap()) {
2478 exit(1);
2479 }
2480 exit(0);
2481 }
2482
2483 if (!opt_password) {
2484 opt_password = getpass("password: ");
2485 }
2486
2487 if (diagnostics) {
2488 if (!diagnose_ntlm_auth()) {
2489 return 1;
2490 }
2491 } else {
2492 fstring user;
2493
2494 fstr_sprintf(user, "%s%c%s", opt_domain, winbind_separator(), opt_username);
2495 if (!check_plaintext_auth(user, opt_password, True)) {
2496 return 1;
2497 }
2498 }
2499
2500 /* Exit code */
2501
2502 poptFreeContext(pc);
2503 TALLOC_FREE(frame);
2504 return 0;
2505}
Note: See TracBrowser for help on using the repository browser.