source/nsswitch/winbindd_rpc.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3
   4    Winbind rpc backend functions
   5
   6    Copyright (C) Tim Potter 2000-2001,2003
   7    Copyright (C) Andrew Tridgell 2001
   8    Copyright (C) Volker Lendecke 2005
   9
  10    This program is free software; you can redistribute it and/or modify
  11    it under the terms of the GNU General Public License as published by
  12    the Free Software Foundation; either version 2 of the License, or
  13    (at your option) any later version.
  14
  15    This program is distributed in the hope that it will be useful,
  16    but WITHOUT ANY WARRANTY; without even the implied warranty of
  17    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18    GNU General Public License for more details.
  19
  20    You should have received a copy of the GNU General Public License
  21    along with this program; if not, write to the Free Software
  22    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  23 */
  24
  25 #include "includes.h"
  26 #include "winbindd.h"
  27
  28 #undef DBGC_CLASS
  29 #define DBGC_CLASS DBGC_WINBIND
  30
  31
  32 /* Query display info for a domain.  This returns enough information plus a
  33    bit extra to give an overview of domain users for the User Manager
  34    application. */
  35 static NTSTATUS query_user_list(struct winbindd_domain *domain,
  36                                TALLOC_CTX *mem_ctx,
  37                                uint32 *num_entries,
  38                                WINBIND_USERINFO **info)
  39 {
  40         NTSTATUS result;
  41         POLICY_HND dom_pol;
  42         unsigned int i, start_idx;
  43         uint32 loop_count;
  44         struct rpc_pipe_client *cli;
  45
  46         DEBUG(3,("rpc: query_user_list\n"));
  47
  48         *num_entries = 0;
  49         *info = NULL;
  50
  51         result = cm_connect_sam(domain, mem_ctx, &cli, &dom_pol);
  52         if (!NT_STATUS_IS_OK(result))
  53                 return result;
  54
  55         i = start_idx = 0;
  56         loop_count = 0;
  57
  58         do {
  59                 TALLOC_CTX *ctx2;
  60                 uint32 num_dom_users, j;
  61                 uint32 max_entries, max_size;
  62                 SAM_DISPINFO_CTR ctr;
  63                 SAM_DISPINFO_1 info1;
  64
  65                 ZERO_STRUCT( ctr );
  66                 ZERO_STRUCT( info1 );
  67                 ctr.sam.info1 = &info1;
  68
  69                 if (!(ctx2 = talloc_init("winbindd enum_users")))
  70                         return NT_STATUS_NO_MEMORY;
  71
  72                 /* this next bit is copied from net_user_list_internal() */
  73
  74                 get_query_dispinfo_params(loop_count, &max_entries,
  75                                           &max_size);
  76
  77                 result = rpccli_samr_query_dispinfo(cli, mem_ctx, &dom_pol,
  78                                                     &start_idx, 1,
  79                                                     &num_dom_users,
  80                                                     max_entries, max_size,
  81                                                     &ctr);
  82
  83                 loop_count++;
  84
  85                 *num_entries += num_dom_users;
  86
  87                 *info = TALLOC_REALLOC_ARRAY(mem_ctx, *info, WINBIND_USERINFO,
  88                                              *num_entries);
  89
  90                 if (!(*info)) {
  91                         talloc_destroy(ctx2);
  92                         return NT_STATUS_NO_MEMORY;
  93                 }
  94
  95                 for (j = 0; j < num_dom_users; i++, j++) {
  96                         fstring username, fullname;
  97                         uint32 rid = ctr.sam.info1->sam[j].rid_user;
  98
  99                         unistr2_to_ascii( username, &(&ctr.sam.info1->str[j])->uni_acct_name, sizeof(username)-1);
 100                         unistr2_to_ascii( fullname, &(&ctr.sam.info1->str[j])->uni_full_name, sizeof(fullname)-1);
 101
 102                         (*info)[i].acct_name = talloc_strdup(mem_ctx, username );
 103                         (*info)[i].full_name = talloc_strdup(mem_ctx, fullname );
 104                         (*info)[i].homedir = NULL;
 105                         (*info)[i].shell = NULL;
 106                         sid_compose(&(*info)[i].user_sid, &domain->sid, rid);
 107
 108                         /* For the moment we set the primary group for
 109                            every user to be the Domain Users group.
 110                            There are serious problems with determining
 111                            the actual primary group for large domains.
 112                            This should really be made into a 'winbind
 113                            force group' smb.conf parameter or
 114                            something like that. */
 115
 116                         sid_compose(&(*info)[i].group_sid, &domain->sid,
 117                                     DOMAIN_GROUP_RID_USERS);
 118                 }
 119
 120                 talloc_destroy(ctx2);
 121
 122         } while (NT_STATUS_EQUAL(result, STATUS_MORE_ENTRIES));
 123
 124         return result;
 125 }
 126
 127 /* list all domain groups */
 128 static NTSTATUS enum_dom_groups(struct winbindd_domain *domain,
 129                                 TALLOC_CTX *mem_ctx,
 130                                 uint32 *num_entries,
 131                                 struct acct_info **info)
 132 {
 133         POLICY_HND dom_pol;
 134         NTSTATUS status;
 135         uint32 start = 0;
 136         struct rpc_pipe_client *cli;
 137
 138         *num_entries = 0;
 139         *info = NULL;
 140
 141         DEBUG(3,("rpc: enum_dom_groups\n"));
 142
 143         status = cm_connect_sam(domain, mem_ctx, &cli, &dom_pol);
 144         if (!NT_STATUS_IS_OK(status))
 145                 return status;
 146
 147         do {
 148                 struct acct_info *info2 = NULL;
 149                 uint32 count = 0;
 150                 TALLOC_CTX *mem_ctx2;
 151
 152                 mem_ctx2 = talloc_init("enum_dom_groups[rpc]");
 153
 154                 /* start is updated by this call. */
 155                 status = rpccli_samr_enum_dom_groups(cli, mem_ctx2, &dom_pol,
 156                                                      &start,
 157                                                      0xFFFF, /* buffer size? */
 158                                                      &info2, &count);
 159
 160                 if (!NT_STATUS_IS_OK(status) &&
 161                     !NT_STATUS_EQUAL(status, STATUS_MORE_ENTRIES)) {
 162                         talloc_destroy(mem_ctx2);
 163                         break;
 164                 }
 165
 166                 (*info) = TALLOC_REALLOC_ARRAY(mem_ctx, *info,
 167                                                struct acct_info,
 168                                                (*num_entries) + count);
 169                 if (! *info) {
 170                         talloc_destroy(mem_ctx2);
 171                         status = NT_STATUS_NO_MEMORY;
 172                         break;
 173                 }
 174
 175                 memcpy(&(*info)[*num_entries], info2, count*sizeof(*info2));
 176                 (*num_entries) += count;
 177                 talloc_destroy(mem_ctx2);
 178         } while (NT_STATUS_EQUAL(status, STATUS_MORE_ENTRIES));
 179
 180         return NT_STATUS_OK;
 181 }
 182
 183 /* List all domain groups */
 184
 185 static NTSTATUS enum_local_groups(struct winbindd_domain *domain,
 186                                 TALLOC_CTX *mem_ctx,
 187                                 uint32 *num_entries,
 188                                 struct acct_info **info)
 189 {
 190         POLICY_HND dom_pol;
 191         NTSTATUS result;
 192         struct rpc_pipe_client *cli;
 193
 194         *num_entries = 0;
 195         *info = NULL;
 196
 197         DEBUG(3,("rpc: enum_local_groups\n"));
 198
 199         result = cm_connect_sam(domain, mem_ctx, &cli, &dom_pol);
 200         if (!NT_STATUS_IS_OK(result))
 201                 return result;
 202
 203         do {
 204                 struct acct_info *info2 = NULL;
 205                 uint32 count = 0, start = *num_entries;
 206                 TALLOC_CTX *mem_ctx2;
 207
 208                 mem_ctx2 = talloc_init("enum_dom_local_groups[rpc]");
 209
 210                 result = rpccli_samr_enum_als_groups( cli, mem_ctx2, &dom_pol,
 211                                                       &start, 0xFFFF, &info2,
 212                                                       &count);
 213
 214                 if (!NT_STATUS_IS_OK(result) &&
 215                     !NT_STATUS_EQUAL(result, STATUS_MORE_ENTRIES) )
 216                 {
 217                         talloc_destroy(mem_ctx2);
 218                         return result;
 219                 }
 220
 221                 (*info) = TALLOC_REALLOC_ARRAY(mem_ctx, *info,
 222                                                struct acct_info,
 223                                                (*num_entries) + count);
 224                 if (! *info) {
 225                         talloc_destroy(mem_ctx2);
 226                         return NT_STATUS_NO_MEMORY;
 227                 }
 228
 229                 memcpy(&(*info)[*num_entries], info2, count*sizeof(*info2));
 230                 (*num_entries) += count;
 231                 talloc_destroy(mem_ctx2);
 232
 233         } while (NT_STATUS_EQUAL(result, STATUS_MORE_ENTRIES));
 234
 235         return NT_STATUS_OK;
 236 }
 237
 238 /* convert a single name to a sid in a domain */
 239 NTSTATUS msrpc_name_to_sid(struct winbindd_domain *domain,
 240                             TALLOC_CTX *mem_ctx,
 241                             const char *domain_name,
 242                             const char *name,
 243                             DOM_SID *sid,
 244                             enum lsa_SidType *type)
 245 {
 246         NTSTATUS result;
 247         DOM_SID *sids = NULL;
 248         enum lsa_SidType *types = NULL;
 249         const char *full_name;
 250         struct rpc_pipe_client *cli;
 251         POLICY_HND lsa_policy;
 252
 253         if(name == NULL || *name=='\0') {
 254                 DEBUG(3,("rpc: name_to_sid name=%s\n", domain_name));
 255                 full_name = talloc_asprintf(mem_ctx, "%s", domain_name);
 256         } else {
 257                 DEBUG(3,("rpc: name_to_sid name=%s\\%s\n", domain_name, name));
 258                 full_name = talloc_asprintf(mem_ctx, "%s\\%s", domain_name, name);
 259         }
 260         if (!full_name) {
 261                 DEBUG(0, ("talloc_asprintf failed!\n"));
 262                 return NT_STATUS_NO_MEMORY;
 263         }
 264
 265         DEBUG(3,("name_to_sid [rpc] %s for domain %s\n", full_name?full_name:"", domain_name ));
 266
 267         result = cm_connect_lsa(domain, mem_ctx, &cli, &lsa_policy);
 268         if (!NT_STATUS_IS_OK(result))
 269                 return result;
 270
 271         result = rpccli_lsa_lookup_names(cli, mem_ctx, &lsa_policy, 1,
 272                                          &full_name, NULL, &sids, &types);
 273
 274         if (!NT_STATUS_IS_OK(result))
 275                 return result;
 276
 277         /* Return rid and type if lookup successful */
 278
 279         sid_copy(sid, &sids[0]);
 280         *type = types[0];
 281
 282         return NT_STATUS_OK;
 283 }
 284
 285 /*
 286   convert a domain SID to a user or group name
 287 */
 288 NTSTATUS msrpc_sid_to_name(struct winbindd_domain *domain,
 289                             TALLOC_CTX *mem_ctx,
 290                             const DOM_SID *sid,
 291                             char **domain_name,
 292                             char **name,
 293                             enum lsa_SidType *type)
 294 {
 295         char **domains;
 296         char **names;
 297         enum lsa_SidType *types;
 298         NTSTATUS result;
 299         struct rpc_pipe_client *cli;
 300         POLICY_HND lsa_policy;
 301
 302         DEBUG(3,("sid_to_name [rpc] %s for domain %s\n", sid_string_static(sid),
 303                         domain->name ));
 304
 305         result = cm_connect_lsa(domain, mem_ctx, &cli, &lsa_policy);
 306         if (!NT_STATUS_IS_OK(result))
 307                 return result;
 308
 309         result = rpccli_lsa_lookup_sids(cli, mem_ctx, &lsa_policy,
 310                                         1, sid, &domains, &names, &types);
 311         if (!NT_STATUS_IS_OK(result))
 312                 return result;
 313
 314         *type = (enum lsa_SidType)types[0];
 315         *domain_name = domains[0];
 316         *name = names[0];
 317         DEBUG(5,("Mapped sid to [%s]\\[%s]\n", domains[0], *name));
 318         return NT_STATUS_OK;
 319 }
 320
 321 NTSTATUS msrpc_rids_to_names(struct winbindd_domain *domain,
 322                              TALLOC_CTX *mem_ctx,
 323                              const DOM_SID *sid,
 324                              uint32 *rids,
 325                              size_t num_rids,
 326                              char **domain_name,
 327                              char ***names,
 328                              enum lsa_SidType **types)
 329 {
 330         char **domains;
 331         NTSTATUS result;
 332         struct rpc_pipe_client *cli;
 333         POLICY_HND lsa_policy;
 334         DOM_SID *sids;
 335         size_t i;
 336
 337         DEBUG(3, ("rids_to_names [rpc] for domain %s\n", domain->name ));
 338
 339         sids = TALLOC_ARRAY(mem_ctx, DOM_SID, num_rids);
 340         if (sids == NULL) {
 341                 return NT_STATUS_NO_MEMORY;
 342         }
 343
 344         for (i=0; i<num_rids; i++) {
 345                 if (!sid_compose(&sids[i], sid, rids[i])) {
 346                         return NT_STATUS_INTERNAL_ERROR;
 347                 }
 348         }
 349
 350         result = cm_connect_lsa(domain, mem_ctx, &cli, &lsa_policy);
 351         if (!NT_STATUS_IS_OK(result)) {
 352                 return result;
 353         }
 354
 355         result = rpccli_lsa_lookup_sids(cli, mem_ctx, &lsa_policy,
 356                                         num_rids, sids, &domains,
 357                                         names, types);
 358         if (!NT_STATUS_IS_OK(result) &&
 359             !NT_STATUS_EQUAL(result, STATUS_SOME_UNMAPPED)) {
 360                 return result;
 361         }
 362
 363         for (i=0; i<num_rids; i++) {
 364                 if ((*types)[i] != SID_NAME_UNKNOWN) {
 365                         *domain_name = domains[i];
 366                         break;
 367                 }
 368         }
 369
 370         return result;
 371 }
 372
 373 /* Lookup user information from a rid or username. */
 374 static NTSTATUS query_user(struct winbindd_domain *domain,
 375                            TALLOC_CTX *mem_ctx,
 376                            const DOM_SID *user_sid,
 377                            WINBIND_USERINFO *user_info)
 378 {
 379         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
 380         POLICY_HND dom_pol, user_pol;
 381         SAM_USERINFO_CTR *ctr;
 382         fstring sid_string;
 383         uint32 user_rid;
 384         NET_USER_INFO_3 *user;
 385         struct rpc_pipe_client *cli;
 386
 387         DEBUG(3,("rpc: query_user rid=%s\n",
 388                  sid_to_string(sid_string, user_sid)));
 389
 390         if (!sid_peek_check_rid(&domain->sid, user_sid, &user_rid))
 391                 return NT_STATUS_UNSUCCESSFUL;
 392
 393         /* try netsamlogon cache first */
 394
 395         if ( (user = netsamlogon_cache_get( mem_ctx, user_sid )) != NULL )
 396         {
 397
 398                 DEBUG(5,("query_user: Cache lookup succeeded for %s\n",
 399                         sid_string_static(user_sid)));
 400
 401                 sid_compose(&user_info->user_sid, &domain->sid, user_rid);
 402                 sid_compose(&user_info->group_sid, &domain->sid,
 403                             user->group_rid);
 404
 405                 user_info->acct_name = unistr2_tdup(mem_ctx,
 406                                                     &user->uni_user_name);
 407                 user_info->full_name = unistr2_tdup(mem_ctx,
 408                                                     &user->uni_full_name);
 409
 410                 user_info->homedir = NULL;
 411                 user_info->shell = NULL;
 412
 413                 SAFE_FREE(user);
 414
 415                 return NT_STATUS_OK;
 416         }
 417
 418         /* no cache; hit the wire */
 419
 420         result = cm_connect_sam(domain, mem_ctx, &cli, &dom_pol);
 421         if (!NT_STATUS_IS_OK(result))
 422                 return result;
 423
 424         /* Get user handle */
 425         result = rpccli_samr_open_user(cli, mem_ctx, &dom_pol,
 426                                        SEC_RIGHTS_MAXIMUM_ALLOWED, user_rid,
 427                                        &user_pol);
 428
 429         if (!NT_STATUS_IS_OK(result))
 430                 return result;
 431
 432         /* Get user info */
 433         result = rpccli_samr_query_userinfo(cli, mem_ctx, &user_pol,
 434                                             0x15, &ctr);
 435
 436         rpccli_samr_close(cli, mem_ctx, &user_pol);
 437
 438         if (!NT_STATUS_IS_OK(result))
 439                 return result;
 440
 441         sid_compose(&user_info->user_sid, &domain->sid, user_rid);
 442         sid_compose(&user_info->group_sid, &domain->sid,
 443                     ctr->info.id21->group_rid);
 444         user_info->acct_name = unistr2_tdup(mem_ctx,
 445                                             &ctr->info.id21->uni_user_name);
 446         user_info->full_name = unistr2_tdup(mem_ctx,
 447                                             &ctr->info.id21->uni_full_name);
 448         user_info->homedir = NULL;
 449         user_info->shell = NULL;
 450
 451         return NT_STATUS_OK;
 452 }
 453
 454 /* Lookup groups a user is a member of.  I wish Unix had a call like this! */
 455 static NTSTATUS lookup_usergroups(struct winbindd_domain *domain,
 456                                   TALLOC_CTX *mem_ctx,
 457                                   const DOM_SID *user_sid,
 458                                   uint32 *num_groups, DOM_SID **user_grpsids)
 459 {
 460         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
 461         POLICY_HND dom_pol, user_pol;
 462         uint32 des_access = SEC_RIGHTS_MAXIMUM_ALLOWED;
 463         DOM_GID *user_groups;
 464         unsigned int i;
 465         fstring sid_string;
 466         uint32 user_rid;
 467         struct rpc_pipe_client *cli;
 468
 469         DEBUG(3,("rpc: lookup_usergroups sid=%s\n",
 470                  sid_to_string(sid_string, user_sid)));
 471
 472         if (!sid_peek_check_rid(&domain->sid, user_sid, &user_rid))
 473                 return NT_STATUS_UNSUCCESSFUL;
 474
 475         *num_groups = 0;
 476         *user_grpsids = NULL;
 477
 478         /* so lets see if we have a cached user_info_3 */
 479         result = lookup_usergroups_cached(domain, mem_ctx, user_sid,
 480                                           num_groups, user_grpsids);
 481
 482         if (NT_STATUS_IS_OK(result)) {
 483                 return NT_STATUS_OK;
 484         }
 485
 486         /* no cache; hit the wire */
 487
 488         result = cm_connect_sam(domain, mem_ctx, &cli, &dom_pol);
 489         if (!NT_STATUS_IS_OK(result))
 490                 return result;
 491
 492         /* Get user handle */
 493         result = rpccli_samr_open_user(cli, mem_ctx, &dom_pol,
 494                                         des_access, user_rid, &user_pol);
 495
 496         if (!NT_STATUS_IS_OK(result))
 497                 return result;
 498
 499         /* Query user rids */
 500         result = rpccli_samr_query_usergroups(cli, mem_ctx, &user_pol,
 501                                            num_groups, &user_groups);
 502
 503         rpccli_samr_close(cli, mem_ctx, &user_pol);
 504
 505         if (!NT_STATUS_IS_OK(result) || (*num_groups) == 0)
 506                 return result;
 507
 508         (*user_grpsids) = TALLOC_ARRAY(mem_ctx, DOM_SID, *num_groups);
 509         if (!(*user_grpsids))
 510                 return NT_STATUS_NO_MEMORY;
 511
 512         for (i=0;i<(*num_groups);i++) {
 513                 sid_copy(&((*user_grpsids)[i]), &domain->sid);
 514                 sid_append_rid(&((*user_grpsids)[i]),
 515                                 user_groups[i].g_rid);
 516         }
 517
 518         return NT_STATUS_OK;
 519 }
 520
 521 NTSTATUS msrpc_lookup_useraliases(struct winbindd_domain *domain,
 522                                   TALLOC_CTX *mem_ctx,
 523                                   uint32 num_sids, const DOM_SID *sids,
 524                                   uint32 *num_aliases, uint32 **alias_rids)
 525 {
 526         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
 527         POLICY_HND dom_pol;
 528         DOM_SID2 *query_sids;
 529         uint32 num_query_sids = 0;
 530         int i;
 531         struct rpc_pipe_client *cli;
 532         uint32 *alias_rids_query, num_aliases_query;
 533         int rangesize = MAX_SAM_ENTRIES_W2K;
 534         uint32 total_sids = 0;
 535         int num_queries = 1;
 536
 537         *num_aliases = 0;
 538         *alias_rids = NULL;
 539
 540         DEBUG(3,("rpc: lookup_useraliases\n"));
 541
 542         result = cm_connect_sam(domain, mem_ctx, &cli, &dom_pol);
 543         if (!NT_STATUS_IS_OK(result))
 544                 return result;
 545
 546         do {
 547                 /* prepare query */
 548
 549                 num_query_sids = MIN(num_sids - total_sids, rangesize);
 550
 551                 DEBUG(10,("rpc: lookup_useraliases: entering query %d for %d sids\n",
 552                         num_queries, num_query_sids));
 553
 554
 555                 query_sids = TALLOC_ARRAY(mem_ctx, DOM_SID2, num_query_sids);
 556                 if (query_sids == NULL) {
 557                         return NT_STATUS_NO_MEMORY;
 558                 }
 559
 560                 for (i=0; i<num_query_sids; i++) {
 561                         sid_copy(&query_sids[i].sid, &sids[total_sids++]);
 562                         query_sids[i].num_auths = query_sids[i].sid.num_auths;
 563                 }
 564
 565                 /* do request */
 566
 567                 result = rpccli_samr_query_useraliases(cli, mem_ctx, &dom_pol,
 568                                                        num_query_sids, query_sids,
 569                                                        &num_aliases_query,
 570                                                        &alias_rids_query);
 571
 572                 if (!NT_STATUS_IS_OK(result)) {
 573                         *num_aliases = 0;
 574                         *alias_rids = NULL;
 575                         TALLOC_FREE(query_sids);
 576                         goto done;
 577                 }
 578
 579                 /* process output */
 580
 581                 for (i=0; i<num_aliases_query; i++) {
 582                         size_t na = *num_aliases;
 583                         add_rid_to_array_unique(mem_ctx, alias_rids_query[i],
 584                                                 alias_rids, &na);
 585                         *num_aliases = na;
 586                 }
 587
 588                 TALLOC_FREE(query_sids);
 589
 590                 num_queries++;
 591
 592         } while (total_sids < num_sids);
 593
 594  done:
 595         DEBUG(10,("rpc: lookup_useraliases: got %d aliases in %d queries "
 596                 "(rangesize: %d)\n", *num_aliases, num_queries, rangesize));
 597
 598         return result;
 599 }
 600
 601
 602 /* Lookup group membership given a rid.   */
 603 static NTSTATUS lookup_groupmem(struct winbindd_domain *domain,
 604                                 TALLOC_CTX *mem_ctx,
 605                                 const DOM_SID *group_sid, uint32 *num_names,
 606                                 DOM_SID **sid_mem, char ***names,
 607                                 uint32 **name_types)
 608 {
 609         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
 610         uint32 i, total_names = 0;
 611         POLICY_HND dom_pol, group_pol;
 612         uint32 des_access = SEC_RIGHTS_MAXIMUM_ALLOWED;
 613         uint32 *rid_mem = NULL;
 614         uint32 group_rid;
 615         unsigned int j;
 616         fstring sid_string;
 617         struct rpc_pipe_client *cli;
 618         unsigned int orig_timeout;
 619
 620         DEBUG(10,("rpc: lookup_groupmem %s sid=%s\n", domain->name,
 621                   sid_to_string(sid_string, group_sid)));
 622
 623         if (!sid_peek_check_rid(&domain->sid, group_sid, &group_rid))
 624                 return NT_STATUS_UNSUCCESSFUL;
 625
 626         *num_names = 0;
 627
 628         result = cm_connect_sam(domain, mem_ctx, &cli, &dom_pol);
 629         if (!NT_STATUS_IS_OK(result))
 630                 return result;
 631
 632         result = rpccli_samr_open_group(cli, mem_ctx, &dom_pol,
 633                                         des_access, group_rid, &group_pol);
 634
 635         if (!NT_STATUS_IS_OK(result))
 636                 return result;
 637
 638         /* Step #1: Get a list of user rids that are the members of the
 639            group. */
 640
 641         /* This call can take a long time - allow the server to time out.
 642            35 seconds should do it. */
 643
 644         orig_timeout = cli_set_timeout(cli->cli, 35000);
 645
 646         result = rpccli_samr_query_groupmem(cli, mem_ctx,
 647                                             &group_pol, num_names, &rid_mem,
 648                                             name_types);
 649
 650         /* And restore our original timeout. */
 651         cli_set_timeout(cli->cli, orig_timeout);
 652
 653         rpccli_samr_close(cli, mem_ctx, &group_pol);
 654
 655         if (!NT_STATUS_IS_OK(result))
 656                 return result;
 657
 658         if (!*num_names) {
 659                 names = NULL;
 660                 name_types = NULL;
 661                 sid_mem = NULL;
 662                 return NT_STATUS_OK;
 663         }
 664
 665         /* Step #2: Convert list of rids into list of usernames.  Do this
 666            in bunches of ~1000 to avoid crashing NT4.  It looks like there
 667            is a buffer overflow or something like that lurking around
 668            somewhere. */
 669
 670 #define MAX_LOOKUP_RIDS 900
 671
 672         *names = TALLOC_ZERO_ARRAY(mem_ctx, char *, *num_names);
 673         *name_types = TALLOC_ZERO_ARRAY(mem_ctx, uint32, *num_names);
 674         *sid_mem = TALLOC_ZERO_ARRAY(mem_ctx, DOM_SID, *num_names);
 675
 676         for (j=0;j<(*num_names);j++)
 677                 sid_compose(&(*sid_mem)[j], &domain->sid, rid_mem[j]);
 678
 679         if (*num_names>0 && (!*names || !*name_types))
 680                 return NT_STATUS_NO_MEMORY;
 681
 682         for (i = 0; i < *num_names; i += MAX_LOOKUP_RIDS) {
 683                 int num_lookup_rids = MIN(*num_names - i, MAX_LOOKUP_RIDS);
 684                 uint32 tmp_num_names = 0;
 685                 char **tmp_names = NULL;
 686                 uint32 *tmp_types = NULL;
 687
 688                 /* Lookup a chunk of rids */
 689
 690                 result = rpccli_samr_lookup_rids(cli, mem_ctx,
 691                                                  &dom_pol,
 692                                                  num_lookup_rids,
 693                                                  &rid_mem[i],
 694                                                  &tmp_num_names,
 695                                                  &tmp_names, &tmp_types);
 696
 697                 /* see if we have a real error (and yes the
 698                    STATUS_SOME_UNMAPPED is the one returned from 2k) */
 699
 700                 if (!NT_STATUS_IS_OK(result) &&
 701                     !NT_STATUS_EQUAL(result, STATUS_SOME_UNMAPPED))
 702                         return result;
 703
 704                 /* Copy result into array.  The talloc system will take
 705                    care of freeing the temporary arrays later on. */
 706
 707                 memcpy(&(*names)[i], tmp_names, sizeof(char *) *
 708                        tmp_num_names);
 709
 710                 memcpy(&(*name_types)[i], tmp_types, sizeof(uint32) *
 711                        tmp_num_names);
 712
 713                 total_names += tmp_num_names;
 714         }
 715
 716         *num_names = total_names;
 717
 718         return NT_STATUS_OK;
 719 }
 720
 721 #ifdef HAVE_LDAP
 722
 723 #include <ldap.h>
 724
 725 static int get_ldap_seq(const char *server, int port, uint32 *seq)
 726 {
 727         int ret = -1;
 728         struct timeval to;
 729         const char *attrs[] = {"highestCommittedUSN", NULL};
 730         LDAPMessage *res = NULL;
 731         char **values = NULL;
 732         LDAP *ldp = NULL;
 733
 734         *seq = DOM_SEQUENCE_NONE;
 735
 736         /*
 737          * Parameterised (5) second timeout on open. This is needed as the
 738          * search timeout doesn't seem to apply to doing an open as well. JRA.
 739          */
 740
 741         ldp = ldap_open_with_timeout(server, port, lp_ldap_timeout());
 742         if (ldp == NULL)
 743                 return -1;
 744
 745         /* Timeout if no response within 20 seconds. */
 746         to.tv_sec = 10;
 747         to.tv_usec = 0;
 748
 749         if (ldap_search_st(ldp, "", LDAP_SCOPE_BASE, "(objectclass=*)",
 750                            CONST_DISCARD(char **, attrs), 0, &to, &res))
 751                 goto done;
 752
 753         if (ldap_count_entries(ldp, res) != 1)
 754                 goto done;
 755
 756         values = ldap_get_values(ldp, res, "highestCommittedUSN");
 757         if (!values || !values[0])
 758                 goto done;
 759
 760         *seq = atoi(values[0]);
 761         ret = 0;
 762
 763   done:
 764
 765         if (values)
 766                 ldap_value_free(values);
 767         if (res)
 768                 ldap_msgfree(res);
 769         if (ldp)
 770                 ldap_unbind(ldp);
 771         return ret;
 772 }
 773
 774 /**********************************************************************
 775  Get the sequence number for a Windows AD native mode domain using
 776  LDAP queries.
 777 **********************************************************************/
 778
 779 static int get_ldap_sequence_number(struct winbindd_domain *domain, uint32 *seq)
 780 {
 781         int ret = -1;
 782         fstring ipstr;
 783
 784         fstrcpy( ipstr, inet_ntoa(domain->dcaddr.sin_addr));
 785         if ((ret = get_ldap_seq( ipstr, LDAP_PORT, seq)) == 0) {
 786                 DEBUG(3, ("get_ldap_sequence_number: Retrieved sequence "
 787                           "number for Domain (%s) from DC (%s)\n",
 788                         domain->name, ipstr));
 789         }
 790         return ret;
 791 }
 792
 793 #endif /* HAVE_LDAP */
 794
 795 /* find the sequence number for a domain */
 796 static NTSTATUS sequence_number(struct winbindd_domain *domain, uint32 *seq)
 797 {
 798         TALLOC_CTX *mem_ctx;
 799         SAM_UNK_CTR ctr;
 800         NTSTATUS result;
 801         POLICY_HND dom_pol;
 802         BOOL got_seq_num = False;
 803         struct rpc_pipe_client *cli;
 804
 805         DEBUG(10,("rpc: fetch sequence_number for %s\n", domain->name));
 806
 807         *seq = DOM_SEQUENCE_NONE;
 808
 809         if (!(mem_ctx = talloc_init("sequence_number[rpc]")))
 810                 return NT_STATUS_NO_MEMORY;
 811
 812 #ifdef HAVE_LDAP
 813         if ( domain->native_mode )
 814         {
 815                 int res;
 816
 817                 DEBUG(8,("using get_ldap_seq() to retrieve the "
 818                          "sequence number\n"));
 819
 820                 res =  get_ldap_sequence_number( domain, seq );
 821                 if (res == 0)
 822                 {
 823                         result = NT_STATUS_OK;
 824                         DEBUG(10,("domain_sequence_number: LDAP for "
 825                                   "domain %s is %u\n",
 826                                   domain->name, *seq));
 827                         goto done;
 828                 }
 829
 830                 DEBUG(10,("domain_sequence_number: failed to get LDAP "
 831                           "sequence number for domain %s\n",
 832                           domain->name ));
 833         }
 834 #endif /* HAVE_LDAP */
 835
 836         result = cm_connect_sam(domain, mem_ctx, &cli, &dom_pol);
 837         if (!NT_STATUS_IS_OK(result)) {
 838                 goto done;
 839         }
 840
 841         /* Query domain info */
 842
 843         result = rpccli_samr_query_dom_info(cli, mem_ctx, &dom_pol, 8, &ctr);
 844
 845         if (NT_STATUS_IS_OK(result)) {
 846                 *seq = ctr.info.inf8.seq_num.low;
 847                 got_seq_num = True;
 848                 goto seq_num;
 849         }
 850
 851         /* retry with info-level 2 in case the dc does not support info-level 8
 852          * (like all older samba2 and samba3 dc's - Guenther */
 853
 854         result = rpccli_samr_query_dom_info(cli, mem_ctx, &dom_pol, 2, &ctr);
 855
 856         if (NT_STATUS_IS_OK(result)) {
 857                 *seq = ctr.info.inf2.seq_num.low;
 858                 got_seq_num = True;
 859         }
 860
 861  seq_num:
 862         if (got_seq_num) {
 863                 DEBUG(10,("domain_sequence_number: for domain %s is %u\n",
 864                           domain->name, (unsigned)*seq));
 865         } else {
 866                 DEBUG(10,("domain_sequence_number: failed to get sequence "
 867                           "number (%u) for domain %s\n",
 868                           (unsigned)*seq, domain->name ));
 869         }
 870
 871   done:
 872
 873         talloc_destroy(mem_ctx);
 874
 875         return result;
 876 }
 877
 878 /* get a list of trusted domains */
 879 static NTSTATUS trusted_domains(struct winbindd_domain *domain,
 880                                 TALLOC_CTX *mem_ctx,
 881                                 uint32 *num_domains,
 882                                 char ***names,
 883                                 char ***alt_names,
 884                                 DOM_SID **dom_sids)
 885 {
 886         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
 887         uint32 enum_ctx = 0;
 888         struct rpc_pipe_client *cli;
 889         POLICY_HND lsa_policy;
 890
 891         DEBUG(3,("rpc: trusted_domains\n"));
 892
 893         *num_domains = 0;
 894         *names = NULL;
 895         *alt_names = NULL;
 896         *dom_sids = NULL;
 897
 898         result = cm_connect_lsa(domain, mem_ctx, &cli, &lsa_policy);
 899         if (!NT_STATUS_IS_OK(result))
 900                 return result;
 901
 902         result = STATUS_MORE_ENTRIES;
 903
 904         while (NT_STATUS_EQUAL(result, STATUS_MORE_ENTRIES)) {
 905                 uint32 start_idx, num;
 906                 char **tmp_names;
 907                 DOM_SID *tmp_sids;
 908                 int i;
 909
 910                 result = rpccli_lsa_enum_trust_dom(cli, mem_ctx,
 911                                                    &lsa_policy, &enum_ctx,
 912                                                    &num, &tmp_names,
 913                                                    &tmp_sids);
 914
 915                 if (!NT_STATUS_IS_OK(result) &&
 916                     !NT_STATUS_EQUAL(result, STATUS_MORE_ENTRIES))
 917                         break;
 918
 919                 start_idx = *num_domains;
 920                 *num_domains += num;
 921                 *names = TALLOC_REALLOC_ARRAY(mem_ctx, *names,
 922                                               char *, *num_domains);
 923                 *dom_sids = TALLOC_REALLOC_ARRAY(mem_ctx, *dom_sids,
 924                                                  DOM_SID, *num_domains);
 925                 *alt_names = TALLOC_REALLOC_ARRAY(mem_ctx, *alt_names,
 926                                                  char *, *num_domains);
 927                 if ((*names == NULL) || (*dom_sids == NULL) ||
 928                     (*alt_names == NULL))
 929                         return NT_STATUS_NO_MEMORY;
 930
 931                 for (i=0; i<num; i++) {
 932                         (*names)[start_idx+i] = tmp_names[i];
 933                         (*dom_sids)[start_idx+i] = tmp_sids[i];
 934                         (*alt_names)[start_idx+i] = talloc_strdup(mem_ctx, "");
 935                 }
 936         }
 937         return result;
 938 }
 939
 940 /* find the lockout policy for a domain */
 941 NTSTATUS msrpc_lockout_policy(struct winbindd_domain *domain,
 942                               TALLOC_CTX *mem_ctx,
 943                               SAM_UNK_INFO_12 *lockout_policy)
 944 {
 945         NTSTATUS result;
 946         struct rpc_pipe_client *cli;
 947         POLICY_HND dom_pol;
 948         SAM_UNK_CTR ctr;
 949
 950         DEBUG(10,("rpc: fetch lockout policy for %s\n", domain->name));
 951
 952         result = cm_connect_sam(domain, mem_ctx, &cli, &dom_pol);
 953         if (!NT_STATUS_IS_OK(result)) {
 954                 goto done;
 955         }
 956
 957         result = rpccli_samr_query_dom_info(cli, mem_ctx, &dom_pol, 12, &ctr);
 958         if (!NT_STATUS_IS_OK(result)) {
 959                 goto done;
 960         }
 961
 962         *lockout_policy = ctr.info.inf12;
 963
 964         DEBUG(10,("msrpc_lockout_policy: bad_attempt_lockout %d\n",
 965                 ctr.info.inf12.bad_attempt_lockout));
 966
 967   done:
 968
 969         return result;
 970 }
 971
 972 /* find the password policy for a domain */
 973 NTSTATUS msrpc_password_policy(struct winbindd_domain *domain,
 974                                TALLOC_CTX *mem_ctx,
 975                                SAM_UNK_INFO_1 *password_policy)
 976 {
 977         NTSTATUS result;
 978         struct rpc_pipe_client *cli;
 979         POLICY_HND dom_pol;
 980         SAM_UNK_CTR ctr;
 981
 982         DEBUG(10,("rpc: fetch password policy for %s\n", domain->name));
 983
 984         result = cm_connect_sam(domain, mem_ctx, &cli, &dom_pol);
 985         if (!NT_STATUS_IS_OK(result)) {
 986                 goto done;
 987         }
 988
 989         result = rpccli_samr_query_dom_info(cli, mem_ctx, &dom_pol, 1, &ctr);
 990         if (!NT_STATUS_IS_OK(result)) {
 991                 goto done;
 992         }
 993
 994         *password_policy = ctr.info.inf1;
 995
 996         DEBUG(10,("msrpc_password_policy: min_length_password %d\n",
 997                 ctr.info.inf1.min_length_password));
 998
 999   done:
1000
1001         return result;
1002 }
1003
1004
1005 /* the rpc backend methods are exposed via this structure */
1006 struct winbindd_methods msrpc_methods = {
1007         False,
1008         query_user_list,
1009         enum_dom_groups,
1010         enum_local_groups,
1011         msrpc_name_to_sid,
1012         msrpc_sid_to_name,
1013         msrpc_rids_to_names,
1014         query_user,
1015         lookup_usergroups,
1016         msrpc_lookup_useraliases,
1017         lookup_groupmem,
1018         sequence_number,
1019         msrpc_lockout_policy,
1020         msrpc_password_policy,
1021         trusted_domains,
1022 };