r7843: Use the new Heimdal gsskrb_acquire_creds API. This has the right
[ira/wip.git] / source / auth / auth_util.c
index 8fc1d2ac5956e1289d755eedc752ae7cfeab0798..8c5bd4f057d9d14a29157c5a1a0e8508bd39ff69 100644 (file)
@@ -5,6 +5,7 @@
    Copyright (C) Andrew Bartlett 2001
    Copyright (C) Jeremy Allison 2000-2001
    Copyright (C) Rafal Szczesniak 2002
+   Copyright (C) Stefan Metzmacher 2005
 
    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
 */
 
 #include "includes.h"
-
-#undef DBGC_CLASS
-#define DBGC_CLASS DBGC_AUTH
+#include "librpc/gen_ndr/ndr_samr.h"
+#include "librpc/gen_ndr/ndr_netlogon.h"
+#include "libcli/security/security.h"
+#include "auth/auth.h"
+
+/* this default function can be used by mostly all backends
+ * which don't want to set a challlenge
+ */
+NTSTATUS auth_get_challenge_not_implemented(struct auth_method_context *ctx, TALLOC_CTX *mem_ctx, DATA_BLOB *challenge)
+{
+       /* we don't want to set a challenge */
+       return NT_STATUS_NOT_IMPLEMENTED;
+}
 
 /****************************************************************************
  Create an auth_usersupplied_data structure
 ****************************************************************************/
