Merge commit 'origin/v3-2-test' into v3-2-stable
[metze/samba/wip.git] / source3 / auth / auth_domain.c
1 /* 
2    Unix SMB/CIFS implementation.
3    Authenticate against a remote domain
4    Copyright (C) Andrew Tridgell 1992-1998
5    Copyright (C) Andrew Bartlett 2001
6    
7    This program is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 3 of the License, or
10    (at your option) any later version.
11    
12    This program is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16    
17    You should have received a copy of the GNU General Public License
18    along with this program.  If not, see <http://www.gnu.org/licenses/>.
19 */
20
21 #include "includes.h"
22
23 #undef DBGC_CLASS
24 #define DBGC_CLASS DBGC_AUTH
25
26 extern bool global_machine_password_needs_changing;
27
28 /**
29  * Connect to a remote server for (inter)domain security authenticaion.
30  *
31  * @param cli the cli to return containing the active connection
32  * @param server either a machine name or text IP address to
33  *               connect to.
34  * @param setup_creds_as domain account to setup credentials as
35  * @param sec_chan a switch value to distinguish between domain
36  *                 member and interdomain authentication
37  * @param trust_passwd the trust password to establish the
38  *                     credentials with.
39  *
40  **/
41
42 static NTSTATUS connect_to_domain_password_server(struct cli_state **cli,
43                                                 const char *domain,
44                                                 const char *dc_name,
45                                                 struct sockaddr_storage *dc_ss, 
46                                                 struct rpc_pipe_client **pipe_ret,
47                                                 bool *retry)
48 {
49         NTSTATUS result;
50         struct rpc_pipe_client *netlogon_pipe = NULL;
51
52         *cli = NULL;
53
54         *pipe_ret = NULL;
55
56         /* TODO: Send a SAMLOGON request to determine whether this is a valid
57            logonserver.  We can avoid a 30-second timeout if the DC is down
58            if the SAMLOGON request fails as it is only over UDP. */
59
60         /* we use a mutex to prevent two connections at once - when a 
61            Win2k PDC get two connections where one hasn't completed a 
62            session setup yet it will send a TCP reset to the first 
63            connection (tridge) */
64
65         /*
66          * With NT4.x DC's *all* authentication must be serialized to avoid
67          * ACCESS_DENIED errors if 2 auths are done from the same machine. JRA.
68          */
69
70         if (!grab_server_mutex(dc_name)) {
71                 return NT_STATUS_NO_LOGON_SERVERS;
72         }
73         
74         /* Attempt connection */
75         *retry = True;
76         result = cli_full_connection(cli, global_myname(), dc_name, dc_ss, 0, 
77                 "IPC$", "IPC", "", "", "", 0, Undefined, retry);
78
79         if (!NT_STATUS_IS_OK(result)) {
80                 /* map to something more useful */
81                 if (NT_STATUS_EQUAL(result, NT_STATUS_UNSUCCESSFUL)) {
82                         result = NT_STATUS_NO_LOGON_SERVERS;
83                 }
84
85                 if (*cli) {
86                         cli_shutdown(*cli);
87                         *cli = NULL;
88                 }
89
90                 release_server_mutex();
91                 return result;
92         }
93
94         /*
95          * We now have an anonymous connection to IPC$ on the domain password server.
96          */
97
98         /*
99          * Even if the connect succeeds we need to setup the netlogon
100          * pipe here. We do this as we may just have changed the domain
101          * account password on the PDC and yet we may be talking to
102          * a BDC that doesn't have this replicated yet. In this case
103          * a successful connect to a DC needs to take the netlogon connect
104          * into account also. This patch from "Bjart Kvarme" <bjart.kvarme@usit.uio.no>.
105          */
106
107         /* open the netlogon pipe. */
108         if (lp_client_schannel()) {
109                 /* We also setup the creds chain in the open_schannel call. */
110                 netlogon_pipe = cli_rpc_pipe_open_schannel(*cli, PI_NETLOGON,
111                                         PIPE_AUTH_LEVEL_PRIVACY, domain, &result);
112         } else {
113                 netlogon_pipe = cli_rpc_pipe_open_noauth(*cli, PI_NETLOGON, &result);
114         }
115
116         if(!netlogon_pipe) {
117                 DEBUG(0,("connect_to_domain_password_server: unable to open the domain client session to \
118 machine %s. Error was : %s.\n", dc_name, nt_errstr(result)));
119                 cli_shutdown(*cli);
120                 *cli = NULL;
121                 release_server_mutex();
122                 return result;
123         }
124
125         if (!lp_client_schannel()) {
126                 /* We need to set up a creds chain on an unauthenticated netlogon pipe. */
127                 uint32 neg_flags = NETLOGON_NEG_SELECT_AUTH2_FLAGS;
128                 uint32 sec_chan_type = 0;
129                 unsigned char machine_pwd[16];
130                 const char *account_name;
131
132                 if (!get_trust_pw_hash(domain, machine_pwd, &account_name,
133                                        &sec_chan_type))
134                 {
135                         DEBUG(0, ("connect_to_domain_password_server: could not fetch "
136                         "trust account password for domain '%s'\n",
137                                 domain));
138                         cli_shutdown(*cli);
139                         *cli = NULL;
140                         release_server_mutex();
141                         return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
142                 }
143
144                 result = rpccli_netlogon_setup_creds(netlogon_pipe,
145                                         dc_name, /* server name */
146                                         domain, /* domain */
147                                         global_myname(), /* client name */
148                                         account_name, /* machine account name */
149                                         machine_pwd,
150                                         sec_chan_type,
151                                         &neg_flags);
152
153                 if (!NT_STATUS_IS_OK(result)) {
154                         cli_shutdown(*cli);
155                         *cli = NULL;
156                         release_server_mutex();
157                         return result;
158                 }
159         }
160
161         if(!netlogon_pipe) {
162                 DEBUG(0,("connect_to_domain_password_server: unable to open the domain client session to \
163 machine %s. Error was : %s.\n", dc_name, cli_errstr(*cli)));
164                 cli_shutdown(*cli);
165                 *cli = NULL;
166                 release_server_mutex();
167                 return NT_STATUS_NO_LOGON_SERVERS;
168         }
169
170         /* We exit here with the mutex *locked*. JRA */
171
172         *pipe_ret = netlogon_pipe;
173
174         return NT_STATUS_OK;
175 }
176
177 /***********************************************************************
178  Do the same as security=server, but using NT Domain calls and a session
179  key from the machine password.  If the server parameter is specified
180  use it, otherwise figure out a server from the 'password server' param.
181 ************************************************************************/
182
183 static NTSTATUS domain_client_validate(TALLOC_CTX *mem_ctx,
184                                         const auth_usersupplied_info *user_info, 
185                                         const char *domain,
186                                         uchar chal[8],
187                                         auth_serversupplied_info **server_info, 
188                                         const char *dc_name,
189                                         struct sockaddr_storage *dc_ss)
190
191 {
192         struct netr_SamInfo3 *info3 = NULL;
193         struct cli_state *cli = NULL;
194         struct rpc_pipe_client *netlogon_pipe = NULL;
195         NTSTATUS nt_status = NT_STATUS_NO_LOGON_SERVERS;
196         int i;
197         bool retry = True;
198
199         /*
200          * At this point, smb_apasswd points to the lanman response to
201          * the challenge in local_challenge, and smb_ntpasswd points to
202          * the NT response to the challenge in local_challenge. Ship
203          * these over the secure channel to a domain controller and
204          * see if they were valid.
205          */
206
207         /* rety loop for robustness */
208         
209         for (i = 0; !NT_STATUS_IS_OK(nt_status) && retry && (i < 3); i++) {
210                 nt_status = connect_to_domain_password_server(&cli,
211                                                         domain,
212                                                         dc_name,
213                                                         dc_ss,
214                                                         &netlogon_pipe,
215                                                         &retry);
216         }
217
218         if ( !NT_STATUS_IS_OK(nt_status) ) {
219                 DEBUG(0,("domain_client_validate: Domain password server not available.\n"));
220                 if (NT_STATUS_EQUAL(nt_status, NT_STATUS_ACCESS_DENIED)) {
221                         return NT_STATUS_TRUSTED_RELATIONSHIP_FAILURE;
222                 }
223                 return nt_status;
224         }
225
226         /* store a successful connection */
227
228         saf_store( domain, cli->desthost );
229
230         /*
231          * If this call succeeds, we now have lots of info about the user
232          * in the info3 structure.  
233          */
234
235         nt_status = rpccli_netlogon_sam_network_logon(netlogon_pipe,
236                                                       mem_ctx,
237                                                       user_info->logon_parameters,/* flags such as 'allow workstation logon' */ 
238                                                       dc_name,                    /* server name */
239                                                       user_info->smb_name,        /* user name logging on. */
240                                                       user_info->client_domain,   /* domain name */
241                                                       user_info->wksta_name,      /* workstation name */
242                                                       chal,                       /* 8 byte challenge. */
243                                                       user_info->lm_resp,         /* lanman 24 byte response */
244                                                       user_info->nt_resp,         /* nt 24 byte response */
245                                                       &info3);                    /* info3 out */
246
247         /* Let go as soon as possible so we avoid any potential deadlocks
248            with winbind lookup up users or groups. */
249            
250         release_server_mutex();
251
252         if (!NT_STATUS_IS_OK(nt_status)) {
253                 DEBUG(0,("domain_client_validate: unable to validate password "
254                          "for user %s in domain %s to Domain controller %s. "
255                          "Error was %s.\n", user_info->smb_name,
256                          user_info->domain, dc_name, 
257                          nt_errstr(nt_status)));
258
259                 /* map to something more useful */
260                 if (NT_STATUS_EQUAL(nt_status, NT_STATUS_UNSUCCESSFUL)) {
261                         nt_status = NT_STATUS_NO_LOGON_SERVERS;
262                 }
263         } else {
264                 nt_status = make_server_info_info3(mem_ctx,
265                                                 user_info->smb_name,
266                                                 domain,
267                                                 server_info,
268                                                 info3);
269
270                 if (NT_STATUS_IS_OK(nt_status)) {
271                         if (user_info->was_mapped) {
272                                 (*server_info)->was_mapped = user_info->was_mapped;
273                         }
274
275                         if ( ! (*server_info)->guest) {
276                                 /* if a real user check pam account restrictions */
277                                 /* only really perfomed if "obey pam restriction" is true */
278                                 nt_status = smb_pam_accountcheck((*server_info)->unix_name);
279                                 if (  !NT_STATUS_IS_OK(nt_status)) {
280                                         DEBUG(1, ("PAM account restriction prevents user login\n"));
281                                         cli_shutdown(cli);
282                                         TALLOC_FREE(info3);
283                                         return nt_status;
284                                 }
285                         }
286                 }
287
288                 netsamlogon_cache_store(user_info->smb_name, info3);
289                 TALLOC_FREE(info3);
290         }
291
292         /* Note - once the cli stream is shutdown the mem_ctx used
293            to allocate the other_sids and gids structures has been deleted - so
294            these pointers are no longer valid..... */
295
296         cli_shutdown(cli);
297         return nt_status;
298 }
299
300 /****************************************************************************
301  Check for a valid username and password in security=domain mode.
302 ****************************************************************************/
303
304 static NTSTATUS check_ntdomain_security(const struct auth_context *auth_context,
305                                         void *my_private_data, 
306                                         TALLOC_CTX *mem_ctx,
307                                         const auth_usersupplied_info *user_info, 
308                                         auth_serversupplied_info **server_info)
309 {
310         NTSTATUS nt_status = NT_STATUS_LOGON_FAILURE;
311         const char *domain = lp_workgroup();
312         fstring dc_name;
313         struct sockaddr_storage dc_ss;
314
315         if ( lp_server_role() != ROLE_DOMAIN_MEMBER ) {
316                 DEBUG(0,("check_ntdomain_security: Configuration error!  Cannot use "
317                         "ntdomain auth method when not a member of a domain.\n"));
318                 return NT_STATUS_NOT_IMPLEMENTED;
319         }
320
321         if (!user_info || !server_info || !auth_context) {
322                 DEBUG(1,("check_ntdomain_security: Critical variables not present.  Failing.\n"));
323                 return NT_STATUS_INVALID_PARAMETER;
324         }
325
326         /* 
327          * Check that the requested domain is not our own machine name.
328          * If it is, we should never check the PDC here, we use our own local
329          * password file.
330          */
331
332         if(strequal(get_global_sam_name(), user_info->domain)) {
333                 DEBUG(3,("check_ntdomain_security: Requested domain was for this machine.\n"));
334                 return NT_STATUS_NOT_IMPLEMENTED;
335         }
336
337         /* we need our DC to send the net_sam_logon() request to */
338
339         if ( !get_dc_name(domain, NULL, dc_name, &dc_ss) ) {
340                 DEBUG(5,("check_ntdomain_security: unable to locate a DC for domain %s\n",
341                         user_info->domain));
342                 return NT_STATUS_NO_LOGON_SERVERS;
343         }
344         
345         nt_status = domain_client_validate(mem_ctx,
346                                         user_info,
347                                         domain,
348                                         (uchar *)auth_context->challenge.data,
349                                         server_info,
350                                         dc_name,
351                                         &dc_ss);
352                 
353         return nt_status;
354 }
355
356 /* module initialisation */
357 static NTSTATUS auth_init_ntdomain(struct auth_context *auth_context, const char* param, auth_methods **auth_method) 
358 {
359         if (!make_auth_methods(auth_context, auth_method)) {
360                 return NT_STATUS_NO_MEMORY;
361         }
362
363         (*auth_method)->name = "ntdomain";
364         (*auth_method)->auth = check_ntdomain_security;
365         return NT_STATUS_OK;
366 }
367
368
369 /****************************************************************************
370  Check for a valid username and password in a trusted domain
371 ****************************************************************************/
372
373 static NTSTATUS check_trustdomain_security(const struct auth_context *auth_context,
374                                            void *my_private_data, 
375                                            TALLOC_CTX *mem_ctx,
376                                            const auth_usersupplied_info *user_info, 
377                                            auth_serversupplied_info **server_info)
378 {
379         NTSTATUS nt_status = NT_STATUS_LOGON_FAILURE;
380         unsigned char trust_md4_password[16];
381         char *trust_password;
382         time_t last_change_time;
383         DOM_SID sid;
384         fstring dc_name;
385         struct sockaddr_storage dc_ss;
386
387         if (!user_info || !server_info || !auth_context) {
388                 DEBUG(1,("check_trustdomain_security: Critical variables not present.  Failing.\n"));
389                 return NT_STATUS_INVALID_PARAMETER;
390         }
391
392         /* 
393          * Check that the requested domain is not our own machine name or domain name.
394          */
395
396         if( strequal(get_global_sam_name(), user_info->domain)) {
397                 DEBUG(3,("check_trustdomain_security: Requested domain [%s] was for this machine.\n",
398                         user_info->domain));
399                 return NT_STATUS_NOT_IMPLEMENTED;
400         }
401
402         /* No point is bothering if this is not a trusted domain.
403            This return makes "map to guest = bad user" work again.
404            The logic is that if we know nothing about the domain, that
405            user is not known to us and does not exist */
406         
407         if ( !is_trusted_domain( user_info->domain ) )
408                 return NT_STATUS_NOT_IMPLEMENTED;
409
410         /*
411          * Get the trusted account password for the trusted domain
412          * No need to become_root() as secrets_init() is done at startup.
413          */
414
415         if (!pdb_get_trusteddom_pw(user_info->domain, &trust_password,
416                                    &sid, &last_change_time)) {
417                 DEBUG(0, ("check_trustdomain_security: could not fetch trust "
418                           "account password for domain %s\n",
419                           user_info->domain));
420                 return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
421         }
422
423 #ifdef DEBUG_PASSWORD
424         DEBUG(100, ("Trust password for domain %s is %s\n", user_info->domain,
425                     trust_password));
426 #endif
427         E_md4hash(trust_password, trust_md4_password);
428         SAFE_FREE(trust_password);
429
430 #if 0
431         /* Test if machine password is expired and need to be changed */
432         if (time(NULL) > last_change_time + (time_t)lp_machine_password_timeout())
433         {
434                 global_machine_password_needs_changing = True;
435         }
436 #endif
437
438         /* use get_dc_name() for consistency even through we know that it will be 
439            a netbios name */
440            
441         if ( !get_dc_name(user_info->domain, NULL, dc_name, &dc_ss) ) {
442                 DEBUG(5,("check_trustdomain_security: unable to locate a DC for domain %s\n",
443                         user_info->domain));
444                 return NT_STATUS_NO_LOGON_SERVERS;
445         }
446         
447         nt_status = domain_client_validate(mem_ctx,
448                                         user_info,
449                                         user_info->domain,
450                                         (uchar *)auth_context->challenge.data,
451                                         server_info,
452                                         dc_name,
453                                         &dc_ss);
454
455         return nt_status;
456 }
457
458 /* module initialisation */
459 static NTSTATUS auth_init_trustdomain(struct auth_context *auth_context, const char* param, auth_methods **auth_method) 
460 {
461         if (!make_auth_methods(auth_context, auth_method)) {
462                 return NT_STATUS_NO_MEMORY;
463         }
464
465         (*auth_method)->name = "trustdomain";
466         (*auth_method)->auth = check_trustdomain_security;
467         return NT_STATUS_OK;
468 }
469
470 NTSTATUS auth_domain_init(void) 
471 {
472         smb_register_auth(AUTH_INTERFACE_VERSION, "trustdomain", auth_init_trustdomain);
473         smb_register_auth(AUTH_INTERFACE_VERSION, "ntdomain", auth_init_ntdomain);
474         return NT_STATUS_OK;
475 }