improving authentication code (tidyup).
[bbaumbach/samba-autobuild/.git] / source / rpc_parse / parse_rpc.c
1
2 /* 
3  *  Unix SMB/Netbios implementation.
4  *  Version 1.9.
5  *  RPC Pipe client / server routines
6  *  Copyright (C) Andrew Tridgell              1992-1997,
7  *  Copyright (C) Luke Kenneth Casson Leighton 1996-1997,
8  *  Copyright (C) Paul Ashton                       1997.
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
26 #include "includes.h"
27
28 extern int DEBUGLEVEL;
29
30
31 /*******************************************************************
32 interface/version dce/rpc pipe identification
33 ********************************************************************/
34
35 #define TRANS_SYNT_V2             \
36 {                                 \
37         {                             \
38                 0x04, 0x5d, 0x88, 0x8a,   \
39                 0xeb, 0x1c, 0xc9, 0x11,   \
40                 0x9f, 0xe8, 0x08, 0x00,   \
41                 0x2b, 0x10, 0x48, 0x60    \
42         }, 0x02                       \
43 }                                 \
44
45 #define SYNT_SVCCTL_V2          \
46 {                                 \
47         {                             \
48                 0x81, 0xbb, 0x7a, 0x36,   \
49                 0x44, 0x98, 0xf1, 0x35,   \
50                 0xad, 0x32, 0x98, 0xf0,   \
51                 0x38, 0x00, 0x10, 0x03    \
52         }, 0x02                       \
53 }                                 \
54
55 #define SYNT_NETLOGON_V2          \
56 {                                 \
57         {                             \
58                 0x04, 0x5d, 0x88, 0x8a,   \
59                 0xeb, 0x1c, 0xc9, 0x11,   \
60                 0x9f, 0xe8, 0x08, 0x00,   \
61                 0x2b, 0x10, 0x48, 0x60    \
62         }, 0x02                       \
63 }                                 \
64
65 #define SYNT_WKSSVC_V1            \
66 {                                 \
67         {                             \
68                 0x98, 0xd0, 0xff, 0x6b,   \
69                 0x12, 0xa1, 0x10, 0x36,   \
70                 0x98, 0x33, 0x46, 0xc3,   \
71                 0xf8, 0x7e, 0x34, 0x5a    \
72         }, 0x01                       \
73 }                                 \
74
75 #define SYNT_SRVSVC_V3            \
76 {                                 \
77         {                             \
78                 0xc8, 0x4f, 0x32, 0x4b,   \
79                 0x70, 0x16, 0xd3, 0x01,   \
80                 0x12, 0x78, 0x5a, 0x47,   \
81                 0xbf, 0x6e, 0xe1, 0x88    \
82         }, 0x03                       \
83 }                                 \
84
85 #define SYNT_LSARPC_V0            \
86 {                                 \
87         {                             \
88                 0x78, 0x57, 0x34, 0x12,   \
89                 0x34, 0x12, 0xcd, 0xab,   \
90                 0xef, 0x00, 0x01, 0x23,   \
91                 0x45, 0x67, 0x89, 0xab    \
92         }, 0x00                       \
93 }                                 \
94
95 #define SYNT_SAMR_V1              \
96 {                                 \
97         {                             \
98                 0x78, 0x57, 0x34, 0x12,   \
99                 0x34, 0x12, 0xcd, 0xab,   \
100                 0xef, 0x00, 0x01, 0x23,   \
101                 0x45, 0x67, 0x89, 0xac    \
102         }, 0x01                       \
103 }                                 \
104
105 #define SYNT_NETLOGON_V1          \
106 {                                 \
107         {                             \
108                 0x78, 0x56, 0x34, 0x12,   \
109                 0x34, 0x12, 0xcd, 0xab,   \
110                 0xef, 0x00, 0x01, 0x23,   \
111                 0x45, 0x67, 0xcf, 0xfb    \
112         }, 0x01                       \
113 }                                 \
114
115 #define SYNT_WINREG_V1            \
116 {                                 \
117         {                             \
118                 0x01, 0xd0, 0x8c, 0x33,   \
119                 0x44, 0x22, 0xf1, 0x31,   \
120                 0xaa, 0xaa, 0x90, 0x00,   \
121                 0x38, 0x00, 0x10, 0x03    \
122         }, 0x01                       \
123 }                                 \
124
125 #define SYNT_ATSVC_V1            \
126 {                                 \
127         {                             \
128                 0x82, 0x06, 0xf7, 0x1f,   \
129                 0x51, 0x0a, 0xe8, 0x30,   \
130                 0x07, 0x6d, 0x74, 0x0b,   \
131                 0xe8, 0xce, 0xe9, 0x8b    \
132         }, 0x01                       \
133 }                                 \
134
135 #define SYNT_SPOOLSS_V1           \
136 {                                 \
137         {                             \
138                 0x78, 0x56, 0x34, 0x12,   \
139                 0x34, 0x12, 0xcd, 0xab,   \
140                 0xef, 0x00, 0x01, 0x23,   \
141                 0x45, 0x67, 0x89, 0xab    \
142         }, 0x01                       \
143 }                                 \
144
145 #define SYNT_NONE_V0              \
146 {                                 \
147         {                             \
148                 0x00, 0x00, 0x00, 0x00,   \
149                 0x00, 0x00, 0x00, 0x00,   \
150                 0x00, 0x00, 0x00, 0x00,   \
151                 0x00, 0x00, 0x00, 0x00    \
152         }, 0x00                       \
153 }                                 \
154
155 #define SYNT_EVENTLOG_V0            \
156 {                                 \
157         {                             \
158                 0xdc, 0x3f, 0x27, 0x82,   \
159                 0x2a, 0xe3, 0xc3, 0x18,   \
160                 0x3f, 0x78, 0x82, 0x79,   \
161                 0x29, 0xdc, 0x23, 0xea    \
162         }, 0x00                       \
163 }
164                                  \
165 struct pipe_id_info pipe_names [] =
166 {
167         /* client pipe , abstract syntax , server pipe   , transfer syntax */
168         { PIPE_LSARPC  , SYNT_LSARPC_V0  , PIPE_LSASS    , TRANS_SYNT_V2 },
169         { PIPE_SAMR    , SYNT_SAMR_V1    , PIPE_LSASS    , TRANS_SYNT_V2 },
170         { PIPE_NETLOGON, SYNT_NETLOGON_V1, PIPE_LSASS    , TRANS_SYNT_V2 },
171         { PIPE_SRVSVC  , SYNT_SRVSVC_V3  , PIPE_NTSVCS   , TRANS_SYNT_V2 },
172         { PIPE_SVCCTL  , SYNT_SVCCTL_V2  , PIPE_NTSVCS   , TRANS_SYNT_V2 },
173         { PIPE_WKSSVC  , SYNT_WKSSVC_V1  , PIPE_NTSVCS   , TRANS_SYNT_V2 },
174         { PIPE_WINREG  , SYNT_WINREG_V1  , PIPE_WINREG   , TRANS_SYNT_V2 },
175         { PIPE_ATSVC   , SYNT_ATSVC_V1   , PIPE_ATSVC    , TRANS_SYNT_V2 },
176         { PIPE_SPOOLSS , SYNT_SPOOLSS_V1 , PIPE_SPOOLSS  , TRANS_SYNT_V2 },
177         { PIPE_EVENTLOG, SYNT_EVENTLOG_V0, PIPE_EVENTLOG , TRANS_SYNT_V2 },
178         { NULL         , SYNT_NONE_V0    , NULL          , SYNT_NONE_V0  }
179 };
180
181 /*******************************************************************
182 creates an RPC_HDR structure.
183 ********************************************************************/
184 void make_rpc_hdr(RPC_HDR *hdr, enum RPC_PKT_TYPE pkt_type, uint8 flags,
185                                 uint32 call_id, int data_len, int auth_len)
186 {
187         if (hdr == NULL) return;
188
189         hdr->major        = 5;               /* RPC version 5 */
190         hdr->minor        = 0;               /* minor version 0 */
191         hdr->pkt_type     = pkt_type;        /* RPC packet type */
192         hdr->flags        = flags;           /* dce/rpc flags */
193         hdr->pack_type    = 0x10;            /* packed data representation */
194         hdr->frag_len     = data_len;        /* fragment length, fill in later */
195         hdr->auth_len     = auth_len;        /* authentication length */
196         hdr->call_id      = call_id;         /* call identifier - match incoming RPC */
197 }
198
199 /*******************************************************************
200 reads or writes an RPC_HDR structure.
201 ********************************************************************/
202 void smb_io_rpc_hdr(char *desc,  RPC_HDR *rpc, prs_struct *ps, int depth)
203 {
204         if (rpc == NULL) return;
205
206         prs_debug(ps, depth, desc, "smb_io_rpc_hdr");
207         depth++;
208
209         prs_uint8 ("major     ", ps, depth, &(rpc->major));
210         prs_uint8 ("minor     ", ps, depth, &(rpc->minor));
211         prs_uint8 ("pkt_type  ", ps, depth, &(rpc->pkt_type));
212         prs_uint8 ("flags     ", ps, depth, &(rpc->flags));
213         prs_uint32("pack_type ", ps, depth, &(rpc->pack_type));
214         prs_uint16("frag_len  ", ps, depth, &(rpc->frag_len));
215         prs_uint16("auth_len  ", ps, depth, &(rpc->auth_len));
216         prs_uint32("call_id   ", ps, depth, &(rpc->call_id));
217 }
218
219 /*******************************************************************
220 reads or writes an RPC_IFACE structure.
221 ********************************************************************/
222 static void smb_io_rpc_iface(char *desc,  RPC_IFACE *ifc, prs_struct *ps, int depth)
223 {
224         if (ifc == NULL) return;
225
226         prs_debug(ps, depth, desc, "smb_io_rpc_iface");
227         depth++;
228
229         prs_align(ps);
230
231         prs_uint8s (False, "data   ", ps, depth, ifc->data, sizeof(ifc->data));
232         prs_uint32 (       "version", ps, depth, &(ifc->version));
233 }
234
235 /*******************************************************************
236 creates an RPC_ADDR_STR structure.
237
238 The name can be null (RPC Alter-Context)
239 ********************************************************************/
240 static void make_rpc_addr_str(RPC_ADDR_STR *str, char *name)
241 {
242         if (str == NULL ) return;
243         if (name == NULL)
244         {
245                 str->len = 1;
246                 fstrcpy(str->str, "");
247         }
248         else
249         {
250                 str->len = strlen(name) + 1;
251                 fstrcpy(str->str, name);
252         }
253 }
254
255 /*******************************************************************
256 reads or writes an RPC_ADDR_STR structure.
257 ********************************************************************/
258 static void smb_io_rpc_addr_str(char *desc,  RPC_ADDR_STR *str, prs_struct *ps, int depth)
259 {
260         if (str == NULL) return;
261
262         prs_debug(ps, depth, desc, "smb_io_rpc_addr_str");
263         depth++;
264         prs_align(ps);
265
266         prs_uint16 (      "len", ps, depth, &(str->len));
267         prs_uint8s (True, "str", ps, depth, (uchar*)str->str, str->len);
268 }
269
270 /*******************************************************************
271 creates an RPC_HDR_BBA structure.
272 ********************************************************************/
273 static void make_rpc_hdr_bba(RPC_HDR_BBA *bba, uint16 max_tsize, uint16 max_rsize, uint32 assoc_gid)
274 {
275         if (bba == NULL) return;
276
277         bba->max_tsize = max_tsize; /* maximum transmission fragment size (0x1630) */
278         bba->max_rsize = max_rsize; /* max receive fragment size (0x1630) */   
279         bba->assoc_gid = assoc_gid; /* associated group id (0x0) */ 
280 }
281
282 /*******************************************************************
283 reads or writes an RPC_HDR_BBA structure.
284 ********************************************************************/
285 static void smb_io_rpc_hdr_bba(char *desc,  RPC_HDR_BBA *rpc, prs_struct *ps, int depth)
286 {
287         if (rpc == NULL) return;
288
289         prs_debug(ps, depth, desc, "smb_io_rpc_hdr_bba");
290         depth++;
291
292         prs_uint16("max_tsize", ps, depth, &(rpc->max_tsize));
293         prs_uint16("max_rsize", ps, depth, &(rpc->max_rsize));
294         prs_uint32("assoc_gid", ps, depth, &(rpc->assoc_gid));
295 }
296
297 /*******************************************************************
298 creates an RPC_HDR_RB structure.
299 ********************************************************************/
300 void make_rpc_hdr_rb(RPC_HDR_RB *rpc, 
301                                 uint16 max_tsize, uint16 max_rsize, uint32 assoc_gid,
302                                 uint32 num_elements, uint16 context_id, uint8 num_syntaxes,
303                                 RPC_IFACE *abstract, RPC_IFACE *transfer)
304 {
305         if (rpc == NULL) return;
306
307         make_rpc_hdr_bba(&(rpc->bba), max_tsize, max_rsize, assoc_gid);
308
309         rpc->num_elements = num_elements ; /* the number of elements (0x1) */
310         rpc->context_id   = context_id   ; /* presentation context identifier (0x0) */
311         rpc->num_syntaxes = num_syntaxes ; /* the number of syntaxes (has always been 1?)(0x1) */
312
313         /* num and vers. of interface client is using */
314         memcpy(&(rpc->abstract), abstract, sizeof(rpc->abstract));
315
316         /* num and vers. of interface to use for replies */
317         memcpy(&(rpc->transfer), transfer, sizeof(rpc->transfer));
318 }
319
320 /*******************************************************************
321 reads or writes an RPC_HDR_RB structure.
322 ********************************************************************/
323 void smb_io_rpc_hdr_rb(char *desc,  RPC_HDR_RB *rpc, prs_struct *ps, int depth)
324 {
325         if (rpc == NULL) return;
326
327         prs_debug(ps, depth, desc, "smb_io_rpc_hdr_rb");
328         depth++;
329
330         smb_io_rpc_hdr_bba("", &(rpc->bba), ps, depth);
331
332         prs_uint32("num_elements", ps, depth, &(rpc->num_elements));
333         prs_uint16("context_id  ", ps, depth, &(rpc->context_id  ));
334         prs_uint8 ("num_syntaxes", ps, depth, &(rpc->num_syntaxes));
335
336         smb_io_rpc_iface("", &(rpc->abstract), ps, depth);
337         smb_io_rpc_iface("", &(rpc->transfer), ps, depth);
338 }
339
340 /*******************************************************************
341 creates an RPC_RESULTS structure.
342
343 lkclXXXX only one reason at the moment!
344
345 ********************************************************************/
346 static void make_rpc_results(RPC_RESULTS *res, 
347                                 uint8 num_results, uint16 result, uint16 reason)
348 {
349         if (res == NULL) return;
350
351         res->num_results = num_results; /* the number of results (0x01) */
352         res->result      = result     ;  /* result (0x00 = accept) */
353         res->reason      = reason     ;  /* reason (0x00 = no reason specified) */
354 }
355
356 /*******************************************************************
357 reads or writes an RPC_RESULTS structure.
358
359 lkclXXXX only one reason at the moment!
360
361 ********************************************************************/
362 static void smb_io_rpc_results(char *desc,  RPC_RESULTS *res, prs_struct *ps, int depth)
363 {
364         if (res == NULL) return;
365
366         prs_debug(ps, depth, desc, "smb_io_rpc_results");
367         depth++;
368
369         prs_align(ps);
370         
371         prs_uint8 ("num_results", ps, depth, &(res->num_results));
372
373         prs_align(ps);
374         
375         prs_uint16("result     ", ps, depth, &(res->result     ));
376         prs_uint16("reason     ", ps, depth, &(res->reason     ));
377 }
378
379 /*******************************************************************
380 creates an RPC_HDR_BA structure.
381
382 lkclXXXX only one reason at the moment!
383 jfm: nope two ! The pipe_addr can be NULL !
384
385 ********************************************************************/
386 void make_rpc_hdr_ba(RPC_HDR_BA *rpc, 
387                                 uint16 max_tsize, uint16 max_rsize, uint32 assoc_gid,
388                                 char *pipe_addr,
389                                 uint8 num_results, uint16 result, uint16 reason,
390                                 RPC_IFACE *transfer)
391 {
392         if (rpc == NULL || transfer == NULL) return;
393
394         make_rpc_hdr_bba (&(rpc->bba ), max_tsize, max_rsize, assoc_gid);
395         make_rpc_addr_str(&(rpc->addr), pipe_addr);
396         make_rpc_results (&(rpc->res ), num_results, result, reason);
397
398         /* the transfer syntax from the request */
399         memcpy(&(rpc->transfer), transfer, sizeof(rpc->transfer));
400 }
401
402 /*******************************************************************
403 reads or writes an RPC_HDR_BA structure.
404 ********************************************************************/
405 void smb_io_rpc_hdr_ba(char *desc,  RPC_HDR_BA *rpc, prs_struct *ps, int depth)
406 {
407         if (rpc == NULL) return;
408
409         prs_debug(ps, depth, desc, "smb_io_rpc_hdr_ba");
410         depth++;
411
412         smb_io_rpc_hdr_bba ("", &(rpc->bba)     , ps, depth);
413         smb_io_rpc_addr_str("", &(rpc->addr)    , ps, depth);
414         smb_io_rpc_results ("", &(rpc->res)     , ps, depth);
415         smb_io_rpc_iface   ("", &(rpc->transfer), ps, depth);
416 }
417
418 /*******************************************************************
419 creates an RPC_HDR_REQ structure.
420 ********************************************************************/
421 void make_rpc_hdr_req(RPC_HDR_REQ *hdr, uint32 alloc_hint, uint16 opnum)
422 {
423         if (hdr == NULL) return;
424
425         hdr->alloc_hint   = alloc_hint; /* allocation hint */
426         hdr->context_id   = 0;         /* presentation context identifier */
427         hdr->opnum        = opnum;     /* opnum */
428 }
429
430 /*******************************************************************
431 reads or writes an RPC_HDR_REQ structure.
432 ********************************************************************/
433 void smb_io_rpc_hdr_req(char *desc,  RPC_HDR_REQ *rpc, prs_struct *ps, int depth)
434 {
435         if (rpc == NULL) return;
436
437         prs_debug(ps, depth, desc, "smb_io_rpc_hdr_req");
438         depth++;
439
440         prs_uint32("alloc_hint", ps, depth, &(rpc->alloc_hint));
441         prs_uint16("context_id", ps, depth, &(rpc->context_id));
442         prs_uint16("opnum     ", ps, depth, &(rpc->opnum));
443 }
444
445 /*******************************************************************
446 reads or writes an RPC_HDR_RESP structure.
447 ********************************************************************/
448 void smb_io_rpc_hdr_resp(char *desc,  RPC_HDR_RESP *rpc, prs_struct *ps, int depth)
449 {
450         if (rpc == NULL) return;
451
452         prs_debug(ps, depth, desc, "smb_io_rpc_hdr_resp");
453         depth++;
454
455         prs_uint32("alloc_hint", ps, depth, &(rpc->alloc_hint));
456         prs_uint16("context_id", ps, depth, &(rpc->context_id));
457         prs_uint8 ("cancel_ct ", ps, depth, &(rpc->cancel_count));
458         prs_uint8 ("reserved  ", ps, depth, &(rpc->reserved));
459 }
460
461 /*******************************************************************
462 creates an RPC_HDR_AUTHA structure.
463 ********************************************************************/
464 void make_rpc_hdr_autha(RPC_HDR_AUTHA *rai,
465                                 uint16 max_tsize, uint16 max_rsize,
466                                 uint8 auth_type, uint8 auth_level,
467                                 uint8 stub_type_len)
468 {
469         if (rai == NULL) return;
470
471         rai->max_tsize = max_tsize; /* maximum transmission fragment size (0x1630) */
472         rai->max_rsize = max_rsize; /* max receive fragment size (0x1630) */   
473
474         rai->auth_type     = auth_type; /* nt lm ssp 0x0a */
475         rai->auth_level    = auth_level; /* 0x06 */
476         rai->stub_type_len = stub_type_len; /* 0x00 */
477         rai->padding       = 0; /* padding 0x00 */
478
479         rai->unknown       = 0x0014a0c0; /* non-zero pointer to something */
480 }
481
482 /*******************************************************************
483 reads or writes an RPC_HDR_AUTHA structure.
484 ********************************************************************/
485 void smb_io_rpc_hdr_autha(char *desc, RPC_HDR_AUTHA *rai, prs_struct *ps, int depth)
486 {
487         if (rai == NULL) return;
488
489         prs_debug(ps, depth, desc, "smb_io_rpc_hdr_autha");
490         depth++;
491
492         prs_uint16("max_tsize    ", ps, depth, &(rai->max_tsize));
493         prs_uint16("max_rsize    ", ps, depth, &(rai->max_rsize));
494
495         prs_uint8 ("auth_type    ", ps, depth, &(rai->auth_type    )); /* 0x0a nt lm ssp */
496         prs_uint8 ("auth_level   ", ps, depth, &(rai->auth_level   ));/* 0x06 */
497         prs_uint8 ("stub_type_len", ps, depth, &(rai->stub_type_len));
498         prs_uint8 ("padding      ", ps, depth, &(rai->padding      ));
499
500         prs_uint32("unknown      ", ps, depth, &(rai->unknown      )); /* 0x0014a0c0 */
501 }
502
503 /*******************************************************************
504 checks an RPC_HDR_AUTH structure.
505 ********************************************************************/
506 BOOL rpc_hdr_auth_chk(RPC_HDR_AUTH *rai)
507 {
508         return (rai->auth_type == 0x0a && rai->auth_level == 0x06);
509 }
510
511 /*******************************************************************
512 creates an RPC_HDR_AUTH structure.
513 ********************************************************************/
514 void make_rpc_hdr_auth(RPC_HDR_AUTH *rai,
515                                 uint8 auth_type, uint8 auth_level,
516                                 uint8 stub_type_len,
517                                 uint32 ptr)
518 {
519         if (rai == NULL) return;
520
521         rai->auth_type     = auth_type; /* nt lm ssp 0x0a */
522         rai->auth_level    = auth_level; /* 0x06 */
523         rai->stub_type_len = stub_type_len; /* 0x00 */
524         rai->padding       = 0; /* padding 0x00 */
525
526         rai->unknown       = ptr; /* non-zero pointer to something */
527 }
528
529 /*******************************************************************
530 reads or writes an RPC_HDR_AUTH structure.
531 ********************************************************************/
532 void smb_io_rpc_hdr_auth(char *desc, RPC_HDR_AUTH *rai, prs_struct *ps, int depth)
533 {
534         if (rai == NULL) return;
535
536         prs_debug(ps, depth, desc, "smb_io_rpc_hdr_auth");
537         depth++;
538
539         prs_uint8 ("auth_type    ", ps, depth, &(rai->auth_type    )); /* 0x0a nt lm ssp */
540         prs_uint8 ("auth_level   ", ps, depth, &(rai->auth_level   ));/* 0x06 */
541         prs_uint8 ("stub_type_len", ps, depth, &(rai->stub_type_len));
542         prs_uint8 ("padding      ", ps, depth, &(rai->padding      ));
543
544         prs_uint32("unknown      ", ps, depth, &(rai->unknown      )); /* 0x0014a0c0 */
545 }
546
547 /*******************************************************************
548 checks an RPC_AUTH_VERIFIER structure.
549 ********************************************************************/
550 BOOL rpc_auth_verifier_chk(RPC_AUTH_VERIFIER *rav,
551                                 char *signature, uint32 msg_type)
552 {
553         return (strequal(rav->signature, signature) && rav->msg_type == msg_type);
554 }
555
556 /*******************************************************************
557 creates an RPC_AUTH_VERIFIER structure.
558 ********************************************************************/
559 void make_rpc_auth_verifier(RPC_AUTH_VERIFIER *rav,
560                                 char *signature, uint32 msg_type)
561 {
562         if (rav == NULL) return;
563
564         fstrcpy(rav->signature, signature); /* "NTLMSSP" */
565         rav->msg_type = msg_type; /* NTLMSSP_MESSAGE_TYPE */
566 }
567
568 /*******************************************************************
569 reads or writes an RPC_AUTH_VERIFIER structure.
570 ********************************************************************/
571 void smb_io_rpc_auth_verifier(char *desc, RPC_AUTH_VERIFIER *rav, prs_struct *ps, int depth)
572 {
573         if (rav == NULL) return;
574
575         prs_debug(ps, depth, desc, "smb_io_rpc_auth_verifier");
576         depth++;
577
578         prs_string("signature", ps, depth, rav->signature, 0, sizeof(rav->signature)); /* "NTLMSSP" */
579         prs_uint32("msg_type ", ps, depth, &(rav->msg_type  )); /* NTLMSSP_MESSAGE_TYPE */
580 }
581
582 /*******************************************************************
583 creates an RPC_AUTH_NTLMSSP_NEG structure.
584 ********************************************************************/
585 void make_rpc_auth_ntlmssp_neg(RPC_AUTH_NTLMSSP_NEG *neg,
586                                 uint32 neg_flgs,
587                                 fstring myname, fstring domain)
588 {
589         int len_myname = strlen(myname);
590         int len_domain = strlen(domain);
591
592         if (neg == NULL) return;
593
594         neg->neg_flgs = neg_flgs ; /* 0x00b2b3 */
595
596         make_str_hdr(&neg->hdr_domain, len_domain, len_domain, 0x20 + len_myname); 
597         make_str_hdr(&neg->hdr_myname, len_myname, len_myname, 0x20); 
598
599         fstrcpy(neg->myname, myname);
600         fstrcpy(neg->domain, domain);
601 }
602
603 /*******************************************************************
604 reads or writes an RPC_AUTH_NTLMSSP_NEG structure.
605
606 *** lkclXXXX HACK ALERT! ***
607
608 ********************************************************************/
609 void smb_io_rpc_auth_ntlmssp_neg(char *desc, RPC_AUTH_NTLMSSP_NEG *neg, prs_struct *ps, int depth)
610 {
611         if (neg == NULL) return;
612
613         prs_debug(ps, depth, desc, "smb_io_rpc_auth_ntlmssp_neg");
614         depth++;
615
616         prs_uint32("neg_flgs ", ps, depth, &(neg->neg_flgs));
617
618         if (ps->io)
619         {
620                 uint32 old_offset;
621
622                 /* reading */
623
624                 ZERO_STRUCTP(neg);
625
626                 smb_io_strhdr("hdr_domain", &(neg->hdr_domain), ps, depth); 
627                 smb_io_strhdr("hdr_myname", &(neg->hdr_myname), ps, depth); 
628
629                 old_offset = ps->offset;
630
631                 ps->offset = neg->hdr_myname  .buffer + 0x50; /* lkclXXXX HACK! */
632                 prs_uint8s(True , "myname", ps, depth, (uint8*)neg->myname  , MIN(neg->hdr_myname  .str_str_len, sizeof(neg->myname  ))); 
633                 old_offset += neg->hdr_myname  .str_str_len;
634
635                 ps->offset = neg->hdr_domain  .buffer + 0x50; /* lkclXXXX HACK! */
636                 prs_uint8s(True , "domain", ps, depth, (uint8*)neg->domain  , MIN(neg->hdr_domain  .str_str_len, sizeof(neg->domain  ))); 
637                 old_offset += neg->hdr_domain  .str_str_len;
638
639                 ps->offset = old_offset;
640         }
641         else
642         {
643                 /* writing */
644                 smb_io_strhdr("hdr_domain", &(neg->hdr_domain), ps, depth); 
645                 smb_io_strhdr("hdr_myname", &(neg->hdr_myname), ps, depth); 
646
647                 prs_uint8s(True , "myname", ps, depth, (uint8*)neg->myname  , MIN(neg->hdr_myname  .str_str_len, sizeof(neg->myname  ))); 
648                 prs_uint8s(True , "domain", ps, depth, (uint8*)neg->domain  , MIN(neg->hdr_domain  .str_str_len, sizeof(neg->domain  ))); 
649         }
650 }
651
652 /*******************************************************************
653 creates an RPC_AUTH_NTLMSSP_CHAL structure.
654 ********************************************************************/
655 void make_rpc_auth_ntlmssp_chal(RPC_AUTH_NTLMSSP_CHAL *chl,
656                                 uint32 neg_flags,
657                                 uint8 challenge[8])
658 {
659         if (chl == NULL) return;
660
661         chl->unknown_1 = 0x0; 
662         chl->unknown_2 = 0x00000028;
663         chl->neg_flags = neg_flags; /* 0x0082b1 */
664
665         memcpy(chl->challenge, challenge, sizeof(chl->challenge)); 
666         bzero (chl->reserved ,            sizeof(chl->reserved)); 
667 }
668
669 /*******************************************************************
670 reads or writes an RPC_AUTH_NTLMSSP_CHAL structure.
671 ********************************************************************/
672 void smb_io_rpc_auth_ntlmssp_chal(char *desc, RPC_AUTH_NTLMSSP_CHAL *chl, prs_struct *ps, int depth)
673 {
674         if (chl == NULL) return;
675
676         prs_debug(ps, depth, desc, "smb_io_rpc_auth_ntlmssp_chal");
677         depth++;
678
679         prs_uint32("unknown_1", ps, depth, &(chl->unknown_1)); /* 0x0000 0000 */
680         prs_uint32("unknown_2", ps, depth, &(chl->unknown_2)); /* 0x0000 b2b3 */
681         prs_uint32("neg_flags", ps, depth, &(chl->neg_flags)); /* 0x0000 82b1 */
682
683         prs_uint8s (False, "challenge", ps, depth, chl->challenge, sizeof(chl->challenge));
684         prs_uint8s (False, "reserved ", ps, depth, chl->reserved , sizeof(chl->reserved ));
685 }
686
687 /*******************************************************************
688 creates an RPC_AUTH_NTLMSSP_RESP structure.
689
690 *** lkclXXXX FUDGE!  HAVE TO MANUALLY SPECIFY OFFSET HERE (0x1c bytes) ***
691 *** lkclXXXX the actual offset is at the start of the auth verifier    ***
692
693 ********************************************************************/
694 void make_rpc_auth_ntlmssp_resp(RPC_AUTH_NTLMSSP_RESP *rsp,
695                                 uchar lm_resp[24],
696                                 uchar *nt_resp, size_t nt_len,
697                                 char *domain, char *user, char *wks,
698                                 uint32 neg_flags)
699 {
700         uint32 offset;
701         int dom_len = strlen(domain);
702         int wks_len = strlen(wks   );
703         int usr_len = strlen(user  );
704         int lm_len  = lm_resp != NULL ? 24 : 0;
705
706         DEBUG(5,("make_rpc_auth_ntlmssp_resp\n"));
707
708         if (rsp == NULL) return;
709
710 #ifdef DEBUG_PASSWORD
711         DEBUG(100,("lm_resp\n"));
712         dump_data(100, lm_resp, lm_len);
713         DEBUG(100,("nt_resp\n"));
714         dump_data(100, nt_resp, nt_len);
715 #endif
716
717         DEBUG(6,("dom: %s user: %s wks: %s neg_flgs: 0x%x\n",
718                   domain, user, wks, neg_flags));
719
720         offset = 0x40;
721
722         if (IS_BITS_SET_ALL(neg_flags, NTLMSSP_NEGOTIATE_UNICODE))
723         {
724                 dom_len *= 2;
725                 wks_len *= 2;
726                 usr_len *= 2;
727         }
728
729         make_str_hdr(&rsp->hdr_domain , dom_len, dom_len, offset);
730         offset += dom_len;
731
732         make_str_hdr(&rsp->hdr_usr    , usr_len, usr_len, offset);
733         offset += usr_len;
734
735         make_str_hdr(&rsp->hdr_wks    , wks_len, wks_len, offset);
736         offset += wks_len;
737
738         make_str_hdr(&rsp->hdr_lm_resp, lm_len , lm_len , offset);
739         offset += lm_len;
740
741         make_str_hdr(&rsp->hdr_nt_resp, nt_len , nt_len , offset);
742         offset += nt_len;
743
744         make_str_hdr(&rsp->hdr_sess_key, 0, 0, offset);
745
746         rsp->neg_flags = neg_flags;
747
748         memcpy(rsp->lm_resp, lm_resp, lm_len);
749         memcpy(rsp->nt_resp, nt_resp, nt_len);
750
751         if (IS_BITS_SET_ALL(neg_flags, NTLMSSP_NEGOTIATE_UNICODE))
752         {
753                 ascii_to_unibuf(rsp->domain, domain, sizeof(rsp->domain)-2);
754                 ascii_to_unibuf(rsp->user  , user  , sizeof(rsp->user  )-2);
755                 ascii_to_unibuf(rsp->wks   , wks   , sizeof(rsp->wks   )-2);
756         }
757         else
758         {
759                 fstrcpy(rsp->domain, domain);
760                 fstrcpy(rsp->user  , user  );
761                 fstrcpy(rsp->wks   , wks   );
762         }
763         rsp->sess_key[0] = 0;
764 }
765
766 /*******************************************************************
767 reads or writes an RPC_AUTH_NTLMSSP_RESP structure.
768
769 *** lkclXXXX FUDGE!  HAVE TO MANUALLY SPECIFY OFFSET HERE (0x1c bytes) ***
770 *** lkclXXXX the actual offset is at the start of the auth verifier    ***
771
772 ********************************************************************/
773 void smb_io_rpc_auth_ntlmssp_resp(char *desc, RPC_AUTH_NTLMSSP_RESP *rsp, prs_struct *ps, int depth)
774 {
775         if (rsp == NULL) return;
776
777         prs_debug(ps, depth, desc, "smb_io_rpc_auth_ntlmssp_resp");
778         depth++;
779
780         if (ps->io)
781         {
782                 uint32 old_offset;
783
784                 /* reading */
785
786                 ZERO_STRUCTP(rsp);
787
788                 smb_io_strhdr("hdr_lm_resp ", &rsp->hdr_lm_resp , ps, depth); 
789                 smb_io_strhdr("hdr_nt_resp ", &rsp->hdr_nt_resp , ps, depth); 
790                 smb_io_strhdr("hdr_domain  ", &rsp->hdr_domain  , ps, depth); 
791                 smb_io_strhdr("hdr_user    ", &rsp->hdr_usr     , ps, depth); 
792                 smb_io_strhdr("hdr_wks     ", &rsp->hdr_wks     , ps, depth); 
793                 smb_io_strhdr("hdr_sess_key", &rsp->hdr_sess_key, ps, depth); 
794
795                 prs_uint32("neg_flags", ps, depth, &(rsp->neg_flags)); /* 0x0000 82b1 */
796
797                 old_offset = ps->offset;
798
799                 ps->offset = rsp->hdr_domain  .buffer + 0x1c;
800                 prs_uint8s(True , "domain  ", ps, depth, (uint8*)rsp->domain  , MIN(rsp->hdr_domain  .str_str_len, sizeof(rsp->domain  ))); 
801                 old_offset += rsp->hdr_domain  .str_str_len;
802
803                 ps->offset = rsp->hdr_usr     .buffer + 0x1c;
804                 prs_uint8s(True , "user    ", ps, depth, (uint8*)rsp->user    , MIN(rsp->hdr_usr     .str_str_len, sizeof(rsp->user    ))); 
805                 old_offset += rsp->hdr_usr     .str_str_len;
806
807                 ps->offset = rsp->hdr_wks     .buffer + 0x1c;
808                 prs_uint8s(True , "wks     ", ps, depth, (uint8*)rsp->wks     , MIN(rsp->hdr_wks     .str_str_len, sizeof(rsp->wks     ))); 
809                 old_offset += rsp->hdr_wks     .str_str_len;
810
811                 ps->offset = rsp->hdr_lm_resp .buffer + 0x1c;
812                 prs_uint8s(False, "lm_resp ", ps, depth, (uint8*)rsp->lm_resp , MIN(rsp->hdr_lm_resp .str_str_len, sizeof(rsp->lm_resp ))); 
813                 old_offset += rsp->hdr_lm_resp .str_str_len;
814
815                 ps->offset = rsp->hdr_nt_resp .buffer + 0x1c;
816                 prs_uint8s(False, "nt_resp ", ps, depth, (uint8*)rsp->nt_resp , MIN(rsp->hdr_nt_resp .str_str_len, sizeof(rsp->nt_resp ))); 
817                 old_offset += rsp->hdr_nt_resp .str_str_len;
818
819                 if (rsp->hdr_sess_key.str_str_len != 0)
820                 {
821                         ps->offset = rsp->hdr_sess_key.buffer + 0x1c;
822                         old_offset += rsp->hdr_sess_key.str_str_len;
823                         prs_uint8s(False, "sess_key", ps, depth, (uint8*)rsp->sess_key, MIN(rsp->hdr_sess_key.str_str_len, sizeof(rsp->sess_key))); 
824                 }
825
826                 ps->offset = old_offset;
827         }
828         else
829         {
830                 /* writing */
831                 smb_io_strhdr("hdr_lm_resp ", &rsp->hdr_lm_resp , ps, depth); 
832                 smb_io_strhdr("hdr_nt_resp ", &rsp->hdr_nt_resp , ps, depth); 
833                 smb_io_strhdr("hdr_domain  ", &rsp->hdr_domain  , ps, depth); 
834                 smb_io_strhdr("hdr_user    ", &rsp->hdr_usr     , ps, depth); 
835                 smb_io_strhdr("hdr_wks     ", &rsp->hdr_wks     , ps, depth); 
836                 smb_io_strhdr("hdr_sess_key", &rsp->hdr_sess_key, ps, depth); 
837
838                 prs_uint32("neg_flags", ps, depth, &(rsp->neg_flags)); /* 0x0000 82b1 */
839
840                 prs_uint8s(True , "domain  ", ps, depth, (uint8*)rsp->domain  , MIN(rsp->hdr_domain  .str_str_len, sizeof(rsp->domain  ))); 
841                 prs_uint8s(True , "user    ", ps, depth, (uint8*)rsp->user    , MIN(rsp->hdr_usr     .str_str_len, sizeof(rsp->user    ))); 
842                 prs_uint8s(True , "wks     ", ps, depth, (uint8*)rsp->wks     , MIN(rsp->hdr_wks     .str_str_len, sizeof(rsp->wks     ))); 
843                 prs_uint8s(False, "lm_resp ", ps, depth, (uint8*)rsp->lm_resp , MIN(rsp->hdr_lm_resp .str_str_len, sizeof(rsp->lm_resp ))); 
844                 prs_uint8s(False, "nt_resp ", ps, depth, (uint8*)rsp->nt_resp , MIN(rsp->hdr_nt_resp .str_str_len, sizeof(rsp->nt_resp ))); 
845                 prs_uint8s(False, "sess_key", ps, depth, (uint8*)rsp->sess_key, MIN(rsp->hdr_sess_key.str_str_len, sizeof(rsp->sess_key))); 
846         }
847 }
848
849 /*******************************************************************
850 checks an RPC_AUTH_NTLMSSP_CHK structure.
851 ********************************************************************/
852 BOOL rpc_auth_ntlmssp_chk(RPC_AUTH_NTLMSSP_CHK *chk, uint32 crc32, uint32 seq_num)
853 {
854         if (chk == NULL)
855         {
856                 return False;
857         }
858
859         if (chk->crc32 != crc32 ||
860             chk->ver   != NTLMSSP_SIGN_VERSION ||
861             chk->seq_num != seq_num)
862         {
863                 DEBUG(5,("verify failed - crc %x ver %x seq %d\n",
864                         crc32, NTLMSSP_SIGN_VERSION, seq_num));
865                 DEBUG(5,("verify expect - crc %x ver %x seq %d\n",
866                         chk->crc32, chk->ver, chk->seq_num));
867                 return False;
868         }
869         return True;
870 }
871
872 /*******************************************************************
873 creates an RPC_AUTH_NTLMSSP_CHK structure.
874 ********************************************************************/
875 void make_rpc_auth_ntlmssp_chk(RPC_AUTH_NTLMSSP_CHK *chk,
876                                 uint32 ver, uint32 crc32, uint32 seq_num)
877 {
878         if (chk == NULL) return;
879
880         chk->ver      = ver     ;
881         chk->reserved = 0x0;
882         chk->crc32    = crc32   ;
883         chk->seq_num  = seq_num ;
884 }
885
886 /*******************************************************************
887 reads or writes an RPC_AUTH_NTLMSSP_CHK structure.
888 ********************************************************************/
889 void smb_io_rpc_auth_ntlmssp_chk(char *desc, RPC_AUTH_NTLMSSP_CHK *chk, prs_struct *ps, int depth)
890 {
891         if (chk == NULL) return;
892
893         prs_debug(ps, depth, desc, "smb_io_rpc_auth_ntlmssp_chk");
894         depth++;
895
896         prs_uint32("ver     ", ps, depth, &(chk->ver     )); 
897         prs_uint32("reserved", ps, depth, &(chk->reserved)); 
898         prs_uint32("crc32   ", ps, depth, &(chk->crc32   )); 
899         prs_uint32("seq_num ", ps, depth, &(chk->seq_num )); 
900 }
901