-static NTSTATUS make_user_info(struct auth_usersupplied_info **user_info, 
-                               const char *smb_name, 
-                               const char *internal_username,
-                               const char *client_domain, 
-                               const char *domain,
-                               const char *wksta_name, 
+NTSTATUS make_user_info(TALLOC_CTX *mem_ctx,
+                               const char *c_account_name,
+                               const char *account_name,
+                               const char *c_domain_name, 
+                               const char *domain_name,
+                               const char *workstation_name, 
+                               const char *remote_host, 
                                DATA_BLOB *lm_password, DATA_BLOB *nt_password,
                                DATA_BLOB *lm_interactive_password, DATA_BLOB *nt_interactive_password,
-                               DATA_BLOB *plaintext
-                               BOOL encrypted)
+                               DATA_BLOB *plaintext_password, BOOL encrypted, uint32_t flags,
+                              struct auth_usersupplied_info **_user_info)
 {
+       struct auth_usersupplied_info *user_info;
+       DATA_BLOB blob;
+
+       DEBUG(5,("attempting to make a user_info for %s (%s)\n", account_name, c_account_name));
+
+       user_info = talloc(mem_ctx, struct auth_usersupplied_info);
+       NT_STATUS_HAVE_NO_MEMORY(user_info);
+
+       DEBUG(5,("making strings for %s's user_info struct\n", account_name));
 
-       DEBUG(5,("attempting to make a user_info for %s (%s)\n", internal_username, smb_name));
+       user_info->client.account_name = talloc_strdup(user_info, c_account_name);
+       NT_STATUS_HAVE_NO_MEMORY(user_info->client.account_name);
 
-       *user_info = malloc(sizeof(**user_info));
-       if (!user_info) {
-               DEBUG(0,("malloc failed for user_info (size %lu)\n", (unsigned long)sizeof(*user_info)));
+       user_info->account_name = talloc_strdup(user_info, account_name);
+       NT_STATUS_HAVE_NO_MEMORY(user_info->account_name);
+
+       user_info->client.domain_name = talloc_strdup(user_info, c_domain_name);
+       if (c_domain_name && !user_info->client.domain_name) {
                return NT_STATUS_NO_MEMORY;
        }
 
-       ZERO_STRUCTP(*user_info);
+       user_info->domain_name = talloc_strdup(user_info, domain_name);
+       NT_STATUS_HAVE_NO_MEMORY(user_info->domain_name);
+
+       user_info->workstation_name = talloc_strdup(user_info, workstation_name);
+       NT_STATUS_HAVE_NO_MEMORY(user_info->workstation_name);
+
+       user_info->remote_host = talloc_strdup(user_info, remote_host);
+       NT_STATUS_HAVE_NO_MEMORY(user_info->remote_host);
 
-       DEBUG(5,("making strings for %s's user_info struct\n", internal_username));
+       DEBUG(5,("making blobs for %s's user_info struct\n", account_name));
 
-       (*user_info)->smb_name.str = strdup(smb_name);
-       if ((*user_info)->smb_name.str) { 
-               (*user_info)->smb_name.len = strlen(smb_name);
+       if (lm_password) {
+               blob = data_blob_dup_talloc(user_info, lm_password);
+               NT_STATUS_HAVE_NO_MEMORY(blob.data);
        } else {
-               free_user_info(user_info);
-               return NT_STATUS_NO_MEMORY;
+               blob = data_blob(NULL, 0);
        }
-       
-       (*user_info)->internal_username.str = strdup(internal_username);
-       if ((*user_info)->internal_username.str) { 
-               (*user_info)->internal_username.len = strlen(internal_username);
+       user_info->lm_resp = blob;
+
+       if (nt_password) {
+               blob = data_blob_dup_talloc(user_info, nt_password);
+               NT_STATUS_HAVE_NO_MEMORY(blob.data);
        } else {
-               free_user_info(user_info);
-               return NT_STATUS_NO_MEMORY;
+               blob = data_blob(NULL, 0);
        }
+       user_info->nt_resp = blob;
 
-       (*user_info)->domain.str = strdup(domain);
-       if ((*user_info)->domain.str) { 
-               (*user_info)->domain.len = strlen(domain);
+       if (lm_interactive_password) {
+               blob = data_blob_dup_talloc(user_info, lm_interactive_password);
+               NT_STATUS_HAVE_NO_MEMORY(blob.data);
        } else {
-               free_user_info(user_info);
-               return NT_STATUS_NO_MEMORY;
+               blob = data_blob(NULL, 0);
        }
+       user_info->lm_interactive_password = blob;
 
-       (*user_info)->client_domain.str = strdup(client_domain);
-       if ((*user_info)->client_domain.str) { 
-               (*user_info)->client_domain.len = strlen(client_domain);
+       if (nt_interactive_password) {
+               blob = data_blob_dup_talloc(user_info, nt_interactive_password);
+               NT_STATUS_HAVE_NO_MEMORY(blob.data);
        } else {
-               free_user_info(user_info);
-               return NT_STATUS_NO_MEMORY;
+               blob = data_blob(NULL, 0);
        }
+       user_info->nt_interactive_password = blob;
 
-       (*user_info)->wksta_name.str = strdup(wksta_name);
-       if ((*user_info)->wksta_name.str) { 
-               (*user_info)->wksta_name.len = strlen(wksta_name);
+       if (plaintext_password) {
+               blob = data_blob_dup_talloc(user_info, plaintext_password);
+               NT_STATUS_HAVE_NO_MEMORY(blob.data);
        } else {
-               free_user_info(user_info);
-               return NT_STATUS_NO_MEMORY;
+               blob = data_blob(NULL, 0);
        }
+       user_info->plaintext_password = blob;
 
-       DEBUG(5,("making blobs for %s's user_info struct\n", internal_username));
-
-       if (lm_password)
-               (*user_info)->lm_resp = data_blob(lm_password->data, lm_password->length);
-       if (nt_password)
-               (*user_info)->nt_resp = data_blob(nt_password->data, nt_password->length);
-       if (lm_interactive_password)
-               (*user_info)->lm_interactive_password = data_blob(lm_interactive_password->data, lm_interactive_password->length);
-       if (nt_interactive_password)
-               (*user_info)->nt_interactive_password = data_blob(nt_interactive_password->data, nt_interactive_password->length);
+       user_info->encrypted = encrypted;
 
-       if (plaintext)
-               (*user_info)->plaintext_password = data_blob(plaintext->data, plaintext->length);
+       DEBUG(10,("made an %sencrypted user_info for %s (%s)\n", encrypted ? "":"un" , account_name, c_account_name));
 
-       (*user_info)->encrypted = encrypted;
-
-       DEBUG(10,("made an %sencrypted user_info for %s (%s)\n", encrypted ? "":"un" , internal_username, smb_name));
+       *_user_info = user_info;
 
        return NT_STATUS_OK;
 }
@@ -118,513 +137,335 @@ static NTSTATUS make_user_info(struct auth_usersupplied_info **user_info,
  Create an auth_usersupplied_data structure after appropriate mapping.
 ****************************************************************************/
 
-NTSTATUS make_user_info_map(struct auth_usersupplied_info **user_info, 
-                           const char *smb_name, 
-                           const char *client_domain, 
-                           const char *wksta_name, 
+NTSTATUS make_user_info_map(TALLOC_CTX *mem_ctx,
+                           const char *c_account_name,
+                           const char *c_domain_name,
+                           const char *workstation_name,
                            DATA_BLOB *lm_password, DATA_BLOB *nt_password,
                            DATA_BLOB *lm_interactive_password, DATA_BLOB *nt_interactive_password,
-                           DATA_BLOB *plaintext, 
-                           BOOL encrypted)
+                           DATA_BLOB *plaintext, BOOL encrypted,
+                           struct auth_usersupplied_info **user_info)
 {
        const char *domain;
-       fstring internal_username;
-       fstrcpy(internal_username, smb_name);
-       
-       DEBUG(5, ("make_user_info_map: Mapping user [%s]\\[%s] from workstation [%s]\n",
-             client_domain, smb_name, wksta_name));
-       
+       const char *account_name;
+       char *d;
+       DEBUG(5,("make_user_info_map: Mapping user [%s]\\[%s] from workstation [%s]\n",
+               c_domain_name, c_account_name, workstation_name));
+
+       account_name = c_account_name;
+
        /* don't allow "" as a domain, fixes a Win9X bug 
           where it doens't supply a domain for logon script
           'net use' commands.                                 */
 
-       if ( *client_domain )
-               domain = client_domain;
-       else
+       /* Split user@realm names into user and realm components.  This is TODO to fix with proper userprincipalname support */
+       if (c_domain_name && *c_domain_name) {
+               domain = c_domain_name;
+       } else if (strchr_m(c_account_name, '@')) {
+               account_name = talloc_strdup(mem_ctx, c_account_name);
+               if (!account_name) {
+                       return NT_STATUS_NO_MEMORY;
+               }
+               d = strchr_m(account_name, '@');
+               if (!d) {
+                       return NT_STATUS_INTERNAL_ERROR;
+               }
+               d[0] = '\0';
+               d++;
+               domain = d;
+       } else {
                domain = lp_workgroup();
+       }
 
-       /* we know that it is a trusted domain (and we are allowing them) or it is our domain */
-       
-       return make_user_info(user_info, smb_name, internal_username, 
-                             client_domain, domain, wksta_name, 
+       return make_user_info(mem_ctx,
+                             c_account_name, account_name, 
+                             c_domain_name, domain,
+                             workstation_name,
+                             workstation_name,
                              lm_password, nt_password,
                              lm_interactive_password, nt_interactive_password,
-                             plaintext, encrypted);
+                             plaintext, encrypted, 0x00,
+                             user_info);
 }
 
 /****************************************************************************
  Create an auth_usersupplied_data, making the DATA_BLOBs here. 
  Decrypt and encrypt the passwords.
 ****************************************************************************/
-
-BOOL make_user_info_netlogon_network(struct auth_usersupplied_info **user_info, 
-                                    const char *smb_name, 
-                                    const char *client_domain, 
-                                    const char *wksta_name, 
-                                    const uint8_t *lm_network_password, int lm_password_len,
-                                    const uint8_t *nt_network_password, int nt_password_len)
+NTSTATUS make_user_info_netlogon_network(TALLOC_CTX *mem_ctx,
+                                        const char *c_account_name,
+                                        const char *c_domain_name,
+                                        const char *workstation_name,
+                                        const uint8_t *lm_network_password, int lm_password_len,
+                                        const uint8_t *nt_network_password, int nt_password_len,
+                                        struct auth_usersupplied_info **user_info)
 {
-       BOOL ret;
-       NTSTATUS nt_status;
-       DATA_BLOB lm_blob = data_blob(lm_network_password, lm_password_len);
-       DATA_BLOB nt_blob = data_blob(nt_network_password, nt_password_len);
-
-       nt_status = make_user_info_map(user_info,
-                                      smb_name, client_domain, 
-                                      wksta_name, 
-                                      lm_password_len ? &lm_blob : NULL, 
-                                      nt_password_len ? &nt_blob : NULL,
-                                      NULL, NULL, NULL,
-                                      True);
-       
-       ret = NT_STATUS_IS_OK(nt_status) ? True : False;
-               
-       data_blob_free(&lm_blob);
-       data_blob_free(&nt_blob);
-       return ret;
+       DATA_BLOB lm_blob = data_blob_const(lm_network_password, lm_password_len);
+       DATA_BLOB nt_blob = data_blob_const(nt_network_password, nt_password_len);
+
+       return make_user_info_map(mem_ctx,
+                                 c_account_name,
+                                 c_domain_name, 
+                                 workstation_name, 
+                                 lm_password_len ? &lm_blob : NULL, 
+                                 nt_password_len ? &nt_blob : NULL,
+                                 NULL, NULL, NULL, True,
+                                 user_info);
 }
 
 /****************************************************************************
  Create an auth_usersupplied_data, making the DATA_BLOBs here. 
  Decrypt and encrypt the passwords.
 ****************************************************************************/
-
-BOOL make_user_info_netlogon_interactive(struct auth_usersupplied_info **user_info, 
-                                        const char *smb_name, 
-                                        const char *client_domain, 
-                                        const char *wksta_name, 
-                                        const uint8_t chal[8], 
-                                        const uint8_t lm_interactive_password[16], 
-                                        const uint8_t nt_interactive_password[16], 
-                                        const uint8_t *dc_sess_key)
+NTSTATUS make_user_info_netlogon_interactive(TALLOC_CTX *mem_ctx,
+                                            const char *c_account_name,
+                                            const char *c_domain_name,
+                                            const char *workstation_name,
+                                            const uint8_t chal[8],
+                                            const struct samr_Password *lm_interactive_password,
+                                            const struct samr_Password *nt_interactive_password,
+                                            struct auth_usersupplied_info **user_info)
 {
-       char lm_password[16];
-       char nt_password[16];
-       uint8_t local_lm_response[24];
-       uint8_t local_nt_response[24];
-       uint8_t key[16];
-       
-       ZERO_STRUCT(key);
-       memcpy(key, dc_sess_key, 8);
-       
-       if (lm_interactive_password) memcpy(lm_password, lm_interactive_password, sizeof(lm_password));
-       if (nt_interactive_password) memcpy(nt_password, nt_interactive_password, sizeof(nt_password));
-       
-#ifdef DEBUG_PASSWORD
-       DEBUG(100,("key:"));
-       dump_data(100, (char *)key, sizeof(key));
-       
-       DEBUG(100,("lm owf password:"));
-       dump_data(100, lm_password, sizeof(lm_password));
-       
-       DEBUG(100,("nt owf password:"));
-       dump_data(100, nt_password, sizeof(nt_password));
-#endif
-       
-       if (lm_interactive_password)
-               arcfour_crypt((uint8_t *)lm_password, key, sizeof(lm_password));
-       
-       if (nt_interactive_password)
-               arcfour_crypt((uint8_t *)nt_password, key, sizeof(nt_password));
-       
-#ifdef DEBUG_PASSWORD
-       DEBUG(100,("decrypt of lm owf password:"));
-       dump_data(100, lm_password, sizeof(lm_password));
-       
-       DEBUG(100,("decrypt of nt owf password:"));
-       dump_data(100, nt_password, sizeof(nt_password));
-#endif
-       
-       if (lm_interactive_password)
-               SMBOWFencrypt((const uint8_t *)lm_password, chal, local_lm_response);
-
-       if (nt_interactive_password)
-               SMBOWFencrypt((const uint8_t *)nt_password, chal, local_nt_response);
-       
-       /* Password info paranoia */
-       ZERO_STRUCT(key);
-
-       {
-               BOOL ret;
-               NTSTATUS nt_status;
-               DATA_BLOB local_lm_blob;
-               DATA_BLOB local_nt_blob;
-
-               DATA_BLOB lm_interactive_blob;
-               DATA_BLOB nt_interactive_blob;
-               
-               if (lm_interactive_password) {
-                       local_lm_blob = data_blob(local_lm_response, sizeof(local_lm_response));
-                       lm_interactive_blob = data_blob(lm_password, sizeof(lm_password));
-                       ZERO_STRUCT(lm_password);
-               }
-               
-               if (nt_interactive_password) {
-                       local_nt_blob = data_blob(local_nt_response, sizeof(local_nt_response));
-                       nt_interactive_blob = data_blob(nt_password, sizeof(nt_password));
-                       ZERO_STRUCT(nt_password);
-               }
-
-               nt_status = make_user_info_map(user_info, 
-                                              smb_name, client_domain, 
-                                              wksta_name, 
-                                              lm_interactive_password ? &local_lm_blob : NULL,
-                                              nt_interactive_password ? &local_nt_blob : NULL,
-                                              lm_interactive_password ? &lm_interactive_blob : NULL,
-                                              nt_interactive_password ? &nt_interactive_blob : NULL,
-                                              NULL,
-                                              True);
-
-               ret = NT_STATUS_IS_OK(nt_status) ? True : False;
-               data_blob_free(&local_lm_blob);
-               data_blob_free(&local_nt_blob);
-               data_blob_free(&lm_interactive_blob);
-               data_blob_free(&nt_interactive_blob);
-               return ret;
-       }
-}
-
-
-/****************************************************************************
- Create an auth_usersupplied_data structure
-****************************************************************************/
-
-BOOL make_user_info_for_reply(struct auth_usersupplied_info **user_info, 
-                             const char *smb_name, 
-                             const char *client_domain,
-                             const uint8_t chal[8],
-                             DATA_BLOB plaintext_password)
-{
-
+       NTSTATUS nt_status;
        DATA_BLOB local_lm_blob;
        DATA_BLOB local_nt_blob;
-       NTSTATUS ret = NT_STATUS_UNSUCCESSFUL;
-                       
-       /*
-        * Not encrypted - do so.
-        */
-       
-       DEBUG(5,("make_user_info_for_reply: User passwords not in encrypted format.\n"));
-       
-       if (plaintext_password.data) {
-               uint8_t local_lm_response[24];
-               
-#ifdef DEBUG_PASSWORD
-               DEBUG(10,("Unencrypted password (len %d):\n",plaintext_password.length));
-               dump_data(100, plaintext_password.data, plaintext_password.length);
-#endif
-
-               SMBencrypt( (const char *)plaintext_password.data, (const uint8_t *)chal, local_lm_response);
-               local_lm_blob = data_blob(local_lm_response, 24);
-               
-               /* We can't do an NT hash here, as the password needs to be
-                  case insensitive */
-               local_nt_blob = data_blob(NULL, 0); 
-               
-       } else {
-               local_lm_blob = data_blob(NULL, 0); 
-               local_nt_blob = data_blob(NULL, 0); 
-       }
        
-       ret = make_user_info_map(user_info, smb_name,
-                                client_domain, 
-                                sub_get_remote_machine(),
-                                local_lm_blob.data ? &local_lm_blob : NULL,
-                                local_nt_blob.data ? &local_nt_blob : NULL,
-                                NULL, NULL,
-                                plaintext_password.data ? &plaintext_password : NULL, 
-                                False);
-       
-       data_blob_free(&local_lm_blob);
-       return NT_STATUS_IS_OK(ret) ? True : False;
+       DATA_BLOB lm_interactive_blob;
+       DATA_BLOB nt_interactive_blob;
+       uint8_t local_lm_response[24];
+       uint8_t local_nt_response[24];
+
+       SMBOWFencrypt(lm_interactive_password->hash, chal, local_lm_response);
+       SMBOWFencrypt(nt_interactive_password->hash, chal, local_nt_response);
+
+       local_lm_blob = data_blob_const(local_lm_response, sizeof(local_lm_response));
+       lm_interactive_blob = data_blob_const(lm_interactive_password->hash, 
+                                             sizeof(lm_interactive_password->hash));
+
+       local_nt_blob = data_blob_const(local_nt_response, sizeof(local_nt_response));
+       nt_interactive_blob = data_blob_const(nt_interactive_password->hash, 
+                                             sizeof(nt_interactive_password->hash));
+       
+       nt_status = make_user_info_map(mem_ctx,
+                                      c_account_name,
+                                      c_domain_name, 
+                                      workstation_name,
+                                      &local_lm_blob,
+                                      &local_nt_blob,
+                                      &lm_interactive_blob,
+                                      &nt_interactive_blob,
+                                      NULL, True,
+                                      user_info);
+       return nt_status;
 }
 
 /****************************************************************************
  Create an auth_usersupplied_data structure
 ****************************************************************************/
-
-NTSTATUS make_user_info_for_reply_enc(struct auth_usersupplied_info **user_info, 
-                                      const char *smb_name,
-                                      const char *client_domain, 
-                                      DATA_BLOB lm_resp, DATA_BLOB nt_resp)
+NTSTATUS make_user_info_for_reply_enc(TALLOC_CTX *mem_ctx,
+                                     const char *c_account_name,
+                                     const char *c_domain_name,
+                                     const char *workstation_name,
+                                      DATA_BLOB lm_resp, DATA_BLOB nt_resp,
+                                     struct auth_usersupplied_info **user_info)
 {
-       return make_user_info_map(user_info, smb_name, 
-                                 client_domain, 
-                                 sub_get_remote_machine(), 
-                                 lm_resp.data ? &lm_resp : NULL, 
-                                 nt_resp.data ? &nt_resp : NULL, 
-                                 NULL, NULL, NULL,
-                                 True);
+       return make_user_info_map(mem_ctx,
+                                 c_account_name,
+                                 c_domain_name,
+                                 workstation_name,
+                                 lm_resp.data ? &lm_resp : NULL,
+                                 nt_resp.data ? &nt_resp : NULL,
+                                 NULL, NULL, NULL, True,
+                                 user_info);
 }
 
 /****************************************************************************
- Create a guest user_info blob, for anonymous authenticaion.
+ Create a anonymous user_info blob, for anonymous authenticaion.
 ****************************************************************************/
-
-BOOL make_user_info_guest(struct auth_usersupplied_info **user_info) 
+NTSTATUS make_user_info_anonymous(TALLOC_CTX *mem_ctx, struct auth_usersupplied_info **user_info) 
 {
-       NTSTATUS nt_status;
-
-       nt_status = make_user_info(user_info, 
-                                  "","", 
-                                  "","", 
-                                  "", 
-                                  NULL, NULL, 
-                                  NULL, NULL, 
-                                  NULL,
-                                  True);
-                             
-       return NT_STATUS_IS_OK(nt_status) ? True : False;
-}
-
-/****************************************************************************
- prints a NT_USER_TOKEN to debug output.
-****************************************************************************/
-
-void debug_nt_user_token(int dbg_class, int dbg_lev, NT_USER_TOKEN *token)
-{
-       TALLOC_CTX *mem_ctx;
-
-       size_t     i;
-       
-       if (!token) {
-               DEBUGC(dbg_class, dbg_lev, ("NT user token: (NULL)\n"));
-               return;
-       }
-       
-       mem_ctx = talloc_init("debug_nt_user_token()");
-       if (!mem_ctx) {
-               return;
-       }
-
-       DEBUGC(dbg_class, dbg_lev, ("NT user token of user %s\n",
-                                   dom_sid_string(mem_ctx, token->user_sids[0]) ));
-       DEBUGADDC(dbg_class, dbg_lev, ("contains %lu SIDs\n", (unsigned long)token->num_sids));
-       for (i = 0; i < token->num_sids; i++)
-               DEBUGADDC(dbg_class, dbg_lev, ("SID[%3lu]: %s\n", (unsigned long)i, 
-                                              dom_sid_string(mem_ctx, token->user_sids[i])));
-
-       talloc_destroy(mem_ctx);
+       return make_user_info(mem_ctx,
+                             "", "", "", "", "", "",
+                             NULL, NULL, NULL, NULL, 
+                             NULL, True, 0x00,
+                             user_info);
 }
 
-/****************************************************************************
- Create the SID list for this user.
-****************************************************************************/
 
-NTSTATUS create_nt_user_token(TALLOC_CTX *mem_ctx, 
-                             struct dom_sid *user_sid, struct dom_sid *group_sid, 
-                             int n_groupSIDs, struct dom_sid **groupSIDs, 
-                             BOOL is_guest, struct nt_user_token **token)
+/***************************************************************************
+ Make a server_info struct from the info3 returned by a domain logon 
+***************************************************************************/
+NTSTATUS make_server_info_netlogon_validation(TALLOC_CTX *mem_ctx,
+                                             const char *account_name,
+                                             uint16_t validation_level,
+                                             union netr_Validation *validation,
+                                             struct auth_serversupplied_info **_server_info)
 {
-       NTSTATUS       nt_status = NT_STATUS_OK;
-       struct nt_user_token *ptoken;
+       struct auth_serversupplied_info *server_info;
+       struct netr_SamBaseInfo *base = NULL;
        int i;
-       int sid_ndx;
-       
-       if (!(ptoken = talloc_p(mem_ctx, struct nt_user_token))) {
-               DEBUG(0, ("create_nt_token: Out of memory allocating token\n"));
-               nt_status = NT_STATUS_NO_MEMORY;
-               return nt_status;
-       }
-
-       ptoken->num_sids = 0;
-
-       if (!(ptoken->user_sids = talloc_array_p(mem_ctx, struct dom_sid*, n_groupSIDs + 5))) {
-               DEBUG(0, ("create_nt_token: Out of memory allocating SIDs\n"));
-               nt_status = NT_STATUS_NO_MEMORY;
-               return nt_status;
-       }
-       
-       /*
-        * Note - user SID *MUST* be first in token !
-        * se_access_check depends on this.
-        *
-        * Primary group SID is second in token. Convention.
-        */
-
-       ptoken->user_sids[PRIMARY_USER_SID_INDEX] = user_sid;
-       ptoken->num_sids++;
-       ptoken->user_sids[PRIMARY_GROUP_SID_INDEX] = group_sid;
-       ptoken->num_sids++;
-
-       /*
-        * Finally add the "standard" SIDs.
-        * The only difference between guest and "anonymous" (which we
-        * don't really support) is the addition of Authenticated_Users.
-        */
-       ptoken->user_sids[2] = dom_sid_parse_talloc(mem_ctx, SID_WORLD);
-       ptoken->user_sids[3] = dom_sid_parse_talloc(mem_ctx, SID_NETWORK);
-
-       if (is_guest) {
-               ptoken->user_sids[4] = dom_sid_parse_talloc(mem_ctx, SID_BUILTIN_GUESTS);
-               ptoken->num_sids++;
-       } else {
-               ptoken->user_sids[4] = dom_sid_parse_talloc(mem_ctx, SID_AUTHENTICATED_USERS);
-               ptoken->num_sids++;
-       }
 
-       sid_ndx = 5; /* next available spot */
-
-       for (i = 0; i < n_groupSIDs; i++) {
-               size_t check_sid_idx;
-               for (check_sid_idx = 1; check_sid_idx < ptoken->num_sids; check_sid_idx++) {
-                       if (sid_equal(ptoken->user_sids[check_sid_idx], 
-                                     groupSIDs[i])) {
-                               break;
-                       }
+       switch (validation_level) {
+       case 2:
+               if (!validation || !validation->sam2) {
+                       return NT_STATUS_INVALID_PARAMETER;
+               }
+               base = &validation->sam2->base;
+               break;
+       case 3:
+               if (!validation || !validation->sam3) {
+                       return NT_STATUS_INVALID_PARAMETER;
                }
-               
-               if (check_sid_idx >= ptoken->num_sids) /* Not found already */ {
-                       ptoken->user_sids[sid_ndx++] = groupSIDs[i];
-                       ptoken->num_sids++;
+               base = &validation->sam3->base;
+               break;
+       case 6:
+               if (!validation || !validation->sam6) {
+                       return NT_STATUS_INVALID_PARAMETER;
                }
+               base = &validation->sam6->base;
+               break;
+       default:
+               return NT_STATUS_INVALID_LEVEL;
        }
-       
-       debug_nt_user_token(DBGC_AUTH, 10, ptoken);
-       
-       *token = ptoken;
 
-       return nt_status;
-}
+       server_info = talloc(mem_ctx, struct auth_serversupplied_info);
+       NT_STATUS_HAVE_NO_MEMORY(server_info);
 
-/***************************************************************************
- Make a user_info struct
-***************************************************************************/
+       /*
+          Here is where we should check the list of
+          trusted domains, and verify that the SID 
+          matches.
+       */
+       server_info->account_sid = dom_sid_add_rid(server_info, base->domain_sid, base->rid);
+       NT_STATUS_HAVE_NO_MEMORY(server_info->account_sid);
 
-NTSTATUS make_server_info(struct auth_serversupplied_info **server_info, 
-                         const char *username)
-{
-       TALLOC_CTX *mem_ctx = talloc_init("auth subsystem: server_info for %s", username);
-       *server_info = talloc_p(mem_ctx, struct auth_serversupplied_info);
-       if (!*server_info) {
-               DEBUG(0,("make_server_info: malloc failed!\n"));
-               talloc_destroy(mem_ctx);
-               return NT_STATUS_NO_MEMORY;
-       }
-       (*server_info)->mem_ctx = mem_ctx;
-       
-       return NT_STATUS_OK;
-}
 
-/***************************************************************************
- Make (and fill) a user_info struct for a guest login.
-***************************************************************************/
-NTSTATUS make_server_info_guest(struct auth_serversupplied_info **server_info)
-{
-       NTSTATUS nt_status;
-       static const char zeros[16];
+       server_info->primary_group_sid = dom_sid_add_rid(server_info, base->domain_sid, base->primary_gid);
+       NT_STATUS_HAVE_NO_MEMORY(server_info->primary_group_sid);
 
-       nt_status = make_server_info(server_info, "");
+       server_info->n_domain_groups = base->groups.count;
+       if (base->groups.count) {
+               server_info->domain_groups = talloc_array(server_info, struct dom_sid*, base->groups.count);
+               NT_STATUS_HAVE_NO_MEMORY(server_info->domain_groups);
+       } else {
+               server_info->domain_groups = NULL;
+       }
 
-       if (!NT_STATUS_IS_OK(nt_status)) {
-               return nt_status;
+       for (i = 0; i < base->groups.count; i++) {
+               server_info->domain_groups[i] = dom_sid_add_rid(server_info, base->domain_sid, base->groups.rids[i].rid);
+               NT_STATUS_HAVE_NO_MEMORY(server_info->domain_groups[i]);
        }
-       
-       (*server_info)->guest = True;
 
-       (*server_info)->user_sid = dom_sid_parse_talloc((*server_info)->mem_ctx, SID_ANONYMOUS);
-       (*server_info)->primary_group_sid = dom_sid_parse_talloc((*server_info)->mem_ctx, SID_BUILTIN_GUESTS);
-       (*server_info)->n_domain_groups = 0;
-       (*server_info)->domain_groups = NULL;
-       
-       /* annoying, but the Guest really does have a session key, 
-          and it is all zeros! */
-       (*server_info)->user_session_key = data_blob(zeros, sizeof(zeros));
-       (*server_info)->lm_session_key = data_blob(zeros, sizeof(zeros));
+       /* Copy 'other' sids.  We need to do sid filtering here to
+          prevent possible elevation of privileges.  See:
 
-       return nt_status;
-}
+           http://www.microsoft.com/windows2000/techinfo/administration/security/sidfilter.asp
+         */
 
-/***************************************************************************
- Free a user_info struct
-***************************************************************************/
+       if (validation_level == 3) {
+               struct dom_sid **dgrps = server_info->domain_groups;
+               size_t sidcount = server_info->n_domain_groups + validation->sam3->sidcount;
+               size_t n_dgrps = server_info->n_domain_groups;
 
-void free_user_info(struct auth_usersupplied_info **user_info)
-{
-       DEBUG(5,("attempting to free (and zero) a user_info structure\n"));
-       if (*user_info != NULL) {
-               if ((*user_info)->smb_name.str) {
-                       DEBUG(10,("structure was created for %s\n", (*user_info)->smb_name.str));
+               dgrps = talloc_realloc(server_info, dgrps, struct dom_sid*, sidcount);
+               NT_STATUS_HAVE_NO_MEMORY(dgrps);
+
+               for (i = 0; i < validation->sam3->sidcount; i++) {
+                       dgrps[n_dgrps + i] = talloc_reference(dgrps, validation->sam3->sids[i].sid);
                }
-               SAFE_FREE((*user_info)->smb_name.str);
-               SAFE_FREE((*user_info)->internal_username.str);
-               SAFE_FREE((*user_info)->client_domain.str);
-               SAFE_FREE((*user_info)->domain.str);
-               SAFE_FREE((*user_info)->wksta_name.str);
-               data_blob_free(&(*user_info)->lm_resp);
-               data_blob_free(&(*user_info)->nt_resp);
-               data_blob_clear_free(&(*user_info)->plaintext_password);
-               ZERO_STRUCT(**user_info);
-       }
-       SAFE_FREE(*user_info);
-}
 
-/***************************************************************************
- Clear out a server_info struct that has been allocated
-***************************************************************************/
+               server_info->n_domain_groups = sidcount;
+               server_info->domain_groups = dgrps;
 
-void free_server_info(struct auth_serversupplied_info **server_info)
-{
-       DEBUG(5,("attempting to free a server_info structure\n"));
-       if (!*server_info) {
-               talloc_destroy((*server_info)->mem_ctx);
+               /* Where are the 'global' sids?... */
        }
-       *server_info = NULL;
-}
 
-/***************************************************************************
- Make an auth_methods struct
-***************************************************************************/
-
-BOOL make_auth_methods(struct auth_context *auth_context, struct auth_methods **auth_method) 
-{
-       if (!auth_context) {
-               smb_panic("no auth_context supplied to make_auth_methods()!\n");
+       if (base->account_name.string) {
+               server_info->account_name = talloc_reference(server_info, base->account_name.string);
+       } else {
+               server_info->account_name = talloc_strdup(server_info, account_name);
+               NT_STATUS_HAVE_NO_MEMORY(server_info->account_name);
        }
 
-       if (!auth_method) {
-               smb_panic("make_auth_methods: pointer to auth_method pointer is NULL!\n");
+       server_info->domain_name = talloc_reference(server_info, base->domain.string);
+       server_info->full_name = talloc_reference(server_info, base->full_name.string);
+       server_info->logon_script = talloc_reference(server_info, base->logon_script.string);
+       server_info->profile_path = talloc_reference(server_info, base->profile_path.string);
+       server_info->home_directory = talloc_reference(server_info, base->home_directory.string);
+       server_info->home_drive = talloc_reference(server_info, base->home_drive.string);
+       server_info->last_logon = base->last_logon;
+       server_info->last_logoff = base->last_logoff;
+       server_info->acct_expiry = base->acct_expiry;
+       server_info->last_password_change = base->last_password_change;
+       server_info->allow_password_change = base->allow_password_change;
+       server_info->force_password_change = base->force_password_change;
+       server_info->logon_count = base->logon_count;
+       server_info->bad_password_count = base->bad_password_count;
+       server_info->acct_flags = base->acct_flags;
+
+       server_info->authenticated = True;
+
+       /* ensure we are never given NULL session keys */
+
+       if (all_zero(base->key.key, sizeof(base->key.key))) {
+               server_info->user_session_key = data_blob(NULL, 0);
+       } else {
+               server_info->user_session_key = data_blob_talloc(server_info, base->key.key, sizeof(base->key.key));
+               NT_STATUS_HAVE_NO_MEMORY(server_info->user_session_key.data);
        }
 
-       *auth_method = talloc(auth_context->mem_ctx, sizeof(**auth_method));
-       if (!*auth_method) {
-               DEBUG(0,("make_auth_method: malloc failed!\n"));
-               return False;
+       if (all_zero(base->LMSessKey.key, sizeof(base->LMSessKey.key))) {
+               server_info->lm_session_key = data_blob(NULL, 0);
+       } else {
+               server_info->lm_session_key = data_blob_talloc(server_info, base->LMSessKey.key, sizeof(base->LMSessKey.key));
+               NT_STATUS_HAVE_NO_MEMORY(server_info->lm_session_key.data);
        }
-       ZERO_STRUCTP(*auth_method);
-       
-       return True;
+
+       *_server_info = server_info;
+       return NT_STATUS_OK;
 }
 
-NTSTATUS make_session_info(struct auth_serversupplied_info *server_info, 
-                          struct auth_session_info **session_info) 
+NTSTATUS auth_generate_session_info(TALLOC_CTX *mem_ctx, 
+                                   struct auth_serversupplied_info *server_info, 
+                                   struct auth_session_info **_session_info) 
 {
+       struct auth_session_info *session_info;
        NTSTATUS nt_status;
 
-       *session_info = talloc_p(server_info->mem_ctx, struct auth_session_info);
-       if (!*session_info) {
-               return NT_STATUS_NO_MEMORY;
-       }
-       
-       (*session_info)->mem_ctx = server_info->mem_ctx;
-       server_info->mem_ctx = NULL; /* make sure not to accidentily destory it, 
-                                       and this information is now constant */
-       (*session_info)->server_info = server_info;
+       session_info = talloc(mem_ctx, struct auth_session_info);
+       NT_STATUS_HAVE_NO_MEMORY(session_info);
+
+       session_info->server_info = talloc_reference(session_info, server_info);
 
        /* unless set otherwise, the session key is the user session
-        * key from the auth subsystem */
-       (*session_info)->session_key = server_info->user_session_key;
-       
-       nt_status = create_nt_user_token((*session_info)->mem_ctx, 
-                                        server_info->user_sid, 
-                                        server_info->primary_group_sid, 
-                                        server_info->n_domain_groups, 
-                                        server_info->domain_groups,
-                                        False, 
-                                        &(*session_info)->nt_user_token);
-       
-       return nt_status;
+        * key from the auth subsystem */ 
+       session_info->session_key = server_info->user_session_key;
+
+       nt_status = security_token_create(session_info,
+                                         server_info->account_sid,
+                                         server_info->primary_group_sid,
+                                         server_info->n_domain_groups,
+                                         server_info->domain_groups,
+                                         server_info->authenticated,
+                                         &session_info->security_token);
+       NT_STATUS_NOT_OK_RETURN(nt_status);
+
+       *_session_info = session_info;
+       return NT_STATUS_OK;
+}
+
+/****************************************************************************
+ prints a struct auth_session_info security token to debug output.
+****************************************************************************/
+void auth_session_info_debug(int dbg_lev, 
+                            const struct auth_session_info *session_info)
+{
+       if (!session_info) {
+               DEBUGC(dbg_class, dbg_lev, ("Session Info: (NULL)\n"));
+               return; 
+       }
+
+       security_token_debug(dbg_lev, session_info->security_token);
 }
 
 /**
@@ -637,22 +478,15 @@ NTSTATUS make_session_info(struct auth_serversupplied_info *server_info,
  * @param nt_status NTSTATUS input for squashing.
  * @return the 'squashed' nt_status
  **/
-
-NTSTATUS nt_status_squash(NTSTATUS nt_status)
+NTSTATUS auth_nt_status_squash(NTSTATUS nt_status)
 {
-       if NT_STATUS_IS_OK(nt_status) {
-               return nt_status;               
-       } else if NT_STATUS_EQUAL(nt_status, NT_STATUS_NO_SUCH_USER) {
+       if NT_STATUS_EQUAL(nt_status, NT_STATUS_NO_SUCH_USER) {
                /* Match WinXP and don't give the game away */
                return NT_STATUS_LOGON_FAILURE;
-               
        } else if NT_STATUS_EQUAL(nt_status, NT_STATUS_WRONG_PASSWORD) {
                /* Match WinXP and don't give the game away */
                return NT_STATUS_LOGON_FAILURE;
-       } else {
-               return nt_status;
-       }  
-}
-
-
+       }
 
+       return nt_status;
+}