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