source3/rpc_parse/parse_misc.c

   1 /*
   2  *  Unix SMB/Netbios implementation.
   3  *  Version 1.9.
   4  *  RPC Pipe client / server routines
   5  *  Copyright (C) Andrew Tridgell              1992-1997,
   6  *  Copyright (C) Luke Kenneth Casson Leighton 1996-1997,
   7  *  Copyright (C) Paul Ashton                       1997.
   8  *
   9  *  This program is free software; you can redistribute it and/or modify
  10  *  it under the terms of the GNU General Public License as published by
  11  *  the Free Software Foundation; either version 2 of the License, or
  12  *  (at your option) any later version.
  13  *
  14  *  This program is distributed in the hope that it will be useful,
  15  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  *  GNU General Public License for more details.
  18  *
  19  *  You should have received a copy of the GNU General Public License
  20  *  along with this program; if not, write to the Free Software
  21  *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  22  */
  23
  24
  25 #include "includes.h"
  26
  27 extern int DEBUGLEVEL;
  28
  29 /*******************************************************************
  30  Reads or writes a UTIME type.
  31 ********************************************************************/
  32
  33 static BOOL smb_io_utime(char *desc, UTIME *t, prs_struct *ps, int depth)
  34 {
  35         if (t == NULL)
  36                 return False;
  37
  38         prs_debug(ps, depth, desc, "smb_io_utime");
  39         depth++;
  40
  41         if(!prs_align(ps))
  42                 return False;
  43
  44         if(!prs_uint32 ("time", ps, depth, &t->time))
  45                 return False;
  46
  47         return True;
  48 }
  49
  50 /*******************************************************************
  51  Reads or writes an NTTIME structure.
  52 ********************************************************************/
  53
  54 BOOL smb_io_time(char *desc, NTTIME *nttime, prs_struct *ps, int depth)
  55 {
  56         if (nttime == NULL)
  57                 return False;
  58
  59         prs_debug(ps, depth, desc, "smb_io_time");
  60         depth++;
  61
  62         if(!prs_align(ps))
  63                 return False;
  64
  65         if(!prs_uint32("low ", ps, depth, &nttime->low)) /* low part */
  66                 return False;
  67         if(!prs_uint32("high", ps, depth, &nttime->high)) /* high part */
  68                 return False;
  69
  70         return True;
  71 }
  72
  73 /*******************************************************************
  74  Reads or writes a LOOKUP_LEVEL structure.
  75 ********************************************************************/
  76
  77 BOOL smb_io_lookup_level(char *desc, LOOKUP_LEVEL *level, prs_struct *ps, int depth)
  78 {
  79         if (level == NULL)
  80                 return False;
  81
  82         prs_debug(ps, depth, desc, "smb_io_lookup_level");
  83         depth++;
  84
  85         if(!prs_align(ps))
  86                 return False;
  87         if(!prs_uint16("value", ps, depth, &level->value))
  88                 return False;
  89         if(!prs_align(ps))
  90                 return False;
  91
  92         return True;
  93 }
  94
  95 /*******************************************************************
  96  Gets an enumeration handle from an ENUM_HND structure.
  97 ********************************************************************/
  98
  99 uint32 get_enum_hnd(ENUM_HND *enh)
 100 {
 101         return (enh && enh->ptr_hnd != 0) ? enh->handle : 0;
 102 }
 103
 104 /*******************************************************************
 105  Inits an ENUM_HND structure.
 106 ********************************************************************/
 107
 108 void init_enum_hnd(ENUM_HND *enh, uint32 hnd)
 109 {
 110         DEBUG(5,("smb_io_enum_hnd\n"));
 111
 112         enh->ptr_hnd = (hnd != 0) ? 1 : 0;
 113         enh->handle = hnd;
 114 }
 115
 116 /*******************************************************************
 117  Reads or writes an ENUM_HND structure.
 118 ********************************************************************/
 119
 120 BOOL smb_io_enum_hnd(char *desc, ENUM_HND *hnd, prs_struct *ps, int depth)
 121 {
 122         if (hnd == NULL)
 123                 return False;
 124
 125         prs_debug(ps, depth, desc, "smb_io_enum_hnd");
 126         depth++;
 127
 128         if(!prs_align(ps))
 129                 return False;
 130
 131         if(!prs_uint32("ptr_hnd", ps, depth, &hnd->ptr_hnd)) /* pointer */
 132                 return False;
 133
 134         if (hnd->ptr_hnd != 0) {
 135                 if(!prs_uint32("handle ", ps, depth, &hnd->handle )) /* enum handle */
 136                         return False;
 137         }
 138
 139         return True;
 140 }
 141
 142 /*******************************************************************
 143  Reads or writes a DOM_SID structure.
 144 ********************************************************************/
 145
 146 BOOL smb_io_dom_sid(char *desc, DOM_SID *sid, prs_struct *ps, int depth)
 147 {
 148         int i;
 149
 150         if (sid == NULL)
 151                 return False;
 152
 153         prs_debug(ps, depth, desc, "smb_io_dom_sid");
 154         depth++;
 155
 156         if(!prs_align(ps))
 157                 return False;
 158
 159         if(!prs_uint8 ("sid_rev_num", ps, depth, &sid->sid_rev_num))
 160                 return False;
 161         if(!prs_uint8 ("num_auths  ", ps, depth, &sid->num_auths))
 162                 return False;
 163
 164         for (i = 0; i < 6; i++)
 165         {
 166                 fstring tmp;
 167                 slprintf(tmp, sizeof(tmp) - 1, "id_auth[%d] ", i);
 168                 if(!prs_uint8 (tmp, ps, depth, &sid->id_auth[i]))
 169                         return False;
 170         }
 171
 172         /* oops! XXXX should really issue a warning here... */
 173         if (sid->num_auths > MAXSUBAUTHS)
 174                 sid->num_auths = MAXSUBAUTHS;
 175
 176         if(!prs_uint32s(False, "sub_auths ", ps, depth, sid->sub_auths, sid->num_auths))
 177                 return False;
 178
 179         return True;
 180 }
 181
 182 /*******************************************************************
 183  Inits a DOM_SID structure.
 184
 185  BIG NOTE: this function only does SIDS where the identauth is not >= 2^32
 186  identauth >= 2^32 can be detected because it will be specified in hex
 187 ********************************************************************/
 188
 189 void init_dom_sid(DOM_SID *sid, char *str_sid)
 190 {
 191         pstring domsid;
 192         int identauth;
 193         char *p;
 194
 195         if (str_sid == NULL)
 196         {
 197                 DEBUG(4,("netlogon domain SID: none\n"));
 198                 sid->sid_rev_num = 0;
 199                 sid->num_auths = 0;
 200                 return;
 201         }
 202
 203         pstrcpy(domsid, str_sid);
 204
 205         DEBUG(4,("init_dom_sid %d SID:  %s\n", __LINE__, domsid));
 206
 207         /* assume, but should check, that domsid starts "S-" */
 208         p = strtok(domsid+2,"-");
 209         sid->sid_rev_num = atoi(p);
 210
 211         /* identauth in decimal should be <  2^32 */
 212         /* identauth in hex     should be >= 2^32 */
 213         identauth = atoi(strtok(0,"-"));
 214
 215         DEBUG(4,("netlogon rev %d\n", sid->sid_rev_num));
 216         DEBUG(4,("netlogon %s ia %d\n", p, identauth));
 217
 218         sid->id_auth[0] = 0;
 219         sid->id_auth[1] = 0;
 220         sid->id_auth[2] = (identauth & 0xff000000) >> 24;
 221         sid->id_auth[3] = (identauth & 0x00ff0000) >> 16;
 222         sid->id_auth[4] = (identauth & 0x0000ff00) >> 8;
 223         sid->id_auth[5] = (identauth & 0x000000ff);
 224
 225         sid->num_auths = 0;
 226
 227         while ((p = strtok(0, "-")) != NULL && sid->num_auths < MAXSUBAUTHS)
 228                 sid->sub_auths[sid->num_auths++] = atoi(p);
 229
 230         DEBUG(4,("init_dom_sid: %d SID:  %s\n", __LINE__, domsid));
 231 }
 232
 233 /*******************************************************************
 234  Inits a DOM_SID2 structure.
 235 ********************************************************************/
 236
 237 void init_dom_sid2(DOM_SID2 *sid2, DOM_SID *sid)
 238 {
 239         sid2->sid = *sid;
 240         sid2->num_auths = sid2->sid.num_auths;
 241 }
 242
 243 /*******************************************************************
 244  Reads or writes a DOM_SID2 structure.
 245 ********************************************************************/
 246
 247 BOOL smb_io_dom_sid2(char *desc, DOM_SID2 *sid, prs_struct *ps, int depth)
 248 {
 249         if (sid == NULL)
 250                 return False;
 251
 252         prs_debug(ps, depth, desc, "smb_io_dom_sid2");
 253         depth++;
 254
 255         if(!prs_align(ps))
 256                 return False;
 257
 258         if(!prs_uint32("num_auths", ps, depth, &sid->num_auths))
 259                 return False;
 260
 261         if(!smb_io_dom_sid("sid", &sid->sid, ps, depth))
 262                 return False;
 263
 264         return True;
 265 }
 266
 267 /*******************************************************************
 268 creates a STRHDR structure.
 269 ********************************************************************/
 270
 271 void init_str_hdr(STRHDR *hdr, int max_len, int len, uint32 buffer)
 272 {
 273         hdr->str_max_len = max_len;
 274         hdr->str_str_len = len;
 275         hdr->buffer      = buffer;
 276 }
 277
 278 /*******************************************************************
 279  Reads or writes a STRHDR structure.
 280 ********************************************************************/
 281
 282 BOOL smb_io_strhdr(char *desc,  STRHDR *hdr, prs_struct *ps, int depth)
 283 {
 284         if (hdr == NULL)
 285                 return False;
 286
 287         prs_debug(ps, depth, desc, "smb_io_strhdr");
 288         depth++;
 289
 290         prs_align(ps);
 291
 292         if(!prs_uint16("str_str_len", ps, depth, &hdr->str_str_len))
 293                 return False;
 294         if(!prs_uint16("str_max_len", ps, depth, &hdr->str_max_len))
 295                 return False;
 296         if(!prs_uint32("buffer     ", ps, depth, &hdr->buffer))
 297                 return False;
 298
 299         /* oops! XXXX maybe issue a warning that this is happening... */
 300         if (hdr->str_max_len > MAX_STRINGLEN)
 301                 hdr->str_max_len = MAX_STRINGLEN;
 302         if (hdr->str_str_len > MAX_STRINGLEN)
 303                 hdr->str_str_len = MAX_STRINGLEN;
 304
 305         return True;
 306 }
 307
 308 /*******************************************************************
 309  Inits a UNIHDR structure.
 310 ********************************************************************/
 311
 312 void init_uni_hdr(UNIHDR *hdr, int len)
 313 {
 314         hdr->uni_str_len = 2 * len;
 315         hdr->uni_max_len = 2 * len;
 316         hdr->buffer      = len != 0 ? 1 : 0;
 317 }
 318
 319 /*******************************************************************
 320  Reads or writes a UNIHDR structure.
 321 ********************************************************************/
 322
 323 BOOL smb_io_unihdr(char *desc, UNIHDR *hdr, prs_struct *ps, int depth)
 324 {
 325         if (hdr == NULL)
 326                 return False;
 327
 328         prs_debug(ps, depth, desc, "smb_io_unihdr");
 329         depth++;
 330
 331         if(!prs_align(ps))
 332                 return False;
 333
 334         if(!prs_uint16("uni_str_len", ps, depth, &hdr->uni_str_len))
 335                 return False;
 336         if(!prs_uint16("uni_max_len", ps, depth, &hdr->uni_max_len))
 337                 return False;
 338         if(!prs_uint32("buffer     ", ps, depth, &hdr->buffer))
 339                 return False;
 340
 341         /* oops! XXXX maybe issue a warning that this is happening... */
 342         if (hdr->uni_max_len > MAX_UNISTRLEN)
 343                 hdr->uni_max_len = MAX_UNISTRLEN;
 344         if (hdr->uni_str_len > MAX_UNISTRLEN)
 345                 hdr->uni_str_len = MAX_UNISTRLEN;
 346
 347         return True;
 348 }
 349
 350 /*******************************************************************
 351  Inits a BUFHDR structure.
 352 ********************************************************************/
 353
 354 void init_buf_hdr(BUFHDR *hdr, int max_len, int len)
 355 {
 356         hdr->buf_max_len = max_len;
 357         hdr->buf_len     = len;
 358 }
 359
 360 /*******************************************************************
 361  prs_uint16 wrapper. Call this and it sets up a pointer to where the
 362  uint16 should be stored, or gets the size if reading.
 363  ********************************************************************/
 364
 365 BOOL smb_io_hdrbuf_pre(char *desc, BUFHDR *hdr, prs_struct *ps, int depth, uint32 *offset)
 366 {
 367         (*offset) = prs_offset(ps);
 368         if (ps->io) {
 369
 370                 /* reading. */
 371
 372                 if(!smb_io_hdrbuf(desc, hdr, ps, depth))
 373                         return False;
 374
 375         } else {
 376
 377                 /* writing. */
 378
 379                 if(!prs_set_offset(ps, prs_offset(ps) + (sizeof(uint32) * 2)))
 380                         return False;
 381         }
 382
 383         return True;
 384 }
 385
 386 /*******************************************************************
 387  smb_io_hdrbuf wrapper. Call this and it retrospectively stores the size.
 388  Does nothing on reading, as that is already handled by ...._pre()
 389  ********************************************************************/
 390
 391 BOOL smb_io_hdrbuf_post(char *desc, BUFHDR *hdr, prs_struct *ps, int depth,
 392                                 uint32 ptr_hdrbuf, uint32 max_len, uint32 len)
 393 {
 394         if (!ps->io) {
 395                 /* writing: go back and do a retrospective job.  i hate this */
 396
 397                 uint32 old_offset = prs_offset(ps);
 398
 399                 init_buf_hdr(hdr, max_len, len);
 400                 if(!prs_set_offset(ps, ptr_hdrbuf))
 401                         return False;
 402                 if(!smb_io_hdrbuf(desc, hdr, ps, depth))
 403                         return False;
 404
 405                 if(!prs_set_offset(ps, old_offset))
 406                         return False;
 407         }
 408
 409         return True;
 410 }
 411
 412 /*******************************************************************
 413  Reads or writes a BUFHDR structure.
 414 ********************************************************************/
 415
 416 BOOL smb_io_hdrbuf(char *desc, BUFHDR *hdr, prs_struct *ps, int depth)
 417 {
 418         if (hdr == NULL)
 419                 return False;
 420
 421         prs_debug(ps, depth, desc, "smb_io_hdrbuf");
 422         depth++;
 423
 424         if(!prs_align(ps))
 425                 return False;
 426
 427         if(!prs_uint32("buf_max_len", ps, depth, &hdr->buf_max_len))
 428                 return False;
 429         if(!prs_uint32("buf_len    ", ps, depth, &hdr->buf_len))
 430                 return False;
 431
 432         /* oops! XXXX maybe issue a warning that this is happening... */
 433         if (hdr->buf_max_len > MAX_BUFFERLEN)
 434                 hdr->buf_max_len = MAX_BUFFERLEN;
 435         if (hdr->buf_len > MAX_BUFFERLEN)
 436                 hdr->buf_len = MAX_BUFFERLEN;
 437
 438         return True;
 439 }
 440
 441 /*******************************************************************
 442 creates a UNIHDR2 structure.
 443 ********************************************************************/
 444
 445 void init_uni_hdr2(UNIHDR2 *hdr, int len)
 446 {
 447         init_uni_hdr(&hdr->unihdr, len);
 448         hdr->buffer = (len > 0) ? 1 : 0;
 449 }
 450
 451 /*******************************************************************
 452  Reads or writes a UNIHDR2 structure.
 453 ********************************************************************/
 454
 455 BOOL smb_io_unihdr2(char *desc, UNIHDR2 *hdr2, prs_struct *ps, int depth)
 456 {
 457         if (hdr2 == NULL)
 458                 return False;
 459
 460         prs_debug(ps, depth, desc, "smb_io_unihdr2");
 461         depth++;
 462
 463         if(!prs_align(ps))
 464                 return False;
 465
 466         if(!smb_io_unihdr("hdr", &hdr2->unihdr, ps, depth))
 467                 return False;
 468         if(!prs_uint32("buffer", ps, depth, &hdr2->buffer))
 469                 return False;
 470
 471         return True;
 472 }
 473
 474 /*******************************************************************
 475  Inits a UNISTR structure.
 476 ********************************************************************/
 477
 478 void init_unistr(UNISTR *str, const char *buf)
 479 {
 480         /* store the string (null-terminated copy) */
 481         dos_struni2((char *)str->buffer, buf, sizeof(str->buffer));
 482 }
 483
 484 /*******************************************************************
 485 reads or writes a UNISTR structure.
 486 XXXX NOTE: UNISTR structures NEED to be null-terminated.
 487 ********************************************************************/
 488
 489 BOOL smb_io_unistr(char *desc, UNISTR *uni, prs_struct *ps, int depth)
 490 {
 491         if (uni == NULL)
 492                 return False;
 493
 494         prs_debug(ps, depth, desc, "smb_io_unistr");
 495         depth++;
 496
 497         if(!prs_align(ps))
 498                 return False;
 499         if(!prs_unistr("unistr", ps, depth, uni))
 500                 return False;
 501
 502         return True;
 503 }
 504
 505 /*******************************************************************
 506  Inits a BUFFER3 structure from a uint32
 507 ********************************************************************/
 508
 509 void init_buffer3_uint32(BUFFER3 *str, uint32 val)
 510 {
 511         ZERO_STRUCTP(str);
 512
 513         /* set up string lengths. */
 514         str->buf_max_len = sizeof(uint32);
 515         str->buf_len     = sizeof(uint32);
 516
 517         SIVAL(str->buffer, 0, val);
 518 }
 519
 520 /*******************************************************************
 521  Inits a BUFFER3 structure.
 522 ********************************************************************/
 523
 524 void init_buffer3_str(BUFFER3 *str, char *buf, int len)
 525 {
 526         ZERO_STRUCTP(str);
 527
 528         /* set up string lengths. */
 529         str->buf_max_len = len * 2;
 530         str->buf_len     = len * 2;
 531
 532         /* store the string (null-terminated 8 bit chars into 16 bit chars) */
 533         dos_struni2((char *)str->buffer, buf, sizeof(str->buffer));
 534 }
 535
 536 /*******************************************************************
 537  Inits a BUFFER3 structure from a hex string.
 538 ********************************************************************/
 539
 540 void init_buffer3_hex(BUFFER3 *str, char *buf)
 541 {
 542         ZERO_STRUCTP(str);
 543         str->buf_max_len = str->buf_len = strhex_to_str((char *)str->buffer, sizeof(str->buffer), buf);
 544 }
 545
 546 /*******************************************************************
 547  Inits a BUFFER3 structure.
 548 ********************************************************************/
 549
 550 void init_buffer3_bytes(BUFFER3 *str, uint8 *buf, int len)
 551 {
 552         ZERO_STRUCTP(str);
 553
 554         /* max buffer size (allocated size) */
 555         str->buf_max_len = len;
 556         if (buf != NULL)
 557                 memcpy(str->buffer, buf, MIN(str->buf_len, sizeof(str->buffer)));
 558         str->buf_len = buf != NULL ? len : 0;
 559 }
 560
 561 /*******************************************************************
 562  Reads or writes a BUFFER3 structure.
 563    the uni_max_len member tells you how large the buffer is.
 564    the uni_str_len member tells you how much of the buffer is really used.
 565 ********************************************************************/
 566
 567 BOOL smb_io_buffer3(char *desc, BUFFER3 *buf3, prs_struct *ps, int depth)
 568 {
 569         if (buf3 == NULL)
 570                 return False;
 571
 572         prs_debug(ps, depth, desc, "smb_io_buffer3");
 573         depth++;
 574
 575         if(!prs_align(ps))
 576                 return False;
 577
 578         if(!prs_uint32("uni_max_len", ps, depth, &buf3->buf_max_len))
 579                 return False;
 580
 581         if (buf3->buf_max_len > MAX_UNISTRLEN)
 582                 buf3->buf_max_len = MAX_UNISTRLEN;
 583
 584         if(!prs_uint8s(True, "buffer     ", ps, depth, buf3->buffer, buf3->buf_max_len))
 585                 return False;
 586
 587         if(!prs_uint32("buf_len    ", ps, depth, &buf3->buf_len))
 588                 return False;
 589         if (buf3->buf_len > MAX_UNISTRLEN)
 590                 buf3->buf_len = MAX_UNISTRLEN;
 591
 592         return True;
 593 }
 594
 595 /*******************************************************************
 596 reads or writes a BUFFER5 structure.
 597 the buf_len member tells you how large the buffer is.
 598 ********************************************************************/
 599 BOOL smb_io_buffer5(char *desc, BUFFER5 *buf5, prs_struct *ps, int depth)
 600 {
 601         prs_debug(ps, depth, desc, "smb_io_buffer5");
 602         depth++;
 603
 604         if (buf5 == NULL) return False;
 605
 606         prs_align(ps);
 607         prs_uint32("buf_len", ps, depth, &(buf5->buf_len));
 608
 609         /* reading: alloc the buffer first */
 610         if ( ps->io )
 611         {
 612                 buf5->buffer=(uint16 *)malloc( sizeof(uint16)*buf5->buf_len );
 613         }
 614
 615         prs_uint16s(True, "buffer", ps, depth, buf5->buffer, buf5->buf_len);
 616
 617         return True;
 618 }
 619
 620 /*******************************************************************
 621  Frees a BUFFER5 structure (just the malloced part).
 622 ********************************************************************/
 623
 624 void free_buffer5(BUFFER5 *buf5)
 625 {
 626         safe_free(buf5->buffer);
 627 }
 628
 629 /*******************************************************************
 630  Inits a BUFFER2 structure.
 631 ********************************************************************/
 632
 633 void init_buffer2(BUFFER2 *str, uint8 *buf, int len)
 634 {
 635         ZERO_STRUCTP(str);
 636
 637         /* max buffer size (allocated size) */
 638         str->buf_max_len = len;
 639         str->undoc       = 0;
 640         str->buf_len = buf != NULL ? len : 0;
 641
 642         if (buf != NULL)
 643                 memcpy(str->buffer, buf, MIN(str->buf_len, sizeof(str->buffer)));
 644 }
 645
 646 /*******************************************************************
 647  Reads or writes a BUFFER2 structure.
 648    the uni_max_len member tells you how large the buffer is.
 649    the uni_str_len member tells you how much of the buffer is really used.
 650 ********************************************************************/
 651
 652 BOOL smb_io_buffer2(char *desc, BUFFER2 *buf2, uint32 buffer, prs_struct *ps, int depth)
 653 {
 654         if (buf2 == NULL)
 655                 return False;
 656
 657         if (buffer) {
 658
 659                 prs_debug(ps, depth, desc, "smb_io_buffer2");
 660                 depth++;
 661
 662                 if(!prs_align(ps))
 663                         return False;
 664
 665                 if(!prs_uint32("uni_max_len", ps, depth, &buf2->buf_max_len))
 666                         return False;
 667                 if(!prs_uint32("undoc      ", ps, depth, &buf2->undoc))
 668                         return False;
 669                 if(!prs_uint32("buf_len    ", ps, depth, &buf2->buf_len))
 670                         return False;
 671
 672                 /* oops! XXXX maybe issue a warning that this is happening... */
 673                 if (buf2->buf_max_len > MAX_UNISTRLEN)
 674                         buf2->buf_max_len = MAX_UNISTRLEN;
 675                 if (buf2->buf_len > MAX_UNISTRLEN)
 676                         buf2->buf_len = MAX_UNISTRLEN;
 677
 678                 /* buffer advanced by indicated length of string
 679                    NOT by searching for null-termination */
 680
 681                 if(!prs_buffer2(True, "buffer     ", ps, depth, buf2))
 682                         return False;
 683
 684         } else {
 685
 686                 prs_debug(ps, depth, desc, "smb_io_buffer2 - NULL");
 687                 depth++;
 688                 memset((char *)buf2, '\0', sizeof(*buf2));
 689
 690         }
 691         return True;
 692 }
 693
 694 /*******************************************************************
 695 creates a UNISTR2 structure: sets up the buffer, too
 696 ********************************************************************/
 697
 698 void init_buf_unistr2(UNISTR2 *str, uint32 *ptr, const char *buf)
 699 {
 700         if (buf != NULL) {
 701
 702                 *ptr = 1;
 703                 init_unistr2(str, buf, strlen(buf)+1);
 704
 705         } else {
 706
 707                 *ptr = 0;
 708                 init_unistr2(str, "", 0);
 709
 710         }
 711 }
 712
 713 /*******************************************************************
 714  Copies a UNISTR2 structure.
 715 ********************************************************************/
 716
 717 void copy_unistr2(UNISTR2 *str, UNISTR2 *from)
 718 {
 719         /* set up string lengths. add one if string is not null-terminated */
 720         str->uni_max_len = from->uni_max_len;
 721         str->undoc       = from->undoc;
 722         str->uni_str_len = from->uni_str_len;
 723
 724         /* copy the string */
 725         memcpy(str->buffer, from->buffer, sizeof(from->buffer));
 726 }
 727
 728 /*******************************************************************
 729  Creates a STRING2 structure.
 730 ********************************************************************/
 731
 732 void init_string2(STRING2 *str, char *buf, int len)
 733 {
 734   /* set up string lengths. */
 735   str->str_max_len = len;
 736   str->undoc       = 0;
 737   str->str_str_len = len;
 738
 739   /* store the string */
 740   if(len != 0)
 741     memcpy(str->buffer, buf, len);
 742 }
 743
 744 /*******************************************************************
 745  Reads or writes a STRING2 structure.
 746  XXXX NOTE: STRING2 structures need NOT be null-terminated.
 747    the str_str_len member tells you how long the string is;
 748    the str_max_len member tells you how large the buffer is.
 749 ********************************************************************/
 750
 751 BOOL smb_io_string2(char *desc, STRING2 *str2, uint32 buffer, prs_struct *ps, int depth)
 752 {
 753         if (str2 == NULL)
 754                 return False;
 755
 756         if (buffer) {
 757
 758                 prs_debug(ps, depth, desc, "smb_io_string2");
 759                 depth++;
 760
 761                 if(!prs_align(ps))
 762                         return False;
 763
 764                 if(!prs_uint32("str_max_len", ps, depth, &str2->str_max_len))
 765                         return False;
 766                 if(!prs_uint32("undoc      ", ps, depth, &str2->undoc))
 767                         return False;
 768                 if(!prs_uint32("str_str_len", ps, depth, &str2->str_str_len))
 769                         return False;
 770
 771                 /* oops! XXXX maybe issue a warning that this is happening... */
 772                 if (str2->str_max_len > MAX_STRINGLEN)
 773                         str2->str_max_len = MAX_STRINGLEN;
 774                 if (str2->str_str_len > MAX_STRINGLEN)
 775                         str2->str_str_len = MAX_STRINGLEN;
 776
 777                 /* buffer advanced by indicated length of string
 778                    NOT by searching for null-termination */
 779                 if(!prs_string2(True, "buffer     ", ps, depth, str2))
 780                         return False;
 781
 782         } else {
 783
 784                 prs_debug(ps, depth, desc, "smb_io_string2 - NULL");
 785                 depth++;
 786                 memset((char *)str2, '\0', sizeof(*str2));
 787
 788         }
 789
 790         return True;
 791 }
 792
 793 /*******************************************************************
 794  Inits a UNISTR2 structure.
 795 ********************************************************************/
 796
 797 void init_unistr2(UNISTR2 *str, const char *buf, size_t len)
 798 {
 799         ZERO_STRUCTP(str);
 800
 801         /* set up string lengths. */
 802         str->uni_max_len = (uint32)len;
 803         str->undoc       = 0;
 804         str->uni_str_len = (uint32)len;
 805
 806         /* store the string (null-terminated 8 bit chars into 16 bit chars) */
 807         dos_struni2((char *)str->buffer, buf, sizeof(str->buffer));
 808 }
 809
 810 /*******************************************************************
 811  Reads or writes a UNISTR2 structure.
 812  XXXX NOTE: UNISTR2 structures need NOT be null-terminated.
 813    the uni_str_len member tells you how long the string is;
 814    the uni_max_len member tells you how large the buffer is.
 815 ********************************************************************/
 816
 817 BOOL smb_io_unistr2(char *desc, UNISTR2 *uni2, uint32 buffer, prs_struct *ps, int depth)
 818 {
 819         if (uni2 == NULL)
 820                 return False;
 821
 822         if (buffer) {
 823
 824                 prs_debug(ps, depth, desc, "smb_io_unistr2");
 825                 depth++;
 826
 827                 if(!prs_align(ps))
 828                         return False;
 829
 830                 if(!prs_uint32("uni_max_len", ps, depth, &uni2->uni_max_len))
 831                         return False;
 832                 if(!prs_uint32("undoc      ", ps, depth, &uni2->undoc))
 833                         return False;
 834                 if(!prs_uint32("uni_str_len", ps, depth, &uni2->uni_str_len))
 835                         return False;
 836
 837                 /* oops! XXXX maybe issue a warning that this is happening... */
 838                 if (uni2->uni_max_len > MAX_UNISTRLEN)
 839                         uni2->uni_max_len = MAX_UNISTRLEN;
 840                 if (uni2->uni_str_len > MAX_UNISTRLEN)
 841                         uni2->uni_str_len = MAX_UNISTRLEN;
 842
 843                 /* buffer advanced by indicated length of string
 844                    NOT by searching for null-termination */
 845                 if(!prs_unistr2(True, "buffer     ", ps, depth, uni2))
 846                         return False;
 847
 848         } else {
 849
 850                 prs_debug(ps, depth, desc, "smb_io_unistr2 - NULL");
 851                 depth++;
 852                 memset((char *)uni2, '\0', sizeof(*uni2));
 853
 854         }
 855
 856         return True;
 857 }
 858
 859 /*******************************************************************
 860  Inits a DOM_RID2 structure.
 861 ********************************************************************/
 862
 863 void init_dom_rid2(DOM_RID2 *rid2, uint32 rid, uint8 type, uint32 idx)
 864 {
 865         rid2->type    = type;
 866         rid2->rid     = rid;
 867         rid2->rid_idx = idx;
 868 }
 869
 870 /*******************************************************************
 871  Reads or writes a DOM_RID2 structure.
 872 ********************************************************************/
 873
 874 BOOL smb_io_dom_rid2(char *desc, DOM_RID2 *rid2, prs_struct *ps, int depth)
 875 {
 876         if (rid2 == NULL)
 877                 return False;
 878
 879         prs_debug(ps, depth, desc, "smb_io_dom_rid2");
 880         depth++;
 881
 882         if(!prs_align(ps))
 883                 return False;
 884
 885         if(!prs_uint8("type   ", ps, depth, &rid2->type))
 886                 return False;
 887         if(!prs_align(ps))
 888                 return False;
 889         if(!prs_uint32("rid    ", ps, depth, &rid2->rid))
 890                 return False;
 891         if(!prs_uint32("rid_idx", ps, depth, &rid2->rid_idx))
 892                 return False;
 893
 894         return True;
 895 }
 896
 897 /*******************************************************************
 898 creates a DOM_RID3 structure.
 899 ********************************************************************/
 900
 901 void init_dom_rid3(DOM_RID3 *rid3, uint32 rid, uint8 type)
 902 {
 903     rid3->rid      = rid;
 904     rid3->type1    = type;
 905     rid3->ptr_type = 0x1; /* non-zero, basically. */
 906     rid3->type2    = 0x1;
 907     rid3->unk      = type;
 908 }
 909
 910 /*******************************************************************
 911 reads or writes a DOM_RID3 structure.
 912 ********************************************************************/
 913
 914 BOOL smb_io_dom_rid3(char *desc, DOM_RID3 *rid3, prs_struct *ps, int depth)
 915 {
 916         if (rid3 == NULL)
 917                 return False;
 918
 919         prs_debug(ps, depth, desc, "smb_io_dom_rid3");
 920         depth++;
 921
 922         if(!prs_align(ps))
 923                 return False;
 924
 925         if(!prs_uint32("rid     ", ps, depth, &rid3->rid))
 926                 return False;
 927         if(!prs_uint32("type1   ", ps, depth, &rid3->type1))
 928                 return False;
 929         if(!prs_uint32("ptr_type", ps, depth, &rid3->ptr_type))
 930                 return False;
 931         if(!prs_uint32("type2   ", ps, depth, &rid3->type2))
 932                 return False;
 933         if(!prs_uint32("unk     ", ps, depth, &rid3->unk))
 934                 return False;
 935
 936         return True;
 937 }
 938
 939 /*******************************************************************
 940  Inits a DOM_RID4 structure.
 941 ********************************************************************/
 942
 943 void init_dom_rid4(DOM_RID4 *rid4, uint16 unknown, uint16 attr, uint32 rid)
 944 {
 945     rid4->unknown = unknown;
 946     rid4->attr    = attr;
 947     rid4->rid     = rid;
 948 }
 949
 950 /*******************************************************************
 951  Inits a DOM_CLNT_SRV structure.
 952 ********************************************************************/
 953
 954 static void init_clnt_srv(DOM_CLNT_SRV *log, char *logon_srv, char *comp_name)
 955 {
 956         DEBUG(5,("init_clnt_srv: %d\n", __LINE__));
 957
 958         if (logon_srv != NULL) {
 959                 log->undoc_buffer = 1;
 960                 init_unistr2(&(log->uni_logon_srv), logon_srv, strlen(logon_srv)+1);
 961         } else {
 962                 log->undoc_buffer = 0;
 963         }
 964
 965         if (comp_name != NULL) {
 966                 log->undoc_buffer2 = 1;
 967                 init_unistr2(&(log->uni_comp_name), comp_name, strlen(comp_name)+1);
 968         } else {
 969                 log->undoc_buffer2 = 0;
 970         }
 971 }
 972
 973 /*******************************************************************
 974  Inits or writes a DOM_CLNT_SRV structure.
 975 ********************************************************************/
 976
 977 static BOOL smb_io_clnt_srv(char *desc, DOM_CLNT_SRV *log, prs_struct *ps, int depth)
 978 {
 979         if (log == NULL)
 980                 return False;
 981
 982         prs_debug(ps, depth, desc, "smb_io_clnt_srv");
 983         depth++;
 984
 985         if(!prs_align(ps))
 986                 return False;
 987
 988         if(!prs_uint32("undoc_buffer ", ps, depth, &log->undoc_buffer))
 989                 return False;
 990
 991         if (log->undoc_buffer != 0) {
 992                 if(!smb_io_unistr2("unistr2", &log->uni_logon_srv, log->undoc_buffer, ps, depth))
 993                         return False;
 994         }
 995
 996         if(!prs_align(ps))
 997                 return False;
 998
 999         if(!prs_uint32("undoc_buffer2", ps, depth, &log->undoc_buffer2))
1000                 return False;
1001
1002         if (log->undoc_buffer2 != 0) {
1003                 if(!smb_io_unistr2("unistr2", &log->uni_comp_name, log->undoc_buffer2, ps, depth))
1004                         return False;
1005         }
1006
1007         return True;
1008 }
1009
1010 /*******************************************************************
1011  Inits a DOM_LOG_INFO structure.
1012 ********************************************************************/
1013
1014 void init_log_info(DOM_LOG_INFO *log, char *logon_srv, char *acct_name,
1015                 uint16 sec_chan, char *comp_name)
1016 {
1017         DEBUG(5,("make_log_info %d\n", __LINE__));
1018
1019         log->undoc_buffer = 1;
1020
1021         init_unistr2(&log->uni_logon_srv, logon_srv, strlen(logon_srv)+1);
1022         init_unistr2(&log->uni_acct_name, acct_name, strlen(acct_name)+1);
1023
1024         log->sec_chan = sec_chan;
1025
1026         init_unistr2(&log->uni_comp_name, comp_name, strlen(comp_name)+1);
1027 }
1028
1029 /*******************************************************************
1030  Reads or writes a DOM_LOG_INFO structure.
1031 ********************************************************************/
1032
1033 BOOL smb_io_log_info(char *desc, DOM_LOG_INFO *log, prs_struct *ps, int depth)
1034 {
1035         if (log == NULL)
1036                 return False;
1037
1038         prs_debug(ps, depth, desc, "smb_io_log_info");
1039         depth++;
1040
1041         if(!prs_align(ps))
1042                 return False;
1043
1044         if(!prs_uint32("undoc_buffer", ps, depth, &log->undoc_buffer))
1045                 return False;
1046
1047         if(!smb_io_unistr2("unistr2", &log->uni_logon_srv, True, ps, depth))
1048                 return False;
1049         if(!smb_io_unistr2("unistr2", &log->uni_acct_name, True, ps, depth))
1050                 return False;
1051
1052         if(!prs_uint16("sec_chan", ps, depth, &log->sec_chan))
1053                 return False;
1054
1055         if(!smb_io_unistr2("unistr2", &log->uni_comp_name, True, ps, depth))
1056                 return False;
1057
1058         return True;
1059 }
1060
1061 /*******************************************************************
1062  Reads or writes a DOM_CHAL structure.
1063 ********************************************************************/
1064
1065 BOOL smb_io_chal(char *desc, DOM_CHAL *chal, prs_struct *ps, int depth)
1066 {
1067         if (chal == NULL)
1068                 return False;
1069
1070         prs_debug(ps, depth, desc, "smb_io_chal");
1071         depth++;
1072
1073         if(!prs_align(ps))
1074                 return False;
1075
1076         if(!prs_uint8s (False, "data", ps, depth, chal->data, 8))
1077                 return False;
1078
1079         return True;
1080 }
1081
1082 /*******************************************************************
1083  Reads or writes a DOM_CRED structure.
1084 ********************************************************************/
1085
1086 BOOL smb_io_cred(char *desc,  DOM_CRED *cred, prs_struct *ps, int depth)
1087 {
1088         if (cred == NULL)
1089                 return False;
1090
1091         prs_debug(ps, depth, desc, "smb_io_cred");
1092         depth++;
1093
1094         if(!prs_align(ps))
1095                 return False;
1096
1097         if(!smb_io_chal ("", &cred->challenge, ps, depth))
1098                 return False;
1099         if(!smb_io_utime("", &cred->timestamp, ps, depth))
1100                 return False;
1101
1102         return True;
1103 }
1104
1105 /*******************************************************************
1106  Inits a DOM_CLNT_INFO2 structure.
1107 ********************************************************************/
1108
1109 void init_clnt_info2(DOM_CLNT_INFO2 *clnt,
1110                                 char *logon_srv, char *comp_name,
1111                                 DOM_CRED *clnt_cred)
1112 {
1113         DEBUG(5,("make_clnt_info: %d\n", __LINE__));
1114
1115         init_clnt_srv(&(clnt->login), logon_srv, comp_name);
1116
1117         if (clnt_cred != NULL) {
1118                 clnt->ptr_cred = 1;
1119                 memcpy(&(clnt->cred), clnt_cred, sizeof(clnt->cred));
1120         } else {
1121                 clnt->ptr_cred = 0;
1122         }
1123 }
1124
1125 /*******************************************************************
1126  Reads or writes a DOM_CLNT_INFO2 structure.
1127 ********************************************************************/
1128
1129 BOOL smb_io_clnt_info2(char *desc, DOM_CLNT_INFO2 *clnt, prs_struct *ps, int depth)
1130 {
1131         if (clnt == NULL)
1132                 return False;
1133
1134         prs_debug(ps, depth, desc, "smb_io_clnt_info2");
1135         depth++;
1136
1137         if(!prs_align(ps))
1138                 return False;
1139
1140         if(!smb_io_clnt_srv("", &clnt->login, ps, depth))
1141                 return False;
1142
1143         if(!prs_align(ps))
1144                 return False;
1145
1146         if(!prs_uint32("ptr_cred", ps, depth, &clnt->ptr_cred))
1147                 return False;
1148         if(!smb_io_cred("", &clnt->cred, ps, depth))
1149                 return False;
1150
1151         return True;
1152 }
1153
1154 /*******************************************************************
1155  Inits a DOM_CLNT_INFO structure.
1156 ********************************************************************/
1157
1158 void init_clnt_info(DOM_CLNT_INFO *clnt,
1159                 char *logon_srv, char *acct_name,
1160                 uint16 sec_chan, char *comp_name,
1161                                 DOM_CRED *cred)
1162 {
1163         DEBUG(5,("make_clnt_info\n"));
1164
1165         init_log_info(&clnt->login, logon_srv, acct_name, sec_chan, comp_name);
1166         memcpy(&clnt->cred, cred, sizeof(clnt->cred));
1167 }
1168
1169 /*******************************************************************
1170  Reads or writes a DOM_CLNT_INFO structure.
1171 ********************************************************************/
1172
1173 BOOL smb_io_clnt_info(char *desc,  DOM_CLNT_INFO *clnt, prs_struct *ps, int depth)
1174 {
1175         if (clnt == NULL)
1176                 return False;
1177
1178         prs_debug(ps, depth, desc, "smb_io_clnt_info");
1179         depth++;
1180
1181         if(!prs_align(ps))
1182                 return False;
1183
1184         if(!smb_io_log_info("", &clnt->login, ps, depth))
1185                 return False;
1186         if(!smb_io_cred("", &clnt->cred, ps, depth))
1187                 return False;
1188
1189         return True;
1190 }
1191
1192 /*******************************************************************
1193  Inits a DOM_LOGON_ID structure.
1194 ********************************************************************/
1195
1196 void init_logon_id(DOM_LOGON_ID *log, uint32 log_id_low, uint32 log_id_high)
1197 {
1198         DEBUG(5,("make_logon_id: %d\n", __LINE__));
1199
1200         log->low  = log_id_low;
1201         log->high = log_id_high;
1202 }
1203
1204 /*******************************************************************
1205  Reads or writes a DOM_LOGON_ID structure.
1206 ********************************************************************/
1207
1208 BOOL smb_io_logon_id(char *desc, DOM_LOGON_ID *log, prs_struct *ps, int depth)
1209 {
1210         if (log == NULL)
1211                 return False;
1212
1213         prs_debug(ps, depth, desc, "smb_io_logon_id");
1214         depth++;
1215
1216         if(!prs_align(ps))
1217                 return False;
1218
1219         if(!prs_uint32("low ", ps, depth, &log->low ))
1220                 return False;
1221         if(!prs_uint32("high", ps, depth, &log->high))
1222                 return False;
1223
1224         return True;
1225 }
1226
1227 /*******************************************************************
1228  Inits an OWF_INFO structure.
1229 ********************************************************************/
1230
1231 void init_owf_info(OWF_INFO *hash, uint8 data[16])
1232 {
1233         DEBUG(5,("init_owf_info: %d\n", __LINE__));
1234
1235         if (data != NULL)
1236                 memcpy(hash->data, data, sizeof(hash->data));
1237         else
1238                 memset((char *)hash->data, '\0', sizeof(hash->data));
1239 }
1240
1241 /*******************************************************************
1242  Reads or writes an OWF_INFO structure.
1243 ********************************************************************/
1244
1245 BOOL smb_io_owf_info(char *desc, OWF_INFO *hash, prs_struct *ps, int depth)
1246 {
1247         if (hash == NULL)
1248                 return False;
1249
1250         prs_debug(ps, depth, desc, "smb_io_owf_info");
1251         depth++;
1252
1253         if(!prs_align(ps))
1254                 return False;
1255
1256         if(!prs_uint8s (False, "data", ps, depth, hash->data, 16))
1257                 return False;
1258
1259         return True;
1260 }
1261
1262 /*******************************************************************
1263  Reads or writes a DOM_GID structure.
1264 ********************************************************************/
1265
1266 BOOL smb_io_gid(char *desc,  DOM_GID *gid, prs_struct *ps, int depth)
1267 {
1268         if (gid == NULL)
1269                 return False;
1270
1271         prs_debug(ps, depth, desc, "smb_io_gid");
1272         depth++;
1273
1274         if(!prs_align(ps))
1275                 return False;
1276
1277         if(!prs_uint32("g_rid", ps, depth, &gid->g_rid))
1278                 return False;
1279         if(!prs_uint32("attr ", ps, depth, &gid->attr))
1280                 return False;
1281
1282         return True;
1283 }
1284
1285 /*******************************************************************
1286  Reads or writes an POLICY_HND structure.
1287 ********************************************************************/
1288
1289 BOOL smb_io_pol_hnd(char *desc, POLICY_HND *pol, prs_struct *ps, int depth)
1290 {
1291         if (pol == NULL)
1292                 return False;
1293
1294         prs_debug(ps, depth, desc, "smb_io_pol_hnd");
1295         depth++;
1296
1297         if(!prs_align(ps))
1298                 return False;
1299
1300         if(!prs_uint8s (False, "data", ps, depth, pol->data, POL_HND_SIZE))
1301                 return False;
1302
1303         return True;
1304 }
1305
1306 /*******************************************************************
1307  Reads or writes a dom query structure.
1308 ********************************************************************/
1309
1310 static BOOL smb_io_dom_query(char *desc, DOM_QUERY *d_q, prs_struct *ps, int depth)
1311 {
1312         if (d_q == NULL)
1313                 return False;
1314
1315         prs_debug(ps, depth, desc, "smb_io_dom_query");
1316         depth++;
1317
1318         if(!prs_align(ps))
1319                 return False;
1320
1321         if(!prs_uint16("uni_dom_max_len", ps, depth, &d_q->uni_dom_max_len)) /* domain name string length * 2 */
1322                 return False;
1323         if(!prs_uint16("uni_dom_str_len", ps, depth, &d_q->uni_dom_str_len)) /* domain name string length * 2 */
1324                 return False;
1325
1326         if(!prs_uint32("buffer_dom_name", ps, depth, &d_q->buffer_dom_name)) /* undocumented domain name string buffer pointer */
1327                 return False;
1328         if(!prs_uint32("buffer_dom_sid ", ps, depth, &d_q->buffer_dom_sid)) /* undocumented domain SID string buffer pointer */
1329                 return False;
1330
1331         if(!smb_io_unistr2("unistr2", &d_q->uni_domain_name, d_q->buffer_dom_name, ps, depth)) /* domain name (unicode string) */
1332                 return False;
1333
1334         if(!prs_align(ps))
1335                 return False;
1336
1337         if (d_q->buffer_dom_sid != 0) {
1338                 if(!smb_io_dom_sid2("", &d_q->dom_sid, ps, depth)) /* domain SID */
1339                         return False;
1340         } else {
1341                 memset((char *)&d_q->dom_sid, '\0', sizeof(d_q->dom_sid));
1342         }
1343
1344         return True;
1345 }
1346
1347 /*******************************************************************
1348  Reads or writes a dom query structure.
1349 ********************************************************************/
1350
1351 BOOL smb_io_dom_query_3(char *desc, DOM_QUERY_3 *d_q, prs_struct *ps, int depth)
1352 {
1353         return smb_io_dom_query("", d_q, ps, depth);
1354 }
1355
1356 /*******************************************************************
1357  Reads or writes a dom query structure.
1358 ********************************************************************/
1359
1360 BOOL smb_io_dom_query_5(char *desc, DOM_QUERY_3 *d_q, prs_struct *ps, int depth)
1361 {
1362         return smb_io_dom_query("", d_q, ps, depth);
1363 }
1364
1365
1366 /*******************************************************************
1367  Reads or writes a UNISTR3 structure.
1368 ********************************************************************/
1369
1370 BOOL smb_io_unistr3(char *desc, UNISTR3 *name, prs_struct *ps, int depth)
1371 {
1372         if (name == NULL)
1373                 return False;
1374
1375         prs_debug(ps, depth, desc, "smb_io_unistr3");
1376         depth++;
1377
1378         if(!prs_align(ps))
1379                 return False;
1380
1381         if(!prs_uint32("uni_str_len", ps, depth, &name->uni_str_len))
1382                 return False;
1383
1384         /* don't know if len is specified by uni_str_len member... */
1385         /* assume unicode string is unicode-null-terminated, instead */
1386
1387         if(!prs_unistr3(True, "unistr", name, ps, depth))
1388                 return False;
1389
1390         return True;
1391 }
1392
1393
1394 /*******************************************************************
1395  Stream a uint64_struct
1396  ********************************************************************/
1397 BOOL prs_uint64(char *name, prs_struct *ps, int depth, UINT64_S *data64)
1398 {
1399         return prs_uint32(name, ps, depth+1, &data64->low) &&
1400                 prs_uint32(name, ps, depth+1, &data64->high);
1401 }
1402
1403