source3/rpc_client/cli_lsarpc.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    RPC pipe client
   4    Copyright (C) Tim Potter                        2000-2001,
   5    Copyright (C) Andrew Tridgell              1992-1997,2000,
   6    Copyright (C) Rafal Szczesniak                       2002
   7    Copyright (C) Jeremy Allison                         2005.
   8    Copyright (C) Michael Adam                           2007.
   9    Copyright (C) Guenther Deschner                      2008.
  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
  27 /** @defgroup lsa LSA - Local Security Architecture
  28  *  @ingroup rpc_client
  29  *
  30  * @{
  31  **/
  32
  33 /**
  34  * @file cli_lsarpc.c
  35  *
  36  * RPC client routines for the LSA RPC pipe.  LSA means "local
  37  * security authority", which is half of a password database.
  38  **/
  39
  40 /** Open a LSA policy handle
  41  *
  42  * @param cli Handle on an initialised SMB connection */
  43
  44 NTSTATUS rpccli_lsa_open_policy(struct rpc_pipe_client *cli,
  45                                 TALLOC_CTX *mem_ctx,
  46                                 bool sec_qos, uint32 des_access,
  47                                 POLICY_HND *pol)
  48 {
  49         struct lsa_ObjectAttribute attr;
  50         struct lsa_QosInfo qos;
  51         uint16_t system_name = '\\';
  52
  53         if (sec_qos) {
  54                 init_lsa_sec_qos(&qos, 0xc, 2, 1, 0);
  55                 init_lsa_obj_attr(&attr,
  56                                   0x18,
  57                                   NULL,
  58                                   NULL,
  59                                   0,
  60                                   NULL,
  61                                   &qos);
  62         } else {
  63                 init_lsa_obj_attr(&attr,
  64                                   0x18,
  65                                   NULL,
  66                                   NULL,
  67                                   0,
  68                                   NULL,
  69                                   NULL);
  70         }
  71
  72         return rpccli_lsa_OpenPolicy(cli, mem_ctx,
  73                                      &system_name,
  74                                      &attr,
  75                                      des_access,
  76                                      pol);
  77 }
  78
  79 /** Open a LSA policy handle
  80   *
  81   * @param cli Handle on an initialised SMB connection
  82   */
  83
  84 NTSTATUS rpccli_lsa_open_policy2(struct rpc_pipe_client *cli,
  85                                  TALLOC_CTX *mem_ctx, bool sec_qos,
  86                                  uint32 des_access, POLICY_HND *pol)
  87 {
  88         struct lsa_ObjectAttribute attr;
  89         struct lsa_QosInfo qos;
  90         char *srv_name_slash = talloc_asprintf(mem_ctx, "\\\\%s", cli->cli->desthost);
  91
  92         if (sec_qos) {
  93                 init_lsa_sec_qos(&qos, 0xc, 2, 1, 0);
  94                 init_lsa_obj_attr(&attr,
  95                                   0x18,
  96                                   NULL,
  97                                   NULL,
  98                                   0,
  99                                   NULL,
 100                                   &qos);
 101         } else {
 102                 init_lsa_obj_attr(&attr,
 103                                   0x18,
 104                                   NULL,
 105                                   NULL,
 106                                   0,
 107                                   NULL,
 108                                   NULL);
 109         }
 110
 111         return rpccli_lsa_OpenPolicy2(cli, mem_ctx,
 112                                       srv_name_slash,
 113                                       &attr,
 114                                       des_access,
 115                                       pol);
 116 }
 117
 118 /* Lookup a list of sids
 119  *
 120  * internal version withOUT memory allocation of the target arrays.
 121  * this assumes suffciently sized arrays to store domains, names and types. */
 122
 123 static NTSTATUS rpccli_lsa_lookup_sids_noalloc(struct rpc_pipe_client *cli,
 124                                                TALLOC_CTX *mem_ctx,
 125                                                POLICY_HND *pol,
 126                                                int num_sids,
 127                                                const DOM_SID *sids,
 128                                                char **domains,
 129                                                char **names,
 130                                                enum lsa_SidType *types)
 131 {
 132         NTSTATUS result = NT_STATUS_OK;
 133         TALLOC_CTX *tmp_ctx = NULL;
 134         int i;
 135         struct lsa_SidArray sid_array;
 136         struct lsa_RefDomainList *ref_domains = NULL;
 137         struct lsa_TransNameArray lsa_names;
 138         uint32_t count = 0;
 139         uint16_t level = 1;
 140
 141         ZERO_STRUCT(lsa_names);
 142
 143         tmp_ctx = talloc_new(mem_ctx);
 144         if (!tmp_ctx) {
 145                 DEBUG(0, ("rpccli_lsa_lookup_sids_noalloc: out of memory!\n"));
 146                 result = NT_STATUS_UNSUCCESSFUL;
 147                 goto done;
 148         }
 149
 150         sid_array.num_sids = num_sids;
 151         sid_array.sids = TALLOC_ARRAY(mem_ctx, struct lsa_SidPtr, num_sids);
 152         if (!sid_array.sids) {
 153                 return NT_STATUS_NO_MEMORY;
 154         }
 155
 156         for (i = 0; i<num_sids; i++) {
 157                 sid_array.sids[i].sid = sid_dup_talloc(mem_ctx, &sids[i]);
 158                 if (!sid_array.sids[i].sid) {
 159                         return NT_STATUS_NO_MEMORY;
 160                 }
 161         }
 162
 163         result = rpccli_lsa_LookupSids(cli, mem_ctx,
 164                                        pol,
 165                                        &sid_array,
 166                                        &ref_domains,
 167                                        &lsa_names,
 168                                        level,
 169                                        &count);
 170
 171         DEBUG(10, ("LSA_LOOKUPSIDS returned '%s', mapped count = %d'\n",
 172                    nt_errstr(result), count));
 173
 174         if (!NT_STATUS_IS_OK(result) &&
 175             !NT_STATUS_EQUAL(result, NT_STATUS_NONE_MAPPED) &&
 176             !NT_STATUS_EQUAL(result, STATUS_SOME_UNMAPPED))
 177         {
 178                 /* An actual error occured */
 179                 goto done;
 180         }
 181
 182         /* Return output parameters */
 183
 184         if (NT_STATUS_EQUAL(result, NT_STATUS_NONE_MAPPED) ||
 185             (count == 0))
 186         {
 187                 for (i = 0; i < num_sids; i++) {
 188                         (names)[i] = NULL;
 189                         (domains)[i] = NULL;
 190                         (types)[i] = SID_NAME_UNKNOWN;
 191                 }
 192                 result = NT_STATUS_NONE_MAPPED;
 193                 goto done;
 194         }
 195
 196         for (i = 0; i < num_sids; i++) {
 197                 const char *name, *dom_name;
 198                 uint32_t dom_idx = lsa_names.names[i].sid_index;
 199
 200                 /* Translate optimised name through domain index array */
 201
 202                 if (dom_idx != 0xffffffff) {
 203
 204                         dom_name = ref_domains->domains[dom_idx].name.string;
 205                         name = lsa_names.names[i].name.string;
 206
 207                         (names)[i] = talloc_strdup(mem_ctx, name);
 208                         (domains)[i] = talloc_strdup(mem_ctx, dom_name);
 209                         (types)[i] = lsa_names.names[i].sid_type;
 210
 211                         if (((names)[i] == NULL) || ((domains)[i] == NULL)) {
 212                                 DEBUG(0, ("cli_lsa_lookup_sids_noalloc(): out of memory\n"));
 213                                 result = NT_STATUS_UNSUCCESSFUL;
 214                                 goto done;
 215                         }
 216
 217                 } else {
 218                         (names)[i] = NULL;
 219                         (domains)[i] = NULL;
 220                         (types)[i] = SID_NAME_UNKNOWN;
 221                 }
 222         }
 223
 224 done:
 225         TALLOC_FREE(tmp_ctx);
 226         return result;
 227 }
 228
 229 /* Lookup a list of sids
 230  *
 231  * do it the right way: there is a limit (of 20480 for w2k3) entries
 232  * returned by this call. when the sids list contains more entries,
 233  * empty lists are returned. This version of lsa_lookup_sids passes
 234  * the list of sids in hunks of LOOKUP_SIDS_HUNK_SIZE to the lsa call. */
 235
 236 /* This constant defines the limit of how many sids to look up
 237  * in one call (maximum). the limit from the server side is
 238  * at 20480 for win2k3, but we keep it at a save 1000 for now. */
 239 #define LOOKUP_SIDS_HUNK_SIZE 1000
 240
 241 NTSTATUS rpccli_lsa_lookup_sids(struct rpc_pipe_client *cli,
 242                                 TALLOC_CTX *mem_ctx,
 243                                 POLICY_HND *pol,
 244                                 int num_sids,
 245                                 const DOM_SID *sids,
 246                                 char ***domains,
 247                                 char ***names,
 248                                 enum lsa_SidType **types)
 249 {
 250         NTSTATUS result = NT_STATUS_OK;
 251         int sids_left = 0;
 252         int sids_processed = 0;
 253         const DOM_SID *hunk_sids = sids;
 254         char **hunk_domains = NULL;
 255         char **hunk_names = NULL;
 256         enum lsa_SidType *hunk_types = NULL;
 257
 258         if (num_sids) {
 259                 if (!((*domains) = TALLOC_ARRAY(mem_ctx, char *, num_sids))) {
 260                         DEBUG(0, ("rpccli_lsa_lookup_sids(): out of memory\n"));
 261                         result = NT_STATUS_NO_MEMORY;
 262                         goto fail;
 263                 }
 264
 265                 if (!((*names) = TALLOC_ARRAY(mem_ctx, char *, num_sids))) {
 266                         DEBUG(0, ("rpccli_lsa_lookup_sids(): out of memory\n"));
 267                         result = NT_STATUS_NO_MEMORY;
 268                         goto fail;
 269                 }
 270
 271                 if (!((*types) = TALLOC_ARRAY(mem_ctx, enum lsa_SidType, num_sids))) {
 272                         DEBUG(0, ("rpccli_lsa_lookup_sids(): out of memory\n"));
 273                         result = NT_STATUS_NO_MEMORY;
 274                         goto fail;
 275                 }
 276         } else {
 277                 (*domains) = NULL;
 278                 (*names) = NULL;
 279                 (*types) = NULL;
 280         }
 281
 282         sids_left = num_sids;
 283         hunk_domains = *domains;
 284         hunk_names = *names;
 285         hunk_types = *types;
 286
 287         while (sids_left > 0) {
 288                 int hunk_num_sids;
 289                 NTSTATUS hunk_result = NT_STATUS_OK;
 290
 291                 hunk_num_sids = ((sids_left > LOOKUP_SIDS_HUNK_SIZE)
 292                                 ? LOOKUP_SIDS_HUNK_SIZE
 293                                 : sids_left);
 294
 295                 DEBUG(10, ("rpccli_lsa_lookup_sids: processing items "
 296                            "%d -- %d of %d.\n",
 297                            sids_processed,
 298                            sids_processed + hunk_num_sids - 1,
 299                            num_sids));
 300
 301                 hunk_result = rpccli_lsa_lookup_sids_noalloc(cli,
 302                                                              mem_ctx,
 303                                                              pol,
 304                                                              hunk_num_sids,
 305                                                              hunk_sids,
 306                                                              hunk_domains,
 307                                                              hunk_names,
 308                                                              hunk_types);
 309
 310                 if (!NT_STATUS_IS_OK(hunk_result) &&
 311                     !NT_STATUS_EQUAL(hunk_result, STATUS_SOME_UNMAPPED) &&
 312                     !NT_STATUS_EQUAL(hunk_result, NT_STATUS_NONE_MAPPED))
 313                 {
 314                         /* An actual error occured */
 315                         result = hunk_result;
 316                         goto fail;
 317                 }
 318
 319                 /* adapt overall result */
 320                 if (( NT_STATUS_IS_OK(result) &&
 321                      !NT_STATUS_IS_OK(hunk_result))
 322                     ||
 323                     ( NT_STATUS_EQUAL(result, NT_STATUS_NONE_MAPPED) &&
 324                      !NT_STATUS_EQUAL(hunk_result, NT_STATUS_NONE_MAPPED)))
 325                 {
 326                         result = STATUS_SOME_UNMAPPED;
 327                 }
 328
 329                 sids_left -= hunk_num_sids;
 330                 sids_processed += hunk_num_sids; /* only used in DEBUG */
 331                 hunk_sids += hunk_num_sids;
 332                 hunk_domains += hunk_num_sids;
 333                 hunk_names += hunk_num_sids;
 334                 hunk_types += hunk_num_sids;
 335         }
 336
 337         return result;
 338
 339 fail:
 340         TALLOC_FREE(*domains);
 341         TALLOC_FREE(*names);
 342         TALLOC_FREE(*types);
 343         return result;
 344 }
 345
 346 /** Lookup a list of names */
 347
 348 NTSTATUS rpccli_lsa_lookup_names(struct rpc_pipe_client *cli,
 349                                  TALLOC_CTX *mem_ctx,
 350                                  POLICY_HND *pol, int num_names,
 351                                  const char **names,
 352                                  const char ***dom_names,
 353                                  int level,
 354                                  DOM_SID **sids,
 355                                  enum lsa_SidType **types)
 356 {
 357         NTSTATUS result;
 358         int i;
 359         struct lsa_String *lsa_names = NULL;
 360         struct lsa_RefDomainList *domains = NULL;
 361         struct lsa_TransSidArray sid_array;
 362         uint32_t count = 0;
 363
 364         ZERO_STRUCT(sid_array);
 365
 366         lsa_names = TALLOC_ARRAY(mem_ctx, struct lsa_String, num_names);
 367         if (!lsa_names) {
 368                 return NT_STATUS_NO_MEMORY;
 369         }
 370
 371         for (i=0; i<num_names; i++) {
 372                 init_lsa_String(&lsa_names[i], names[i]);
 373         }
 374
 375         result = rpccli_lsa_LookupNames(cli, mem_ctx,
 376                                         pol,
 377                                         num_names,
 378                                         lsa_names,
 379                                         &domains,
 380                                         &sid_array,
 381                                         level,
 382                                         &count);
 383
 384         if (!NT_STATUS_IS_OK(result) && NT_STATUS_V(result) !=
 385             NT_STATUS_V(STATUS_SOME_UNMAPPED)) {
 386
 387                 /* An actual error occured */
 388
 389                 goto done;
 390         }
 391
 392         /* Return output parameters */
 393
 394         if (count == 0) {
 395                 result = NT_STATUS_NONE_MAPPED;
 396                 goto done;
 397         }
 398
 399         if (num_names) {
 400                 if (!((*sids = TALLOC_ARRAY(mem_ctx, DOM_SID, num_names)))) {
 401                         DEBUG(0, ("cli_lsa_lookup_sids(): out of memory\n"));
 402                         result = NT_STATUS_NO_MEMORY;
 403                         goto done;
 404                 }
 405
 406                 if (!((*types = TALLOC_ARRAY(mem_ctx, enum lsa_SidType, num_names)))) {
 407                         DEBUG(0, ("cli_lsa_lookup_sids(): out of memory\n"));
 408                         result = NT_STATUS_NO_MEMORY;
 409                         goto done;
 410                 }
 411
 412                 if (dom_names != NULL) {
 413                         *dom_names = TALLOC_ARRAY(mem_ctx, const char *, num_names);
 414                         if (*dom_names == NULL) {
 415                                 DEBUG(0, ("cli_lsa_lookup_sids(): out of memory\n"));
 416                                 result = NT_STATUS_NO_MEMORY;
 417                                 goto done;
 418                         }
 419                 }
 420         } else {
 421                 *sids = NULL;
 422                 *types = NULL;
 423                 if (dom_names != NULL) {
 424                         *dom_names = NULL;
 425                 }
 426         }
 427
 428         for (i = 0; i < num_names; i++) {
 429                 uint32_t dom_idx = sid_array.sids[i].sid_index;
 430                 uint32_t dom_rid = sid_array.sids[i].rid;
 431                 DOM_SID *sid = &(*sids)[i];
 432
 433                 /* Translate optimised sid through domain index array */
 434
 435                 if (dom_idx == 0xffffffff) {
 436                         /* Nothing to do, this is unknown */
 437                         ZERO_STRUCTP(sid);
 438                         (*types)[i] = SID_NAME_UNKNOWN;
 439                         continue;
 440                 }
 441
 442                 sid_copy(sid, domains->domains[dom_idx].sid);
 443
 444                 if (dom_rid != 0xffffffff) {
 445                         sid_append_rid(sid, dom_rid);
 446                 }
 447
 448                 (*types)[i] = sid_array.sids[i].sid_type;
 449
 450                 if (dom_names == NULL) {
 451                         continue;
 452                 }
 453
 454                 (*dom_names)[i] = domains->domains[dom_idx].name.string;
 455         }
 456
 457  done:
 458
 459         return result;
 460 }
 461
 462 #if 0
 463
 464 /** An example of how to use the routines in this file.  Fetch a DOMAIN
 465     sid. Does complete cli setup / teardown anonymously. */
 466
 467 bool fetch_domain_sid( char *domain, char *remote_machine, DOM_SID *psid)
 468 {
 469         struct cli_state cli;
 470         NTSTATUS result;
 471         POLICY_HND lsa_pol;
 472         bool ret = False;
 473
 474         ZERO_STRUCT(cli);
 475         if(cli_initialise(&cli) == False) {
 476                 DEBUG(0,("fetch_domain_sid: unable to initialize client connection.\n"));
 477                 return False;
 478         }
 479
 480         if(!resolve_name( remote_machine, &cli.dest_ip, 0x20)) {
 481                 DEBUG(0,("fetch_domain_sid: Can't resolve address for %s\n", remote_machine));
 482                 goto done;
 483         }
 484
 485         if (!cli_connect(&cli, remote_machine, &cli.dest_ip)) {
 486                 DEBUG(0,("fetch_domain_sid: unable to connect to SMB server on \
 487 machine %s. Error was : %s.\n", remote_machine, cli_errstr(&cli) ));
 488                 goto done;
 489         }
 490
 491         if (!attempt_netbios_session_request(&cli, global_myname(), remote_machine, &cli.dest_ip)) {
 492                 DEBUG(0,("fetch_domain_sid: machine %s rejected the NetBIOS session request.\n",
 493                         remote_machine));
 494                 goto done;
 495         }
 496
 497         cli.protocol = PROTOCOL_NT1;
 498
 499         if (!cli_negprot(&cli)) {
 500                 DEBUG(0,("fetch_domain_sid: machine %s rejected the negotiate protocol. \
 501 Error was : %s.\n", remote_machine, cli_errstr(&cli) ));
 502                 goto done;
 503         }
 504
 505         if (cli.protocol != PROTOCOL_NT1) {
 506                 DEBUG(0,("fetch_domain_sid: machine %s didn't negotiate NT protocol.\n",
 507                         remote_machine));
 508                 goto done;
 509         }
 510
 511         /*
 512          * Do an anonymous session setup.
 513          */
 514
 515         if (!cli_session_setup(&cli, "", "", 0, "", 0, "")) {
 516                 DEBUG(0,("fetch_domain_sid: machine %s rejected the session setup. \
 517 Error was : %s.\n", remote_machine, cli_errstr(&cli) ));
 518                 goto done;
 519         }
 520
 521         if (!(cli.sec_mode & NEGOTIATE_SECURITY_USER_LEVEL)) {
 522                 DEBUG(0,("fetch_domain_sid: machine %s isn't in user level security mode\n",
 523                         remote_machine));
 524                 goto done;
 525         }
 526
 527         if (!cli_send_tconX(&cli, "IPC$", "IPC", "", 1)) {
 528                 DEBUG(0,("fetch_domain_sid: machine %s rejected the tconX on the IPC$ share. \
 529 Error was : %s.\n", remote_machine, cli_errstr(&cli) ));
 530                 goto done;
 531         }
 532
 533         /* Fetch domain sid */
 534
 535         if (!cli_nt_session_open(&cli, PI_LSARPC)) {
 536                 DEBUG(0, ("fetch_domain_sid: Error connecting to SAM pipe\n"));
 537                 goto done;
 538         }
 539
 540         result = cli_lsa_open_policy(&cli, cli.mem_ctx, True, SEC_RIGHTS_QUERY_VALUE, &lsa_pol);
 541         if (!NT_STATUS_IS_OK(result)) {
 542                 DEBUG(0, ("fetch_domain_sid: Error opening lsa policy handle. %s\n",
 543                         nt_errstr(result) ));
 544                 goto done;
 545         }
 546
 547         result = cli_lsa_query_info_policy(&cli, cli.mem_ctx, &lsa_pol, 5, domain, psid);
 548         if (!NT_STATUS_IS_OK(result)) {
 549                 DEBUG(0, ("fetch_domain_sid: Error querying lsa policy handle. %s\n",
 550                         nt_errstr(result) ));
 551                 goto done;
 552         }
 553
 554         ret = True;
 555
 556   done:
 557
 558         cli_shutdown(&cli);
 559         return ret;
 560 }
 561
 562 #endif