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