source4/torture/rpc/lsa.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    test suite for lsa rpc operations
   4
   5    Copyright (C) Andrew Tridgell 2003
   6    Copyright (C) Andrew Bartlett <abartlet@samba.org> 2004-2005
   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 "torture/torture.h"
  24 #include "librpc/gen_ndr/ndr_lsa_c.h"
  25 #include "librpc/gen_ndr/netlogon.h"
  26 #include "librpc/gen_ndr/ndr_drsblobs.h"
  27 #include "lib/events/events.h"
  28 #include "libcli/security/security.h"
  29 #include "libcli/auth/libcli_auth.h"
  30 #include "torture/rpc/rpc.h"
  31 #include "param/param.h"
  32 #include "../lib/crypto/crypto.h"
  33 #define TEST_MACHINENAME "lsatestmach"
  34
  35 static void init_lsa_String(struct lsa_String *name, const char *s)
  36 {
  37         name->string = s;
  38 }
  39
  40 static bool test_OpenPolicy(struct dcerpc_pipe *p,
  41                             struct torture_context *tctx)
  42 {
  43         struct lsa_ObjectAttribute attr;
  44         struct policy_handle handle;
  45         struct lsa_QosInfo qos;
  46         struct lsa_OpenPolicy r;
  47         NTSTATUS status;
  48         uint16_t system_name = '\\';
  49
  50         torture_comment(tctx, "\nTesting OpenPolicy\n");
  51
  52         qos.len = 0;
  53         qos.impersonation_level = 2;
  54         qos.context_mode = 1;
  55         qos.effective_only = 0;
  56
  57         attr.len = 0;
  58         attr.root_dir = NULL;
  59         attr.object_name = NULL;
  60         attr.attributes = 0;
  61         attr.sec_desc = NULL;
  62         attr.sec_qos = &qos;
  63
  64         r.in.system_name = &system_name;
  65         r.in.attr = &attr;
  66         r.in.access_mask = SEC_FLAG_MAXIMUM_ALLOWED;
  67         r.out.handle = &handle;
  68
  69         status = dcerpc_lsa_OpenPolicy(p, tctx, &r);
  70         if (!NT_STATUS_IS_OK(status)) {
  71                 if (NT_STATUS_EQUAL(status, NT_STATUS_ACCESS_DENIED) ||
  72                     NT_STATUS_EQUAL(status, NT_STATUS_RPC_PROTSEQ_NOT_SUPPORTED)) {
  73                         torture_comment(tctx, "not considering %s to be an error\n", nt_errstr(status));
  74                         return true;
  75                 }
  76                 torture_comment(tctx, "OpenPolicy failed - %s\n", nt_errstr(status));
  77                 return false;
  78         }
  79
  80         return true;
  81 }
  82
  83
  84 bool test_lsa_OpenPolicy2(struct dcerpc_pipe *p,
  85                           struct torture_context *tctx,
  86                           struct policy_handle **handle)
  87 {
  88         struct lsa_ObjectAttribute attr;
  89         struct lsa_QosInfo qos;
  90         struct lsa_OpenPolicy2 r;
  91         NTSTATUS status;
  92
  93         torture_comment(tctx, "\nTesting OpenPolicy2\n");
  94
  95         *handle = talloc(tctx, struct policy_handle);
  96         if (!*handle) {
  97                 return false;
  98         }
  99
 100         qos.len = 0;
 101         qos.impersonation_level = 2;
 102         qos.context_mode = 1;
 103         qos.effective_only = 0;
 104
 105         attr.len = 0;
 106         attr.root_dir = NULL;
 107         attr.object_name = NULL;
 108         attr.attributes = 0;
 109         attr.sec_desc = NULL;
 110         attr.sec_qos = &qos;
 111
 112         r.in.system_name = "\\";
 113         r.in.attr = &attr;
 114         r.in.access_mask = SEC_FLAG_MAXIMUM_ALLOWED;
 115         r.out.handle = *handle;
 116
 117         status = dcerpc_lsa_OpenPolicy2(p, tctx, &r);
 118         if (!NT_STATUS_IS_OK(status)) {
 119                 if (NT_STATUS_EQUAL(status, NT_STATUS_ACCESS_DENIED) ||
 120                     NT_STATUS_EQUAL(status, NT_STATUS_RPC_PROTSEQ_NOT_SUPPORTED)) {
 121                         torture_comment(tctx, "not considering %s to be an error\n", nt_errstr(status));
 122                         talloc_free(*handle);
 123                         *handle = NULL;
 124                         return true;
 125                 }
 126                 torture_comment(tctx, "OpenPolicy2 failed - %s\n", nt_errstr(status));
 127                 return false;
 128         }
 129
 130         return true;
 131 }
 132
 133
 134 static const char *sid_type_lookup(enum lsa_SidType r)
 135 {
 136         switch (r) {
 137                 case SID_NAME_USE_NONE: return "SID_NAME_USE_NONE"; break;
 138                 case SID_NAME_USER: return "SID_NAME_USER"; break;
 139                 case SID_NAME_DOM_GRP: return "SID_NAME_DOM_GRP"; break;
 140                 case SID_NAME_DOMAIN: return "SID_NAME_DOMAIN"; break;
 141                 case SID_NAME_ALIAS: return "SID_NAME_ALIAS"; break;
 142                 case SID_NAME_WKN_GRP: return "SID_NAME_WKN_GRP"; break;
 143                 case SID_NAME_DELETED: return "SID_NAME_DELETED"; break;
 144                 case SID_NAME_INVALID: return "SID_NAME_INVALID"; break;
 145                 case SID_NAME_UNKNOWN: return "SID_NAME_UNKNOWN"; break;
 146                 case SID_NAME_COMPUTER: return "SID_NAME_COMPUTER"; break;
 147         }
 148         return "Invalid sid type\n";
 149 }
 150
 151 static bool test_LookupNames(struct dcerpc_pipe *p,
 152                              struct torture_context *tctx,
 153                              struct policy_handle *handle,
 154                              struct lsa_TransNameArray *tnames)
 155 {
 156         struct lsa_LookupNames r;
 157         struct lsa_TransSidArray sids;
 158         struct lsa_RefDomainList *domains = NULL;
 159         struct lsa_String *names;
 160         uint32_t count = 0;
 161         NTSTATUS status;
 162         int i;
 163
 164         torture_comment(tctx, "\nTesting LookupNames with %d names\n", tnames->count);
 165
 166         sids.count = 0;
 167         sids.sids = NULL;
 168
 169         names = talloc_array(tctx, struct lsa_String, tnames->count);
 170         for (i=0;i<tnames->count;i++) {
 171                 init_lsa_String(&names[i], tnames->names[i].name.string);
 172         }
 173
 174         r.in.handle = handle;
 175         r.in.num_names = tnames->count;
 176         r.in.names = names;
 177         r.in.sids = &sids;
 178         r.in.level = 1;
 179         r.in.count = &count;
 180         r.out.count = &count;
 181         r.out.sids = &sids;
 182         r.out.domains = &domains;
 183
 184         status = dcerpc_lsa_LookupNames(p, tctx, &r);
 185
 186         if (NT_STATUS_EQUAL(status, STATUS_SOME_UNMAPPED) ||
 187             NT_STATUS_EQUAL(status, NT_STATUS_NONE_MAPPED)) {
 188                 for (i=0;i< tnames->count;i++) {
 189                         if (i < count && sids.sids[i].sid_type == SID_NAME_UNKNOWN) {
 190                                 torture_comment(tctx, "LookupName of %s was unmapped\n",
 191                                        tnames->names[i].name.string);
 192                         } else if (i >=count) {
 193                                 torture_comment(tctx, "LookupName of %s failed to return a result\n",
 194                                        tnames->names[i].name.string);
 195                         }
 196                 }
 197                 torture_comment(tctx, "LookupNames failed - %s\n", nt_errstr(status));
 198                 return false;
 199         } else if (!NT_STATUS_IS_OK(status)) {
 200                 torture_comment(tctx, "LookupNames failed - %s\n", nt_errstr(status));
 201                 return false;
 202         }
 203
 204         for (i=0;i< tnames->count;i++) {
 205                 if (i < count) {
 206                         if (sids.sids[i].sid_type != tnames->names[i].sid_type) {
 207                                 torture_comment(tctx, "LookupName of %s got unexpected name type: %s\n",
 208                                        tnames->names[i].name.string, sid_type_lookup(sids.sids[i].sid_type));
 209                                 return false;
 210                         }
 211                         if ((sids.sids[i].sid_type == SID_NAME_DOMAIN) &&
 212                             (sids.sids[i].rid != (uint32_t)-1)) {
 213                                 torture_comment(tctx, "LookupName of %s got unexpected rid: %d\n",
 214                                         tnames->names[i].name.string, sids.sids[i].rid);
 215                                 return false;
 216                         }
 217                 } else if (i >=count) {
 218                         torture_comment(tctx, "LookupName of %s failed to return a result\n",
 219                                tnames->names[i].name.string);
 220                         return false;
 221                 }
 222         }
 223         torture_comment(tctx, "\n");
 224
 225         return true;
 226 }
 227
 228 static bool test_LookupNames_bogus(struct dcerpc_pipe *p,
 229                                    struct torture_context *tctx,
 230                                    struct policy_handle *handle)
 231 {
 232         struct lsa_LookupNames r;
 233         struct lsa_TransSidArray sids;
 234         struct lsa_RefDomainList *domains = NULL;
 235         struct lsa_String names[1];
 236         uint32_t count = 0;
 237         NTSTATUS status;
 238
 239         torture_comment(tctx, "\nTesting LookupNames with bogus name\n");
 240
 241         sids.count = 0;
 242         sids.sids = NULL;
 243
 244         init_lsa_String(&names[0], "NT AUTHORITY\\BOGUS");
 245
 246         r.in.handle = handle;
 247         r.in.num_names = 1;
 248         r.in.names = names;
 249         r.in.sids = &sids;
 250         r.in.level = 1;
 251         r.in.count = &count;
 252         r.out.count = &count;
 253         r.out.sids = &sids;
 254         r.out.domains = &domains;
 255
 256         status = dcerpc_lsa_LookupNames(p, tctx, &r);
 257         if (!NT_STATUS_EQUAL(status, NT_STATUS_NONE_MAPPED)) {
 258                 torture_comment(tctx, "LookupNames failed - %s\n", nt_errstr(status));
 259                 return false;
 260         }
 261
 262         torture_comment(tctx, "\n");
 263
 264         return true;
 265 }
 266
 267 static bool test_LookupNames_NULL(struct dcerpc_pipe *p,
 268                                   struct torture_context *tctx,
 269                                   struct policy_handle *handle)
 270 {
 271         struct lsa_LookupNames r;
 272         struct lsa_TransSidArray sids;
 273         struct lsa_RefDomainList *domains = NULL;
 274         struct lsa_String names[1];
 275         uint32_t count = 0;
 276
 277         torture_comment(tctx, "\nTesting LookupNames with NULL name\n");
 278
 279         sids.count = 0;
 280         sids.sids = NULL;
 281
 282         names[0].string = NULL;
 283
 284         r.in.handle = handle;
 285         r.in.num_names = 1;
 286         r.in.names = names;
 287         r.in.sids = &sids;
 288         r.in.level = 1;
 289         r.in.count = &count;
 290         r.out.count = &count;
 291         r.out.sids = &sids;
 292         r.out.domains = &domains;
 293
 294         /* nt4 returns NT_STATUS_NONE_MAPPED with sid_type
 295          * SID_NAME_UNKNOWN, rid 0, and sid_index -1;
 296          *
 297          * w2k3/w2k8 return NT_STATUS_OK with sid_type
 298          * SID_NAME_DOMAIN, rid -1 and sid_index 0 and BUILTIN domain
 299          */
 300
 301         torture_assert_ntstatus_ok(tctx, dcerpc_lsa_LookupNames(p, tctx, &r),
 302                 "LookupNames with NULL name failed");
 303
 304         torture_comment(tctx, "\n");
 305
 306         return true;
 307 }
 308
 309 static bool test_LookupNames_wellknown(struct dcerpc_pipe *p,
 310                                        struct torture_context *tctx,
 311                                        struct policy_handle *handle)
 312 {
 313         struct lsa_TranslatedName name;
 314         struct lsa_TransNameArray tnames;
 315         bool ret = true;
 316
 317         torture_comment(tctx, "Testing LookupNames with well known names\n");
 318
 319         tnames.names = &name;
 320         tnames.count = 1;
 321         name.name.string = "NT AUTHORITY\\SYSTEM";
 322         name.sid_type = SID_NAME_WKN_GRP;
 323         ret &= test_LookupNames(p, tctx, handle, &tnames);
 324
 325         name.name.string = "NT AUTHORITY\\ANONYMOUS LOGON";
 326         name.sid_type = SID_NAME_WKN_GRP;
 327         ret &= test_LookupNames(p, tctx, handle, &tnames);
 328
 329         name.name.string = "NT AUTHORITY\\Authenticated Users";
 330         name.sid_type = SID_NAME_WKN_GRP;
 331         ret &= test_LookupNames(p, tctx, handle, &tnames);
 332
 333 #if 0
 334         name.name.string = "NT AUTHORITY";
 335         ret &= test_LookupNames(p, tctx, handle, &tnames);
 336
 337         name.name.string = "NT AUTHORITY\\";
 338         ret &= test_LookupNames(p, tctx, handle, &tnames);
 339 #endif
 340
 341         name.name.string = "BUILTIN\\";
 342         name.sid_type = SID_NAME_DOMAIN;
 343         ret &= test_LookupNames(p, tctx, handle, &tnames);
 344
 345         name.name.string = "BUILTIN\\Administrators";
 346         name.sid_type = SID_NAME_ALIAS;
 347         ret &= test_LookupNames(p, tctx, handle, &tnames);
 348
 349         name.name.string = "SYSTEM";
 350         name.sid_type = SID_NAME_WKN_GRP;
 351         ret &= test_LookupNames(p, tctx, handle, &tnames);
 352
 353         name.name.string = "Everyone";
 354         name.sid_type = SID_NAME_WKN_GRP;
 355         ret &= test_LookupNames(p, tctx, handle, &tnames);
 356         return ret;
 357 }
 358
 359 static bool test_LookupNames2(struct dcerpc_pipe *p,
 360                               struct torture_context *tctx,
 361                               struct policy_handle *handle,
 362                               struct lsa_TransNameArray2 *tnames,
 363                               bool check_result)
 364 {
 365         struct lsa_LookupNames2 r;
 366         struct lsa_TransSidArray2 sids;
 367         struct lsa_RefDomainList *domains = NULL;
 368         struct lsa_String *names;
 369         uint32_t count = 0;
 370         NTSTATUS status;
 371         int i;
 372
 373         torture_comment(tctx, "\nTesting LookupNames2 with %d names\n", tnames->count);
 374
 375         sids.count = 0;
 376         sids.sids = NULL;
 377
 378         names = talloc_array(tctx, struct lsa_String, tnames->count);
 379         for (i=0;i<tnames->count;i++) {
 380                 init_lsa_String(&names[i], tnames->names[i].name.string);
 381         }
 382
 383         r.in.handle = handle;
 384         r.in.num_names = tnames->count;
 385         r.in.names = names;
 386         r.in.sids = &sids;
 387         r.in.level = 1;
 388         r.in.count = &count;
 389         r.in.lookup_options = 0;
 390         r.in.client_revision = 0;
 391         r.out.count = &count;
 392         r.out.sids = &sids;
 393         r.out.domains = &domains;
 394
 395         status = dcerpc_lsa_LookupNames2(p, tctx, &r);
 396         if (!NT_STATUS_IS_OK(status)) {
 397                 torture_comment(tctx, "LookupNames2 failed - %s\n", nt_errstr(status));
 398                 return false;
 399         }
 400
 401         if (check_result) {
 402                 torture_assert_int_equal(tctx, count, sids.count,
 403                         "unexpected number of results returned");
 404                 if (sids.count > 0) {
 405                         torture_assert(tctx, sids.sids, "invalid sid buffer");
 406                 }
 407         }
 408
 409         torture_comment(tctx, "\n");
 410
 411         return true;
 412 }
 413
 414
 415 static bool test_LookupNames3(struct dcerpc_pipe *p,
 416                               struct torture_context *tctx,
 417                               struct policy_handle *handle,
 418                               struct lsa_TransNameArray2 *tnames,
 419                               bool check_result)
 420 {
 421         struct lsa_LookupNames3 r;
 422         struct lsa_TransSidArray3 sids;
 423         struct lsa_RefDomainList *domains = NULL;
 424         struct lsa_String *names;
 425         uint32_t count = 0;
 426         NTSTATUS status;
 427         int i;
 428
 429         torture_comment(tctx, "\nTesting LookupNames3 with %d names\n", tnames->count);
 430
 431         sids.count = 0;
 432         sids.sids = NULL;
 433
 434         names = talloc_array(tctx, struct lsa_String, tnames->count);
 435         for (i=0;i<tnames->count;i++) {
 436                 init_lsa_String(&names[i], tnames->names[i].name.string);
 437         }
 438
 439         r.in.handle = handle;
 440         r.in.num_names = tnames->count;
 441         r.in.names = names;
 442         r.in.sids = &sids;
 443         r.in.level = 1;
 444         r.in.count = &count;
 445         r.in.lookup_options = 0;
 446         r.in.client_revision = 0;
 447         r.out.count = &count;
 448         r.out.sids = &sids;
 449         r.out.domains = &domains;
 450
 451         status = dcerpc_lsa_LookupNames3(p, tctx, &r);
 452         if (!NT_STATUS_IS_OK(status)) {
 453                 torture_comment(tctx, "LookupNames3 failed - %s\n", nt_errstr(status));
 454                 return false;
 455         }
 456
 457         if (check_result) {
 458                 torture_assert_int_equal(tctx, count, sids.count,
 459                         "unexpected number of results returned");
 460                 if (sids.count > 0) {
 461                         torture_assert(tctx, sids.sids, "invalid sid buffer");
 462                 }
 463         }
 464
 465         torture_comment(tctx, "\n");
 466
 467         return true;
 468 }
 469
 470 static bool test_LookupNames4(struct dcerpc_pipe *p,
 471                               struct torture_context *tctx,
 472                               struct lsa_TransNameArray2 *tnames,
 473                               bool check_result)
 474 {
 475         struct lsa_LookupNames4 r;
 476         struct lsa_TransSidArray3 sids;
 477         struct lsa_RefDomainList *domains = NULL;
 478         struct lsa_String *names;
 479         uint32_t count = 0;
 480         NTSTATUS status;
 481         int i;
 482
 483         torture_comment(tctx, "\nTesting LookupNames4 with %d names\n", tnames->count);
 484
 485         sids.count = 0;
 486         sids.sids = NULL;
 487
 488         names = talloc_array(tctx, struct lsa_String, tnames->count);
 489         for (i=0;i<tnames->count;i++) {
 490                 init_lsa_String(&names[i], tnames->names[i].name.string);
 491         }
 492
 493         r.in.num_names = tnames->count;
 494         r.in.names = names;
 495         r.in.sids = &sids;
 496         r.in.level = 1;
 497         r.in.count = &count;
 498         r.in.lookup_options = 0;
 499         r.in.client_revision = 0;
 500         r.out.count = &count;
 501         r.out.sids = &sids;
 502         r.out.domains = &domains;
 503
 504         status = dcerpc_lsa_LookupNames4(p, tctx, &r);
 505         if (!NT_STATUS_IS_OK(status)) {
 506                 torture_comment(tctx, "LookupNames4 failed - %s\n", nt_errstr(status));
 507                 return false;
 508         }
 509
 510         if (check_result) {
 511                 torture_assert_int_equal(tctx, count, sids.count,
 512                         "unexpected number of results returned");
 513                 if (sids.count > 0) {
 514                         torture_assert(tctx, sids.sids, "invalid sid buffer");
 515                 }
 516         }
 517
 518         torture_comment(tctx, "\n");
 519
 520         return true;
 521 }
 522
 523
 524 static bool test_LookupSids(struct dcerpc_pipe *p,
 525                             struct torture_context *tctx,
 526                             struct policy_handle *handle,
 527                             struct lsa_SidArray *sids)
 528 {
 529         struct lsa_LookupSids r;
 530         struct lsa_TransNameArray names;
 531         struct lsa_RefDomainList *domains = NULL;
 532         uint32_t count = sids->num_sids;
 533         NTSTATUS status;
 534
 535         torture_comment(tctx, "\nTesting LookupSids\n");
 536
 537         names.count = 0;
 538         names.names = NULL;
 539
 540         r.in.handle = handle;
 541         r.in.sids = sids;
 542         r.in.names = &names;
 543         r.in.level = 1;
 544         r.in.count = &count;
 545         r.out.count = &count;
 546         r.out.names = &names;
 547         r.out.domains = &domains;
 548
 549         status = dcerpc_lsa_LookupSids(p, tctx, &r);
 550         if (!NT_STATUS_IS_OK(status)) {
 551                 torture_comment(tctx, "LookupSids failed - %s\n", nt_errstr(status));
 552                 return false;
 553         }
 554
 555         torture_comment(tctx, "\n");
 556
 557         if (!test_LookupNames(p, tctx, handle, &names)) {
 558                 return false;
 559         }
 560
 561         return true;
 562 }
 563
 564
 565 static bool test_LookupSids2(struct dcerpc_pipe *p,
 566                             struct torture_context *tctx,
 567                             struct policy_handle *handle,
 568                             struct lsa_SidArray *sids)
 569 {
 570         struct lsa_LookupSids2 r;
 571         struct lsa_TransNameArray2 names;
 572         struct lsa_RefDomainList *domains = NULL;
 573         uint32_t count = sids->num_sids;
 574         NTSTATUS status;
 575
 576         torture_comment(tctx, "\nTesting LookupSids2\n");
 577
 578         names.count = 0;
 579         names.names = NULL;
 580
 581         r.in.handle = handle;
 582         r.in.sids = sids;
 583         r.in.names = &names;
 584         r.in.level = 1;
 585         r.in.count = &count;
 586         r.in.lookup_options = 0;
 587         r.in.client_revision = 0;
 588         r.out.count = &count;
 589         r.out.names = &names;
 590         r.out.domains = &domains;
 591
 592         status = dcerpc_lsa_LookupSids2(p, tctx, &r);
 593         if (!NT_STATUS_IS_OK(status)) {
 594                 torture_comment(tctx, "LookupSids2 failed - %s\n", nt_errstr(status));
 595                 return false;
 596         }
 597
 598         torture_comment(tctx, "\n");
 599
 600         if (!test_LookupNames2(p, tctx, handle, &names, false)) {
 601                 return false;
 602         }
 603
 604         if (!test_LookupNames3(p, tctx, handle, &names, false)) {
 605                 return false;
 606         }
 607
 608         return true;
 609 }
 610
 611 static bool test_LookupSids3(struct dcerpc_pipe *p,
 612                             struct torture_context *tctx,
 613                             struct lsa_SidArray *sids)
 614 {
 615         struct lsa_LookupSids3 r;
 616         struct lsa_TransNameArray2 names;
 617         struct lsa_RefDomainList *domains = NULL;
 618         uint32_t count = sids->num_sids;
 619         NTSTATUS status;
 620
 621         torture_comment(tctx, "\nTesting LookupSids3\n");
 622
 623         names.count = 0;
 624         names.names = NULL;
 625
 626         r.in.sids = sids;
 627         r.in.names = &names;
 628         r.in.level = 1;
 629         r.in.count = &count;
 630         r.in.lookup_options = 0;
 631         r.in.client_revision = 0;
 632         r.out.domains = &domains;
 633         r.out.count = &count;
 634         r.out.names = &names;
 635
 636         status = dcerpc_lsa_LookupSids3(p, tctx, &r);
 637         if (!NT_STATUS_IS_OK(status)) {
 638                 if (NT_STATUS_EQUAL(status, NT_STATUS_ACCESS_DENIED) ||
 639                     NT_STATUS_EQUAL(status, NT_STATUS_RPC_PROTSEQ_NOT_SUPPORTED)) {
 640                         torture_comment(tctx, "not considering %s to be an error\n", nt_errstr(status));
 641                         return true;
 642                 }
 643                 torture_comment(tctx, "LookupSids3 failed - %s - not considered an error\n",
 644                        nt_errstr(status));
 645                 return false;
 646         }
 647
 648         torture_comment(tctx, "\n");
 649
 650         if (!test_LookupNames4(p, tctx, &names, false)) {
 651                 return false;
 652         }
 653
 654         return true;
 655 }
 656
 657 bool test_many_LookupSids(struct dcerpc_pipe *p,
 658                           struct torture_context *tctx,
 659                           struct policy_handle *handle)
 660 {
 661         uint32_t count;
 662         NTSTATUS status;
 663         struct lsa_SidArray sids;
 664         int i;
 665
 666         torture_comment(tctx, "\nTesting LookupSids with lots of SIDs\n");
 667
 668         sids.num_sids = 100;
 669
 670         sids.sids = talloc_array(tctx, struct lsa_SidPtr, sids.num_sids);
 671
 672         for (i=0; i<sids.num_sids; i++) {
 673                 const char *sidstr = "S-1-5-32-545";
 674                 sids.sids[i].sid = dom_sid_parse_talloc(tctx, sidstr);
 675         }
 676
 677         count = sids.num_sids;
 678
 679         if (handle) {
 680                 struct lsa_LookupSids r;
 681                 struct lsa_TransNameArray names;
 682                 struct lsa_RefDomainList *domains = NULL;
 683                 names.count = 0;
 684                 names.names = NULL;
 685
 686                 r.in.handle = handle;
 687                 r.in.sids = &sids;
 688                 r.in.names = &names;
 689                 r.in.level = 1;
 690                 r.in.count = &names.count;
 691                 r.out.count = &count;
 692                 r.out.names = &names;
 693                 r.out.domains = &domains;
 694
 695                 status = dcerpc_lsa_LookupSids(p, tctx, &r);
 696                 if (!NT_STATUS_IS_OK(status)) {
 697                         torture_comment(tctx, "LookupSids failed - %s\n", nt_errstr(status));
 698                         return false;
 699                 }
 700
 701                 torture_comment(tctx, "\n");
 702
 703                 if (!test_LookupNames(p, tctx, handle, &names)) {
 704                         return false;
 705                 }
 706         } else if (p->conn->security_state.auth_info->auth_type == DCERPC_AUTH_TYPE_SCHANNEL &&
 707                    p->conn->security_state.auth_info->auth_level >= DCERPC_AUTH_LEVEL_INTEGRITY) {
 708                 struct lsa_LookupSids3 r;
 709                 struct lsa_RefDomainList *domains = NULL;
 710                 struct lsa_TransNameArray2 names;
 711
 712                 names.count = 0;
 713                 names.names = NULL;
 714
 715                 torture_comment(tctx, "\nTesting LookupSids3\n");
 716
 717                 r.in.sids = &sids;
 718                 r.in.names = &names;
 719                 r.in.level = 1;
 720                 r.in.count = &count;
 721                 r.in.lookup_options = 0;
 722                 r.in.client_revision = 0;
 723                 r.out.count = &count;
 724                 r.out.names = &names;
 725                 r.out.domains = &domains;
 726
 727                 status = dcerpc_lsa_LookupSids3(p, tctx, &r);
 728                 if (!NT_STATUS_IS_OK(status)) {
 729                         if (NT_STATUS_EQUAL(status, NT_STATUS_ACCESS_DENIED) ||
 730                             NT_STATUS_EQUAL(status, NT_STATUS_RPC_PROTSEQ_NOT_SUPPORTED)) {
 731                                 torture_comment(tctx, "not considering %s to be an error\n", nt_errstr(status));
 732                                 return true;
 733                         }
 734                         torture_comment(tctx, "LookupSids3 failed - %s\n",
 735                                nt_errstr(status));
 736                         return false;
 737                 }
 738                 if (!test_LookupNames4(p, tctx, &names, false)) {
 739                         return false;
 740                 }
 741         }
 742
 743         torture_comment(tctx, "\n");
 744
 745
 746
 747         return true;
 748 }
 749
 750 static void lookupsids_cb(struct rpc_request *req)
 751 {
 752         int *replies = (int *)req->async.private_data;
 753         NTSTATUS status;
 754
 755         status = dcerpc_ndr_request_recv(req);
 756         if (!NT_STATUS_IS_OK(status)) {
 757                 printf("lookupsids returned %s\n", nt_errstr(status));
 758                 *replies = -1;
 759         }
 760
 761         if (*replies >= 0) {
 762                 *replies += 1;
 763         }
 764 }
 765
 766 static bool test_LookupSids_async(struct dcerpc_pipe *p,
 767                                   struct torture_context *tctx,
 768                                   struct policy_handle *handle)
 769 {
 770         struct lsa_SidArray sids;
 771         struct lsa_SidPtr sidptr;
 772         uint32_t *count;
 773         struct lsa_TransNameArray *names;
 774         struct lsa_LookupSids *r;
 775         struct lsa_RefDomainList *domains = NULL;
 776         struct rpc_request **req;
 777         int i, replies;
 778         bool ret = true;
 779         const int num_async_requests = 50;
 780
 781         count = talloc_array(tctx, uint32_t, num_async_requests);
 782         names = talloc_array(tctx, struct lsa_TransNameArray, num_async_requests);
 783         r = talloc_array(tctx, struct lsa_LookupSids, num_async_requests);
 784
 785         torture_comment(tctx, "\nTesting %d async lookupsids request\n", num_async_requests);
 786
 787         req = talloc_array(tctx, struct rpc_request *, num_async_requests);
 788
 789         sids.num_sids = 1;
 790         sids.sids = &sidptr;
 791         sidptr.sid = dom_sid_parse_talloc(tctx, "S-1-5-32-545");
 792
 793         replies = 0;
 794
 795         for (i=0; i<num_async_requests; i++) {
 796                 count[i] = 0;
 797                 names[i].count = 0;
 798                 names[i].names = NULL;
 799
 800                 r[i].in.handle = handle;
 801                 r[i].in.sids = &sids;
 802                 r[i].in.names = &names[i];
 803                 r[i].in.level = 1;
 804                 r[i].in.count = &names[i].count;
 805                 r[i].out.count = &count[i];
 806                 r[i].out.names = &names[i];
 807                 r[i].out.domains = &domains;
 808
 809                 req[i] = dcerpc_lsa_LookupSids_send(p, req, &r[i]);
 810                 if (req[i] == NULL) {
 811                         ret = false;
 812                         break;
 813                 }
 814
 815                 req[i]->async.callback = lookupsids_cb;
 816                 req[i]->async.private_data = &replies;
 817         }
 818
 819         while (replies >= 0 && replies < num_async_requests) {
 820                 event_loop_once(p->conn->event_ctx);
 821         }
 822
 823         talloc_free(req);
 824
 825         if (replies < 0) {
 826                 ret = false;
 827         }
 828
 829         return ret;
 830 }
 831
 832 static bool test_LookupPrivValue(struct dcerpc_pipe *p,
 833                                  struct torture_context *tctx,
 834                                  struct policy_handle *handle,
 835                                  struct lsa_String *name)
 836 {
 837         NTSTATUS status;
 838         struct lsa_LookupPrivValue r;
 839         struct lsa_LUID luid;
 840
 841         r.in.handle = handle;
 842         r.in.name = name;
 843         r.out.luid = &luid;
 844
 845         status = dcerpc_lsa_LookupPrivValue(p, tctx, &r);
 846         if (!NT_STATUS_IS_OK(status)) {
 847                 torture_comment(tctx, "\nLookupPrivValue failed - %s\n", nt_errstr(status));
 848                 return false;
 849         }
 850
 851         return true;
 852 }
 853
 854 static bool test_LookupPrivName(struct dcerpc_pipe *p,
 855                                 struct torture_context *tctx,
 856                                 struct policy_handle *handle,
 857                                 struct lsa_LUID *luid)
 858 {
 859         NTSTATUS status;
 860         struct lsa_LookupPrivName r;
 861         struct lsa_StringLarge *name = NULL;
 862
 863         r.in.handle = handle;
 864         r.in.luid = luid;
 865         r.out.name = &name;
 866
 867         status = dcerpc_lsa_LookupPrivName(p, tctx, &r);
 868         if (!NT_STATUS_IS_OK(status)) {
 869                 torture_comment(tctx, "\nLookupPrivName failed - %s\n", nt_errstr(status));
 870                 return false;
 871         }
 872
 873         return true;
 874 }
 875
 876 static bool test_RemovePrivilegesFromAccount(struct dcerpc_pipe *p,
 877                                              struct torture_context *tctx,
 878                                              struct policy_handle *handle,
 879                                              struct policy_handle *acct_handle,
 880                                              struct lsa_LUID *luid)
 881 {
 882         NTSTATUS status;
 883         struct lsa_RemovePrivilegesFromAccount r;
 884         struct lsa_PrivilegeSet privs;
 885         bool ret = true;
 886
 887         torture_comment(tctx, "\nTesting RemovePrivilegesFromAccount\n");
 888
 889         r.in.handle = acct_handle;
 890         r.in.remove_all = 0;
 891         r.in.privs = &privs;
 892
 893         privs.count = 1;
 894         privs.unknown = 0;
 895         privs.set = talloc_array(tctx, struct lsa_LUIDAttribute, 1);
 896         privs.set[0].luid = *luid;
 897         privs.set[0].attribute = 0;
 898
 899         status = dcerpc_lsa_RemovePrivilegesFromAccount(p, tctx, &r);
 900         if (!NT_STATUS_IS_OK(status)) {
 901
 902                 struct lsa_LookupPrivName r_name;
 903                 struct lsa_StringLarge *name = NULL;
 904
 905                 r_name.in.handle = handle;
 906                 r_name.in.luid = luid;
 907                 r_name.out.name = &name;
 908
 909                 status = dcerpc_lsa_LookupPrivName(p, tctx, &r_name);
 910                 if (!NT_STATUS_IS_OK(status)) {
 911                         torture_comment(tctx, "\nLookupPrivName failed - %s\n", nt_errstr(status));
 912                         return false;
 913                 }
 914                 /* Windows 2008 does not allow this to be removed */
 915                 if (strcmp("SeAuditPrivilege", name->string) == 0) {
 916                         return ret;
 917                 }
 918
 919                 torture_comment(tctx, "RemovePrivilegesFromAccount failed to remove %s - %s\n",
 920                        name->string,
 921                        nt_errstr(status));
 922                 return false;
 923         }
 924
 925         return ret;
 926 }
 927
 928 static bool test_AddPrivilegesToAccount(struct dcerpc_pipe *p,
 929                                         struct torture_context *tctx,
 930                                         struct policy_handle *acct_handle,
 931                                         struct lsa_LUID *luid)
 932 {
 933         NTSTATUS status;
 934         struct lsa_AddPrivilegesToAccount r;
 935         struct lsa_PrivilegeSet privs;
 936         bool ret = true;
 937
 938         torture_comment(tctx, "\nTesting AddPrivilegesToAccount\n");
 939
 940         r.in.handle = acct_handle;
 941         r.in.privs = &privs;
 942
 943         privs.count = 1;
 944         privs.unknown = 0;
 945         privs.set = talloc_array(tctx, struct lsa_LUIDAttribute, 1);
 946         privs.set[0].luid = *luid;
 947         privs.set[0].attribute = 0;
 948
 949         status = dcerpc_lsa_AddPrivilegesToAccount(p, tctx, &r);
 950         if (!NT_STATUS_IS_OK(status)) {
 951                 torture_comment(tctx, "AddPrivilegesToAccount failed - %s\n", nt_errstr(status));
 952                 return false;
 953         }
 954
 955         return ret;
 956 }
 957
 958 static bool test_EnumPrivsAccount(struct dcerpc_pipe *p,
 959                                   struct torture_context *tctx,
 960                                   struct policy_handle *handle,
 961                                   struct policy_handle *acct_handle)
 962 {
 963         NTSTATUS status;
 964         struct lsa_EnumPrivsAccount r;
 965         struct lsa_PrivilegeSet *privs = NULL;
 966         bool ret = true;
 967
 968         torture_comment(tctx, "\nTesting EnumPrivsAccount\n");
 969
 970         r.in.handle = acct_handle;
 971         r.out.privs = &privs;
 972
 973         status = dcerpc_lsa_EnumPrivsAccount(p, tctx, &r);
 974         if (!NT_STATUS_IS_OK(status)) {
 975                 torture_comment(tctx, "EnumPrivsAccount failed - %s\n", nt_errstr(status));
 976                 return false;
 977         }
 978
 979         if (privs && privs->count > 0) {
 980                 int i;
 981                 for (i=0;i<privs->count;i++) {
 982                         test_LookupPrivName(p, tctx, handle,
 983                                             &privs->set[i].luid);
 984                 }
 985
 986                 ret &= test_RemovePrivilegesFromAccount(p, tctx, handle, acct_handle,
 987                                                         &privs->set[0].luid);
 988                 ret &= test_AddPrivilegesToAccount(p, tctx, acct_handle,
 989                                                    &privs->set[0].luid);
 990         }
 991
 992         return ret;
 993 }
 994
 995 static bool test_GetSystemAccessAccount(struct dcerpc_pipe *p,
 996                                         struct torture_context *tctx,
 997                                         struct policy_handle *handle,
 998                                         struct policy_handle *acct_handle)
 999 {
1000         NTSTATUS status;
1001         uint32_t access_mask;
1002         struct lsa_GetSystemAccessAccount r;
1003
1004         torture_comment(tctx, "\nTesting GetSystemAccessAccount\n");
1005
1006         r.in.handle = acct_handle;
1007         r.out.access_mask = &access_mask;
1008
1009         status = dcerpc_lsa_GetSystemAccessAccount(p, tctx, &r);
1010         if (!NT_STATUS_IS_OK(status)) {
1011                 torture_comment(tctx, "GetSystemAccessAccount failed - %s\n", nt_errstr(status));
1012                 return false;
1013         }
1014
1015         if (r.out.access_mask != NULL) {
1016                 torture_comment(tctx, "Rights:");
1017                 if (*(r.out.access_mask) & LSA_POLICY_MODE_INTERACTIVE)
1018                         torture_comment(tctx, " LSA_POLICY_MODE_INTERACTIVE");
1019                 if (*(r.out.access_mask) & LSA_POLICY_MODE_NETWORK)
1020                         torture_comment(tctx, " LSA_POLICY_MODE_NETWORK");
1021                 if (*(r.out.access_mask) & LSA_POLICY_MODE_BATCH)
1022                         torture_comment(tctx, " LSA_POLICY_MODE_BATCH");
1023                 if (*(r.out.access_mask) & LSA_POLICY_MODE_SERVICE)
1024                         torture_comment(tctx, " LSA_POLICY_MODE_SERVICE");
1025                 if (*(r.out.access_mask) & LSA_POLICY_MODE_PROXY)
1026                         torture_comment(tctx, " LSA_POLICY_MODE_PROXY");
1027                 if (*(r.out.access_mask) & LSA_POLICY_MODE_DENY_INTERACTIVE)
1028                         torture_comment(tctx, " LSA_POLICY_MODE_DENY_INTERACTIVE");
1029                 if (*(r.out.access_mask) & LSA_POLICY_MODE_DENY_NETWORK)
1030                         torture_comment(tctx, " LSA_POLICY_MODE_DENY_NETWORK");
1031                 if (*(r.out.access_mask) & LSA_POLICY_MODE_DENY_BATCH)
1032                         torture_comment(tctx, " LSA_POLICY_MODE_DENY_BATCH");
1033                 if (*(r.out.access_mask) & LSA_POLICY_MODE_DENY_SERVICE)
1034                         torture_comment(tctx, " LSA_POLICY_MODE_DENY_SERVICE");
1035                 if (*(r.out.access_mask) & LSA_POLICY_MODE_REMOTE_INTERACTIVE)
1036                         torture_comment(tctx, " LSA_POLICY_MODE_REMOTE_INTERACTIVE");
1037                 if (*(r.out.access_mask) & LSA_POLICY_MODE_DENY_REMOTE_INTERACTIVE)
1038                         torture_comment(tctx, " LSA_POLICY_MODE_DENY_REMOTE_INTERACTIVE");
1039                 if (*(r.out.access_mask) & LSA_POLICY_MODE_ALL)
1040                         torture_comment(tctx, " LSA_POLICY_MODE_ALL");
1041                 if (*(r.out.access_mask) & LSA_POLICY_MODE_ALL_NT4)
1042                         torture_comment(tctx, " LSA_POLICY_MODE_ALL_NT4");
1043                 torture_comment(tctx, "\n");
1044         }
1045
1046         return true;
1047 }
1048
1049 static bool test_Delete(struct dcerpc_pipe *p,
1050                         struct torture_context *tctx,
1051                         struct policy_handle *handle)
1052 {
1053         NTSTATUS status;
1054         struct lsa_Delete r;
1055
1056         torture_comment(tctx, "\nTesting Delete\n");
1057
1058         r.in.handle = handle;
1059         status = dcerpc_lsa_Delete(p, tctx, &r);
1060         if (!NT_STATUS_EQUAL(status, NT_STATUS_NOT_SUPPORTED)) {
1061                 torture_comment(tctx, "Delete should have failed NT_STATUS_NOT_SUPPORTED - %s\n", nt_errstr(status));
1062                 return false;
1063         }
1064
1065         return true;
1066 }
1067
1068 static bool test_DeleteObject(struct dcerpc_pipe *p,
1069                               struct torture_context *tctx,
1070                               struct policy_handle *handle)
1071 {
1072         NTSTATUS status;
1073         struct lsa_DeleteObject r;
1074
1075         torture_comment(tctx, "\nTesting DeleteObject\n");
1076
1077         r.in.handle = handle;
1078         r.out.handle = handle;
1079         status = dcerpc_lsa_DeleteObject(p, tctx, &r);
1080         if (!NT_STATUS_IS_OK(status)) {
1081                 torture_comment(tctx, "DeleteObject failed - %s\n", nt_errstr(status));
1082                 return false;
1083         }
1084
1085         return true;
1086 }
1087
1088
1089 static bool test_CreateAccount(struct dcerpc_pipe *p,
1090                                struct torture_context *tctx,
1091                                struct policy_handle *handle)
1092 {
1093         NTSTATUS status;
1094         struct lsa_CreateAccount r;
1095         struct dom_sid2 *newsid;
1096         struct policy_handle acct_handle;
1097
1098         newsid = dom_sid_parse_talloc(tctx, "S-1-5-12349876-4321-2854");
1099
1100         torture_comment(tctx, "\nTesting CreateAccount\n");
1101
1102         r.in.handle = handle;
1103         r.in.sid = newsid;
1104         r.in.access_mask = SEC_FLAG_MAXIMUM_ALLOWED;
1105         r.out.acct_handle = &acct_handle;
1106
1107         status = dcerpc_lsa_CreateAccount(p, tctx, &r);
1108         if (NT_STATUS_EQUAL(status, NT_STATUS_OBJECT_NAME_COLLISION)) {
1109                 struct lsa_OpenAccount r_o;
1110                 r_o.in.handle = handle;
1111                 r_o.in.sid = newsid;
1112                 r_o.in.access_mask = SEC_FLAG_MAXIMUM_ALLOWED;
1113                 r_o.out.acct_handle = &acct_handle;
1114
1115                 status = dcerpc_lsa_OpenAccount(p, tctx, &r_o);
1116                 if (!NT_STATUS_IS_OK(status)) {
1117                         torture_comment(tctx, "OpenAccount failed - %s\n", nt_errstr(status));
1118                         return false;
1119                 }
1120         } else if (!NT_STATUS_IS_OK(status)) {
1121                 torture_comment(tctx, "CreateAccount failed - %s\n", nt_errstr(status));
1122                 return false;
1123         }
1124
1125         if (!test_Delete(p, tctx, &acct_handle)) {
1126                 return false;
1127         }
1128
1129         if (!test_DeleteObject(p, tctx, &acct_handle)) {
1130                 return false;
1131         }
1132
1133         return true;
1134 }
1135
1136 static bool test_DeleteTrustedDomain(struct dcerpc_pipe *p,
1137                                      struct torture_context *tctx,
1138                                      struct policy_handle *handle,
1139                                      struct lsa_StringLarge name)
1140 {
1141         NTSTATUS status;
1142         struct lsa_OpenTrustedDomainByName r;
1143         struct policy_handle trustdom_handle;
1144
1145         r.in.handle = handle;
1146         r.in.name.string = name.string;
1147         r.in.access_mask = SEC_STD_DELETE;
1148         r.out.trustdom_handle = &trustdom_handle;
1149
1150         status = dcerpc_lsa_OpenTrustedDomainByName(p, tctx, &r);
1151         if (!NT_STATUS_IS_OK(status)) {
1152                 torture_comment(tctx, "OpenTrustedDomainByName failed - %s\n", nt_errstr(status));
1153                 return false;
1154         }
1155
1156         if (!test_Delete(p, tctx, &trustdom_handle)) {
1157                 return false;
1158         }
1159
1160         if (!test_DeleteObject(p, tctx, &trustdom_handle)) {
1161                 return false;
1162         }
1163
1164         return true;
1165 }
1166
1167 static bool test_DeleteTrustedDomainBySid(struct dcerpc_pipe *p,
1168                                           struct torture_context *tctx,
1169                                           struct policy_handle *handle,
1170                                           struct dom_sid *sid)
1171 {
1172         NTSTATUS status;
1173         struct lsa_DeleteTrustedDomain r;
1174
1175         r.in.handle = handle;
1176         r.in.dom_sid = sid;
1177
1178         status = dcerpc_lsa_DeleteTrustedDomain(p, tctx, &r);
1179         if (!NT_STATUS_IS_OK(status)) {
1180                 torture_comment(tctx, "DeleteTrustedDomain failed - %s\n", nt_errstr(status));
1181                 return false;
1182         }
1183
1184         return true;
1185 }
1186
1187
1188 static bool test_CreateSecret(struct dcerpc_pipe *p,
1189                               struct torture_context *tctx,
1190                               struct policy_handle *handle)
1191 {
1192         NTSTATUS status;
1193         struct lsa_CreateSecret r;
1194         struct lsa_OpenSecret r2;
1195         struct lsa_SetSecret r3;
1196         struct lsa_QuerySecret r4;
1197         struct lsa_SetSecret r5;
1198         struct lsa_QuerySecret r6;
1199         struct lsa_SetSecret r7;
1200         struct lsa_QuerySecret r8;
1201         struct policy_handle sec_handle, sec_handle2, sec_handle3;
1202         struct lsa_DeleteObject d_o;
1203         struct lsa_DATA_BUF buf1;
1204         struct lsa_DATA_BUF_PTR bufp1;
1205         struct lsa_DATA_BUF_PTR bufp2;
1206         DATA_BLOB enc_key;
1207         bool ret = true;
1208         DATA_BLOB session_key;
1209         NTTIME old_mtime, new_mtime;
1210         DATA_BLOB blob1, blob2;
1211         const char *secret1 = "abcdef12345699qwerty";
1212         char *secret2;
1213         const char *secret3 = "ABCDEF12345699QWERTY";
1214         char *secret4;
1215         const char *secret5 = "NEW-SAMBA4-SECRET";
1216         char *secret6;
1217         char *secname[2];
1218         int i;
1219         const int LOCAL = 0;
1220         const int GLOBAL = 1;
1221
1222         secname[LOCAL] = talloc_asprintf(tctx, "torturesecret-%u", (uint_t)random());
1223         secname[GLOBAL] = talloc_asprintf(tctx, "G$torturesecret-%u", (uint_t)random());
1224
1225         for (i=0; i< 2; i++) {
1226                 torture_comment(tctx, "\nTesting CreateSecret of %s\n", secname[i]);
1227
1228                 init_lsa_String(&r.in.name, secname[i]);
1229
1230                 r.in.handle = handle;
1231                 r.in.access_mask = SEC_FLAG_MAXIMUM_ALLOWED;
1232                 r.out.sec_handle = &sec_handle;
1233
1234                 status = dcerpc_lsa_CreateSecret(p, tctx, &r);
1235                 if (!NT_STATUS_IS_OK(status)) {
1236                         torture_comment(tctx, "CreateSecret failed - %s\n", nt_errstr(status));
1237                         return false;
1238                 }
1239
1240                 r.in.handle = handle;
1241                 r.in.access_mask = SEC_FLAG_MAXIMUM_ALLOWED;
1242                 r.out.sec_handle = &sec_handle3;
1243
1244                 status = dcerpc_lsa_CreateSecret(p, tctx, &r);
1245                 if (!NT_STATUS_EQUAL(status, NT_STATUS_OBJECT_NAME_COLLISION)) {
1246                         torture_comment(tctx, "CreateSecret should have failed OBJECT_NAME_COLLISION - %s\n", nt_errstr(status));
1247                         return false;
1248                 }
1249
1250                 r2.in.handle = handle;
1251                 r2.in.access_mask = SEC_FLAG_MAXIMUM_ALLOWED;
1252                 r2.in.name = r.in.name;
1253                 r2.out.sec_handle = &sec_handle2;
1254
1255                 torture_comment(tctx, "Testing OpenSecret\n");
1256
1257                 status = dcerpc_lsa_OpenSecret(p, tctx, &r2);
1258                 if (!NT_STATUS_IS_OK(status)) {
1259                         torture_comment(tctx, "OpenSecret failed - %s\n", nt_errstr(status));
1260                         return false;
1261                 }
1262
1263                 status = dcerpc_fetch_session_key(p, &session_key);
1264                 if (!NT_STATUS_IS_OK(status)) {
1265                         torture_comment(tctx, "dcerpc_fetch_session_key failed - %s\n", nt_errstr(status));
1266                         return false;
1267                 }
1268
1269                 enc_key = sess_encrypt_string(secret1, &session_key);
1270
1271                 r3.in.sec_handle = &sec_handle;
1272                 r3.in.new_val = &buf1;
1273                 r3.in.old_val = NULL;
1274                 r3.in.new_val->data = enc_key.data;
1275                 r3.in.new_val->length = enc_key.length;
1276                 r3.in.new_val->size = enc_key.length;
1277
1278                 torture_comment(tctx, "Testing SetSecret\n");
1279
1280                 status = dcerpc_lsa_SetSecret(p, tctx, &r3);
1281                 if (!NT_STATUS_IS_OK(status)) {
1282                         torture_comment(tctx, "SetSecret failed - %s\n", nt_errstr(status));
1283                         return false;
1284                 }
1285
1286                 r3.in.sec_handle = &sec_handle;
1287                 r3.in.new_val = &buf1;
1288                 r3.in.old_val = NULL;
1289                 r3.in.new_val->data = enc_key.data;
1290                 r3.in.new_val->length = enc_key.length;
1291                 r3.in.new_val->size = enc_key.length;
1292
1293                 /* break the encrypted data */
1294                 enc_key.data[0]++;
1295
1296                 torture_comment(tctx, "Testing SetSecret with broken key\n");
1297
1298                 status = dcerpc_lsa_SetSecret(p, tctx, &r3);
1299                 if (!NT_STATUS_EQUAL(status, NT_STATUS_UNKNOWN_REVISION)) {
1300                         torture_comment(tctx, "SetSecret should have failed UNKNOWN_REVISION - %s\n", nt_errstr(status));
1301                         ret = false;
1302                 }
1303
1304                 data_blob_free(&enc_key);
1305
1306                 ZERO_STRUCT(new_mtime);
1307                 ZERO_STRUCT(old_mtime);
1308
1309                 /* fetch the secret back again */
1310                 r4.in.sec_handle = &sec_handle;
1311                 r4.in.new_val = &bufp1;
1312                 r4.in.new_mtime = &new_mtime;
1313                 r4.in.old_val = NULL;
1314                 r4.in.old_mtime = NULL;
1315
1316                 bufp1.buf = NULL;
1317
1318                 torture_comment(tctx, "Testing QuerySecret\n");
1319                 status = dcerpc_lsa_QuerySecret(p, tctx, &r4);
1320                 if (!NT_STATUS_IS_OK(status)) {
1321                         torture_comment(tctx, "QuerySecret failed - %s\n", nt_errstr(status));
1322                         ret = false;
1323                 } else {
1324                         if (r4.out.new_val == NULL || r4.out.new_val->buf == NULL) {
1325                                 torture_comment(tctx, "No secret buffer returned\n");
1326                                 ret = false;
1327                         } else {
1328                                 blob1.data = r4.out.new_val->buf->data;
1329                                 blob1.length = r4.out.new_val->buf->size;
1330
1331                                 blob2 = data_blob_talloc(tctx, NULL, blob1.length);
1332
1333                                 secret2 = sess_decrypt_string(tctx,
1334                                                               &blob1, &session_key);
1335
1336                                 if (strcmp(secret1, secret2) != 0) {
1337                                         torture_comment(tctx, "Returned secret (r4) '%s' doesn't match '%s'\n",
1338                                                secret2, secret1);
1339                                         ret = false;
1340                                 }
1341                         }
1342                 }
1343
1344                 enc_key = sess_encrypt_string(secret3, &session_key);
1345
1346                 r5.in.sec_handle = &sec_handle;
1347                 r5.in.new_val = &buf1;
1348                 r5.in.old_val = NULL;
1349                 r5.in.new_val->data = enc_key.data;
1350                 r5.in.new_val->length = enc_key.length;
1351                 r5.in.new_val->size = enc_key.length;
1352
1353
1354                 msleep(200);
1355                 torture_comment(tctx, "Testing SetSecret (existing value should move to old)\n");
1356
1357                 status = dcerpc_lsa_SetSecret(p, tctx, &r5);
1358                 if (!NT_STATUS_IS_OK(status)) {
1359                         torture_comment(tctx, "SetSecret failed - %s\n", nt_errstr(status));
1360                         ret = false;
1361                 }
1362
1363                 data_blob_free(&enc_key);
1364
1365                 ZERO_STRUCT(new_mtime);
1366                 ZERO_STRUCT(old_mtime);
1367
1368                 /* fetch the secret back again */
1369                 r6.in.sec_handle = &sec_handle;
1370                 r6.in.new_val = &bufp1;
1371                 r6.in.new_mtime = &new_mtime;
1372                 r6.in.old_val = &bufp2;
1373                 r6.in.old_mtime = &old_mtime;
1374
1375                 bufp1.buf = NULL;
1376                 bufp2.buf = NULL;
1377
1378                 status = dcerpc_lsa_QuerySecret(p, tctx, &r6);
1379                 if (!NT_STATUS_IS_OK(status)) {
1380                         torture_comment(tctx, "QuerySecret failed - %s\n", nt_errstr(status));
1381                         ret = false;
1382                         secret4 = NULL;
1383                 } else {
1384
1385                         if (r6.out.new_val->buf == NULL || r6.out.old_val->buf == NULL
1386                                 || r6.out.new_mtime == NULL || r6.out.old_mtime == NULL) {
1387                                 torture_comment(tctx, "Both secret buffers and both times not returned\n");
1388                                 ret = false;
1389                                 secret4 = NULL;
1390                         } else {
1391                                 blob1.data = r6.out.new_val->buf->data;
1392                                 blob1.length = r6.out.new_val->buf->size;
1393
1394                                 blob2 = data_blob_talloc(tctx, NULL, blob1.length);
1395
1396                                 secret4 = sess_decrypt_string(tctx,
1397                                                               &blob1, &session_key);
1398
1399                                 if (strcmp(secret3, secret4) != 0) {
1400                                         torture_comment(tctx, "Returned NEW secret %s doesn't match %s\n", secret4, secret3);
1401                                         ret = false;
1402                                 }
1403
1404                                 blob1.data = r6.out.old_val->buf->data;
1405                                 blob1.length = r6.out.old_val->buf->length;
1406
1407                                 blob2 = data_blob_talloc(tctx, NULL, blob1.length);
1408
1409                                 secret2 = sess_decrypt_string(tctx,
1410                                                               &blob1, &session_key);
1411
1412                                 if (strcmp(secret1, secret2) != 0) {
1413                                         torture_comment(tctx, "Returned OLD secret %s doesn't match %s\n", secret2, secret1);
1414                                         ret = false;
1415                                 }
1416
1417                                 if (*r6.out.new_mtime == *r6.out.old_mtime) {
1418                                         torture_comment(tctx, "Returned secret (r6-%d) %s must not have same mtime for both secrets: %s != %s\n",
1419                                                i,
1420                                                secname[i],
1421                                                nt_time_string(tctx, *r6.out.old_mtime),
1422                                                nt_time_string(tctx, *r6.out.new_mtime));
1423                                         ret = false;
1424                                 }
1425                         }
1426                 }
1427
1428                 enc_key = sess_encrypt_string(secret5, &session_key);
1429
1430                 r7.in.sec_handle = &sec_handle;
1431                 r7.in.old_val = &buf1;
1432                 r7.in.old_val->data = enc_key.data;
1433                 r7.in.old_val->length = enc_key.length;
1434                 r7.in.old_val->size = enc_key.length;
1435                 r7.in.new_val = NULL;
1436
1437                 torture_comment(tctx, "Testing SetSecret of old Secret only\n");
1438
1439                 status = dcerpc_lsa_SetSecret(p, tctx, &r7);
1440                 if (!NT_STATUS_IS_OK(status)) {
1441                         torture_comment(tctx, "SetSecret failed - %s\n", nt_errstr(status));
1442                         ret = false;
1443                 }
1444
1445                 data_blob_free(&enc_key);
1446
1447                 /* fetch the secret back again */
1448                 r8.in.sec_handle = &sec_handle;
1449                 r8.in.new_val = &bufp1;
1450                 r8.in.new_mtime = &new_mtime;
1451                 r8.in.old_val = &bufp2;
1452                 r8.in.old_mtime = &old_mtime;
1453
1454                 bufp1.buf = NULL;
1455                 bufp2.buf = NULL;
1456
1457                 status = dcerpc_lsa_QuerySecret(p, tctx, &r8);
1458                 if (!NT_STATUS_IS_OK(status)) {
1459                         torture_comment(tctx, "QuerySecret failed - %s\n", nt_errstr(status));
1460                         ret = false;
1461                 } else {
1462                         if (!r8.out.new_val || !r8.out.old_val) {
1463                                 torture_comment(tctx, "in/out pointers not returned, despite being set on in for QuerySecret\n");
1464                                 ret = false;
1465                         } else if (r8.out.new_val->buf != NULL) {
1466                                 torture_comment(tctx, "NEW secret buffer must not be returned after OLD set\n");
1467                                 ret = false;
1468                         } else if (r8.out.old_val->buf == NULL) {
1469                                 torture_comment(tctx, "OLD secret buffer was not returned after OLD set\n");
1470                                 ret = false;
1471                         } else if (r8.out.new_mtime == NULL || r8.out.old_mtime == NULL) {
1472                                 torture_comment(tctx, "Both times not returned after OLD set\n");
1473                                 ret = false;
1474                         } else {
1475                                 blob1.data = r8.out.old_val->buf->data;
1476                                 blob1.length = r8.out.old_val->buf->size;
1477
1478                                 blob2 = data_blob_talloc(tctx, NULL, blob1.length);
1479
1480                                 secret6 = sess_decrypt_string(tctx,
1481                                                               &blob1, &session_key);
1482
1483                                 if (strcmp(secret5, secret6) != 0) {
1484                                         torture_comment(tctx, "Returned OLD secret %s doesn't match %s\n", secret5, secret6);
1485                                         ret = false;
1486                                 }
1487
1488                                 if (*r8.out.new_mtime != *r8.out.old_mtime) {
1489                                         torture_comment(tctx, "Returned secret (r8) %s did not had same mtime for both secrets: %s != %s\n",
1490                                                secname[i],
1491                                                nt_time_string(tctx, *r8.out.old_mtime),
1492                                                nt_time_string(tctx, *r8.out.new_mtime));
1493                                         ret = false;
1494                                 }
1495                         }
1496                 }
1497
1498                 if (!test_Delete(p, tctx, &sec_handle)) {
1499                         ret = false;
1500                 }
1501
1502                 if (!test_DeleteObject(p, tctx, &sec_handle)) {
1503                         return false;
1504                 }
1505
1506                 d_o.in.handle = &sec_handle2;
1507                 d_o.out.handle = &sec_handle2;
1508                 status = dcerpc_lsa_DeleteObject(p, tctx, &d_o);
1509                 if (!NT_STATUS_EQUAL(status, NT_STATUS_INVALID_HANDLE)) {
1510                         torture_comment(tctx, "Second delete expected INVALID_HANDLE - %s\n", nt_errstr(status));
1511                         ret = false;
1512                 } else {
1513
1514                         torture_comment(tctx, "Testing OpenSecret of just-deleted secret\n");
1515
1516                         status = dcerpc_lsa_OpenSecret(p, tctx, &r2);
1517                         if (!NT_STATUS_EQUAL(status, NT_STATUS_OBJECT_NAME_NOT_FOUND)) {
1518                                 torture_comment(tctx, "OpenSecret expected OBJECT_NAME_NOT_FOUND - %s\n", nt_errstr(status));
1519                                 ret = false;
1520                         }
1521                 }
1522
1523         }
1524
1525         return ret;
1526 }
1527
1528
1529 static bool test_EnumAccountRights(struct dcerpc_pipe *p,
1530                                    struct torture_context *tctx,
1531                                    struct policy_handle *acct_handle,
1532                                    struct dom_sid *sid)
1533 {
1534         NTSTATUS status;
1535         struct lsa_EnumAccountRights r;
1536         struct lsa_RightSet rights;
1537
1538         torture_comment(tctx, "\nTesting EnumAccountRights\n");
1539
1540         r.in.handle = acct_handle;
1541         r.in.sid = sid;
1542         r.out.rights = &rights;
1543
1544         status = dcerpc_lsa_EnumAccountRights(p, tctx, &r);
1545         if (!NT_STATUS_IS_OK(status)) {
1546                 torture_comment(tctx, "EnumAccountRights of %s failed - %s\n",
1547                        dom_sid_string(tctx, sid), nt_errstr(status));
1548                 return false;
1549         }
1550
1551         return true;
1552 }
1553
1554
1555 static bool test_QuerySecurity(struct dcerpc_pipe *p,
1556                              struct torture_context *tctx,
1557                              struct policy_handle *handle,
1558                              struct policy_handle *acct_handle)
1559 {
1560         NTSTATUS status;
1561         struct lsa_QuerySecurity r;
1562         struct sec_desc_buf *sdbuf = NULL;
1563
1564         if (torture_setting_bool(tctx, "samba4", false)) {
1565                 torture_comment(tctx, "\nskipping QuerySecurity test against Samba4\n");
1566                 return true;
1567         }
1568
1569         torture_comment(tctx, "\nTesting QuerySecurity\n");
1570
1571         r.in.handle = acct_handle;
1572         r.in.sec_info = SECINFO_OWNER |
1573                         SECINFO_GROUP |
1574                         SECINFO_DACL;
1575         r.out.sdbuf = &sdbuf;
1576
1577         status = dcerpc_lsa_QuerySecurity(p, tctx, &r);
1578         if (!NT_STATUS_IS_OK(status)) {
1579                 torture_comment(tctx, "QuerySecurity failed - %s\n", nt_errstr(status));
1580                 return false;
1581         }
1582
1583         return true;
1584 }
1585
1586 static bool test_OpenAccount(struct dcerpc_pipe *p,
1587                              struct torture_context *tctx,
1588                              struct policy_handle *handle,
1589                              struct dom_sid *sid)
1590 {
1591         NTSTATUS status;
1592         struct lsa_OpenAccount r;
1593         struct policy_handle acct_handle;
1594
1595         torture_comment(tctx, "\nTesting OpenAccount\n");
1596
1597         r.in.handle = handle;
1598         r.in.sid = sid;
1599         r.in.access_mask = SEC_FLAG_MAXIMUM_ALLOWED;
1600         r.out.acct_handle = &acct_handle;
1601
1602         status = dcerpc_lsa_OpenAccount(p, tctx, &r);
1603         if (!NT_STATUS_IS_OK(status)) {
1604                 torture_comment(tctx, "OpenAccount failed - %s\n", nt_errstr(status));
1605                 return false;
1606         }
1607
1608         if (!test_EnumPrivsAccount(p, tctx, handle, &acct_handle)) {
1609                 return false;
1610         }
1611
1612         if (!test_GetSystemAccessAccount(p, tctx, handle, &acct_handle)) {
1613                 return false;
1614         }
1615
1616         if (!test_QuerySecurity(p, tctx, handle, &acct_handle)) {
1617                 return false;
1618         }
1619
1620         return true;
1621 }
1622
1623 static bool test_EnumAccounts(struct dcerpc_pipe *p,
1624                               struct torture_context *tctx,
1625                               struct policy_handle *handle)
1626 {
1627         NTSTATUS status;
1628         struct lsa_EnumAccounts r;
1629         struct lsa_SidArray sids1, sids2;
1630         uint32_t resume_handle = 0;
1631         int i;
1632         bool ret = true;
1633
1634         torture_comment(tctx, "\nTesting EnumAccounts\n");
1635
1636         r.in.handle = handle;
1637         r.in.resume_handle = &resume_handle;
1638         r.in.num_entries = 100;
1639         r.out.resume_handle = &resume_handle;
1640         r.out.sids = &sids1;
1641
1642         resume_handle = 0;
1643         while (true) {
1644                 status = dcerpc_lsa_EnumAccounts(p, tctx, &r);
1645                 if (NT_STATUS_EQUAL(status, NT_STATUS_NO_MORE_ENTRIES)) {
1646                         break;
1647                 }
1648                 if (!NT_STATUS_IS_OK(status)) {
1649                         torture_comment(tctx, "EnumAccounts failed - %s\n", nt_errstr(status));
1650                         return false;
1651                 }
1652
1653                 if (!test_LookupSids(p, tctx, handle, &sids1)) {
1654                         return false;
1655                 }
1656
1657                 if (!test_LookupSids2(p, tctx, handle, &sids1)) {
1658                         return false;
1659                 }
1660
1661                 /* Can't test lookupSids3 here, as clearly we must not
1662                  * be on schannel, or we would not be able to do the
1663                  * rest */
1664
1665                 torture_comment(tctx, "Testing all accounts\n");
1666                 for (i=0;i<sids1.num_sids;i++) {
1667                         ret &= test_OpenAccount(p, tctx, handle, sids1.sids[i].sid);
1668                         ret &= test_EnumAccountRights(p, tctx, handle, sids1.sids[i].sid);
1669                 }
1670                 torture_comment(tctx, "\n");
1671         }
1672
1673         if (sids1.num_sids < 3) {
1674                 return ret;
1675         }
1676
1677         torture_comment(tctx, "Trying EnumAccounts partial listing (asking for 1 at 2)\n");
1678         resume_handle = 2;
1679         r.in.num_entries = 1;
1680         r.out.sids = &sids2;
1681
1682         status = dcerpc_lsa_EnumAccounts(p, tctx, &r);
1683         if (!NT_STATUS_IS_OK(status)) {
1684                 torture_comment(tctx, "EnumAccounts failed - %s\n", nt_errstr(status));
1685                 return false;
1686         }
1687
1688         if (sids2.num_sids != 1) {
1689                 torture_comment(tctx, "Returned wrong number of entries (%d)\n", sids2.num_sids);
1690                 return false;
1691         }
1692
1693         return true;
1694 }
1695
1696 static bool test_LookupPrivDisplayName(struct dcerpc_pipe *p,
1697                                        struct torture_context *tctx,
1698                                        struct policy_handle *handle,
1699                                        struct lsa_String *priv_name)
1700 {
1701         struct lsa_LookupPrivDisplayName r;
1702         NTSTATUS status;
1703         /* produce a reasonable range of language output without screwing up
1704            terminals */
1705         uint16_t language_id = (random() % 4) + 0x409;
1706         uint16_t returned_language_id = 0;
1707         struct lsa_StringLarge *disp_name = NULL;
1708
1709         torture_comment(tctx, "\nTesting LookupPrivDisplayName(%s)\n", priv_name->string);
1710
1711         r.in.handle = handle;
1712         r.in.name = priv_name;
1713         r.in.language_id = language_id;
1714         r.in.language_id_sys = 0;
1715         r.out.returned_language_id = &returned_language_id;
1716         r.out.disp_name = &disp_name;
1717
1718         status = dcerpc_lsa_LookupPrivDisplayName(p, tctx, &r);
1719         if (!NT_STATUS_IS_OK(status)) {
1720                 torture_comment(tctx, "LookupPrivDisplayName failed - %s\n", nt_errstr(status));
1721                 return false;
1722         }
1723         torture_comment(tctx, "%s -> \"%s\"  (language 0x%x/0x%x)\n",
1724                priv_name->string, disp_name->string,
1725                r.in.language_id, *r.out.returned_language_id);
1726
1727         return true;
1728 }
1729
1730 static bool test_EnumAccountsWithUserRight(struct dcerpc_pipe *p,
1731                                            struct torture_context *tctx,
1732                                            struct policy_handle *handle,
1733                                            struct lsa_String *priv_name)
1734 {
1735         struct lsa_EnumAccountsWithUserRight r;
1736         struct lsa_SidArray sids;
1737         NTSTATUS status;
1738
1739         ZERO_STRUCT(sids);
1740
1741         torture_comment(tctx, "\nTesting EnumAccountsWithUserRight(%s)\n", priv_name->string);
1742
1743         r.in.handle = handle;
1744         r.in.name = priv_name;
1745         r.out.sids = &sids;
1746
1747         status = dcerpc_lsa_EnumAccountsWithUserRight(p, tctx, &r);
1748
1749         /* NT_STATUS_NO_MORE_ENTRIES means noone has this privilege */
1750         if (NT_STATUS_EQUAL(status, NT_STATUS_NO_MORE_ENTRIES)) {
1751                 return true;
1752         }
1753
1754         if (!NT_STATUS_IS_OK(status)) {
1755                 torture_comment(tctx, "EnumAccountsWithUserRight failed - %s\n", nt_errstr(status));
1756                 return false;
1757         }
1758
1759         return true;
1760 }
1761
1762
1763 static bool test_EnumPrivs(struct dcerpc_pipe *p,
1764                            struct torture_context *tctx,
1765                            struct policy_handle *handle)
1766 {
1767         NTSTATUS status;
1768         struct lsa_EnumPrivs r;
1769         struct lsa_PrivArray privs1;
1770         uint32_t resume_handle = 0;
1771         int i;
1772         bool ret = true;
1773
1774         torture_comment(tctx, "\nTesting EnumPrivs\n");
1775
1776         r.in.handle = handle;
1777         r.in.resume_handle = &resume_handle;
1778         r.in.max_count = 100;
1779         r.out.resume_handle = &resume_handle;
1780         r.out.privs = &privs1;
1781
1782         resume_handle = 0;
1783         status = dcerpc_lsa_EnumPrivs(p, tctx, &r);
1784         if (!NT_STATUS_IS_OK(status)) {
1785                 torture_comment(tctx, "EnumPrivs failed - %s\n", nt_errstr(status));
1786                 return false;
1787         }
1788
1789         for (i = 0; i< privs1.count; i++) {
1790                 test_LookupPrivDisplayName(p, tctx, handle, (struct lsa_String *)&privs1.privs[i].name);
1791                 test_LookupPrivValue(p, tctx, handle, (struct lsa_String *)&privs1.privs[i].name);
1792                 if (!test_EnumAccountsWithUserRight(p, tctx, handle, (struct lsa_String *)&privs1.privs[i].name)) {
1793                         ret = false;
1794                 }
1795         }
1796
1797         return ret;
1798 }
1799
1800 static bool test_QueryForestTrustInformation(struct dcerpc_pipe *p,
1801                                              struct torture_context *tctx,
1802                                              struct policy_handle *handle,
1803                                              const char *trusted_domain_name)
1804 {
1805         bool ret = true;
1806         struct lsa_lsaRQueryForestTrustInformation r;
1807         NTSTATUS status;
1808         struct lsa_String string;
1809         struct lsa_ForestTrustInformation info, *info_ptr;
1810
1811         torture_comment(tctx, "\nTesting lsaRQueryForestTrustInformation\n");
1812
1813         if (torture_setting_bool(tctx, "samba4", false)) {
1814                 torture_comment(tctx, "skipping QueryForestTrustInformation against Samba4\n");
1815                 return true;
1816         }
1817
1818         ZERO_STRUCT(string);
1819
1820         if (trusted_domain_name) {
1821                 init_lsa_String(&string, trusted_domain_name);
1822         }
1823
1824         info_ptr = &info;
1825
1826         r.in.handle = handle;
1827         r.in.trusted_domain_name = &string;
1828         r.in.unknown = 0;
1829         r.out.forest_trust_info = &info_ptr;
1830
1831         status = dcerpc_lsa_lsaRQueryForestTrustInformation(p, tctx, &r);
1832
1833         if (!NT_STATUS_IS_OK(status)) {
1834                 torture_comment(tctx, "lsaRQueryForestTrustInformation of %s failed - %s\n", trusted_domain_name, nt_errstr(status));
1835                 ret = false;
1836         }
1837
1838         return ret;
1839 }
1840
1841 static bool test_query_each_TrustDomEx(struct dcerpc_pipe *p,
1842                                        struct torture_context *tctx,
1843                                        struct policy_handle *handle,
1844                                        struct lsa_DomainListEx *domains)
1845 {
1846         int i;
1847         bool ret = true;
1848
1849         for (i=0; i< domains->count; i++) {
1850
1851                 if (domains->domains[i].trust_attributes & NETR_TRUST_ATTRIBUTE_FOREST_TRANSITIVE) {
1852                         ret &= test_QueryForestTrustInformation(p, tctx, handle,
1853                                                                 domains->domains[i].domain_name.string);
1854                 }
1855         }
1856
1857         return ret;
1858 }
1859
1860 static bool test_query_each_TrustDom(struct dcerpc_pipe *p,
1861                                      struct torture_context *tctx,
1862                                      struct policy_handle *handle,
1863                                      struct lsa_DomainList *domains)
1864 {
1865         NTSTATUS status;
1866         int i,j;
1867         bool ret = true;
1868
1869         torture_comment(tctx, "\nTesting OpenTrustedDomain, OpenTrustedDomainByName and QueryInfoTrustedDomain\n");
1870         for (i=0; i< domains->count; i++) {
1871                 struct lsa_OpenTrustedDomain trust;
1872                 struct lsa_OpenTrustedDomainByName trust_by_name;
1873                 struct policy_handle trustdom_handle;
1874                 struct policy_handle handle2;
1875                 struct lsa_Close c;
1876                 struct lsa_CloseTrustedDomainEx c_trust;
1877                 int levels [] = {1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13};
1878                 int ok[]      = {1, 0, 1, 0, 0, 1, 0, 1, 0,  0,  0,  1, 1};
1879
1880                 if (domains->domains[i].sid) {
1881                         trust.in.handle = handle;
1882                         trust.in.sid = domains->domains[i].sid;
1883                         trust.in.access_mask = SEC_FLAG_MAXIMUM_ALLOWED;
1884                         trust.out.trustdom_handle = &trustdom_handle;
1885
1886                         status = dcerpc_lsa_OpenTrustedDomain(p, tctx, &trust);
1887
1888                         if (!NT_STATUS_IS_OK(status)) {
1889                                 torture_comment(tctx, "OpenTrustedDomain failed - %s\n", nt_errstr(status));
1890                                 return false;
1891                         }
1892
1893                         c.in.handle = &trustdom_handle;
1894                         c.out.handle = &handle2;
1895
1896                         c_trust.in.handle = &trustdom_handle;
1897                         c_trust.out.handle = &handle2;
1898
1899                         for (j=0; j < ARRAY_SIZE(levels); j++) {
1900                                 struct lsa_QueryTrustedDomainInfo q;
1901                                 union lsa_TrustedDomainInfo *info = NULL;
1902                                 q.in.trustdom_handle = &trustdom_handle;
1903                                 q.in.level = levels[j];
1904                                 q.out.info = &info;
1905                                 status = dcerpc_lsa_QueryTrustedDomainInfo(p, tctx, &q);
1906                                 if (!NT_STATUS_IS_OK(status) && ok[j]) {
1907                                         torture_comment(tctx, "QueryTrustedDomainInfo level %d failed - %s\n",
1908                                                levels[j], nt_errstr(status));
1909                                         ret = false;
1910                                 } else if (NT_STATUS_IS_OK(status) && !ok[j]) {
1911                                         torture_comment(tctx, "QueryTrustedDomainInfo level %d unexpectedly succeeded - %s\n",
1912                                                levels[j], nt_errstr(status));
1913                                         ret = false;
1914                                 }
1915                         }
1916
1917                         status = dcerpc_lsa_CloseTrustedDomainEx(p, tctx, &c_trust);
1918                         if (!NT_STATUS_EQUAL(status, NT_STATUS_NOT_IMPLEMENTED)) {
1919                                 torture_comment(tctx, "Expected CloseTrustedDomainEx to return NT_STATUS_NOT_IMPLEMENTED, instead - %s\n", nt_errstr(status));
1920                                 return false;
1921                         }
1922
1923                         c.in.handle = &trustdom_handle;
1924                         c.out.handle = &handle2;
1925
1926                         status = dcerpc_lsa_Close(p, tctx, &c);
1927                         if (!NT_STATUS_IS_OK(status)) {
1928                                 torture_comment(tctx, "Close of trusted domain failed - %s\n", nt_errstr(status));
1929                                 return false;
1930                         }
1931
1932                         for (j=0; j < ARRAY_SIZE(levels); j++) {
1933                                 struct lsa_QueryTrustedDomainInfoBySid q;
1934                                 union lsa_TrustedDomainInfo *info = NULL;
1935
1936                                 if (!domains->domains[i].sid) {
1937                                         continue;
1938                                 }
1939
1940                                 q.in.handle  = handle;
1941                                 q.in.dom_sid = domains->domains[i].sid;
1942                                 q.in.level   = levels[j];
1943                                 q.out.info   = &info;
1944
1945                                 status = dcerpc_lsa_QueryTrustedDomainInfoBySid(p, tctx, &q);
1946                                 if (!NT_STATUS_IS_OK(status) && ok[j]) {
1947                                         torture_comment(tctx, "QueryTrustedDomainInfoBySid level %d failed - %s\n",
1948                                                levels[j], nt_errstr(status));
1949                                         ret = false;
1950                                 } else if (NT_STATUS_IS_OK(status) && !ok[j]) {
1951                                         torture_comment(tctx, "QueryTrustedDomainInfoBySid level %d unexpectedly succeeded - %s\n",
1952                                                levels[j], nt_errstr(status));
1953                                         ret = false;
1954                                 }
1955                         }
1956                 }
1957
1958                 trust_by_name.in.handle = handle;
1959                 trust_by_name.in.name.string = domains->domains[i].name.string;
1960                 trust_by_name.in.access_mask = SEC_FLAG_MAXIMUM_ALLOWED;
1961                 trust_by_name.out.trustdom_handle = &trustdom_handle;
1962
1963                 status = dcerpc_lsa_OpenTrustedDomainByName(p, tctx, &trust_by_name);
1964
1965                 if (!NT_STATUS_IS_OK(status)) {
1966                         torture_comment(tctx, "OpenTrustedDomainByName failed - %s\n", nt_errstr(status));
1967                         return false;
1968                 }
1969
1970                 for (j=0; j < ARRAY_SIZE(levels); j++) {
1971                         struct lsa_QueryTrustedDomainInfo q;
1972                         union lsa_TrustedDomainInfo *info = NULL;
1973                         q.in.trustdom_handle = &trustdom_handle;
1974                         q.in.level = levels[j];
1975                         q.out.info = &info;
1976                         status = dcerpc_lsa_QueryTrustedDomainInfo(p, tctx, &q);
1977                         if (!NT_STATUS_IS_OK(status) && ok[j]) {
1978                                 torture_comment(tctx, "QueryTrustedDomainInfo level %d failed - %s\n",
1979                                        levels[j], nt_errstr(status));
1980                                 ret = false;
1981                         } else if (NT_STATUS_IS_OK(status) && !ok[j]) {
1982                                 torture_comment(tctx, "QueryTrustedDomainInfo level %d unexpectedly succeeded - %s\n",
1983                                        levels[j], nt_errstr(status));
1984                                 ret = false;
1985                         }
1986                 }
1987
1988                 c.in.handle = &trustdom_handle;
1989                 c.out.handle = &handle2;
1990
1991                 status = dcerpc_lsa_Close(p, tctx, &c);
1992                 if (!NT_STATUS_IS_OK(status)) {
1993                         torture_comment(tctx, "Close of trusted domain failed - %s\n", nt_errstr(status));
1994                         return false;
1995                 }
1996
1997                 for (j=0; j < ARRAY_SIZE(levels); j++) {
1998                         struct lsa_QueryTrustedDomainInfoByName q;
1999                         union lsa_TrustedDomainInfo *info = NULL;
2000                         struct lsa_String name;
2001
2002                         name.string = domains->domains[i].name.string;
2003
2004                         q.in.handle         = handle;
2005                         q.in.trusted_domain = &name;
2006                         q.in.level          = levels[j];
2007                         q.out.info          = &info;
2008                         status = dcerpc_lsa_QueryTrustedDomainInfoByName(p, tctx, &q);
2009                         if (!NT_STATUS_IS_OK(status) && ok[j]) {
2010                                 torture_comment(tctx, "QueryTrustedDomainInfoByName level %d failed - %s\n",
2011                                        levels[j], nt_errstr(status));
2012                                 ret = false;
2013                         } else if (NT_STATUS_IS_OK(status) && !ok[j]) {
2014                                 torture_comment(tctx, "QueryTrustedDomainInfoByName level %d unexpectedly succeeded - %s\n",
2015                                        levels[j], nt_errstr(status));
2016                                 ret = false;
2017                         }
2018                 }
2019         }
2020         return ret;
2021 }
2022
2023 static bool test_EnumTrustDom(struct dcerpc_pipe *p,
2024                               struct torture_context *tctx,
2025                               struct policy_handle *handle)
2026 {
2027         struct lsa_EnumTrustDom r;
2028         NTSTATUS enum_status;
2029         uint32_t in_resume_handle = 0;
2030         uint32_t out_resume_handle;
2031         struct lsa_DomainList domains;
2032         bool ret = true;
2033
2034         torture_comment(tctx, "\nTesting EnumTrustDom\n");
2035
2036         r.in.handle = handle;
2037         r.in.resume_handle = &in_resume_handle;
2038         r.in.max_size = 0;
2039         r.out.domains = &domains;
2040         r.out.resume_handle = &out_resume_handle;
2041
2042         enum_status = dcerpc_lsa_EnumTrustDom(p, tctx, &r);
2043
2044         /* according to MS-LSAD 3.1.4.7.8 output resume handle MUST
2045          * always be larger than the previous input resume handle, in
2046          * particular when hitting the last query it is vital to set the
2047          * resume handle correctly to avoid infinite client loops, as
2048          * seen e.g.  with Windows XP SP3 when resume handle is 0 and
2049          * status is NT_STATUS_OK - gd */
2050
2051         if (NT_STATUS_IS_OK(enum_status) ||
2052             NT_STATUS_EQUAL(enum_status, NT_STATUS_NO_MORE_ENTRIES) ||
2053             NT_STATUS_EQUAL(enum_status, STATUS_MORE_ENTRIES))
2054         {
2055                 if (out_resume_handle <= in_resume_handle) {
2056                         torture_comment(tctx, "EnumTrustDom failed - should have returned output resume_handle (0x%08x) larger than input resume handle (0x%08x)\n",
2057                                 out_resume_handle, in_resume_handle);
2058                         return false;
2059                 }
2060         }
2061
2062         if (NT_STATUS_IS_OK(enum_status)) {
2063                 if (domains.count == 0) {
2064                         torture_comment(tctx, "EnumTrustDom failed - should have returned 'NT_STATUS_NO_MORE_ENTRIES' for 0 trusted domains\n");
2065                         return false;
2066                 }
2067         } else if (!(NT_STATUS_EQUAL(enum_status, STATUS_MORE_ENTRIES) || NT_STATUS_EQUAL(enum_status, NT_STATUS_NO_MORE_ENTRIES))) {
2068                 torture_comment(tctx, "EnumTrustDom of zero size failed - %s\n", nt_errstr(enum_status));
2069                 return false;
2070         }
2071
2072         /* Start from the bottom again */
2073         in_resume_handle = 0;
2074
2075         do {
2076                 r.in.handle = handle;
2077                 r.in.resume_handle = &in_resume_handle;
2078                 r.in.max_size = LSA_ENUM_TRUST_DOMAIN_MULTIPLIER * 3;
2079                 r.out.domains = &domains;
2080                 r.out.resume_handle = &out_resume_handle;
2081
2082                 enum_status = dcerpc_lsa_EnumTrustDom(p, tctx, &r);
2083
2084                 /* according to MS-LSAD 3.1.4.7.8 output resume handle MUST
2085                  * always be larger than the previous input resume handle, in
2086                  * particular when hitting the last query it is vital to set the
2087                  * resume handle correctly to avoid infinite client loops, as
2088                  * seen e.g.  with Windows XP SP3 when resume handle is 0 and
2089                  * status is NT_STATUS_OK - gd */
2090
2091                 if (NT_STATUS_IS_OK(enum_status) ||
2092                     NT_STATUS_EQUAL(enum_status, NT_STATUS_NO_MORE_ENTRIES) ||
2093                     NT_STATUS_EQUAL(enum_status, STATUS_MORE_ENTRIES))
2094                 {
2095                         if (out_resume_handle <= in_resume_handle) {
2096                                 torture_comment(tctx, "EnumTrustDom failed - should have returned output resume_handle (0x%08x) larger than input resume handle (0x%08x)\n",
2097                                         out_resume_handle, in_resume_handle);
2098                                 return false;
2099                         }
2100                 }
2101
2102                 /* NO_MORE_ENTRIES is allowed */
2103                 if (NT_STATUS_EQUAL(enum_status, NT_STATUS_NO_MORE_ENTRIES)) {
2104                         if (domains.count == 0) {
2105                                 return true;
2106                         }
2107                         torture_comment(tctx, "EnumTrustDom failed - should have returned 0 trusted domains with 'NT_STATUS_NO_MORE_ENTRIES'\n");
2108                         return false;
2109                 } else if (NT_STATUS_EQUAL(enum_status, STATUS_MORE_ENTRIES)) {
2110                         /* Windows 2003 gets this off by one on the first run */
2111                         if (r.out.domains->count < 3 || r.out.domains->count > 4) {
2112                                 torture_comment(tctx, "EnumTrustDom didn't fill the buffer we "
2113                                        "asked it to (got %d, expected %d / %d == %d entries)\n",
2114                                        r.out.domains->count, LSA_ENUM_TRUST_DOMAIN_MULTIPLIER * 3,
2115                                        LSA_ENUM_TRUST_DOMAIN_MULTIPLIER, r.in.max_size);
2116                                 ret = false;
2117                         }
2118                 } else if (!NT_STATUS_IS_OK(enum_status)) {
2119                         torture_comment(tctx, "EnumTrustDom failed - %s\n", nt_errstr(enum_status));
2120                         return false;
2121                 }
2122
2123                 if (domains.count == 0) {
2124                         torture_comment(tctx, "EnumTrustDom failed - should have returned 'NT_STATUS_NO_MORE_ENTRIES' for 0 trusted domains\n");
2125                         return false;
2126                 }
2127
2128                 ret &= test_query_each_TrustDom(p, tctx, handle, &domains);
2129
2130                 in_resume_handle = out_resume_handle;
2131
2132         } while ((NT_STATUS_EQUAL(enum_status, STATUS_MORE_ENTRIES)));
2133
2134         return ret;
2135 }
2136
2137 static bool test_EnumTrustDomEx(struct dcerpc_pipe *p,
2138                                 struct torture_context *tctx,
2139                                 struct policy_handle *handle)
2140 {
2141         struct lsa_EnumTrustedDomainsEx r_ex;
2142         NTSTATUS enum_status;
2143         uint32_t resume_handle = 0;
2144         struct lsa_DomainListEx domains_ex;
2145         bool ret = true;
2146
2147         torture_comment(tctx, "\nTesting EnumTrustedDomainsEx\n");
2148
2149         r_ex.in.handle = handle;
2150         r_ex.in.resume_handle = &resume_handle;
2151         r_ex.in.max_size = LSA_ENUM_TRUST_DOMAIN_EX_MULTIPLIER * 3;
2152         r_ex.out.domains = &domains_ex;
2153         r_ex.out.resume_handle = &resume_handle;
2154
2155         enum_status = dcerpc_lsa_EnumTrustedDomainsEx(p, tctx, &r_ex);
2156
2157         if (!(NT_STATUS_EQUAL(enum_status, STATUS_MORE_ENTRIES) || NT_STATUS_EQUAL(enum_status, NT_STATUS_NO_MORE_ENTRIES))) {
2158                 torture_comment(tctx, "EnumTrustedDomainEx of zero size failed - %s\n", nt_errstr(enum_status));
2159                 return false;
2160         }
2161
2162         resume_handle = 0;
2163         do {
2164                 r_ex.in.handle = handle;
2165                 r_ex.in.resume_handle = &resume_handle;
2166                 r_ex.in.max_size = LSA_ENUM_TRUST_DOMAIN_EX_MULTIPLIER * 3;
2167                 r_ex.out.domains = &domains_ex;
2168                 r_ex.out.resume_handle = &resume_handle;
2169
2170                 enum_status = dcerpc_lsa_EnumTrustedDomainsEx(p, tctx, &r_ex);
2171
2172                 /* NO_MORE_ENTRIES is allowed */
2173                 if (NT_STATUS_EQUAL(enum_status, NT_STATUS_NO_MORE_ENTRIES)) {
2174                         if (domains_ex.count == 0) {
2175                                 return true;
2176                         }
2177                         torture_comment(tctx, "EnumTrustDomainsEx failed - should have returned 0 trusted domains with 'NT_STATUS_NO_MORE_ENTRIES'\n");
2178                         return false;
2179                 } else if (NT_STATUS_EQUAL(enum_status, STATUS_MORE_ENTRIES)) {
2180                         /* Windows 2003 gets this off by one on the first run */
2181                         if (r_ex.out.domains->count < 3 || r_ex.out.domains->count > 4) {
2182                                 torture_comment(tctx, "EnumTrustDom didn't fill the buffer we "
2183                                        "asked it to (got %d, expected %d / %d == %d entries)\n",
2184                                        r_ex.out.domains->count,
2185                                        r_ex.in.max_size,
2186                                        LSA_ENUM_TRUST_DOMAIN_EX_MULTIPLIER,
2187                                        r_ex.in.max_size / LSA_ENUM_TRUST_DOMAIN_EX_MULTIPLIER);
2188                         }
2189                 } else if (!NT_STATUS_IS_OK(enum_status)) {
2190                         torture_comment(tctx, "EnumTrustedDomainEx failed - %s\n", nt_errstr(enum_status));
2191                         return false;
2192                 }
2193
2194                 if (domains_ex.count == 0) {
2195                         torture_comment(tctx, "EnumTrustDomainEx failed - should have returned 'NT_STATUS_NO_MORE_ENTRIES' for 0 trusted domains\n");
2196                         return false;
2197                 }
2198
2199                 ret &= test_query_each_TrustDomEx(p, tctx, handle, &domains_ex);
2200
2201         } while ((NT_STATUS_EQUAL(enum_status, STATUS_MORE_ENTRIES)));
2202
2203         return ret;
2204 }
2205
2206
2207 static bool test_CreateTrustedDomain(struct dcerpc_pipe *p,
2208                                      struct torture_context *tctx,
2209                                      struct policy_handle *handle,
2210                                      uint32_t num_trusts)
2211 {
2212         NTSTATUS status;
2213         bool ret = true;
2214         struct lsa_CreateTrustedDomain r;
2215         struct lsa_DomainInfo trustinfo;
2216         struct dom_sid **domsid;
2217         struct policy_handle *trustdom_handle;
2218         struct lsa_QueryTrustedDomainInfo q;
2219         union lsa_TrustedDomainInfo *info = NULL;
2220         int i;
2221
2222         torture_comment(tctx, "\nTesting CreateTrustedDomain for %d domains\n", num_trusts);
2223
2224         if (!test_EnumTrustDom(p, tctx, handle)) {
2225                 ret = false;
2226         }
2227
2228         if (!test_EnumTrustDomEx(p, tctx, handle)) {
2229                 ret = false;
2230         }
2231
2232         domsid = talloc_array(tctx, struct dom_sid *, num_trusts);
2233         trustdom_handle = talloc_array(tctx, struct policy_handle, num_trusts);
2234
2235         for (i=0; i< num_trusts; i++) {
2236                 char *trust_name = talloc_asprintf(tctx, "torturedom%02d", i);
2237                 char *trust_sid = talloc_asprintf(tctx, "S-1-5-21-97398-379795-100%02d", i);
2238
2239                 domsid[i] = dom_sid_parse_talloc(tctx, trust_sid);
2240
2241                 trustinfo.sid = domsid[i];
2242                 init_lsa_String((struct lsa_String *)&trustinfo.name, trust_name);
2243
2244                 r.in.policy_handle = handle;
2245                 r.in.info = &trustinfo;
2246                 r.in.access_mask = SEC_FLAG_MAXIMUM_ALLOWED;
2247                 r.out.trustdom_handle = &trustdom_handle[i];
2248
2249                 status = dcerpc_lsa_CreateTrustedDomain(p, tctx, &r);
2250                 if (NT_STATUS_EQUAL(status, NT_STATUS_OBJECT_NAME_COLLISION)) {
2251                         test_DeleteTrustedDomain(p, tctx, handle, trustinfo.name);
2252                         status = dcerpc_lsa_CreateTrustedDomain(p, tctx, &r);
2253                 }
2254                 if (!NT_STATUS_IS_OK(status)) {
2255                         torture_comment(tctx, "CreateTrustedDomain failed - %s\n", nt_errstr(status));
2256                         ret = false;
2257                 } else {
2258
2259                         q.in.trustdom_handle = &trustdom_handle[i];
2260                         q.in.level = LSA_TRUSTED_DOMAIN_INFO_INFO_EX;
2261                         q.out.info = &info;
2262                         status = dcerpc_lsa_QueryTrustedDomainInfo(p, tctx, &q);
2263                         if (!NT_STATUS_IS_OK(status)) {
2264                                 torture_comment(tctx, "QueryTrustedDomainInfo level %d failed - %s\n", q.in.level, nt_errstr(status));
2265                                 ret = false;
2266                         } else if (!q.out.info) {
2267                                 ret = false;
2268                         } else {
2269                                 if (strcmp(info->info_ex.netbios_name.string, trustinfo.name.string) != 0) {
2270                                         torture_comment(tctx, "QueryTrustedDomainInfo returned inconsistant short name: %s != %s\n",
2271                                                info->info_ex.netbios_name.string, trustinfo.name.string);
2272                                         ret = false;
2273                                 }
2274                                 if (info->info_ex.trust_type != LSA_TRUST_TYPE_DOWNLEVEL) {
2275                                         torture_comment(tctx, "QueryTrustedDomainInfo of %s returned incorrect trust type %d != %d\n",
2276                                                trust_name, info->info_ex.trust_type, LSA_TRUST_TYPE_DOWNLEVEL);
2277                                         ret = false;
2278                                 }
2279                                 if (info->info_ex.trust_attributes != 0) {
2280                                         torture_comment(tctx, "QueryTrustedDomainInfo of %s returned incorrect trust attributes %d != %d\n",
2281                                                trust_name, info->info_ex.trust_attributes, 0);
2282                                         ret = false;
2283                                 }
2284                                 if (info->info_ex.trust_direction != LSA_TRUST_DIRECTION_OUTBOUND) {
2285                                         torture_comment(tctx, "QueryTrustedDomainInfo of %s returned incorrect trust direction %d != %d\n",
2286                                                trust_name, info->info_ex.trust_direction, LSA_TRUST_DIRECTION_OUTBOUND);
2287                                         ret = false;
2288                                 }
2289                         }
2290                 }
2291         }
2292
2293         /* now that we have some domains to look over, we can test the enum calls */
2294         if (!test_EnumTrustDom(p, tctx, handle)) {
2295                 ret = false;
2296         }
2297
2298         if (!test_EnumTrustDomEx(p, tctx, handle)) {
2299                 ret = false;
2300         }
2301
2302         for (i=0; i<num_trusts; i++) {
2303                 if (!test_DeleteTrustedDomainBySid(p, tctx, handle, domsid[i])) {
2304                         ret = false;
2305                 }
2306         }
2307
2308         return ret;
2309 }
2310
2311 static bool test_CreateTrustedDomainEx2(struct dcerpc_pipe *p,
2312                                         struct torture_context *tctx,
2313                                         struct policy_handle *handle,
2314                                         uint32_t num_trusts)
2315 {
2316         NTSTATUS status;
2317         bool ret = true;
2318         struct lsa_CreateTrustedDomainEx2 r;
2319         struct lsa_TrustDomainInfoInfoEx trustinfo;
2320         struct lsa_TrustDomainInfoAuthInfoInternal authinfo;
2321         struct trustDomainPasswords auth_struct;
2322         DATA_BLOB auth_blob;
2323         struct dom_sid **domsid;
2324         struct policy_handle *trustdom_handle;
2325         struct lsa_QueryTrustedDomainInfo q;
2326         union lsa_TrustedDomainInfo *info = NULL;
2327         DATA_BLOB session_key;
2328         enum ndr_err_code ndr_err;
2329         int i;
2330
2331         torture_comment(tctx, "\nTesting CreateTrustedDomainEx2 for %d domains\n", num_trusts);
2332
2333         domsid = talloc_array(tctx, struct dom_sid *, num_trusts);
2334         trustdom_handle = talloc_array(tctx, struct policy_handle, num_trusts);
2335
2336         status = dcerpc_fetch_session_key(p, &session_key);
2337         if (!NT_STATUS_IS_OK(status)) {
2338                 torture_comment(tctx, "dcerpc_fetch_session_key failed - %s\n", nt_errstr(status));
2339                 return false;
2340         }
2341
2342         for (i=0; i< num_trusts; i++) {
2343                 char *trust_name = talloc_asprintf(tctx, "torturedom%02d", i);
2344                 char *trust_name_dns = talloc_asprintf(tctx, "torturedom%02d.samba.example.com", i);
2345                 char *trust_sid = talloc_asprintf(tctx, "S-1-5-21-97398-379795-100%02d", i);
2346
2347                 domsid[i] = dom_sid_parse_talloc(tctx, trust_sid);
2348
2349                 trustinfo.sid = domsid[i];
2350                 trustinfo.netbios_name.string = trust_name;
2351                 trustinfo.domain_name.string = trust_name_dns;
2352
2353                 /* Create inbound, some outbound, and some
2354                  * bi-directional trusts in a repeating pattern based
2355                  * on i */
2356
2357                 /* 1 == inbound, 2 == outbound, 3 == both */
2358                 trustinfo.trust_direction = (i % 3) + 1;
2359
2360                 /* Try different trust types too */
2361
2362                 /* 1 == downlevel (NT4), 2 == uplevel (ADS), 3 == MIT (kerberos but not AD) */
2363                 trustinfo.trust_type = (((i / 3) + 1) % 3) + 1;
2364
2365                 trustinfo.trust_attributes = LSA_TRUST_ATTRIBUTE_USES_RC4_ENCRYPTION;
2366
2367                 generate_random_buffer(auth_struct.confounder, sizeof(auth_struct.confounder));
2368
2369                 auth_struct.outgoing.count = 0;
2370                 auth_struct.incoming.count = 0;
2371
2372                 ndr_err = ndr_push_struct_blob(&auth_blob, tctx, lp_iconv_convenience(tctx->lp_ctx), &auth_struct,
2373                                                (ndr_push_flags_fn_t)ndr_push_trustDomainPasswords);
2374                 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
2375                         torture_comment(tctx, "ndr_push_struct_blob of trustDomainPasswords structure failed");
2376                         ret = false;
2377                 }
2378
2379                 arcfour_crypt_blob(auth_blob.data, auth_blob.length, &session_key);
2380
2381                 authinfo.auth_blob.size = auth_blob.length;
2382                 authinfo.auth_blob.data = auth_blob.data;
2383
2384                 r.in.policy_handle = handle;
2385                 r.in.info = &trustinfo;
2386                 r.in.auth_info = &authinfo;
2387                 r.in.access_mask = SEC_FLAG_MAXIMUM_ALLOWED;
2388                 r.out.trustdom_handle = &trustdom_handle[i];
2389
2390                 status = dcerpc_lsa_CreateTrustedDomainEx2(p, tctx, &r);
2391                 if (NT_STATUS_EQUAL(status, NT_STATUS_OBJECT_NAME_COLLISION)) {
2392                         test_DeleteTrustedDomain(p, tctx, handle, trustinfo.netbios_name);
2393                         status = dcerpc_lsa_CreateTrustedDomainEx2(p, tctx, &r);
2394                 }
2395                 if (!NT_STATUS_IS_OK(status)) {
2396                         torture_comment(tctx, "CreateTrustedDomainEx failed2 - %s\n", nt_errstr(status));
2397                         ret = false;
2398                 } else {
2399
2400                         q.in.trustdom_handle = &trustdom_handle[i];
2401                         q.in.level = LSA_TRUSTED_DOMAIN_INFO_INFO_EX;
2402                         q.out.info = &info;
2403                         status = dcerpc_lsa_QueryTrustedDomainInfo(p, tctx, &q);
2404                         if (!NT_STATUS_IS_OK(status)) {
2405                                 torture_comment(tctx, "QueryTrustedDomainInfo level 1 failed - %s\n", nt_errstr(status));
2406                                 ret = false;
2407                         } else if (!q.out.info) {
2408                                 torture_comment(tctx, "QueryTrustedDomainInfo level 1 failed to return an info pointer\n");
2409                                 ret = false;
2410                         } else {
2411                                 if (strcmp(info->info_ex.netbios_name.string, trustinfo.netbios_name.string) != 0) {
2412                                         torture_comment(tctx, "QueryTrustedDomainInfo returned inconsistant short name: %s != %s\n",
2413                                                info->info_ex.netbios_name.string, trustinfo.netbios_name.string);
2414                                         ret = false;
2415                                 }
2416                                 if (info->info_ex.trust_type != trustinfo.trust_type) {
2417                                         torture_comment(tctx, "QueryTrustedDomainInfo of %s returned incorrect trust type %d != %d\n",
2418                                                trust_name, info->info_ex.trust_type, trustinfo.trust_type);
2419                                         ret = false;
2420                                 }
2421                                 if (info->info_ex.trust_attributes != LSA_TRUST_ATTRIBUTE_USES_RC4_ENCRYPTION) {
2422                                         torture_comment(tctx, "QueryTrustedDomainInfo of %s returned incorrect trust attributes %d != %d\n",
2423                                                trust_name, info->info_ex.trust_attributes, LSA_TRUST_ATTRIBUTE_USES_RC4_ENCRYPTION);
2424                                         ret = false;
2425                                 }
2426                                 if (info->info_ex.trust_direction != trustinfo.trust_direction) {
2427                                         torture_comment(tctx, "QueryTrustedDomainInfo of %s returned incorrect trust direction %d != %d\n",
2428                                                trust_name, info->info_ex.trust_direction, trustinfo.trust_direction);
2429                                         ret = false;
2430                                 }
2431                         }
2432                 }
2433         }
2434
2435         /* now that we have some domains to look over, we can test the enum calls */
2436         if (!test_EnumTrustDom(p, tctx, handle)) {
2437                 torture_comment(tctx, "test_EnumTrustDom failed\n");
2438                 ret = false;
2439         }
2440
2441         if (!test_EnumTrustDomEx(p, tctx, handle)) {
2442                 torture_comment(tctx, "test_EnumTrustDomEx failed\n");
2443                 ret = false;
2444         }
2445
2446         for (i=0; i<num_trusts; i++) {
2447                 if (!test_DeleteTrustedDomainBySid(p, tctx, handle, domsid[i])) {
2448                         torture_comment(tctx, "test_DeleteTrustedDomainBySid failed\n");
2449                         ret = false;
2450                 }
2451         }
2452
2453         return ret;
2454 }
2455
2456 static bool test_QueryDomainInfoPolicy(struct dcerpc_pipe *p,
2457                                  struct torture_context *tctx,
2458                                  struct policy_handle *handle)
2459 {
2460         struct lsa_QueryDomainInformationPolicy r;
2461         union lsa_DomainInformationPolicy *info = NULL;
2462         NTSTATUS status;
2463         int i;
2464         bool ret = true;
2465
2466         if (torture_setting_bool(tctx, "samba3", false)) {
2467                 torture_skip(tctx, "skipping QueryDomainInformationPolicy test\n");
2468         }
2469
2470         torture_comment(tctx, "\nTesting QueryDomainInformationPolicy\n");
2471
2472         for (i=2;i<4;i++) {
2473                 r.in.handle = handle;
2474                 r.in.level = i;
2475                 r.out.info = &info;
2476
2477                 torture_comment(tctx, "\nTrying QueryDomainInformationPolicy level %d\n", i);
2478
2479                 status = dcerpc_lsa_QueryDomainInformationPolicy(p, tctx, &r);
2480
2481                 /* If the server does not support EFS, then this is the correct return */
2482                 if (i == LSA_DOMAIN_INFO_POLICY_EFS && NT_STATUS_EQUAL(status, NT_STATUS_OBJECT_NAME_NOT_FOUND)) {
2483                         continue;
2484                 } else if (!NT_STATUS_IS_OK(status)) {
2485                         torture_comment(tctx, "QueryDomainInformationPolicy failed - %s\n", nt_errstr(status));
2486                         ret = false;
2487                         continue;
2488                 }
2489         }
2490
2491         return ret;
2492 }
2493
2494
2495 static bool test_QueryInfoPolicyCalls(  bool version2,
2496                                         struct dcerpc_pipe *p,
2497                                         struct torture_context *tctx,
2498                                         struct policy_handle *handle)
2499 {
2500         struct lsa_QueryInfoPolicy r;
2501         union lsa_PolicyInformation *info = NULL;
2502         NTSTATUS status;
2503         int i;
2504         bool ret = true;
2505         const char *call = talloc_asprintf(tctx, "QueryInfoPolicy%s", version2 ? "2":"");
2506
2507         torture_comment(tctx, "\nTesting %s\n", call);
2508
2509         if (version2 && torture_setting_bool(tctx, "samba3", false)) {
2510                 torture_skip(tctx, "skipping QueryInfoPolicy2 tests\n");
2511         }
2512
2513         for (i=1;i<=14;i++) {
2514                 r.in.handle = handle;
2515                 r.in.level = i;
2516                 r.out.info = &info;
2517
2518                 torture_comment(tctx, "\nTrying %s level %d\n", call, i);
2519
2520                 if (version2)
2521                         /* We can perform the cast, because both types are
2522                            structurally equal */
2523                         status = dcerpc_lsa_QueryInfoPolicy2(p, tctx,
2524                                  (struct lsa_QueryInfoPolicy2*) &r);
2525                 else
2526                         status = dcerpc_lsa_QueryInfoPolicy(p, tctx, &r);
2527
2528                 switch (i) {
2529                 case LSA_POLICY_INFO_MOD:
2530                 case LSA_POLICY_INFO_AUDIT_FULL_SET:
2531                 case LSA_POLICY_INFO_AUDIT_FULL_QUERY:
2532                         if (!NT_STATUS_EQUAL(status, NT_STATUS_INVALID_PARAMETER)) {
2533                                 torture_comment(tctx, "Server should have failed level %u: %s\n", i, nt_errstr(status));
2534                                 ret = false;
2535                         }
2536                         break;
2537                 case LSA_POLICY_INFO_DOMAIN:
2538                 case LSA_POLICY_INFO_ACCOUNT_DOMAIN:
2539                 case LSA_POLICY_INFO_REPLICA:
2540                 case LSA_POLICY_INFO_QUOTA:
2541                 case LSA_POLICY_INFO_ROLE:
2542                 case LSA_POLICY_INFO_AUDIT_LOG:
2543                 case LSA_POLICY_INFO_AUDIT_EVENTS:
2544                 case LSA_POLICY_INFO_PD:
2545                         if (!NT_STATUS_IS_OK(status)) {
2546                                 torture_comment(tctx, "%s failed - %s\n", call, nt_errstr(status));
2547                                 ret = false;
2548                         }
2549                         break;
2550                 case LSA_POLICY_INFO_L_ACCOUNT_DOMAIN:
2551                 case LSA_POLICY_INFO_DNS_INT:
2552                 case LSA_POLICY_INFO_DNS:
2553                         if (torture_setting_bool(tctx, "samba3", false)) {
2554                                 /* Other levels not implemented yet */
2555                                 if (!NT_STATUS_EQUAL(status, NT_STATUS_INVALID_INFO_CLASS)) {
2556                                         torture_comment(tctx, "%s failed - %s\n", call, nt_errstr(status));
2557                                         ret = false;
2558                                 }
2559                         } else if (!NT_STATUS_IS_OK(status)) {
2560                                 torture_comment(tctx, "%s failed - %s\n", call, nt_errstr(status));
2561                                 ret = false;
2562                         }
2563                         break;
2564                 default:
2565                         if (torture_setting_bool(tctx, "samba4", false)) {
2566                                 /* Other levels not implemented yet */
2567                                 if (!NT_STATUS_EQUAL(status, NT_STATUS_INVALID_INFO_CLASS)) {
2568                                         torture_comment(tctx, "%s failed - %s\n", call, nt_errstr(status));
2569                                         ret = false;
2570                                 }
2571                         } else if (!NT_STATUS_IS_OK(status)) {
2572                                 torture_comment(tctx, "%s failed - %s\n", call, nt_errstr(status));
2573                                 ret = false;
2574                         }
2575                         break;
2576                 }
2577
2578                 if (NT_STATUS_IS_OK(status) && (i == LSA_POLICY_INFO_DNS
2579                         || i == LSA_POLICY_INFO_DNS_INT)) {
2580                         /* Let's look up some of these names */
2581
2582                         struct lsa_TransNameArray tnames;
2583                         tnames.count = 14;
2584                         tnames.names = talloc_zero_array(tctx, struct lsa_TranslatedName, tnames.count);
2585                         tnames.names[0].name.string = info->dns.name.string;
2586                         tnames.names[0].sid_type = SID_NAME_DOMAIN;
2587                         tnames.names[1].name.string = info->dns.dns_domain.string;
2588                         tnames.names[1].sid_type = SID_NAME_DOMAIN;
2589                         tnames.names[2].name.string = talloc_asprintf(tctx, "%s\\", info->dns.name.string);
2590                         tnames.names[2].sid_type = SID_NAME_DOMAIN;
2591                         tnames.names[3].name.string = talloc_asprintf(tctx, "%s\\", info->dns.dns_domain.string);
2592                         tnames.names[3].sid_type = SID_NAME_DOMAIN;
2593                         tnames.names[4].name.string = talloc_asprintf(tctx, "%s\\guest", info->dns.name.string);
2594                         tnames.names[4].sid_type = SID_NAME_USER;
2595                         tnames.names[5].name.string = talloc_asprintf(tctx, "%s\\krbtgt", info->dns.name.string);
2596                         tnames.names[5].sid_type = SID_NAME_USER;
2597                         tnames.names[6].name.string = talloc_asprintf(tctx, "%s\\guest", info->dns.dns_domain.string);
2598                         tnames.names[6].sid_type = SID_NAME_USER;
2599                         tnames.names[7].name.string = talloc_asprintf(tctx, "%s\\krbtgt", info->dns.dns_domain.string);
2600                         tnames.names[7].sid_type = SID_NAME_USER;
2601                         tnames.names[8].name.string = talloc_asprintf(tctx, "krbtgt@%s", info->dns.name.string);
2602                         tnames.names[8].sid_type = SID_NAME_USER;
2603                         tnames.names[9].name.string = talloc_asprintf(tctx, "krbtgt@%s", info->dns.dns_domain.string);
2604                         tnames.names[9].sid_type = SID_NAME_USER;
2605                         tnames.names[10].name.string = talloc_asprintf(tctx, "%s\\"TEST_MACHINENAME "$", info->dns.name.string);
2606                         tnames.names[10].sid_type = SID_NAME_USER;
2607                         tnames.names[11].name.string = talloc_asprintf(tctx, "%s\\"TEST_MACHINENAME "$", info->dns.dns_domain.string);
2608                         tnames.names[11].sid_type = SID_NAME_USER;
2609                         tnames.names[12].name.string = talloc_asprintf(tctx, TEST_MACHINENAME "$@%s", info->dns.name.string);
2610                         tnames.names[12].sid_type = SID_NAME_USER;
2611                         tnames.names[13].name.string = talloc_asprintf(tctx, TEST_MACHINENAME "$@%s", info->dns.dns_domain.string);
2612                         tnames.names[13].sid_type = SID_NAME_USER;
2613                         ret &= test_LookupNames(p, tctx, handle, &tnames);
2614
2615                 }
2616         }
2617
2618         return ret;
2619 }
2620
2621 static bool test_QueryInfoPolicy(struct dcerpc_pipe *p,
2622                                  struct torture_context *tctx,
2623                                  struct policy_handle *handle)
2624 {
2625         return test_QueryInfoPolicyCalls(false, p, tctx, handle);
2626 }
2627
2628 static bool test_QueryInfoPolicy2(struct dcerpc_pipe *p,
2629                                   struct torture_context *tctx,
2630                                   struct policy_handle *handle)
2631 {
2632         return test_QueryInfoPolicyCalls(true, p, tctx, handle);
2633 }
2634
2635 static bool test_GetUserName(struct dcerpc_pipe *p,
2636                              struct torture_context *tctx)
2637 {
2638         struct lsa_GetUserName r;
2639         NTSTATUS status;
2640         bool ret = true;
2641         struct lsa_String *authority_name_p = NULL;
2642         struct lsa_String *account_name_p = NULL;
2643
2644         torture_comment(tctx, "\nTesting GetUserName\n");
2645
2646         r.in.system_name        = "\\";
2647         r.in.account_name       = &account_name_p;
2648         r.in.authority_name     = NULL;
2649         r.out.account_name      = &account_name_p;
2650
2651         status = dcerpc_lsa_GetUserName(p, tctx, &r);
2652
2653         if (!NT_STATUS_IS_OK(status)) {
2654                 torture_comment(tctx, "GetUserName failed - %s\n", nt_errstr(status));
2655                 ret = false;
2656         }
2657
2658         account_name_p = NULL;
2659         r.in.account_name       = &account_name_p;
2660         r.in.authority_name     = &authority_name_p;
2661         r.out.account_name      = &account_name_p;
2662
2663         status = dcerpc_lsa_GetUserName(p, tctx, &r);
2664
2665         if (!NT_STATUS_IS_OK(status)) {
2666                 torture_comment(tctx, "GetUserName failed - %s\n", nt_errstr(status));
2667                 ret = false;
2668         }
2669
2670         return ret;
2671 }
2672
2673 bool test_lsa_Close(struct dcerpc_pipe *p,
2674                     struct torture_context *tctx,
2675                     struct policy_handle *handle)
2676 {
2677         NTSTATUS status;
2678         struct lsa_Close r;
2679         struct policy_handle handle2;
2680
2681         torture_comment(tctx, "\nTesting Close\n");
2682
2683         r.in.handle = handle;
2684         r.out.handle = &handle2;
2685
2686         status = dcerpc_lsa_Close(p, tctx, &r);
2687         if (!NT_STATUS_IS_OK(status)) {
2688                 torture_comment(tctx, "Close failed - %s\n", nt_errstr(status));
2689                 return false;
2690         }
2691
2692         status = dcerpc_lsa_Close(p, tctx, &r);
2693         /* its really a fault - we need a status code for rpc fault */
2694         if (!NT_STATUS_EQUAL(status, NT_STATUS_NET_WRITE_FAULT)) {
2695                 torture_comment(tctx, "Close failed - %s\n", nt_errstr(status));
2696                 return false;
2697         }
2698
2699         torture_comment(tctx, "\n");
2700
2701         return true;
2702 }
2703
2704 bool torture_rpc_lsa(struct torture_context *tctx)
2705 {
2706         NTSTATUS status;
2707         struct dcerpc_pipe *p;
2708         bool ret = true;
2709         struct policy_handle *handle;
2710         struct test_join *join = NULL;
2711         struct cli_credentials *machine_creds;
2712
2713         status = torture_rpc_connection(tctx, &p, &ndr_table_lsarpc);
2714         if (!NT_STATUS_IS_OK(status)) {
2715                 return false;
2716         }
2717
2718         if (!test_OpenPolicy(p, tctx)) {
2719                 ret = false;
2720         }
2721
2722         if (!test_lsa_OpenPolicy2(p, tctx, &handle)) {
2723                 ret = false;
2724         }
2725
2726         if (handle) {
2727                 join = torture_join_domain(tctx, TEST_MACHINENAME, ACB_WSTRUST, &machine_creds);
2728                 if (!join) {
2729                         ret = false;
2730                 }
2731
2732                 if (!test_LookupSids_async(p, tctx, handle)) {
2733                         ret = false;
2734                 }
2735
2736                 if (!test_QueryDomainInfoPolicy(p, tctx, handle)) {
2737                         ret = false;
2738                 }
2739
2740                 if (!test_CreateSecret(p, tctx, handle)) {
2741                         ret = false;
2742                 }
2743
2744                 if (!test_QueryInfoPolicy(p, tctx, handle)) {
2745                         ret = false;
2746                 }
2747
2748                 if (!test_QueryInfoPolicy2(p, tctx, handle)) {
2749                         ret = false;
2750                 }
2751
2752                 if (!test_Delete(p, tctx, handle)) {
2753                         ret = false;
2754                 }
2755
2756                 if (!test_many_LookupSids(p, tctx, handle)) {
2757                         ret = false;
2758                 }
2759
2760                 if (!test_lsa_Close(p, tctx, handle)) {
2761                         ret = false;
2762                 }
2763
2764                 torture_leave_domain(tctx, join);
2765
2766         } else {
2767                 if (!test_many_LookupSids(p, tctx, handle)) {
2768                         ret = false;
2769                 }
2770         }
2771
2772         if (!test_GetUserName(p, tctx)) {
2773                 ret = false;
2774         }
2775
2776         return ret;
2777 }
2778
2779 bool torture_rpc_lsa_get_user(struct torture_context *tctx)
2780 {
2781         NTSTATUS status;
2782         struct dcerpc_pipe *p;
2783         bool ret = true;
2784
2785         status = torture_rpc_connection(tctx, &p, &ndr_table_lsarpc);
2786         if (!NT_STATUS_IS_OK(status)) {
2787                 return false;
2788         }
2789
2790         if (!test_GetUserName(p, tctx)) {
2791                 ret = false;
2792         }
2793
2794         return ret;
2795 }
2796
2797 static bool testcase_LookupNames(struct torture_context *tctx,
2798                                  struct dcerpc_pipe *p)
2799 {
2800         bool ret = true;
2801         struct policy_handle *handle;
2802         struct lsa_TransNameArray tnames;
2803         struct lsa_TransNameArray2 tnames2;
2804
2805         if (!test_OpenPolicy(p, tctx)) {
2806                 ret = false;
2807         }
2808
2809         if (!test_lsa_OpenPolicy2(p, tctx, &handle)) {
2810                 ret = false;
2811         }
2812
2813         if (!handle) {
2814                 ret = false;
2815         }
2816
2817         tnames.count = 1;
2818         tnames.names = talloc_array(tctx, struct lsa_TranslatedName, tnames.count);
2819         ZERO_STRUCT(tnames.names[0]);
2820         tnames.names[0].name.string = "BUILTIN";
2821         tnames.names[0].sid_type = SID_NAME_DOMAIN;
2822
2823         if (!test_LookupNames(p, tctx, handle, &tnames)) {
2824                 ret = false;
2825         }
2826
2827         tnames2.count = 1;
2828         tnames2.names = talloc_array(tctx, struct lsa_TranslatedName2, tnames2.count);
2829         ZERO_STRUCT(tnames2.names[0]);
2830         tnames2.names[0].name.string = "BUILTIN";
2831         tnames2.names[0].sid_type = SID_NAME_DOMAIN;
2832
2833         if (!test_LookupNames2(p, tctx, handle, &tnames2, true)) {
2834                 ret = false;
2835         }
2836
2837         if (!test_LookupNames3(p, tctx, handle, &tnames2, true)) {
2838                 ret = false;
2839         }
2840
2841         if (!test_LookupNames_wellknown(p, tctx, handle)) {
2842                 ret = false;
2843         }
2844
2845         if (!test_LookupNames_NULL(p, tctx, handle)) {
2846                 ret = false;
2847         }
2848
2849         if (!test_LookupNames_bogus(p, tctx, handle)) {
2850                 ret = false;
2851         }
2852
2853         if (!test_lsa_Close(p, tctx, handle)) {
2854                 ret = false;
2855         }
2856
2857         return ret;
2858 }
2859
2860 struct torture_suite *torture_rpc_lsa_lookup_names(TALLOC_CTX *mem_ctx)
2861 {
2862         struct torture_suite *suite;
2863         struct torture_rpc_tcase *tcase;
2864
2865         suite = torture_suite_create(mem_ctx, "LSA-LOOKUPNAMES");
2866
2867         tcase = torture_suite_add_rpc_iface_tcase(suite, "lsa",
2868                                                   &ndr_table_lsarpc);
2869         torture_rpc_tcase_add_test(tcase, "LookupNames",
2870                                    testcase_LookupNames);
2871
2872         return suite;
2873 }
2874
2875 struct lsa_trustdom_state {
2876         uint32_t num_trusts;
2877 };
2878
2879 static bool testcase_TrustedDomains(struct torture_context *tctx,
2880                                     struct dcerpc_pipe *p,
2881                                     void *data)
2882 {
2883         bool ret = true;
2884         struct policy_handle *handle;
2885         struct lsa_trustdom_state *state =
2886                 talloc_get_type_abort(data, struct lsa_trustdom_state);
2887
2888         torture_comment(tctx, "testing %d domains\n", state->num_trusts);
2889
2890         if (!test_OpenPolicy(p, tctx)) {
2891                 ret = false;
2892         }
2893
2894         if (!test_lsa_OpenPolicy2(p, tctx, &handle)) {
2895                 ret = false;
2896         }
2897
2898         if (!handle) {
2899                 ret = false;
2900         }
2901
2902         if (!test_CreateTrustedDomain(p, tctx, handle, state->num_trusts)) {
2903                 ret = false;
2904         }
2905
2906         if (!test_CreateTrustedDomainEx2(p, tctx, handle, state->num_trusts)) {
2907                 ret = false;
2908         }
2909
2910         if (!test_lsa_Close(p, tctx, handle)) {
2911                 ret = false;
2912         }
2913
2914         return ret;
2915 }
2916
2917 struct torture_suite *torture_rpc_lsa_trusted_domains(TALLOC_CTX *mem_ctx)
2918 {
2919         struct torture_suite *suite;
2920         struct torture_rpc_tcase *tcase;
2921         struct lsa_trustdom_state *state;
2922
2923         state = talloc(mem_ctx, struct lsa_trustdom_state);
2924
2925         state->num_trusts = 12;
2926
2927         suite = torture_suite_create(mem_ctx, "LSA-TRUSTED-DOMAINS");
2928
2929         tcase = torture_suite_add_rpc_iface_tcase(suite, "lsa",
2930                                                   &ndr_table_lsarpc);
2931         torture_rpc_tcase_add_test_ex(tcase, "TrustedDomains",
2932                                       testcase_TrustedDomains,
2933                                       state);
2934
2935         return suite;
2936 }
2937
2938 static bool testcase_Privileges(struct torture_context *tctx,
2939                                 struct dcerpc_pipe *p)
2940 {
2941         bool ret = true;
2942         struct policy_handle *handle;
2943
2944         if (!test_OpenPolicy(p, tctx)) {
2945                 ret = false;
2946         }
2947
2948         if (!test_lsa_OpenPolicy2(p, tctx, &handle)) {
2949                 ret = false;
2950         }
2951
2952         if (!handle) {
2953                 ret = false;
2954         }
2955
2956         if (!test_CreateAccount(p, tctx, handle)) {
2957                 ret = false;
2958         }
2959
2960         if (!test_EnumAccounts(p, tctx, handle)) {
2961                 ret = false;
2962         }
2963
2964         if (!test_EnumPrivs(p, tctx, handle)) {
2965                 ret = false;
2966         }
2967
2968         if (!test_lsa_Close(p, tctx, handle)) {
2969                 ret = false;
2970         }
2971
2972         return ret;
2973 }
2974
2975
2976 struct torture_suite *torture_rpc_lsa_privileges(TALLOC_CTX *mem_ctx)
2977 {
2978         struct torture_suite *suite;
2979         struct torture_rpc_tcase *tcase;
2980
2981         suite = torture_suite_create(mem_ctx, "LSA-PRIVILEGES");
2982
2983         tcase = torture_suite_add_rpc_iface_tcase(suite, "lsa",
2984                                                   &ndr_table_lsarpc);
2985         torture_rpc_tcase_add_test(tcase, "Privileges",
2986                                    testcase_Privileges);
2987
2988         return suite;
2989 }