source3/rpc_server/srv_netlog_nt.c

   1 /*
   2  *  Unix SMB/CIFS implementation.
   3  *  RPC Pipe client / server routines
   4  *  Copyright (C) Andrew Tridgell              1992-1997,
   5  *  Copyright (C) Luke Kenneth Casson Leighton 1996-1997,
   6  *  Copyright (C) Paul Ashton                       1997.
   7  *  Copyright (C) Jeremy Allison               1998-2001.
   8  *  Copyright (C) Andrew Bartlett                   2001.
   9  *
  10  *  This program is free software; you can redistribute it and/or modify
  11  *  it under the terms of the GNU General Public License as published by
  12  *  the Free Software Foundation; either version 2 of the License, or
  13  *  (at your option) any later version.
  14  *
  15  *  This program is distributed in the hope that it will be useful,
  16  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18  *  GNU General Public License for more details.
  19  *
  20  *  You should have received a copy of the GNU General Public License
  21  *  along with this program; if not, write to the Free Software
  22  *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  23  */
  24
  25 /* This is the implementation of the netlogon pipe. */
  26
  27 #include "includes.h"
  28
  29 extern userdom_struct current_user_info;
  30
  31 #undef DBGC_CLASS
  32 #define DBGC_CLASS DBGC_RPC_SRV
  33
  34 /*************************************************************************
  35  init_net_r_req_chal:
  36  *************************************************************************/
  37
  38 static void init_net_r_req_chal(NET_R_REQ_CHAL *r_c,
  39                                 DOM_CHAL *srv_chal, NTSTATUS status)
  40 {
  41         DEBUG(6,("init_net_r_req_chal: %d\n", __LINE__));
  42         memcpy(r_c->srv_chal.data, srv_chal->data, sizeof(srv_chal->data));
  43         r_c->status = status;
  44 }
  45
  46 /*************************************************************************
  47  error messages cropping up when using nltest.exe...
  48  *************************************************************************/
  49
  50 #define ERROR_NO_SUCH_DOMAIN   0x54b
  51 #define ERROR_NO_LOGON_SERVERS 0x51f
  52 #define NO_ERROR               0x0
  53
  54 /*************************************************************************
  55  net_reply_logon_ctrl:
  56  *************************************************************************/
  57
  58 NTSTATUS _net_logon_ctrl(pipes_struct *p, NET_Q_LOGON_CTRL *q_u,
  59                        NET_R_LOGON_CTRL *r_u)
  60 {
  61         uint32 flags = 0x0;
  62         uint32 pdc_connection_status = 0x00; /* Maybe a win32 error code? */
  63
  64         /* Setup the Logon Control response */
  65
  66         init_net_r_logon_ctrl(r_u, q_u->query_level, flags,
  67                               pdc_connection_status);
  68
  69         return r_u->status;
  70 }
  71
  72 /****************************************************************************
  73 Send a message to smbd to do a sam synchronisation
  74 **************************************************************************/
  75
  76 static void send_sync_message(void)
  77 {
  78         TDB_CONTEXT *tdb;
  79
  80         tdb = tdb_open_log(lock_path("connections.tdb"), 0,
  81                            TDB_DEFAULT, O_RDONLY, 0);
  82
  83         if (!tdb) {
  84                 DEBUG(3, ("send_sync_message(): failed to open connections "
  85                           "database\n"));
  86                 return;
  87         }
  88
  89         DEBUG(3, ("sending sam synchronisation message\n"));
  90
  91         message_send_all(tdb, MSG_SMB_SAM_SYNC, NULL, 0, False, NULL);
  92
  93         tdb_close(tdb);
  94 }
  95
  96 /*************************************************************************
  97  net_reply_logon_ctrl2:
  98  *************************************************************************/
  99
 100 NTSTATUS _net_logon_ctrl2(pipes_struct *p, NET_Q_LOGON_CTRL2 *q_u, NET_R_LOGON_CTRL2 *r_u)
 101 {
 102         uint32 flags = 0x0;
 103         uint32 pdc_connection_status = 0x0;
 104         uint32 logon_attempts = 0x0;
 105         uint32 tc_status;
 106         fstring servername, domain, dc_name, dc_name2;
 107         struct in_addr dc_ip;
 108
 109         /* this should be \\global_myname() */
 110         unistr2_to_ascii(servername, &q_u->uni_server_name, sizeof(servername));
 111
 112         r_u->status = NT_STATUS_OK;
 113
 114         tc_status = ERROR_NO_SUCH_DOMAIN;
 115         fstrcpy( dc_name, "" );
 116
 117         switch ( q_u->function_code ) {
 118                 case NETLOGON_CONTROL_TC_QUERY:
 119                         unistr2_to_ascii(domain, &q_u->info.info6.domain, sizeof(domain));
 120
 121                         if ( !is_trusted_domain( domain ) )
 122                                 break;
 123
 124                         if ( !get_dc_name( domain, NULL, dc_name2, &dc_ip ) ) {
 125                                 tc_status = ERROR_NO_LOGON_SERVERS;
 126                                 break;
 127                         }
 128
 129                         fstr_sprintf( dc_name, "\\\\%s", dc_name2 );
 130
 131                         tc_status = NO_ERROR;
 132
 133                         break;
 134
 135                 case NETLOGON_CONTROL_REDISCOVER:
 136                         unistr2_to_ascii(domain, &q_u->info.info6.domain, sizeof(domain));
 137
 138                         if ( !is_trusted_domain( domain ) )
 139                                 break;
 140
 141                         if ( !get_dc_name( domain, NULL, dc_name2, &dc_ip ) ) {
 142                                 tc_status = ERROR_NO_LOGON_SERVERS;
 143                                 break;
 144                         }
 145
 146                         fstr_sprintf( dc_name, "\\\\%s", dc_name2 );
 147
 148                         tc_status = NO_ERROR;
 149
 150                         break;
 151
 152                 default:
 153                         /* no idea what this should be */
 154                         DEBUG(0,("_net_logon_ctrl2: unimplemented function level [%d]\n",
 155                                 q_u->function_code));
 156         }
 157
 158         /* prepare the response */
 159
 160         init_net_r_logon_ctrl2( r_u, q_u->query_level, flags,
 161                 pdc_connection_status, logon_attempts, tc_status, dc_name );
 162
 163         if (lp_server_role() == ROLE_DOMAIN_BDC)
 164                 send_sync_message();
 165
 166         return r_u->status;
 167 }
 168
 169 /*************************************************************************
 170  net_reply_trust_dom_list:
 171  *************************************************************************/
 172
 173 NTSTATUS _net_trust_dom_list(pipes_struct *p, NET_Q_TRUST_DOM_LIST *q_u, NET_R_TRUST_DOM_LIST *r_u)
 174 {
 175         const char *trusted_domain = "test_domain";
 176         uint32 num_trust_domains = 1;
 177
 178         DEBUG(6,("_net_trust_dom_list: %d\n", __LINE__));
 179
 180         /* set up the Trusted Domain List response */
 181         init_r_trust_dom(r_u, num_trust_domains, trusted_domain);
 182
 183         DEBUG(6,("_net_trust_dom_list: %d\n", __LINE__));
 184
 185         return r_u->status;
 186 }
 187
 188 /***********************************************************************************
 189  init_net_r_srv_pwset:
 190  ***********************************************************************************/
 191
 192 static void init_net_r_srv_pwset(NET_R_SRV_PWSET *r_s,
 193                                  DOM_CRED *srv_cred, NTSTATUS status)
 194 {
 195         DEBUG(5,("init_net_r_srv_pwset: %d\n", __LINE__));
 196
 197         memcpy(&r_s->srv_cred, srv_cred, sizeof(r_s->srv_cred));
 198         r_s->status = status;
 199
 200         DEBUG(5,("init_net_r_srv_pwset: %d\n", __LINE__));
 201 }
 202
 203 /******************************************************************
 204  gets a machine password entry.  checks access rights of the host.
 205  ******************************************************************/
 206
 207 static BOOL get_md4pw(char *md4pw, char *mach_acct)
 208 {
 209         struct samu *sampass = NULL;
 210         const uint8 *pass;
 211         BOOL ret;
 212         uint32 acct_ctrl;
 213
 214 #if 0
 215     /*
 216      * Currently this code is redundent as we already have a filter
 217      * by hostname list. What this code really needs to do is to
 218      * get a hosts allowed/hosts denied list from the SAM database
 219      * on a per user basis, and make the access decision there.
 220      * I will leave this code here for now as a reminder to implement
 221      * this at a later date. JRA.
 222      */
 223
 224         if (!allow_access(lp_domain_hostsdeny(), lp_domain_hostsallow(),
 225                           client_name(), client_addr()))
 226         {
 227                 DEBUG(0,("get_md4pw: Workstation %s denied access to domain\n", mach_acct));
 228                 return False;
 229         }
 230 #endif /* 0 */
 231
 232         if ( !(sampass = samu_new( NULL )) ) {
 233                 return False;
 234         }
 235
 236         /* JRA. This is ok as it is only used for generating the challenge. */
 237         become_root();
 238         ret=pdb_getsampwnam(sampass, mach_acct);
 239         unbecome_root();
 240
 241         if (ret==False) {
 242                 DEBUG(0,("get_md4pw: Workstation %s: no account in domain\n", mach_acct));
 243                 TALLOC_FREE(sampass);
 244                 return False;
 245         }
 246
 247         acct_ctrl = pdb_get_acct_ctrl(sampass);
 248         if (!(acct_ctrl & ACB_DISABLED) &&
 249             ((acct_ctrl & ACB_DOMTRUST) ||
 250              (acct_ctrl & ACB_WSTRUST) ||
 251              (acct_ctrl & ACB_SVRTRUST)) &&
 252             ((pass=pdb_get_nt_passwd(sampass)) != NULL)) {
 253                 memcpy(md4pw, pass, 16);
 254                 dump_data(5, md4pw, 16);
 255                 TALLOC_FREE(sampass);
 256                 return True;
 257         }
 258
 259         DEBUG(0,("get_md4pw: Workstation %s: no account in domain\n", mach_acct));
 260         TALLOC_FREE(sampass);
 261         return False;
 262
 263 }
 264
 265 /*************************************************************************
 266  _net_req_chal
 267  *************************************************************************/
 268
 269 NTSTATUS _net_req_chal(pipes_struct *p, NET_Q_REQ_CHAL *q_u, NET_R_REQ_CHAL *r_u)
 270 {
 271         if (!p->dc) {
 272                 p->dc = TALLOC_ZERO_P(p->pipe_state_mem_ctx, struct dcinfo);
 273                 if (!p->dc) {
 274                         return NT_STATUS_NO_MEMORY;
 275                 }
 276         } else {
 277                 DEBUG(10,("_net_req_chal: new challenge requested. Clearing old state.\n"));
 278                 ZERO_STRUCTP(p->dc);
 279         }
 280
 281         rpcstr_pull(p->dc->remote_machine,
 282                         q_u->uni_logon_clnt.buffer,
 283                         sizeof(fstring),q_u->uni_logon_clnt.uni_str_len*2,0);
 284
 285         /* Save the client challenge to the server. */
 286         memcpy(p->dc->clnt_chal.data, q_u->clnt_chal.data, sizeof(q_u->clnt_chal.data));
 287
 288         /* Create a server challenge for the client */
 289         /* Set this to a random value. */
 290         generate_random_buffer(p->dc->srv_chal.data, 8);
 291
 292         /* set up the LSA REQUEST CHALLENGE response */
 293         init_net_r_req_chal(r_u, &p->dc->srv_chal, NT_STATUS_OK);
 294
 295         p->dc->challenge_sent = True;
 296
 297         return NT_STATUS_OK;
 298 }
 299
 300 /*************************************************************************
 301  init_net_r_auth:
 302  *************************************************************************/
 303
 304 static void init_net_r_auth(NET_R_AUTH *r_a, DOM_CHAL *resp_cred, NTSTATUS status)
 305 {
 306         memcpy(r_a->srv_chal.data, resp_cred->data, sizeof(resp_cred->data));
 307         r_a->status = status;
 308 }
 309
 310 /*************************************************************************
 311  _net_auth. Create the initial credentials.
 312  *************************************************************************/
 313
 314 NTSTATUS _net_auth(pipes_struct *p, NET_Q_AUTH *q_u, NET_R_AUTH *r_u)
 315 {
 316         fstring mach_acct;
 317         fstring remote_machine;
 318         DOM_CHAL srv_chal_out;
 319
 320         if (!p->dc || !p->dc->challenge_sent) {
 321                 return NT_STATUS_ACCESS_DENIED;
 322         }
 323
 324         rpcstr_pull(mach_acct, q_u->clnt_id.uni_acct_name.buffer,sizeof(fstring),
 325                                 q_u->clnt_id.uni_acct_name.uni_str_len*2,0);
 326         rpcstr_pull(remote_machine, q_u->clnt_id.uni_comp_name.buffer,sizeof(fstring),
 327                                 q_u->clnt_id.uni_comp_name.uni_str_len*2,0);
 328
 329         if (!get_md4pw((char *)p->dc->mach_pw, mach_acct)) {
 330                 DEBUG(0,("_net_auth: creds_server_check failed. Failed to "
 331                         "get pasword for machine account %s "
 332                         "from client %s\n",
 333                         mach_acct, remote_machine ));
 334                 return NT_STATUS_ACCESS_DENIED;
 335         }
 336
 337         /* From the client / server challenges and md4 password, generate sess key */
 338         creds_server_init(0,                    /* No neg flags. */
 339                         p->dc,
 340                         &p->dc->clnt_chal,      /* Stored client chal. */
 341                         &p->dc->srv_chal,       /* Stored server chal. */
 342                         p->dc->mach_pw,
 343                         &srv_chal_out);
 344
 345         /* Check client credentials are valid. */
 346         if (!creds_server_check(p->dc, &q_u->clnt_chal)) {
 347                 DEBUG(0,("_net_auth: creds_server_check failed. Rejecting auth "
 348                         "request from client %s machine account %s\n",
 349                         remote_machine, mach_acct ));
 350                 return NT_STATUS_ACCESS_DENIED;
 351         }
 352
 353         fstrcpy(p->dc->mach_acct, mach_acct);
 354         fstrcpy(p->dc->remote_machine, remote_machine);
 355         p->dc->authenticated = True;
 356
 357         /* set up the LSA AUTH response */
 358         /* Return the server credentials. */
 359         init_net_r_auth(r_u, &srv_chal_out, NT_STATUS_OK);
 360
 361         return r_u->status;
 362 }
 363
 364 /*************************************************************************
 365  init_net_r_auth_2:
 366  *************************************************************************/
 367
 368 static void init_net_r_auth_2(NET_R_AUTH_2 *r_a,
 369                               DOM_CHAL *resp_cred, NEG_FLAGS *flgs, NTSTATUS status)
 370 {
 371         memcpy(r_a->srv_chal.data, resp_cred->data, sizeof(resp_cred->data));
 372         memcpy(&r_a->srv_flgs, flgs, sizeof(r_a->srv_flgs));
 373         r_a->status = status;
 374 }
 375
 376 /*************************************************************************
 377  _net_auth_2
 378  *************************************************************************/
 379
 380 NTSTATUS _net_auth_2(pipes_struct *p, NET_Q_AUTH_2 *q_u, NET_R_AUTH_2 *r_u)
 381 {
 382         NEG_FLAGS srv_flgs;
 383         fstring mach_acct;
 384         fstring remote_machine;
 385         DOM_CHAL srv_chal_out;
 386
 387         rpcstr_pull(mach_acct, q_u->clnt_id.uni_acct_name.buffer,sizeof(fstring),
 388                                 q_u->clnt_id.uni_acct_name.uni_str_len*2,0);
 389
 390         /* We use this as the key to store the creds. */
 391         rpcstr_pull(remote_machine, q_u->clnt_id.uni_comp_name.buffer,sizeof(fstring),
 392                                 q_u->clnt_id.uni_comp_name.uni_str_len*2,0);
 393
 394         if (!p->dc || !p->dc->challenge_sent) {
 395                 DEBUG(0,("_net_auth2: no challenge sent to client %s\n",
 396                         remote_machine ));
 397                 return NT_STATUS_ACCESS_DENIED;
 398         }
 399
 400         if ( (lp_server_schannel() == True) &&
 401              ((q_u->clnt_flgs.neg_flags & NETLOGON_NEG_SCHANNEL) == 0) ) {
 402
 403                 /* schannel must be used, but client did not offer it. */
 404                 DEBUG(0,("_net_auth2: schannel required but client failed "
 405                         "to offer it. Client was %s\n",
 406                         mach_acct ));
 407                 return NT_STATUS_ACCESS_DENIED;
 408         }
 409
 410         if (!get_md4pw((char *)p->dc->mach_pw, mach_acct)) {
 411                 DEBUG(0,("_net_auth2: failed to get machine password for "
 412                         "account %s\n",
 413                         mach_acct ));
 414                 return NT_STATUS_ACCESS_DENIED;
 415         }
 416
 417         /* From the client / server challenges and md4 password, generate sess key */
 418         creds_server_init(q_u->clnt_flgs.neg_flags,
 419                         p->dc,
 420                         &p->dc->clnt_chal,      /* Stored client chal. */
 421                         &p->dc->srv_chal,       /* Stored server chal. */
 422                         p->dc->mach_pw,
 423                         &srv_chal_out);
 424
 425         /* Check client credentials are valid. */
 426         if (!creds_server_check(p->dc, &q_u->clnt_chal)) {
 427                 DEBUG(0,("_net_auth2: creds_server_check failed. Rejecting auth "
 428                         "request from client %s machine account %s\n",
 429                         remote_machine, mach_acct ));
 430                 return NT_STATUS_ACCESS_DENIED;
 431         }
 432
 433         srv_flgs.neg_flags = 0x000001ff;
 434
 435         if (lp_server_schannel() != False) {
 436                 srv_flgs.neg_flags |= NETLOGON_NEG_SCHANNEL;
 437         }
 438
 439         /* set up the LSA AUTH 2 response */
 440         init_net_r_auth_2(r_u, &srv_chal_out, &srv_flgs, NT_STATUS_OK);
 441
 442         fstrcpy(p->dc->mach_acct, mach_acct);
 443         fstrcpy(p->dc->remote_machine, remote_machine);
 444         fstrcpy(p->dc->domain, lp_workgroup() );
 445
 446         p->dc->authenticated = True;
 447
 448         /* Store off the state so we can continue after client disconnect. */
 449         become_root();
 450         secrets_store_schannel_session_info(p->mem_ctx,
 451                                         remote_machine,
 452                                         p->dc);
 453         unbecome_root();
 454
 455         return r_u->status;
 456 }
 457
 458 /*************************************************************************
 459  _net_srv_pwset
 460  *************************************************************************/
 461
 462 NTSTATUS _net_srv_pwset(pipes_struct *p, NET_Q_SRV_PWSET *q_u, NET_R_SRV_PWSET *r_u)
 463 {
 464         NTSTATUS status = NT_STATUS_ACCESS_DENIED;
 465         fstring remote_machine;
 466         struct samu *sampass=NULL;
 467         BOOL ret = False;
 468         unsigned char pwd[16];
 469         int i;
 470         uint32 acct_ctrl;
 471         DOM_CRED cred_out;
 472         const uchar *old_pw;
 473
 474         DEBUG(5,("_net_srv_pwset: %d\n", __LINE__));
 475
 476         /* We need the remote machine name for the creds lookup. */
 477         rpcstr_pull(remote_machine,q_u->clnt_id.login.uni_comp_name.buffer,
 478                     sizeof(remote_machine),q_u->clnt_id.login.uni_comp_name.uni_str_len*2,0);
 479
 480         if ( (lp_server_schannel() == True) && (p->auth.auth_type != PIPE_AUTH_TYPE_SCHANNEL) ) {
 481                 /* 'server schannel = yes' should enforce use of
 482                    schannel, the client did offer it in auth2, but
 483                    obviously did not use it. */
 484                 DEBUG(0,("_net_srv_pwset: client %s not using schannel for netlogon\n",
 485                         remote_machine ));
 486                 return NT_STATUS_ACCESS_DENIED;
 487         }
 488
 489         if (!p->dc) {
 490                 /* Restore the saved state of the netlogon creds. */
 491                 become_root();
 492                 ret = secrets_restore_schannel_session_info(p->pipe_state_mem_ctx,
 493                                                         remote_machine,
 494                                                         &p->dc);
 495                 unbecome_root();
 496                 if (!ret) {
 497                         return NT_STATUS_INVALID_HANDLE;
 498                 }
 499         }
 500
 501         if (!p->dc || !p->dc->authenticated) {
 502                 return NT_STATUS_INVALID_HANDLE;
 503         }
 504
 505         DEBUG(3,("_net_srv_pwset: Server Password Set by remote machine:[%s] on account [%s]\n",
 506                         remote_machine, p->dc->mach_acct));
 507
 508         /* Step the creds chain forward. */
 509         if (!creds_server_step(p->dc, &q_u->clnt_id.cred, &cred_out)) {
 510                 DEBUG(2,("_net_srv_pwset: creds_server_step failed. Rejecting auth "
 511                         "request from client %s machine account %s\n",
 512                         remote_machine, p->dc->mach_acct ));
 513                 return NT_STATUS_INVALID_PARAMETER;
 514         }
 515
 516         /* We must store the creds state after an update. */
 517         become_root();
 518         secrets_store_schannel_session_info(p->pipe_state_mem_ctx,
 519                                                 remote_machine,
 520                                                 p->dc);
 521         if ( (sampass = samu_new( NULL )) != NULL ) {
 522                 ret = pdb_getsampwnam(sampass, p->dc->mach_acct);
 523         }
 524         unbecome_root();
 525
 526         if ( !sampass )
 527                 return NT_STATUS_NO_MEMORY;
 528
 529         /* Ensure the account exists and is a machine account. */
 530
 531         acct_ctrl = pdb_get_acct_ctrl(sampass);
 532
 533         if (!(ret
 534               && (acct_ctrl & ACB_WSTRUST ||
 535                       acct_ctrl & ACB_SVRTRUST ||
 536                       acct_ctrl & ACB_DOMTRUST))) {
 537                 TALLOC_FREE(sampass);
 538                 return NT_STATUS_NO_SUCH_USER;
 539         }
 540
 541         if (pdb_get_acct_ctrl(sampass) & ACB_DISABLED) {
 542                 TALLOC_FREE(sampass);
 543                 return NT_STATUS_ACCOUNT_DISABLED;
 544         }
 545
 546         /* Woah - what does this to to the credential chain ? JRA */
 547         cred_hash3( pwd, q_u->pwd, p->dc->sess_key, 0);
 548
 549         DEBUG(100,("Server password set : new given value was :\n"));
 550         for(i = 0; i < sizeof(pwd); i++)
 551                 DEBUG(100,("%02X ", pwd[i]));
 552         DEBUG(100,("\n"));
 553
 554         old_pw = pdb_get_nt_passwd(sampass);
 555
 556         if (old_pw && memcmp(pwd, old_pw, 16) == 0) {
 557                 /* Avoid backend modificiations and other fun if the
 558                    client changed the password to the *same thing* */
 559
 560                 ret = True;
 561         } else {
 562
 563                 /* LM password should be NULL for machines */
 564                 if (!pdb_set_lanman_passwd(sampass, NULL, PDB_CHANGED)) {
 565                         TALLOC_FREE(sampass);
 566                         return NT_STATUS_NO_MEMORY;
 567                 }
 568
 569                 if (!pdb_set_nt_passwd(sampass, pwd, PDB_CHANGED)) {
 570                         TALLOC_FREE(sampass);
 571                         return NT_STATUS_NO_MEMORY;
 572                 }
 573
 574                 if (!pdb_set_pass_changed_now(sampass)) {
 575                         TALLOC_FREE(sampass);
 576                         /* Not quite sure what this one qualifies as, but this will do */
 577                         return NT_STATUS_UNSUCCESSFUL;
 578                 }
 579
 580                 become_root();
 581                 r_u->status = pdb_update_sam_account (sampass);
 582                 unbecome_root();
 583         }
 584
 585         /* set up the LSA Server Password Set response */
 586         init_net_r_srv_pwset(r_u, &cred_out, status);
 587
 588         TALLOC_FREE(sampass);
 589         return r_u->status;
 590 }
 591
 592 /*************************************************************************
 593  _net_sam_logoff:
 594  *************************************************************************/
 595
 596 NTSTATUS _net_sam_logoff(pipes_struct *p, NET_Q_SAM_LOGOFF *q_u, NET_R_SAM_LOGOFF *r_u)
 597 {
 598         fstring remote_machine;
 599
 600         if ( (lp_server_schannel() == True) && (p->auth.auth_type != PIPE_AUTH_TYPE_SCHANNEL) ) {
 601                 /* 'server schannel = yes' should enforce use of
 602                    schannel, the client did offer it in auth2, but
 603                    obviously did not use it. */
 604                 DEBUG(0,("_net_sam_logoff: client %s not using schannel for netlogon\n",
 605                         get_remote_machine_name() ));
 606                 return NT_STATUS_ACCESS_DENIED;
 607         }
 608
 609
 610         if (!get_valid_user_struct(p->vuid))
 611                 return NT_STATUS_NO_SUCH_USER;
 612
 613         /* Get the remote machine name for the creds store. */
 614         rpcstr_pull(remote_machine,q_u->sam_id.client.login.uni_comp_name.buffer,
 615                     sizeof(remote_machine),q_u->sam_id.client.login.uni_comp_name.uni_str_len*2,0);
 616
 617         if (!p->dc) {
 618                 /* Restore the saved state of the netlogon creds. */
 619                 BOOL ret;
 620
 621                 become_root();
 622                 ret = secrets_restore_schannel_session_info(p->pipe_state_mem_ctx,
 623                                                 remote_machine,
 624                                                 &p->dc);
 625                 unbecome_root();
 626                 if (!ret) {
 627                         return NT_STATUS_INVALID_HANDLE;
 628                 }
 629         }
 630
 631         if (!p->dc || !p->dc->authenticated) {
 632                 return NT_STATUS_INVALID_HANDLE;
 633         }
 634
 635         r_u->buffer_creds = 1; /* yes, we have valid server credentials */
 636
 637         /* checks and updates credentials.  creates reply credentials */
 638         if (!creds_server_step(p->dc, &q_u->sam_id.client.cred, &r_u->srv_creds)) {
 639                 DEBUG(2,("_net_sam_logoff: creds_server_step failed. Rejecting auth "
 640                         "request from client %s machine account %s\n",
 641                         remote_machine, p->dc->mach_acct ));
 642                 return NT_STATUS_INVALID_PARAMETER;
 643         }
 644
 645         /* We must store the creds state after an update. */
 646         become_root();
 647         secrets_store_schannel_session_info(p->pipe_state_mem_ctx,
 648                                         remote_machine,
 649                                         p->dc);
 650         unbecome_root();
 651
 652         r_u->status = NT_STATUS_OK;
 653         return r_u->status;
 654 }
 655
 656 /*******************************************************************
 657  gets a domain user's groups from their already-calculated NT_USER_TOKEN
 658  ********************************************************************/
 659
 660 static NTSTATUS nt_token_to_group_list(TALLOC_CTX *mem_ctx,
 661                                        const DOM_SID *domain_sid,
 662                                        size_t num_sids,
 663                                        const DOM_SID *sids,
 664                                        int *numgroups, DOM_GID **pgids)
 665 {
 666         int i;
 667
 668         *numgroups=0;
 669         *pgids = NULL;
 670
 671         for (i=0; i<num_sids; i++) {
 672                 DOM_GID gid;
 673                 if (!sid_peek_check_rid(domain_sid, &sids[i], &gid.g_rid)) {
 674                         continue;
 675                 }
 676                 gid.attr = (SE_GROUP_MANDATORY|SE_GROUP_ENABLED_BY_DEFAULT|
 677                             SE_GROUP_ENABLED);
 678                 ADD_TO_ARRAY(mem_ctx, DOM_GID, gid, pgids, numgroups);
 679                 if (*pgids == NULL) {
 680                         return NT_STATUS_NO_MEMORY;
 681                 }
 682         }
 683         return NT_STATUS_OK;
 684 }
 685
 686 /*************************************************************************
 687  _net_sam_logon
 688  *************************************************************************/
 689
 690 static NTSTATUS _net_sam_logon_internal(pipes_struct *p,
 691                                         NET_Q_SAM_LOGON *q_u,
 692                                         NET_R_SAM_LOGON *r_u,
 693                                         BOOL process_creds)
 694 {
 695         NTSTATUS status = NT_STATUS_OK;
 696         NET_USER_INFO_3 *usr_info = NULL;
 697         NET_ID_INFO_CTR *ctr = q_u->sam_id.ctr;
 698         UNISTR2 *uni_samlogon_user = NULL;
 699         UNISTR2 *uni_samlogon_domain = NULL;
 700         UNISTR2 *uni_samlogon_workstation = NULL;
 701         fstring nt_username, nt_domain, nt_workstation;
 702         auth_usersupplied_info *user_info = NULL;
 703         auth_serversupplied_info *server_info = NULL;
 704         struct samu *sampw;
 705         struct auth_context *auth_context = NULL;
 706
 707         if ( (lp_server_schannel() == True) && (p->auth.auth_type != PIPE_AUTH_TYPE_SCHANNEL) ) {
 708                 /* 'server schannel = yes' should enforce use of
 709                    schannel, the client did offer it in auth2, but
 710                    obviously did not use it. */
 711                 DEBUG(0,("_net_sam_logon_internal: client %s not using schannel for netlogon\n",
 712                         get_remote_machine_name() ));
 713                 return NT_STATUS_ACCESS_DENIED;
 714         }
 715
 716         usr_info = TALLOC_P(p->mem_ctx, NET_USER_INFO_3);
 717         if (!usr_info) {
 718                 return NT_STATUS_NO_MEMORY;
 719         }
 720
 721         ZERO_STRUCTP(usr_info);
 722
 723         /* store the user information, if there is any. */
 724         r_u->user = usr_info;
 725         r_u->auth_resp = 1; /* authoritative response */
 726         if (q_u->validation_level != 2 && q_u->validation_level != 3) {
 727                 DEBUG(0,("_net_sam_logon: bad validation_level value %d.\n", (int)q_u->validation_level ));
 728                 return NT_STATUS_ACCESS_DENIED;
 729         }
 730         /* We handle the return of USER_INFO_2 instead of 3 in the parse return. Sucks, I know... */
 731         r_u->switch_value = q_u->validation_level; /* indicates type of validation user info */
 732         r_u->buffer_creds = 1; /* Ensure we always return server creds. */
 733
 734         if (!get_valid_user_struct(p->vuid))
 735                 return NT_STATUS_NO_SUCH_USER;
 736
 737         if (process_creds) {
 738                 fstring remote_machine;
 739
 740                 /* Get the remote machine name for the creds store. */
 741                 /* Note this is the remote machine this request is coming from (member server),
 742                    not neccessarily the workstation name the user is logging onto.
 743                 */
 744                 rpcstr_pull(remote_machine,q_u->sam_id.client.login.uni_comp_name.buffer,
 745                     sizeof(remote_machine),q_u->sam_id.client.login.uni_comp_name.uni_str_len*2,0);
 746
 747                 if (!p->dc) {
 748                         /* Restore the saved state of the netlogon creds. */
 749                         BOOL ret;
 750
 751                         become_root();
 752                         ret = secrets_restore_schannel_session_info(p->pipe_state_mem_ctx,
 753                                         remote_machine,
 754                                         &p->dc);
 755                         unbecome_root();
 756                         if (!ret) {
 757                                 return NT_STATUS_INVALID_HANDLE;
 758                         }
 759                 }
 760
 761                 if (!p->dc || !p->dc->authenticated) {
 762                         return NT_STATUS_INVALID_HANDLE;
 763                 }
 764
 765                 /* checks and updates credentials.  creates reply credentials */
 766                 if (!creds_server_step(p->dc, &q_u->sam_id.client.cred,  &r_u->srv_creds)) {
 767                         DEBUG(2,("_net_sam_logon: creds_server_step failed. Rejecting auth "
 768                                 "request from client %s machine account %s\n",
 769                                 remote_machine, p->dc->mach_acct ));
 770                         return NT_STATUS_INVALID_PARAMETER;
 771                 }
 772
 773                 /* We must store the creds state after an update. */
 774                 become_root();
 775                 secrets_store_schannel_session_info(p->pipe_state_mem_ctx,
 776                                         remote_machine,
 777                                         p->dc);
 778                 unbecome_root();
 779         }
 780
 781         switch (q_u->sam_id.logon_level) {
 782         case INTERACTIVE_LOGON_TYPE:
 783                 uni_samlogon_user = &ctr->auth.id1.uni_user_name;
 784                 uni_samlogon_domain = &ctr->auth.id1.uni_domain_name;
 785
 786                 uni_samlogon_workstation = &ctr->auth.id1.uni_wksta_name;
 787
 788                 DEBUG(3,("SAM Logon (Interactive). Domain:[%s].  ", lp_workgroup()));
 789                 break;
 790         case NET_LOGON_TYPE:
 791                 uni_samlogon_user = &ctr->auth.id2.uni_user_name;
 792                 uni_samlogon_domain = &ctr->auth.id2.uni_domain_name;
 793                 uni_samlogon_workstation = &ctr->auth.id2.uni_wksta_name;
 794
 795                 DEBUG(3,("SAM Logon (Network). Domain:[%s].  ", lp_workgroup()));
 796                 break;
 797         default:
 798                 DEBUG(2,("SAM Logon: unsupported switch value\n"));
 799                 return NT_STATUS_INVALID_INFO_CLASS;
 800         } /* end switch */
 801
 802         rpcstr_pull(nt_username,uni_samlogon_user->buffer,sizeof(nt_username),uni_samlogon_user->uni_str_len*2,0);
 803         rpcstr_pull(nt_domain,uni_samlogon_domain->buffer,sizeof(nt_domain),uni_samlogon_domain->uni_str_len*2,0);
 804         rpcstr_pull(nt_workstation,uni_samlogon_workstation->buffer,sizeof(nt_workstation),uni_samlogon_workstation->uni_str_len*2,0);
 805
 806         DEBUG(3,("User:[%s@%s] Requested Domain:[%s]\n", nt_username, nt_workstation, nt_domain));
 807         fstrcpy(current_user_info.smb_name, nt_username);
 808         sub_set_smb_name(nt_username);
 809
 810         DEBUG(5,("Attempting validation level %d for unmapped username %s.\n", q_u->sam_id.ctr->switch_value, nt_username));
 811
 812         status = NT_STATUS_OK;
 813
 814         switch (ctr->switch_value) {
 815         case NET_LOGON_TYPE:
 816         {
 817                 const char *wksname = nt_workstation;
 818
 819                 if (!NT_STATUS_IS_OK(status = make_auth_context_fixed(&auth_context, ctr->auth.id2.lm_chal))) {
 820                         return status;
 821                 }
 822
 823                 /* For a network logon, the workstation name comes in with two
 824                  * backslashes in the front. Strip them if they are there. */
 825
 826                 if (*wksname == '\\') wksname++;
 827                 if (*wksname == '\\') wksname++;
 828
 829                 /* Standard challenge/response authenticaion */
 830                 if (!make_user_info_netlogon_network(&user_info,
 831                                                      nt_username, nt_domain,
 832                                                      wksname,
 833                                                      ctr->auth.id2.param_ctrl,
 834                                                      ctr->auth.id2.lm_chal_resp.buffer,
 835                                                      ctr->auth.id2.lm_chal_resp.str_str_len,
 836                                                      ctr->auth.id2.nt_chal_resp.buffer,
 837                                                      ctr->auth.id2.nt_chal_resp.str_str_len)) {
 838                         status = NT_STATUS_NO_MEMORY;
 839                 }
 840                 break;
 841         }
 842         case INTERACTIVE_LOGON_TYPE:
 843                 /* 'Interactive' authentication, supplies the password in its
 844                    MD4 form, encrypted with the session key.  We will convert
 845                    this to challenge/response for the auth subsystem to chew
 846                    on */
 847         {
 848                 const uint8 *chal;
 849
 850                 if (!NT_STATUS_IS_OK(status = make_auth_context_subsystem(&auth_context))) {
 851                         return status;
 852                 }
 853
 854                 chal = auth_context->get_ntlm_challenge(auth_context);
 855
 856                 if (!make_user_info_netlogon_interactive(&user_info,
 857                                                          nt_username, nt_domain,
 858                                                          nt_workstation,
 859                                                          ctr->auth.id1.param_ctrl,
 860                                                          chal,
 861                                                          ctr->auth.id1.lm_owf.data,
 862                                                          ctr->auth.id1.nt_owf.data,
 863                                                          p->dc->sess_key)) {
 864                         status = NT_STATUS_NO_MEMORY;
 865                 }
 866                 break;
 867         }
 868         default:
 869                 DEBUG(2,("SAM Logon: unsupported switch value\n"));
 870                 return NT_STATUS_INVALID_INFO_CLASS;
 871         } /* end switch */
 872
 873         if ( NT_STATUS_IS_OK(status) ) {
 874                 status = auth_context->check_ntlm_password(auth_context,
 875                         user_info, &server_info);
 876         }
 877
 878         (auth_context->free)(&auth_context);
 879         free_user_info(&user_info);
 880
 881         DEBUG(5, ("_net_sam_logon: check_password returned status %s\n",
 882                   nt_errstr(status)));
 883
 884         /* Check account and password */
 885
 886         if (!NT_STATUS_IS_OK(status)) {
 887                 /* If we don't know what this domain is, we need to
 888                    indicate that we are not authoritative.  This
 889                    allows the client to decide if it needs to try
 890                    a local user.  Fix by jpjanosi@us.ibm.com, #2976 */
 891                 if ( NT_STATUS_EQUAL(status, NT_STATUS_NO_SUCH_USER)
 892                      && !strequal(nt_domain, get_global_sam_name())
 893                      && !is_trusted_domain(nt_domain) )
 894                         r_u->auth_resp = 0; /* We are not authoritative */
 895
 896                 TALLOC_FREE(server_info);
 897                 return status;
 898         }
 899
 900         if (server_info->guest) {
 901                 /* We don't like guest domain logons... */
 902                 DEBUG(5,("_net_sam_logon: Attempted domain logon as GUEST "
 903                          "denied.\n"));
 904                 TALLOC_FREE(server_info);
 905                 return NT_STATUS_LOGON_FAILURE;
 906         }
 907
 908         /* This is the point at which, if the login was successful, that
 909            the SAM Local Security Authority should record that the user is
 910            logged in to the domain.  */
 911
 912         {
 913                 DOM_GID *gids = NULL;
 914                 const DOM_SID *user_sid = NULL;
 915                 const DOM_SID *group_sid = NULL;
 916                 DOM_SID domain_sid;
 917                 uint32 user_rid, group_rid;
 918
 919                 int num_gids = 0;
 920                 pstring my_name;
 921                 fstring user_sid_string;
 922                 fstring group_sid_string;
 923                 unsigned char user_session_key[16];
 924                 unsigned char lm_session_key[16];
 925                 unsigned char pipe_session_key[16];
 926
 927                 sampw = server_info->sam_account;
 928
 929                 /* set up pointer indicating user/password failed to be
 930                  * found */
 931                 usr_info->ptr_user_info = 0;
 932
 933                 user_sid = pdb_get_user_sid(sampw);
 934                 group_sid = pdb_get_group_sid(sampw);
 935
 936                 sid_copy(&domain_sid, user_sid);
 937                 sid_split_rid(&domain_sid, &user_rid);
 938
 939                 if (!sid_peek_check_rid(&domain_sid, group_sid, &group_rid)) {
 940                         DEBUG(1, ("_net_sam_logon: user %s\\%s has user sid "
 941                                   "%s\n but group sid %s.\n"
 942                                   "The conflicting domain portions are not "
 943                                   "supported for NETLOGON calls\n",
 944                                   pdb_get_domain(sampw),
 945                                   pdb_get_username(sampw),
 946                                   sid_to_string(user_sid_string, user_sid),
 947                                   sid_to_string(group_sid_string, group_sid)));
 948                         return NT_STATUS_UNSUCCESSFUL;
 949                 }
 950
 951
 952                 if(server_info->login_server) {
 953                         pstrcpy(my_name, server_info->login_server);
 954                 } else {
 955                         pstrcpy(my_name, global_myname());
 956                 }
 957
 958                 status = nt_token_to_group_list(p->mem_ctx, &domain_sid,
 959                                                 server_info->num_sids,
 960                                                 server_info->sids,
 961                                                 &num_gids, &gids);
 962
 963                 if (!NT_STATUS_IS_OK(status)) {
 964                         return status;
 965                 }
 966
 967                 if (server_info->user_session_key.length) {
 968                         memcpy(user_session_key,
 969                                server_info->user_session_key.data,
 970                                MIN(sizeof(user_session_key),
 971                                    server_info->user_session_key.length));
 972                         if (process_creds) {
 973                                 /* Get the pipe session key from the creds. */
 974                                 memcpy(pipe_session_key, p->dc->sess_key, 16);
 975                         } else {
 976                                 /* Get the pipe session key from the schannel. */
 977                                 if (p->auth.auth_type != PIPE_AUTH_TYPE_SCHANNEL || p->auth.a_u.schannel_auth == NULL) {
 978                                         return NT_STATUS_INVALID_HANDLE;
 979                                 }
 980                                 memcpy(pipe_session_key, p->auth.a_u.schannel_auth->sess_key, 16);
 981                         }
 982                         SamOEMhash(user_session_key, pipe_session_key, 16);
 983                         memset(pipe_session_key, '\0', 16);
 984                 }
 985                 if (server_info->lm_session_key.length) {
 986                         memcpy(lm_session_key,
 987                                server_info->lm_session_key.data,
 988                                MIN(sizeof(lm_session_key),
 989                                    server_info->lm_session_key.length));
 990                         if (process_creds) {
 991                                 /* Get the pipe session key from the creds. */
 992                                 memcpy(pipe_session_key, p->dc->sess_key, 16);
 993                         } else {
 994                                 /* Get the pipe session key from the schannel. */
 995                                 if (p->auth.auth_type != PIPE_AUTH_TYPE_SCHANNEL || p->auth.a_u.schannel_auth == NULL) {
 996                                         return NT_STATUS_INVALID_HANDLE;
 997                                 }
 998                                 memcpy(pipe_session_key, p->auth.a_u.schannel_auth->sess_key, 16);
 999                         }
1000                         SamOEMhash(lm_session_key, pipe_session_key, 16);
1001                         memset(pipe_session_key, '\0', 16);
1002                 }
1003
1004                 init_net_user_info3(p->mem_ctx, usr_info,
1005                                     user_rid,
1006                                     group_rid,
1007                                     pdb_get_username(sampw),
1008                                     pdb_get_fullname(sampw),
1009                                     pdb_get_homedir(sampw),
1010                                     pdb_get_dir_drive(sampw),
1011                                     pdb_get_logon_script(sampw),
1012                                     pdb_get_profile_path(sampw),
1013                                     pdb_get_logon_time(sampw),
1014                                     get_time_t_max(),
1015                                     get_time_t_max(),
1016                                     pdb_get_pass_last_set_time(sampw),
1017                                     pdb_get_pass_can_change_time(sampw),
1018                                     pdb_get_pass_must_change_time(sampw),
1019
1020                                     0, /* logon_count */
1021                                     0, /* bad_pw_count */
1022                                     num_gids,    /* uint32 num_groups */
1023                                     gids    , /* DOM_GID *gids */
1024                                     0x20    , /* uint32 user_flgs (?) */
1025                                     server_info->user_session_key.length ? user_session_key : NULL,
1026                                     server_info->lm_session_key.length ? lm_session_key : NULL,
1027                                     my_name     , /* char *logon_srv */
1028                                     pdb_get_domain(sampw),
1029                                     &domain_sid);     /* DOM_SID *dom_sid */
1030                 ZERO_STRUCT(user_session_key);
1031                 ZERO_STRUCT(lm_session_key);
1032         }
1033         TALLOC_FREE(server_info);
1034         return status;
1035 }
1036
1037 /*************************************************************************
1038  _net_sam_logon
1039  *************************************************************************/
1040
1041 NTSTATUS _net_sam_logon(pipes_struct *p, NET_Q_SAM_LOGON *q_u, NET_R_SAM_LOGON *r_u)
1042 {
1043         return _net_sam_logon_internal(p, q_u, r_u, True);
1044 }
1045
1046 /*************************************************************************
1047  _net_sam_logon_ex - no credential chaining. Map into net sam logon.
1048  *************************************************************************/
1049
1050 NTSTATUS _net_sam_logon_ex(pipes_struct *p, NET_Q_SAM_LOGON_EX *q_u, NET_R_SAM_LOGON_EX *r_u)
1051 {
1052         NET_Q_SAM_LOGON q;
1053         NET_R_SAM_LOGON r;
1054
1055         ZERO_STRUCT(q);
1056         ZERO_STRUCT(r);
1057
1058         /* Only allow this if the pipe is protected. */
1059         if (p->auth.auth_type != PIPE_AUTH_TYPE_SCHANNEL) {
1060                 DEBUG(0,("_net_sam_logon_ex: client %s not using schannel for netlogon\n",
1061                         get_remote_machine_name() ));
1062                 return NT_STATUS_INVALID_PARAMETER;
1063         }
1064
1065         /* Map a NET_Q_SAM_LOGON_EX to NET_Q_SAM_LOGON. */
1066         q.validation_level = q_u->validation_level;
1067
1068         /* Map a DOM_SAM_INFO_EX into a DOM_SAM_INFO with no creds. */
1069         q.sam_id.client.login = q_u->sam_id.client;
1070         q.sam_id.logon_level = q_u->sam_id.logon_level;
1071         q.sam_id.ctr = q_u->sam_id.ctr;
1072
1073         r_u->status = _net_sam_logon_internal(p, &q, &r, False);
1074
1075         if (!NT_STATUS_IS_OK(r_u->status)) {
1076                 return r_u->status;
1077         }
1078
1079         /* Map the NET_R_SAM_LOGON to NET_R_SAM_LOGON_EX. */
1080         r_u->switch_value = r.switch_value;
1081         r_u->user = r.user;
1082         r_u->auth_resp = r.auth_resp;
1083         r_u->flags = 0; /* FIXME ! */
1084         return r_u->status;
1085 }
1086
1087 /*************************************************************************
1088  _ds_enum_dom_trusts
1089  *************************************************************************/
1090 #if 0   /* JERRY -- not correct */
1091 NTSTATUS _ds_enum_dom_trusts(pipes_struct *p, DS_Q_ENUM_DOM_TRUSTS *q_u,
1092                              DS_R_ENUM_DOM_TRUSTS *r_u)
1093 {
1094         NTSTATUS status = NT_STATUS_OK;
1095
1096         /* TODO: According to MSDN, the can only be executed against a
1097            DC or domain member running Windows 2000 or later.  Need
1098            to test against a standalone 2k server and see what it
1099            does.  A windows 2000 DC includes its own domain in the
1100            list.  --jerry */
1101
1102         return status;
1103 }
1104 #endif  /* JERRY */