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) Luke Kenneth Casson Leighton 1996-1997,2000,
   7    Copyright (C) Paul Ashton                       1997,2000,
   8    Copyright (C) Elrond                                 2000,
   9    Copyright (C) Rafal Szczesniak                       2002
  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 2 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, write to the Free Software
  23    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  24 */
  25
  26 #include "includes.h"
  27
  28 /** @defgroup lsa LSA - Local Security Architecture
  29  *  @ingroup rpc_client
  30  *
  31  * @{
  32  **/
  33
  34 /**
  35  * @file cli_lsarpc.c
  36  *
  37  * RPC client routines for the LSA RPC pipe.  LSA means "local
  38  * security authority", which is half of a password database.
  39  **/
  40
  41 /** Open a LSA policy handle
  42  *
  43  * @param cli Handle on an initialised SMB connection */
  44
  45 NTSTATUS cli_lsa_open_policy(struct cli_state *cli, TALLOC_CTX *mem_ctx,
  46                              BOOL sec_qos, uint32 des_access, POLICY_HND *pol)
  47 {
  48         prs_struct qbuf, rbuf;
  49         LSA_Q_OPEN_POL q;
  50         LSA_R_OPEN_POL r;
  51         LSA_SEC_QOS qos;
  52         NTSTATUS result;
  53
  54         ZERO_STRUCT(q);
  55         ZERO_STRUCT(r);
  56
  57         /* Initialise parse structures */
  58
  59         prs_init(&qbuf, MAX_PDU_FRAG_LEN, mem_ctx, MARSHALL);
  60         prs_init(&rbuf, 0, mem_ctx, UNMARSHALL);
  61
  62         /* Initialise input parameters */
  63
  64         if (sec_qos) {
  65                 init_lsa_sec_qos(&qos, 2, 1, 0);
  66                 init_q_open_pol(&q, '\\', 0, des_access, &qos);
  67         } else {
  68                 init_q_open_pol(&q, '\\', 0, des_access, NULL);
  69         }
  70
  71         /* Marshall data and send request */
  72
  73         if (!lsa_io_q_open_pol("", &q, &qbuf, 0) ||
  74             !rpc_api_pipe_req(cli, LSA_OPENPOLICY, &qbuf, &rbuf)) {
  75                 result = NT_STATUS_UNSUCCESSFUL;
  76                 goto done;
  77         }
  78
  79         /* Unmarshall response */
  80
  81         if (!lsa_io_r_open_pol("", &r, &rbuf, 0)) {
  82                 result = NT_STATUS_UNSUCCESSFUL;
  83                 goto done;
  84         }
  85
  86         /* Return output parameters */
  87
  88         if (NT_STATUS_IS_OK(result = r.status)) {
  89                 *pol = r.pol;
  90 #ifdef __INSURE__
  91                 pol->marker = malloc(1);
  92 #endif
  93         }
  94
  95  done:
  96         prs_mem_free(&qbuf);
  97         prs_mem_free(&rbuf);
  98
  99         return result;
 100 }
 101
 102 /** Open a LSA policy handle
 103   *
 104   * @param cli Handle on an initialised SMB connection
 105   */
 106
 107 NTSTATUS cli_lsa_open_policy2(struct cli_state *cli, TALLOC_CTX *mem_ctx,
 108                               BOOL sec_qos, uint32 des_access, POLICY_HND *pol)
 109 {
 110         prs_struct qbuf, rbuf;
 111         LSA_Q_OPEN_POL2 q;
 112         LSA_R_OPEN_POL2 r;
 113         LSA_SEC_QOS qos;
 114         NTSTATUS result;
 115
 116         ZERO_STRUCT(q);
 117         ZERO_STRUCT(r);
 118
 119         /* Initialise parse structures */
 120
 121         prs_init(&qbuf, MAX_PDU_FRAG_LEN, mem_ctx, MARSHALL);
 122         prs_init(&rbuf, 0, mem_ctx, UNMARSHALL);
 123
 124         /* Initialise input parameters */
 125
 126         if (sec_qos) {
 127                 init_lsa_sec_qos(&qos, 2, 1, 0);
 128                 init_q_open_pol2(&q, cli->srv_name_slash, 0, des_access,
 129                                  &qos);
 130         } else {
 131                 init_q_open_pol2(&q, cli->srv_name_slash, 0, des_access,
 132                                  NULL);
 133         }
 134
 135         /* Marshall data and send request */
 136
 137         if (!lsa_io_q_open_pol2("", &q, &qbuf, 0) ||
 138             !rpc_api_pipe_req(cli, LSA_OPENPOLICY2, &qbuf, &rbuf)) {
 139                 result = NT_STATUS_UNSUCCESSFUL;
 140                 goto done;
 141         }
 142
 143         /* Unmarshall response */
 144
 145         if (!lsa_io_r_open_pol2("", &r, &rbuf, 0)) {
 146                 result = NT_STATUS_UNSUCCESSFUL;
 147                 goto done;
 148         }
 149
 150         /* Return output parameters */
 151
 152         if (NT_STATUS_IS_OK(result = r.status)) {
 153                 *pol = r.pol;
 154 #ifdef __INSURE__
 155                 pol->marker = (char *)malloc(1);
 156 #endif
 157         }
 158
 159  done:
 160         prs_mem_free(&qbuf);
 161         prs_mem_free(&rbuf);
 162
 163         return result;
 164 }
 165
 166 /** Close a LSA policy handle */
 167
 168 NTSTATUS cli_lsa_close(struct cli_state *cli, TALLOC_CTX *mem_ctx,
 169                        POLICY_HND *pol)
 170 {
 171         prs_struct qbuf, rbuf;
 172         LSA_Q_CLOSE q;
 173         LSA_R_CLOSE r;
 174         NTSTATUS result;
 175
 176         ZERO_STRUCT(q);
 177         ZERO_STRUCT(r);
 178
 179         /* Initialise parse structures */
 180
 181         prs_init(&qbuf, MAX_PDU_FRAG_LEN, mem_ctx, MARSHALL);
 182         prs_init(&rbuf, 0, mem_ctx, UNMARSHALL);
 183
 184         /* Marshall data and send request */
 185
 186         init_lsa_q_close(&q, pol);
 187
 188         if (!lsa_io_q_close("", &q, &qbuf, 0) ||
 189             !rpc_api_pipe_req(cli, LSA_CLOSE, &qbuf, &rbuf)) {
 190                 result = NT_STATUS_UNSUCCESSFUL;
 191                 goto done;
 192         }
 193
 194         /* Unmarshall response */
 195
 196         if (!lsa_io_r_close("", &r, &rbuf, 0)) {
 197                 result = NT_STATUS_UNSUCCESSFUL;
 198                 goto done;
 199         }
 200
 201         /* Return output parameters */
 202
 203         if (NT_STATUS_IS_OK(result = r.status)) {
 204 #ifdef __INSURE__
 205                 SAFE_FREE(pol->marker);
 206 #endif
 207                 *pol = r.pol;
 208         }
 209
 210  done:
 211         prs_mem_free(&qbuf);
 212         prs_mem_free(&rbuf);
 213
 214         return result;
 215 }
 216
 217 /** Lookup a list of sids */
 218
 219 NTSTATUS cli_lsa_lookup_sids(struct cli_state *cli, TALLOC_CTX *mem_ctx,
 220                              POLICY_HND *pol, int num_sids, DOM_SID *sids,
 221                              char ***domains, char ***names, uint32 **types)
 222 {
 223         prs_struct qbuf, rbuf;
 224         LSA_Q_LOOKUP_SIDS q;
 225         LSA_R_LOOKUP_SIDS r;
 226         DOM_R_REF ref;
 227         LSA_TRANS_NAME_ENUM t_names;
 228         NTSTATUS result;
 229         int i;
 230
 231         ZERO_STRUCT(q);
 232         ZERO_STRUCT(r);
 233
 234         /* Initialise parse structures */
 235
 236         prs_init(&qbuf, MAX_PDU_FRAG_LEN, mem_ctx, MARSHALL);
 237         prs_init(&rbuf, 0, mem_ctx, UNMARSHALL);
 238
 239         /* Marshall data and send request */
 240
 241         init_q_lookup_sids(mem_ctx, &q, pol, num_sids, sids, 1);
 242
 243         if (!lsa_io_q_lookup_sids("", &q, &qbuf, 0) ||
 244             !rpc_api_pipe_req(cli, LSA_LOOKUPSIDS, &qbuf, &rbuf)) {
 245                 result = NT_STATUS_UNSUCCESSFUL;
 246                 goto done;
 247         }
 248
 249         /* Unmarshall response */
 250
 251         ZERO_STRUCT(ref);
 252         ZERO_STRUCT(t_names);
 253
 254         r.dom_ref = &ref;
 255         r.names = &t_names;
 256
 257         if (!lsa_io_r_lookup_sids("", &r, &rbuf, 0)) {
 258                 result = NT_STATUS_UNSUCCESSFUL;
 259                 goto done;
 260         }
 261
 262         result = r.status;
 263
 264         if (!NT_STATUS_IS_OK(result) &&
 265             NT_STATUS_V(result) != NT_STATUS_V(STATUS_SOME_UNMAPPED)) {
 266
 267                 /* An actual error occured */
 268
 269                 goto done;
 270         }
 271
 272         /* Return output parameters */
 273
 274         if (r.mapped_count == 0) {
 275                 result = NT_STATUS_NONE_MAPPED;
 276                 goto done;
 277         }
 278
 279         if (!((*domains) = (char **)talloc(mem_ctx, sizeof(char *) *
 280                                            num_sids))) {
 281                 DEBUG(0, ("cli_lsa_lookup_sids(): out of memory\n"));
 282                 result = NT_STATUS_UNSUCCESSFUL;
 283                 goto done;
 284         }
 285
 286         if (!((*names) = (char **)talloc(mem_ctx, sizeof(char *) *
 287                                          num_sids))) {
 288                 DEBUG(0, ("cli_lsa_lookup_sids(): out of memory\n"));
 289                 result = NT_STATUS_UNSUCCESSFUL;
 290                 goto done;
 291         }
 292
 293         if (!((*types) = (uint32 *)talloc(mem_ctx, sizeof(uint32) *
 294                                           num_sids))) {
 295                 DEBUG(0, ("cli_lsa_lookup_sids(): out of memory\n"));
 296                 result = NT_STATUS_UNSUCCESSFUL;
 297                 goto done;
 298         }
 299
 300         for (i = 0; i < num_sids; i++) {
 301                 fstring name, dom_name;
 302                 uint32 dom_idx = t_names.name[i].domain_idx;
 303
 304                 /* Translate optimised name through domain index array */
 305
 306                 if (dom_idx != 0xffffffff) {
 307
 308                         rpcstr_pull_unistr2_fstring(
 309                                 dom_name, &ref.ref_dom[dom_idx].uni_dom_name);
 310                         rpcstr_pull_unistr2_fstring(
 311                                 name, &t_names.uni_name[i]);
 312
 313                         (*names)[i] = talloc_strdup(mem_ctx, name);
 314                         (*domains)[i] = talloc_strdup(mem_ctx, dom_name);
 315                         (*types)[i] = t_names.name[i].sid_name_use;
 316
 317                         if (((*names)[i] == NULL) || ((*domains)[i] == NULL)) {
 318                                 DEBUG(0, ("cli_lsa_lookup_sids(): out of memory\n"));
 319                                 result = NT_STATUS_UNSUCCESSFUL;
 320                                 goto done;
 321                         }
 322
 323                 } else {
 324                         (*names)[i] = NULL;
 325                         (*types)[i] = SID_NAME_UNKNOWN;
 326                 }
 327         }
 328
 329  done:
 330         prs_mem_free(&qbuf);
 331         prs_mem_free(&rbuf);
 332
 333         return result;
 334 }
 335
 336 /** Lookup a list of names */
 337
 338 NTSTATUS cli_lsa_lookup_names(struct cli_state *cli, TALLOC_CTX *mem_ctx,
 339                               POLICY_HND *pol, int num_names,
 340                               const char **names, DOM_SID **sids,
 341                               uint32 **types)
 342 {
 343         prs_struct qbuf, rbuf;
 344         LSA_Q_LOOKUP_NAMES q;
 345         LSA_R_LOOKUP_NAMES r;
 346         DOM_R_REF ref;
 347         NTSTATUS result;
 348         int i;
 349
 350         ZERO_STRUCT(q);
 351         ZERO_STRUCT(r);
 352
 353         /* Initialise parse structures */
 354
 355         prs_init(&qbuf, MAX_PDU_FRAG_LEN, mem_ctx, MARSHALL);
 356         prs_init(&rbuf, 0, mem_ctx, UNMARSHALL);
 357
 358         /* Marshall data and send request */
 359
 360         init_q_lookup_names(mem_ctx, &q, pol, num_names, names);
 361
 362         if (!lsa_io_q_lookup_names("", &q, &qbuf, 0) ||
 363             !rpc_api_pipe_req(cli, LSA_LOOKUPNAMES, &qbuf, &rbuf)) {
 364                 result = NT_STATUS_UNSUCCESSFUL;
 365                 goto done;
 366         }
 367
 368         /* Unmarshall response */
 369
 370         ZERO_STRUCT(ref);
 371         r.dom_ref = &ref;
 372
 373         if (!lsa_io_r_lookup_names("", &r, &rbuf, 0)) {
 374                 result = NT_STATUS_UNSUCCESSFUL;
 375                 goto done;
 376         }
 377
 378         result = r.status;
 379
 380         if (!NT_STATUS_IS_OK(result) && NT_STATUS_V(result) !=
 381             NT_STATUS_V(STATUS_SOME_UNMAPPED)) {
 382
 383                 /* An actual error occured */
 384
 385                 goto done;
 386         }
 387
 388         /* Return output parameters */
 389
 390         if (r.mapped_count == 0) {
 391                 result = NT_STATUS_NONE_MAPPED;
 392                 goto done;
 393         }
 394
 395         if (!((*sids = (DOM_SID *)talloc(mem_ctx, sizeof(DOM_SID) *
 396                                          num_names)))) {
 397                 DEBUG(0, ("cli_lsa_lookup_sids(): out of memory\n"));
 398                 result = NT_STATUS_UNSUCCESSFUL;
 399                 goto done;
 400         }
 401
 402         if (!((*types = (uint32 *)talloc(mem_ctx, sizeof(uint32) *
 403                                          num_names)))) {
 404                 DEBUG(0, ("cli_lsa_lookup_sids(): out of memory\n"));
 405                 result = NT_STATUS_UNSUCCESSFUL;
 406                 goto done;
 407         }
 408
 409         for (i = 0; i < num_names; i++) {
 410                 DOM_RID2 *t_rids = r.dom_rid;
 411                 uint32 dom_idx = t_rids[i].rid_idx;
 412                 uint32 dom_rid = t_rids[i].rid;
 413                 DOM_SID *sid = &(*sids)[i];
 414
 415                 /* Translate optimised sid through domain index array */
 416
 417                 if (dom_idx != 0xffffffff) {
 418
 419                         sid_copy(sid, &ref.ref_dom[dom_idx].ref_dom.sid);
 420
 421                         if (dom_rid != 0xffffffff) {
 422                                 sid_append_rid(sid, dom_rid);
 423                         }
 424
 425                         (*types)[i] = t_rids[i].type;
 426                 } else {
 427                         ZERO_STRUCTP(sid);
 428                         (*types)[i] = SID_NAME_UNKNOWN;
 429                 }
 430         }
 431
 432  done:
 433         prs_mem_free(&qbuf);
 434         prs_mem_free(&rbuf);
 435
 436         return result;
 437 }
 438
 439 /** Query info policy
 440  *
 441  *  @param domain_sid - returned remote server's domain sid */
 442
 443 NTSTATUS cli_lsa_query_info_policy(struct cli_state *cli, TALLOC_CTX *mem_ctx,
 444                                    POLICY_HND *pol, uint16 info_class,
 445                                    fstring domain_name, DOM_SID *domain_sid)
 446 {
 447         prs_struct qbuf, rbuf;
 448         LSA_Q_QUERY_INFO q;
 449         LSA_R_QUERY_INFO r;
 450         NTSTATUS result;
 451
 452         ZERO_STRUCT(q);
 453         ZERO_STRUCT(r);
 454
 455         /* Initialise parse structures */
 456
 457         prs_init(&qbuf, MAX_PDU_FRAG_LEN, mem_ctx, MARSHALL);
 458         prs_init(&rbuf, 0, mem_ctx, UNMARSHALL);
 459
 460         /* Marshall data and send request */
 461
 462         init_q_query(&q, pol, info_class);
 463
 464         if (!lsa_io_q_query("", &q, &qbuf, 0) ||
 465             !rpc_api_pipe_req(cli, LSA_QUERYINFOPOLICY, &qbuf, &rbuf)) {
 466                 result = NT_STATUS_UNSUCCESSFUL;
 467                 goto done;
 468         }
 469
 470         /* Unmarshall response */
 471
 472         if (!lsa_io_r_query("", &r, &rbuf, 0)) {
 473                 result = NT_STATUS_UNSUCCESSFUL;
 474                 goto done;
 475         }
 476
 477         if (!NT_STATUS_IS_OK(result = r.status)) {
 478                 goto done;
 479         }
 480
 481         /* Return output parameters */
 482
 483         ZERO_STRUCTP(domain_sid);
 484         domain_name[0] = '\0';
 485
 486         switch (info_class) {
 487
 488         case 3:
 489                 if (r.dom.id3.buffer_dom_name != 0) {
 490                         unistr2_to_ascii(domain_name,
 491                                          &r.dom.id3.
 492                                          uni_domain_name,
 493                                          sizeof (fstring) - 1);
 494                 }
 495
 496                 if (r.dom.id3.buffer_dom_sid != 0) {
 497                         *domain_sid = r.dom.id3.dom_sid.sid;
 498                 }
 499
 500                 break;
 501
 502         case 5:
 503
 504                 if (r.dom.id5.buffer_dom_name != 0) {
 505                         unistr2_to_ascii(domain_name, &r.dom.id5.
 506                                          uni_domain_name,
 507                                          sizeof (fstring) - 1);
 508                 }
 509
 510                 if (r.dom.id5.buffer_dom_sid != 0) {
 511                         *domain_sid = r.dom.id5.dom_sid.sid;
 512                 }
 513
 514                 break;
 515
 516         default:
 517                 DEBUG(3, ("unknown info class %d\n", info_class));
 518                 break;
 519         }
 520
 521  done:
 522         prs_mem_free(&qbuf);
 523         prs_mem_free(&rbuf);
 524
 525         return result;
 526 }
 527
 528 /**
 529  * Enumerate list of trusted domains
 530  *
 531  * @param cli client state (cli_state) structure of the connection
 532  * @param mem_ctx memory context
 533  * @param pol opened lsa policy handle
 534  * @param enum_ctx enumeration context ie. index of first returned domain entry
 535  * @param pref_num_domains preferred max number of entries returned in one response
 536  * @param num_domains total number of trusted domains returned by response
 537  * @param domain_names returned trusted domain names
 538  * @param domain_sids returned trusted domain sids
 539  *
 540  * @return nt status code of response
 541  **/
 542
 543 NTSTATUS cli_lsa_enum_trust_dom(struct cli_state *cli, TALLOC_CTX *mem_ctx,
 544                                 POLICY_HND *pol, uint32 *enum_ctx,
 545                                 uint32 *pref_num_domains, uint32 *num_domains,
 546                                 char ***domain_names, DOM_SID **domain_sids)
 547 {
 548         prs_struct qbuf, rbuf;
 549         LSA_Q_ENUM_TRUST_DOM q;
 550         LSA_R_ENUM_TRUST_DOM r;
 551         NTSTATUS result;
 552         int i;
 553
 554         ZERO_STRUCT(q);
 555         ZERO_STRUCT(r);
 556
 557         /* Initialise parse structures */
 558
 559         prs_init(&qbuf, MAX_PDU_FRAG_LEN, mem_ctx, MARSHALL);
 560         prs_init(&rbuf, 0, mem_ctx, UNMARSHALL);
 561
 562         /* Marshall data and send request */
 563
 564         init_q_enum_trust_dom(&q, pol, *enum_ctx, *pref_num_domains);
 565
 566         if (!lsa_io_q_enum_trust_dom("", &q, &qbuf, 0) ||
 567             !rpc_api_pipe_req(cli, LSA_ENUMTRUSTDOM, &qbuf, &rbuf)) {
 568                 result = NT_STATUS_UNSUCCESSFUL;
 569                 goto done;
 570         }
 571
 572         /* Unmarshall response */
 573
 574         if (!lsa_io_r_enum_trust_dom("", &r, &rbuf, 0)) {
 575                 result = NT_STATUS_UNSUCCESSFUL;
 576                 goto done;
 577         }
 578
 579         result = r.status;
 580
 581         if (!NT_STATUS_IS_OK(result) &&
 582             !NT_STATUS_EQUAL(result, NT_STATUS_NO_MORE_ENTRIES) &&
 583             !NT_STATUS_EQUAL(result, STATUS_MORE_ENTRIES)) {
 584
 585                 /* An actual error ocured */
 586
 587                 goto done;
 588         }
 589
 590         /* Return output parameters */
 591
 592         if (r.num_domains) {
 593
 594                 /* Allocate memory for trusted domain names and sids */
 595
 596                 *domain_names = (char **)talloc(mem_ctx, sizeof(char *) *
 597                                                 r.num_domains);
 598
 599                 if (!*domain_names) {
 600                         DEBUG(0, ("cli_lsa_enum_trust_dom(): out of memory\n"));
 601                         result = NT_STATUS_NO_MEMORY;
 602                         goto done;
 603                 }
 604
 605                 *domain_sids = (DOM_SID *)talloc(mem_ctx, sizeof(DOM_SID) *
 606                                                  r.num_domains);
 607                 if (!domain_sids) {
 608                         DEBUG(0, ("cli_lsa_enum_trust_dom(): out of memory\n"));
 609                         result = NT_STATUS_NO_MEMORY;
 610                         goto done;
 611                 }
 612
 613                 /* Copy across names and sids */
 614
 615                 for (i = 0; i < r.num_domains; i++) {
 616                         fstring tmp;
 617
 618                         unistr2_to_ascii(tmp, &r.uni_domain_name[i],
 619                                          sizeof(tmp) - 1);
 620                         (*domain_names)[i] = talloc_strdup(mem_ctx, tmp);
 621                         sid_copy(&(*domain_sids)[i], &r.domain_sid[i].sid);
 622                 }
 623         }
 624
 625         *num_domains = r.num_domains;
 626         *enum_ctx = r.enum_context;
 627
 628  done:
 629         prs_mem_free(&qbuf);
 630         prs_mem_free(&rbuf);
 631
 632         return result;
 633 }
 634
 635
 636 /** Enumerate privileges*/
 637
 638 NTSTATUS cli_lsa_enum_privilege(struct cli_state *cli, TALLOC_CTX *mem_ctx,
 639                                 POLICY_HND *pol, uint32 *enum_context, uint32 pref_max_length,
 640                                 uint32 *count, char ***privs_name, uint32 **privs_high, uint32 **privs_low)
 641 {
 642         prs_struct qbuf, rbuf;
 643         LSA_Q_ENUM_PRIVS q;
 644         LSA_R_ENUM_PRIVS r;
 645         NTSTATUS result;
 646         int i;
 647
 648         ZERO_STRUCT(q);
 649         ZERO_STRUCT(r);
 650
 651         /* Initialise parse structures */
 652
 653         prs_init(&qbuf, MAX_PDU_FRAG_LEN, mem_ctx, MARSHALL);
 654         prs_init(&rbuf, 0, mem_ctx, UNMARSHALL);
 655
 656         /* Marshall data and send request */
 657
 658         init_q_enum_privs(&q, pol, *enum_context, pref_max_length);
 659
 660         if (!lsa_io_q_enum_privs("", &q, &qbuf, 0) ||
 661             !rpc_api_pipe_req(cli, LSA_ENUM_PRIVS, &qbuf, &rbuf)) {
 662                 result = NT_STATUS_UNSUCCESSFUL;
 663                 goto done;
 664         }
 665
 666         /* Unmarshall response */
 667
 668         if (!lsa_io_r_enum_privs("", &r, &rbuf, 0)) {
 669                 result = NT_STATUS_UNSUCCESSFUL;
 670                 goto done;
 671         }
 672
 673         if (!NT_STATUS_IS_OK(result = r.status)) {
 674                 goto done;
 675         }
 676
 677         /* Return output parameters */
 678
 679         *enum_context = r.enum_context;
 680         *count = r.count;
 681
 682         if (!((*privs_name = (char **)talloc(mem_ctx, sizeof(char *) * r.count)))) {
 683                 DEBUG(0, ("(cli_lsa_enum_privilege): out of memory\n"));
 684                 result = NT_STATUS_UNSUCCESSFUL;
 685                 goto done;
 686         }
 687
 688         if (!((*privs_high = (uint32 *)talloc(mem_ctx, sizeof(uint32) * r.count)))) {
 689                 DEBUG(0, ("(cli_lsa_enum_privilege): out of memory\n"));
 690                 result = NT_STATUS_UNSUCCESSFUL;
 691                 goto done;
 692         }
 693
 694         if (!((*privs_low = (uint32 *)talloc(mem_ctx, sizeof(uint32) * r.count)))) {
 695                 DEBUG(0, ("(cli_lsa_enum_privilege): out of memory\n"));
 696                 result = NT_STATUS_UNSUCCESSFUL;
 697                 goto done;
 698         }
 699
 700         for (i = 0; i < r.count; i++) {
 701                 fstring name;
 702
 703                 rpcstr_pull_unistr2_fstring( name, &r.privs[i].name);
 704
 705                 (*privs_name)[i] = talloc_strdup(mem_ctx, name);
 706
 707                 (*privs_high)[i] = r.privs[i].luid_high;
 708                 (*privs_low)[i] = r.privs[i].luid_low;
 709         }
 710
 711  done:
 712         prs_mem_free(&qbuf);
 713         prs_mem_free(&rbuf);
 714
 715         return result;
 716 }
 717
 718 /** Get privilege name */
 719
 720 NTSTATUS cli_lsa_get_dispname(struct cli_state *cli, TALLOC_CTX *mem_ctx,
 721                               POLICY_HND *pol, char *name, uint16 lang_id, uint16 lang_id_sys,
 722                               fstring description, uint16 *lang_id_desc)
 723 {
 724         prs_struct qbuf, rbuf;
 725         LSA_Q_PRIV_GET_DISPNAME q;
 726         LSA_R_PRIV_GET_DISPNAME r;
 727         NTSTATUS result;
 728
 729         ZERO_STRUCT(q);
 730         ZERO_STRUCT(r);
 731
 732         /* Initialise parse structures */
 733
 734         prs_init(&qbuf, MAX_PDU_FRAG_LEN, mem_ctx, MARSHALL);
 735         prs_init(&rbuf, 0, mem_ctx, UNMARSHALL);
 736
 737         /* Marshall data and send request */
 738
 739         init_lsa_priv_get_dispname(&q, pol, name, lang_id, lang_id_sys);
 740
 741         if (!lsa_io_q_priv_get_dispname("", &q, &qbuf, 0) ||
 742             !rpc_api_pipe_req(cli, LSA_PRIV_GET_DISPNAME, &qbuf, &rbuf)) {
 743                 result = NT_STATUS_UNSUCCESSFUL;
 744                 goto done;
 745         }
 746
 747         /* Unmarshall response */
 748
 749         if (!lsa_io_r_priv_get_dispname("", &r, &rbuf, 0)) {
 750                 result = NT_STATUS_UNSUCCESSFUL;
 751                 goto done;
 752         }
 753
 754         if (!NT_STATUS_IS_OK(result = r.status)) {
 755                 goto done;
 756         }
 757
 758         /* Return output parameters */
 759
 760         rpcstr_pull_unistr2_fstring(description , &r.desc);
 761         *lang_id_desc = r.lang_id;
 762
 763  done:
 764         prs_mem_free(&qbuf);
 765         prs_mem_free(&rbuf);
 766
 767         return result;
 768 }
 769
 770 /** Enumerate list of SIDs  */
 771
 772 NTSTATUS cli_lsa_enum_sids(struct cli_state *cli, TALLOC_CTX *mem_ctx,
 773                                 POLICY_HND *pol, uint32 *enum_ctx, uint32 pref_max_length,
 774                                 uint32 *num_sids, DOM_SID **sids)
 775 {
 776         prs_struct qbuf, rbuf;
 777         LSA_Q_ENUM_ACCOUNTS q;
 778         LSA_R_ENUM_ACCOUNTS r;
 779         NTSTATUS result;
 780         int i;
 781
 782         ZERO_STRUCT(q);
 783         ZERO_STRUCT(r);
 784
 785         /* Initialise parse structures */
 786
 787         prs_init(&qbuf, MAX_PDU_FRAG_LEN, mem_ctx, MARSHALL);
 788         prs_init(&rbuf, 0, mem_ctx, UNMARSHALL);
 789
 790         /* Marshall data and send request */
 791
 792         init_lsa_q_enum_accounts(&q, pol, *enum_ctx, pref_max_length);
 793
 794         if (!lsa_io_q_enum_accounts("", &q, &qbuf, 0) ||
 795             !rpc_api_pipe_req(cli, LSA_ENUM_ACCOUNTS, &qbuf, &rbuf)) {
 796                 result = NT_STATUS_UNSUCCESSFUL;
 797                 goto done;
 798         }
 799
 800         /* Unmarshall response */
 801
 802         if (!lsa_io_r_enum_accounts("", &r, &rbuf, 0)) {
 803                 result = NT_STATUS_UNSUCCESSFUL;
 804                 goto done;
 805         }
 806
 807         result = r.status;
 808
 809         if (!NT_STATUS_IS_OK(result = r.status)) {
 810                 goto done;
 811         }
 812
 813         if (r.sids.num_entries==0)
 814                 goto done;
 815
 816         /* Return output parameters */
 817
 818         *sids = (DOM_SID *)talloc(mem_ctx, sizeof(DOM_SID) * r.sids.num_entries);
 819         if (!*sids) {
 820                 DEBUG(0, ("(cli_lsa_enum_sids): out of memory\n"));
 821                 result = NT_STATUS_UNSUCCESSFUL;
 822                 goto done;
 823         }
 824
 825         /* Copy across names and sids */
 826
 827         for (i = 0; i < r.sids.num_entries; i++) {
 828                 sid_copy(&(*sids)[i], &r.sids.sid[i].sid);
 829         }
 830
 831         *num_sids= r.sids.num_entries;
 832         *enum_ctx = r.enum_context;
 833
 834  done:
 835         prs_mem_free(&qbuf);
 836         prs_mem_free(&rbuf);
 837
 838         return result;
 839 }
 840
 841 /** Open a LSA user handle
 842  *
 843  * @param cli Handle on an initialised SMB connection */
 844
 845 NTSTATUS cli_lsa_open_account(struct cli_state *cli, TALLOC_CTX *mem_ctx,
 846                              POLICY_HND *dom_pol, DOM_SID *sid, uint32 des_access,
 847                              POLICY_HND *user_pol)
 848 {
 849         prs_struct qbuf, rbuf;
 850         LSA_Q_OPENACCOUNT q;
 851         LSA_R_OPENACCOUNT r;
 852         NTSTATUS result;
 853
 854         ZERO_STRUCT(q);
 855         ZERO_STRUCT(r);
 856
 857         /* Initialise parse structures */
 858
 859         prs_init(&qbuf, MAX_PDU_FRAG_LEN, mem_ctx, MARSHALL);
 860         prs_init(&rbuf, 0, mem_ctx, UNMARSHALL);
 861
 862         /* Initialise input parameters */
 863
 864         init_lsa_q_open_account(&q, dom_pol, sid, des_access);
 865
 866         /* Marshall data and send request */
 867
 868         if (!lsa_io_q_open_account("", &q, &qbuf, 0) ||
 869             !rpc_api_pipe_req(cli, LSA_OPENACCOUNT, &qbuf, &rbuf)) {
 870                 result = NT_STATUS_UNSUCCESSFUL;
 871                 goto done;
 872         }
 873
 874         /* Unmarshall response */
 875
 876         if (!lsa_io_r_open_account("", &r, &rbuf, 0)) {
 877                 result = NT_STATUS_UNSUCCESSFUL;
 878                 goto done;
 879         }
 880
 881         /* Return output parameters */
 882
 883         if (NT_STATUS_IS_OK(result = r.status)) {
 884                 *user_pol = r.pol;
 885         }
 886
 887  done:
 888         prs_mem_free(&qbuf);
 889         prs_mem_free(&rbuf);
 890
 891         return result;
 892 }
 893
 894 /** Enumerate user privileges
 895  *
 896  * @param cli Handle on an initialised SMB connection */
 897
 898 NTSTATUS cli_lsa_enum_privsaccount(struct cli_state *cli, TALLOC_CTX *mem_ctx,
 899                              POLICY_HND *pol, uint32 *count, LUID_ATTR **set)
 900 {
 901         prs_struct qbuf, rbuf;
 902         LSA_Q_ENUMPRIVSACCOUNT q;
 903         LSA_R_ENUMPRIVSACCOUNT r;
 904         NTSTATUS result;
 905         int i;
 906
 907         ZERO_STRUCT(q);
 908         ZERO_STRUCT(r);
 909
 910         /* Initialise parse structures */
 911
 912         prs_init(&qbuf, MAX_PDU_FRAG_LEN, mem_ctx, MARSHALL);
 913         prs_init(&rbuf, 0, mem_ctx, UNMARSHALL);
 914
 915         /* Initialise input parameters */
 916
 917         init_lsa_q_enum_privsaccount(&q, pol);
 918
 919         /* Marshall data and send request */
 920
 921         if (!lsa_io_q_enum_privsaccount("", &q, &qbuf, 0) ||
 922             !rpc_api_pipe_req(cli, LSA_ENUMPRIVSACCOUNT, &qbuf, &rbuf)) {
 923                 result = NT_STATUS_UNSUCCESSFUL;
 924                 goto done;
 925         }
 926
 927         /* Unmarshall response */
 928
 929         if (!lsa_io_r_enum_privsaccount("", &r, &rbuf, 0)) {
 930                 result = NT_STATUS_UNSUCCESSFUL;
 931                 goto done;
 932         }
 933
 934         /* Return output parameters */
 935
 936         if (!NT_STATUS_IS_OK(result = r.status)) {
 937                 goto done;
 938         }
 939
 940         if (r.count == 0)
 941                 goto done;
 942
 943         if (!((*set = (LUID_ATTR *)talloc(mem_ctx, sizeof(LUID_ATTR) * r.count)))) {
 944                 DEBUG(0, ("(cli_lsa_enum_privsaccount): out of memory\n"));
 945                 result = NT_STATUS_UNSUCCESSFUL;
 946                 goto done;
 947         }
 948
 949         for (i=0; i<r.count; i++) {
 950                 (*set)[i].luid.low = r.set.set[i].luid.low;
 951                 (*set)[i].luid.high = r.set.set[i].luid.high;
 952                 (*set)[i].attr = r.set.set[i].attr;
 953         }
 954
 955         *count=r.count;
 956  done:
 957         prs_mem_free(&qbuf);
 958         prs_mem_free(&rbuf);
 959
 960         return result;
 961 }
 962
 963 /** Get a privilege value given its name */
 964
 965 NTSTATUS cli_lsa_lookupprivvalue(struct cli_state *cli, TALLOC_CTX *mem_ctx,
 966                               POLICY_HND *pol, char *name, LUID *luid)
 967 {
 968         prs_struct qbuf, rbuf;
 969         LSA_Q_LOOKUPPRIVVALUE q;
 970         LSA_R_LOOKUPPRIVVALUE r;
 971         NTSTATUS result;
 972
 973         ZERO_STRUCT(q);
 974         ZERO_STRUCT(r);
 975
 976         /* Initialise parse structures */
 977
 978         prs_init(&qbuf, MAX_PDU_FRAG_LEN, mem_ctx, MARSHALL);
 979         prs_init(&rbuf, 0, mem_ctx, UNMARSHALL);
 980
 981         /* Marshall data and send request */
 982
 983         init_lsa_q_lookupprivvalue(&q, pol, name);
 984
 985         if (!lsa_io_q_lookupprivvalue("", &q, &qbuf, 0) ||
 986             !rpc_api_pipe_req(cli, LSA_LOOKUPPRIVVALUE, &qbuf, &rbuf)) {
 987                 result = NT_STATUS_UNSUCCESSFUL;
 988                 goto done;
 989         }
 990
 991         /* Unmarshall response */
 992
 993         if (!lsa_io_r_lookupprivvalue("", &r, &rbuf, 0)) {
 994                 result = NT_STATUS_UNSUCCESSFUL;
 995                 goto done;
 996         }
 997
 998         if (!NT_STATUS_IS_OK(result = r.status)) {
 999                 goto done;
1000         }
1001
1002         /* Return output parameters */
1003
1004         (*luid).low=r.luid.low;
1005         (*luid).high=r.luid.high;
1006
1007  done:
1008         prs_mem_free(&qbuf);
1009         prs_mem_free(&rbuf);
1010
1011         return result;
1012 }
1013
1014 /** Query LSA security object */
1015
1016 NTSTATUS cli_lsa_query_secobj(struct cli_state *cli, TALLOC_CTX *mem_ctx,
1017                               POLICY_HND *pol, uint32 sec_info,
1018                               SEC_DESC_BUF **psdb)
1019 {
1020         prs_struct qbuf, rbuf;
1021         LSA_Q_QUERY_SEC_OBJ q;
1022         LSA_R_QUERY_SEC_OBJ r;
1023         NTSTATUS result;
1024
1025         ZERO_STRUCT(q);
1026         ZERO_STRUCT(r);
1027
1028         /* Initialise parse structures */
1029
1030         prs_init(&qbuf, MAX_PDU_FRAG_LEN, mem_ctx, MARSHALL);
1031         prs_init(&rbuf, 0, mem_ctx, UNMARSHALL);
1032
1033         /* Marshall data and send request */
1034
1035         init_q_query_sec_obj(&q, pol, sec_info);
1036
1037         if (!lsa_io_q_query_sec_obj("", &q, &qbuf, 0) ||
1038             !rpc_api_pipe_req(cli, LSA_QUERYSECOBJ, &qbuf, &rbuf)) {
1039                 result = NT_STATUS_UNSUCCESSFUL;
1040                 goto done;
1041         }
1042
1043         /* Unmarshall response */
1044
1045         if (!lsa_io_r_query_sec_obj("", &r, &rbuf, 0)) {
1046                 result = NT_STATUS_UNSUCCESSFUL;
1047                 goto done;
1048         }
1049
1050         if (!NT_STATUS_IS_OK(result = r.status)) {
1051                 goto done;
1052         }
1053
1054         /* Return output parameters */
1055
1056         if (psdb)
1057                 *psdb = r.buf;
1058
1059  done:
1060         prs_mem_free(&qbuf);
1061         prs_mem_free(&rbuf);
1062
1063         return result;
1064 }
1065
1066 #if 0
1067
1068 /** An example of how to use the routines in this file.  Fetch a DOMAIN
1069     sid. Does complete cli setup / teardown anonymously. */
1070
1071 BOOL fetch_domain_sid( char *domain, char *remote_machine, DOM_SID *psid)
1072 {
1073         extern pstring global_myname;
1074         struct cli_state cli;
1075         NTSTATUS result;
1076         POLICY_HND lsa_pol;
1077         BOOL ret = False;
1078
1079         ZERO_STRUCT(cli);
1080         if(cli_initialise(&cli) == False) {
1081                 DEBUG(0,("fetch_domain_sid: unable to initialize client connection.\n"));
1082                 return False;
1083         }
1084
1085         if(!resolve_name( remote_machine, &cli.dest_ip, 0x20)) {
1086                 DEBUG(0,("fetch_domain_sid: Can't resolve address for %s\n", remote_machine));
1087                 goto done;
1088         }
1089
1090         if (!cli_connect(&cli, remote_machine, &cli.dest_ip)) {
1091                 DEBUG(0,("fetch_domain_sid: unable to connect to SMB server on \
1092 machine %s. Error was : %s.\n", remote_machine, cli_errstr(&cli) ));
1093                 goto done;
1094         }
1095
1096         if (!attempt_netbios_session_request(&cli, global_myname, remote_machine, &cli.dest_ip)) {
1097                 DEBUG(0,("fetch_domain_sid: machine %s rejected the NetBIOS session request.\n",
1098                         remote_machine));
1099                 goto done;
1100         }
1101
1102         cli.protocol = PROTOCOL_NT1;
1103
1104         if (!cli_negprot(&cli)) {
1105                 DEBUG(0,("fetch_domain_sid: machine %s rejected the negotiate protocol. \
1106 Error was : %s.\n", remote_machine, cli_errstr(&cli) ));
1107                 goto done;
1108         }
1109
1110         if (cli.protocol != PROTOCOL_NT1) {
1111                 DEBUG(0,("fetch_domain_sid: machine %s didn't negotiate NT protocol.\n",
1112                         remote_machine));
1113                 goto done;
1114         }
1115
1116         /*
1117          * Do an anonymous session setup.
1118          */
1119
1120         if (!cli_session_setup(&cli, "", "", 0, "", 0, "")) {
1121                 DEBUG(0,("fetch_domain_sid: machine %s rejected the session setup. \
1122 Error was : %s.\n", remote_machine, cli_errstr(&cli) ));
1123                 goto done;
1124         }
1125
1126         if (!(cli.sec_mode & NEGOTIATE_SECURITY_USER_LEVEL)) {
1127                 DEBUG(0,("fetch_domain_sid: machine %s isn't in user level security mode\n",
1128                         remote_machine));
1129                 goto done;
1130         }
1131
1132         if (!cli_send_tconX(&cli, "IPC$", "IPC", "", 1)) {
1133                 DEBUG(0,("fetch_domain_sid: machine %s rejected the tconX on the IPC$ share. \
1134 Error was : %s.\n", remote_machine, cli_errstr(&cli) ));
1135                 goto done;
1136         }
1137
1138         /* Fetch domain sid */
1139
1140         if (!cli_nt_session_open(&cli, PIPE_LSARPC)) {
1141                 DEBUG(0, ("fetch_domain_sid: Error connecting to SAM pipe\n"));
1142                 goto done;
1143         }
1144
1145         result = cli_lsa_open_policy(&cli, cli.mem_ctx, True, SEC_RIGHTS_QUERY_VALUE, &lsa_pol);
1146         if (!NT_STATUS_IS_OK(result)) {
1147                 DEBUG(0, ("fetch_domain_sid: Error opening lsa policy handle. %s\n",
1148                         nt_errstr(result) ));
1149                 goto done;
1150         }
1151
1152         result = cli_lsa_query_info_policy(&cli, cli.mem_ctx, &lsa_pol, 5, domain, psid);
1153         if (!NT_STATUS_IS_OK(result)) {
1154                 DEBUG(0, ("fetch_domain_sid: Error querying lsa policy handle. %s\n",
1155                         nt_errstr(result) ));
1156                 goto done;
1157         }
1158
1159         ret = True;
1160
1161   done:
1162
1163         cli_shutdown(&cli);
1164         return ret;
1165 }
1166
1167 #endif
1168
1169 /** @} **/