source4/torture/drs/unit/schemainfo_tests.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3
   4    DRSUAPI schemaInfo unit tests
   5
   6    Copyright (C) Kamen Mazdrashki <kamenim@samba.org> 2010
   7
   8    This program is free software; you can redistribute it and/or modify
   9    it under the terms of the GNU General Public License as published by
  10    the Free Software Foundation; either version 3 of the License, or
  11    (at your option) any later version.
  12
  13    This program is distributed in the hope that it will be useful,
  14    but WITHOUT ANY WARRANTY; without even the implied warranty of
  15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16    GNU General Public License for more details.
  17
  18    You should have received a copy of the GNU General Public License
  19    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  20 */
  21
  22 #include "includes.h"
  23 #include "system/filesys.h"
  24 #include "torture/smbtorture.h"
  25 #include "dsdb/samdb/samdb.h"
  26 #include "dsdb/samdb/ldb_modules/util.h"
  27 #include "lib/ldb_wrap.h"
  28 #include "lib/ldb/include/ldb_module.h"
  29 #include "torture/rpc/drsuapi.h"
  30 #include "librpc/ndr/libndr.h"
  31 #include "param/param.h"
  32
  33
  34 /**
  35  * schemaInfo to init ldb context with
  36  *   Rev:  0
  37  *   GUID: 00000000-0000-0000-0000-000000000000
  38  */
  39 #define SCHEMA_INFO_INIT_STR            "FF0000000000000000000000000000000000000000"
  40
  41 /**
  42  * Default schema_info string to be used for testing
  43  *   Rev:  01
  44  *   GUID: 071c82fd-45c7-4351-a3db-51f75a630a7f
  45  */
  46 #define SCHEMA_INFO_DEFAULT_STR         "FF00000001FD821C07C7455143A3DB51F75A630A7F"
  47
  48 /**
  49  * Schema info data to test with
  50  */
  51 struct schemainfo_data {
  52         DATA_BLOB       ndr_blob;
  53         struct dsdb_schema_info schi;
  54         WERROR          werr_expected;
  55         bool            test_both_ways;
  56 };
  57
  58 /**
  59  * Schema info test data in human-readable format (... kind of)
  60  */
  61 static const struct {
  62         const char      *schema_info_str;
  63         uint32_t        revision;
  64         const char      *guid_str;
  65         WERROR          werr_expected;
  66         bool            test_both_ways;
  67 } _schemainfo_test_data[] = {
  68         {
  69                 .schema_info_str = "FF0000000000000000000000000000000000000000",
  70                 .revision = 0,
  71                 .guid_str = "00000000-0000-0000-0000-000000000000",
  72                 .werr_expected = WERR_OK,
  73                 .test_both_ways = true
  74         },
  75         {
  76                 .schema_info_str = "FF00000001FD821C07C7455143A3DB51F75A630A7F",
  77                 .revision = 1,
  78                 .guid_str = "071c82fd-45c7-4351-a3db-51f75a630a7f",
  79                 .werr_expected = WERR_OK,
  80                 .test_both_ways = true
  81         },
  82         {
  83                 .schema_info_str = "FFFFFFFFFFFD821C07C7455143A3DB51F75A630A7F",
  84                 .revision = 0xFFFFFFFF,
  85                 .guid_str = "071c82fd-45c7-4351-a3db-51f75a630a7f",
  86                 .werr_expected = WERR_OK,
  87                 .test_both_ways = true
  88         },
  89         { /* len == 21 */
  90                 .schema_info_str = "FF00000001FD821C07C7455143A3DB51F75A630A7F00",
  91                 .revision = 1,
  92                 .guid_str = "071c82fd-45c7-4351-a3db-51f75a630a7f",
  93                 .werr_expected = WERR_INVALID_PARAMETER,
  94                 .test_both_ways = false
  95         },
  96         { /* marker == FF */
  97                 .schema_info_str = "AA00000001FD821C07C7455143A3DB51F75A630A7F",
  98                 .revision = 1,
  99                 .guid_str = "071c82fd-45c7-4351-a3db-51f75a630a7f",
 100                 .werr_expected = WERR_INVALID_PARAMETER,
 101                 .test_both_ways = false
 102         }
 103 };
 104
 105 /**
 106  * Private data to be shared among all test in Test case
 107  */
 108 struct drsut_schemainfo_data {
 109         struct ldb_context *ldb;
 110         struct ldb_module  *ldb_module;
 111         struct dsdb_schema *schema;
 112
 113         /* Initial schemaInfo set in ldb to test with */
 114         struct dsdb_schema_info *schema_info;
 115
 116         uint32_t test_data_count;
 117         struct schemainfo_data *test_data;
 118 };
 119
 120 /**
 121  * torture macro to assert for equal dsdb_schema_info's
 122  */
 123 #define torture_assert_schema_info_equal(torture_ctx,got,expected,cmt)\
 124         do { const struct dsdb_schema_info *__got = (got), *__expected = (expected); \
 125         if (__got->revision != __expected->revision) { \
 126                 torture_result(torture_ctx, TORTURE_FAIL, \
 127                                __location__": "#got".revision %d did not match "#expected".revision %d: %s", \
 128                                (int)__got->revision, (int)__expected->revision, cmt); \
 129                 return false; \
 130         } \
 131         if (!GUID_equal(&__got->invocation_id, &__expected->invocation_id)) { \
 132                 torture_result(torture_ctx, TORTURE_FAIL, \
 133                                __location__": "#got".invocation_id did not match "#expected".invocation_id: %s", cmt); \
 134                 return false; \
 135         } \
 136         } while(0)
 137
 138 /*
 139  * forward declaration for internal functions
 140  */
 141 static bool _drsut_ldb_schema_info_reset(struct torture_context *tctx,
 142                                          struct ldb_context *ldb,
 143                                          const char *schema_info_str,
 144                                          bool in_setup);
 145
 146
 147 /**
 148  * Creates dsdb_schema_info object based on NDR data
 149  * passed as hex string
 150  */
 151 static bool _drsut_schemainfo_new(struct torture_context *tctx,
 152                                   const char *schema_info_str, struct dsdb_schema_info **_si)
 153 {
 154         WERROR werr;
 155         DATA_BLOB blob;
 156
 157         blob = strhex_to_data_blob(tctx, schema_info_str);
 158         if (!blob.data) {
 159                 torture_comment(tctx, "Not enough memory!\n");
 160                 return false;
 161         }
 162
 163         werr = dsdb_schema_info_from_blob(&blob, tctx, _si);
 164         if (!W_ERROR_IS_OK(werr)) {
 165                 torture_comment(tctx,
 166                                 "Failed to create dsdb_schema_info object for %s: %s",
 167                                 schema_info_str,
 168                                 win_errstr(werr));
 169                 return false;
 170         }
 171
 172         data_blob_free(&blob);
 173
 174         return true;
 175 }
 176
 177 /**
 178  * Creates dsdb_schema_info object based on predefined data
 179  * Function is public as it is intended to be used by other
 180  * tests (e.g. prefixMap tests)
 181  */
 182 bool drsut_schemainfo_new(struct torture_context *tctx, struct dsdb_schema_info **_si)
 183 {
 184         return _drsut_schemainfo_new(tctx, SCHEMA_INFO_DEFAULT_STR, _si);
 185 }
 186
 187
 188 /*
 189  * Tests dsdb_schema_info_from_blob()
 190  */
 191 static bool test_dsdb_schema_info_from_blob(struct torture_context *tctx,
 192                                             struct drsut_schemainfo_data *priv)
 193 {
 194         int i;
 195         WERROR werr;
 196         char *msg;
 197         struct dsdb_schema_info *schema_info;
 198         TALLOC_CTX *mem_ctx;
 199
 200         mem_ctx = talloc_new(priv);
 201         torture_assert(tctx, mem_ctx, "Not enough memory!");
 202
 203         for (i = 0; i < priv->test_data_count; i++) {
 204                 struct schemainfo_data *data = &priv->test_data[i];
 205
 206                 msg = talloc_asprintf(tctx, "dsdb_schema_info_from_blob() [%d]-[%s]",
 207                                       i, _schemainfo_test_data[i].schema_info_str);
 208
 209                 werr = dsdb_schema_info_from_blob(&data->ndr_blob, mem_ctx, &schema_info);
 210                 torture_assert_werr_equal(tctx, werr, data->werr_expected, msg);
 211
 212                 /* test returned data */
 213                 if (W_ERROR_IS_OK(werr)) {
 214                         torture_assert_schema_info_equal(tctx,
 215                                                          schema_info, &data->schi,
 216                                                          "after dsdb_schema_info_from_blob() call");
 217                 }
 218         }
 219
 220         talloc_free(mem_ctx);
 221
 222         return true;
 223 }
 224
 225 /*
 226  * Tests dsdb_blob_from_schema_info()
 227  */
 228 static bool test_dsdb_blob_from_schema_info(struct torture_context *tctx,
 229                                             struct drsut_schemainfo_data *priv)
 230 {
 231         int i;
 232         WERROR werr;
 233         char *msg;
 234         DATA_BLOB ndr_blob;
 235         TALLOC_CTX *mem_ctx;
 236
 237         mem_ctx = talloc_new(priv);
 238         torture_assert(tctx, mem_ctx, "Not enough memory!");
 239
 240         for (i = 0; i < priv->test_data_count; i++) {
 241                 struct schemainfo_data *data = &priv->test_data[i];
 242
 243                 /* not all test are valid reverse type of conversion */
 244                 if (!data->test_both_ways) {
 245                         continue;
 246                 }
 247
 248                 msg = talloc_asprintf(tctx, "dsdb_blob_from_schema_info() [%d]-[%s]",
 249                                       i, _schemainfo_test_data[i].schema_info_str);
 250
 251                 werr = dsdb_blob_from_schema_info(&data->schi, mem_ctx, &ndr_blob);
 252                 torture_assert_werr_equal(tctx, werr, data->werr_expected, msg);
 253
 254                 /* test returned data */
 255                 if (W_ERROR_IS_OK(werr)) {
 256                         torture_assert_data_blob_equal(tctx,
 257                                                        ndr_blob, data->ndr_blob,
 258                                                        "dsdb_blob_from_schema_info()");
 259                 }
 260         }
 261
 262         talloc_free(mem_ctx);
 263
 264         return true;
 265 }
 266
 267 /*
 268  * Tests dsdb_module_schema_info_blob_read()
 269  *   and dsdb_module_schema_info_blob_write()
 270  */
 271 static bool test_dsdb_module_schema_info_blob_rw(struct torture_context *tctx,
 272                                                 struct drsut_schemainfo_data *priv)
 273 {
 274         WERROR werr;
 275         DATA_BLOB blob_write;
 276         DATA_BLOB blob_read;
 277
 278         /* reset schmeInfo to know value */
 279         torture_assert(tctx,
 280                        _drsut_ldb_schema_info_reset(tctx, priv->ldb, SCHEMA_INFO_INIT_STR, false),
 281                        "_drsut_ldb_schema_info_reset() failed");
 282
 283         /* write tests' default schemaInfo */
 284         blob_write = strhex_to_data_blob(priv, SCHEMA_INFO_DEFAULT_STR);
 285         torture_assert(tctx, blob_write.data, "Not enough memory!");
 286
 287         werr = dsdb_module_schema_info_blob_write(priv->ldb_module,
 288                                                   DSDB_FLAG_TOP_MODULE,
 289                                                   &blob_write);
 290         torture_assert_werr_ok(tctx, werr, "dsdb_module_schema_info_blob_write() failed");
 291
 292         werr = dsdb_module_schema_info_blob_read(priv->ldb_module, DSDB_FLAG_TOP_MODULE,
 293                                                  priv, &blob_read);
 294         torture_assert_werr_ok(tctx, werr, "dsdb_module_schema_info_blob_read() failed");
 295
 296         /* check if we get what we wrote */
 297         torture_assert_data_blob_equal(tctx, blob_read, blob_write,
 298                                        "Write/Read of schemeInfo blob failed");
 299
 300         return true;
 301 }
 302
 303 /*
 304  * Tests dsdb_schema_update_schema_info()
 305  */
 306 static bool test_dsdb_module_schema_info_update(struct torture_context *tctx,
 307                                                 struct drsut_schemainfo_data *priv)
 308 {
 309         WERROR werr;
 310         DATA_BLOB blob;
 311         struct dsdb_schema_info *schema_info;
 312
 313         /* reset schmeInfo to know value */
 314         torture_assert(tctx,
 315                        _drsut_ldb_schema_info_reset(tctx, priv->ldb, SCHEMA_INFO_INIT_STR, false),
 316                        "_drsut_ldb_schema_info_reset() failed");
 317
 318         werr = dsdb_module_schema_info_update(priv->ldb_module,
 319                                               priv->schema,
 320                                               DSDB_FLAG_TOP_MODULE | DSDB_FLAG_AS_SYSTEM);
 321         torture_assert_werr_ok(tctx, werr, "dsdb_module_schema_info_update() failed");
 322
 323         /* get updated schemaInfo */
 324         werr = dsdb_module_schema_info_blob_read(priv->ldb_module, DSDB_FLAG_TOP_MODULE,
 325                                                  priv, &blob);
 326         torture_assert_werr_ok(tctx, werr, "dsdb_module_schema_info_blob_read() failed");
 327
 328         werr = dsdb_schema_info_from_blob(&blob, priv, &schema_info);
 329         torture_assert_werr_ok(tctx, werr, "dsdb_schema_info_from_blob() failed");
 330
 331         /* check against default schema_info */
 332         torture_assert_schema_info_equal(tctx, schema_info, priv->schema_info,
 333                                           "schemaInfo attribute no updated correctly");
 334
 335         return true;
 336 }
 337
 338
 339 /**
 340  * Reset schemaInfo record to know value
 341  */
 342 static bool _drsut_ldb_schema_info_reset(struct torture_context *tctx,
 343                                          struct ldb_context *ldb,
 344                                          const char *schema_info_str,
 345                                          bool in_setup)
 346 {
 347         bool bret = true;
 348         int ldb_err;
 349         DATA_BLOB blob;
 350         struct ldb_message *msg;
 351         TALLOC_CTX *mem_ctx = talloc_new(tctx);
 352
 353         blob = strhex_to_data_blob(mem_ctx, schema_info_str);
 354         torture_assert_goto(tctx, blob.data, bret, DONE, "Not enough memory!");
 355
 356         msg = ldb_msg_new(mem_ctx);
 357         torture_assert_goto(tctx, msg, bret, DONE, "Not enough memory!");
 358
 359         msg->dn = ldb_get_schema_basedn(ldb);
 360         ldb_err = ldb_msg_add_value(msg, "schemaInfo", &blob, NULL);
 361         torture_assert_int_equal_goto(tctx, ldb_err, LDB_SUCCESS, bret, DONE,
 362                                       "ldb_msg_add_value() failed");
 363
 364         if (in_setup) {
 365                 ldb_err = ldb_add(ldb, msg);
 366         } else {
 367                 ldb_err = dsdb_replace(ldb, msg, DSDB_MODIFY_PERMISSIVE);
 368         }
 369         torture_assert_int_equal_goto(tctx, ldb_err, LDB_SUCCESS, bret, DONE,
 370                                       "dsdb_replace() failed");
 371
 372 DONE:
 373         talloc_free(mem_ctx);
 374         return bret;
 375 }
 376
 377 /**
 378  * Prepare temporary LDB and opens it
 379  */
 380 static bool _drsut_ldb_setup(struct torture_context *tctx, struct drsut_schemainfo_data *priv)
 381 {
 382         int ldb_err;
 383         char *ldb_url;
 384         bool bret = true;
 385         char *tempdir = NULL;
 386         NTSTATUS status;
 387         TALLOC_CTX* mem_ctx;
 388
 389         mem_ctx = talloc_new(priv);
 390         torture_assert(tctx, mem_ctx, "Not enough memory!");
 391
 392         status = torture_temp_dir(tctx, "drs_", &tempdir);
 393         torture_assert_ntstatus_ok_goto(tctx, status, bret, DONE, "creating temp dir");
 394
 395         ldb_url = talloc_asprintf(priv, "%s/drs_schemainfo.ldb", tempdir);
 396         torture_assert_goto(tctx, ldb_url, bret, DONE, "Not enough memory!");
 397
 398         /* create LDB */
 399         priv->ldb = ldb_wrap_connect(priv, tctx->ev, tctx->lp_ctx,
 400                                      ldb_url, NULL, NULL, 0);
 401         torture_assert_goto(tctx, priv->ldb, bret, DONE,  "ldb_wrap_connect() failed");
 402
 403         /* set some schemaNamingContext */
 404         ldb_err = ldb_set_opaque(priv->ldb,
 405                                  "schemaNamingContext",
 406                                  ldb_dn_new(priv->ldb, priv->ldb, "CN=Schema,CN=Config"));
 407         torture_assert_int_equal_goto(tctx, ldb_err, LDB_SUCCESS, bret, DONE,
 408                                       "ldb_set_opaque() failed");
 409
 410         /* add schemaInfo attribute so tested layer could work properly */
 411         torture_assert_goto(tctx,
 412                             _drsut_ldb_schema_info_reset(tctx, priv->ldb, SCHEMA_INFO_INIT_STR, true),
 413                             bret, DONE,
 414                             "_drsut_ldb_schema_info_reset() failed");
 415
 416 DONE:
 417         talloc_free(tempdir);
 418         talloc_free(mem_ctx);
 419         return bret;
 420 }
 421
 422 /*
 423  * Setup/Teardown for test case
 424  */
 425 static bool torture_drs_unit_schemainfo_setup(struct torture_context *tctx,
 426                                               struct drsut_schemainfo_data **_priv)
 427 {
 428         int i;
 429         int ldb_err;
 430         NTSTATUS status;
 431         DATA_BLOB ndr_blob;
 432         struct GUID guid;
 433         struct drsut_schemainfo_data *priv;
 434
 435         priv = talloc_zero(tctx, struct drsut_schemainfo_data);
 436         torture_assert(tctx, priv, "Not enough memory!");
 437
 438         /* returned allocated pointer here
 439          * teardown() will be called even in case of failure,
 440          * so we'll get a changes to clean up  */
 441         *_priv = priv;
 442
 443         /* create initial schemaInfo */
 444         torture_assert(tctx,
 445                        _drsut_schemainfo_new(tctx, SCHEMA_INFO_DEFAULT_STR, &priv->schema_info),
 446                        "Failed to create schema_info test object");
 447
 448         /* create data to test with */
 449         priv->test_data_count = ARRAY_SIZE(_schemainfo_test_data);
 450         priv->test_data = talloc_array(tctx, struct schemainfo_data, priv->test_data_count);
 451
 452         for (i = 0; i < ARRAY_SIZE(_schemainfo_test_data); i++) {
 453                 struct schemainfo_data *data = &priv->test_data[i];
 454
 455                 ndr_blob = strhex_to_data_blob(priv,
 456                                                _schemainfo_test_data[i].schema_info_str);
 457                 torture_assert(tctx, ndr_blob.data, "Not enough memory!");
 458
 459                 status = GUID_from_string(_schemainfo_test_data[i].guid_str, &guid);
 460                 torture_assert_ntstatus_ok(tctx, status,
 461                                            talloc_asprintf(tctx,
 462                                                            "GUID_from_string() failed for %s",
 463                                                            _schemainfo_test_data[i].guid_str));
 464
 465                 data->ndr_blob           = ndr_blob;
 466                 data->schi.invocation_id = guid;
 467                 data->schi.revision      = _schemainfo_test_data[i].revision;
 468                 data->werr_expected      = _schemainfo_test_data[i].werr_expected;
 469                 data->test_both_ways     = _schemainfo_test_data[i].test_both_ways;
 470
 471         }
 472
 473         /* create temporary LDB and populate with data */
 474         if (!_drsut_ldb_setup(tctx, priv)) {
 475                 return false;
 476         }
 477
 478         /* create ldb_module mockup object */
 479         priv->ldb_module = ldb_module_new(priv, priv->ldb, "schemaInfo_test_module", NULL);
 480         torture_assert(tctx, priv->ldb_module, "Not enough memory!");
 481
 482         /* create schema mockup object */
 483         priv->schema = dsdb_new_schema(priv, lp_iconv_convenience(tctx->lp_ctx));
 484
 485         /* pre-cache invocationId for samdb_ntds_invocation_id()
 486          * to work with our mock ldb */
 487         ldb_err = ldb_set_opaque(priv->ldb, "cache.invocation_id",
 488                                  &priv->schema_info->invocation_id);
 489         torture_assert_int_equal(tctx, ldb_err, LDB_SUCCESS, "ldb_set_opaque() failed");
 490
 491         /* Perform all tests in transactions so that
 492          * underlying modify calls not to fail */
 493         ldb_err = ldb_transaction_start(priv->ldb);
 494         torture_assert_int_equal(tctx,
 495                                  ldb_err,
 496                                  LDB_SUCCESS,
 497                                  "ldb_transaction_start() failed");
 498
 499         return true;
 500 }
 501
 502 static bool torture_drs_unit_schemainfo_teardown(struct torture_context *tctx,
 503                                                  struct drsut_schemainfo_data *priv)
 504 {
 505         int ldb_err;
 506
 507         /* commit pending transaction so we will
 508          * be able to check what LDB state is */
 509         ldb_err = ldb_transaction_commit(priv->ldb);
 510         if (ldb_err != LDB_SUCCESS) {
 511                 torture_comment(tctx, "ldb_transaction_commit() - %s (%s)",
 512                                 ldb_strerror(ldb_err),
 513                                 ldb_errstring(priv->ldb));
 514         }
 515
 516         talloc_free(priv);
 517
 518         return true;
 519 }
 520
 521 /**
 522  * Test case initialization for
 523  * DRS-UNIT.schemaInfo
 524  */
 525 struct torture_tcase * torture_drs_unit_schemainfo(struct torture_suite *suite)
 526 {
 527         typedef bool (*pfn_setup)(struct torture_context *, void **);
 528         typedef bool (*pfn_teardown)(struct torture_context *, void *);
 529         typedef bool (*pfn_run)(struct torture_context *, void *);
 530
 531         struct torture_tcase * tc = torture_suite_add_tcase(suite, "schemaInfo");
 532
 533         torture_tcase_set_fixture(tc,
 534                                   (pfn_setup)torture_drs_unit_schemainfo_setup,
 535                                   (pfn_teardown)torture_drs_unit_schemainfo_teardown);
 536
 537         tc->description = talloc_strdup(tc, "Unit tests for DRSUAPI::schemaInfo implementation");
 538
 539         torture_tcase_add_simple_test(tc, "dsdb_schema_info_from_blob",
 540                                       (pfn_run)test_dsdb_schema_info_from_blob);
 541         torture_tcase_add_simple_test(tc, "dsdb_blob_from_schema_info",
 542                                       (pfn_run)test_dsdb_blob_from_schema_info);
 543         torture_tcase_add_simple_test(tc, "dsdb_module_schema_info_blob read|write",
 544                                       (pfn_run)test_dsdb_module_schema_info_blob_rw);
 545         torture_tcase_add_simple_test(tc, "dsdb_module_schema_info_update",
 546                                       (pfn_run)test_dsdb_module_schema_info_update);
 547
 548
 549         return tc;
 550 }