0cee04d182c1f8b9a43f86314bc67808276e0c3d
[amitay/samba.git] / source3 / winbindd / idmap_tdb.c
1 /* 
2    Unix SMB/CIFS implementation.
3
4    idmap TDB backend
5
6    Copyright (C) Tim Potter 2000
7    Copyright (C) Jim McDonough <jmcd@us.ibm.com> 2003
8    Copyright (C) Jeremy Allison 2006
9    Copyright (C) Simo Sorce 2003-2006
10    
11    This program is free software; you can redistribute it and/or modify
12    it under the terms of the GNU General Public License as published by
13    the Free Software Foundation; either version 3 of the License, or
14    (at your option) any later version.
15    
16    This program is distributed in the hope that it will be useful,
17    but WITHOUT ANY WARRANTY; without even the implied warranty of
18    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
19    GNU General Public License for more details.
20    
21    You should have received a copy of the GNU General Public License
22    along with this program.  If not, see <http://www.gnu.org/licenses/>.
23 */
24
25 #include "includes.h"
26 #include "winbindd.h"
27
28 #undef DBGC_CLASS
29 #define DBGC_CLASS DBGC_IDMAP
30
31 /* idmap version determines auto-conversion - this is the database
32    structure version specifier. */
33
34 #define IDMAP_VERSION 2
35
36 struct idmap_tdb_context {
37         struct db_context *db;
38 };
39
40 /* High water mark keys */
41 #define HWM_GROUP  "GROUP HWM"
42 #define HWM_USER   "USER HWM"
43
44 static struct idmap_tdb_state {
45
46         /* User and group id pool */
47         uid_t low_uid, high_uid;               /* Range of uids to allocate */
48         gid_t low_gid, high_gid;               /* Range of gids to allocate */
49
50 } idmap_tdb_state;
51
52 struct convert_fn_state {
53         struct db_context *db;
54         bool failed;
55 };
56
57 /*****************************************************************************
58  For idmap conversion: convert one record to new format
59  Ancient versions (eg 2.2.3a) of winbindd_idmap.tdb mapped DOMAINNAME/rid
60  instead of the SID.
61 *****************************************************************************/
62 static int convert_fn(struct db_record *rec, void *private_data)
63 {
64         struct winbindd_domain *domain;
65         char *p;
66         NTSTATUS status;
67         struct dom_sid sid;
68         uint32 rid;
69         fstring keystr;
70         fstring dom_name;
71         TDB_DATA key2;
72         struct convert_fn_state *s = (struct convert_fn_state *)private_data;
73
74         DEBUG(10,("Converting %s\n", (const char *)rec->key.dptr));
75
76         p = strchr((const char *)rec->key.dptr, '/');
77         if (!p)
78                 return 0;
79
80         *p = 0;
81         fstrcpy(dom_name, (const char *)rec->key.dptr);
82         *p++ = '/';
83
84         domain = find_domain_from_name(dom_name);
85         if (domain == NULL) {
86                 /* We must delete the old record. */
87                 DEBUG(0,("Unable to find domain %s\n", dom_name ));
88                 DEBUG(0,("deleting record %s\n", (const char *)rec->key.dptr ));
89
90                 status = rec->delete_rec(rec);
91                 if (!NT_STATUS_IS_OK(status)) {
92                         DEBUG(0, ("Unable to delete record %s:%s\n",
93                                 (const char *)rec->key.dptr,
94                                 nt_errstr(status)));
95                         s->failed = true;
96                         return -1;
97                 }
98
99                 return 0;
100         }
101
102         rid = atoi(p);
103
104         sid_compose(&sid, &domain->sid, rid);
105
106         sid_to_fstring(keystr, &sid);
107         key2 = string_term_tdb_data(keystr);
108
109         status = dbwrap_store(s->db, key2, rec->value, TDB_INSERT);
110         if (!NT_STATUS_IS_OK(status)) {
111                 DEBUG(0,("Unable to add record %s:%s\n",
112                         (const char *)key2.dptr,
113                         nt_errstr(status)));
114                 s->failed = true;
115                 return -1;
116         }
117
118         status = dbwrap_store(s->db, rec->value, key2, TDB_REPLACE);
119         if (!NT_STATUS_IS_OK(status)) {
120                 DEBUG(0,("Unable to update record %s:%s\n",
121                         (const char *)rec->value.dptr,
122                         nt_errstr(status)));
123                 s->failed = true;
124                 return -1;
125         }
126
127         status = rec->delete_rec(rec);
128         if (!NT_STATUS_IS_OK(status)) {
129                 DEBUG(0,("Unable to delete record %s:%s\n",
130                         (const char *)rec->key.dptr,
131                         nt_errstr(status)));
132                 s->failed = true;
133                 return -1;
134         }
135
136         return 0;
137 }
138
139 /*****************************************************************************
140  Convert the idmap database from an older version.
141 *****************************************************************************/
142
143 static bool idmap_tdb_upgrade(struct idmap_domain *dom, struct db_context *db)
144 {
145         int32 vers;
146         bool bigendianheader;
147         struct convert_fn_state s;
148
149         DEBUG(0, ("Upgrading winbindd_idmap.tdb from an old version\n"));
150
151         bigendianheader = (db->get_flags(db) & TDB_BIGENDIAN) ? True : False;
152
153         vers = dbwrap_fetch_int32(db, "IDMAP_VERSION");
154
155         if (((vers == -1) && bigendianheader) || (IREV(vers) == IDMAP_VERSION)) {
156                 /* Arrggghh ! Bytereversed or old big-endian - make order independent ! */
157                 /*
158                  * high and low records were created on a
159                  * big endian machine and will need byte-reversing.
160                  */
161
162                 int32 wm;
163
164                 wm = dbwrap_fetch_int32(db, HWM_USER);
165
166                 if (wm != -1) {
167                         wm = IREV(wm);
168                 }  else {
169                         wm = dom->low_id;
170                 }
171
172                 if (dbwrap_store_int32(db, HWM_USER, wm) == -1) {
173                         DEBUG(0, ("Unable to byteswap user hwm in idmap database\n"));
174                         return False;
175                 }
176
177                 wm = dbwrap_fetch_int32(db, HWM_GROUP);
178                 if (wm != -1) {
179                         wm = IREV(wm);
180                 } else {
181                         wm = dom->low_id;
182                 }
183
184                 if (dbwrap_store_int32(db, HWM_GROUP, wm) == -1) {
185                         DEBUG(0, ("Unable to byteswap group hwm in idmap database\n"));
186                         return False;
187                 }
188         }
189
190         s.db = db;
191         s.failed = false;
192
193         /* the old format stored as DOMAIN/rid - now we store the SID direct */
194         db->traverse(db, convert_fn, &s);
195
196         if (s.failed) {
197                 DEBUG(0, ("Problem during conversion\n"));
198                 return False;
199         }
200
201         if (dbwrap_store_int32(db, "IDMAP_VERSION", IDMAP_VERSION) == -1) {
202                 DEBUG(0, ("Unable to store idmap version in databse\n"));
203                 return False;
204         }
205
206         return True;
207 }
208
209 static NTSTATUS idmap_tdb_open_db(struct idmap_domain *dom)
210 {
211         NTSTATUS ret;
212         TALLOC_CTX *mem_ctx;
213         char *tdbfile = NULL;
214         struct db_context *db = NULL;
215         int32_t version;
216         bool config_error = false;
217         struct idmap_tdb_context *ctx;
218
219         ctx = talloc_get_type(dom->private_data, struct idmap_tdb_context);
220
221         /* use our own context here */
222         mem_ctx = talloc_stackframe();
223
224         /* use the old database if present */
225         tdbfile = state_path("winbindd_idmap.tdb");
226         if (!tdbfile) {
227                 DEBUG(0, ("Out of memory!\n"));
228                 ret = NT_STATUS_NO_MEMORY;
229                 goto done;
230         }
231
232         DEBUG(10,("Opening tdbfile %s\n", tdbfile ));
233
234         /* Open idmap repository */
235         db = db_open(mem_ctx, tdbfile, 0, TDB_DEFAULT, O_RDWR | O_CREAT, 0644);
236         if (!db) {
237                 DEBUG(0, ("Unable to open idmap database\n"));
238                 ret = NT_STATUS_UNSUCCESSFUL;
239                 goto done;
240         }
241
242         /* check against earlier versions */
243         version = dbwrap_fetch_int32(db, "IDMAP_VERSION");
244         if (version != IDMAP_VERSION) {
245                 if (config_error) {
246                         DEBUG(0,("Upgrade of IDMAP_VERSION from %d to %d is not "
247                                  "possible with incomplete configuration\n",
248                                  version, IDMAP_VERSION));
249                         ret = NT_STATUS_UNSUCCESSFUL;
250                         goto done;
251                 }
252                 if (db->transaction_start(db) != 0) {
253                         DEBUG(0, ("Unable to start upgrade transaction!\n"));
254                         ret = NT_STATUS_INTERNAL_DB_ERROR;
255                         goto done;
256                 }
257
258                 if (!idmap_tdb_upgrade(dom, db)) {
259                         db->transaction_cancel(db);
260                         DEBUG(0, ("Unable to open idmap database, it's in an old format, and upgrade failed!\n"));
261                         ret = NT_STATUS_INTERNAL_DB_ERROR;
262                         goto done;
263                 }
264
265                 if (db->transaction_commit(db) != 0) {
266                         DEBUG(0, ("Unable to commit upgrade transaction!\n"));
267                         ret = NT_STATUS_INTERNAL_DB_ERROR;
268                         goto done;
269                 }
270         }
271
272         ctx->db = talloc_move(ctx, &db);
273         ret = NT_STATUS_OK;
274
275 done:
276         talloc_free(mem_ctx);
277         return ret;
278 }
279
280 /**********************************************************************
281  IDMAP ALLOC TDB BACKEND
282 **********************************************************************/
283  
284 static struct db_context *idmap_alloc_db;
285
286 /**********************************
287  Initialise idmap alloc database. 
288 **********************************/
289
290 static NTSTATUS idmap_tdb_init_hwm(struct idmap_domain *dom)
291 {
292         int ret;
293         uint32_t low_uid;
294         uint32_t low_gid;
295         bool update_uid = false;
296         bool update_gid = false;
297         struct idmap_tdb_context *ctx;
298
299         ctx = talloc_get_type(dom->private_data, struct idmap_tdb_context);
300
301         low_uid = dbwrap_fetch_int32(ctx->db, HWM_USER);
302         if (low_uid == -1 || low_uid < dom->low_id) {
303                 update_uid = true;
304         }
305
306         low_gid = dbwrap_fetch_int32(ctx->db, HWM_GROUP);
307         if (low_gid == -1 || low_gid < dom->low_id) {
308                 update_gid = true;
309         }
310
311         if (!update_uid && !update_gid) {
312                 return NT_STATUS_OK;
313         }
314
315         if (ctx->db->transaction_start(ctx->db) != 0) {
316                 DEBUG(0, ("Unable to start upgrade transaction!\n"));
317                 return NT_STATUS_INTERNAL_DB_ERROR;
318         }
319
320         if (update_uid) {
321                 ret = dbwrap_store_int32(ctx->db, HWM_USER, dom->low_id);
322                 if (ret == -1) {
323                         ctx->db->transaction_cancel(ctx->db);
324                         DEBUG(0, ("Unable to initialise user hwm in idmap "
325                                   "database\n"));
326                         return NT_STATUS_INTERNAL_DB_ERROR;
327                 }
328         }
329
330         if (update_gid) {
331                 ret = dbwrap_store_int32(ctx->db, HWM_GROUP, dom->low_id);
332                 if (ret == -1) {
333                         ctx->db->transaction_cancel(ctx->db);
334                         DEBUG(0, ("Unable to initialise group hwm in idmap "
335                                   "database\n"));
336                         return NT_STATUS_INTERNAL_DB_ERROR;
337                 }
338         }
339
340         if (ctx->db->transaction_commit(ctx->db) != 0) {
341                 DEBUG(0, ("Unable to commit upgrade transaction!\n"));
342                 return NT_STATUS_INTERNAL_DB_ERROR;
343         }
344
345         return NT_STATUS_OK;
346 }
347
348 /**********************************
349  Allocate a new id. 
350 **********************************/
351
352 struct idmap_tdb_allocate_id_context {
353         const char *hwmkey;
354         const char *hwmtype;
355         uint32_t high_hwm;
356         uint32_t hwm;
357 };
358
359 static NTSTATUS idmap_tdb_allocate_id_action(struct db_context *db,
360                                              void *private_data)
361 {
362         NTSTATUS ret;
363         struct idmap_tdb_allocate_id_context *state;
364         uint32_t hwm;
365
366         state = (struct idmap_tdb_allocate_id_context *)private_data;
367
368         hwm = dbwrap_fetch_int32(db, state->hwmkey);
369         if (hwm == -1) {
370                 ret = NT_STATUS_INTERNAL_DB_ERROR;
371                 goto done;
372         }
373
374         /* check it is in the range */
375         if (hwm > state->high_hwm) {
376                 DEBUG(1, ("Fatal Error: %s range full!! (max: %lu)\n",
377                           state->hwmtype, (unsigned long)state->high_hwm));
378                 ret = NT_STATUS_UNSUCCESSFUL;
379                 goto done;
380         }
381
382         /* fetch a new id and increment it */
383         ret = dbwrap_trans_change_uint32_atomic(db, state->hwmkey, &hwm, 1);
384         if (!NT_STATUS_IS_OK(ret)) {
385                 DEBUG(0, ("Fatal error while fetching a new %s value: %s\n!",
386                           state->hwmtype, nt_errstr(ret)));
387                 goto done;
388         }
389
390         /* recheck it is in the range */
391         if (hwm > state->high_hwm) {
392                 DEBUG(1, ("Fatal Error: %s range full!! (max: %lu)\n",
393                           state->hwmtype, (unsigned long)state->high_hwm));
394                 ret = NT_STATUS_UNSUCCESSFUL;
395                 goto done;
396         }
397
398         ret = NT_STATUS_OK;
399         state->hwm = hwm;
400
401 done:
402         return ret;
403 }
404
405 static NTSTATUS idmap_tdb_allocate_id(struct unixid *xid)
406 {
407         const char *hwmkey;
408         const char *hwmtype;
409         uint32_t high_hwm;
410         uint32_t hwm = 0;
411         NTSTATUS status;
412         struct idmap_tdb_allocate_id_context state;
413
414         /* Get current high water mark */
415         switch (xid->type) {
416
417         case ID_TYPE_UID:
418                 hwmkey = HWM_USER;
419                 hwmtype = "UID";
420                 high_hwm = idmap_tdb_state.high_uid;
421                 break;
422
423         case ID_TYPE_GID:
424                 hwmkey = HWM_GROUP;
425                 hwmtype = "GID";
426                 high_hwm = idmap_tdb_state.high_gid;
427                 break;
428
429         default:
430                 DEBUG(2, ("Invalid ID type (0x%x)\n", xid->type));
431                 return NT_STATUS_INVALID_PARAMETER;
432         }
433
434         state.hwm = hwm;
435         state.high_hwm = high_hwm;
436         state.hwmtype = hwmtype;
437         state.hwmkey = hwmkey;
438
439         status = dbwrap_trans_do(idmap_alloc_db, idmap_tdb_allocate_id_action,
440                                  &state);
441
442         if (NT_STATUS_IS_OK(status)) {
443                 xid->id = state.hwm;
444                 DEBUG(10,("New %s = %d\n", hwmtype, state.hwm));
445         } else {
446                 DEBUG(1, ("Error allocating a new %s\n", hwmtype));
447         }
448
449         return status;
450 }
451
452 /**
453  * Allocate a new unix-ID.
454  * For now this is for the default idmap domain only.
455  * Should be extended later on.
456  */
457 static NTSTATUS idmap_tdb_get_new_id(struct idmap_domain *dom,
458                                      struct unixid *id)
459 {
460         NTSTATUS ret;
461
462         if (!strequal(dom->name, "*")) {
463                 DEBUG(3, ("idmap_tdb_get_new_id: "
464                           "Refusing allocation of a new unixid for domain'%s'. "
465                           "Currently only supported for the default "
466                           "domain \"*\".\n",
467                            dom->name));
468                 return NT_STATUS_NOT_IMPLEMENTED;
469         }
470
471         ret = idmap_tdb_allocate_id(id);
472
473         return ret;
474 }
475
476 /**********************************
477  Close the alloc tdb 
478 **********************************/
479
480 static NTSTATUS idmap_tdb_alloc_close(void)
481 {
482         TALLOC_FREE(idmap_alloc_db);
483         return NT_STATUS_OK;
484 }
485
486 /**********************************************************************
487  IDMAP MAPPING TDB BACKEND
488 **********************************************************************/
489
490 /*****************************
491  Initialise idmap database. 
492 *****************************/
493
494 static NTSTATUS idmap_tdb_db_init(struct idmap_domain *dom, const char *params)
495 {
496         NTSTATUS ret;
497         struct idmap_tdb_context *ctx;
498
499         DEBUG(10, ("idmap_tdb_db_init called for domain '%s'\n", dom->name));
500
501         ctx = talloc(dom, struct idmap_tdb_context);
502         if ( ! ctx) {
503                 DEBUG(0, ("Out of memory!\n"));
504                 return NT_STATUS_NO_MEMORY;
505         }
506
507         /* load backend specific configuration here: */
508 #if 0
509         if (strequal(dom->name, "*")) {
510         } else {
511         }
512 #endif
513
514         dom->private_data = ctx;
515
516         ret = idmap_tdb_open_db(dom);
517         if ( ! NT_STATUS_IS_OK(ret)) {
518                 goto failed;
519         }
520
521         return NT_STATUS_OK;
522
523 failed:
524         talloc_free(ctx);
525         return ret;
526 }
527
528 /**********************************
529  Single id to sid lookup function. 
530 **********************************/
531
532 static NTSTATUS idmap_tdb_id_to_sid(struct idmap_domain *dom, struct id_map *map)
533 {
534         NTSTATUS ret;
535         TDB_DATA data;
536         char *keystr;
537         struct idmap_tdb_context *ctx;
538
539         if (!dom || !map) {
540                 return NT_STATUS_INVALID_PARAMETER;
541         }
542
543         ctx = talloc_get_type(dom->private_data, struct idmap_tdb_context);
544
545         /* apply filters before checking */
546         if (!idmap_unix_id_is_in_range(map->xid.id, dom)) {
547                 DEBUG(5, ("Requested id (%u) out of range (%u - %u). Filtered!\n",
548                                 map->xid.id, dom->low_id, dom->high_id));
549                 return NT_STATUS_NONE_MAPPED;
550         }
551
552         switch (map->xid.type) {
553
554         case ID_TYPE_UID:
555                 keystr = talloc_asprintf(ctx, "UID %lu", (unsigned long)map->xid.id);
556                 break;
557                 
558         case ID_TYPE_GID:
559                 keystr = talloc_asprintf(ctx, "GID %lu", (unsigned long)map->xid.id);
560                 break;
561
562         default:
563                 DEBUG(2, ("INVALID unix ID type: 0x02%x\n", map->xid.type));
564                 return NT_STATUS_INVALID_PARAMETER;
565         }
566
567         /* final SAFE_FREE safe */
568         data.dptr = NULL;
569
570         if (keystr == NULL) {
571                 DEBUG(0, ("Out of memory!\n"));
572                 ret = NT_STATUS_NO_MEMORY;
573                 goto done;
574         }
575
576         DEBUG(10,("Fetching record %s\n", keystr));
577
578         /* Check if the mapping exists */
579         data = dbwrap_fetch_bystring(ctx->db, NULL, keystr);
580
581         if (!data.dptr) {
582                 DEBUG(10,("Record %s not found\n", keystr));
583                 ret = NT_STATUS_NONE_MAPPED;
584                 goto done;
585         }
586                 
587         if (!string_to_sid(map->sid, (const char *)data.dptr)) {
588                 DEBUG(10,("INVALID SID (%s) in record %s\n",
589                         (const char *)data.dptr, keystr));
590                 ret = NT_STATUS_INTERNAL_DB_ERROR;
591                 goto done;
592         }
593
594         DEBUG(10,("Found record %s -> %s\n", keystr, (const char *)data.dptr));
595         ret = NT_STATUS_OK;
596
597 done:
598         talloc_free(data.dptr);
599         talloc_free(keystr);
600         return ret;
601 }
602
603 /**********************************
604  Single sid to id lookup function. 
605 **********************************/
606
607 static NTSTATUS idmap_tdb_sid_to_id(struct idmap_domain *dom, struct id_map *map)
608 {
609         NTSTATUS ret;
610         TDB_DATA data;
611         char *keystr;
612         unsigned long rec_id = 0;
613         struct idmap_tdb_context *ctx;
614         TALLOC_CTX *tmp_ctx = talloc_stackframe();
615
616         ctx = talloc_get_type(dom->private_data, struct idmap_tdb_context);
617
618         keystr = sid_string_talloc(tmp_ctx, map->sid);
619         if (keystr == NULL) {
620                 DEBUG(0, ("Out of memory!\n"));
621                 ret = NT_STATUS_NO_MEMORY;
622                 goto done;
623         }
624
625         DEBUG(10,("Fetching record %s\n", keystr));
626
627         /* Check if sid is present in database */
628         data = dbwrap_fetch_bystring(ctx->db, tmp_ctx, keystr);
629         if (!data.dptr) {
630                 DEBUG(10,("Record %s not found\n", keystr));
631                 ret = NT_STATUS_NONE_MAPPED;
632                 goto done;
633         }
634
635         /* What type of record is this ? */
636         if (sscanf((const char *)data.dptr, "UID %lu", &rec_id) == 1) { /* Try a UID record. */
637                 map->xid.id = rec_id;
638                 map->xid.type = ID_TYPE_UID;
639                 DEBUG(10,("Found uid record %s -> %s \n", keystr, (const char *)data.dptr ));
640                 ret = NT_STATUS_OK;
641
642         } else if (sscanf((const char *)data.dptr, "GID %lu", &rec_id) == 1) { /* Try a GID record. */
643                 map->xid.id = rec_id;
644                 map->xid.type = ID_TYPE_GID;
645                 DEBUG(10,("Found gid record %s -> %s \n", keystr, (const char *)data.dptr ));
646                 ret = NT_STATUS_OK;
647
648         } else { /* Unknown record type ! */
649                 DEBUG(2, ("Found INVALID record %s -> %s\n", keystr, (const char *)data.dptr));
650                 ret = NT_STATUS_INTERNAL_DB_ERROR;
651                 goto done;
652         }
653
654         /* apply filters before returning result */
655         if (!idmap_unix_id_is_in_range(map->xid.id, dom)) {
656                 DEBUG(5, ("Requested id (%u) out of range (%u - %u). Filtered!\n",
657                                 map->xid.id, dom->low_id, dom->high_id));
658                 ret = NT_STATUS_NONE_MAPPED;
659         }
660
661 done:
662         talloc_free(tmp_ctx);
663         return ret;
664 }
665
666 /**********************************
667  lookup a set of unix ids. 
668 **********************************/
669
670 static NTSTATUS idmap_tdb_unixids_to_sids(struct idmap_domain *dom, struct id_map **ids)
671 {
672         struct idmap_tdb_context *ctx;
673         NTSTATUS ret;
674         int i;
675
676         /* initialize the status to avoid suprise */
677         for (i = 0; ids[i]; i++) {
678                 ids[i]->status = ID_UNKNOWN;
679         }
680         
681         ctx = talloc_get_type(dom->private_data, struct idmap_tdb_context);
682
683         for (i = 0; ids[i]; i++) {
684                 ret = idmap_tdb_id_to_sid(dom, ids[i]);
685                 if ( ! NT_STATUS_IS_OK(ret)) {
686
687                         /* if it is just a failed mapping continue */
688                         if (NT_STATUS_EQUAL(ret, NT_STATUS_NONE_MAPPED)) {
689
690                                 /* make sure it is marked as unmapped */
691                                 ids[i]->status = ID_UNMAPPED;
692                                 continue;
693                         }
694                         
695                         /* some fatal error occurred, return immediately */
696                         goto done;
697                 }
698
699                 /* all ok, id is mapped */
700                 ids[i]->status = ID_MAPPED;
701         }
702
703         ret = NT_STATUS_OK;
704
705 done:
706         return ret;
707 }
708
709 /**********************************
710  lookup a set of sids. 
711 **********************************/
712
713 static NTSTATUS idmap_tdb_sids_to_unixids(struct idmap_domain *dom, struct id_map **ids)
714 {
715         struct idmap_tdb_context *ctx;
716         NTSTATUS ret;
717         int i;
718
719         /* initialize the status to avoid suprise */
720         for (i = 0; ids[i]; i++) {
721                 ids[i]->status = ID_UNKNOWN;
722         }
723         
724         ctx = talloc_get_type(dom->private_data, struct idmap_tdb_context);
725
726         for (i = 0; ids[i]; i++) {
727                 ret = idmap_tdb_sid_to_id(dom, ids[i]);
728                 if ( ! NT_STATUS_IS_OK(ret)) {
729
730                         /* if it is just a failed mapping continue */
731                         if (NT_STATUS_EQUAL(ret, NT_STATUS_NONE_MAPPED)) {
732
733                                 /* make sure it is marked as unmapped */
734                                 ids[i]->status = ID_UNMAPPED;
735                                 continue;
736                         }
737                         
738                         /* some fatal error occurred, return immediately */
739                         goto done;
740                 }
741
742                 /* all ok, id is mapped */
743                 ids[i]->status = ID_MAPPED;
744         }
745
746         ret = NT_STATUS_OK;
747
748 done:
749         return ret;
750 }
751
752 /**********************************
753  set a mapping.
754 **********************************/
755
756 static NTSTATUS idmap_tdb_set_mapping(struct idmap_domain *dom,
757                                       const struct id_map *map)
758 {
759         struct idmap_tdb_context *ctx;
760         NTSTATUS ret;
761         TDB_DATA ksid, kid;
762         char *ksidstr, *kidstr;
763         fstring tmp;
764
765         if (!map || !map->sid) {
766                 return NT_STATUS_INVALID_PARAMETER;
767         }
768
769         ksidstr = kidstr = NULL;
770
771         /* TODO: should we filter a set_mapping using low/high filters ? */
772
773         ctx = talloc_get_type(dom->private_data, struct idmap_tdb_context);
774
775         switch (map->xid.type) {
776
777         case ID_TYPE_UID:
778                 kidstr = talloc_asprintf(ctx, "UID %lu",
779                                          (unsigned long)map->xid.id);
780                 break;
781
782         case ID_TYPE_GID:
783                 kidstr = talloc_asprintf(ctx, "GID %lu",
784                                          (unsigned long)map->xid.id);
785                 break;
786
787         default:
788                 DEBUG(2, ("INVALID unix ID type: 0x02%x\n", map->xid.type));
789                 return NT_STATUS_INVALID_PARAMETER;
790         }
791
792         if (kidstr == NULL) {
793                 DEBUG(0, ("ERROR: Out of memory!\n"));
794                 ret = NT_STATUS_NO_MEMORY;
795                 goto done;
796         }
797
798         if ((ksidstr = talloc_asprintf(
799                      ctx, "%s", sid_to_fstring(tmp, map->sid))) == NULL) {
800                 DEBUG(0, ("Out of memory!\n"));
801                 ret = NT_STATUS_NO_MEMORY;
802                 goto done;
803         }
804
805         DEBUG(10, ("Storing %s <-> %s map\n", ksidstr, kidstr));
806         kid = string_term_tdb_data(kidstr);
807         ksid = string_term_tdb_data(ksidstr);
808
809         if (ctx->db->transaction_start(ctx->db) != 0) {
810                 DEBUG(0, ("Failed to start transaction for %s\n",
811                           ksidstr));
812                 ret = NT_STATUS_INTERNAL_DB_ERROR;
813                 goto done;
814         }
815
816         ret = dbwrap_store(ctx->db, ksid, kid, TDB_REPLACE);
817         if (!NT_STATUS_IS_OK(ret)) {
818                 ctx->db->transaction_cancel(ctx->db);
819                 DEBUG(0, ("Error storing SID -> ID (%s -> %s): %s\n",
820                           ksidstr, kidstr, nt_errstr(ret)));
821                 goto done;
822         }
823         ret = dbwrap_store(ctx->db, kid, ksid, TDB_REPLACE);
824         if (!NT_STATUS_IS_OK(ret)) {
825                 ctx->db->transaction_cancel(ctx->db);
826                 DEBUG(0, ("Error storing ID -> SID (%s -> %s): %s\n",
827                           kidstr, ksidstr, nt_errstr(ret)));
828                 goto done;
829         }
830
831         if (ctx->db->transaction_commit(ctx->db) != 0) {
832                 DEBUG(0, ("Failed to commit transaction for (%s -> %s)\n",
833                           ksidstr, kidstr));
834                 ret = NT_STATUS_INTERNAL_DB_ERROR;
835                 goto done;
836         }
837
838         DEBUG(10,("Stored %s <-> %s\n", ksidstr, kidstr));
839         ret = NT_STATUS_OK;
840
841 done:
842         talloc_free(ksidstr);
843         talloc_free(kidstr);
844         return ret;
845 }
846
847 /**********************************
848  Close the idmap tdb instance
849 **********************************/
850
851 static NTSTATUS idmap_tdb_close(struct idmap_domain *dom)
852 {
853         struct idmap_tdb_context *ctx;
854
855         if (dom->private_data) {
856                 ctx = talloc_get_type(dom->private_data, struct idmap_tdb_context);
857
858                 TALLOC_FREE(ctx->db);
859         }
860         return NT_STATUS_OK;
861 }
862
863 static struct idmap_methods db_methods = {
864         .init = idmap_tdb_db_init,
865         .unixids_to_sids = idmap_tdb_unixids_to_sids,
866         .sids_to_unixids = idmap_tdb_sids_to_unixids,
867         .allocate_id = idmap_tdb_get_new_id,
868         .close_fn = idmap_tdb_close
869 };
870
871 NTSTATUS idmap_tdb_init(void)
872 {
873         DEBUG(10, ("calling idmap_tdb_init\n"));
874
875         return smb_register_idmap(SMB_IDMAP_INTERFACE_VERSION, "tdb", &db_methods);
876 }