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