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