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