s4:ntlmssp: split gensec_ntlmssp_unseal_packet() and ntlmssp_unseal_packet()
[idra/samba.git] / source4 / auth / ntlmssp / ntlmssp_sign.c
1 /* 
2  *  Unix SMB/CIFS implementation.
3  *  Version 3.0
4  *  NTLMSSP Signing routines
5  *  Copyright (C) Luke Kenneth Casson Leighton 1996-2001
6  *  Copyright (C) Andrew Bartlett <abartlet@samba.org> 2003-2005
7  *  
8  *  This program is free software; you can redistribute it and/or modify
9  *  it under the terms of the GNU General Public License as published by
10  *  the Free Software Foundation; either version 3 of the License, or
11  *  (at your option) any later version.
12  *  
13  *  This program is distributed in the hope that it will be useful,
14  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
15  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  *  GNU General Public License for more details.
17  *  
18  *  You should have received a copy of the GNU General Public License
19  *  along with this program; if not, see <http://www.gnu.org/licenses/>.
20  */
21
22 #include "includes.h"
23 #include "auth/ntlmssp/ntlmssp.h"
24 #include "../libcli/auth/libcli_auth.h"
25 #include "../lib/crypto/crypto.h"
26 #include "auth/gensec/gensec.h"
27
28 #define CLI_SIGN "session key to client-to-server signing key magic constant"
29 #define CLI_SEAL "session key to client-to-server sealing key magic constant"
30 #define SRV_SIGN "session key to server-to-client signing key magic constant"
31 #define SRV_SEAL "session key to server-to-client sealing key magic constant"
32
33 /**
34  * Some notes on the NTLM2 code:
35  *
36  * NTLM2 is a AEAD system.  This means that the data encrypted is not
37  * all the data that is signed.  In DCE-RPC case, the headers of the
38  * DCE-RPC packets are also signed.  This prevents some of the
39  * fun-and-games one might have by changing them.
40  *
41  */
42
43 static void calc_ntlmv2_key(TALLOC_CTX *mem_ctx, 
44                             DATA_BLOB *subkey,
45                             DATA_BLOB session_key, 
46                             const char *constant)
47 {
48         struct MD5Context ctx3;
49         *subkey = data_blob_talloc(mem_ctx, NULL, 16);
50         MD5Init(&ctx3);
51         MD5Update(&ctx3, session_key.data, session_key.length);
52         MD5Update(&ctx3, (const uint8_t *)constant, strlen(constant)+1);
53         MD5Final(subkey->data, &ctx3);
54 }
55
56 enum ntlmssp_direction {
57         NTLMSSP_SEND,
58         NTLMSSP_RECEIVE
59 };
60
61 static NTSTATUS ntlmssp_make_packet_signature(struct gensec_ntlmssp_state *gensec_ntlmssp_state,
62                                               TALLOC_CTX *sig_mem_ctx,
63                                               const uint8_t *data, size_t length,
64                                               const uint8_t *whole_pdu, size_t pdu_length,
65                                               enum ntlmssp_direction direction,
66                                               DATA_BLOB *sig, bool encrypt_sig)
67 {
68         if (gensec_ntlmssp_state->neg_flags & NTLMSSP_NEGOTIATE_NTLM2) {
69
70                 HMACMD5Context ctx;
71                 uint8_t digest[16];
72                 uint8_t seq_num[4];
73
74                 *sig = data_blob_talloc(sig_mem_ctx, NULL, NTLMSSP_SIG_SIZE);
75                 if (!sig->data) {
76                         return NT_STATUS_NO_MEMORY;
77                 }
78
79                 switch (direction) {
80                 case NTLMSSP_SEND:
81                         SIVAL(seq_num, 0, gensec_ntlmssp_state->crypt.ntlm2.send_seq_num);
82                         gensec_ntlmssp_state->crypt.ntlm2.send_seq_num++;
83                         hmac_md5_init_limK_to_64(gensec_ntlmssp_state->crypt.ntlm2.send_sign_key.data,
84                                                  gensec_ntlmssp_state->crypt.ntlm2.send_sign_key.length, &ctx);
85                         break;
86                 case NTLMSSP_RECEIVE:
87                         SIVAL(seq_num, 0, gensec_ntlmssp_state->crypt.ntlm2.recv_seq_num);
88                         gensec_ntlmssp_state->crypt.ntlm2.recv_seq_num++;
89                         hmac_md5_init_limK_to_64(gensec_ntlmssp_state->crypt.ntlm2.recv_sign_key.data,
90                                                  gensec_ntlmssp_state->crypt.ntlm2.recv_sign_key.length, &ctx);
91                         break;
92                 }
93                 hmac_md5_update(seq_num, sizeof(seq_num), &ctx);
94                 hmac_md5_update(whole_pdu, pdu_length, &ctx);
95                 hmac_md5_final(digest, &ctx);
96
97                 if (encrypt_sig && gensec_ntlmssp_state->neg_flags & NTLMSSP_NEGOTIATE_KEY_EXCH) {
98                         switch (direction) {
99                         case NTLMSSP_SEND:
100                                 arcfour_crypt_sbox(gensec_ntlmssp_state->crypt.ntlm2.send_seal_arcfour_state, digest, 8);
101                                 break;
102                         case NTLMSSP_RECEIVE:
103                                 arcfour_crypt_sbox(gensec_ntlmssp_state->crypt.ntlm2.recv_seal_arcfour_state, digest, 8);
104                                 break;
105                         }
106                 }
107
108                 SIVAL(sig->data, 0, NTLMSSP_SIGN_VERSION);
109                 memcpy(sig->data + 4, digest, 8);
110                 memcpy(sig->data + 12, seq_num, 4);
111
112                 DEBUG(10, ("NTLM2: created signature over %llu bytes of input:\n", (unsigned long long)pdu_length));
113                 dump_data(11, sig->data, sig->length);
114                         
115         } else {
116                 uint32_t crc;
117                 crc = crc32_calc_buffer(data, length);
118                 if (!msrpc_gen(sig_mem_ctx, 
119                                sig, "dddd", NTLMSSP_SIGN_VERSION, 0, crc, gensec_ntlmssp_state->crypt.ntlm.seq_num)) {
120                         return NT_STATUS_NO_MEMORY;
121                 }
122                 gensec_ntlmssp_state->crypt.ntlm.seq_num++;
123
124                 arcfour_crypt_sbox(gensec_ntlmssp_state->crypt.ntlm.arcfour_state, sig->data+4, sig->length-4);
125
126                 DEBUG(10, ("NTLM1: created signature over %llu bytes of input:\n", (unsigned long long)length));
127                 dump_data(11, sig->data, sig->length);
128         }
129         return NT_STATUS_OK;
130 }
131
132 NTSTATUS ntlmssp_sign_packet(struct gensec_ntlmssp_state *ntlmssp_state,
133                              TALLOC_CTX *sig_mem_ctx,
134                              const uint8_t *data, size_t length,
135                              const uint8_t *whole_pdu, size_t pdu_length,
136                              DATA_BLOB *sig)
137 {
138         return ntlmssp_make_packet_signature(ntlmssp_state,
139                                              sig_mem_ctx,
140                                              data, length,
141                                              whole_pdu, pdu_length,
142                                              NTLMSSP_SEND, sig, true);
143 }
144
145 /**
146  * Check the signature of an incoming packet 
147  *
148  */
149
150 NTSTATUS ntlmssp_check_packet(struct gensec_ntlmssp_state *ntlmssp_state,
151                               TALLOC_CTX *sig_mem_ctx,
152                               const uint8_t *data, size_t length,
153                               const uint8_t *whole_pdu, size_t pdu_length,
154                               const DATA_BLOB *sig)
155 {
156         DATA_BLOB local_sig;
157         NTSTATUS nt_status;
158
159         if (!ntlmssp_state->session_key.length) {
160                 DEBUG(3, ("NO session key, cannot check packet signature\n"));
161                 return NT_STATUS_NO_USER_SESSION_KEY;
162         }
163
164         nt_status = ntlmssp_make_packet_signature(ntlmssp_state, sig_mem_ctx,
165                                                   data, length,
166                                                   whole_pdu, pdu_length,
167                                                   NTLMSSP_RECEIVE, &local_sig, true);
168         
169         if (!NT_STATUS_IS_OK(nt_status)) {
170                 DEBUG(0, ("NTLMSSP packet sig creation failed with %s\n", nt_errstr(nt_status)));
171                 return nt_status;
172         }
173
174         if (ntlmssp_state->neg_flags & NTLMSSP_NEGOTIATE_NTLM2) {
175                 if (local_sig.length != sig->length ||
176                     memcmp(local_sig.data, 
177                            sig->data, sig->length) != 0) {
178
179                         DEBUG(10, ("BAD SIG NTLM2: wanted signature over %llu bytes of input:\n", (unsigned long long)pdu_length));
180                         dump_data(10, local_sig.data, local_sig.length);
181                         
182                         DEBUG(10, ("BAD SIG: got signature over %llu bytes of input:\n", (unsigned long long)pdu_length));
183                         dump_data(10, sig->data, sig->length);
184                         
185                         data_blob_free(&local_sig);
186                         return NT_STATUS_ACCESS_DENIED;
187                 }
188         } else {
189                 if (local_sig.length != sig->length ||
190                     memcmp(local_sig.data + 8, 
191                            sig->data + 8, sig->length - 8) != 0) {
192                         DEBUG(10, ("BAD SIG NTLM1: wanted signature of %llu bytes of input:\n", (unsigned long long)length));
193                         dump_data(5, local_sig.data, local_sig.length);
194                         
195                         DEBUG(10, ("BAD SIG: got signature of %llu bytes of input:\n", (unsigned long long)length));
196                         dump_data(10, sig->data, sig->length);
197                         
198                         data_blob_free(&local_sig);
199                         return NT_STATUS_ACCESS_DENIED;
200                 }
201         }
202         dump_data_pw("checked ntlmssp signature\n", sig->data, sig->length);
203
204         data_blob_free(&local_sig);
205         return NT_STATUS_OK;
206 }
207
208
209 /**
210  * Seal data with the NTLMSSP algorithm
211  *
212  */
213
214 NTSTATUS ntlmssp_seal_packet(struct gensec_ntlmssp_state *ntlmssp_state,
215                              TALLOC_CTX *sig_mem_ctx,
216                              uint8_t *data, size_t length,
217                              const uint8_t *whole_pdu, size_t pdu_length,
218                              DATA_BLOB *sig)
219 {
220         NTSTATUS nt_status;
221
222         if (!ntlmssp_state->session_key.length) {
223                 DEBUG(3, ("NO session key, cannot seal packet\n"));
224                 return NT_STATUS_NO_USER_SESSION_KEY;
225         }
226
227         DEBUG(10,("ntlmssp_seal_data: seal\n"));
228         dump_data_pw("ntlmssp clear data\n", data, length);
229         if (ntlmssp_state->neg_flags & NTLMSSP_NEGOTIATE_NTLM2) {
230                 /* The order of these two operations matters - we must first seal the packet,
231                    then seal the sequence number - this is because the send_seal_hash is not
232                    constant, but is is rather updated with each iteration */
233                 nt_status = ntlmssp_make_packet_signature(ntlmssp_state, sig_mem_ctx,
234                                                           data, length,
235                                                           whole_pdu, pdu_length,
236                                                           NTLMSSP_SEND, sig, false);
237                 arcfour_crypt_sbox(ntlmssp_state->crypt.ntlm2.send_seal_arcfour_state, data, length);
238                 if (ntlmssp_state->neg_flags & NTLMSSP_NEGOTIATE_KEY_EXCH) {
239                         arcfour_crypt_sbox(ntlmssp_state->crypt.ntlm2.send_seal_arcfour_state, sig->data+4, 8);
240                 }
241         } else {
242                 uint32_t crc;
243                 crc = crc32_calc_buffer(data, length);
244                 if (!msrpc_gen(sig_mem_ctx,
245                                sig, "dddd", NTLMSSP_SIGN_VERSION, 0,
246                                crc, ntlmssp_state->crypt.ntlm.seq_num)) {
247                         return NT_STATUS_NO_MEMORY;
248                 }
249
250                 /* The order of these two operations matters - we must
251                    first seal the packet, then seal the sequence
252                    number - this is because the ntlmssp_hash is not
253                    constant, but is is rather updated with each
254                    iteration */
255
256                 arcfour_crypt_sbox(ntlmssp_state->crypt.ntlm.arcfour_state, data, length);
257                 arcfour_crypt_sbox(ntlmssp_state->crypt.ntlm.arcfour_state, sig->data+4, sig->length-4);
258                 /* increment counter on send */
259                 ntlmssp_state->crypt.ntlm.seq_num++;
260                 nt_status = NT_STATUS_OK;
261         }
262         dump_data_pw("ntlmssp signature\n", sig->data, sig->length);
263         dump_data_pw("ntlmssp sealed data\n", data, length);
264
265
266         return nt_status;
267 }
268
269 /**
270  * Unseal data with the NTLMSSP algorithm
271  *
272  */
273
274 NTSTATUS ntlmssp_unseal_packet(struct gensec_ntlmssp_state *ntlmssp_state,
275                                TALLOC_CTX *sig_mem_ctx,
276                                uint8_t *data, size_t length,
277                                const uint8_t *whole_pdu, size_t pdu_length,
278                                const DATA_BLOB *sig)
279 {
280         NTSTATUS status;
281
282         if (!ntlmssp_state->session_key.length) {
283                 DEBUG(3, ("NO session key, cannot unseal packet\n"));
284                 return NT_STATUS_NO_USER_SESSION_KEY;
285         }
286
287         dump_data_pw("ntlmssp sealed data\n", data, length);
288         if (ntlmssp_state->neg_flags & NTLMSSP_NEGOTIATE_NTLM2) {
289                 arcfour_crypt_sbox(ntlmssp_state->crypt.ntlm2.recv_seal_arcfour_state, data, length);
290         } else {
291                 arcfour_crypt_sbox(ntlmssp_state->crypt.ntlm.arcfour_state, data, length);
292         }
293         dump_data_pw("ntlmssp clear data\n", data, length);
294         status = ntlmssp_check_packet(ntlmssp_state, sig_mem_ctx, data, length, whole_pdu, pdu_length, sig);
295
296         if (!NT_STATUS_IS_OK(status)) {
297                 DEBUG(1, ("NTLMSSP packet check for unseal failed due to invalid signature on %llu bytes of input:\n", (unsigned long long)length));
298         }
299         return status;
300 }
301
302 /**
303    Initialise the state for NTLMSSP signing.
304 */
305 /* TODO: make this non-public */
306 NTSTATUS ntlmssp_sign_init(struct gensec_ntlmssp_state *gensec_ntlmssp_state)
307 {
308         TALLOC_CTX *mem_ctx = talloc_new(gensec_ntlmssp_state);
309
310         if (!mem_ctx) {
311                 return NT_STATUS_NO_MEMORY;
312         }
313
314         DEBUG(3, ("NTLMSSP Sign/Seal - Initialising with flags:\n"));
315         debug_ntlmssp_flags(gensec_ntlmssp_state->neg_flags);
316
317         if (gensec_ntlmssp_state->session_key.length < 8) {
318                 talloc_free(mem_ctx);
319                 DEBUG(3, ("NO session key, cannot intialise signing\n"));
320                 return NT_STATUS_NO_USER_SESSION_KEY;
321         }
322
323         if (gensec_ntlmssp_state->neg_flags & NTLMSSP_NEGOTIATE_NTLM2)
324         {
325                 DATA_BLOB weak_session_key = gensec_ntlmssp_state->session_key;
326                 const char *send_sign_const;
327                 const char *send_seal_const;
328                 const char *recv_sign_const;
329                 const char *recv_seal_const;
330
331                 DATA_BLOB send_seal_key;
332                 DATA_BLOB recv_seal_key;
333
334                 switch (gensec_ntlmssp_state->role) {
335                 case NTLMSSP_CLIENT:
336                         send_sign_const = CLI_SIGN;
337                         send_seal_const = CLI_SEAL;
338                         recv_sign_const = SRV_SIGN;
339                         recv_seal_const = SRV_SEAL;
340                         break;
341                 case NTLMSSP_SERVER:
342                         send_sign_const = SRV_SIGN;
343                         send_seal_const = SRV_SEAL;
344                         recv_sign_const = CLI_SIGN;
345                         recv_seal_const = CLI_SEAL;
346                         break;
347                 default:
348                         talloc_free(mem_ctx);
349                         return NT_STATUS_INTERNAL_ERROR;
350                 }
351                 
352                 gensec_ntlmssp_state->crypt.ntlm2.send_seal_arcfour_state = talloc(gensec_ntlmssp_state, struct arcfour_state);
353                 NT_STATUS_HAVE_NO_MEMORY(gensec_ntlmssp_state->crypt.ntlm2.send_seal_arcfour_state);
354                 gensec_ntlmssp_state->crypt.ntlm2.recv_seal_arcfour_state = talloc(gensec_ntlmssp_state, struct arcfour_state);
355                 NT_STATUS_HAVE_NO_MEMORY(gensec_ntlmssp_state->crypt.ntlm2.send_seal_arcfour_state);
356
357                 /**
358                    Weaken NTLMSSP keys to cope with down-level
359                    clients, servers and export restrictions.
360                    
361                    We probably should have some parameters to control
362                    this, once we get NTLM2 working.
363                 */
364
365                 /* Key weakening was not performed on the master key
366                  * for NTLM2 (in ntlmssp_weaken_keys()), but must be
367                  * done on the encryption subkeys only.  That is why
368                  * we don't have this code for the ntlmv1 case.
369                  */
370
371                 if (gensec_ntlmssp_state->neg_flags & NTLMSSP_NEGOTIATE_128) {
372                         
373                 } else if (gensec_ntlmssp_state->neg_flags & NTLMSSP_NEGOTIATE_56) {
374                         weak_session_key.length = 7;
375                 } else { /* forty bits */
376                         weak_session_key.length = 5;
377                 }
378                 dump_data_pw("NTLMSSP weakend master key:\n",
379                              weak_session_key.data, 
380                              weak_session_key.length);
381
382                 /* SEND: sign key */
383                 calc_ntlmv2_key(gensec_ntlmssp_state, 
384                                 &gensec_ntlmssp_state->crypt.ntlm2.send_sign_key, 
385                                 gensec_ntlmssp_state->session_key, send_sign_const);
386                 dump_data_pw("NTLMSSP send sign key:\n",
387                              gensec_ntlmssp_state->crypt.ntlm2.send_sign_key.data, 
388                              gensec_ntlmssp_state->crypt.ntlm2.send_sign_key.length);
389                 
390                 /* SEND: seal ARCFOUR pad */
391                 calc_ntlmv2_key(mem_ctx, 
392                                 &send_seal_key, 
393                                 weak_session_key, send_seal_const);
394                 dump_data_pw("NTLMSSP send seal key:\n",
395                              send_seal_key.data, 
396                              send_seal_key.length);
397                 arcfour_init(gensec_ntlmssp_state->crypt.ntlm2.send_seal_arcfour_state, 
398                              &send_seal_key);
399                 dump_data_pw("NTLMSSP send sesl hash:\n", 
400                              gensec_ntlmssp_state->crypt.ntlm2.send_seal_arcfour_state->sbox, 
401                              sizeof(gensec_ntlmssp_state->crypt.ntlm2.send_seal_arcfour_state->sbox));
402
403                 /* RECV: sign key */
404                 calc_ntlmv2_key(gensec_ntlmssp_state, 
405                                 &gensec_ntlmssp_state->crypt.ntlm2.recv_sign_key, 
406                                 gensec_ntlmssp_state->session_key, recv_sign_const);
407                 dump_data_pw("NTLMSSP recv sign key:\n",
408                              gensec_ntlmssp_state->crypt.ntlm2.recv_sign_key.data, 
409                              gensec_ntlmssp_state->crypt.ntlm2.recv_sign_key.length);
410
411                 /* RECV: seal ARCFOUR pad */
412                 calc_ntlmv2_key(mem_ctx, 
413                                 &recv_seal_key, 
414                                 weak_session_key, recv_seal_const);
415                 dump_data_pw("NTLMSSP recv seal key:\n",
416                              recv_seal_key.data, 
417                              recv_seal_key.length);
418                 arcfour_init(gensec_ntlmssp_state->crypt.ntlm2.recv_seal_arcfour_state, 
419                              &recv_seal_key);
420                 dump_data_pw("NTLMSSP receive seal hash:\n", 
421                              gensec_ntlmssp_state->crypt.ntlm2.recv_seal_arcfour_state->sbox, 
422                              sizeof(gensec_ntlmssp_state->crypt.ntlm2.recv_seal_arcfour_state->sbox));
423
424                 gensec_ntlmssp_state->crypt.ntlm2.send_seq_num = 0;
425                 gensec_ntlmssp_state->crypt.ntlm2.recv_seq_num = 0;
426
427         } else {
428                 DATA_BLOB weak_session_key = ntlmssp_weakend_key(gensec_ntlmssp_state, mem_ctx);
429                 DEBUG(5, ("NTLMSSP Sign/Seal - using NTLM1\n"));
430
431                 gensec_ntlmssp_state->crypt.ntlm.arcfour_state = talloc(gensec_ntlmssp_state, struct arcfour_state);
432                 NT_STATUS_HAVE_NO_MEMORY(gensec_ntlmssp_state->crypt.ntlm.arcfour_state);
433
434                 arcfour_init(gensec_ntlmssp_state->crypt.ntlm.arcfour_state, 
435                              &weak_session_key);
436                 dump_data_pw("NTLMSSP hash:\n", gensec_ntlmssp_state->crypt.ntlm.arcfour_state->sbox,
437                              sizeof(gensec_ntlmssp_state->crypt.ntlm.arcfour_state->sbox));
438
439                 gensec_ntlmssp_state->crypt.ntlm.seq_num = 0;
440         }
441
442         talloc_free(mem_ctx);
443         return NT_STATUS_OK;
444 }
445
446 NTSTATUS gensec_ntlmssp_sign_packet(struct gensec_security *gensec_security,
447                                     TALLOC_CTX *sig_mem_ctx,
448                                     const uint8_t *data, size_t length,
449                                     const uint8_t *whole_pdu, size_t pdu_length,
450                                     DATA_BLOB *sig)
451 {
452         struct gensec_ntlmssp_context *gensec_ntlmssp =
453                 talloc_get_type_abort(gensec_security->private_data,
454                                       struct gensec_ntlmssp_context);
455         NTSTATUS nt_status;
456
457         nt_status = ntlmssp_sign_packet(gensec_ntlmssp->ntlmssp_state,
458                                         sig_mem_ctx,
459                                         data, length,
460                                         whole_pdu, pdu_length,
461                                         sig);
462
463         return nt_status;
464 }
465
466 NTSTATUS gensec_ntlmssp_check_packet(struct gensec_security *gensec_security,
467                                      TALLOC_CTX *sig_mem_ctx,
468                                      const uint8_t *data, size_t length,
469                                      const uint8_t *whole_pdu, size_t pdu_length,
470                                      const DATA_BLOB *sig)
471 {
472         struct gensec_ntlmssp_context *gensec_ntlmssp =
473                 talloc_get_type_abort(gensec_security->private_data,
474                                       struct gensec_ntlmssp_context);
475         NTSTATUS nt_status;
476
477         nt_status = ntlmssp_check_packet(gensec_ntlmssp->ntlmssp_state,
478                                          sig_mem_ctx,
479                                          data, length,
480                                          whole_pdu, pdu_length,
481                                          sig);
482
483         return nt_status;
484 }
485
486 NTSTATUS gensec_ntlmssp_seal_packet(struct gensec_security *gensec_security,
487                                     TALLOC_CTX *sig_mem_ctx,
488                                     uint8_t *data, size_t length,
489                                     const uint8_t *whole_pdu, size_t pdu_length,
490                                     DATA_BLOB *sig)
491 {
492         struct gensec_ntlmssp_context *gensec_ntlmssp =
493                 talloc_get_type_abort(gensec_security->private_data,
494                                       struct gensec_ntlmssp_context);
495         NTSTATUS nt_status;
496
497         nt_status = ntlmssp_seal_packet(gensec_ntlmssp->ntlmssp_state,
498                                         sig_mem_ctx,
499                                         data, length,
500                                         whole_pdu, pdu_length,
501                                         sig);
502
503         return nt_status;
504 }
505
506 /*
507   wrappers for the ntlmssp_*() functions
508 */
509 NTSTATUS gensec_ntlmssp_unseal_packet(struct gensec_security *gensec_security,
510                                       TALLOC_CTX *sig_mem_ctx,
511                                       uint8_t *data, size_t length,
512                                       const uint8_t *whole_pdu, size_t pdu_length,
513                                       const DATA_BLOB *sig)
514 {
515         struct gensec_ntlmssp_context *gensec_ntlmssp =
516                 talloc_get_type_abort(gensec_security->private_data,
517                                       struct gensec_ntlmssp_context);
518         NTSTATUS nt_status;
519
520         nt_status = ntlmssp_unseal_packet(gensec_ntlmssp->ntlmssp_state,
521                                           sig_mem_ctx,
522                                           data, length,
523                                           whole_pdu, pdu_length,
524                                           sig);
525
526         return nt_status;
527 }
528
529 size_t gensec_ntlmssp_sig_size(struct gensec_security *gensec_security, size_t data_size) 
530 {
531         return NTLMSSP_SIG_SIZE;
532 }
533
534 NTSTATUS gensec_ntlmssp_wrap(struct gensec_security *gensec_security, 
535                              TALLOC_CTX *sig_mem_ctx, 
536                              const DATA_BLOB *in, 
537                              DATA_BLOB *out)
538 {
539         DATA_BLOB sig;
540         NTSTATUS nt_status;
541
542         if (gensec_have_feature(gensec_security, GENSEC_FEATURE_SEAL)) {
543
544                 *out = data_blob_talloc(sig_mem_ctx, NULL, in->length + NTLMSSP_SIG_SIZE);
545                 if (!out->data) {
546                         return NT_STATUS_NO_MEMORY;
547                 }
548                 memcpy(out->data + NTLMSSP_SIG_SIZE, in->data, in->length);
549                 
550                 nt_status = gensec_ntlmssp_seal_packet(gensec_security, sig_mem_ctx, 
551                                                        out->data + NTLMSSP_SIG_SIZE, 
552                                                        out->length - NTLMSSP_SIG_SIZE, 
553                                                        out->data + NTLMSSP_SIG_SIZE, 
554                                                        out->length - NTLMSSP_SIG_SIZE, 
555                                                        &sig);
556                 
557                 if (NT_STATUS_IS_OK(nt_status)) {
558                         memcpy(out->data, sig.data, NTLMSSP_SIG_SIZE);
559                 }
560                 return nt_status;
561
562         } else if (gensec_have_feature(gensec_security, GENSEC_FEATURE_SIGN)) {
563
564                 *out = data_blob_talloc(sig_mem_ctx, NULL, in->length + NTLMSSP_SIG_SIZE);
565                 if (!out->data) {
566                         return NT_STATUS_NO_MEMORY;
567                 }
568                 memcpy(out->data + NTLMSSP_SIG_SIZE, in->data, in->length);
569
570                 nt_status = gensec_ntlmssp_sign_packet(gensec_security, sig_mem_ctx, 
571                                                        out->data + NTLMSSP_SIG_SIZE, 
572                                                        out->length - NTLMSSP_SIG_SIZE, 
573                                                        out->data + NTLMSSP_SIG_SIZE, 
574                                                        out->length - NTLMSSP_SIG_SIZE, 
575                                                        &sig);
576
577                 if (NT_STATUS_IS_OK(nt_status)) {
578                         memcpy(out->data, sig.data, NTLMSSP_SIG_SIZE);
579                 }
580                 return nt_status;
581
582         } else {
583                 *out = *in;
584                 return NT_STATUS_OK;
585         }
586 }
587
588
589 NTSTATUS gensec_ntlmssp_unwrap(struct gensec_security *gensec_security, 
590                                TALLOC_CTX *sig_mem_ctx, 
591                                const DATA_BLOB *in, 
592                                DATA_BLOB *out)
593 {
594         struct gensec_ntlmssp_context *gensec_ntlmssp =
595                 talloc_get_type_abort(gensec_security->private_data,
596                                       struct gensec_ntlmssp_context);
597         struct gensec_ntlmssp_state *gensec_ntlmssp_state = gensec_ntlmssp->ntlmssp_state;
598         DATA_BLOB sig;
599
600         if (gensec_have_feature(gensec_security, GENSEC_FEATURE_SEAL)) {
601                 if (in->length < NTLMSSP_SIG_SIZE) {
602                         return NT_STATUS_INVALID_PARAMETER;
603                 }
604                 sig.data = in->data;
605                 sig.length = NTLMSSP_SIG_SIZE;
606
607                 *out = data_blob_talloc(sig_mem_ctx, in->data + NTLMSSP_SIG_SIZE, in->length - NTLMSSP_SIG_SIZE);
608                 
609                 return gensec_ntlmssp_unseal_packet(gensec_security, sig_mem_ctx, 
610                                                     out->data, out->length, 
611                                                     out->data, out->length, 
612                                                     &sig);
613                                                   
614         } else if (gensec_have_feature(gensec_security, GENSEC_FEATURE_SIGN)) {
615                 NTSTATUS status;
616                 uint32_t ntlm_seqnum;
617                 struct arcfour_state ntlm_state;
618                 uint32_t ntlm2_seqnum_r;
619                 uint8_t ntlm2_key_r[16];
620                 struct arcfour_state ntlm2_state_r;
621
622                 if (in->length < NTLMSSP_SIG_SIZE) {
623                         return NT_STATUS_INVALID_PARAMETER;
624                 }
625                 sig.data = in->data;
626                 sig.length = NTLMSSP_SIG_SIZE;
627                 *out = data_blob_talloc(sig_mem_ctx, in->data + NTLMSSP_SIG_SIZE, in->length - NTLMSSP_SIG_SIZE);
628
629                 if (gensec_ntlmssp_state->neg_flags & NTLMSSP_NEGOTIATE_NTLM2) {
630                         ntlm2_seqnum_r = gensec_ntlmssp_state->crypt.ntlm2.recv_seq_num;
631                         ntlm2_state_r = *gensec_ntlmssp_state->crypt.ntlm2.recv_seal_arcfour_state;
632                         memcpy(ntlm2_key_r,
633                                gensec_ntlmssp_state->crypt.ntlm2.recv_sign_key.data,
634                                16);
635                 } else {
636                         ntlm_seqnum = gensec_ntlmssp_state->crypt.ntlm.seq_num;
637                         ntlm_state = *gensec_ntlmssp_state->crypt.ntlm.arcfour_state;
638                 }
639
640                 status = gensec_ntlmssp_check_packet(gensec_security, sig_mem_ctx,
641                                                      out->data, out->length,
642                                                      out->data, out->length,
643                                                      &sig);
644                 if (!NT_STATUS_IS_OK(status)) {
645                         NTSTATUS check_status = status;
646                         /*
647                          * The Windows LDAP libraries seems to have a bug
648                          * and always use sealing even if only signing was
649                          * negotiated. So we need to fallback.
650                          */
651
652                         if (gensec_ntlmssp_state->neg_flags & NTLMSSP_NEGOTIATE_NTLM2) {
653                                 gensec_ntlmssp_state->crypt.ntlm2.recv_seq_num = ntlm2_seqnum_r;
654                                 *gensec_ntlmssp_state->crypt.ntlm2.recv_seal_arcfour_state = ntlm2_state_r;
655                                 memcpy(gensec_ntlmssp_state->crypt.ntlm2.recv_sign_key.data,
656                                        ntlm2_key_r, 16);
657                         } else {
658                                 gensec_ntlmssp_state->crypt.ntlm.seq_num = ntlm_seqnum;
659                                 *gensec_ntlmssp_state->crypt.ntlm.arcfour_state = ntlm_state;
660                         }
661
662                         status = gensec_ntlmssp_unseal_packet(gensec_security,
663                                                               sig_mem_ctx,
664                                                               out->data,
665                                                               out->length,
666                                                               out->data,
667                                                               out->length,
668                                                               &sig);
669                         if (NT_STATUS_IS_OK(status)) {
670                                 gensec_ntlmssp_state->neg_flags |= NTLMSSP_NEGOTIATE_SEAL;
671                         } else {
672                                 status = check_status;
673                         }
674                 }
675
676                 if (!NT_STATUS_IS_OK(status)) {
677                         DEBUG(1, ("NTLMSSP packet check for unwrap failed due to invalid signature\n"));
678                 }
679                 return status;
680         } else {
681                 *out = *in;
682                 return NT_STATUS_OK;
683         }
684 }
685