Adding scheduler control pipe (\atsvc), client-side routines, and rpcclient
[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_NONE_V0              \
136 {                                 \
137         {                             \
138                 0x00, 0x00, 0x00, 0x00,   \
139                 0x00, 0x00, 0x00, 0x00,   \
140                 0x00, 0x00, 0x00, 0x00,   \
141                 0x00, 0x00, 0x00, 0x00    \
142         }, 0x00                       \
143 }                                 \
144
145 struct pipe_id_info pipe_names [] =
146 {
147         /* client pipe , abstract syntax , server pipe   , transfer syntax */
148         { PIPE_LSARPC  , SYNT_LSARPC_V0  , PIPE_LSASS    , TRANS_SYNT_V2 },
149         { PIPE_SAMR    , SYNT_SAMR_V1    , PIPE_LSASS    , TRANS_SYNT_V2 },
150         { PIPE_NETLOGON, SYNT_NETLOGON_V1, PIPE_LSASS    , TRANS_SYNT_V2 },
151         { PIPE_SRVSVC  , SYNT_SRVSVC_V3  , PIPE_NTSVCS   , TRANS_SYNT_V2 },
152         { PIPE_SVCCTL  , SYNT_SVCCTL_V2  , PIPE_NTSVCS   , TRANS_SYNT_V2 },
153         { PIPE_WKSSVC  , SYNT_WKSSVC_V1  , PIPE_NTSVCS   , TRANS_SYNT_V2 },
154         { PIPE_WINREG  , SYNT_WINREG_V1  , PIPE_WINREG   , TRANS_SYNT_V2 },
155         { PIPE_ATSVC   , SYNT_ATSVC_V1   , PIPE_ATSVC    , TRANS_SYNT_V2 },
156         { NULL         , SYNT_NONE_V0    , NULL          , SYNT_NONE_V0  }
157 };
158
159 /*******************************************************************
160 creates an RPC_HDR structure.
161 ********************************************************************/
162 void make_rpc_hdr(RPC_HDR *hdr, enum RPC_PKT_TYPE pkt_type, uint8 flags,
163                                 uint32 call_id, int data_len, int auth_len)
164 {
165         if (hdr == NULL) return;
166
167         hdr->major        = 5;               /* RPC version 5 */
168         hdr->minor        = 0;               /* minor version 0 */
169         hdr->pkt_type     = pkt_type;        /* RPC packet type */
170         hdr->flags        = flags;           /* dce/rpc flags */
171         hdr->pack_type    = 0x10;            /* packed data representation */
172         hdr->frag_len     = data_len;        /* fragment length, fill in later */
173         hdr->auth_len     = auth_len;        /* authentication length */
174         hdr->call_id      = call_id;         /* call identifier - match incoming RPC */
175 }
176
177 /*******************************************************************
178 reads or writes an RPC_HDR structure.
179 ********************************************************************/
180 void smb_io_rpc_hdr(char *desc,  RPC_HDR *rpc, prs_struct *ps, int depth)
181 {
182         if (rpc == NULL) return;
183
184         prs_debug(ps, depth, desc, "smb_io_rpc_hdr");
185         depth++;
186
187         prs_uint8 ("major     ", ps, depth, &(rpc->major));
188         prs_uint8 ("minor     ", ps, depth, &(rpc->minor));
189         prs_uint8 ("pkt_type  ", ps, depth, &(rpc->pkt_type));
190         prs_uint8 ("flags     ", ps, depth, &(rpc->flags));
191         prs_uint32("pack_type ", ps, depth, &(rpc->pack_type));
192         prs_uint16("frag_len  ", ps, depth, &(rpc->frag_len));
193         prs_uint16("auth_len  ", ps, depth, &(rpc->auth_len));
194         prs_uint32("call_id   ", ps, depth, &(rpc->call_id));
195 }
196
197 /*******************************************************************
198 reads or writes an RPC_IFACE structure.
199 ********************************************************************/
200 static void smb_io_rpc_iface(char *desc,  RPC_IFACE *ifc, prs_struct *ps, int depth)
201 {
202         if (ifc == NULL) return;
203
204         prs_debug(ps, depth, desc, "smb_io_rpc_iface");
205         depth++;
206
207         prs_align(ps);
208
209         prs_uint8s (False, "data   ", ps, depth, ifc->data, sizeof(ifc->data));
210         prs_uint32 (       "version", ps, depth, &(ifc->version));
211 }
212
213 /*******************************************************************
214 creates an RPC_ADDR_STR structure.
215 ********************************************************************/
216 static void make_rpc_addr_str(RPC_ADDR_STR *str, char *name)
217 {
218         if (str == NULL || name == NULL) return;
219
220         str->len = strlen(name) + 1;
221         fstrcpy(str->str, name);
222 }
223
224 /*******************************************************************
225 reads or writes an RPC_ADDR_STR structure.
226 ********************************************************************/
227 static void smb_io_rpc_addr_str(char *desc,  RPC_ADDR_STR *str, prs_struct *ps, int depth)
228 {
229         if (str == NULL) return;
230
231         prs_debug(ps, depth, desc, "smb_io_rpc_addr_str");
232         depth++;
233         prs_align(ps);
234
235         prs_uint16 (      "len", ps, depth, &(str->len));
236         prs_uint8s (True, "str", ps, depth, (uchar*)str->str, str->len);
237 }
238
239 /*******************************************************************
240 creates an RPC_HDR_BBA structure.
241 ********************************************************************/
242 static void make_rpc_hdr_bba(RPC_HDR_BBA *bba, uint16 max_tsize, uint16 max_rsize, uint32 assoc_gid)
243 {
244         if (bba == NULL) return;
245
246         bba->max_tsize = max_tsize; /* maximum transmission fragment size (0x1630) */
247         bba->max_rsize = max_rsize; /* max receive fragment size (0x1630) */   
248         bba->assoc_gid = assoc_gid; /* associated group id (0x0) */ 
249 }
250
251 /*******************************************************************
252 reads or writes an RPC_HDR_BBA structure.
253 ********************************************************************/
254 static void smb_io_rpc_hdr_bba(char *desc,  RPC_HDR_BBA *rpc, prs_struct *ps, int depth)
255 {
256         if (rpc == NULL) return;
257
258         prs_debug(ps, depth, desc, "smb_io_rpc_hdr_bba");
259         depth++;
260
261         prs_uint16("max_tsize", ps, depth, &(rpc->max_tsize));
262         prs_uint16("max_rsize", ps, depth, &(rpc->max_rsize));
263         prs_uint32("assoc_gid", ps, depth, &(rpc->assoc_gid));
264 }
265
266 /*******************************************************************
267 creates an RPC_HDR_RB structure.
268 ********************************************************************/
269 void make_rpc_hdr_rb(RPC_HDR_RB *rpc, 
270                                 uint16 max_tsize, uint16 max_rsize, uint32 assoc_gid,
271                                 uint32 num_elements, uint16 context_id, uint8 num_syntaxes,
272                                 RPC_IFACE *abstract, RPC_IFACE *transfer)
273 {
274         if (rpc == NULL) return;
275
276         make_rpc_hdr_bba(&(rpc->bba), max_tsize, max_rsize, assoc_gid);
277
278         rpc->num_elements = num_elements ; /* the number of elements (0x1) */
279         rpc->context_id   = context_id   ; /* presentation context identifier (0x0) */
280         rpc->num_syntaxes = num_syntaxes ; /* the number of syntaxes (has always been 1?)(0x1) */
281
282         /* num and vers. of interface client is using */
283         memcpy(&(rpc->abstract), abstract, sizeof(rpc->abstract));
284
285         /* num and vers. of interface to use for replies */
286         memcpy(&(rpc->transfer), transfer, sizeof(rpc->transfer));
287 }
288
289 /*******************************************************************
290 reads or writes an RPC_HDR_RB structure.
291 ********************************************************************/
292 void smb_io_rpc_hdr_rb(char *desc,  RPC_HDR_RB *rpc, prs_struct *ps, int depth)
293 {
294         if (rpc == NULL) return;
295
296         prs_debug(ps, depth, desc, "smb_io_rpc_hdr_rb");
297         depth++;
298
299         smb_io_rpc_hdr_bba("", &(rpc->bba), ps, depth);
300
301         prs_uint32("num_elements", ps, depth, &(rpc->num_elements));
302         prs_uint16("context_id  ", ps, depth, &(rpc->context_id  ));
303         prs_uint8 ("num_syntaxes", ps, depth, &(rpc->num_syntaxes));
304
305         smb_io_rpc_iface("", &(rpc->abstract), ps, depth);
306         smb_io_rpc_iface("", &(rpc->transfer), ps, depth);
307 }
308
309 /*******************************************************************
310 creates an RPC_RESULTS structure.
311
312 lkclXXXX only one reason at the moment!
313
314 ********************************************************************/
315 static void make_rpc_results(RPC_RESULTS *res, 
316                                 uint8 num_results, uint16 result, uint16 reason)
317 {
318         if (res == NULL) return;
319
320         res->num_results = num_results; /* the number of results (0x01) */
321         res->result      = result     ;  /* result (0x00 = accept) */
322         res->reason      = reason     ;  /* reason (0x00 = no reason specified) */
323 }
324
325 /*******************************************************************
326 reads or writes an RPC_RESULTS structure.
327
328 lkclXXXX only one reason at the moment!
329
330 ********************************************************************/
331 static void smb_io_rpc_results(char *desc,  RPC_RESULTS *res, prs_struct *ps, int depth)
332 {
333         if (res == NULL) return;
334
335         prs_debug(ps, depth, desc, "smb_io_rpc_results");
336         depth++;
337
338         prs_align(ps);
339         
340         prs_uint8 ("num_results", ps, depth, &(res->num_results));
341
342         prs_align(ps);
343         
344         prs_uint16("result     ", ps, depth, &(res->result     ));
345         prs_uint16("reason     ", ps, depth, &(res->reason     ));
346 }
347
348 /*******************************************************************
349 creates an RPC_HDR_BA structure.
350
351 lkclXXXX only one reason at the moment!
352
353 ********************************************************************/
354 void make_rpc_hdr_ba(RPC_HDR_BA *rpc, 
355                                 uint16 max_tsize, uint16 max_rsize, uint32 assoc_gid,
356                                 char *pipe_addr,
357                                 uint8 num_results, uint16 result, uint16 reason,
358                                 RPC_IFACE *transfer)
359 {
360         if (rpc == NULL || transfer == NULL || pipe_addr == NULL) return;
361
362         make_rpc_hdr_bba (&(rpc->bba ), max_tsize, max_rsize, assoc_gid);
363         make_rpc_addr_str(&(rpc->addr), pipe_addr);
364         make_rpc_results (&(rpc->res ), num_results, result, reason);
365
366         /* the transfer syntax from the request */
367         memcpy(&(rpc->transfer), transfer, sizeof(rpc->transfer));
368 }
369
370 /*******************************************************************
371 reads or writes an RPC_HDR_BA structure.
372 ********************************************************************/
373 void smb_io_rpc_hdr_ba(char *desc,  RPC_HDR_BA *rpc, prs_struct *ps, int depth)
374 {
375         if (rpc == NULL) return;
376
377         prs_debug(ps, depth, desc, "smb_io_rpc_hdr_ba");
378         depth++;
379
380         smb_io_rpc_hdr_bba ("", &(rpc->bba)     , ps, depth);
381         smb_io_rpc_addr_str("", &(rpc->addr)    , ps, depth);
382         smb_io_rpc_results ("", &(rpc->res)     , ps, depth);
383         smb_io_rpc_iface   ("", &(rpc->transfer), ps, depth);
384 }
385
386 /*******************************************************************
387 creates an RPC_HDR_REQ structure.
388 ********************************************************************/
389 void make_rpc_hdr_req(RPC_HDR_REQ *hdr, uint32 alloc_hint, uint16 opnum)
390 {
391         if (hdr == NULL) return;
392
393         hdr->alloc_hint   = alloc_hint; /* allocation hint */
394         hdr->context_id   = 0;         /* presentation context identifier */
395         hdr->opnum        = opnum;     /* opnum */
396 }
397
398 /*******************************************************************
399 reads or writes an RPC_HDR_REQ structure.
400 ********************************************************************/
401 void smb_io_rpc_hdr_req(char *desc,  RPC_HDR_REQ *rpc, prs_struct *ps, int depth)
402 {
403         if (rpc == NULL) return;
404
405         prs_debug(ps, depth, desc, "smb_io_rpc_hdr_req");
406         depth++;
407
408         prs_uint32("alloc_hint", ps, depth, &(rpc->alloc_hint));
409         prs_uint16("context_id", ps, depth, &(rpc->context_id));
410         prs_uint16("opnum     ", ps, depth, &(rpc->opnum));
411 }
412
413 /*******************************************************************
414 reads or writes an RPC_HDR_RESP structure.
415 ********************************************************************/
416 void smb_io_rpc_hdr_resp(char *desc,  RPC_HDR_RESP *rpc, prs_struct *ps, int depth)
417 {
418         if (rpc == NULL) return;
419
420         prs_debug(ps, depth, desc, "smb_io_rpc_hdr_resp");
421         depth++;
422
423         prs_uint32("alloc_hint", ps, depth, &(rpc->alloc_hint));
424         prs_uint16("context_id", ps, depth, &(rpc->context_id));
425         prs_uint8 ("cancel_ct ", ps, depth, &(rpc->cancel_count));
426         prs_uint8 ("reserved  ", ps, depth, &(rpc->reserved));
427 }
428
429 /*******************************************************************
430 creates an RPC_HDR_AUTHA structure.
431 ********************************************************************/
432 void make_rpc_hdr_autha(RPC_HDR_AUTHA *rai,
433                                 uint16 max_tsize, uint16 max_rsize,
434                                 uint8 auth_type, uint8 auth_level,
435                                 uint8 stub_type_len)
436 {
437         if (rai == NULL) return;
438
439         rai->max_tsize = max_tsize; /* maximum transmission fragment size (0x1630) */
440         rai->max_rsize = max_rsize; /* max receive fragment size (0x1630) */   
441
442         rai->auth_type     = auth_type; /* nt lm ssp 0x0a */
443         rai->auth_level    = auth_level; /* 0x06 */
444         rai->stub_type_len = stub_type_len; /* 0x00 */
445         rai->padding       = 0; /* padding 0x00 */
446
447         rai->unknown       = 0x0014a0c0; /* non-zero pointer to something */
448 }
449
450 /*******************************************************************
451 reads or writes an RPC_HDR_AUTHA structure.
452 ********************************************************************/
453 void smb_io_rpc_hdr_autha(char *desc, RPC_HDR_AUTHA *rai, prs_struct *ps, int depth)
454 {
455         if (rai == NULL) return;
456
457         prs_debug(ps, depth, desc, "smb_io_rpc_hdr_autha");
458         depth++;
459
460         prs_uint16("max_tsize    ", ps, depth, &(rai->max_tsize));
461         prs_uint16("max_rsize    ", ps, depth, &(rai->max_rsize));
462
463         prs_uint8 ("auth_type    ", ps, depth, &(rai->auth_type    )); /* 0x0a nt lm ssp */
464         prs_uint8 ("auth_level   ", ps, depth, &(rai->auth_level   ));/* 0x06 */
465         prs_uint8 ("stub_type_len", ps, depth, &(rai->stub_type_len));
466         prs_uint8 ("padding      ", ps, depth, &(rai->padding      ));
467
468         prs_uint32("unknown      ", ps, depth, &(rai->unknown      )); /* 0x0014a0c0 */
469 }
470
471 /*******************************************************************
472 checks an RPC_HDR_AUTH structure.
473 ********************************************************************/
474 BOOL rpc_hdr_auth_chk(RPC_HDR_AUTH *rai)
475 {
476         return (rai->auth_type == 0x0a && rai->auth_level == 0x06);
477 }
478
479 /*******************************************************************
480 creates an RPC_HDR_AUTH structure.
481 ********************************************************************/
482 void make_rpc_hdr_auth(RPC_HDR_AUTH *rai,
483                                 uint8 auth_type, uint8 auth_level,
484                                 uint8 stub_type_len,
485                                 uint32 ptr)
486 {
487         if (rai == NULL) return;
488
489         rai->auth_type     = auth_type; /* nt lm ssp 0x0a */
490         rai->auth_level    = auth_level; /* 0x06 */
491         rai->stub_type_len = stub_type_len; /* 0x00 */
492         rai->padding       = 0; /* padding 0x00 */
493
494         rai->unknown       = ptr; /* non-zero pointer to something */
495 }
496
497 /*******************************************************************
498 reads or writes an RPC_HDR_AUTH structure.
499 ********************************************************************/
500 void smb_io_rpc_hdr_auth(char *desc, RPC_HDR_AUTH *rai, prs_struct *ps, int depth)
501 {
502         if (rai == NULL) return;
503
504         prs_debug(ps, depth, desc, "smb_io_rpc_hdr_auth");
505         depth++;
506
507         prs_uint8 ("auth_type    ", ps, depth, &(rai->auth_type    )); /* 0x0a nt lm ssp */
508         prs_uint8 ("auth_level   ", ps, depth, &(rai->auth_level   ));/* 0x06 */
509         prs_uint8 ("stub_type_len", ps, depth, &(rai->stub_type_len));
510         prs_uint8 ("padding      ", ps, depth, &(rai->padding      ));
511
512         prs_uint32("unknown      ", ps, depth, &(rai->unknown      )); /* 0x0014a0c0 */
513 }
514
515 /*******************************************************************
516 checks an RPC_AUTH_VERIFIER structure.
517 ********************************************************************/
518 BOOL rpc_auth_verifier_chk(RPC_AUTH_VERIFIER *rav,
519                                 char *signature, uint32 msg_type)
520 {
521         return (strequal(rav->signature, signature) && rav->msg_type == msg_type);
522 }
523
524 /*******************************************************************
525 creates an RPC_AUTH_VERIFIER structure.
526 ********************************************************************/
527 void make_rpc_auth_verifier(RPC_AUTH_VERIFIER *rav,
528                                 char *signature, uint32 msg_type)
529 {
530         if (rav == NULL) return;
531
532         fstrcpy(rav->signature, signature); /* "NTLMSSP" */
533         rav->msg_type = msg_type; /* NTLMSSP_MESSAGE_TYPE */
534 }
535
536 /*******************************************************************
537 reads or writes an RPC_AUTH_VERIFIER structure.
538 ********************************************************************/
539 void smb_io_rpc_auth_verifier(char *desc, RPC_AUTH_VERIFIER *rav, prs_struct *ps, int depth)
540 {
541         if (rav == NULL) return;
542
543         prs_debug(ps, depth, desc, "smb_io_rpc_auth_verifier");
544         depth++;
545
546         prs_string("signature", ps, depth, rav->signature, 0, sizeof(rav->signature)); /* "NTLMSSP" */
547         prs_uint32("msg_type ", ps, depth, &(rav->msg_type  )); /* NTLMSSP_MESSAGE_TYPE */
548 }
549
550 /*******************************************************************
551 creates an RPC_AUTH_NTLMSSP_NEG structure.
552 ********************************************************************/
553 void make_rpc_auth_ntlmssp_neg(RPC_AUTH_NTLMSSP_NEG *neg,
554                                 uint32 neg_flgs,
555                                 fstring myname, fstring domain)
556 {
557         int len_myname = strlen(myname);
558         int len_domain = strlen(domain);
559
560         if (neg == NULL) return;
561
562         neg->neg_flgs = neg_flgs ; /* 0x00b2b3 */
563
564         make_str_hdr(&neg->hdr_domain, len_domain, len_domain, 0x20 + len_myname); 
565         make_str_hdr(&neg->hdr_myname, len_myname, len_myname, 0x20); 
566
567         fstrcpy(neg->myname, myname);
568         fstrcpy(neg->domain, domain);
569 }
570
571 /*******************************************************************
572 reads or writes an RPC_AUTH_NTLMSSP_NEG structure.
573
574 *** lkclXXXX HACK ALERT! ***
575
576 ********************************************************************/
577 void smb_io_rpc_auth_ntlmssp_neg(char *desc, RPC_AUTH_NTLMSSP_NEG *neg, prs_struct *ps, int depth)
578 {
579         if (neg == NULL) return;
580
581         prs_debug(ps, depth, desc, "smb_io_rpc_auth_ntlmssp_neg");
582         depth++;
583
584         prs_uint32("neg_flgs ", ps, depth, &(neg->neg_flgs));
585
586         if (ps->io)
587         {
588                 uint32 old_offset;
589
590                 /* reading */
591
592                 ZERO_STRUCTP(neg);
593
594                 smb_io_strhdr("hdr_domain", &(neg->hdr_domain), ps, depth); 
595                 smb_io_strhdr("hdr_myname", &(neg->hdr_myname), ps, depth); 
596
597                 old_offset = ps->offset;
598
599                 ps->offset = neg->hdr_myname  .buffer + 0x50; /* lkclXXXX HACK! */
600                 prs_uint8s(True , "myname", ps, depth, (uint8*)neg->myname  , MIN(neg->hdr_myname  .str_str_len, sizeof(neg->myname  ))); 
601                 old_offset += neg->hdr_myname  .str_str_len;
602
603                 ps->offset = neg->hdr_domain  .buffer + 0x50; /* lkclXXXX HACK! */
604                 prs_uint8s(True , "domain", ps, depth, (uint8*)neg->domain  , MIN(neg->hdr_domain  .str_str_len, sizeof(neg->domain  ))); 
605                 old_offset += neg->hdr_domain  .str_str_len;
606
607                 ps->offset = old_offset;
608         }
609         else
610         {
611                 /* writing */
612                 smb_io_strhdr("hdr_domain", &(neg->hdr_domain), ps, depth); 
613                 smb_io_strhdr("hdr_myname", &(neg->hdr_myname), ps, depth); 
614
615                 prs_uint8s(True , "myname", ps, depth, (uint8*)neg->myname  , MIN(neg->hdr_myname  .str_str_len, sizeof(neg->myname  ))); 
616                 prs_uint8s(True , "domain", ps, depth, (uint8*)neg->domain  , MIN(neg->hdr_domain  .str_str_len, sizeof(neg->domain  ))); 
617         }
618 }
619
620 /*******************************************************************
621 creates an RPC_AUTH_NTLMSSP_CHAL structure.
622 ********************************************************************/
623 void make_rpc_auth_ntlmssp_chal(RPC_AUTH_NTLMSSP_CHAL *chl,
624                                 uint32 neg_flags,
625                                 uint8 challenge[8])
626 {
627         if (chl == NULL) return;
628
629         chl->unknown_1 = 0x0; 
630         chl->unknown_2 = 0x00000028;
631         chl->neg_flags = neg_flags; /* 0x0082b1 */
632
633         memcpy(chl->challenge, challenge, sizeof(chl->challenge)); 
634         bzero (chl->reserved ,            sizeof(chl->reserved)); 
635 }
636
637 /*******************************************************************
638 reads or writes an RPC_AUTH_NTLMSSP_CHAL structure.
639 ********************************************************************/
640 void smb_io_rpc_auth_ntlmssp_chal(char *desc, RPC_AUTH_NTLMSSP_CHAL *chl, prs_struct *ps, int depth)
641 {
642         if (chl == NULL) return;
643
644         prs_debug(ps, depth, desc, "smb_io_rpc_auth_ntlmssp_chal");
645         depth++;
646
647         prs_uint32("unknown_1", ps, depth, &(chl->unknown_1)); /* 0x0000 0000 */
648         prs_uint32("unknown_2", ps, depth, &(chl->unknown_2)); /* 0x0000 b2b3 */
649         prs_uint32("neg_flags", ps, depth, &(chl->neg_flags)); /* 0x0000 82b1 */
650
651         prs_uint8s (False, "challenge", ps, depth, chl->challenge, sizeof(chl->challenge));
652         prs_uint8s (False, "reserved ", ps, depth, chl->reserved , sizeof(chl->reserved ));
653 }
654
655 /*******************************************************************
656 creates an RPC_AUTH_NTLMSSP_RESP structure.
657
658 *** lkclXXXX FUDGE!  HAVE TO MANUALLY SPECIFY OFFSET HERE (0x1c bytes) ***
659 *** lkclXXXX the actual offset is at the start of the auth verifier    ***
660
661 ********************************************************************/
662 void make_rpc_auth_ntlmssp_resp(RPC_AUTH_NTLMSSP_RESP *rsp,
663                                 uchar lm_resp[24], uchar nt_resp[24],
664                                 char *domain, char *user, char *wks,
665                                 uint32 neg_flags)
666 {
667         uint32 offset;
668         int dom_len = strlen(domain);
669         int wks_len = strlen(wks   );
670         int usr_len = strlen(user  );
671         int lm_len  = lm_resp != NULL ? 24 : 0;
672         int nt_len  = nt_resp != NULL ? 24 : 0;
673
674         DEBUG(5,("make_rpc_auth_ntlmssp_resp\n"));
675
676         if (rsp == NULL) return;
677
678 #ifdef DEBUG_PASSWORD
679         DEBUG(100,("lm_resp\n"));
680         dump_data(100, lm_resp, 24);
681         DEBUG(100,("nt_resp\n"));
682         dump_data(100, nt_resp, 24);
683 #endif
684
685         DEBUG(6,("dom: %s user: %s wks: %s neg_flgs: 0x%x\n",
686                   domain, user, wks, neg_flags));
687
688         offset = 0x40;
689
690         if (IS_BITS_SET_ALL(neg_flags, NTLMSSP_NEGOTIATE_UNICODE))
691         {
692                 dom_len *= 2;
693                 wks_len *= 2;
694                 usr_len *= 2;
695         }
696
697         make_str_hdr(&rsp->hdr_domain , dom_len, dom_len, offset);
698         offset += dom_len;
699
700         make_str_hdr(&rsp->hdr_usr    , usr_len, usr_len, offset);
701         offset += usr_len;
702
703         make_str_hdr(&rsp->hdr_wks    , wks_len, wks_len, offset);
704         offset += wks_len;
705
706         make_str_hdr(&rsp->hdr_lm_resp, lm_len , lm_len , offset);
707         offset += lm_len;
708
709         make_str_hdr(&rsp->hdr_nt_resp, nt_len , nt_len , offset);
710         offset += nt_len;
711
712         make_str_hdr(&rsp->hdr_sess_key, 0, 0, offset);
713
714         rsp->neg_flags = neg_flags;
715
716         memcpy(rsp->lm_resp, lm_resp, 24);
717         memcpy(rsp->nt_resp, nt_resp, 24);
718
719         if (IS_BITS_SET_ALL(neg_flags, NTLMSSP_NEGOTIATE_UNICODE))
720         {
721                 ascii_to_unibuf(rsp->domain, domain, sizeof(rsp->domain)-2);
722                 ascii_to_unibuf(rsp->user  , user  , sizeof(rsp->user  )-2);
723                 ascii_to_unibuf(rsp->wks   , wks   , sizeof(rsp->wks   )-2);
724         }
725         else
726         {
727                 fstrcpy(rsp->domain, domain);
728                 fstrcpy(rsp->user  , user  );
729                 fstrcpy(rsp->wks   , wks   );
730         }
731         rsp->sess_key[0] = 0;
732 }
733
734 /*******************************************************************
735 reads or writes an RPC_AUTH_NTLMSSP_RESP structure.
736
737 *** lkclXXXX FUDGE!  HAVE TO MANUALLY SPECIFY OFFSET HERE (0x1c bytes) ***
738 *** lkclXXXX the actual offset is at the start of the auth verifier    ***
739
740 ********************************************************************/
741 void smb_io_rpc_auth_ntlmssp_resp(char *desc, RPC_AUTH_NTLMSSP_RESP *rsp, prs_struct *ps, int depth)
742 {
743         if (rsp == NULL) return;
744
745         prs_debug(ps, depth, desc, "smb_io_rpc_auth_ntlmssp_resp");
746         depth++;
747
748         if (ps->io)
749         {
750                 uint32 old_offset;
751
752                 /* reading */
753
754                 ZERO_STRUCTP(rsp);
755
756                 smb_io_strhdr("hdr_lm_resp ", &rsp->hdr_lm_resp , ps, depth); 
757                 smb_io_strhdr("hdr_nt_resp ", &rsp->hdr_nt_resp , ps, depth); 
758                 smb_io_strhdr("hdr_domain  ", &rsp->hdr_domain  , ps, depth); 
759                 smb_io_strhdr("hdr_user    ", &rsp->hdr_usr     , ps, depth); 
760                 smb_io_strhdr("hdr_wks     ", &rsp->hdr_wks     , ps, depth); 
761                 smb_io_strhdr("hdr_sess_key", &rsp->hdr_sess_key, ps, depth); 
762
763                 prs_uint32("neg_flags", ps, depth, &(rsp->neg_flags)); /* 0x0000 82b1 */
764
765                 old_offset = ps->offset;
766
767                 ps->offset = rsp->hdr_domain  .buffer + 0x1c;
768                 prs_uint8s(True , "domain  ", ps, depth, (uint8*)rsp->domain  , MIN(rsp->hdr_domain  .str_str_len, sizeof(rsp->domain  ))); 
769                 old_offset += rsp->hdr_domain  .str_str_len;
770
771                 ps->offset = rsp->hdr_usr     .buffer + 0x1c;
772                 prs_uint8s(True , "user    ", ps, depth, (uint8*)rsp->user    , MIN(rsp->hdr_usr     .str_str_len, sizeof(rsp->user    ))); 
773                 old_offset += rsp->hdr_usr     .str_str_len;
774
775                 ps->offset = rsp->hdr_wks     .buffer + 0x1c;
776                 prs_uint8s(True , "wks     ", ps, depth, (uint8*)rsp->wks     , MIN(rsp->hdr_wks     .str_str_len, sizeof(rsp->wks     ))); 
777                 old_offset += rsp->hdr_wks     .str_str_len;
778
779                 ps->offset = rsp->hdr_lm_resp .buffer + 0x1c;
780                 prs_uint8s(False, "lm_resp ", ps, depth, (uint8*)rsp->lm_resp , MIN(rsp->hdr_lm_resp .str_str_len, sizeof(rsp->lm_resp ))); 
781                 old_offset += rsp->hdr_lm_resp .str_str_len;
782
783                 ps->offset = rsp->hdr_nt_resp .buffer + 0x1c;
784                 prs_uint8s(False, "nt_resp ", ps, depth, (uint8*)rsp->nt_resp , MIN(rsp->hdr_nt_resp .str_str_len, sizeof(rsp->nt_resp ))); 
785                 old_offset += rsp->hdr_nt_resp .str_str_len;
786
787                 if (rsp->hdr_sess_key.str_str_len != 0)
788                 {
789                         ps->offset = rsp->hdr_sess_key.buffer + 0x1c;
790                         old_offset += rsp->hdr_sess_key.str_str_len;
791                         prs_uint8s(False, "sess_key", ps, depth, (uint8*)rsp->sess_key, MIN(rsp->hdr_sess_key.str_str_len, sizeof(rsp->sess_key))); 
792                 }
793
794                 ps->offset = old_offset;
795         }
796         else
797         {
798                 /* writing */
799                 smb_io_strhdr("hdr_lm_resp ", &rsp->hdr_lm_resp , ps, depth); 
800                 smb_io_strhdr("hdr_nt_resp ", &rsp->hdr_nt_resp , ps, depth); 
801                 smb_io_strhdr("hdr_domain  ", &rsp->hdr_domain  , ps, depth); 
802                 smb_io_strhdr("hdr_user    ", &rsp->hdr_usr     , ps, depth); 
803                 smb_io_strhdr("hdr_wks     ", &rsp->hdr_wks     , ps, depth); 
804                 smb_io_strhdr("hdr_sess_key", &rsp->hdr_sess_key, ps, depth); 
805
806                 prs_uint32("neg_flags", ps, depth, &(rsp->neg_flags)); /* 0x0000 82b1 */
807
808                 prs_uint8s(True , "domain  ", ps, depth, (uint8*)rsp->domain  , MIN(rsp->hdr_domain  .str_str_len, sizeof(rsp->domain  ))); 
809                 prs_uint8s(True , "user    ", ps, depth, (uint8*)rsp->user    , MIN(rsp->hdr_usr     .str_str_len, sizeof(rsp->user    ))); 
810                 prs_uint8s(True , "wks     ", ps, depth, (uint8*)rsp->wks     , MIN(rsp->hdr_wks     .str_str_len, sizeof(rsp->wks     ))); 
811                 prs_uint8s(False, "lm_resp ", ps, depth, (uint8*)rsp->lm_resp , MIN(rsp->hdr_lm_resp .str_str_len, sizeof(rsp->lm_resp ))); 
812                 prs_uint8s(False, "nt_resp ", ps, depth, (uint8*)rsp->nt_resp , MIN(rsp->hdr_nt_resp .str_str_len, sizeof(rsp->nt_resp ))); 
813                 prs_uint8s(False, "sess_key", ps, depth, (uint8*)rsp->sess_key, MIN(rsp->hdr_sess_key.str_str_len, sizeof(rsp->sess_key))); 
814         }
815 }
816
817 /*******************************************************************
818 checks an RPC_AUTH_NTLMSSP_CHK structure.
819 ********************************************************************/
820 BOOL rpc_auth_ntlmssp_chk(RPC_AUTH_NTLMSSP_CHK *chk, uint32 crc32, uint32 seq_num)
821 {
822         if (chk == NULL)
823         {
824                 return False;
825         }
826
827         if (chk->crc32 != crc32 ||
828             chk->ver   != NTLMSSP_SIGN_VERSION ||
829             chk->seq_num != seq_num)
830         {
831                 DEBUG(5,("verify failed - crc %x ver %x seq %d\n",
832                         crc32, NTLMSSP_SIGN_VERSION, seq_num));
833                 DEBUG(5,("verify expect - crc %x ver %x seq %d\n",
834                         chk->crc32, chk->ver, chk->seq_num));
835                 return False;
836         }
837         return True;
838 }
839
840 /*******************************************************************
841 creates an RPC_AUTH_NTLMSSP_CHK structure.
842 ********************************************************************/
843 void make_rpc_auth_ntlmssp_chk(RPC_AUTH_NTLMSSP_CHK *chk,
844                                 uint32 ver, uint32 crc32, uint32 seq_num)
845 {
846         if (chk == NULL) return;
847
848         chk->ver      = ver     ;
849         chk->reserved = 0x0;
850         chk->crc32    = crc32   ;
851         chk->seq_num  = seq_num ;
852 }
853
854 /*******************************************************************
855 reads or writes an RPC_AUTH_NTLMSSP_CHK structure.
856 ********************************************************************/
857 void smb_io_rpc_auth_ntlmssp_chk(char *desc, RPC_AUTH_NTLMSSP_CHK *chk, prs_struct *ps, int depth)
858 {
859         if (chk == NULL) return;
860
861         prs_debug(ps, depth, desc, "smb_io_rpc_auth_ntlmssp_chk");
862         depth++;
863
864         prs_uint32("ver     ", ps, depth, &(chk->ver     )); 
865         prs_uint32("reserved", ps, depth, &(chk->reserved)); 
866         prs_uint32("crc32   ", ps, depth, &(chk->crc32   )); 
867         prs_uint32("seq_num ", ps, depth, &(chk->seq_num )); 
868 }
869