source3/winbindd/winbindd_msrpc.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    Copyright (C) Guenther Deschner 2008 (pidl conversion)
  10
  11    This program is free software; you can redistribute it and/or modify
  12    it under the terms of the GNU General Public License as published by
  13    the Free Software Foundation; either version 3 of the License, or
  14    (at your option) any later version.
  15
  16    This program is distributed in the hope that it will be useful,
  17    but WITHOUT ANY WARRANTY; without even the implied warranty of
  18    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19    GNU General Public License for more details.
  20
  21    You should have received a copy of the GNU General Public License
  22    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  23 */
  24
  25 #include "includes.h"
  26 #include "winbindd.h"
  27 #include "winbindd_rpc.h"
  28
  29 #include "../librpc/gen_ndr/cli_samr.h"
  30 #include "rpc_client/cli_samr.h"
  31 #include "../librpc/gen_ndr/cli_lsa.h"
  32 #include "rpc_client/cli_lsarpc.h"
  33
  34 #undef DBGC_CLASS
  35 #define DBGC_CLASS DBGC_WINBIND
  36
  37
  38 /* Query display info for a domain.  This returns enough information plus a
  39    bit extra to give an overview of domain users for the User Manager
  40    application. */
  41 static NTSTATUS msrpc_query_user_list(struct winbindd_domain *domain,
  42                                       TALLOC_CTX *mem_ctx,
  43                                       uint32_t *pnum_info,
  44                                       struct wbint_userinfo **pinfo)
  45 {
  46         struct rpc_pipe_client *samr_pipe = NULL;
  47         struct policy_handle dom_pol;
  48         struct wbint_userinfo *info = NULL;
  49         uint32_t num_info = 0;
  50         TALLOC_CTX *tmp_ctx;
  51         NTSTATUS status;
  52
  53         DEBUG(3,("rpc_query_user_list\n"));
  54
  55         if (pnum_info) {
  56                 *pnum_info = 0;
  57         }
  58
  59         tmp_ctx = talloc_stackframe();
  60         if (tmp_ctx == NULL) {
  61                 return NT_STATUS_NO_MEMORY;
  62         }
  63
  64         if ( !winbindd_can_contact_domain( domain ) ) {
  65                 DEBUG(10,("query_user_list: No incoming trust for domain %s\n",
  66                           domain->name));
  67                 status = NT_STATUS_OK;
  68                 goto done;
  69         }
  70
  71         status = cm_connect_sam(domain, tmp_ctx, &samr_pipe, &dom_pol);
  72         if (!NT_STATUS_IS_OK(status)) {
  73                 goto done;
  74         }
  75
  76         status = rpc_query_user_list(tmp_ctx,
  77                                      samr_pipe,
  78                                      &dom_pol,
  79                                      &domain->sid,
  80                                      &num_info,
  81                                      &info);
  82         if (!NT_STATUS_IS_OK(status)) {
  83                 goto done;
  84         }
  85
  86         if (pnum_info) {
  87                 *pnum_info = num_info;
  88         }
  89
  90         if (pinfo) {
  91                 *pinfo = talloc_move(mem_ctx, &info);
  92         }
  93
  94 done:
  95         TALLOC_FREE(tmp_ctx);
  96         return status;
  97 }
  98
  99 /* list all domain groups */
 100 static NTSTATUS msrpc_enum_dom_groups(struct winbindd_domain *domain,
 101                                       TALLOC_CTX *mem_ctx,
 102                                       uint32_t *pnum_info,
 103                                       struct acct_info **pinfo)
 104 {
 105         struct rpc_pipe_client *samr_pipe;
 106         struct policy_handle dom_pol;
 107         struct acct_info *info = NULL;
 108         uint32_t num_info = 0;
 109         TALLOC_CTX *tmp_ctx;
 110         NTSTATUS status;
 111
 112         DEBUG(3,("msrpc_enum_dom_groups\n"));
 113
 114         if (pnum_info) {
 115                 *pnum_info = 0;
 116         }
 117
 118         tmp_ctx = talloc_stackframe();
 119         if (tmp_ctx == NULL) {
 120                 return NT_STATUS_NO_MEMORY;
 121         }
 122
 123         if ( !winbindd_can_contact_domain( domain ) ) {
 124                 DEBUG(10,("enum_domain_groups: No incoming trust for domain %s\n",
 125                           domain->name));
 126                 status = NT_STATUS_OK;
 127                 goto done;
 128         }
 129
 130         status = cm_connect_sam(domain, tmp_ctx, &samr_pipe, &dom_pol);
 131         if (!NT_STATUS_IS_OK(status)) {
 132                 goto done;
 133         }
 134
 135         status = rpc_enum_dom_groups(tmp_ctx,
 136                                      samr_pipe,
 137                                      &dom_pol,
 138                                      &num_info,
 139                                      &info);
 140         if (!NT_STATUS_IS_OK(status)) {
 141                 goto done;
 142         }
 143
 144         if (pnum_info) {
 145                 *pnum_info = num_info;
 146         }
 147
 148         if (pinfo) {
 149                 *pinfo = talloc_move(mem_ctx, &info);
 150         }
 151
 152 done:
 153         TALLOC_FREE(tmp_ctx);
 154         return status;
 155 }
 156
 157 /* List all domain groups */
 158
 159 static NTSTATUS msrpc_enum_local_groups(struct winbindd_domain *domain,
 160                                         TALLOC_CTX *mem_ctx,
 161                                         uint32_t *pnum_info,
 162                                         struct acct_info **pinfo)
 163 {
 164         struct rpc_pipe_client *samr_pipe;
 165         struct policy_handle dom_pol;
 166         struct acct_info *info = NULL;
 167         uint32_t num_info = 0;
 168         TALLOC_CTX *tmp_ctx;
 169         NTSTATUS status;
 170
 171         DEBUG(3,("msrpc_enum_local_groups\n"));
 172
 173         if (pnum_info) {
 174                 *pnum_info = 0;
 175         }
 176
 177         tmp_ctx = talloc_stackframe();
 178         if (tmp_ctx == NULL) {
 179                 return NT_STATUS_NO_MEMORY;
 180         }
 181
 182         if ( !winbindd_can_contact_domain( domain ) ) {
 183                 DEBUG(10,("enum_local_groups: No incoming trust for domain %s\n",
 184                           domain->name));
 185                 status = NT_STATUS_OK;
 186                 goto done;
 187         }
 188
 189         status = cm_connect_sam(domain, tmp_ctx, &samr_pipe, &dom_pol);
 190         if (!NT_STATUS_IS_OK(status)) {
 191                 goto done;
 192         }
 193
 194         status = rpc_enum_local_groups(mem_ctx,
 195                                        samr_pipe,
 196                                        &dom_pol,
 197                                        &num_info,
 198                                        &info);
 199         if (!NT_STATUS_IS_OK(status)) {
 200                 goto done;
 201         }
 202
 203         if (pnum_info) {
 204                 *pnum_info = num_info;
 205         }
 206
 207         if (pinfo) {
 208                 *pinfo = talloc_move(mem_ctx, &info);
 209         }
 210
 211 done:
 212         TALLOC_FREE(tmp_ctx);
 213         return status;
 214 }
 215
 216 /* convert a single name to a sid in a domain */
 217 static NTSTATUS msrpc_name_to_sid(struct winbindd_domain *domain,
 218                                   TALLOC_CTX *mem_ctx,
 219                                   const char *domain_name,
 220                                   const char *name,
 221                                   uint32_t flags,
 222                                   struct dom_sid *sid,
 223                                   enum lsa_SidType *type)
 224 {
 225         NTSTATUS result;
 226         struct dom_sid *sids = NULL;
 227         enum lsa_SidType *types = NULL;
 228         char *full_name = NULL;
 229         NTSTATUS name_map_status = NT_STATUS_UNSUCCESSFUL;
 230         char *mapped_name = NULL;
 231
 232         if (name == NULL || *name=='\0') {
 233                 full_name = talloc_asprintf(mem_ctx, "%s", domain_name);
 234         } else if (domain_name == NULL || *domain_name == '\0') {
 235                 full_name = talloc_asprintf(mem_ctx, "%s", name);
 236         } else {
 237                 full_name = talloc_asprintf(mem_ctx, "%s\\%s", domain_name, name);
 238         }
 239         if (!full_name) {
 240                 DEBUG(0, ("talloc_asprintf failed!\n"));
 241                 return NT_STATUS_NO_MEMORY;
 242         }
 243
 244         DEBUG(3,("rpc: name_to_sid name=%s\n", full_name));
 245
 246         name_map_status = normalize_name_unmap(mem_ctx, full_name,
 247                                                &mapped_name);
 248
 249         /* Reset the full_name pointer if we mapped anytthing */
 250
 251         if (NT_STATUS_IS_OK(name_map_status) ||
 252             NT_STATUS_EQUAL(name_map_status, NT_STATUS_FILE_RENAMED))
 253         {
 254                 full_name = mapped_name;
 255         }
 256
 257         DEBUG(3,("name_to_sid [rpc] %s for domain %s\n",
 258                  full_name?full_name:"", domain_name ));
 259
 260         result = winbindd_lookup_names(mem_ctx, domain, 1,
 261                                        (const char **)&full_name, NULL,
 262                                        &sids, &types);
 263         if (!NT_STATUS_IS_OK(result))
 264                 return result;
 265
 266         /* Return rid and type if lookup successful */
 267
 268         sid_copy(sid, &sids[0]);
 269         *type = types[0];
 270
 271         return NT_STATUS_OK;
 272 }
 273
 274 /*
 275   convert a domain SID to a user or group name
 276 */
 277 static NTSTATUS msrpc_sid_to_name(struct winbindd_domain *domain,
 278                                   TALLOC_CTX *mem_ctx,
 279                                   const struct dom_sid *sid,
 280                                   char **domain_name,
 281                                   char **name,
 282                                   enum lsa_SidType *type)
 283 {
 284         char **domains;
 285         char **names;
 286         enum lsa_SidType *types = NULL;
 287         NTSTATUS result;
 288         NTSTATUS name_map_status = NT_STATUS_UNSUCCESSFUL;
 289         char *mapped_name = NULL;
 290
 291         DEBUG(3,("sid_to_name [rpc] %s for domain %s\n", sid_string_dbg(sid),
 292                  domain->name ));
 293
 294         result = winbindd_lookup_sids(mem_ctx,
 295                                       domain,
 296                                       1,
 297                                       sid,
 298                                       &domains,
 299                                       &names,
 300                                       &types);
 301         if (!NT_STATUS_IS_OK(result)) {
 302                 DEBUG(2,("msrpc_sid_to_name: failed to lookup sids: %s\n",
 303                         nt_errstr(result)));
 304                 return result;
 305         }
 306
 307
 308         *type = (enum lsa_SidType)types[0];
 309         *domain_name = domains[0];
 310         *name = names[0];
 311
 312         DEBUG(5,("Mapped sid to [%s]\\[%s]\n", domains[0], *name));
 313
 314         name_map_status = normalize_name_map(mem_ctx, domain, *name,
 315                                              &mapped_name);
 316         if (NT_STATUS_IS_OK(name_map_status) ||
 317             NT_STATUS_EQUAL(name_map_status, NT_STATUS_FILE_RENAMED))
 318         {
 319                 *name = mapped_name;
 320                 DEBUG(5,("returning mapped name -- %s\n", *name));
 321         }
 322
 323         return NT_STATUS_OK;
 324 }
 325
 326 static NTSTATUS msrpc_rids_to_names(struct winbindd_domain *domain,
 327                                     TALLOC_CTX *mem_ctx,
 328                                     const struct dom_sid *sid,
 329                                     uint32 *rids,
 330                                     size_t num_rids,
 331                                     char **domain_name,
 332                                     char ***names,
 333                                     enum lsa_SidType **types)
 334 {
 335         char **domains;
 336         NTSTATUS result;
 337         struct dom_sid *sids;
 338         size_t i;
 339         char **ret_names;
 340
 341         DEBUG(3, ("rids_to_names [rpc] for domain %s\n", domain->name ));
 342
 343         if (num_rids) {
 344                 sids = TALLOC_ARRAY(mem_ctx, struct dom_sid, num_rids);
 345                 if (sids == NULL) {
 346                         return NT_STATUS_NO_MEMORY;
 347                 }
 348         } else {
 349                 sids = NULL;
 350         }
 351
 352         for (i=0; i<num_rids; i++) {
 353                 if (!sid_compose(&sids[i], sid, rids[i])) {
 354                         return NT_STATUS_INTERNAL_ERROR;
 355                 }
 356         }
 357
 358         result = winbindd_lookup_sids(mem_ctx,
 359                                       domain,
 360                                       num_rids,
 361                                       sids,
 362                                       &domains,
 363                                       names,
 364                                       types);
 365
 366         if (!NT_STATUS_IS_OK(result) &&
 367             !NT_STATUS_EQUAL(result, STATUS_SOME_UNMAPPED)) {
 368                 return result;
 369         }
 370
 371         ret_names = *names;
 372         for (i=0; i<num_rids; i++) {
 373                 NTSTATUS name_map_status = NT_STATUS_UNSUCCESSFUL;
 374                 char *mapped_name = NULL;
 375
 376                 if ((*types)[i] != SID_NAME_UNKNOWN) {
 377                         name_map_status = normalize_name_map(mem_ctx,
 378                                                              domain,
 379                                                              ret_names[i],
 380                                                              &mapped_name);
 381                         if (NT_STATUS_IS_OK(name_map_status) ||
 382                             NT_STATUS_EQUAL(name_map_status, NT_STATUS_FILE_RENAMED))
 383                         {
 384                                 ret_names[i] = mapped_name;
 385                         }
 386
 387                         *domain_name = domains[i];
 388                 }
 389         }
 390
 391         return result;
 392 }
 393
 394 /* Lookup user information from a rid or username. */
 395 static NTSTATUS msrpc_query_user(struct winbindd_domain *domain,
 396                            TALLOC_CTX *mem_ctx,
 397                            const struct dom_sid *user_sid,
 398                            struct wbint_userinfo *user_info)
 399 {
 400         struct rpc_pipe_client *samr_pipe;
 401         struct policy_handle dom_pol;
 402         struct netr_SamInfo3 *user;
 403         TALLOC_CTX *tmp_ctx;
 404         NTSTATUS status;
 405
 406         DEBUG(3,("msrpc_query_user sid=%s\n", sid_string_dbg(user_sid)));
 407
 408         tmp_ctx = talloc_stackframe();
 409         if (tmp_ctx == NULL) {
 410                 return NT_STATUS_NO_MEMORY;
 411         }
 412
 413         if (user_info) {
 414                 user_info->homedir = NULL;
 415                 user_info->shell = NULL;
 416                 user_info->primary_gid = (gid_t)-1;
 417         }
 418
 419         /* try netsamlogon cache first */
 420         user = netsamlogon_cache_get(tmp_ctx, user_sid);
 421         if (user != NULL) {
 422                 DEBUG(5,("msrpc_query_user: Cache lookup succeeded for %s\n",
 423                         sid_string_dbg(user_sid)));
 424
 425                 sid_compose(&user_info->user_sid, &domain->sid, user->base.rid);
 426                 sid_compose(&user_info->group_sid, &domain->sid,
 427                             user->base.primary_gid);
 428
 429                 user_info->acct_name = talloc_strdup(user_info,
 430                                                      user->base.account_name.string);
 431                 user_info->full_name = talloc_strdup(user_info,
 432                                                      user->base.full_name.string);
 433
 434                 status = NT_STATUS_OK;
 435                 goto done;
 436         }
 437
 438         if ( !winbindd_can_contact_domain( domain ) ) {
 439                 DEBUG(10,("query_user: No incoming trust for domain %s\n",
 440                           domain->name));
 441                 goto done;
 442         }
 443
 444         /* no cache; hit the wire */
 445         status = cm_connect_sam(domain, tmp_ctx, &samr_pipe, &dom_pol);
 446         if (!NT_STATUS_IS_OK(status)) {
 447                 goto done;
 448         }
 449
 450         status = rpc_query_user(tmp_ctx,
 451                                 samr_pipe,
 452                                 &dom_pol,
 453                                 &domain->sid,
 454                                 user_sid,
 455                                 user_info);
 456
 457 done:
 458         TALLOC_FREE(tmp_ctx);
 459         return status;
 460 }
 461
 462 /* Lookup groups a user is a member of.  I wish Unix had a call like this! */
 463 static NTSTATUS msrpc_lookup_usergroups(struct winbindd_domain *domain,
 464                                         TALLOC_CTX *mem_ctx,
 465                                         const struct dom_sid *user_sid,
 466                                         uint32_t *pnum_groups,
 467                                         struct dom_sid **puser_grpsids)
 468 {
 469         struct rpc_pipe_client *samr_pipe;
 470         struct policy_handle dom_pol;
 471         struct dom_sid *user_grpsids = NULL;
 472         uint32_t num_groups = 0;
 473         TALLOC_CTX *tmp_ctx;
 474         NTSTATUS status;
 475
 476         DEBUG(3,("msrpc_lookup_usergroups sid=%s\n", sid_string_dbg(user_sid)));
 477
 478         *pnum_groups = 0;
 479
 480         tmp_ctx = talloc_stackframe();
 481         if (tmp_ctx == NULL) {
 482                 return NT_STATUS_NO_MEMORY;
 483         }
 484
 485         /* Check if we have a cached user_info_3 */
 486         status = lookup_usergroups_cached(domain,
 487                                           tmp_ctx,
 488                                           user_sid,
 489                                           &num_groups,
 490                                           &user_grpsids);
 491         if (NT_STATUS_IS_OK(status)) {
 492                 goto cached;
 493         }
 494
 495         if ( !winbindd_can_contact_domain( domain ) ) {
 496                 DEBUG(10,("lookup_usergroups: No incoming trust for domain %s\n",
 497                           domain->name));
 498
 499                 /* Tell the cache manager not to remember this one */
 500                 status = NT_STATUS_SYNCHRONIZATION_REQUIRED;
 501                 goto done;
 502         }
 503
 504         /* no cache; hit the wire */
 505         status = cm_connect_sam(domain, tmp_ctx, &samr_pipe, &dom_pol);
 506         if (!NT_STATUS_IS_OK(status)) {
 507                 goto done;
 508         }
 509
 510         status = rpc_lookup_usergroups(tmp_ctx,
 511                                        samr_pipe,
 512                                        &dom_pol,
 513                                        &domain->sid,
 514                                        user_sid,
 515                                        &num_groups,
 516                                        &user_grpsids);
 517         if (!NT_STATUS_IS_OK(status)) {
 518                 goto done;
 519         }
 520
 521 cached:
 522         if (pnum_groups) {
 523                 *pnum_groups = num_groups;
 524         }
 525
 526         if (puser_grpsids) {
 527                 *puser_grpsids = talloc_move(mem_ctx, &user_grpsids);
 528         }
 529
 530 done:
 531         TALLOC_FREE(tmp_ctx);
 532         return status;
 533         return NT_STATUS_OK;
 534 }
 535
 536 #define MAX_SAM_ENTRIES_W2K 0x400 /* 1024 */
 537
 538 static NTSTATUS msrpc_lookup_useraliases(struct winbindd_domain *domain,
 539                                          TALLOC_CTX *mem_ctx,
 540                                          uint32 num_sids, const struct dom_sid *sids,
 541                                          uint32 *pnum_aliases,
 542                                          uint32 **palias_rids)
 543 {
 544         struct rpc_pipe_client *samr_pipe;
 545         struct policy_handle dom_pol;
 546         uint32_t num_aliases = 0;
 547         uint32_t *alias_rids = NULL;
 548         TALLOC_CTX *tmp_ctx;
 549         NTSTATUS status;
 550
 551         DEBUG(3,("msrpc_lookup_useraliases\n"));
 552
 553         if (pnum_aliases) {
 554                 *pnum_aliases = 0;
 555         }
 556
 557         tmp_ctx = talloc_stackframe();
 558         if (tmp_ctx == NULL) {
 559                 return NT_STATUS_NO_MEMORY;
 560         }
 561
 562         if (!winbindd_can_contact_domain(domain)) {
 563                 DEBUG(10,("msrpc_lookup_useraliases: No incoming trust for domain %s\n",
 564                           domain->name));
 565                 goto done;
 566         }
 567
 568         status = cm_connect_sam(domain, tmp_ctx, &samr_pipe, &dom_pol);
 569         if (!NT_STATUS_IS_OK(status)) {
 570                 goto done;
 571         }
 572
 573         status = rpc_lookup_useraliases(tmp_ctx,
 574                                         samr_pipe,
 575                                         &dom_pol,
 576                                         num_sids,
 577                                         sids,
 578                                         &num_aliases,
 579                                         &alias_rids);
 580         if (!NT_STATUS_IS_OK(status)) {
 581                 goto done;
 582         }
 583
 584         if (pnum_aliases) {
 585                 *pnum_aliases = num_aliases;
 586         }
 587
 588         if (palias_rids) {
 589                 *palias_rids = talloc_move(mem_ctx, &alias_rids);
 590         }
 591
 592 done:
 593         TALLOC_FREE(tmp_ctx);
 594         return status;
 595 }
 596
 597
 598 /* Lookup group membership given a rid.   */
 599 static NTSTATUS lookup_groupmem(struct winbindd_domain *domain,
 600                                 TALLOC_CTX *mem_ctx,
 601                                 const struct dom_sid *group_sid,
 602                                 enum lsa_SidType type,
 603                                 uint32 *num_names,
 604                                 struct dom_sid **sid_mem, char ***names,
 605                                 uint32 **name_types)
 606 {
 607         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
 608         uint32 i, total_names = 0;
 609         struct policy_handle dom_pol, group_pol;
 610         uint32 des_access = SEC_FLAG_MAXIMUM_ALLOWED;
 611         uint32 *rid_mem = NULL;
 612         uint32 group_rid;
 613         unsigned int j, r;
 614         struct rpc_pipe_client *cli;
 615         unsigned int orig_timeout;
 616         struct samr_RidTypeArray *rids = NULL;
 617
 618         DEBUG(10,("rpc: lookup_groupmem %s sid=%s\n", domain->name,
 619                   sid_string_dbg(group_sid)));
 620
 621         if ( !winbindd_can_contact_domain( domain ) ) {
 622                 DEBUG(10,("lookup_groupmem: No incoming trust for domain %s\n",
 623                           domain->name));
 624                 return NT_STATUS_OK;
 625         }
 626
 627         if (!sid_peek_check_rid(&domain->sid, group_sid, &group_rid))
 628                 return NT_STATUS_UNSUCCESSFUL;
 629
 630         *num_names = 0;
 631
 632         result = cm_connect_sam(domain, mem_ctx, &cli, &dom_pol);
 633         if (!NT_STATUS_IS_OK(result))
 634                 return result;
 635
 636         result = rpccli_samr_OpenGroup(cli, mem_ctx,
 637                                        &dom_pol,
 638                                        des_access,
 639                                        group_rid,
 640                                        &group_pol);
 641
 642         if (!NT_STATUS_IS_OK(result))
 643                 return result;
 644
 645         /* Step #1: Get a list of user rids that are the members of the
 646            group. */
 647
 648         /* This call can take a long time - allow the server to time out.
 649            35 seconds should do it. */
 650
 651         orig_timeout = rpccli_set_timeout(cli, 35000);
 652
 653         result = rpccli_samr_QueryGroupMember(cli, mem_ctx,
 654                                               &group_pol,
 655                                               &rids);
 656
 657         /* And restore our original timeout. */
 658         rpccli_set_timeout(cli, orig_timeout);
 659
 660         rpccli_samr_Close(cli, mem_ctx, &group_pol);
 661
 662         if (!NT_STATUS_IS_OK(result))
 663                 return result;
 664
 665         if (!rids || !rids->count) {
 666                 names = NULL;
 667                 name_types = NULL;
 668                 sid_mem = NULL;
 669                 return NT_STATUS_OK;
 670         }
 671
 672         *num_names = rids->count;
 673         rid_mem = rids->rids;
 674
 675         /* Step #2: Convert list of rids into list of usernames.  Do this
 676            in bunches of ~1000 to avoid crashing NT4.  It looks like there
 677            is a buffer overflow or something like that lurking around
 678            somewhere. */
 679
 680 #define MAX_LOOKUP_RIDS 900
 681
 682         *names = TALLOC_ZERO_ARRAY(mem_ctx, char *, *num_names);
 683         *name_types = TALLOC_ZERO_ARRAY(mem_ctx, uint32, *num_names);
 684         *sid_mem = TALLOC_ZERO_ARRAY(mem_ctx, struct dom_sid, *num_names);
 685
 686         for (j=0;j<(*num_names);j++)
 687                 sid_compose(&(*sid_mem)[j], &domain->sid, rid_mem[j]);
 688
 689         if (*num_names>0 && (!*names || !*name_types))
 690                 return NT_STATUS_NO_MEMORY;
 691
 692         for (i = 0; i < *num_names; i += MAX_LOOKUP_RIDS) {
 693                 int num_lookup_rids = MIN(*num_names - i, MAX_LOOKUP_RIDS);
 694                 struct lsa_Strings tmp_names;
 695                 struct samr_Ids tmp_types;
 696
 697                 /* Lookup a chunk of rids */
 698
 699                 result = rpccli_samr_LookupRids(cli, mem_ctx,
 700                                                 &dom_pol,
 701                                                 num_lookup_rids,
 702                                                 &rid_mem[i],
 703                                                 &tmp_names,
 704                                                 &tmp_types);
 705
 706                 /* see if we have a real error (and yes the
 707                    STATUS_SOME_UNMAPPED is the one returned from 2k) */
 708
 709                 if (!NT_STATUS_IS_OK(result) &&
 710                     !NT_STATUS_EQUAL(result, STATUS_SOME_UNMAPPED))
 711                         return result;
 712
 713                 /* Copy result into array.  The talloc system will take
 714                    care of freeing the temporary arrays later on. */
 715
 716                 if (tmp_names.count != tmp_types.count) {
 717                         return NT_STATUS_UNSUCCESSFUL;
 718                 }
 719
 720                 for (r=0; r<tmp_names.count; r++) {
 721                         if (tmp_types.ids[r] == SID_NAME_UNKNOWN) {
 722                                 continue;
 723                         }
 724                         (*names)[total_names] = fill_domain_username_talloc(
 725                                 mem_ctx, domain->name,
 726                                 tmp_names.names[r].string, true);
 727                         (*name_types)[total_names] = tmp_types.ids[r];
 728                         total_names += 1;
 729                 }
 730         }
 731
 732         *num_names = total_names;
 733
 734         return NT_STATUS_OK;
 735 }
 736
 737 #ifdef HAVE_LDAP
 738
 739 #include <ldap.h>
 740
 741 static int get_ldap_seq(const char *server, int port, uint32 *seq)
 742 {
 743         int ret = -1;
 744         struct timeval to;
 745         const char *attrs[] = {"highestCommittedUSN", NULL};
 746         LDAPMessage *res = NULL;
 747         char **values = NULL;
 748         LDAP *ldp = NULL;
 749
 750         *seq = DOM_SEQUENCE_NONE;
 751
 752         /*
 753          * Parameterised (5) second timeout on open. This is needed as the
 754          * search timeout doesn't seem to apply to doing an open as well. JRA.
 755          */
 756
 757         ldp = ldap_open_with_timeout(server, port, lp_ldap_timeout());
 758         if (ldp == NULL)
 759                 return -1;
 760
 761         /* Timeout if no response within 20 seconds. */
 762         to.tv_sec = 10;
 763         to.tv_usec = 0;
 764
 765         if (ldap_search_st(ldp, "", LDAP_SCOPE_BASE, "(objectclass=*)",
 766                            CONST_DISCARD(char **, attrs), 0, &to, &res))
 767                 goto done;
 768
 769         if (ldap_count_entries(ldp, res) != 1)
 770                 goto done;
 771
 772         values = ldap_get_values(ldp, res, "highestCommittedUSN");
 773         if (!values || !values[0])
 774                 goto done;
 775
 776         *seq = atoi(values[0]);
 777         ret = 0;
 778
 779   done:
 780
 781         if (values)
 782                 ldap_value_free(values);
 783         if (res)
 784                 ldap_msgfree(res);
 785         if (ldp)
 786                 ldap_unbind(ldp);
 787         return ret;
 788 }
 789
 790 /**********************************************************************
 791  Get the sequence number for a Windows AD native mode domain using
 792  LDAP queries.
 793 **********************************************************************/
 794
 795 static int get_ldap_sequence_number(struct winbindd_domain *domain, uint32 *seq)
 796 {
 797         int ret = -1;
 798         char addr[INET6_ADDRSTRLEN];
 799
 800         print_sockaddr(addr, sizeof(addr), &domain->dcaddr);
 801         if ((ret = get_ldap_seq(addr, LDAP_PORT, seq)) == 0) {
 802                 DEBUG(3, ("get_ldap_sequence_number: Retrieved sequence "
 803                           "number for Domain (%s) from DC (%s)\n",
 804                         domain->name, addr));
 805         }
 806         return ret;
 807 }
 808
 809 #endif /* HAVE_LDAP */
 810
 811 /* find the sequence number for a domain */
 812 static NTSTATUS sequence_number(struct winbindd_domain *domain, uint32 *seq)
 813 {
 814         TALLOC_CTX *mem_ctx;
 815         union samr_DomainInfo *info = NULL;
 816         NTSTATUS result;
 817         struct policy_handle dom_pol;
 818         bool got_seq_num = False;
 819         struct rpc_pipe_client *cli;
 820
 821         DEBUG(10,("rpc: fetch sequence_number for %s\n", domain->name));
 822
 823         if ( !winbindd_can_contact_domain( domain ) ) {
 824                 DEBUG(10,("sequence_number: No incoming trust for domain %s\n",
 825                           domain->name));
 826                 *seq = time(NULL);
 827                 return NT_STATUS_OK;
 828         }
 829
 830         *seq = DOM_SEQUENCE_NONE;
 831
 832         if (!(mem_ctx = talloc_init("sequence_number[rpc]")))
 833                 return NT_STATUS_NO_MEMORY;
 834
 835 #ifdef HAVE_LDAP
 836         if ( domain->active_directory )
 837         {
 838                 int res;
 839
 840                 DEBUG(8,("using get_ldap_seq() to retrieve the "
 841                          "sequence number\n"));
 842
 843                 res =  get_ldap_sequence_number( domain, seq );
 844                 if (res == 0)
 845                 {
 846                         result = NT_STATUS_OK;
 847                         DEBUG(10,("domain_sequence_number: LDAP for "
 848                                   "domain %s is %u\n",
 849                                   domain->name, *seq));
 850                         goto done;
 851                 }
 852
 853                 DEBUG(10,("domain_sequence_number: failed to get LDAP "
 854                           "sequence number for domain %s\n",
 855                           domain->name ));
 856         }
 857 #endif /* HAVE_LDAP */
 858
 859         result = cm_connect_sam(domain, mem_ctx, &cli, &dom_pol);
 860         if (!NT_STATUS_IS_OK(result)) {
 861                 goto done;
 862         }
 863
 864         /* Query domain info */
 865
 866         result = rpccli_samr_QueryDomainInfo(cli, mem_ctx,
 867                                              &dom_pol,
 868                                              8,
 869                                              &info);
 870
 871         if (NT_STATUS_IS_OK(result)) {
 872                 *seq = info->info8.sequence_num;
 873                 got_seq_num = True;
 874                 goto seq_num;
 875         }
 876
 877         /* retry with info-level 2 in case the dc does not support info-level 8
 878          * (like all older samba2 and samba3 dc's) - Guenther */
 879
 880         result = rpccli_samr_QueryDomainInfo(cli, mem_ctx,
 881                                              &dom_pol,
 882                                              2,
 883                                              &info);
 884
 885         if (NT_STATUS_IS_OK(result)) {
 886                 *seq = info->general.sequence_num;
 887                 got_seq_num = True;
 888         }
 889
 890  seq_num:
 891         if (got_seq_num) {
 892                 DEBUG(10,("domain_sequence_number: for domain %s is %u\n",
 893                           domain->name, (unsigned)*seq));
 894         } else {
 895                 DEBUG(10,("domain_sequence_number: failed to get sequence "
 896                           "number (%u) for domain %s\n",
 897                           (unsigned)*seq, domain->name ));
 898         }
 899
 900   done:
 901
 902         talloc_destroy(mem_ctx);
 903
 904         return result;
 905 }
 906
 907 /* get a list of trusted domains */
 908 static NTSTATUS trusted_domains(struct winbindd_domain *domain,
 909                                 TALLOC_CTX *mem_ctx,
 910                                 struct netr_DomainTrustList *trusts)
 911 {
 912         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
 913         uint32 enum_ctx = 0;
 914         struct rpc_pipe_client *cli;
 915         struct policy_handle lsa_policy;
 916
 917         DEBUG(3,("rpc: trusted_domains\n"));
 918
 919         ZERO_STRUCTP(trusts);
 920
 921         result = cm_connect_lsa(domain, mem_ctx, &cli, &lsa_policy);
 922         if (!NT_STATUS_IS_OK(result))
 923                 return result;
 924
 925         result = STATUS_MORE_ENTRIES;
 926
 927         while (NT_STATUS_EQUAL(result, STATUS_MORE_ENTRIES)) {
 928                 uint32 start_idx;
 929                 int i;
 930                 struct lsa_DomainList dom_list;
 931
 932                 result = rpccli_lsa_EnumTrustDom(cli, mem_ctx,
 933                                                  &lsa_policy,
 934                                                  &enum_ctx,
 935                                                  &dom_list,
 936                                                  (uint32_t)-1);
 937
 938                 if (!NT_STATUS_IS_OK(result) &&
 939                     !NT_STATUS_EQUAL(result, STATUS_MORE_ENTRIES))
 940                         break;
 941
 942                 start_idx = trusts->count;
 943                 trusts->count += dom_list.count;
 944
 945                 trusts->array = talloc_realloc(
 946                         mem_ctx, trusts->array, struct netr_DomainTrust,
 947                         trusts->count);
 948                 if (trusts->array == NULL) {
 949                         return NT_STATUS_NO_MEMORY;
 950                 }
 951
 952                 for (i=0; i<dom_list.count; i++) {
 953                         struct netr_DomainTrust *trust = &trusts->array[i];
 954                         struct dom_sid *sid;
 955
 956                         ZERO_STRUCTP(trust);
 957
 958                         trust->netbios_name = talloc_move(
 959                                 trusts->array,
 960                                 &dom_list.domains[i].name.string);
 961                         trust->dns_name = NULL;
 962
 963                         sid = talloc(trusts->array, struct dom_sid);
 964                         if (sid == NULL) {
 965                                 return NT_STATUS_NO_MEMORY;
 966                         }
 967                         sid_copy(sid, dom_list.domains[i].sid);
 968                         trust->sid = sid;
 969                 }
 970         }
 971         return result;
 972 }
 973
 974 /* find the lockout policy for a domain */
 975 static NTSTATUS msrpc_lockout_policy(struct winbindd_domain *domain,
 976                                      TALLOC_CTX *mem_ctx,
 977                                      struct samr_DomInfo12 *lockout_policy)
 978 {
 979         NTSTATUS result;
 980         struct rpc_pipe_client *cli;
 981         struct policy_handle dom_pol;
 982         union samr_DomainInfo *info = NULL;
 983
 984         DEBUG(10,("rpc: fetch lockout policy for %s\n", domain->name));
 985
 986         if ( !winbindd_can_contact_domain( domain ) ) {
 987                 DEBUG(10,("msrpc_lockout_policy: No incoming trust for domain %s\n",
 988                           domain->name));
 989                 return NT_STATUS_NOT_SUPPORTED;
 990         }
 991
 992         result = cm_connect_sam(domain, mem_ctx, &cli, &dom_pol);
 993         if (!NT_STATUS_IS_OK(result)) {
 994                 goto done;
 995         }
 996
 997         result = rpccli_samr_QueryDomainInfo(cli, mem_ctx,
 998                                              &dom_pol,
 999                                              12,
1000                                              &info);
1001         if (!NT_STATUS_IS_OK(result)) {
1002                 goto done;
1003         }
1004
1005         *lockout_policy = info->info12;
1006
1007         DEBUG(10,("msrpc_lockout_policy: lockout_threshold %d\n",
1008                 info->info12.lockout_threshold));
1009
1010   done:
1011
1012         return result;
1013 }
1014
1015 /* find the password policy for a domain */
1016 static NTSTATUS msrpc_password_policy(struct winbindd_domain *domain,
1017                                       TALLOC_CTX *mem_ctx,
1018                                       struct samr_DomInfo1 *password_policy)
1019 {
1020         NTSTATUS result;
1021         struct rpc_pipe_client *cli;
1022         struct policy_handle dom_pol;
1023         union samr_DomainInfo *info = NULL;
1024
1025         DEBUG(10,("rpc: fetch password policy for %s\n", domain->name));
1026
1027         if ( !winbindd_can_contact_domain( domain ) ) {
1028                 DEBUG(10,("msrpc_password_policy: No incoming trust for domain %s\n",
1029                           domain->name));
1030                 return NT_STATUS_NOT_SUPPORTED;
1031         }
1032
1033         result = cm_connect_sam(domain, mem_ctx, &cli, &dom_pol);
1034         if (!NT_STATUS_IS_OK(result)) {
1035                 goto done;
1036         }
1037
1038         result = rpccli_samr_QueryDomainInfo(cli, mem_ctx,
1039                                              &dom_pol,
1040                                              1,
1041                                              &info);
1042         if (!NT_STATUS_IS_OK(result)) {
1043                 goto done;
1044         }
1045
1046         *password_policy = info->info1;
1047
1048         DEBUG(10,("msrpc_password_policy: min_length_password %d\n",
1049                 info->info1.min_password_length));
1050
1051   done:
1052
1053         return result;
1054 }
1055
1056 typedef NTSTATUS (*lookup_sids_fn_t)(struct rpc_pipe_client *cli,
1057                                      TALLOC_CTX *mem_ctx,
1058                                      struct policy_handle *pol,
1059                                      int num_sids,
1060                                      const struct dom_sid *sids,
1061                                      char ***pdomains,
1062                                      char ***pnames,
1063                                      enum lsa_SidType **ptypes);
1064
1065 NTSTATUS winbindd_lookup_sids(TALLOC_CTX *mem_ctx,
1066                               struct winbindd_domain *domain,
1067                               uint32_t num_sids,
1068                               const struct dom_sid *sids,
1069                               char ***domains,
1070                               char ***names,
1071                               enum lsa_SidType **types)
1072 {
1073         NTSTATUS status;
1074         struct rpc_pipe_client *cli = NULL;
1075         struct policy_handle lsa_policy;
1076         unsigned int orig_timeout;
1077         lookup_sids_fn_t lookup_sids_fn = rpccli_lsa_lookup_sids;
1078
1079         if (domain->can_do_ncacn_ip_tcp) {
1080                 status = cm_connect_lsa_tcp(domain, mem_ctx, &cli);
1081                 if (NT_STATUS_IS_OK(status)) {
1082                         lookup_sids_fn = rpccli_lsa_lookup_sids3;
1083                         goto lookup;
1084                 }
1085                 domain->can_do_ncacn_ip_tcp = false;
1086         }
1087         status = cm_connect_lsa(domain, mem_ctx, &cli, &lsa_policy);
1088
1089         if (!NT_STATUS_IS_OK(status)) {
1090                 return status;
1091         }
1092
1093  lookup:
1094         /*
1095          * This call can take a long time
1096          * allow the server to time out.
1097          * 35 seconds should do it.
1098          */
1099         orig_timeout = rpccli_set_timeout(cli, 35000);
1100
1101         status = lookup_sids_fn(cli,
1102                                 mem_ctx,
1103                                 &lsa_policy,
1104                                 num_sids,
1105                                 sids,
1106                                 domains,
1107                                 names,
1108                                 types);
1109
1110         /* And restore our original timeout. */
1111         rpccli_set_timeout(cli, orig_timeout);
1112
1113         if (!NT_STATUS_IS_OK(status)) {
1114                 return status;
1115         }
1116
1117         return status;
1118 }
1119
1120 typedef NTSTATUS (*lookup_names_fn_t)(struct rpc_pipe_client *cli,
1121                                       TALLOC_CTX *mem_ctx,
1122                                       struct policy_handle *pol,
1123                                       int num_names,
1124                                       const char **names,
1125                                       const char ***dom_names,
1126                                       int level,
1127                                       struct dom_sid **sids,
1128                                       enum lsa_SidType **types);
1129
1130 NTSTATUS winbindd_lookup_names(TALLOC_CTX *mem_ctx,
1131                                struct winbindd_domain *domain,
1132                                uint32_t num_names,
1133                                const char **names,
1134                                const char ***domains,
1135                                struct dom_sid **sids,
1136                                enum lsa_SidType **types)
1137 {
1138         NTSTATUS status;
1139         struct rpc_pipe_client *cli = NULL;
1140         struct policy_handle lsa_policy;
1141         unsigned int orig_timeout = 0;
1142         lookup_names_fn_t lookup_names_fn = rpccli_lsa_lookup_names;
1143
1144         if (domain->can_do_ncacn_ip_tcp) {
1145                 status = cm_connect_lsa_tcp(domain, mem_ctx, &cli);
1146                 if (NT_STATUS_IS_OK(status)) {
1147                         lookup_names_fn = rpccli_lsa_lookup_names4;
1148                         goto lookup;
1149                 }
1150                 domain->can_do_ncacn_ip_tcp = false;
1151         }
1152         status = cm_connect_lsa(domain, mem_ctx, &cli, &lsa_policy);
1153
1154         if (!NT_STATUS_IS_OK(status)) {
1155                 return status;
1156         }
1157
1158  lookup:
1159
1160         /*
1161          * This call can take a long time
1162          * allow the server to time out.
1163          * 35 seconds should do it.
1164          */
1165         orig_timeout = rpccli_set_timeout(cli, 35000);
1166
1167         status = lookup_names_fn(cli,
1168                                  mem_ctx,
1169                                  &lsa_policy,
1170                                  num_names,
1171                                  (const char **) names,
1172                                  domains,
1173                                  1,
1174                                  sids,
1175                                  types);
1176
1177         /* And restore our original timeout. */
1178         rpccli_set_timeout(cli, orig_timeout);
1179
1180         if (!NT_STATUS_IS_OK(status)) {
1181                 return status;
1182         }
1183
1184         return status;
1185 }
1186
1187 /* the rpc backend methods are exposed via this structure */
1188 struct winbindd_methods msrpc_methods = {
1189         False,
1190         msrpc_query_user_list,
1191         msrpc_enum_dom_groups,
1192         msrpc_enum_local_groups,
1193         msrpc_name_to_sid,
1194         msrpc_sid_to_name,
1195         msrpc_rids_to_names,
1196         msrpc_query_user,
1197         msrpc_lookup_usergroups,
1198         msrpc_lookup_useraliases,
1199         lookup_groupmem,
1200         sequence_number,
1201         msrpc_lockout_policy,
1202         msrpc_password_policy,
1203         trusted_domains,
1204 };