source3/rpc_server/srv_lsa_nt.c

   1 /*
   2  *  Unix SMB/CIFS implementation.
   3  *  RPC Pipe client / server routines
   4  *  Copyright (C) Andrew Tridgell              1992-1997,
   5  *  Copyright (C) Luke Kenneth Casson Leighton 1996-1997,
   6  *  Copyright (C) Paul Ashton                       1997,
   7  *  Copyright (C) Jeremy Allison                    2001, 2006.
   8  *  Copyright (C) Rafal Szczesniak                  2002,
   9  *  Copyright (C) Jim McDonough <jmcd@us.ibm.com>   2002,
  10  *  Copyright (C) Simo Sorce                        2003.
  11  *  Copyright (C) Gerald (Jerry) Carter             2005.
  12  *  Copyright (C) Volker Lendecke                   2005.
  13  *  Copyright (C) Guenther Deschner                 2008.
  14  *
  15  *  This program is free software; you can redistribute it and/or modify
  16  *  it under the terms of the GNU General Public License as published by
  17  *  the Free Software Foundation; either version 3 of the License, or
  18  *  (at your option) any later version.
  19  *
  20  *  This program is distributed in the hope that it will be useful,
  21  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  22  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  23  *  GNU General Public License for more details.
  24  *
  25  *  You should have received a copy of the GNU General Public License
  26  *  along with this program; if not, see <http://www.gnu.org/licenses/>.
  27  */
  28
  29 /* This is the implementation of the lsa server code. */
  30
  31 #include "includes.h"
  32
  33 #undef DBGC_CLASS
  34 #define DBGC_CLASS DBGC_RPC_SRV
  35
  36 #define MAX_LOOKUP_SIDS 0x5000 /* 20480 */
  37
  38 extern PRIVS privs[];
  39
  40 struct lsa_info {
  41         DOM_SID sid;
  42         uint32 access;
  43 };
  44
  45 const struct generic_mapping lsa_generic_mapping = {
  46         LSA_POLICY_READ,
  47         LSA_POLICY_WRITE,
  48         LSA_POLICY_EXECUTE,
  49         LSA_POLICY_ALL_ACCESS
  50 };
  51
  52 /***************************************************************************
  53  init_lsa_ref_domain_list - adds a domain if it's not already in, returns the index.
  54 ***************************************************************************/
  55
  56 static int init_lsa_ref_domain_list(TALLOC_CTX *mem_ctx,
  57                                     struct lsa_RefDomainList *ref,
  58                                     const char *dom_name,
  59                                     DOM_SID *dom_sid)
  60 {
  61         int num = 0;
  62
  63         if (dom_name != NULL) {
  64                 for (num = 0; num < ref->count; num++) {
  65                         if (sid_equal(dom_sid, ref->domains[num].sid)) {
  66                                 return num;
  67                         }
  68                 }
  69         } else {
  70                 num = ref->count;
  71         }
  72
  73         if (num >= LSA_REF_DOMAIN_LIST_MULTIPLIER) {
  74                 /* index not found, already at maximum domain limit */
  75                 return -1;
  76         }
  77
  78         ref->count = num + 1;
  79         ref->max_size = LSA_REF_DOMAIN_LIST_MULTIPLIER;
  80
  81         ref->domains = TALLOC_REALLOC_ARRAY(mem_ctx, ref->domains,
  82                                             struct lsa_DomainInfo, ref->count);
  83         if (!ref->domains) {
  84                 return -1;
  85         }
  86
  87         ZERO_STRUCT(ref->domains[num]);
  88
  89         init_lsa_StringLarge(&ref->domains[num].name, dom_name);
  90         ref->domains[num].sid = sid_dup_talloc(mem_ctx, dom_sid);
  91         if (!ref->domains[num].sid) {
  92                 return -1;
  93         }
  94
  95         return num;
  96 }
  97
  98
  99 /*******************************************************************
 100  Function to free the per handle data.
 101  ********************************************************************/
 102
 103 static void free_lsa_info(void *ptr)
 104 {
 105         TALLOC_FREE(ptr);
 106 }
 107
 108 /***************************************************************************
 109  initialize a lsa_DomainInfo structure.
 110  ***************************************************************************/
 111
 112 static void init_dom_query_3(struct lsa_DomainInfo *r,
 113                              const char *name,
 114                              DOM_SID *sid)
 115 {
 116         init_lsa_StringLarge(&r->name, name);
 117         r->sid = sid;
 118 }
 119
 120 /***************************************************************************
 121  initialize a lsa_DomainInfo structure.
 122  ***************************************************************************/
 123
 124 static void init_dom_query_5(struct lsa_DomainInfo *r,
 125                              const char *name,
 126                              DOM_SID *sid)
 127 {
 128         init_lsa_StringLarge(&r->name, name);
 129         r->sid = sid;
 130 }
 131
 132 /***************************************************************************
 133  lookup_lsa_rids. Must be called as root for lookup_name to work.
 134  ***************************************************************************/
 135
 136 static NTSTATUS lookup_lsa_rids(TALLOC_CTX *mem_ctx,
 137                                 struct lsa_RefDomainList *ref,
 138                                 struct lsa_TranslatedSid *prid,
 139                                 uint32_t num_entries,
 140                                 struct lsa_String *name,
 141                                 int flags,
 142                                 uint32_t *pmapped_count)
 143 {
 144         uint32 mapped_count, i;
 145
 146         SMB_ASSERT(num_entries <= MAX_LOOKUP_SIDS);
 147
 148         mapped_count = 0;
 149         *pmapped_count = 0;
 150
 151         for (i = 0; i < num_entries; i++) {
 152                 DOM_SID sid;
 153                 uint32 rid;
 154                 int dom_idx;
 155                 const char *full_name;
 156                 const char *domain;
 157                 enum lsa_SidType type = SID_NAME_UNKNOWN;
 158
 159                 /* Split name into domain and user component */
 160
 161                 full_name = name[i].string;
 162                 if (full_name == NULL) {
 163                         return NT_STATUS_NO_MEMORY;
 164                 }
 165
 166                 DEBUG(5, ("lookup_lsa_rids: looking up name %s\n", full_name));
 167
 168                 /* We can ignore the result of lookup_name, it will not touch
 169                    "type" if it's not successful */
 170
 171                 lookup_name(mem_ctx, full_name, flags, &domain, NULL,
 172                             &sid, &type);
 173
 174                 switch (type) {
 175                 case SID_NAME_USER:
 176                 case SID_NAME_DOM_GRP:
 177                 case SID_NAME_DOMAIN:
 178                 case SID_NAME_ALIAS:
 179                 case SID_NAME_WKN_GRP:
 180                         DEBUG(5, ("init_lsa_rids: %s found\n", full_name));
 181                         /* Leave these unchanged */
 182                         break;
 183                 default:
 184                         /* Don't hand out anything but the list above */
 185                         DEBUG(5, ("init_lsa_rids: %s not found\n", full_name));
 186                         type = SID_NAME_UNKNOWN;
 187                         break;
 188                 }
 189
 190                 rid = 0;
 191                 dom_idx = -1;
 192
 193                 if (type != SID_NAME_UNKNOWN) {
 194                         sid_split_rid(&sid, &rid);
 195                         dom_idx = init_lsa_ref_domain_list(mem_ctx, ref, domain, &sid);
 196                         mapped_count++;
 197                 }
 198
 199                 prid[i].sid_type        = type;
 200                 prid[i].rid             = rid;
 201                 prid[i].sid_index       = dom_idx;
 202         }
 203
 204         *pmapped_count = mapped_count;
 205         return NT_STATUS_OK;
 206 }
 207
 208 /***************************************************************************
 209  lookup_lsa_sids. Must be called as root for lookup_name to work.
 210  ***************************************************************************/
 211
 212 static NTSTATUS lookup_lsa_sids(TALLOC_CTX *mem_ctx,
 213                                 struct lsa_RefDomainList *ref,
 214                                 struct lsa_TranslatedSid3 *trans_sids,
 215                                 uint32_t num_entries,
 216                                 struct lsa_String *name,
 217                                 int flags,
 218                                 uint32 *pmapped_count)
 219 {
 220         uint32 mapped_count, i;
 221
 222         SMB_ASSERT(num_entries <= MAX_LOOKUP_SIDS);
 223
 224         mapped_count = 0;
 225         *pmapped_count = 0;
 226
 227         for (i = 0; i < num_entries; i++) {
 228                 DOM_SID sid;
 229                 uint32 rid;
 230                 int dom_idx;
 231                 const char *full_name;
 232                 const char *domain;
 233                 enum lsa_SidType type = SID_NAME_UNKNOWN;
 234
 235                 ZERO_STRUCT(sid);
 236
 237                 /* Split name into domain and user component */
 238
 239                 full_name = name[i].string;
 240                 if (full_name == NULL) {
 241                         return NT_STATUS_NO_MEMORY;
 242                 }
 243
 244                 DEBUG(5, ("init_lsa_sids: looking up name %s\n", full_name));
 245
 246                 /* We can ignore the result of lookup_name, it will not touch
 247                    "type" if it's not successful */
 248
 249                 lookup_name(mem_ctx, full_name, flags, &domain, NULL,
 250                             &sid, &type);
 251
 252                 switch (type) {
 253                 case SID_NAME_USER:
 254                 case SID_NAME_DOM_GRP:
 255                 case SID_NAME_DOMAIN:
 256                 case SID_NAME_ALIAS:
 257                 case SID_NAME_WKN_GRP:
 258                         DEBUG(5, ("init_lsa_sids: %s found\n", full_name));
 259                         /* Leave these unchanged */
 260                         break;
 261                 default:
 262                         /* Don't hand out anything but the list above */
 263                         DEBUG(5, ("init_lsa_sids: %s not found\n", full_name));
 264                         type = SID_NAME_UNKNOWN;
 265                         break;
 266                 }
 267
 268                 rid = 0;
 269                 dom_idx = -1;
 270
 271                 if (type != SID_NAME_UNKNOWN) {
 272                         DOM_SID domain_sid;
 273                         sid_copy(&domain_sid, &sid);
 274                         sid_split_rid(&domain_sid, &rid);
 275                         dom_idx = init_lsa_ref_domain_list(mem_ctx, ref, domain, &domain_sid);
 276                         mapped_count++;
 277                 }
 278
 279                 /* Initialize the lsa_TranslatedSid3 return. */
 280                 trans_sids[i].sid_type = type;
 281                 trans_sids[i].sid = sid_dup_talloc(mem_ctx, &sid);
 282                 trans_sids[i].sid_index = dom_idx;
 283         }
 284
 285         *pmapped_count = mapped_count;
 286         return NT_STATUS_OK;
 287 }
 288
 289 static NTSTATUS lsa_get_generic_sd(TALLOC_CTX *mem_ctx, SEC_DESC **sd, size_t *sd_size)
 290 {
 291         DOM_SID local_adm_sid;
 292         DOM_SID adm_sid;
 293
 294         SEC_ACE ace[3];
 295
 296         SEC_ACL *psa = NULL;
 297
 298         init_sec_ace(&ace[0], &global_sid_World, SEC_ACE_TYPE_ACCESS_ALLOWED, LSA_POLICY_EXECUTE, 0);
 299
 300         sid_copy(&adm_sid, get_global_sam_sid());
 301         sid_append_rid(&adm_sid, DOMAIN_GROUP_RID_ADMINS);
 302         init_sec_ace(&ace[1], &adm_sid, SEC_ACE_TYPE_ACCESS_ALLOWED, LSA_POLICY_ALL_ACCESS, 0);
 303
 304         sid_copy(&local_adm_sid, &global_sid_Builtin);
 305         sid_append_rid(&local_adm_sid, BUILTIN_ALIAS_RID_ADMINS);
 306         init_sec_ace(&ace[2], &local_adm_sid, SEC_ACE_TYPE_ACCESS_ALLOWED, LSA_POLICY_ALL_ACCESS, 0);
 307
 308         if((psa = make_sec_acl(mem_ctx, NT4_ACL_REVISION, 3, ace)) == NULL)
 309                 return NT_STATUS_NO_MEMORY;
 310
 311         if((*sd = make_sec_desc(mem_ctx, SECURITY_DESCRIPTOR_REVISION_1,
 312                                 SEC_DESC_SELF_RELATIVE, &adm_sid, NULL, NULL,
 313                                 psa, sd_size)) == NULL)
 314                 return NT_STATUS_NO_MEMORY;
 315
 316         return NT_STATUS_OK;
 317 }
 318
 319 #if 0   /* AD DC work in ongoing in Samba 4 */
 320
 321 /***************************************************************************
 322  Init_dns_dom_info.
 323 ***************************************************************************/
 324
 325 static void init_dns_dom_info(LSA_DNS_DOM_INFO *r_l, const char *nb_name,
 326                               const char *dns_name, const char *forest_name,
 327                               struct GUID *dom_guid, DOM_SID *dom_sid)
 328 {
 329         if (nb_name && *nb_name) {
 330                 init_unistr2(&r_l->uni_nb_dom_name, nb_name, UNI_FLAGS_NONE);
 331                 init_uni_hdr(&r_l->hdr_nb_dom_name, &r_l->uni_nb_dom_name);
 332                 r_l->hdr_nb_dom_name.uni_max_len += 2;
 333                 r_l->uni_nb_dom_name.uni_max_len += 1;
 334         }
 335
 336         if (dns_name && *dns_name) {
 337                 init_unistr2(&r_l->uni_dns_dom_name, dns_name, UNI_FLAGS_NONE);
 338                 init_uni_hdr(&r_l->hdr_dns_dom_name, &r_l->uni_dns_dom_name);
 339                 r_l->hdr_dns_dom_name.uni_max_len += 2;
 340                 r_l->uni_dns_dom_name.uni_max_len += 1;
 341         }
 342
 343         if (forest_name && *forest_name) {
 344                 init_unistr2(&r_l->uni_forest_name, forest_name, UNI_FLAGS_NONE);
 345                 init_uni_hdr(&r_l->hdr_forest_name, &r_l->uni_forest_name);
 346                 r_l->hdr_forest_name.uni_max_len += 2;
 347                 r_l->uni_forest_name.uni_max_len += 1;
 348         }
 349
 350         /* how do we init the guid ? probably should write an init fn */
 351         if (dom_guid) {
 352                 memcpy(&r_l->dom_guid, dom_guid, sizeof(struct GUID));
 353         }
 354
 355         if (dom_sid) {
 356                 r_l->ptr_dom_sid = 1;
 357                 init_dom_sid2(&r_l->dom_sid, dom_sid);
 358         }
 359 }
 360 #endif  /* AD DC work in ongoing in Samba 4 */
 361
 362
 363 /***************************************************************************
 364  _lsa_OpenPolicy2
 365  ***************************************************************************/
 366
 367 NTSTATUS _lsa_OpenPolicy2(pipes_struct *p,
 368                           struct lsa_OpenPolicy2 *r)
 369 {
 370         struct lsa_info *info;
 371         SEC_DESC *psd = NULL;
 372         size_t sd_size;
 373         uint32 des_access = r->in.access_mask;
 374         uint32 acc_granted;
 375         NTSTATUS status;
 376
 377
 378         /* map the generic bits to the lsa policy ones */
 379         se_map_generic(&des_access, &lsa_generic_mapping);
 380
 381         /* get the generic lsa policy SD until we store it */
 382         lsa_get_generic_sd(p->mem_ctx, &psd, &sd_size);
 383
 384         status = se_access_check(psd, p->server_info->ptok, des_access,
 385                                  &acc_granted);
 386         if (!NT_STATUS_IS_OK(status)) {
 387                 if (p->server_info->utok.uid != sec_initial_uid()) {
 388                         return status;
 389                 }
 390                 DEBUG(4,("ACCESS should be DENIED (granted: %#010x;  required: %#010x)\n",
 391                          acc_granted, des_access));
 392                 DEBUGADD(4,("but overwritten by euid == 0\n"));
 393         }
 394
 395         /* This is needed for lsa_open_account and rpcclient .... :-) */
 396
 397         if (p->server_info->utok.uid == sec_initial_uid())
 398                 acc_granted = LSA_POLICY_ALL_ACCESS;
 399
 400         /* associate the domain SID with the (unique) handle. */
 401         info = TALLOC_ZERO_P(NULL, struct lsa_info);
 402         if (info == NULL) {
 403                 return NT_STATUS_NO_MEMORY;
 404         }
 405
 406         sid_copy(&info->sid,get_global_sam_sid());
 407         info->access = acc_granted;
 408
 409         /* set up the LSA QUERY INFO response */
 410         if (!create_policy_hnd(p, r->out.handle, free_lsa_info, (void *)info))
 411                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
 412
 413         return NT_STATUS_OK;
 414 }
 415
 416 /***************************************************************************
 417  _lsa_OpenPolicy
 418  ***************************************************************************/
 419
 420 NTSTATUS _lsa_OpenPolicy(pipes_struct *p,
 421                          struct lsa_OpenPolicy *r)
 422 {
 423         struct lsa_info *info;
 424         SEC_DESC *psd = NULL;
 425         size_t sd_size;
 426         uint32 des_access= r->in.access_mask;
 427         uint32 acc_granted;
 428         NTSTATUS status;
 429
 430
 431         /* map the generic bits to the lsa policy ones */
 432         se_map_generic(&des_access, &lsa_generic_mapping);
 433
 434         /* get the generic lsa policy SD until we store it */
 435         lsa_get_generic_sd(p->mem_ctx, &psd, &sd_size);
 436
 437         status = se_access_check(psd, p->server_info->ptok, des_access,
 438                                  &acc_granted);
 439         if (!NT_STATUS_IS_OK(status)) {
 440                 if (p->server_info->utok.uid != sec_initial_uid()) {
 441                         return status;
 442                 }
 443                 DEBUG(4,("ACCESS should be DENIED (granted: %#010x;  required: %#010x)\n",
 444                          acc_granted, des_access));
 445                 DEBUGADD(4,("but overwritten by euid == 0\n"));
 446                 acc_granted = des_access;
 447         }
 448
 449         /* associate the domain SID with the (unique) handle. */
 450         info = TALLOC_ZERO_P(NULL, struct lsa_info);
 451         if (info == NULL) {
 452                 return NT_STATUS_NO_MEMORY;
 453         }
 454
 455         sid_copy(&info->sid,get_global_sam_sid());
 456         info->access = acc_granted;
 457
 458         /* set up the LSA QUERY INFO response */
 459         if (!create_policy_hnd(p, r->out.handle, free_lsa_info, (void *)info))
 460                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
 461
 462         return NT_STATUS_OK;
 463 }
 464
 465 /***************************************************************************
 466  _lsa_EnumTrustDom - this needs fixing to do more than return NULL ! JRA.
 467  ufff, done :)  mimir
 468  ***************************************************************************/
 469
 470 NTSTATUS _lsa_EnumTrustDom(pipes_struct *p,
 471                            struct lsa_EnumTrustDom *r)
 472 {
 473         struct lsa_info *info;
 474         uint32 next_idx;
 475         struct trustdom_info **domains;
 476         struct lsa_DomainInfo *lsa_domains = NULL;
 477         int i;
 478
 479         /*
 480          * preferred length is set to 5 as a "our" preferred length
 481          * nt sets this parameter to 2
 482          * update (20.08.2002): it's not preferred length, but preferred size!
 483          * it needs further investigation how to optimally choose this value
 484          */
 485         uint32 max_num_domains =
 486                 r->in.max_size < 5 ? r->in.max_size : 10;
 487         uint32 num_domains;
 488         NTSTATUS nt_status;
 489         uint32 num_thistime;
 490
 491         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info))
 492                 return NT_STATUS_INVALID_HANDLE;
 493
 494         /* check if the user has enough rights */
 495         if (!(info->access & LSA_POLICY_VIEW_LOCAL_INFORMATION))
 496                 return NT_STATUS_ACCESS_DENIED;
 497
 498         become_root();
 499         nt_status = pdb_enum_trusteddoms(p->mem_ctx, &num_domains, &domains);
 500         unbecome_root();
 501
 502         if (!NT_STATUS_IS_OK(nt_status)) {
 503                 return nt_status;
 504         }
 505
 506         if (*r->in.resume_handle < num_domains) {
 507                 num_thistime = MIN(num_domains, max_num_domains);
 508
 509                 nt_status = STATUS_MORE_ENTRIES;
 510
 511                 if (*r->in.resume_handle + num_thistime > num_domains) {
 512                         num_thistime = num_domains - *r->in.resume_handle;
 513                         nt_status = NT_STATUS_OK;
 514                 }
 515
 516                 next_idx = *r->in.resume_handle + num_thistime;
 517         } else {
 518                 num_thistime = 0;
 519                 next_idx = 0xffffffff;
 520                 nt_status = NT_STATUS_NO_MORE_ENTRIES;
 521         }
 522
 523         /* set up the lsa_enum_trust_dom response */
 524
 525         lsa_domains = TALLOC_ZERO_ARRAY(p->mem_ctx, struct lsa_DomainInfo,
 526                                         num_thistime);
 527         if (!lsa_domains) {
 528                 return NT_STATUS_NO_MEMORY;
 529         }
 530
 531         for (i=0; i<num_thistime; i++) {
 532                 init_lsa_StringLarge(&lsa_domains[i].name, domains[i]->name);
 533                 lsa_domains[i].sid = &domains[i]->sid;
 534         }
 535
 536         *r->out.resume_handle = next_idx;
 537         r->out.domains->count = num_thistime;
 538         r->out.domains->domains = lsa_domains;
 539
 540         return nt_status;
 541 }
 542
 543 #define LSA_AUDIT_NUM_CATEGORIES_NT4    7
 544 #define LSA_AUDIT_NUM_CATEGORIES_WIN2K  9
 545 #define LSA_AUDIT_NUM_CATEGORIES LSA_AUDIT_NUM_CATEGORIES_NT4
 546
 547 /***************************************************************************
 548  _lsa_QueryInfoPolicy
 549  ***************************************************************************/
 550
 551 NTSTATUS _lsa_QueryInfoPolicy(pipes_struct *p,
 552                               struct lsa_QueryInfoPolicy *r)
 553 {
 554         NTSTATUS status = NT_STATUS_OK;
 555         struct lsa_info *handle;
 556         DOM_SID domain_sid;
 557         const char *name;
 558         DOM_SID *sid = NULL;
 559         union lsa_PolicyInformation *info = NULL;
 560
 561         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle))
 562                 return NT_STATUS_INVALID_HANDLE;
 563
 564         info = TALLOC_ZERO_P(p->mem_ctx, union lsa_PolicyInformation);
 565         if (!info) {
 566                 return NT_STATUS_NO_MEMORY;
 567         }
 568
 569         switch (r->in.level) {
 570         case 0x02:
 571                 {
 572
 573                 uint32 policy_def = LSA_AUDIT_POLICY_ALL;
 574
 575                 /* check if the user has enough rights */
 576                 if (!(handle->access & LSA_POLICY_VIEW_AUDIT_INFORMATION)) {
 577                         DEBUG(10,("_lsa_QueryInfoPolicy: insufficient access rights\n"));
 578                         return NT_STATUS_ACCESS_DENIED;
 579                 }
 580
 581                 /* fake info: We audit everything. ;) */
 582
 583                 info->audit_events.auditing_mode = true;
 584                 info->audit_events.count = LSA_AUDIT_NUM_CATEGORIES;
 585                 info->audit_events.settings = TALLOC_ZERO_ARRAY(p->mem_ctx,
 586                                                                 enum lsa_PolicyAuditPolicy,
 587                                                                 info->audit_events.count);
 588                 if (!info->audit_events.settings) {
 589                         return NT_STATUS_NO_MEMORY;
 590                 }
 591
 592                 info->audit_events.settings[LSA_AUDIT_CATEGORY_ACCOUNT_MANAGEMENT] = policy_def;
 593                 info->audit_events.settings[LSA_AUDIT_CATEGORY_FILE_AND_OBJECT_ACCESS] = policy_def;
 594                 info->audit_events.settings[LSA_AUDIT_CATEGORY_LOGON] = policy_def;
 595                 info->audit_events.settings[LSA_AUDIT_CATEGORY_PROCCESS_TRACKING] = policy_def;
 596                 info->audit_events.settings[LSA_AUDIT_CATEGORY_SECURITY_POLICY_CHANGES] = policy_def;
 597                 info->audit_events.settings[LSA_AUDIT_CATEGORY_SYSTEM] = policy_def;
 598                 info->audit_events.settings[LSA_AUDIT_CATEGORY_USE_OF_USER_RIGHTS] = policy_def;
 599
 600                 break;
 601                 }
 602         case 0x03:
 603                 /* check if the user has enough rights */
 604                 if (!(handle->access & LSA_POLICY_VIEW_LOCAL_INFORMATION))
 605                         return NT_STATUS_ACCESS_DENIED;
 606
 607                 /* Request PolicyPrimaryDomainInformation. */
 608                 switch (lp_server_role()) {
 609                         case ROLE_DOMAIN_PDC:
 610                         case ROLE_DOMAIN_BDC:
 611                                 name = get_global_sam_name();
 612                                 sid = sid_dup_talloc(p->mem_ctx, get_global_sam_sid());
 613                                 if (!sid) {
 614                                         return NT_STATUS_NO_MEMORY;
 615                                 }
 616                                 break;
 617                         case ROLE_DOMAIN_MEMBER:
 618                                 name = lp_workgroup();
 619                                 /* We need to return the Domain SID here. */
 620                                 if (secrets_fetch_domain_sid(lp_workgroup(), &domain_sid)) {
 621                                         sid = sid_dup_talloc(p->mem_ctx, &domain_sid);
 622                                         if (!sid) {
 623                                                 return NT_STATUS_NO_MEMORY;
 624                                         }
 625                                 } else {
 626                                         return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
 627                                 }
 628                                 break;
 629                         case ROLE_STANDALONE:
 630                                 name = lp_workgroup();
 631                                 sid = NULL;
 632                                 break;
 633                         default:
 634                                 return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
 635                 }
 636                 init_dom_query_3(&info->domain, name, sid);
 637                 break;
 638         case 0x05:
 639                 /* check if the user has enough rights */
 640                 if (!(handle->access & LSA_POLICY_VIEW_LOCAL_INFORMATION))
 641                         return NT_STATUS_ACCESS_DENIED;
 642
 643                 /* Request PolicyAccountDomainInformation. */
 644                 name = get_global_sam_name();
 645                 sid = get_global_sam_sid();
 646
 647                 init_dom_query_5(&info->account_domain, name, sid);
 648                 break;
 649         case 0x06:
 650                 /* check if the user has enough rights */
 651                 if (!(handle->access & LSA_POLICY_VIEW_LOCAL_INFORMATION))
 652                         return NT_STATUS_ACCESS_DENIED;
 653
 654                 switch (lp_server_role()) {
 655                         case ROLE_DOMAIN_BDC:
 656                                 /*
 657                                  * only a BDC is a backup controller
 658                                  * of the domain, it controls.
 659                                  */
 660                                 info->role.role = 2;
 661                                 break;
 662                         default:
 663                                 /*
 664                                  * any other role is a primary
 665                                  * of the domain, it controls.
 666                                  */
 667                                 info->role.role = 3;
 668                                 break;
 669                 }
 670                 break;
 671         default:
 672                 DEBUG(0,("_lsa_QueryInfoPolicy: unknown info level in Lsa Query: %d\n",
 673                         r->in.level));
 674                 status = NT_STATUS_INVALID_INFO_CLASS;
 675                 break;
 676         }
 677
 678         *r->out.info = info;
 679
 680         return status;
 681 }
 682
 683 /***************************************************************************
 684  _lsa_lookup_sids_internal
 685  ***************************************************************************/
 686
 687 static NTSTATUS _lsa_lookup_sids_internal(pipes_struct *p,
 688                                           TALLOC_CTX *mem_ctx,
 689                                           uint16_t level,                       /* input */
 690                                           int num_sids,                         /* input */
 691                                           struct lsa_SidPtr *sid,               /* input */
 692                                           struct lsa_RefDomainList **pp_ref,    /* input/output */
 693                                           struct lsa_TranslatedName2 **pp_names,/* input/output */
 694                                           uint32_t *pp_mapped_count)            /* input/output */
 695 {
 696         NTSTATUS status;
 697         int i;
 698         const DOM_SID **sids = NULL;
 699         struct lsa_RefDomainList *ref = NULL;
 700         uint32 mapped_count = 0;
 701         struct lsa_dom_info *dom_infos = NULL;
 702         struct lsa_name_info *name_infos = NULL;
 703         struct lsa_TranslatedName2 *names = NULL;
 704
 705         *pp_mapped_count = 0;
 706         *pp_names = NULL;
 707         *pp_ref = NULL;
 708
 709         if (num_sids == 0) {
 710                 return NT_STATUS_OK;
 711         }
 712
 713         sids = TALLOC_ARRAY(p->mem_ctx, const DOM_SID *, num_sids);
 714         ref = TALLOC_ZERO_P(p->mem_ctx, struct lsa_RefDomainList);
 715
 716         if (sids == NULL || ref == NULL) {
 717                 return NT_STATUS_NO_MEMORY;
 718         }
 719
 720         for (i=0; i<num_sids; i++) {
 721                 sids[i] = sid[i].sid;
 722         }
 723
 724         status = lookup_sids(p->mem_ctx, num_sids, sids, level,
 725                                   &dom_infos, &name_infos);
 726
 727         if (!NT_STATUS_IS_OK(status)) {
 728                 return status;
 729         }
 730
 731         names = TALLOC_ARRAY(p->mem_ctx, struct lsa_TranslatedName2, num_sids);
 732         if (names == NULL) {
 733                 return NT_STATUS_NO_MEMORY;
 734         }
 735
 736         for (i=0; i<LSA_REF_DOMAIN_LIST_MULTIPLIER; i++) {
 737
 738                 if (!dom_infos[i].valid) {
 739                         break;
 740                 }
 741
 742                 if (init_lsa_ref_domain_list(mem_ctx, ref,
 743                                              dom_infos[i].name,
 744                                              &dom_infos[i].sid) != i) {
 745                         DEBUG(0, ("Domain %s mentioned twice??\n",
 746                                   dom_infos[i].name));
 747                         return NT_STATUS_INTERNAL_ERROR;
 748                 }
 749         }
 750
 751         for (i=0; i<num_sids; i++) {
 752                 struct lsa_name_info *name = &name_infos[i];
 753
 754                 if (name->type == SID_NAME_UNKNOWN) {
 755                         fstring tmp;
 756                         name->dom_idx = -1;
 757                         /* Unknown sids should return the string
 758                          * representation of the SID. Windows 2003 behaves
 759                          * rather erratic here, in many cases it returns the
 760                          * RID as 8 bytes hex, in others it returns the full
 761                          * SID. We (Jerry/VL) could not figure out which the
 762                          * hard cases are, so leave it with the SID.  */
 763                         name->name = talloc_asprintf(p->mem_ctx, "%s",
 764                                                      sid_to_fstring(tmp,
 765                                                                     sids[i]));
 766                         if (name->name == NULL) {
 767                                 return NT_STATUS_NO_MEMORY;
 768                         }
 769                 } else {
 770                         mapped_count += 1;
 771                 }
 772
 773                 names[i].sid_type       = name->type;
 774                 names[i].name.string    = name->name;
 775                 names[i].sid_index      = name->dom_idx;
 776                 names[i].unknown        = 0;
 777         }
 778
 779         status = NT_STATUS_NONE_MAPPED;
 780         if (mapped_count > 0) {
 781                 status = (mapped_count < num_sids) ?
 782                         STATUS_SOME_UNMAPPED : NT_STATUS_OK;
 783         }
 784
 785         DEBUG(10, ("num_sids %d, mapped_count %d, status %s\n",
 786                    num_sids, mapped_count, nt_errstr(status)));
 787
 788         *pp_mapped_count = mapped_count;
 789         *pp_names = names;
 790         *pp_ref = ref;
 791
 792         return status;
 793 }
 794
 795 /***************************************************************************
 796  _lsa_LookupSids
 797  ***************************************************************************/
 798
 799 NTSTATUS _lsa_LookupSids(pipes_struct *p,
 800                          struct lsa_LookupSids *r)
 801 {
 802         NTSTATUS status;
 803         struct lsa_info *handle;
 804         int num_sids = r->in.sids->num_sids;
 805         uint32 mapped_count = 0;
 806         struct lsa_RefDomainList *domains = NULL;
 807         struct lsa_TranslatedName *names_out = NULL;
 808         struct lsa_TranslatedName2 *names = NULL;
 809         int i;
 810
 811         if ((r->in.level < 1) || (r->in.level > 6)) {
 812                 return NT_STATUS_INVALID_PARAMETER;
 813         }
 814
 815         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle)) {
 816                 return NT_STATUS_INVALID_HANDLE;
 817         }
 818
 819         /* check if the user has enough rights */
 820         if (!(handle->access & LSA_POLICY_LOOKUP_NAMES)) {
 821                 return NT_STATUS_ACCESS_DENIED;
 822         }
 823
 824         if (num_sids >  MAX_LOOKUP_SIDS) {
 825                 DEBUG(5,("_lsa_LookupSids: limit of %d exceeded, requested %d\n",
 826                          MAX_LOOKUP_SIDS, num_sids));
 827                 return NT_STATUS_NONE_MAPPED;
 828         }
 829
 830         status = _lsa_lookup_sids_internal(p,
 831                                            p->mem_ctx,
 832                                            r->in.level,
 833                                            num_sids,
 834                                            r->in.sids->sids,
 835                                            &domains,
 836                                            &names,
 837                                            &mapped_count);
 838
 839         /* Convert from lsa_TranslatedName2 to lsa_TranslatedName */
 840         names_out = TALLOC_ARRAY(p->mem_ctx, struct lsa_TranslatedName,
 841                                  num_sids);
 842         if (!names_out) {
 843                 return NT_STATUS_NO_MEMORY;
 844         }
 845
 846         for (i=0; i<num_sids; i++) {
 847                 names_out[i].sid_type = names[i].sid_type;
 848                 names_out[i].name = names[i].name;
 849                 names_out[i].sid_index = names[i].sid_index;
 850         }
 851
 852         *r->out.domains = domains;
 853         r->out.names->count = num_sids;
 854         r->out.names->names = names_out;
 855         *r->out.count = mapped_count;
 856
 857         return status;
 858 }
 859
 860 /***************************************************************************
 861  _lsa_LookupSids2
 862  ***************************************************************************/
 863
 864 NTSTATUS _lsa_LookupSids2(pipes_struct *p,
 865                           struct lsa_LookupSids2 *r)
 866 {
 867         NTSTATUS status;
 868         struct lsa_info *handle;
 869         int num_sids = r->in.sids->num_sids;
 870         uint32 mapped_count = 0;
 871         struct lsa_RefDomainList *domains = NULL;
 872         struct lsa_TranslatedName2 *names = NULL;
 873         bool check_policy = true;
 874
 875         switch (p->hdr_req.opnum) {
 876                 case NDR_LSA_LOOKUPSIDS3:
 877                         check_policy = false;
 878                         break;
 879                 case NDR_LSA_LOOKUPSIDS2:
 880                 default:
 881                         check_policy = true;
 882         }
 883
 884         if ((r->in.level < 1) || (r->in.level > 6)) {
 885                 return NT_STATUS_INVALID_PARAMETER;
 886         }
 887
 888         if (check_policy) {
 889                 if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle)) {
 890                         return NT_STATUS_INVALID_HANDLE;
 891                 }
 892
 893                 /* check if the user has enough rights */
 894                 if (!(handle->access & LSA_POLICY_LOOKUP_NAMES)) {
 895                         return NT_STATUS_ACCESS_DENIED;
 896                 }
 897         }
 898
 899         if (num_sids >  MAX_LOOKUP_SIDS) {
 900                 DEBUG(5,("_lsa_LookupSids2: limit of %d exceeded, requested %d\n",
 901                          MAX_LOOKUP_SIDS, num_sids));
 902                 return NT_STATUS_NONE_MAPPED;
 903         }
 904
 905         status = _lsa_lookup_sids_internal(p,
 906                                            p->mem_ctx,
 907                                            r->in.level,
 908                                            num_sids,
 909                                            r->in.sids->sids,
 910                                            &domains,
 911                                            &names,
 912                                            &mapped_count);
 913
 914         *r->out.domains = domains;
 915         r->out.names->count = num_sids;
 916         r->out.names->names = names;
 917         *r->out.count = mapped_count;
 918
 919         return status;
 920 }
 921
 922 /***************************************************************************
 923  _lsa_LookupSids3
 924  ***************************************************************************/
 925
 926 NTSTATUS _lsa_LookupSids3(pipes_struct *p,
 927                           struct lsa_LookupSids3 *r)
 928 {
 929         struct lsa_LookupSids2 q;
 930
 931         /* No policy handle on this call. Restrict to crypto connections. */
 932         if (p->auth.auth_type != PIPE_AUTH_TYPE_SCHANNEL) {
 933                 DEBUG(0,("_lsa_LookupSids3: client %s not using schannel for netlogon\n",
 934                         get_remote_machine_name() ));
 935                 return NT_STATUS_INVALID_PARAMETER;
 936         }
 937
 938         q.in.handle             = NULL;
 939         q.in.sids               = r->in.sids;
 940         q.in.level              = r->in.level;
 941         q.in.unknown1           = r->in.unknown1;
 942         q.in.unknown2           = r->in.unknown2;
 943         q.in.names              = r->in.names;
 944         q.in.count              = r->in.count;
 945
 946         q.out.domains           = r->out.domains;
 947         q.out.names             = r->out.names;
 948         q.out.count             = r->out.count;
 949
 950         return _lsa_LookupSids2(p, &q);
 951 }
 952
 953 /***************************************************************************
 954  ***************************************************************************/
 955
 956 static int lsa_lookup_level_to_flags(uint16 level)
 957 {
 958         int flags;
 959
 960         switch (level) {
 961                 case 1:
 962                         flags = LOOKUP_NAME_ALL;
 963                         break;
 964                 case 2:
 965                         flags = LOOKUP_NAME_DOMAIN|LOOKUP_NAME_REMOTE|LOOKUP_NAME_ISOLATED;
 966                         break;
 967                 case 3:
 968                         flags = LOOKUP_NAME_DOMAIN|LOOKUP_NAME_ISOLATED;
 969                         break;
 970                 case 4:
 971                 case 5:
 972                 case 6:
 973                 default:
 974                         flags = LOOKUP_NAME_NONE;
 975                         break;
 976         }
 977
 978         return flags;
 979 }
 980
 981 /***************************************************************************
 982  _lsa_LookupNames
 983  ***************************************************************************/
 984
 985 NTSTATUS _lsa_LookupNames(pipes_struct *p,
 986                           struct lsa_LookupNames *r)
 987 {
 988         NTSTATUS status = NT_STATUS_NONE_MAPPED;
 989         struct lsa_info *handle;
 990         struct lsa_String *names = r->in.names;
 991         uint32 num_entries = r->in.num_names;
 992         struct lsa_RefDomainList *domains = NULL;
 993         struct lsa_TranslatedSid *rids = NULL;
 994         uint32 mapped_count = 0;
 995         int flags = 0;
 996
 997         if (num_entries >  MAX_LOOKUP_SIDS) {
 998                 num_entries = MAX_LOOKUP_SIDS;
 999                 DEBUG(5,("_lsa_LookupNames: truncating name lookup list to %d\n",
1000                         num_entries));
1001         }
1002
1003         flags = lsa_lookup_level_to_flags(r->in.level);
1004
1005         domains = TALLOC_ZERO_P(p->mem_ctx, struct lsa_RefDomainList);
1006         if (!domains) {
1007                 return NT_STATUS_NO_MEMORY;
1008         }
1009
1010         if (num_entries) {
1011                 rids = TALLOC_ZERO_ARRAY(p->mem_ctx, struct lsa_TranslatedSid,
1012                                          num_entries);
1013                 if (!rids) {
1014                         return NT_STATUS_NO_MEMORY;
1015                 }
1016         } else {
1017                 rids = NULL;
1018         }
1019
1020         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle)) {
1021                 status = NT_STATUS_INVALID_HANDLE;
1022                 goto done;
1023         }
1024
1025         /* check if the user has enough rights */
1026         if (!(handle->access & LSA_POLICY_LOOKUP_NAMES)) {
1027                 status = NT_STATUS_ACCESS_DENIED;
1028                 goto done;
1029         }
1030
1031         /* set up the LSA Lookup RIDs response */
1032         become_root(); /* lookup_name can require root privs */
1033         status = lookup_lsa_rids(p->mem_ctx, domains, rids, num_entries,
1034                                  names, flags, &mapped_count);
1035         unbecome_root();
1036
1037 done:
1038
1039         if (NT_STATUS_IS_OK(status) && (num_entries != 0) ) {
1040                 if (mapped_count == 0) {
1041                         status = NT_STATUS_NONE_MAPPED;
1042                 } else if (mapped_count != num_entries) {
1043                         status = STATUS_SOME_UNMAPPED;
1044                 }
1045         }
1046
1047         *r->out.count = mapped_count;
1048         *r->out.domains = domains;
1049         r->out.sids->sids = rids;
1050         r->out.sids->count = num_entries;
1051
1052         return status;
1053 }
1054
1055 /***************************************************************************
1056  _lsa_LookupNames2
1057  ***************************************************************************/
1058
1059 NTSTATUS _lsa_LookupNames2(pipes_struct *p,
1060                            struct lsa_LookupNames2 *r)
1061 {
1062         NTSTATUS status;
1063         struct lsa_LookupNames q;
1064         struct lsa_TransSidArray2 *sid_array2 = r->in.sids;
1065         struct lsa_TransSidArray *sid_array = NULL;
1066         uint32_t i;
1067
1068         sid_array = TALLOC_ZERO_P(p->mem_ctx, struct lsa_TransSidArray);
1069         if (!sid_array) {
1070                 return NT_STATUS_NO_MEMORY;
1071         }
1072
1073         q.in.handle             = r->in.handle;
1074         q.in.num_names          = r->in.num_names;
1075         q.in.names              = r->in.names;
1076         q.in.level              = r->in.level;
1077         q.in.sids               = sid_array;
1078         q.in.count              = r->in.count;
1079         /* we do not know what this is for */
1080         /*                      = r->in.unknown1; */
1081         /*                      = r->in.unknown2; */
1082
1083         q.out.domains           = r->out.domains;
1084         q.out.sids              = sid_array;
1085         q.out.count             = r->out.count;
1086
1087         status = _lsa_LookupNames(p, &q);
1088
1089         sid_array2->sids = TALLOC_ARRAY(p->mem_ctx, struct lsa_TranslatedSid2, sid_array->count);
1090         if (!sid_array2->sids) {
1091                 return NT_STATUS_NO_MEMORY;
1092         }
1093
1094         for (i=0; i<sid_array->count; i++) {
1095                 sid_array2->sids[i].sid_type  = sid_array->sids[i].sid_type;
1096                 sid_array2->sids[i].rid       = sid_array->sids[i].rid;
1097                 sid_array2->sids[i].sid_index = sid_array->sids[i].sid_index;
1098                 sid_array2->sids[i].unknown   = 0;
1099         }
1100
1101         r->out.sids = sid_array2;
1102
1103         return status;
1104 }
1105
1106 /***************************************************************************
1107  _lsa_LookupNames3
1108  ***************************************************************************/
1109
1110 NTSTATUS _lsa_LookupNames3(pipes_struct *p,
1111                            struct lsa_LookupNames3 *r)
1112 {
1113         NTSTATUS status;
1114         struct lsa_info *handle;
1115         struct lsa_String *names = r->in.names;
1116         uint32 num_entries = r->in.num_names;
1117         struct lsa_RefDomainList *domains = NULL;
1118         struct lsa_TranslatedSid3 *trans_sids = NULL;
1119         uint32 mapped_count = 0;
1120         int flags = 0;
1121         bool check_policy = true;
1122
1123         switch (p->hdr_req.opnum) {
1124                 case NDR_LSA_LOOKUPNAMES4:
1125                         check_policy = false;
1126                         break;
1127                 case NDR_LSA_LOOKUPNAMES3:
1128                 default:
1129                         check_policy = true;
1130         }
1131
1132         if (num_entries >  MAX_LOOKUP_SIDS) {
1133                 num_entries = MAX_LOOKUP_SIDS;
1134                 DEBUG(5,("_lsa_LookupNames3: truncating name lookup list to %d\n", num_entries));
1135         }
1136
1137         /* Probably the lookup_level is some sort of bitmask. */
1138         if (r->in.level == 1) {
1139                 flags = LOOKUP_NAME_ALL;
1140         }
1141
1142         domains = TALLOC_ZERO_P(p->mem_ctx, struct lsa_RefDomainList);
1143         if (!domains) {
1144                 return NT_STATUS_NO_MEMORY;
1145         }
1146
1147         if (num_entries) {
1148                 trans_sids = TALLOC_ZERO_ARRAY(p->mem_ctx, struct lsa_TranslatedSid3,
1149                                                num_entries);
1150                 if (!trans_sids) {
1151                         return NT_STATUS_NO_MEMORY;
1152                 }
1153         } else {
1154                 trans_sids = NULL;
1155         }
1156
1157         if (check_policy) {
1158
1159                 if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle)) {
1160                         status = NT_STATUS_INVALID_HANDLE;
1161                         goto done;
1162                 }
1163
1164                 /* check if the user has enough rights */
1165                 if (!(handle->access & LSA_POLICY_LOOKUP_NAMES)) {
1166                         status = NT_STATUS_ACCESS_DENIED;
1167                         goto done;
1168                 }
1169         }
1170
1171         /* set up the LSA Lookup SIDs response */
1172         become_root(); /* lookup_name can require root privs */
1173         status = lookup_lsa_sids(p->mem_ctx, domains, trans_sids, num_entries,
1174                                  names, flags, &mapped_count);
1175         unbecome_root();
1176
1177 done:
1178
1179         if (NT_STATUS_IS_OK(status)) {
1180                 if (mapped_count == 0) {
1181                         status = NT_STATUS_NONE_MAPPED;
1182                 } else if (mapped_count != num_entries) {
1183                         status = STATUS_SOME_UNMAPPED;
1184                 }
1185         }
1186
1187         *r->out.count = mapped_count;
1188         *r->out.domains = domains;
1189         r->out.sids->sids = trans_sids;
1190         r->out.sids->count = num_entries;
1191
1192         return status;
1193 }
1194
1195 /***************************************************************************
1196  _lsa_LookupNames4
1197  ***************************************************************************/
1198
1199 NTSTATUS _lsa_LookupNames4(pipes_struct *p,
1200                            struct lsa_LookupNames4 *r)
1201 {
1202         struct lsa_LookupNames3 q;
1203
1204         /* No policy handle on this call. Restrict to crypto connections. */
1205         if (p->auth.auth_type != PIPE_AUTH_TYPE_SCHANNEL) {
1206                 DEBUG(0,("_lsa_lookup_names4: client %s not using schannel for netlogon\n",
1207                         get_remote_machine_name() ));
1208                 return NT_STATUS_INVALID_PARAMETER;
1209         }
1210
1211         q.in.handle             = NULL;
1212         q.in.num_names          = r->in.num_names;
1213         q.in.names              = r->in.names;
1214         q.in.level              = r->in.level;
1215         q.in.lookup_options     = r->in.lookup_options;
1216         q.in.client_revision    = r->in.client_revision;
1217         q.in.sids               = r->in.sids;
1218         q.in.count              = r->in.count;
1219
1220         q.out.domains           = r->out.domains;
1221         q.out.sids              = r->out.sids;
1222         q.out.count             = r->out.count;
1223
1224         return _lsa_LookupNames3(p, &q);
1225 }
1226
1227 /***************************************************************************
1228  _lsa_close. Also weird - needs to check if lsa handle is correct. JRA.
1229  ***************************************************************************/
1230
1231 NTSTATUS _lsa_Close(pipes_struct *p, struct lsa_Close *r)
1232 {
1233         if (!find_policy_by_hnd(p, r->in.handle, NULL)) {
1234                 return NT_STATUS_INVALID_HANDLE;
1235         }
1236
1237         close_policy_hnd(p, r->in.handle);
1238         ZERO_STRUCTP(r->out.handle);
1239         return NT_STATUS_OK;
1240 }
1241
1242 /***************************************************************************
1243  ***************************************************************************/
1244
1245 NTSTATUS _lsa_OpenSecret(pipes_struct *p, struct lsa_OpenSecret *r)
1246 {
1247         return NT_STATUS_OBJECT_NAME_NOT_FOUND;
1248 }
1249
1250 /***************************************************************************
1251  ***************************************************************************/
1252
1253 NTSTATUS _lsa_OpenTrustedDomain(pipes_struct *p, struct lsa_OpenTrustedDomain *r)
1254 {
1255         return NT_STATUS_OBJECT_NAME_NOT_FOUND;
1256 }
1257
1258 /***************************************************************************
1259  ***************************************************************************/
1260
1261 NTSTATUS _lsa_CreateTrustedDomain(pipes_struct *p, struct lsa_CreateTrustedDomain *r)
1262 {
1263         return NT_STATUS_ACCESS_DENIED;
1264 }
1265
1266 /***************************************************************************
1267  ***************************************************************************/
1268
1269 NTSTATUS _lsa_CreateSecret(pipes_struct *p, struct lsa_CreateSecret *r)
1270 {
1271         return NT_STATUS_ACCESS_DENIED;
1272 }
1273
1274 /***************************************************************************
1275  ***************************************************************************/
1276
1277 NTSTATUS _lsa_SetSecret(pipes_struct *p, struct lsa_SetSecret *r)
1278 {
1279         return NT_STATUS_ACCESS_DENIED;
1280 }
1281
1282 /***************************************************************************
1283  _lsa_DeleteObject
1284  ***************************************************************************/
1285
1286 NTSTATUS _lsa_DeleteObject(pipes_struct *p,
1287                            struct lsa_DeleteObject *r)
1288 {
1289         return NT_STATUS_ACCESS_DENIED;
1290 }
1291
1292 /***************************************************************************
1293  _lsa_EnumPrivs
1294  ***************************************************************************/
1295
1296 NTSTATUS _lsa_EnumPrivs(pipes_struct *p,
1297                         struct lsa_EnumPrivs *r)
1298 {
1299         struct lsa_info *handle;
1300         uint32 i;
1301         uint32 enum_context = *r->in.resume_handle;
1302         int num_privs = count_all_privileges();
1303         struct lsa_PrivEntry *entries = NULL;
1304         LUID_ATTR luid;
1305
1306         /* remember that the enum_context starts at 0 and not 1 */
1307
1308         if ( enum_context >= num_privs )
1309                 return NT_STATUS_NO_MORE_ENTRIES;
1310
1311         DEBUG(10,("_lsa_EnumPrivs: enum_context:%d total entries:%d\n",
1312                 enum_context, num_privs));
1313
1314         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle))
1315                 return NT_STATUS_INVALID_HANDLE;
1316
1317         /* check if the user has enough rights
1318            I don't know if it's the right one. not documented.  */
1319
1320         if (!(handle->access & LSA_POLICY_VIEW_LOCAL_INFORMATION))
1321                 return NT_STATUS_ACCESS_DENIED;
1322
1323         if (num_privs) {
1324                 entries = TALLOC_ZERO_ARRAY(p->mem_ctx, struct lsa_PrivEntry, num_privs);
1325                 if (!entries) {
1326                         return NT_STATUS_NO_MEMORY;
1327                 }
1328         } else {
1329                 entries = NULL;
1330         }
1331
1332         for (i = 0; i < num_privs; i++) {
1333                 if( i < enum_context) {
1334
1335                         init_lsa_StringLarge(&entries[i].name, NULL);
1336
1337                         entries[i].luid.low = 0;
1338                         entries[i].luid.high = 0;
1339                 } else {
1340
1341                         init_lsa_StringLarge(&entries[i].name, privs[i].name);
1342
1343                         luid = get_privilege_luid( &privs[i].se_priv );
1344
1345                         entries[i].luid.low = luid.luid.low;
1346                         entries[i].luid.high = luid.luid.high;
1347                 }
1348         }
1349
1350         enum_context = num_privs;
1351
1352         *r->out.resume_handle = enum_context;
1353         r->out.privs->count = num_privs;
1354         r->out.privs->privs = entries;
1355
1356         return NT_STATUS_OK;
1357 }
1358
1359 /***************************************************************************
1360  _lsa_LookupPrivDisplayName
1361  ***************************************************************************/
1362
1363 NTSTATUS _lsa_LookupPrivDisplayName(pipes_struct *p,
1364                                     struct lsa_LookupPrivDisplayName *r)
1365 {
1366         struct lsa_info *handle;
1367         const char *description;
1368         struct lsa_StringLarge *lsa_name;
1369
1370         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle))
1371                 return NT_STATUS_INVALID_HANDLE;
1372
1373         /* check if the user has enough rights */
1374
1375         /*
1376          * I don't know if it's the right one. not documented.
1377          */
1378         if (!(handle->access & LSA_POLICY_VIEW_LOCAL_INFORMATION))
1379                 return NT_STATUS_ACCESS_DENIED;
1380
1381         DEBUG(10,("_lsa_LookupPrivDisplayName: name = %s\n", r->in.name->string));
1382
1383         description = get_privilege_dispname(r->in.name->string);
1384         if (!description) {
1385                 DEBUG(10,("_lsa_LookupPrivDisplayName: doesn't exist\n"));
1386                 return NT_STATUS_NO_SUCH_PRIVILEGE;
1387         }
1388
1389         DEBUG(10,("_lsa_LookupPrivDisplayName: display name = %s\n", description));
1390
1391         lsa_name = TALLOC_ZERO_P(p->mem_ctx, struct lsa_StringLarge);
1392         if (!lsa_name) {
1393                 return NT_STATUS_NO_MEMORY;
1394         }
1395
1396         init_lsa_StringLarge(lsa_name, description);
1397
1398         *r->out.returned_language_id = r->in.language_id;
1399         *r->out.disp_name = lsa_name;
1400
1401         return NT_STATUS_OK;
1402 }
1403
1404 /***************************************************************************
1405  _lsa_EnumAccounts
1406  ***************************************************************************/
1407
1408 NTSTATUS _lsa_EnumAccounts(pipes_struct *p,
1409                            struct lsa_EnumAccounts *r)
1410 {
1411         struct lsa_info *handle;
1412         DOM_SID *sid_list;
1413         int i, j, num_entries;
1414         NTSTATUS status;
1415         struct lsa_SidPtr *sids = NULL;
1416
1417         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle))
1418                 return NT_STATUS_INVALID_HANDLE;
1419
1420         if (!(handle->access & LSA_POLICY_VIEW_LOCAL_INFORMATION))
1421                 return NT_STATUS_ACCESS_DENIED;
1422
1423         sid_list = NULL;
1424         num_entries = 0;
1425
1426         /* The only way we can currently find out all the SIDs that have been
1427            privileged is to scan all privileges */
1428
1429         status = privilege_enumerate_accounts(&sid_list, &num_entries);
1430         if (!NT_STATUS_IS_OK(status)) {
1431                 return status;
1432         }
1433
1434         if (*r->in.resume_handle >= num_entries) {
1435                 return NT_STATUS_NO_MORE_ENTRIES;
1436         }
1437
1438         if (num_entries - *r->in.resume_handle) {
1439                 sids = TALLOC_ZERO_ARRAY(p->mem_ctx, struct lsa_SidPtr,
1440                                          num_entries - *r->in.resume_handle);
1441                 if (!sids) {
1442                         SAFE_FREE(sid_list);
1443                         return NT_STATUS_NO_MEMORY;
1444                 }
1445
1446                 for (i = *r->in.resume_handle, j = 0; i < num_entries; i++, j++) {
1447                         sids[j].sid = sid_dup_talloc(p->mem_ctx, &sid_list[i]);
1448                         if (!sids[j].sid) {
1449                                 SAFE_FREE(sid_list);
1450                                 return NT_STATUS_NO_MEMORY;
1451                         }
1452                 }
1453         }
1454
1455         talloc_free(sid_list);
1456
1457         *r->out.resume_handle = num_entries;
1458         r->out.sids->num_sids = num_entries;
1459         r->out.sids->sids = sids;
1460
1461         return NT_STATUS_OK;
1462 }
1463
1464 /***************************************************************************
1465  _lsa_GetUserName
1466  ***************************************************************************/
1467
1468 NTSTATUS _lsa_GetUserName(pipes_struct *p,
1469                           struct lsa_GetUserName *r)
1470 {
1471         const char *username, *domname;
1472         struct lsa_String *account_name = NULL;
1473         struct lsa_String *authority_name = NULL;
1474
1475         if (r->in.account_name &&
1476            *r->in.account_name) {
1477                 return NT_STATUS_INVALID_PARAMETER;
1478         }
1479
1480         if (r->in.authority_name &&
1481            *r->in.authority_name) {
1482                 return NT_STATUS_INVALID_PARAMETER;
1483         }
1484
1485         if (p->server_info->guest) {
1486                 /*
1487                  * I'm 99% sure this is not the right place to do this,
1488                  * global_sid_Anonymous should probably be put into the token
1489                  * instead of the guest id -- vl
1490                  */
1491                 if (!lookup_sid(p->mem_ctx, &global_sid_Anonymous,
1492                                 &domname, &username, NULL)) {
1493                         return NT_STATUS_NO_MEMORY;
1494                 }
1495         } else {
1496                 username = p->server_info->sanitized_username;
1497                 domname = pdb_get_domain(p->server_info->sam_account);
1498         }
1499
1500         account_name = TALLOC_P(p->mem_ctx, struct lsa_String);
1501         if (!account_name) {
1502                 return NT_STATUS_NO_MEMORY;
1503         }
1504         init_lsa_String(account_name, username);
1505
1506         if (r->out.authority_name) {
1507                 authority_name = TALLOC_P(p->mem_ctx, struct lsa_String);
1508                 if (!authority_name) {
1509                         return NT_STATUS_NO_MEMORY;
1510                 }
1511                 init_lsa_String(authority_name, domname);
1512         }
1513
1514         *r->out.account_name = account_name;
1515         if (r->out.authority_name) {
1516                 *r->out.authority_name = authority_name;
1517         }
1518
1519         return NT_STATUS_OK;
1520 }
1521
1522 /***************************************************************************
1523  _lsa_CreateAccount
1524  ***************************************************************************/
1525
1526 NTSTATUS _lsa_CreateAccount(pipes_struct *p,
1527                             struct lsa_CreateAccount *r)
1528 {
1529         struct lsa_info *handle;
1530         struct lsa_info *info;
1531
1532         /* find the connection policy handle. */
1533         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle))
1534                 return NT_STATUS_INVALID_HANDLE;
1535
1536         /* check if the user has enough rights */
1537
1538         /*
1539          * I don't know if it's the right one. not documented.
1540          * but guessed with rpcclient.
1541          */
1542         if (!(handle->access & LSA_POLICY_GET_PRIVATE_INFORMATION))
1543                 return NT_STATUS_ACCESS_DENIED;
1544
1545         /* check to see if the pipe_user is a Domain Admin since
1546            account_pol.tdb was already opened as root, this is all we have */
1547
1548         if ( p->server_info->utok.uid != sec_initial_uid()
1549                 && !nt_token_check_domain_rid( p->server_info->ptok,
1550                                                DOMAIN_GROUP_RID_ADMINS ) )
1551                 return NT_STATUS_ACCESS_DENIED;
1552
1553         if ( is_privileged_sid( r->in.sid ) )
1554                 return NT_STATUS_OBJECT_NAME_COLLISION;
1555
1556         /* associate the user/group SID with the (unique) handle. */
1557
1558         info = TALLOC_ZERO_P(NULL, struct lsa_info);
1559         if (info == NULL) {
1560                 return NT_STATUS_NO_MEMORY;
1561         }
1562
1563         info->sid = *r->in.sid;
1564         info->access = r->in.access_mask;
1565
1566         /* get a (unique) handle.  open a policy on it. */
1567         if (!create_policy_hnd(p, r->out.acct_handle, free_lsa_info, (void *)info))
1568                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
1569
1570         return privilege_create_account( &info->sid );
1571 }
1572
1573
1574 /***************************************************************************
1575  _lsa_OpenAccount
1576  ***************************************************************************/
1577
1578 NTSTATUS _lsa_OpenAccount(pipes_struct *p,
1579                           struct lsa_OpenAccount *r)
1580 {
1581         struct lsa_info *handle;
1582         struct lsa_info *info;
1583
1584         /* find the connection policy handle. */
1585         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle))
1586                 return NT_STATUS_INVALID_HANDLE;
1587
1588         /* check if the user has enough rights */
1589
1590         /*
1591          * I don't know if it's the right one. not documented.
1592          * but guessed with rpcclient.
1593          */
1594         if (!(handle->access & LSA_POLICY_GET_PRIVATE_INFORMATION))
1595                 return NT_STATUS_ACCESS_DENIED;
1596
1597         /* TODO: Fis the parsing routine before reenabling this check! */
1598         #if 0
1599         if (!lookup_sid(&handle->sid, dom_name, name, &type))
1600                 return NT_STATUS_ACCESS_DENIED;
1601         #endif
1602         /* associate the user/group SID with the (unique) handle. */
1603         info = TALLOC_ZERO_P(NULL, struct lsa_info);
1604         if (info == NULL) {
1605                 return NT_STATUS_NO_MEMORY;
1606         }
1607
1608         info->sid = *r->in.sid;
1609         info->access = r->in.access_mask;
1610
1611         /* get a (unique) handle.  open a policy on it. */
1612         if (!create_policy_hnd(p, r->out.acct_handle, free_lsa_info, (void *)info))
1613                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
1614
1615         return NT_STATUS_OK;
1616 }
1617
1618 /***************************************************************************
1619  _lsa_EnumPrivsAccount
1620  For a given SID, enumerate all the privilege this account has.
1621  ***************************************************************************/
1622
1623 NTSTATUS _lsa_EnumPrivsAccount(pipes_struct *p,
1624                                struct lsa_EnumPrivsAccount *r)
1625 {
1626         NTSTATUS status = NT_STATUS_OK;
1627         struct lsa_info *info=NULL;
1628         SE_PRIV mask;
1629         PRIVILEGE_SET privileges;
1630         struct lsa_PrivilegeSet *priv_set = NULL;
1631         struct lsa_LUIDAttribute *luid_attrs = NULL;
1632         int i;
1633
1634         /* find the connection policy handle. */
1635         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info))
1636                 return NT_STATUS_INVALID_HANDLE;
1637
1638         if (!(info->access & LSA_POLICY_VIEW_LOCAL_INFORMATION))
1639                 return NT_STATUS_ACCESS_DENIED;
1640
1641         if ( !get_privileges_for_sids( &mask, &info->sid, 1 ) )
1642                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
1643
1644         privilege_set_init( &privileges );
1645
1646         if ( se_priv_to_privilege_set( &privileges, &mask ) ) {
1647
1648                 DEBUG(10,("_lsa_EnumPrivsAccount: %s has %d privileges\n",
1649                           sid_string_dbg(&info->sid),
1650                           privileges.count));
1651
1652                 priv_set = TALLOC_ZERO_P(p->mem_ctx, struct lsa_PrivilegeSet);
1653                 if (!priv_set) {
1654                         status = NT_STATUS_NO_MEMORY;
1655                         goto done;
1656                 }
1657
1658                 luid_attrs = TALLOC_ZERO_ARRAY(p->mem_ctx,
1659                                                struct lsa_LUIDAttribute,
1660                                                privileges.count);
1661                 if (!luid_attrs) {
1662                         status = NT_STATUS_NO_MEMORY;
1663                         goto done;
1664                 }
1665
1666                 for (i=0; i<privileges.count; i++) {
1667                         luid_attrs[i].luid.low = privileges.set[i].luid.low;
1668                         luid_attrs[i].luid.high = privileges.set[i].luid.high;
1669                         luid_attrs[i].attribute = privileges.set[i].attr;
1670                 }
1671
1672                 priv_set->count = privileges.count;
1673                 priv_set->unknown = 0;
1674                 priv_set->set = luid_attrs;
1675
1676                 *r->out.privs = priv_set;
1677         } else {
1678                 status = NT_STATUS_NO_SUCH_PRIVILEGE;
1679         }
1680
1681  done:
1682         privilege_set_free( &privileges );
1683
1684         return status;
1685 }
1686
1687 /***************************************************************************
1688  _lsa_GetSystemAccessAccount
1689  ***************************************************************************/
1690
1691 NTSTATUS _lsa_GetSystemAccessAccount(pipes_struct *p,
1692                                      struct lsa_GetSystemAccessAccount *r)
1693 {
1694         struct lsa_info *info=NULL;
1695
1696         /* find the connection policy handle. */
1697
1698         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info))
1699                 return NT_STATUS_INVALID_HANDLE;
1700
1701         if (!(info->access & LSA_POLICY_VIEW_LOCAL_INFORMATION))
1702                 return NT_STATUS_ACCESS_DENIED;
1703
1704         if (!lookup_sid(p->mem_ctx, &info->sid, NULL, NULL, NULL))
1705                 return NT_STATUS_ACCESS_DENIED;
1706
1707         /*
1708           0x01 -> Log on locally
1709           0x02 -> Access this computer from network
1710           0x04 -> Log on as a batch job
1711           0x10 -> Log on as a service
1712
1713           they can be ORed together
1714         */
1715
1716         *r->out.access_mask = PR_LOG_ON_LOCALLY | PR_ACCESS_FROM_NETWORK;
1717
1718         return NT_STATUS_OK;
1719 }
1720
1721 /***************************************************************************
1722   update the systemaccount information
1723  ***************************************************************************/
1724
1725 NTSTATUS _lsa_SetSystemAccessAccount(pipes_struct *p,
1726                                      struct lsa_SetSystemAccessAccount *r)
1727 {
1728         struct lsa_info *info=NULL;
1729         GROUP_MAP map;
1730
1731         /* find the connection policy handle. */
1732         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info))
1733                 return NT_STATUS_INVALID_HANDLE;
1734
1735         /* check to see if the pipe_user is a Domain Admin since
1736            account_pol.tdb was already opened as root, this is all we have */
1737
1738         if ( p->server_info->utok.uid != sec_initial_uid()
1739                 && !nt_token_check_domain_rid( p->server_info->ptok,
1740                                                DOMAIN_GROUP_RID_ADMINS ) )
1741                 return NT_STATUS_ACCESS_DENIED;
1742
1743         if (!pdb_getgrsid(&map, info->sid))
1744                 return NT_STATUS_NO_SUCH_GROUP;
1745
1746         return pdb_update_group_mapping_entry(&map);
1747 }
1748
1749 /***************************************************************************
1750  _lsa_AddPrivilegesToAccount
1751  For a given SID, add some privileges.
1752  ***************************************************************************/
1753
1754 NTSTATUS _lsa_AddPrivilegesToAccount(pipes_struct *p,
1755                                      struct lsa_AddPrivilegesToAccount *r)
1756 {
1757         struct lsa_info *info = NULL;
1758         SE_PRIV mask;
1759         struct lsa_PrivilegeSet *set = NULL;
1760
1761         /* find the connection policy handle. */
1762         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info))
1763                 return NT_STATUS_INVALID_HANDLE;
1764
1765         /* check to see if the pipe_user is root or a Domain Admin since
1766            account_pol.tdb was already opened as root, this is all we have */
1767
1768         if ( p->server_info->utok.uid != sec_initial_uid()
1769                 && !nt_token_check_domain_rid( p->server_info->ptok,
1770                                                DOMAIN_GROUP_RID_ADMINS ) )
1771         {
1772                 return NT_STATUS_ACCESS_DENIED;
1773         }
1774
1775         set = r->in.privs;
1776         if ( !privilege_set_to_se_priv( &mask, set ) )
1777                 return NT_STATUS_NO_SUCH_PRIVILEGE;
1778
1779         if ( !grant_privilege( &info->sid, &mask ) ) {
1780                 DEBUG(3,("_lsa_AddPrivilegesToAccount: grant_privilege(%s) failed!\n",
1781                          sid_string_dbg(&info->sid) ));
1782                 DEBUG(3,("Privilege mask:\n"));
1783                 dump_se_priv( DBGC_ALL, 3, &mask );
1784                 return NT_STATUS_NO_SUCH_PRIVILEGE;
1785         }
1786
1787         return NT_STATUS_OK;
1788 }
1789
1790 /***************************************************************************
1791  _lsa_RemovePrivilegesFromAccount
1792  For a given SID, remove some privileges.
1793  ***************************************************************************/
1794
1795 NTSTATUS _lsa_RemovePrivilegesFromAccount(pipes_struct *p,
1796                                           struct lsa_RemovePrivilegesFromAccount *r)
1797 {
1798         struct lsa_info *info = NULL;
1799         SE_PRIV mask;
1800         struct lsa_PrivilegeSet *set = NULL;
1801
1802         /* find the connection policy handle. */
1803         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info))
1804                 return NT_STATUS_INVALID_HANDLE;
1805
1806         /* check to see if the pipe_user is root or a Domain Admin since
1807            account_pol.tdb was already opened as root, this is all we have */
1808
1809         if ( p->server_info->utok.uid != sec_initial_uid()
1810                 && !nt_token_check_domain_rid( p->server_info->ptok,
1811                                                DOMAIN_GROUP_RID_ADMINS ) )
1812         {
1813                 return NT_STATUS_ACCESS_DENIED;
1814         }
1815
1816         set = r->in.privs;
1817
1818         if ( !privilege_set_to_se_priv( &mask, set ) )
1819                 return NT_STATUS_NO_SUCH_PRIVILEGE;
1820
1821         if ( !revoke_privilege( &info->sid, &mask ) ) {
1822                 DEBUG(3,("_lsa_RemovePrivilegesFromAccount: revoke_privilege(%s) failed!\n",
1823                          sid_string_dbg(&info->sid) ));
1824                 DEBUG(3,("Privilege mask:\n"));
1825                 dump_se_priv( DBGC_ALL, 3, &mask );
1826                 return NT_STATUS_NO_SUCH_PRIVILEGE;
1827         }
1828
1829         return NT_STATUS_OK;
1830 }
1831
1832 /***************************************************************************
1833  _lsa_QuerySecurity
1834  ***************************************************************************/
1835
1836 NTSTATUS _lsa_QuerySecurity(pipes_struct *p,
1837                             struct lsa_QuerySecurity *r)
1838 {
1839         struct lsa_info *handle=NULL;
1840         SEC_DESC *psd = NULL;
1841         size_t sd_size;
1842         NTSTATUS status;
1843
1844         /* find the connection policy handle. */
1845         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&handle))
1846                 return NT_STATUS_INVALID_HANDLE;
1847
1848         /* check if the user has enough rights */
1849         if (!(handle->access & LSA_POLICY_VIEW_LOCAL_INFORMATION))
1850                 return NT_STATUS_ACCESS_DENIED;
1851
1852         switch (r->in.sec_info) {
1853         case 1:
1854                 /* SD contains only the owner */
1855
1856                 status=lsa_get_generic_sd(p->mem_ctx, &psd, &sd_size);
1857                 if(!NT_STATUS_IS_OK(status))
1858                         return NT_STATUS_NO_MEMORY;
1859
1860
1861                 if((*r->out.sdbuf = make_sec_desc_buf(p->mem_ctx, sd_size, psd)) == NULL)
1862                         return NT_STATUS_NO_MEMORY;
1863                 break;
1864         case 4:
1865                 /* SD contains only the ACL */
1866
1867                 status=lsa_get_generic_sd(p->mem_ctx, &psd, &sd_size);
1868                 if(!NT_STATUS_IS_OK(status))
1869                         return NT_STATUS_NO_MEMORY;
1870
1871                 if((*r->out.sdbuf = make_sec_desc_buf(p->mem_ctx, sd_size, psd)) == NULL)
1872                         return NT_STATUS_NO_MEMORY;
1873                 break;
1874         default:
1875                 return NT_STATUS_INVALID_LEVEL;
1876         }
1877
1878         return status;
1879 }
1880
1881 #if 0   /* AD DC work in ongoing in Samba 4 */
1882
1883 /***************************************************************************
1884  ***************************************************************************/
1885
1886  NTSTATUS _lsa_query_info2(pipes_struct *p, LSA_Q_QUERY_INFO2 *q_u, LSA_R_QUERY_INFO2 *r_u)
1887 {
1888         struct lsa_info *handle;
1889         const char *nb_name;
1890         char *dns_name = NULL;
1891         char *forest_name = NULL;
1892         DOM_SID *sid = NULL;
1893         struct GUID guid;
1894         fstring dnsdomname;
1895
1896         ZERO_STRUCT(guid);
1897         r_u->status = NT_STATUS_OK;
1898
1899         if (!find_policy_by_hnd(p, &q_u->pol, (void **)(void *)&handle))
1900                 return NT_STATUS_INVALID_HANDLE;
1901
1902         switch (q_u->info_class) {
1903         case 0x0c:
1904                 /* check if the user has enough rights */
1905                 if (!(handle->access & LSA_POLICY_VIEW_LOCAL_INFORMATION))
1906                         return NT_STATUS_ACCESS_DENIED;
1907
1908                 /* Request PolicyPrimaryDomainInformation. */
1909                 switch (lp_server_role()) {
1910                         case ROLE_DOMAIN_PDC:
1911                         case ROLE_DOMAIN_BDC:
1912                                 nb_name = get_global_sam_name();
1913                                 /* ugly temp hack for these next two */
1914
1915                                 /* This should be a 'netbios domain -> DNS domain' mapping */
1916                                 dnsdomname = get_mydnsdomname(p->mem_ctx);
1917                                 if (!dnsdomname || !*dnsdomname) {
1918                                         return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
1919                                 }
1920                                 strlower_m(dnsdomname);
1921
1922                                 dns_name = dnsdomname;
1923                                 forest_name = dnsdomname;
1924
1925                                 sid = get_global_sam_sid();
1926                                 secrets_fetch_domain_guid(lp_workgroup(), &guid);
1927                                 break;
1928                         default:
1929                                 return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
1930                 }
1931                 init_dns_dom_info(&r_u->info.dns_dom_info, nb_name, dns_name,
1932                                   forest_name,&guid,sid);
1933                 break;
1934         default:
1935                 DEBUG(0,("_lsa_query_info2: unknown info level in Lsa Query: %d\n", q_u->info_class));
1936                 r_u->status = NT_STATUS_INVALID_INFO_CLASS;
1937                 break;
1938         }
1939
1940         if (NT_STATUS_IS_OK(r_u->status)) {
1941                 r_u->ptr = 0x1;
1942                 r_u->info_class = q_u->info_class;
1943         }
1944
1945         return r_u->status;
1946 }
1947 #endif  /* AD DC work in ongoing in Samba 4 */
1948
1949 /***************************************************************************
1950  _lsa_AddAccountRights
1951  ***************************************************************************/
1952
1953 NTSTATUS _lsa_AddAccountRights(pipes_struct *p,
1954                                struct lsa_AddAccountRights *r)
1955 {
1956         struct lsa_info *info = NULL;
1957         int i = 0;
1958         DOM_SID sid;
1959
1960         /* find the connection policy handle. */
1961         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info))
1962                 return NT_STATUS_INVALID_HANDLE;
1963
1964         /* check to see if the pipe_user is a Domain Admin since
1965            account_pol.tdb was already opened as root, this is all we have */
1966
1967         if ( p->server_info->utok.uid != sec_initial_uid()
1968                 && !nt_token_check_domain_rid( p->server_info->ptok,
1969                                                DOMAIN_GROUP_RID_ADMINS ) )
1970         {
1971                 return NT_STATUS_ACCESS_DENIED;
1972         }
1973
1974         /* according to an NT4 PDC, you can add privileges to SIDs even without
1975            call_lsa_create_account() first.  And you can use any arbitrary SID. */
1976
1977         sid_copy( &sid, r->in.sid );
1978
1979         for ( i=0; i < r->in.rights->count; i++ ) {
1980
1981                 const char *privname = r->in.rights->names[i].string;
1982
1983                 /* only try to add non-null strings */
1984
1985                 if ( !privname )
1986                         continue;
1987
1988                 if ( !grant_privilege_by_name( &sid, privname ) ) {
1989                         DEBUG(2,("_lsa_AddAccountRights: Failed to add privilege [%s]\n",
1990                                 privname ));
1991                         return NT_STATUS_NO_SUCH_PRIVILEGE;
1992                 }
1993         }
1994
1995         return NT_STATUS_OK;
1996 }
1997
1998 /***************************************************************************
1999  _lsa_RemoveAccountRights
2000  ***************************************************************************/
2001
2002 NTSTATUS _lsa_RemoveAccountRights(pipes_struct *p,
2003                                   struct lsa_RemoveAccountRights *r)
2004 {
2005         struct lsa_info *info = NULL;
2006         int i = 0;
2007         DOM_SID sid;
2008         const char *privname = NULL;
2009
2010         /* find the connection policy handle. */
2011         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info))
2012                 return NT_STATUS_INVALID_HANDLE;
2013
2014         /* check to see if the pipe_user is a Domain Admin since
2015            account_pol.tdb was already opened as root, this is all we have */
2016
2017         if ( p->server_info->utok.uid != sec_initial_uid()
2018                 && !nt_token_check_domain_rid( p->server_info->ptok,
2019                                                DOMAIN_GROUP_RID_ADMINS ) )
2020         {
2021                 return NT_STATUS_ACCESS_DENIED;
2022         }
2023
2024         sid_copy( &sid, r->in.sid );
2025
2026         if ( r->in.remove_all ) {
2027                 if ( !revoke_all_privileges( &sid ) )
2028                         return NT_STATUS_ACCESS_DENIED;
2029
2030                 return NT_STATUS_OK;
2031         }
2032
2033         for ( i=0; i < r->in.rights->count; i++ ) {
2034
2035                 privname = r->in.rights->names[i].string;
2036
2037                 /* only try to add non-null strings */
2038
2039                 if ( !privname )
2040                         continue;
2041
2042                 if ( !revoke_privilege_by_name( &sid, privname ) ) {
2043                         DEBUG(2,("_lsa_RemoveAccountRights: Failed to revoke privilege [%s]\n",
2044                                 privname ));
2045                         return NT_STATUS_NO_SUCH_PRIVILEGE;
2046                 }
2047         }
2048
2049         return NT_STATUS_OK;
2050 }
2051
2052 /*******************************************************************
2053 ********************************************************************/
2054
2055 static NTSTATUS init_lsa_right_set(TALLOC_CTX *mem_ctx,
2056                                    struct lsa_RightSet *r,
2057                                    PRIVILEGE_SET *privileges)
2058 {
2059         uint32 i;
2060         const char *privname;
2061         const char **privname_array = NULL;
2062         int num_priv = 0;
2063
2064         for (i=0; i<privileges->count; i++) {
2065
2066                 privname = luid_to_privilege_name(&privileges->set[i].luid);
2067                 if (privname) {
2068                         if (!add_string_to_array(mem_ctx, privname,
2069                                                  &privname_array, &num_priv)) {
2070                                 return NT_STATUS_NO_MEMORY;
2071                         }
2072                 }
2073         }
2074
2075         if (num_priv) {
2076
2077                 r->names = TALLOC_ZERO_ARRAY(mem_ctx, struct lsa_StringLarge,
2078                                              num_priv);
2079                 if (!r->names) {
2080                         return NT_STATUS_NO_MEMORY;
2081                 }
2082
2083                 for (i=0; i<num_priv; i++) {
2084                         init_lsa_StringLarge(&r->names[i], privname_array[i]);
2085                 }
2086
2087                 r->count = num_priv;
2088         }
2089
2090         return NT_STATUS_OK;
2091 }
2092
2093 /***************************************************************************
2094  _lsa_EnumAccountRights
2095  ***************************************************************************/
2096
2097 NTSTATUS _lsa_EnumAccountRights(pipes_struct *p,
2098                                 struct lsa_EnumAccountRights *r)
2099 {
2100         NTSTATUS status;
2101         struct lsa_info *info = NULL;
2102         DOM_SID sid;
2103         PRIVILEGE_SET privileges;
2104         SE_PRIV mask;
2105
2106         /* find the connection policy handle. */
2107
2108         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info))
2109                 return NT_STATUS_INVALID_HANDLE;
2110
2111         if (!(info->access & LSA_POLICY_VIEW_LOCAL_INFORMATION))
2112                 return NT_STATUS_ACCESS_DENIED;
2113
2114         /* according to an NT4 PDC, you can add privileges to SIDs even without
2115            call_lsa_create_account() first.  And you can use any arbitrary SID. */
2116
2117         sid_copy( &sid, r->in.sid );
2118
2119         if ( !get_privileges_for_sids( &mask, &sid, 1 ) )
2120                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
2121
2122         privilege_set_init( &privileges );
2123
2124         if ( se_priv_to_privilege_set( &privileges, &mask ) ) {
2125
2126                 DEBUG(10,("_lsa_EnumAccountRights: %s has %d privileges\n",
2127                           sid_string_dbg(&sid), privileges.count));
2128
2129                 status = init_lsa_right_set(p->mem_ctx, r->out.rights, &privileges);
2130         } else {
2131                 status = NT_STATUS_NO_SUCH_PRIVILEGE;
2132         }
2133
2134         privilege_set_free( &privileges );
2135
2136         return status;
2137 }
2138
2139 /***************************************************************************
2140  _lsa_LookupPrivValue
2141  ***************************************************************************/
2142
2143 NTSTATUS _lsa_LookupPrivValue(pipes_struct *p,
2144                               struct lsa_LookupPrivValue *r)
2145 {
2146         struct lsa_info *info = NULL;
2147         const char *name = NULL;
2148         LUID_ATTR priv_luid;
2149         SE_PRIV mask;
2150
2151         /* find the connection policy handle. */
2152
2153         if (!find_policy_by_hnd(p, r->in.handle, (void **)(void *)&info))
2154                 return NT_STATUS_INVALID_HANDLE;
2155
2156         if (!(info->access & LSA_POLICY_VIEW_LOCAL_INFORMATION))
2157                 return NT_STATUS_ACCESS_DENIED;
2158
2159         name = r->in.name->string;
2160
2161         DEBUG(10,("_lsa_lookup_priv_value: name = %s\n", name));
2162
2163         if ( !se_priv_from_name( name, &mask ) )
2164                 return NT_STATUS_NO_SUCH_PRIVILEGE;
2165
2166         priv_luid = get_privilege_luid( &mask );
2167
2168         r->out.luid->low = priv_luid.luid.low;
2169         r->out.luid->high = priv_luid.luid.high;
2170
2171         return NT_STATUS_OK;
2172 }
2173
2174 /*
2175  * From here on the server routines are just dummy ones to make smbd link with
2176  * librpc/gen_ndr/srv_lsa.c. These routines are actually never called, we are
2177  * pulling the server stubs across one by one.
2178  */
2179
2180 NTSTATUS _lsa_Delete(pipes_struct *p, struct lsa_Delete *r)
2181 {
2182         p->rng_fault_state = True;
2183         return NT_STATUS_NOT_IMPLEMENTED;
2184 }
2185
2186 NTSTATUS _lsa_SetSecObj(pipes_struct *p, struct lsa_SetSecObj *r)
2187 {
2188         p->rng_fault_state = True;
2189         return NT_STATUS_NOT_IMPLEMENTED;
2190 }
2191
2192 NTSTATUS _lsa_ChangePassword(pipes_struct *p, struct lsa_ChangePassword *r)
2193 {
2194         p->rng_fault_state = True;
2195         return NT_STATUS_NOT_IMPLEMENTED;
2196 }
2197
2198 NTSTATUS _lsa_SetInfoPolicy(pipes_struct *p, struct lsa_SetInfoPolicy *r)
2199 {
2200         p->rng_fault_state = True;
2201         return NT_STATUS_NOT_IMPLEMENTED;
2202 }
2203
2204 NTSTATUS _lsa_ClearAuditLog(pipes_struct *p, struct lsa_ClearAuditLog *r)
2205 {
2206         p->rng_fault_state = True;
2207         return NT_STATUS_NOT_IMPLEMENTED;
2208 }
2209
2210 NTSTATUS _lsa_GetQuotasForAccount(pipes_struct *p, struct lsa_GetQuotasForAccount *r)
2211 {
2212         p->rng_fault_state = True;
2213         return NT_STATUS_NOT_IMPLEMENTED;
2214 }
2215
2216 NTSTATUS _lsa_SetQuotasForAccount(pipes_struct *p, struct lsa_SetQuotasForAccount *r)
2217 {
2218         p->rng_fault_state = True;
2219         return NT_STATUS_NOT_IMPLEMENTED;
2220 }
2221
2222 NTSTATUS _lsa_QueryTrustedDomainInfo(pipes_struct *p, struct lsa_QueryTrustedDomainInfo *r)
2223 {
2224         p->rng_fault_state = True;
2225         return NT_STATUS_NOT_IMPLEMENTED;
2226 }
2227
2228 NTSTATUS _lsa_SetInformationTrustedDomain(pipes_struct *p, struct lsa_SetInformationTrustedDomain *r)
2229 {
2230         p->rng_fault_state = True;
2231         return NT_STATUS_NOT_IMPLEMENTED;
2232 }
2233
2234 NTSTATUS _lsa_QuerySecret(pipes_struct *p, struct lsa_QuerySecret *r)
2235 {
2236         p->rng_fault_state = True;
2237         return NT_STATUS_NOT_IMPLEMENTED;
2238 }
2239
2240 NTSTATUS _lsa_LookupPrivName(pipes_struct *p, struct lsa_LookupPrivName *r)
2241 {
2242         p->rng_fault_state = True;
2243         return NT_STATUS_NOT_IMPLEMENTED;
2244 }
2245
2246 NTSTATUS _lsa_EnumAccountsWithUserRight(pipes_struct *p, struct lsa_EnumAccountsWithUserRight *r)
2247 {
2248         p->rng_fault_state = True;
2249         return NT_STATUS_NOT_IMPLEMENTED;
2250 }
2251
2252 NTSTATUS _lsa_QueryTrustedDomainInfoBySid(pipes_struct *p, struct lsa_QueryTrustedDomainInfoBySid *r)
2253 {
2254         p->rng_fault_state = True;
2255         return NT_STATUS_NOT_IMPLEMENTED;
2256 }
2257
2258 NTSTATUS _lsa_SetTrustedDomainInfo(pipes_struct *p, struct lsa_SetTrustedDomainInfo *r)
2259 {
2260         p->rng_fault_state = True;
2261         return NT_STATUS_NOT_IMPLEMENTED;
2262 }
2263
2264 NTSTATUS _lsa_DeleteTrustedDomain(pipes_struct *p, struct lsa_DeleteTrustedDomain *r)
2265 {
2266         p->rng_fault_state = True;
2267         return NT_STATUS_NOT_IMPLEMENTED;
2268 }
2269
2270 NTSTATUS _lsa_StorePrivateData(pipes_struct *p, struct lsa_StorePrivateData *r)
2271 {
2272         p->rng_fault_state = True;
2273         return NT_STATUS_NOT_IMPLEMENTED;
2274 }
2275
2276 NTSTATUS _lsa_RetrievePrivateData(pipes_struct *p, struct lsa_RetrievePrivateData *r)
2277 {
2278         p->rng_fault_state = True;
2279         return NT_STATUS_NOT_IMPLEMENTED;
2280 }
2281
2282 NTSTATUS _lsa_QueryInfoPolicy2(pipes_struct *p, struct lsa_QueryInfoPolicy2 *r)
2283 {
2284         p->rng_fault_state = True;
2285         return NT_STATUS_NOT_IMPLEMENTED;
2286 }
2287
2288 NTSTATUS _lsa_SetInfoPolicy2(pipes_struct *p, struct lsa_SetInfoPolicy2 *r)
2289 {
2290         p->rng_fault_state = True;
2291         return NT_STATUS_NOT_IMPLEMENTED;
2292 }
2293
2294 NTSTATUS _lsa_QueryTrustedDomainInfoByName(pipes_struct *p, struct lsa_QueryTrustedDomainInfoByName *r)
2295 {
2296         p->rng_fault_state = True;
2297         return NT_STATUS_NOT_IMPLEMENTED;
2298 }
2299
2300 NTSTATUS _lsa_SetTrustedDomainInfoByName(pipes_struct *p, struct lsa_SetTrustedDomainInfoByName *r)
2301 {
2302         p->rng_fault_state = True;
2303         return NT_STATUS_NOT_IMPLEMENTED;
2304 }
2305
2306 NTSTATUS _lsa_EnumTrustedDomainsEx(pipes_struct *p, struct lsa_EnumTrustedDomainsEx *r)
2307 {
2308         p->rng_fault_state = True;
2309         return NT_STATUS_NOT_IMPLEMENTED;
2310 }
2311
2312 NTSTATUS _lsa_CreateTrustedDomainEx(pipes_struct *p, struct lsa_CreateTrustedDomainEx *r)
2313 {
2314         p->rng_fault_state = True;
2315         return NT_STATUS_NOT_IMPLEMENTED;
2316 }
2317
2318 NTSTATUS _lsa_CloseTrustedDomainEx(pipes_struct *p, struct lsa_CloseTrustedDomainEx *r)
2319 {
2320         p->rng_fault_state = True;
2321         return NT_STATUS_NOT_IMPLEMENTED;
2322 }
2323
2324 NTSTATUS _lsa_QueryDomainInformationPolicy(pipes_struct *p, struct lsa_QueryDomainInformationPolicy *r)
2325 {
2326         p->rng_fault_state = True;
2327         return NT_STATUS_NOT_IMPLEMENTED;
2328 }
2329
2330 NTSTATUS _lsa_SetDomainInformationPolicy(pipes_struct *p, struct lsa_SetDomainInformationPolicy *r)
2331 {
2332         p->rng_fault_state = True;
2333         return NT_STATUS_NOT_IMPLEMENTED;
2334 }
2335
2336 NTSTATUS _lsa_OpenTrustedDomainByName(pipes_struct *p, struct lsa_OpenTrustedDomainByName *r)
2337 {
2338         p->rng_fault_state = True;
2339         return NT_STATUS_NOT_IMPLEMENTED;
2340 }
2341
2342 NTSTATUS _lsa_TestCall(pipes_struct *p, struct lsa_TestCall *r)
2343 {
2344         p->rng_fault_state = True;
2345         return NT_STATUS_NOT_IMPLEMENTED;
2346 }
2347
2348 NTSTATUS _lsa_CreateTrustedDomainEx2(pipes_struct *p, struct lsa_CreateTrustedDomainEx2 *r)
2349 {
2350         p->rng_fault_state = True;
2351         return NT_STATUS_NOT_IMPLEMENTED;
2352 }
2353
2354 NTSTATUS _lsa_CREDRWRITE(pipes_struct *p, struct lsa_CREDRWRITE *r)
2355 {
2356         p->rng_fault_state = True;
2357         return NT_STATUS_NOT_IMPLEMENTED;
2358 }
2359
2360 NTSTATUS _lsa_CREDRREAD(pipes_struct *p, struct lsa_CREDRREAD *r)
2361 {
2362         p->rng_fault_state = True;
2363         return NT_STATUS_NOT_IMPLEMENTED;
2364 }
2365
2366 NTSTATUS _lsa_CREDRENUMERATE(pipes_struct *p, struct lsa_CREDRENUMERATE *r)
2367 {
2368         p->rng_fault_state = True;
2369         return NT_STATUS_NOT_IMPLEMENTED;
2370 }
2371
2372 NTSTATUS _lsa_CREDRWRITEDOMAINCREDENTIALS(pipes_struct *p, struct lsa_CREDRWRITEDOMAINCREDENTIALS *r)
2373 {
2374         p->rng_fault_state = True;
2375         return NT_STATUS_NOT_IMPLEMENTED;
2376 }
2377
2378 NTSTATUS _lsa_CREDRREADDOMAINCREDENTIALS(pipes_struct *p, struct lsa_CREDRREADDOMAINCREDENTIALS *r)
2379 {
2380         p->rng_fault_state = True;
2381         return NT_STATUS_NOT_IMPLEMENTED;
2382 }
2383
2384 NTSTATUS _lsa_CREDRDELETE(pipes_struct *p, struct lsa_CREDRDELETE *r)
2385 {
2386         p->rng_fault_state = True;
2387         return NT_STATUS_NOT_IMPLEMENTED;
2388 }
2389
2390 NTSTATUS _lsa_CREDRGETTARGETINFO(pipes_struct *p, struct lsa_CREDRGETTARGETINFO *r)
2391 {
2392         p->rng_fault_state = True;
2393         return NT_STATUS_NOT_IMPLEMENTED;
2394 }
2395
2396 NTSTATUS _lsa_CREDRPROFILELOADED(pipes_struct *p, struct lsa_CREDRPROFILELOADED *r)
2397 {
2398         p->rng_fault_state = True;
2399         return NT_STATUS_NOT_IMPLEMENTED;
2400 }
2401
2402 NTSTATUS _lsa_CREDRGETSESSIONTYPES(pipes_struct *p, struct lsa_CREDRGETSESSIONTYPES *r)
2403 {
2404         p->rng_fault_state = True;
2405         return NT_STATUS_NOT_IMPLEMENTED;
2406 }
2407
2408 NTSTATUS _lsa_LSARREGISTERAUDITEVENT(pipes_struct *p, struct lsa_LSARREGISTERAUDITEVENT *r)
2409 {
2410         p->rng_fault_state = True;
2411         return NT_STATUS_NOT_IMPLEMENTED;
2412 }
2413
2414 NTSTATUS _lsa_LSARGENAUDITEVENT(pipes_struct *p, struct lsa_LSARGENAUDITEVENT *r)
2415 {
2416         p->rng_fault_state = True;
2417         return NT_STATUS_NOT_IMPLEMENTED;
2418 }
2419
2420 NTSTATUS _lsa_LSARUNREGISTERAUDITEVENT(pipes_struct *p, struct lsa_LSARUNREGISTERAUDITEVENT *r)
2421 {
2422         p->rng_fault_state = True;
2423         return NT_STATUS_NOT_IMPLEMENTED;
2424 }
2425
2426 NTSTATUS _lsa_lsaRQueryForestTrustInformation(pipes_struct *p, struct lsa_lsaRQueryForestTrustInformation *r)
2427 {
2428         p->rng_fault_state = True;
2429         return NT_STATUS_NOT_IMPLEMENTED;
2430 }
2431
2432 NTSTATUS _lsa_LSARSETFORESTTRUSTINFORMATION(pipes_struct *p, struct lsa_LSARSETFORESTTRUSTINFORMATION *r)
2433 {
2434         p->rng_fault_state = True;
2435         return NT_STATUS_NOT_IMPLEMENTED;
2436 }
2437
2438 NTSTATUS _lsa_CREDRRENAME(pipes_struct *p, struct lsa_CREDRRENAME *r)
2439 {
2440         p->rng_fault_state = True;
2441         return NT_STATUS_NOT_IMPLEMENTED;
2442 }
2443
2444 NTSTATUS _lsa_LSAROPENPOLICYSCE(pipes_struct *p, struct lsa_LSAROPENPOLICYSCE *r)
2445 {
2446         p->rng_fault_state = True;
2447         return NT_STATUS_NOT_IMPLEMENTED;
2448 }
2449
2450 NTSTATUS _lsa_LSARADTREGISTERSECURITYEVENTSOURCE(pipes_struct *p, struct lsa_LSARADTREGISTERSECURITYEVENTSOURCE *r)
2451 {
2452         p->rng_fault_state = True;
2453         return NT_STATUS_NOT_IMPLEMENTED;
2454 }
2455
2456 NTSTATUS _lsa_LSARADTUNREGISTERSECURITYEVENTSOURCE(pipes_struct *p, struct lsa_LSARADTUNREGISTERSECURITYEVENTSOURCE *r)
2457 {
2458         p->rng_fault_state = True;
2459         return NT_STATUS_NOT_IMPLEMENTED;
2460 }
2461
2462 NTSTATUS _lsa_LSARADTREPORTSECURITYEVENT(pipes_struct *p, struct lsa_LSARADTREPORTSECURITYEVENT *r)
2463 {
2464         p->rng_fault_state = True;
2465         return NT_STATUS_NOT_IMPLEMENTED;
2466 }