source3/utils/ntlm_auth.c

   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 }