?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
s3: Rename new parameter "ldap ref follow" to "ldap follow referral".
[Samba/gebeck_regimport.git] / source3 / passdb / pdb_interface.c
blob5d0b625da59d761cb1c7affa8fde858c568c49a6
1 /*
2 Unix SMB/CIFS implementation.
3 Password and authentication handling
4 Copyright (C) Andrew Bartlett 2002
5 Copyright (C) Jelmer Vernooij 2002
6 Copyright (C) Simo Sorce 2003
7 Copyright (C) Volker Lendecke 2006
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 #include "includes.h"
24
25 #undef DBGC_CLASS
26 #define DBGC_CLASS DBGC_PASSDB
27
28 static_decl_pdb;
29
30 static struct pdb_init_function_entry *backends = NULL;
31
32 static void lazy_initialize_passdb(void)
33 {
34 static bool initialized = False;
35 if(initialized) {
36 return;
37 }
38 static_init_pdb;
39 initialized = True;
40 }
41
42 static bool lookup_global_sam_rid(TALLOC_CTX *mem_ctx, uint32 rid,
43 const char **name,
44 enum lsa_SidType *psid_name_use,
45 union unid_t *unix_id);
46
47 NTSTATUS smb_register_passdb(int version, const char *name, pdb_init_function init)
48 {
49 struct pdb_init_function_entry *entry = backends;
50
51 if(version != PASSDB_INTERFACE_VERSION) {
52 DEBUG(0,("Can't register passdb backend!\n"
53 "You tried to register a passdb module with PASSDB_INTERFACE_VERSION %d, "
54 "while this version of samba uses version %d\n",
55 version,PASSDB_INTERFACE_VERSION));
56 return NT_STATUS_OBJECT_TYPE_MISMATCH;
57 }
58
59 if (!name || !init) {
60 return NT_STATUS_INVALID_PARAMETER;
61 }
62
63 DEBUG(5,("Attempting to register passdb backend %s\n", name));
64
65 /* Check for duplicates */
66 if (pdb_find_backend_entry(name)) {
67 DEBUG(0,("There already is a passdb backend registered with the name %s!\n", name));
68 return NT_STATUS_OBJECT_NAME_COLLISION;
69 }
70
71 entry = SMB_XMALLOC_P(struct pdb_init_function_entry);
72 entry->name = smb_xstrdup(name);
73 entry->init = init;
74
75 DLIST_ADD(backends, entry);
76 DEBUG(5,("Successfully added passdb backend '%s'\n", name));
77 return NT_STATUS_OK;
78 }
79
80 struct pdb_init_function_entry *pdb_find_backend_entry(const char *name)
81 {
82 struct pdb_init_function_entry *entry = backends;
83
84 while(entry) {
85 if (strcmp(entry->name, name)==0) return entry;
86 entry = entry->next;
87 }
88
89 return NULL;
90 }
91
92 /*
93 * The event context for the passdb backend. I know this is a bad hack and yet
94 * another static variable, but our pdb API is a global thing per
95 * definition. The first use for this is the LDAP idle function, more might be
96 * added later.
97 *
98 * I don't feel too bad about this static variable, it replaces the
99 * smb_idle_event_list that used to exist in lib/module.c. -- VL
100 */
101
102 static struct event_context *pdb_event_ctx;
103
104 struct event_context *pdb_get_event_context(void)
105 {
106 return pdb_event_ctx;
107 }
108
109 /******************************************************************
110 Make a pdb_methods from scratch
111 *******************************************************************/
112
113 NTSTATUS make_pdb_method_name(struct pdb_methods **methods, const char *selected)
114 {
115 char *module_name = smb_xstrdup(selected);
116 char *module_location = NULL, *p;
117 struct pdb_init_function_entry *entry;
118 NTSTATUS nt_status = NT_STATUS_UNSUCCESSFUL;
119
120 lazy_initialize_passdb();
121
122 p = strchr(module_name, ':');
123
124 if (p) {
125 *p = 0;
126 module_location = p+1;
127 trim_char(module_location, ' ', ' ');
128 }
129
130 trim_char(module_name, ' ', ' ');
131
132
133 DEBUG(5,("Attempting to find a passdb backend to match %s (%s)\n", selected, module_name));
134
135 entry = pdb_find_backend_entry(module_name);
136
137 /* Try to find a module that contains this module */
138 if (!entry) {
139 DEBUG(2,("No builtin backend found, trying to load plugin\n"));
140 if(NT_STATUS_IS_OK(smb_probe_module("pdb", module_name)) && !(entry = pdb_find_backend_entry(module_name))) {
141 DEBUG(0,("Plugin is available, but doesn't register passdb backend %s\n", module_name));
142 SAFE_FREE(module_name);
143 return NT_STATUS_UNSUCCESSFUL;
144 }
145 }
146
147 /* No such backend found */
148 if(!entry) {
149 DEBUG(0,("No builtin nor plugin backend for %s found\n", module_name));
150 SAFE_FREE(module_name);
151 return NT_STATUS_INVALID_PARAMETER;
152 }
153
154 DEBUG(5,("Found pdb backend %s\n", module_name));
155
156 if ( !NT_STATUS_IS_OK( nt_status = entry->init(methods, module_location) ) ) {
157 DEBUG(0,("pdb backend %s did not correctly init (error was %s)\n",
158 selected, nt_errstr(nt_status)));
159 SAFE_FREE(module_name);
160 return nt_status;
161 }
162
163 SAFE_FREE(module_name);
164
165 DEBUG(5,("pdb backend %s has a valid init\n", selected));
166
167 return nt_status;
168 }
169
170 /******************************************************************
171 Return an already initialized pdb_methods structure
172 *******************************************************************/
173
174 static struct pdb_methods *pdb_get_methods_reload( bool reload )
175 {
176 static struct pdb_methods *pdb = NULL;
177
178 if ( pdb && reload ) {
179 pdb->free_private_data( &(pdb->private_data) );
180 if ( !NT_STATUS_IS_OK( make_pdb_method_name( &pdb, lp_passdb_backend() ) ) ) {
181 char *msg = NULL;
182 if (asprintf(&msg, "pdb_get_methods_reload: "
183 "failed to get pdb methods for backend %s\n",
184 lp_passdb_backend()) > 0) {
185 smb_panic(msg);
186 } else {
187 smb_panic("pdb_get_methods_reload");
188 }
189 }
190 }
191
192 if ( !pdb ) {
193 if ( !NT_STATUS_IS_OK( make_pdb_method_name( &pdb, lp_passdb_backend() ) ) ) {
194 char *msg = NULL;
195 if (asprintf(&msg, "pdb_get_methods_reload: "
196 "failed to get pdb methods for backend %s\n",
197 lp_passdb_backend()) > 0) {
198 smb_panic(msg);
199 } else {
200 smb_panic("pdb_get_methods_reload");
201 }
202 }
203 }
204
205 return pdb;
206 }
207
208 static struct pdb_methods *pdb_get_methods(void)
209 {
210 return pdb_get_methods_reload(False);
211 }
212
213 struct pdb_domain_info *pdb_get_domain_info(TALLOC_CTX *mem_ctx)
214 {
215 struct pdb_methods *pdb = pdb_get_methods();
216 return pdb->get_domain_info(pdb, mem_ctx);
217 }
218
219 bool pdb_getsampwnam(struct samu *sam_acct, const char *username)
220 {
221 struct pdb_methods *pdb = pdb_get_methods();
222 struct samu *for_cache;
223 const struct dom_sid *user_sid;
224
225 if (!NT_STATUS_IS_OK(pdb->getsampwnam(pdb, sam_acct, username))) {
226 return False;
227 }
228
229 for_cache = samu_new(NULL);
230 if (for_cache == NULL) {
231 return False;
232 }
233
234 if (!pdb_copy_sam_account(for_cache, sam_acct)) {
235 TALLOC_FREE(for_cache);
236 return False;
237 }
238
239 user_sid = pdb_get_user_sid(for_cache);
240
241 memcache_add_talloc(NULL, PDB_GETPWSID_CACHE,
242 data_blob_const(user_sid, sizeof(*user_sid)),
243 &for_cache);
244
245 return True;
246 }
247
248 /**********************************************************************
249 **********************************************************************/
250
251 bool guest_user_info( struct samu *user )
252 {
253 struct passwd *pwd;
254 NTSTATUS result;
255 const char *guestname = lp_guestaccount();
256
257 if ( !(pwd = getpwnam_alloc(talloc_autofree_context(), guestname ) ) ) {
258 DEBUG(0,("guest_user_info: Unable to locate guest account [%s]!\n",
259 guestname));
260 return False;
261 }
262
263 result = samu_set_unix(user, pwd );
264
265 TALLOC_FREE( pwd );
266
267 return NT_STATUS_IS_OK( result );
268 }
269
270 /**********************************************************************
271 **********************************************************************/
272
273 bool pdb_getsampwsid(struct samu *sam_acct, const DOM_SID *sid)
274 {
275 struct pdb_methods *pdb = pdb_get_methods();
276 uint32 rid;
277 void *cache_data;
278
279 /* hard code the Guest RID of 501 */
280
281 if ( !sid_peek_check_rid( get_global_sam_sid(), sid, &rid ) )
282 return False;
283
284 if ( rid == DOMAIN_USER_RID_GUEST ) {
285 DEBUG(6,("pdb_getsampwsid: Building guest account\n"));
286 return guest_user_info( sam_acct );
287 }
288
289 /* check the cache first */
290
291 cache_data = memcache_lookup_talloc(
292 NULL, PDB_GETPWSID_CACHE, data_blob_const(sid, sizeof(*sid)));
293
294 if (cache_data != NULL) {
295 struct samu *cache_copy = talloc_get_type_abort(
296 cache_data, struct samu);
297
298 return pdb_copy_sam_account(sam_acct, cache_copy);
299 }
300
301 return NT_STATUS_IS_OK(pdb->getsampwsid(pdb, sam_acct, sid));
302 }
303
304 static NTSTATUS pdb_default_create_user(struct pdb_methods *methods,
305 TALLOC_CTX *tmp_ctx, const char *name,
306 uint32 acb_info, uint32 *rid)
307 {
308 struct samu *sam_pass;
309 NTSTATUS status;
310 struct passwd *pwd;
311
312 if ((sam_pass = samu_new(tmp_ctx)) == NULL) {
313 return NT_STATUS_NO_MEMORY;
314 }
315
316 if ( !(pwd = Get_Pwnam_alloc(tmp_ctx, name)) ) {
317 char *add_script = NULL;
318 int add_ret;
319 fstring name2;
320
321 if ((acb_info & ACB_NORMAL) && name[strlen(name)-1] != '$') {
322 add_script = talloc_strdup(tmp_ctx,
323 lp_adduser_script());
324 } else {
325 add_script = talloc_strdup(tmp_ctx,
326 lp_addmachine_script());
327 }
328
329 if (!add_script || add_script[0] == '\0') {
330 DEBUG(3, ("Could not find user %s and no add script "
331 "defined\n", name));
332 return NT_STATUS_NO_SUCH_USER;
333 }
334
335 /* lowercase the username before creating the Unix account for
336 compatibility with previous Samba releases */
337 fstrcpy( name2, name );
338 strlower_m( name2 );
339 add_script = talloc_all_string_sub(tmp_ctx,
340 add_script,
341 "%u",
342 name2);
343 if (!add_script) {
344 return NT_STATUS_NO_MEMORY;
345 }
346 add_ret = smbrun(add_script,NULL);
347 DEBUG(add_ret ? 0 : 3, ("_samr_create_user: Running the command `%s' gave %d\n",
348 add_script, add_ret));
349 if (add_ret == 0) {
350 smb_nscd_flush_user_cache();
351 }
352
353 flush_pwnam_cache();
354
355 pwd = Get_Pwnam_alloc(tmp_ctx, name);
356 }
357
358 /* we have a valid SID coming out of this call */
359
360 status = samu_alloc_rid_unix( sam_pass, pwd );
361
362 TALLOC_FREE( pwd );
363
364 if (!NT_STATUS_IS_OK(status)) {
365 DEBUG(3, ("pdb_default_create_user: failed to create a new user structure: %s\n", nt_errstr(status)));
366 return status;
367 }
368
369 if (!sid_peek_check_rid(get_global_sam_sid(),
370 pdb_get_user_sid(sam_pass), rid)) {
371 DEBUG(0, ("Could not get RID of fresh user\n"));
372 return NT_STATUS_INTERNAL_ERROR;
373 }
374
375 /* Use the username case specified in the original request */
376
377 pdb_set_username( sam_pass, name, PDB_SET );
378
379 /* Disable the account on creation, it does not have a reasonable password yet. */
380
381 acb_info |= ACB_DISABLED;
382
383 pdb_set_acct_ctrl(sam_pass, acb_info, PDB_CHANGED);
384
385 status = pdb_add_sam_account(sam_pass);
386
387 TALLOC_FREE(sam_pass);
388
389 return status;
390 }
391
392 NTSTATUS pdb_create_user(TALLOC_CTX *mem_ctx, const char *name, uint32 flags,
393 uint32 *rid)
394 {
395 struct pdb_methods *pdb = pdb_get_methods();
396 return pdb->create_user(pdb, mem_ctx, name, flags, rid);
397 }
398
399 /****************************************************************************
400 Delete a UNIX user on demand.
401 ****************************************************************************/
402
403 static int smb_delete_user(const char *unix_user)
404 {
405 char *del_script = NULL;
406 int ret;
407
408 /* safety check */
409
410 if ( strequal( unix_user, "root" ) ) {
411 DEBUG(0,("smb_delete_user: Refusing to delete local system root account!\n"));
412 return -1;
413 }
414
415 del_script = talloc_strdup(talloc_tos(), lp_deluser_script());
416 if (!del_script || !*del_script) {
417 return -1;
418 }
419 del_script = talloc_all_string_sub(talloc_tos(),
420 del_script,
421 "%u",
422 unix_user);
423 if (!del_script) {
424 return -1;
425 }
426 ret = smbrun(del_script,NULL);
427 flush_pwnam_cache();
428 if (ret == 0) {
429 smb_nscd_flush_user_cache();
430 }
431 DEBUG(ret ? 0 : 3,("smb_delete_user: Running the command `%s' gave %d\n",del_script,ret));
432
433 return ret;
434 }
435
436 static NTSTATUS pdb_default_delete_user(struct pdb_methods *methods,
437 TALLOC_CTX *mem_ctx,
438 struct samu *sam_acct)
439 {
440 NTSTATUS status;
441 fstring username;
442
443 status = pdb_delete_sam_account(sam_acct);
444 if (!NT_STATUS_IS_OK(status)) {
445 return status;
446 }
447
448 /*
449 * Now delete the unix side ....
450 * note: we don't check if the delete really happened as the script is
451 * not necessary present and maybe the sysadmin doesn't want to delete
452 * the unix side
453 */
454
455 /* always lower case the username before handing it off to
456 external scripts */
457
458 fstrcpy( username, pdb_get_username(sam_acct) );
459 strlower_m( username );
460
461 smb_delete_user( username );
462
463 return status;
464 }
465
466 NTSTATUS pdb_delete_user(TALLOC_CTX *mem_ctx, struct samu *sam_acct)
467 {
468 struct pdb_methods *pdb = pdb_get_methods();
469 uid_t uid = -1;
470
471 /* sanity check to make sure we don't delete root */
472
473 if ( !sid_to_uid( pdb_get_user_sid(sam_acct), &uid ) ) {
474 return NT_STATUS_NO_SUCH_USER;
475 }
476
477 if ( uid == 0 ) {
478 return NT_STATUS_ACCESS_DENIED;
479 }
480
481 return pdb->delete_user(pdb, mem_ctx, sam_acct);
482 }
483
484 NTSTATUS pdb_add_sam_account(struct samu *sam_acct)
485 {
486 struct pdb_methods *pdb = pdb_get_methods();
487 return pdb->add_sam_account(pdb, sam_acct);
488 }
489
490 NTSTATUS pdb_update_sam_account(struct samu *sam_acct)
491 {
492 struct pdb_methods *pdb = pdb_get_methods();
493
494 memcache_flush(NULL, PDB_GETPWSID_CACHE);
495
496 return pdb->update_sam_account(pdb, sam_acct);
497 }
498
499 NTSTATUS pdb_delete_sam_account(struct samu *sam_acct)
500 {
501 struct pdb_methods *pdb = pdb_get_methods();
502
503 memcache_flush(NULL, PDB_GETPWSID_CACHE);
504
505 return pdb->delete_sam_account(pdb, sam_acct);
506 }
507
508 NTSTATUS pdb_rename_sam_account(struct samu *oldname, const char *newname)
509 {
510 struct pdb_methods *pdb = pdb_get_methods();
511 uid_t uid;
512 NTSTATUS status;
513
514 memcache_flush(NULL, PDB_GETPWSID_CACHE);
515
516 /* sanity check to make sure we don't rename root */
517
518 if ( !sid_to_uid( pdb_get_user_sid(oldname), &uid ) ) {
519 return NT_STATUS_NO_SUCH_USER;
520 }
521
522 if ( uid == 0 ) {
523 return NT_STATUS_ACCESS_DENIED;
524 }
525
526 status = pdb->rename_sam_account(pdb, oldname, newname);
527
528 /* always flush the cache here just to be safe */
529 flush_pwnam_cache();
530
531 return status;
532 }
533
534 NTSTATUS pdb_update_login_attempts(struct samu *sam_acct, bool success)
535 {
536 struct pdb_methods *pdb = pdb_get_methods();
537 return pdb->update_login_attempts(pdb, sam_acct, success);
538 }
539
540 bool pdb_getgrsid(GROUP_MAP *map, DOM_SID sid)
541 {
542 struct pdb_methods *pdb = pdb_get_methods();
543 return NT_STATUS_IS_OK(pdb->getgrsid(pdb, map, sid));
544 }
545
546 bool pdb_getgrgid(GROUP_MAP *map, gid_t gid)
547 {
548 struct pdb_methods *pdb = pdb_get_methods();
549 return NT_STATUS_IS_OK(pdb->getgrgid(pdb, map, gid));
550 }
551
552 bool pdb_getgrnam(GROUP_MAP *map, const char *name)
553 {
554 struct pdb_methods *pdb = pdb_get_methods();
555 return NT_STATUS_IS_OK(pdb->getgrnam(pdb, map, name));
556 }
557
558 static NTSTATUS pdb_default_create_dom_group(struct pdb_methods *methods,
559 TALLOC_CTX *mem_ctx,
560 const char *name,
561 uint32 *rid)
562 {
563 DOM_SID group_sid;
564 struct group *grp;
565 fstring tmp;
566
567 grp = getgrnam(name);
568
569 if (grp == NULL) {
570 gid_t gid;
571
572 if (smb_create_group(name, &gid) != 0) {
573 return NT_STATUS_ACCESS_DENIED;
574 }
575
576 grp = getgrgid(gid);
577 }
578
579 if (grp == NULL) {
580 return NT_STATUS_ACCESS_DENIED;
581 }
582
583 if (pdb_capabilities() & PDB_CAP_STORE_RIDS) {
584 if (!pdb_new_rid(rid)) {
585 return NT_STATUS_ACCESS_DENIED;
586 }
587 } else {
588 *rid = algorithmic_pdb_gid_to_group_rid( grp->gr_gid );
589 }
590
591 sid_compose(&group_sid, get_global_sam_sid(), *rid);
592
593 return add_initial_entry(grp->gr_gid, sid_to_fstring(tmp, &group_sid),
594 SID_NAME_DOM_GRP, name, NULL);
595 }
596
597 NTSTATUS pdb_create_dom_group(TALLOC_CTX *mem_ctx, const char *name,
598 uint32 *rid)
599 {
600 struct pdb_methods *pdb = pdb_get_methods();
601 return pdb->create_dom_group(pdb, mem_ctx, name, rid);
602 }
603
604 static NTSTATUS pdb_default_delete_dom_group(struct pdb_methods *methods,
605 TALLOC_CTX *mem_ctx,
606 uint32 rid)
607 {
608 DOM_SID group_sid;
609 GROUP_MAP map;
610 NTSTATUS status;
611 struct group *grp;
612 const char *grp_name;
613
614 /* coverity */
615 map.gid = (gid_t) -1;
616
617 sid_compose(&group_sid, get_global_sam_sid(), rid);
618
619 if (!get_domain_group_from_sid(group_sid, &map)) {
620 DEBUG(10, ("Could not find group for rid %d\n", rid));
621 return NT_STATUS_NO_SUCH_GROUP;
622 }
623
624 /* We need the group name for the smb_delete_group later on */
625
626 if (map.gid == (gid_t)-1) {
627 return NT_STATUS_NO_SUCH_GROUP;
628 }
629
630 grp = getgrgid(map.gid);
631 if (grp == NULL) {
632 return NT_STATUS_NO_SUCH_GROUP;
633 }
634
635 /* Copy the name, no idea what pdb_delete_group_mapping_entry does.. */
636
637 grp_name = talloc_strdup(mem_ctx, grp->gr_name);
638 if (grp_name == NULL) {
639 return NT_STATUS_NO_MEMORY;
640 }
641
642 status = pdb_delete_group_mapping_entry(group_sid);
643
644 if (!NT_STATUS_IS_OK(status)) {
645 return status;
646 }
647
648 /* Don't check the result of smb_delete_group */
649
650 smb_delete_group(grp_name);
651
652 return NT_STATUS_OK;
653 }
654
655 NTSTATUS pdb_delete_dom_group(TALLOC_CTX *mem_ctx, uint32 rid)
656 {
657 struct pdb_methods *pdb = pdb_get_methods();
658 return pdb->delete_dom_group(pdb, mem_ctx, rid);
659 }
660
661 NTSTATUS pdb_add_group_mapping_entry(GROUP_MAP *map)
662 {
663 struct pdb_methods *pdb = pdb_get_methods();
664 return pdb->add_group_mapping_entry(pdb, map);
665 }
666
667 NTSTATUS pdb_update_group_mapping_entry(GROUP_MAP *map)
668 {
669 struct pdb_methods *pdb = pdb_get_methods();
670 return pdb->update_group_mapping_entry(pdb, map);
671 }
672
673 NTSTATUS pdb_delete_group_mapping_entry(DOM_SID sid)
674 {
675 struct pdb_methods *pdb = pdb_get_methods();
676 return pdb->delete_group_mapping_entry(pdb, sid);
677 }
678
679 bool pdb_enum_group_mapping(const DOM_SID *sid, enum lsa_SidType sid_name_use, GROUP_MAP **pp_rmap,
680 size_t *p_num_entries, bool unix_only)
681 {
682 struct pdb_methods *pdb = pdb_get_methods();
683 return NT_STATUS_IS_OK(pdb-> enum_group_mapping(pdb, sid, sid_name_use,
684 pp_rmap, p_num_entries, unix_only));
685 }
686
687 NTSTATUS pdb_enum_group_members(TALLOC_CTX *mem_ctx,
688 const DOM_SID *sid,
689 uint32 **pp_member_rids,
690 size_t *p_num_members)
691 {
692 struct pdb_methods *pdb = pdb_get_methods();
693 NTSTATUS result;
694
695 result = pdb->enum_group_members(pdb, mem_ctx,
696 sid, pp_member_rids, p_num_members);
697
698 /* special check for rid 513 */
699
700 if ( !NT_STATUS_IS_OK( result ) ) {
701 uint32 rid;
702
703 sid_peek_rid( sid, &rid );
704
705 if ( rid == DOMAIN_GROUP_RID_USERS ) {
706 *p_num_members = 0;
707 *pp_member_rids = NULL;
708
709 return NT_STATUS_OK;
710 }
711 }
712
713 return result;
714 }
715
716 NTSTATUS pdb_enum_group_memberships(TALLOC_CTX *mem_ctx, struct samu *user,
717 DOM_SID **pp_sids, gid_t **pp_gids,
718 size_t *p_num_groups)
719 {
720 struct pdb_methods *pdb = pdb_get_methods();
721 return pdb->enum_group_memberships(
722 pdb, mem_ctx, user,
723 pp_sids, pp_gids, p_num_groups);
724 }
725
726 static NTSTATUS pdb_default_set_unix_primary_group(struct pdb_methods *methods,
727 TALLOC_CTX *mem_ctx,
728 struct samu *sampass)
729 {
730 struct group *grp;
731 gid_t gid;
732
733 if (!sid_to_gid(pdb_get_group_sid(sampass), &gid) ||
734 (grp = getgrgid(gid)) == NULL) {
735 return NT_STATUS_INVALID_PRIMARY_GROUP;
736 }
737
738 if (smb_set_primary_group(grp->gr_name,
739 pdb_get_username(sampass)) != 0) {
740 return NT_STATUS_ACCESS_DENIED;
741 }
742
743 return NT_STATUS_OK;
744 }
745
746 NTSTATUS pdb_set_unix_primary_group(TALLOC_CTX *mem_ctx, struct samu *user)
747 {
748 struct pdb_methods *pdb = pdb_get_methods();
749 return pdb->set_unix_primary_group(pdb, mem_ctx, user);
750 }
751
752 /*
753 * Helper function to see whether a user is in a group. We can't use
754 * user_in_group_sid here because this creates dependencies only smbd can
755 * fulfil.
756 */
757
758 static bool pdb_user_in_group(TALLOC_CTX *mem_ctx, struct samu *account,
759 const DOM_SID *group_sid)
760 {
761 DOM_SID *sids;
762 gid_t *gids;
763 size_t i, num_groups;
764
765 if (!NT_STATUS_IS_OK(pdb_enum_group_memberships(mem_ctx, account,
766 &sids, &gids,
767 &num_groups))) {
768 return False;
769 }
770
771 for (i=0; i<num_groups; i++) {
772 if (sid_equal(group_sid, &sids[i])) {
773 return True;
774 }
775 }
776 return False;
777 }
778
779 static NTSTATUS pdb_default_add_groupmem(struct pdb_methods *methods,
780 TALLOC_CTX *mem_ctx,
781 uint32 group_rid,
782 uint32 member_rid)
783 {
784 DOM_SID group_sid, member_sid;
785 struct samu *account = NULL;
786 GROUP_MAP map;
787 struct group *grp;
788 struct passwd *pwd;
789 const char *group_name;
790 uid_t uid;
791
792 /* coverity */
793 map.gid = (gid_t) -1;
794
795 sid_compose(&group_sid, get_global_sam_sid(), group_rid);
796 sid_compose(&member_sid, get_global_sam_sid(), member_rid);
797
798 if (!get_domain_group_from_sid(group_sid, &map) ||
799 (map.gid == (gid_t)-1) ||
800 ((grp = getgrgid(map.gid)) == NULL)) {
801 return NT_STATUS_NO_SUCH_GROUP;
802 }
803
804 group_name = talloc_strdup(mem_ctx, grp->gr_name);
805 if (group_name == NULL) {
806 return NT_STATUS_NO_MEMORY;
807 }
808
809 if ( !(account = samu_new( NULL )) ) {
810 return NT_STATUS_NO_MEMORY;
811 }
812
813 if (!pdb_getsampwsid(account, &member_sid) ||
814 !sid_to_uid(&member_sid, &uid) ||
815 ((pwd = getpwuid_alloc(mem_ctx, uid)) == NULL)) {
816 return NT_STATUS_NO_SUCH_USER;
817 }
818
819 if (pdb_user_in_group(mem_ctx, account, &group_sid)) {
820 return NT_STATUS_MEMBER_IN_GROUP;
821 }
822
823 /*
824 * ok, the group exist, the user exist, the user is not in the group,
825 * we can (finally) add it to the group !
826 */
827
828 smb_add_user_group(group_name, pwd->pw_name);
829
830 if (!pdb_user_in_group(mem_ctx, account, &group_sid)) {
831 return NT_STATUS_ACCESS_DENIED;
832 }
833
834 return NT_STATUS_OK;
835 }
836
837 NTSTATUS pdb_add_groupmem(TALLOC_CTX *mem_ctx, uint32 group_rid,
838 uint32 member_rid)
839 {
840 struct pdb_methods *pdb = pdb_get_methods();
841 return pdb->add_groupmem(pdb, mem_ctx, group_rid, member_rid);
842 }
843
844 static NTSTATUS pdb_default_del_groupmem(struct pdb_methods *methods,
845 TALLOC_CTX *mem_ctx,
846 uint32 group_rid,
847 uint32 member_rid)
848 {
849 DOM_SID group_sid, member_sid;
850 struct samu *account = NULL;
851 GROUP_MAP map;
852 struct group *grp;
853 struct passwd *pwd;
854 const char *group_name;
855 uid_t uid;
856
857 sid_compose(&group_sid, get_global_sam_sid(), group_rid);
858 sid_compose(&member_sid, get_global_sam_sid(), member_rid);
859
860 if (!get_domain_group_from_sid(group_sid, &map) ||
861 (map.gid == (gid_t)-1) ||
862 ((grp = getgrgid(map.gid)) == NULL)) {
863 return NT_STATUS_NO_SUCH_GROUP;
864 }
865
866 group_name = talloc_strdup(mem_ctx, grp->gr_name);
867 if (group_name == NULL) {
868 return NT_STATUS_NO_MEMORY;
869 }
870
871 if ( !(account = samu_new( NULL )) ) {
872 return NT_STATUS_NO_MEMORY;
873 }
874
875 if (!pdb_getsampwsid(account, &member_sid) ||
876 !sid_to_uid(&member_sid, &uid) ||
877 ((pwd = getpwuid_alloc(mem_ctx, uid)) == NULL)) {
878 return NT_STATUS_NO_SUCH_USER;
879 }
880
881 if (!pdb_user_in_group(mem_ctx, account, &group_sid)) {
882 return NT_STATUS_MEMBER_NOT_IN_GROUP;
883 }
884
885 /*
886 * ok, the group exist, the user exist, the user is in the group,
887 * we can (finally) delete it from the group!
888 */
889
890 smb_delete_user_group(group_name, pwd->pw_name);
891
892 if (pdb_user_in_group(mem_ctx, account, &group_sid)) {
893 return NT_STATUS_ACCESS_DENIED;
894 }
895
896 return NT_STATUS_OK;
897 }
898
899 NTSTATUS pdb_del_groupmem(TALLOC_CTX *mem_ctx, uint32 group_rid,
900 uint32 member_rid)
901 {
902 struct pdb_methods *pdb = pdb_get_methods();
903 return pdb->del_groupmem(pdb, mem_ctx, group_rid, member_rid);
904 }
905
906 NTSTATUS pdb_create_alias(const char *name, uint32 *rid)
907 {
908 struct pdb_methods *pdb = pdb_get_methods();
909 return pdb->create_alias(pdb, name, rid);
910 }
911
912 NTSTATUS pdb_delete_alias(const DOM_SID *sid)
913 {
914 struct pdb_methods *pdb = pdb_get_methods();
915 return pdb->delete_alias(pdb, sid);
916 }
917
918 NTSTATUS pdb_get_aliasinfo(const DOM_SID *sid, struct acct_info *info)
919 {
920 struct pdb_methods *pdb = pdb_get_methods();
921 return pdb->get_aliasinfo(pdb, sid, info);
922 }
923
924 NTSTATUS pdb_set_aliasinfo(const DOM_SID *sid, struct acct_info *info)
925 {
926 struct pdb_methods *pdb = pdb_get_methods();
927 return pdb->set_aliasinfo(pdb, sid, info);
928 }
929
930 NTSTATUS pdb_add_aliasmem(const DOM_SID *alias, const DOM_SID *member)
931 {
932 struct pdb_methods *pdb = pdb_get_methods();
933 return pdb->add_aliasmem(pdb, alias, member);
934 }
935
936 NTSTATUS pdb_del_aliasmem(const DOM_SID *alias, const DOM_SID *member)
937 {
938 struct pdb_methods *pdb = pdb_get_methods();
939 return pdb->del_aliasmem(pdb, alias, member);
940 }
941
942 NTSTATUS pdb_enum_aliasmem(const DOM_SID *alias, TALLOC_CTX *mem_ctx,
943 DOM_SID **pp_members, size_t *p_num_members)
944 {
945 struct pdb_methods *pdb = pdb_get_methods();
946 return pdb->enum_aliasmem(pdb, alias, mem_ctx, pp_members,
947 p_num_members);
948 }
949
950 NTSTATUS pdb_enum_alias_memberships(TALLOC_CTX *mem_ctx,
951 const DOM_SID *domain_sid,
952 const DOM_SID *members, size_t num_members,
953 uint32 **pp_alias_rids,
954 size_t *p_num_alias_rids)
955 {
956 struct pdb_methods *pdb = pdb_get_methods();
957 return pdb->enum_alias_memberships(pdb, mem_ctx,
958 domain_sid,
959 members, num_members,
960 pp_alias_rids,
961 p_num_alias_rids);
962 }
963
964 NTSTATUS pdb_lookup_rids(const DOM_SID *domain_sid,
965 int num_rids,
966 uint32 *rids,
967 const char **names,
968 enum lsa_SidType *attrs)
969 {
970 struct pdb_methods *pdb = pdb_get_methods();
971 return pdb->lookup_rids(pdb, domain_sid, num_rids, rids, names, attrs);
972 }
973
974 /*
975 * NOTE: pdb_lookup_names is currently (2007-01-12) not used anywhere
976 * in the samba code.
977 * Unlike _lsa_lookup_sids and _samr_lookup_rids, which eventually
978 * also ask pdb_lookup_rids, thus looking up a bunch of rids at a time,
979 * the pdb_ calls _lsa_lookup_names and _samr_lookup_names come
980 * down to are pdb_getsampwnam and pdb_getgrnam instead of
981 * pdb_lookup_names.
982 * But in principle, it the call belongs to the API and might get
983 * used in this context some day.
984 */
985 #if 0
986 NTSTATUS pdb_lookup_names(const DOM_SID *domain_sid,
987 int num_names,
988 const char **names,
989 uint32 *rids,
990 enum lsa_SidType *attrs)
991 {
992 struct pdb_methods *pdb = pdb_get_methods();
993 return pdb->lookup_names(pdb, domain_sid, num_names, names, rids, attrs);
994 }
995 #endif
996
997 bool pdb_get_account_policy(enum pdb_policy_type type, uint32_t *value)
998 {
999 struct pdb_methods *pdb = pdb_get_methods();
1000 NTSTATUS status;
1001
1002 become_root();
1003 status = pdb->get_account_policy(pdb, type, value);
1004 unbecome_root();
1005
1006 return NT_STATUS_IS_OK(status);
1007 }
1008
1009 bool pdb_set_account_policy(enum pdb_policy_type type, uint32_t value)
1010 {
1011 struct pdb_methods *pdb = pdb_get_methods();
1012 NTSTATUS status;
1013
1014 become_root();
1015 status = pdb->set_account_policy(pdb, type, value);
1016 unbecome_root();
1017
1018 return NT_STATUS_IS_OK(status);
1019 }
1020
1021 bool pdb_get_seq_num(time_t *seq_num)
1022 {
1023 struct pdb_methods *pdb = pdb_get_methods();
1024 return NT_STATUS_IS_OK(pdb->get_seq_num(pdb, seq_num));
1025 }
1026
1027 bool pdb_uid_to_rid(uid_t uid, uint32 *rid)
1028 {
1029 struct pdb_methods *pdb = pdb_get_methods();
1030 return pdb->uid_to_rid(pdb, uid, rid);
1031 }
1032
1033 bool pdb_uid_to_sid(uid_t uid, DOM_SID *sid)
1034 {
1035 struct pdb_methods *pdb = pdb_get_methods();
1036 return pdb->uid_to_sid(pdb, uid, sid);
1037 }
1038
1039 bool pdb_gid_to_sid(gid_t gid, DOM_SID *sid)
1040 {
1041 struct pdb_methods *pdb = pdb_get_methods();
1042 return pdb->gid_to_sid(pdb, gid, sid);
1043 }
1044
1045 bool pdb_sid_to_id(const DOM_SID *sid, union unid_t *id,
1046 enum lsa_SidType *type)
1047 {
1048 struct pdb_methods *pdb = pdb_get_methods();
1049 return pdb->sid_to_id(pdb, sid, id, type);
1050 }
1051
1052 uint32_t pdb_capabilities(void)
1053 {
1054 struct pdb_methods *pdb = pdb_get_methods();
1055 return pdb->capabilities(pdb);
1056 }
1057
1058 /********************************************************************
1059 Allocate a new RID from the passdb backend. Verify that it is free
1060 by calling lookup_global_sam_rid() to verify that the RID is not
1061 in use. This handles servers that have existing users or groups
1062 with add RIDs (assigned from previous algorithmic mappings)
1063 ********************************************************************/
1064
1065 bool pdb_new_rid(uint32 *rid)
1066 {
1067 struct pdb_methods *pdb = pdb_get_methods();
1068 const char *name = NULL;
1069 enum lsa_SidType type;
1070 uint32 allocated_rid = 0;
1071 int i;
1072 TALLOC_CTX *ctx;
1073
1074 if ((pdb_capabilities() & PDB_CAP_STORE_RIDS) == 0) {
1075 DEBUG(0, ("Trying to allocate a RID when algorithmic RIDs "
1076 "are active\n"));
1077 return False;
1078 }
1079
1080 if (algorithmic_rid_base() != BASE_RID) {
1081 DEBUG(0, ("'algorithmic rid base' is set but a passdb backend "
1082 "without algorithmic RIDs is chosen.\n"));
1083 DEBUGADD(0, ("Please map all used groups using 'net groupmap "
1084 "add', set the maximum used RID\n"));
1085 DEBUGADD(0, ("and remove the parameter\n"));
1086 return False;
1087 }
1088
1089 if ( (ctx = talloc_init("pdb_new_rid")) == NULL ) {
1090 DEBUG(0,("pdb_new_rid: Talloc initialization failure\n"));
1091 return False;
1092 }
1093
1094 /* Attempt to get an unused RID (max tires is 250...yes that it is
1095 and arbitrary number I pulkled out of my head). -- jerry */
1096
1097 for ( i=0; allocated_rid==0 && i<250; i++ ) {
1098 /* get a new RID */
1099
1100 if ( !pdb->new_rid(pdb, &allocated_rid) ) {
1101 return False;
1102 }
1103
1104 /* validate that the RID is not in use */
1105
1106 if ( lookup_global_sam_rid( ctx, allocated_rid, &name, &type, NULL ) ) {
1107 allocated_rid = 0;
1108 }
1109 }
1110
1111 TALLOC_FREE( ctx );
1112
1113 if ( allocated_rid == 0 ) {
1114 DEBUG(0,("pdb_new_rid: Failed to find unused RID\n"));
1115 return False;
1116 }
1117
1118 *rid = allocated_rid;
1119
1120 return True;
1121 }
1122
1123 /***************************************************************
1124 Initialize the static context (at smbd startup etc).
1125
1126 If uninitialised, context will auto-init on first use.
1127 ***************************************************************/
1128
1129 bool initialize_password_db(bool reload, struct event_context *event_ctx)
1130 {
1131 pdb_event_ctx = event_ctx;
1132 return (pdb_get_methods_reload(reload) != NULL);
1133 }
1134
1135
1136 /***************************************************************************
1137 Default implementations of some functions.
1138 ****************************************************************************/
1139
1140 static NTSTATUS pdb_default_getsampwnam (struct pdb_methods *methods, struct samu *user, const char *sname)
1141 {
1142 return NT_STATUS_NO_SUCH_USER;
1143 }
1144
1145 static NTSTATUS pdb_default_getsampwsid(struct pdb_methods *my_methods, struct samu * user, const DOM_SID *sid)
1146 {
1147 return NT_STATUS_NO_SUCH_USER;
1148 }
1149
1150 static NTSTATUS pdb_default_add_sam_account (struct pdb_methods *methods, struct samu *newpwd)
1151 {
1152 return NT_STATUS_NOT_IMPLEMENTED;
1153 }
1154
1155 static NTSTATUS pdb_default_update_sam_account (struct pdb_methods *methods, struct samu *newpwd)
1156 {
1157 return NT_STATUS_NOT_IMPLEMENTED;
1158 }
1159
1160 static NTSTATUS pdb_default_delete_sam_account (struct pdb_methods *methods, struct samu *pwd)
1161 {
1162 return NT_STATUS_NOT_IMPLEMENTED;
1163 }
1164
1165 static NTSTATUS pdb_default_rename_sam_account (struct pdb_methods *methods, struct samu *pwd, const char *newname)
1166 {
1167 return NT_STATUS_NOT_IMPLEMENTED;
1168 }
1169
1170 static NTSTATUS pdb_default_update_login_attempts (struct pdb_methods *methods, struct samu *newpwd, bool success)
1171 {
1172 /* Only the pdb_nds backend implements this, by
1173 * default just return ok. */
1174 return NT_STATUS_OK;
1175 }
1176
1177 static NTSTATUS pdb_default_get_account_policy(struct pdb_methods *methods, enum pdb_policy_type type, uint32_t *value)
1178 {
1179 return account_policy_get(type, value) ? NT_STATUS_OK : NT_STATUS_UNSUCCESSFUL;
1180 }
1181
1182 static NTSTATUS pdb_default_set_account_policy(struct pdb_methods *methods, enum pdb_policy_type type, uint32_t value)
1183 {
1184 return account_policy_set(type, value) ? NT_STATUS_OK : NT_STATUS_UNSUCCESSFUL;
1185 }
1186
1187 static NTSTATUS pdb_default_get_seq_num(struct pdb_methods *methods, time_t *seq_num)
1188 {
1189 *seq_num = time(NULL);
1190 return NT_STATUS_OK;
1191 }
1192
1193 static bool pdb_default_uid_to_sid(struct pdb_methods *methods, uid_t uid,
1194 DOM_SID *sid)
1195 {
1196 struct samu *sampw = NULL;
1197 struct passwd *unix_pw;
1198 bool ret;
1199
1200 unix_pw = sys_getpwuid( uid );
1201
1202 if ( !unix_pw ) {
1203 DEBUG(4,("pdb_default_uid_to_rid: host has no idea of uid "
1204 "%lu\n", (unsigned long)uid));
1205 return False;
1206 }
1207
1208 if ( !(sampw = samu_new( NULL )) ) {
1209 DEBUG(0,("pdb_default_uid_to_rid: samu_new() failed!\n"));
1210 return False;
1211 }
1212
1213 become_root();
1214 ret = NT_STATUS_IS_OK(
1215 methods->getsampwnam(methods, sampw, unix_pw->pw_name ));
1216 unbecome_root();
1217
1218 if (!ret) {
1219 DEBUG(5, ("pdb_default_uid_to_rid: Did not find user "
1220 "%s (%u)\n", unix_pw->pw_name, (unsigned int)uid));
1221 TALLOC_FREE(sampw);
1222 return False;
1223 }
1224
1225 sid_copy(sid, pdb_get_user_sid(sampw));
1226
1227 TALLOC_FREE(sampw);
1228
1229 return True;
1230 }
1231
1232 static bool pdb_default_uid_to_rid(struct pdb_methods *methods, uid_t uid,
1233 uint32 *rid)
1234 {
1235 DOM_SID sid;
1236 bool ret;
1237
1238 ret = pdb_default_uid_to_sid(methods, uid, &sid);
1239 if (!ret) {
1240 return ret;
1241 }
1242
1243 ret = sid_peek_check_rid(get_global_sam_sid(), &sid, rid);
1244
1245 if (!ret) {
1246 DEBUG(1, ("Could not peek rid out of sid %s\n",
1247 sid_string_dbg(&sid)));
1248 }
1249
1250 return ret;
1251 }
1252
1253 static bool pdb_default_gid_to_sid(struct pdb_methods *methods, gid_t gid,
1254 DOM_SID *sid)
1255 {
1256 GROUP_MAP map;
1257
1258 if (!NT_STATUS_IS_OK(methods->getgrgid(methods, &map, gid))) {
1259 return False;
1260 }
1261
1262 sid_copy(sid, &map.sid);
1263 return True;
1264 }
1265
1266 static bool pdb_default_sid_to_id(struct pdb_methods *methods,
1267 const DOM_SID *sid,
1268 union unid_t *id, enum lsa_SidType *type)
1269 {
1270 TALLOC_CTX *mem_ctx;
1271 bool ret = False;
1272 const char *name;
1273 uint32 rid;
1274
1275 mem_ctx = talloc_new(NULL);
1276
1277 if (mem_ctx == NULL) {
1278 DEBUG(0, ("talloc_new failed\n"));
1279 return False;
1280 }
1281
1282 if (sid_peek_check_rid(get_global_sam_sid(), sid, &rid)) {
1283 /* Here we might have users as well as groups and aliases */
1284 ret = lookup_global_sam_rid(mem_ctx, rid, &name, type, id);
1285 goto done;
1286 }
1287
1288 /* check for "Unix User" */
1289
1290 if ( sid_peek_check_rid(&global_sid_Unix_Users, sid, &rid) ) {
1291 id->uid = rid;
1292 *type = SID_NAME_USER;
1293 ret = True;
1294 goto done;
1295 }
1296
1297 /* check for "Unix Group" */
1298
1299 if ( sid_peek_check_rid(&global_sid_Unix_Groups, sid, &rid) ) {
1300 id->gid = rid;
1301 *type = SID_NAME_ALIAS;
1302 ret = True;
1303 goto done;
1304 }
1305
1306 /* BUILTIN */
1307
1308 if (sid_check_is_in_builtin(sid) ||
1309 sid_check_is_in_wellknown_domain(sid)) {
1310 /* Here we only have aliases */
1311 GROUP_MAP map;
1312 if (!NT_STATUS_IS_OK(methods->getgrsid(methods, &map, *sid))) {
1313 DEBUG(10, ("Could not find map for sid %s\n",
1314 sid_string_dbg(sid)));
1315 goto done;
1316 }
1317 if ((map.sid_name_use != SID_NAME_ALIAS) &&
1318 (map.sid_name_use != SID_NAME_WKN_GRP)) {
1319 DEBUG(10, ("Map for sid %s is a %s, expected an "
1320 "alias\n", sid_string_dbg(sid),
1321 sid_type_lookup(map.sid_name_use)));
1322 goto done;
1323 }
1324
1325 id->gid = map.gid;
1326 *type = SID_NAME_ALIAS;
1327 ret = True;
1328 goto done;
1329 }
1330
1331 DEBUG(5, ("Sid %s is neither ours, a Unix SID, nor builtin\n",
1332 sid_string_dbg(sid)));
1333
1334 done:
1335
1336 TALLOC_FREE(mem_ctx);
1337 return ret;
1338 }
1339
1340 static bool get_memberuids(TALLOC_CTX *mem_ctx, gid_t gid, uid_t **pp_uids, size_t *p_num)
1341 {
1342 struct group *grp;
1343 char **gr;
1344 struct passwd *pwd;
1345 bool winbind_env;
1346 bool ret = False;
1347
1348 *pp_uids = NULL;
1349 *p_num = 0;
1350
1351 /* We only look at our own sam, so don't care about imported stuff */
1352 winbind_env = winbind_env_set();
1353 (void)winbind_off();
1354
1355 if ((grp = getgrgid(gid)) == NULL) {
1356 /* allow winbindd lookups, but only if they weren't already disabled */
1357 goto done;
1358 }
1359
1360 /* Primary group members */
1361 setpwent();
1362 while ((pwd = getpwent()) != NULL) {
1363 if (pwd->pw_gid == gid) {
1364 if (!add_uid_to_array_unique(mem_ctx, pwd->pw_uid,
1365 pp_uids, p_num)) {
1366 goto done;
1367 }
1368 }
1369 }
1370 endpwent();
1371
1372 /* Secondary group members */
1373 for (gr = grp->gr_mem; (*gr != NULL) && ((*gr)[0] != '\0'); gr += 1) {
1374 struct passwd *pw = getpwnam(*gr);
1375
1376 if (pw == NULL)
1377 continue;
1378 if (!add_uid_to_array_unique(mem_ctx, pw->pw_uid, pp_uids, p_num)) {
1379 goto done;
1380 }
1381 }
1382
1383 ret = True;
1384
1385 done:
1386
1387 /* allow winbindd lookups, but only if they weren't already disabled */
1388 if (!winbind_env) {
1389 (void)winbind_on();
1390 }
1391
1392 return ret;
1393 }
1394
1395 static NTSTATUS pdb_default_enum_group_members(struct pdb_methods *methods,
1396 TALLOC_CTX *mem_ctx,
1397 const DOM_SID *group,
1398 uint32 **pp_member_rids,
1399 size_t *p_num_members)
1400 {
1401 gid_t gid;
1402 uid_t *uids;
1403 size_t i, num_uids;
1404
1405 *pp_member_rids = NULL;
1406 *p_num_members = 0;
1407
1408 if (!sid_to_gid(group, &gid))
1409 return NT_STATUS_NO_SUCH_GROUP;
1410
1411 if(!get_memberuids(mem_ctx, gid, &uids, &num_uids))
1412 return NT_STATUS_NO_SUCH_GROUP;
1413
1414 if (num_uids == 0)
1415 return NT_STATUS_OK;
1416
1417 *pp_member_rids = TALLOC_ZERO_ARRAY(mem_ctx, uint32, num_uids);
1418
1419 for (i=0; i<num_uids; i++) {
1420 DOM_SID sid;
1421
1422 uid_to_sid(&sid, uids[i]);
1423
1424 if (!sid_check_is_in_our_domain(&sid)) {
1425 DEBUG(5, ("Inconsistent SAM -- group member uid not "
1426 "in our domain\n"));
1427 continue;
1428 }
1429
1430 sid_peek_rid(&sid, &(*pp_member_rids)[*p_num_members]);
1431 *p_num_members += 1;
1432 }
1433
1434 return NT_STATUS_OK;
1435 }
1436
1437 static NTSTATUS pdb_default_enum_group_memberships(struct pdb_methods *methods,
1438 TALLOC_CTX *mem_ctx,
1439 struct samu *user,
1440 DOM_SID **pp_sids,
1441 gid_t **pp_gids,
1442 size_t *p_num_groups)
1443 {
1444 size_t i;
1445 gid_t gid;
1446 struct passwd *pw;
1447 const char *username = pdb_get_username(user);
1448
1449
1450 /* Ignore the primary group SID. Honor the real Unix primary group.
1451 The primary group SID is only of real use to Windows clients */
1452
1453 if ( !(pw = getpwnam_alloc(mem_ctx, username)) ) {
1454 return NT_STATUS_NO_SUCH_USER;
1455 }
1456
1457 gid = pw->pw_gid;
1458
1459 TALLOC_FREE( pw );
1460
1461 if (!getgroups_unix_user(mem_ctx, username, gid, pp_gids, p_num_groups)) {
1462 return NT_STATUS_NO_SUCH_USER;
1463 }
1464
1465 if (*p_num_groups == 0) {
1466 smb_panic("primary group missing");
1467 }
1468
1469 *pp_sids = TALLOC_ARRAY(mem_ctx, DOM_SID, *p_num_groups);
1470
1471 if (*pp_sids == NULL) {
1472 TALLOC_FREE(*pp_gids);
1473 return NT_STATUS_NO_MEMORY;
1474 }
1475
1476 for (i=0; i<*p_num_groups; i++) {
1477 gid_to_sid(&(*pp_sids)[i], (*pp_gids)[i]);
1478 }
1479
1480 return NT_STATUS_OK;
1481 }
1482
1483 /*******************************************************************
1484 Look up a rid in the SAM we're responsible for (i.e. passdb)
1485 ********************************************************************/
1486
1487 static bool lookup_global_sam_rid(TALLOC_CTX *mem_ctx, uint32 rid,
1488 const char **name,
1489 enum lsa_SidType *psid_name_use,
1490 union unid_t *unix_id)
1491 {
1492 struct samu *sam_account = NULL;
1493 GROUP_MAP map;
1494 bool ret;
1495 DOM_SID sid;
1496
1497 *psid_name_use = SID_NAME_UNKNOWN;
1498
1499 DEBUG(5,("lookup_global_sam_rid: looking up RID %u.\n",
1500 (unsigned int)rid));
1501
1502 sid_copy(&sid, get_global_sam_sid());
1503 sid_append_rid(&sid, rid);
1504
1505 /* see if the passdb can help us with the name of the user */
1506
1507 if ( !(sam_account = samu_new( NULL )) ) {
1508 return False;
1509 }
1510
1511 /* BEING ROOT BLLOCK */
1512 become_root();
1513 if (pdb_getsampwsid(sam_account, &sid)) {
1514 struct passwd *pw;
1515
1516 unbecome_root(); /* -----> EXIT BECOME_ROOT() */
1517 *name = talloc_strdup(mem_ctx, pdb_get_username(sam_account));
1518 if (!*name) {
1519 TALLOC_FREE(sam_account);
1520 return False;
1521 }
1522
1523 *psid_name_use = SID_NAME_USER;
1524
1525 TALLOC_FREE(sam_account);
1526
1527 if (unix_id == NULL) {
1528 return True;
1529 }
1530
1531 pw = Get_Pwnam_alloc(talloc_tos(), *name);
1532 if (pw == NULL) {
1533 return False;
1534 }
1535 unix_id->uid = pw->pw_uid;
1536 TALLOC_FREE(pw);
1537 return True;
1538 }
1539 TALLOC_FREE(sam_account);
1540
1541 ret = pdb_getgrsid(&map, sid);
1542 unbecome_root();
1543 /* END BECOME_ROOT BLOCK */
1544
1545 /* do not resolve SIDs to a name unless there is a valid
1546 gid associated with it */
1547
1548 if ( ret && (map.gid != (gid_t)-1) ) {
1549 *name = talloc_strdup(mem_ctx, map.nt_name);
1550 *psid_name_use = map.sid_name_use;
1551
1552 if ( unix_id ) {
1553 unix_id->gid = map.gid;
1554 }
1555
1556 return True;
1557 }
1558
1559 /* Windows will always map RID 513 to something. On a non-domain
1560 controller, this gets mapped to SERVER\None. */
1561
1562 if ( unix_id ) {
1563 DEBUG(5, ("Can't find a unix id for an unmapped group\n"));
1564 return False;
1565 }
1566
1567 if ( rid == DOMAIN_GROUP_RID_USERS ) {
1568 *name = talloc_strdup(mem_ctx, "None" );
1569 *psid_name_use = SID_NAME_DOM_GRP;
1570
1571 return True;
1572 }
1573
1574 return False;
1575 }
1576
1577 static NTSTATUS pdb_default_lookup_rids(struct pdb_methods *methods,
1578 const DOM_SID *domain_sid,
1579 int num_rids,
1580 uint32 *rids,
1581 const char **names,
1582 enum lsa_SidType *attrs)
1583 {
1584 int i;
1585 NTSTATUS result;
1586 bool have_mapped = False;
1587 bool have_unmapped = False;
1588
1589 if (sid_check_is_builtin(domain_sid)) {
1590
1591 for (i=0; i<num_rids; i++) {
1592 const char *name;
1593
1594 if (lookup_builtin_rid(names, rids[i], &name)) {
1595 attrs[i] = SID_NAME_ALIAS;
1596 names[i] = name;
1597 DEBUG(5,("lookup_rids: %s:%d\n",
1598 names[i], attrs[i]));
1599 have_mapped = True;
1600 } else {
1601 have_unmapped = True;
1602 attrs[i] = SID_NAME_UNKNOWN;
1603 }
1604 }
1605 goto done;
1606 }
1607
1608 /* Should not happen, but better check once too many */
1609 if (!sid_check_is_domain(domain_sid)) {
1610 return NT_STATUS_INVALID_HANDLE;
1611 }
1612
1613 for (i = 0; i < num_rids; i++) {
1614 const char *name;
1615
1616 if (lookup_global_sam_rid(names, rids[i], &name, &attrs[i],
1617 NULL)) {
1618 if (name == NULL) {
1619 return NT_STATUS_NO_MEMORY;
1620 }
1621 names[i] = name;
1622 DEBUG(5,("lookup_rids: %s:%d\n", names[i], attrs[i]));
1623 have_mapped = True;
1624 } else {
1625 have_unmapped = True;
1626 attrs[i] = SID_NAME_UNKNOWN;
1627 }
1628 }
1629
1630 done:
1631
1632 result = NT_STATUS_NONE_MAPPED;
1633
1634 if (have_mapped)
1635 result = have_unmapped ? STATUS_SOME_UNMAPPED : NT_STATUS_OK;
1636
1637 return result;
1638 }
1639
1640 #if 0
1641 static NTSTATUS pdb_default_lookup_names(struct pdb_methods *methods,
1642 const DOM_SID *domain_sid,
1643 int num_names,
1644 const char **names,
1645 uint32 *rids,
1646 enum lsa_SidType *attrs)
1647 {
1648 int i;
1649 NTSTATUS result;
1650 bool have_mapped = False;
1651 bool have_unmapped = False;
1652
1653 if (sid_check_is_builtin(domain_sid)) {
1654
1655 for (i=0; i<num_names; i++) {
1656 uint32 rid;
1657
1658 if (lookup_builtin_name(names[i], &rid)) {
1659 attrs[i] = SID_NAME_ALIAS;
1660 rids[i] = rid;
1661 DEBUG(5,("lookup_rids: %s:%d\n",
1662 names[i], attrs[i]));
1663 have_mapped = True;
1664 } else {
1665 have_unmapped = True;
1666 attrs[i] = SID_NAME_UNKNOWN;
1667 }
1668 }
1669 goto done;
1670 }
1671
1672 /* Should not happen, but better check once too many */
1673 if (!sid_check_is_domain(domain_sid)) {
1674 return NT_STATUS_INVALID_HANDLE;
1675 }
1676
1677 for (i = 0; i < num_names; i++) {
1678 if (lookup_global_sam_name(names[i], 0, &rids[i], &attrs[i])) {
1679 DEBUG(5,("lookup_names: %s-> %d:%d\n", names[i],
1680 rids[i], attrs[i]));
1681 have_mapped = True;
1682 } else {
1683 have_unmapped = True;
1684 attrs[i] = SID_NAME_UNKNOWN;
1685 }
1686 }
1687
1688 done:
1689
1690 result = NT_STATUS_NONE_MAPPED;
1691
1692 if (have_mapped)
1693 result = have_unmapped ? STATUS_SOME_UNMAPPED : NT_STATUS_OK;
1694
1695 return result;
1696 }
1697 #endif
1698
1699 static int pdb_search_destructor(struct pdb_search *search)
1700 {
1701 if ((!search->search_ended) && (search->search_end != NULL)) {
1702 search->search_end(search);
1703 }
1704 return 0;
1705 }
1706
1707 struct pdb_search *pdb_search_init(TALLOC_CTX *mem_ctx,
1708 enum pdb_search_type type)
1709 {
1710 struct pdb_search *result;
1711
1712 result = talloc(mem_ctx, struct pdb_search);
1713 if (result == NULL) {
1714 DEBUG(0, ("talloc failed\n"));
1715 return NULL;
1716 }
1717
1718 result->type = type;
1719 result->cache = NULL;
1720 result->num_entries = 0;
1721 result->cache_size = 0;
1722 result->search_ended = False;
1723 result->search_end = NULL;
1724
1725 /* Segfault appropriately if not initialized */
1726 result->next_entry = NULL;
1727 result->search_end = NULL;
1728
1729 talloc_set_destructor(result, pdb_search_destructor);
1730
1731 return result;
1732 }
1733
1734 static void fill_displayentry(TALLOC_CTX *mem_ctx, uint32 rid,
1735 uint16 acct_flags,
1736 const char *account_name,
1737 const char *fullname,
1738 const char *description,
1739 struct samr_displayentry *entry)
1740 {
1741 entry->rid = rid;
1742 entry->acct_flags = acct_flags;
1743
1744 if (account_name != NULL)
1745 entry->account_name = talloc_strdup(mem_ctx, account_name);
1746 else
1747 entry->account_name = "";
1748
1749 if (fullname != NULL)
1750 entry->fullname = talloc_strdup(mem_ctx, fullname);
1751 else
1752 entry->fullname = "";
1753
1754 if (description != NULL)
1755 entry->description = talloc_strdup(mem_ctx, description);
1756 else
1757 entry->description = "";
1758 }
1759
1760 struct group_search {
1761 GROUP_MAP *groups;
1762 size_t num_groups, current_group;
1763 };
1764
1765 static bool next_entry_groups(struct pdb_search *s,
1766 struct samr_displayentry *entry)
1767 {
1768 struct group_search *state = (struct group_search *)s->private_data;
1769 uint32 rid;
1770 GROUP_MAP *map = &state->groups[state->current_group];
1771
1772 if (state->current_group == state->num_groups)
1773 return False;
1774
1775 sid_peek_rid(&map->sid, &rid);
1776
1777 fill_displayentry(s, rid, 0, map->nt_name, NULL, map->comment, entry);
1778
1779 state->current_group += 1;
1780 return True;
1781 }
1782
1783 static void search_end_groups(struct pdb_search *search)
1784 {
1785 struct group_search *state =
1786 (struct group_search *)search->private_data;
1787 SAFE_FREE(state->groups);
1788 }
1789
1790 static bool pdb_search_grouptype(struct pdb_search *search,
1791 const DOM_SID *sid, enum lsa_SidType type)
1792 {
1793 struct group_search *state;
1794
1795 state = talloc(search, struct group_search);
1796 if (state == NULL) {
1797 DEBUG(0, ("talloc failed\n"));
1798 return False;
1799 }
1800
1801 if (!pdb_enum_group_mapping(sid, type, &state->groups, &state->num_groups,
1802 True)) {
1803 DEBUG(0, ("Could not enum groups\n"));
1804 return False;
1805 }
1806
1807 state->current_group = 0;
1808 search->private_data = state;
1809 search->next_entry = next_entry_groups;
1810 search->search_end = search_end_groups;
1811 return True;
1812 }
1813
1814 static bool pdb_default_search_groups(struct pdb_methods *methods,
1815 struct pdb_search *search)
1816 {
1817 return pdb_search_grouptype(search, get_global_sam_sid(), SID_NAME_DOM_GRP);
1818 }
1819
1820 static bool pdb_default_search_aliases(struct pdb_methods *methods,
1821 struct pdb_search *search,
1822 const DOM_SID *sid)
1823 {
1824
1825 return pdb_search_grouptype(search, sid, SID_NAME_ALIAS);
1826 }
1827
1828 static struct samr_displayentry *pdb_search_getentry(struct pdb_search *search,
1829 uint32 idx)
1830 {
1831 if (idx < search->num_entries)
1832 return &search->cache[idx];
1833
1834 if (search->search_ended)
1835 return NULL;
1836
1837 while (idx >= search->num_entries) {
1838 struct samr_displayentry entry;
1839
1840 if (!search->next_entry(search, &entry)) {
1841 search->search_end(search);
1842 search->search_ended = True;
1843 break;
1844 }
1845
1846 ADD_TO_LARGE_ARRAY(search, struct samr_displayentry,
1847 entry, &search->cache, &search->num_entries,
1848 &search->cache_size);
1849 }
1850
1851 return (search->num_entries > idx) ? &search->cache[idx] : NULL;
1852 }
1853
1854 struct pdb_search *pdb_search_users(TALLOC_CTX *mem_ctx, uint32 acct_flags)
1855 {
1856 struct pdb_methods *pdb = pdb_get_methods();
1857 struct pdb_search *result;
1858
1859 result = pdb_search_init(mem_ctx, PDB_USER_SEARCH);
1860 if (result == NULL) {
1861 return NULL;
1862 }
1863
1864 if (!pdb->search_users(pdb, result, acct_flags)) {
1865 TALLOC_FREE(result);
1866 return NULL;
1867 }
1868 return result;
1869 }
1870
1871 struct pdb_search *pdb_search_groups(TALLOC_CTX *mem_ctx)
1872 {
1873 struct pdb_methods *pdb = pdb_get_methods();
1874 struct pdb_search *result;
1875
1876 result = pdb_search_init(mem_ctx, PDB_GROUP_SEARCH);
1877 if (result == NULL) {
1878 return NULL;
1879 }
1880
1881 if (!pdb->search_groups(pdb, result)) {
1882 TALLOC_FREE(result);
1883 return NULL;
1884 }
1885 return result;
1886 }
1887
1888 struct pdb_search *pdb_search_aliases(TALLOC_CTX *mem_ctx, const DOM_SID *sid)
1889 {
1890 struct pdb_methods *pdb = pdb_get_methods();
1891 struct pdb_search *result;
1892
1893 if (pdb == NULL) return NULL;
1894
1895 result = pdb_search_init(mem_ctx, PDB_ALIAS_SEARCH);
1896 if (result == NULL) {
1897 return NULL;
1898 }
1899
1900 if (!pdb->search_aliases(pdb, result, sid)) {
1901 TALLOC_FREE(result);
1902 return NULL;
1903 }
1904 return result;
1905 }
1906
1907 uint32 pdb_search_entries(struct pdb_search *search,
1908 uint32 start_idx, uint32 max_entries,
1909 struct samr_displayentry **result)
1910 {
1911 struct samr_displayentry *end_entry;
1912 uint32 end_idx = start_idx+max_entries-1;
1913
1914 /* The first entry needs to be searched after the last. Otherwise the
1915 * first entry might have moved due to a realloc during the search for
1916 * the last entry. */
1917
1918 end_entry = pdb_search_getentry(search, end_idx);
1919 *result = pdb_search_getentry(search, start_idx);
1920
1921 if (end_entry != NULL)
1922 return max_entries;
1923
1924 if (start_idx >= search->num_entries)
1925 return 0;
1926
1927 return search->num_entries - start_idx;
1928 }
1929
1930 /*******************************************************************
1931 trustdom methods
1932 *******************************************************************/
1933
1934 bool pdb_get_trusteddom_pw(const char *domain, char** pwd, DOM_SID *sid,
1935 time_t *pass_last_set_time)
1936 {
1937 struct pdb_methods *pdb = pdb_get_methods();
1938 return pdb->get_trusteddom_pw(pdb, domain, pwd, sid,
1939 pass_last_set_time);
1940 }
1941
1942 bool pdb_set_trusteddom_pw(const char* domain, const char* pwd,
1943 const DOM_SID *sid)
1944 {
1945 struct pdb_methods *pdb = pdb_get_methods();
1946 return pdb->set_trusteddom_pw(pdb, domain, pwd, sid);
1947 }
1948
1949 bool pdb_del_trusteddom_pw(const char *domain)
1950 {
1951 struct pdb_methods *pdb = pdb_get_methods();
1952 return pdb->del_trusteddom_pw(pdb, domain);
1953 }
1954
1955 NTSTATUS pdb_enum_trusteddoms(TALLOC_CTX *mem_ctx, uint32 *num_domains,
1956 struct trustdom_info ***domains)
1957 {
1958 struct pdb_methods *pdb = pdb_get_methods();
1959 return pdb->enum_trusteddoms(pdb, mem_ctx, num_domains, domains);
1960 }
1961
1962 /*******************************************************************
1963 the defaults for trustdom methods:
1964 these simply call the original passdb/secrets.c actions,
1965 to be replaced by pdb_ldap.
1966 *******************************************************************/
1967
1968 static bool pdb_default_get_trusteddom_pw(struct pdb_methods *methods,
1969 const char *domain,
1970 char** pwd,
1971 DOM_SID *sid,
1972 time_t *pass_last_set_time)
1973 {
1974 return secrets_fetch_trusted_domain_password(domain, pwd,
1975 sid, pass_last_set_time);
1976
1977 }
1978
1979 static bool pdb_default_set_trusteddom_pw(struct pdb_methods *methods,
1980 const char* domain,
1981 const char* pwd,
1982 const DOM_SID *sid)
1983 {
1984 return secrets_store_trusted_domain_password(domain, pwd, sid);
1985 }
1986
1987 static bool pdb_default_del_trusteddom_pw(struct pdb_methods *methods,
1988 const char *domain)
1989 {
1990 return trusted_domain_password_delete(domain);
1991 }
1992
1993 static NTSTATUS pdb_default_enum_trusteddoms(struct pdb_methods *methods,
1994 TALLOC_CTX *mem_ctx,
1995 uint32 *num_domains,
1996 struct trustdom_info ***domains)
1997 {
1998 return secrets_trusted_domains(mem_ctx, num_domains, domains);
1999 }
2000
2001 static struct pdb_domain_info *pdb_default_get_domain_info(
2002 struct pdb_methods *m, TALLOC_CTX *mem_ctx)
2003 {
2004 return NULL;
2005 }
2006
2007 /*******************************************************************
2008 Create a pdb_methods structure and initialize it with the default
2009 operations. In this way a passdb module can simply implement
2010 the functionality it cares about. However, normally this is done
2011 in groups of related functions.
2012 *******************************************************************/
2013
2014 NTSTATUS make_pdb_method( struct pdb_methods **methods )
2015 {
2016 /* allocate memory for the structure as its own talloc CTX */
2017
2018 *methods = talloc_zero(talloc_autofree_context(), struct pdb_methods);
2019 if (*methods == NULL) {
2020 return NT_STATUS_NO_MEMORY;
2021 }
2022
2023 (*methods)->get_domain_info = pdb_default_get_domain_info;
2024 (*methods)->getsampwnam = pdb_default_getsampwnam;
2025 (*methods)->getsampwsid = pdb_default_getsampwsid;
2026 (*methods)->create_user = pdb_default_create_user;
2027 (*methods)->delete_user = pdb_default_delete_user;
2028 (*methods)->add_sam_account = pdb_default_add_sam_account;
2029 (*methods)->update_sam_account = pdb_default_update_sam_account;
2030 (*methods)->delete_sam_account = pdb_default_delete_sam_account;
2031 (*methods)->rename_sam_account = pdb_default_rename_sam_account;
2032 (*methods)->update_login_attempts = pdb_default_update_login_attempts;
2033
2034 (*methods)->getgrsid = pdb_default_getgrsid;
2035 (*methods)->getgrgid = pdb_default_getgrgid;
2036 (*methods)->getgrnam = pdb_default_getgrnam;
2037 (*methods)->create_dom_group = pdb_default_create_dom_group;
2038 (*methods)->delete_dom_group = pdb_default_delete_dom_group;
2039 (*methods)->add_group_mapping_entry = pdb_default_add_group_mapping_entry;
2040 (*methods)->update_group_mapping_entry = pdb_default_update_group_mapping_entry;
2041 (*methods)->delete_group_mapping_entry = pdb_default_delete_group_mapping_entry;
2042 (*methods)->enum_group_mapping = pdb_default_enum_group_mapping;
2043 (*methods)->enum_group_members = pdb_default_enum_group_members;
2044 (*methods)->enum_group_memberships = pdb_default_enum_group_memberships;
2045 (*methods)->set_unix_primary_group = pdb_default_set_unix_primary_group;
2046 (*methods)->add_groupmem = pdb_default_add_groupmem;
2047 (*methods)->del_groupmem = pdb_default_del_groupmem;
2048 (*methods)->create_alias = pdb_default_create_alias;
2049 (*methods)->delete_alias = pdb_default_delete_alias;
2050 (*methods)->get_aliasinfo = pdb_default_get_aliasinfo;
2051 (*methods)->set_aliasinfo = pdb_default_set_aliasinfo;
2052 (*methods)->add_aliasmem = pdb_default_add_aliasmem;
2053 (*methods)->del_aliasmem = pdb_default_del_aliasmem;
2054 (*methods)->enum_aliasmem = pdb_default_enum_aliasmem;
2055 (*methods)->enum_alias_memberships = pdb_default_alias_memberships;
2056 (*methods)->lookup_rids = pdb_default_lookup_rids;
2057 (*methods)->get_account_policy = pdb_default_get_account_policy;
2058 (*methods)->set_account_policy = pdb_default_set_account_policy;
2059 (*methods)->get_seq_num = pdb_default_get_seq_num;
2060 (*methods)->uid_to_rid = pdb_default_uid_to_rid;
2061 (*methods)->uid_to_sid = pdb_default_uid_to_sid;
2062 (*methods)->gid_to_sid = pdb_default_gid_to_sid;
2063 (*methods)->sid_to_id = pdb_default_sid_to_id;
2064
2065 (*methods)->search_groups = pdb_default_search_groups;
2066 (*methods)->search_aliases = pdb_default_search_aliases;
2067
2068 (*methods)->get_trusteddom_pw = pdb_default_get_trusteddom_pw;
2069 (*methods)->set_trusteddom_pw = pdb_default_set_trusteddom_pw;
2070 (*methods)->del_trusteddom_pw = pdb_default_del_trusteddom_pw;
2071 (*methods)->enum_trusteddoms = pdb_default_enum_trusteddoms;
2072
2073 return NT_STATUS_OK;
2074 }
reg import