s4: ran minimal_includes.pl on source4/winbind
[samba.git] / source4 / winbind / wb_pam_auth.c
1 /* 
2    Unix SMB/CIFS implementation.
3
4    Authenticate a user
5
6    Copyright (C) Volker Lendecke 2005
7    Copyright (C) Andrew Bartlett <abartlet@samba.org> 2005
8    
9    This program is free software; you can redistribute it and/or modify
10    it under the terms of the GNU General Public License as published by
11    the Free Software Foundation; either version 3 of the License, or
12    (at your option) any later version.
13    
14    This program is distributed in the hope that it will be useful,
15    but WITHOUT ANY WARRANTY; without even the implied warranty of
16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17    GNU General Public License for more details.
18    
19    You should have received a copy of the GNU General Public License
20    along with this program.  If not, see <http://www.gnu.org/licenses/>.
21 */
22
23 #include "includes.h"
24 #include "libcli/composite/composite.h"
25 #include "winbind/wb_server.h"
26 #include "smbd/service_task.h"
27 #include "auth/credentials/credentials.h"
28 #include "libcli/auth/libcli_auth.h"
29 #include "librpc/gen_ndr/ndr_netlogon.h"
30 #include "param/param.h"
31
32 /* Oh, there is so much to keep an eye on when authenticating a user.  Oh my! */
33 struct pam_auth_crap_state {
34         struct composite_context *ctx;
35         struct tevent_context *event_ctx;
36         struct loadparm_context *lp_ctx;
37
38         struct winbind_SamLogon *req;
39         char *unix_username;
40
41         struct netr_NetworkInfo ninfo;
42         struct netr_LogonSamLogon r;
43
44         const char *user_name;
45         const char *domain_name;
46
47         struct netr_UserSessionKey user_session_key;
48         struct netr_LMSessionKey lm_key;
49         DATA_BLOB info3;
50 };
51
52 /*
53  * NTLM authentication.
54 */
55
56 static void pam_auth_crap_recv_logon(struct composite_context *ctx);
57
58 struct composite_context *wb_cmd_pam_auth_crap_send(TALLOC_CTX *mem_ctx,
59                                                     struct wbsrv_service *service,
60                                                     uint32_t logon_parameters,
61                                                     const char *domain,
62                                                     const char *user,
63                                                     const char *workstation,
64                                                     DATA_BLOB chal,
65                                                     DATA_BLOB nt_resp,
66                                                     DATA_BLOB lm_resp)
67 {
68         struct composite_context *result, *ctx;
69         struct pam_auth_crap_state *state;
70         struct netr_NetworkInfo *ninfo;
71         DATA_BLOB tmp_nt_resp, tmp_lm_resp;
72
73         result = composite_create(mem_ctx, service->task->event_ctx);
74         if (result == NULL) goto failed;
75
76         state = talloc(result, struct pam_auth_crap_state);
77         if (state == NULL) goto failed;
78         state->ctx = result;
79         state->lp_ctx = service->task->lp_ctx;
80         result->private_data = state;
81
82         state->req = talloc(state, struct winbind_SamLogon);
83
84         state->req->in.logon_level = 2;
85         state->req->in.validation_level = 3;
86         ninfo = state->req->in.logon.network = talloc(state, struct netr_NetworkInfo);
87         if (ninfo == NULL) goto failed;
88         
89         ninfo->identity_info.account_name.string =  talloc_strdup(state, user);
90         ninfo->identity_info.domain_name.string =  talloc_strdup(state, domain);
91         ninfo->identity_info.parameter_control = logon_parameters;
92         ninfo->identity_info.logon_id_low = 0;
93         ninfo->identity_info.logon_id_high = 0;
94         ninfo->identity_info.workstation.string = talloc_strdup(state, workstation);
95
96         SMB_ASSERT(chal.length == sizeof(ninfo->challenge));
97         memcpy(ninfo->challenge, chal.data,
98                sizeof(ninfo->challenge));
99
100         tmp_nt_resp = data_blob_talloc(ninfo, nt_resp.data, nt_resp.length);
101         if ((nt_resp.data != NULL) &&
102             (tmp_nt_resp.data == NULL)) goto failed;
103
104         tmp_lm_resp = data_blob_talloc(ninfo, lm_resp.data, lm_resp.length);
105         if ((lm_resp.data != NULL) &&
106             (tmp_lm_resp.data == NULL)) goto failed;
107
108         ninfo->nt.length = tmp_nt_resp.length;
109         ninfo->nt.data = tmp_nt_resp.data;
110         ninfo->lm.length = tmp_lm_resp.length;
111         ninfo->lm.data = tmp_lm_resp.data;
112
113         state->unix_username = NULL;
114
115         ctx = wb_sam_logon_send(mem_ctx, service, state->req);
116         if (ctx == NULL) goto failed;
117
118         composite_continue(result, ctx, pam_auth_crap_recv_logon, state);
119         return result;
120
121  failed:
122         talloc_free(result);
123         return NULL;
124 }
125
126 /*  
127     NTLM Authentication
128
129     Send of a SamLogon request to authenticate a user.
130 */
131 static void pam_auth_crap_recv_logon(struct composite_context *ctx)
132 {
133         DATA_BLOB tmp_blob;
134         enum ndr_err_code ndr_err;
135         struct netr_SamBaseInfo *base;
136         struct pam_auth_crap_state *state =
137                 talloc_get_type(ctx->async.private_data,
138                                 struct pam_auth_crap_state);
139
140         state->ctx->status = wb_sam_logon_recv(ctx, state, state->req);
141         if (!composite_is_ok(state->ctx)) return;
142
143         ndr_err = ndr_push_struct_blob(
144                 &tmp_blob, state, lp_iconv_convenience(state->lp_ctx), 
145                 state->req->out.validation.sam3,
146                 (ndr_push_flags_fn_t)ndr_push_netr_SamInfo3);
147         if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
148                 state->ctx->status = ndr_map_error2ntstatus(ndr_err);
149                 if (!composite_is_ok(state->ctx)) return;
150         }
151
152         /* The Samba3 protocol is a bit broken (due to non-IDL
153          * heritage, so for compatability we must add a non-zero 4
154          * bytes to the info3 */
155         state->info3 = data_blob_talloc(state, NULL, tmp_blob.length+4);
156         if (composite_nomem(state->info3.data, state->ctx)) return;
157
158         SIVAL(state->info3.data, 0, 1);
159         memcpy(state->info3.data+4, tmp_blob.data, tmp_blob.length);
160
161         base = &state->req->out.validation.sam3->base;
162
163         state->user_session_key = base->key;
164         state->lm_key = base->LMSessKey;
165
166         /* Give the caller the most accurate username possible.
167          * Assists where case sensitive comparisons may be done by our
168          * ntlm_auth callers */
169         if (base->account_name.string) {
170                 state->user_name = base->account_name.string;
171                 talloc_steal(state, base->account_name.string);
172         }
173         if (base->domain.string) {
174                 state->domain_name = base->domain.string;
175                 talloc_steal(state, base->domain.string);
176         }
177
178         state->unix_username = talloc_asprintf(state, "%s%s%s", 
179                                                state->domain_name,
180                                                lp_winbind_separator(state->lp_ctx),
181                                                state->user_name);
182         if (composite_nomem(state->unix_username, state->ctx)) return;
183
184         composite_done(state->ctx);
185 }
186
187 /* Having received a NTLM authentication reply, parse out the useful
188  * reply data for the caller */
189 NTSTATUS wb_cmd_pam_auth_crap_recv(struct composite_context *c,
190                                    TALLOC_CTX *mem_ctx,
191                                    DATA_BLOB *info3,
192                                    struct netr_UserSessionKey *user_session_key,
193                                    struct netr_LMSessionKey *lm_key,
194                                    char **unix_username)
195 {
196         struct pam_auth_crap_state *state =
197                 talloc_get_type(c->private_data, struct pam_auth_crap_state);
198         NTSTATUS status = composite_wait(c);
199         if (NT_STATUS_IS_OK(status)) {
200                 info3->length = state->info3.length;
201                 info3->data = talloc_steal(mem_ctx, state->info3.data);
202                 *user_session_key = state->user_session_key;
203                 *lm_key = state->lm_key;
204                 *unix_username = talloc_steal(mem_ctx, state->unix_username);
205         }
206         talloc_free(state);
207         return status;
208 }
209
210 /* Handle plaintext authentication, by encrypting the password and
211  * then sending via the NTLM calls */
212
213 struct composite_context *wb_cmd_pam_auth_send(TALLOC_CTX *mem_ctx,
214                                                struct wbsrv_service *service,
215                                                struct cli_credentials *credentials)
216 {
217         const char *workstation;
218         NTSTATUS status;
219         const char *user, *domain;
220         DATA_BLOB chal, nt_resp, lm_resp, names_blob;
221         int flags = CLI_CRED_NTLM_AUTH;
222         if (lp_client_lanman_auth(service->task->lp_ctx)) {
223                 flags |= CLI_CRED_LANMAN_AUTH;
224         }
225
226         if (lp_client_ntlmv2_auth(service->task->lp_ctx)) {
227                 flags |= CLI_CRED_NTLMv2_AUTH;
228         }
229
230         DEBUG(5, ("wbsrv_samba3_pam_auth called\n"));
231
232         chal = data_blob_talloc(mem_ctx, NULL, 8);
233         if (!chal.data) {
234                 return NULL;
235         }
236         generate_random_buffer(chal.data, chal.length);
237         cli_credentials_get_ntlm_username_domain(credentials, mem_ctx,
238                                                  &user, &domain);
239         /* for best compatability with multiple vitual netbios names
240          * on the host, this should be generated from the
241          * cli_credentials associated with the machine account */
242         workstation = cli_credentials_get_workstation(credentials);
243
244         names_blob = NTLMv2_generate_names_blob(
245                 mem_ctx,
246                 cli_credentials_get_workstation(credentials), 
247                 cli_credentials_get_domain(credentials));
248
249         status = cli_credentials_get_ntlm_response(
250                 credentials, mem_ctx, &flags, chal, names_blob,
251                 &lm_resp, &nt_resp, NULL, NULL);
252         if (!NT_STATUS_IS_OK(status)) {
253                 return NULL;
254         }
255         return wb_cmd_pam_auth_crap_send(mem_ctx, service,
256                                          MSV1_0_ALLOW_WORKSTATION_TRUST_ACCOUNT|MSV1_0_ALLOW_SERVER_TRUST_ACCOUNT /* logon parameters */, 
257                                          domain, user, workstation,
258                                          chal, nt_resp, lm_resp);
259 }
260
261 NTSTATUS wb_cmd_pam_auth_recv(struct composite_context *c,
262                               TALLOC_CTX *mem_ctx,
263                               DATA_BLOB *info3,
264                               struct netr_UserSessionKey *user_session_key,
265                               struct netr_LMSessionKey *lm_key,
266                               char **unix_username)
267 {
268         struct pam_auth_crap_state *state =
269                 talloc_get_type(c->private_data, struct pam_auth_crap_state);
270         NTSTATUS status = composite_wait(c);
271         if (NT_STATUS_IS_OK(status)) {
272                 if (info3) {
273                         info3->length = state->info3.length;
274                         info3->data = talloc_steal(mem_ctx, state->info3.data);
275                 }
276                 if (user_session_key) {
277                         *user_session_key = state->user_session_key;
278                 }
279                 if (lm_key) {
280                         *lm_key = state->lm_key;
281                 }
282                 if (unix_username) {
283                         *unix_username = talloc_steal(mem_ctx, state->unix_username);
284                 }
285         }
286         talloc_free(state);
287         return status;
288 }