2 Unix SMB/CIFS implementation.
4 Copyright (C) Andrew Bartlett <abartlet@samba.org> 2004-2005
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
23 #include "libnet/libnet.h"
24 #include "librpc/gen_ndr/ndr_netlogon.h"
25 #include "librpc/gen_ndr/ndr_samr.h"
27 static NTSTATUS vampire_samdump_handle_user(TALLOC_CTX *mem_ctx,
28 struct creds_CredentialState *creds,
29 struct netr_DELTA_ENUM *delta)
31 uint32_t rid = delta->delta_id_union.rid;
32 struct netr_DELTA_USER *user = delta->delta_union.user;
33 const char *username = user->account_name.string;
34 char *hex_lm_password;
35 char *hex_nt_password;
37 hex_lm_password = smbpasswd_sethexpwd(mem_ctx,
38 user->lm_password_present ? &user->lmpassword : NULL,
40 hex_nt_password = smbpasswd_sethexpwd(mem_ctx,
41 user->nt_password_present ? &user->ntpassword : NULL,
44 printf("%s:%d:%s:%s:%s:LCT-%08X\n", username,
45 rid, hex_lm_password, hex_nt_password,
46 smbpasswd_encode_acb_info(mem_ctx, user->acct_flags),
47 (unsigned int)nt_time_to_unix(user->last_password_change));
52 static NTSTATUS libnet_samdump_fn(TALLOC_CTX *mem_ctx,
54 struct creds_CredentialState *creds,
55 enum netr_SamDatabaseID database,
56 struct netr_DELTA_ENUM *delta,
59 NTSTATUS nt_status = NT_STATUS_OK;
62 case SAM_DATABASE_DOMAIN:
64 switch (delta->delta_type) {
67 nt_status = vampire_samdump_handle_user(mem_ctx,
80 * Decrypt and extract the user's passwords.
82 * The writes decrypted (no longer 'RID encrypted' or arcfour encrypted) passwords back into the structure
84 static NTSTATUS fix_user(TALLOC_CTX *mem_ctx,
85 struct creds_CredentialState *creds,
86 enum netr_SamDatabaseID database,
87 struct netr_DELTA_ENUM *delta,
91 uint32_t rid = delta->delta_id_union.rid;
92 struct netr_DELTA_USER *user = delta->delta_union.user;
93 struct samr_Password lm_hash;
94 struct samr_Password nt_hash;
95 const char *username = user->account_name.string;
98 if (user->lm_password_present) {
99 sam_rid_crypt(rid, user->lmpassword.hash, lm_hash.hash, 0);
100 user->lmpassword = lm_hash;
103 if (user->nt_password_present) {
104 sam_rid_crypt(rid, user->ntpassword.hash, nt_hash.hash, 0);
105 user->ntpassword = nt_hash;
108 if (user->user_private_info.SensitiveData) {
110 struct netr_USER_KEYS keys;
111 data.data = user->user_private_info.SensitiveData;
112 data.length = user->user_private_info.DataLength;
113 creds_arcfour_crypt(creds, data.data, data.length);
114 user->user_private_info.SensitiveData = data.data;
115 user->user_private_info.DataLength = data.length;
117 nt_status = ndr_pull_struct_blob(&data, mem_ctx, &keys, (ndr_pull_flags_fn_t)ndr_pull_netr_USER_KEYS);
118 if (NT_STATUS_IS_OK(nt_status)) {
119 if (keys.keys.keys2.lmpassword.length == 16) {
120 sam_rid_crypt(rid, keys.keys.keys2.lmpassword.pwd.hash, lm_hash.hash, 0);
121 user->lmpassword = lm_hash;
122 user->lm_password_present = True;
124 if (keys.keys.keys2.ntpassword.length == 16) {
125 sam_rid_crypt(rid, keys.keys.keys2.ntpassword.pwd.hash, nt_hash.hash, 0);
126 user->ntpassword = nt_hash;
127 user->nt_password_present = True;
130 *error_string = talloc_asprintf(mem_ctx, "Failed to parse Sensitive Data for %s:\n", username);
131 dump_data(10, data.data, data.length);
139 * Fix up the delta, dealing with encryption issues so that the final
140 * callback need only do the printing or application logic
143 static NTSTATUS fix_delta(TALLOC_CTX *mem_ctx,
144 struct creds_CredentialState *creds,
145 enum netr_SamDatabaseID database,
146 struct netr_DELTA_ENUM *delta,
149 NTSTATUS nt_status = NT_STATUS_OK;
150 *error_string = NULL;
151 switch (delta->delta_type) {
152 case NETR_DELTA_USER:
154 nt_status = fix_user(mem_ctx,
165 static NTSTATUS libnet_SamSync_netlogon(struct libnet_context *ctx, TALLOC_CTX *mem_ctx, union libnet_SamSync *r)
167 NTSTATUS nt_status, dbsync_nt_status;
168 TALLOC_CTX *loop_ctx, *delta_ctx;
169 struct creds_CredentialState *creds;
170 struct netr_DatabaseSync dbsync;
171 struct cli_credentials *machine_account;
172 struct dcerpc_binding *b;
173 struct dcerpc_pipe *p;
174 const enum netr_SamDatabaseID database_ids[] = {SAM_DATABASE_DOMAIN, SAM_DATABASE_BUILTIN, SAM_DATABASE_PRIVS};
177 /* TODO: This is bogus */
178 const char **bindings = lp_passwordserver();
181 if (bindings && bindings[0]) {
182 binding = bindings[0];
185 machine_account = cli_credentials_init(mem_ctx);
186 if (!machine_account) {
187 return NT_STATUS_NO_MEMORY;
190 cli_credentials_set_conf(machine_account);
191 nt_status = cli_credentials_set_machine_account(machine_account);
193 if (!NT_STATUS_IS_OK(nt_status)) {
194 r->netlogon.error_string = talloc_strdup(mem_ctx, "Could not obtain machine account password - are we joined to the domain?");
198 if (cli_credentials_get_secure_channel_type(machine_account) != SEC_CHAN_BDC) {
199 r->netlogon.error_string
200 = talloc_asprintf(mem_ctx,
201 "Our join to domain %s is not as a BDC (%d), please rejoin as a BDC",
203 cli_credentials_get_domain(machine_account),
204 cli_credentials_get_secure_channel_type(machine_account));
205 return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
208 /* Connect to DC (take a binding string for now) */
210 nt_status = dcerpc_parse_binding(mem_ctx, binding, &b);
211 if (!NT_STATUS_IS_OK(nt_status)) {
212 r->netlogon.error_string = talloc_asprintf(mem_ctx, "Bad binding string %s\n", binding);
213 return NT_STATUS_INVALID_PARAMETER;
216 /* We like schannel */
217 b->flags &= ~DCERPC_AUTH_OPTIONS;
218 b->flags |= DCERPC_SCHANNEL | DCERPC_SEAL | DCERPC_SCHANNEL_128;
221 nt_status = dcerpc_pipe_connect_b(mem_ctx, &p, b,
222 DCERPC_NETLOGON_UUID,
223 DCERPC_NETLOGON_VERSION,
226 if (!NT_STATUS_IS_OK(nt_status)) {
230 /* get NETLOGON credentails */
232 nt_status = dcerpc_schannel_creds(p->conn->security_state.generic_state, mem_ctx, &creds);
233 if (!NT_STATUS_IS_OK(nt_status)) {
234 r->netlogon.error_string = talloc_strdup(mem_ctx, "Could not obtain NETLOGON credentials from DCERPC/GENSEC layer");
238 dbsync.in.logon_server = talloc_asprintf(mem_ctx, "\\\\%s", dcerpc_server_name(p));
239 dbsync.in.computername = cli_credentials_get_workstation(machine_account);
240 dbsync.in.preferredmaximumlength = (uint32_t)-1;
241 ZERO_STRUCT(dbsync.in.return_authenticator);
243 for (i=0;i< ARRAY_SIZE(database_ids); i++) {
244 dbsync.in.sync_context = 0;
245 dbsync.in.database_id = database_ids[i];
249 loop_ctx = talloc_named(mem_ctx, 0, "DatabaseSync loop context");
250 creds_client_authenticator(creds, &dbsync.in.credential);
252 dbsync_nt_status = dcerpc_netr_DatabaseSync(p, loop_ctx, &dbsync);
253 if (!NT_STATUS_IS_OK(dbsync_nt_status) &&
254 !NT_STATUS_EQUAL(dbsync_nt_status, STATUS_MORE_ENTRIES)) {
255 r->netlogon.error_string = talloc_asprintf(mem_ctx, "DatabaseSync failed - %s", nt_errstr(nt_status));
259 if (!creds_client_check(creds, &dbsync.out.return_authenticator.cred)) {
260 r->netlogon.error_string = talloc_strdup(mem_ctx, "Credential chaining failed");
261 return NT_STATUS_ACCESS_DENIED;
264 dbsync.in.sync_context = dbsync.out.sync_context;
266 for (d=0; d < dbsync.out.delta_enum_array->num_deltas; d++) {
267 char *error_string = NULL;
268 delta_ctx = talloc_named(loop_ctx, 0, "DatabaseSync delta context");
269 nt_status = fix_delta(delta_ctx,
271 dbsync.in.database_id,
272 &dbsync.out.delta_enum_array->delta_enum[d],
274 if (!NT_STATUS_IS_OK(nt_status)) {
275 r->netlogon.error_string = talloc_steal(mem_ctx, error_string);
276 talloc_free(delta_ctx);
279 nt_status = r->netlogon.delta_fn(delta_ctx,
282 dbsync.in.database_id,
283 &dbsync.out.delta_enum_array->delta_enum[d],
285 if (!NT_STATUS_IS_OK(nt_status)) {
286 r->netlogon.error_string = talloc_steal(mem_ctx, error_string);
287 talloc_free(delta_ctx);
290 talloc_free(delta_ctx);
292 talloc_free(loop_ctx);
293 } while (NT_STATUS_EQUAL(dbsync_nt_status, STATUS_MORE_ENTRIES));
294 nt_status = dbsync_nt_status;
299 NTSTATUS libnet_SamDump_netlogon(struct libnet_context *ctx, TALLOC_CTX *mem_ctx, union libnet_SamDump *r)
302 union libnet_SamSync r2;
304 r2.netlogon.level = LIBNET_SAMDUMP_NETLOGON;
305 r2.netlogon.error_string = NULL;
306 r2.netlogon.delta_fn = libnet_samdump_fn;
307 r2.netlogon.fn_ctx = NULL;
308 nt_status = libnet_SamSync_netlogon(ctx, mem_ctx, &r2);
309 r->generic.error_string = r2.netlogon.error_string;
317 NTSTATUS libnet_SamDump_generic(struct libnet_context *ctx, TALLOC_CTX *mem_ctx, union libnet_SamDump *r)
320 union libnet_SamDump r2;
322 r2.generic.level = LIBNET_SAMDUMP_NETLOGON;
323 r2.generic.error_string = NULL;
324 nt_status = libnet_SamDump(ctx, mem_ctx, &r2);
325 r->generic.error_string = r2.netlogon.error_string;
331 NTSTATUS libnet_SamDump(struct libnet_context *ctx, TALLOC_CTX *mem_ctx, union libnet_SamDump *r)
333 switch (r->generic.level) {
334 case LIBNET_SAMDUMP_GENERIC:
335 return libnet_SamDump_generic(ctx, mem_ctx, r);
336 case LIBNET_SAMDUMP_NETLOGON:
337 return libnet_SamDump_netlogon(ctx, mem_ctx, r);
340 return NT_STATUS_INVALID_LEVEL;