Removed global_myworkgroup, global_myname, global_myscope. Added liberal
[tprouty/samba.git] / source / nsswitch / winbindd_pam.c
1 /* 
2    Unix SMB/CIFS implementation.
3
4    Winbind daemon - pam auth funcions
5
6    Copyright (C) Andrew Tridgell 2000
7    Copyright (C) Tim Potter 2001
8    Copyright (C) Andrew Bartlett 2001-2002
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 #include "winbindd.h"
26 #undef DBGC_CLASS
27 #define DBGC_CLASS DBGC_WINBIND
28
29
30 static NTSTATUS append_info3_as_ndr(TALLOC_CTX *mem_ctx, 
31                                     struct winbindd_cli_state *state, 
32                                     NET_USER_INFO_3 *info3) 
33 {
34         prs_struct ps;
35         uint32 size;
36         if (!prs_init(&ps, 256 /* Random, non-zero number */, mem_ctx, MARSHALL)) {
37                 return NT_STATUS_NO_MEMORY;
38         }
39         if (!net_io_user_info3("", info3, &ps, 1, 3)) {
40                 prs_mem_free(&ps);
41                 return NT_STATUS_UNSUCCESSFUL;
42         }
43
44         size = prs_data_size(&ps);
45         state->response.extra_data = memdup(prs_data_p(&ps), size);
46         if (!state->response.extra_data) {
47                 prs_mem_free(&ps);
48                 return NT_STATUS_NO_MEMORY;
49         }
50         state->response.length += size;
51         prs_mem_free(&ps);
52         return NT_STATUS_OK;
53 }
54
55 /* Return a password structure from a username.  */
56
57 enum winbindd_result winbindd_pam_auth(struct winbindd_cli_state *state) 
58 {
59         NTSTATUS result;
60         fstring name_domain, name_user;
61         unsigned char trust_passwd[16];
62         time_t last_change_time;
63         uint32 smb_uid_low;
64         NET_USER_INFO_3 info3;
65         struct cli_state *cli = NULL;
66         uchar chal[8];
67         TALLOC_CTX *mem_ctx = NULL;
68         DATA_BLOB lm_resp;
69         DATA_BLOB nt_resp;
70
71         /* Ensure null termination */
72         state->request.data.auth.user[sizeof(state->request.data.auth.user)-1]='\0';
73
74         /* Ensure null termination */
75         state->request.data.auth.pass[sizeof(state->request.data.auth.pass)-1]='\0';
76
77         DEBUG(3, ("[%5d]: pam auth %s\n", state->pid,
78                   state->request.data.auth.user));
79
80         if (!(mem_ctx = talloc_init_named("winbind pam auth for %s", state->request.data.auth.user))) {
81                 DEBUG(0, ("winbindd_pam_auth: could not talloc_init()!\n"));
82                 result = NT_STATUS_NO_MEMORY;
83                 goto done;
84         }
85
86         /* Parse domain and username */
87         
88         if (!parse_domain_user(state->request.data.auth.user, name_domain, 
89                                name_user)) {
90                 DEBUG(5,("no domain separator (%s) in username (%s) - failing auth\n", lp_winbind_separator(), state->request.data.auth.user));
91                 result = NT_STATUS_INVALID_PARAMETER;
92                 goto done;
93         }
94
95         {
96                 unsigned char local_lm_response[24];
97                 unsigned char local_nt_response[24];
98                 
99                 generate_random_buffer(chal, 8, False);
100                 SMBencrypt(state->request.data.auth.pass, chal, local_lm_response);
101                 
102                 SMBNTencrypt(state->request.data.auth.pass, chal, local_nt_response);
103
104                 lm_resp = data_blob_talloc(mem_ctx, local_lm_response, sizeof(local_lm_response));
105                 nt_resp = data_blob_talloc(mem_ctx, local_nt_response, sizeof(local_nt_response));
106         }
107         
108         /*
109          * Get the machine account password for our primary domain
110          */
111
112         if (!secrets_fetch_trust_account_password(
113                 lp_workgroup(), trust_passwd, &last_change_time)) {
114                 DEBUG(0, ("winbindd_pam_auth: could not fetch trust account "
115                           "password for domain %s\n", lp_workgroup()));
116                 result = NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
117                 goto done;
118         }
119
120         /* We really don't care what LUID we give the user. */
121
122         generate_random_buffer( (unsigned char *)&smb_uid_low, 4, False);
123
124         ZERO_STRUCT(info3);
125         
126         /* Don't shut this down - it belongs to the connection cache code */
127         result = cm_get_netlogon_cli(lp_workgroup(), trust_passwd, &cli);
128
129         if (!NT_STATUS_IS_OK(result)) {
130                 DEBUG(3, ("could not open handle to NETLOGON pipe\n"));
131                 goto done;
132         }
133
134         result = cli_netlogon_sam_network_logon(cli, mem_ctx,
135                                                 name_user, name_domain, 
136                                                 global_myname(), chal, 
137                                                 lm_resp, nt_resp, 
138                                                 &info3);
139         
140         uni_group_cache_store_netlogon(mem_ctx, &info3);
141 done:
142
143         state->response.data.auth.nt_status = NT_STATUS_V(result);
144         fstrcpy(state->response.data.auth.nt_status_string, nt_errstr(result));
145         fstrcpy(state->response.data.auth.error_string, nt_errstr(result));
146         state->response.data.auth.pam_error = nt_status_to_pam(result);
147
148         DEBUG(NT_STATUS_IS_OK(result) ? 5 : 2, ("Plain-text authentication for user %s returned %s (PAM: %d)\n", 
149               state->request.data.auth.user, 
150               state->response.data.auth.nt_status_string,
151               state->response.data.auth.pam_error));          
152
153         if (mem_ctx) 
154                 talloc_destroy(mem_ctx);
155         
156         return NT_STATUS_IS_OK(result) ? WINBINDD_OK : WINBINDD_ERROR;
157 }
158         
159 /* Challenge Response Authentication Protocol */
160
161 enum winbindd_result winbindd_pam_auth_crap(struct winbindd_cli_state *state) 
162 {
163         NTSTATUS result;
164         unsigned char trust_passwd[16];
165         time_t last_change_time;
166         NET_USER_INFO_3 info3;
167         struct cli_state *cli = NULL;
168         TALLOC_CTX *mem_ctx = NULL;
169         char *user = NULL;
170         const char *domain = NULL;
171         const char *contact_domain;
172         const char *workstation;
173
174         DATA_BLOB lm_resp, nt_resp;
175
176         /* Ensure null termination */
177         state->request.data.auth_crap.user[sizeof(state->request.data.auth_crap.user)-1]='\0';
178
179         /* Ensure null termination */
180         state->request.data.auth_crap.domain[sizeof(state->request.data.auth_crap.domain)-1]='\0';
181
182         if (!(mem_ctx = talloc_init_named("winbind pam auth crap for (utf8) %s", state->request.data.auth_crap.user))) {
183                 DEBUG(0, ("winbindd_pam_auth_crap: could not talloc_init()!\n"));
184                 result = NT_STATUS_NO_MEMORY;
185                 goto done;
186         }
187
188         if (pull_utf8_talloc(mem_ctx, &user, state->request.data.auth_crap.user) < 0) {
189                 DEBUG(0, ("winbindd_pam_auth_crap: pull_utf8_talloc failed!\n"));
190         }
191
192         if (*state->request.data.auth_crap.domain) {
193                 char *dom = NULL;
194                 if (pull_utf8_talloc(mem_ctx, &dom, state->request.data.auth_crap.domain) < 0) {
195                         DEBUG(0, ("winbindd_pam_auth_crap: pull_utf8_talloc failed!\n"));
196                 }
197                 domain = dom;
198         } else if (lp_winbind_use_default_domain()) {
199                 domain = lp_workgroup();
200         } else {
201                 DEBUG(5,("no domain specified with username (%s) - failing auth\n", 
202                          user));
203                 result = NT_STATUS_INVALID_PARAMETER;
204                 goto done;
205         }
206
207         DEBUG(3, ("[%5d]: pam auth crap domain: %s user: %s\n", state->pid,
208                   domain, user));
209
210         if (lp_allow_trusted_domains() && (state->request.data.auth_crap.flags & WINBIND_PAM_CONTACT_TRUSTDOM)) {
211                 contact_domain = domain;
212         } else {
213                 contact_domain = lp_workgroup();
214         }
215
216         if (*state->request.data.auth_crap.workstation) {
217                 char *wrk = NULL;
218                 if (pull_utf8_talloc(mem_ctx, &wrk, state->request.data.auth_crap.workstation) < 0) {
219                         DEBUG(0, ("winbindd_pam_auth_crap: pull_utf8_talloc failed!\n"));
220                 }
221                 workstation = wrk;
222         } else {
223                 workstation = global_myname();
224         }
225
226         if (state->request.data.auth_crap.lm_resp_len > sizeof(state->request.data.auth_crap.lm_resp)
227                 || state->request.data.auth_crap.nt_resp_len > sizeof(state->request.data.auth_crap.nt_resp)) {
228                 DEBUG(0, ("winbindd_pam_auth_crap: invalid password length %u/%u\n", 
229                           state->request.data.auth_crap.lm_resp_len, 
230                           state->request.data.auth_crap.nt_resp_len));
231                 result = NT_STATUS_INVALID_PARAMETER;
232                 goto done;
233         }
234
235         lm_resp = data_blob_talloc(mem_ctx, state->request.data.auth_crap.lm_resp, state->request.data.auth_crap.lm_resp_len);
236         nt_resp = data_blob_talloc(mem_ctx, state->request.data.auth_crap.nt_resp, state->request.data.auth_crap.nt_resp_len);
237         
238         /*
239          * Get the machine account password for the domain to contact.
240          * This is either our own domain for a workstation, or possibly
241          * any domain for a PDC with trusted domains.
242          */
243
244         if (!secrets_fetch_trust_account_password (
245                 contact_domain, trust_passwd, &last_change_time)) {
246                 DEBUG(0, ("winbindd_pam_auth: could not fetch trust account "
247                           "password for domain %s\n", contact_domain));
248                 result = NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
249                 goto done;
250         }
251
252         ZERO_STRUCT(info3);
253
254         /* Don't shut this down - it belongs to the connection cache code */
255         result = cm_get_netlogon_cli(contact_domain, trust_passwd, &cli);
256
257         if (!NT_STATUS_IS_OK(result)) {
258                 DEBUG(3, ("could not open handle to NETLOGON pipe (error: %s)\n", nt_errstr(result)));
259                 goto done;
260         }
261
262         result = cli_netlogon_sam_network_logon(cli, mem_ctx,
263                                                 user, domain,
264                                                 workstation, state->request.data.auth_crap.chal, 
265                                                 lm_resp, nt_resp, 
266                                                 &info3);
267         
268         if (NT_STATUS_IS_OK(result)) {
269                 uni_group_cache_store_netlogon(mem_ctx, &info3);
270                 if (state->request.data.auth_crap.flags & WINBIND_PAM_INFO3_NDR) {
271                         result = append_info3_as_ndr(mem_ctx, state, &info3);
272                 }
273
274 #if 0
275                 /* we don't currently do this stuff right */
276                 if (state->request.data.auth_crap.flags & WINBIND_PAM_NTKEY) {
277                         SMB_ASSERT(sizeof(state->response.data.auth.nt_session_key) == sizeof(info3.user_sess_key)); 
278                         memcpy(state->response.data.auth.nt_session_key, info3.user_sess_key, sizeof(state->response.data.auth.nt_session_key) /* 16 */);
279                 }
280                 if (state->request.data.auth_crap.flags & WINBIND_PAM_LMKEY) {
281                         SMB_ASSERT(sizeof(state->response.data.auth.nt_session_key) <= sizeof(info3.user_sess_key)); 
282                         memcpy(state->response.data.auth.first_8_lm_hash, info3.padding, sizeof(state->response.data.auth.nt_session_key) /* 16 */);
283                 }
284 #endif
285         }
286
287 done:
288
289         state->response.data.auth.nt_status = NT_STATUS_V(result);
290         push_utf8_fstring(state->response.data.auth.nt_status_string, nt_errstr(result));
291         push_utf8_fstring(state->response.data.auth.error_string, nt_errstr(result));
292         state->response.data.auth.pam_error = nt_status_to_pam(result);
293
294         DEBUG(NT_STATUS_IS_OK(result) ? 5 : 2, 
295               ("NTLM CRAP authentication for user [%s]\\[%s] returned %s (PAM: %d)\n", 
296                domain,
297                user,
298                state->response.data.auth.nt_status_string,
299                state->response.data.auth.pam_error));         
300
301         if (mem_ctx) 
302                 talloc_destroy(mem_ctx);
303         
304         return NT_STATUS_IS_OK(result) ? WINBINDD_OK : WINBINDD_ERROR;
305 }
306
307 /* Change a user password */
308
309 enum winbindd_result winbindd_pam_chauthtok(struct winbindd_cli_state *state)
310 {
311         NTSTATUS result;
312         char *oldpass, *newpass;
313         fstring domain, user;
314         CLI_POLICY_HND *hnd;
315
316         DEBUG(3, ("[%5d]: pam chauthtok %s\n", state->pid,
317                 state->request.data.chauthtok.user));
318
319         /* Setup crap */
320
321         if (state == NULL)
322                 return WINBINDD_ERROR;
323
324         if (!parse_domain_user(state->request.data.chauthtok.user, domain, 
325                                user)) {
326                 result = NT_STATUS_INVALID_PARAMETER;
327                 goto done;
328         }
329
330         /* Change password */
331
332         oldpass = state->request.data.chauthtok.oldpass;
333         newpass = state->request.data.chauthtok.newpass;
334
335         /* Get sam handle */
336
337         if (!(hnd = cm_get_sam_handle(domain))) {
338                 DEBUG(1, ("could not get SAM handle on DC for %s\n", domain));
339                 result = NT_STATUS_DOMAIN_CONTROLLER_NOT_FOUND;
340                 goto done;
341         }
342
343         if (!cli_oem_change_password(hnd->cli, user, newpass, oldpass)) {
344                 DEBUG(1, ("password change failed for user %s/%s\n", domain, 
345                           user));
346                 result = NT_STATUS_WRONG_PASSWORD;
347         } else {
348                 result = NT_STATUS_OK;
349         }
350
351 done:    
352         state->response.data.auth.nt_status = NT_STATUS_V(result);
353         fstrcpy(state->response.data.auth.nt_status_string, nt_errstr(result));
354         fstrcpy(state->response.data.auth.error_string, nt_errstr(result));
355         state->response.data.auth.pam_error = nt_status_to_pam(result);
356
357         DEBUG(NT_STATUS_IS_OK(result) ? 5 : 2, 
358               ("Password change for user [%s]\\[%s] returned %s (PAM: %d)\n", 
359                domain,
360                user,
361                state->response.data.auth.nt_status_string,
362                state->response.data.auth.pam_error));         
363
364         return NT_STATUS_IS_OK(result) ? WINBINDD_OK : WINBINDD_ERROR;
365 }