?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Add an optional SMB_STRUCT_SMB parameter to VFS_OP_READDIR
[Samba/gbeck.git] / source3 / utils / ntlm_auth.c
blob8aa8e5e0f9326d6562f8b32137956a083310621f
1 /*
2 Unix SMB/CIFS implementation.
3
4 Winbind status program.
5
6 Copyright (C) Tim Potter 2000-2003
7 Copyright (C) Andrew Bartlett <abartlet@samba.org> 2003-2004
8 Copyright (C) Francesco Chemolli <kinkie@kame.usr.dsi.unimi.it> 2000
9 Copyright (C) Robert O'Callahan 2006 (added cached credential code).
10 Copyright (C) Kai Blin <kai@samba.org> 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
35 enum 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
47 enum ntlm_auth_cli_state {
48 CLIENT_INITIAL = 0,
49 CLIENT_RESPONSE,
50 CLIENT_FINISHED,
51 CLIENT_ERROR
52 };
53
54 enum ntlm_auth_svr_state {
55 SERVER_INITIAL = 0,
56 SERVER_CHALLENGE,
57 SERVER_FINISHED,
58 SERVER_ERROR
59 };
60
61 struct 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
74 typedef void (*stdio_helper_function)(struct ntlm_auth_state *state, char *buf,
75 int length);
76
77 static void manage_squid_basic_request (struct ntlm_auth_state *state,
78 char *buf, int length);
79
80 static void manage_squid_ntlmssp_request (struct ntlm_auth_state *state,
81 char *buf, int length);
82
83 static void manage_client_ntlmssp_request (struct ntlm_auth_state *state,
84 char *buf, int length);
85
86 static void manage_gss_spnego_request (struct ntlm_auth_state *state,
87 char *buf, int length);
88
89 static void manage_gss_spnego_client_request (struct ntlm_auth_state *state,
90 char *buf, int length);
91
92 static void manage_ntlm_server_1_request (struct ntlm_auth_state *state,
93 char *buf, int length);
94
95 static void manage_ntlm_change_password_1_request(struct ntlm_auth_state *state,
96 char *buf, int length);
97
98 static 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
114 const char *opt_username;
115 const char *opt_domain;
116 const char *opt_workstation;
117 const char *opt_password;
118 static DATA_BLOB opt_challenge;
119 static DATA_BLOB opt_lm_response;
120 static DATA_BLOB opt_nt_response;
121 static int request_lm_key;
122 static int request_user_session_key;
123 static int use_cached_creds;
124
125 static const char *require_membership_of;
126 static const char *require_membership_of_sid;
127
128 static 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
158 const 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
183 const 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
209 DATA_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
224 static 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
242 static 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
283 static 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
336 NTSTATUS 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 */
443 static 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
522 static 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;
527 uint8 lm_key[8];
528 uint8 user_sess_key[16];
529 char *unix_name;
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,
551 unix_name);
552 SAFE_FREE(unix_name);
553 } else {
554 DEBUG(NT_STATUS_EQUAL(nt_status, NT_STATUS_ACCESS_DENIED) ? 0 : 3,
555 ("Login for user [%s]\\[%s]@[%s] failed due to [%s]\n",
556 ntlmssp_state->domain, ntlmssp_state->user,
557 ntlmssp_state->workstation,
558 error_string ? error_string : "unknown error (NULL)"));
559 ntlmssp_state->auth_context = NULL;
560 }
561 return nt_status;
562 }
563
564 static NTSTATUS local_pw_check(struct ntlmssp_state *ntlmssp_state, DATA_BLOB *user_session_key, DATA_BLOB *lm_session_key)
565 {
566 NTSTATUS nt_status;
567 uint8 lm_pw[16], nt_pw[16];
568
569 nt_lm_owf_gen (opt_password, nt_pw, lm_pw);
570
571 nt_status = ntlm_password_check(ntlmssp_state,
572 &ntlmssp_state->chal,
573 &ntlmssp_state->lm_resp,
574 &ntlmssp_state->nt_resp,
575 NULL, NULL,
576 ntlmssp_state->user,
577 ntlmssp_state->user,
578 ntlmssp_state->domain,
579 lm_pw, nt_pw, user_session_key, lm_session_key);
580
581 if (NT_STATUS_IS_OK(nt_status)) {
582 ntlmssp_state->auth_context = talloc_asprintf(ntlmssp_state,
583 "%s%c%s", ntlmssp_state->domain,
584 *lp_winbind_separator(),
585 ntlmssp_state->user);
586 } else {
587 DEBUG(3, ("Login for user [%s]\\[%s]@[%s] failed due to [%s]\n",
588 ntlmssp_state->domain, ntlmssp_state->user, ntlmssp_state->workstation,
589 nt_errstr(nt_status)));
590 ntlmssp_state->auth_context = NULL;
591 }
592 return nt_status;
593 }
594
595 static NTSTATUS ntlm_auth_start_ntlmssp_client(NTLMSSP_STATE **client_ntlmssp_state)
596 {
597 NTSTATUS status;
598 if ( (opt_username == NULL) || (opt_domain == NULL) ) {
599 status = NT_STATUS_UNSUCCESSFUL;
600 DEBUG(1, ("Need username and domain for NTLMSSP\n"));
601 return NT_STATUS_INVALID_PARAMETER;
602 }
603
604 status = ntlmssp_client_start(client_ntlmssp_state);
605
606 if (!NT_STATUS_IS_OK(status)) {
607 DEBUG(1, ("Could not start NTLMSSP client: %s\n",
608 nt_errstr(status)));
609 ntlmssp_end(client_ntlmssp_state);
610 return status;
611 }
612
613 status = ntlmssp_set_username(*client_ntlmssp_state, opt_username);
614
615 if (!NT_STATUS_IS_OK(status)) {
616 DEBUG(1, ("Could not set username: %s\n",
617 nt_errstr(status)));
618 ntlmssp_end(client_ntlmssp_state);
619 return status;
620 }
621
622 status = ntlmssp_set_domain(*client_ntlmssp_state, opt_domain);
623
624 if (!NT_STATUS_IS_OK(status)) {
625 DEBUG(1, ("Could not set domain: %s\n",
626 nt_errstr(status)));
627 ntlmssp_end(client_ntlmssp_state);
628 return status;
629 }
630
631 if (opt_password) {
632 status = ntlmssp_set_password(*client_ntlmssp_state, opt_password);
633
634 if (!NT_STATUS_IS_OK(status)) {
635 DEBUG(1, ("Could not set password: %s\n",
636 nt_errstr(status)));
637 ntlmssp_end(client_ntlmssp_state);
638 return status;
639 }
640 }
641
642 return NT_STATUS_OK;
643 }
644
645 static NTSTATUS ntlm_auth_start_ntlmssp_server(NTLMSSP_STATE **ntlmssp_state)
646 {
647 NTSTATUS status = ntlmssp_server_start(ntlmssp_state);
648
649 if (!NT_STATUS_IS_OK(status)) {
650 DEBUG(1, ("Could not start NTLMSSP server: %s\n",
651 nt_errstr(status)));
652 return status;
653 }
654
655 /* Have we been given a local password, or should we ask winbind? */
656 if (opt_password) {
657 (*ntlmssp_state)->check_password = local_pw_check;
658 (*ntlmssp_state)->get_domain = lp_workgroup;
659 (*ntlmssp_state)->get_global_myname = global_myname;
660 } else {
661 (*ntlmssp_state)->check_password = winbind_pw_check;
662 (*ntlmssp_state)->get_domain = get_winbind_domain;
663 (*ntlmssp_state)->get_global_myname = get_winbind_netbios_name;
664 }
665 return NT_STATUS_OK;
666 }
667
668 /*******************************************************************
669 Used by firefox to drive NTLM auth to IIS servers.
670 *******************************************************************/
671
672 static NTSTATUS do_ccache_ntlm_auth(DATA_BLOB initial_msg, DATA_BLOB challenge_msg,
673 DATA_BLOB *reply)
674 {
675 struct winbindd_request wb_request;
676 struct winbindd_response wb_response;
677 NSS_STATUS result;
678
679 /* get winbindd to do the ntlmssp step on our behalf */
680 ZERO_STRUCT(wb_request);
681 ZERO_STRUCT(wb_response);
682
683 fstr_sprintf(wb_request.data.ccache_ntlm_auth.user,
684 "%s%c%s", opt_domain, winbind_separator(), opt_username);
685 wb_request.data.ccache_ntlm_auth.uid = geteuid();
686 wb_request.data.ccache_ntlm_auth.initial_blob_len = initial_msg.length;
687 wb_request.data.ccache_ntlm_auth.challenge_blob_len = challenge_msg.length;
688 wb_request.extra_len = initial_msg.length + challenge_msg.length;
689
690 if (wb_request.extra_len > 0) {
691 wb_request.extra_data.data = SMB_MALLOC_ARRAY(char, wb_request.extra_len);
692 if (wb_request.extra_data.data == NULL) {
693 return NT_STATUS_NO_MEMORY;
694 }
695
696 memcpy(wb_request.extra_data.data, initial_msg.data, initial_msg.length);
697 memcpy(wb_request.extra_data.data + initial_msg.length,
698 challenge_msg.data, challenge_msg.length);
699 }
700
701 result = winbindd_request_response(WINBINDD_CCACHE_NTLMAUTH, &wb_request, &wb_response);
702 SAFE_FREE(wb_request.extra_data.data);
703
704 if (result != NSS_STATUS_SUCCESS) {
705 winbindd_free_response(&wb_response);
706 return NT_STATUS_UNSUCCESSFUL;
707 }
708
709 if (reply) {
710 *reply = data_blob(wb_response.extra_data.data,
711 wb_response.data.ccache_ntlm_auth.auth_blob_len);
712 if (wb_response.data.ccache_ntlm_auth.auth_blob_len > 0 &&
713 reply->data == NULL) {
714 winbindd_free_response(&wb_response);
715 return NT_STATUS_NO_MEMORY;
716 }
717 }
718
719 winbindd_free_response(&wb_response);
720 return NT_STATUS_MORE_PROCESSING_REQUIRED;
721 }
722
723 static void manage_squid_ntlmssp_request(struct ntlm_auth_state *state,
724 char *buf, int length)
725 {
726 DATA_BLOB request, reply;
727 NTSTATUS nt_status;
728
729 if (strlen(buf) < 2) {
730 DEBUG(1, ("NTLMSSP query [%s] invalid", buf));
731 x_fprintf(x_stdout, "BH NTLMSSP query invalid\n");
732 return;
733 }
734
735 if (strlen(buf) > 3) {
736 if(strncmp(buf, "SF ", 3) == 0){
737 DEBUG(10, ("Setting flags to negotioate\n"));
738 TALLOC_FREE(state->want_feature_list);
739 state->want_feature_list = talloc_strdup(state->mem_ctx,
740 buf+3);
741 x_fprintf(x_stdout, "OK\n");
742 return;
743 }
744 request = base64_decode_data_blob(buf + 3);
745 } else {
746 request = data_blob_null;
747 }
748
749 if ((strncmp(buf, "PW ", 3) == 0)) {
750 /* The calling application wants us to use a local password
751 * (rather than winbindd) */
752
753 opt_password = SMB_STRNDUP((const char *)request.data,
754 request.length);
755
756 if (opt_password == NULL) {
757 DEBUG(1, ("Out of memory\n"));
758 x_fprintf(x_stdout, "BH Out of memory\n");
759 data_blob_free(&request);
760 return;
761 }
762
763 x_fprintf(x_stdout, "OK\n");
764 data_blob_free(&request);
765 return;
766 }
767
768 if (strncmp(buf, "YR", 2) == 0) {
769 if (state->ntlmssp_state)
770 ntlmssp_end(&state->ntlmssp_state);
771 state->svr_state = SERVER_INITIAL;
772 } else if (strncmp(buf, "KK", 2) == 0) {
773 /* No special preprocessing required */
774 } else if (strncmp(buf, "GF", 2) == 0) {
775 DEBUG(10, ("Requested negotiated NTLMSSP flags\n"));
776
777 if (state->svr_state == SERVER_FINISHED) {
778 x_fprintf(x_stdout, "GF 0x%08x\n", state->neg_flags);
779 }
780 else {
781 x_fprintf(x_stdout, "BH\n");
782 }
783 data_blob_free(&request);
784 return;
785 } else if (strncmp(buf, "GK", 2) == 0) {
786 DEBUG(10, ("Requested NTLMSSP session key\n"));
787 if(state->have_session_key) {
788 char *key64 = base64_encode_data_blob(state->mem_ctx,
789 state->session_key);
790 x_fprintf(x_stdout, "GK %s\n", key64?key64:"<NULL>");
791 TALLOC_FREE(key64);
792 } else {
793 x_fprintf(x_stdout, "BH\n");
794 }
795
796 data_blob_free(&request);
797 return;
798 } else {
799 DEBUG(1, ("NTLMSSP query [%s] invalid", buf));
800 x_fprintf(x_stdout, "BH NTLMSSP query invalid\n");
801 return;
802 }
803
804 if (!state->ntlmssp_state) {
805 nt_status = ntlm_auth_start_ntlmssp_server(
806 &state->ntlmssp_state);
807 if (!NT_STATUS_IS_OK(nt_status)) {
808 x_fprintf(x_stdout, "BH %s\n", nt_errstr(nt_status));
809 return;
810 }
811 ntlmssp_want_feature_list(state->ntlmssp_state,
812 state->want_feature_list);
813 }
814
815 DEBUG(10, ("got NTLMSSP packet:\n"));
816 dump_data(10, request.data, request.length);
817
818 nt_status = ntlmssp_update(state->ntlmssp_state, request, &reply);
819
820 if (NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED)) {
821 char *reply_base64 = base64_encode_data_blob(state->mem_ctx,
822 reply);
823 x_fprintf(x_stdout, "TT %s\n", reply_base64);
824 TALLOC_FREE(reply_base64);
825 data_blob_free(&reply);
826 state->svr_state = SERVER_CHALLENGE;
827 DEBUG(10, ("NTLMSSP challenge\n"));
828 } else if (NT_STATUS_EQUAL(nt_status, NT_STATUS_ACCESS_DENIED)) {
829 x_fprintf(x_stdout, "BH %s\n", nt_errstr(nt_status));
830 DEBUG(0, ("NTLMSSP BH: %s\n", nt_errstr(nt_status)));
831
832 ntlmssp_end(&state->ntlmssp_state);
833 } else if (!NT_STATUS_IS_OK(nt_status)) {
834 x_fprintf(x_stdout, "NA %s\n", nt_errstr(nt_status));
835 DEBUG(10, ("NTLMSSP %s\n", nt_errstr(nt_status)));
836 } else {
837 x_fprintf(x_stdout, "AF %s\n",
838 (char *)state->ntlmssp_state->auth_context);
839 DEBUG(10, ("NTLMSSP OK!\n"));
840
841 if(state->have_session_key)
842 data_blob_free(&state->session_key);
843 state->session_key = data_blob(
844 state->ntlmssp_state->session_key.data,
845 state->ntlmssp_state->session_key.length);
846 state->neg_flags = state->ntlmssp_state->neg_flags;
847 state->have_session_key = true;
848 state->svr_state = SERVER_FINISHED;
849 }
850
851 data_blob_free(&request);
852 }
853
854 static void manage_client_ntlmssp_request(struct ntlm_auth_state *state,
855 char *buf, int length)
856 {
857 DATA_BLOB request, reply;
858 NTSTATUS nt_status;
859
860 if (!opt_username || !*opt_username) {
861 x_fprintf(x_stderr, "username must be specified!\n\n");
862 exit(1);
863 }
864
865 if (strlen(buf) < 2) {
866 DEBUG(1, ("NTLMSSP query [%s] invalid", buf));
867 x_fprintf(x_stdout, "BH NTLMSSP query invalid\n");
868 return;
869 }
870
871 if (strlen(buf) > 3) {
872 if(strncmp(buf, "SF ", 3) == 0) {
873 DEBUG(10, ("Looking for flags to negotiate\n"));
874 talloc_free(state->want_feature_list);
875 state->want_feature_list = talloc_strdup(state->mem_ctx,
876 buf+3);
877 x_fprintf(x_stdout, "OK\n");
878 return;
879 }
880 request = base64_decode_data_blob(buf + 3);
881 } else {
882 request = data_blob_null;
883 }
884
885 if (strncmp(buf, "PW ", 3) == 0) {
886 /* We asked for a password and obviously got it :-) */
887
888 opt_password = SMB_STRNDUP((const char *)request.data,
889 request.length);
890
891 if (opt_password == NULL) {
892 DEBUG(1, ("Out of memory\n"));
893 x_fprintf(x_stdout, "BH Out of memory\n");
894 data_blob_free(&request);
895 return;
896 }
897
898 x_fprintf(x_stdout, "OK\n");
899 data_blob_free(&request);
900 return;
901 }
902
903 if (!state->ntlmssp_state && use_cached_creds) {
904 /* check whether cached credentials are usable. */
905 DATA_BLOB empty_blob = data_blob_null;
906
907 nt_status = do_ccache_ntlm_auth(empty_blob, empty_blob, NULL);
908 if (!NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED)) {
909 /* failed to use cached creds */
910 use_cached_creds = False;
911 }
912 }
913
914 if (opt_password == NULL && !use_cached_creds) {
915 /* Request a password from the calling process. After
916 sending it, the calling process should retry asking for the
917 negotiate. */
918
919 DEBUG(10, ("Requesting password\n"));
920 x_fprintf(x_stdout, "PW\n");
921 return;
922 }
923
924 if (strncmp(buf, "YR", 2) == 0) {
925 if (state->ntlmssp_state)
926 ntlmssp_end(&state->ntlmssp_state);
927 state->cli_state = CLIENT_INITIAL;
928 } else if (strncmp(buf, "TT", 2) == 0) {
929 /* No special preprocessing required */
930 } else if (strncmp(buf, "GF", 2) == 0) {
931 DEBUG(10, ("Requested negotiated NTLMSSP flags\n"));
932
933 if(state->cli_state == CLIENT_FINISHED) {
934 x_fprintf(x_stdout, "GF 0x%08x\n", state->neg_flags);
935 }
936 else {
937 x_fprintf(x_stdout, "BH\n");
938 }
939
940 data_blob_free(&request);
941 return;
942 } else if (strncmp(buf, "GK", 2) == 0 ) {
943 DEBUG(10, ("Requested session key\n"));
944
945 if(state->cli_state == CLIENT_FINISHED) {
946 char *key64 = base64_encode_data_blob(state->mem_ctx,
947 state->session_key);
948 x_fprintf(x_stdout, "GK %s\n", key64?key64:"<NULL>");
949 TALLOC_FREE(key64);
950 }
951 else {
952 x_fprintf(x_stdout, "BH\n");
953 }
954
955 data_blob_free(&request);
956 return;
957 } else {
958 DEBUG(1, ("NTLMSSP query [%s] invalid", buf));
959 x_fprintf(x_stdout, "BH NTLMSSP query invalid\n");
960 return;
961 }
962
963 if (!state->ntlmssp_state) {
964 nt_status = ntlm_auth_start_ntlmssp_client(
965 &state->ntlmssp_state);
966 if (!NT_STATUS_IS_OK(nt_status)) {
967 x_fprintf(x_stdout, "BH %s\n", nt_errstr(nt_status));
968 return;
969 }
970 ntlmssp_want_feature_list(state->ntlmssp_state,
971 state->want_feature_list);
972 state->initial_message = data_blob_null;
973 }
974
975 DEBUG(10, ("got NTLMSSP packet:\n"));
976 dump_data(10, request.data, request.length);
977
978 if (use_cached_creds && !opt_password &&
979 (state->cli_state == CLIENT_RESPONSE)) {
980 nt_status = do_ccache_ntlm_auth(state->initial_message, request,
981 &reply);
982 } else {
983 nt_status = ntlmssp_update(state->ntlmssp_state, request,
984 &reply);
985 }
986
987 if (NT_STATUS_EQUAL(nt_status, NT_STATUS_MORE_PROCESSING_REQUIRED)) {
988 char *reply_base64 = base64_encode_data_blob(state->mem_ctx,
989 reply);
990 if (state->cli_state == CLIENT_INITIAL) {
991 x_fprintf(x_stdout, "YR %s\n", reply_base64);
992 state->initial_message = reply;
993 state->cli_state = CLIENT_RESPONSE;
994 } else {
995 x_fprintf(x_stdout, "KK %s\n", reply_base64);
996 data_blob_free(&reply);
997 }
998 TALLOC_FREE(reply_base64);
999 DEBUG(10, ("NTLMSSP challenge\n"));
1000 } else if (NT_STATUS_IS_OK(nt_status)) {
1001 char *reply_base64 = base64_encode_data_blob(talloc_tos(),
1002 reply);
1003 x_fprintf(x_stdout, "AF %s\n", reply_base64);
1004 TALLOC_FREE(reply_base64);
1005
1006 if(state->have_session_key)
1007 data_blob_free(&state->session_key);
1008
1009 state->session_key = data_blob(
1010 state->ntlmssp_state->session_key.data,
1011 state->ntlmssp_state->session_key.length);
1012 state->neg_flags = state->ntlmssp_state->neg_flags;
1013 state->have_session_key = true;
1014
1015 DEBUG(10, ("NTLMSSP OK!\n"));
1016 state->cli_state = CLIENT_FINISHED;
1017 if (state->ntlmssp_state)
1018 ntlmssp_end(&state->ntlmssp_state);
1019 } else {
1020 x_fprintf(x_stdout, "BH %s\n", nt_errstr(nt_status));
1021 DEBUG(0, ("NTLMSSP BH: %s\n", nt_errstr(nt_status)));
1022 state->cli_state = CLIENT_ERROR;
1023 if (state->ntlmssp_state)
1024 ntlmssp_end(&state->ntlmssp_state);
1025 }
1026
1027 data_blob_free(&request);
1028 }
1029
1030 static void manage_squid_basic_request(struct ntlm_auth_state *state,
1031 char *buf, int length)
1032 {
1033 char *user, *pass;
1034 user=buf;
1035
1036 pass=(char *)memchr(buf,' ',length);
1037 if (!pass) {
1038 DEBUG(2, ("Password not found. Denying access\n"));
1039 x_fprintf(x_stdout, "ERR\n");
1040 return;
1041 }
1042 *pass='\0';
1043 pass++;
1044
1045 if (state->helper_mode == SQUID_2_5_BASIC) {
1046 rfc1738_unescape(user);
1047 rfc1738_unescape(pass);
1048 }
1049
1050 if (check_plaintext_auth(user, pass, False)) {
1051 x_fprintf(x_stdout, "OK\n");
1052 } else {
1053 x_fprintf(x_stdout, "ERR\n");
1054 }
1055 }
1056
1057 static void offer_gss_spnego_mechs(void) {
1058
1059 DATA_BLOB token;
1060 SPNEGO_DATA spnego;
1061 ssize_t len;
1062 char *reply_base64;
1063 TALLOC_CTX *ctx = talloc_tos();
1064 char *principal;
1065 char *myname_lower;
1066
1067 ZERO_STRUCT(spnego);
1068
1069 myname_lower = talloc_strdup(ctx, global_myname());
1070 if (!myname_lower) {
1071 return;
1072 }
1073 strlower_m(myname_lower);
1074
1075 principal = talloc_asprintf(ctx, "%s$@%s", myname_lower, lp_realm());
1076 if (!principal) {
1077 return;
1078 }
1079
1080 /* Server negTokenInit (mech offerings) */
1081 spnego.type = SPNEGO_NEG_TOKEN_INIT;
1082 spnego.negTokenInit.mechTypes = SMB_XMALLOC_ARRAY(const char *, 2);
1083 #ifdef HAVE_KRB5
1084 spnego.negTokenInit.mechTypes[0] = smb_xstrdup(OID_KERBEROS5_OLD);
1085 spnego.negTokenInit.mechTypes[1] = smb_xstrdup(OID_NTLMSSP);
1086 spnego.negTokenInit.mechTypes[2] = NULL;
1087 #else
1088 spnego.negTokenInit.mechTypes[0] = smb_xstrdup(OID_NTLMSSP);
1089 spnego.negTokenInit.mechTypes[1] = NULL;
1090 #endif
1091
1092
1093 spnego.negTokenInit.mechListMIC = data_blob(principal,
1094 strlen(principal));
1095
1096 len = write_spnego_data(&token, &spnego);
1097 free_spnego_data(&spnego);
1098
1099 if (len == -1) {
1100 DEBUG(1, ("Could not write SPNEGO data blob\n"));
1101 x_fprintf(x_stdout, "BH Could not write SPNEGO data blob\n");
1102 return;
1103 }
1104
1105 reply_base64 = base64_encode_data_blob(talloc_tos(), token);
1106 x_fprintf(x_stdout, "TT %s *\n", reply_base64);
1107
1108 TALLOC_FREE(reply_base64);
1109 data_blob_free(&token);
1110 DEBUG(10, ("sent SPNEGO negTokenInit\n"));
1111 return;
1112 }
1113
1114 static void manage_gss_spnego_request(struct ntlm_auth_state *state,
1115 char *buf, int length)
1116 {
1117 static NTLMSSP_STATE *ntlmssp_state = NULL;
1118 SPNEGO_DATA request, response;
1119 DATA_BLOB token;
1120 NTSTATUS status;
1121 ssize_t len;
1122 TALLOC_CTX *ctx = talloc_tos();
1123
1124 char *user = NULL;
1125 char *domain = NULL;
1126
1127 const char *reply_code;
1128 char *reply_base64;
1129 char *reply_argument = NULL;
1130
1131 if (strlen(buf) < 2) {
1132 DEBUG(1, ("SPENGO query [%s] invalid", buf));
1133 x_fprintf(x_stdout, "BH SPENGO query invalid\n");
1134 return;
1135 }
1136
1137 if (strncmp(buf, "YR", 2) == 0) {
1138 if (ntlmssp_state)
1139 ntlmssp_end(&ntlmssp_state);
1140 } else if (strncmp(buf, "KK", 2) == 0) {
1141 ;
1142 } else {
1143 DEBUG(1, ("SPENGO query [%s] invalid", buf));
1144 x_fprintf(x_stdout, "BH SPENGO query invalid\n");
1145 return;
1146 }
1147
1148 if ( (strlen(buf) == 2)) {
1149
1150 /* no client data, get the negTokenInit offering
1151 mechanisms */
1152
1153 offer_gss_spnego_mechs();
1154 return;
1155 }
1156
1157 /* All subsequent requests have a blob. This might be negTokenInit or negTokenTarg */
1158
1159 if (strlen(buf) <= 3) {
1160 DEBUG(1, ("GSS-SPNEGO query [%s] invalid\n", buf));
1161 x_fprintf(x_stdout, "BH GSS-SPNEGO query invalid\n");
1162 return;
1163 }
1164
1165 token = base64_decode_data_blob(buf + 3);
1166 len = read_spnego_data(token, &request);
1167 data_blob_free(&token);
1168
1169 if (len == -1) {
1170 DEBUG(1, ("GSS-SPNEGO query [%s] invalid", buf));
1171 x_fprintf(x_stdout, "BH GSS-SPNEGO query invalid\n");
1172 return;
1173 }
1174
1175 if (request.type == SPNEGO_NEG_TOKEN_INIT) {
1176
1177 /* Second request from Client. This is where the
1178 client offers its mechanism to use. */
1179
1180 if ( (request.negTokenInit.mechTypes == NULL) ||
1181 (request.negTokenInit.mechTypes[0] == NULL) ) {
1182 DEBUG(1, ("Client did not offer any mechanism"));
1183 x_fprintf(x_stdout, "BH Client did not offer any "
1184 "mechanism\n");
1185 return;
1186 }
1187
1188 status = NT_STATUS_UNSUCCESSFUL;
1189 if (strcmp(request.negTokenInit.mechTypes[0], OID_NTLMSSP) == 0) {
1190
1191 if ( request.negTokenInit.mechToken.data == NULL ) {
1192 DEBUG(1, ("Client did not provide NTLMSSP data\n"));
1193 x_fprintf(x_stdout, "BH Client did not provide "
1194 "NTLMSSP data\n");
1195 return;
1196 }
1197
1198 if ( ntlmssp_state != NULL ) {
1199 DEBUG(1, ("Client wants a new NTLMSSP challenge, but "
1200 "already got one\n"));
1201 x_fprintf(x_stdout, "BH Client wants a new "
1202 "NTLMSSP challenge, but "
1203 "already got one\n");
1204 ntlmssp_end(&ntlmssp_state);
1205 return;
1206 }
1207
1208 if (!NT_STATUS_IS_OK(status = ntlm_auth_start_ntlmssp_server(&ntlmssp_state))) {
1209 x_fprintf(x_stdout, "BH %s\n", nt_errstr(status));
1210 return;
1211 }
1212
1213 DEBUG(10, ("got NTLMSSP packet:\n"));
1214 dump_data(10, request.negTokenInit.mechToken.data,
1215 request.negTokenInit.mechToken.length);
1216
1217 response.type = SPNEGO_NEG_TOKEN_TARG;
1218 response.negTokenTarg.supportedMech = SMB_STRDUP(OID_NTLMSSP);
1219 response.negTokenTarg.mechListMIC = data_blob_null;
1220
1221 status = ntlmssp_update(ntlmssp_state,
1222 request.negTokenInit.mechToken,
1223 &response.negTokenTarg.responseToken);
1224 }
1225
1226 #ifdef HAVE_KRB5
1227 if (strcmp(request.negTokenInit.mechTypes[0], OID_KERBEROS5_OLD) == 0) {
1228
1229 TALLOC_CTX *mem_ctx = talloc_init("manage_gss_spnego_request");
1230 char *principal;
1231 DATA_BLOB ap_rep;
1232 DATA_BLOB session_key;
1233 struct PAC_DATA *pac_data = NULL;
1234
1235 if ( request.negTokenInit.mechToken.data == NULL ) {
1236 DEBUG(1, ("Client did not provide Kerberos data\n"));
1237 x_fprintf(x_stdout, "BH Client did not provide "
1238 "Kerberos data\n");
1239 return;
1240 }
1241
1242 response.type = SPNEGO_NEG_TOKEN_TARG;
1243 response.negTokenTarg.supportedMech = SMB_STRDUP(OID_KERBEROS5_OLD);
1244 response.negTokenTarg.mechListMIC = data_blob_null;
1245 response.negTokenTarg.responseToken = data_blob_null;
1246
1247 status = ads_verify_ticket(mem_ctx, lp_realm(), 0,
1248 &request.negTokenInit.mechToken,
1249 &principal, &pac_data, &ap_rep,
1250 &session_key, True);
1251
1252 talloc_destroy(mem_ctx);
1253
1254 /* Now in "principal" we have the name we are
1255 authenticated as. */
1256
1257 if (NT_STATUS_IS_OK(status)) {
1258
1259 domain = strchr_m(principal, '@');
1260
1261 if (domain == NULL) {
1262 DEBUG(1, ("Did not get a valid principal "
1263 "from ads_verify_ticket\n"));
1264 x_fprintf(x_stdout, "BH Did not get a "
1265 "valid principal from "
1266 "ads_verify_ticket\n");
1267 return;
1268 }
1269
1270 *domain++ = '\0';
1271 domain = SMB_STRDUP(domain);
1272 user = SMB_STRDUP(principal);
1273
1274 data_blob_free(&ap_rep);
1275
1276 SAFE_FREE(principal);
1277 }
1278 }
1279 #endif
1280
1281 } else {
1282
1283 if ( (request.negTokenTarg.supportedMech == NULL) ||
1284 ( strcmp(request.negTokenTarg.supportedMech, OID_NTLMSSP) != 0 ) ) {
1285 /* Kerberos should never send a negTokenTarg, OID_NTLMSSP
1286 is the only one we support that sends this stuff */
1287 DEBUG(1, ("Got a negTokenTarg for something non-NTLMSSP: %s\n",
1288 request.negTokenTarg.supportedMech));
1289 x_fprintf(x_stdout, "BH Got a negTokenTarg for "
1290 "something non-NTLMSSP\n");
1291 return;
1292 }
1293
1294 if (request.negTokenTarg.responseToken.data == NULL) {
1295 DEBUG(1, ("Got a negTokenTarg without a responseToken!\n"));
1296 x_fprintf(x_stdout, "BH Got a negTokenTarg without a "
1297 "responseToken!\n");
1298 return;
1299 }
1300
1301 status = ntlmssp_update(ntlmssp_state,
1302 request.negTokenTarg.responseToken,
1303 &response.negTokenTarg.responseToken);
1304
1305 response.type = SPNEGO_NEG_TOKEN_TARG;
1306 response.negTokenTarg.supportedMech = SMB_STRDUP(OID_NTLMSSP);
1307 response.negTokenTarg.mechListMIC = data_blob_null;
1308
1309 if (NT_STATUS_IS_OK(status)) {
1310 user = SMB_STRDUP(ntlmssp_state->user);
1311 domain = SMB_STRDUP(ntlmssp_state->domain);
1312 ntlmssp_end(&ntlmssp_state);
1313 }
1314 }
1315
1316 free_spnego_data(&request);
1317
1318 if (NT_STATUS_IS_OK(status)) {
1319 response.negTokenTarg.negResult = SPNEGO_ACCEPT_COMPLETED;
1320 reply_code = "AF";
1321 reply_argument = talloc_asprintf(ctx, "%s\\%s", domain, user);
1322 } else if (NT_STATUS_EQUAL(status,
1323 NT_STATUS_MORE_PROCESSING_REQUIRED)) {
1324 response.negTokenTarg.negResult = SPNEGO_ACCEPT_INCOMPLETE;
1325 reply_code = "TT";
1326 reply_argument = talloc_strdup(ctx, "*");
1327 } else {
1328 response.negTokenTarg.negResult = SPNEGO_REJECT;
1329 reply_code = "NA";
1330 reply_argument = talloc_strdup(ctx, nt_errstr(status));
1331 }
1332
1333 if (!reply_argument) {
1334 DEBUG(1, ("Could not write SPNEGO data blob\n"));
1335 x_fprintf(x_stdout, "BH Could not write SPNEGO data blob\n");
1336 return;
1337 }
1338
1339 SAFE_FREE(user);
1340 SAFE_FREE(domain);
1341
1342 len = write_spnego_data(&token, &response);
1343 free_spnego_data(&response);
1344
1345 if (len == -1) {
1346 DEBUG(1, ("Could not write SPNEGO data blob\n"));
1347 x_fprintf(x_stdout, "BH Could not write SPNEGO data blob\n");
1348 return;
1349 }
1350
1351 reply_base64 = base64_encode_data_blob(talloc_tos(), token);
1352
1353 x_fprintf(x_stdout, "%s %s %s\n",
1354 reply_code, reply_base64, reply_argument);
1355
1356 TALLOC_FREE(reply_base64);
1357 data_blob_free(&token);
1358
1359 return;
1360 }
1361
1362 static NTLMSSP_STATE *client_ntlmssp_state = NULL;
1363
1364 static bool manage_client_ntlmssp_init(SPNEGO_DATA spnego)
1365 {
1366 NTSTATUS status;
1367 DATA_BLOB null_blob = data_blob_null;
1368 DATA_BLOB to_server;
1369 char *to_server_base64;
1370 const char *my_mechs[] = {OID_NTLMSSP, NULL};
1371
1372 DEBUG(10, ("Got spnego negTokenInit with NTLMSSP\n"));
1373
1374 if (client_ntlmssp_state != NULL) {
1375 DEBUG(1, ("Request for initial SPNEGO request where "
1376 "we already have a state\n"));
1377 return False;
1378 }
1379
1380 if (!client_ntlmssp_state) {
1381 if (!NT_STATUS_IS_OK(status = ntlm_auth_start_ntlmssp_client(&client_ntlmssp_state))) {
1382 x_fprintf(x_stdout, "BH %s\n", nt_errstr(status));
1383 return False;
1384 }
1385 }
1386
1387
1388 if (opt_password == NULL) {
1389
1390 /* Request a password from the calling process. After
1391 sending it, the calling process should retry with
1392 the negTokenInit. */
1393
1394 DEBUG(10, ("Requesting password\n"));
1395 x_fprintf(x_stdout, "PW\n");
1396 return True;
1397 }
1398
1399 spnego.type = SPNEGO_NEG_TOKEN_INIT;
1400 spnego.negTokenInit.mechTypes = my_mechs;
1401 spnego.negTokenInit.reqFlags = 0;
1402 spnego.negTokenInit.mechListMIC = null_blob;
1403
1404 status = ntlmssp_update(client_ntlmssp_state, null_blob,
1405 &spnego.negTokenInit.mechToken);
1406
1407 if ( !(NT_STATUS_EQUAL(status, NT_STATUS_MORE_PROCESSING_REQUIRED) ||
1408 NT_STATUS_IS_OK(status)) ) {
1409 DEBUG(1, ("Expected OK or MORE_PROCESSING_REQUIRED, got: %s\n",
1410 nt_errstr(status)));
1411 ntlmssp_end(&client_ntlmssp_state);
1412 return False;
1413 }
1414
1415 write_spnego_data(&to_server, &spnego);
1416 data_blob_free(&spnego.negTokenInit.mechToken);
1417
1418 to_server_base64 = base64_encode_data_blob(talloc_tos(), to_server);
1419 data_blob_free(&to_server);
1420 x_fprintf(x_stdout, "KK %s\n", to_server_base64);
1421 TALLOC_FREE(to_server_base64);
1422 return True;
1423 }
1424
1425 static void manage_client_ntlmssp_targ(SPNEGO_DATA spnego)
1426 {
1427 NTSTATUS status;
1428 DATA_BLOB null_blob = data_blob_null;
1429 DATA_BLOB request;
1430 DATA_BLOB to_server;
1431 char *to_server_base64;
1432
1433 DEBUG(10, ("Got spnego negTokenTarg with NTLMSSP\n"));
1434
1435 if (client_ntlmssp_state == NULL) {
1436 DEBUG(1, ("Got NTLMSSP tArg without a client state\n"));
1437 x_fprintf(x_stdout, "BH Got NTLMSSP tArg without a client state\n");
1438 return;
1439 }
1440
1441 if (spnego.negTokenTarg.negResult == SPNEGO_REJECT) {
1442 x_fprintf(x_stdout, "NA\n");
1443 ntlmssp_end(&client_ntlmssp_state);
1444 return;
1445 }
1446
1447 if (spnego.negTokenTarg.negResult == SPNEGO_ACCEPT_COMPLETED) {
1448 x_fprintf(x_stdout, "AF\n");
1449 ntlmssp_end(&client_ntlmssp_state);
1450 return;
1451 }
1452
1453 status = ntlmssp_update(client_ntlmssp_state,
1454 spnego.negTokenTarg.responseToken,
1455 &request);
1456
1457 if (!NT_STATUS_EQUAL(status, NT_STATUS_MORE_PROCESSING_REQUIRED)) {
1458 DEBUG(1, ("Expected MORE_PROCESSING_REQUIRED from "
1459 "ntlmssp_client_update, got: %s\n",
1460 nt_errstr(status)));
1461 x_fprintf(x_stdout, "BH Expected MORE_PROCESSING_REQUIRED from "
1462 "ntlmssp_client_update\n");
1463 data_blob_free(&request);
1464 ntlmssp_end(&client_ntlmssp_state);
1465 return;
1466 }
1467
1468 spnego.type = SPNEGO_NEG_TOKEN_TARG;
1469 spnego.negTokenTarg.negResult = SPNEGO_ACCEPT_INCOMPLETE;
1470 spnego.negTokenTarg.supportedMech = (char *)OID_NTLMSSP;
1471 spnego.negTokenTarg.responseToken = request;
1472 spnego.negTokenTarg.mechListMIC = null_blob;
1473
1474 write_spnego_data(&to_server, &spnego);
1475 data_blob_free(&request);
1476
1477 to_server_base64 = base64_encode_data_blob(talloc_tos(), to_server);
1478 data_blob_free(&to_server);
1479 x_fprintf(x_stdout, "KK %s\n", to_server_base64);
1480 TALLOC_FREE(to_server_base64);
1481 return;
1482 }
1483
1484 #ifdef HAVE_KRB5
1485
1486 static bool manage_client_krb5_init(SPNEGO_DATA spnego)
1487 {
1488 char *principal;
1489 DATA_BLOB tkt, to_server;
1490 DATA_BLOB session_key_krb5 = data_blob_null;
1491 SPNEGO_DATA reply;
1492 char *reply_base64;
1493 int retval;
1494
1495 const char *my_mechs[] = {OID_KERBEROS5_OLD, NULL};
1496 ssize_t len;
1497
1498 if ( (spnego.negTokenInit.mechListMIC.data == NULL) ||
1499 (spnego.negTokenInit.mechListMIC.length == 0) ) {
1500 DEBUG(1, ("Did not get a principal for krb5\n"));
1501 return False;
1502 }
1503
1504 principal = (char *)SMB_MALLOC(
1505 spnego.negTokenInit.mechListMIC.length+1);
1506
1507 if (principal == NULL) {
1508 DEBUG(1, ("Could not malloc principal\n"));
1509 return False;
1510 }
1511
1512 memcpy(principal, spnego.negTokenInit.mechListMIC.data,
1513 spnego.negTokenInit.mechListMIC.length);
1514 principal[spnego.negTokenInit.mechListMIC.length] = '\0';
1515
1516 retval = cli_krb5_get_ticket(principal, 0, &tkt, &session_key_krb5, 0, NULL, NULL);
1517
1518 if (retval) {
1519 char *user = NULL;
1520
1521 /* Let's try to first get the TGT, for that we need a
1522 password. */
1523
1524 if (opt_password == NULL) {
1525 DEBUG(10, ("Requesting password\n"));
1526 x_fprintf(x_stdout, "PW\n");
1527 return True;
1528 }
1529
1530 user = talloc_asprintf(talloc_tos(), "%s@%s", opt_username, opt_domain);
1531 if (!user) {
1532 return false;
1533 }
1534
1535 if ((retval = kerberos_kinit_password(user, opt_password, 0, NULL))) {
1536 DEBUG(10, ("Requesting TGT failed: %s\n", error_message(retval)));
1537 return False;
1538 }
1539
1540 retval = cli_krb5_get_ticket(principal, 0, &tkt, &session_key_krb5, 0, NULL, NULL);
1541
1542 if (retval) {
1543 DEBUG(10, ("Kinit suceeded, but getting a ticket failed: %s\n", error_message(retval)));
1544 return False;
1545 }
1546 }
1547
1548 data_blob_free(&session_key_krb5);
1549
1550 ZERO_STRUCT(reply);
1551
1552 reply.type = SPNEGO_NEG_TOKEN_INIT;
1553 reply.negTokenInit.mechTypes = my_mechs;
1554 reply.negTokenInit.reqFlags = 0;
1555 reply.negTokenInit.mechToken = tkt;
1556 reply.negTokenInit.mechListMIC = data_blob_null;
1557
1558 len = write_spnego_data(&to_server, &reply);
1559 data_blob_free(&tkt);
1560
1561 if (len == -1) {
1562 DEBUG(1, ("Could not write SPNEGO data blob\n"));
1563 return False;
1564 }
1565
1566 reply_base64 = base64_encode_data_blob(talloc_tos(), to_server);
1567 x_fprintf(x_stdout, "KK %s *\n", reply_base64);
1568
1569 TALLOC_FREE(reply_base64);
1570 data_blob_free(&to_server);
1571 DEBUG(10, ("sent GSS-SPNEGO KERBEROS5 negTokenInit\n"));
1572 return True;
1573 }
1574
1575 static void manage_client_krb5_targ(SPNEGO_DATA spnego)
1576 {
1577 switch (spnego.negTokenTarg.negResult) {
1578 case SPNEGO_ACCEPT_INCOMPLETE:
1579 DEBUG(1, ("Got a Kerberos negTokenTarg with ACCEPT_INCOMPLETE\n"));
1580 x_fprintf(x_stdout, "BH Got a Kerberos negTokenTarg with "
1581 "ACCEPT_INCOMPLETE\n");
1582 break;
1583 case SPNEGO_ACCEPT_COMPLETED:
1584 DEBUG(10, ("Accept completed\n"));
1585 x_fprintf(x_stdout, "AF\n");
1586 break;
1587 case SPNEGO_REJECT:
1588 DEBUG(10, ("Rejected\n"));
1589 x_fprintf(x_stdout, "NA\n");
1590 break;
1591 default:
1592 DEBUG(1, ("Got an invalid negTokenTarg\n"));
1593 x_fprintf(x_stdout, "AF\n");
1594 }
1595 }
1596
1597 #endif
1598
1599 static void manage_gss_spnego_client_request(struct ntlm_auth_state *state,
1600 char *buf, int length)
1601 {
1602 DATA_BLOB request;
1603 SPNEGO_DATA spnego;
1604 ssize_t len;
1605
1606 if (!opt_username || !*opt_username) {
1607 x_fprintf(x_stderr, "username must be specified!\n\n");
1608 exit(1);
1609 }
1610
1611 if (strlen(buf) <= 3) {
1612 DEBUG(1, ("SPNEGO query [%s] too short\n", buf));
1613 x_fprintf(x_stdout, "BH SPNEGO query too short\n");
1614 return;
1615 }
1616
1617 request = base64_decode_data_blob(buf+3);
1618
1619 if (strncmp(buf, "PW ", 3) == 0) {
1620
1621 /* We asked for a password and obviously got it :-) */
1622
1623 opt_password = SMB_STRNDUP((const char *)request.data, request.length);
1624
1625 if (opt_password == NULL) {
1626 DEBUG(1, ("Out of memory\n"));
1627 x_fprintf(x_stdout, "BH Out of memory\n");
1628 data_blob_free(&request);
1629 return;
1630 }
1631
1632 x_fprintf(x_stdout, "OK\n");
1633 data_blob_free(&request);
1634 return;
1635 }
1636
1637 if ( (strncmp(buf, "TT ", 3) != 0) &&
1638 (strncmp(buf, "AF ", 3) != 0) &&
1639 (strncmp(buf, "NA ", 3) != 0) ) {
1640 DEBUG(1, ("SPNEGO request [%s] invalid\n", buf));
1641 x_fprintf(x_stdout, "BH SPNEGO request invalid\n");
1642 data_blob_free(&request);
1643 return;
1644 }
1645
1646 /* So we got a server challenge to generate a SPNEGO
1647 client-to-server request... */
1648
1649 len = read_spnego_data(request, &spnego);
1650 data_blob_free(&request);
1651
1652 if (len == -1) {
1653 DEBUG(1, ("Could not read SPNEGO data for [%s]\n", buf));
1654 x_fprintf(x_stdout, "BH Could not read SPNEGO data\n");
1655 return;
1656 }
1657
1658 if (spnego.type == SPNEGO_NEG_TOKEN_INIT) {
1659
1660 /* The server offers a list of mechanisms */
1661
1662 const char **mechType = (const char **)spnego.negTokenInit.mechTypes;
1663
1664 while (*mechType != NULL) {
1665
1666 #ifdef HAVE_KRB5
1667 if ( (strcmp(*mechType, OID_KERBEROS5_OLD) == 0) ||
1668 (strcmp(*mechType, OID_KERBEROS5) == 0) ) {
1669 if (manage_client_krb5_init(spnego))
1670 goto out;
1671 }
1672 #endif
1673
1674 if (strcmp(*mechType, OID_NTLMSSP) == 0) {
1675 if (manage_client_ntlmssp_init(spnego))
1676 goto out;
1677 }
1678
1679 mechType++;
1680 }
1681
1682 DEBUG(1, ("Server offered no compatible mechanism\n"));
1683 x_fprintf(x_stdout, "BH Server offered no compatible mechanism\n");
1684 return;
1685 }
1686
1687 if (spnego.type == SPNEGO_NEG_TOKEN_TARG) {
1688
1689 if (spnego.negTokenTarg.supportedMech == NULL) {
1690 /* On accept/reject Windows does not send the
1691 mechanism anymore. Handle that here and
1692 shut down the mechanisms. */
1693
1694 switch (spnego.negTokenTarg.negResult) {
1695 case SPNEGO_ACCEPT_COMPLETED:
1696 x_fprintf(x_stdout, "AF\n");
1697 break;
1698 case SPNEGO_REJECT:
1699 x_fprintf(x_stdout, "NA\n");
1700 break;
1701 default:
1702 DEBUG(1, ("Got a negTokenTarg with no mech and an "
1703 "unknown negResult: %d\n",
1704 spnego.negTokenTarg.negResult));
1705 x_fprintf(x_stdout, "BH Got a negTokenTarg with"
1706 " no mech and an unknown "
1707 "negResult\n");
1708 }
1709
1710 ntlmssp_end(&client_ntlmssp_state);
1711 goto out;
1712 }
1713
1714 if (strcmp(spnego.negTokenTarg.supportedMech,
1715 OID_NTLMSSP) == 0) {
1716 manage_client_ntlmssp_targ(spnego);
1717 goto out;
1718 }
1719
1720 #if HAVE_KRB5
1721 if (strcmp(spnego.negTokenTarg.supportedMech,
1722 OID_KERBEROS5_OLD) == 0) {
1723 manage_client_krb5_targ(spnego);
1724 goto out;
1725 }
1726 #endif
1727
1728 }
1729
1730 DEBUG(1, ("Got an SPNEGO token I could not handle [%s]!\n", buf));
1731 x_fprintf(x_stdout, "BH Got an SPNEGO token I could not handle\n");
1732 return;
1733
1734 out:
1735 free_spnego_data(&spnego);
1736 return;
1737 }
1738
1739 static void manage_ntlm_server_1_request(struct ntlm_auth_state *state,
1740 char *buf, int length)
1741 {
1742 char *request, *parameter;
1743 static DATA_BLOB challenge;
1744 static DATA_BLOB lm_response;
1745 static DATA_BLOB nt_response;
1746 static char *full_username;
1747 static char *username;
1748 static char *domain;
1749 static char *plaintext_password;
1750 static bool ntlm_server_1_user_session_key;
1751 static bool ntlm_server_1_lm_session_key;
1752
1753 if (strequal(buf, ".")) {
1754 if (!full_username && !username) {
1755 x_fprintf(x_stdout, "Error: No username supplied!\n");
1756 } else if (plaintext_password) {
1757 /* handle this request as plaintext */
1758 if (!full_username) {
1759 if (asprintf(&full_username, "%s%c%s", domain, winbind_separator(), username) == -1) {
1760 x_fprintf(x_stdout, "Error: Out of memory in asprintf!\n.\n");
1761 return;
1762 }
1763 }
1764 if (check_plaintext_auth(full_username, plaintext_password, False)) {
1765 x_fprintf(x_stdout, "Authenticated: Yes\n");
1766 } else {
1767 x_fprintf(x_stdout, "Authenticated: No\n");
1768 }
1769 } else if (!lm_response.data && !nt_response.data) {
1770 x_fprintf(x_stdout, "Error: No password supplied!\n");
1771 } else if (!challenge.data) {
1772 x_fprintf(x_stdout, "Error: No lanman-challenge supplied!\n");
1773 } else {
1774 char *error_string = NULL;
1775 uchar lm_key[8];
1776 uchar user_session_key[16];
1777 uint32 flags = 0;
1778
1779 if (full_username && !username) {
1780 fstring fstr_user;
1781 fstring fstr_domain;
1782
1783 if (!parse_ntlm_auth_domain_user(full_username, fstr_user, fstr_domain)) {
1784 /* username might be 'tainted', don't print into our new-line deleimianted stream */
1785 x_fprintf(x_stdout, "Error: Could not parse into domain and username\n");
1786 }
1787 SAFE_FREE(username);
1788 SAFE_FREE(domain);
1789 username = smb_xstrdup(fstr_user);
1790 domain = smb_xstrdup(fstr_domain);
1791 }
1792
1793 if (!domain) {
1794 domain = smb_xstrdup(get_winbind_domain());
1795 }
1796
1797 if (ntlm_server_1_lm_session_key)
1798 flags |= WBFLAG_PAM_LMKEY;
1799
1800 if (ntlm_server_1_user_session_key)
1801 flags |= WBFLAG_PAM_USER_SESSION_KEY;
1802
1803 if (!NT_STATUS_IS_OK(
1804 contact_winbind_auth_crap(username,
1805 domain,
1806 global_myname(),
1807 &challenge,
1808 &lm_response,
1809 &nt_response,
1810 flags,
1811 lm_key,
1812 user_session_key,
1813 &error_string,
1814 NULL))) {
1815
1816 x_fprintf(x_stdout, "Authenticated: No\n");
1817 x_fprintf(x_stdout, "Authentication-Error: %s\n.\n", error_string);
1818 SAFE_FREE(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_talloc(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_talloc(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 }
1847 /* clear out the state */
1848 challenge = data_blob_null;
1849 nt_response = data_blob_null;
1850 lm_response = data_blob_null;
1851 SAFE_FREE(full_username);
1852 SAFE_FREE(username);
1853 SAFE_FREE(domain);
1854 SAFE_FREE(plaintext_password);
1855 ntlm_server_1_user_session_key = False;
1856 ntlm_server_1_lm_session_key = False;
1857 x_fprintf(x_stdout, ".\n");
1858
1859 return;
1860 }
1861
1862 request = buf;
1863
1864 /* Indicates a base64 encoded structure */
1865 parameter = strstr_m(request, ":: ");
1866 if (!parameter) {
1867 parameter = strstr_m(request, ": ");
1868
1869 if (!parameter) {
1870 DEBUG(0, ("Parameter not found!\n"));
1871 x_fprintf(x_stdout, "Error: Parameter not found!\n.\n");
1872 return;
1873 }
1874
1875 parameter[0] ='\0';
1876 parameter++;
1877 parameter[0] ='\0';
1878 parameter++;
1879
1880 } else {
1881 parameter[0] ='\0';
1882 parameter++;
1883 parameter[0] ='\0';
1884 parameter++;
1885 parameter[0] ='\0';
1886 parameter++;
1887
1888 base64_decode_inplace(parameter);
1889 }
1890
1891 if (strequal(request, "LANMAN-Challenge")) {
1892 challenge = strhex_to_data_blob(NULL, parameter);
1893 if (challenge.length != 8) {
1894 x_fprintf(x_stdout, "Error: hex decode of %s failed! (got %d bytes, expected 8)\n.\n",
1895 parameter,
1896 (int)challenge.length);
1897 challenge = data_blob_null;
1898 }
1899 } else if (strequal(request, "NT-Response")) {
1900 nt_response = strhex_to_data_blob(NULL, parameter);
1901 if (nt_response.length < 24) {
1902 x_fprintf(x_stdout, "Error: hex decode of %s failed! (only got %d bytes, needed at least 24)\n.\n",
1903 parameter,
1904 (int)nt_response.length);
1905 nt_response = data_blob_null;
1906 }
1907 } else if (strequal(request, "LANMAN-Response")) {
1908 lm_response = strhex_to_data_blob(NULL, parameter);
1909 if (lm_response.length != 24) {
1910 x_fprintf(x_stdout, "Error: hex decode of %s failed! (got %d bytes, expected 24)\n.\n",
1911 parameter,
1912 (int)lm_response.length);
1913 lm_response = data_blob_null;
1914 }
1915 } else if (strequal(request, "Password")) {
1916 plaintext_password = smb_xstrdup(parameter);
1917 } else if (strequal(request, "NT-Domain")) {
1918 domain = smb_xstrdup(parameter);
1919 } else if (strequal(request, "Username")) {
1920 username = smb_xstrdup(parameter);
1921 } else if (strequal(request, "Full-Username")) {
1922 full_username = smb_xstrdup(parameter);
1923 } else if (strequal(request, "Request-User-Session-Key")) {
1924 ntlm_server_1_user_session_key = strequal(parameter, "Yes");
1925 } else if (strequal(request, "Request-LanMan-Session-Key")) {
1926 ntlm_server_1_lm_session_key = strequal(parameter, "Yes");
1927 } else {
1928 x_fprintf(x_stdout, "Error: Unknown request %s\n.\n", request);
1929 }
1930 }
1931
1932 static void manage_ntlm_change_password_1_request(struct ntlm_auth_state *state,
1933 char *buf, int length)
1934 {
1935 char *request, *parameter;
1936 static DATA_BLOB new_nt_pswd;
1937 static DATA_BLOB old_nt_hash_enc;
1938 static DATA_BLOB new_lm_pswd;
1939 static DATA_BLOB old_lm_hash_enc;
1940 static char *full_username = NULL;
1941 static char *username = NULL;
1942 static char *domain = NULL;
1943 static char *newpswd = NULL;
1944 static char *oldpswd = NULL;
1945
1946 if (strequal(buf, ".")) {
1947 if(newpswd && oldpswd) {
1948 uchar old_nt_hash[16];
1949 uchar old_lm_hash[16];
1950 uchar new_nt_hash[16];
1951 uchar new_lm_hash[16];
1952
1953 new_nt_pswd = data_blob(NULL, 516);
1954 old_nt_hash_enc = data_blob(NULL, 16);
1955
1956 /* Calculate the MD4 hash (NT compatible) of the
1957 * password */
1958 E_md4hash(oldpswd, old_nt_hash);
1959 E_md4hash(newpswd, new_nt_hash);
1960
1961 /* E_deshash returns false for 'long'
1962 passwords (> 14 DOS chars).
1963
1964 Therefore, don't send a buffer
1965 encrypted with the truncated hash
1966 (it could allow an even easier
1967 attack on the password)
1968
1969 Likewise, obey the admin's restriction
1970 */
1971
1972 if (lp_client_lanman_auth() &&
1973 E_deshash(newpswd, new_lm_hash) &&
1974 E_deshash(oldpswd, old_lm_hash)) {
1975 new_lm_pswd = data_blob(NULL, 516);
1976 old_lm_hash_enc = data_blob(NULL, 16);
1977 encode_pw_buffer(new_lm_pswd.data, newpswd,
1978 STR_UNICODE);
1979
1980 SamOEMhash(new_lm_pswd.data, old_nt_hash, 516);
1981 E_old_pw_hash(new_nt_hash, old_lm_hash,
1982 old_lm_hash_enc.data);
1983 } else {
1984 new_lm_pswd.data = NULL;
1985 new_lm_pswd.length = 0;
1986 old_lm_hash_enc.data = NULL;
1987 old_lm_hash_enc.length = 0;
1988 }
1989
1990 encode_pw_buffer(new_nt_pswd.data, newpswd,
1991 STR_UNICODE);
1992
1993 SamOEMhash(new_nt_pswd.data, old_nt_hash, 516);
1994 E_old_pw_hash(new_nt_hash, old_nt_hash,
1995 old_nt_hash_enc.data);
1996 }
1997
1998 if (!full_username && !username) {
1999 x_fprintf(x_stdout, "Error: No username supplied!\n");
2000 } else if ((!new_nt_pswd.data || !old_nt_hash_enc.data) &&
2001 (!new_lm_pswd.data || old_lm_hash_enc.data) ) {
2002 x_fprintf(x_stdout, "Error: No NT or LM password "
2003 "blobs supplied!\n");
2004 } else {
2005 char *error_string = NULL;
2006
2007 if (full_username && !username) {
2008 fstring fstr_user;
2009 fstring fstr_domain;
2010
2011 if (!parse_ntlm_auth_domain_user(full_username,
2012 fstr_user,
2013 fstr_domain)) {
2014 /* username might be 'tainted', don't
2015 * print into our new-line
2016 * deleimianted stream */
2017 x_fprintf(x_stdout, "Error: Could not "
2018 "parse into domain and "
2019 "username\n");
2020 SAFE_FREE(username);
2021 username = smb_xstrdup(full_username);
2022 } else {
2023 SAFE_FREE(username);
2024 SAFE_FREE(domain);
2025 username = smb_xstrdup(fstr_user);
2026 domain = smb_xstrdup(fstr_domain);
2027 }
2028
2029 }
2030
2031 if(!NT_STATUS_IS_OK(contact_winbind_change_pswd_auth_crap(
2032 username, domain,
2033 new_nt_pswd,
2034 old_nt_hash_enc,
2035 new_lm_pswd,
2036 old_lm_hash_enc,
2037 &error_string))) {
2038 x_fprintf(x_stdout, "Password-Change: No\n");
2039 x_fprintf(x_stdout, "Password-Change-Error: "
2040 "%s\n.\n", error_string);
2041 } else {
2042 x_fprintf(x_stdout, "Password-Change: Yes\n");
2043 }
2044
2045 SAFE_FREE(error_string);
2046 }
2047 /* clear out the state */
2048 new_nt_pswd = data_blob_null;
2049 old_nt_hash_enc = data_blob_null;
2050 new_lm_pswd = data_blob_null;
2051 old_nt_hash_enc = data_blob_null;
2052 SAFE_FREE(full_username);
2053 SAFE_FREE(username);
2054 SAFE_FREE(domain);
2055 SAFE_FREE(newpswd);
2056 SAFE_FREE(oldpswd);
2057 x_fprintf(x_stdout, ".\n");
2058
2059 return;
2060 }
2061
2062 request = buf;
2063
2064 /* Indicates a base64 encoded structure */
2065 parameter = strstr_m(request, ":: ");
2066 if (!parameter) {
2067 parameter = strstr_m(request, ": ");
2068
2069 if (!parameter) {
2070 DEBUG(0, ("Parameter not found!\n"));
2071 x_fprintf(x_stdout, "Error: Parameter not found!\n.\n");
2072 return;
2073 }
2074
2075 parameter[0] ='\0';
2076 parameter++;
2077 parameter[0] ='\0';
2078 parameter++;
2079 } else {
2080 parameter[0] ='\0';
2081 parameter++;
2082 parameter[0] ='\0';
2083 parameter++;
2084 parameter[0] ='\0';
2085 parameter++;
2086
2087 base64_decode_inplace(parameter);
2088 }
2089
2090 if (strequal(request, "new-nt-password-blob")) {
2091 new_nt_pswd = strhex_to_data_blob(NULL, parameter);
2092 if (new_nt_pswd.length != 516) {
2093 x_fprintf(x_stdout, "Error: hex decode of %s failed! "
2094 "(got %d bytes, expected 516)\n.\n",
2095 parameter,
2096 (int)new_nt_pswd.length);
2097 new_nt_pswd = data_blob_null;
2098 }
2099 } else if (strequal(request, "old-nt-hash-blob")) {
2100 old_nt_hash_enc = strhex_to_data_blob(NULL, parameter);
2101 if (old_nt_hash_enc.length != 16) {
2102 x_fprintf(x_stdout, "Error: hex decode of %s failed! "
2103 "(got %d bytes, expected 16)\n.\n",
2104 parameter,
2105 (int)old_nt_hash_enc.length);
2106 old_nt_hash_enc = data_blob_null;
2107 }
2108 } else if (strequal(request, "new-lm-password-blob")) {
2109 new_lm_pswd = strhex_to_data_blob(NULL, parameter);
2110 if (new_lm_pswd.length != 516) {
2111 x_fprintf(x_stdout, "Error: hex decode of %s failed! "
2112 "(got %d bytes, expected 516)\n.\n",
2113 parameter,
2114 (int)new_lm_pswd.length);
2115 new_lm_pswd = data_blob_null;
2116 }
2117 }
2118 else if (strequal(request, "old-lm-hash-blob")) {
2119 old_lm_hash_enc = strhex_to_data_blob(NULL, parameter);
2120 if (old_lm_hash_enc.length != 16)
2121 {
2122 x_fprintf(x_stdout, "Error: hex decode of %s failed! "
2123 "(got %d bytes, expected 16)\n.\n",
2124 parameter,
2125 (int)old_lm_hash_enc.length);
2126 old_lm_hash_enc = data_blob_null;
2127 }
2128 } else if (strequal(request, "nt-domain")) {
2129 domain = smb_xstrdup(parameter);
2130 } else if(strequal(request, "username")) {
2131 username = smb_xstrdup(parameter);
2132 } else if(strequal(request, "full-username")) {
2133 username = smb_xstrdup(parameter);
2134 } else if(strequal(request, "new-password")) {
2135 newpswd = smb_xstrdup(parameter);
2136 } else if (strequal(request, "old-password")) {
2137 oldpswd = smb_xstrdup(parameter);
2138 } else {
2139 x_fprintf(x_stdout, "Error: Unknown request %s\n.\n", request);
2140 }
2141 }
2142
2143 static void manage_squid_request(struct ntlm_auth_state *state,
2144 stdio_helper_function fn)
2145 {
2146 char *buf;
2147 char tmp[INITIAL_BUFFER_SIZE+1];
2148 int length, buf_size = 0;
2149 char *c;
2150
2151 buf = talloc_strdup(state->mem_ctx, "");
2152 if (!buf) {
2153 DEBUG(0, ("Failed to allocate input buffer.\n"));
2154 x_fprintf(x_stderr, "ERR\n");
2155 exit(1);
2156 }
2157
2158 do {
2159
2160 /* this is not a typo - x_fgets doesn't work too well under
2161 * squid */
2162 if (fgets(tmp, sizeof(tmp)-1, stdin) == NULL) {
2163 if (ferror(stdin)) {
2164 DEBUG(1, ("fgets() failed! dying..... errno=%d "
2165 "(%s)\n", ferror(stdin),
2166 strerror(ferror(stdin))));
2167
2168 exit(1);
2169 }
2170 exit(0);
2171 }
2172
2173 buf = talloc_strdup_append_buffer(buf, tmp);
2174 buf_size += INITIAL_BUFFER_SIZE;
2175
2176 if (buf_size > MAX_BUFFER_SIZE) {
2177 DEBUG(2, ("Oversized message\n"));
2178 x_fprintf(x_stderr, "ERR\n");
2179 talloc_free(buf);
2180 return;
2181 }
2182
2183 c = strchr(buf, '\n');
2184 } while (c == NULL);
2185
2186 *c = '\0';
2187 length = c-buf;
2188
2189 DEBUG(10, ("Got '%s' from squid (length: %d).\n",buf,length));
2190
2191 if (buf[0] == '\0') {
2192 DEBUG(2, ("Invalid Request\n"));
2193 x_fprintf(x_stderr, "ERR\n");
2194 talloc_free(buf);
2195 return;
2196 }
2197
2198 fn(state, buf, length);
2199 talloc_free(buf);
2200 }
2201
2202
2203 static void squid_stream(enum stdio_helper_mode stdio_mode, stdio_helper_function fn) {
2204 TALLOC_CTX *mem_ctx;
2205 struct ntlm_auth_state *state;
2206
2207 /* initialize FDescs */
2208 x_setbuf(x_stdout, NULL);
2209 x_setbuf(x_stderr, NULL);
2210
2211 mem_ctx = talloc_init("ntlm_auth");
2212 if (!mem_ctx) {
2213 DEBUG(0, ("squid_stream: Failed to create talloc context\n"));
2214 x_fprintf(x_stderr, "ERR\n");
2215 exit(1);
2216 }
2217
2218 state = talloc_zero(mem_ctx, struct ntlm_auth_state);
2219 if (!state) {
2220 DEBUG(0, ("squid_stream: Failed to talloc ntlm_auth_state\n"));
2221 x_fprintf(x_stderr, "ERR\n");
2222 exit(1);
2223 }
2224
2225 state->mem_ctx = mem_ctx;
2226 state->helper_mode = stdio_mode;
2227
2228 while(1) {
2229 manage_squid_request(state, fn);
2230 }
2231 }
2232
2233
2234 /* Authenticate a user with a challenge/response */
2235
2236 static bool check_auth_crap(void)
2237 {
2238 NTSTATUS nt_status;
2239 uint32 flags = 0;
2240 char lm_key[8];
2241 char user_session_key[16];
2242 char *hex_lm_key;
2243 char *hex_user_session_key;
2244 char *error_string;
2245 static uint8 zeros[16];
2246
2247 x_setbuf(x_stdout, NULL);
2248
2249 if (request_lm_key)
2250 flags |= WBFLAG_PAM_LMKEY;
2251
2252 if (request_user_session_key)
2253 flags |= WBFLAG_PAM_USER_SESSION_KEY;
2254
2255 flags |= WBFLAG_PAM_NT_STATUS_SQUASH;
2256
2257 nt_status = contact_winbind_auth_crap(opt_username, opt_domain,
2258 opt_workstation,
2259 &opt_challenge,
2260 &opt_lm_response,
2261 &opt_nt_response,
2262 flags,
2263 (unsigned char *)lm_key,
2264 (unsigned char *)user_session_key,
2265 &error_string, NULL);
2266
2267 if (!NT_STATUS_IS_OK(nt_status)) {
2268 x_fprintf(x_stdout, "%s (0x%x)\n",
2269 error_string,
2270 NT_STATUS_V(nt_status));
2271 SAFE_FREE(error_string);
2272 return False;
2273 }
2274
2275 if (request_lm_key
2276 && (memcmp(zeros, lm_key,
2277 sizeof(lm_key)) != 0)) {
2278 hex_lm_key = hex_encode_talloc(NULL, (const unsigned char *)lm_key,
2279 sizeof(lm_key));
2280 x_fprintf(x_stdout, "LM_KEY: %s\n", hex_lm_key);
2281 TALLOC_FREE(hex_lm_key);
2282 }
2283 if (request_user_session_key
2284 && (memcmp(zeros, user_session_key,
2285 sizeof(user_session_key)) != 0)) {
2286 hex_user_session_key = hex_encode_talloc(NULL, (const unsigned char *)user_session_key,
2287 sizeof(user_session_key));
2288 x_fprintf(x_stdout, "NT_KEY: %s\n", hex_user_session_key);
2289 TALLOC_FREE(hex_user_session_key);
2290 }
2291
2292 return True;
2293 }
2294
2295 /* Main program */
2296
2297 enum {
2298 OPT_USERNAME = 1000,
2299 OPT_DOMAIN,
2300 OPT_WORKSTATION,
2301 OPT_CHALLENGE,
2302 OPT_RESPONSE,
2303 OPT_LM,
2304 OPT_NT,
2305 OPT_PASSWORD,
2306 OPT_LM_KEY,
2307 OPT_USER_SESSION_KEY,
2308 OPT_DIAGNOSTICS,
2309 OPT_REQUIRE_MEMBERSHIP,
2310 OPT_USE_CACHED_CREDS
2311 };
2312
2313 int main(int argc, const char **argv)
2314 {
2315 TALLOC_CTX *frame = talloc_stackframe();
2316 int opt;
2317 static const char *helper_protocol;
2318 static int diagnostics;
2319
2320 static const char *hex_challenge;
2321 static const char *hex_lm_response;
2322 static const char *hex_nt_response;
2323
2324 poptContext pc;
2325
2326 /* NOTE: DO NOT change this interface without considering the implications!
2327 This is an external interface, which other programs will use to interact
2328 with this helper.
2329 */
2330
2331 /* We do not use single-letter command abbreviations, because they harm future
2332 interface stability. */
2333
2334 struct poptOption long_options[] = {
2335 POPT_AUTOHELP
2336 { "helper-protocol", 0, POPT_ARG_STRING, &helper_protocol, OPT_DOMAIN, "operate as a stdio-based helper", "helper protocol to use"},
2337 { "username", 0, POPT_ARG_STRING, &opt_username, OPT_USERNAME, "username"},
2338 { "domain", 0, POPT_ARG_STRING, &opt_domain, OPT_DOMAIN, "domain name"},
2339 { "workstation", 0, POPT_ARG_STRING, &opt_workstation, OPT_WORKSTATION, "workstation"},
2340 { "challenge", 0, POPT_ARG_STRING, &hex_challenge, OPT_CHALLENGE, "challenge (HEX encoded)"},
2341 { "lm-response", 0, POPT_ARG_STRING, &hex_lm_response, OPT_LM, "LM Response to the challenge (HEX encoded)"},
2342 { "nt-response", 0, POPT_ARG_STRING, &hex_nt_response, OPT_NT, "NT or NTLMv2 Response to the challenge (HEX encoded)"},
2343 { "password", 0, POPT_ARG_STRING, &opt_password, OPT_PASSWORD, "User's plaintext password"},
2344 { "request-lm-key", 0, POPT_ARG_NONE, &request_lm_key, OPT_LM_KEY, "Retrieve LM session key"},
2345 { "request-nt-key", 0, POPT_ARG_NONE, &request_user_session_key, OPT_USER_SESSION_KEY, "Retrieve User (NT) session key"},
2346 { "use-cached-creds", 0, POPT_ARG_NONE, &use_cached_creds, OPT_USE_CACHED_CREDS, "Use cached credentials if no password is given"},
2347 { "diagnostics", 0, POPT_ARG_NONE, &diagnostics, OPT_DIAGNOSTICS, "Perform diagnostics on the authentictaion chain"},
2348 { "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" },
2349 POPT_COMMON_CONFIGFILE
2350 POPT_COMMON_VERSION
2351 POPT_TABLEEND
2352 };
2353
2354 /* Samba client initialisation */
2355 load_case_tables();
2356
2357 dbf = x_stderr;
2358
2359 /* Parse options */
2360
2361 pc = poptGetContext("ntlm_auth", argc, argv, long_options, 0);
2362
2363 /* Parse command line options */
2364
2365 if (argc == 1) {
2366 poptPrintHelp(pc, stderr, 0);
2367 return 1;
2368 }
2369
2370 while((opt = poptGetNextOpt(pc)) != -1) {
2371 /* Get generic config options like --configfile */
2372 }
2373
2374 poptFreeContext(pc);
2375
2376 if (!lp_load(get_dyn_CONFIGFILE(), True, False, False, True)) {
2377 d_fprintf(stderr, "ntlm_auth: error opening config file %s. Error was %s\n",
2378 get_dyn_CONFIGFILE(), strerror(errno));
2379 exit(1);
2380 }
2381
2382 pc = poptGetContext(NULL, argc, (const char **)argv, long_options,
2383 POPT_CONTEXT_KEEP_FIRST);
2384
2385 while((opt = poptGetNextOpt(pc)) != -1) {
2386 switch (opt) {
2387 case OPT_CHALLENGE:
2388 opt_challenge = strhex_to_data_blob(NULL, hex_challenge);
2389 if (opt_challenge.length != 8) {
2390 x_fprintf(x_stderr, "hex decode of %s failed! (only got %d bytes)\n",
2391 hex_challenge,
2392 (int)opt_challenge.length);
2393 exit(1);
2394 }
2395 break;
2396 case OPT_LM:
2397 opt_lm_response = strhex_to_data_blob(NULL, hex_lm_response);
2398 if (opt_lm_response.length != 24) {
2399 x_fprintf(x_stderr, "hex decode of %s failed! (only got %d bytes)\n",
2400 hex_lm_response,
2401 (int)opt_lm_response.length);
2402 exit(1);
2403 }
2404 break;
2405
2406 case OPT_NT:
2407 opt_nt_response = strhex_to_data_blob(NULL, hex_nt_response);
2408 if (opt_nt_response.length < 24) {
2409 x_fprintf(x_stderr, "hex decode of %s failed! (only got %d bytes)\n",
2410 hex_nt_response,
2411 (int)opt_nt_response.length);
2412 exit(1);
2413 }
2414 break;
2415
2416 case OPT_REQUIRE_MEMBERSHIP:
2417 if (StrnCaseCmp("S-", require_membership_of, 2) == 0) {
2418 require_membership_of_sid = require_membership_of;
2419 }
2420 break;
2421 }
2422 }
2423
2424 if (opt_username) {
2425 char *domain = SMB_STRDUP(opt_username);
2426 char *p = strchr_m(domain, *lp_winbind_separator());
2427 if (p) {
2428 opt_username = p+1;
2429 *p = '\0';
2430 if (opt_domain && !strequal(opt_domain, domain)) {
2431 x_fprintf(x_stderr, "Domain specified in username (%s) "
2432 "doesn't match specified domain (%s)!\n\n",
2433 domain, opt_domain);
2434 poptPrintHelp(pc, stderr, 0);
2435 exit(1);
2436 }
2437 opt_domain = domain;
2438 } else {
2439 SAFE_FREE(domain);
2440 }
2441 }
2442
2443 /* Note: if opt_domain is "" then send no domain */
2444 if (opt_domain == NULL) {
2445 opt_domain = get_winbind_domain();
2446 }
2447
2448 if (opt_workstation == NULL) {
2449 opt_workstation = "";
2450 }
2451
2452 if (helper_protocol) {
2453 int i;
2454 for (i=0; i<NUM_HELPER_MODES; i++) {
2455 if (strcmp(helper_protocol, stdio_helper_protocols[i].name) == 0) {
2456 squid_stream(stdio_helper_protocols[i].mode, stdio_helper_protocols[i].fn);
2457 exit(0);
2458 }
2459 }
2460 x_fprintf(x_stderr, "unknown helper protocol [%s]\n\nValid helper protools:\n\n", helper_protocol);
2461
2462 for (i=0; i<NUM_HELPER_MODES; i++) {
2463 x_fprintf(x_stderr, "%s\n", stdio_helper_protocols[i].name);
2464 }
2465
2466 exit(1);
2467 }
2468
2469 if (!opt_username || !*opt_username) {
2470 x_fprintf(x_stderr, "username must be specified!\n\n");
2471 poptPrintHelp(pc, stderr, 0);
2472 exit(1);
2473 }
2474
2475 if (opt_challenge.length) {
2476 if (!check_auth_crap()) {
2477 exit(1);
2478 }
2479 exit(0);
2480 }
2481
2482 if (!opt_password) {
2483 opt_password = getpass("password: ");
2484 }
2485
2486 if (diagnostics) {
2487 if (!diagnose_ntlm_auth()) {
2488 return 1;
2489 }
2490 } else {
2491 fstring user;
2492
2493 fstr_sprintf(user, "%s%c%s", opt_domain, winbind_separator(), opt_username);
2494 if (!check_plaintext_auth(user, opt_password, True)) {
2495 return 1;
2496 }
2497 }
2498
2499 /* Exit code */
2500
2501 poptFreeContext(pc);
2502 TALLOC_FREE(frame);
2503 return 0;
2504 }
WIP