source4/libnet/libnet_vampire.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3
   4    Extract the user/system database from a remote SamSync server
   5
   6    Copyright (C) Andrew Bartlett <abartlet@samba.org> 2004-2005
   7
   8    This program is free software; you can redistribute it and/or modify
   9    it under the terms of the GNU General Public License as published by
  10    the Free Software Foundation; either version 2 of the License, or
  11    (at your option) any later version.
  12
  13    This program is distributed in the hope that it will be useful,
  14    but WITHOUT ANY WARRANTY; without even the implied warranty of
  15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16    GNU General Public License for more details.
  17
  18    You should have received a copy of the GNU General Public License
  19    along with this program; if not, write to the Free Software
  20    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  21 */
  22
  23
  24 #include "includes.h"
  25 #include "libnet/libnet.h"
  26 #include "librpc/gen_ndr/ndr_netlogon.h"
  27 #include "librpc/gen_ndr/ndr_samr.h"
  28
  29
  30 /**
  31  * Decrypt and extract the user's passwords.
  32  *
  33  * The writes decrypted (no longer 'RID encrypted' or arcfour encrypted) passwords back into the structure
  34  */
  35 static NTSTATUS fix_user(TALLOC_CTX *mem_ctx,
  36                          struct creds_CredentialState *creds,
  37                          enum netr_SamDatabaseID database,
  38                          struct netr_DELTA_ENUM *delta,
  39                          char **error_string)
  40 {
  41
  42         uint32_t rid = delta->delta_id_union.rid;
  43         struct netr_DELTA_USER *user = delta->delta_union.user;
  44         struct samr_Password lm_hash;
  45         struct samr_Password nt_hash;
  46         const char *username = user->account_name.string;
  47         NTSTATUS nt_status;
  48
  49         if (user->lm_password_present) {
  50                 sam_rid_crypt(rid, user->lmpassword.hash, lm_hash.hash, 0);
  51                 user->lmpassword = lm_hash;
  52         }
  53
  54         if (user->nt_password_present) {
  55                 sam_rid_crypt(rid, user->ntpassword.hash, nt_hash.hash, 0);
  56                 user->ntpassword = nt_hash;
  57         }
  58
  59         if (user->user_private_info.SensitiveData) {
  60                 DATA_BLOB data;
  61                 struct netr_USER_KEYS keys;
  62                 data.data = user->user_private_info.SensitiveData;
  63                 data.length = user->user_private_info.DataLength;
  64                 creds_arcfour_crypt(creds, data.data, data.length);
  65                 user->user_private_info.SensitiveData = data.data;
  66                 user->user_private_info.DataLength = data.length;
  67
  68                 nt_status = ndr_pull_struct_blob(&data, mem_ctx, &keys, (ndr_pull_flags_fn_t)ndr_pull_netr_USER_KEYS);
  69                 if (NT_STATUS_IS_OK(nt_status)) {
  70                         if (keys.keys.keys2.lmpassword.length == 16) {
  71                                 sam_rid_crypt(rid, keys.keys.keys2.lmpassword.pwd.hash, lm_hash.hash, 0);
  72                                 user->lmpassword = lm_hash;
  73                                 user->lm_password_present = True;
  74                         }
  75                         if (keys.keys.keys2.ntpassword.length == 16) {
  76                                 sam_rid_crypt(rid, keys.keys.keys2.ntpassword.pwd.hash, nt_hash.hash, 0);
  77                                 user->ntpassword = nt_hash;
  78                                 user->nt_password_present = True;
  79                         }
  80                 } else {
  81                         *error_string = talloc_asprintf(mem_ctx, "Failed to parse Sensitive Data for %s:\n", username);
  82                         dump_data(10, data.data, data.length);
  83                         return nt_status;
  84                 }
  85         }
  86         return NT_STATUS_OK;
  87 }
  88
  89 /**
  90  * Decrypt and extract the secrets
  91  *
  92  * The writes decrypted secrets back into the structure
  93  */
  94 static NTSTATUS fix_secret(TALLOC_CTX *mem_ctx,
  95                            struct creds_CredentialState *creds,
  96                            enum netr_SamDatabaseID database,
  97                            struct netr_DELTA_ENUM *delta,
  98                            char **error_string)
  99 {
 100         struct netr_DELTA_SECRET *secret = delta->delta_union.secret;
 101         creds_arcfour_crypt(creds, secret->current_cipher.cipher_data,
 102                             secret->current_cipher.maxlen);
 103
 104         creds_arcfour_crypt(creds, secret->old_cipher.cipher_data,
 105                             secret->old_cipher.maxlen);
 106
 107         return NT_STATUS_OK;
 108 }
 109
 110 /**
 111  * Fix up the delta, dealing with encryption issues so that the final
 112  * callback need only do the printing or application logic
 113  */
 114
 115 static NTSTATUS fix_delta(TALLOC_CTX *mem_ctx,
 116                           struct creds_CredentialState *creds,
 117                           enum netr_SamDatabaseID database,
 118                           struct netr_DELTA_ENUM *delta,
 119                           char **error_string)
 120 {
 121         NTSTATUS nt_status = NT_STATUS_OK;
 122         *error_string = NULL;
 123         switch (delta->delta_type) {
 124         case NETR_DELTA_USER:
 125         {
 126                 nt_status = fix_user(mem_ctx,
 127                                      creds,
 128                                      database,
 129                                      delta,
 130                                      error_string);
 131                 break;
 132         }
 133         case NETR_DELTA_SECRET:
 134         {
 135                 nt_status = fix_secret(mem_ctx,
 136                                        creds,
 137                                        database,
 138                                        delta,
 139                                        error_string);
 140                 break;
 141         }
 142         default:
 143                 break;
 144         }
 145         return nt_status;
 146 }
 147
 148 NTSTATUS libnet_SamSync_netlogon(struct libnet_context *ctx, TALLOC_CTX *mem_ctx, struct libnet_SamSync *r)
 149 {
 150         NTSTATUS nt_status, dbsync_nt_status;
 151         TALLOC_CTX *samsync_ctx, *loop_ctx, *delta_ctx;
 152         struct creds_CredentialState *creds;
 153         struct netr_DatabaseSync dbsync;
 154         struct cli_credentials *machine_account;
 155         struct dcerpc_binding *b;
 156         struct dcerpc_pipe *p;
 157         const enum netr_SamDatabaseID database_ids[] = {SAM_DATABASE_DOMAIN, SAM_DATABASE_BUILTIN, SAM_DATABASE_PRIVS};
 158         int i;
 159
 160         /* TODO: This is bogus */
 161         const char **bindings = lp_passwordserver();
 162         const char *binding;
 163
 164         if (bindings && bindings[0]) {
 165                 binding = bindings[0];
 166         }
 167
 168         samsync_ctx = talloc_named(mem_ctx, 0, "SamSync top context");
 169
 170         if (!r->machine_account) {
 171                 machine_account = cli_credentials_init(samsync_ctx);
 172                 if (!machine_account) {
 173                         talloc_free(samsync_ctx);
 174                         return NT_STATUS_NO_MEMORY;
 175                 }
 176                 cli_credentials_set_conf(machine_account);
 177                 nt_status = cli_credentials_set_machine_account(machine_account);
 178                 if (!NT_STATUS_IS_OK(nt_status)) {
 179                         r->error_string = talloc_strdup(mem_ctx, "Could not obtain machine account password - are we joined to the domain?");
 180                         talloc_free(samsync_ctx);
 181                         return nt_status;
 182                 }
 183         } else {
 184                 machine_account = r->machine_account;
 185         }
 186
 187         if (cli_credentials_get_secure_channel_type(machine_account) != SEC_CHAN_BDC) {
 188                 r->error_string
 189                         = talloc_asprintf(mem_ctx,
 190                                           "Our join to domain %s is not as a BDC (%d), please rejoin as a BDC",
 191
 192                                           cli_credentials_get_domain(machine_account),
 193                                           cli_credentials_get_secure_channel_type(machine_account));
 194                 talloc_free(samsync_ctx);
 195                 return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
 196         }
 197
 198         /* Connect to DC (take a binding string for now) */
 199
 200         nt_status = dcerpc_parse_binding(samsync_ctx, binding, &b);
 201         if (!NT_STATUS_IS_OK(nt_status)) {
 202                 r->error_string = talloc_asprintf(mem_ctx, "Bad binding string %s\n", binding);
 203                 talloc_free(samsync_ctx);
 204                 return NT_STATUS_INVALID_PARAMETER;
 205         }
 206
 207         /* We like schannel */
 208         b->flags &= ~DCERPC_AUTH_OPTIONS;
 209         b->flags |= DCERPC_SCHANNEL | DCERPC_SEAL /* | DCERPC_SCHANNEL_128 */;
 210
 211         /* Setup schannel */
 212         nt_status = dcerpc_pipe_connect_b(samsync_ctx, &p, b,
 213                                           DCERPC_NETLOGON_UUID,
 214                                           DCERPC_NETLOGON_VERSION,
 215                                           machine_account, ctx->event_ctx);
 216
 217         if (!NT_STATUS_IS_OK(nt_status)) {
 218                 talloc_free(samsync_ctx);
 219                 return nt_status;
 220         }
 221
 222         /* get NETLOGON credentails */
 223
 224         nt_status = dcerpc_schannel_creds(p->conn->security_state.generic_state, samsync_ctx, &creds);
 225         if (!NT_STATUS_IS_OK(nt_status)) {
 226                 r->error_string = talloc_strdup(mem_ctx, "Could not obtain NETLOGON credentials from DCERPC/GENSEC layer");
 227                 talloc_free(samsync_ctx);
 228                 return nt_status;
 229         }
 230
 231         dbsync.in.logon_server = talloc_asprintf(samsync_ctx, "\\\\%s", dcerpc_server_name(p));
 232         dbsync.in.computername = cli_credentials_get_workstation(machine_account);
 233         dbsync.in.preferredmaximumlength = (uint32_t)-1;
 234         ZERO_STRUCT(dbsync.in.return_authenticator);
 235
 236         for (i=0;i< ARRAY_SIZE(database_ids); i++) {
 237                 dbsync.in.sync_context = 0;
 238                 dbsync.in.database_id = database_ids[i];
 239
 240                 do {
 241                         int d;
 242                         loop_ctx = talloc_named(samsync_ctx, 0, "DatabaseSync loop context");
 243                         creds_client_authenticator(creds, &dbsync.in.credential);
 244
 245                         dbsync_nt_status = dcerpc_netr_DatabaseSync(p, loop_ctx, &dbsync);
 246                         if (!NT_STATUS_IS_OK(dbsync_nt_status) &&
 247                             !NT_STATUS_EQUAL(dbsync_nt_status, STATUS_MORE_ENTRIES)) {
 248                                 r->error_string = talloc_asprintf(samsync_ctx, "DatabaseSync failed - %s", nt_errstr(nt_status));
 249                                 talloc_free(samsync_ctx);
 250                                 return nt_status;
 251                         }
 252
 253                         if (!creds_client_check(creds, &dbsync.out.return_authenticator.cred)) {
 254                                 r->error_string = talloc_strdup(samsync_ctx, "Credential chaining failed");
 255                                 talloc_free(samsync_ctx);
 256                                 return NT_STATUS_ACCESS_DENIED;
 257                         }
 258
 259                         dbsync.in.sync_context = dbsync.out.sync_context;
 260
 261                         for (d=0; d < dbsync.out.delta_enum_array->num_deltas; d++) {
 262                                 char *error_string = NULL;
 263                                 delta_ctx = talloc_named(loop_ctx, 0, "DatabaseSync delta context");
 264                                 nt_status = fix_delta(delta_ctx,
 265                                                       creds,
 266                                                       dbsync.in.database_id,
 267                                                       &dbsync.out.delta_enum_array->delta_enum[d],
 268                                                       &error_string);
 269                                 if (!NT_STATUS_IS_OK(nt_status)) {
 270                                         r->error_string = talloc_steal(samsync_ctx, error_string);
 271                                         talloc_free(samsync_ctx);
 272                                         return nt_status;
 273                                 }
 274                                 nt_status = r->delta_fn(delta_ctx,
 275                                                                  r->fn_ctx,
 276                                                                  creds,
 277                                                                  dbsync.in.database_id,
 278                                                                  &dbsync.out.delta_enum_array->delta_enum[d],
 279                                                                  &error_string);
 280                                 if (!NT_STATUS_IS_OK(nt_status)) {
 281                                         r->error_string = talloc_steal(samsync_ctx, error_string);
 282                                         talloc_free(samsync_ctx);
 283                                         return nt_status;
 284                                 }
 285                                 talloc_free(delta_ctx);
 286                         }
 287                         talloc_free(loop_ctx);
 288                 } while (NT_STATUS_EQUAL(dbsync_nt_status, STATUS_MORE_ENTRIES));
 289                 nt_status = dbsync_nt_status;
 290         }
 291         talloc_free(samsync_ctx);
 292         return nt_status;
 293 }
 294