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