source/rpc_server/srv_samr_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) Marc Jacobsen                     1999,
   8  *  Copyright (C) Jeremy Allison                    2001-2005,
   9  *  Copyright (C) Jean François Micouleau           1998-2001,
  10  *  Copyright (C) Jim McDonough <jmcd@us.ibm.com>   2002,
  11  *  Copyright (C) Gerald (Jerry) Carter             2003-2004,
  12  *  Copyright (C) Simo Sorce                        2003.
  13  *  Copyright (C) Volker Lendecke                   2005.
  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 2 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, write to the Free Software
  27  *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  28  */
  29
  30 /*
  31  * This is the implementation of the SAMR code.
  32  */
  33
  34 #include "includes.h"
  35
  36 #undef DBGC_CLASS
  37 #define DBGC_CLASS DBGC_RPC_SRV
  38
  39 #define SAMR_USR_RIGHTS_WRITE_PW \
  40                 ( READ_CONTROL_ACCESS           | \
  41                   SA_RIGHT_USER_CHANGE_PASSWORD | \
  42                   SA_RIGHT_USER_SET_LOC_COM )
  43
  44 #define DISP_INFO_CACHE_TIMEOUT 10
  45
  46 typedef struct disp_info {
  47         struct disp_info *next, *prev;
  48         TALLOC_CTX *mem_ctx;
  49         DOM_SID sid; /* identify which domain this is. */
  50         BOOL builtin_domain; /* Quick flag to check if this is the builtin domain. */
  51         struct pdb_search *users; /* querydispinfo 1 and 4 */
  52         struct pdb_search *machines; /* querydispinfo 2 */
  53         struct pdb_search *groups; /* querydispinfo 3 and 5, enumgroups */
  54         struct pdb_search *aliases; /* enumaliases */
  55
  56         uint16 enum_acb_mask;
  57         struct pdb_search *enum_users; /* enumusers with a mask */
  58
  59
  60         smb_event_id_t di_cache_timeout_event; /* cache idle timeout handler. */
  61 } DISP_INFO;
  62
  63 /* We keep a static list of these by SID as modern clients close down
  64    all resources between each request in a complete enumeration. */
  65
  66 static DISP_INFO *disp_info_list;
  67
  68 struct samr_info {
  69         /* for use by the \PIPE\samr policy */
  70         DOM_SID sid;
  71         BOOL builtin_domain; /* Quick flag to check if this is the builtin domain. */
  72         uint32 status; /* some sort of flag.  best to record it.  comes from opnum 0x39 */
  73         uint32 acc_granted;
  74         DISP_INFO *disp_info;
  75         TALLOC_CTX *mem_ctx;
  76 };
  77
  78 static struct generic_mapping sam_generic_mapping = {
  79         GENERIC_RIGHTS_SAM_READ,
  80         GENERIC_RIGHTS_SAM_WRITE,
  81         GENERIC_RIGHTS_SAM_EXECUTE,
  82         GENERIC_RIGHTS_SAM_ALL_ACCESS};
  83 static struct generic_mapping dom_generic_mapping = {
  84         GENERIC_RIGHTS_DOMAIN_READ,
  85         GENERIC_RIGHTS_DOMAIN_WRITE,
  86         GENERIC_RIGHTS_DOMAIN_EXECUTE,
  87         GENERIC_RIGHTS_DOMAIN_ALL_ACCESS};
  88 static struct generic_mapping usr_generic_mapping = {
  89         GENERIC_RIGHTS_USER_READ,
  90         GENERIC_RIGHTS_USER_WRITE,
  91         GENERIC_RIGHTS_USER_EXECUTE,
  92         GENERIC_RIGHTS_USER_ALL_ACCESS};
  93 static struct generic_mapping grp_generic_mapping = {
  94         GENERIC_RIGHTS_GROUP_READ,
  95         GENERIC_RIGHTS_GROUP_WRITE,
  96         GENERIC_RIGHTS_GROUP_EXECUTE,
  97         GENERIC_RIGHTS_GROUP_ALL_ACCESS};
  98 static struct generic_mapping ali_generic_mapping = {
  99         GENERIC_RIGHTS_ALIAS_READ,
 100         GENERIC_RIGHTS_ALIAS_WRITE,
 101         GENERIC_RIGHTS_ALIAS_EXECUTE,
 102         GENERIC_RIGHTS_ALIAS_ALL_ACCESS};
 103
 104 /*******************************************************************
 105 *******************************************************************/
 106
 107 static NTSTATUS make_samr_object_sd( TALLOC_CTX *ctx, SEC_DESC **psd, size_t *sd_size,
 108                                      struct generic_mapping *map,
 109                                      DOM_SID *sid, uint32 sid_access )
 110 {
 111         DOM_SID domadmin_sid;
 112         SEC_ACE ace[5];         /* at most 5 entries */
 113         SEC_ACCESS mask;
 114         size_t i = 0;
 115
 116         SEC_ACL *psa = NULL;
 117
 118         /* basic access for Everyone */
 119
 120         init_sec_access(&mask, map->generic_execute | map->generic_read );
 121         init_sec_ace(&ace[i++], &global_sid_World, SEC_ACE_TYPE_ACCESS_ALLOWED, mask, 0);
 122
 123         /* add Full Access 'BUILTIN\Administrators' and 'BUILTIN\Account Operators */
 124
 125         init_sec_access(&mask, map->generic_all);
 126
 127         init_sec_ace(&ace[i++], &global_sid_Builtin_Administrators, SEC_ACE_TYPE_ACCESS_ALLOWED, mask, 0);
 128         init_sec_ace(&ace[i++], &global_sid_Builtin_Account_Operators, SEC_ACE_TYPE_ACCESS_ALLOWED, mask, 0);
 129
 130         /* Add Full Access for Domain Admins if we are a DC */
 131
 132         if ( IS_DC ) {
 133                 sid_copy( &domadmin_sid, get_global_sam_sid() );
 134                 sid_append_rid( &domadmin_sid, DOMAIN_GROUP_RID_ADMINS );
 135                 init_sec_ace(&ace[i++], &domadmin_sid, SEC_ACE_TYPE_ACCESS_ALLOWED, mask, 0);
 136         }
 137
 138         /* if we have a sid, give it some special access */
 139
 140         if ( sid ) {
 141                 init_sec_access( &mask, sid_access );
 142                 init_sec_ace(&ace[i++], sid, SEC_ACE_TYPE_ACCESS_ALLOWED, mask, 0);
 143 }
 144
 145         /* create the security descriptor */
 146
 147         if ((psa = make_sec_acl(ctx, NT4_ACL_REVISION, i, ace)) == NULL)
 148                 return NT_STATUS_NO_MEMORY;
 149
 150         if ((*psd = make_sec_desc(ctx, SEC_DESC_REVISION, SEC_DESC_SELF_RELATIVE, NULL, NULL, NULL, psa, sd_size)) == NULL)
 151                 return NT_STATUS_NO_MEMORY;
 152
 153         return NT_STATUS_OK;
 154 }
 155
 156 /*******************************************************************
 157  Checks if access to an object should be granted, and returns that
 158  level of access for further checks.
 159 ********************************************************************/
 160
 161 static NTSTATUS access_check_samr_object( SEC_DESC *psd, NT_USER_TOKEN *token,
 162                                           SE_PRIV *rights, uint32 rights_mask,
 163                                           uint32 des_access, uint32 *acc_granted,
 164                                           const char *debug )
 165 {
 166         NTSTATUS status = NT_STATUS_ACCESS_DENIED;
 167         uint32 saved_mask = 0;
 168
 169         /* check privileges; certain SAM access bits should be overridden
 170            by privileges (mostly having to do with creating/modifying/deleting
 171            users and groups) */
 172
 173         if ( rights && user_has_any_privilege( token, rights ) ) {
 174
 175                 saved_mask = (des_access & rights_mask);
 176                 des_access &= ~saved_mask;
 177
 178                 DEBUG(4,("access_check_samr_object: user rights access mask [0x%x]\n",
 179                         rights_mask));
 180         }
 181
 182
 183         /* check the security descriptor first */
 184
 185         if ( se_access_check(psd, token, des_access, acc_granted, &status) )
 186                 goto done;
 187
 188         /* give root a free pass */
 189
 190         if ( geteuid() == sec_initial_uid() ) {
 191
 192                 DEBUG(4,("%s: ACCESS should be DENIED  (requested: %#010x)\n", debug, des_access));
 193                 DEBUGADD(4,("but overritten by euid == sec_initial_uid()\n"));
 194
 195                 *acc_granted = des_access;
 196
 197                 status = NT_STATUS_OK;
 198                 goto done;
 199         }
 200
 201
 202 done:
 203         /* add in any bits saved during the privilege check (only
 204            matters is status is ok) */
 205
 206         *acc_granted |= rights_mask;
 207
 208         DEBUG(4,("%s: access %s (requested: 0x%08x, granted: 0x%08x)\n",
 209                 debug, NT_STATUS_IS_OK(status) ? "GRANTED" : "DENIED",
 210                 des_access, *acc_granted));
 211
 212         return status;
 213 }
 214
 215 /*******************************************************************
 216  Checks if access to a function can be granted
 217 ********************************************************************/
 218
 219 static NTSTATUS access_check_samr_function(uint32 acc_granted, uint32 acc_required, const char *debug)
 220 {
 221         DEBUG(5,("%s: access check ((granted: %#010x;  required: %#010x)\n",
 222                 debug, acc_granted, acc_required));
 223
 224         /* check the security descriptor first */
 225
 226         if ( (acc_granted&acc_required) == acc_required )
 227                 return NT_STATUS_OK;
 228
 229         /* give root a free pass */
 230
 231         if (geteuid() == sec_initial_uid()) {
 232
 233                 DEBUG(4,("%s: ACCESS should be DENIED (granted: %#010x;  required: %#010x)\n",
 234                         debug, acc_granted, acc_required));
 235                 DEBUGADD(4,("but overwritten by euid == 0\n"));
 236
 237                 return NT_STATUS_OK;
 238         }
 239
 240         DEBUG(2,("%s: ACCESS DENIED (granted: %#010x;  required: %#010x)\n",
 241                 debug, acc_granted, acc_required));
 242
 243         return NT_STATUS_ACCESS_DENIED;
 244 }
 245
 246 /*******************************************************************
 247  Fetch or create a dispinfo struct.
 248 ********************************************************************/
 249
 250 static DISP_INFO *get_samr_dispinfo_by_sid(DOM_SID *psid, const char *sid_str)
 251 {
 252         TALLOC_CTX *mem_ctx;
 253         DISP_INFO *dpi;
 254
 255         for (dpi = disp_info_list; dpi; dpi = dpi->next) {
 256                 if (sid_equal(psid, &dpi->sid)) {
 257                         return dpi;
 258                 }
 259         }
 260
 261         /* This struct is never free'd - I'm using talloc so we
 262            can get a list out of smbd using smbcontrol. There will
 263            be one of these per SID we're authorative for. JRA. */
 264
 265         mem_ctx = talloc_init("DISP_INFO for domain sid %s", sid_str);
 266
 267         if ((dpi = TALLOC_ZERO_P(mem_ctx, DISP_INFO)) == NULL)
 268                 return NULL;
 269
 270         dpi->mem_ctx = mem_ctx;
 271
 272         if (psid) {
 273                 sid_copy( &dpi->sid, psid);
 274                 dpi->builtin_domain = sid_check_is_builtin(psid);
 275         } else {
 276                 dpi->builtin_domain = False;
 277         }
 278
 279         DLIST_ADD(disp_info_list, dpi);
 280
 281         return dpi;
 282 }
 283
 284 /*******************************************************************
 285  Create a samr_info struct.
 286 ********************************************************************/
 287
 288 static struct samr_info *get_samr_info_by_sid(DOM_SID *psid)
 289 {
 290         struct samr_info *info;
 291         fstring sid_str;
 292         TALLOC_CTX *mem_ctx;
 293
 294         if (psid) {
 295                 sid_to_string(sid_str, psid);
 296         } else {
 297                 fstrcpy(sid_str,"(NULL)");
 298         }
 299
 300         mem_ctx = talloc_init("samr_info for domain sid %s", sid_str);
 301
 302         if ((info = TALLOC_ZERO_P(mem_ctx, struct samr_info)) == NULL)
 303                 return NULL;
 304
 305         DEBUG(10,("get_samr_info_by_sid: created new info for sid %s\n", sid_str));
 306         if (psid) {
 307                 sid_copy( &info->sid, psid);
 308                 info->builtin_domain = sid_check_is_builtin(psid);
 309         } else {
 310                 DEBUG(10,("get_samr_info_by_sid: created new info for NULL sid.\n"));
 311                 info->builtin_domain = False;
 312         }
 313         info->mem_ctx = mem_ctx;
 314
 315         info->disp_info = get_samr_dispinfo_by_sid(psid, sid_str);
 316
 317         if (!info->disp_info) {
 318                 talloc_destroy(mem_ctx);
 319                 return NULL;
 320         }
 321
 322         return info;
 323 }
 324
 325 /*******************************************************************
 326  Function to free the per SID data.
 327  ********************************************************************/
 328
 329 static void free_samr_cache(DISP_INFO *disp_info, const char *sid_str)
 330 {
 331         DEBUG(10,("free_samr_cache: deleting cache for SID %s\n", sid_str));
 332
 333         /* We need to become root here because the paged search might have to
 334          * tell the LDAP server we're not interested in the rest anymore. */
 335
 336         become_root();
 337
 338         if (disp_info->users) {
 339                 DEBUG(10,("free_samr_cache: deleting users cache\n"));
 340                 pdb_search_destroy(disp_info->users);
 341                 disp_info->users = NULL;
 342         }
 343         if (disp_info->machines) {
 344                 DEBUG(10,("free_samr_cache: deleting machines cache\n"));
 345                 pdb_search_destroy(disp_info->machines);
 346                 disp_info->machines = NULL;
 347         }
 348         if (disp_info->groups) {
 349                 DEBUG(10,("free_samr_cache: deleting groups cache\n"));
 350                 pdb_search_destroy(disp_info->groups);
 351                 disp_info->groups = NULL;
 352         }
 353         if (disp_info->aliases) {
 354                 DEBUG(10,("free_samr_cache: deleting aliases cache\n"));
 355                 pdb_search_destroy(disp_info->aliases);
 356                 disp_info->aliases = NULL;
 357         }
 358         if (disp_info->enum_users) {
 359                 DEBUG(10,("free_samr_cache: deleting enum_users cache\n"));
 360                 pdb_search_destroy(disp_info->enum_users);
 361                 disp_info->enum_users = NULL;
 362         }
 363         disp_info->enum_acb_mask = 0;
 364
 365         unbecome_root();
 366 }
 367
 368 /*******************************************************************
 369  Function to free the per handle data.
 370  ********************************************************************/
 371
 372 static void free_samr_info(void *ptr)
 373 {
 374         struct samr_info *info=(struct samr_info *) ptr;
 375
 376         /* Only free the dispinfo cache if no one bothered to set up
 377            a timeout. */
 378
 379         if (info->disp_info && info->disp_info->di_cache_timeout_event == (smb_event_id_t)0) {
 380                 fstring sid_str;
 381                 sid_to_string(sid_str, &info->disp_info->sid);
 382                 free_samr_cache(info->disp_info, sid_str);
 383         }
 384
 385         talloc_destroy(info->mem_ctx);
 386 }
 387
 388 /*******************************************************************
 389  Idle event handler. Throw away the disp info cache.
 390  ********************************************************************/
 391
 392 static void disp_info_cache_idle_timeout_handler(void **private_data,
 393                                         time_t *ev_interval,
 394                                         time_t ev_now)
 395 {
 396         fstring sid_str;
 397         DISP_INFO *disp_info = (DISP_INFO *)(*private_data);
 398
 399         sid_to_string(sid_str, &disp_info->sid);
 400
 401         free_samr_cache(disp_info, sid_str);
 402
 403         /* Remove the event. */
 404         smb_unregister_idle_event(disp_info->di_cache_timeout_event);
 405         disp_info->di_cache_timeout_event = (smb_event_id_t)0;
 406
 407         DEBUG(10,("disp_info_cache_idle_timeout_handler: caching timed out for SID %s at %u\n",
 408                 sid_str, (unsigned int)ev_now));
 409 }
 410
 411 /*******************************************************************
 412  Setup cache removal idle event handler.
 413  ********************************************************************/
 414
 415 static void set_disp_info_cache_timeout(DISP_INFO *disp_info, time_t secs_fromnow)
 416 {
 417         fstring sid_str;
 418
 419         sid_to_string(sid_str, &disp_info->sid);
 420
 421         /* Remove any pending timeout and update. */
 422
 423         if (disp_info->di_cache_timeout_event) {
 424                 smb_unregister_idle_event(disp_info->di_cache_timeout_event);
 425                 disp_info->di_cache_timeout_event = (smb_event_id_t)0;
 426         }
 427
 428         DEBUG(10,("set_disp_info_cache_timeout: caching enumeration for SID %s for %u seconds\n",
 429                 sid_str, (unsigned int)secs_fromnow ));
 430
 431         disp_info->di_cache_timeout_event =
 432                 smb_register_idle_event(disp_info_cache_idle_timeout_handler,
 433                                         disp_info,
 434                                         secs_fromnow);
 435 }
 436
 437 /*******************************************************************
 438  Force flush any cache. We do this on any samr_set_xxx call.
 439  We must also remove the timeout handler.
 440  ********************************************************************/
 441
 442 static void force_flush_samr_cache(DISP_INFO *disp_info)
 443 {
 444         if (disp_info) {
 445                 fstring sid_str;
 446
 447                 sid_to_string(sid_str, &disp_info->sid);
 448                 if (disp_info->di_cache_timeout_event) {
 449                         smb_unregister_idle_event(disp_info->di_cache_timeout_event);
 450                         disp_info->di_cache_timeout_event = (smb_event_id_t)0;
 451                         DEBUG(10,("force_flush_samr_cache: clearing idle event for SID %s\n",
 452                                 sid_str));
 453                 }
 454                 free_samr_cache(disp_info, sid_str);
 455         }
 456 }
 457
 458 /*******************************************************************
 459  Ensure password info is never given out. Paranioa... JRA.
 460  ********************************************************************/
 461
 462 static void samr_clear_sam_passwd(SAM_ACCOUNT *sam_pass)
 463 {
 464
 465         if (!sam_pass)
 466                 return;
 467
 468         /* These now zero out the old password */
 469
 470         pdb_set_lanman_passwd(sam_pass, NULL, PDB_DEFAULT);
 471         pdb_set_nt_passwd(sam_pass, NULL, PDB_DEFAULT);
 472 }
 473
 474 static uint32 count_sam_users(struct disp_info *info, uint16 acct_flags)
 475 {
 476         struct samr_displayentry *entry;
 477
 478         if (info->builtin_domain) {
 479                 /* No users in builtin. */
 480                 return 0;
 481         }
 482
 483         if (info->users == NULL) {
 484                 info->users = pdb_search_users(acct_flags);
 485                 if (info->users == NULL) {
 486                         return 0;
 487                 }
 488         }
 489         /* Fetch the last possible entry, thus trigger an enumeration */
 490         pdb_search_entries(info->users, 0xffffffff, 1, &entry);
 491
 492         /* Ensure we cache this enumeration. */
 493         set_disp_info_cache_timeout(info, DISP_INFO_CACHE_TIMEOUT);
 494
 495         return info->users->num_entries;
 496 }
 497
 498 static uint32 count_sam_groups(struct disp_info *info)
 499 {
 500         struct samr_displayentry *entry;
 501
 502         if (info->builtin_domain) {
 503                 /* No groups in builtin. */
 504                 return 0;
 505         }
 506
 507         if (info->groups == NULL) {
 508                 info->groups = pdb_search_groups();
 509                 if (info->groups == NULL) {
 510                         return 0;
 511                 }
 512         }
 513         /* Fetch the last possible entry, thus trigger an enumeration */
 514         pdb_search_entries(info->groups, 0xffffffff, 1, &entry);
 515
 516         /* Ensure we cache this enumeration. */
 517         set_disp_info_cache_timeout(info, DISP_INFO_CACHE_TIMEOUT);
 518
 519         return info->groups->num_entries;
 520 }
 521
 522 static uint32 count_sam_aliases(struct disp_info *info)
 523 {
 524         struct samr_displayentry *entry;
 525
 526         if (info->aliases == NULL) {
 527                 info->aliases = pdb_search_aliases(&info->sid);
 528                 if (info->aliases == NULL) {
 529                         return 0;
 530                 }
 531         }
 532         /* Fetch the last possible entry, thus trigger an enumeration */
 533         pdb_search_entries(info->aliases, 0xffffffff, 1, &entry);
 534
 535         /* Ensure we cache this enumeration. */
 536         set_disp_info_cache_timeout(info, DISP_INFO_CACHE_TIMEOUT);
 537
 538         return info->aliases->num_entries;
 539 }
 540
 541 /*******************************************************************
 542  _samr_close_hnd
 543  ********************************************************************/
 544
 545 NTSTATUS _samr_close_hnd(pipes_struct *p, SAMR_Q_CLOSE_HND *q_u, SAMR_R_CLOSE_HND *r_u)
 546 {
 547         r_u->status = NT_STATUS_OK;
 548
 549         /* close the policy handle */
 550         if (!close_policy_hnd(p, &q_u->pol))
 551                 return NT_STATUS_OBJECT_NAME_INVALID;
 552
 553         DEBUG(5,("samr_reply_close_hnd: %d\n", __LINE__));
 554
 555         return r_u->status;
 556 }
 557
 558 /*******************************************************************
 559  samr_reply_open_domain
 560  ********************************************************************/
 561
 562 NTSTATUS _samr_open_domain(pipes_struct *p, SAMR_Q_OPEN_DOMAIN *q_u, SAMR_R_OPEN_DOMAIN *r_u)
 563 {
 564         struct    samr_info *info;
 565         SEC_DESC *psd = NULL;
 566         uint32    acc_granted;
 567         uint32    des_access = q_u->flags;
 568         NTSTATUS  status;
 569         size_t    sd_size;
 570         SE_PRIV se_rights;
 571
 572         r_u->status = NT_STATUS_OK;
 573
 574         /* find the connection policy handle. */
 575
 576         if ( !find_policy_by_hnd(p, &q_u->pol, (void**)(void *)&info) )
 577                 return NT_STATUS_INVALID_HANDLE;
 578
 579         status = access_check_samr_function( info->acc_granted,
 580                 SA_RIGHT_SAM_OPEN_DOMAIN, "_samr_open_domain" );
 581
 582         if ( !NT_STATUS_IS_OK(status) )
 583                 return status;
 584
 585         /*check if access can be granted as requested by client. */
 586
 587         make_samr_object_sd( p->mem_ctx, &psd, &sd_size, &dom_generic_mapping, NULL, 0 );
 588         se_map_generic( &des_access, &dom_generic_mapping );
 589
 590         se_priv_copy( &se_rights, &se_machine_account );
 591         se_priv_add( &se_rights, &se_add_users );
 592
 593         status = access_check_samr_object( psd, p->pipe_user.nt_user_token,
 594                 &se_rights, GENERIC_RIGHTS_DOMAIN_WRITE, des_access,
 595                 &acc_granted, "_samr_open_domain" );
 596
 597         if ( !NT_STATUS_IS_OK(status) )
 598                 return status;
 599
 600         if (!sid_check_is_domain(&q_u->dom_sid.sid) &&
 601             !sid_check_is_builtin(&q_u->dom_sid.sid)) {
 602                 return NT_STATUS_NO_SUCH_DOMAIN;
 603         }
 604
 605         /* associate the domain SID with the (unique) handle. */
 606         if ((info = get_samr_info_by_sid(&q_u->dom_sid.sid))==NULL)
 607                 return NT_STATUS_NO_MEMORY;
 608         info->acc_granted = acc_granted;
 609
 610         /* get a (unique) handle.  open a policy on it. */
 611         if (!create_policy_hnd(p, &r_u->domain_pol, free_samr_info, (void *)info))
 612                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
 613
 614         DEBUG(5,("samr_open_domain: %d\n", __LINE__));
 615
 616         return r_u->status;
 617 }
 618
 619 /*******************************************************************
 620  _samr_get_usrdom_pwinfo
 621  ********************************************************************/
 622
 623 NTSTATUS _samr_get_usrdom_pwinfo(pipes_struct *p, SAMR_Q_GET_USRDOM_PWINFO *q_u, SAMR_R_GET_USRDOM_PWINFO *r_u)
 624 {
 625         struct samr_info *info = NULL;
 626
 627         r_u->status = NT_STATUS_OK;
 628
 629         /* find the policy handle.  open a policy on it. */
 630         if (!find_policy_by_hnd(p, &q_u->user_pol, (void **)(void *)&info))
 631                 return NT_STATUS_INVALID_HANDLE;
 632
 633         if (!sid_check_is_in_our_domain(&info->sid))
 634                 return NT_STATUS_OBJECT_TYPE_MISMATCH;
 635
 636         init_samr_r_get_usrdom_pwinfo(r_u, NT_STATUS_OK);
 637
 638         DEBUG(5,("_samr_get_usrdom_pwinfo: %d\n", __LINE__));
 639
 640         /*
 641          * NT sometimes return NT_STATUS_ACCESS_DENIED
 642          * I don't know yet why.
 643          */
 644
 645         return r_u->status;
 646 }
 647
 648 /*******************************************************************
 649  _samr_set_sec_obj
 650  ********************************************************************/
 651
 652 NTSTATUS _samr_set_sec_obj(pipes_struct *p, SAMR_Q_SET_SEC_OBJ *q_u, SAMR_R_SET_SEC_OBJ *r_u)
 653 {
 654         DEBUG(0,("_samr_set_sec_obj: Not yet implemented!\n"));
 655         return NT_STATUS_NOT_IMPLEMENTED;
 656 }
 657
 658 /*******************************************************************
 659 ********************************************************************/
 660
 661 static BOOL get_lsa_policy_samr_sid( pipes_struct *p, POLICY_HND *pol,
 662                                         DOM_SID *sid, uint32 *acc_granted,
 663                                         DISP_INFO **ppdisp_info)
 664 {
 665         struct samr_info *info = NULL;
 666
 667         /* find the policy handle.  open a policy on it. */
 668         if (!find_policy_by_hnd(p, pol, (void **)(void *)&info))
 669                 return False;
 670
 671         if (!info)
 672                 return False;
 673
 674         *sid = info->sid;
 675         *acc_granted = info->acc_granted;
 676         if (ppdisp_info) {
 677                 *ppdisp_info = info->disp_info;
 678         }
 679
 680         return True;
 681 }
 682
 683 /*******************************************************************
 684  _samr_query_sec_obj
 685  ********************************************************************/
 686
 687 NTSTATUS _samr_query_sec_obj(pipes_struct *p, SAMR_Q_QUERY_SEC_OBJ *q_u, SAMR_R_QUERY_SEC_OBJ *r_u)
 688 {
 689         DOM_SID pol_sid;
 690         fstring str_sid;
 691         SEC_DESC * psd = NULL;
 692         uint32 acc_granted;
 693         size_t sd_size;
 694
 695         r_u->status = NT_STATUS_OK;
 696
 697         /* Get the SID. */
 698         if (!get_lsa_policy_samr_sid(p, &q_u->user_pol, &pol_sid, &acc_granted, NULL))
 699                 return NT_STATUS_INVALID_HANDLE;
 700
 701         DEBUG(10,("_samr_query_sec_obj: querying security on SID: %s\n", sid_to_string(str_sid, &pol_sid)));
 702
 703         /* Check what typ of SID is beeing queried (e.g Domain SID, User SID, Group SID) */
 704
 705         /* To query the security of the SAM it self an invalid SID with S-0-0 is passed to this function */
 706         if (pol_sid.sid_rev_num == 0) {
 707                 DEBUG(5,("_samr_query_sec_obj: querying security on SAM\n"));
 708                 r_u->status = make_samr_object_sd(p->mem_ctx, &psd, &sd_size, &sam_generic_mapping, NULL, 0);
 709         } else if (sid_equal(&pol_sid,get_global_sam_sid())) {
 710                 /* check if it is our domain SID */
 711                 DEBUG(5,("_samr_query_sec_obj: querying security on Domain with SID: %s\n", sid_to_string(str_sid, &pol_sid)));
 712                 r_u->status = make_samr_object_sd(p->mem_ctx, &psd, &sd_size, &dom_generic_mapping, NULL, 0);
 713         } else if (sid_equal(&pol_sid,&global_sid_Builtin)) {
 714                 /* check if it is the Builtin  Domain */
 715                 /* TODO: Builtin probably needs a different SD with restricted write access*/
 716                 DEBUG(5,("_samr_query_sec_obj: querying security on Builtin Domain with SID: %s\n", sid_to_string(str_sid, &pol_sid)));
 717                 r_u->status = make_samr_object_sd(p->mem_ctx, &psd, &sd_size, &dom_generic_mapping, NULL, 0);
 718         } else if (sid_check_is_in_our_domain(&pol_sid) ||
 719                  sid_check_is_in_builtin(&pol_sid)) {
 720                 /* TODO: different SDs have to be generated for aliases groups and users.
 721                          Currently all three get a default user SD  */
 722                 DEBUG(10,("_samr_query_sec_obj: querying security on Object with SID: %s\n", sid_to_string(str_sid, &pol_sid)));
 723                 r_u->status = make_samr_object_sd(p->mem_ctx, &psd, &sd_size, &usr_generic_mapping, &pol_sid, SAMR_USR_RIGHTS_WRITE_PW);
 724         } else {
 725                 return NT_STATUS_OBJECT_TYPE_MISMATCH;
 726         }
 727
 728         if ((r_u->buf = make_sec_desc_buf(p->mem_ctx, sd_size, psd)) == NULL)
 729                 return NT_STATUS_NO_MEMORY;
 730
 731         if (NT_STATUS_IS_OK(r_u->status))
 732                 r_u->ptr = 1;
 733
 734         return r_u->status;
 735 }
 736
 737 /*******************************************************************
 738 makes a SAM_ENTRY / UNISTR2* structure from a user list.
 739 ********************************************************************/
 740
 741 static NTSTATUS make_user_sam_entry_list(TALLOC_CTX *ctx, SAM_ENTRY **sam_pp,
 742                                          UNISTR2 **uni_name_pp,
 743                                          uint32 num_entries, uint32 start_idx,
 744                                          struct samr_displayentry *entries)
 745 {
 746         uint32 i;
 747         SAM_ENTRY *sam;
 748         UNISTR2 *uni_name;
 749
 750         *sam_pp = NULL;
 751         *uni_name_pp = NULL;
 752
 753         if (num_entries == 0)
 754                 return NT_STATUS_OK;
 755
 756         sam = TALLOC_ZERO_ARRAY(ctx, SAM_ENTRY, num_entries);
 757
 758         uni_name = TALLOC_ZERO_ARRAY(ctx, UNISTR2, num_entries);
 759
 760         if (sam == NULL || uni_name == NULL) {
 761                 DEBUG(0, ("make_user_sam_entry_list: talloc_zero failed!\n"));
 762                 return NT_STATUS_NO_MEMORY;
 763         }
 764
 765         for (i = 0; i < num_entries; i++) {
 766                 UNISTR2 uni_temp_name;
 767                 /*
 768                  * usrmgr expects a non-NULL terminated string with
 769                  * trust relationships
 770                  */
 771                 if (entries[i].acct_flags & ACB_DOMTRUST) {
 772                         init_unistr2(&uni_temp_name, entries[i].account_name,
 773                                      UNI_FLAGS_NONE);
 774                 } else {
 775                         init_unistr2(&uni_temp_name, entries[i].account_name,
 776                                      UNI_STR_TERMINATE);
 777                 }
 778
 779                 init_sam_entry(&sam[i], &uni_temp_name, entries[i].rid);
 780                 copy_unistr2(&uni_name[i], &uni_temp_name);
 781         }
 782
 783         *sam_pp = sam;
 784         *uni_name_pp = uni_name;
 785         return NT_STATUS_OK;
 786 }
 787
 788 /*******************************************************************
 789  samr_reply_enum_dom_users
 790  ********************************************************************/
 791
 792 NTSTATUS _samr_enum_dom_users(pipes_struct *p, SAMR_Q_ENUM_DOM_USERS *q_u,
 793                               SAMR_R_ENUM_DOM_USERS *r_u)
 794 {
 795         struct samr_info *info = NULL;
 796         int num_account;
 797         uint32 enum_context=q_u->start_idx;
 798         enum remote_arch_types ra_type = get_remote_arch();
 799         int max_sam_entries = (ra_type == RA_WIN95) ? MAX_SAM_ENTRIES_W95 : MAX_SAM_ENTRIES_W2K;
 800         uint32 max_entries = max_sam_entries;
 801         struct samr_displayentry *entries = NULL;
 802
 803         r_u->status = NT_STATUS_OK;
 804
 805         /* find the policy handle.  open a policy on it. */
 806         if (!find_policy_by_hnd(p, &q_u->pol, (void **)(void *)&info))
 807                 return NT_STATUS_INVALID_HANDLE;
 808
 809         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(info->acc_granted,
 810                                         SA_RIGHT_DOMAIN_ENUM_ACCOUNTS,
 811                                         "_samr_enum_dom_users"))) {
 812                 return r_u->status;
 813         }
 814
 815         DEBUG(5,("_samr_enum_dom_users: %d\n", __LINE__));
 816
 817         if (info->builtin_domain) {
 818                 /* No users in builtin. */
 819                 init_samr_r_enum_dom_users(r_u, q_u->start_idx, 0);
 820                 DEBUG(5,("_samr_enum_dom_users: No users in BUILTIN\n"));
 821                 return r_u->status;
 822         }
 823
 824         become_root();
 825
 826         /* AS ROOT !!!! */
 827
 828         if ((info->disp_info->enum_users != NULL) &&
 829             (info->disp_info->enum_acb_mask != q_u->acb_mask)) {
 830                 pdb_search_destroy(info->disp_info->enum_users);
 831                 info->disp_info->enum_users = NULL;
 832         }
 833
 834         if (info->disp_info->enum_users == NULL) {
 835                 info->disp_info->enum_users = pdb_search_users(q_u->acb_mask);
 836                 info->disp_info->enum_acb_mask = q_u->acb_mask;
 837         }
 838
 839         if (info->disp_info->enum_users == NULL) {
 840                 /* END AS ROOT !!!! */
 841                 unbecome_root();
 842                 return NT_STATUS_ACCESS_DENIED;
 843         }
 844
 845         num_account = pdb_search_entries(info->disp_info->enum_users,
 846                                          enum_context, max_entries,
 847                                          &entries);
 848
 849         /* END AS ROOT !!!! */
 850
 851         unbecome_root();
 852
 853         if (num_account == 0) {
 854                 DEBUG(5, ("_samr_enum_dom_users: enumeration handle over "
 855                           "total entries\n"));
 856                 return NT_STATUS_OK;
 857         }
 858
 859         r_u->status = make_user_sam_entry_list(p->mem_ctx, &r_u->sam,
 860                                                &r_u->uni_acct_name,
 861                                                num_account, enum_context,
 862                                                entries);
 863
 864         if (!NT_STATUS_IS_OK(r_u->status))
 865                 return r_u->status;
 866
 867         if (max_entries <= num_account) {
 868                 r_u->status = STATUS_MORE_ENTRIES;
 869         } else {
 870                 r_u->status = NT_STATUS_OK;
 871         }
 872
 873         /* Ensure we cache this enumeration. */
 874         set_disp_info_cache_timeout(info->disp_info, DISP_INFO_CACHE_TIMEOUT);
 875
 876         DEBUG(5, ("_samr_enum_dom_users: %d\n", __LINE__));
 877
 878         init_samr_r_enum_dom_users(r_u, q_u->start_idx + num_account,
 879                                    num_account);
 880
 881         DEBUG(5,("_samr_enum_dom_users: %d\n", __LINE__));
 882
 883         return r_u->status;
 884 }
 885
 886 /*******************************************************************
 887 makes a SAM_ENTRY / UNISTR2* structure from a group list.
 888 ********************************************************************/
 889
 890 static void make_group_sam_entry_list(TALLOC_CTX *ctx, SAM_ENTRY **sam_pp,
 891                                       UNISTR2 **uni_name_pp,
 892                                       uint32 num_sam_entries,
 893                                       struct samr_displayentry *entries)
 894 {
 895         uint32 i;
 896         SAM_ENTRY *sam;
 897         UNISTR2 *uni_name;
 898
 899         *sam_pp = NULL;
 900         *uni_name_pp = NULL;
 901
 902         if (num_sam_entries == 0)
 903                 return;
 904
 905         sam = TALLOC_ZERO_ARRAY(ctx, SAM_ENTRY, num_sam_entries);
 906         uni_name = TALLOC_ZERO_ARRAY(ctx, UNISTR2, num_sam_entries);
 907
 908         if (sam == NULL || uni_name == NULL) {
 909                 DEBUG(0, ("NULL pointers in SAMR_R_QUERY_DISPINFO\n"));
 910                 return;
 911         }
 912
 913         for (i = 0; i < num_sam_entries; i++) {
 914                 /*
 915                  * JRA. I think this should include the null. TNG does not.
 916                  */
 917                 init_unistr2(&uni_name[i], entries[i].account_name,
 918                              UNI_STR_TERMINATE);
 919                 init_sam_entry(&sam[i], &uni_name[i], entries[i].rid);
 920         }
 921
 922         *sam_pp = sam;
 923         *uni_name_pp = uni_name;
 924 }
 925
 926 /*******************************************************************
 927  samr_reply_enum_dom_groups
 928  ********************************************************************/
 929
 930 NTSTATUS _samr_enum_dom_groups(pipes_struct *p, SAMR_Q_ENUM_DOM_GROUPS *q_u, SAMR_R_ENUM_DOM_GROUPS *r_u)
 931 {
 932         struct samr_info *info = NULL;
 933         struct samr_displayentry *groups;
 934         uint32 num_groups;
 935
 936         r_u->status = NT_STATUS_OK;
 937
 938         /* find the policy handle.  open a policy on it. */
 939         if (!find_policy_by_hnd(p, &q_u->pol, (void **)(void *)&info))
 940                 return NT_STATUS_INVALID_HANDLE;
 941
 942         r_u->status = access_check_samr_function(info->acc_granted,
 943                                                  SA_RIGHT_DOMAIN_ENUM_ACCOUNTS,
 944                                                  "_samr_enum_dom_groups");
 945         if (!NT_STATUS_IS_OK(r_u->status))
 946                 return r_u->status;
 947
 948         DEBUG(5,("samr_reply_enum_dom_groups: %d\n", __LINE__));
 949
 950         if (info->builtin_domain) {
 951                 /* No groups in builtin. */
 952                 init_samr_r_enum_dom_groups(r_u, q_u->start_idx, 0);
 953                 DEBUG(5,("_samr_enum_dom_users: No groups in BUILTIN\n"));
 954                 return r_u->status;
 955         }
 956
 957         /* the domain group array is being allocated in the function below */
 958
 959         become_root();
 960
 961         if (info->disp_info->groups == NULL) {
 962                 info->disp_info->groups = pdb_search_groups();
 963
 964                 if (info->disp_info->groups == NULL) {
 965                         unbecome_root();
 966                         return NT_STATUS_ACCESS_DENIED;
 967                 }
 968         }
 969
 970         num_groups = pdb_search_entries(info->disp_info->groups, q_u->start_idx,
 971                                         MAX_SAM_ENTRIES, &groups);
 972         unbecome_root();
 973
 974         /* Ensure we cache this enumeration. */
 975         set_disp_info_cache_timeout(info->disp_info, DISP_INFO_CACHE_TIMEOUT);
 976
 977         make_group_sam_entry_list(p->mem_ctx, &r_u->sam, &r_u->uni_grp_name,
 978                                   num_groups, groups);
 979
 980         init_samr_r_enum_dom_groups(r_u, q_u->start_idx, num_groups);
 981
 982         DEBUG(5,("samr_enum_dom_groups: %d\n", __LINE__));
 983
 984         return r_u->status;
 985 }
 986
 987 /*******************************************************************
 988  samr_reply_enum_dom_aliases
 989  ********************************************************************/
 990
 991 NTSTATUS _samr_enum_dom_aliases(pipes_struct *p, SAMR_Q_ENUM_DOM_ALIASES *q_u, SAMR_R_ENUM_DOM_ALIASES *r_u)
 992 {
 993         struct samr_info *info;
 994         struct samr_displayentry *aliases;
 995         uint32 num_aliases = 0;
 996
 997         /* find the policy handle.  open a policy on it. */
 998         if (!find_policy_by_hnd(p, &q_u->pol, (void **)(void *)&info))
 999                 return NT_STATUS_INVALID_HANDLE;
1000
1001         r_u->status = access_check_samr_function(info->acc_granted,
1002                                                  SA_RIGHT_DOMAIN_ENUM_ACCOUNTS,
1003                                                  "_samr_enum_dom_aliases");
1004         if (!NT_STATUS_IS_OK(r_u->status))
1005                 return r_u->status;
1006
1007         DEBUG(5,("samr_reply_enum_dom_aliases: sid %s\n",
1008                  sid_string_static(&info->sid)));
1009
1010         become_root();
1011
1012         if (info->disp_info->aliases == NULL) {
1013                 info->disp_info->aliases = pdb_search_aliases(&info->sid);
1014                 if (info->disp_info->aliases == NULL) {
1015                         unbecome_root();
1016                         return NT_STATUS_ACCESS_DENIED;
1017                 }
1018         }
1019
1020         num_aliases = pdb_search_entries(info->disp_info->aliases, q_u->start_idx,
1021                                          MAX_SAM_ENTRIES, &aliases);
1022         unbecome_root();
1023
1024         /* Ensure we cache this enumeration. */
1025         set_disp_info_cache_timeout(info->disp_info, DISP_INFO_CACHE_TIMEOUT);
1026
1027         make_group_sam_entry_list(p->mem_ctx, &r_u->sam, &r_u->uni_grp_name,
1028                                   num_aliases, aliases);
1029
1030         init_samr_r_enum_dom_aliases(r_u, q_u->start_idx + num_aliases,
1031                                      num_aliases);
1032
1033         DEBUG(5,("samr_enum_dom_aliases: %d\n", __LINE__));
1034
1035         return r_u->status;
1036 }
1037
1038 /*******************************************************************
1039  samr_reply_query_dispinfo
1040  ********************************************************************/
1041
1042 NTSTATUS _samr_query_dispinfo(pipes_struct *p, SAMR_Q_QUERY_DISPINFO *q_u,
1043                               SAMR_R_QUERY_DISPINFO *r_u)
1044 {
1045         struct samr_info *info = NULL;
1046         uint32 struct_size=0x20; /* W2K always reply that, client doesn't care */
1047
1048         uint32 max_entries=q_u->max_entries;
1049         uint32 enum_context=q_u->start_idx;
1050         uint32 max_size=q_u->max_size;
1051
1052         SAM_DISPINFO_CTR *ctr;
1053         uint32 temp_size=0, total_data_size=0;
1054         NTSTATUS disp_ret = NT_STATUS_UNSUCCESSFUL;
1055         uint32 num_account = 0;
1056         enum remote_arch_types ra_type = get_remote_arch();
1057         int max_sam_entries = (ra_type == RA_WIN95) ? MAX_SAM_ENTRIES_W95 : MAX_SAM_ENTRIES_W2K;
1058         struct samr_displayentry *entries = NULL;
1059
1060         DEBUG(5, ("samr_reply_query_dispinfo: %d\n", __LINE__));
1061         r_u->status = NT_STATUS_UNSUCCESSFUL;
1062
1063         /* find the policy handle.  open a policy on it. */
1064         if (!find_policy_by_hnd(p, &q_u->domain_pol, (void **)(void *)&info))
1065                 return NT_STATUS_INVALID_HANDLE;
1066
1067         /*
1068          * calculate how many entries we will return.
1069          * based on
1070          * - the number of entries the client asked
1071          * - our limit on that
1072          * - the starting point (enumeration context)
1073          * - the buffer size the client will accept
1074          */
1075
1076         /*
1077          * We are a lot more like W2K. Instead of reading the SAM
1078          * each time to find the records we need to send back,
1079          * we read it once and link that copy to the sam handle.
1080          * For large user list (over the MAX_SAM_ENTRIES)
1081          * it's a definitive win.
1082          * second point to notice: between enumerations
1083          * our sam is now the same as it's a snapshoot.
1084          * third point: got rid of the static SAM_USER_21 struct
1085          * no more intermediate.
1086          * con: it uses much more memory, as a full copy is stored
1087          * in memory.
1088          *
1089          * If you want to change it, think twice and think
1090          * of the second point , that's really important.
1091          *
1092          * JFM, 12/20/2001
1093          */
1094
1095         if ((q_u->switch_level < 1) || (q_u->switch_level > 5)) {
1096                 DEBUG(0,("_samr_query_dispinfo: Unknown info level (%u)\n",
1097                          (unsigned int)q_u->switch_level ));
1098                 return NT_STATUS_INVALID_INFO_CLASS;
1099         }
1100
1101         /* first limit the number of entries we will return */
1102         if(max_entries > max_sam_entries) {
1103                 DEBUG(5, ("samr_reply_query_dispinfo: client requested %d "
1104                           "entries, limiting to %d\n", max_entries,
1105                           max_sam_entries));
1106                 max_entries = max_sam_entries;
1107         }
1108
1109         /* calculate the size and limit on the number of entries we will
1110          * return */
1111
1112         temp_size=max_entries*struct_size;
1113
1114         if (temp_size>max_size) {
1115                 max_entries=MIN((max_size/struct_size),max_entries);;
1116                 DEBUG(5, ("samr_reply_query_dispinfo: buffer size limits to "
1117                           "only %d entries\n", max_entries));
1118         }
1119
1120         if (!(ctr = TALLOC_ZERO_P(p->mem_ctx,SAM_DISPINFO_CTR)))
1121                 return NT_STATUS_NO_MEMORY;
1122
1123         ZERO_STRUCTP(ctr);
1124
1125         become_root();
1126
1127         /* THe following done as ROOT. Don't return without unbecome_root(). */
1128
1129         switch (q_u->switch_level) {
1130         case 0x1:
1131         case 0x4:
1132                 if (info->disp_info->users == NULL) {
1133                         info->disp_info->users = pdb_search_users(ACB_NORMAL);
1134                         if (info->disp_info->users == NULL) {
1135                                 unbecome_root();
1136                                 return NT_STATUS_ACCESS_DENIED;
1137                         }
1138                         DEBUG(10,("samr_reply_query_dispinfo: starting user enumeration at index %u\n",
1139                                 (unsigned  int)enum_context ));
1140                 } else {
1141                         DEBUG(10,("samr_reply_query_dispinfo: using cached user enumeration at index %u\n",
1142                                 (unsigned  int)enum_context ));
1143                 }
1144
1145                 num_account = pdb_search_entries(info->disp_info->users,
1146                                                  enum_context, max_entries,
1147                                                  &entries);
1148                 break;
1149         case 0x2:
1150                 if (info->disp_info->machines == NULL) {
1151                         info->disp_info->machines =
1152                                 pdb_search_users(ACB_WSTRUST|ACB_SVRTRUST);
1153                         if (info->disp_info->machines == NULL) {
1154                                 unbecome_root();
1155                                 return NT_STATUS_ACCESS_DENIED;
1156                         }
1157                         DEBUG(10,("samr_reply_query_dispinfo: starting machine enumeration at index %u\n",
1158                                 (unsigned  int)enum_context ));
1159                 } else {
1160                         DEBUG(10,("samr_reply_query_dispinfo: using cached machine enumeration at index %u\n",
1161                                 (unsigned  int)enum_context ));
1162                 }
1163
1164                 num_account = pdb_search_entries(info->disp_info->machines,
1165                                                  enum_context, max_entries,
1166                                                  &entries);
1167                 break;
1168         case 0x3:
1169         case 0x5:
1170                 if (info->disp_info->groups == NULL) {
1171                         info->disp_info->groups = pdb_search_groups();
1172                         if (info->disp_info->groups == NULL) {
1173                                 unbecome_root();
1174                                 return NT_STATUS_ACCESS_DENIED;
1175                         }
1176                         DEBUG(10,("samr_reply_query_dispinfo: starting group enumeration at index %u\n",
1177                                 (unsigned  int)enum_context ));
1178                 } else {
1179                         DEBUG(10,("samr_reply_query_dispinfo: using cached group enumeration at index %u\n",
1180                                 (unsigned  int)enum_context ));
1181                 }
1182
1183                 num_account = pdb_search_entries(info->disp_info->groups,
1184                                                  enum_context, max_entries,
1185                                                  &entries);
1186                 break;
1187         default:
1188                 unbecome_root();
1189                 smb_panic("info class changed");
1190                 break;
1191         }
1192         unbecome_root();
1193
1194         /* Now create reply structure */
1195         switch (q_u->switch_level) {
1196         case 0x1:
1197                 disp_ret = init_sam_dispinfo_1(p->mem_ctx, &ctr->sam.info1,
1198                                                num_account, enum_context,
1199                                                entries);
1200                 break;
1201         case 0x2:
1202                 disp_ret = init_sam_dispinfo_2(p->mem_ctx, &ctr->sam.info2,
1203                                                num_account, enum_context,
1204                                                entries);
1205                 break;
1206         case 0x3:
1207                 disp_ret = init_sam_dispinfo_3(p->mem_ctx, &ctr->sam.info3,
1208                                                num_account, enum_context,
1209                                                entries);
1210                 break;
1211         case 0x4:
1212                 disp_ret = init_sam_dispinfo_4(p->mem_ctx, &ctr->sam.info4,
1213                                                num_account, enum_context,
1214                                                entries);
1215                 break;
1216         case 0x5:
1217                 disp_ret = init_sam_dispinfo_5(p->mem_ctx, &ctr->sam.info5,
1218                                                num_account, enum_context,
1219                                                entries);
1220                 break;
1221         default:
1222                 smb_panic("info class changed");
1223                 break;
1224         }
1225
1226         if (!NT_STATUS_IS_OK(disp_ret))
1227                 return disp_ret;
1228
1229         /* calculate the total size */
1230         total_data_size=num_account*struct_size;
1231
1232         if (num_account) {
1233                 r_u->status = STATUS_MORE_ENTRIES;
1234         } else {
1235                 r_u->status = NT_STATUS_OK;
1236         }
1237
1238         /* Ensure we cache this enumeration. */
1239         set_disp_info_cache_timeout(info->disp_info, DISP_INFO_CACHE_TIMEOUT);
1240
1241         DEBUG(5, ("_samr_query_dispinfo: %d\n", __LINE__));
1242
1243         init_samr_r_query_dispinfo(r_u, num_account, total_data_size,
1244                                    temp_size, q_u->switch_level, ctr,
1245                                    r_u->status);
1246
1247         return r_u->status;
1248
1249 }
1250
1251 /*******************************************************************
1252  samr_reply_query_aliasinfo
1253  ********************************************************************/
1254
1255 NTSTATUS _samr_query_aliasinfo(pipes_struct *p, SAMR_Q_QUERY_ALIASINFO *q_u, SAMR_R_QUERY_ALIASINFO *r_u)
1256 {
1257         DOM_SID   sid;
1258         struct acct_info info;
1259         uint32    acc_granted;
1260         BOOL ret;
1261
1262         r_u->status = NT_STATUS_OK;
1263
1264         DEBUG(5,("_samr_query_aliasinfo: %d\n", __LINE__));
1265
1266         /* find the policy handle.  open a policy on it. */
1267         if (!get_lsa_policy_samr_sid(p, &q_u->pol, &sid, &acc_granted, NULL))
1268                 return NT_STATUS_INVALID_HANDLE;
1269         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, SA_RIGHT_ALIAS_LOOKUP_INFO, "_samr_query_aliasinfo"))) {
1270                 return r_u->status;
1271         }
1272
1273         become_root();
1274         ret = pdb_get_aliasinfo(&sid, &info);
1275         unbecome_root();
1276
1277         if ( !ret )
1278                 return NT_STATUS_NO_SUCH_ALIAS;
1279
1280         if ( !(r_u->ctr = TALLOC_ZERO_P( p->mem_ctx, ALIAS_INFO_CTR )) )
1281                 return NT_STATUS_NO_MEMORY;
1282
1283
1284         switch (q_u->level ) {
1285         case 1:
1286                 r_u->ctr->level = 1;
1287                 init_samr_alias_info1(&r_u->ctr->alias.info1, info.acct_name, 1, info.acct_desc);
1288                 break;
1289         case 3:
1290                 r_u->ctr->level = 3;
1291                 init_samr_alias_info3(&r_u->ctr->alias.info3, info.acct_desc);
1292                 break;
1293         default:
1294                 return NT_STATUS_INVALID_INFO_CLASS;
1295         }
1296
1297         DEBUG(5,("_samr_query_aliasinfo: %d\n", __LINE__));
1298
1299         return r_u->status;
1300 }
1301
1302 #if 0
1303 /*******************************************************************
1304  samr_reply_lookup_ids
1305  ********************************************************************/
1306
1307  uint32 _samr_lookup_ids(pipes_struct *p, SAMR_Q_LOOKUP_IDS *q_u, SAMR_R_LOOKUP_IDS *r_u)
1308 {
1309     uint32 rid[MAX_SAM_ENTRIES];
1310     int num_rids = q_u->num_sids1;
1311
1312     r_u->status = NT_STATUS_OK;
1313
1314     DEBUG(5,("_samr_lookup_ids: %d\n", __LINE__));
1315
1316     if (num_rids > MAX_SAM_ENTRIES) {
1317         num_rids = MAX_SAM_ENTRIES;
1318         DEBUG(5,("_samr_lookup_ids: truncating entries to %d\n", num_rids));
1319     }
1320
1321 #if 0
1322     int i;
1323     SMB_ASSERT_ARRAY(q_u->uni_user_name, num_rids);
1324
1325     for (i = 0; i < num_rids && status == 0; i++)
1326     {
1327         struct sam_passwd *sam_pass;
1328         fstring user_name;
1329
1330
1331         fstrcpy(user_name, unistrn2(q_u->uni_user_name[i].buffer,
1332                                     q_u->uni_user_name[i].uni_str_len));
1333
1334         /* find the user account */
1335         become_root();
1336         sam_pass = get_smb21pwd_entry(user_name, 0);
1337         unbecome_root();
1338
1339         if (sam_pass == NULL)
1340         {
1341             status = 0xC0000000 | NT_STATUS_NO_SUCH_USER;
1342             rid[i] = 0;
1343         }
1344         else
1345         {
1346             rid[i] = sam_pass->user_rid;
1347         }
1348     }
1349 #endif
1350
1351     num_rids = 1;
1352     rid[0] = BUILTIN_ALIAS_RID_USERS;
1353
1354     init_samr_r_lookup_ids(&r_u, num_rids, rid, NT_STATUS_OK);
1355
1356     DEBUG(5,("_samr_lookup_ids: %d\n", __LINE__));
1357
1358     return r_u->status;
1359 }
1360 #endif
1361
1362 /*******************************************************************
1363  _samr_lookup_names
1364  ********************************************************************/
1365
1366 NTSTATUS _samr_lookup_names(pipes_struct *p, SAMR_Q_LOOKUP_NAMES *q_u, SAMR_R_LOOKUP_NAMES *r_u)
1367 {
1368         uint32 rid[MAX_SAM_ENTRIES];
1369         enum SID_NAME_USE type[MAX_SAM_ENTRIES];
1370         int i;
1371         int num_rids = q_u->num_names2;
1372         DOM_SID pol_sid;
1373         fstring sid_str;
1374         uint32  acc_granted;
1375
1376         r_u->status = NT_STATUS_OK;
1377
1378         DEBUG(5,("_samr_lookup_names: %d\n", __LINE__));
1379
1380         ZERO_ARRAY(rid);
1381         ZERO_ARRAY(type);
1382
1383         if (!get_lsa_policy_samr_sid(p, &q_u->pol, &pol_sid, &acc_granted, NULL)) {
1384                 init_samr_r_lookup_names(p->mem_ctx, r_u, 0, NULL, NULL, NT_STATUS_OBJECT_TYPE_MISMATCH);
1385                 return r_u->status;
1386         }
1387
1388         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, 0, "_samr_lookup_names"))) { /* Don't know the acc_bits yet */
1389                 return r_u->status;
1390         }
1391
1392         if (num_rids > MAX_SAM_ENTRIES) {
1393                 num_rids = MAX_SAM_ENTRIES;
1394                 DEBUG(5,("_samr_lookup_names: truncating entries to %d\n", num_rids));
1395         }
1396
1397         DEBUG(5,("_samr_lookup_names: looking name on SID %s\n", sid_to_string(sid_str, &pol_sid)));
1398
1399         for (i = 0; i < num_rids; i++) {
1400                 fstring name;
1401                 int ret;
1402
1403                 r_u->status = NT_STATUS_NONE_MAPPED;
1404                 type[i] = SID_NAME_UNKNOWN;
1405
1406                 rid [i] = 0xffffffff;
1407
1408                 ret = rpcstr_pull(name, q_u->uni_name[i].buffer, sizeof(name), q_u->uni_name[i].uni_str_len*2, 0);
1409
1410                 if (ret <= 0) {
1411                         continue;
1412                 }
1413
1414                 if (sid_check_is_builtin(&pol_sid)) {
1415                         if (lookup_builtin_name(name, &rid[i])) {
1416                                 type[i] = SID_NAME_ALIAS;
1417                         }
1418                 } else {
1419                         lookup_global_sam_name(name, &rid[i], &type[i]);
1420                 }
1421
1422                 if (type[i] != SID_NAME_UNKNOWN) {
1423                         r_u->status = NT_STATUS_OK;
1424                 }
1425         }
1426
1427         init_samr_r_lookup_names(p->mem_ctx, r_u, num_rids, rid, (uint32 *)type, r_u->status);
1428
1429         DEBUG(5,("_samr_lookup_names: %d\n", __LINE__));
1430
1431         return r_u->status;
1432 }
1433
1434 /*******************************************************************
1435  _samr_chgpasswd_user
1436  ********************************************************************/
1437
1438 NTSTATUS _samr_chgpasswd_user(pipes_struct *p, SAMR_Q_CHGPASSWD_USER *q_u, SAMR_R_CHGPASSWD_USER *r_u)
1439 {
1440         fstring user_name;
1441         fstring wks;
1442
1443         DEBUG(5,("_samr_chgpasswd_user: %d\n", __LINE__));
1444
1445         r_u->status = NT_STATUS_OK;
1446
1447         rpcstr_pull(user_name, q_u->uni_user_name.buffer, sizeof(user_name), q_u->uni_user_name.uni_str_len*2, 0);
1448         rpcstr_pull(wks, q_u->uni_dest_host.buffer, sizeof(wks), q_u->uni_dest_host.uni_str_len*2,0);
1449
1450         DEBUG(5,("samr_chgpasswd_user: user: %s wks: %s\n", user_name, wks));
1451
1452         /*
1453          * Pass the user through the NT -> unix user mapping
1454          * function.
1455          */
1456
1457         (void)map_username(user_name);
1458
1459         /*
1460          * UNIX username case mangling not required, pass_oem_change
1461          * is case insensitive.
1462          */
1463
1464         r_u->status = pass_oem_change(user_name, q_u->lm_newpass.pass, q_u->lm_oldhash.hash,
1465                                 q_u->nt_newpass.pass, q_u->nt_oldhash.hash);
1466
1467         init_samr_r_chgpasswd_user(r_u, r_u->status);
1468
1469         DEBUG(5,("_samr_chgpasswd_user: %d\n", __LINE__));
1470
1471         return r_u->status;
1472 }
1473
1474 /*******************************************************************
1475 makes a SAMR_R_LOOKUP_RIDS structure.
1476 ********************************************************************/
1477
1478 static BOOL make_samr_lookup_rids(TALLOC_CTX *ctx, uint32 num_names,
1479                                   const char **names, UNIHDR **pp_hdr_name,
1480                                   UNISTR2 **pp_uni_name)
1481 {
1482         uint32 i;
1483         UNIHDR *hdr_name=NULL;
1484         UNISTR2 *uni_name=NULL;
1485
1486         *pp_uni_name = NULL;
1487         *pp_hdr_name = NULL;
1488
1489         if (num_names != 0) {
1490                 hdr_name = TALLOC_ZERO_ARRAY(ctx, UNIHDR, num_names);
1491                 if (hdr_name == NULL)
1492                         return False;
1493
1494                 uni_name = TALLOC_ZERO_ARRAY(ctx,UNISTR2, num_names);
1495                 if (uni_name == NULL)
1496                         return False;
1497         }
1498
1499         for (i = 0; i < num_names; i++) {
1500                 DEBUG(10, ("names[%d]:%s\n", i, names[i] && *names[i] ? names[i] : ""));
1501                 init_unistr2(&uni_name[i], names[i], UNI_FLAGS_NONE);
1502                 init_uni_hdr(&hdr_name[i], &uni_name[i]);
1503         }
1504
1505         *pp_uni_name = uni_name;
1506         *pp_hdr_name = hdr_name;
1507
1508         return True;
1509 }
1510
1511 /*******************************************************************
1512  _samr_lookup_rids
1513  ********************************************************************/
1514
1515 NTSTATUS _samr_lookup_rids(pipes_struct *p, SAMR_Q_LOOKUP_RIDS *q_u, SAMR_R_LOOKUP_RIDS *r_u)
1516 {
1517         const char **names;
1518         uint32 *attrs = NULL;
1519         UNIHDR *hdr_name = NULL;
1520         UNISTR2 *uni_name = NULL;
1521         DOM_SID pol_sid;
1522         int num_rids = q_u->num_rids1;
1523         uint32 acc_granted;
1524
1525         r_u->status = NT_STATUS_OK;
1526
1527         DEBUG(5,("_samr_lookup_rids: %d\n", __LINE__));
1528
1529         /* find the policy handle.  open a policy on it. */
1530         if (!get_lsa_policy_samr_sid(p, &q_u->pol, &pol_sid, &acc_granted, NULL))
1531                 return NT_STATUS_INVALID_HANDLE;
1532
1533         if (num_rids > 1000) {
1534                 DEBUG(0, ("Got asked for %d rids (more than 1000) -- according "
1535                           "to samba4 idl this is not possible\n", num_rids));
1536                 return NT_STATUS_UNSUCCESSFUL;
1537         }
1538
1539         names = TALLOC_ZERO_ARRAY(p->mem_ctx, const char *, num_rids);
1540         attrs = TALLOC_ZERO_ARRAY(p->mem_ctx, uint32, num_rids);
1541
1542         if ((num_rids != 0) && ((names == NULL) || (attrs == NULL)))
1543                 return NT_STATUS_NO_MEMORY;
1544
1545         become_root();  /* lookup_sid can require root privs */
1546         r_u->status = pdb_lookup_rids(&pol_sid, num_rids, q_u->rid,
1547                                       names, attrs);
1548         unbecome_root();
1549
1550         if(!make_samr_lookup_rids(p->mem_ctx, num_rids, names,
1551                                   &hdr_name, &uni_name))
1552                 return NT_STATUS_NO_MEMORY;
1553
1554         init_samr_r_lookup_rids(r_u, num_rids, hdr_name, uni_name, attrs);
1555
1556         DEBUG(5,("_samr_lookup_rids: %d\n", __LINE__));
1557
1558         return r_u->status;
1559 }
1560
1561 /*******************************************************************
1562  _samr_open_user. Safe - gives out no passwd info.
1563  ********************************************************************/
1564
1565 NTSTATUS _samr_open_user(pipes_struct *p, SAMR_Q_OPEN_USER *q_u, SAMR_R_OPEN_USER *r_u)
1566 {
1567         SAM_ACCOUNT *sampass=NULL;
1568         DOM_SID sid;
1569         POLICY_HND domain_pol = q_u->domain_pol;
1570         POLICY_HND *user_pol = &r_u->user_pol;
1571         struct samr_info *info = NULL;
1572         SEC_DESC *psd = NULL;
1573         uint32    acc_granted;
1574         uint32    des_access = q_u->access_mask;
1575         size_t    sd_size;
1576         BOOL ret;
1577         NTSTATUS nt_status;
1578         SE_PRIV se_rights;
1579
1580         r_u->status = NT_STATUS_OK;
1581
1582         /* find the domain policy handle and get domain SID / access bits in the domain policy. */
1583
1584         if ( !get_lsa_policy_samr_sid(p, &domain_pol, &sid, &acc_granted, NULL) )
1585                 return NT_STATUS_INVALID_HANDLE;
1586
1587         nt_status = access_check_samr_function( acc_granted,
1588                 SA_RIGHT_DOMAIN_OPEN_ACCOUNT, "_samr_open_user" );
1589
1590         if ( !NT_STATUS_IS_OK(nt_status) )
1591                 return nt_status;
1592
1593         nt_status = pdb_init_sam_talloc(p->mem_ctx, &sampass);
1594
1595         if (!NT_STATUS_IS_OK(nt_status))
1596                 return nt_status;
1597
1598         /* append the user's RID to it */
1599
1600         if (!sid_append_rid(&sid, q_u->user_rid))
1601                 return NT_STATUS_NO_SUCH_USER;
1602
1603         /* check if access can be granted as requested by client. */
1604
1605         make_samr_object_sd(p->mem_ctx, &psd, &sd_size, &usr_generic_mapping, &sid, SAMR_USR_RIGHTS_WRITE_PW);
1606         se_map_generic(&des_access, &usr_generic_mapping);
1607
1608         se_priv_copy( &se_rights, &se_machine_account );
1609         se_priv_add( &se_rights, &se_add_users );
1610
1611         nt_status = access_check_samr_object(psd, p->pipe_user.nt_user_token,
1612                 &se_rights, GENERIC_RIGHTS_USER_WRITE, des_access,
1613                 &acc_granted, "_samr_open_user");
1614
1615         if ( !NT_STATUS_IS_OK(nt_status) )
1616                 return nt_status;
1617
1618         become_root();
1619         ret=pdb_getsampwsid(sampass, &sid);
1620         unbecome_root();
1621
1622         /* check that the SID exists in our domain. */
1623         if (ret == False) {
1624                 return NT_STATUS_NO_SUCH_USER;
1625         }
1626
1627         pdb_free_sam(&sampass);
1628
1629         /* associate the user's SID and access bits with the new handle. */
1630         if ((info = get_samr_info_by_sid(&sid)) == NULL)
1631                 return NT_STATUS_NO_MEMORY;
1632         info->acc_granted = acc_granted;
1633
1634         /* get a (unique) handle.  open a policy on it. */
1635         if (!create_policy_hnd(p, user_pol, free_samr_info, (void *)info))
1636                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
1637
1638         return r_u->status;
1639 }
1640
1641 /*************************************************************************
1642  get_user_info_7. Safe. Only gives out account_name.
1643  *************************************************************************/
1644
1645 static NTSTATUS get_user_info_7(TALLOC_CTX *mem_ctx, SAM_USER_INFO_7 *id7, DOM_SID *user_sid)
1646 {
1647         SAM_ACCOUNT *smbpass=NULL;
1648         BOOL ret;
1649         NTSTATUS nt_status;
1650
1651         nt_status = pdb_init_sam_talloc(mem_ctx, &smbpass);
1652
1653         if (!NT_STATUS_IS_OK(nt_status)) {
1654                 return nt_status;
1655         }
1656
1657         become_root();
1658         ret = pdb_getsampwsid(smbpass, user_sid);
1659         unbecome_root();
1660
1661         if (ret==False) {
1662                 DEBUG(4,("User %s not found\n", sid_string_static(user_sid)));
1663                 return NT_STATUS_NO_SUCH_USER;
1664         }
1665
1666         DEBUG(3,("User:[%s]\n", pdb_get_username(smbpass) ));
1667
1668         ZERO_STRUCTP(id7);
1669         init_sam_user_info7(id7, pdb_get_username(smbpass) );
1670
1671         pdb_free_sam(&smbpass);
1672
1673         return NT_STATUS_OK;
1674 }
1675 /*************************************************************************
1676  get_user_info_16. Safe. Only gives out acb bits.
1677  *************************************************************************/
1678
1679 static NTSTATUS get_user_info_16(TALLOC_CTX *mem_ctx, SAM_USER_INFO_16 *id16, DOM_SID *user_sid)
1680 {
1681         SAM_ACCOUNT *smbpass=NULL;
1682         BOOL ret;
1683         NTSTATUS nt_status;
1684
1685         nt_status = pdb_init_sam_talloc(mem_ctx, &smbpass);
1686
1687         if (!NT_STATUS_IS_OK(nt_status)) {
1688                 return nt_status;
1689         }
1690
1691         become_root();
1692         ret = pdb_getsampwsid(smbpass, user_sid);
1693         unbecome_root();
1694
1695         if (ret==False) {
1696                 DEBUG(4,("User %s not found\n", sid_string_static(user_sid)));
1697                 return NT_STATUS_NO_SUCH_USER;
1698         }
1699
1700         DEBUG(3,("User:[%s]\n", pdb_get_username(smbpass) ));
1701
1702         ZERO_STRUCTP(id16);
1703         init_sam_user_info16(id16, pdb_get_acct_ctrl(smbpass) );
1704
1705         pdb_free_sam(&smbpass);
1706
1707         return NT_STATUS_OK;
1708 }
1709
1710 /*************************************************************************
1711  get_user_info_18. OK - this is the killer as it gives out password info.
1712  Ensure that this is only allowed on an encrypted connection with a root
1713  user. JRA.
1714  *************************************************************************/
1715
1716 static NTSTATUS get_user_info_18(pipes_struct *p, TALLOC_CTX *mem_ctx, SAM_USER_INFO_18 * id18, DOM_SID *user_sid)
1717 {
1718         SAM_ACCOUNT *smbpass=NULL;
1719         BOOL ret;
1720         NTSTATUS nt_status;
1721
1722         if (p->auth.auth_type != PIPE_AUTH_TYPE_NTLMSSP || p->auth.auth_type != PIPE_AUTH_TYPE_SPNEGO_NTLMSSP) {
1723                 return NT_STATUS_ACCESS_DENIED;
1724         }
1725
1726         if (p->auth.auth_level != PIPE_AUTH_LEVEL_PRIVACY) {
1727                 return NT_STATUS_ACCESS_DENIED;
1728         }
1729
1730         /*
1731          * Do *NOT* do become_root()/unbecome_root() here ! JRA.
1732          */
1733
1734         nt_status = pdb_init_sam_talloc(mem_ctx, &smbpass);
1735
1736         if (!NT_STATUS_IS_OK(nt_status)) {
1737                 return nt_status;
1738         }
1739
1740         ret = pdb_getsampwsid(smbpass, user_sid);
1741
1742         if (ret == False) {
1743                 DEBUG(4, ("User %s not found\n", sid_string_static(user_sid)));
1744                 pdb_free_sam(&smbpass);
1745                 return (geteuid() == (uid_t)0) ? NT_STATUS_NO_SUCH_USER : NT_STATUS_ACCESS_DENIED;
1746         }
1747
1748         DEBUG(3,("User:[%s] 0x%x\n", pdb_get_username(smbpass), pdb_get_acct_ctrl(smbpass) ));
1749
1750         if ( pdb_get_acct_ctrl(smbpass) & ACB_DISABLED) {
1751                 pdb_free_sam(&smbpass);
1752                 return NT_STATUS_ACCOUNT_DISABLED;
1753         }
1754
1755         ZERO_STRUCTP(id18);
1756         init_sam_user_info18(id18, pdb_get_lanman_passwd(smbpass), pdb_get_nt_passwd(smbpass));
1757
1758         pdb_free_sam(&smbpass);
1759
1760         return NT_STATUS_OK;
1761 }
1762
1763 /*************************************************************************
1764  get_user_info_20
1765  *************************************************************************/
1766
1767 static NTSTATUS get_user_info_20(TALLOC_CTX *mem_ctx, SAM_USER_INFO_20 *id20, DOM_SID *user_sid)
1768 {
1769         SAM_ACCOUNT *sampass=NULL;
1770         BOOL ret;
1771
1772         pdb_init_sam_talloc(mem_ctx, &sampass);
1773
1774         become_root();
1775         ret = pdb_getsampwsid(sampass, user_sid);
1776         unbecome_root();
1777
1778         if (ret == False) {
1779                 DEBUG(4,("User %s not found\n", sid_string_static(user_sid)));
1780                 return NT_STATUS_NO_SUCH_USER;
1781         }
1782
1783         samr_clear_sam_passwd(sampass);
1784
1785         DEBUG(3,("User:[%s]\n",  pdb_get_username(sampass) ));
1786
1787         ZERO_STRUCTP(id20);
1788         init_sam_user_info20A(id20, sampass);
1789
1790         pdb_free_sam(&sampass);
1791
1792         return NT_STATUS_OK;
1793 }
1794
1795 /*************************************************************************
1796  get_user_info_21
1797  *************************************************************************/
1798
1799 static NTSTATUS get_user_info_21(TALLOC_CTX *mem_ctx, SAM_USER_INFO_21 *id21,
1800                                  DOM_SID *user_sid, DOM_SID *domain_sid)
1801 {
1802         SAM_ACCOUNT *sampass=NULL;
1803         BOOL ret;
1804         NTSTATUS nt_status;
1805
1806         nt_status = pdb_init_sam_talloc(mem_ctx, &sampass);
1807         if (!NT_STATUS_IS_OK(nt_status)) {
1808                 return nt_status;
1809         }
1810
1811         become_root();
1812         ret = pdb_getsampwsid(sampass, user_sid);
1813         unbecome_root();
1814
1815         if (ret == False) {
1816                 DEBUG(4,("User %s not found\n", sid_string_static(user_sid)));
1817                 return NT_STATUS_NO_SUCH_USER;
1818         }
1819
1820         samr_clear_sam_passwd(sampass);
1821
1822         DEBUG(3,("User:[%s]\n",  pdb_get_username(sampass) ));
1823
1824         ZERO_STRUCTP(id21);
1825         nt_status = init_sam_user_info21A(id21, sampass, domain_sid);
1826
1827         pdb_free_sam(&sampass);
1828
1829         return NT_STATUS_OK;
1830 }
1831
1832 /*******************************************************************
1833  _samr_query_userinfo
1834  ********************************************************************/
1835
1836 NTSTATUS _samr_query_userinfo(pipes_struct *p, SAMR_Q_QUERY_USERINFO *q_u, SAMR_R_QUERY_USERINFO *r_u)
1837 {
1838         SAM_USERINFO_CTR *ctr;
1839         struct samr_info *info = NULL;
1840         DOM_SID domain_sid;
1841         uint32 rid;
1842
1843         r_u->status=NT_STATUS_OK;
1844
1845         /* search for the handle */
1846         if (!find_policy_by_hnd(p, &q_u->pol, (void **)(void *)&info))
1847                 return NT_STATUS_INVALID_HANDLE;
1848
1849         domain_sid = info->sid;
1850
1851         sid_split_rid(&domain_sid, &rid);
1852
1853         if (!sid_check_is_in_our_domain(&info->sid))
1854                 return NT_STATUS_OBJECT_TYPE_MISMATCH;
1855
1856         DEBUG(5,("_samr_query_userinfo: sid:%s\n", sid_string_static(&info->sid)));
1857
1858         ctr = TALLOC_ZERO_P(p->mem_ctx, SAM_USERINFO_CTR);
1859         if (!ctr)
1860                 return NT_STATUS_NO_MEMORY;
1861
1862         ZERO_STRUCTP(ctr);
1863
1864         /* ok!  user info levels (lots: see MSDEV help), off we go... */
1865         ctr->switch_value = q_u->switch_value;
1866
1867         switch (q_u->switch_value) {
1868         case 7:
1869                 ctr->info.id7 = TALLOC_ZERO_P(p->mem_ctx, SAM_USER_INFO_7);
1870                 if (ctr->info.id7 == NULL)
1871                         return NT_STATUS_NO_MEMORY;
1872
1873                 if (!NT_STATUS_IS_OK(r_u->status = get_user_info_7(p->mem_ctx, ctr->info.id7, &info->sid)))
1874                         return r_u->status;
1875                 break;
1876         case 16:
1877                 ctr->info.id16 = TALLOC_ZERO_P(p->mem_ctx, SAM_USER_INFO_16);
1878                 if (ctr->info.id16 == NULL)
1879                         return NT_STATUS_NO_MEMORY;
1880
1881                 if (!NT_STATUS_IS_OK(r_u->status = get_user_info_16(p->mem_ctx, ctr->info.id16, &info->sid)))
1882                         return r_u->status;
1883                 break;
1884
1885 #if 0
1886 /* whoops - got this wrong.  i think.  or don't understand what's happening. */
1887         case 17:
1888         {
1889             NTTIME expire;
1890             info = (void *)&id11;
1891
1892             expire.low = 0xffffffff;
1893             expire.high = 0x7fffffff;
1894
1895             ctr->info.id = TALLOC_ZERO_P(p->mem_ctx, SAM_USER_INFO_17));
1896             ZERO_STRUCTP(ctr->info.id17);
1897             init_sam_user_info17(ctr->info.id17, &expire,
1898                          "BROOKFIELDS$",    /* name */
1899                          0x03ef,    /* user rid */
1900                          0x201, /* group rid */
1901                          0x0080);   /* acb info */
1902
1903             break;
1904         }
1905 #endif
1906
1907         case 18:
1908                 ctr->info.id18 = TALLOC_ZERO_P(p->mem_ctx, SAM_USER_INFO_18);
1909                 if (ctr->info.id18 == NULL)
1910                         return NT_STATUS_NO_MEMORY;
1911
1912                 if (!NT_STATUS_IS_OK(r_u->status = get_user_info_18(p, p->mem_ctx, ctr->info.id18, &info->sid)))
1913                         return r_u->status;
1914                 break;
1915
1916         case 20:
1917                 ctr->info.id20 = TALLOC_ZERO_P(p->mem_ctx,SAM_USER_INFO_20);
1918                 if (ctr->info.id20 == NULL)
1919                         return NT_STATUS_NO_MEMORY;
1920                 if (!NT_STATUS_IS_OK(r_u->status = get_user_info_20(p->mem_ctx, ctr->info.id20, &info->sid)))
1921                         return r_u->status;
1922                 break;
1923
1924         case 21:
1925                 ctr->info.id21 = TALLOC_ZERO_P(p->mem_ctx,SAM_USER_INFO_21);
1926                 if (ctr->info.id21 == NULL)
1927                         return NT_STATUS_NO_MEMORY;
1928                 if (!NT_STATUS_IS_OK(r_u->status = get_user_info_21(p->mem_ctx, ctr->info.id21,
1929                                                                     &info->sid, &domain_sid)))
1930                         return r_u->status;
1931                 break;
1932
1933         default:
1934                 return NT_STATUS_INVALID_INFO_CLASS;
1935         }
1936
1937         init_samr_r_query_userinfo(r_u, ctr, r_u->status);
1938
1939         DEBUG(5,("_samr_query_userinfo: %d\n", __LINE__));
1940
1941         return r_u->status;
1942 }
1943
1944 /*******************************************************************
1945  samr_reply_query_usergroups
1946  ********************************************************************/
1947
1948 NTSTATUS _samr_query_usergroups(pipes_struct *p, SAMR_Q_QUERY_USERGROUPS *q_u, SAMR_R_QUERY_USERGROUPS *r_u)
1949 {
1950         SAM_ACCOUNT *sam_pass=NULL;
1951         struct passwd *passwd;
1952         DOM_SID  sid;
1953         DOM_SID *sids;
1954         DOM_GID *gids = NULL;
1955         size_t num_groups = 0;
1956         gid_t *unix_gids;
1957         size_t i, num_gids;
1958         uint32 acc_granted;
1959         BOOL ret;
1960         NTSTATUS result;
1961
1962         /*
1963          * from the SID in the request:
1964          * we should send back the list of DOMAIN GROUPS
1965          * the user is a member of
1966          *
1967          * and only the DOMAIN GROUPS
1968          * no ALIASES !!! neither aliases of the domain
1969          * nor aliases of the builtin SID
1970          *
1971          * JFM, 12/2/2001
1972          */
1973
1974         r_u->status = NT_STATUS_OK;
1975
1976         DEBUG(5,("_samr_query_usergroups: %d\n", __LINE__));
1977
1978         /* find the policy handle.  open a policy on it. */
1979         if (!get_lsa_policy_samr_sid(p, &q_u->pol, &sid, &acc_granted, NULL))
1980                 return NT_STATUS_INVALID_HANDLE;
1981
1982         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, SA_RIGHT_USER_GET_GROUPS, "_samr_query_usergroups"))) {
1983                 return r_u->status;
1984         }
1985
1986         if (!sid_check_is_in_our_domain(&sid))
1987                 return NT_STATUS_OBJECT_TYPE_MISMATCH;
1988
1989         pdb_init_sam(&sam_pass);
1990
1991         become_root();
1992         ret = pdb_getsampwsid(sam_pass, &sid);
1993         unbecome_root();
1994
1995         if (ret == False) {
1996                 pdb_free_sam(&sam_pass);
1997                 return NT_STATUS_NO_SUCH_USER;
1998         }
1999
2000         passwd = getpwnam_alloc(pdb_get_username(sam_pass));
2001         if (passwd == NULL) {
2002                 pdb_free_sam(&sam_pass);
2003                 return NT_STATUS_NO_SUCH_USER;
2004         }
2005
2006         sids = NULL;
2007
2008         become_root();
2009         result = pdb_enum_group_memberships(pdb_get_username(sam_pass),
2010                                             passwd->pw_gid,
2011                                             &sids, &unix_gids, &num_groups);
2012         unbecome_root();
2013
2014         pdb_free_sam(&sam_pass);
2015         passwd_free(&passwd);
2016
2017         if (!NT_STATUS_IS_OK(result))
2018                 return result;
2019
2020         SAFE_FREE(unix_gids);
2021
2022         gids = NULL;
2023         num_gids = 0;
2024
2025         for (i=0; i<num_groups; i++) {
2026                 uint32 rid;
2027
2028                 if (!sid_peek_check_rid(get_global_sam_sid(),
2029                                         &(sids[i]), &rid))
2030                         continue;
2031
2032                 gids = TALLOC_REALLOC_ARRAY(p->mem_ctx, gids, DOM_GID, num_gids+1);
2033                 gids[num_gids].attr= (SE_GROUP_MANDATORY|SE_GROUP_ENABLED_BY_DEFAULT|SE_GROUP_ENABLED);
2034                 gids[num_gids].g_rid = rid;
2035                 num_gids += 1;
2036         }
2037         SAFE_FREE(sids);
2038
2039         /* construct the response.  lkclXXXX: gids are not copied! */
2040         init_samr_r_query_usergroups(r_u, num_groups, gids, r_u->status);
2041
2042         DEBUG(5,("_samr_query_usergroups: %d\n", __LINE__));
2043
2044         return r_u->status;
2045 }
2046
2047 /*******************************************************************
2048  _samr_query_dom_info
2049  ********************************************************************/
2050
2051 NTSTATUS _samr_query_dom_info(pipes_struct *p, SAMR_Q_QUERY_DOMAIN_INFO *q_u, SAMR_R_QUERY_DOMAIN_INFO *r_u)
2052 {
2053         struct samr_info *info = NULL;
2054         SAM_UNK_CTR *ctr;
2055         uint32 min_pass_len,pass_hist,flag;
2056         time_t u_expire, u_min_age;
2057         NTTIME nt_expire, nt_min_age;
2058
2059         time_t u_lock_duration, u_reset_time;
2060         NTTIME nt_lock_duration, nt_reset_time;
2061         uint32 lockout;
2062         time_t u_logout;
2063         NTTIME nt_logout;
2064
2065         uint32 account_policy_temp;
2066
2067         time_t seq_num;
2068         uint32 server_role;
2069
2070         uint32 num_users=0, num_groups=0, num_aliases=0;
2071
2072         if ((ctr = TALLOC_ZERO_P(p->mem_ctx, SAM_UNK_CTR)) == NULL) {
2073                 return NT_STATUS_NO_MEMORY;
2074         }
2075
2076         ZERO_STRUCTP(ctr);
2077
2078         r_u->status = NT_STATUS_OK;
2079
2080         DEBUG(5,("_samr_query_dom_info: %d\n", __LINE__));
2081
2082         /* find the policy handle.  open a policy on it. */
2083         if (!find_policy_by_hnd(p, &q_u->domain_pol, (void **)(void *)&info)) {
2084                 return NT_STATUS_INVALID_HANDLE;
2085         }
2086
2087         switch (q_u->switch_value) {
2088                 case 0x01:
2089
2090                         become_root();
2091
2092                         /* AS ROOT !!! */
2093
2094                         pdb_get_account_policy(AP_MIN_PASSWORD_LEN, &account_policy_temp);
2095                         min_pass_len = account_policy_temp;
2096
2097                         pdb_get_account_policy(AP_PASSWORD_HISTORY, &account_policy_temp);
2098                         pass_hist = account_policy_temp;
2099
2100                         pdb_get_account_policy(AP_USER_MUST_LOGON_TO_CHG_PASS, &account_policy_temp);
2101                         flag = account_policy_temp;
2102
2103                         pdb_get_account_policy(AP_MAX_PASSWORD_AGE, &account_policy_temp);
2104                         u_expire = account_policy_temp;
2105
2106                         pdb_get_account_policy(AP_MIN_PASSWORD_AGE, &account_policy_temp);
2107                         u_min_age = account_policy_temp;
2108
2109                         /* !AS ROOT */
2110
2111                         unbecome_root();
2112
2113                         unix_to_nt_time_abs(&nt_expire, u_expire);
2114                         unix_to_nt_time_abs(&nt_min_age, u_min_age);
2115
2116                         init_unk_info1(&ctr->info.inf1, (uint16)min_pass_len, (uint16)pass_hist,
2117                                        flag, nt_expire, nt_min_age);
2118                         break;
2119                 case 0x02:
2120
2121                         become_root();
2122
2123                         /* AS ROOT !!! */
2124
2125                         num_users = count_sam_users(info->disp_info, ACB_NORMAL);
2126                         num_groups = count_sam_groups(info->disp_info);
2127                         num_aliases = count_sam_aliases(info->disp_info);
2128
2129                         pdb_get_account_policy(AP_TIME_TO_LOGOUT, &account_policy_temp);
2130                         u_logout = account_policy_temp;
2131
2132                         unix_to_nt_time_abs(&nt_logout, u_logout);
2133
2134                         if (!pdb_get_seq_num(&seq_num))
2135                                 seq_num = time(NULL);
2136
2137                         /* !AS ROOT */
2138
2139                         unbecome_root();
2140
2141                         server_role = ROLE_DOMAIN_PDC;
2142                         if (lp_server_role() == ROLE_DOMAIN_BDC)
2143                                 server_role = ROLE_DOMAIN_BDC;
2144
2145                         init_unk_info2(&ctr->info.inf2, lp_serverstring(), lp_workgroup(), global_myname(), seq_num,
2146                                        num_users, num_groups, num_aliases, nt_logout, server_role);
2147                         break;
2148                 case 0x03:
2149
2150                         become_root();
2151
2152                         /* AS ROOT !!! */
2153
2154                         {
2155                                 uint32 ul;
2156                                 pdb_get_account_policy(AP_TIME_TO_LOGOUT, &ul);
2157                                 u_logout = (time_t)ul;
2158                         }
2159
2160                         /* !AS ROOT */
2161
2162                         unbecome_root();
2163
2164                         unix_to_nt_time_abs(&nt_logout, u_logout);
2165
2166                         init_unk_info3(&ctr->info.inf3, nt_logout);
2167                         break;
2168                 case 0x05:
2169                         init_unk_info5(&ctr->info.inf5, global_myname());
2170                         break;
2171                 case 0x06:
2172                         init_unk_info6(&ctr->info.inf6);
2173                         break;
2174                 case 0x07:
2175                         server_role = ROLE_DOMAIN_PDC;
2176                         if (lp_server_role() == ROLE_DOMAIN_BDC)
2177                                 server_role = ROLE_DOMAIN_BDC;
2178
2179                         init_unk_info7(&ctr->info.inf7, server_role);
2180                         break;
2181                 case 0x08:
2182
2183                         become_root();
2184
2185                         /* AS ROOT !!! */
2186
2187                         if (!pdb_get_seq_num(&seq_num)) {
2188                                 seq_num = time(NULL);
2189                         }
2190
2191                         /* !AS ROOT */
2192
2193                         unbecome_root();
2194
2195                         init_unk_info8(&ctr->info.inf8, (uint32) seq_num);
2196                         break;
2197                 case 0x0c:
2198
2199                         become_root();
2200
2201                         /* AS ROOT !!! */
2202
2203                         pdb_get_account_policy(AP_LOCK_ACCOUNT_DURATION, &account_policy_temp);
2204                         u_lock_duration = account_policy_temp;
2205                         if (u_lock_duration != -1) {
2206                                 u_lock_duration *= 60;
2207                         }
2208
2209                         pdb_get_account_policy(AP_RESET_COUNT_TIME, &account_policy_temp);
2210                         u_reset_time = account_policy_temp * 60;
2211
2212                         pdb_get_account_policy(AP_BAD_ATTEMPT_LOCKOUT, &account_policy_temp);
2213                         lockout = account_policy_temp;
2214
2215                         /* !AS ROOT */
2216
2217                         unbecome_root();
2218
2219                         unix_to_nt_time_abs(&nt_lock_duration, u_lock_duration);
2220                         unix_to_nt_time_abs(&nt_reset_time, u_reset_time);
2221
2222                         init_unk_info12(&ctr->info.inf12, nt_lock_duration, nt_reset_time, (uint16)lockout);
2223                         break;
2224                 default:
2225                         return NT_STATUS_INVALID_INFO_CLASS;
2226                 }
2227
2228
2229         init_samr_r_query_dom_info(r_u, q_u->switch_value, ctr, NT_STATUS_OK);
2230
2231         DEBUG(5,("_samr_query_dom_info: %d\n", __LINE__));
2232
2233         return r_u->status;
2234 }
2235
2236 /* W2k3 seems to use the same check for all 3 objects that can be created via
2237  * SAMR, if you try to create for example "Dialup" as an alias it says
2238  * "NT_STATUS_USER_EXISTS". This is racy, but we can't really lock the user
2239  * database. */
2240
2241 static NTSTATUS can_create(TALLOC_CTX *mem_ctx, const char *new_name)
2242 {
2243         enum SID_NAME_USE type;
2244         BOOL result;
2245
2246         become_root();
2247         /* Lookup in our local databases (only LOOKUP_NAME_ISOLATED set)
2248          * whether the name already exists */
2249         result = lookup_name(mem_ctx, new_name, LOOKUP_NAME_ISOLATED,
2250                              NULL, NULL, NULL, &type);
2251         unbecome_root();
2252
2253         if (!result) {
2254                 return NT_STATUS_OK;
2255         }
2256
2257         DEBUG(5, ("trying to create %s, exists as %s\n",
2258                   new_name, sid_type_lookup(type)));
2259
2260         if (type == SID_NAME_DOM_GRP) {
2261                 return NT_STATUS_GROUP_EXISTS;
2262         }
2263         if (type == SID_NAME_ALIAS) {
2264                 return NT_STATUS_ALIAS_EXISTS;
2265         }
2266
2267         /* Yes, the default is NT_STATUS_USER_EXISTS */
2268         return NT_STATUS_USER_EXISTS;
2269 }
2270
2271 /*******************************************************************
2272  _samr_create_user
2273  Create an account, can be either a normal user or a machine.
2274  This funcion will need to be updated for bdc/domain trusts.
2275  ********************************************************************/
2276
2277 NTSTATUS _samr_create_user(pipes_struct *p, SAMR_Q_CREATE_USER *q_u, SAMR_R_CREATE_USER *r_u)
2278 {
2279         SAM_ACCOUNT *sam_pass=NULL;
2280         fstring account;
2281         DOM_SID sid;
2282         pstring add_script;
2283         POLICY_HND dom_pol = q_u->domain_pol;
2284         UNISTR2 user_account = q_u->uni_name;
2285         uint16 acb_info = q_u->acb_info;
2286         POLICY_HND *user_pol = &r_u->user_pol;
2287         struct samr_info *info = NULL;
2288         BOOL ret;
2289         NTSTATUS nt_status;
2290         struct passwd *pw;
2291         uint32 acc_granted;
2292         SEC_DESC *psd;
2293         size_t    sd_size;
2294         uint32 new_rid = 0;
2295         /* check this, when giving away 'add computer to domain' privs */
2296         uint32    des_access = GENERIC_RIGHTS_USER_ALL_ACCESS;
2297         BOOL can_add_account = False;
2298         SE_PRIV se_rights;
2299         DISP_INFO *disp_info = NULL;
2300
2301         /* Get the domain SID stored in the domain policy */
2302         if (!get_lsa_policy_samr_sid(p, &dom_pol, &sid, &acc_granted, &disp_info))
2303                 return NT_STATUS_INVALID_HANDLE;
2304
2305         if (!NT_STATUS_IS_OK(nt_status = access_check_samr_function(acc_granted, SA_RIGHT_DOMAIN_CREATE_USER, "_samr_create_user"))) {
2306                 return nt_status;
2307         }
2308
2309         if (!(acb_info == ACB_NORMAL || acb_info == ACB_DOMTRUST || acb_info == ACB_WSTRUST || acb_info == ACB_SVRTRUST)) {
2310                 /* Match Win2k, and return NT_STATUS_INVALID_PARAMETER if
2311                    this parameter is not an account type */
2312                 return NT_STATUS_INVALID_PARAMETER;
2313         }
2314
2315         rpcstr_pull(account, user_account.buffer, sizeof(account), user_account.uni_str_len*2, 0);
2316         strlower_m(account);
2317
2318         nt_status = can_create(p->mem_ctx, account);
2319         if (!NT_STATUS_IS_OK(nt_status)) {
2320                 return nt_status;
2321         }
2322
2323         /*********************************************************************
2324          * HEADS UP!  If we have to create a new user account, we have to get
2325          * a new RID from somewhere.  This used to be done by the passdb
2326          * backend. It has been moved into idmap now.  Since idmap is now
2327          * wrapped up behind winbind, this means you have to run winbindd if you
2328          * want new accounts to get a new RID when "enable rid algorithm = no".
2329          * Tough.  We now have a uniform way of allocating RIDs regardless
2330          * of what ever passdb backend people may use.
2331          *                                             --jerry (2003-07-10)
2332          *********************************************************************/
2333
2334         pw = Get_Pwnam(account);
2335
2336         /* determine which user right we need to check based on the acb_info */
2337
2338         if ( acb_info & ACB_WSTRUST )
2339         {
2340                 pstrcpy(add_script, lp_addmachine_script());
2341                 se_priv_copy( &se_rights, &se_machine_account );
2342                 can_add_account = user_has_privileges( p->pipe_user.nt_user_token, &se_rights );
2343         }
2344         /* usrmgr.exe (and net rpc trustdom grant) creates a normal user
2345            account for domain trusts and changes the ACB flags later */
2346         else if ( acb_info & ACB_NORMAL && (account[strlen(account)-1] != '$') )
2347         {
2348                 pstrcpy(add_script, lp_adduser_script());
2349                 se_priv_copy( &se_rights, &se_add_users );
2350                 can_add_account = user_has_privileges( p->pipe_user.nt_user_token, &se_rights );
2351         }
2352         else    /* implicit assumption of a BDC or domain trust account here (we already check the flags earlier) */
2353         {
2354                 pstrcpy(add_script, lp_addmachine_script());
2355                 if ( lp_enable_privileges() ) {
2356                         /* only Domain Admins can add a BDC or domain trust */
2357                         se_priv_copy( &se_rights, &se_priv_none );
2358                         can_add_account = nt_token_check_domain_rid( p->pipe_user.nt_user_token, DOMAIN_GROUP_RID_ADMINS );
2359         }
2360         }
2361
2362         DEBUG(5, ("_samr_create_user: %s can add this account : %s\n",
2363                 p->pipe_user_name, can_add_account ? "True":"False" ));
2364
2365         /********** BEGIN Admin BLOCK **********/
2366
2367         if ( can_add_account )
2368                 become_root();
2369
2370         if ( !pw ) {
2371                 if (*add_script) {
2372                         int add_ret;
2373
2374                         all_string_sub(add_script, "%u", account, sizeof(add_script));
2375                         add_ret = smbrun(add_script,NULL);
2376                         DEBUG(add_ret ? 0 : 3,("_samr_create_user: Running the command `%s' gave %d\n", add_script, add_ret));
2377                 }
2378         }
2379
2380         /* implicit call to getpwnam() next.  we have a valid SID coming out of this call */
2381
2382         flush_pwnam_cache();
2383         nt_status = pdb_init_sam_new(&sam_pass, account, new_rid);
2384
2385         /* this code is order such that we have no unnecessary retuns
2386            out of the admin block of code */
2387
2388         if ( NT_STATUS_IS_OK(nt_status) ) {
2389                 pdb_set_acct_ctrl(sam_pass, acb_info, PDB_CHANGED);
2390
2391                 if ( !(ret = pdb_add_sam_account(sam_pass)) ) {
2392                         pdb_free_sam(&sam_pass);
2393                         DEBUG(0, ("could not add user/computer %s to passdb.  Check permissions?\n",
2394                                 account));
2395                         nt_status = NT_STATUS_ACCESS_DENIED;
2396                 }
2397         }
2398
2399         if ( can_add_account )
2400                 unbecome_root();
2401
2402         /********** END Admin BLOCK **********/
2403
2404         /* now check for failure */
2405
2406         if ( !NT_STATUS_IS_OK(nt_status) )
2407                 return nt_status;
2408
2409         /* Get the user's SID */
2410
2411         sid_copy(&sid, pdb_get_user_sid(sam_pass));
2412
2413         make_samr_object_sd(p->mem_ctx, &psd, &sd_size, &usr_generic_mapping, &sid, SAMR_USR_RIGHTS_WRITE_PW);
2414         se_map_generic(&des_access, &usr_generic_mapping);
2415
2416         nt_status = access_check_samr_object(psd, p->pipe_user.nt_user_token,
2417                 &se_rights, GENERIC_RIGHTS_USER_WRITE, des_access,
2418                 &acc_granted, "_samr_create_user");
2419
2420         if ( !NT_STATUS_IS_OK(nt_status) ) {
2421                 return nt_status;
2422         }
2423
2424         /* associate the user's SID with the new handle. */
2425         if ((info = get_samr_info_by_sid(&sid)) == NULL) {
2426                 pdb_free_sam(&sam_pass);
2427                 return NT_STATUS_NO_MEMORY;
2428         }
2429
2430         ZERO_STRUCTP(info);
2431         info->sid = sid;
2432         info->acc_granted = acc_granted;
2433
2434         /* get a (unique) handle.  open a policy on it. */
2435         if (!create_policy_hnd(p, user_pol, free_samr_info, (void *)info)) {
2436                 pdb_free_sam(&sam_pass);
2437                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
2438         }
2439
2440         /* After a "set" ensure we have no cached display info. */
2441         force_flush_samr_cache(info->disp_info);
2442
2443         r_u->user_rid=pdb_get_user_rid(sam_pass);
2444
2445         r_u->access_granted = acc_granted;
2446
2447         pdb_free_sam(&sam_pass);
2448
2449         return NT_STATUS_OK;
2450 }
2451
2452 /*******************************************************************
2453  samr_reply_connect_anon
2454  ********************************************************************/
2455
2456 NTSTATUS _samr_connect_anon(pipes_struct *p, SAMR_Q_CONNECT_ANON *q_u, SAMR_R_CONNECT_ANON *r_u)
2457 {
2458         struct samr_info *info = NULL;
2459         uint32    des_access = q_u->access_mask;
2460
2461         /* Access check */
2462
2463         if (!pipe_access_check(p)) {
2464                 DEBUG(3, ("access denied to samr_connect_anon\n"));
2465                 r_u->status = NT_STATUS_ACCESS_DENIED;
2466                 return r_u->status;
2467         }
2468
2469         /* set up the SAMR connect_anon response */
2470
2471         r_u->status = NT_STATUS_OK;
2472
2473         /* associate the user's SID with the new handle. */
2474         if ((info = get_samr_info_by_sid(NULL)) == NULL)
2475                 return NT_STATUS_NO_MEMORY;
2476
2477         /* don't give away the farm but this is probably ok.  The SA_RIGHT_SAM_ENUM_DOMAINS
2478            was observed from a win98 client trying to enumerate users (when configured
2479            user level access control on shares)   --jerry */
2480
2481         se_map_generic( &des_access, &sam_generic_mapping );
2482         info->acc_granted = des_access & (SA_RIGHT_SAM_ENUM_DOMAINS|SA_RIGHT_SAM_OPEN_DOMAIN);
2483
2484         info->status = q_u->unknown_0;
2485
2486         /* get a (unique) handle.  open a policy on it. */
2487         if (!create_policy_hnd(p, &r_u->connect_pol, free_samr_info, (void *)info))
2488                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
2489
2490         return r_u->status;
2491 }
2492
2493 /*******************************************************************
2494  samr_reply_connect
2495  ********************************************************************/
2496
2497 NTSTATUS _samr_connect(pipes_struct *p, SAMR_Q_CONNECT *q_u, SAMR_R_CONNECT *r_u)
2498 {
2499         struct samr_info *info = NULL;
2500         SEC_DESC *psd = NULL;
2501         uint32    acc_granted;
2502         uint32    des_access = q_u->access_mask;
2503         NTSTATUS  nt_status;
2504         size_t    sd_size;
2505
2506
2507         DEBUG(5,("_samr_connect: %d\n", __LINE__));
2508
2509         /* Access check */
2510
2511         if (!pipe_access_check(p)) {
2512                 DEBUG(3, ("access denied to samr_connect\n"));
2513                 r_u->status = NT_STATUS_ACCESS_DENIED;
2514                 return r_u->status;
2515         }
2516
2517         make_samr_object_sd(p->mem_ctx, &psd, &sd_size, &sam_generic_mapping, NULL, 0);
2518         se_map_generic(&des_access, &sam_generic_mapping);
2519
2520         nt_status = access_check_samr_object(psd, p->pipe_user.nt_user_token,
2521                 NULL, 0, des_access, &acc_granted, "_samr_connect");
2522
2523         if ( !NT_STATUS_IS_OK(nt_status) )
2524                 return nt_status;
2525
2526         r_u->status = NT_STATUS_OK;
2527
2528         /* associate the user's SID and access granted with the new handle. */
2529         if ((info = get_samr_info_by_sid(NULL)) == NULL)
2530                 return NT_STATUS_NO_MEMORY;
2531
2532         info->acc_granted = acc_granted;
2533         info->status = q_u->access_mask;
2534
2535         /* get a (unique) handle.  open a policy on it. */
2536         if (!create_policy_hnd(p, &r_u->connect_pol, free_samr_info, (void *)info))
2537                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
2538
2539         DEBUG(5,("_samr_connect: %d\n", __LINE__));
2540
2541         return r_u->status;
2542 }
2543
2544 /*******************************************************************
2545  samr_connect4
2546  ********************************************************************/
2547
2548 NTSTATUS _samr_connect4(pipes_struct *p, SAMR_Q_CONNECT4 *q_u, SAMR_R_CONNECT4 *r_u)
2549 {
2550         struct samr_info *info = NULL;
2551         SEC_DESC *psd = NULL;
2552         uint32    acc_granted;
2553         uint32    des_access = q_u->access_mask;
2554         NTSTATUS  nt_status;
2555         size_t    sd_size;
2556
2557
2558         DEBUG(5,("_samr_connect4: %d\n", __LINE__));
2559
2560         /* Access check */
2561
2562         if (!pipe_access_check(p)) {
2563                 DEBUG(3, ("access denied to samr_connect4\n"));
2564                 r_u->status = NT_STATUS_ACCESS_DENIED;
2565                 return r_u->status;
2566         }
2567
2568         make_samr_object_sd(p->mem_ctx, &psd, &sd_size, &sam_generic_mapping, NULL, 0);
2569         se_map_generic(&des_access, &sam_generic_mapping);
2570
2571         nt_status = access_check_samr_object(psd, p->pipe_user.nt_user_token,
2572                 NULL, 0, des_access, &acc_granted, "_samr_connect4");
2573
2574         if ( !NT_STATUS_IS_OK(nt_status) )
2575                 return nt_status;
2576
2577         r_u->status = NT_STATUS_OK;
2578
2579         /* associate the user's SID and access granted with the new handle. */
2580         if ((info = get_samr_info_by_sid(NULL)) == NULL)
2581                 return NT_STATUS_NO_MEMORY;
2582
2583         info->acc_granted = acc_granted;
2584         info->status = q_u->access_mask;
2585
2586         /* get a (unique) handle.  open a policy on it. */
2587         if (!create_policy_hnd(p, &r_u->connect_pol, free_samr_info, (void *)info))
2588                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
2589
2590         DEBUG(5,("_samr_connect: %d\n", __LINE__));
2591
2592         return r_u->status;
2593 }
2594
2595 /*******************************************************************
2596  samr_connect5
2597  ********************************************************************/
2598
2599 NTSTATUS _samr_connect5(pipes_struct *p, SAMR_Q_CONNECT5 *q_u, SAMR_R_CONNECT5 *r_u)
2600 {
2601         struct samr_info *info = NULL;
2602         SEC_DESC *psd = NULL;
2603         uint32    acc_granted;
2604         uint32    des_access = q_u->access_mask;
2605         NTSTATUS  nt_status;
2606         POLICY_HND pol;
2607         size_t    sd_size;
2608
2609
2610         DEBUG(5,("_samr_connect5: %d\n", __LINE__));
2611
2612         ZERO_STRUCTP(r_u);
2613
2614         /* Access check */
2615
2616         if (!pipe_access_check(p)) {
2617                 DEBUG(3, ("access denied to samr_connect5\n"));
2618                 r_u->status = NT_STATUS_ACCESS_DENIED;
2619                 return r_u->status;
2620         }
2621
2622         make_samr_object_sd(p->mem_ctx, &psd, &sd_size, &sam_generic_mapping, NULL, 0);
2623         se_map_generic(&des_access, &sam_generic_mapping);
2624
2625         nt_status = access_check_samr_object(psd, p->pipe_user.nt_user_token,
2626                 NULL, 0, des_access, &acc_granted, "_samr_connect5");
2627
2628         if ( !NT_STATUS_IS_OK(nt_status) )
2629                 return nt_status;
2630
2631         /* associate the user's SID and access granted with the new handle. */
2632         if ((info = get_samr_info_by_sid(NULL)) == NULL)
2633                 return NT_STATUS_NO_MEMORY;
2634
2635         info->acc_granted = acc_granted;
2636         info->status = q_u->access_mask;
2637
2638         /* get a (unique) handle.  open a policy on it. */
2639         if (!create_policy_hnd(p, &pol, free_samr_info, (void *)info))
2640                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
2641
2642         DEBUG(5,("_samr_connect: %d\n", __LINE__));
2643
2644         init_samr_r_connect5(r_u, &pol, NT_STATUS_OK);
2645
2646         return r_u->status;
2647 }
2648
2649 /**********************************************************************
2650  api_samr_lookup_domain
2651  **********************************************************************/
2652
2653 NTSTATUS _samr_lookup_domain(pipes_struct *p, SAMR_Q_LOOKUP_DOMAIN *q_u, SAMR_R_LOOKUP_DOMAIN *r_u)
2654 {
2655         struct samr_info *info;
2656         fstring domain_name;
2657         DOM_SID sid;
2658
2659         r_u->status = NT_STATUS_OK;
2660
2661         if (!find_policy_by_hnd(p, &q_u->connect_pol, (void**)(void *)&info))
2662                 return NT_STATUS_INVALID_HANDLE;
2663
2664         /* win9x user manager likes to use SA_RIGHT_SAM_ENUM_DOMAINS here.
2665            Reverted that change so we will work with RAS servers again */
2666
2667         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(info->acc_granted,
2668                 SA_RIGHT_SAM_OPEN_DOMAIN, "_samr_lookup_domain")))
2669         {
2670                 return r_u->status;
2671         }
2672
2673         rpcstr_pull(domain_name, q_u->uni_domain.buffer, sizeof(domain_name), q_u->uni_domain.uni_str_len*2, 0);
2674
2675         ZERO_STRUCT(sid);
2676
2677         if (!secrets_fetch_domain_sid(domain_name, &sid)) {
2678                 r_u->status = NT_STATUS_NO_SUCH_DOMAIN;
2679         }
2680
2681         DEBUG(2,("Returning domain sid for domain %s -> %s\n", domain_name, sid_string_static(&sid)));
2682
2683         init_samr_r_lookup_domain(r_u, &sid, r_u->status);
2684
2685         return r_u->status;
2686 }
2687
2688 /******************************************************************
2689 makes a SAMR_R_ENUM_DOMAINS structure.
2690 ********************************************************************/
2691
2692 static BOOL make_enum_domains(TALLOC_CTX *ctx, SAM_ENTRY **pp_sam,
2693                         UNISTR2 **pp_uni_name, uint32 num_sam_entries, fstring doms[])
2694 {
2695         uint32 i;
2696         SAM_ENTRY *sam;
2697         UNISTR2 *uni_name;
2698
2699         DEBUG(5, ("make_enum_domains\n"));
2700
2701         *pp_sam = NULL;
2702         *pp_uni_name = NULL;
2703
2704         if (num_sam_entries == 0)
2705                 return True;
2706
2707         sam = TALLOC_ZERO_ARRAY(ctx, SAM_ENTRY, num_sam_entries);
2708         uni_name = TALLOC_ZERO_ARRAY(ctx, UNISTR2, num_sam_entries);
2709
2710         if (sam == NULL || uni_name == NULL)
2711                 return False;
2712
2713         for (i = 0; i < num_sam_entries; i++) {
2714                 init_unistr2(&uni_name[i], doms[i], UNI_FLAGS_NONE);
2715                 init_sam_entry(&sam[i], &uni_name[i], 0);
2716         }
2717
2718         *pp_sam = sam;
2719         *pp_uni_name = uni_name;
2720
2721         return True;
2722 }
2723
2724 /**********************************************************************
2725  api_samr_enum_domains
2726  **********************************************************************/
2727
2728 NTSTATUS _samr_enum_domains(pipes_struct *p, SAMR_Q_ENUM_DOMAINS *q_u, SAMR_R_ENUM_DOMAINS *r_u)
2729 {
2730         struct samr_info *info;
2731         uint32 num_entries = 2;
2732         fstring dom[2];
2733         const char *name;
2734
2735         r_u->status = NT_STATUS_OK;
2736
2737         if (!find_policy_by_hnd(p, &q_u->pol, (void**)(void *)&info))
2738                 return NT_STATUS_INVALID_HANDLE;
2739
2740         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(info->acc_granted, SA_RIGHT_SAM_ENUM_DOMAINS, "_samr_enum_domains"))) {
2741                 return r_u->status;
2742         }
2743
2744         name = get_global_sam_name();
2745
2746         fstrcpy(dom[0],name);
2747         strupper_m(dom[0]);
2748         fstrcpy(dom[1],"Builtin");
2749
2750         if (!make_enum_domains(p->mem_ctx, &r_u->sam, &r_u->uni_dom_name, num_entries, dom))
2751                 return NT_STATUS_NO_MEMORY;
2752
2753         init_samr_r_enum_domains(r_u, q_u->start_idx + num_entries, num_entries);
2754
2755         return r_u->status;
2756 }
2757
2758 /*******************************************************************
2759  api_samr_open_alias
2760  ********************************************************************/
2761
2762 NTSTATUS _samr_open_alias(pipes_struct *p, SAMR_Q_OPEN_ALIAS *q_u, SAMR_R_OPEN_ALIAS *r_u)
2763 {
2764         DOM_SID sid;
2765         POLICY_HND domain_pol = q_u->dom_pol;
2766         uint32 alias_rid = q_u->rid_alias;
2767         POLICY_HND *alias_pol = &r_u->pol;
2768         struct    samr_info *info = NULL;
2769         SEC_DESC *psd = NULL;
2770         uint32    acc_granted;
2771         uint32    des_access = q_u->access_mask;
2772         size_t    sd_size;
2773         NTSTATUS  status;
2774         SE_PRIV se_rights;
2775
2776         r_u->status = NT_STATUS_OK;
2777
2778         /* find the domain policy and get the SID / access bits stored in the domain policy */
2779
2780         if ( !get_lsa_policy_samr_sid(p, &domain_pol, &sid, &acc_granted, NULL) )
2781                 return NT_STATUS_INVALID_HANDLE;
2782
2783         status = access_check_samr_function(acc_granted,
2784                 SA_RIGHT_DOMAIN_OPEN_ACCOUNT, "_samr_open_alias");
2785
2786         if ( !NT_STATUS_IS_OK(status) )
2787                 return status;
2788
2789         /* append the alias' RID to it */
2790
2791         if (!sid_append_rid(&sid, alias_rid))
2792                 return NT_STATUS_NO_SUCH_ALIAS;
2793
2794         /*check if access can be granted as requested by client. */
2795
2796         make_samr_object_sd(p->mem_ctx, &psd, &sd_size, &ali_generic_mapping, NULL, 0);
2797         se_map_generic(&des_access,&ali_generic_mapping);
2798
2799         se_priv_copy( &se_rights, &se_add_users );
2800
2801
2802         status = access_check_samr_object(psd, p->pipe_user.nt_user_token,
2803                 &se_rights, GENERIC_RIGHTS_ALIAS_WRITE, des_access,
2804                 &acc_granted, "_samr_open_alias");
2805
2806         if ( !NT_STATUS_IS_OK(status) )
2807                 return status;
2808
2809         {
2810                 /* Check we actually have the requested alias */
2811                 enum SID_NAME_USE type;
2812                 BOOL result;
2813
2814                 become_root();
2815                 result = lookup_sid(NULL, &sid, NULL, NULL, &type);
2816                 unbecome_root();
2817
2818                 if (!result || (type != SID_NAME_ALIAS)) {
2819                         return NT_STATUS_NO_SUCH_ALIAS;
2820                 }
2821         }
2822
2823         /* associate the alias SID with the new handle. */
2824         if ((info = get_samr_info_by_sid(&sid)) == NULL)
2825                 return NT_STATUS_NO_MEMORY;
2826
2827         info->acc_granted = acc_granted;
2828
2829         /* get a (unique) handle.  open a policy on it. */
2830         if (!create_policy_hnd(p, alias_pol, free_samr_info, (void *)info))
2831                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
2832
2833         return r_u->status;
2834 }
2835
2836 /*******************************************************************
2837  set_user_info_7
2838  ********************************************************************/
2839 static NTSTATUS set_user_info_7(TALLOC_CTX *mem_ctx,
2840                                 const SAM_USER_INFO_7 *id7, SAM_ACCOUNT *pwd)
2841 {
2842         fstring new_name;
2843         NTSTATUS rc;
2844
2845         if (id7 == NULL) {
2846                 DEBUG(5, ("set_user_info_7: NULL id7\n"));
2847                 pdb_free_sam(&pwd);
2848                 return NT_STATUS_ACCESS_DENIED;
2849         }
2850
2851         if(!rpcstr_pull(new_name, id7->uni_name.buffer, sizeof(new_name), id7->uni_name.uni_str_len*2, 0)) {
2852                 DEBUG(5, ("set_user_info_7: failed to get new username\n"));
2853                 pdb_free_sam(&pwd);
2854                 return NT_STATUS_ACCESS_DENIED;
2855         }
2856
2857         /* check to see if the new username already exists.  Note: we can't
2858            reliably lock all backends, so there is potentially the
2859            possibility that a user can be created in between this check and
2860            the rename.  The rename should fail, but may not get the
2861            exact same failure status code.  I think this is small enough
2862            of a window for this type of operation and the results are
2863            simply that the rename fails with a slightly different status
2864            code (like UNSUCCESSFUL instead of ALREADY_EXISTS). */
2865
2866         rc = can_create(mem_ctx, new_name);
2867         if (!NT_STATUS_IS_OK(rc)) {
2868                 return rc;
2869         }
2870
2871         rc = pdb_rename_sam_account(pwd, new_name);
2872
2873         pdb_free_sam(&pwd);
2874         return rc;
2875 }
2876
2877 /*******************************************************************
2878  set_user_info_16
2879  ********************************************************************/
2880
2881 static BOOL set_user_info_16(const SAM_USER_INFO_16 *id16, SAM_ACCOUNT *pwd)
2882 {
2883         if (id16 == NULL) {
2884                 DEBUG(5, ("set_user_info_16: NULL id16\n"));
2885                 pdb_free_sam(&pwd);
2886                 return False;
2887         }
2888
2889         /* FIX ME: check if the value is really changed --metze */
2890         if (!pdb_set_acct_ctrl(pwd, id16->acb_info, PDB_CHANGED)) {
2891                 pdb_free_sam(&pwd);
2892                 return False;
2893         }
2894
2895         if(!pdb_update_sam_account(pwd)) {
2896                 pdb_free_sam(&pwd);
2897                 return False;
2898         }
2899
2900         pdb_free_sam(&pwd);
2901
2902         return True;
2903 }
2904
2905 /*******************************************************************
2906  set_user_info_18
2907  ********************************************************************/
2908
2909 static BOOL set_user_info_18(SAM_USER_INFO_18 *id18, SAM_ACCOUNT *pwd)
2910 {
2911
2912         if (id18 == NULL) {
2913                 DEBUG(2, ("set_user_info_18: id18 is NULL\n"));
2914                 pdb_free_sam(&pwd);
2915                 return False;
2916         }
2917
2918         if (!pdb_set_lanman_passwd (pwd, id18->lm_pwd, PDB_CHANGED)) {
2919                 pdb_free_sam(&pwd);
2920                 return False;
2921         }
2922         if (!pdb_set_nt_passwd     (pwd, id18->nt_pwd, PDB_CHANGED)) {
2923                 pdb_free_sam(&pwd);
2924                 return False;
2925         }
2926         if (!pdb_set_pass_changed_now (pwd)) {
2927                 pdb_free_sam(&pwd);
2928                 return False;
2929         }
2930
2931         if(!pdb_update_sam_account(pwd)) {
2932                 pdb_free_sam(&pwd);
2933                 return False;
2934         }
2935
2936         pdb_free_sam(&pwd);
2937         return True;
2938 }
2939
2940 /*******************************************************************
2941  The GROUPSID field in the SAM_ACCOUNT changed. Try to tell unix.
2942  ********************************************************************/
2943 static BOOL set_unix_primary_group(SAM_ACCOUNT *sampass)
2944 {
2945         struct group *grp;
2946         gid_t gid;
2947
2948         if (!NT_STATUS_IS_OK(sid_to_gid(pdb_get_group_sid(sampass),
2949                                         &gid))) {
2950                 DEBUG(2,("Could not get gid for primary group of "
2951                          "user %s\n", pdb_get_username(sampass)));
2952                 return False;
2953         }
2954
2955         grp = getgrgid(gid);
2956
2957         if (grp == NULL) {
2958                 DEBUG(2,("Could not find primary group %lu for "
2959                          "user %s\n", (unsigned long)gid,
2960                          pdb_get_username(sampass)));
2961                 return False;
2962         }
2963
2964         if (smb_set_primary_group(grp->gr_name,
2965                                   pdb_get_username(sampass)) != 0) {
2966                 DEBUG(2,("Could not set primary group for user %s to "
2967                          "%s\n",
2968                          pdb_get_username(sampass), grp->gr_name));
2969                 return False;
2970         }
2971
2972         return True;
2973 }
2974
2975
2976 /*******************************************************************
2977  set_user_info_20
2978  ********************************************************************/
2979
2980 static BOOL set_user_info_20(SAM_USER_INFO_20 *id20, SAM_ACCOUNT *pwd)
2981 {
2982         if (id20 == NULL) {
2983                 DEBUG(5, ("set_user_info_20: NULL id20\n"));
2984                 return False;
2985         }
2986
2987         copy_id20_to_sam_passwd(pwd, id20);
2988
2989         /* write the change out */
2990         if(!pdb_update_sam_account(pwd)) {
2991                 pdb_free_sam(&pwd);
2992                 return False;
2993         }
2994
2995         pdb_free_sam(&pwd);
2996
2997         return True;
2998 }
2999 /*******************************************************************
3000  set_user_info_21
3001  ********************************************************************/
3002
3003 static BOOL set_user_info_21(SAM_USER_INFO_21 *id21, SAM_ACCOUNT *pwd)
3004 {
3005
3006         if (id21 == NULL) {
3007                 DEBUG(5, ("set_user_info_21: NULL id21\n"));
3008                 return False;
3009         }
3010
3011         copy_id21_to_sam_passwd(pwd, id21);
3012
3013         /*
3014          * The funny part about the previous two calls is
3015          * that pwd still has the password hashes from the
3016          * passdb entry.  These have not been updated from
3017          * id21.  I don't know if they need to be set.    --jerry
3018          */
3019
3020         if (IS_SAM_CHANGED(pwd, PDB_GROUPSID))
3021                 set_unix_primary_group(pwd);
3022
3023         /* write the change out */
3024         if(!pdb_update_sam_account(pwd)) {
3025                 pdb_free_sam(&pwd);
3026                 return False;
3027         }
3028
3029         pdb_free_sam(&pwd);
3030
3031         return True;
3032 }
3033
3034 /*******************************************************************
3035  set_user_info_23
3036  ********************************************************************/
3037
3038 static BOOL set_user_info_23(SAM_USER_INFO_23 *id23, SAM_ACCOUNT *pwd)
3039 {
3040         pstring plaintext_buf;
3041         uint32 len;
3042         uint16 acct_ctrl;
3043
3044         if (id23 == NULL) {
3045                 DEBUG(5, ("set_user_info_23: NULL id23\n"));
3046                 return False;
3047         }
3048
3049         DEBUG(5, ("Attempting administrator password change (level 23) for user %s\n",
3050                   pdb_get_username(pwd)));
3051
3052         acct_ctrl = pdb_get_acct_ctrl(pwd);
3053
3054         if (!decode_pw_buffer(id23->pass, plaintext_buf, 256, &len, STR_UNICODE)) {
3055                 pdb_free_sam(&pwd);
3056                 return False;
3057         }
3058
3059         if (!pdb_set_plaintext_passwd (pwd, plaintext_buf)) {
3060                 pdb_free_sam(&pwd);
3061                 return False;
3062         }
3063
3064         copy_id23_to_sam_passwd(pwd, id23);
3065
3066         /* if it's a trust account, don't update /etc/passwd */
3067         if (    ( (acct_ctrl &  ACB_DOMTRUST) == ACB_DOMTRUST ) ||
3068                 ( (acct_ctrl &  ACB_WSTRUST) ==  ACB_WSTRUST) ||
3069                 ( (acct_ctrl &  ACB_SVRTRUST) ==  ACB_SVRTRUST) ) {
3070                 DEBUG(5, ("Changing trust account or non-unix-user password, not updating /etc/passwd\n"));
3071         } else  {
3072                 /* update the UNIX password */
3073                 if (lp_unix_password_sync() ) {
3074                         struct passwd *passwd = Get_Pwnam(pdb_get_username(pwd));
3075                         if (!passwd) {
3076                                 DEBUG(1, ("chgpasswd: Username does not exist in system !?!\n"));
3077                         }
3078
3079                         if(!chgpasswd(pdb_get_username(pwd), passwd, "", plaintext_buf, True)) {
3080                                 pdb_free_sam(&pwd);
3081                                 return False;
3082                         }
3083                 }
3084         }
3085
3086         ZERO_STRUCT(plaintext_buf);
3087
3088         if (IS_SAM_CHANGED(pwd, PDB_GROUPSID))
3089                 set_unix_primary_group(pwd);
3090
3091         if(!pdb_update_sam_account(pwd)) {
3092                 pdb_free_sam(&pwd);
3093                 return False;
3094         }
3095
3096         pdb_free_sam(&pwd);
3097
3098         return True;
3099 }
3100
3101 /*******************************************************************
3102  set_user_info_pw
3103  ********************************************************************/
3104
3105 static BOOL set_user_info_pw(uint8 *pass, SAM_ACCOUNT *pwd)
3106 {
3107         uint32 len;
3108         pstring plaintext_buf;
3109         uint16 acct_ctrl;
3110
3111         DEBUG(5, ("Attempting administrator password change for user %s\n",
3112                   pdb_get_username(pwd)));
3113
3114         acct_ctrl = pdb_get_acct_ctrl(pwd);
3115
3116         ZERO_STRUCT(plaintext_buf);
3117
3118         if (!decode_pw_buffer(pass, plaintext_buf, 256, &len, STR_UNICODE)) {
3119                 pdb_free_sam(&pwd);
3120                 return False;
3121         }
3122
3123         if (!pdb_set_plaintext_passwd (pwd, plaintext_buf)) {
3124                 pdb_free_sam(&pwd);
3125                 return False;
3126         }
3127
3128         /* if it's a trust account, don't update /etc/passwd */
3129         if ( ( (acct_ctrl &  ACB_DOMTRUST) == ACB_DOMTRUST ) ||
3130                 ( (acct_ctrl &  ACB_WSTRUST) ==  ACB_WSTRUST) ||
3131                 ( (acct_ctrl &  ACB_SVRTRUST) ==  ACB_SVRTRUST) ) {
3132                 DEBUG(5, ("Changing trust account or non-unix-user password, not updating /etc/passwd\n"));
3133         } else {
3134                 /* update the UNIX password */
3135                 if (lp_unix_password_sync()) {
3136                         struct passwd *passwd = Get_Pwnam(pdb_get_username(pwd));
3137                         if (!passwd) {
3138                                 DEBUG(1, ("chgpasswd: Username does not exist in system !?!\n"));
3139                         }
3140
3141                         if(!chgpasswd(pdb_get_username(pwd), passwd, "", plaintext_buf, True)) {
3142                                 pdb_free_sam(&pwd);
3143                                 return False;
3144                         }
3145                 }
3146         }
3147
3148         ZERO_STRUCT(plaintext_buf);
3149
3150         DEBUG(5,("set_user_info_pw: pdb_update_pwd()\n"));
3151
3152         /* update the SAMBA password */
3153         if(!pdb_update_sam_account(pwd)) {
3154                 pdb_free_sam(&pwd);
3155                 return False;
3156         }
3157
3158         pdb_free_sam(&pwd);
3159
3160         return True;
3161 }
3162
3163 /*******************************************************************
3164  samr_reply_set_userinfo
3165  ********************************************************************/
3166
3167 NTSTATUS _samr_set_userinfo(pipes_struct *p, SAMR_Q_SET_USERINFO *q_u, SAMR_R_SET_USERINFO *r_u)
3168 {
3169         SAM_ACCOUNT *pwd = NULL;
3170         DOM_SID sid;
3171         POLICY_HND *pol = &q_u->pol;
3172         uint16 switch_value = q_u->switch_value;
3173         SAM_USERINFO_CTR *ctr = q_u->ctr;
3174         uint32 acc_granted;
3175         uint32 acc_required;
3176         BOOL ret;
3177         BOOL has_enough_rights = False;
3178         uint32 acb_info;
3179         DISP_INFO *disp_info = NULL;
3180
3181         DEBUG(5, ("_samr_set_userinfo: %d\n", __LINE__));
3182
3183         r_u->status = NT_STATUS_OK;
3184
3185         /* find the policy handle.  open a policy on it. */
3186         if (!get_lsa_policy_samr_sid(p, pol, &sid, &acc_granted, &disp_info))
3187                 return NT_STATUS_INVALID_HANDLE;
3188
3189         /* observed when joining an XP client to a Samba domain */
3190
3191         acc_required = SA_RIGHT_USER_SET_PASSWORD | SA_RIGHT_USER_SET_ATTRIBUTES | SA_RIGHT_USER_ACCT_FLAGS_EXPIRY;
3192
3193         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, acc_required, "_samr_set_userinfo"))) {
3194                 return r_u->status;
3195         }
3196
3197         DEBUG(5, ("_samr_set_userinfo: sid:%s, level:%d\n", sid_string_static(&sid), switch_value));
3198
3199         if (ctr == NULL) {
3200                 DEBUG(5, ("_samr_set_userinfo: NULL info level\n"));
3201                 return NT_STATUS_INVALID_INFO_CLASS;
3202         }
3203
3204         pdb_init_sam(&pwd);
3205
3206         become_root();
3207         ret = pdb_getsampwsid(pwd, &sid);
3208         unbecome_root();
3209
3210         if ( !ret ) {
3211                 pdb_free_sam(&pwd);
3212                 return NT_STATUS_NO_SUCH_USER;
3213         }
3214
3215         /* deal with machine password changes differently from userinfo changes */
3216         /* check to see if we have the sufficient rights */
3217
3218         acb_info = pdb_get_acct_ctrl(pwd);
3219         if ( acb_info & ACB_WSTRUST )
3220                 has_enough_rights = user_has_privileges( p->pipe_user.nt_user_token, &se_machine_account);
3221         else if ( acb_info & ACB_NORMAL )
3222                 has_enough_rights = user_has_privileges( p->pipe_user.nt_user_token, &se_add_users );
3223         else if ( acb_info & (ACB_SVRTRUST|ACB_DOMTRUST) ) {
3224                 if ( lp_enable_privileges() )
3225                         has_enough_rights = nt_token_check_domain_rid( p->pipe_user.nt_user_token, DOMAIN_GROUP_RID_ADMINS );
3226         }
3227
3228         DEBUG(5, ("_samr_set_userinfo: %s does%s possess sufficient rights\n",
3229                 p->pipe_user_name, has_enough_rights ? "" : " not"));
3230
3231         /* ================ BEGIN SeMachineAccountPrivilege BLOCK ================ */
3232
3233         if ( has_enough_rights )
3234                 become_root();
3235
3236         /* ok!  user info levels (lots: see MSDEV help), off we go... */
3237
3238         switch (switch_value) {
3239                 case 18:
3240                         if (!set_user_info_18(ctr->info.id18, pwd))
3241                                 r_u->status = NT_STATUS_ACCESS_DENIED;
3242                         break;
3243
3244                 case 24:
3245                         if (!p->session_key.length) {
3246                                 r_u->status = NT_STATUS_NO_USER_SESSION_KEY;
3247                         }
3248                         SamOEMhashBlob(ctr->info.id24->pass, 516, &p->session_key);
3249
3250                         dump_data(100, (char *)ctr->info.id24->pass, 516);
3251
3252                         if (!set_user_info_pw(ctr->info.id24->pass, pwd))
3253                                 r_u->status = NT_STATUS_ACCESS_DENIED;
3254                         break;
3255
3256                 case 25:
3257 #if 0
3258                         /*
3259                          * Currently we don't really know how to unmarshall
3260                          * the level 25 struct, and the password encryption
3261                          * is different. This is a placeholder for when we
3262                          * do understand it. In the meantime just return INVALID
3263                          * info level and W2K SP2 drops down to level 23... JRA.
3264                          */
3265
3266                         if (!p->session_key.length) {
3267                                 r_u->status = NT_STATUS_NO_USER_SESSION_KEY;
3268                         }
3269                         SamOEMhashBlob(ctr->info.id25->pass, 532, &p->session_key);
3270
3271                         dump_data(100, (char *)ctr->info.id25->pass, 532);
3272
3273                         if (!set_user_info_pw(ctr->info.id25->pass, &sid))
3274                                 r_u->status = NT_STATUS_ACCESS_DENIED;
3275                         break;
3276 #endif
3277                         r_u->status = NT_STATUS_INVALID_INFO_CLASS;
3278                         break;
3279
3280                 case 23:
3281                         if (!p->session_key.length) {
3282                                 r_u->status = NT_STATUS_NO_USER_SESSION_KEY;
3283                         }
3284                         SamOEMhashBlob(ctr->info.id23->pass, 516, &p->session_key);
3285
3286                         dump_data(100, (char *)ctr->info.id23->pass, 516);
3287
3288                         if (!set_user_info_23(ctr->info.id23, pwd))
3289                                 r_u->status = NT_STATUS_ACCESS_DENIED;
3290                         break;
3291
3292                 default:
3293                         r_u->status = NT_STATUS_INVALID_INFO_CLASS;
3294         }
3295
3296
3297         if ( has_enough_rights )
3298                 unbecome_root();
3299
3300         /* ================ END SeMachineAccountPrivilege BLOCK ================ */
3301
3302         if (NT_STATUS_IS_OK(r_u->status)) {
3303                 force_flush_samr_cache(disp_info);
3304         }
3305
3306         return r_u->status;
3307 }
3308
3309 /*******************************************************************
3310  samr_reply_set_userinfo2
3311  ********************************************************************/
3312
3313 NTSTATUS _samr_set_userinfo2(pipes_struct *p, SAMR_Q_SET_USERINFO2 *q_u, SAMR_R_SET_USERINFO2 *r_u)
3314 {
3315         SAM_ACCOUNT *pwd = NULL;
3316         DOM_SID sid;
3317         SAM_USERINFO_CTR *ctr = q_u->ctr;
3318         POLICY_HND *pol = &q_u->pol;
3319         uint16 switch_value = q_u->switch_value;
3320         uint32 acc_granted;
3321         uint32 acc_required;
3322         BOOL ret;
3323         BOOL has_enough_rights = False;
3324         uint32 acb_info;
3325         DISP_INFO *disp_info = NULL;
3326
3327         DEBUG(5, ("samr_reply_set_userinfo2: %d\n", __LINE__));
3328
3329         r_u->status = NT_STATUS_OK;
3330
3331         /* find the policy handle.  open a policy on it. */
3332         if (!get_lsa_policy_samr_sid(p, pol, &sid, &acc_granted, &disp_info))
3333                 return NT_STATUS_INVALID_HANDLE;
3334
3335         /* observed when joining XP client to Samba domain */
3336
3337         acc_required = SA_RIGHT_USER_SET_PASSWORD | SA_RIGHT_USER_SET_ATTRIBUTES | SA_RIGHT_USER_ACCT_FLAGS_EXPIRY;
3338
3339         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, acc_required, "_samr_set_userinfo2"))) {
3340                 return r_u->status;
3341         }
3342
3343         DEBUG(5, ("samr_reply_set_userinfo2: sid:%s\n", sid_string_static(&sid)));
3344
3345         if (ctr == NULL) {
3346                 DEBUG(5, ("samr_reply_set_userinfo2: NULL info level\n"));
3347                 return NT_STATUS_INVALID_INFO_CLASS;
3348         }
3349
3350         switch_value=ctr->switch_value;
3351
3352         pdb_init_sam(&pwd);
3353
3354         become_root();
3355         ret = pdb_getsampwsid(pwd, &sid);
3356         unbecome_root();
3357
3358         if ( !ret ) {
3359                 pdb_free_sam(&pwd);
3360                 return NT_STATUS_NO_SUCH_USER;
3361         }
3362
3363         acb_info = pdb_get_acct_ctrl(pwd);
3364         if ( acb_info & ACB_WSTRUST )
3365                 has_enough_rights = user_has_privileges( p->pipe_user.nt_user_token, &se_machine_account);
3366         else if ( acb_info & ACB_NORMAL )
3367                 has_enough_rights = user_has_privileges( p->pipe_user.nt_user_token, &se_add_users );
3368         else if ( acb_info & (ACB_SVRTRUST|ACB_DOMTRUST) ) {
3369                 if ( lp_enable_privileges() )
3370                         has_enough_rights = nt_token_check_domain_rid( p->pipe_user.nt_user_token, DOMAIN_GROUP_RID_ADMINS );
3371         }
3372
3373         DEBUG(5, ("_samr_set_userinfo: %s does%s possess sufficient rights\n",
3374                 p->pipe_user_name, has_enough_rights ? "" : " not"));
3375
3376         /* ================ BEGIN SeMachineAccountPrivilege BLOCK ================ */
3377
3378         if ( has_enough_rights )
3379                 become_root();
3380
3381         /* ok!  user info levels (lots: see MSDEV help), off we go... */
3382
3383         switch (switch_value) {
3384                 case 7:
3385                         r_u->status = set_user_info_7(p->mem_ctx,
3386                                                       ctr->info.id7, pwd);
3387                         break;
3388                 case 16:
3389                         if (!set_user_info_16(ctr->info.id16, pwd))
3390                                 r_u->status = NT_STATUS_ACCESS_DENIED;
3391                         break;
3392                 case 18:
3393                         /* Used by AS/U JRA. */
3394                         if (!set_user_info_18(ctr->info.id18, pwd))
3395                                 r_u->status = NT_STATUS_ACCESS_DENIED;
3396                         break;
3397                 case 20:
3398                         if (!set_user_info_20(ctr->info.id20, pwd))
3399                                 r_u->status = NT_STATUS_ACCESS_DENIED;
3400                         break;
3401                 case 21:
3402                         if (!set_user_info_21(ctr->info.id21, pwd))
3403                                 return NT_STATUS_ACCESS_DENIED;
3404                         break;
3405                 default:
3406                         r_u->status = NT_STATUS_INVALID_INFO_CLASS;
3407         }
3408
3409         if ( has_enough_rights )
3410                 unbecome_root();
3411
3412         /* ================ END SeMachineAccountPrivilege BLOCK ================ */
3413
3414         if (NT_STATUS_IS_OK(r_u->status)) {
3415                 force_flush_samr_cache(disp_info);
3416         }
3417
3418         return r_u->status;
3419 }
3420
3421 /*********************************************************************
3422  _samr_query_aliasmem
3423 *********************************************************************/
3424
3425 NTSTATUS _samr_query_useraliases(pipes_struct *p, SAMR_Q_QUERY_USERALIASES *q_u, SAMR_R_QUERY_USERALIASES *r_u)
3426 {
3427         size_t num_alias_rids;
3428         uint32 *alias_rids;
3429         struct samr_info *info = NULL;
3430         size_t i;
3431
3432         NTSTATUS ntstatus1;
3433         NTSTATUS ntstatus2;
3434
3435         DOM_SID *members;
3436         BOOL res;
3437
3438         r_u->status = NT_STATUS_OK;
3439
3440         DEBUG(5,("_samr_query_useraliases: %d\n", __LINE__));
3441
3442         /* find the policy handle.  open a policy on it. */
3443         if (!find_policy_by_hnd(p, &q_u->pol, (void **)(void *)&info))
3444                 return NT_STATUS_INVALID_HANDLE;
3445
3446         ntstatus1 = access_check_samr_function(info->acc_granted, SA_RIGHT_DOMAIN_LOOKUP_ALIAS_BY_MEM, "_samr_query_useraliases");
3447         ntstatus2 = access_check_samr_function(info->acc_granted, SA_RIGHT_DOMAIN_OPEN_ACCOUNT, "_samr_query_useraliases");
3448
3449         if (!NT_STATUS_IS_OK(ntstatus1) || !NT_STATUS_IS_OK(ntstatus2)) {
3450                 if (!(NT_STATUS_EQUAL(ntstatus1,NT_STATUS_ACCESS_DENIED) && NT_STATUS_IS_OK(ntstatus2)) &&
3451                     !(NT_STATUS_EQUAL(ntstatus1,NT_STATUS_ACCESS_DENIED) && NT_STATUS_IS_OK(ntstatus1))) {
3452                         return (NT_STATUS_IS_OK(ntstatus1)) ? ntstatus2 : ntstatus1;
3453                 }
3454         }
3455
3456         if (!sid_check_is_domain(&info->sid) &&
3457             !sid_check_is_builtin(&info->sid))
3458                 return NT_STATUS_OBJECT_TYPE_MISMATCH;
3459
3460         members = TALLOC_ARRAY(p->mem_ctx, DOM_SID, q_u->num_sids1);
3461
3462         if (members == NULL)
3463                 return NT_STATUS_NO_MEMORY;
3464
3465         for (i=0; i<q_u->num_sids1; i++)
3466                 sid_copy(&members[i], &q_u->sid[i].sid);
3467
3468         alias_rids = NULL;
3469         num_alias_rids = 0;
3470
3471         become_root();
3472         res = pdb_enum_alias_memberships(p->mem_ctx, &info->sid, members,
3473                                          q_u->num_sids1,
3474                                          &alias_rids, &num_alias_rids);
3475         unbecome_root();
3476
3477         if (!res)
3478                 return NT_STATUS_UNSUCCESSFUL;
3479
3480         init_samr_r_query_useraliases(r_u, num_alias_rids, alias_rids,
3481                                       NT_STATUS_OK);
3482         return NT_STATUS_OK;
3483 }
3484
3485 /*********************************************************************
3486  _samr_query_aliasmem
3487 *********************************************************************/
3488
3489 NTSTATUS _samr_query_aliasmem(pipes_struct *p, SAMR_Q_QUERY_ALIASMEM *q_u, SAMR_R_QUERY_ALIASMEM *r_u)
3490 {
3491         size_t i;
3492         size_t num_sids = 0;
3493         DOM_SID2 *sid;
3494         DOM_SID *sids=NULL;
3495
3496         DOM_SID alias_sid;
3497
3498         uint32 acc_granted;
3499
3500         /* find the policy handle.  open a policy on it. */
3501         if (!get_lsa_policy_samr_sid(p, &q_u->alias_pol, &alias_sid, &acc_granted, NULL))
3502                 return NT_STATUS_INVALID_HANDLE;
3503
3504         if (!NT_STATUS_IS_OK(r_u->status =
3505                 access_check_samr_function(acc_granted, SA_RIGHT_ALIAS_GET_MEMBERS, "_samr_query_aliasmem"))) {
3506                 return r_u->status;
3507         }
3508
3509         DEBUG(10, ("sid is %s\n", sid_string_static(&alias_sid)));
3510
3511         if (!pdb_enum_aliasmem(&alias_sid, &sids, &num_sids))
3512                 return NT_STATUS_NO_SUCH_ALIAS;
3513
3514         sid = TALLOC_ZERO_ARRAY(p->mem_ctx, DOM_SID2, num_sids);
3515         if (num_sids!=0 && sid == NULL) {
3516                 SAFE_FREE(sids);
3517                 return NT_STATUS_NO_MEMORY;
3518         }
3519
3520         for (i = 0; i < num_sids; i++) {
3521                 init_dom_sid2(&sid[i], &sids[i]);
3522         }
3523
3524         init_samr_r_query_aliasmem(r_u, num_sids, sid, NT_STATUS_OK);
3525
3526         SAFE_FREE(sids);
3527
3528         return NT_STATUS_OK;
3529 }
3530
3531 static void add_uid_to_array_unique(uid_t uid, uid_t **uids, int *num)
3532 {
3533         int i;
3534
3535         for (i=0; i<*num; i++) {
3536                 if ((*uids)[i] == uid)
3537                         return;
3538         }
3539
3540         *uids = SMB_REALLOC_ARRAY(*uids, uid_t, *num+1);
3541
3542         if (*uids == NULL)
3543                 return;
3544
3545         (*uids)[*num] = uid;
3546         *num += 1;
3547 }
3548
3549
3550 static BOOL get_memberuids(gid_t gid, uid_t **uids, int *num)
3551 {
3552         struct group *grp;
3553         char **gr;
3554         struct sys_pwent *userlist, *user;
3555
3556         *uids = NULL;
3557         *num = 0;
3558
3559         /* We only look at our own sam, so don't care about imported stuff */
3560
3561         winbind_off();
3562
3563         if ((grp = getgrgid(gid)) == NULL) {
3564                 winbind_on();
3565                 return False;
3566         }
3567
3568         /* Primary group members */
3569
3570         userlist = getpwent_list();
3571
3572         for (user = userlist; user != NULL; user = user->next) {
3573                 if (user->pw_gid != gid)
3574                         continue;
3575                 add_uid_to_array_unique(user->pw_uid, uids, num);
3576         }
3577
3578         pwent_free(userlist);
3579
3580         /* Secondary group members */
3581
3582         for (gr = grp->gr_mem; (*gr != NULL) && ((*gr)[0] != '\0'); gr += 1) {
3583                 struct passwd *pw = getpwnam(*gr);
3584
3585                 if (pw == NULL)
3586                         continue;
3587                 add_uid_to_array_unique(pw->pw_uid, uids, num);
3588         }
3589
3590         winbind_on();
3591
3592         return True;
3593 }
3594
3595 /*********************************************************************
3596  _samr_query_groupmem
3597 *********************************************************************/
3598
3599 NTSTATUS _samr_query_groupmem(pipes_struct *p, SAMR_Q_QUERY_GROUPMEM *q_u, SAMR_R_QUERY_GROUPMEM *r_u)
3600 {
3601         DOM_SID group_sid;
3602         fstring group_sid_str;
3603         size_t i, num_members;
3604
3605         uint32 *rid=NULL;
3606         uint32 *attr=NULL;
3607
3608         uint32 acc_granted;
3609
3610         NTSTATUS result;
3611
3612         /* find the policy handle.  open a policy on it. */
3613         if (!get_lsa_policy_samr_sid(p, &q_u->group_pol, &group_sid, &acc_granted, NULL))
3614                 return NT_STATUS_INVALID_HANDLE;
3615
3616         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, SA_RIGHT_GROUP_GET_MEMBERS, "_samr_query_groupmem"))) {
3617                 return r_u->status;
3618         }
3619
3620         sid_to_string(group_sid_str, &group_sid);
3621         DEBUG(10, ("sid is %s\n", group_sid_str));
3622
3623         if (!sid_check_is_in_our_domain(&group_sid)) {
3624                 DEBUG(3, ("sid %s is not in our domain\n", group_sid_str));
3625                 return NT_STATUS_NO_SUCH_GROUP;
3626         }
3627
3628         DEBUG(10, ("lookup on Domain SID\n"));
3629
3630         become_root();
3631         result = pdb_enum_group_members(p->mem_ctx, &group_sid,
3632                                         &rid, &num_members);
3633         unbecome_root();
3634
3635         if (!NT_STATUS_IS_OK(result))
3636                 return result;
3637
3638         attr=TALLOC_ZERO_ARRAY(p->mem_ctx, uint32, num_members);
3639
3640         if ((num_members!=0) && (rid==NULL))
3641                 return NT_STATUS_NO_MEMORY;
3642
3643         for (i=0; i<num_members; i++)
3644                 attr[i] = SID_NAME_USER;
3645
3646         init_samr_r_query_groupmem(r_u, num_members, rid, attr, NT_STATUS_OK);
3647
3648         return NT_STATUS_OK;
3649 }
3650
3651 /*********************************************************************
3652  _samr_add_aliasmem
3653 *********************************************************************/
3654
3655 NTSTATUS _samr_add_aliasmem(pipes_struct *p, SAMR_Q_ADD_ALIASMEM *q_u, SAMR_R_ADD_ALIASMEM *r_u)
3656 {
3657         DOM_SID alias_sid;
3658         uint32 acc_granted;
3659         SE_PRIV se_rights;
3660         BOOL can_add_accounts;
3661         BOOL ret;
3662         DISP_INFO *disp_info = NULL;
3663
3664         /* Find the policy handle. Open a policy on it. */
3665         if (!get_lsa_policy_samr_sid(p, &q_u->alias_pol, &alias_sid, &acc_granted, &disp_info))
3666                 return NT_STATUS_INVALID_HANDLE;
3667
3668         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, SA_RIGHT_ALIAS_ADD_MEMBER, "_samr_add_aliasmem"))) {
3669                 return r_u->status;
3670         }
3671
3672         DEBUG(10, ("sid is %s\n", sid_string_static(&alias_sid)));
3673
3674         se_priv_copy( &se_rights, &se_add_users );
3675         can_add_accounts = user_has_privileges( p->pipe_user.nt_user_token, &se_rights );
3676
3677         /******** BEGIN SeAddUsers BLOCK *********/
3678
3679         if ( can_add_accounts )
3680                 become_root();
3681
3682         ret = pdb_add_aliasmem(&alias_sid, &q_u->sid.sid);
3683
3684         if ( can_add_accounts )
3685                 unbecome_root();
3686
3687         /******** END SeAddUsers BLOCK *********/
3688
3689         if (ret) {
3690                 force_flush_samr_cache(disp_info);
3691         }
3692
3693         return ret ? NT_STATUS_OK : NT_STATUS_ACCESS_DENIED;
3694 }
3695
3696 /*********************************************************************
3697  _samr_del_aliasmem
3698 *********************************************************************/
3699
3700 NTSTATUS _samr_del_aliasmem(pipes_struct *p, SAMR_Q_DEL_ALIASMEM *q_u, SAMR_R_DEL_ALIASMEM *r_u)
3701 {
3702         DOM_SID alias_sid;
3703         uint32 acc_granted;
3704         SE_PRIV se_rights;
3705         BOOL can_add_accounts;
3706         BOOL ret;
3707         DISP_INFO *disp_info = NULL;
3708
3709         /* Find the policy handle. Open a policy on it. */
3710         if (!get_lsa_policy_samr_sid(p, &q_u->alias_pol, &alias_sid, &acc_granted, &disp_info))
3711                 return NT_STATUS_INVALID_HANDLE;
3712
3713         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, SA_RIGHT_ALIAS_REMOVE_MEMBER, "_samr_del_aliasmem"))) {
3714                 return r_u->status;
3715         }
3716
3717         DEBUG(10, ("_samr_del_aliasmem:sid is %s\n",
3718                    sid_string_static(&alias_sid)));
3719
3720         se_priv_copy( &se_rights, &se_add_users );
3721         can_add_accounts = user_has_privileges( p->pipe_user.nt_user_token, &se_rights );
3722
3723         /******** BEGIN SeAddUsers BLOCK *********/
3724
3725         if ( can_add_accounts )
3726                 become_root();
3727
3728         ret = pdb_del_aliasmem(&alias_sid, &q_u->sid.sid);
3729
3730         if ( can_add_accounts )
3731                 unbecome_root();
3732
3733         /******** END SeAddUsers BLOCK *********/
3734
3735         if (ret) {
3736                 force_flush_samr_cache(disp_info);
3737         }
3738
3739         return ret ? NT_STATUS_OK : NT_STATUS_ACCESS_DENIED;
3740 }
3741
3742 /*********************************************************************
3743  _samr_add_groupmem
3744 *********************************************************************/
3745
3746 NTSTATUS _samr_add_groupmem(pipes_struct *p, SAMR_Q_ADD_GROUPMEM *q_u, SAMR_R_ADD_GROUPMEM *r_u)
3747 {
3748         DOM_SID group_sid;
3749         DOM_SID user_sid;
3750         fstring group_sid_str;
3751         uid_t uid;
3752         struct passwd *pwd;
3753         struct group *grp;
3754         fstring grp_name;
3755         GROUP_MAP map;
3756         NTSTATUS ret;
3757         SAM_ACCOUNT *sam_user=NULL;
3758         BOOL check;
3759         uint32 acc_granted;
3760         SE_PRIV se_rights;
3761         BOOL can_add_accounts;
3762         DISP_INFO *disp_info = NULL;
3763
3764         /* Find the policy handle. Open a policy on it. */
3765         if (!get_lsa_policy_samr_sid(p, &q_u->pol, &group_sid, &acc_granted, &disp_info))
3766                 return NT_STATUS_INVALID_HANDLE;
3767
3768         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, SA_RIGHT_GROUP_ADD_MEMBER, "_samr_add_groupmem"))) {
3769                 return r_u->status;
3770         }
3771
3772         sid_to_string(group_sid_str, &group_sid);
3773         DEBUG(10, ("sid is %s\n", group_sid_str));
3774
3775         if (sid_compare(&group_sid, get_global_sam_sid())<=0)
3776                 return NT_STATUS_NO_SUCH_GROUP;
3777
3778         DEBUG(10, ("lookup on Domain SID\n"));
3779
3780         if(!get_domain_group_from_sid(group_sid, &map))
3781                 return NT_STATUS_NO_SUCH_GROUP;
3782
3783         sid_copy(&user_sid, get_global_sam_sid());
3784         sid_append_rid(&user_sid, q_u->rid);
3785
3786         ret = pdb_init_sam(&sam_user);
3787         if (!NT_STATUS_IS_OK(ret))
3788                 return ret;
3789
3790         check = pdb_getsampwsid(sam_user, &user_sid);
3791
3792         if (check != True) {
3793                 pdb_free_sam(&sam_user);
3794                 return NT_STATUS_NO_SUCH_USER;
3795         }
3796
3797         /* check a real user exist before we run the script to add a user to a group */
3798         if (!NT_STATUS_IS_OK(sid_to_uid(pdb_get_user_sid(sam_user), &uid))) {
3799                 pdb_free_sam(&sam_user);
3800                 return NT_STATUS_NO_SUCH_USER;
3801         }
3802
3803         pdb_free_sam(&sam_user);
3804
3805         if ((pwd=getpwuid_alloc(uid)) == NULL) {
3806                 return NT_STATUS_NO_SUCH_USER;
3807         }
3808
3809         if ((grp=getgrgid(map.gid)) == NULL) {
3810                 passwd_free(&pwd);
3811                 return NT_STATUS_NO_SUCH_GROUP;
3812         }
3813
3814         /* we need to copy the name otherwise it's overloaded in user_in_unix_group_list */
3815         fstrcpy(grp_name, grp->gr_name);
3816
3817         /* if the user is already in the group */
3818         if(user_in_unix_group_list(pwd->pw_name, grp_name)) {
3819                 passwd_free(&pwd);
3820                 return NT_STATUS_MEMBER_IN_GROUP;
3821         }
3822
3823         se_priv_copy( &se_rights, &se_add_users );
3824         can_add_accounts = user_has_privileges( p->pipe_user.nt_user_token, &se_rights );
3825
3826         /******** BEGIN SeAddUsers BLOCK *********/
3827
3828         if ( can_add_accounts )
3829                 become_root();
3830
3831         /*
3832          * ok, the group exist, the user exist, the user is not in the group,
3833          *
3834          * we can (finally) add it to the group !
3835          */
3836
3837         smb_add_user_group(grp_name, pwd->pw_name);
3838
3839         if ( can_add_accounts )
3840                 unbecome_root();
3841
3842         /******** END SeAddUsers BLOCK *********/
3843
3844         /* check if the user has been added then ... */
3845         if(!user_in_unix_group_list(pwd->pw_name, grp_name)) {
3846                 passwd_free(&pwd);
3847                 return NT_STATUS_MEMBER_NOT_IN_GROUP;           /* don't know what to reply else */
3848         }
3849
3850         passwd_free(&pwd);
3851
3852         force_flush_samr_cache(disp_info);
3853
3854         return NT_STATUS_OK;
3855 }
3856
3857 /*********************************************************************
3858  _samr_del_groupmem
3859 *********************************************************************/
3860
3861 NTSTATUS _samr_del_groupmem(pipes_struct *p, SAMR_Q_DEL_GROUPMEM *q_u, SAMR_R_DEL_GROUPMEM *r_u)
3862 {
3863         DOM_SID group_sid;
3864         DOM_SID user_sid;
3865         SAM_ACCOUNT *sam_pass=NULL;
3866         GROUP_MAP map;
3867         fstring grp_name;
3868         struct group *grp;
3869         uint32 acc_granted;
3870         SE_PRIV se_rights;
3871         BOOL can_add_accounts;
3872         DISP_INFO *disp_info = NULL;
3873
3874         /*
3875          * delete the group member named q_u->rid
3876          * who is a member of the sid associated with the handle
3877          * the rid is a user's rid as the group is a domain group.
3878          */
3879
3880         /* Find the policy handle. Open a policy on it. */
3881         if (!get_lsa_policy_samr_sid(p, &q_u->pol, &group_sid, &acc_granted, &disp_info))
3882                 return NT_STATUS_INVALID_HANDLE;
3883
3884         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, SA_RIGHT_GROUP_REMOVE_MEMBER, "_samr_del_groupmem"))) {
3885                 return r_u->status;
3886         }
3887
3888         if (!sid_check_is_in_our_domain(&group_sid))
3889                 return NT_STATUS_NO_SUCH_GROUP;
3890
3891         sid_copy(&user_sid, get_global_sam_sid());
3892         sid_append_rid(&user_sid, q_u->rid);
3893
3894         if (!get_domain_group_from_sid(group_sid, &map))
3895                 return NT_STATUS_NO_SUCH_GROUP;
3896
3897         if ((grp=getgrgid(map.gid)) == NULL)
3898                 return NT_STATUS_NO_SUCH_GROUP;
3899
3900         /* we need to copy the name otherwise it's overloaded in user_in_group_list */
3901         fstrcpy(grp_name, grp->gr_name);
3902
3903         /* check if the user exists before trying to remove it from the group */
3904         pdb_init_sam(&sam_pass);
3905         if (!pdb_getsampwsid(sam_pass, &user_sid)) {
3906                 DEBUG(5,("User %s doesn't exist.\n", pdb_get_username(sam_pass)));
3907                 pdb_free_sam(&sam_pass);
3908                 return NT_STATUS_NO_SUCH_USER;
3909         }
3910
3911         /* if the user is not in the group */
3912         if (!user_in_unix_group_list(pdb_get_username(sam_pass), grp_name)) {
3913                 pdb_free_sam(&sam_pass);
3914                 return NT_STATUS_MEMBER_NOT_IN_GROUP;
3915         }
3916
3917
3918         se_priv_copy( &se_rights, &se_add_users );
3919         can_add_accounts = user_has_privileges( p->pipe_user.nt_user_token, &se_rights );
3920
3921         /******** BEGIN SeAddUsers BLOCK *********/
3922
3923         if ( can_add_accounts )
3924                 become_root();
3925
3926         smb_delete_user_group(grp_name, pdb_get_username(sam_pass));
3927
3928         if ( can_add_accounts )
3929                 unbecome_root();
3930
3931         /******** END SeAddUsers BLOCK *********/
3932
3933         /* check if the user has been removed then ... */
3934         if (user_in_unix_group_list(pdb_get_username(sam_pass), grp_name)) {
3935                 pdb_free_sam(&sam_pass);
3936                 return NT_STATUS_ACCESS_DENIED;         /* don't know what to reply else */
3937         }
3938
3939         pdb_free_sam(&sam_pass);
3940
3941         force_flush_samr_cache(disp_info);
3942
3943         return NT_STATUS_OK;
3944
3945 }
3946
3947 /****************************************************************************
3948  Delete a UNIX user on demand.
3949 ****************************************************************************/
3950
3951 static int smb_delete_user(const char *unix_user)
3952 {
3953         pstring del_script;
3954         int ret;
3955
3956         pstrcpy(del_script, lp_deluser_script());
3957         if (! *del_script)
3958                 return -1;
3959         all_string_sub(del_script, "%u", unix_user, sizeof(del_script));
3960         ret = smbrun(del_script,NULL);
3961         flush_pwnam_cache();
3962         DEBUG(ret ? 0 : 3,("smb_delete_user: Running the command `%s' gave %d\n",del_script,ret));
3963
3964         return ret;
3965 }
3966
3967 /*********************************************************************
3968  _samr_delete_dom_user
3969 *********************************************************************/
3970
3971 NTSTATUS _samr_delete_dom_user(pipes_struct *p, SAMR_Q_DELETE_DOM_USER *q_u, SAMR_R_DELETE_DOM_USER *r_u )
3972 {
3973         DOM_SID user_sid;
3974         SAM_ACCOUNT *sam_pass=NULL;
3975         uint32 acc_granted;
3976         BOOL can_add_accounts;
3977         BOOL ret;
3978         DISP_INFO *disp_info = NULL;
3979
3980         DEBUG(5, ("_samr_delete_dom_user: %d\n", __LINE__));
3981
3982         /* Find the policy handle. Open a policy on it. */
3983         if (!get_lsa_policy_samr_sid(p, &q_u->user_pol, &user_sid, &acc_granted, &disp_info))
3984                 return NT_STATUS_INVALID_HANDLE;
3985
3986         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, STD_RIGHT_DELETE_ACCESS, "_samr_delete_dom_user"))) {
3987                 return r_u->status;
3988         }
3989
3990         if (!sid_check_is_in_our_domain(&user_sid))
3991                 return NT_STATUS_CANNOT_DELETE;
3992
3993         /* check if the user exists before trying to delete */
3994         pdb_init_sam(&sam_pass);
3995         if(!pdb_getsampwsid(sam_pass, &user_sid)) {
3996                 DEBUG(5,("_samr_delete_dom_user:User %s doesn't exist.\n",
3997                         sid_string_static(&user_sid)));
3998                 pdb_free_sam(&sam_pass);
3999                 return NT_STATUS_NO_SUCH_USER;
4000         }
4001
4002         can_add_accounts = user_has_privileges( p->pipe_user.nt_user_token, &se_add_users );
4003
4004         /******** BEGIN SeAddUsers BLOCK *********/
4005
4006         if ( can_add_accounts )
4007                 become_root();
4008
4009         /* First delete the samba side....
4010            code is order to prevent unnecessary returns out of the admin
4011            block of code */
4012
4013         if ( (ret = pdb_delete_sam_account(sam_pass)) == True ) {
4014                 /*
4015                  * Now delete the unix side ....
4016                  * note: we don't check if the delete really happened
4017                  * as the script is not necessary present
4018                  * and maybe the sysadmin doesn't want to delete the unix side
4019                  */
4020                 smb_delete_user( pdb_get_username(sam_pass) );
4021         }
4022
4023         if ( can_add_accounts )
4024                 unbecome_root();
4025
4026         /******** END SeAddUsers BLOCK *********/
4027
4028         if ( !ret ) {
4029                 DEBUG(5,("_samr_delete_dom_user:Failed to delete entry for user %s.\n", pdb_get_username(sam_pass)));
4030                 pdb_free_sam(&sam_pass);
4031                 return NT_STATUS_CANNOT_DELETE;
4032         }
4033
4034
4035         pdb_free_sam(&sam_pass);
4036
4037         if (!close_policy_hnd(p, &q_u->user_pol))
4038                 return NT_STATUS_OBJECT_NAME_INVALID;
4039
4040         force_flush_samr_cache(disp_info);
4041
4042         return NT_STATUS_OK;
4043 }
4044
4045 /*********************************************************************
4046  _samr_delete_dom_group
4047 *********************************************************************/
4048
4049 NTSTATUS _samr_delete_dom_group(pipes_struct *p, SAMR_Q_DELETE_DOM_GROUP *q_u, SAMR_R_DELETE_DOM_GROUP *r_u)
4050 {
4051         DOM_SID group_sid;
4052         DOM_SID dom_sid;
4053         uint32 group_rid;
4054         fstring group_sid_str;
4055         gid_t gid;
4056         struct group *grp;
4057         GROUP_MAP map;
4058         uint32 acc_granted;
4059         SE_PRIV se_rights;
4060         BOOL can_add_accounts;
4061         BOOL ret;
4062         DISP_INFO *disp_info = NULL;
4063
4064         DEBUG(5, ("samr_delete_dom_group: %d\n", __LINE__));
4065
4066         /* Find the policy handle. Open a policy on it. */
4067         if (!get_lsa_policy_samr_sid(p, &q_u->group_pol, &group_sid, &acc_granted, &disp_info))
4068                 return NT_STATUS_INVALID_HANDLE;
4069
4070         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, STD_RIGHT_DELETE_ACCESS, "_samr_delete_dom_group"))) {
4071                 return r_u->status;
4072         }
4073
4074         sid_copy(&dom_sid, &group_sid);
4075         sid_to_string(group_sid_str, &dom_sid);
4076         sid_split_rid(&dom_sid, &group_rid);
4077
4078         DEBUG(10, ("sid is %s\n", group_sid_str));
4079
4080         /* we check if it's our SID before deleting */
4081         if (!sid_equal(&dom_sid, get_global_sam_sid()))
4082                 return NT_STATUS_NO_SUCH_GROUP;
4083
4084         DEBUG(10, ("lookup on Domain SID\n"));
4085
4086         if(!get_domain_group_from_sid(group_sid, &map))
4087                 return NT_STATUS_NO_SUCH_GROUP;
4088
4089         gid=map.gid;
4090
4091         /* check if group really exists */
4092         if ( (grp=getgrgid(gid)) == NULL)
4093                 return NT_STATUS_NO_SUCH_GROUP;
4094
4095         se_priv_copy( &se_rights, &se_add_users );
4096         can_add_accounts = user_has_privileges( p->pipe_user.nt_user_token, &se_rights );
4097
4098         /******** BEGIN SeAddUsers BLOCK *********/
4099
4100         if ( can_add_accounts )
4101                 become_root();
4102
4103         /* delete mapping first */
4104
4105         if ( (ret = pdb_delete_group_mapping_entry(group_sid)) == True ) {
4106                 smb_delete_group( grp->gr_name );
4107         }
4108
4109         if ( can_add_accounts )
4110                 unbecome_root();
4111
4112         /******** END SeAddUsers BLOCK *********/
4113
4114         if ( !ret ) {
4115                 DEBUG(5,("_samr_delete_dom_group: Failed to delete mapping entry for group %s.\n",
4116                         group_sid_str));
4117                 return NT_STATUS_ACCESS_DENIED;
4118         }
4119
4120         /* don't check that the unix group has been deleted.  Work like
4121            _samr_delet_dom_user() */
4122
4123         if (!close_policy_hnd(p, &q_u->group_pol))
4124                 return NT_STATUS_OBJECT_NAME_INVALID;
4125
4126         force_flush_samr_cache(disp_info);
4127
4128         return NT_STATUS_OK;
4129 }
4130
4131 /*********************************************************************
4132  _samr_delete_dom_alias
4133 *********************************************************************/
4134
4135 NTSTATUS _samr_delete_dom_alias(pipes_struct *p, SAMR_Q_DELETE_DOM_ALIAS *q_u, SAMR_R_DELETE_DOM_ALIAS *r_u)
4136 {
4137         DOM_SID alias_sid;
4138         uint32 acc_granted;
4139         SE_PRIV se_rights;
4140         BOOL can_add_accounts;
4141         BOOL ret;
4142         DISP_INFO *disp_info = NULL;
4143
4144         DEBUG(5, ("_samr_delete_dom_alias: %d\n", __LINE__));
4145
4146         /* Find the policy handle. Open a policy on it. */
4147         if (!get_lsa_policy_samr_sid(p, &q_u->alias_pol, &alias_sid, &acc_granted, &disp_info))
4148                 return NT_STATUS_INVALID_HANDLE;
4149
4150         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, STD_RIGHT_DELETE_ACCESS, "_samr_delete_dom_alias"))) {
4151                 return r_u->status;
4152         }
4153
4154         DEBUG(10, ("sid is %s\n", sid_string_static(&alias_sid)));
4155
4156         if (!sid_check_is_in_our_domain(&alias_sid))
4157                 return NT_STATUS_NO_SUCH_ALIAS;
4158
4159         DEBUG(10, ("lookup on Local SID\n"));
4160
4161         se_priv_copy( &se_rights, &se_add_users );
4162         can_add_accounts = user_has_privileges( p->pipe_user.nt_user_token, &se_rights );
4163
4164         /******** BEGIN SeAddUsers BLOCK *********/
4165
4166         if ( can_add_accounts )
4167                 become_root();
4168
4169         /* Have passdb delete the alias */
4170         ret = pdb_delete_alias(&alias_sid);
4171
4172         if ( can_add_accounts )
4173                 unbecome_root();
4174
4175         /******** END SeAddUsers BLOCK *********/
4176
4177         if ( !ret )
4178                 return NT_STATUS_ACCESS_DENIED;
4179
4180         if (!close_policy_hnd(p, &q_u->alias_pol))
4181                 return NT_STATUS_OBJECT_NAME_INVALID;
4182
4183         force_flush_samr_cache(disp_info);
4184
4185         return NT_STATUS_OK;
4186 }
4187
4188 /*********************************************************************
4189  _samr_create_dom_group
4190 *********************************************************************/
4191
4192 NTSTATUS _samr_create_dom_group(pipes_struct *p, SAMR_Q_CREATE_DOM_GROUP *q_u, SAMR_R_CREATE_DOM_GROUP *r_u)
4193 {
4194         DOM_SID dom_sid;
4195         DOM_SID info_sid;
4196         fstring name;
4197         fstring sid_string;
4198         struct group *grp;
4199         struct samr_info *info;
4200         uint32 acc_granted;
4201         gid_t gid;
4202         SE_PRIV se_rights;
4203         BOOL can_add_accounts;
4204         NTSTATUS result;
4205         DISP_INFO *disp_info = NULL;
4206
4207         /* Find the policy handle. Open a policy on it. */
4208         if (!get_lsa_policy_samr_sid(p, &q_u->pol, &dom_sid, &acc_granted, &disp_info))
4209                 return NT_STATUS_INVALID_HANDLE;
4210
4211         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, SA_RIGHT_DOMAIN_CREATE_GROUP, "_samr_create_dom_group"))) {
4212                 return r_u->status;
4213         }
4214
4215         if (!sid_equal(&dom_sid, get_global_sam_sid()))
4216                 return NT_STATUS_ACCESS_DENIED;
4217
4218         unistr2_to_ascii(name, &q_u->uni_acct_desc, sizeof(name)-1);
4219
4220         r_u->status = can_create(p->mem_ctx, name);
4221         if (!NT_STATUS_IS_OK(r_u->status)) {
4222                 return r_u->status;
4223         }
4224
4225         se_priv_copy( &se_rights, &se_add_users );
4226         can_add_accounts = user_has_privileges( p->pipe_user.nt_user_token, &se_rights );
4227
4228         /******** BEGIN SeAddUsers BLOCK *********/
4229
4230         if ( can_add_accounts )
4231                 become_root();
4232
4233         /* check that we successfully create the UNIX group */
4234
4235         result = NT_STATUS_ACCESS_DENIED;
4236         if ( (smb_create_group(name, &gid) == 0) && ((grp=getgrgid(gid)) != NULL) ) {
4237
4238                 /* so far, so good */
4239
4240                 result = NT_STATUS_OK;
4241
4242                 r_u->rid = pdb_gid_to_group_rid( grp->gr_gid );
4243
4244                 /* add the group to the mapping table */
4245
4246                 sid_copy( &info_sid, get_global_sam_sid() );
4247                 sid_append_rid( &info_sid, r_u->rid );
4248                 sid_to_string( sid_string, &info_sid );
4249
4250                 /* reset the error code if we fail to add the mapping entry */
4251
4252                 if ( !add_initial_entry(grp->gr_gid, sid_string, SID_NAME_DOM_GRP, name, NULL) )
4253                         result = NT_STATUS_ACCESS_DENIED;
4254         }
4255
4256         if ( can_add_accounts )
4257                 unbecome_root();
4258
4259         /******** END SeAddUsers BLOCK *********/
4260
4261         /* check if we should bail out here */
4262
4263         if ( !NT_STATUS_IS_OK(result) )
4264                 return result;
4265
4266         if ((info = get_samr_info_by_sid(&info_sid)) == NULL)
4267                 return NT_STATUS_NO_MEMORY;
4268
4269
4270         /* they created it; let the user do what he wants with it */
4271
4272         info->acc_granted = GENERIC_RIGHTS_GROUP_ALL_ACCESS;
4273
4274         /* get a (unique) handle.  open a policy on it. */
4275         if (!create_policy_hnd(p, &r_u->pol, free_samr_info, (void *)info))
4276                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
4277
4278         force_flush_samr_cache(disp_info);
4279
4280         return NT_STATUS_OK;
4281 }
4282
4283 /*********************************************************************
4284  _samr_create_dom_alias
4285 *********************************************************************/
4286
4287 NTSTATUS _samr_create_dom_alias(pipes_struct *p, SAMR_Q_CREATE_DOM_ALIAS *q_u, SAMR_R_CREATE_DOM_ALIAS *r_u)
4288 {
4289         DOM_SID dom_sid;
4290         DOM_SID info_sid;
4291         fstring name;
4292         struct samr_info *info;
4293         uint32 acc_granted;
4294         gid_t gid;
4295         NTSTATUS result;
4296         SE_PRIV se_rights;
4297         BOOL can_add_accounts;
4298         DISP_INFO *disp_info = NULL;
4299
4300         /* Find the policy handle. Open a policy on it. */
4301         if (!get_lsa_policy_samr_sid(p, &q_u->dom_pol, &dom_sid, &acc_granted, &disp_info))
4302                 return NT_STATUS_INVALID_HANDLE;
4303
4304         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, SA_RIGHT_DOMAIN_CREATE_ALIAS, "_samr_create_alias"))) {
4305                 return r_u->status;
4306         }
4307
4308         if (!sid_equal(&dom_sid, get_global_sam_sid()))
4309                 return NT_STATUS_ACCESS_DENIED;
4310
4311         r_u->status = can_create(p->mem_ctx, name);
4312         if (!NT_STATUS_IS_OK(r_u->status)) {
4313                 return r_u->status;
4314         }
4315
4316         unistr2_to_ascii(name, &q_u->uni_acct_desc, sizeof(name)-1);
4317
4318         se_priv_copy( &se_rights, &se_add_users );
4319         can_add_accounts = user_has_privileges( p->pipe_user.nt_user_token, &se_rights );
4320
4321         /******** BEGIN SeAddUsers BLOCK *********/
4322
4323         if ( can_add_accounts )
4324                 become_root();
4325
4326         /* Have passdb create the alias */
4327         result = pdb_create_alias(name, &r_u->rid);
4328
4329         if ( can_add_accounts )
4330                 unbecome_root();
4331
4332         /******** END SeAddUsers BLOCK *********/
4333
4334         if (!NT_STATUS_IS_OK(result))
4335                 return result;
4336
4337         sid_copy(&info_sid, get_global_sam_sid());
4338         sid_append_rid(&info_sid, r_u->rid);
4339
4340         if (!NT_STATUS_IS_OK(sid_to_gid(&info_sid, &gid)))
4341                 return NT_STATUS_ACCESS_DENIED;
4342
4343         /* check if the group has been successfully created */
4344         if ( getgrgid(gid) == NULL )
4345                 return NT_STATUS_ACCESS_DENIED;
4346
4347         if ((info = get_samr_info_by_sid(&info_sid)) == NULL)
4348                 return NT_STATUS_NO_MEMORY;
4349
4350         /* they created it; let the user do what he wants with it */
4351
4352         info->acc_granted = GENERIC_RIGHTS_ALIAS_ALL_ACCESS;
4353
4354         /* get a (unique) handle.  open a policy on it. */
4355         if (!create_policy_hnd(p, &r_u->alias_pol, free_samr_info, (void *)info))
4356                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
4357
4358         force_flush_samr_cache(disp_info);
4359
4360         return NT_STATUS_OK;
4361 }
4362
4363 /*********************************************************************
4364  _samr_query_groupinfo
4365
4366 sends the name/comment pair of a domain group
4367 level 1 send also the number of users of that group
4368 *********************************************************************/
4369
4370 NTSTATUS _samr_query_groupinfo(pipes_struct *p, SAMR_Q_QUERY_GROUPINFO *q_u, SAMR_R_QUERY_GROUPINFO *r_u)
4371 {
4372         DOM_SID group_sid;
4373         GROUP_MAP map;
4374         DOM_SID *sids=NULL;
4375         uid_t *uids;
4376         int num=0;
4377         GROUP_INFO_CTR *ctr;
4378         uint32 acc_granted;
4379         BOOL ret;
4380
4381         if (!get_lsa_policy_samr_sid(p, &q_u->pol, &group_sid, &acc_granted, NULL))
4382                 return NT_STATUS_INVALID_HANDLE;
4383
4384         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, SA_RIGHT_GROUP_LOOKUP_INFO, "_samr_query_groupinfo"))) {
4385                 return r_u->status;
4386         }
4387
4388         become_root();
4389         ret = get_domain_group_from_sid(group_sid, &map);
4390         unbecome_root();
4391         if (!ret)
4392                 return NT_STATUS_INVALID_HANDLE;
4393
4394         ctr=TALLOC_ZERO_P(p->mem_ctx, GROUP_INFO_CTR);
4395         if (ctr==NULL)
4396                 return NT_STATUS_NO_MEMORY;
4397
4398         switch (q_u->switch_level) {
4399                 case 1:
4400                         ctr->switch_value1 = 1;
4401                         if(!get_memberuids(map.gid, &uids, &num))
4402                                 return NT_STATUS_NO_SUCH_GROUP;
4403                         SAFE_FREE(uids);
4404                         init_samr_group_info1(&ctr->group.info1, map.nt_name, map.comment, num);
4405                         SAFE_FREE(sids);
4406                         break;
4407                 case 3:
4408                         ctr->switch_value1 = 3;
4409                         init_samr_group_info3(&ctr->group.info3);
4410                         break;
4411                 case 4:
4412                         ctr->switch_value1 = 4;
4413                         init_samr_group_info4(&ctr->group.info4, map.comment);
4414                         break;
4415                 default:
4416                         return NT_STATUS_INVALID_INFO_CLASS;
4417         }
4418
4419         init_samr_r_query_groupinfo(r_u, ctr, NT_STATUS_OK);
4420
4421         return NT_STATUS_OK;
4422 }
4423
4424 /*********************************************************************
4425  _samr_set_groupinfo
4426
4427  update a domain group's comment.
4428 *********************************************************************/
4429
4430 NTSTATUS _samr_set_groupinfo(pipes_struct *p, SAMR_Q_SET_GROUPINFO *q_u, SAMR_R_SET_GROUPINFO *r_u)
4431 {
4432         DOM_SID group_sid;
4433         GROUP_MAP map;
4434         GROUP_INFO_CTR *ctr;
4435         uint32 acc_granted;
4436         BOOL ret;
4437         BOOL can_mod_accounts;
4438         DISP_INFO *disp_info = NULL;
4439
4440         if (!get_lsa_policy_samr_sid(p, &q_u->pol, &group_sid, &acc_granted, &disp_info))
4441                 return NT_STATUS_INVALID_HANDLE;
4442
4443         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, SA_RIGHT_GROUP_SET_INFO, "_samr_set_groupinfo"))) {
4444                 return r_u->status;
4445         }
4446
4447         if (!get_domain_group_from_sid(group_sid, &map))
4448                 return NT_STATUS_NO_SUCH_GROUP;
4449
4450         ctr=q_u->ctr;
4451
4452         switch (ctr->switch_value1) {
4453                 case 1:
4454                         unistr2_to_ascii(map.comment, &(ctr->group.info1.uni_acct_desc), sizeof(map.comment)-1);
4455                         break;
4456                 case 4:
4457                         unistr2_to_ascii(map.comment, &(ctr->group.info4.uni_acct_desc), sizeof(map.comment)-1);
4458                         break;
4459                 default:
4460                         return NT_STATUS_INVALID_INFO_CLASS;
4461         }
4462
4463         can_mod_accounts = user_has_privileges( p->pipe_user.nt_user_token, &se_add_users );
4464
4465         /******** BEGIN SeAddUsers BLOCK *********/
4466
4467         if ( can_mod_accounts )
4468                 become_root();
4469
4470         ret = pdb_update_group_mapping_entry(&map);
4471
4472         if ( can_mod_accounts )
4473                 unbecome_root();
4474
4475         /******** End SeAddUsers BLOCK *********/
4476
4477         if (ret) {
4478                 force_flush_samr_cache(disp_info);
4479         }
4480
4481         return ret ? NT_STATUS_OK : NT_STATUS_ACCESS_DENIED;
4482 }
4483
4484 /*********************************************************************
4485  _samr_set_aliasinfo
4486
4487  update an alias's comment.
4488 *********************************************************************/
4489
4490 NTSTATUS _samr_set_aliasinfo(pipes_struct *p, SAMR_Q_SET_ALIASINFO *q_u, SAMR_R_SET_ALIASINFO *r_u)
4491 {
4492         DOM_SID group_sid;
4493         struct acct_info info;
4494         ALIAS_INFO_CTR *ctr;
4495         uint32 acc_granted;
4496         BOOL ret;
4497         BOOL can_mod_accounts;
4498         DISP_INFO *disp_info = NULL;
4499
4500         if (!get_lsa_policy_samr_sid(p, &q_u->alias_pol, &group_sid, &acc_granted, &disp_info))
4501                 return NT_STATUS_INVALID_HANDLE;
4502
4503         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, SA_RIGHT_ALIAS_SET_INFO, "_samr_set_aliasinfo"))) {
4504                 return r_u->status;
4505         }
4506
4507         ctr=&q_u->ctr;
4508
4509         switch (ctr->level) {
4510                 case 3:
4511                         if ( ctr->alias.info3.description.string ) {
4512                                 unistr2_to_ascii( info.acct_desc,
4513                                         ctr->alias.info3.description.string,
4514                                         sizeof(info.acct_desc)-1 );
4515                         }
4516                         break;
4517                 default:
4518                         return NT_STATUS_INVALID_INFO_CLASS;
4519         }
4520
4521         can_mod_accounts = user_has_privileges( p->pipe_user.nt_user_token, &se_add_users );
4522
4523         /******** BEGIN SeAddUsers BLOCK *********/
4524
4525         if ( can_mod_accounts )
4526                 become_root();
4527
4528         ret = pdb_set_aliasinfo( &group_sid, &info );
4529
4530         if ( can_mod_accounts )
4531                 unbecome_root();
4532
4533         /******** End SeAddUsers BLOCK *********/
4534
4535         if (ret) {
4536                 force_flush_samr_cache(disp_info);
4537         }
4538
4539         return ret ? NT_STATUS_OK : NT_STATUS_ACCESS_DENIED;
4540 }
4541
4542 /*********************************************************************
4543  _samr_get_dom_pwinfo
4544 *********************************************************************/
4545
4546 NTSTATUS _samr_get_dom_pwinfo(pipes_struct *p, SAMR_Q_GET_DOM_PWINFO *q_u, SAMR_R_GET_DOM_PWINFO *r_u)
4547 {
4548         /* Perform access check.  Since this rpc does not require a
4549            policy handle it will not be caught by the access checks on
4550            SAMR_CONNECT or SAMR_CONNECT_ANON. */
4551
4552         if (!pipe_access_check(p)) {
4553                 DEBUG(3, ("access denied to samr_get_dom_pwinfo\n"));
4554                 r_u->status = NT_STATUS_ACCESS_DENIED;
4555                 return r_u->status;
4556         }
4557
4558         /* Actually, returning zeros here works quite well :-). */
4559
4560         return NT_STATUS_OK;
4561 }
4562
4563 /*********************************************************************
4564  _samr_open_group
4565 *********************************************************************/
4566
4567 NTSTATUS _samr_open_group(pipes_struct *p, SAMR_Q_OPEN_GROUP *q_u, SAMR_R_OPEN_GROUP *r_u)
4568 {
4569         DOM_SID sid;
4570         DOM_SID info_sid;
4571         GROUP_MAP map;
4572         struct samr_info *info;
4573         SEC_DESC         *psd = NULL;
4574         uint32            acc_granted;
4575         uint32            des_access = q_u->access_mask;
4576         size_t            sd_size;
4577         NTSTATUS          status;
4578         fstring sid_string;
4579         BOOL ret;
4580         SE_PRIV se_rights;
4581
4582         if (!get_lsa_policy_samr_sid(p, &q_u->domain_pol, &sid, &acc_granted, NULL))
4583                 return NT_STATUS_INVALID_HANDLE;
4584
4585         status = access_check_samr_function(acc_granted,
4586                 SA_RIGHT_DOMAIN_OPEN_ACCOUNT, "_samr_open_group");
4587
4588         if ( !NT_STATUS_IS_OK(status) )
4589                 return status;
4590
4591         /*check if access can be granted as requested by client. */
4592         make_samr_object_sd(p->mem_ctx, &psd, &sd_size, &grp_generic_mapping, NULL, 0);
4593         se_map_generic(&des_access,&grp_generic_mapping);
4594
4595         se_priv_copy( &se_rights, &se_add_users );
4596
4597         status = access_check_samr_object(psd, p->pipe_user.nt_user_token,
4598                 &se_rights, GENERIC_RIGHTS_GROUP_WRITE, des_access,
4599                 &acc_granted, "_samr_open_group");
4600
4601         if ( !NT_STATUS_IS_OK(status) )
4602                 return status;
4603
4604         /* this should not be hard-coded like this */
4605
4606         if (!sid_equal(&sid, get_global_sam_sid()))
4607                 return NT_STATUS_ACCESS_DENIED;
4608
4609         sid_copy(&info_sid, get_global_sam_sid());
4610         sid_append_rid(&info_sid, q_u->rid_group);
4611         sid_to_string(sid_string, &info_sid);
4612
4613         if ((info = get_samr_info_by_sid(&info_sid)) == NULL)
4614                 return NT_STATUS_NO_MEMORY;
4615
4616         info->acc_granted = acc_granted;
4617
4618         DEBUG(10, ("_samr_open_group:Opening SID: %s\n", sid_string));
4619
4620         /* check if that group really exists */
4621         become_root();
4622         ret = get_domain_group_from_sid(info->sid, &map);
4623         unbecome_root();
4624         if (!ret)
4625                 return NT_STATUS_NO_SUCH_GROUP;
4626
4627         /* get a (unique) handle.  open a policy on it. */
4628         if (!create_policy_hnd(p, &r_u->pol, free_samr_info, (void *)info))
4629                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
4630
4631         return NT_STATUS_OK;
4632 }
4633
4634 /*********************************************************************
4635  _samr_remove_sid_foreign_domain
4636 *********************************************************************/
4637
4638 NTSTATUS _samr_remove_sid_foreign_domain(pipes_struct *p,
4639                                           SAMR_Q_REMOVE_SID_FOREIGN_DOMAIN *q_u,
4640                                           SAMR_R_REMOVE_SID_FOREIGN_DOMAIN *r_u)
4641 {
4642         DOM_SID                 delete_sid, domain_sid;
4643         uint32                  acc_granted;
4644         NTSTATUS                result;
4645         DISP_INFO *disp_info = NULL;
4646
4647         sid_copy( &delete_sid, &q_u->sid.sid );
4648
4649         DEBUG(5,("_samr_remove_sid_foreign_domain: removing SID [%s]\n",
4650                 sid_string_static(&delete_sid)));
4651
4652         /* Find the policy handle. Open a policy on it. */
4653
4654         if (!get_lsa_policy_samr_sid(p, &q_u->dom_pol, &domain_sid,
4655                                      &acc_granted, &disp_info))
4656                 return NT_STATUS_INVALID_HANDLE;
4657
4658         result = access_check_samr_function(acc_granted, STD_RIGHT_DELETE_ACCESS,
4659                 "_samr_remove_sid_foreign_domain");
4660
4661         if (!NT_STATUS_IS_OK(result))
4662                 return result;
4663
4664         DEBUG(8, ("_samr_remove_sid_foreign_domain:sid is %s\n",
4665                 sid_string_static(&domain_sid)));
4666
4667         /* we can only delete a user from a group since we don't have
4668            nested groups anyways.  So in the latter case, just say OK */
4669
4670         /* TODO: The above comment nowadays is bogus. Since we have nested
4671          * groups now, and aliases members are never reported out of the unix
4672          * group membership, the "just say OK" makes this call a no-op. For
4673          * us. This needs fixing however. */
4674
4675         /* I've only ever seen this in the wild when deleting a user from
4676          * usrmgr.exe. domain_sid is the builtin domain, and the sid to delete
4677          * is the user about to be deleted. I very much suspect this is the
4678          * only application of this call. To verify this, let people report
4679          * other cases. */
4680
4681         if (!sid_check_is_builtin(&domain_sid)) {
4682                 DEBUG(1,("_samr_remove_sid_foreign_domain: domain_sid = %s, "
4683                          "global_sam_sid() = %s\n",
4684                          sid_string_static(&domain_sid),
4685                          sid_string_static(get_global_sam_sid())));
4686                 DEBUGADD(1,("please report to samba-technical@samba.org!\n"));
4687                 return NT_STATUS_OK;
4688         }
4689
4690         force_flush_samr_cache(disp_info);
4691
4692         result = NT_STATUS_OK;
4693
4694         return result;
4695 }
4696
4697 /*******************************************************************
4698  _samr_query_domain_info2
4699  ********************************************************************/
4700
4701 NTSTATUS _samr_query_domain_info2(pipes_struct *p,
4702                 SAMR_Q_QUERY_DOMAIN_INFO2 *q_u,
4703                 SAMR_R_QUERY_DOMAIN_INFO2 *r_u)
4704 {
4705         struct samr_info *info = NULL;
4706         SAM_UNK_CTR *ctr;
4707         uint32 min_pass_len,pass_hist,flag;
4708         time_t u_expire, u_min_age;
4709         NTTIME nt_expire, nt_min_age;
4710
4711         time_t u_lock_duration, u_reset_time;
4712         NTTIME nt_lock_duration, nt_reset_time;
4713         uint32 lockout;
4714
4715         time_t u_logout;
4716         NTTIME nt_logout;
4717
4718         uint32 num_users=0, num_groups=0, num_aliases=0;
4719
4720         uint32 account_policy_temp;
4721
4722         time_t seq_num;
4723         uint32 server_role;
4724
4725         if ((ctr = TALLOC_ZERO_P(p->mem_ctx, SAM_UNK_CTR)) == NULL)
4726                 return NT_STATUS_NO_MEMORY;
4727
4728         ZERO_STRUCTP(ctr);
4729
4730         r_u->status = NT_STATUS_OK;
4731
4732         DEBUG(5,("_samr_query_domain_info2: %d\n", __LINE__));
4733
4734         /* find the policy handle.  open a policy on it. */
4735         if (!find_policy_by_hnd(p, &q_u->domain_pol, (void **)(void *)&info))
4736                 return NT_STATUS_INVALID_HANDLE;
4737
4738         switch (q_u->switch_value) {
4739                 case 0x01:
4740                         pdb_get_account_policy(AP_MIN_PASSWORD_LEN, &account_policy_temp);
4741                         min_pass_len = account_policy_temp;
4742
4743                         pdb_get_account_policy(AP_PASSWORD_HISTORY, &account_policy_temp);
4744                         pass_hist = account_policy_temp;
4745
4746                         pdb_get_account_policy(AP_USER_MUST_LOGON_TO_CHG_PASS, &account_policy_temp);
4747                         flag = account_policy_temp;
4748
4749                         pdb_get_account_policy(AP_MAX_PASSWORD_AGE, &account_policy_temp);
4750                         u_expire = account_policy_temp;
4751
4752                         pdb_get_account_policy(AP_MIN_PASSWORD_AGE, &account_policy_temp);
4753                         u_min_age = account_policy_temp;
4754
4755                         unix_to_nt_time_abs(&nt_expire, u_expire);
4756                         unix_to_nt_time_abs(&nt_min_age, u_min_age);
4757
4758                         init_unk_info1(&ctr->info.inf1, (uint16)min_pass_len, (uint16)pass_hist,
4759                                        flag, nt_expire, nt_min_age);
4760                         break;
4761                 case 0x02:
4762                         become_root();
4763                         num_users = count_sam_users(info->disp_info, ACB_NORMAL);
4764                         num_groups = count_sam_groups(info->disp_info);
4765                         num_aliases = count_sam_aliases(info->disp_info);
4766                         unbecome_root();
4767
4768                         pdb_get_account_policy(AP_TIME_TO_LOGOUT, &account_policy_temp);
4769                         u_logout = account_policy_temp;
4770
4771                         unix_to_nt_time_abs(&nt_logout, u_logout);
4772
4773                         if (!pdb_get_seq_num(&seq_num))
4774                                 seq_num = time(NULL);
4775
4776                         server_role = ROLE_DOMAIN_PDC;
4777                         if (lp_server_role() == ROLE_DOMAIN_BDC)
4778                                 server_role = ROLE_DOMAIN_BDC;
4779
4780                         init_unk_info2(&ctr->info.inf2, lp_serverstring(), lp_workgroup(), global_myname(), seq_num,
4781                                        num_users, num_groups, num_aliases, nt_logout, server_role);
4782                         break;
4783                 case 0x03:
4784                         pdb_get_account_policy(AP_TIME_TO_LOGOUT, &account_policy_temp);
4785                         u_logout = account_policy_temp;
4786
4787                         unix_to_nt_time_abs(&nt_logout, u_logout);
4788
4789                         init_unk_info3(&ctr->info.inf3, nt_logout);
4790                         break;
4791                 case 0x05:
4792                         init_unk_info5(&ctr->info.inf5, global_myname());
4793                         break;
4794                 case 0x06:
4795                         init_unk_info6(&ctr->info.inf6);
4796                         break;
4797                 case 0x07:
4798                         server_role = ROLE_DOMAIN_PDC;
4799                         if (lp_server_role() == ROLE_DOMAIN_BDC)
4800                                 server_role = ROLE_DOMAIN_BDC;
4801
4802                         init_unk_info7(&ctr->info.inf7, server_role);
4803                         break;
4804                 case 0x08:
4805                         if (!pdb_get_seq_num(&seq_num))
4806                                 seq_num = time(NULL);
4807
4808                         init_unk_info8(&ctr->info.inf8, (uint32) seq_num);
4809                         break;
4810                 case 0x0c:
4811                         pdb_get_account_policy(AP_LOCK_ACCOUNT_DURATION, &account_policy_temp);
4812                         u_lock_duration = account_policy_temp;
4813                         if (u_lock_duration != -1)
4814                                 u_lock_duration *= 60;
4815
4816                         pdb_get_account_policy(AP_RESET_COUNT_TIME, &account_policy_temp);
4817                         u_reset_time = account_policy_temp * 60;
4818
4819                         pdb_get_account_policy(AP_BAD_ATTEMPT_LOCKOUT, &account_policy_temp);
4820                         lockout = account_policy_temp;
4821
4822                         unix_to_nt_time_abs(&nt_lock_duration, u_lock_duration);
4823                         unix_to_nt_time_abs(&nt_reset_time, u_reset_time);
4824
4825                         init_unk_info12(&ctr->info.inf12, nt_lock_duration, nt_reset_time, (uint16)lockout);
4826                         break;
4827                 default:
4828                         return NT_STATUS_INVALID_INFO_CLASS;
4829         }
4830
4831         init_samr_r_samr_query_domain_info2(r_u, q_u->switch_value, ctr, NT_STATUS_OK);
4832
4833         DEBUG(5,("_samr_query_domain_info2: %d\n", __LINE__));
4834
4835         return r_u->status;
4836 }
4837
4838 /*******************************************************************
4839  _samr_
4840  ********************************************************************/
4841
4842 NTSTATUS _samr_set_dom_info(pipes_struct *p, SAMR_Q_SET_DOMAIN_INFO *q_u, SAMR_R_SET_DOMAIN_INFO *r_u)
4843 {
4844         time_t u_expire, u_min_age;
4845         time_t u_logout;
4846         time_t u_lock_duration, u_reset_time;
4847
4848         r_u->status = NT_STATUS_OK;
4849
4850         DEBUG(5,("_samr_set_dom_info: %d\n", __LINE__));
4851
4852         /* find the policy handle.  open a policy on it. */
4853         if (!find_policy_by_hnd(p, &q_u->domain_pol, NULL))
4854                 return NT_STATUS_INVALID_HANDLE;
4855
4856         DEBUG(5,("_samr_set_dom_info: switch_value: %d\n", q_u->switch_value));
4857
4858         switch (q_u->switch_value) {
4859                 case 0x01:
4860                         u_expire=nt_time_to_unix_abs(&q_u->ctr->info.inf1.expire);
4861                         u_min_age=nt_time_to_unix_abs(&q_u->ctr->info.inf1.min_passwordage);
4862
4863                         pdb_set_account_policy(AP_MIN_PASSWORD_LEN, (uint32)q_u->ctr->info.inf1.min_length_password);
4864                         pdb_set_account_policy(AP_PASSWORD_HISTORY, (uint32)q_u->ctr->info.inf1.password_history);
4865                         pdb_set_account_policy(AP_USER_MUST_LOGON_TO_CHG_PASS, (uint32)q_u->ctr->info.inf1.password_properties);
4866                         pdb_set_account_policy(AP_MAX_PASSWORD_AGE, (int)u_expire);
4867                         pdb_set_account_policy(AP_MIN_PASSWORD_AGE, (int)u_min_age);
4868                         break;
4869                 case 0x02:
4870                         break;
4871                 case 0x03:
4872                         u_logout=nt_time_to_unix_abs(&q_u->ctr->info.inf3.logout);
4873                         pdb_set_account_policy(AP_TIME_TO_LOGOUT, (int)u_logout);
4874                         break;
4875                 case 0x05:
4876                         break;
4877                 case 0x06:
4878                         break;
4879                 case 0x07:
4880                         break;
4881                 case 0x0c:
4882                         u_lock_duration=nt_time_to_unix_abs(&q_u->ctr->info.inf12.duration);
4883                         if (u_lock_duration != -1)
4884                                 u_lock_duration /= 60;
4885
4886                         u_reset_time=nt_time_to_unix_abs(&q_u->ctr->info.inf12.reset_count)/60;
4887
4888                         pdb_set_account_policy(AP_LOCK_ACCOUNT_DURATION, (int)u_lock_duration);
4889                         pdb_set_account_policy(AP_RESET_COUNT_TIME, (int)u_reset_time);
4890                         pdb_set_account_policy(AP_BAD_ATTEMPT_LOCKOUT, (uint32)q_u->ctr->info.inf12.bad_attempt_lockout);
4891                         break;
4892                 default:
4893                         return NT_STATUS_INVALID_INFO_CLASS;
4894         }
4895
4896         init_samr_r_set_domain_info(r_u, NT_STATUS_OK);
4897
4898         DEBUG(5,("_samr_set_dom_info: %d\n", __LINE__));
4899
4900         return r_u->status;
4901 }