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         DEBUG(10, ("Checking whether [%s] can be created\n", new_name));
2247
2248         become_root();
2249         /* Lookup in our local databases (only LOOKUP_NAME_ISOLATED set)
2250          * whether the name already exists */
2251         result = lookup_name(mem_ctx, new_name, LOOKUP_NAME_ISOLATED,
2252                              NULL, NULL, NULL, &type);
2253         unbecome_root();
2254
2255         if (!result) {
2256                 DEBUG(10, ("%s does not exist, can create it\n", new_name));
2257                 return NT_STATUS_OK;
2258         }
2259
2260         DEBUG(5, ("trying to create %s, exists as %s\n",
2261                   new_name, sid_type_lookup(type)));
2262
2263         if (type == SID_NAME_DOM_GRP) {
2264                 return NT_STATUS_GROUP_EXISTS;
2265         }
2266         if (type == SID_NAME_ALIAS) {
2267                 return NT_STATUS_ALIAS_EXISTS;
2268         }
2269
2270         /* Yes, the default is NT_STATUS_USER_EXISTS */
2271         return NT_STATUS_USER_EXISTS;
2272 }
2273
2274 /*******************************************************************
2275  _samr_create_user
2276  Create an account, can be either a normal user or a machine.
2277  This funcion will need to be updated for bdc/domain trusts.
2278  ********************************************************************/
2279
2280 NTSTATUS _samr_create_user(pipes_struct *p, SAMR_Q_CREATE_USER *q_u, SAMR_R_CREATE_USER *r_u)
2281 {
2282         SAM_ACCOUNT *sam_pass=NULL;
2283         fstring account;
2284         DOM_SID sid;
2285         pstring add_script;
2286         POLICY_HND dom_pol = q_u->domain_pol;
2287         UNISTR2 user_account = q_u->uni_name;
2288         uint16 acb_info = q_u->acb_info;
2289         POLICY_HND *user_pol = &r_u->user_pol;
2290         struct samr_info *info = NULL;
2291         BOOL ret;
2292         NTSTATUS nt_status;
2293         struct passwd *pw;
2294         uint32 acc_granted;
2295         SEC_DESC *psd;
2296         size_t    sd_size;
2297         uint32 new_rid = 0;
2298         /* check this, when giving away 'add computer to domain' privs */
2299         uint32    des_access = GENERIC_RIGHTS_USER_ALL_ACCESS;
2300         BOOL can_add_account = False;
2301         SE_PRIV se_rights;
2302         DISP_INFO *disp_info = NULL;
2303
2304         /* Get the domain SID stored in the domain policy */
2305         if (!get_lsa_policy_samr_sid(p, &dom_pol, &sid, &acc_granted, &disp_info))
2306                 return NT_STATUS_INVALID_HANDLE;
2307
2308         if (!NT_STATUS_IS_OK(nt_status = access_check_samr_function(acc_granted, SA_RIGHT_DOMAIN_CREATE_USER, "_samr_create_user"))) {
2309                 return nt_status;
2310         }
2311
2312         if (!(acb_info == ACB_NORMAL || acb_info == ACB_DOMTRUST || acb_info == ACB_WSTRUST || acb_info == ACB_SVRTRUST)) {
2313                 /* Match Win2k, and return NT_STATUS_INVALID_PARAMETER if
2314                    this parameter is not an account type */
2315                 return NT_STATUS_INVALID_PARAMETER;
2316         }
2317
2318         rpcstr_pull(account, user_account.buffer, sizeof(account), user_account.uni_str_len*2, 0);
2319         strlower_m(account);
2320
2321         nt_status = can_create(p->mem_ctx, account);
2322         if (!NT_STATUS_IS_OK(nt_status)) {
2323                 return nt_status;
2324         }
2325
2326         /*********************************************************************
2327          * HEADS UP!  If we have to create a new user account, we have to get
2328          * a new RID from somewhere.  This used to be done by the passdb
2329          * backend. It has been moved into idmap now.  Since idmap is now
2330          * wrapped up behind winbind, this means you have to run winbindd if you
2331          * want new accounts to get a new RID when "enable rid algorithm = no".
2332          * Tough.  We now have a uniform way of allocating RIDs regardless
2333          * of what ever passdb backend people may use.
2334          *                                             --jerry (2003-07-10)
2335          *********************************************************************/
2336
2337         pw = Get_Pwnam(account);
2338
2339         /* determine which user right we need to check based on the acb_info */
2340
2341         if ( acb_info & ACB_WSTRUST )
2342         {
2343                 pstrcpy(add_script, lp_addmachine_script());
2344                 se_priv_copy( &se_rights, &se_machine_account );
2345                 can_add_account = user_has_privileges( p->pipe_user.nt_user_token, &se_rights );
2346         }
2347         /* usrmgr.exe (and net rpc trustdom grant) creates a normal user
2348            account for domain trusts and changes the ACB flags later */
2349         else if ( acb_info & ACB_NORMAL && (account[strlen(account)-1] != '$') )
2350         {
2351                 pstrcpy(add_script, lp_adduser_script());
2352                 se_priv_copy( &se_rights, &se_add_users );
2353                 can_add_account = user_has_privileges( p->pipe_user.nt_user_token, &se_rights );
2354         }
2355         else    /* implicit assumption of a BDC or domain trust account here (we already check the flags earlier) */
2356         {
2357                 pstrcpy(add_script, lp_addmachine_script());
2358                 if ( lp_enable_privileges() ) {
2359                         /* only Domain Admins can add a BDC or domain trust */
2360                         se_priv_copy( &se_rights, &se_priv_none );
2361                         can_add_account = nt_token_check_domain_rid( p->pipe_user.nt_user_token, DOMAIN_GROUP_RID_ADMINS );
2362         }
2363         }
2364
2365         DEBUG(5, ("_samr_create_user: %s can add this account : %s\n",
2366                 p->pipe_user_name, can_add_account ? "True":"False" ));
2367
2368         /********** BEGIN Admin BLOCK **********/
2369
2370         if ( can_add_account )
2371                 become_root();
2372
2373         if ( !pw ) {
2374                 if (*add_script) {
2375                         int add_ret;
2376
2377                         all_string_sub(add_script, "%u", account, sizeof(add_script));
2378                         add_ret = smbrun(add_script,NULL);
2379                         DEBUG(add_ret ? 0 : 3,("_samr_create_user: Running the command `%s' gave %d\n", add_script, add_ret));
2380                 }
2381         }
2382
2383         /* implicit call to getpwnam() next.  we have a valid SID coming out of this call */
2384
2385         flush_pwnam_cache();
2386         nt_status = pdb_init_sam_new(&sam_pass, account, new_rid);
2387
2388         /* this code is order such that we have no unnecessary retuns
2389            out of the admin block of code */
2390
2391         if ( NT_STATUS_IS_OK(nt_status) ) {
2392                 pdb_set_acct_ctrl(sam_pass, acb_info, PDB_CHANGED);
2393
2394                 if ( !(ret = pdb_add_sam_account(sam_pass)) ) {
2395                         pdb_free_sam(&sam_pass);
2396                         DEBUG(0, ("could not add user/computer %s to passdb.  Check permissions?\n",
2397                                 account));
2398                         nt_status = NT_STATUS_ACCESS_DENIED;
2399                 }
2400         }
2401
2402         if ( can_add_account )
2403                 unbecome_root();
2404
2405         /********** END Admin BLOCK **********/
2406
2407         /* now check for failure */
2408
2409         if ( !NT_STATUS_IS_OK(nt_status) )
2410                 return nt_status;
2411
2412         /* Get the user's SID */
2413
2414         sid_copy(&sid, pdb_get_user_sid(sam_pass));
2415
2416         make_samr_object_sd(p->mem_ctx, &psd, &sd_size, &usr_generic_mapping, &sid, SAMR_USR_RIGHTS_WRITE_PW);
2417         se_map_generic(&des_access, &usr_generic_mapping);
2418
2419         nt_status = access_check_samr_object(psd, p->pipe_user.nt_user_token,
2420                 &se_rights, GENERIC_RIGHTS_USER_WRITE, des_access,
2421                 &acc_granted, "_samr_create_user");
2422
2423         if ( !NT_STATUS_IS_OK(nt_status) ) {
2424                 return nt_status;
2425         }
2426
2427         /* associate the user's SID with the new handle. */
2428         if ((info = get_samr_info_by_sid(&sid)) == NULL) {
2429                 pdb_free_sam(&sam_pass);
2430                 return NT_STATUS_NO_MEMORY;
2431         }
2432
2433         ZERO_STRUCTP(info);
2434         info->sid = sid;
2435         info->acc_granted = acc_granted;
2436
2437         /* get a (unique) handle.  open a policy on it. */
2438         if (!create_policy_hnd(p, user_pol, free_samr_info, (void *)info)) {
2439                 pdb_free_sam(&sam_pass);
2440                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
2441         }
2442
2443         /* After a "set" ensure we have no cached display info. */
2444         force_flush_samr_cache(info->disp_info);
2445
2446         r_u->user_rid=pdb_get_user_rid(sam_pass);
2447
2448         r_u->access_granted = acc_granted;
2449
2450         pdb_free_sam(&sam_pass);
2451
2452         return NT_STATUS_OK;
2453 }
2454
2455 /*******************************************************************
2456  samr_reply_connect_anon
2457  ********************************************************************/
2458
2459 NTSTATUS _samr_connect_anon(pipes_struct *p, SAMR_Q_CONNECT_ANON *q_u, SAMR_R_CONNECT_ANON *r_u)
2460 {
2461         struct samr_info *info = NULL;
2462         uint32    des_access = q_u->access_mask;
2463
2464         /* Access check */
2465
2466         if (!pipe_access_check(p)) {
2467                 DEBUG(3, ("access denied to samr_connect_anon\n"));
2468                 r_u->status = NT_STATUS_ACCESS_DENIED;
2469                 return r_u->status;
2470         }
2471
2472         /* set up the SAMR connect_anon response */
2473
2474         r_u->status = NT_STATUS_OK;
2475
2476         /* associate the user's SID with the new handle. */
2477         if ((info = get_samr_info_by_sid(NULL)) == NULL)
2478                 return NT_STATUS_NO_MEMORY;
2479
2480         /* don't give away the farm but this is probably ok.  The SA_RIGHT_SAM_ENUM_DOMAINS
2481            was observed from a win98 client trying to enumerate users (when configured
2482            user level access control on shares)   --jerry */
2483
2484         se_map_generic( &des_access, &sam_generic_mapping );
2485         info->acc_granted = des_access & (SA_RIGHT_SAM_ENUM_DOMAINS|SA_RIGHT_SAM_OPEN_DOMAIN);
2486
2487         info->status = q_u->unknown_0;
2488
2489         /* get a (unique) handle.  open a policy on it. */
2490         if (!create_policy_hnd(p, &r_u->connect_pol, free_samr_info, (void *)info))
2491                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
2492
2493         return r_u->status;
2494 }
2495
2496 /*******************************************************************
2497  samr_reply_connect
2498  ********************************************************************/
2499
2500 NTSTATUS _samr_connect(pipes_struct *p, SAMR_Q_CONNECT *q_u, SAMR_R_CONNECT *r_u)
2501 {
2502         struct samr_info *info = NULL;
2503         SEC_DESC *psd = NULL;
2504         uint32    acc_granted;
2505         uint32    des_access = q_u->access_mask;
2506         NTSTATUS  nt_status;
2507         size_t    sd_size;
2508
2509
2510         DEBUG(5,("_samr_connect: %d\n", __LINE__));
2511
2512         /* Access check */
2513
2514         if (!pipe_access_check(p)) {
2515                 DEBUG(3, ("access denied to samr_connect\n"));
2516                 r_u->status = NT_STATUS_ACCESS_DENIED;
2517                 return r_u->status;
2518         }
2519
2520         make_samr_object_sd(p->mem_ctx, &psd, &sd_size, &sam_generic_mapping, NULL, 0);
2521         se_map_generic(&des_access, &sam_generic_mapping);
2522
2523         nt_status = access_check_samr_object(psd, p->pipe_user.nt_user_token,
2524                 NULL, 0, des_access, &acc_granted, "_samr_connect");
2525
2526         if ( !NT_STATUS_IS_OK(nt_status) )
2527                 return nt_status;
2528
2529         r_u->status = NT_STATUS_OK;
2530
2531         /* associate the user's SID and access granted with the new handle. */
2532         if ((info = get_samr_info_by_sid(NULL)) == NULL)
2533                 return NT_STATUS_NO_MEMORY;
2534
2535         info->acc_granted = acc_granted;
2536         info->status = q_u->access_mask;
2537
2538         /* get a (unique) handle.  open a policy on it. */
2539         if (!create_policy_hnd(p, &r_u->connect_pol, free_samr_info, (void *)info))
2540                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
2541
2542         DEBUG(5,("_samr_connect: %d\n", __LINE__));
2543
2544         return r_u->status;
2545 }
2546
2547 /*******************************************************************
2548  samr_connect4
2549  ********************************************************************/
2550
2551 NTSTATUS _samr_connect4(pipes_struct *p, SAMR_Q_CONNECT4 *q_u, SAMR_R_CONNECT4 *r_u)
2552 {
2553         struct samr_info *info = NULL;
2554         SEC_DESC *psd = NULL;
2555         uint32    acc_granted;
2556         uint32    des_access = q_u->access_mask;
2557         NTSTATUS  nt_status;
2558         size_t    sd_size;
2559
2560
2561         DEBUG(5,("_samr_connect4: %d\n", __LINE__));
2562
2563         /* Access check */
2564
2565         if (!pipe_access_check(p)) {
2566                 DEBUG(3, ("access denied to samr_connect4\n"));
2567                 r_u->status = NT_STATUS_ACCESS_DENIED;
2568                 return r_u->status;
2569         }
2570
2571         make_samr_object_sd(p->mem_ctx, &psd, &sd_size, &sam_generic_mapping, NULL, 0);
2572         se_map_generic(&des_access, &sam_generic_mapping);
2573
2574         nt_status = access_check_samr_object(psd, p->pipe_user.nt_user_token,
2575                 NULL, 0, des_access, &acc_granted, "_samr_connect4");
2576
2577         if ( !NT_STATUS_IS_OK(nt_status) )
2578                 return nt_status;
2579
2580         r_u->status = NT_STATUS_OK;
2581
2582         /* associate the user's SID and access granted with the new handle. */
2583         if ((info = get_samr_info_by_sid(NULL)) == NULL)
2584                 return NT_STATUS_NO_MEMORY;
2585
2586         info->acc_granted = acc_granted;
2587         info->status = q_u->access_mask;
2588
2589         /* get a (unique) handle.  open a policy on it. */
2590         if (!create_policy_hnd(p, &r_u->connect_pol, free_samr_info, (void *)info))
2591                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
2592
2593         DEBUG(5,("_samr_connect: %d\n", __LINE__));
2594
2595         return r_u->status;
2596 }
2597
2598 /*******************************************************************
2599  samr_connect5
2600  ********************************************************************/
2601
2602 NTSTATUS _samr_connect5(pipes_struct *p, SAMR_Q_CONNECT5 *q_u, SAMR_R_CONNECT5 *r_u)
2603 {
2604         struct samr_info *info = NULL;
2605         SEC_DESC *psd = NULL;
2606         uint32    acc_granted;
2607         uint32    des_access = q_u->access_mask;
2608         NTSTATUS  nt_status;
2609         POLICY_HND pol;
2610         size_t    sd_size;
2611
2612
2613         DEBUG(5,("_samr_connect5: %d\n", __LINE__));
2614
2615         ZERO_STRUCTP(r_u);
2616
2617         /* Access check */
2618
2619         if (!pipe_access_check(p)) {
2620                 DEBUG(3, ("access denied to samr_connect5\n"));
2621                 r_u->status = NT_STATUS_ACCESS_DENIED;
2622                 return r_u->status;
2623         }
2624
2625         make_samr_object_sd(p->mem_ctx, &psd, &sd_size, &sam_generic_mapping, NULL, 0);
2626         se_map_generic(&des_access, &sam_generic_mapping);
2627
2628         nt_status = access_check_samr_object(psd, p->pipe_user.nt_user_token,
2629                 NULL, 0, des_access, &acc_granted, "_samr_connect5");
2630
2631         if ( !NT_STATUS_IS_OK(nt_status) )
2632                 return nt_status;
2633
2634         /* associate the user's SID and access granted with the new handle. */
2635         if ((info = get_samr_info_by_sid(NULL)) == NULL)
2636                 return NT_STATUS_NO_MEMORY;
2637
2638         info->acc_granted = acc_granted;
2639         info->status = q_u->access_mask;
2640
2641         /* get a (unique) handle.  open a policy on it. */
2642         if (!create_policy_hnd(p, &pol, free_samr_info, (void *)info))
2643                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
2644
2645         DEBUG(5,("_samr_connect: %d\n", __LINE__));
2646
2647         init_samr_r_connect5(r_u, &pol, NT_STATUS_OK);
2648
2649         return r_u->status;
2650 }
2651
2652 /**********************************************************************
2653  api_samr_lookup_domain
2654  **********************************************************************/
2655
2656 NTSTATUS _samr_lookup_domain(pipes_struct *p, SAMR_Q_LOOKUP_DOMAIN *q_u, SAMR_R_LOOKUP_DOMAIN *r_u)
2657 {
2658         struct samr_info *info;
2659         fstring domain_name;
2660         DOM_SID sid;
2661
2662         r_u->status = NT_STATUS_OK;
2663
2664         if (!find_policy_by_hnd(p, &q_u->connect_pol, (void**)(void *)&info))
2665                 return NT_STATUS_INVALID_HANDLE;
2666
2667         /* win9x user manager likes to use SA_RIGHT_SAM_ENUM_DOMAINS here.
2668            Reverted that change so we will work with RAS servers again */
2669
2670         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(info->acc_granted,
2671                 SA_RIGHT_SAM_OPEN_DOMAIN, "_samr_lookup_domain")))
2672         {
2673                 return r_u->status;
2674         }
2675
2676         rpcstr_pull(domain_name, q_u->uni_domain.buffer, sizeof(domain_name), q_u->uni_domain.uni_str_len*2, 0);
2677
2678         ZERO_STRUCT(sid);
2679
2680         if (!secrets_fetch_domain_sid(domain_name, &sid)) {
2681                 r_u->status = NT_STATUS_NO_SUCH_DOMAIN;
2682         }
2683
2684         DEBUG(2,("Returning domain sid for domain %s -> %s\n", domain_name, sid_string_static(&sid)));
2685
2686         init_samr_r_lookup_domain(r_u, &sid, r_u->status);
2687
2688         return r_u->status;
2689 }
2690
2691 /******************************************************************
2692 makes a SAMR_R_ENUM_DOMAINS structure.
2693 ********************************************************************/
2694
2695 static BOOL make_enum_domains(TALLOC_CTX *ctx, SAM_ENTRY **pp_sam,
2696                         UNISTR2 **pp_uni_name, uint32 num_sam_entries, fstring doms[])
2697 {
2698         uint32 i;
2699         SAM_ENTRY *sam;
2700         UNISTR2 *uni_name;
2701
2702         DEBUG(5, ("make_enum_domains\n"));
2703
2704         *pp_sam = NULL;
2705         *pp_uni_name = NULL;
2706
2707         if (num_sam_entries == 0)
2708                 return True;
2709
2710         sam = TALLOC_ZERO_ARRAY(ctx, SAM_ENTRY, num_sam_entries);
2711         uni_name = TALLOC_ZERO_ARRAY(ctx, UNISTR2, num_sam_entries);
2712
2713         if (sam == NULL || uni_name == NULL)
2714                 return False;
2715
2716         for (i = 0; i < num_sam_entries; i++) {
2717                 init_unistr2(&uni_name[i], doms[i], UNI_FLAGS_NONE);
2718                 init_sam_entry(&sam[i], &uni_name[i], 0);
2719         }
2720
2721         *pp_sam = sam;
2722         *pp_uni_name = uni_name;
2723
2724         return True;
2725 }
2726
2727 /**********************************************************************
2728  api_samr_enum_domains
2729  **********************************************************************/
2730
2731 NTSTATUS _samr_enum_domains(pipes_struct *p, SAMR_Q_ENUM_DOMAINS *q_u, SAMR_R_ENUM_DOMAINS *r_u)
2732 {
2733         struct samr_info *info;
2734         uint32 num_entries = 2;
2735         fstring dom[2];
2736         const char *name;
2737
2738         r_u->status = NT_STATUS_OK;
2739
2740         if (!find_policy_by_hnd(p, &q_u->pol, (void**)(void *)&info))
2741                 return NT_STATUS_INVALID_HANDLE;
2742
2743         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(info->acc_granted, SA_RIGHT_SAM_ENUM_DOMAINS, "_samr_enum_domains"))) {
2744                 return r_u->status;
2745         }
2746
2747         name = get_global_sam_name();
2748
2749         fstrcpy(dom[0],name);
2750         strupper_m(dom[0]);
2751         fstrcpy(dom[1],"Builtin");
2752
2753         if (!make_enum_domains(p->mem_ctx, &r_u->sam, &r_u->uni_dom_name, num_entries, dom))
2754                 return NT_STATUS_NO_MEMORY;
2755
2756         init_samr_r_enum_domains(r_u, q_u->start_idx + num_entries, num_entries);
2757
2758         return r_u->status;
2759 }
2760
2761 /*******************************************************************
2762  api_samr_open_alias
2763  ********************************************************************/
2764
2765 NTSTATUS _samr_open_alias(pipes_struct *p, SAMR_Q_OPEN_ALIAS *q_u, SAMR_R_OPEN_ALIAS *r_u)
2766 {
2767         DOM_SID sid;
2768         POLICY_HND domain_pol = q_u->dom_pol;
2769         uint32 alias_rid = q_u->rid_alias;
2770         POLICY_HND *alias_pol = &r_u->pol;
2771         struct    samr_info *info = NULL;
2772         SEC_DESC *psd = NULL;
2773         uint32    acc_granted;
2774         uint32    des_access = q_u->access_mask;
2775         size_t    sd_size;
2776         NTSTATUS  status;
2777         SE_PRIV se_rights;
2778
2779         r_u->status = NT_STATUS_OK;
2780
2781         /* find the domain policy and get the SID / access bits stored in the domain policy */
2782
2783         if ( !get_lsa_policy_samr_sid(p, &domain_pol, &sid, &acc_granted, NULL) )
2784                 return NT_STATUS_INVALID_HANDLE;
2785
2786         status = access_check_samr_function(acc_granted,
2787                 SA_RIGHT_DOMAIN_OPEN_ACCOUNT, "_samr_open_alias");
2788
2789         if ( !NT_STATUS_IS_OK(status) )
2790                 return status;
2791
2792         /* append the alias' RID to it */
2793
2794         if (!sid_append_rid(&sid, alias_rid))
2795                 return NT_STATUS_NO_SUCH_ALIAS;
2796
2797         /*check if access can be granted as requested by client. */
2798
2799         make_samr_object_sd(p->mem_ctx, &psd, &sd_size, &ali_generic_mapping, NULL, 0);
2800         se_map_generic(&des_access,&ali_generic_mapping);
2801
2802         se_priv_copy( &se_rights, &se_add_users );
2803
2804
2805         status = access_check_samr_object(psd, p->pipe_user.nt_user_token,
2806                 &se_rights, GENERIC_RIGHTS_ALIAS_WRITE, des_access,
2807                 &acc_granted, "_samr_open_alias");
2808
2809         if ( !NT_STATUS_IS_OK(status) )
2810                 return status;
2811
2812         {
2813                 /* Check we actually have the requested alias */
2814                 enum SID_NAME_USE type;
2815                 BOOL result;
2816
2817                 become_root();
2818                 result = lookup_sid(NULL, &sid, NULL, NULL, &type);
2819                 unbecome_root();
2820
2821                 if (!result || (type != SID_NAME_ALIAS)) {
2822                         return NT_STATUS_NO_SUCH_ALIAS;
2823                 }
2824         }
2825
2826         /* associate the alias SID with the new handle. */
2827         if ((info = get_samr_info_by_sid(&sid)) == NULL)
2828                 return NT_STATUS_NO_MEMORY;
2829
2830         info->acc_granted = acc_granted;
2831
2832         /* get a (unique) handle.  open a policy on it. */
2833         if (!create_policy_hnd(p, alias_pol, free_samr_info, (void *)info))
2834                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
2835
2836         return r_u->status;
2837 }
2838
2839 /*******************************************************************
2840  set_user_info_7
2841  ********************************************************************/
2842 static NTSTATUS set_user_info_7(TALLOC_CTX *mem_ctx,
2843                                 const SAM_USER_INFO_7 *id7, SAM_ACCOUNT *pwd)
2844 {
2845         fstring new_name;
2846         NTSTATUS rc;
2847
2848         if (id7 == NULL) {
2849                 DEBUG(5, ("set_user_info_7: NULL id7\n"));
2850                 pdb_free_sam(&pwd);
2851                 return NT_STATUS_ACCESS_DENIED;
2852         }
2853
2854         if(!rpcstr_pull(new_name, id7->uni_name.buffer, sizeof(new_name), id7->uni_name.uni_str_len*2, 0)) {
2855                 DEBUG(5, ("set_user_info_7: failed to get new username\n"));
2856                 pdb_free_sam(&pwd);
2857                 return NT_STATUS_ACCESS_DENIED;
2858         }
2859
2860         /* check to see if the new username already exists.  Note: we can't
2861            reliably lock all backends, so there is potentially the
2862            possibility that a user can be created in between this check and
2863            the rename.  The rename should fail, but may not get the
2864            exact same failure status code.  I think this is small enough
2865            of a window for this type of operation and the results are
2866            simply that the rename fails with a slightly different status
2867            code (like UNSUCCESSFUL instead of ALREADY_EXISTS). */
2868
2869         rc = can_create(mem_ctx, new_name);
2870         if (!NT_STATUS_IS_OK(rc)) {
2871                 return rc;
2872         }
2873
2874         rc = pdb_rename_sam_account(pwd, new_name);
2875
2876         pdb_free_sam(&pwd);
2877         return rc;
2878 }
2879
2880 /*******************************************************************
2881  set_user_info_16
2882  ********************************************************************/
2883
2884 static BOOL set_user_info_16(const SAM_USER_INFO_16 *id16, SAM_ACCOUNT *pwd)
2885 {
2886         if (id16 == NULL) {
2887                 DEBUG(5, ("set_user_info_16: NULL id16\n"));
2888                 pdb_free_sam(&pwd);
2889                 return False;
2890         }
2891
2892         /* FIX ME: check if the value is really changed --metze */
2893         if (!pdb_set_acct_ctrl(pwd, id16->acb_info, PDB_CHANGED)) {
2894                 pdb_free_sam(&pwd);
2895                 return False;
2896         }
2897
2898         if(!pdb_update_sam_account(pwd)) {
2899                 pdb_free_sam(&pwd);
2900                 return False;
2901         }
2902
2903         pdb_free_sam(&pwd);
2904
2905         return True;
2906 }
2907
2908 /*******************************************************************
2909  set_user_info_18
2910  ********************************************************************/
2911
2912 static BOOL set_user_info_18(SAM_USER_INFO_18 *id18, SAM_ACCOUNT *pwd)
2913 {
2914
2915         if (id18 == NULL) {
2916                 DEBUG(2, ("set_user_info_18: id18 is NULL\n"));
2917                 pdb_free_sam(&pwd);
2918                 return False;
2919         }
2920
2921         if (!pdb_set_lanman_passwd (pwd, id18->lm_pwd, PDB_CHANGED)) {
2922                 pdb_free_sam(&pwd);
2923                 return False;
2924         }
2925         if (!pdb_set_nt_passwd     (pwd, id18->nt_pwd, PDB_CHANGED)) {
2926                 pdb_free_sam(&pwd);
2927                 return False;
2928         }
2929         if (!pdb_set_pass_changed_now (pwd)) {
2930                 pdb_free_sam(&pwd);
2931                 return False;
2932         }
2933
2934         if(!pdb_update_sam_account(pwd)) {
2935                 pdb_free_sam(&pwd);
2936                 return False;
2937         }
2938
2939         pdb_free_sam(&pwd);
2940         return True;
2941 }
2942
2943 /*******************************************************************
2944  The GROUPSID field in the SAM_ACCOUNT changed. Try to tell unix.
2945  ********************************************************************/
2946 static BOOL set_unix_primary_group(SAM_ACCOUNT *sampass)
2947 {
2948         struct group *grp;
2949         gid_t gid;
2950
2951         if (!NT_STATUS_IS_OK(sid_to_gid(pdb_get_group_sid(sampass),
2952                                         &gid))) {
2953                 DEBUG(2,("Could not get gid for primary group of "
2954                          "user %s\n", pdb_get_username(sampass)));
2955                 return False;
2956         }
2957
2958         grp = getgrgid(gid);
2959
2960         if (grp == NULL) {
2961                 DEBUG(2,("Could not find primary group %lu for "
2962                          "user %s\n", (unsigned long)gid,
2963                          pdb_get_username(sampass)));
2964                 return False;
2965         }
2966
2967         if (smb_set_primary_group(grp->gr_name,
2968                                   pdb_get_username(sampass)) != 0) {
2969                 DEBUG(2,("Could not set primary group for user %s to "
2970                          "%s\n",
2971                          pdb_get_username(sampass), grp->gr_name));
2972                 return False;
2973         }
2974
2975         return True;
2976 }
2977
2978
2979 /*******************************************************************
2980  set_user_info_20
2981  ********************************************************************/
2982
2983 static BOOL set_user_info_20(SAM_USER_INFO_20 *id20, SAM_ACCOUNT *pwd)
2984 {
2985         if (id20 == NULL) {
2986                 DEBUG(5, ("set_user_info_20: NULL id20\n"));
2987                 return False;
2988         }
2989
2990         copy_id20_to_sam_passwd(pwd, id20);
2991
2992         /* write the change out */
2993         if(!pdb_update_sam_account(pwd)) {
2994                 pdb_free_sam(&pwd);
2995                 return False;
2996         }
2997
2998         pdb_free_sam(&pwd);
2999
3000         return True;
3001 }
3002 /*******************************************************************
3003  set_user_info_21
3004  ********************************************************************/
3005
3006 static BOOL set_user_info_21(SAM_USER_INFO_21 *id21, SAM_ACCOUNT *pwd)
3007 {
3008
3009         if (id21 == NULL) {
3010                 DEBUG(5, ("set_user_info_21: NULL id21\n"));
3011                 return False;
3012         }
3013
3014         copy_id21_to_sam_passwd(pwd, id21);
3015
3016         /*
3017          * The funny part about the previous two calls is
3018          * that pwd still has the password hashes from the
3019          * passdb entry.  These have not been updated from
3020          * id21.  I don't know if they need to be set.    --jerry
3021          */
3022
3023         if (IS_SAM_CHANGED(pwd, PDB_GROUPSID))
3024                 set_unix_primary_group(pwd);
3025
3026         /* write the change out */
3027         if(!pdb_update_sam_account(pwd)) {
3028                 pdb_free_sam(&pwd);
3029                 return False;
3030         }
3031
3032         pdb_free_sam(&pwd);
3033
3034         return True;
3035 }
3036
3037 /*******************************************************************
3038  set_user_info_23
3039  ********************************************************************/
3040
3041 static BOOL set_user_info_23(SAM_USER_INFO_23 *id23, SAM_ACCOUNT *pwd)
3042 {
3043         pstring plaintext_buf;
3044         uint32 len;
3045         uint16 acct_ctrl;
3046
3047         if (id23 == NULL) {
3048                 DEBUG(5, ("set_user_info_23: NULL id23\n"));
3049                 return False;
3050         }
3051
3052         DEBUG(5, ("Attempting administrator password change (level 23) for user %s\n",
3053                   pdb_get_username(pwd)));
3054
3055         acct_ctrl = pdb_get_acct_ctrl(pwd);
3056
3057         if (!decode_pw_buffer(id23->pass, plaintext_buf, 256, &len, STR_UNICODE)) {
3058                 pdb_free_sam(&pwd);
3059                 return False;
3060         }
3061
3062         if (!pdb_set_plaintext_passwd (pwd, plaintext_buf)) {
3063                 pdb_free_sam(&pwd);
3064                 return False;
3065         }
3066
3067         copy_id23_to_sam_passwd(pwd, id23);
3068
3069         /* if it's a trust account, don't update /etc/passwd */
3070         if (    ( (acct_ctrl &  ACB_DOMTRUST) == ACB_DOMTRUST ) ||
3071                 ( (acct_ctrl &  ACB_WSTRUST) ==  ACB_WSTRUST) ||
3072                 ( (acct_ctrl &  ACB_SVRTRUST) ==  ACB_SVRTRUST) ) {
3073                 DEBUG(5, ("Changing trust account or non-unix-user password, not updating /etc/passwd\n"));
3074         } else  {
3075                 /* update the UNIX password */
3076                 if (lp_unix_password_sync() ) {
3077                         struct passwd *passwd = Get_Pwnam(pdb_get_username(pwd));
3078                         if (!passwd) {
3079                                 DEBUG(1, ("chgpasswd: Username does not exist in system !?!\n"));
3080                         }
3081
3082                         if(!chgpasswd(pdb_get_username(pwd), passwd, "", plaintext_buf, True)) {
3083                                 pdb_free_sam(&pwd);
3084                                 return False;
3085                         }
3086                 }
3087         }
3088
3089         ZERO_STRUCT(plaintext_buf);
3090
3091         if (IS_SAM_CHANGED(pwd, PDB_GROUPSID))
3092                 set_unix_primary_group(pwd);
3093
3094         if(!pdb_update_sam_account(pwd)) {
3095                 pdb_free_sam(&pwd);
3096                 return False;
3097         }
3098
3099         pdb_free_sam(&pwd);
3100
3101         return True;
3102 }
3103
3104 /*******************************************************************
3105  set_user_info_pw
3106  ********************************************************************/
3107
3108 static BOOL set_user_info_pw(uint8 *pass, SAM_ACCOUNT *pwd)
3109 {
3110         uint32 len;
3111         pstring plaintext_buf;
3112         uint16 acct_ctrl;
3113
3114         DEBUG(5, ("Attempting administrator password change for user %s\n",
3115                   pdb_get_username(pwd)));
3116
3117         acct_ctrl = pdb_get_acct_ctrl(pwd);
3118
3119         ZERO_STRUCT(plaintext_buf);
3120
3121         if (!decode_pw_buffer(pass, plaintext_buf, 256, &len, STR_UNICODE)) {
3122                 pdb_free_sam(&pwd);
3123                 return False;
3124         }
3125
3126         if (!pdb_set_plaintext_passwd (pwd, plaintext_buf)) {
3127                 pdb_free_sam(&pwd);
3128                 return False;
3129         }
3130
3131         /* if it's a trust account, don't update /etc/passwd */
3132         if ( ( (acct_ctrl &  ACB_DOMTRUST) == ACB_DOMTRUST ) ||
3133                 ( (acct_ctrl &  ACB_WSTRUST) ==  ACB_WSTRUST) ||
3134                 ( (acct_ctrl &  ACB_SVRTRUST) ==  ACB_SVRTRUST) ) {
3135                 DEBUG(5, ("Changing trust account or non-unix-user password, not updating /etc/passwd\n"));
3136         } else {
3137                 /* update the UNIX password */
3138                 if (lp_unix_password_sync()) {
3139                         struct passwd *passwd = Get_Pwnam(pdb_get_username(pwd));
3140                         if (!passwd) {
3141                                 DEBUG(1, ("chgpasswd: Username does not exist in system !?!\n"));
3142                         }
3143
3144                         if(!chgpasswd(pdb_get_username(pwd), passwd, "", plaintext_buf, True)) {
3145                                 pdb_free_sam(&pwd);
3146                                 return False;
3147                         }
3148                 }
3149         }
3150
3151         ZERO_STRUCT(plaintext_buf);
3152
3153         DEBUG(5,("set_user_info_pw: pdb_update_pwd()\n"));
3154
3155         /* update the SAMBA password */
3156         if(!pdb_update_sam_account(pwd)) {
3157                 pdb_free_sam(&pwd);
3158                 return False;
3159         }
3160
3161         pdb_free_sam(&pwd);
3162
3163         return True;
3164 }
3165
3166 /*******************************************************************
3167  samr_reply_set_userinfo
3168  ********************************************************************/
3169
3170 NTSTATUS _samr_set_userinfo(pipes_struct *p, SAMR_Q_SET_USERINFO *q_u, SAMR_R_SET_USERINFO *r_u)
3171 {
3172         SAM_ACCOUNT *pwd = NULL;
3173         DOM_SID sid;
3174         POLICY_HND *pol = &q_u->pol;
3175         uint16 switch_value = q_u->switch_value;
3176         SAM_USERINFO_CTR *ctr = q_u->ctr;
3177         uint32 acc_granted;
3178         uint32 acc_required;
3179         BOOL ret;
3180         BOOL has_enough_rights = False;
3181         uint32 acb_info;
3182         DISP_INFO *disp_info = NULL;
3183
3184         DEBUG(5, ("_samr_set_userinfo: %d\n", __LINE__));
3185
3186         r_u->status = NT_STATUS_OK;
3187
3188         /* find the policy handle.  open a policy on it. */
3189         if (!get_lsa_policy_samr_sid(p, pol, &sid, &acc_granted, &disp_info))
3190                 return NT_STATUS_INVALID_HANDLE;
3191
3192         /* observed when joining an XP client to a Samba domain */
3193
3194         acc_required = SA_RIGHT_USER_SET_PASSWORD | SA_RIGHT_USER_SET_ATTRIBUTES | SA_RIGHT_USER_ACCT_FLAGS_EXPIRY;
3195
3196         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, acc_required, "_samr_set_userinfo"))) {
3197                 return r_u->status;
3198         }
3199
3200         DEBUG(5, ("_samr_set_userinfo: sid:%s, level:%d\n", sid_string_static(&sid), switch_value));
3201
3202         if (ctr == NULL) {
3203                 DEBUG(5, ("_samr_set_userinfo: NULL info level\n"));
3204                 return NT_STATUS_INVALID_INFO_CLASS;
3205         }
3206
3207         pdb_init_sam(&pwd);
3208
3209         become_root();
3210         ret = pdb_getsampwsid(pwd, &sid);
3211         unbecome_root();
3212
3213         if ( !ret ) {
3214                 pdb_free_sam(&pwd);
3215                 return NT_STATUS_NO_SUCH_USER;
3216         }
3217
3218         /* deal with machine password changes differently from userinfo changes */
3219         /* check to see if we have the sufficient rights */
3220
3221         acb_info = pdb_get_acct_ctrl(pwd);
3222         if ( acb_info & ACB_WSTRUST )
3223                 has_enough_rights = user_has_privileges( p->pipe_user.nt_user_token, &se_machine_account);
3224         else if ( acb_info & ACB_NORMAL )
3225                 has_enough_rights = user_has_privileges( p->pipe_user.nt_user_token, &se_add_users );
3226         else if ( acb_info & (ACB_SVRTRUST|ACB_DOMTRUST) ) {
3227                 if ( lp_enable_privileges() )
3228                         has_enough_rights = nt_token_check_domain_rid( p->pipe_user.nt_user_token, DOMAIN_GROUP_RID_ADMINS );
3229         }
3230
3231         DEBUG(5, ("_samr_set_userinfo: %s does%s possess sufficient rights\n",
3232                 p->pipe_user_name, has_enough_rights ? "" : " not"));
3233
3234         /* ================ BEGIN SeMachineAccountPrivilege BLOCK ================ */
3235
3236         if ( has_enough_rights )
3237                 become_root();
3238
3239         /* ok!  user info levels (lots: see MSDEV help), off we go... */
3240
3241         switch (switch_value) {
3242                 case 18:
3243                         if (!set_user_info_18(ctr->info.id18, pwd))
3244                                 r_u->status = NT_STATUS_ACCESS_DENIED;
3245                         break;
3246
3247                 case 24:
3248                         if (!p->session_key.length) {
3249                                 r_u->status = NT_STATUS_NO_USER_SESSION_KEY;
3250                         }
3251                         SamOEMhashBlob(ctr->info.id24->pass, 516, &p->session_key);
3252
3253                         dump_data(100, (char *)ctr->info.id24->pass, 516);
3254
3255                         if (!set_user_info_pw(ctr->info.id24->pass, pwd))
3256                                 r_u->status = NT_STATUS_ACCESS_DENIED;
3257                         break;
3258
3259                 case 25:
3260 #if 0
3261                         /*
3262                          * Currently we don't really know how to unmarshall
3263                          * the level 25 struct, and the password encryption
3264                          * is different. This is a placeholder for when we
3265                          * do understand it. In the meantime just return INVALID
3266                          * info level and W2K SP2 drops down to level 23... JRA.
3267                          */
3268
3269                         if (!p->session_key.length) {
3270                                 r_u->status = NT_STATUS_NO_USER_SESSION_KEY;
3271                         }
3272                         SamOEMhashBlob(ctr->info.id25->pass, 532, &p->session_key);
3273
3274                         dump_data(100, (char *)ctr->info.id25->pass, 532);
3275
3276                         if (!set_user_info_pw(ctr->info.id25->pass, &sid))
3277                                 r_u->status = NT_STATUS_ACCESS_DENIED;
3278                         break;
3279 #endif
3280                         r_u->status = NT_STATUS_INVALID_INFO_CLASS;
3281                         break;
3282
3283                 case 23:
3284                         if (!p->session_key.length) {
3285                                 r_u->status = NT_STATUS_NO_USER_SESSION_KEY;
3286                         }
3287                         SamOEMhashBlob(ctr->info.id23->pass, 516, &p->session_key);
3288
3289                         dump_data(100, (char *)ctr->info.id23->pass, 516);
3290
3291                         if (!set_user_info_23(ctr->info.id23, pwd))
3292                                 r_u->status = NT_STATUS_ACCESS_DENIED;
3293                         break;
3294
3295                 default:
3296                         r_u->status = NT_STATUS_INVALID_INFO_CLASS;
3297         }
3298
3299
3300         if ( has_enough_rights )
3301                 unbecome_root();
3302
3303         /* ================ END SeMachineAccountPrivilege BLOCK ================ */
3304
3305         if (NT_STATUS_IS_OK(r_u->status)) {
3306                 force_flush_samr_cache(disp_info);
3307         }
3308
3309         return r_u->status;
3310 }
3311
3312 /*******************************************************************
3313  samr_reply_set_userinfo2
3314  ********************************************************************/
3315
3316 NTSTATUS _samr_set_userinfo2(pipes_struct *p, SAMR_Q_SET_USERINFO2 *q_u, SAMR_R_SET_USERINFO2 *r_u)
3317 {
3318         SAM_ACCOUNT *pwd = NULL;
3319         DOM_SID sid;
3320         SAM_USERINFO_CTR *ctr = q_u->ctr;
3321         POLICY_HND *pol = &q_u->pol;
3322         uint16 switch_value = q_u->switch_value;
3323         uint32 acc_granted;
3324         uint32 acc_required;
3325         BOOL ret;
3326         BOOL has_enough_rights = False;
3327         uint32 acb_info;
3328         DISP_INFO *disp_info = NULL;
3329
3330         DEBUG(5, ("samr_reply_set_userinfo2: %d\n", __LINE__));
3331
3332         r_u->status = NT_STATUS_OK;
3333
3334         /* find the policy handle.  open a policy on it. */
3335         if (!get_lsa_policy_samr_sid(p, pol, &sid, &acc_granted, &disp_info))
3336                 return NT_STATUS_INVALID_HANDLE;
3337
3338         /* observed when joining XP client to Samba domain */
3339
3340         acc_required = SA_RIGHT_USER_SET_PASSWORD | SA_RIGHT_USER_SET_ATTRIBUTES | SA_RIGHT_USER_ACCT_FLAGS_EXPIRY;
3341
3342         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, acc_required, "_samr_set_userinfo2"))) {
3343                 return r_u->status;
3344         }
3345
3346         DEBUG(5, ("samr_reply_set_userinfo2: sid:%s\n", sid_string_static(&sid)));
3347
3348         if (ctr == NULL) {
3349                 DEBUG(5, ("samr_reply_set_userinfo2: NULL info level\n"));
3350                 return NT_STATUS_INVALID_INFO_CLASS;
3351         }
3352
3353         switch_value=ctr->switch_value;
3354
3355         pdb_init_sam(&pwd);
3356
3357         become_root();
3358         ret = pdb_getsampwsid(pwd, &sid);
3359         unbecome_root();
3360
3361         if ( !ret ) {
3362                 pdb_free_sam(&pwd);
3363                 return NT_STATUS_NO_SUCH_USER;
3364         }
3365
3366         acb_info = pdb_get_acct_ctrl(pwd);
3367         if ( acb_info & ACB_WSTRUST )
3368                 has_enough_rights = user_has_privileges( p->pipe_user.nt_user_token, &se_machine_account);
3369         else if ( acb_info & ACB_NORMAL )
3370                 has_enough_rights = user_has_privileges( p->pipe_user.nt_user_token, &se_add_users );
3371         else if ( acb_info & (ACB_SVRTRUST|ACB_DOMTRUST) ) {
3372                 if ( lp_enable_privileges() )
3373                         has_enough_rights = nt_token_check_domain_rid( p->pipe_user.nt_user_token, DOMAIN_GROUP_RID_ADMINS );
3374         }
3375
3376         DEBUG(5, ("_samr_set_userinfo: %s does%s possess sufficient rights\n",
3377                 p->pipe_user_name, has_enough_rights ? "" : " not"));
3378
3379         /* ================ BEGIN SeMachineAccountPrivilege BLOCK ================ */
3380
3381         if ( has_enough_rights )
3382                 become_root();
3383
3384         /* ok!  user info levels (lots: see MSDEV help), off we go... */
3385
3386         switch (switch_value) {
3387                 case 7:
3388                         r_u->status = set_user_info_7(p->mem_ctx,
3389                                                       ctr->info.id7, pwd);
3390                         break;
3391                 case 16:
3392                         if (!set_user_info_16(ctr->info.id16, pwd))
3393                                 r_u->status = NT_STATUS_ACCESS_DENIED;
3394                         break;
3395                 case 18:
3396                         /* Used by AS/U JRA. */
3397                         if (!set_user_info_18(ctr->info.id18, pwd))
3398                                 r_u->status = NT_STATUS_ACCESS_DENIED;
3399                         break;
3400                 case 20:
3401                         if (!set_user_info_20(ctr->info.id20, pwd))
3402                                 r_u->status = NT_STATUS_ACCESS_DENIED;
3403                         break;
3404                 case 21:
3405                         if (!set_user_info_21(ctr->info.id21, pwd))
3406                                 return NT_STATUS_ACCESS_DENIED;
3407                         break;
3408                 default:
3409                         r_u->status = NT_STATUS_INVALID_INFO_CLASS;
3410         }
3411
3412         if ( has_enough_rights )
3413                 unbecome_root();
3414
3415         /* ================ END SeMachineAccountPrivilege BLOCK ================ */
3416
3417         if (NT_STATUS_IS_OK(r_u->status)) {
3418                 force_flush_samr_cache(disp_info);
3419         }
3420
3421         return r_u->status;
3422 }
3423
3424 /*********************************************************************
3425  _samr_query_aliasmem
3426 *********************************************************************/
3427
3428 NTSTATUS _samr_query_useraliases(pipes_struct *p, SAMR_Q_QUERY_USERALIASES *q_u, SAMR_R_QUERY_USERALIASES *r_u)
3429 {
3430         size_t num_alias_rids;
3431         uint32 *alias_rids;
3432         struct samr_info *info = NULL;
3433         size_t i;
3434
3435         NTSTATUS ntstatus1;
3436         NTSTATUS ntstatus2;
3437
3438         DOM_SID *members;
3439         BOOL res;
3440
3441         r_u->status = NT_STATUS_OK;
3442
3443         DEBUG(5,("_samr_query_useraliases: %d\n", __LINE__));
3444
3445         /* find the policy handle.  open a policy on it. */
3446         if (!find_policy_by_hnd(p, &q_u->pol, (void **)(void *)&info))
3447                 return NT_STATUS_INVALID_HANDLE;
3448
3449         ntstatus1 = access_check_samr_function(info->acc_granted, SA_RIGHT_DOMAIN_LOOKUP_ALIAS_BY_MEM, "_samr_query_useraliases");
3450         ntstatus2 = access_check_samr_function(info->acc_granted, SA_RIGHT_DOMAIN_OPEN_ACCOUNT, "_samr_query_useraliases");
3451
3452         if (!NT_STATUS_IS_OK(ntstatus1) || !NT_STATUS_IS_OK(ntstatus2)) {
3453                 if (!(NT_STATUS_EQUAL(ntstatus1,NT_STATUS_ACCESS_DENIED) && NT_STATUS_IS_OK(ntstatus2)) &&
3454                     !(NT_STATUS_EQUAL(ntstatus1,NT_STATUS_ACCESS_DENIED) && NT_STATUS_IS_OK(ntstatus1))) {
3455                         return (NT_STATUS_IS_OK(ntstatus1)) ? ntstatus2 : ntstatus1;
3456                 }
3457         }
3458
3459         if (!sid_check_is_domain(&info->sid) &&
3460             !sid_check_is_builtin(&info->sid))
3461                 return NT_STATUS_OBJECT_TYPE_MISMATCH;
3462
3463         members = TALLOC_ARRAY(p->mem_ctx, DOM_SID, q_u->num_sids1);
3464
3465         if (members == NULL)
3466                 return NT_STATUS_NO_MEMORY;
3467
3468         for (i=0; i<q_u->num_sids1; i++)
3469                 sid_copy(&members[i], &q_u->sid[i].sid);
3470
3471         alias_rids = NULL;
3472         num_alias_rids = 0;
3473
3474         become_root();
3475         res = pdb_enum_alias_memberships(p->mem_ctx, &info->sid, members,
3476                                          q_u->num_sids1,
3477                                          &alias_rids, &num_alias_rids);
3478         unbecome_root();
3479
3480         if (!res)
3481                 return NT_STATUS_UNSUCCESSFUL;
3482
3483         init_samr_r_query_useraliases(r_u, num_alias_rids, alias_rids,
3484                                       NT_STATUS_OK);
3485         return NT_STATUS_OK;
3486 }
3487
3488 /*********************************************************************
3489  _samr_query_aliasmem
3490 *********************************************************************/
3491
3492 NTSTATUS _samr_query_aliasmem(pipes_struct *p, SAMR_Q_QUERY_ALIASMEM *q_u, SAMR_R_QUERY_ALIASMEM *r_u)
3493 {
3494         size_t i;
3495         size_t num_sids = 0;
3496         DOM_SID2 *sid;
3497         DOM_SID *sids=NULL;
3498
3499         DOM_SID alias_sid;
3500
3501         uint32 acc_granted;
3502
3503         /* find the policy handle.  open a policy on it. */
3504         if (!get_lsa_policy_samr_sid(p, &q_u->alias_pol, &alias_sid, &acc_granted, NULL))
3505                 return NT_STATUS_INVALID_HANDLE;
3506
3507         if (!NT_STATUS_IS_OK(r_u->status =
3508                 access_check_samr_function(acc_granted, SA_RIGHT_ALIAS_GET_MEMBERS, "_samr_query_aliasmem"))) {
3509                 return r_u->status;
3510         }
3511
3512         DEBUG(10, ("sid is %s\n", sid_string_static(&alias_sid)));
3513
3514         if (!pdb_enum_aliasmem(&alias_sid, &sids, &num_sids))
3515                 return NT_STATUS_NO_SUCH_ALIAS;
3516
3517         sid = TALLOC_ZERO_ARRAY(p->mem_ctx, DOM_SID2, num_sids);
3518         if (num_sids!=0 && sid == NULL) {
3519                 SAFE_FREE(sids);
3520                 return NT_STATUS_NO_MEMORY;
3521         }
3522
3523         for (i = 0; i < num_sids; i++) {
3524                 init_dom_sid2(&sid[i], &sids[i]);
3525         }
3526
3527         init_samr_r_query_aliasmem(r_u, num_sids, sid, NT_STATUS_OK);
3528
3529         SAFE_FREE(sids);
3530
3531         return NT_STATUS_OK;
3532 }
3533
3534 static void add_uid_to_array_unique(uid_t uid, uid_t **uids, int *num)
3535 {
3536         int i;
3537
3538         for (i=0; i<*num; i++) {
3539                 if ((*uids)[i] == uid)
3540                         return;
3541         }
3542
3543         *uids = SMB_REALLOC_ARRAY(*uids, uid_t, *num+1);
3544
3545         if (*uids == NULL)
3546                 return;
3547
3548         (*uids)[*num] = uid;
3549         *num += 1;
3550 }
3551
3552
3553 static BOOL get_memberuids(gid_t gid, uid_t **uids, int *num)
3554 {
3555         struct group *grp;
3556         char **gr;
3557         struct sys_pwent *userlist, *user;
3558
3559         *uids = NULL;
3560         *num = 0;
3561
3562         /* We only look at our own sam, so don't care about imported stuff */
3563
3564         winbind_off();
3565
3566         if ((grp = getgrgid(gid)) == NULL) {
3567                 winbind_on();
3568                 return False;
3569         }
3570
3571         /* Primary group members */
3572
3573         userlist = getpwent_list();
3574
3575         for (user = userlist; user != NULL; user = user->next) {
3576                 if (user->pw_gid != gid)
3577                         continue;
3578                 add_uid_to_array_unique(user->pw_uid, uids, num);
3579         }
3580
3581         pwent_free(userlist);
3582
3583         /* Secondary group members */
3584
3585         for (gr = grp->gr_mem; (*gr != NULL) && ((*gr)[0] != '\0'); gr += 1) {
3586                 struct passwd *pw = getpwnam(*gr);
3587
3588                 if (pw == NULL)
3589                         continue;
3590                 add_uid_to_array_unique(pw->pw_uid, uids, num);
3591         }
3592
3593         winbind_on();
3594
3595         return True;
3596 }
3597
3598 /*********************************************************************
3599  _samr_query_groupmem
3600 *********************************************************************/
3601
3602 NTSTATUS _samr_query_groupmem(pipes_struct *p, SAMR_Q_QUERY_GROUPMEM *q_u, SAMR_R_QUERY_GROUPMEM *r_u)
3603 {
3604         DOM_SID group_sid;
3605         fstring group_sid_str;
3606         size_t i, num_members;
3607
3608         uint32 *rid=NULL;
3609         uint32 *attr=NULL;
3610
3611         uint32 acc_granted;
3612
3613         NTSTATUS result;
3614
3615         /* find the policy handle.  open a policy on it. */
3616         if (!get_lsa_policy_samr_sid(p, &q_u->group_pol, &group_sid, &acc_granted, NULL))
3617                 return NT_STATUS_INVALID_HANDLE;
3618
3619         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, SA_RIGHT_GROUP_GET_MEMBERS, "_samr_query_groupmem"))) {
3620                 return r_u->status;
3621         }
3622
3623         sid_to_string(group_sid_str, &group_sid);
3624         DEBUG(10, ("sid is %s\n", group_sid_str));
3625
3626         if (!sid_check_is_in_our_domain(&group_sid)) {
3627                 DEBUG(3, ("sid %s is not in our domain\n", group_sid_str));
3628                 return NT_STATUS_NO_SUCH_GROUP;
3629         }
3630
3631         DEBUG(10, ("lookup on Domain SID\n"));
3632
3633         become_root();
3634         result = pdb_enum_group_members(p->mem_ctx, &group_sid,
3635                                         &rid, &num_members);
3636         unbecome_root();
3637
3638         if (!NT_STATUS_IS_OK(result))
3639                 return result;
3640
3641         attr=TALLOC_ZERO_ARRAY(p->mem_ctx, uint32, num_members);
3642
3643         if ((num_members!=0) && (rid==NULL))
3644                 return NT_STATUS_NO_MEMORY;
3645
3646         for (i=0; i<num_members; i++)
3647                 attr[i] = SID_NAME_USER;
3648
3649         init_samr_r_query_groupmem(r_u, num_members, rid, attr, NT_STATUS_OK);
3650
3651         return NT_STATUS_OK;
3652 }
3653
3654 /*********************************************************************
3655  _samr_add_aliasmem
3656 *********************************************************************/
3657
3658 NTSTATUS _samr_add_aliasmem(pipes_struct *p, SAMR_Q_ADD_ALIASMEM *q_u, SAMR_R_ADD_ALIASMEM *r_u)
3659 {
3660         DOM_SID alias_sid;
3661         uint32 acc_granted;
3662         SE_PRIV se_rights;
3663         BOOL can_add_accounts;
3664         BOOL ret;
3665         DISP_INFO *disp_info = NULL;
3666
3667         /* Find the policy handle. Open a policy on it. */
3668         if (!get_lsa_policy_samr_sid(p, &q_u->alias_pol, &alias_sid, &acc_granted, &disp_info))
3669                 return NT_STATUS_INVALID_HANDLE;
3670
3671         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, SA_RIGHT_ALIAS_ADD_MEMBER, "_samr_add_aliasmem"))) {
3672                 return r_u->status;
3673         }
3674
3675         DEBUG(10, ("sid is %s\n", sid_string_static(&alias_sid)));
3676
3677         se_priv_copy( &se_rights, &se_add_users );
3678         can_add_accounts = user_has_privileges( p->pipe_user.nt_user_token, &se_rights );
3679
3680         /******** BEGIN SeAddUsers BLOCK *********/
3681
3682         if ( can_add_accounts )
3683                 become_root();
3684
3685         ret = pdb_add_aliasmem(&alias_sid, &q_u->sid.sid);
3686
3687         if ( can_add_accounts )
3688                 unbecome_root();
3689
3690         /******** END SeAddUsers BLOCK *********/
3691
3692         if (ret) {
3693                 force_flush_samr_cache(disp_info);
3694         }
3695
3696         return ret ? NT_STATUS_OK : NT_STATUS_ACCESS_DENIED;
3697 }
3698
3699 /*********************************************************************
3700  _samr_del_aliasmem
3701 *********************************************************************/
3702
3703 NTSTATUS _samr_del_aliasmem(pipes_struct *p, SAMR_Q_DEL_ALIASMEM *q_u, SAMR_R_DEL_ALIASMEM *r_u)
3704 {
3705         DOM_SID alias_sid;
3706         uint32 acc_granted;
3707         SE_PRIV se_rights;
3708         BOOL can_add_accounts;
3709         BOOL ret;
3710         DISP_INFO *disp_info = NULL;
3711
3712         /* Find the policy handle. Open a policy on it. */
3713         if (!get_lsa_policy_samr_sid(p, &q_u->alias_pol, &alias_sid, &acc_granted, &disp_info))
3714                 return NT_STATUS_INVALID_HANDLE;
3715
3716         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, SA_RIGHT_ALIAS_REMOVE_MEMBER, "_samr_del_aliasmem"))) {
3717                 return r_u->status;
3718         }
3719
3720         DEBUG(10, ("_samr_del_aliasmem:sid is %s\n",
3721                    sid_string_static(&alias_sid)));
3722
3723         se_priv_copy( &se_rights, &se_add_users );
3724         can_add_accounts = user_has_privileges( p->pipe_user.nt_user_token, &se_rights );
3725
3726         /******** BEGIN SeAddUsers BLOCK *********/
3727
3728         if ( can_add_accounts )
3729                 become_root();
3730
3731         ret = pdb_del_aliasmem(&alias_sid, &q_u->sid.sid);
3732
3733         if ( can_add_accounts )
3734                 unbecome_root();
3735
3736         /******** END SeAddUsers BLOCK *********/
3737
3738         if (ret) {
3739                 force_flush_samr_cache(disp_info);
3740         }
3741
3742         return ret ? NT_STATUS_OK : NT_STATUS_ACCESS_DENIED;
3743 }
3744
3745 /*********************************************************************
3746  _samr_add_groupmem
3747 *********************************************************************/
3748
3749 NTSTATUS _samr_add_groupmem(pipes_struct *p, SAMR_Q_ADD_GROUPMEM *q_u, SAMR_R_ADD_GROUPMEM *r_u)
3750 {
3751         DOM_SID group_sid;
3752         DOM_SID user_sid;
3753         fstring group_sid_str;
3754         uid_t uid;
3755         struct passwd *pwd;
3756         struct group *grp;
3757         fstring grp_name;
3758         GROUP_MAP map;
3759         NTSTATUS ret;
3760         SAM_ACCOUNT *sam_user=NULL;
3761         BOOL check;
3762         uint32 acc_granted;
3763         SE_PRIV se_rights;
3764         BOOL can_add_accounts;
3765         DISP_INFO *disp_info = NULL;
3766
3767         /* Find the policy handle. Open a policy on it. */
3768         if (!get_lsa_policy_samr_sid(p, &q_u->pol, &group_sid, &acc_granted, &disp_info))
3769                 return NT_STATUS_INVALID_HANDLE;
3770
3771         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, SA_RIGHT_GROUP_ADD_MEMBER, "_samr_add_groupmem"))) {
3772                 return r_u->status;
3773         }
3774
3775         sid_to_string(group_sid_str, &group_sid);
3776         DEBUG(10, ("sid is %s\n", group_sid_str));
3777
3778         if (sid_compare(&group_sid, get_global_sam_sid())<=0)
3779                 return NT_STATUS_NO_SUCH_GROUP;
3780
3781         DEBUG(10, ("lookup on Domain SID\n"));
3782
3783         if(!get_domain_group_from_sid(group_sid, &map))
3784                 return NT_STATUS_NO_SUCH_GROUP;
3785
3786         sid_copy(&user_sid, get_global_sam_sid());
3787         sid_append_rid(&user_sid, q_u->rid);
3788
3789         ret = pdb_init_sam(&sam_user);
3790         if (!NT_STATUS_IS_OK(ret))
3791                 return ret;
3792
3793         check = pdb_getsampwsid(sam_user, &user_sid);
3794
3795         if (check != True) {
3796                 pdb_free_sam(&sam_user);
3797                 return NT_STATUS_NO_SUCH_USER;
3798         }
3799
3800         /* check a real user exist before we run the script to add a user to a group */
3801         if (!NT_STATUS_IS_OK(sid_to_uid(pdb_get_user_sid(sam_user), &uid))) {
3802                 pdb_free_sam(&sam_user);
3803                 return NT_STATUS_NO_SUCH_USER;
3804         }
3805
3806         pdb_free_sam(&sam_user);
3807
3808         if ((pwd=getpwuid_alloc(uid)) == NULL) {
3809                 return NT_STATUS_NO_SUCH_USER;
3810         }
3811
3812         if ((grp=getgrgid(map.gid)) == NULL) {
3813                 passwd_free(&pwd);
3814                 return NT_STATUS_NO_SUCH_GROUP;
3815         }
3816
3817         /* we need to copy the name otherwise it's overloaded in user_in_unix_group_list */
3818         fstrcpy(grp_name, grp->gr_name);
3819
3820         /* if the user is already in the group */
3821         if(user_in_unix_group_list(pwd->pw_name, grp_name)) {
3822                 passwd_free(&pwd);
3823                 return NT_STATUS_MEMBER_IN_GROUP;
3824         }
3825
3826         se_priv_copy( &se_rights, &se_add_users );
3827         can_add_accounts = user_has_privileges( p->pipe_user.nt_user_token, &se_rights );
3828
3829         /******** BEGIN SeAddUsers BLOCK *********/
3830
3831         if ( can_add_accounts )
3832                 become_root();
3833
3834         /*
3835          * ok, the group exist, the user exist, the user is not in the group,
3836          *
3837          * we can (finally) add it to the group !
3838          */
3839
3840         smb_add_user_group(grp_name, pwd->pw_name);
3841
3842         if ( can_add_accounts )
3843                 unbecome_root();
3844
3845         /******** END SeAddUsers BLOCK *********/
3846
3847         /* check if the user has been added then ... */
3848         if(!user_in_unix_group_list(pwd->pw_name, grp_name)) {
3849                 passwd_free(&pwd);
3850                 return NT_STATUS_MEMBER_NOT_IN_GROUP;           /* don't know what to reply else */
3851         }
3852
3853         passwd_free(&pwd);
3854
3855         force_flush_samr_cache(disp_info);
3856
3857         return NT_STATUS_OK;
3858 }
3859
3860 /*********************************************************************
3861  _samr_del_groupmem
3862 *********************************************************************/
3863
3864 NTSTATUS _samr_del_groupmem(pipes_struct *p, SAMR_Q_DEL_GROUPMEM *q_u, SAMR_R_DEL_GROUPMEM *r_u)
3865 {
3866         DOM_SID group_sid;
3867         DOM_SID user_sid;
3868         SAM_ACCOUNT *sam_pass=NULL;
3869         GROUP_MAP map;
3870         fstring grp_name;
3871         struct group *grp;
3872         uint32 acc_granted;
3873         SE_PRIV se_rights;
3874         BOOL can_add_accounts;
3875         DISP_INFO *disp_info = NULL;
3876
3877         /*
3878          * delete the group member named q_u->rid
3879          * who is a member of the sid associated with the handle
3880          * the rid is a user's rid as the group is a domain group.
3881          */
3882
3883         /* Find the policy handle. Open a policy on it. */
3884         if (!get_lsa_policy_samr_sid(p, &q_u->pol, &group_sid, &acc_granted, &disp_info))
3885                 return NT_STATUS_INVALID_HANDLE;
3886
3887         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, SA_RIGHT_GROUP_REMOVE_MEMBER, "_samr_del_groupmem"))) {
3888                 return r_u->status;
3889         }
3890
3891         if (!sid_check_is_in_our_domain(&group_sid))
3892                 return NT_STATUS_NO_SUCH_GROUP;
3893
3894         sid_copy(&user_sid, get_global_sam_sid());
3895         sid_append_rid(&user_sid, q_u->rid);
3896
3897         if (!get_domain_group_from_sid(group_sid, &map))
3898                 return NT_STATUS_NO_SUCH_GROUP;
3899
3900         if ((grp=getgrgid(map.gid)) == NULL)
3901                 return NT_STATUS_NO_SUCH_GROUP;
3902
3903         /* we need to copy the name otherwise it's overloaded in user_in_group_list */
3904         fstrcpy(grp_name, grp->gr_name);
3905
3906         /* check if the user exists before trying to remove it from the group */
3907         pdb_init_sam(&sam_pass);
3908         if (!pdb_getsampwsid(sam_pass, &user_sid)) {
3909                 DEBUG(5,("User %s doesn't exist.\n", pdb_get_username(sam_pass)));
3910                 pdb_free_sam(&sam_pass);
3911                 return NT_STATUS_NO_SUCH_USER;
3912         }
3913
3914         /* if the user is not in the group */
3915         if (!user_in_unix_group_list(pdb_get_username(sam_pass), grp_name)) {
3916                 pdb_free_sam(&sam_pass);
3917                 return NT_STATUS_MEMBER_NOT_IN_GROUP;
3918         }
3919
3920
3921         se_priv_copy( &se_rights, &se_add_users );
3922         can_add_accounts = user_has_privileges( p->pipe_user.nt_user_token, &se_rights );
3923
3924         /******** BEGIN SeAddUsers BLOCK *********/
3925
3926         if ( can_add_accounts )
3927                 become_root();
3928
3929         smb_delete_user_group(grp_name, pdb_get_username(sam_pass));
3930
3931         if ( can_add_accounts )
3932                 unbecome_root();
3933
3934         /******** END SeAddUsers BLOCK *********/
3935
3936         /* check if the user has been removed then ... */
3937         if (user_in_unix_group_list(pdb_get_username(sam_pass), grp_name)) {
3938                 pdb_free_sam(&sam_pass);
3939                 return NT_STATUS_ACCESS_DENIED;         /* don't know what to reply else */
3940         }
3941
3942         pdb_free_sam(&sam_pass);
3943
3944         force_flush_samr_cache(disp_info);
3945
3946         return NT_STATUS_OK;
3947
3948 }
3949
3950 /****************************************************************************
3951  Delete a UNIX user on demand.
3952 ****************************************************************************/
3953
3954 static int smb_delete_user(const char *unix_user)
3955 {
3956         pstring del_script;
3957         int ret;
3958
3959         pstrcpy(del_script, lp_deluser_script());
3960         if (! *del_script)
3961                 return -1;
3962         all_string_sub(del_script, "%u", unix_user, sizeof(del_script));
3963         ret = smbrun(del_script,NULL);
3964         flush_pwnam_cache();
3965         DEBUG(ret ? 0 : 3,("smb_delete_user: Running the command `%s' gave %d\n",del_script,ret));
3966
3967         return ret;
3968 }
3969
3970 /*********************************************************************
3971  _samr_delete_dom_user
3972 *********************************************************************/
3973
3974 NTSTATUS _samr_delete_dom_user(pipes_struct *p, SAMR_Q_DELETE_DOM_USER *q_u, SAMR_R_DELETE_DOM_USER *r_u )
3975 {
3976         DOM_SID user_sid;
3977         SAM_ACCOUNT *sam_pass=NULL;
3978         uint32 acc_granted;
3979         BOOL can_add_accounts;
3980         BOOL ret;
3981         DISP_INFO *disp_info = NULL;
3982
3983         DEBUG(5, ("_samr_delete_dom_user: %d\n", __LINE__));
3984
3985         /* Find the policy handle. Open a policy on it. */
3986         if (!get_lsa_policy_samr_sid(p, &q_u->user_pol, &user_sid, &acc_granted, &disp_info))
3987                 return NT_STATUS_INVALID_HANDLE;
3988
3989         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, STD_RIGHT_DELETE_ACCESS, "_samr_delete_dom_user"))) {
3990                 return r_u->status;
3991         }
3992
3993         if (!sid_check_is_in_our_domain(&user_sid))
3994                 return NT_STATUS_CANNOT_DELETE;
3995
3996         /* check if the user exists before trying to delete */
3997         pdb_init_sam(&sam_pass);
3998         if(!pdb_getsampwsid(sam_pass, &user_sid)) {
3999                 DEBUG(5,("_samr_delete_dom_user:User %s doesn't exist.\n",
4000                         sid_string_static(&user_sid)));
4001                 pdb_free_sam(&sam_pass);
4002                 return NT_STATUS_NO_SUCH_USER;
4003         }
4004
4005         can_add_accounts = user_has_privileges( p->pipe_user.nt_user_token, &se_add_users );
4006
4007         /******** BEGIN SeAddUsers BLOCK *********/
4008
4009         if ( can_add_accounts )
4010                 become_root();
4011
4012         /* First delete the samba side....
4013            code is order to prevent unnecessary returns out of the admin
4014            block of code */
4015
4016         if ( (ret = pdb_delete_sam_account(sam_pass)) == True ) {
4017                 /*
4018                  * Now delete the unix side ....
4019                  * note: we don't check if the delete really happened
4020                  * as the script is not necessary present
4021                  * and maybe the sysadmin doesn't want to delete the unix side
4022                  */
4023                 smb_delete_user( pdb_get_username(sam_pass) );
4024         }
4025
4026         if ( can_add_accounts )
4027                 unbecome_root();
4028
4029         /******** END SeAddUsers BLOCK *********/
4030
4031         if ( !ret ) {
4032                 DEBUG(5,("_samr_delete_dom_user:Failed to delete entry for user %s.\n", pdb_get_username(sam_pass)));
4033                 pdb_free_sam(&sam_pass);
4034                 return NT_STATUS_CANNOT_DELETE;
4035         }
4036
4037
4038         pdb_free_sam(&sam_pass);
4039
4040         if (!close_policy_hnd(p, &q_u->user_pol))
4041                 return NT_STATUS_OBJECT_NAME_INVALID;
4042
4043         force_flush_samr_cache(disp_info);
4044
4045         return NT_STATUS_OK;
4046 }
4047
4048 /*********************************************************************
4049  _samr_delete_dom_group
4050 *********************************************************************/
4051
4052 NTSTATUS _samr_delete_dom_group(pipes_struct *p, SAMR_Q_DELETE_DOM_GROUP *q_u, SAMR_R_DELETE_DOM_GROUP *r_u)
4053 {
4054         DOM_SID group_sid;
4055         DOM_SID dom_sid;
4056         uint32 group_rid;
4057         fstring group_sid_str;
4058         gid_t gid;
4059         struct group *grp;
4060         GROUP_MAP map;
4061         uint32 acc_granted;
4062         SE_PRIV se_rights;
4063         BOOL can_add_accounts;
4064         BOOL ret;
4065         DISP_INFO *disp_info = NULL;
4066
4067         DEBUG(5, ("samr_delete_dom_group: %d\n", __LINE__));
4068
4069         /* Find the policy handle. Open a policy on it. */
4070         if (!get_lsa_policy_samr_sid(p, &q_u->group_pol, &group_sid, &acc_granted, &disp_info))
4071                 return NT_STATUS_INVALID_HANDLE;
4072
4073         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, STD_RIGHT_DELETE_ACCESS, "_samr_delete_dom_group"))) {
4074                 return r_u->status;
4075         }
4076
4077         sid_copy(&dom_sid, &group_sid);
4078         sid_to_string(group_sid_str, &dom_sid);
4079         sid_split_rid(&dom_sid, &group_rid);
4080
4081         DEBUG(10, ("sid is %s\n", group_sid_str));
4082
4083         /* we check if it's our SID before deleting */
4084         if (!sid_equal(&dom_sid, get_global_sam_sid()))
4085                 return NT_STATUS_NO_SUCH_GROUP;
4086
4087         DEBUG(10, ("lookup on Domain SID\n"));
4088
4089         if(!get_domain_group_from_sid(group_sid, &map))
4090                 return NT_STATUS_NO_SUCH_GROUP;
4091
4092         gid=map.gid;
4093
4094         /* check if group really exists */
4095         if ( (grp=getgrgid(gid)) == NULL)
4096                 return NT_STATUS_NO_SUCH_GROUP;
4097
4098         se_priv_copy( &se_rights, &se_add_users );
4099         can_add_accounts = user_has_privileges( p->pipe_user.nt_user_token, &se_rights );
4100
4101         /******** BEGIN SeAddUsers BLOCK *********/
4102
4103         if ( can_add_accounts )
4104                 become_root();
4105
4106         /* delete mapping first */
4107
4108         if ( (ret = pdb_delete_group_mapping_entry(group_sid)) == True ) {
4109                 smb_delete_group( grp->gr_name );
4110         }
4111
4112         if ( can_add_accounts )
4113                 unbecome_root();
4114
4115         /******** END SeAddUsers BLOCK *********/
4116
4117         if ( !ret ) {
4118                 DEBUG(5,("_samr_delete_dom_group: Failed to delete mapping entry for group %s.\n",
4119                         group_sid_str));
4120                 return NT_STATUS_ACCESS_DENIED;
4121         }
4122
4123         /* don't check that the unix group has been deleted.  Work like
4124            _samr_delet_dom_user() */
4125
4126         if (!close_policy_hnd(p, &q_u->group_pol))
4127                 return NT_STATUS_OBJECT_NAME_INVALID;
4128
4129         force_flush_samr_cache(disp_info);
4130
4131         return NT_STATUS_OK;
4132 }
4133
4134 /*********************************************************************
4135  _samr_delete_dom_alias
4136 *********************************************************************/
4137
4138 NTSTATUS _samr_delete_dom_alias(pipes_struct *p, SAMR_Q_DELETE_DOM_ALIAS *q_u, SAMR_R_DELETE_DOM_ALIAS *r_u)
4139 {
4140         DOM_SID alias_sid;
4141         uint32 acc_granted;
4142         SE_PRIV se_rights;
4143         BOOL can_add_accounts;
4144         BOOL ret;
4145         DISP_INFO *disp_info = NULL;
4146
4147         DEBUG(5, ("_samr_delete_dom_alias: %d\n", __LINE__));
4148
4149         /* Find the policy handle. Open a policy on it. */
4150         if (!get_lsa_policy_samr_sid(p, &q_u->alias_pol, &alias_sid, &acc_granted, &disp_info))
4151                 return NT_STATUS_INVALID_HANDLE;
4152
4153         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, STD_RIGHT_DELETE_ACCESS, "_samr_delete_dom_alias"))) {
4154                 return r_u->status;
4155         }
4156
4157         DEBUG(10, ("sid is %s\n", sid_string_static(&alias_sid)));
4158
4159         if (!sid_check_is_in_our_domain(&alias_sid))
4160                 return NT_STATUS_NO_SUCH_ALIAS;
4161
4162         DEBUG(10, ("lookup on Local SID\n"));
4163
4164         se_priv_copy( &se_rights, &se_add_users );
4165         can_add_accounts = user_has_privileges( p->pipe_user.nt_user_token, &se_rights );
4166
4167         /******** BEGIN SeAddUsers BLOCK *********/
4168
4169         if ( can_add_accounts )
4170                 become_root();
4171
4172         /* Have passdb delete the alias */
4173         ret = pdb_delete_alias(&alias_sid);
4174
4175         if ( can_add_accounts )
4176                 unbecome_root();
4177
4178         /******** END SeAddUsers BLOCK *********/
4179
4180         if ( !ret )
4181                 return NT_STATUS_ACCESS_DENIED;
4182
4183         if (!close_policy_hnd(p, &q_u->alias_pol))
4184                 return NT_STATUS_OBJECT_NAME_INVALID;
4185
4186         force_flush_samr_cache(disp_info);
4187
4188         return NT_STATUS_OK;
4189 }
4190
4191 /*********************************************************************
4192  _samr_create_dom_group
4193 *********************************************************************/
4194
4195 NTSTATUS _samr_create_dom_group(pipes_struct *p, SAMR_Q_CREATE_DOM_GROUP *q_u, SAMR_R_CREATE_DOM_GROUP *r_u)
4196 {
4197         DOM_SID dom_sid;
4198         DOM_SID info_sid;
4199         fstring name;
4200         fstring sid_string;
4201         struct group *grp;
4202         struct samr_info *info;
4203         uint32 acc_granted;
4204         gid_t gid;
4205         SE_PRIV se_rights;
4206         BOOL can_add_accounts;
4207         NTSTATUS result;
4208         DISP_INFO *disp_info = NULL;
4209
4210         /* Find the policy handle. Open a policy on it. */
4211         if (!get_lsa_policy_samr_sid(p, &q_u->pol, &dom_sid, &acc_granted, &disp_info))
4212                 return NT_STATUS_INVALID_HANDLE;
4213
4214         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, SA_RIGHT_DOMAIN_CREATE_GROUP, "_samr_create_dom_group"))) {
4215                 return r_u->status;
4216         }
4217
4218         if (!sid_equal(&dom_sid, get_global_sam_sid()))
4219                 return NT_STATUS_ACCESS_DENIED;
4220
4221         unistr2_to_ascii(name, &q_u->uni_acct_desc, sizeof(name)-1);
4222
4223         r_u->status = can_create(p->mem_ctx, name);
4224         if (!NT_STATUS_IS_OK(r_u->status)) {
4225                 return r_u->status;
4226         }
4227
4228         se_priv_copy( &se_rights, &se_add_users );
4229         can_add_accounts = user_has_privileges( p->pipe_user.nt_user_token, &se_rights );
4230
4231         /******** BEGIN SeAddUsers BLOCK *********/
4232
4233         if ( can_add_accounts )
4234                 become_root();
4235
4236         /* check that we successfully create the UNIX group */
4237
4238         result = NT_STATUS_ACCESS_DENIED;
4239         if ( (smb_create_group(name, &gid) == 0) && ((grp=getgrgid(gid)) != NULL) ) {
4240
4241                 /* so far, so good */
4242
4243                 result = NT_STATUS_OK;
4244
4245                 r_u->rid = pdb_gid_to_group_rid( grp->gr_gid );
4246
4247                 /* add the group to the mapping table */
4248
4249                 sid_copy( &info_sid, get_global_sam_sid() );
4250                 sid_append_rid( &info_sid, r_u->rid );
4251                 sid_to_string( sid_string, &info_sid );
4252
4253                 /* reset the error code if we fail to add the mapping entry */
4254
4255                 if ( !add_initial_entry(grp->gr_gid, sid_string, SID_NAME_DOM_GRP, name, NULL) )
4256                         result = NT_STATUS_ACCESS_DENIED;
4257         }
4258
4259         if ( can_add_accounts )
4260                 unbecome_root();
4261
4262         /******** END SeAddUsers BLOCK *********/
4263
4264         /* check if we should bail out here */
4265
4266         if ( !NT_STATUS_IS_OK(result) )
4267                 return result;
4268
4269         if ((info = get_samr_info_by_sid(&info_sid)) == NULL)
4270                 return NT_STATUS_NO_MEMORY;
4271
4272
4273         /* they created it; let the user do what he wants with it */
4274
4275         info->acc_granted = GENERIC_RIGHTS_GROUP_ALL_ACCESS;
4276
4277         /* get a (unique) handle.  open a policy on it. */
4278         if (!create_policy_hnd(p, &r_u->pol, free_samr_info, (void *)info))
4279                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
4280
4281         force_flush_samr_cache(disp_info);
4282
4283         return NT_STATUS_OK;
4284 }
4285
4286 /*********************************************************************
4287  _samr_create_dom_alias
4288 *********************************************************************/
4289
4290 NTSTATUS _samr_create_dom_alias(pipes_struct *p, SAMR_Q_CREATE_DOM_ALIAS *q_u, SAMR_R_CREATE_DOM_ALIAS *r_u)
4291 {
4292         DOM_SID dom_sid;
4293         DOM_SID info_sid;
4294         fstring name;
4295         struct samr_info *info;
4296         uint32 acc_granted;
4297         gid_t gid;
4298         NTSTATUS result;
4299         SE_PRIV se_rights;
4300         BOOL can_add_accounts;
4301         DISP_INFO *disp_info = NULL;
4302
4303         /* Find the policy handle. Open a policy on it. */
4304         if (!get_lsa_policy_samr_sid(p, &q_u->dom_pol, &dom_sid, &acc_granted, &disp_info))
4305                 return NT_STATUS_INVALID_HANDLE;
4306
4307         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, SA_RIGHT_DOMAIN_CREATE_ALIAS, "_samr_create_alias"))) {
4308                 return r_u->status;
4309         }
4310
4311         if (!sid_equal(&dom_sid, get_global_sam_sid()))
4312                 return NT_STATUS_ACCESS_DENIED;
4313
4314         unistr2_to_ascii(name, &q_u->uni_acct_desc, sizeof(name)-1);
4315
4316         se_priv_copy( &se_rights, &se_add_users );
4317         can_add_accounts = user_has_privileges( p->pipe_user.nt_user_token, &se_rights );
4318
4319         result = can_create(p->mem_ctx, name);
4320         if (!NT_STATUS_IS_OK(result)) {
4321                 return result;
4322         }
4323
4324         /******** BEGIN SeAddUsers BLOCK *********/
4325
4326         if ( can_add_accounts )
4327                 become_root();
4328
4329         /* Have passdb create the alias */
4330         result = pdb_create_alias(name, &r_u->rid);
4331
4332         if ( can_add_accounts )
4333                 unbecome_root();
4334
4335         /******** END SeAddUsers BLOCK *********/
4336
4337         if (!NT_STATUS_IS_OK(result))
4338                 return result;
4339
4340         sid_copy(&info_sid, get_global_sam_sid());
4341         sid_append_rid(&info_sid, r_u->rid);
4342
4343         if (!NT_STATUS_IS_OK(sid_to_gid(&info_sid, &gid)))
4344                 return NT_STATUS_ACCESS_DENIED;
4345
4346         /* check if the group has been successfully created */
4347         if ( getgrgid(gid) == NULL )
4348                 return NT_STATUS_ACCESS_DENIED;
4349
4350         if ((info = get_samr_info_by_sid(&info_sid)) == NULL)
4351                 return NT_STATUS_NO_MEMORY;
4352
4353         /* they created it; let the user do what he wants with it */
4354
4355         info->acc_granted = GENERIC_RIGHTS_ALIAS_ALL_ACCESS;
4356
4357         /* get a (unique) handle.  open a policy on it. */
4358         if (!create_policy_hnd(p, &r_u->alias_pol, free_samr_info, (void *)info))
4359                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
4360
4361         force_flush_samr_cache(disp_info);
4362
4363         return NT_STATUS_OK;
4364 }
4365
4366 /*********************************************************************
4367  _samr_query_groupinfo
4368
4369 sends the name/comment pair of a domain group
4370 level 1 send also the number of users of that group
4371 *********************************************************************/
4372
4373 NTSTATUS _samr_query_groupinfo(pipes_struct *p, SAMR_Q_QUERY_GROUPINFO *q_u, SAMR_R_QUERY_GROUPINFO *r_u)
4374 {
4375         DOM_SID group_sid;
4376         GROUP_MAP map;
4377         DOM_SID *sids=NULL;
4378         uid_t *uids;
4379         int num=0;
4380         GROUP_INFO_CTR *ctr;
4381         uint32 acc_granted;
4382         BOOL ret;
4383
4384         if (!get_lsa_policy_samr_sid(p, &q_u->pol, &group_sid, &acc_granted, NULL))
4385                 return NT_STATUS_INVALID_HANDLE;
4386
4387         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, SA_RIGHT_GROUP_LOOKUP_INFO, "_samr_query_groupinfo"))) {
4388                 return r_u->status;
4389         }
4390
4391         become_root();
4392         ret = get_domain_group_from_sid(group_sid, &map);
4393         unbecome_root();
4394         if (!ret)
4395                 return NT_STATUS_INVALID_HANDLE;
4396
4397         ctr=TALLOC_ZERO_P(p->mem_ctx, GROUP_INFO_CTR);
4398         if (ctr==NULL)
4399                 return NT_STATUS_NO_MEMORY;
4400
4401         switch (q_u->switch_level) {
4402                 case 1:
4403                         ctr->switch_value1 = 1;
4404                         if(!get_memberuids(map.gid, &uids, &num))
4405                                 return NT_STATUS_NO_SUCH_GROUP;
4406                         SAFE_FREE(uids);
4407                         init_samr_group_info1(&ctr->group.info1, map.nt_name, map.comment, num);
4408                         SAFE_FREE(sids);
4409                         break;
4410                 case 3:
4411                         ctr->switch_value1 = 3;
4412                         init_samr_group_info3(&ctr->group.info3);
4413                         break;
4414                 case 4:
4415                         ctr->switch_value1 = 4;
4416                         init_samr_group_info4(&ctr->group.info4, map.comment);
4417                         break;
4418                 default:
4419                         return NT_STATUS_INVALID_INFO_CLASS;
4420         }
4421
4422         init_samr_r_query_groupinfo(r_u, ctr, NT_STATUS_OK);
4423
4424         return NT_STATUS_OK;
4425 }
4426
4427 /*********************************************************************
4428  _samr_set_groupinfo
4429
4430  update a domain group's comment.
4431 *********************************************************************/
4432
4433 NTSTATUS _samr_set_groupinfo(pipes_struct *p, SAMR_Q_SET_GROUPINFO *q_u, SAMR_R_SET_GROUPINFO *r_u)
4434 {
4435         DOM_SID group_sid;
4436         GROUP_MAP map;
4437         GROUP_INFO_CTR *ctr;
4438         uint32 acc_granted;
4439         BOOL ret;
4440         BOOL can_mod_accounts;
4441         DISP_INFO *disp_info = NULL;
4442
4443         if (!get_lsa_policy_samr_sid(p, &q_u->pol, &group_sid, &acc_granted, &disp_info))
4444                 return NT_STATUS_INVALID_HANDLE;
4445
4446         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, SA_RIGHT_GROUP_SET_INFO, "_samr_set_groupinfo"))) {
4447                 return r_u->status;
4448         }
4449
4450         if (!get_domain_group_from_sid(group_sid, &map))
4451                 return NT_STATUS_NO_SUCH_GROUP;
4452
4453         ctr=q_u->ctr;
4454
4455         switch (ctr->switch_value1) {
4456                 case 1:
4457                         unistr2_to_ascii(map.comment, &(ctr->group.info1.uni_acct_desc), sizeof(map.comment)-1);
4458                         break;
4459                 case 4:
4460                         unistr2_to_ascii(map.comment, &(ctr->group.info4.uni_acct_desc), sizeof(map.comment)-1);
4461                         break;
4462                 default:
4463                         return NT_STATUS_INVALID_INFO_CLASS;
4464         }
4465
4466         can_mod_accounts = user_has_privileges( p->pipe_user.nt_user_token, &se_add_users );
4467
4468         /******** BEGIN SeAddUsers BLOCK *********/
4469
4470         if ( can_mod_accounts )
4471                 become_root();
4472
4473         ret = pdb_update_group_mapping_entry(&map);
4474
4475         if ( can_mod_accounts )
4476                 unbecome_root();
4477
4478         /******** End SeAddUsers BLOCK *********/
4479
4480         if (ret) {
4481                 force_flush_samr_cache(disp_info);
4482         }
4483
4484         return ret ? NT_STATUS_OK : NT_STATUS_ACCESS_DENIED;
4485 }
4486
4487 /*********************************************************************
4488  _samr_set_aliasinfo
4489
4490  update an alias's comment.
4491 *********************************************************************/
4492
4493 NTSTATUS _samr_set_aliasinfo(pipes_struct *p, SAMR_Q_SET_ALIASINFO *q_u, SAMR_R_SET_ALIASINFO *r_u)
4494 {
4495         DOM_SID group_sid;
4496         struct acct_info info;
4497         ALIAS_INFO_CTR *ctr;
4498         uint32 acc_granted;
4499         BOOL ret;
4500         BOOL can_mod_accounts;
4501         DISP_INFO *disp_info = NULL;
4502
4503         if (!get_lsa_policy_samr_sid(p, &q_u->alias_pol, &group_sid, &acc_granted, &disp_info))
4504                 return NT_STATUS_INVALID_HANDLE;
4505
4506         if (!NT_STATUS_IS_OK(r_u->status = access_check_samr_function(acc_granted, SA_RIGHT_ALIAS_SET_INFO, "_samr_set_aliasinfo"))) {
4507                 return r_u->status;
4508         }
4509
4510         ctr=&q_u->ctr;
4511
4512         switch (ctr->level) {
4513                 case 3:
4514                         if ( ctr->alias.info3.description.string ) {
4515                                 unistr2_to_ascii( info.acct_desc,
4516                                         ctr->alias.info3.description.string,
4517                                         sizeof(info.acct_desc)-1 );
4518                         }
4519                         else
4520                                 fstrcpy( info.acct_desc, "" );
4521                         break;
4522                 default:
4523                         return NT_STATUS_INVALID_INFO_CLASS;
4524         }
4525
4526         can_mod_accounts = user_has_privileges( p->pipe_user.nt_user_token, &se_add_users );
4527
4528         /******** BEGIN SeAddUsers BLOCK *********/
4529
4530         if ( can_mod_accounts )
4531                 become_root();
4532
4533         ret = pdb_set_aliasinfo( &group_sid, &info );
4534
4535         if ( can_mod_accounts )
4536                 unbecome_root();
4537
4538         /******** End SeAddUsers BLOCK *********/
4539
4540         if (ret) {
4541                 force_flush_samr_cache(disp_info);
4542         }
4543
4544         return ret ? NT_STATUS_OK : NT_STATUS_ACCESS_DENIED;
4545 }
4546
4547 /*********************************************************************
4548  _samr_get_dom_pwinfo
4549 *********************************************************************/
4550
4551 NTSTATUS _samr_get_dom_pwinfo(pipes_struct *p, SAMR_Q_GET_DOM_PWINFO *q_u, SAMR_R_GET_DOM_PWINFO *r_u)
4552 {
4553         /* Perform access check.  Since this rpc does not require a
4554            policy handle it will not be caught by the access checks on
4555            SAMR_CONNECT or SAMR_CONNECT_ANON. */
4556
4557         if (!pipe_access_check(p)) {
4558                 DEBUG(3, ("access denied to samr_get_dom_pwinfo\n"));
4559                 r_u->status = NT_STATUS_ACCESS_DENIED;
4560                 return r_u->status;
4561         }
4562
4563         /* Actually, returning zeros here works quite well :-). */
4564
4565         return NT_STATUS_OK;
4566 }
4567
4568 /*********************************************************************
4569  _samr_open_group
4570 *********************************************************************/
4571
4572 NTSTATUS _samr_open_group(pipes_struct *p, SAMR_Q_OPEN_GROUP *q_u, SAMR_R_OPEN_GROUP *r_u)
4573 {
4574         DOM_SID sid;
4575         DOM_SID info_sid;
4576         GROUP_MAP map;
4577         struct samr_info *info;
4578         SEC_DESC         *psd = NULL;
4579         uint32            acc_granted;
4580         uint32            des_access = q_u->access_mask;
4581         size_t            sd_size;
4582         NTSTATUS          status;
4583         fstring sid_string;
4584         BOOL ret;
4585         SE_PRIV se_rights;
4586
4587         if (!get_lsa_policy_samr_sid(p, &q_u->domain_pol, &sid, &acc_granted, NULL))
4588                 return NT_STATUS_INVALID_HANDLE;
4589
4590         status = access_check_samr_function(acc_granted,
4591                 SA_RIGHT_DOMAIN_OPEN_ACCOUNT, "_samr_open_group");
4592
4593         if ( !NT_STATUS_IS_OK(status) )
4594                 return status;
4595
4596         /*check if access can be granted as requested by client. */
4597         make_samr_object_sd(p->mem_ctx, &psd, &sd_size, &grp_generic_mapping, NULL, 0);
4598         se_map_generic(&des_access,&grp_generic_mapping);
4599
4600         se_priv_copy( &se_rights, &se_add_users );
4601
4602         status = access_check_samr_object(psd, p->pipe_user.nt_user_token,
4603                 &se_rights, GENERIC_RIGHTS_GROUP_WRITE, des_access,
4604                 &acc_granted, "_samr_open_group");
4605
4606         if ( !NT_STATUS_IS_OK(status) )
4607                 return status;
4608
4609         /* this should not be hard-coded like this */
4610
4611         if (!sid_equal(&sid, get_global_sam_sid()))
4612                 return NT_STATUS_ACCESS_DENIED;
4613
4614         sid_copy(&info_sid, get_global_sam_sid());
4615         sid_append_rid(&info_sid, q_u->rid_group);
4616         sid_to_string(sid_string, &info_sid);
4617
4618         if ((info = get_samr_info_by_sid(&info_sid)) == NULL)
4619                 return NT_STATUS_NO_MEMORY;
4620
4621         info->acc_granted = acc_granted;
4622
4623         DEBUG(10, ("_samr_open_group:Opening SID: %s\n", sid_string));
4624
4625         /* check if that group really exists */
4626         become_root();
4627         ret = get_domain_group_from_sid(info->sid, &map);
4628         unbecome_root();
4629         if (!ret)
4630                 return NT_STATUS_NO_SUCH_GROUP;
4631
4632         /* get a (unique) handle.  open a policy on it. */
4633         if (!create_policy_hnd(p, &r_u->pol, free_samr_info, (void *)info))
4634                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
4635
4636         return NT_STATUS_OK;
4637 }
4638
4639 /*********************************************************************
4640  _samr_remove_sid_foreign_domain
4641 *********************************************************************/
4642
4643 NTSTATUS _samr_remove_sid_foreign_domain(pipes_struct *p,
4644                                           SAMR_Q_REMOVE_SID_FOREIGN_DOMAIN *q_u,
4645                                           SAMR_R_REMOVE_SID_FOREIGN_DOMAIN *r_u)
4646 {
4647         DOM_SID                 delete_sid, domain_sid;
4648         uint32                  acc_granted;
4649         NTSTATUS                result;
4650         DISP_INFO *disp_info = NULL;
4651
4652         sid_copy( &delete_sid, &q_u->sid.sid );
4653
4654         DEBUG(5,("_samr_remove_sid_foreign_domain: removing SID [%s]\n",
4655                 sid_string_static(&delete_sid)));
4656
4657         /* Find the policy handle. Open a policy on it. */
4658
4659         if (!get_lsa_policy_samr_sid(p, &q_u->dom_pol, &domain_sid,
4660                                      &acc_granted, &disp_info))
4661                 return NT_STATUS_INVALID_HANDLE;
4662
4663         result = access_check_samr_function(acc_granted, STD_RIGHT_DELETE_ACCESS,
4664                 "_samr_remove_sid_foreign_domain");
4665
4666         if (!NT_STATUS_IS_OK(result))
4667                 return result;
4668
4669         DEBUG(8, ("_samr_remove_sid_foreign_domain:sid is %s\n",
4670                 sid_string_static(&domain_sid)));
4671
4672         /* we can only delete a user from a group since we don't have
4673            nested groups anyways.  So in the latter case, just say OK */
4674
4675         /* TODO: The above comment nowadays is bogus. Since we have nested
4676          * groups now, and aliases members are never reported out of the unix
4677          * group membership, the "just say OK" makes this call a no-op. For
4678          * us. This needs fixing however. */
4679
4680         /* I've only ever seen this in the wild when deleting a user from
4681          * usrmgr.exe. domain_sid is the builtin domain, and the sid to delete
4682          * is the user about to be deleted. I very much suspect this is the
4683          * only application of this call. To verify this, let people report
4684          * other cases. */
4685
4686         if (!sid_check_is_builtin(&domain_sid)) {
4687                 DEBUG(1,("_samr_remove_sid_foreign_domain: domain_sid = %s, "
4688                          "global_sam_sid() = %s\n",
4689                          sid_string_static(&domain_sid),
4690                          sid_string_static(get_global_sam_sid())));
4691                 DEBUGADD(1,("please report to samba-technical@samba.org!\n"));
4692                 return NT_STATUS_OK;
4693         }
4694
4695         force_flush_samr_cache(disp_info);
4696
4697         result = NT_STATUS_OK;
4698
4699         return result;
4700 }
4701
4702 /*******************************************************************
4703  _samr_query_domain_info2
4704  ********************************************************************/
4705
4706 NTSTATUS _samr_query_domain_info2(pipes_struct *p,
4707                 SAMR_Q_QUERY_DOMAIN_INFO2 *q_u,
4708                 SAMR_R_QUERY_DOMAIN_INFO2 *r_u)
4709 {
4710         struct samr_info *info = NULL;
4711         SAM_UNK_CTR *ctr;
4712         uint32 min_pass_len,pass_hist,flag;
4713         time_t u_expire, u_min_age;
4714         NTTIME nt_expire, nt_min_age;
4715
4716         time_t u_lock_duration, u_reset_time;
4717         NTTIME nt_lock_duration, nt_reset_time;
4718         uint32 lockout;
4719
4720         time_t u_logout;
4721         NTTIME nt_logout;
4722
4723         uint32 num_users=0, num_groups=0, num_aliases=0;
4724
4725         uint32 account_policy_temp;
4726
4727         time_t seq_num;
4728         uint32 server_role;
4729
4730         if ((ctr = TALLOC_ZERO_P(p->mem_ctx, SAM_UNK_CTR)) == NULL)
4731                 return NT_STATUS_NO_MEMORY;
4732
4733         ZERO_STRUCTP(ctr);
4734
4735         r_u->status = NT_STATUS_OK;
4736
4737         DEBUG(5,("_samr_query_domain_info2: %d\n", __LINE__));
4738
4739         /* find the policy handle.  open a policy on it. */
4740         if (!find_policy_by_hnd(p, &q_u->domain_pol, (void **)(void *)&info))
4741                 return NT_STATUS_INVALID_HANDLE;
4742
4743         switch (q_u->switch_value) {
4744                 case 0x01:
4745                         pdb_get_account_policy(AP_MIN_PASSWORD_LEN, &account_policy_temp);
4746                         min_pass_len = account_policy_temp;
4747
4748                         pdb_get_account_policy(AP_PASSWORD_HISTORY, &account_policy_temp);
4749                         pass_hist = account_policy_temp;
4750
4751                         pdb_get_account_policy(AP_USER_MUST_LOGON_TO_CHG_PASS, &account_policy_temp);
4752                         flag = account_policy_temp;
4753
4754                         pdb_get_account_policy(AP_MAX_PASSWORD_AGE, &account_policy_temp);
4755                         u_expire = account_policy_temp;
4756
4757                         pdb_get_account_policy(AP_MIN_PASSWORD_AGE, &account_policy_temp);
4758                         u_min_age = account_policy_temp;
4759
4760                         unix_to_nt_time_abs(&nt_expire, u_expire);
4761                         unix_to_nt_time_abs(&nt_min_age, u_min_age);
4762
4763                         init_unk_info1(&ctr->info.inf1, (uint16)min_pass_len, (uint16)pass_hist,
4764                                        flag, nt_expire, nt_min_age);
4765                         break;
4766                 case 0x02:
4767                         become_root();
4768                         num_users = count_sam_users(info->disp_info, ACB_NORMAL);
4769                         num_groups = count_sam_groups(info->disp_info);
4770                         num_aliases = count_sam_aliases(info->disp_info);
4771                         unbecome_root();
4772
4773                         pdb_get_account_policy(AP_TIME_TO_LOGOUT, &account_policy_temp);
4774                         u_logout = account_policy_temp;
4775
4776                         unix_to_nt_time_abs(&nt_logout, u_logout);
4777
4778                         if (!pdb_get_seq_num(&seq_num))
4779                                 seq_num = time(NULL);
4780
4781                         server_role = ROLE_DOMAIN_PDC;
4782                         if (lp_server_role() == ROLE_DOMAIN_BDC)
4783                                 server_role = ROLE_DOMAIN_BDC;
4784
4785                         init_unk_info2(&ctr->info.inf2, lp_serverstring(), lp_workgroup(), global_myname(), seq_num,
4786                                        num_users, num_groups, num_aliases, nt_logout, server_role);
4787                         break;
4788                 case 0x03:
4789                         pdb_get_account_policy(AP_TIME_TO_LOGOUT, &account_policy_temp);
4790                         u_logout = account_policy_temp;
4791
4792                         unix_to_nt_time_abs(&nt_logout, u_logout);
4793
4794                         init_unk_info3(&ctr->info.inf3, nt_logout);
4795                         break;
4796                 case 0x05:
4797                         init_unk_info5(&ctr->info.inf5, global_myname());
4798                         break;
4799                 case 0x06:
4800                         init_unk_info6(&ctr->info.inf6);
4801                         break;
4802                 case 0x07:
4803                         server_role = ROLE_DOMAIN_PDC;
4804                         if (lp_server_role() == ROLE_DOMAIN_BDC)
4805                                 server_role = ROLE_DOMAIN_BDC;
4806
4807                         init_unk_info7(&ctr->info.inf7, server_role);
4808                         break;
4809                 case 0x08:
4810                         if (!pdb_get_seq_num(&seq_num))
4811                                 seq_num = time(NULL);
4812
4813                         init_unk_info8(&ctr->info.inf8, (uint32) seq_num);
4814                         break;
4815                 case 0x0c:
4816                         pdb_get_account_policy(AP_LOCK_ACCOUNT_DURATION, &account_policy_temp);
4817                         u_lock_duration = account_policy_temp;
4818                         if (u_lock_duration != -1)
4819                                 u_lock_duration *= 60;
4820
4821                         pdb_get_account_policy(AP_RESET_COUNT_TIME, &account_policy_temp);
4822                         u_reset_time = account_policy_temp * 60;
4823
4824                         pdb_get_account_policy(AP_BAD_ATTEMPT_LOCKOUT, &account_policy_temp);
4825                         lockout = account_policy_temp;
4826
4827                         unix_to_nt_time_abs(&nt_lock_duration, u_lock_duration);
4828                         unix_to_nt_time_abs(&nt_reset_time, u_reset_time);
4829
4830                         init_unk_info12(&ctr->info.inf12, nt_lock_duration, nt_reset_time, (uint16)lockout);
4831                         break;
4832                 default:
4833                         return NT_STATUS_INVALID_INFO_CLASS;
4834         }
4835
4836         init_samr_r_samr_query_domain_info2(r_u, q_u->switch_value, ctr, NT_STATUS_OK);
4837
4838         DEBUG(5,("_samr_query_domain_info2: %d\n", __LINE__));
4839
4840         return r_u->status;
4841 }
4842
4843 /*******************************************************************
4844  _samr_
4845  ********************************************************************/
4846
4847 NTSTATUS _samr_set_dom_info(pipes_struct *p, SAMR_Q_SET_DOMAIN_INFO *q_u, SAMR_R_SET_DOMAIN_INFO *r_u)
4848 {
4849         time_t u_expire, u_min_age;
4850         time_t u_logout;
4851         time_t u_lock_duration, u_reset_time;
4852
4853         r_u->status = NT_STATUS_OK;
4854
4855         DEBUG(5,("_samr_set_dom_info: %d\n", __LINE__));
4856
4857         /* find the policy handle.  open a policy on it. */
4858         if (!find_policy_by_hnd(p, &q_u->domain_pol, NULL))
4859                 return NT_STATUS_INVALID_HANDLE;
4860
4861         DEBUG(5,("_samr_set_dom_info: switch_value: %d\n", q_u->switch_value));
4862
4863         switch (q_u->switch_value) {
4864                 case 0x01:
4865                         u_expire=nt_time_to_unix_abs(&q_u->ctr->info.inf1.expire);
4866                         u_min_age=nt_time_to_unix_abs(&q_u->ctr->info.inf1.min_passwordage);
4867
4868                         pdb_set_account_policy(AP_MIN_PASSWORD_LEN, (uint32)q_u->ctr->info.inf1.min_length_password);
4869                         pdb_set_account_policy(AP_PASSWORD_HISTORY, (uint32)q_u->ctr->info.inf1.password_history);
4870                         pdb_set_account_policy(AP_USER_MUST_LOGON_TO_CHG_PASS, (uint32)q_u->ctr->info.inf1.password_properties);
4871                         pdb_set_account_policy(AP_MAX_PASSWORD_AGE, (int)u_expire);
4872                         pdb_set_account_policy(AP_MIN_PASSWORD_AGE, (int)u_min_age);
4873                         break;
4874                 case 0x02:
4875                         break;
4876                 case 0x03:
4877                         u_logout=nt_time_to_unix_abs(&q_u->ctr->info.inf3.logout);
4878                         pdb_set_account_policy(AP_TIME_TO_LOGOUT, (int)u_logout);
4879                         break;
4880                 case 0x05:
4881                         break;
4882                 case 0x06:
4883                         break;
4884                 case 0x07:
4885                         break;
4886                 case 0x0c:
4887                         u_lock_duration=nt_time_to_unix_abs(&q_u->ctr->info.inf12.duration);
4888                         if (u_lock_duration != -1)
4889                                 u_lock_duration /= 60;
4890
4891                         u_reset_time=nt_time_to_unix_abs(&q_u->ctr->info.inf12.reset_count)/60;
4892
4893                         pdb_set_account_policy(AP_LOCK_ACCOUNT_DURATION, (int)u_lock_duration);
4894                         pdb_set_account_policy(AP_RESET_COUNT_TIME, (int)u_reset_time);
4895                         pdb_set_account_policy(AP_BAD_ATTEMPT_LOCKOUT, (uint32)q_u->ctr->info.inf12.bad_attempt_lockout);
4896                         break;
4897                 default:
4898                         return NT_STATUS_INVALID_INFO_CLASS;
4899         }
4900
4901         init_samr_r_set_domain_info(r_u, NT_STATUS_OK);
4902
4903         DEBUG(5,("_samr_set_dom_info: %d\n", __LINE__));
4904
4905         return r_u->status;
4906 }