source3/rpc_client/cli_netlogon.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    NT Domain Authentication SMB / MSRPC client
   4    Copyright (C) Andrew Tridgell 1992-2000
   5    Copyright (C) Luke Kenneth Casson Leighton 1996-2000
   6    Copyright (C) Tim Potter 2001
   7    Copyright (C) Paul Ashton                       1997.
   8    Copyright (C) Jeremy Allison                    1998.
   9    Copyright (C) Andrew Bartlett                   2001.
  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 /* LSA Request Challenge. Sends our challenge to server, then gets
  29    server response. These are used to generate the credentials. */
  30
  31 NTSTATUS cli_net_req_chal(struct cli_state *cli, DOM_CHAL *clnt_chal,
  32                           DOM_CHAL *srv_chal)
  33 {
  34         prs_struct qbuf, rbuf;
  35         NET_Q_REQ_CHAL q;
  36         NET_R_REQ_CHAL r;
  37         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
  38
  39         prs_init(&qbuf, MAX_PDU_FRAG_LEN, cli->mem_ctx, MARSHALL);
  40         prs_init(&rbuf, 0, cli->mem_ctx, UNMARSHALL);
  41
  42         /* create and send a MSRPC command with api NET_REQCHAL */
  43
  44         DEBUG(4,("cli_net_req_chal: LSA Request Challenge from %s to %s: %s\n",
  45                  global_myname(), cli->desthost, credstr(clnt_chal->data)));
  46
  47         /* store the parameters */
  48         init_q_req_chal(&q, cli->srv_name_slash, global_myname(), clnt_chal);
  49
  50         /* Marshall data and send request */
  51
  52         if (!net_io_q_req_chal("", &q,  &qbuf, 0) ||
  53             !rpc_api_pipe_req(cli, NET_REQCHAL, &qbuf, &rbuf)) {
  54                 goto done;
  55         }
  56
  57         /* Unmarhall response */
  58
  59         if (!net_io_r_req_chal("", &r, &rbuf, 0)) {
  60                 goto done;
  61         }
  62
  63         result = r.status;
  64
  65         /* Return result */
  66
  67         if (NT_STATUS_IS_OK(result)) {
  68                 memcpy(srv_chal, r.srv_chal.data, sizeof(srv_chal->data));
  69         }
  70
  71  done:
  72         prs_mem_free(&qbuf);
  73         prs_mem_free(&rbuf);
  74
  75         return result;
  76 }
  77
  78 /****************************************************************************
  79 LSA Authenticate 2
  80
  81 Send the client credential, receive back a server credential.
  82 Ensure that the server credential returned matches the session key
  83 encrypt of the server challenge originally received. JRA.
  84 ****************************************************************************/
  85
  86 NTSTATUS cli_net_auth2(struct cli_state *cli,
  87                        uint16 sec_chan,
  88                        uint32 *neg_flags, DOM_CHAL *srv_chal)
  89 {
  90         prs_struct qbuf, rbuf;
  91         NET_Q_AUTH_2 q;
  92         NET_R_AUTH_2 r;
  93         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
  94
  95         prs_init(&qbuf, MAX_PDU_FRAG_LEN, cli->mem_ctx, MARSHALL);
  96         prs_init(&rbuf, 0, cli->mem_ctx, UNMARSHALL);
  97
  98         /* create and send a MSRPC command with api NET_AUTH2 */
  99
 100         DEBUG(4,("cli_net_auth2: srv:%s acct:%s sc:%x mc: %s chal %s neg: %x\n",
 101                  cli->srv_name_slash, cli->mach_acct, sec_chan, global_myname(),
 102                  credstr(cli->clnt_cred.challenge.data), *neg_flags));
 103
 104         /* store the parameters */
 105         init_q_auth_2(&q, cli->srv_name_slash, cli->mach_acct,
 106                       sec_chan, global_myname(), &cli->clnt_cred.challenge,
 107                       *neg_flags);
 108
 109         /* turn parameters into data stream */
 110
 111         if (!net_io_q_auth_2("", &q,  &qbuf, 0) ||
 112             !rpc_api_pipe_req(cli, NET_AUTH2, &qbuf, &rbuf)) {
 113                 goto done;
 114         }
 115
 116         /* Unmarshall response */
 117
 118         if (!net_io_r_auth_2("", &r, &rbuf, 0)) {
 119                 goto done;
 120         }
 121
 122         result = r.status;
 123
 124         if (NT_STATUS_IS_OK(result)) {
 125                 UTIME zerotime;
 126
 127                 /*
 128                  * Check the returned value using the initial
 129                  * server received challenge.
 130                  */
 131
 132                 zerotime.time = 0;
 133                 if (cred_assert( &r.srv_chal, cli->sess_key, srv_chal,
 134                                  zerotime) == 0) {
 135
 136                         /*
 137                          * Server replied with bad credential. Fail.
 138                          */
 139                         DEBUG(0,("cli_net_auth2: server %s replied with bad credential (bad machine \
 140 password ?).\n", cli->desthost ));
 141                         result = NT_STATUS_ACCESS_DENIED;
 142                         goto done;
 143                 }
 144                 *neg_flags = r.srv_flgs.neg_flags;
 145         }
 146
 147  done:
 148         prs_mem_free(&qbuf);
 149         prs_mem_free(&rbuf);
 150
 151         return result;
 152 }
 153
 154 /****************************************************************************
 155 LSA Authenticate 3
 156
 157 Send the client credential, receive back a server credential.
 158 Ensure that the server credential returned matches the session key
 159 encrypt of the server challenge originally received. JRA.
 160 ****************************************************************************/
 161
 162 NTSTATUS cli_net_auth3(struct cli_state *cli,
 163                        uint16 sec_chan,
 164                        uint32 *neg_flags, DOM_CHAL *srv_chal)
 165 {
 166         prs_struct qbuf, rbuf;
 167         NET_Q_AUTH_3 q;
 168         NET_R_AUTH_3 r;
 169         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
 170
 171         prs_init(&qbuf, MAX_PDU_FRAG_LEN, cli->mem_ctx, MARSHALL);
 172         prs_init(&rbuf, 0, cli->mem_ctx, UNMARSHALL);
 173
 174         /* create and send a MSRPC command with api NET_AUTH2 */
 175
 176         DEBUG(4,("cli_net_auth3: srv:%s acct:%s sc:%x mc: %s chal %s neg: %x\n",
 177                  cli->srv_name_slash, cli->mach_acct, sec_chan, global_myname(),
 178                  credstr(cli->clnt_cred.challenge.data), *neg_flags));
 179
 180         /* store the parameters */
 181         init_q_auth_3(&q, cli->srv_name_slash, cli->mach_acct,
 182                       sec_chan, global_myname(), &cli->clnt_cred.challenge,
 183                       *neg_flags);
 184
 185         /* turn parameters into data stream */
 186
 187         if (!net_io_q_auth_3("", &q,  &qbuf, 0) ||
 188             !rpc_api_pipe_req(cli, NET_AUTH3, &qbuf, &rbuf)) {
 189                 goto done;
 190         }
 191
 192         /* Unmarshall response */
 193
 194         if (!net_io_r_auth_3("", &r, &rbuf, 0)) {
 195                 goto done;
 196         }
 197
 198         result = r.status;
 199
 200         if (NT_STATUS_IS_OK(result)) {
 201                 UTIME zerotime;
 202
 203                 /*
 204                  * Check the returned value using the initial
 205                  * server received challenge.
 206                  */
 207
 208                 zerotime.time = 0;
 209                 if (cred_assert( &r.srv_chal, cli->sess_key, srv_chal,
 210                                  zerotime) == 0) {
 211
 212                         /*
 213                          * Server replied with bad credential. Fail.
 214                          */
 215                         DEBUG(0,("cli_net_auth3: server %s replied with bad credential (bad machine \
 216 password ?).\n", cli->desthost ));
 217                         result = NT_STATUS_ACCESS_DENIED;
 218                         goto done;
 219                 }
 220                 *neg_flags = r.srv_flgs.neg_flags;
 221         }
 222
 223  done:
 224         prs_mem_free(&qbuf);
 225         prs_mem_free(&rbuf);
 226
 227         return result;
 228 }
 229
 230 /* Initialize domain session credentials */
 231
 232 NTSTATUS cli_nt_setup_creds(struct cli_state *cli,
 233                             uint16 sec_chan,
 234                             const unsigned char mach_pwd[16], uint32 *neg_flags, int level)
 235 {
 236         DOM_CHAL clnt_chal;
 237         DOM_CHAL srv_chal;
 238         UTIME zerotime;
 239         NTSTATUS result;
 240
 241         /******************* Request Challenge ********************/
 242
 243         generate_random_buffer(clnt_chal.data, 8, False);
 244
 245         /* send a client challenge; receive a server challenge */
 246         result = cli_net_req_chal(cli, &clnt_chal, &srv_chal);
 247
 248         if (!NT_STATUS_IS_OK(result)) {
 249                 DEBUG(0,("cli_nt_setup_creds: request challenge failed\n"));
 250                 return result;
 251         }
 252
 253         /**************** Long-term Session key **************/
 254
 255         /* calculate the session key */
 256         cred_session_key(&clnt_chal, &srv_chal, mach_pwd,
 257                          cli->sess_key);
 258         memset((char *)cli->sess_key+8, '\0', 8);
 259
 260         /******************* Authenticate 2/3 ********************/
 261
 262         /* calculate auth-2/3 credentials */
 263         zerotime.time = 0;
 264         cred_create(cli->sess_key, &clnt_chal, zerotime, &cli->clnt_cred.challenge);
 265
 266         /*
 267          * Send client auth-2/3 challenge.
 268          * Receive an auth-2/3 challenge response and check it.
 269          */
 270         switch (level) {
 271                 case 2:
 272                         result = cli_net_auth2(cli, sec_chan, neg_flags, &srv_chal);
 273                         break;
 274                 case 3:
 275                         result = cli_net_auth3(cli, sec_chan, neg_flags, &srv_chal);
 276                         break;
 277                 default:
 278                         DEBUG(1,("cli_nt_setup_creds: unsupported auth level: %d\n", level));
 279                         break;
 280         }
 281
 282         if (!NT_STATUS_IS_OK(result))
 283                 DEBUG(3,("cli_nt_setup_creds: auth%d challenge failed %s\n", level, nt_errstr(result)));
 284
 285         return result;
 286 }
 287
 288 /* Logon Control 2 */
 289
 290 NTSTATUS cli_netlogon_logon_ctrl2(struct cli_state *cli, TALLOC_CTX *mem_ctx,
 291                                   uint32 query_level)
 292 {
 293         prs_struct qbuf, rbuf;
 294         NET_Q_LOGON_CTRL2 q;
 295         NET_R_LOGON_CTRL2 r;
 296         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
 297
 298         ZERO_STRUCT(q);
 299         ZERO_STRUCT(r);
 300
 301         /* Initialise parse structures */
 302
 303         prs_init(&qbuf, MAX_PDU_FRAG_LEN, mem_ctx, MARSHALL);
 304         prs_init(&rbuf, 0, mem_ctx, UNMARSHALL);
 305
 306         /* Initialise input parameters */
 307
 308         init_net_q_logon_ctrl2(&q, cli->srv_name_slash, query_level);
 309
 310         /* Marshall data and send request */
 311
 312         if (!net_io_q_logon_ctrl2("", &q, &qbuf, 0) ||
 313             !rpc_api_pipe_req(cli, NET_LOGON_CTRL2, &qbuf, &rbuf)) {
 314                 result = NT_STATUS_UNSUCCESSFUL;
 315                 goto done;
 316         }
 317
 318         /* Unmarshall response */
 319
 320         if (!net_io_r_logon_ctrl2("", &r, &rbuf, 0)) {
 321                 result = NT_STATUS_UNSUCCESSFUL;
 322                 goto done;
 323         }
 324
 325         result = r.status;
 326
 327  done:
 328         prs_mem_free(&qbuf);
 329         prs_mem_free(&rbuf);
 330
 331         return result;
 332 }
 333
 334 /****************************************************************************
 335 Generate the next creds to use.
 336 ****************************************************************************/
 337
 338 static void gen_next_creds( struct cli_state *cli, DOM_CRED *new_clnt_cred)
 339 {
 340         /*
 341          * Create the new client credentials.
 342          */
 343
 344         cli->clnt_cred.timestamp.time = time(NULL);
 345
 346         memcpy(new_clnt_cred, &cli->clnt_cred, sizeof(*new_clnt_cred));
 347
 348         /* Calculate the new credentials. */
 349         cred_create(cli->sess_key, &(cli->clnt_cred.challenge),
 350                     new_clnt_cred->timestamp, &(new_clnt_cred->challenge));
 351 }
 352
 353 /* Sam synchronisation */
 354
 355 NTSTATUS cli_netlogon_sam_sync(struct cli_state *cli, TALLOC_CTX *mem_ctx, DOM_CRED *ret_creds,
 356                                uint32 database_id, uint32 next_rid, uint32 *num_deltas,
 357                                SAM_DELTA_HDR **hdr_deltas,
 358                                SAM_DELTA_CTR **deltas)
 359 {
 360         prs_struct qbuf, rbuf;
 361         NET_Q_SAM_SYNC q;
 362         NET_R_SAM_SYNC r;
 363         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
 364         DOM_CRED clnt_creds;
 365
 366         ZERO_STRUCT(q);
 367         ZERO_STRUCT(r);
 368
 369         /* Initialise parse structures */
 370
 371         prs_init(&qbuf, MAX_PDU_FRAG_LEN, mem_ctx, MARSHALL);
 372         prs_init(&rbuf, 0, mem_ctx, UNMARSHALL);
 373
 374         /* Initialise input parameters */
 375
 376         gen_next_creds(cli, &clnt_creds);
 377
 378         init_net_q_sam_sync(&q, cli->srv_name_slash, cli->clnt_name_slash + 2,
 379                             &clnt_creds, ret_creds, database_id, next_rid);
 380
 381         /* Marshall data and send request */
 382
 383         if (!net_io_q_sam_sync("", &q, &qbuf, 0) ||
 384             !rpc_api_pipe_req(cli, NET_SAM_SYNC, &qbuf, &rbuf)) {
 385                 result = NT_STATUS_UNSUCCESSFUL;
 386                 goto done;
 387         }
 388
 389         /* Unmarshall response */
 390
 391         if (!net_io_r_sam_sync("", cli->sess_key, &r, &rbuf, 0)) {
 392                 result = NT_STATUS_UNSUCCESSFUL;
 393                 goto done;
 394         }
 395
 396         /* Return results */
 397
 398         result = r.status;
 399         *num_deltas = r.num_deltas2;
 400         *hdr_deltas = r.hdr_deltas;
 401         *deltas = r.deltas;
 402
 403         memcpy(ret_creds, &r.srv_creds, sizeof(*ret_creds));
 404
 405  done:
 406         prs_mem_free(&qbuf);
 407         prs_mem_free(&rbuf);
 408
 409         return result;
 410 }
 411
 412 /* Sam synchronisation */
 413
 414 NTSTATUS cli_netlogon_sam_deltas(struct cli_state *cli, TALLOC_CTX *mem_ctx,
 415                                  uint32 database_id, UINT64_S seqnum,
 416                                  uint32 *num_deltas,
 417                                  SAM_DELTA_HDR **hdr_deltas,
 418                                  SAM_DELTA_CTR **deltas)
 419 {
 420         prs_struct qbuf, rbuf;
 421         NET_Q_SAM_DELTAS q;
 422         NET_R_SAM_DELTAS r;
 423         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
 424         DOM_CRED clnt_creds;
 425
 426         ZERO_STRUCT(q);
 427         ZERO_STRUCT(r);
 428
 429         /* Initialise parse structures */
 430
 431         prs_init(&qbuf, MAX_PDU_FRAG_LEN, mem_ctx, MARSHALL);
 432         prs_init(&rbuf, 0, mem_ctx, UNMARSHALL);
 433
 434         /* Initialise input parameters */
 435
 436         gen_next_creds(cli, &clnt_creds);
 437
 438         init_net_q_sam_deltas(&q, cli->srv_name_slash,
 439                               cli->clnt_name_slash + 2, &clnt_creds,
 440                               database_id, seqnum);
 441
 442         /* Marshall data and send request */
 443
 444         if (!net_io_q_sam_deltas("", &q, &qbuf, 0) ||
 445             !rpc_api_pipe_req(cli, NET_SAM_DELTAS, &qbuf, &rbuf)) {
 446                 result = NT_STATUS_UNSUCCESSFUL;
 447                 goto done;
 448         }
 449
 450         /* Unmarshall response */
 451
 452         if (!net_io_r_sam_deltas("", cli->sess_key, &r, &rbuf, 0)) {
 453                 result = NT_STATUS_UNSUCCESSFUL;
 454                 goto done;
 455         }
 456
 457         /* Return results */
 458
 459         result = r.status;
 460         *num_deltas = r.num_deltas2;
 461         *hdr_deltas = r.hdr_deltas;
 462         *deltas = r.deltas;
 463
 464  done:
 465         prs_mem_free(&qbuf);
 466         prs_mem_free(&rbuf);
 467
 468         return result;
 469 }
 470
 471 /* Logon domain user */
 472
 473 NTSTATUS cli_netlogon_sam_logon(struct cli_state *cli, TALLOC_CTX *mem_ctx,
 474                                 DOM_CRED *ret_creds,
 475                                 const char *username, const char *password,
 476                                 int logon_type)
 477 {
 478         prs_struct qbuf, rbuf;
 479         NET_Q_SAM_LOGON q;
 480         NET_R_SAM_LOGON r;
 481         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
 482         DOM_CRED clnt_creds, dummy_rtn_creds;
 483         NET_ID_INFO_CTR ctr;
 484         NET_USER_INFO_3 user;
 485         int validation_level = 3;
 486
 487         ZERO_STRUCT(q);
 488         ZERO_STRUCT(r);
 489         ZERO_STRUCT(dummy_rtn_creds);
 490
 491         /* Initialise parse structures */
 492
 493         prs_init(&qbuf, MAX_PDU_FRAG_LEN, mem_ctx, MARSHALL);
 494         prs_init(&rbuf, 0, mem_ctx, UNMARSHALL);
 495
 496         /* Initialise input parameters */
 497
 498         gen_next_creds(cli, &clnt_creds);
 499
 500         q.validation_level = validation_level;
 501
 502         if (ret_creds == NULL)
 503                 ret_creds = &dummy_rtn_creds;
 504
 505         ctr.switch_value = logon_type;
 506
 507         switch (logon_type) {
 508         case INTERACTIVE_LOGON_TYPE: {
 509                 unsigned char lm_owf_user_pwd[16], nt_owf_user_pwd[16];
 510
 511                 nt_lm_owf_gen(password, nt_owf_user_pwd, lm_owf_user_pwd);
 512
 513                 init_id_info1(&ctr.auth.id1, lp_workgroup(),
 514                               0, /* param_ctrl */
 515                               0xdead, 0xbeef, /* LUID? */
 516                               username, cli->clnt_name_slash,
 517                               (const char *)cli->sess_key, lm_owf_user_pwd,
 518                               nt_owf_user_pwd);
 519
 520                 break;
 521         }
 522         case NET_LOGON_TYPE: {
 523                 uint8 chal[8];
 524                 unsigned char local_lm_response[24];
 525                 unsigned char local_nt_response[24];
 526
 527                 generate_random_buffer(chal, 8, False);
 528
 529                 SMBencrypt(password, chal, local_lm_response);
 530                 SMBNTencrypt(password, chal, local_nt_response);
 531
 532                 init_id_info2(&ctr.auth.id2, lp_workgroup(),
 533                               0, /* param_ctrl */
 534                               0xdead, 0xbeef, /* LUID? */
 535                               username, cli->clnt_name_slash, chal,
 536                               local_lm_response, 24, local_nt_response, 24);
 537                 break;
 538         }
 539         default:
 540                 DEBUG(0, ("switch value %d not supported\n",
 541                           ctr.switch_value));
 542                 goto done;
 543         }
 544
 545         init_sam_info(&q.sam_id, cli->srv_name_slash, global_myname(),
 546                       &clnt_creds, ret_creds, logon_type,
 547                       &ctr);
 548
 549         /* Marshall data and send request */
 550
 551         if (!net_io_q_sam_logon("", &q, &qbuf, 0) ||
 552             !rpc_api_pipe_req(cli, NET_SAMLOGON, &qbuf, &rbuf)) {
 553                 goto done;
 554         }
 555
 556         /* Unmarshall response */
 557
 558         r.user = &user;
 559
 560         if (!net_io_r_sam_logon("", &r, &rbuf, 0)) {
 561                 goto done;
 562         }
 563
 564         /* Return results */
 565
 566         result = r.status;
 567         memcpy(ret_creds, &r.srv_creds, sizeof(*ret_creds));
 568
 569  done:
 570         prs_mem_free(&qbuf);
 571         prs_mem_free(&rbuf);
 572
 573         return result;
 574 }
 575
 576
 577 /**
 578  * Logon domain user with an 'network' SAM logon
 579  *
 580  * @param info3 Pointer to a NET_USER_INFO_3 already allocated by the caller.
 581  **/
 582
 583 NTSTATUS cli_netlogon_sam_network_logon(struct cli_state *cli, TALLOC_CTX *mem_ctx,
 584                                         DOM_CRED *ret_creds,
 585                                         const char *username, const char *domain, const char *workstation,
 586                                         const uint8 chal[8],
 587                                         DATA_BLOB lm_response, DATA_BLOB nt_response,
 588                                         NET_USER_INFO_3 *info3)
 589
 590 {
 591         prs_struct qbuf, rbuf;
 592         NET_Q_SAM_LOGON q;
 593         NET_R_SAM_LOGON r;
 594         NTSTATUS result = NT_STATUS_UNSUCCESSFUL;
 595         DOM_CRED clnt_creds, dummy_rtn_creds;
 596         NET_ID_INFO_CTR ctr;
 597         int validation_level = 3;
 598         char *workstation_name_slash;
 599         uint8 netlogon_sess_key[16];
 600         static uint8 zeros[16];
 601
 602         ZERO_STRUCT(q);
 603         ZERO_STRUCT(r);
 604         ZERO_STRUCT(dummy_rtn_creds);
 605
 606         workstation_name_slash = talloc_asprintf(mem_ctx, "\\\\%s", workstation);
 607
 608         if (!workstation_name_slash) {
 609                 DEBUG(0, ("talloc_asprintf failed!\n"));
 610                 return NT_STATUS_NO_MEMORY;
 611         }
 612
 613         /* Initialise parse structures */
 614
 615         prs_init(&qbuf, MAX_PDU_FRAG_LEN, mem_ctx, MARSHALL);
 616         prs_init(&rbuf, 0, mem_ctx, UNMARSHALL);
 617
 618         /* Initialise input parameters */
 619
 620         gen_next_creds(cli, &clnt_creds);
 621
 622         q.validation_level = validation_level;
 623
 624         if (ret_creds == NULL)
 625                 ret_creds = &dummy_rtn_creds;
 626
 627         ctr.switch_value = NET_LOGON_TYPE;
 628
 629         init_id_info2(&ctr.auth.id2, domain,
 630                       0, /* param_ctrl */
 631                       0xdead, 0xbeef, /* LUID? */
 632                       username, workstation_name_slash, (const uchar*)chal,
 633                       lm_response.data, lm_response.length, nt_response.data, nt_response.length);
 634
 635         init_sam_info(&q.sam_id, cli->srv_name_slash, global_myname(),
 636                       &clnt_creds, ret_creds, NET_LOGON_TYPE,
 637                       &ctr);
 638
 639         /* Marshall data and send request */
 640
 641         if (!net_io_q_sam_logon("", &q, &qbuf, 0) ||
 642             !rpc_api_pipe_req(cli, NET_SAMLOGON, &qbuf, &rbuf)) {
 643                 goto done;
 644         }
 645
 646         /* Unmarshall response */
 647
 648         r.user = info3;
 649
 650         if (!net_io_r_sam_logon("", &r, &rbuf, 0)) {
 651                 goto done;
 652         }
 653
 654         ZERO_STRUCT(netlogon_sess_key);
 655         memcpy(netlogon_sess_key, cli->sess_key, 8);
 656
 657         if (memcmp(zeros, info3->user_sess_key, 16) != 0) {
 658                 SamOEMhash(info3->user_sess_key, netlogon_sess_key, 16);
 659         } else {
 660                 memset(info3->user_sess_key, '\0', 16);
 661         }
 662
 663         if (memcmp(zeros, info3->padding, 16) != 0) {
 664                 SamOEMhash(info3->padding, netlogon_sess_key, 16);
 665         } else {
 666                 memset(info3->padding, '\0', 16);
 667         }
 668
 669         /* Return results */
 670
 671         result = r.status;
 672         memcpy(ret_creds, &r.srv_creds, sizeof(*ret_creds));
 673
 674  done:
 675         prs_mem_free(&qbuf);
 676         prs_mem_free(&rbuf);
 677
 678         return result;
 679 }
 680
 681 /***************************************************************************
 682 LSA Server Password Set.
 683 ****************************************************************************/
 684
 685 NTSTATUS cli_net_srv_pwset(struct cli_state *cli, TALLOC_CTX *mem_ctx,
 686                            const char *machine_name, uint8 hashed_mach_pwd[16])
 687 {
 688         prs_struct rbuf;
 689         prs_struct qbuf;
 690         DOM_CRED new_clnt_cred;
 691         NET_Q_SRV_PWSET q_s;
 692         uint16 sec_chan_type = 2;
 693         NTSTATUS nt_status;
 694
 695         gen_next_creds( cli, &new_clnt_cred);
 696
 697         prs_init(&qbuf , 1024, mem_ctx, MARSHALL);
 698         prs_init(&rbuf, 0,    mem_ctx, UNMARSHALL);
 699
 700         DEBUG(4,("cli_net_srv_pwset: srv:%s acct:%s sc: %d mc: %s clnt %s %x\n",
 701                  cli->srv_name_slash, cli->mach_acct, sec_chan_type, machine_name,
 702                  credstr(new_clnt_cred.challenge.data), new_clnt_cred.timestamp.time));
 703
 704         /* store the parameters */
 705         init_q_srv_pwset(&q_s, cli->srv_name_slash, (const char *)cli->sess_key,
 706                          cli->mach_acct, sec_chan_type, machine_name,
 707                          &new_clnt_cred, hashed_mach_pwd);
 708
 709         /* turn parameters into data stream */
 710         if(!net_io_q_srv_pwset("", &q_s,  &qbuf, 0)) {
 711                 DEBUG(0,("cli_net_srv_pwset: Error : failed to marshall NET_Q_SRV_PWSET struct.\n"));
 712                 nt_status = NT_STATUS_UNSUCCESSFUL;
 713                 goto done;
 714         }
 715
 716         /* send the data on \PIPE\ */
 717         if (rpc_api_pipe_req(cli, NET_SRVPWSET, &qbuf, &rbuf))
 718         {
 719                 NET_R_SRV_PWSET r_s;
 720
 721                 if (!net_io_r_srv_pwset("", &r_s, &rbuf, 0)) {
 722                         nt_status =  NT_STATUS_UNSUCCESSFUL;
 723                         goto done;
 724                 }
 725
 726                 nt_status = r_s.status;
 727
 728                 if (!NT_STATUS_IS_OK(r_s.status))
 729                 {
 730                         /* report error code */
 731                         DEBUG(0,("cli_net_srv_pwset: %s\n", nt_errstr(nt_status)));
 732                         goto done;
 733                 }
 734
 735                 /* Update the credentials. */
 736                 if (!clnt_deal_with_creds(cli->sess_key, &(cli->clnt_cred), &(r_s.srv_cred)))
 737                 {
 738                         /*
 739                          * Server replied with bad credential. Fail.
 740                          */
 741                         DEBUG(0,("cli_net_srv_pwset: server %s replied with bad credential (bad machine \
 742 password ?).\n", cli->desthost ));
 743                         nt_status = NT_STATUS_UNSUCCESSFUL;
 744                 }
 745         }
 746
 747  done:
 748         prs_mem_free(&qbuf);
 749         prs_mem_free(&rbuf);
 750
 751         return nt_status;
 752 }
 753