?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Attempt to fix bug #6099. According to Microsoft
[Samba.git] / source / rpc_server / srv_netlog_nt.c
blob4bf9c13dc458c6de835f8d0b1cef320e7ec0b168
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 NTSTATUS get_md4pw(char *md4pw, char *mach_acct, uint16 sec_chan_type)
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 NT_STATUS_NO_MEMORY;
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) {
242 DEBUG(0,("get_md4pw: Workstation %s: no account in domain\n", mach_acct));
243 TALLOC_FREE(sampass);
244 return NT_STATUS_ACCESS_DENIED;
245 }
246
247 acct_ctrl = pdb_get_acct_ctrl(sampass);
248 if (acct_ctrl & ACB_DISABLED) {
249 DEBUG(0,("get_md4pw: Workstation %s: account is disabled\n", mach_acct));
250 TALLOC_FREE(sampass);
251 return NT_STATUS_ACCOUNT_DISABLED;
252 }
253
254 if (!(acct_ctrl & ACB_SVRTRUST) &&
255 !(acct_ctrl & ACB_WSTRUST) &&
256 !(acct_ctrl & ACB_DOMTRUST))
257 {
258 DEBUG(0,("get_md4pw: Workstation %s: account is not a trust account\n", mach_acct));
259 TALLOC_FREE(sampass);
260 return NT_STATUS_NO_TRUST_SAM_ACCOUNT;
261 }
262
263 switch (sec_chan_type) {
264 case SEC_CHAN_BDC:
265 if (!(acct_ctrl & ACB_SVRTRUST)) {
266 DEBUG(0,("get_md4pw: Workstation %s: BDC secure channel requested "
267 "but not a server trust account\n", mach_acct));
268 TALLOC_FREE(sampass);
269 return NT_STATUS_NO_TRUST_SAM_ACCOUNT;
270 }
271 break;
272 case SEC_CHAN_WKSTA:
273 if (!(acct_ctrl & ACB_WSTRUST)) {
274 DEBUG(0,("get_md4pw: Workstation %s: WORKSTATION secure channel requested "
275 "but not a workstation trust account\n", mach_acct));
276 TALLOC_FREE(sampass);
277 return NT_STATUS_NO_TRUST_SAM_ACCOUNT;
278 }
279 break;
280 case SEC_CHAN_DOMAIN:
281 if (!(acct_ctrl & ACB_DOMTRUST)) {
282 DEBUG(0,("get_md4pw: Workstation %s: DOMAIN secure channel requested "
283 "but not a interdomain trust account\n", mach_acct));
284 TALLOC_FREE(sampass);
285 return NT_STATUS_NO_TRUST_SAM_ACCOUNT;
286 }
287 break;
288 default:
289 break;
290 }
291
292 if ((pass = pdb_get_nt_passwd(sampass)) == NULL) {
293 DEBUG(0,("get_md4pw: Workstation %s: account does not have a password\n", mach_acct));
294 TALLOC_FREE(sampass);
295 return NT_STATUS_LOGON_FAILURE;
296 }
297
298 memcpy(md4pw, pass, 16);
299 dump_data(5, md4pw, 16);
300
301 TALLOC_FREE(sampass);
302
303 return NT_STATUS_OK;
304
305
306 }
307
308 /*************************************************************************
309 _net_req_chal
310 *************************************************************************/
311
312 NTSTATUS _net_req_chal(pipes_struct *p, NET_Q_REQ_CHAL *q_u, NET_R_REQ_CHAL *r_u)
313 {
314 if (!p->dc) {
315 p->dc = TALLOC_ZERO_P(p->pipe_state_mem_ctx, struct dcinfo);
316 if (!p->dc) {
317 return NT_STATUS_NO_MEMORY;
318 }
319 } else {
320 DEBUG(10,("_net_req_chal: new challenge requested. Clearing old state.\n"));
321 ZERO_STRUCTP(p->dc);
322 }
323
324 rpcstr_pull(p->dc->remote_machine,
325 q_u->uni_logon_clnt.buffer,
326 sizeof(fstring),q_u->uni_logon_clnt.uni_str_len*2,0);
327
328 /* Save the client challenge to the server. */
329 memcpy(p->dc->clnt_chal.data, q_u->clnt_chal.data, sizeof(q_u->clnt_chal.data));
330
331 /* Create a server challenge for the client */
332 /* Set this to a random value. */
333 generate_random_buffer(p->dc->srv_chal.data, 8);
334
335 /* set up the LSA REQUEST CHALLENGE response */
336 init_net_r_req_chal(r_u, &p->dc->srv_chal, NT_STATUS_OK);
337
338 p->dc->challenge_sent = True;
339
340 return NT_STATUS_OK;
341 }
342
343 /*************************************************************************
344 init_net_r_auth:
345 *************************************************************************/
346
347 static void init_net_r_auth(NET_R_AUTH *r_a, DOM_CHAL *resp_cred, NTSTATUS status)
348 {
349 memcpy(r_a->srv_chal.data, resp_cred->data, sizeof(resp_cred->data));
350 r_a->status = status;
351 }
352
353 /*************************************************************************
354 _net_auth. Create the initial credentials.
355 *************************************************************************/
356
357 NTSTATUS _net_auth(pipes_struct *p, NET_Q_AUTH *q_u, NET_R_AUTH *r_u)
358 {
359 NTSTATUS status;
360 fstring mach_acct;
361 fstring remote_machine;
362 DOM_CHAL srv_chal_out;
363
364 if (!p->dc || !p->dc->challenge_sent) {
365 return NT_STATUS_ACCESS_DENIED;
366 }
367
368 rpcstr_pull(mach_acct, q_u->clnt_id.uni_acct_name.buffer,sizeof(fstring),
369 q_u->clnt_id.uni_acct_name.uni_str_len*2,0);
370 rpcstr_pull(remote_machine, q_u->clnt_id.uni_comp_name.buffer,sizeof(fstring),
371 q_u->clnt_id.uni_comp_name.uni_str_len*2,0);
372
373 status = get_md4pw((char *)p->dc->mach_pw, mach_acct, q_u->clnt_id.sec_chan);
374 if (!NT_STATUS_IS_OK(status)) {
375 DEBUG(0,("_net_auth: creds_server_check failed. Failed to "
376 "get password for machine account %s "
377 "from client %s: %s\n",
378 mach_acct, remote_machine, nt_errstr(status) ));
379 /* always return NT_STATUS_ACCESS_DENIED */
380 return NT_STATUS_ACCESS_DENIED;
381 }
382
383 /* From the client / server challenges and md4 password, generate sess key */
384 creds_server_init(0, /* No neg flags. */
385 p->dc,
386 &p->dc->clnt_chal, /* Stored client chal. */
387 &p->dc->srv_chal, /* Stored server chal. */
388 p->dc->mach_pw,
389 &srv_chal_out);
390
391 /* Check client credentials are valid. */
392 if (!creds_server_check(p->dc, &q_u->clnt_chal)) {
393 DEBUG(0,("_net_auth: creds_server_check failed. Rejecting auth "
394 "request from client %s machine account %s\n",
395 remote_machine, mach_acct ));
396 return NT_STATUS_ACCESS_DENIED;
397 }
398
399 fstrcpy(p->dc->mach_acct, mach_acct);
400 fstrcpy(p->dc->remote_machine, remote_machine);
401 p->dc->authenticated = True;
402
403 /* set up the LSA AUTH response */
404 /* Return the server credentials. */
405 init_net_r_auth(r_u, &srv_chal_out, NT_STATUS_OK);
406
407 return r_u->status;
408 }
409
410 /*************************************************************************
411 init_net_r_auth_2:
412 *************************************************************************/
413
414 static void init_net_r_auth_2(NET_R_AUTH_2 *r_a,
415 DOM_CHAL *resp_cred, NEG_FLAGS *flgs, NTSTATUS status)
416 {
417 memcpy(r_a->srv_chal.data, resp_cred->data, sizeof(resp_cred->data));
418 memcpy(&r_a->srv_flgs, flgs, sizeof(r_a->srv_flgs));
419 r_a->status = status;
420 }
421
422 /*************************************************************************
423 _net_auth_2
424 *************************************************************************/
425
426 NTSTATUS _net_auth_2(pipes_struct *p, NET_Q_AUTH_2 *q_u, NET_R_AUTH_2 *r_u)
427 {
428 NTSTATUS status;
429 NEG_FLAGS srv_flgs;
430 fstring mach_acct;
431 fstring remote_machine;
432 DOM_CHAL srv_chal_out;
433
434 /* According to Microsoft (see bugid #6099)
435 * Windows 7 looks at the negotiate_flags
436 * returned in this structure *even if the
437 * call fails with access denied ! So in order
438 * to allow Win7 to connect to a Samba NT style
439 * PDC we set the flags before we know if it's
440 * an error or not.
441 */
442
443 srv_flgs.neg_flags = 0x000001ff;
444
445 if (lp_server_schannel() != False) {
446 srv_flgs.neg_flags |= NETLOGON_NEG_SCHANNEL;
447 }
448
449 /* set up the initial LSA AUTH 2 response */
450 ZERO_STRUCT(srv_chal_out);
451 init_net_r_auth_2(r_u, &srv_chal_out, &srv_flgs, NT_STATUS_OK);
452
453 rpcstr_pull(mach_acct, q_u->clnt_id.uni_acct_name.buffer,sizeof(fstring),
454 q_u->clnt_id.uni_acct_name.uni_str_len*2,0);
455
456 /* We use this as the key to store the creds. */
457 rpcstr_pull(remote_machine, q_u->clnt_id.uni_comp_name.buffer,sizeof(fstring),
458 q_u->clnt_id.uni_comp_name.uni_str_len*2,0);
459
460 if (!p->dc || !p->dc->challenge_sent) {
461 DEBUG(0,("_net_auth2: no challenge sent to client %s\n",
462 remote_machine ));
463 return NT_STATUS_ACCESS_DENIED;
464 }
465
466 if ( (lp_server_schannel() == True) &&
467 ((q_u->clnt_flgs.neg_flags & NETLOGON_NEG_SCHANNEL) == 0) ) {
468
469 /* schannel must be used, but client did not offer it. */
470 DEBUG(0,("_net_auth2: schannel required but client failed "
471 "to offer it. Client was %s\n",
472 mach_acct ));
473 return NT_STATUS_ACCESS_DENIED;
474 }
475
476 status = get_md4pw((char *)p->dc->mach_pw, mach_acct, q_u->clnt_id.sec_chan);
477 if (!NT_STATUS_IS_OK(status)) {
478 DEBUG(0,("_net_auth2: failed to get machine password for "
479 "account %s: %s\n",
480 mach_acct, nt_errstr(status) ));
481 /* always return NT_STATUS_ACCESS_DENIED */
482 return NT_STATUS_ACCESS_DENIED;
483 }
484
485 /* From the client / server challenges and md4 password, generate sess key */
486 creds_server_init(q_u->clnt_flgs.neg_flags,
487 p->dc,
488 &p->dc->clnt_chal, /* Stored client chal. */
489 &p->dc->srv_chal, /* Stored server chal. */
490 p->dc->mach_pw,
491 &srv_chal_out);
492
493 /* Check client credentials are valid. */
494 if (!creds_server_check(p->dc, &q_u->clnt_chal)) {
495 DEBUG(0,("_net_auth2: creds_server_check failed. Rejecting auth "
496 "request from client %s machine account %s\n",
497 remote_machine, mach_acct ));
498 return NT_STATUS_ACCESS_DENIED;
499 }
500
501 /* set up the real LSA AUTH 2 response */
502 init_net_r_auth_2(r_u, &srv_chal_out, &srv_flgs, NT_STATUS_OK);
503
504 fstrcpy(p->dc->mach_acct, mach_acct);
505 fstrcpy(p->dc->remote_machine, remote_machine);
506 fstrcpy(p->dc->domain, lp_workgroup() );
507
508 p->dc->authenticated = True;
509
510 /* Store off the state so we can continue after client disconnect. */
511 become_root();
512 secrets_store_schannel_session_info(p->mem_ctx,
513 remote_machine,
514 p->dc);
515 unbecome_root();
516
517 return r_u->status;
518 }
519
520 /*************************************************************************
521 _net_srv_pwset
522 *************************************************************************/
523
524 NTSTATUS _net_srv_pwset(pipes_struct *p, NET_Q_SRV_PWSET *q_u, NET_R_SRV_PWSET *r_u)
525 {
526 fstring remote_machine;
527 struct samu *sampass=NULL;
528 BOOL ret = False;
529 unsigned char pwd[16];
530 int i;
531 uint32 acct_ctrl;
532 DOM_CRED cred_out;
533 const uchar *old_pw;
534
535 DEBUG(5,("_net_srv_pwset: %d\n", __LINE__));
536
537 /* We need the remote machine name for the creds lookup. */
538 rpcstr_pull(remote_machine,q_u->clnt_id.login.uni_comp_name.buffer,
539 sizeof(remote_machine),q_u->clnt_id.login.uni_comp_name.uni_str_len*2,0);
540
541 if ( (lp_server_schannel() == True) && (p->auth.auth_type != PIPE_AUTH_TYPE_SCHANNEL) ) {
542 /* 'server schannel = yes' should enforce use of
543 schannel, the client did offer it in auth2, but
544 obviously did not use it. */
545 DEBUG(0,("_net_srv_pwset: client %s not using schannel for netlogon\n",
546 remote_machine ));
547 return NT_STATUS_ACCESS_DENIED;
548 }
549
550 if (!p->dc) {
551 /* Restore the saved state of the netlogon creds. */
552 become_root();
553 ret = secrets_restore_schannel_session_info(p->pipe_state_mem_ctx,
554 remote_machine,
555 &p->dc);
556 unbecome_root();
557 if (!ret) {
558 return NT_STATUS_INVALID_HANDLE;
559 }
560 }
561
562 if (!p->dc || !p->dc->authenticated) {
563 return NT_STATUS_INVALID_HANDLE;
564 }
565
566 DEBUG(3,("_net_srv_pwset: Server Password Set by remote machine:[%s] on account [%s]\n",
567 remote_machine, p->dc->mach_acct));
568
569 /* Step the creds chain forward. */
570 if (!creds_server_step(p->dc, &q_u->clnt_id.cred, &cred_out)) {
571 DEBUG(2,("_net_srv_pwset: creds_server_step failed. Rejecting auth "
572 "request from client %s machine account %s\n",
573 remote_machine, p->dc->mach_acct ));
574 return NT_STATUS_INVALID_PARAMETER;
575 }
576
577 /* We must store the creds state after an update. */
578 sampass = samu_new( NULL );
579 if (!sampass) {
580 return NT_STATUS_NO_MEMORY;
581 }
582
583 become_root();
584 secrets_store_schannel_session_info(p->pipe_state_mem_ctx,
585 remote_machine,
586 p->dc);
587 ret = pdb_getsampwnam(sampass, p->dc->mach_acct);
588 unbecome_root();
589
590 if (!ret) {
591 TALLOC_FREE(sampass);
592 return NT_STATUS_ACCESS_DENIED;
593 }
594
595 /* Ensure the account exists and is a machine account. */
596
597 acct_ctrl = pdb_get_acct_ctrl(sampass);
598
599 if (!(acct_ctrl & ACB_WSTRUST ||
600 acct_ctrl & ACB_SVRTRUST ||
601 acct_ctrl & ACB_DOMTRUST)) {
602 TALLOC_FREE(sampass);
603 return NT_STATUS_NO_SUCH_USER;
604 }
605
606 if (pdb_get_acct_ctrl(sampass) & ACB_DISABLED) {
607 TALLOC_FREE(sampass);
608 return NT_STATUS_ACCOUNT_DISABLED;
609 }
610
611 /* Woah - what does this to to the credential chain ? JRA */
612 cred_hash3( pwd, q_u->pwd, p->dc->sess_key, 0);
613
614 DEBUG(100,("Server password set : new given value was :\n"));
615 for(i = 0; i < sizeof(pwd); i++)
616 DEBUG(100,("%02X ", pwd[i]));
617 DEBUG(100,("\n"));
618
619 old_pw = pdb_get_nt_passwd(sampass);
620
621 if (old_pw && memcmp(pwd, old_pw, 16) == 0) {
622 /* Avoid backend modificiations and other fun if the
623 client changed the password to the *same thing* */
624
625 ret = True;
626 } else {
627
628 /* LM password should be NULL for machines */
629 if (!pdb_set_lanman_passwd(sampass, NULL, PDB_CHANGED)) {
630 TALLOC_FREE(sampass);
631 return NT_STATUS_NO_MEMORY;
632 }
633
634 if (!pdb_set_nt_passwd(sampass, pwd, PDB_CHANGED)) {
635 TALLOC_FREE(sampass);
636 return NT_STATUS_NO_MEMORY;
637 }
638
639 if (!pdb_set_pass_last_set_time(sampass, time(NULL), PDB_CHANGED)) {
640 TALLOC_FREE(sampass);
641 /* Not quite sure what this one qualifies as, but this will do */
642 return NT_STATUS_UNSUCCESSFUL;
643 }
644
645 become_root();
646 r_u->status = pdb_update_sam_account(sampass);
647 unbecome_root();
648 }
649
650 /* set up the LSA Server Password Set response */
651 init_net_r_srv_pwset(r_u, &cred_out, r_u->status);
652
653 TALLOC_FREE(sampass);
654 return r_u->status;
655 }
656
657 /*************************************************************************
658 _net_sam_logoff:
659 *************************************************************************/
660
661 NTSTATUS _net_sam_logoff(pipes_struct *p, NET_Q_SAM_LOGOFF *q_u, NET_R_SAM_LOGOFF *r_u)
662 {
663 fstring remote_machine;
664
665 if ( (lp_server_schannel() == True) && (p->auth.auth_type != PIPE_AUTH_TYPE_SCHANNEL) ) {
666 /* 'server schannel = yes' should enforce use of
667 schannel, the client did offer it in auth2, but
668 obviously did not use it. */
669 DEBUG(0,("_net_sam_logoff: client %s not using schannel for netlogon\n",
670 get_remote_machine_name() ));
671 return NT_STATUS_ACCESS_DENIED;
672 }
673
674
675 if (!get_valid_user_struct(p->vuid))
676 return NT_STATUS_NO_SUCH_USER;
677
678 /* Get the remote machine name for the creds store. */
679 rpcstr_pull(remote_machine,q_u->sam_id.client.login.uni_comp_name.buffer,
680 sizeof(remote_machine),q_u->sam_id.client.login.uni_comp_name.uni_str_len*2,0);
681
682 if (!p->dc) {
683 /* Restore the saved state of the netlogon creds. */
684 BOOL ret;
685
686 become_root();
687 ret = secrets_restore_schannel_session_info(p->pipe_state_mem_ctx,
688 remote_machine,
689 &p->dc);
690 unbecome_root();
691 if (!ret) {
692 return NT_STATUS_INVALID_HANDLE;
693 }
694 }
695
696 if (!p->dc || !p->dc->authenticated) {
697 return NT_STATUS_INVALID_HANDLE;
698 }
699
700 r_u->buffer_creds = 1; /* yes, we have valid server credentials */
701
702 /* checks and updates credentials. creates reply credentials */
703 if (!creds_server_step(p->dc, &q_u->sam_id.client.cred, &r_u->srv_creds)) {
704 DEBUG(2,("_net_sam_logoff: creds_server_step failed. Rejecting auth "
705 "request from client %s machine account %s\n",
706 remote_machine, p->dc->mach_acct ));
707 return NT_STATUS_INVALID_PARAMETER;
708 }
709
710 /* We must store the creds state after an update. */
711 become_root();
712 secrets_store_schannel_session_info(p->pipe_state_mem_ctx,
713 remote_machine,
714 p->dc);
715 unbecome_root();
716
717 r_u->status = NT_STATUS_OK;
718 return r_u->status;
719 }
720
721 /*******************************************************************
722 gets a domain user's groups from their already-calculated NT_USER_TOKEN
723 ********************************************************************/
724
725 static NTSTATUS nt_token_to_group_list(TALLOC_CTX *mem_ctx,
726 const DOM_SID *domain_sid,
727 size_t num_sids,
728 const DOM_SID *sids,
729 int *numgroups, DOM_GID **pgids)
730 {
731 int i;
732
733 *numgroups=0;
734 *pgids = NULL;
735
736 for (i=0; i<num_sids; i++) {
737 DOM_GID gid;
738 if (!sid_peek_check_rid(domain_sid, &sids[i], &gid.g_rid)) {
739 continue;
740 }
741 gid.attr = (SE_GROUP_MANDATORY|SE_GROUP_ENABLED_BY_DEFAULT|
742 SE_GROUP_ENABLED);
743 ADD_TO_ARRAY(mem_ctx, DOM_GID, gid, pgids, numgroups);
744 if (*pgids == NULL) {
745 return NT_STATUS_NO_MEMORY;
746 }
747 }
748 return NT_STATUS_OK;
749 }
750
751 /*************************************************************************
752 _net_sam_logon
753 *************************************************************************/
754
755 static NTSTATUS _net_sam_logon_internal(pipes_struct *p,
756 NET_Q_SAM_LOGON *q_u,
757 NET_R_SAM_LOGON *r_u,
758 BOOL process_creds)
759 {
760 NTSTATUS status = NT_STATUS_OK;
761 NET_USER_INFO_3 *usr_info = NULL;
762 NET_ID_INFO_CTR *ctr = q_u->sam_id.ctr;
763 UNISTR2 *uni_samlogon_user = NULL;
764 UNISTR2 *uni_samlogon_domain = NULL;
765 UNISTR2 *uni_samlogon_workstation = NULL;
766 fstring nt_username, nt_domain, nt_workstation;
767 auth_usersupplied_info *user_info = NULL;
768 auth_serversupplied_info *server_info = NULL;
769 struct samu *sampw;
770 struct auth_context *auth_context = NULL;
771
772 if ( (lp_server_schannel() == True) && (p->auth.auth_type != PIPE_AUTH_TYPE_SCHANNEL) ) {
773 /* 'server schannel = yes' should enforce use of
774 schannel, the client did offer it in auth2, but
775 obviously did not use it. */
776 DEBUG(0,("_net_sam_logon_internal: client %s not using schannel for netlogon\n",
777 get_remote_machine_name() ));
778 return NT_STATUS_ACCESS_DENIED;
779 }
780
781 usr_info = TALLOC_P(p->mem_ctx, NET_USER_INFO_3);
782 if (!usr_info) {
783 return NT_STATUS_NO_MEMORY;
784 }
785
786 ZERO_STRUCTP(usr_info);
787
788 /* store the user information, if there is any. */
789 r_u->user = usr_info;
790 r_u->auth_resp = 1; /* authoritative response */
791 if (q_u->validation_level != 2 && q_u->validation_level != 3) {
792 DEBUG(0,("_net_sam_logon: bad validation_level value %d.\n", (int)q_u->validation_level ));
793 return NT_STATUS_ACCESS_DENIED;
794 }
795 /* We handle the return of USER_INFO_2 instead of 3 in the parse return. Sucks, I know... */
796 r_u->switch_value = q_u->validation_level; /* indicates type of validation user info */
797 r_u->buffer_creds = 1; /* Ensure we always return server creds. */
798
799 if (!get_valid_user_struct(p->vuid))
800 return NT_STATUS_NO_SUCH_USER;
801
802 if (process_creds) {
803 fstring remote_machine;
804
805 /* Get the remote machine name for the creds store. */
806 /* Note this is the remote machine this request is coming from (member server),
807 not neccessarily the workstation name the user is logging onto.
808 */
809 rpcstr_pull(remote_machine,q_u->sam_id.client.login.uni_comp_name.buffer,
810 sizeof(remote_machine),q_u->sam_id.client.login.uni_comp_name.uni_str_len*2,0);
811
812 if (!p->dc) {
813 /* Restore the saved state of the netlogon creds. */
814 BOOL ret;
815
816 become_root();
817 ret = secrets_restore_schannel_session_info(p->pipe_state_mem_ctx,
818 remote_machine,
819 &p->dc);
820 unbecome_root();
821 if (!ret) {
822 return NT_STATUS_INVALID_HANDLE;
823 }
824 }
825
826 if (!p->dc || !p->dc->authenticated) {
827 return NT_STATUS_INVALID_HANDLE;
828 }
829
830 /* checks and updates credentials. creates reply credentials */
831 if (!creds_server_step(p->dc, &q_u->sam_id.client.cred, &r_u->srv_creds)) {
832 DEBUG(2,("_net_sam_logon: creds_server_step failed. Rejecting auth "
833 "request from client %s machine account %s\n",
834 remote_machine, p->dc->mach_acct ));
835 return NT_STATUS_INVALID_PARAMETER;
836 }
837
838 /* We must store the creds state after an update. */
839 become_root();
840 secrets_store_schannel_session_info(p->pipe_state_mem_ctx,
841 remote_machine,
842 p->dc);
843 unbecome_root();
844 }
845
846 switch (q_u->sam_id.logon_level) {
847 case INTERACTIVE_LOGON_TYPE:
848 uni_samlogon_user = &ctr->auth.id1.uni_user_name;
849 uni_samlogon_domain = &ctr->auth.id1.uni_domain_name;
850
851 uni_samlogon_workstation = &ctr->auth.id1.uni_wksta_name;
852
853 DEBUG(3,("SAM Logon (Interactive). Domain:[%s]. ", lp_workgroup()));
854 break;
855 case NET_LOGON_TYPE:
856 uni_samlogon_user = &ctr->auth.id2.uni_user_name;
857 uni_samlogon_domain = &ctr->auth.id2.uni_domain_name;
858 uni_samlogon_workstation = &ctr->auth.id2.uni_wksta_name;
859
860 DEBUG(3,("SAM Logon (Network). Domain:[%s]. ", lp_workgroup()));
861 break;
862 default:
863 DEBUG(2,("SAM Logon: unsupported switch value\n"));
864 return NT_STATUS_INVALID_INFO_CLASS;
865 } /* end switch */
866
867 rpcstr_pull(nt_username,uni_samlogon_user->buffer,sizeof(nt_username),uni_samlogon_user->uni_str_len*2,0);
868 rpcstr_pull(nt_domain,uni_samlogon_domain->buffer,sizeof(nt_domain),uni_samlogon_domain->uni_str_len*2,0);
869 rpcstr_pull(nt_workstation,uni_samlogon_workstation->buffer,sizeof(nt_workstation),uni_samlogon_workstation->uni_str_len*2,0);
870
871 DEBUG(3,("User:[%s@%s] Requested Domain:[%s]\n", nt_username, nt_workstation, nt_domain));
872 fstrcpy(current_user_info.smb_name, nt_username);
873 sub_set_smb_name(nt_username);
874
875 DEBUG(5,("Attempting validation level %d for unmapped username %s.\n", q_u->sam_id.ctr->switch_value, nt_username));
876
877 status = NT_STATUS_OK;
878
879 switch (ctr->switch_value) {
880 case NET_LOGON_TYPE:
881 {
882 const char *wksname = nt_workstation;
883
884 if (!NT_STATUS_IS_OK(status = make_auth_context_fixed(&auth_context, ctr->auth.id2.lm_chal))) {
885 return status;
886 }
887
888 /* For a network logon, the workstation name comes in with two
889 * backslashes in the front. Strip them if they are there. */
890
891 if (*wksname == '\\') wksname++;
892 if (*wksname == '\\') wksname++;
893
894 /* Standard challenge/response authenticaion */
895 if (!make_user_info_netlogon_network(&user_info,
896 nt_username, nt_domain,
897 wksname,
898 ctr->auth.id2.param_ctrl,
899 ctr->auth.id2.lm_chal_resp.buffer,
900 ctr->auth.id2.lm_chal_resp.str_str_len,
901 ctr->auth.id2.nt_chal_resp.buffer,
902 ctr->auth.id2.nt_chal_resp.str_str_len)) {
903 status = NT_STATUS_NO_MEMORY;
904 }
905 break;
906 }
907 case INTERACTIVE_LOGON_TYPE:
908 /* 'Interactive' authentication, supplies the password in its
909 MD4 form, encrypted with the session key. We will convert
910 this to challenge/response for the auth subsystem to chew
911 on */
912 {
913 const uint8 *chal;
914
915 if (!NT_STATUS_IS_OK(status = make_auth_context_subsystem(&auth_context))) {
916 return status;
917 }
918
919 chal = auth_context->get_ntlm_challenge(auth_context);
920
921 if (!make_user_info_netlogon_interactive(&user_info,
922 nt_username, nt_domain,
923 nt_workstation,
924 ctr->auth.id1.param_ctrl,
925 chal,
926 ctr->auth.id1.lm_owf.data,
927 ctr->auth.id1.nt_owf.data,
928 p->dc->sess_key)) {
929 status = NT_STATUS_NO_MEMORY;
930 }
931 break;
932 }
933 default:
934 DEBUG(2,("SAM Logon: unsupported switch value\n"));
935 return NT_STATUS_INVALID_INFO_CLASS;
936 } /* end switch */
937
938 if ( NT_STATUS_IS_OK(status) ) {
939 status = auth_context->check_ntlm_password(auth_context,
940 user_info, &server_info);
941 }
942
943 (auth_context->free)(&auth_context);
944 free_user_info(&user_info);
945
946 DEBUG(5, ("_net_sam_logon: check_password returned status %s\n",
947 nt_errstr(status)));
948
949 /* Check account and password */
950
951 if (!NT_STATUS_IS_OK(status)) {
952 /* If we don't know what this domain is, we need to
953 indicate that we are not authoritative. This
954 allows the client to decide if it needs to try
955 a local user. Fix by jpjanosi@us.ibm.com, #2976 */
956 if ( NT_STATUS_EQUAL(status, NT_STATUS_NO_SUCH_USER)
957 && !strequal(nt_domain, get_global_sam_name())
958 && !is_trusted_domain(nt_domain) )
959 r_u->auth_resp = 0; /* We are not authoritative */
960
961 TALLOC_FREE(server_info);
962 return status;
963 }
964
965 if (server_info->guest) {
966 /* We don't like guest domain logons... */
967 DEBUG(5,("_net_sam_logon: Attempted domain logon as GUEST "
968 "denied.\n"));
969 TALLOC_FREE(server_info);
970 return NT_STATUS_LOGON_FAILURE;
971 }
972
973 /* This is the point at which, if the login was successful, that
974 the SAM Local Security Authority should record that the user is
975 logged in to the domain. */
976
977 {
978 DOM_GID *gids = NULL;
979 const DOM_SID *user_sid = NULL;
980 const DOM_SID *group_sid = NULL;
981 DOM_SID domain_sid;
982 uint32 user_rid, group_rid;
983
984 int num_gids = 0;
985 pstring my_name;
986 fstring user_sid_string;
987 fstring group_sid_string;
988 unsigned char user_session_key[16];
989 unsigned char lm_session_key[8];
990 unsigned char pipe_session_key[16];
991
992 sampw = server_info->sam_account;
993
994 /* set up pointer indicating user/password failed to be
995 * found */
996 usr_info->ptr_user_info = 0;
997
998 user_sid = pdb_get_user_sid(sampw);
999 group_sid = pdb_get_group_sid(sampw);
1000
1001 if ((user_sid == NULL) || (group_sid == NULL)) {
1002 DEBUG(1, ("_net_sam_logon: User without group or user SID\n"));
1003 return NT_STATUS_UNSUCCESSFUL;
1004 }
1005
1006 sid_copy(&domain_sid, user_sid);
1007 sid_split_rid(&domain_sid, &user_rid);
1008
1009 if (!sid_peek_check_rid(&domain_sid, group_sid, &group_rid)) {
1010 DEBUG(1, ("_net_sam_logon: user %s\\%s has user sid "
1011 "%s\n but group sid %s.\n"
1012 "The conflicting domain portions are not "
1013 "supported for NETLOGON calls\n",
1014 pdb_get_domain(sampw),
1015 pdb_get_username(sampw),
1016 sid_to_string(user_sid_string, user_sid),
1017 sid_to_string(group_sid_string, group_sid)));
1018 return NT_STATUS_UNSUCCESSFUL;
1019 }
1020
1021
1022 if(server_info->login_server) {
1023 pstrcpy(my_name, server_info->login_server);
1024 } else {
1025 pstrcpy(my_name, global_myname());
1026 }
1027
1028 status = nt_token_to_group_list(p->mem_ctx, &domain_sid,
1029 server_info->num_sids,
1030 server_info->sids,
1031 &num_gids, &gids);
1032
1033 if (!NT_STATUS_IS_OK(status)) {
1034 return status;
1035 }
1036
1037 if (server_info->user_session_key.length) {
1038 memcpy(user_session_key,
1039 server_info->user_session_key.data,
1040 MIN(sizeof(user_session_key),
1041 server_info->user_session_key.length));
1042 if (process_creds) {
1043 /* Get the pipe session key from the creds. */
1044 memcpy(pipe_session_key, p->dc->sess_key, 16);
1045 } else {
1046 /* Get the pipe session key from the schannel. */
1047 if (p->auth.auth_type != PIPE_AUTH_TYPE_SCHANNEL || p->auth.a_u.schannel_auth == NULL) {
1048 return NT_STATUS_INVALID_HANDLE;
1049 }
1050 memcpy(pipe_session_key, p->auth.a_u.schannel_auth->sess_key, 16);
1051 }
1052 SamOEMhash(user_session_key, pipe_session_key, 16);
1053 memset(pipe_session_key, '\0', 16);
1054 }
1055 if (server_info->lm_session_key.length) {
1056 memcpy(lm_session_key,
1057 server_info->lm_session_key.data,
1058 MIN(sizeof(lm_session_key),
1059 server_info->lm_session_key.length));
1060 if (process_creds) {
1061 /* Get the pipe session key from the creds. */
1062 memcpy(pipe_session_key, p->dc->sess_key, 16);
1063 } else {
1064 /* Get the pipe session key from the schannel. */
1065 if (p->auth.auth_type != PIPE_AUTH_TYPE_SCHANNEL || p->auth.a_u.schannel_auth == NULL) {
1066 return NT_STATUS_INVALID_HANDLE;
1067 }
1068 memcpy(pipe_session_key, p->auth.a_u.schannel_auth->sess_key, 16);
1069 }
1070 SamOEMhash(lm_session_key, pipe_session_key, 8);
1071 memset(pipe_session_key, '\0', 16);
1072 }
1073
1074 init_net_user_info3(p->mem_ctx, usr_info,
1075 user_rid,
1076 group_rid,
1077 pdb_get_username(sampw),
1078 pdb_get_fullname(sampw),
1079 pdb_get_homedir(sampw),
1080 pdb_get_dir_drive(sampw),
1081 pdb_get_logon_script(sampw),
1082 pdb_get_profile_path(sampw),
1083 pdb_get_logon_time(sampw),
1084 get_time_t_max(),
1085 get_time_t_max(),
1086 pdb_get_pass_last_set_time(sampw),
1087 pdb_get_pass_can_change_time(sampw),
1088 pdb_get_pass_must_change_time(sampw),
1089 0, /* logon_count */
1090 0, /* bad_pw_count */
1091 num_gids, /* uint32 num_groups */
1092 gids , /* DOM_GID *gids */
1093 LOGON_EXTRA_SIDS, /* uint32 user_flgs (?) */
1094 pdb_get_acct_ctrl(sampw),
1095 server_info->user_session_key.length ? user_session_key : NULL,
1096 server_info->lm_session_key.length ? lm_session_key : NULL,
1097 my_name , /* char *logon_srv */
1098 pdb_get_domain(sampw),
1099 &domain_sid); /* DOM_SID *dom_sid */
1100 ZERO_STRUCT(user_session_key);
1101 ZERO_STRUCT(lm_session_key);
1102 }
1103 TALLOC_FREE(server_info);
1104 return status;
1105 }
1106
1107 /*************************************************************************
1108 _net_sam_logon
1109 *************************************************************************/
1110
1111 NTSTATUS _net_sam_logon(pipes_struct *p, NET_Q_SAM_LOGON *q_u, NET_R_SAM_LOGON *r_u)
1112 {
1113 return _net_sam_logon_internal(p, q_u, r_u, True);
1114 }
1115
1116 /*************************************************************************
1117 _net_sam_logon_ex - no credential chaining. Map into net sam logon.
1118 *************************************************************************/
1119
1120 NTSTATUS _net_sam_logon_ex(pipes_struct *p, NET_Q_SAM_LOGON_EX *q_u, NET_R_SAM_LOGON_EX *r_u)
1121 {
1122 NET_Q_SAM_LOGON q;
1123 NET_R_SAM_LOGON r;
1124
1125 ZERO_STRUCT(q);
1126 ZERO_STRUCT(r);
1127
1128 /* Only allow this if the pipe is protected. */
1129 if (p->auth.auth_type != PIPE_AUTH_TYPE_SCHANNEL) {
1130 DEBUG(0,("_net_sam_logon_ex: client %s not using schannel for netlogon\n",
1131 get_remote_machine_name() ));
1132 return NT_STATUS_INVALID_PARAMETER;
1133 }
1134
1135 /* Map a NET_Q_SAM_LOGON_EX to NET_Q_SAM_LOGON. */
1136 q.validation_level = q_u->validation_level;
1137
1138 /* Map a DOM_SAM_INFO_EX into a DOM_SAM_INFO with no creds. */
1139 q.sam_id.client.login = q_u->sam_id.client;
1140 q.sam_id.logon_level = q_u->sam_id.logon_level;
1141 q.sam_id.ctr = q_u->sam_id.ctr;
1142
1143 r_u->status = _net_sam_logon_internal(p, &q, &r, False);
1144
1145 if (!NT_STATUS_IS_OK(r_u->status)) {
1146 return r_u->status;
1147 }
1148
1149 /* Map the NET_R_SAM_LOGON to NET_R_SAM_LOGON_EX. */
1150 r_u->switch_value = r.switch_value;
1151 r_u->user = r.user;
1152 r_u->auth_resp = r.auth_resp;
1153 r_u->flags = 0; /* FIXME ! */
1154 return r_u->status;
1155 }
1156
1157 /*************************************************************************
1158 _ds_enum_dom_trusts
1159 *************************************************************************/
1160 #if 0 /* JERRY -- not correct */
1161 NTSTATUS _ds_enum_dom_trusts(pipes_struct *p, DS_Q_ENUM_DOM_TRUSTS *q_u,
1162 DS_R_ENUM_DOM_TRUSTS *r_u)
1163 {
1164 NTSTATUS status = NT_STATUS_OK;
1165
1166 /* TODO: According to MSDN, the can only be executed against a
1167 DC or domain member running Windows 2000 or later. Need
1168 to test against a standalone 2k server and see what it
1169 does. A windows 2000 DC includes its own domain in the
1170 list. --jerry */
1171
1172 return status;
1173 }
1174 #endif /* JERRY */
Samba GIT mirror