make sure we don't try to decode any null password buffers during a
[jra/samba/.git] / source3 / utils / net_rpc_samsync.c
1 /* 
2    Unix SMB/CIFS implementation.
3    dump the remote SAM using rpc samsync operations
4
5    Copyright (C) Andrew Tridgell 2002
6    Copyright (C) Tim Potter 2001,2002
7    Modified by Volker Lendecke 2002
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 2 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, write to the Free Software
21    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22 */
23
24 #include "includes.h"
25 #include "../utils/net.h"
26
27 extern DOM_SID global_sid_Builtin; 
28
29 static void display_group_mem_info(uint32 rid, SAM_GROUP_MEM_INFO *g)
30 {
31         int i;
32         d_printf("Group mem %u: ", rid);
33         for (i=0;i<g->num_members;i++) {
34                 d_printf("%u ", g->rids[i]);
35         }
36         d_printf("\n");
37 }
38
39 static void display_alias_info(uint32 rid, SAM_ALIAS_INFO *a)
40 {
41         d_printf("Alias '%s' ", unistr2_static(&a->uni_als_name));
42         d_printf("desc='%s' rid=%u\n", unistr2_static(&a->uni_als_desc), a->als_rid);
43 }
44
45 static void display_alias_mem(uint32 rid, SAM_ALIAS_MEM_INFO *a)
46 {
47         int i;
48         d_printf("Alias rid %u: ", rid);
49         for (i=0;i<a->num_members;i++) {
50                 d_printf("%s ", sid_string_static(&a->sids[i].sid));
51         }
52         d_printf("\n");
53 }
54
55 static void display_account_info(uint32 rid, SAM_ACCOUNT_INFO *a)
56 {
57         fstring hex_nt_passwd, hex_lm_passwd;
58         uchar lm_passwd[16], nt_passwd[16];
59         static uchar zero_buf[16];
60
61         /* Decode hashes from password hash (if they are not NULL) */
62         
63         if (memcmp(a->pass.buf_lm_pwd, zero_buf, 16) != 0) {
64                 sam_pwd_hash(a->user_rid, a->pass.buf_lm_pwd, lm_passwd, 0);
65                 smbpasswd_sethexpwd(hex_lm_passwd, lm_passwd, a->acb_info);
66         } else {
67                 smbpasswd_sethexpwd(hex_lm_passwd, NULL, 0);
68         }
69
70         if (memcmp(a->pass.buf_nt_pwd, zero_buf, 16) != 0) {
71                 sam_pwd_hash(a->user_rid, a->pass.buf_nt_pwd, nt_passwd, 0);
72                 smbpasswd_sethexpwd(hex_nt_passwd, nt_passwd, a->acb_info);
73         } else {
74                 smbpasswd_sethexpwd(hex_nt_passwd, NULL, 0);
75         }
76         
77         printf("%s:%d:%s:%s:%s:LCT-0\n", unistr2_static(&a->uni_acct_name),
78                a->user_rid, hex_lm_passwd, hex_nt_passwd,
79                smbpasswd_encode_acb_info(a->acb_info));
80 }
81
82 static void display_domain_info(SAM_DOMAIN_INFO *a)
83 {
84         d_printf("Domain name: %s\n", unistr2_static(&a->uni_dom_name));
85 }
86
87 static void display_group_info(uint32 rid, SAM_GROUP_INFO *a)
88 {
89         d_printf("Group '%s' ", unistr2_static(&a->uni_grp_name));
90         d_printf("desc='%s', rid=%u\n", unistr2_static(&a->uni_grp_desc), rid);
91 }
92
93 static void display_sam_entry(SAM_DELTA_HDR *hdr_delta, SAM_DELTA_CTR *delta)
94 {
95         switch (hdr_delta->type) {
96         case SAM_DELTA_ACCOUNT_INFO:
97                 display_account_info(hdr_delta->target_rid, &delta->account_info);
98                 break;
99         case SAM_DELTA_GROUP_MEM:
100                 display_group_mem_info(hdr_delta->target_rid, &delta->grp_mem_info);
101                 break;
102         case SAM_DELTA_ALIAS_INFO:
103                 display_alias_info(hdr_delta->target_rid, &delta->alias_info);
104                 break;
105         case SAM_DELTA_ALIAS_MEM:
106                 display_alias_mem(hdr_delta->target_rid, &delta->als_mem_info);
107                 break;
108         case SAM_DELTA_DOMAIN_INFO:
109                 display_domain_info(&delta->domain_info);
110                 break;
111         case SAM_DELTA_GROUP_INFO:
112                 display_group_info(hdr_delta->target_rid, &delta->group_info);
113                 break;
114         default:
115                 d_printf("Unknown delta record type %d\n", hdr_delta->type);
116                 break;
117         }
118 }
119
120
121 static void dump_database(struct cli_state *cli, unsigned db_type, DOM_CRED *ret_creds)
122 {
123         unsigned sync_context = 0;
124         NTSTATUS result;
125         int i;
126         TALLOC_CTX *mem_ctx;
127         SAM_DELTA_HDR *hdr_deltas;
128         SAM_DELTA_CTR *deltas;
129         uint32 num_deltas;
130
131         if (!(mem_ctx = talloc_init())) {
132                 return;
133         }
134
135         d_printf("Dumping database %u\n", db_type);
136
137         do {
138                 result = cli_netlogon_sam_sync(cli, mem_ctx, ret_creds, db_type,
139                                                sync_context,
140                                                &num_deltas, &hdr_deltas, &deltas);
141                 clnt_deal_with_creds(cli->sess_key, &(cli->clnt_cred), ret_creds);
142                 for (i = 0; i < num_deltas; i++) {
143                         display_sam_entry(&hdr_deltas[i], &deltas[i]);
144                 }
145                 sync_context += 1;
146         } while (NT_STATUS_EQUAL(result, STATUS_MORE_ENTRIES));
147
148         talloc_destroy(mem_ctx);
149 }
150
151 /* dump sam database via samsync rpc calls */
152 int rpc_samdump(int argc, const char **argv)
153 {
154         NTSTATUS result;
155         struct cli_state *cli = NULL;
156         uchar trust_password[16];
157         DOM_CRED ret_creds;
158         uint32 neg_flags = 0x000001ff;
159
160
161         ZERO_STRUCT(ret_creds);
162
163         /* Connect to remote machine */
164         if (!(cli = net_make_ipc_connection(NET_FLAGS_ANONYMOUS | NET_FLAGS_PDC))) {
165                 return 1;
166         }
167
168         if (!cli_nt_session_open(cli, PI_NETLOGON)) {
169                 DEBUG(0,("Error connecting to NETLOGON pipe\n"));
170                 goto fail;
171         }
172
173         if (!secrets_fetch_trust_account_password(lp_workgroup(), trust_password, NULL)) {
174                 d_printf("Could not retrieve domain trust secret\n");
175                 goto fail;
176         }
177         
178         result = cli_nt_setup_creds(cli, SEC_CHAN_BDC,  trust_password, &neg_flags, 2);
179         if (!NT_STATUS_IS_OK(result)) {
180                 d_printf("Failed to setup BDC creds\n");
181                 goto fail;
182         }
183
184         dump_database(cli, SAM_DATABASE_DOMAIN, &ret_creds);
185         dump_database(cli, SAM_DATABASE_BUILTIN, &ret_creds);
186         dump_database(cli, SAM_DATABASE_PRIVS, &ret_creds);
187
188         cli_nt_session_close(cli);
189         
190         return 0;
191
192 fail:
193         if (cli) {
194                 cli_nt_session_close(cli);
195         }
196         return -1;
197 }
198
199 /* Convert a SAM_ACCOUNT_DELTA to a SAM_ACCOUNT. */
200
201 static NTSTATUS
202 sam_account_from_delta(SAM_ACCOUNT *account, SAM_ACCOUNT_INFO *delta)
203 {
204         fstring s;
205         uchar lm_passwd[16], nt_passwd[16];
206         static uchar zero_buf[16];
207
208         /* Username, fullname, home dir, dir drive, logon script, acct
209            desc, workstations, profile. */
210
211         unistr2_to_ascii(s, &delta->uni_acct_name, sizeof(s) - 1);
212         pdb_set_nt_username(account, s, PDB_CHANGED);
213
214         /* Unix username is the same - for sainity */
215         pdb_set_username(account, s, PDB_CHANGED);
216
217         unistr2_to_ascii(s, &delta->uni_full_name, sizeof(s) - 1);
218         pdb_set_fullname(account, s, PDB_CHANGED);
219
220         unistr2_to_ascii(s, &delta->uni_home_dir, sizeof(s) - 1);
221         pdb_set_homedir(account, s, PDB_CHANGED);
222
223         unistr2_to_ascii(s, &delta->uni_dir_drive, sizeof(s) - 1);
224         pdb_set_dir_drive(account, s, PDB_CHANGED);
225
226         unistr2_to_ascii(s, &delta->uni_logon_script, sizeof(s) - 1);
227         pdb_set_logon_script(account, s, PDB_CHANGED);
228
229         unistr2_to_ascii(s, &delta->uni_acct_desc, sizeof(s) - 1);
230         pdb_set_acct_desc(account, s, PDB_CHANGED);
231
232         unistr2_to_ascii(s, &delta->uni_workstations, sizeof(s) - 1);
233         pdb_set_workstations(account, s, PDB_CHANGED);
234
235         unistr2_to_ascii(s, &delta->uni_profile, sizeof(s) - 1);
236         pdb_set_profile_path(account, s, PDB_CHANGED);
237
238         /* User and group sid */
239
240         pdb_set_user_sid_from_rid(account, delta->user_rid, PDB_CHANGED);
241         pdb_set_group_sid_from_rid(account, delta->group_rid, PDB_CHANGED);
242
243         /* Logon and password information */
244
245         pdb_set_logon_time(account, nt_time_to_unix(&delta->logon_time), PDB_CHANGED);
246         pdb_set_logoff_time(account, nt_time_to_unix(&delta->logoff_time),
247                             PDB_CHANGED);
248         pdb_set_logon_divs(account, delta->logon_divs, PDB_CHANGED);
249
250         /* TODO: logon hours */
251         /* TODO: bad password count */
252         /* TODO: logon count */
253
254         pdb_set_pass_last_set_time(
255                 account, nt_time_to_unix(&delta->pwd_last_set_time), PDB_CHANGED);
256
257         pdb_set_kickoff_time(account, get_time_t_max(), PDB_CHANGED);
258
259         /* Decode hashes from password hash 
260            Note that win2000 may send us all zeros for the hashes if it doesn't 
261            think this channel is secure enough - don't set the passwords at all
262            in that case
263          */
264         if (memcmp(delta->pass.buf_lm_pwd, zero_buf, 16) != 0) {
265                 sam_pwd_hash(delta->user_rid, delta->pass.buf_lm_pwd, lm_passwd, 0);
266                 pdb_set_lanman_passwd(account, lm_passwd, PDB_CHANGED);
267         }
268
269         if (memcmp(delta->pass.buf_nt_pwd, zero_buf, 16) != 0) {
270                 sam_pwd_hash(delta->user_rid, delta->pass.buf_nt_pwd, nt_passwd, 0);
271                 pdb_set_nt_passwd(account, nt_passwd, PDB_CHANGED);
272         }
273
274         /* TODO: account expiry time */
275
276         pdb_set_acct_ctrl(account, delta->acb_info, PDB_CHANGED);
277         return NT_STATUS_OK;
278 }
279
280 static NTSTATUS
281 fetch_account_info(uint32 rid, SAM_ACCOUNT_INFO *delta)
282 {
283         NTSTATUS nt_ret;
284         fstring account;
285         pstring add_script;
286         SAM_ACCOUNT *sam_account=NULL;
287         GROUP_MAP map;
288         struct group *grp;
289         DOM_SID sid;
290
291         fstrcpy(account, unistr2_static(&delta->uni_acct_name));
292         d_printf("Creating account: %s\n", account);
293
294         if (!NT_STATUS_IS_OK(nt_ret = pdb_init_sam(&sam_account)))
295                 return nt_ret;
296
297         if (!pdb_getsampwnam(sam_account, account)) {
298                 struct passwd *pw;
299
300                 pdb_free_sam(&sam_account);
301
302                 /* Create appropriate user */
303                 if (delta->acb_info & ACB_NORMAL) {
304                         pstrcpy(add_script, lp_adduser_script());
305                 } else if ( (delta->acb_info & ACB_WSTRUST) ||
306                             (delta->acb_info & ACB_SVRTRUST) ) {
307                         pstrcpy(add_script, lp_addmachine_script());
308                 } else {
309                         DEBUG(1, ("Unknown user type: %s\n",
310                                   smbpasswd_encode_acb_info(delta->acb_info)));
311                         pdb_free_sam(&sam_account);
312                         return NT_STATUS_NO_SUCH_USER;
313                 }
314                 if (*add_script) {
315                         int add_ret;
316                         all_string_sub(add_script, "%u", account,
317                                        sizeof(account));
318                         add_ret = smbrun(add_script,NULL);
319                         DEBUG(1,("fetch_account: Running the command `%s' "
320                                  "gave %d\n", add_script, add_ret));
321                 }
322                 pw = getpwnam_alloc(account);
323                 if (pw) {
324                         nt_ret = pdb_init_sam_pw(&sam_account, pw);
325
326                         if (!NT_STATUS_IS_OK(nt_ret)) {
327                                 passwd_free(&pw);
328                                 pdb_free_sam(&sam_account);
329                                 return nt_ret;
330                         }
331                         passwd_free(&pw);
332                 } else {
333                         DEBUG(3, ("Could not create account %s\n", account));
334                         pdb_free_sam(&sam_account);
335                         return NT_STATUS_NO_SUCH_USER;
336                 }
337         }
338
339         sam_account_from_delta(sam_account, delta);
340
341         if (!pdb_add_sam_account(sam_account)) {
342                 DEBUG(1, ("SAM Account for %s already exists, updating\n",
343                           account));
344                 pdb_update_sam_account(sam_account);
345         }
346
347         sid = *pdb_get_group_sid(sam_account);
348
349         if (!pdb_getgrsid(&map, sid, False)) {
350                 DEBUG(0, ("Primary group of %s has no mapping!\n",
351                           pdb_get_username(sam_account)));
352                 pdb_free_sam(&sam_account);
353                 return NT_STATUS_NO_SUCH_GROUP;
354         }
355
356         if (!(grp = getgrgid(map.gid))) {
357                 DEBUG(0, ("Could not find unix group %d for user %s (group SID=%s)\n", 
358                           map.gid, pdb_get_username(sam_account), sid_string_static(&sid)));
359                 pdb_free_sam(&sam_account);
360                 return NT_STATUS_NO_SUCH_GROUP;
361         }
362
363         smb_set_primary_group(grp->gr_name, pdb_get_username(sam_account));
364
365         pdb_free_sam(&sam_account);
366         return NT_STATUS_OK;
367 }
368
369 static NTSTATUS
370 fetch_group_info(uint32 rid, SAM_GROUP_INFO *delta)
371 {
372         fstring name;
373         fstring comment;
374         struct group *grp = NULL;
375         DOM_SID group_sid;
376         fstring sid_string;
377         GROUP_MAP map;
378         BOOL insert = True;
379
380         unistr2_to_ascii(name, &delta->uni_grp_name, sizeof(name)-1);
381         unistr2_to_ascii(comment, &delta->uni_grp_desc, sizeof(comment)-1);
382
383         /* add the group to the mapping table */
384         sid_copy(&group_sid, get_global_sam_sid());
385         sid_append_rid(&group_sid, rid);
386         sid_to_string(sid_string, &group_sid);
387
388         if (pdb_getgrsid(&map, group_sid, False)) {
389                 grp = getgrgid(map.gid);
390                 insert = False;
391         }
392
393         if (grp == NULL)
394         {
395                 gid_t gid;
396
397                 /* No group found from mapping, find it from its name. */
398                 if ((grp = getgrnam(name)) == NULL) {
399                                 /* No appropriate group found, create one */
400                         d_printf("Creating unix group: '%s'\n", name);
401                         if (smb_create_group(name, &gid) != 0)
402                                 return NT_STATUS_ACCESS_DENIED;
403                         if ((grp = getgrgid(gid)) == NULL)
404                                 return NT_STATUS_ACCESS_DENIED;
405                 }
406         }
407
408         map.gid = grp->gr_gid;
409         map.sid = group_sid;
410         map.sid_name_use = SID_NAME_DOM_GRP;
411         fstrcpy(map.nt_name, name);
412         fstrcpy(map.comment, comment);
413
414         map.priv_set.count = 0;
415         map.priv_set.set = NULL;
416
417         if (insert)
418                 pdb_add_group_mapping_entry(&map);
419         else
420                 pdb_update_group_mapping_entry(&map);
421
422         return NT_STATUS_OK;
423 }
424
425 static NTSTATUS
426 fetch_group_mem_info(uint32 rid, SAM_GROUP_MEM_INFO *delta)
427 {
428         int i;
429         TALLOC_CTX *t = NULL;
430         char **nt_members = NULL;
431         char **unix_members;
432         DOM_SID group_sid;
433         GROUP_MAP map;
434         struct group *grp;
435
436         if (delta->num_members == 0) {
437                 return NT_STATUS_OK;
438         }
439
440         sid_copy(&group_sid, get_global_sam_sid());
441         sid_append_rid(&group_sid, rid);
442
443         if (!get_domain_group_from_sid(group_sid, &map, False)) {
444                 DEBUG(0, ("Could not find global group %d\n", rid));
445                 return NT_STATUS_NO_SUCH_GROUP;
446         }
447
448         if (!(grp = getgrgid(map.gid))) {
449                 DEBUG(0, ("Could not find unix group %d\n", map.gid));
450                 return NT_STATUS_NO_SUCH_GROUP;
451         }
452
453         d_printf("Group members of %s: ", grp->gr_name);
454
455         if (!(t = talloc_init())) {
456                 DEBUG(0, ("could not talloc_init\n"));
457                 return NT_STATUS_NO_MEMORY;
458         }
459
460         nt_members = talloc_zero(t, sizeof(char *) * delta->num_members);
461
462         for (i=0; i<delta->num_members; i++) {
463                 NTSTATUS nt_status;
464                 SAM_ACCOUNT *member = NULL;
465                 DOM_SID member_sid;
466
467                 if (!NT_STATUS_IS_OK(nt_status = pdb_init_sam_talloc(t, &member))) {
468                         talloc_destroy(t);
469                         return nt_status;
470                 }
471
472                 sid_copy(&member_sid, get_global_sam_sid());
473                 sid_append_rid(&member_sid, delta->rids[i]);
474
475                 if (!pdb_getsampwsid(member, &member_sid)) {
476                         DEBUG(1, ("Found bogus group member: %d (member_sid=%s group=%s)\n",
477                                   delta->rids[i], sid_string_static(&member_sid), grp->gr_name));
478                         pdb_free_sam(&member);
479                         continue;
480                 }
481
482                 if (pdb_get_group_rid(member) == rid) {
483                         d_printf("%s(primary),", pdb_get_username(member));
484                         pdb_free_sam(&member);
485                         continue;
486                 }
487                 
488                 d_printf("%s,", pdb_get_username(member));
489                 nt_members[i] = talloc_strdup(t, pdb_get_username(member));
490                 pdb_free_sam(&member);
491         }
492
493         d_printf("\n");
494
495         unix_members = grp->gr_mem;
496
497         while (*unix_members) {
498                 BOOL is_nt_member = False;
499                 for (i=0; i<delta->num_members; i++) {
500                         if (nt_members[i] == NULL) {
501                                 /* This was a primary group */
502                                 continue;
503                         }
504
505                         if (strcmp(*unix_members, nt_members[i]) == 0) {
506                                 is_nt_member = True;
507                                 break;
508                         }
509                 }
510                 if (!is_nt_member) {
511                         /* We look at a unix group member that is not
512                            an nt group member. So, remove it. NT is
513                            boss here. */
514                         smb_delete_user_group(grp->gr_name, *unix_members);
515                 }
516                 unix_members += 1;
517         }
518
519         for (i=0; i<delta->num_members; i++) {
520                 BOOL is_unix_member = False;
521
522                 if (nt_members[i] == NULL) {
523                         /* This was the primary group */
524                         continue;
525                 }
526
527                 unix_members = grp->gr_mem;
528
529                 while (*unix_members) {
530                         if (strcmp(*unix_members, nt_members[i]) == 0) {
531                                 is_unix_member = True;
532                                 break;
533                         }
534                         unix_members += 1;
535                 }
536
537                 if (!is_unix_member) {
538                         /* We look at a nt group member that is not a
539                            unix group member currently. So, add the nt
540                            group member. */
541                         smb_add_user_group(grp->gr_name, nt_members[i]);
542                 }
543         }
544         
545         talloc_destroy(t);
546         return NT_STATUS_OK;
547 }
548
549 static NTSTATUS fetch_alias_info(uint32 rid, SAM_ALIAS_INFO *delta,
550                                  DOM_SID dom_sid)
551 {
552         fstring name;
553         fstring comment;
554         struct group *grp = NULL;
555         DOM_SID alias_sid;
556         fstring sid_string;
557         GROUP_MAP map;
558         BOOL insert = True;
559
560         unistr2_to_ascii(name, &delta->uni_als_name, sizeof(name)-1);
561         unistr2_to_ascii(comment, &delta->uni_als_desc, sizeof(comment)-1);
562
563         /* Find out whether the group is already mapped */
564         sid_copy(&alias_sid, &dom_sid);
565         sid_append_rid(&alias_sid, rid);
566         sid_to_string(sid_string, &alias_sid);
567
568         if (pdb_getgrsid(&map, alias_sid, False)) {
569                 grp = getgrgid(map.gid);
570                 insert = False;
571         }
572
573         if (grp == NULL) {
574                 gid_t gid;
575
576                 /* No group found from mapping, find it from its name. */
577                 if ((grp = getgrnam(name)) == NULL) {
578                                 /* No appropriate group found, create one */
579                         d_printf("Creating unix group: '%s'\n", name);
580                         if (smb_create_group(name, &gid) != 0)
581                                 return NT_STATUS_ACCESS_DENIED;
582                         if ((grp = getgrgid(gid)) == NULL)
583                                 return NT_STATUS_ACCESS_DENIED;
584                 }
585         }
586
587         map.gid = grp->gr_gid;
588         map.sid = alias_sid;
589
590         if (sid_equal(&dom_sid, &global_sid_Builtin))
591                 map.sid_name_use = SID_NAME_WKN_GRP;
592         else
593                 map.sid_name_use = SID_NAME_ALIAS;
594
595         fstrcpy(map.nt_name, name);
596         fstrcpy(map.comment, comment);
597
598         map.priv_set.count = 0;
599         map.priv_set.set = NULL;
600
601         if (insert)
602                 pdb_add_group_mapping_entry(&map);
603         else
604                 pdb_update_group_mapping_entry(&map);
605
606         return NT_STATUS_OK;
607 }
608
609 static NTSTATUS
610 fetch_alias_mem(uint32 rid, SAM_ALIAS_MEM_INFO *delta, DOM_SID dom_sid)
611 {
612         
613         return NT_STATUS_OK;
614 }
615
616 static void
617 fetch_sam_entry(SAM_DELTA_HDR *hdr_delta, SAM_DELTA_CTR *delta,
618                 DOM_SID dom_sid)
619 {
620         switch(hdr_delta->type) {
621         case SAM_DELTA_ACCOUNT_INFO:
622                 fetch_account_info(hdr_delta->target_rid,
623                                    &delta->account_info);
624                 break;
625         case SAM_DELTA_GROUP_INFO:
626                 fetch_group_info(hdr_delta->target_rid,
627                                  &delta->group_info);
628                 break;
629         case SAM_DELTA_GROUP_MEM:
630                 fetch_group_mem_info(hdr_delta->target_rid,
631                                      &delta->grp_mem_info);
632                 break;
633         case SAM_DELTA_ALIAS_INFO:
634                 fetch_alias_info(hdr_delta->target_rid,
635                                  &delta->alias_info, dom_sid);
636                 break;
637         case SAM_DELTA_ALIAS_MEM:
638                 fetch_alias_mem(hdr_delta->target_rid,
639                                 &delta->als_mem_info, dom_sid);
640                 break;
641         default:
642                 d_printf("Unknown delta record type %d\n", hdr_delta->type);
643                 break;
644         }
645 }
646
647 static void
648 fetch_database(struct cli_state *cli, unsigned db_type, DOM_CRED *ret_creds,
649                DOM_SID dom_sid)
650 {
651         unsigned sync_context = 0;
652         NTSTATUS result;
653         int i;
654         TALLOC_CTX *mem_ctx;
655         SAM_DELTA_HDR *hdr_deltas;
656         SAM_DELTA_CTR *deltas;
657         uint32 num_deltas;
658
659         if (!(mem_ctx = talloc_init())) {
660                 return;
661         }
662
663         d_printf("Fetching database %u\n", db_type);
664
665         do {
666                 result = cli_netlogon_sam_sync(cli, mem_ctx, ret_creds,
667                                                db_type, sync_context,
668                                                &num_deltas,
669                                                &hdr_deltas, &deltas);
670                 clnt_deal_with_creds(cli->sess_key, &(cli->clnt_cred),
671                                      ret_creds);
672                 for (i = 0; i < num_deltas; i++) {
673                         fetch_sam_entry(&hdr_deltas[i], &deltas[i], dom_sid);
674                 }
675                 sync_context += 1;
676         } while (NT_STATUS_EQUAL(result, STATUS_MORE_ENTRIES));
677
678         talloc_destroy(mem_ctx);
679 }
680
681 /* dump sam database via samsync rpc calls */
682 int rpc_vampire(int argc, const char **argv)
683 {
684         NTSTATUS result;
685         struct cli_state *cli = NULL;
686         uchar trust_password[16];
687         DOM_CRED ret_creds;
688         uint32 neg_flags = 0x000001ff;
689         DOM_SID dom_sid;
690
691         ZERO_STRUCT(ret_creds);
692
693         /* Connect to remote machine */
694         if (!(cli = net_make_ipc_connection(NET_FLAGS_ANONYMOUS |
695                                             NET_FLAGS_PDC))) {
696                 return 1;
697         }
698
699         if (!cli_nt_session_open(cli, PI_NETLOGON)) {
700                 DEBUG(0,("Error connecting to NETLOGON pipe\n"));
701                 goto fail;
702         }
703
704         if (!secrets_fetch_trust_account_password(lp_workgroup(),
705                                                   trust_password, NULL)) {
706                 d_printf("Could not retrieve domain trust secret\n");
707                 goto fail;
708         }
709         
710         result = cli_nt_setup_creds(cli, SEC_CHAN_BDC,  trust_password,
711                                     &neg_flags, 2);
712         if (!NT_STATUS_IS_OK(result)) {
713                 d_printf("Failed to setup BDC creds\n");
714                 goto fail;
715         }
716
717         dom_sid = *get_global_sam_sid();
718         fetch_database(cli, SAM_DATABASE_DOMAIN, &ret_creds, dom_sid);
719
720         sid_copy(&dom_sid, &global_sid_Builtin);
721         fetch_database(cli, SAM_DATABASE_BUILTIN, &ret_creds, dom_sid);
722
723         /* Currently we crash on PRIVS somewhere in unmarshalling */
724         /* Dump_database(cli, SAM_DATABASE_PRIVS, &ret_creds); */
725
726         cli_nt_session_close(cli);
727         
728         return 0;
729
730 fail:
731         if (cli) {
732                 cli_nt_session_close(cli);
733         }
734         return -1;
735 }