Large set of changes to add UNIX account/group management
[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                 /* The following types are recognised but not handled */
115         case SAM_DELTA_RENAME_GROUP:
116                 d_printf("SAM_DELTA_RENAME_GROUP not handled\n");
117                 break;
118         case SAM_DELTA_RENAME_USER:
119                 d_printf("SAM_DELTA_RENAME_USER not handled\n");
120                 break;
121         case SAM_DELTA_RENAME_ALIAS:
122                 d_printf("SAM_DELTA_RENAME_ALIAS not handled\n");
123                 break;
124         case SAM_DELTA_POLICY_INFO:
125                 d_printf("SAM_DELTA_POLICY_INFO not handled\n");
126                 break;
127         case SAM_DELTA_TRUST_DOMS:
128                 d_printf("SAM_DELTA_TRUST_DOMS not handled\n");
129                 break;
130         case SAM_DELTA_PRIVS_INFO:
131                 d_printf("SAM_DELTA_PRIVS_INFO not handled\n");
132                 break;
133         case SAM_DELTA_SECRET_INFO:
134                 d_printf("SAM_DELTA_SECRET_INFO not handled\n");
135                 break;
136         case SAM_DELTA_DELETE_GROUP:
137                 d_printf("SAM_DELTA_DELETE_GROUP not handled\n");
138                 break;
139         case SAM_DELTA_DELETE_USER:
140                 d_printf("SAM_DELTA_DELETE_USER not handled\n");
141                 break;
142         case SAM_DELTA_MODIFIED_COUNT:
143                 d_printf("SAM_DELTA_MODIFIED_COUNT not handled\n");
144                 break;
145         default:
146                 d_printf("Unknown delta record type %d\n", hdr_delta->type);
147                 break;
148         }
149 }
150
151
152 static void dump_database(struct cli_state *cli, unsigned db_type, DOM_CRED *ret_creds)
153 {
154         unsigned sync_context = 0;
155         NTSTATUS result;
156         int i;
157         TALLOC_CTX *mem_ctx;
158         SAM_DELTA_HDR *hdr_deltas;
159         SAM_DELTA_CTR *deltas;
160         uint32 num_deltas;
161
162         if (!(mem_ctx = talloc_init("dump_database"))) {
163                 return;
164         }
165
166         switch( db_type ) {
167         case SAM_DATABASE_DOMAIN:
168                 d_printf("Dumping DOMAIN database\n");
169                 break;
170         case SAM_DATABASE_BUILTIN:
171                 d_printf("Dumping BUILTIN database\n");
172                 break;
173         case SAM_DATABASE_PRIVS:
174                 d_printf("Dumping PRIVS databases\n");
175                 break;
176         default:
177                 d_printf("Dumping unknown database type %u\n", db_type );
178                 break;
179         }
180
181         do {
182                 result = cli_netlogon_sam_sync(cli, mem_ctx, ret_creds, db_type,
183                                                sync_context,
184                                                &num_deltas, &hdr_deltas, &deltas);
185                 clnt_deal_with_creds(cli->sess_key, &(cli->clnt_cred), ret_creds);
186                 for (i = 0; i < num_deltas; i++) {
187                         display_sam_entry(&hdr_deltas[i], &deltas[i]);
188                 }
189                 sync_context += 1;
190         } while (NT_STATUS_EQUAL(result, STATUS_MORE_ENTRIES));
191
192         talloc_destroy(mem_ctx);
193 }
194
195 /* dump sam database via samsync rpc calls */
196 int rpc_samdump(int argc, const char **argv)
197 {
198         struct cli_state *cli = NULL;
199         uchar trust_password[16];
200         DOM_CRED ret_creds;
201         uint32 sec_channel;
202
203         ZERO_STRUCT(ret_creds);
204
205         /* Connect to remote machine */
206         if (!(cli = net_make_ipc_connection(NET_FLAGS_ANONYMOUS | NET_FLAGS_PDC))) {
207                 return 1;
208         }
209
210         fstrcpy(cli->domain, lp_workgroup());
211
212         if (!cli_nt_session_open(cli, PI_NETLOGON)) {
213                 DEBUG(0,("Could not open connection to NETLOGON pipe\n"));
214                 goto fail;
215         }
216
217         if (!secrets_fetch_trust_account_password(lp_workgroup(),
218                                                   trust_password,
219                                                   NULL, &sec_channel)) {
220                 DEBUG(0,("Could not fetch trust account password\n"));
221                 goto fail;
222         }
223
224         if (!NT_STATUS_IS_OK(cli_nt_establish_netlogon(cli, sec_channel,
225                                                        trust_password))) {
226                 DEBUG(0,("Error connecting to NETLOGON pipe\n"));
227                 goto fail;
228         }
229
230         dump_database(cli, SAM_DATABASE_DOMAIN, &ret_creds);
231         dump_database(cli, SAM_DATABASE_BUILTIN, &ret_creds);
232         dump_database(cli, SAM_DATABASE_PRIVS, &ret_creds);
233
234         cli_nt_session_close(cli);
235         
236         return 0;
237
238 fail:
239         if (cli) {
240                 cli_nt_session_close(cli);
241         }
242         return -1;
243 }
244
245 /* Convert a SAM_ACCOUNT_DELTA to a SAM_ACCOUNT. */
246 #define STRING_CHANGED (old_string && !new_string) ||\
247                     (!old_string && new_string) ||\
248                 (old_string && new_string && (strcmp(old_string, new_string) != 0))
249
250 static NTSTATUS
251 sam_account_from_delta(SAM_ACCOUNT *account, SAM_ACCOUNT_INFO *delta)
252 {
253         const char *old_string, *new_string;
254         time_t unix_time, stored_time;
255         uchar lm_passwd[16], nt_passwd[16];
256         static uchar zero_buf[16];
257
258         /* Username, fullname, home dir, dir drive, logon script, acct
259            desc, workstations, profile. */
260
261         if (delta->hdr_acct_name.buffer) {
262                 old_string = pdb_get_nt_username(account);
263                 new_string = unistr2_static(&delta->uni_acct_name);
264
265                 if (STRING_CHANGED) {
266                         pdb_set_nt_username(account, new_string, PDB_CHANGED);
267               
268                 }
269          
270                 /* Unix username is the same - for sanity */
271                 old_string = pdb_get_username( account );
272                 if (STRING_CHANGED) {
273                         pdb_set_username(account, new_string, PDB_CHANGED);
274                 }
275         }
276
277         if (delta->hdr_full_name.buffer) {
278                 old_string = pdb_get_fullname(account);
279                 new_string = unistr2_static(&delta->uni_full_name);
280
281                 if (STRING_CHANGED)
282                         pdb_set_fullname(account, new_string, PDB_CHANGED);
283         }
284
285         if (delta->hdr_home_dir.buffer) {
286                 old_string = pdb_get_homedir(account);
287                 new_string = unistr2_static(&delta->uni_home_dir);
288
289                 if (STRING_CHANGED)
290                         pdb_set_homedir(account, new_string, PDB_CHANGED);
291         }
292
293         if (delta->hdr_dir_drive.buffer) {
294                 old_string = pdb_get_dir_drive(account);
295                 new_string = unistr2_static(&delta->uni_dir_drive);
296
297                 if (STRING_CHANGED)
298                         pdb_set_dir_drive(account, new_string, PDB_CHANGED);
299         }
300
301         if (delta->hdr_logon_script.buffer) {
302                 old_string = pdb_get_logon_script(account);
303                 new_string = unistr2_static(&delta->uni_logon_script);
304
305                 if (STRING_CHANGED)
306                         pdb_set_logon_script(account, new_string, PDB_CHANGED);
307         }
308
309         if (delta->hdr_acct_desc.buffer) {
310                 old_string = pdb_get_acct_desc(account);
311                 new_string = unistr2_static(&delta->uni_acct_desc);
312
313                 if (STRING_CHANGED)
314                         pdb_set_acct_desc(account, new_string, PDB_CHANGED);
315         }
316
317         if (delta->hdr_workstations.buffer) {
318                 old_string = pdb_get_workstations(account);
319                 new_string = unistr2_static(&delta->uni_workstations);
320
321                 if (STRING_CHANGED)
322                         pdb_set_workstations(account, new_string, PDB_CHANGED);
323         }
324
325         if (delta->hdr_profile.buffer) {
326                 old_string = pdb_get_profile_path(account);
327                 new_string = unistr2_static(&delta->uni_profile);
328
329                 if (STRING_CHANGED)
330                         pdb_set_profile_path(account, new_string, PDB_CHANGED);
331         }
332
333         /* User and group sid */
334         if (pdb_get_user_rid(account) != delta->user_rid)
335                 pdb_set_user_sid_from_rid(account, delta->user_rid, PDB_CHANGED);
336         if (pdb_get_group_rid(account) != delta->group_rid)
337                 pdb_set_group_sid_from_rid(account, delta->group_rid, PDB_CHANGED);
338
339         /* Logon and password information */
340         if (!nt_time_is_zero(&delta->logon_time)) {
341                 unix_time = nt_time_to_unix(&delta->logon_time);
342                 stored_time = pdb_get_logon_time(account);
343                 if (stored_time != unix_time)
344                         pdb_set_logon_time(account, unix_time, PDB_CHANGED);
345         }
346
347         if (!nt_time_is_zero(&delta->logoff_time)) {
348                 unix_time = nt_time_to_unix(&delta->logoff_time);
349                 stored_time = pdb_get_logoff_time(account);
350                 if (stored_time != unix_time)
351                         pdb_set_logoff_time(account, unix_time,PDB_CHANGED);
352         }
353
354         if (pdb_get_logon_divs(account) != delta->logon_divs)
355                 pdb_set_logon_divs(account, delta->logon_divs, PDB_CHANGED);
356
357         /* TODO: logon hours */
358         /* TODO: bad password count */
359         /* TODO: logon count */
360
361         if (!nt_time_is_zero(&delta->pwd_last_set_time)) {
362                 unix_time = nt_time_to_unix(&delta->pwd_last_set_time);
363                 stored_time = pdb_get_pass_last_set_time(account);
364                 if (stored_time != unix_time)
365                         pdb_set_pass_last_set_time(account, unix_time, PDB_CHANGED);
366         }
367
368 #if 0
369 /*      No kickoff time in the delta? */
370         if (!nt_time_is_zero(&delta->kickoff_time)) {
371                 unix_time = nt_time_to_unix(&delta->kickoff_time);
372                 stored_time = pdb_get_kickoff_time(account);
373                 if (stored_time != unix_time)
374                         pdb_set_kickoff_time(account, unix_time, PDB_CHANGED);
375         }
376 #endif
377
378         /* Decode hashes from password hash 
379            Note that win2000 may send us all zeros for the hashes if it doesn't 
380            think this channel is secure enough - don't set the passwords at all
381            in that case
382         */
383         if (memcmp(delta->pass.buf_lm_pwd, zero_buf, 16) != 0) {
384                 sam_pwd_hash(delta->user_rid, delta->pass.buf_lm_pwd, lm_passwd, 0);
385                 pdb_set_lanman_passwd(account, lm_passwd, PDB_CHANGED);
386         }
387
388         if (memcmp(delta->pass.buf_nt_pwd, zero_buf, 16) != 0) {
389                 sam_pwd_hash(delta->user_rid, delta->pass.buf_nt_pwd, nt_passwd, 0);
390                 pdb_set_nt_passwd(account, nt_passwd, PDB_CHANGED);
391         }
392
393         /* TODO: account expiry time */
394
395         if (pdb_get_acct_ctrl(account) != delta->acb_info)
396                 pdb_set_acct_ctrl(account, delta->acb_info, PDB_CHANGED);
397
398         pdb_set_domain(account, lp_workgroup(), PDB_CHANGED);
399
400         return NT_STATUS_OK;
401 }
402
403 static NTSTATUS
404 fetch_account_info(uint32 rid, SAM_ACCOUNT_INFO *delta)
405 {
406         NTSTATUS nt_ret;
407         fstring account;
408         pstring add_script;
409         SAM_ACCOUNT *sam_account=NULL;
410         GROUP_MAP map;
411         struct group *grp;
412         DOM_SID user_sid;
413         DOM_SID group_sid;
414         struct passwd *passwd;
415         unid_t id;
416         int u_type = ID_USERID | ID_QUERY_ONLY;
417         fstring sid_string;
418
419         fstrcpy(account, unistr2_static(&delta->uni_acct_name));
420         d_printf("Creating account: %s\n", account);
421
422         if (!NT_STATUS_IS_OK(nt_ret = pdb_init_sam(&sam_account)))
423                 return nt_ret;
424
425         if (!(passwd = Get_Pwnam(account))) {
426                 /* Create appropriate user */
427                 if (delta->acb_info & ACB_NORMAL) {
428                         pstrcpy(add_script, lp_adduser_script());
429                 } else if ( (delta->acb_info & ACB_WSTRUST) ||
430                             (delta->acb_info & ACB_SVRTRUST) ||
431                             (delta->acb_info & ACB_DOMTRUST) ) {
432                         pstrcpy(add_script, lp_addmachine_script());
433                 } else {
434                         DEBUG(1, ("Unknown user type: %s\n",
435                                   smbpasswd_encode_acb_info(delta->acb_info)));
436                 }
437                 if (*add_script) {
438                         int add_ret;
439                         all_string_sub(add_script, "%u", account,
440                                        sizeof(account));
441                         add_ret = smbrun(add_script,NULL);
442                         DEBUG(1,("fetch_account: Running the command `%s' "
443                                  "gave %d\n", add_script, add_ret));
444                 }
445                 else {
446                         DEBUG(8,("fetch_account_info: no add user/machine script.  Asking winbindd\n"));
447                         if ( !winbind_create_user( account ) )
448                                 DEBUG(4,("fetch_account_info: winbind_create_user() failed\n"));
449                 }
450                 
451                 /* try and find the possible unix account again */
452                 if ( !(passwd = Get_Pwnam(account)) )
453                         return NT_STATUS_NO_SUCH_USER;
454                         
455         }
456         
457         sid_copy(&user_sid, get_global_sam_sid());
458         sid_append_rid(&user_sid, delta->user_rid);
459
460         DEBUG(3, ("Attempting to find SID %s for user %s in the passdb\n", sid_to_string(sid_string, &user_sid), account));
461         if (!pdb_getsampwsid(sam_account, &user_sid)) {
462                 sam_account_from_delta(sam_account, delta);
463                 DEBUG(3, ("Attempting to add user SID %s for user %s in the passdb\n", 
464                           sid_to_string(sid_string, &user_sid), pdb_get_username(sam_account)));
465                 if (!pdb_add_sam_account(sam_account)) {
466                         DEBUG(1, ("SAM Account for %s failed to be added to the passdb!\n",
467                                   account));
468                         return NT_STATUS_ACCESS_DENIED; 
469                 }
470         } else {
471                 sam_account_from_delta(sam_account, delta);
472                 DEBUG(3, ("Attempting to update user SID %s for user %s in the passdb\n", 
473                           sid_to_string(sid_string, &user_sid), pdb_get_username(sam_account)));
474                 if (!pdb_update_sam_account(sam_account)) {
475                         DEBUG(1, ("SAM Account for %s failed to be updated in the passdb!\n",
476                                   account));
477                         pdb_free_sam(&sam_account);
478                         return NT_STATUS_ACCESS_DENIED; 
479                 }
480         }
481
482         group_sid = *pdb_get_group_sid(sam_account);
483
484         if (!pdb_getgrsid(&map, group_sid)) {
485                 DEBUG(0, ("Primary group of %s has no mapping!\n",
486                           pdb_get_username(sam_account)));
487         } else {
488                 if (map.gid != passwd->pw_gid) {
489                         if (!(grp = getgrgid(map.gid))) {
490                                 DEBUG(0, ("Could not find unix group %d for user %s (group SID=%s)\n", 
491                                           map.gid, pdb_get_username(sam_account), sid_string_static(&group_sid)));
492                         } else {
493                                 smb_set_primary_group(grp->gr_name, pdb_get_username(sam_account));
494                         }
495                 }
496         }       
497
498         if (!passwd) {
499                 DEBUG(1, ("No unix user for this account (%s), cannot adjust mappings\n", pdb_get_username(sam_account)));
500                 /* if no unix user, changing the mapping won't help */
501         } else {
502                 nt_ret = idmap_get_id_from_sid(&id, &u_type, pdb_get_user_sid(sam_account));
503                 if (NT_STATUS_IS_OK(nt_ret) && (u_type == ID_USERID) && (id.uid == passwd->pw_uid)) {
504                         
505                 } else {
506                         /* set mapping */
507                         
508                         id.uid = passwd->pw_uid;
509                         nt_ret = idmap_set_mapping(pdb_get_user_sid(sam_account), id, ID_USERID);
510                 }
511         }
512
513         pdb_free_sam(&sam_account);
514         return nt_ret;
515 }
516
517 static NTSTATUS
518 fetch_group_info(uint32 rid, SAM_GROUP_INFO *delta)
519 {
520         fstring name;
521         fstring comment;
522         struct group *grp = NULL;
523         DOM_SID group_sid;
524         fstring sid_string;
525         GROUP_MAP map;
526         BOOL insert = True;
527
528         unistr2_to_ascii(name, &delta->uni_grp_name, sizeof(name)-1);
529         unistr2_to_ascii(comment, &delta->uni_grp_desc, sizeof(comment)-1);
530
531         /* add the group to the mapping table */
532         sid_copy(&group_sid, get_global_sam_sid());
533         sid_append_rid(&group_sid, rid);
534         sid_to_string(sid_string, &group_sid);
535
536         if (pdb_getgrsid(&map, group_sid)) {
537                 grp = getgrgid(map.gid);
538                 insert = False;
539         }
540
541         if (grp == NULL)
542         {
543                 gid_t gid;
544
545                 /* No group found from mapping, find it from its name. */
546                 if ((grp = getgrnam(name)) == NULL) {
547                         /* No appropriate group found, create one */
548                         d_printf("Creating unix group: '%s'\n", name);
549                         if (smb_create_group(name, &gid) != 0)
550                                 return NT_STATUS_ACCESS_DENIED;
551                         if ((grp = getgrgid(gid)) == NULL)
552                                 return NT_STATUS_ACCESS_DENIED;
553                 }
554         }
555
556         map.gid = grp->gr_gid;
557         map.sid = group_sid;
558         map.sid_name_use = SID_NAME_DOM_GRP;
559         fstrcpy(map.nt_name, name);
560         fstrcpy(map.comment, comment);
561
562         if (insert)
563                 pdb_add_group_mapping_entry(&map);
564         else
565                 pdb_update_group_mapping_entry(&map);
566
567         return NT_STATUS_OK;
568 }
569
570 static NTSTATUS
571 fetch_group_mem_info(uint32 rid, SAM_GROUP_MEM_INFO *delta)
572 {
573         int i;
574         TALLOC_CTX *t = NULL;
575         char **nt_members = NULL;
576         char **unix_members;
577         DOM_SID group_sid;
578         GROUP_MAP map;
579         struct group *grp;
580
581         if (delta->num_members == 0) {
582                 return NT_STATUS_OK;
583         }
584
585         sid_copy(&group_sid, get_global_sam_sid());
586         sid_append_rid(&group_sid, rid);
587
588         if (!get_domain_group_from_sid(group_sid, &map)) {
589                 DEBUG(0, ("Could not find global group %d\n", rid));
590                 return NT_STATUS_NO_SUCH_GROUP;
591         }
592
593         if (!(grp = getgrgid(map.gid))) {
594                 DEBUG(0, ("Could not find unix group %d\n", map.gid));
595                 return NT_STATUS_NO_SUCH_GROUP;
596         }
597
598         d_printf("Group members of %s: ", grp->gr_name);
599
600         if (!(t = talloc_init("fetch_group_mem_info"))) {
601                 DEBUG(0, ("could not talloc_init\n"));
602                 return NT_STATUS_NO_MEMORY;
603         }
604
605         nt_members = talloc_zero(t, sizeof(char *) * delta->num_members);
606
607         for (i=0; i<delta->num_members; i++) {
608                 NTSTATUS nt_status;
609                 SAM_ACCOUNT *member = NULL;
610                 DOM_SID member_sid;
611
612                 if (!NT_STATUS_IS_OK(nt_status = pdb_init_sam_talloc(t, &member))) {
613                         talloc_destroy(t);
614                         return nt_status;
615                 }
616
617                 sid_copy(&member_sid, get_global_sam_sid());
618                 sid_append_rid(&member_sid, delta->rids[i]);
619
620                 if (!pdb_getsampwsid(member, &member_sid)) {
621                         DEBUG(1, ("Found bogus group member: %d (member_sid=%s group=%s)\n",
622                                   delta->rids[i], sid_string_static(&member_sid), grp->gr_name));
623                         pdb_free_sam(&member);
624                         continue;
625                 }
626
627                 if (pdb_get_group_rid(member) == rid) {
628                         d_printf("%s(primary),", pdb_get_username(member));
629                         pdb_free_sam(&member);
630                         continue;
631                 }
632                 
633                 d_printf("%s,", pdb_get_username(member));
634                 nt_members[i] = talloc_strdup(t, pdb_get_username(member));
635                 pdb_free_sam(&member);
636         }
637
638         d_printf("\n");
639
640         unix_members = grp->gr_mem;
641
642         while (*unix_members) {
643                 BOOL is_nt_member = False;
644                 for (i=0; i<delta->num_members; i++) {
645                         if (nt_members[i] == NULL) {
646                                 /* This was a primary group */
647                                 continue;
648                         }
649
650                         if (strcmp(*unix_members, nt_members[i]) == 0) {
651                                 is_nt_member = True;
652                                 break;
653                         }
654                 }
655                 if (!is_nt_member) {
656                         /* We look at a unix group member that is not
657                            an nt group member. So, remove it. NT is
658                            boss here. */
659                         smb_delete_user_group(grp->gr_name, *unix_members);
660                 }
661                 unix_members += 1;
662         }
663
664         for (i=0; i<delta->num_members; i++) {
665                 BOOL is_unix_member = False;
666
667                 if (nt_members[i] == NULL) {
668                         /* This was the primary group */
669                         continue;
670                 }
671
672                 unix_members = grp->gr_mem;
673
674                 while (*unix_members) {
675                         if (strcmp(*unix_members, nt_members[i]) == 0) {
676                                 is_unix_member = True;
677                                 break;
678                         }
679                         unix_members += 1;
680                 }
681
682                 if (!is_unix_member) {
683                         /* We look at a nt group member that is not a
684                            unix group member currently. So, add the nt
685                            group member. */
686                         smb_add_user_group(grp->gr_name, nt_members[i]);
687                 }
688         }
689         
690         talloc_destroy(t);
691         return NT_STATUS_OK;
692 }
693
694 static NTSTATUS fetch_alias_info(uint32 rid, SAM_ALIAS_INFO *delta,
695                                  DOM_SID dom_sid)
696 {
697         fstring name;
698         fstring comment;
699         struct group *grp = NULL;
700         DOM_SID alias_sid;
701         fstring sid_string;
702         GROUP_MAP map;
703         BOOL insert = True;
704
705         unistr2_to_ascii(name, &delta->uni_als_name, sizeof(name)-1);
706         unistr2_to_ascii(comment, &delta->uni_als_desc, sizeof(comment)-1);
707
708         /* Find out whether the group is already mapped */
709         sid_copy(&alias_sid, &dom_sid);
710         sid_append_rid(&alias_sid, rid);
711         sid_to_string(sid_string, &alias_sid);
712
713         if (pdb_getgrsid(&map, alias_sid)) {
714                 grp = getgrgid(map.gid);
715                 insert = False;
716         }
717
718         if (grp == NULL) {
719                 gid_t gid;
720
721                 /* No group found from mapping, find it from its name. */
722                 if ((grp = getgrnam(name)) == NULL) {
723                         /* No appropriate group found, create one */
724                         d_printf("Creating unix group: '%s'\n", name);
725                         if (smb_create_group(name, &gid) != 0)
726                                 return NT_STATUS_ACCESS_DENIED;
727                         if ((grp = getgrgid(gid)) == NULL)
728                                 return NT_STATUS_ACCESS_DENIED;
729                 }
730         }
731
732         map.gid = grp->gr_gid;
733         map.sid = alias_sid;
734
735         if (sid_equal(&dom_sid, &global_sid_Builtin))
736                 map.sid_name_use = SID_NAME_WKN_GRP;
737         else
738                 map.sid_name_use = SID_NAME_ALIAS;
739
740         fstrcpy(map.nt_name, name);
741         fstrcpy(map.comment, comment);
742
743         if (insert)
744                 pdb_add_group_mapping_entry(&map);
745         else
746                 pdb_update_group_mapping_entry(&map);
747
748         return NT_STATUS_OK;
749 }
750
751 static NTSTATUS
752 fetch_alias_mem(uint32 rid, SAM_ALIAS_MEM_INFO *delta, DOM_SID dom_sid)
753 {
754 #if 0   /* 
755          * commented out right now after talking to Volker.  Can't
756          * do much with the membership but seemed a shame to waste
757          * somewhat working code.  Needs testing because the membership
758          * that shows up surprises me.  Also can't do much with groups
759          * in groups (e.g. Domain Admins being a member of Adminsitrators).
760          * --jerry
761          */
762         
763         int i;
764         TALLOC_CTX *t = NULL;
765         char **nt_members = NULL;
766         char **unix_members;
767         DOM_SID group_sid;
768         GROUP_MAP map;
769         struct group *grp;
770         enum SID_NAME_USE sid_type;
771
772         if (delta->num_members == 0) {
773                 return NT_STATUS_OK;
774         }
775
776         sid_copy(&group_sid, &dom_sid);
777         sid_append_rid(&group_sid, rid);
778
779         if (sid_equal(&dom_sid, &global_sid_Builtin)) {
780                 sid_type = SID_NAME_WKN_GRP;
781                 if (!get_builtin_group_from_sid(group_sid, &map, False)) {
782                         DEBUG(0, ("Could not find builtin group %s\n", sid_string_static(&group_sid)));
783                         return NT_STATUS_NO_SUCH_GROUP;
784                 }
785         } else {
786                 sid_type = SID_NAME_ALIAS;
787                 if (!get_local_group_from_sid(group_sid, &map, False)) {
788                         DEBUG(0, ("Could not find local group %s\n", sid_string_static(&group_sid)));
789                         return NT_STATUS_NO_SUCH_GROUP;
790                 }
791         }       
792
793         if (!(grp = getgrgid(map.gid))) {
794                 DEBUG(0, ("Could not find unix group %d\n", map.gid));
795                 return NT_STATUS_NO_SUCH_GROUP;
796         }
797
798         d_printf("Group members of %s: ", grp->gr_name);
799
800         if (!(t = talloc_init("fetch_group_mem_info"))) {
801                 DEBUG(0, ("could not talloc_init\n"));
802                 return NT_STATUS_NO_MEMORY;
803         }
804
805         nt_members = talloc_zero(t, sizeof(char *) * delta->num_members);
806
807         for (i=0; i<delta->num_members; i++) {
808                 NTSTATUS nt_status;
809                 SAM_ACCOUNT *member = NULL;
810                 DOM_SID member_sid;
811
812                 if (!NT_STATUS_IS_OK(nt_status = pdb_init_sam_talloc(t, &member))) {
813                         talloc_destroy(t);
814                         return nt_status;
815                 }
816
817                 sid_copy(&member_sid, &delta->sids[i].sid);
818
819                 if (!pdb_getsampwsid(member, &member_sid)) {
820                         DEBUG(1, ("Found bogus group member: (member_sid=%s group=%s)\n",
821                                   sid_string_static(&member_sid), grp->gr_name));
822                         pdb_free_sam(&member);
823                         continue;
824                 }
825
826                 if (pdb_get_group_rid(member) == rid) {
827                         d_printf("%s(primary),", pdb_get_username(member));
828                         pdb_free_sam(&member);
829                         continue;
830                 }
831                 
832                 d_printf("%s,", pdb_get_username(member));
833                 nt_members[i] = talloc_strdup(t, pdb_get_username(member));
834                 pdb_free_sam(&member);
835         }
836
837         d_printf("\n");
838
839         unix_members = grp->gr_mem;
840
841         while (*unix_members) {
842                 BOOL is_nt_member = False;
843                 for (i=0; i<delta->num_members; i++) {
844                         if (nt_members[i] == NULL) {
845                                 /* This was a primary group */
846                                 continue;
847                         }
848
849                         if (strcmp(*unix_members, nt_members[i]) == 0) {
850                                 is_nt_member = True;
851                                 break;
852                         }
853                 }
854                 if (!is_nt_member) {
855                         /* We look at a unix group member that is not
856                            an nt group member. So, remove it. NT is
857                            boss here. */
858                         smb_delete_user_group(grp->gr_name, *unix_members);
859                 }
860                 unix_members += 1;
861         }
862
863         for (i=0; i<delta->num_members; i++) {
864                 BOOL is_unix_member = False;
865
866                 if (nt_members[i] == NULL) {
867                         /* This was the primary group */
868                         continue;
869                 }
870
871                 unix_members = grp->gr_mem;
872
873                 while (*unix_members) {
874                         if (strcmp(*unix_members, nt_members[i]) == 0) {
875                                 is_unix_member = True;
876                                 break;
877                         }
878                         unix_members += 1;
879                 }
880
881                 if (!is_unix_member) {
882                         /* We look at a nt group member that is not a
883                            unix group member currently. So, add the nt
884                            group member. */
885                         smb_add_user_group(grp->gr_name, nt_members[i]);
886                 }
887         }
888         
889         talloc_destroy(t);
890
891 #endif  /* end of fetch_alias_mem() */
892
893         return NT_STATUS_OK;
894 }
895
896 static void
897 fetch_sam_entry(SAM_DELTA_HDR *hdr_delta, SAM_DELTA_CTR *delta,
898                 DOM_SID dom_sid)
899 {
900         switch(hdr_delta->type) {
901         case SAM_DELTA_ACCOUNT_INFO:
902                 fetch_account_info(hdr_delta->target_rid,
903                                    &delta->account_info);
904                 break;
905         case SAM_DELTA_GROUP_INFO:
906                 fetch_group_info(hdr_delta->target_rid,
907                                  &delta->group_info);
908                 break;
909         case SAM_DELTA_GROUP_MEM:
910                 fetch_group_mem_info(hdr_delta->target_rid,
911                                      &delta->grp_mem_info);
912                 break;
913         case SAM_DELTA_ALIAS_INFO:
914                 fetch_alias_info(hdr_delta->target_rid,
915                                  &delta->alias_info, dom_sid);
916                 break;
917         case SAM_DELTA_ALIAS_MEM:
918                 fetch_alias_mem(hdr_delta->target_rid,
919                                 &delta->als_mem_info, dom_sid);
920                 break;
921         case SAM_DELTA_DOMAIN_INFO:
922                 d_printf("SAM_DELTA_DOMAIN_INFO not handled\n");
923                 break;
924         default:
925                 d_printf("Unknown delta record type %d\n", hdr_delta->type);
926                 break;
927         }
928 }
929
930 static NTSTATUS
931 fetch_database(struct cli_state *cli, unsigned db_type, DOM_CRED *ret_creds,
932                DOM_SID dom_sid)
933 {
934         unsigned sync_context = 0;
935         NTSTATUS result;
936         int i;
937         TALLOC_CTX *mem_ctx;
938         SAM_DELTA_HDR *hdr_deltas;
939         SAM_DELTA_CTR *deltas;
940         uint32 num_deltas;
941
942         if (!(mem_ctx = talloc_init("fetch_database")))
943                 return NT_STATUS_NO_MEMORY;
944
945         switch( db_type ) {
946         case SAM_DATABASE_DOMAIN:
947                 d_printf("Fetching DOMAIN database\n");
948                 break;
949         case SAM_DATABASE_BUILTIN:
950                 d_printf("Fetching BUILTIN database\n");
951                 break;
952         case SAM_DATABASE_PRIVS:
953                 d_printf("Fetching PRIVS databases\n");
954                 break;
955         default:
956                 d_printf("Fetching unknown database type %u\n", db_type );
957                 break;
958         }
959
960         do {
961                 result = cli_netlogon_sam_sync(cli, mem_ctx, ret_creds,
962                                                db_type, sync_context,
963                                                &num_deltas,
964                                                &hdr_deltas, &deltas);
965
966                 if (NT_STATUS_IS_OK(result) ||
967                     NT_STATUS_EQUAL(result, STATUS_MORE_ENTRIES)) {
968
969                         clnt_deal_with_creds(cli->sess_key, &(cli->clnt_cred),
970                                              ret_creds);
971
972                         for (i = 0; i < num_deltas; i++) {
973                                 fetch_sam_entry(&hdr_deltas[i], &deltas[i], dom_sid);
974                         }
975                 } else
976                         return result;
977
978                 sync_context += 1;
979         } while (NT_STATUS_EQUAL(result, STATUS_MORE_ENTRIES));
980
981         talloc_destroy(mem_ctx);
982
983         return result;
984 }
985
986 /* dump sam database via samsync rpc calls */
987 int rpc_vampire(int argc, const char **argv)
988 {
989         NTSTATUS result;
990         struct cli_state *cli = NULL;
991         uchar trust_password[16];
992         DOM_CRED ret_creds;
993         DOM_SID dom_sid;
994         uint32 sec_channel;
995
996         ZERO_STRUCT(ret_creds);
997
998         if (!idmap_init(lp_idmap_backend())) {
999                 d_printf("Could not init idmap\n");
1000                 return -1;
1001         }
1002
1003         /* Connect to remote machine */
1004         if (!(cli = net_make_ipc_connection(NET_FLAGS_ANONYMOUS |
1005                                             NET_FLAGS_PDC))) {
1006                 return 1;
1007         }
1008
1009         if (!cli_nt_session_open(cli, PI_NETLOGON)) {
1010                 DEBUG(0,("Error connecting to NETLOGON pipe\n"));
1011                 goto fail;
1012         }
1013
1014         if (!secrets_fetch_trust_account_password(lp_workgroup(),
1015                                                   trust_password, NULL,
1016                                                   &sec_channel)) {
1017                 d_printf("Could not retrieve domain trust secret\n");
1018                 goto fail;
1019         }
1020         
1021         result = cli_nt_establish_netlogon(cli, sec_channel,  trust_password);
1022
1023         if (!NT_STATUS_IS_OK(result)) {
1024                 d_printf("Failed to setup BDC creds\n");
1025                 goto fail;
1026         }
1027
1028         dom_sid = *get_global_sam_sid();
1029         result = fetch_database(cli, SAM_DATABASE_DOMAIN, &ret_creds, dom_sid);
1030
1031         if (!NT_STATUS_IS_OK(result)) {
1032                 d_printf("Failed to fetch domain database: %s\n",
1033                          nt_errstr(result));
1034                 if (NT_STATUS_EQUAL(result, NT_STATUS_NOT_SUPPORTED))
1035                         d_printf("Perhaps %s is a Windows 2000 native mode "
1036                                  "domain?\n", lp_workgroup());
1037                 goto fail;
1038         }
1039
1040         sid_copy(&dom_sid, &global_sid_Builtin);
1041
1042         result = fetch_database(cli, SAM_DATABASE_BUILTIN, &ret_creds, 
1043                                 dom_sid);
1044
1045         if (!NT_STATUS_IS_OK(result)) {
1046                 d_printf("Failed to fetch builtin database: %s\n",
1047                          nt_errstr(result));
1048                 goto fail;
1049         }       
1050
1051         /* Currently we crash on PRIVS somewhere in unmarshalling */
1052         /* Dump_database(cli, SAM_DATABASE_PRIVS, &ret_creds); */
1053
1054         cli_nt_session_close(cli);
1055         
1056         return 0;
1057
1058 fail:
1059         if (cli)
1060                 cli_nt_session_close(cli);
1061
1062         return -1;
1063 }