net_vampire: more libnet_samsync restructuring.
[kai/samba.git] / source3 / libnet / libnet_samsync.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    Copyright (C) Guenther Deschner <gd@samba.org> 2008
8
9    This program is free software; you can redistribute it and/or modify
10    it under the terms of the GNU General Public License as published by
11    the Free Software Foundation; either version 3 of the License, or
12    (at your option) any later version.
13
14    This program is distributed in the hope that it will be useful,
15    but WITHOUT ANY WARRANTY; without even the implied warranty of
16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17    GNU General Public License for more details.
18
19    You should have received a copy of the GNU General Public License
20    along with this program.  If not, see <http://www.gnu.org/licenses/>.
21 */
22
23
24 #include "includes.h"
25 #include "libnet/libnet_samsync.h"
26
27 /**
28  * Decrypt and extract the user's passwords.
29  *
30  * The writes decrypted (no longer 'RID encrypted' or arcfour encrypted)
31  * passwords back into the structure
32  */
33
34 static NTSTATUS fix_user(TALLOC_CTX *mem_ctx,
35                          DATA_BLOB *session_key,
36                          bool rid_crypt,
37                          enum netr_SamDatabaseID database_id,
38                          struct netr_DELTA_ENUM *delta)
39 {
40
41         uint32_t rid = delta->delta_id_union.rid;
42         struct netr_DELTA_USER *user = delta->delta_union.user;
43         struct samr_Password lm_hash;
44         struct samr_Password nt_hash;
45
46         if (rid_crypt) {
47                 if (user->lm_password_present) {
48                         sam_pwd_hash(rid, user->lmpassword.hash, lm_hash.hash, 0);
49                         user->lmpassword = lm_hash;
50                 }
51
52                 if (user->nt_password_present) {
53                         sam_pwd_hash(rid, user->ntpassword.hash, nt_hash.hash, 0);
54                         user->ntpassword = nt_hash;
55                 }
56         }
57
58         if (user->user_private_info.SensitiveData) {
59                 DATA_BLOB data;
60                 struct netr_USER_KEYS keys;
61                 enum ndr_err_code ndr_err;
62                 data.data = user->user_private_info.SensitiveData;
63                 data.length = user->user_private_info.DataLength;
64                 SamOEMhashBlob(data.data, data.length, session_key);
65                 user->user_private_info.SensitiveData = data.data;
66                 user->user_private_info.DataLength = data.length;
67
68                 ndr_err = ndr_pull_struct_blob(&data, mem_ctx, &keys,
69                         (ndr_pull_flags_fn_t)ndr_pull_netr_USER_KEYS);
70                 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
71                         dump_data(10, data.data, data.length);
72                         return ndr_map_error2ntstatus(ndr_err);
73                 }
74
75                 if (keys.keys.keys2.lmpassword.length == 16) {
76                         if (rid_crypt) {
77                                 sam_pwd_hash(rid,
78                                              keys.keys.keys2.lmpassword.pwd.hash,
79                                              lm_hash.hash, 0);
80                                 user->lmpassword = lm_hash;
81                         } else {
82                                 user->lmpassword = keys.keys.keys2.lmpassword.pwd;
83                         }
84                         user->lm_password_present = true;
85                 }
86                 if (keys.keys.keys2.ntpassword.length == 16) {
87                         if (rid_crypt) {
88                                 sam_pwd_hash(rid,
89                                              keys.keys.keys2.ntpassword.pwd.hash,
90                                              nt_hash.hash, 0);
91                                 user->ntpassword = nt_hash;
92                         } else {
93                                 user->ntpassword = keys.keys.keys2.ntpassword.pwd;
94                         }
95                         user->nt_password_present = true;
96                 }
97                 /* TODO: rid decrypt history fields */
98         }
99         return NT_STATUS_OK;
100 }
101
102 /**
103  * Decrypt and extract the secrets
104  *
105  * The writes decrypted secrets back into the structure
106  */
107 static NTSTATUS fix_secret(TALLOC_CTX *mem_ctx,
108                            DATA_BLOB *session_key,
109                            enum netr_SamDatabaseID database_id,
110                            struct netr_DELTA_ENUM *delta)
111 {
112         struct netr_DELTA_SECRET *secret = delta->delta_union.secret;
113
114         SamOEMhashBlob(secret->current_cipher.cipher_data,
115                        secret->current_cipher.maxlen,
116                        session_key);
117
118         SamOEMhashBlob(secret->old_cipher.cipher_data,
119                        secret->old_cipher.maxlen,
120                        session_key);
121
122         return NT_STATUS_OK;
123 }
124
125 /**
126  * Fix up the delta, dealing with encryption issues so that the final
127  * callback need only do the printing or application logic
128  */
129
130 static NTSTATUS samsync_fix_delta(TALLOC_CTX *mem_ctx,
131                                   DATA_BLOB *session_key,
132                                   bool rid_crypt,
133                                   enum netr_SamDatabaseID database_id,
134                                   struct netr_DELTA_ENUM *delta)
135 {
136         NTSTATUS status = NT_STATUS_OK;
137
138         switch (delta->delta_type) {
139                 case NETR_DELTA_USER:
140
141                         status = fix_user(mem_ctx,
142                                           session_key,
143                                           rid_crypt,
144                                           database_id,
145                                           delta);
146                         break;
147                 case NETR_DELTA_SECRET:
148
149                         status = fix_secret(mem_ctx,
150                                             session_key,
151                                             database_id,
152                                             delta);
153                         break;
154                 default:
155                         break;
156         }
157
158         return status;
159 }
160
161 /**
162  * Fix up the delta, dealing with encryption issues so that the final
163  * callback need only do the printing or application logic
164  */
165
166 static NTSTATUS samsync_fix_delta_array(TALLOC_CTX *mem_ctx,
167                                         DATA_BLOB *session_key,
168                                         bool rid_crypt,
169                                         enum netr_SamDatabaseID database_id,
170                                         struct netr_DELTA_ENUM_ARRAY *r)
171 {
172         NTSTATUS status;
173         int i;
174
175         for (i = 0; i < r->num_deltas; i++) {
176
177                 status = samsync_fix_delta(mem_ctx,
178                                            session_key,
179                                            rid_crypt,
180                                            database_id,
181                                            &r->delta_enum[i]);
182                 if (!NT_STATUS_IS_OK(status)) {
183                         return status;
184                 }
185         }
186
187         return NT_STATUS_OK;
188 }
189
190 /**
191  * libnet_samsync_init_context
192  */
193
194 NTSTATUS libnet_samsync_init_context(TALLOC_CTX *mem_ctx,
195                                      const struct dom_sid *domain_sid,
196                                      struct samsync_context **ctx_p)
197 {
198         struct samsync_context *ctx;
199
200         *ctx_p = NULL;
201
202         ctx = TALLOC_ZERO_P(mem_ctx, struct samsync_context);
203         NT_STATUS_HAVE_NO_MEMORY(ctx);
204
205         if (domain_sid) {
206                 ctx->domain_sid = sid_dup_talloc(mem_ctx, domain_sid);
207                 NT_STATUS_HAVE_NO_MEMORY(ctx->domain_sid);
208
209                 ctx->domain_sid_str = sid_string_talloc(mem_ctx, ctx->domain_sid);
210                 NT_STATUS_HAVE_NO_MEMORY(ctx->domain_sid_str);
211         }
212
213         *ctx_p = ctx;
214
215         return NT_STATUS_OK;
216 }
217
218 /**
219  * samsync_database_str
220  */
221
222 static const char *samsync_database_str(enum netr_SamDatabaseID database_id)
223 {
224
225         switch (database_id) {
226                 case SAM_DATABASE_DOMAIN:
227                         return "DOMAIN";
228                 case SAM_DATABASE_BUILTIN:
229                         return "BUILTIN";
230                 case SAM_DATABASE_PRIVS:
231                         return "PRIVS";
232                 default:
233                         return "unknown";
234         }
235 }
236
237 /**
238  * samsync_debug_str
239  */
240
241 static const char *samsync_debug_str(TALLOC_CTX *mem_ctx,
242                                      enum net_samsync_mode mode,
243                                      enum netr_SamDatabaseID database_id)
244 {
245         const char *action = NULL;
246
247         switch (mode) {
248                 case NET_SAMSYNC_MODE_DUMP:
249                         action = "Dumping (to stdout)";
250                         break;
251                 case NET_SAMSYNC_MODE_FETCH_PASSDB:
252                         action = "Fetching (to passdb)";
253                         break;
254                 case NET_SAMSYNC_MODE_FETCH_LDIF:
255                         action = "Fetching (to ldif)";
256                         break;
257                 default:
258                         action = "Unknown";
259                         break;
260         }
261
262         return talloc_asprintf(mem_ctx, "%s %s database",
263                                 action, samsync_database_str(database_id));
264 }
265
266 /**
267  * libnet_samsync
268  */
269
270 NTSTATUS libnet_samsync(enum netr_SamDatabaseID database_id,
271                         struct samsync_context *ctx)
272 {
273         NTSTATUS result;
274         TALLOC_CTX *mem_ctx;
275         const char *logon_server = ctx->cli->desthost;
276         const char *computername = global_myname();
277         struct netr_Authenticator credential;
278         struct netr_Authenticator return_authenticator;
279         uint16_t restart_state = 0;
280         uint32_t sync_context = 0;
281         const char *debug_str;
282         DATA_BLOB session_key;
283
284         ZERO_STRUCT(return_authenticator);
285
286         if (!(mem_ctx = talloc_init("libnet_samsync"))) {
287                 return NT_STATUS_NO_MEMORY;
288         }
289
290         debug_str = samsync_debug_str(mem_ctx, ctx->mode, database_id);
291         if (debug_str) {
292                 d_fprintf(stderr, "%s\n", debug_str);
293         }
294
295         do {
296                 struct netr_DELTA_ENUM_ARRAY *delta_enum_array = NULL;
297                 NTSTATUS callback_status;
298
299                 netlogon_creds_client_step(ctx->cli->dc, &credential);
300
301                 result = rpccli_netr_DatabaseSync2(ctx->cli, mem_ctx,
302                                                    logon_server,
303                                                    computername,
304                                                    &credential,
305                                                    &return_authenticator,
306                                                    database_id,
307                                                    restart_state,
308                                                    &sync_context,
309                                                    &delta_enum_array,
310                                                    0xffff);
311                 if (NT_STATUS_EQUAL(result, NT_STATUS_NOT_SUPPORTED)) {
312                         return result;
313                 }
314
315                 /* Check returned credentials. */
316                 if (!netlogon_creds_client_check(ctx->cli->dc,
317                                                  &return_authenticator.cred)) {
318                         DEBUG(0,("credentials chain check failed\n"));
319                         return NT_STATUS_ACCESS_DENIED;
320                 }
321
322                 if (NT_STATUS_IS_ERR(result)) {
323                         break;
324                 }
325
326                 session_key = data_blob_const(ctx->cli->dc->sess_key, 16);
327
328                 samsync_fix_delta_array(mem_ctx,
329                                         &session_key,
330                                         false,
331                                         database_id,
332                                         delta_enum_array);
333
334                 /* Process results */
335                 callback_status = ctx->delta_fn(mem_ctx, database_id,
336                                                 delta_enum_array, result, ctx);
337                 if (!NT_STATUS_IS_OK(callback_status)) {
338                         result = callback_status;
339                         goto out;
340                 }
341
342                 TALLOC_FREE(delta_enum_array);
343
344                 /* Increment sync_context */
345                 sync_context += 1;
346
347         } while (NT_STATUS_EQUAL(result, STATUS_MORE_ENTRIES));
348
349  out:
350         if (NT_STATUS_IS_ERR(result) && !ctx->error_message) {
351
352                 ctx->error_message = talloc_asprintf(ctx,
353                         "Failed to fetch %s database: %s",
354                         samsync_database_str(database_id),
355                         nt_errstr(result));
356
357                 if (NT_STATUS_EQUAL(result, NT_STATUS_NOT_SUPPORTED)) {
358
359                         ctx->error_message =
360                                 talloc_asprintf_append(ctx->error_message,
361                                         "\nPerhaps %s is a Windows native mode domain?",
362                                         ctx->domain_name);
363                 }
364         }
365
366         talloc_destroy(mem_ctx);
367
368         return result;
369 }
370
371 /**
372  * pull_netr_AcctLockStr
373  */
374
375 NTSTATUS pull_netr_AcctLockStr(TALLOC_CTX *mem_ctx,
376                                struct lsa_BinaryString *r,
377                                struct netr_AcctLockStr **str_p)
378 {
379         struct netr_AcctLockStr *str;
380         enum ndr_err_code ndr_err;
381         DATA_BLOB blob;
382
383         if (!mem_ctx || !r || !str_p) {
384                 return NT_STATUS_INVALID_PARAMETER;
385         }
386
387         *str_p = NULL;
388
389         str = TALLOC_ZERO_P(mem_ctx, struct netr_AcctLockStr);
390         if (!str) {
391                 return NT_STATUS_NO_MEMORY;
392         }
393
394         blob = data_blob_const(r->array, r->length);
395
396         ndr_err = ndr_pull_struct_blob(&blob, mem_ctx, str,
397                        (ndr_pull_flags_fn_t)ndr_pull_netr_AcctLockStr);
398
399         if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
400                 return ndr_map_error2ntstatus(ndr_err);
401         }
402
403         *str_p = str;
404
405         return NT_STATUS_OK;
406 }
407