Merge commit 'release-4-0-0alpha2' into v4-0-test
[samba.git] / source4 / auth / ntlmssp / ntlmssp.c
1 /* 
2    Unix SMB/Netbios implementation.
3    Version 3.0
4    handle NLTMSSP, client server side parsing
5
6    Copyright (C) Andrew Tridgell      2001
7    Copyright (C) Andrew Bartlett <abartlet@samba.org> 2001-2005
8    Copyright (C) Stefan Metzmacher 2005
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 3 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, see <http://www.gnu.org/licenses/>.
22 */
23
24 #include "includes.h"
25 #include "auth/ntlmssp/ntlmssp.h"
26 #include "auth/ntlmssp/msrpc_parse.h"
27 #include "librpc/gen_ndr/ndr_dcerpc.h"
28 #include "auth/credentials/credentials.h"
29 #include "auth/gensec/gensec.h"
30 #include "auth/auth.h"
31 #include "param/param.h"
32
33 /**
34  * Callbacks for NTLMSSP - for both client and server operating modes
35  * 
36  */
37
38 static const struct ntlmssp_callbacks {
39         enum ntlmssp_role role;
40         enum ntlmssp_message_type command;
41         NTSTATUS (*sync_fn)(struct gensec_security *gensec_security,
42                             TALLOC_CTX *out_mem_ctx,
43                             DATA_BLOB in, DATA_BLOB *out);
44 } ntlmssp_callbacks[] = {
45         {
46                 .role           = NTLMSSP_CLIENT,
47                 .command        = NTLMSSP_INITIAL,
48                 .sync_fn        = ntlmssp_client_initial,
49         },{
50                 .role           = NTLMSSP_SERVER,
51                 .command        = NTLMSSP_NEGOTIATE,
52                 .sync_fn        = ntlmssp_server_negotiate,
53         },{
54                 .role           = NTLMSSP_CLIENT,
55                 .command        = NTLMSSP_CHALLENGE,
56                 .sync_fn        = ntlmssp_client_challenge,
57         },{
58                 .role           = NTLMSSP_SERVER,
59                 .command        = NTLMSSP_AUTH,
60                 .sync_fn        = ntlmssp_server_auth,
61         }
62 };
63
64
65 /**
66  * Print out the NTLMSSP flags for debugging 
67  * @param neg_flags The flags from the packet
68  */
69
70 void debug_ntlmssp_flags(uint32_t neg_flags)
71 {
72         DEBUG(3,("Got NTLMSSP neg_flags=0x%08x\n", neg_flags));
73         
74         if (neg_flags & NTLMSSP_NEGOTIATE_UNICODE) 
75                 DEBUGADD(4, ("  NTLMSSP_NEGOTIATE_UNICODE\n"));
76         if (neg_flags & NTLMSSP_NEGOTIATE_OEM) 
77                 DEBUGADD(4, ("  NTLMSSP_NEGOTIATE_OEM\n"));
78         if (neg_flags & NTLMSSP_REQUEST_TARGET) 
79                 DEBUGADD(4, ("  NTLMSSP_REQUEST_TARGET\n"));
80         if (neg_flags & NTLMSSP_NEGOTIATE_SIGN) 
81                 DEBUGADD(4, ("  NTLMSSP_NEGOTIATE_SIGN\n"));
82         if (neg_flags & NTLMSSP_NEGOTIATE_SEAL) 
83                 DEBUGADD(4, ("  NTLMSSP_NEGOTIATE_SEAL\n"));
84         if (neg_flags & NTLMSSP_NEGOTIATE_DATAGRAM_STYLE) 
85                 DEBUGADD(4, ("  NTLMSSP_NEGOTIATE_DATAGRAM_STYLE\n"));
86         if (neg_flags & NTLMSSP_NEGOTIATE_LM_KEY) 
87                 DEBUGADD(4, ("  NTLMSSP_NEGOTIATE_LM_KEY\n"));
88         if (neg_flags & NTLMSSP_NEGOTIATE_NETWARE) 
89                 DEBUGADD(4, ("  NTLMSSP_NEGOTIATE_NETWARE\n"));
90         if (neg_flags & NTLMSSP_NEGOTIATE_NTLM) 
91                 DEBUGADD(4, ("  NTLMSSP_NEGOTIATE_NTLM\n"));
92         if (neg_flags & NTLMSSP_NEGOTIATE_DOMAIN_SUPPLIED) 
93                 DEBUGADD(4, ("  NTLMSSP_NEGOTIATE_DOMAIN_SUPPLIED\n"));
94         if (neg_flags & NTLMSSP_NEGOTIATE_WORKSTATION_SUPPLIED) 
95                 DEBUGADD(4, ("  NTLMSSP_NEGOTIATE_WORKSTATION_SUPPLIED\n"));
96         if (neg_flags & NTLMSSP_NEGOTIATE_THIS_IS_LOCAL_CALL) 
97                 DEBUGADD(4, ("  NTLMSSP_NEGOTIATE_THIS_IS_LOCAL_CALL\n"));
98         if (neg_flags & NTLMSSP_NEGOTIATE_ALWAYS_SIGN) 
99                 DEBUGADD(4, ("  NTLMSSP_NEGOTIATE_ALWAYS_SIGN\n"));
100         if (neg_flags & NTLMSSP_CHAL_ACCEPT_RESPONSE) 
101                 DEBUGADD(4, ("  NTLMSSP_CHAL_ACCEPT_RESPONSE\n"));
102         if (neg_flags & NTLMSSP_CHAL_NON_NT_SESSION_KEY) 
103                 DEBUGADD(4, ("  NTLMSSP_CHAL_NON_NT_SESSION_KEY\n"));
104         if (neg_flags & NTLMSSP_NEGOTIATE_NTLM2) 
105                 DEBUGADD(4, ("  NTLMSSP_NEGOTIATE_NTLM2\n"));
106         if (neg_flags & NTLMSSP_CHAL_TARGET_INFO) 
107                 DEBUGADD(4, ("  NTLMSSP_CHAL_TARGET_INFO\n"));
108         if (neg_flags & NTLMSSP_NEGOTIATE_128) 
109                 DEBUGADD(4, ("  NTLMSSP_NEGOTIATE_128\n"));
110         if (neg_flags & NTLMSSP_NEGOTIATE_KEY_EXCH) 
111                 DEBUGADD(4, ("  NTLMSSP_NEGOTIATE_KEY_EXCH\n"));
112         if (neg_flags & NTLMSSP_NEGOTIATE_56) 
113                 DEBUGADD(4, ("  NTLMSSP_NEGOTIATE_56\n"));
114 }
115
116 static NTSTATUS gensec_ntlmssp_magic(struct gensec_security *gensec_security, 
117                                      const DATA_BLOB *first_packet) 
118 {
119         if (first_packet->length > 8 && memcmp("NTLMSSP\0", first_packet->data, 8) == 0) {
120                 return NT_STATUS_OK;
121         } else {
122                 return NT_STATUS_INVALID_PARAMETER;
123         }
124 }
125
126 static NTSTATUS gensec_ntlmssp_update_find(struct gensec_ntlmssp_state *gensec_ntlmssp_state,
127                                            const DATA_BLOB input, uint32_t *idx)
128 {
129         struct gensec_security *gensec_security = gensec_ntlmssp_state->gensec_security;
130         uint32_t ntlmssp_command;
131         uint32_t i;
132
133         if (gensec_ntlmssp_state->expected_state == NTLMSSP_DONE) {
134                 /* We are strict here because other modules, which we
135                  * don't fully control (such as GSSAPI) are also
136                  * strict, but are tested less often */
137
138                 DEBUG(1, ("Called NTLMSSP after state machine was 'done'\n"));
139                 return NT_STATUS_INVALID_PARAMETER;
140         }
141
142         if (!input.length) {
143                 switch (gensec_ntlmssp_state->role) {
144                 case NTLMSSP_CLIENT:
145                         ntlmssp_command = NTLMSSP_INITIAL;
146                         break;
147                 case NTLMSSP_SERVER:
148                         if (gensec_security->want_features & GENSEC_FEATURE_DATAGRAM_MODE) {
149                                 /* 'datagram' mode - no neg packet */
150                                 ntlmssp_command = NTLMSSP_NEGOTIATE;
151                         } else {
152                                 /* This is normal in SPNEGO mech negotiation fallback */
153                                 DEBUG(2, ("Failed to parse NTLMSSP packet: zero length\n"));
154                                 return NT_STATUS_INVALID_PARAMETER;
155                         }
156                         break;
157                 }
158         } else {
159                 if (!msrpc_parse(gensec_ntlmssp_state, 
160                                  &input, "Cd",
161                                  "NTLMSSP",
162                                  &ntlmssp_command)) {
163                         DEBUG(1, ("Failed to parse NTLMSSP packet, could not extract NTLMSSP command\n"));
164                         dump_data(2, input.data, input.length);
165                         return NT_STATUS_INVALID_PARAMETER;
166                 }
167         }
168
169         if (ntlmssp_command != gensec_ntlmssp_state->expected_state) {
170                 DEBUG(2, ("got NTLMSSP command %u, expected %u\n", ntlmssp_command, gensec_ntlmssp_state->expected_state));
171                 return NT_STATUS_INVALID_PARAMETER;
172         }
173
174         for (i=0; i < ARRAY_SIZE(ntlmssp_callbacks); i++) {
175                 if (ntlmssp_callbacks[i].role == gensec_ntlmssp_state->role &&
176                     ntlmssp_callbacks[i].command == ntlmssp_command) {
177                         *idx = i;
178                         return NT_STATUS_OK;
179                 }
180         }
181
182         DEBUG(1, ("failed to find NTLMSSP callback for NTLMSSP mode %u, command %u\n", 
183                   gensec_ntlmssp_state->role, ntlmssp_command)); 
184                 
185         return NT_STATUS_INVALID_PARAMETER;
186 }
187
188 /**
189  * Next state function for the wrapped NTLMSSP state machine
190  * 
191  * @param gensec_security GENSEC state, initialised to NTLMSSP
192  * @param out_mem_ctx The TALLOC_CTX for *out to be allocated on
193  * @param in The request, as a DATA_BLOB
194  * @param out The reply, as an talloc()ed DATA_BLOB, on *out_mem_ctx
195  * @return Error, MORE_PROCESSING_REQUIRED if a reply is sent, 
196  *                or NT_STATUS_OK if the user is authenticated. 
197  */
198
199 static NTSTATUS gensec_ntlmssp_update(struct gensec_security *gensec_security, 
200                                       TALLOC_CTX *out_mem_ctx, 
201                                       const DATA_BLOB input, DATA_BLOB *out)
202 {
203         struct gensec_ntlmssp_state *gensec_ntlmssp_state = (struct gensec_ntlmssp_state *)gensec_security->private_data;
204         NTSTATUS status;
205         uint32_t i;
206
207         *out = data_blob(NULL, 0);
208
209         if (!out_mem_ctx) {
210                 /* if the caller doesn't want to manage/own the memory, 
211                    we can put it on our context */
212                 out_mem_ctx = gensec_ntlmssp_state;
213         }
214
215         status = gensec_ntlmssp_update_find(gensec_ntlmssp_state, input, &i);
216         NT_STATUS_NOT_OK_RETURN(status);
217
218         status = ntlmssp_callbacks[i].sync_fn(gensec_security, out_mem_ctx, input, out);
219         NT_STATUS_NOT_OK_RETURN(status);
220         
221         return NT_STATUS_OK;
222 }
223
224 /**
225  * Return the NTLMSSP master session key
226  * 
227  * @param gensec_ntlmssp_state NTLMSSP State
228  */
229
230 NTSTATUS gensec_ntlmssp_session_key(struct gensec_security *gensec_security, 
231                                     DATA_BLOB *session_key)
232 {
233         struct gensec_ntlmssp_state *gensec_ntlmssp_state = (struct gensec_ntlmssp_state *)gensec_security->private_data;
234
235         if (!gensec_ntlmssp_state->session_key.data) {
236                 return NT_STATUS_NO_USER_SESSION_KEY;
237         }
238         *session_key = gensec_ntlmssp_state->session_key;
239
240         return NT_STATUS_OK;
241 }
242
243 void ntlmssp_handle_neg_flags(struct gensec_ntlmssp_state *gensec_ntlmssp_state,
244                               uint32_t neg_flags, bool allow_lm)
245 {
246         if (neg_flags & NTLMSSP_NEGOTIATE_UNICODE) {
247                 gensec_ntlmssp_state->neg_flags |= NTLMSSP_NEGOTIATE_UNICODE;
248                 gensec_ntlmssp_state->neg_flags &= ~NTLMSSP_NEGOTIATE_OEM;
249                 gensec_ntlmssp_state->unicode = true;
250         } else {
251                 gensec_ntlmssp_state->neg_flags &= ~NTLMSSP_NEGOTIATE_UNICODE;
252                 gensec_ntlmssp_state->neg_flags |= NTLMSSP_NEGOTIATE_OEM;
253                 gensec_ntlmssp_state->unicode = false;
254         }
255
256         if ((neg_flags & NTLMSSP_NEGOTIATE_LM_KEY) && allow_lm && !gensec_ntlmssp_state->use_ntlmv2) {
257                 /* other end forcing us to use LM */
258                 gensec_ntlmssp_state->neg_flags |= NTLMSSP_NEGOTIATE_LM_KEY;
259                 gensec_ntlmssp_state->neg_flags &= ~NTLMSSP_NEGOTIATE_NTLM2;
260         } else {
261                 gensec_ntlmssp_state->neg_flags &= ~NTLMSSP_NEGOTIATE_LM_KEY;
262         }
263
264         if (!(neg_flags & NTLMSSP_NEGOTIATE_ALWAYS_SIGN)) {
265                 gensec_ntlmssp_state->neg_flags &= ~NTLMSSP_NEGOTIATE_ALWAYS_SIGN;
266         }
267
268         if (!(neg_flags & NTLMSSP_NEGOTIATE_SIGN)) {
269                 gensec_ntlmssp_state->neg_flags &= ~NTLMSSP_NEGOTIATE_SIGN;
270         }
271
272         if (!(neg_flags & NTLMSSP_NEGOTIATE_SEAL)) {
273                 gensec_ntlmssp_state->neg_flags &= ~NTLMSSP_NEGOTIATE_SEAL;
274         }
275
276         if (!(neg_flags & NTLMSSP_NEGOTIATE_NTLM2)) {
277                 gensec_ntlmssp_state->neg_flags &= ~NTLMSSP_NEGOTIATE_NTLM2;
278         }
279
280         if (!(neg_flags & NTLMSSP_NEGOTIATE_128)) {
281                 gensec_ntlmssp_state->neg_flags &= ~NTLMSSP_NEGOTIATE_128;
282         }
283
284         if (!(neg_flags & NTLMSSP_NEGOTIATE_56)) {
285                 gensec_ntlmssp_state->neg_flags &= ~NTLMSSP_NEGOTIATE_56;
286         }
287
288         if (!(neg_flags & NTLMSSP_NEGOTIATE_KEY_EXCH)) {
289                 gensec_ntlmssp_state->neg_flags &= ~NTLMSSP_NEGOTIATE_KEY_EXCH;
290         }
291
292         /* Woop Woop - unknown flag for Windows compatibility...
293            What does this really do ? JRA. */
294         if (!(neg_flags & NTLMSSP_UNKNOWN_02000000)) {
295                 gensec_ntlmssp_state->neg_flags &= ~NTLMSSP_UNKNOWN_02000000;
296         }
297
298         if ((neg_flags & NTLMSSP_REQUEST_TARGET)) {
299                 gensec_ntlmssp_state->neg_flags |= NTLMSSP_REQUEST_TARGET;
300         }
301         
302 }
303
304 /**
305    Weaken NTLMSSP keys to cope with down-level clients and servers.
306
307    We probably should have some parameters to control this, but as
308    it only occours for LM_KEY connections, and this is controlled
309    by the client lanman auth/lanman auth parameters, it isn't too bad.
310 */
311
312 DATA_BLOB ntlmssp_weakend_key(struct gensec_ntlmssp_state *gensec_ntlmssp_state, 
313                               TALLOC_CTX *mem_ctx) 
314 {
315         DATA_BLOB weakened_key = data_blob_talloc(mem_ctx, 
316                                                   gensec_ntlmssp_state->session_key.data, 
317                                                   gensec_ntlmssp_state->session_key.length);
318         /* Nothing to weaken.  We certainly don't want to 'extend' the length... */
319         if (weakened_key.length < 16) {
320                 /* perhaps there was no key? */
321                 return weakened_key;
322         }
323
324         /* Key weakening not performed on the master key for NTLM2
325            and does not occour for NTLM1.  Therefore we only need
326            to do this for the LM_KEY.  
327         */
328         if (gensec_ntlmssp_state->neg_flags & NTLMSSP_NEGOTIATE_LM_KEY) {
329                 /* LM key doesn't support 128 bit crypto, so this is
330                  * the best we can do.  If you negotiate 128 bit, but
331                  * not 56, you end up with 40 bit... */
332                 if (gensec_ntlmssp_state->neg_flags & NTLMSSP_NEGOTIATE_56) {
333                         weakened_key.data[7] = 0xa0;
334                         weakened_key.length = 8;
335                 } else { /* forty bits */
336                         weakened_key.data[5] = 0xe5;
337                         weakened_key.data[6] = 0x38;
338                         weakened_key.data[7] = 0xb0;
339                         weakened_key.length = 8;
340                 }
341         }
342         return weakened_key;
343 }
344
345 static bool gensec_ntlmssp_have_feature(struct gensec_security *gensec_security,
346                                         uint32_t feature)
347 {
348         struct gensec_ntlmssp_state *gensec_ntlmssp_state = (struct gensec_ntlmssp_state *)gensec_security->private_data;
349         if (feature & GENSEC_FEATURE_SIGN) {
350                 if (!gensec_ntlmssp_state->session_key.length) {
351                         return false;
352                 }
353                 if (gensec_ntlmssp_state->neg_flags & NTLMSSP_NEGOTIATE_SIGN) {
354                         return true;
355                 }
356         }
357         if (feature & GENSEC_FEATURE_SEAL) {
358                 if (!gensec_ntlmssp_state->session_key.length) {
359                         return false;
360                 }
361                 if (gensec_ntlmssp_state->neg_flags & NTLMSSP_NEGOTIATE_SEAL) {
362                         return true;
363                 }
364         }
365         if (feature & GENSEC_FEATURE_SESSION_KEY) {
366                 if (gensec_ntlmssp_state->session_key.length) {
367                         return true;
368                 }
369         }
370         if (feature & GENSEC_FEATURE_DCE_STYLE) {
371                 return true;
372         }
373         if (feature & GENSEC_FEATURE_ASYNC_REPLIES) {
374                 if (gensec_ntlmssp_state->neg_flags & NTLMSSP_NEGOTIATE_NTLM2) {
375                         return true;
376                 }
377         }
378         return false;
379 }
380
381 NTSTATUS gensec_ntlmssp_start(struct gensec_security *gensec_security)
382 {
383         struct gensec_ntlmssp_state *gensec_ntlmssp_state;
384         
385         gensec_ntlmssp_state = talloc_zero(gensec_security, struct gensec_ntlmssp_state);
386         if (!gensec_ntlmssp_state) {
387                 return NT_STATUS_NO_MEMORY;
388         }
389
390         gensec_ntlmssp_state->gensec_security = gensec_security;
391         gensec_ntlmssp_state->auth_context = NULL;
392         gensec_ntlmssp_state->server_info = NULL;
393
394         gensec_security->private_data = gensec_ntlmssp_state;
395         return NT_STATUS_OK;
396 }
397
398 static const char *gensec_ntlmssp_oids[] = { 
399         GENSEC_OID_NTLMSSP, 
400         NULL
401 };
402
403 static const struct gensec_security_ops gensec_ntlmssp_security_ops = {
404         .name           = "ntlmssp",
405         .sasl_name      = "NTLM",
406         .auth_type      = DCERPC_AUTH_TYPE_NTLMSSP,
407         .oid            = gensec_ntlmssp_oids,
408         .client_start   = gensec_ntlmssp_client_start,
409         .server_start   = gensec_ntlmssp_server_start,
410         .magic          = gensec_ntlmssp_magic,
411         .update         = gensec_ntlmssp_update,
412         .sig_size       = gensec_ntlmssp_sig_size,
413         .sign_packet    = gensec_ntlmssp_sign_packet,
414         .check_packet   = gensec_ntlmssp_check_packet,
415         .seal_packet    = gensec_ntlmssp_seal_packet,
416         .unseal_packet  = gensec_ntlmssp_unseal_packet,
417         .wrap           = gensec_ntlmssp_wrap,
418         .unwrap         = gensec_ntlmssp_unwrap,
419         .session_key    = gensec_ntlmssp_session_key,
420         .session_info   = gensec_ntlmssp_session_info,
421         .have_feature   = gensec_ntlmssp_have_feature,
422         .enabled        = true,
423         .priority       = GENSEC_NTLMSSP
424 };
425
426
427 NTSTATUS gensec_ntlmssp_init(void)
428 {
429         NTSTATUS ret;
430
431         auth_init();
432
433         ret = gensec_register(&gensec_ntlmssp_security_ops);
434         if (!NT_STATUS_IS_OK(ret)) {
435                 DEBUG(0,("Failed to register '%s' gensec backend!\n",
436                         gensec_ntlmssp_security_ops.name));
437                 return ret;
438         }
439
440         return ret;
441 }