?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Samba 3: added Samba 3.0.24 sources
[tomato.git] / release / src / router / samba3 / source / groupdb / mapping.c
blob902068204aca11c239d77e6e99a3e947c429c381
1 /*
2 * Unix SMB/CIFS implementation.
3 * RPC Pipe client / server routines
4 * Copyright (C) Andrew Tridgell 1992-2000,
5 * Copyright (C) Jean François Micouleau 1998-2001.
6 * Copyright (C) Volker Lendecke 2006.
7 * Copyright (C) Gerald Carter 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 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
26 static TDB_CONTEXT *tdb; /* used for driver files */
27
28 #define DATABASE_VERSION_V1 1 /* native byte format. */
29 #define DATABASE_VERSION_V2 2 /* le format. */
30
31 #define GROUP_PREFIX "UNIXGROUP/"
32
33 /* Alias memberships are stored reverse, as memberships. The performance
34 * critical operation is to determine the aliases a SID is member of, not
35 * listing alias members. So we store a list of alias SIDs a SID is member of
36 * hanging of the member as key.
37 */
38 #define MEMBEROF_PREFIX "MEMBEROF/"
39
40
41 static BOOL enum_group_mapping(const DOM_SID *sid, enum SID_NAME_USE sid_name_use, GROUP_MAP **pp_rmap,
42 size_t *p_num_entries, BOOL unix_only);
43 static BOOL group_map_remove(const DOM_SID *sid);
44
45 /****************************************************************************
46 Open the group mapping tdb.
47 ****************************************************************************/
48
49 static BOOL init_group_mapping(void)
50 {
51 const char *vstring = "INFO/version";
52 int32 vers_id;
53 GROUP_MAP *map_table = NULL;
54 size_t num_entries = 0;
55
56 if (tdb)
57 return True;
58
59 tdb = tdb_open_log(lock_path("group_mapping.tdb"), 0, TDB_DEFAULT, O_RDWR|O_CREAT, 0600);
60 if (!tdb) {
61 DEBUG(0,("Failed to open group mapping database\n"));
62 return False;
63 }
64
65 /* handle a Samba upgrade */
66 tdb_lock_bystring(tdb, vstring);
67
68 /* Cope with byte-reversed older versions of the db. */
69 vers_id = tdb_fetch_int32(tdb, vstring);
70 if ((vers_id == DATABASE_VERSION_V1) || (IREV(vers_id) == DATABASE_VERSION_V1)) {
71 /* Written on a bigendian machine with old fetch_int code. Save as le. */
72 tdb_store_int32(tdb, vstring, DATABASE_VERSION_V2);
73 vers_id = DATABASE_VERSION_V2;
74 }
75
76 /* if its an unknown version we remove everthing in the db */
77
78 if (vers_id != DATABASE_VERSION_V2) {
79 tdb_traverse(tdb, tdb_traverse_delete_fn, NULL);
80 tdb_store_int32(tdb, vstring, DATABASE_VERSION_V2);
81 }
82
83 tdb_unlock_bystring(tdb, vstring);
84
85 /* cleanup any map entries with a gid == -1 */
86
87 if ( enum_group_mapping( NULL, SID_NAME_UNKNOWN, &map_table, &num_entries, False ) ) {
88 int i;
89
90 for ( i=0; i<num_entries; i++ ) {
91 if ( map_table[i].gid == -1 ) {
92 group_map_remove( &map_table[i].sid );
93 }
94 }
95
96 SAFE_FREE( map_table );
97 }
98
99
100 return True;
101 }
102
103 /****************************************************************************
104 ****************************************************************************/
105 static BOOL add_mapping_entry(GROUP_MAP *map, int flag)
106 {
107 TDB_DATA kbuf, dbuf;
108 pstring key, buf;
109 fstring string_sid="";
110 int len;
111
112 if(!init_group_mapping()) {
113 DEBUG(0,("failed to initialize group mapping\n"));
114 return(False);
115 }
116
117 sid_to_string(string_sid, &map->sid);
118
119 len = tdb_pack(buf, sizeof(buf), "ddff",
120 map->gid, map->sid_name_use, map->nt_name, map->comment);
121
122 if (len > sizeof(buf))
123 return False;
124
125 slprintf(key, sizeof(key), "%s%s", GROUP_PREFIX, string_sid);
126
127 kbuf.dsize = strlen(key)+1;
128 kbuf.dptr = key;
129 dbuf.dsize = len;
130 dbuf.dptr = buf;
131 if (tdb_store(tdb, kbuf, dbuf, flag) != 0) return False;
132
133 return True;
134 }
135
136 /****************************************************************************
137 initialise first time the mapping list
138 ****************************************************************************/
139 NTSTATUS add_initial_entry(gid_t gid, const char *sid, enum SID_NAME_USE sid_name_use, const char *nt_name, const char *comment)
140 {
141 GROUP_MAP map;
142
143 if(!init_group_mapping()) {
144 DEBUG(0,("failed to initialize group mapping\n"));
145 return NT_STATUS_UNSUCCESSFUL;
146 }
147
148 map.gid=gid;
149 if (!string_to_sid(&map.sid, sid)) {
150 DEBUG(0, ("string_to_sid failed: %s", sid));
151 return NT_STATUS_UNSUCCESSFUL;
152 }
153
154 map.sid_name_use=sid_name_use;
155 fstrcpy(map.nt_name, nt_name);
156 fstrcpy(map.comment, comment);
157
158 return pdb_add_group_mapping_entry(&map);
159 }
160
161 /****************************************************************************
162 Map a unix group to a newly created mapping
163 ****************************************************************************/
164 NTSTATUS map_unix_group(const struct group *grp, GROUP_MAP *pmap)
165 {
166 NTSTATUS status;
167 GROUP_MAP map;
168 const char *grpname, *dom, *name;
169 uint32 rid;
170
171 if (pdb_getgrgid(&map, grp->gr_gid)) {
172 return NT_STATUS_GROUP_EXISTS;
173 }
174
175 map.gid = grp->gr_gid;
176 grpname = grp->gr_name;
177
178 if (lookup_name(tmp_talloc_ctx(), grpname, LOOKUP_NAME_ISOLATED,
179 &dom, &name, NULL, NULL)) {
180
181 const char *tmp = talloc_asprintf(
182 tmp_talloc_ctx(), "Unix Group %s", grp->gr_name);
183
184 DEBUG(5, ("%s exists as %s\\%s, retrying as \"%s\"\n",
185 grpname, dom, name, tmp));
186 grpname = tmp;
187 }
188
189 if (lookup_name(tmp_talloc_ctx(), grpname, LOOKUP_NAME_ISOLATED,
190 NULL, NULL, NULL, NULL)) {
191 DEBUG(3, ("\"%s\" exists, can't map it\n", grp->gr_name));
192 return NT_STATUS_GROUP_EXISTS;
193 }
194
195 fstrcpy(map.nt_name, grpname);
196
197 if (pdb_rid_algorithm()) {
198 rid = algorithmic_pdb_gid_to_group_rid( grp->gr_gid );
199 } else {
200 if (!pdb_new_rid(&rid)) {
201 DEBUG(3, ("Could not get a new RID for %s\n",
202 grp->gr_name));
203 return NT_STATUS_ACCESS_DENIED;
204 }
205 }
206
207 sid_compose(&map.sid, get_global_sam_sid(), rid);
208 map.sid_name_use = SID_NAME_DOM_GRP;
209 fstrcpy(map.comment, talloc_asprintf(tmp_talloc_ctx(), "Unix Group %s",
210 grp->gr_name));
211
212 status = pdb_add_group_mapping_entry(&map);
213 if (NT_STATUS_IS_OK(status)) {
214 *pmap = map;
215 }
216 return status;
217 }
218
219 /****************************************************************************
220 Return the sid and the type of the unix group.
221 ****************************************************************************/
222
223 static BOOL get_group_map_from_sid(DOM_SID sid, GROUP_MAP *map)
224 {
225 TDB_DATA kbuf, dbuf;
226 pstring key;
227 fstring string_sid;
228 int ret = 0;
229
230 if(!init_group_mapping()) {
231 DEBUG(0,("failed to initialize group mapping\n"));
232 return(False);
233 }
234
235 /* the key is the SID, retrieving is direct */
236
237 sid_to_string(string_sid, &sid);
238 slprintf(key, sizeof(key), "%s%s", GROUP_PREFIX, string_sid);
239
240 kbuf.dptr = key;
241 kbuf.dsize = strlen(key)+1;
242
243 dbuf = tdb_fetch(tdb, kbuf);
244 if (!dbuf.dptr)
245 return False;
246
247 ret = tdb_unpack(dbuf.dptr, dbuf.dsize, "ddff",
248 &map->gid, &map->sid_name_use, &map->nt_name, &map->comment);
249
250 SAFE_FREE(dbuf.dptr);
251
252 if ( ret == -1 ) {
253 DEBUG(3,("get_group_map_from_sid: tdb_unpack failure\n"));
254 return False;
255 }
256
257 sid_copy(&map->sid, &sid);
258
259 return True;
260 }
261
262 /****************************************************************************
263 Return the sid and the type of the unix group.
264 ****************************************************************************/
265
266 static BOOL get_group_map_from_gid(gid_t gid, GROUP_MAP *map)
267 {
268 TDB_DATA kbuf, dbuf, newkey;
269 fstring string_sid;
270 int ret;
271
272 if(!init_group_mapping()) {
273 DEBUG(0,("failed to initialize group mapping\n"));
274 return(False);
275 }
276
277 /* we need to enumerate the TDB to find the GID */
278
279 for (kbuf = tdb_firstkey(tdb);
280 kbuf.dptr;
281 newkey = tdb_nextkey(tdb, kbuf), safe_free(kbuf.dptr), kbuf=newkey) {
282
283 if (strncmp(kbuf.dptr, GROUP_PREFIX, strlen(GROUP_PREFIX)) != 0) continue;
284
285 dbuf = tdb_fetch(tdb, kbuf);
286 if (!dbuf.dptr)
287 continue;
288
289 fstrcpy(string_sid, kbuf.dptr+strlen(GROUP_PREFIX));
290
291 string_to_sid(&map->sid, string_sid);
292
293 ret = tdb_unpack(dbuf.dptr, dbuf.dsize, "ddff",
294 &map->gid, &map->sid_name_use, &map->nt_name, &map->comment);
295
296 SAFE_FREE(dbuf.dptr);
297
298 if ( ret == -1 ) {
299 DEBUG(3,("get_group_map_from_gid: tdb_unpack failure\n"));
300 return False;
301 }
302
303 if (gid==map->gid) {
304 SAFE_FREE(kbuf.dptr);
305 return True;
306 }
307 }
308
309 return False;
310 }
311
312 /****************************************************************************
313 Return the sid and the type of the unix group.
314 ****************************************************************************/
315
316 static BOOL get_group_map_from_ntname(const char *name, GROUP_MAP *map)
317 {
318 TDB_DATA kbuf, dbuf, newkey;
319 fstring string_sid;
320 int ret;
321
322 if(!init_group_mapping()) {
323 DEBUG(0,("get_group_map_from_ntname:failed to initialize group mapping\n"));
324 return(False);
325 }
326
327 /* we need to enumerate the TDB to find the name */
328
329 for (kbuf = tdb_firstkey(tdb);
330 kbuf.dptr;
331 newkey = tdb_nextkey(tdb, kbuf), safe_free(kbuf.dptr), kbuf=newkey) {
332
333 if (strncmp(kbuf.dptr, GROUP_PREFIX, strlen(GROUP_PREFIX)) != 0) continue;
334
335 dbuf = tdb_fetch(tdb, kbuf);
336 if (!dbuf.dptr)
337 continue;
338
339 fstrcpy(string_sid, kbuf.dptr+strlen(GROUP_PREFIX));
340
341 string_to_sid(&map->sid, string_sid);
342
343 ret = tdb_unpack(dbuf.dptr, dbuf.dsize, "ddff",
344 &map->gid, &map->sid_name_use, &map->nt_name, &map->comment);
345
346 SAFE_FREE(dbuf.dptr);
347
348 if ( ret == -1 ) {
349 DEBUG(3,("get_group_map_from_ntname: tdb_unpack failure\n"));
350 return False;
351 }
352
353 if ( strequal(name, map->nt_name) ) {
354 SAFE_FREE(kbuf.dptr);
355 return True;
356 }
357 }
358
359 return False;
360 }
361
362 /****************************************************************************
363 Remove a group mapping entry.
364 ****************************************************************************/
365
366 static BOOL group_map_remove(const DOM_SID *sid)
367 {
368 TDB_DATA kbuf, dbuf;
369 pstring key;
370 fstring string_sid;
371
372 if(!init_group_mapping()) {
373 DEBUG(0,("failed to initialize group mapping\n"));
374 return(False);
375 }
376
377 /* the key is the SID, retrieving is direct */
378
379 sid_to_string(string_sid, sid);
380 slprintf(key, sizeof(key), "%s%s", GROUP_PREFIX, string_sid);
381
382 kbuf.dptr = key;
383 kbuf.dsize = strlen(key)+1;
384
385 dbuf = tdb_fetch(tdb, kbuf);
386 if (!dbuf.dptr)
387 return False;
388
389 SAFE_FREE(dbuf.dptr);
390
391 if(tdb_delete(tdb, kbuf) != TDB_SUCCESS)
392 return False;
393
394 return True;
395 }
396
397 /****************************************************************************
398 Enumerate the group mapping.
399 ****************************************************************************/
400
401 static BOOL enum_group_mapping(const DOM_SID *domsid, enum SID_NAME_USE sid_name_use, GROUP_MAP **pp_rmap,
402 size_t *p_num_entries, BOOL unix_only)
403 {
404 TDB_DATA kbuf, dbuf, newkey;
405 fstring string_sid;
406 GROUP_MAP map;
407 GROUP_MAP *mapt;
408 int ret;
409 size_t entries=0;
410 DOM_SID grpsid;
411 uint32 rid;
412
413 if(!init_group_mapping()) {
414 DEBUG(0,("failed to initialize group mapping\n"));
415 return(False);
416 }
417
418 *p_num_entries=0;
419 *pp_rmap=NULL;
420
421 for (kbuf = tdb_firstkey(tdb);
422 kbuf.dptr;
423 newkey = tdb_nextkey(tdb, kbuf), safe_free(kbuf.dptr), kbuf=newkey) {
424
425 if (strncmp(kbuf.dptr, GROUP_PREFIX, strlen(GROUP_PREFIX)) != 0)
426 continue;
427
428 dbuf = tdb_fetch(tdb, kbuf);
429 if (!dbuf.dptr)
430 continue;
431
432 fstrcpy(string_sid, kbuf.dptr+strlen(GROUP_PREFIX));
433
434 ret = tdb_unpack(dbuf.dptr, dbuf.dsize, "ddff",
435 &map.gid, &map.sid_name_use, &map.nt_name, &map.comment);
436
437 SAFE_FREE(dbuf.dptr);
438
439 if ( ret == -1 ) {
440 DEBUG(3,("enum_group_mapping: tdb_unpack failure\n"));
441 continue;
442 }
443
444 /* list only the type or everything if UNKNOWN */
445 if (sid_name_use!=SID_NAME_UNKNOWN && sid_name_use!=map.sid_name_use) {
446 DEBUG(11,("enum_group_mapping: group %s is not of the requested type\n", map.nt_name));
447 continue;
448 }
449
450 if (unix_only==ENUM_ONLY_MAPPED && map.gid==-1) {
451 DEBUG(11,("enum_group_mapping: group %s is non mapped\n", map.nt_name));
452 continue;
453 }
454
455 string_to_sid(&grpsid, string_sid);
456 sid_copy( &map.sid, &grpsid );
457
458 sid_split_rid( &grpsid, &rid );
459
460 /* Only check the domain if we were given one */
461
462 if ( domsid && !sid_equal( domsid, &grpsid ) ) {
463 DEBUG(11,("enum_group_mapping: group %s is not in domain %s\n",
464 string_sid, sid_string_static(domsid)));
465 continue;
466 }
467
468 DEBUG(11,("enum_group_mapping: returning group %s of "
469 "type %s\n", map.nt_name,
470 sid_type_lookup(map.sid_name_use)));
471
472 (*pp_rmap) = SMB_REALLOC_ARRAY((*pp_rmap), GROUP_MAP, entries+1);
473 if (!(*pp_rmap)) {
474 DEBUG(0,("enum_group_mapping: Unable to enlarge group map!\n"));
475 return False;
476 }
477
478 mapt = (*pp_rmap);
479
480 mapt[entries].gid = map.gid;
481 sid_copy( &mapt[entries].sid, &map.sid);
482 mapt[entries].sid_name_use = map.sid_name_use;
483 fstrcpy(mapt[entries].nt_name, map.nt_name);
484 fstrcpy(mapt[entries].comment, map.comment);
485
486 entries++;
487
488 }
489
490 *p_num_entries=entries;
491
492 return True;
493 }
494
495 /* This operation happens on session setup, so it should better be fast. We
496 * store a list of aliases a SID is member of hanging off MEMBEROF/SID. */
497
498 static NTSTATUS one_alias_membership(const DOM_SID *member,
499 DOM_SID **sids, size_t *num)
500 {
501 fstring key, string_sid;
502 TDB_DATA kbuf, dbuf;
503 const char *p;
504
505 if (!init_group_mapping()) {
506 DEBUG(0,("failed to initialize group mapping\n"));
507 return NT_STATUS_ACCESS_DENIED;
508 }
509
510 sid_to_string(string_sid, member);
511 slprintf(key, sizeof(key), "%s%s", MEMBEROF_PREFIX, string_sid);
512
513 kbuf.dsize = strlen(key)+1;
514 kbuf.dptr = key;
515
516 dbuf = tdb_fetch(tdb, kbuf);
517
518 if (dbuf.dptr == NULL) {
519 return NT_STATUS_OK;
520 }
521
522 p = dbuf.dptr;
523
524 while (next_token(&p, string_sid, " ", sizeof(string_sid))) {
525
526 DOM_SID alias;
527
528 if (!string_to_sid(&alias, string_sid))
529 continue;
530
531 add_sid_to_array_unique(NULL, &alias, sids, num);
532
533 if (sids == NULL)
534 return NT_STATUS_NO_MEMORY;
535 }
536
537 SAFE_FREE(dbuf.dptr);
538 return NT_STATUS_OK;
539 }
540
541 static NTSTATUS alias_memberships(const DOM_SID *members, size_t num_members,
542 DOM_SID **sids, size_t *num)
543 {
544 size_t i;
545
546 *num = 0;
547 *sids = NULL;
548
549 for (i=0; i<num_members; i++) {
550 NTSTATUS status = one_alias_membership(&members[i], sids, num);
551 if (!NT_STATUS_IS_OK(status))
552 return status;
553 }
554 return NT_STATUS_OK;
555 }
556
557 static BOOL is_aliasmem(const DOM_SID *alias, const DOM_SID *member)
558 {
559 DOM_SID *sids;
560 size_t i, num;
561
562 /* This feels the wrong way round, but the on-disk data structure
563 * dictates it this way. */
564 if (!NT_STATUS_IS_OK(alias_memberships(member, 1, &sids, &num)))
565 return False;
566
567 for (i=0; i<num; i++) {
568 if (sid_compare(alias, &sids[i]) == 0) {
569 SAFE_FREE(sids);
570 return True;
571 }
572 }
573 SAFE_FREE(sids);
574 return False;
575 }
576
577 static NTSTATUS add_aliasmem(const DOM_SID *alias, const DOM_SID *member)
578 {
579 GROUP_MAP map;
580 TDB_DATA kbuf, dbuf;
581 pstring key;
582 fstring string_sid;
583 char *new_memberstring;
584 int result;
585
586 if(!init_group_mapping()) {
587 DEBUG(0,("failed to initialize group mapping\n"));
588 return NT_STATUS_ACCESS_DENIED;
589 }
590
591 if (!get_group_map_from_sid(*alias, &map))
592 return NT_STATUS_NO_SUCH_ALIAS;
593
594 if ( (map.sid_name_use != SID_NAME_ALIAS) &&
595 (map.sid_name_use != SID_NAME_WKN_GRP) )
596 return NT_STATUS_NO_SUCH_ALIAS;
597
598 if (is_aliasmem(alias, member))
599 return NT_STATUS_MEMBER_IN_ALIAS;
600
601 sid_to_string(string_sid, member);
602 slprintf(key, sizeof(key), "%s%s", MEMBEROF_PREFIX, string_sid);
603
604 kbuf.dsize = strlen(key)+1;
605 kbuf.dptr = key;
606
607 dbuf = tdb_fetch(tdb, kbuf);
608
609 sid_to_string(string_sid, alias);
610
611 if (dbuf.dptr != NULL) {
612 asprintf(&new_memberstring, "%s %s", (char *)(dbuf.dptr),
613 string_sid);
614 } else {
615 new_memberstring = SMB_STRDUP(string_sid);
616 }
617
618 if (new_memberstring == NULL)
619 return NT_STATUS_NO_MEMORY;
620
621 SAFE_FREE(dbuf.dptr);
622 dbuf.dsize = strlen(new_memberstring)+1;
623 dbuf.dptr = new_memberstring;
624
625 result = tdb_store(tdb, kbuf, dbuf, 0);
626
627 SAFE_FREE(new_memberstring);
628
629 return (result == 0 ? NT_STATUS_OK : NT_STATUS_ACCESS_DENIED);
630 }
631
632 struct aliasmem_closure {
633 const DOM_SID *alias;
634 DOM_SID **sids;
635 size_t *num;
636 };
637
638 static int collect_aliasmem(TDB_CONTEXT *tdb_ctx, TDB_DATA key, TDB_DATA data,
639 void *state)
640 {
641 struct aliasmem_closure *closure = (struct aliasmem_closure *)state;
642 const char *p;
643 fstring alias_string;
644
645 if (strncmp(key.dptr, MEMBEROF_PREFIX,
646 strlen(MEMBEROF_PREFIX)) != 0)
647 return 0;
648
649 p = data.dptr;
650
651 while (next_token(&p, alias_string, " ", sizeof(alias_string))) {
652
653 DOM_SID alias, member;
654 const char *member_string;
655
656
657 if (!string_to_sid(&alias, alias_string))
658 continue;
659
660 if (sid_compare(closure->alias, &alias) != 0)
661 continue;
662
663 /* Ok, we found the alias we're looking for in the membership
664 * list currently scanned. The key represents the alias
665 * member. Add that. */
666
667 member_string = strchr(key.dptr, '/');
668
669 /* Above we tested for MEMBEROF_PREFIX which includes the
670 * slash. */
671
672 SMB_ASSERT(member_string != NULL);
673 member_string += 1;
674
675 if (!string_to_sid(&member, member_string))
676 continue;
677
678 add_sid_to_array(NULL, &member, closure->sids, closure->num);
679 }
680
681 return 0;
682 }
683
684 static NTSTATUS enum_aliasmem(const DOM_SID *alias, DOM_SID **sids, size_t *num)
685 {
686 GROUP_MAP map;
687 struct aliasmem_closure closure;
688
689 if(!init_group_mapping()) {
690 DEBUG(0,("failed to initialize group mapping\n"));
691 return NT_STATUS_ACCESS_DENIED;
692 }
693
694 if (!get_group_map_from_sid(*alias, &map))
695 return NT_STATUS_NO_SUCH_ALIAS;
696
697 if ( (map.sid_name_use != SID_NAME_ALIAS) &&
698 (map.sid_name_use != SID_NAME_WKN_GRP) )
699 return NT_STATUS_NO_SUCH_ALIAS;
700
701 *sids = NULL;
702 *num = 0;
703
704 closure.alias = alias;
705 closure.sids = sids;
706 closure.num = num;
707
708 tdb_traverse(tdb, collect_aliasmem, &closure);
709 return NT_STATUS_OK;
710 }
711
712 static NTSTATUS del_aliasmem(const DOM_SID *alias, const DOM_SID *member)
713 {
714 NTSTATUS result;
715 DOM_SID *sids;
716 size_t i, num;
717 BOOL found = False;
718 char *member_string;
719 TDB_DATA kbuf, dbuf;
720 pstring key;
721 fstring sid_string;
722
723 result = alias_memberships(member, 1, &sids, &num);
724
725 if (!NT_STATUS_IS_OK(result))
726 return result;
727
728 for (i=0; i<num; i++) {
729 if (sid_compare(&sids[i], alias) == 0) {
730 found = True;
731 break;
732 }
733 }
734
735 if (!found) {
736 SAFE_FREE(sids);
737 return NT_STATUS_MEMBER_NOT_IN_ALIAS;
738 }
739
740 if (i < num)
741 sids[i] = sids[num-1];
742
743 num -= 1;
744
745 sid_to_string(sid_string, member);
746 slprintf(key, sizeof(key), "%s%s", MEMBEROF_PREFIX, sid_string);
747
748 kbuf.dsize = strlen(key)+1;
749 kbuf.dptr = key;
750
751 if (num == 0)
752 return tdb_delete(tdb, kbuf) == 0 ?
753 NT_STATUS_OK : NT_STATUS_UNSUCCESSFUL;
754
755 member_string = SMB_STRDUP("");
756
757 if (member_string == NULL) {
758 SAFE_FREE(sids);
759 return NT_STATUS_NO_MEMORY;
760 }
761
762 for (i=0; i<num; i++) {
763 char *s = member_string;
764
765 sid_to_string(sid_string, &sids[i]);
766 asprintf(&member_string, "%s %s", s, sid_string);
767
768 SAFE_FREE(s);
769 if (member_string == NULL) {
770 SAFE_FREE(sids);
771 return NT_STATUS_NO_MEMORY;
772 }
773 }
774
775 dbuf.dsize = strlen(member_string)+1;
776 dbuf.dptr = member_string;
777
778 result = tdb_store(tdb, kbuf, dbuf, 0) == 0 ?
779 NT_STATUS_OK : NT_STATUS_ACCESS_DENIED;
780
781 SAFE_FREE(sids);
782 SAFE_FREE(member_string);
783
784 return result;
785 }
786
787 /*
788 *
789 * High level functions
790 * better to use them than the lower ones.
791 *
792 * we are checking if the group is in the mapping file
793 * and if the group is an existing unix group
794 *
795 */
796
797 /* get a domain group from it's SID */
798
799 BOOL get_domain_group_from_sid(DOM_SID sid, GROUP_MAP *map)
800 {
801 struct group *grp;
802 BOOL ret;
803
804 if(!init_group_mapping()) {
805 DEBUG(0,("failed to initialize group mapping\n"));
806 return(False);
807 }
808
809 DEBUG(10, ("get_domain_group_from_sid\n"));
810
811 /* if the group is NOT in the database, it CAN NOT be a domain group */
812
813 become_root();
814 ret = pdb_getgrsid(map, sid);
815 unbecome_root();
816
817 /* special case check for rid 513 */
818
819 if ( !ret ) {
820 uint32 rid;
821
822 sid_peek_rid( &sid, &rid );
823
824 if ( rid == DOMAIN_GROUP_RID_USERS ) {
825 fstrcpy( map->nt_name, "None" );
826 fstrcpy( map->comment, "Ordinary Users" );
827 sid_copy( &map->sid, &sid );
828 map->sid_name_use = SID_NAME_DOM_GRP;
829
830 return True;
831 }
832
833 return False;
834 }
835
836 DEBUG(10, ("get_domain_group_from_sid: SID found in the TDB\n"));
837
838 /* if it's not a domain group, continue */
839 if (map->sid_name_use!=SID_NAME_DOM_GRP) {
840 return False;
841 }
842
843 DEBUG(10, ("get_domain_group_from_sid: SID is a domain group\n"));
844
845 if (map->gid==-1) {
846 return False;
847 }
848
849 DEBUG(10, ("get_domain_group_from_sid: SID is mapped to gid:%lu\n",(unsigned long)map->gid));
850
851 grp = getgrgid(map->gid);
852 if ( !grp ) {
853 DEBUG(10, ("get_domain_group_from_sid: gid DOESN'T exist in UNIX security\n"));
854 return False;
855 }
856
857 DEBUG(10, ("get_domain_group_from_sid: gid exists in UNIX security\n"));
858
859 return True;
860 }
861
862 /****************************************************************************
863 Create a UNIX group on demand.
864 ****************************************************************************/
865
866 int smb_create_group(const char *unix_group, gid_t *new_gid)
867 {
868 pstring add_script;
869 int ret = -1;
870 int fd = 0;
871
872 *new_gid = 0;
873
874 /* defer to scripts */
875
876 if ( *lp_addgroup_script() ) {
877 pstrcpy(add_script, lp_addgroup_script());
878 pstring_sub(add_script, "%g", unix_group);
879 ret = smbrun(add_script, &fd);
880 DEBUG(ret ? 0 : 3,("smb_create_group: Running the command `%s' gave %d\n",add_script,ret));
881 if (ret == 0) {
882 smb_nscd_flush_group_cache();
883 }
884 if (ret != 0)
885 return ret;
886
887 if (fd != 0) {
888 fstring output;
889
890 *new_gid = 0;
891 if (read(fd, output, sizeof(output)) > 0) {
892 *new_gid = (gid_t)strtoul(output, NULL, 10);
893 }
894
895 close(fd);
896 }
897
898 }
899
900 if (*new_gid == 0) {
901 struct group *grp = getgrnam(unix_group);
902
903 if (grp != NULL)
904 *new_gid = grp->gr_gid;
905 }
906
907 return ret;
908 }
909
910 /****************************************************************************
911 Delete a UNIX group on demand.
912 ****************************************************************************/
913
914 int smb_delete_group(const char *unix_group)
915 {
916 pstring del_script;
917 int ret;
918
919 /* defer to scripts */
920
921 if ( *lp_delgroup_script() ) {
922 pstrcpy(del_script, lp_delgroup_script());
923 pstring_sub(del_script, "%g", unix_group);
924 ret = smbrun(del_script,NULL);
925 DEBUG(ret ? 0 : 3,("smb_delete_group: Running the command `%s' gave %d\n",del_script,ret));
926 if (ret == 0) {
927 smb_nscd_flush_group_cache();
928 }
929 return ret;
930 }
931
932 return -1;
933 }
934
935 /****************************************************************************
936 Set a user's primary UNIX group.
937 ****************************************************************************/
938 int smb_set_primary_group(const char *unix_group, const char* unix_user)
939 {
940 pstring add_script;
941 int ret;
942
943 /* defer to scripts */
944
945 if ( *lp_setprimarygroup_script() ) {
946 pstrcpy(add_script, lp_setprimarygroup_script());
947 all_string_sub(add_script, "%g", unix_group, sizeof(add_script));
948 all_string_sub(add_script, "%u", unix_user, sizeof(add_script));
949 ret = smbrun(add_script,NULL);
950 flush_pwnam_cache();
951 DEBUG(ret ? 0 : 3,("smb_set_primary_group: "
952 "Running the command `%s' gave %d\n",add_script,ret));
953 if (ret == 0) {
954 smb_nscd_flush_group_cache();
955 }
956 return ret;
957 }
958
959 return -1;
960 }
961
962 /****************************************************************************
963 Add a user to a UNIX group.
964 ****************************************************************************/
965
966 int smb_add_user_group(const char *unix_group, const char *unix_user)
967 {
968 pstring add_script;
969 int ret;
970
971 /* defer to scripts */
972
973 if ( *lp_addusertogroup_script() ) {
974 pstrcpy(add_script, lp_addusertogroup_script());
975 pstring_sub(add_script, "%g", unix_group);
976 pstring_sub(add_script, "%u", unix_user);
977 ret = smbrun(add_script,NULL);
978 DEBUG(ret ? 0 : 3,("smb_add_user_group: Running the command `%s' gave %d\n",add_script,ret));
979 if (ret == 0) {
980 smb_nscd_flush_group_cache();
981 }
982 return ret;
983 }
984
985 return -1;
986 }
987
988 /****************************************************************************
989 Delete a user from a UNIX group
990 ****************************************************************************/
991
992 int smb_delete_user_group(const char *unix_group, const char *unix_user)
993 {
994 pstring del_script;
995 int ret;
996
997 /* defer to scripts */
998
999 if ( *lp_deluserfromgroup_script() ) {
1000 pstrcpy(del_script, lp_deluserfromgroup_script());
1001 pstring_sub(del_script, "%g", unix_group);
1002 pstring_sub(del_script, "%u", unix_user);
1003 ret = smbrun(del_script,NULL);
1004 DEBUG(ret ? 0 : 3,("smb_delete_user_group: Running the command `%s' gave %d\n",del_script,ret));
1005 if (ret == 0) {
1006 smb_nscd_flush_group_cache();
1007 }
1008 return ret;
1009 }
1010
1011 return -1;
1012 }
1013
1014
1015 NTSTATUS pdb_default_getgrsid(struct pdb_methods *methods, GROUP_MAP *map,
1016 DOM_SID sid)
1017 {
1018 return get_group_map_from_sid(sid, map) ?
1019 NT_STATUS_OK : NT_STATUS_UNSUCCESSFUL;
1020 }
1021
1022 NTSTATUS pdb_default_getgrgid(struct pdb_methods *methods, GROUP_MAP *map,
1023 gid_t gid)
1024 {
1025 return get_group_map_from_gid(gid, map) ?
1026 NT_STATUS_OK : NT_STATUS_UNSUCCESSFUL;
1027 }
1028
1029 NTSTATUS pdb_default_getgrnam(struct pdb_methods *methods, GROUP_MAP *map,
1030 const char *name)
1031 {
1032 return get_group_map_from_ntname(name, map) ?
1033 NT_STATUS_OK : NT_STATUS_UNSUCCESSFUL;
1034 }
1035
1036 NTSTATUS pdb_default_add_group_mapping_entry(struct pdb_methods *methods,
1037 GROUP_MAP *map)
1038 {
1039 return add_mapping_entry(map, TDB_INSERT) ?
1040 NT_STATUS_OK : NT_STATUS_UNSUCCESSFUL;
1041 }
1042
1043 NTSTATUS pdb_default_update_group_mapping_entry(struct pdb_methods *methods,
1044 GROUP_MAP *map)
1045 {
1046 return add_mapping_entry(map, TDB_REPLACE) ?
1047 NT_STATUS_OK : NT_STATUS_UNSUCCESSFUL;
1048 }
1049
1050 NTSTATUS pdb_default_delete_group_mapping_entry(struct pdb_methods *methods,
1051 DOM_SID sid)
1052 {
1053 return group_map_remove(&sid) ?
1054 NT_STATUS_OK : NT_STATUS_UNSUCCESSFUL;
1055 }
1056
1057 NTSTATUS pdb_default_enum_group_mapping(struct pdb_methods *methods,
1058 const DOM_SID *sid, enum SID_NAME_USE sid_name_use,
1059 GROUP_MAP **pp_rmap, size_t *p_num_entries,
1060 BOOL unix_only)
1061 {
1062 return enum_group_mapping(sid, sid_name_use, pp_rmap, p_num_entries, unix_only) ?
1063 NT_STATUS_OK : NT_STATUS_UNSUCCESSFUL;
1064 }
1065
1066 NTSTATUS pdb_default_find_alias(struct pdb_methods *methods,
1067 const char *name, DOM_SID *sid)
1068 {
1069 GROUP_MAP map;
1070
1071 if (!pdb_getgrnam(&map, name))
1072 return NT_STATUS_NO_SUCH_ALIAS;
1073
1074 if ((map.sid_name_use != SID_NAME_WKN_GRP) &&
1075 (map.sid_name_use != SID_NAME_ALIAS))
1076 return NT_STATUS_OBJECT_TYPE_MISMATCH;
1077
1078 sid_copy(sid, &map.sid);
1079 return NT_STATUS_OK;
1080 }
1081
1082 NTSTATUS pdb_default_create_alias(struct pdb_methods *methods,
1083 const char *name, uint32 *rid)
1084 {
1085 DOM_SID sid;
1086 enum SID_NAME_USE type;
1087 uint32 new_rid;
1088 gid_t gid;
1089 BOOL exists;
1090 GROUP_MAP map;
1091 TALLOC_CTX *mem_ctx;
1092 NTSTATUS status;
1093
1094 DEBUG(10, ("Trying to create alias %s\n", name));
1095
1096 mem_ctx = talloc_new(NULL);
1097 if (mem_ctx == NULL) {
1098 return NT_STATUS_NO_MEMORY;
1099 }
1100
1101 exists = lookup_name(mem_ctx, name, LOOKUP_NAME_ISOLATED,
1102 NULL, NULL, &sid, &type);
1103 TALLOC_FREE(mem_ctx);
1104
1105 if (exists) {
1106 return NT_STATUS_ALIAS_EXISTS;
1107 }
1108
1109 if (!winbind_allocate_gid(&gid)) {
1110 DEBUG(3, ("Could not get a gid out of winbind\n"));
1111 return NT_STATUS_ACCESS_DENIED;
1112 }
1113
1114 if (!pdb_new_rid(&new_rid)) {
1115 DEBUG(0, ("Could not allocate a RID -- wasted a gid :-(\n"));
1116 return NT_STATUS_ACCESS_DENIED;
1117 }
1118
1119 DEBUG(10, ("Creating alias %s with gid %d and rid %d\n",
1120 name, gid, new_rid));
1121
1122 sid_copy(&sid, get_global_sam_sid());
1123 sid_append_rid(&sid, new_rid);
1124
1125 map.gid = gid;
1126 sid_copy(&map.sid, &sid);
1127 map.sid_name_use = SID_NAME_ALIAS;
1128 fstrcpy(map.nt_name, name);
1129 fstrcpy(map.comment, "");
1130
1131 status = pdb_add_group_mapping_entry(&map);
1132
1133 if (!NT_STATUS_IS_OK(status)) {
1134 DEBUG(0, ("Could not add group mapping entry for alias %s "
1135 "(%s)\n", name, nt_errstr(status)));
1136 return status;
1137 }
1138
1139 *rid = new_rid;
1140
1141 return NT_STATUS_OK;
1142 }
1143
1144 NTSTATUS pdb_default_delete_alias(struct pdb_methods *methods,
1145 const DOM_SID *sid)
1146 {
1147 return pdb_delete_group_mapping_entry(*sid);
1148 }
1149
1150 NTSTATUS pdb_default_get_aliasinfo(struct pdb_methods *methods,
1151 const DOM_SID *sid,
1152 struct acct_info *info)
1153 {
1154 GROUP_MAP map;
1155
1156 if (!pdb_getgrsid(&map, *sid))
1157 return NT_STATUS_NO_SUCH_ALIAS;
1158
1159 if ((map.sid_name_use != SID_NAME_ALIAS) &&
1160 (map.sid_name_use != SID_NAME_WKN_GRP)) {
1161 DEBUG(2, ("%s is a %s, expected an alias\n",
1162 sid_string_static(sid),
1163 sid_type_lookup(map.sid_name_use)));
1164 return NT_STATUS_NO_SUCH_ALIAS;
1165 }
1166
1167 fstrcpy(info->acct_name, map.nt_name);
1168 fstrcpy(info->acct_desc, map.comment);
1169 sid_peek_rid(&map.sid, &info->rid);
1170 return NT_STATUS_OK;
1171 }
1172
1173 NTSTATUS pdb_default_set_aliasinfo(struct pdb_methods *methods,
1174 const DOM_SID *sid,
1175 struct acct_info *info)
1176 {
1177 GROUP_MAP map;
1178
1179 if (!pdb_getgrsid(&map, *sid))
1180 return NT_STATUS_NO_SUCH_ALIAS;
1181
1182 fstrcpy(map.nt_name, info->acct_name);
1183 fstrcpy(map.comment, info->acct_desc);
1184
1185 return pdb_update_group_mapping_entry(&map);
1186 }
1187
1188 NTSTATUS pdb_default_add_aliasmem(struct pdb_methods *methods,
1189 const DOM_SID *alias, const DOM_SID *member)
1190 {
1191 return add_aliasmem(alias, member);
1192 }
1193
1194 NTSTATUS pdb_default_del_aliasmem(struct pdb_methods *methods,
1195 const DOM_SID *alias, const DOM_SID *member)
1196 {
1197 return del_aliasmem(alias, member);
1198 }
1199
1200 NTSTATUS pdb_default_enum_aliasmem(struct pdb_methods *methods,
1201 const DOM_SID *alias, DOM_SID **pp_members,
1202 size_t *p_num_members)
1203 {
1204 return enum_aliasmem(alias, pp_members, p_num_members);
1205 }
1206
1207 NTSTATUS pdb_default_alias_memberships(struct pdb_methods *methods,
1208 TALLOC_CTX *mem_ctx,
1209 const DOM_SID *domain_sid,
1210 const DOM_SID *members,
1211 size_t num_members,
1212 uint32 **pp_alias_rids,
1213 size_t *p_num_alias_rids)
1214 {
1215 DOM_SID *alias_sids;
1216 size_t i, num_alias_sids;
1217 NTSTATUS result;
1218
1219 alias_sids = NULL;
1220 num_alias_sids = 0;
1221
1222 result = alias_memberships(members, num_members,
1223 &alias_sids, &num_alias_sids);
1224
1225 if (!NT_STATUS_IS_OK(result))
1226 return result;
1227
1228 *pp_alias_rids = TALLOC_ARRAY(mem_ctx, uint32, num_alias_sids);
1229 if (*pp_alias_rids == NULL)
1230 return NT_STATUS_NO_MEMORY;
1231
1232 *p_num_alias_rids = 0;
1233
1234 for (i=0; i<num_alias_sids; i++) {
1235 if (!sid_peek_check_rid(domain_sid, &alias_sids[i],
1236 &(*pp_alias_rids)[*p_num_alias_rids]))
1237 continue;
1238 *p_num_alias_rids += 1;
1239 }
1240
1241 SAFE_FREE(alias_sids);
1242
1243 return NT_STATUS_OK;
1244 }
1245
1246 /**********************************************************************
1247 no ops for passdb backends that don't implement group mapping
1248 *********************************************************************/
1249
1250 NTSTATUS pdb_nop_getgrsid(struct pdb_methods *methods, GROUP_MAP *map,
1251 DOM_SID sid)
1252 {
1253 return NT_STATUS_UNSUCCESSFUL;
1254 }
1255
1256 NTSTATUS pdb_nop_getgrgid(struct pdb_methods *methods, GROUP_MAP *map,
1257 gid_t gid)
1258 {
1259 return NT_STATUS_UNSUCCESSFUL;
1260 }
1261
1262 NTSTATUS pdb_nop_getgrnam(struct pdb_methods *methods, GROUP_MAP *map,
1263 const char *name)
1264 {
1265 return NT_STATUS_UNSUCCESSFUL;
1266 }
1267
1268 NTSTATUS pdb_nop_add_group_mapping_entry(struct pdb_methods *methods,
1269 GROUP_MAP *map)
1270 {
1271 return NT_STATUS_UNSUCCESSFUL;
1272 }
1273
1274 NTSTATUS pdb_nop_update_group_mapping_entry(struct pdb_methods *methods,
1275 GROUP_MAP *map)
1276 {
1277 return NT_STATUS_UNSUCCESSFUL;
1278 }
1279
1280 NTSTATUS pdb_nop_delete_group_mapping_entry(struct pdb_methods *methods,
1281 DOM_SID sid)
1282 {
1283 return NT_STATUS_UNSUCCESSFUL;
1284 }
1285
1286 NTSTATUS pdb_nop_enum_group_mapping(struct pdb_methods *methods,
1287 enum SID_NAME_USE sid_name_use,
1288 GROUP_MAP **rmap, size_t *num_entries,
1289 BOOL unix_only)
1290 {
1291 return NT_STATUS_UNSUCCESSFUL;
1292 }
1293
1294 /****************************************************************************
1295 These need to be redirected through pdb_interface.c
1296 ****************************************************************************/
1297 BOOL pdb_get_dom_grp_info(const DOM_SID *sid, struct acct_info *info)
1298 {
1299 GROUP_MAP map;
1300 BOOL res;
1301
1302 become_root();
1303 res = get_domain_group_from_sid(*sid, &map);
1304 unbecome_root();
1305
1306 if (!res)
1307 return False;
1308
1309 fstrcpy(info->acct_name, map.nt_name);
1310 fstrcpy(info->acct_desc, map.comment);
1311 sid_peek_rid(sid, &info->rid);
1312 return True;
1313 }
1314
1315 BOOL pdb_set_dom_grp_info(const DOM_SID *sid, const struct acct_info *info)
1316 {
1317 GROUP_MAP map;
1318
1319 if (!get_domain_group_from_sid(*sid, &map))
1320 return False;
1321
1322 fstrcpy(map.nt_name, info->acct_name);
1323 fstrcpy(map.comment, info->acct_desc);
1324
1325 return NT_STATUS_IS_OK(pdb_update_group_mapping_entry(&map));
1326 }
1327
1328 /********************************************************************
1329 Really just intended to be called by smbd
1330 ********************************************************************/
1331
1332 NTSTATUS pdb_create_builtin_alias(uint32 rid)
1333 {
1334 DOM_SID sid;
1335 enum SID_NAME_USE type;
1336 gid_t gid;
1337 GROUP_MAP map;
1338 TALLOC_CTX *mem_ctx;
1339 NTSTATUS status;
1340 const char *name = NULL;
1341 fstring groupname;
1342
1343 DEBUG(10, ("Trying to create builtin alias %d\n", rid));
1344
1345 if ( !sid_compose( &sid, &global_sid_Builtin, rid ) ) {
1346 return NT_STATUS_NO_SUCH_ALIAS;
1347 }
1348
1349 if ( (mem_ctx = talloc_new(NULL)) == NULL ) {
1350 return NT_STATUS_NO_MEMORY;
1351 }
1352
1353 if ( !lookup_sid(mem_ctx, &sid, NULL, &name, &type) ) {
1354 TALLOC_FREE( mem_ctx );
1355 return NT_STATUS_NO_SUCH_ALIAS;
1356 }
1357
1358 /* validate RID so copy the name and move on */
1359
1360 fstrcpy( groupname, name );
1361 TALLOC_FREE( mem_ctx );
1362
1363 if (!winbind_allocate_gid(&gid)) {
1364 DEBUG(3, ("pdb_create_builtin_alias: Could not get a gid out of winbind\n"));
1365 return NT_STATUS_ACCESS_DENIED;
1366 }
1367
1368 DEBUG(10,("Creating alias %s with gid %d\n", name, gid));
1369
1370 map.gid = gid;
1371 sid_copy(&map.sid, &sid);
1372 map.sid_name_use = SID_NAME_ALIAS;
1373 fstrcpy(map.nt_name, name);
1374 fstrcpy(map.comment, "");
1375
1376 status = pdb_add_group_mapping_entry(&map);
1377
1378 if (!NT_STATUS_IS_OK(status)) {
1379 DEBUG(0, ("pdb_create_builtin_alias: Could not add group mapping entry for alias %d "
1380 "(%s)\n", rid, nt_errstr(status)));
1381 }
1382
1383 return status;
1384 }
1385
1386
Tomato firmware and modifications.