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