source3/libsmb/clifile.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    client file operations
   4    Copyright (C) Andrew Tridgell 1994-1998
   5    Copyright (C) Jeremy Allison 2001-2002
   6
   7    This program is free software; you can redistribute it and/or modify
   8    it under the terms of the GNU General Public License as published by
   9    the Free Software Foundation; either version 2 of the License, or
  10    (at your option) any later version.
  11
  12    This program is distributed in the hope that it will be useful,
  13    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15    GNU General Public License for more details.
  16
  17    You should have received a copy of the GNU General Public License
  18    along with this program; if not, write to the Free Software
  19    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  20 */
  21
  22 #include "includes.h"
  23
  24 /****************************************************************************
  25  Hard/Symlink a file (UNIX extensions).
  26  Creates new name (sym)linked to oldname.
  27 ****************************************************************************/
  28
  29 static BOOL cli_link_internal(struct cli_state *cli, const char *oldname, const char *newname, BOOL hard_link)
  30 {
  31         unsigned int data_len = 0;
  32         unsigned int param_len = 0;
  33         uint16 setup = TRANSACT2_SETPATHINFO;
  34         char param[sizeof(pstring)+6];
  35         pstring data;
  36         char *rparam=NULL, *rdata=NULL;
  37         char *p;
  38         size_t oldlen = 2*(strlen(oldname)+1);
  39         size_t newlen = 2*(strlen(newname)+1);
  40
  41         memset(param, 0, sizeof(param));
  42         SSVAL(param,0,hard_link ? SMB_SET_FILE_UNIX_HLINK : SMB_SET_FILE_UNIX_LINK);
  43         p = &param[6];
  44
  45         p += clistr_push(cli, p, newname, MIN(newlen, sizeof(param)-6), STR_TERMINATE);
  46         param_len = PTR_DIFF(p, param);
  47
  48         p = data;
  49         p += clistr_push(cli, p, oldname, MIN(oldlen,sizeof(data)), STR_TERMINATE);
  50         data_len = PTR_DIFF(p, data);
  51
  52         if (!cli_send_trans(cli, SMBtrans2,
  53                 NULL,                        /* name */
  54                 -1, 0,                          /* fid, flags */
  55                 &setup, 1, 0,                   /* setup, length, max */
  56                 param, param_len, 2,            /* param, length, max */
  57                 (char *)&data,  data_len, cli->max_xmit /* data, length, max */
  58                 )) {
  59                         return False;
  60         }
  61
  62         if (!cli_receive_trans(cli, SMBtrans2,
  63                 &rparam, &param_len,
  64                 &rdata, &data_len)) {
  65                         return False;
  66         }
  67
  68         SAFE_FREE(rdata);
  69         SAFE_FREE(rparam);
  70
  71         return True;
  72 }
  73
  74 /****************************************************************************
  75  Map standard UNIX permissions onto wire representations.
  76 ****************************************************************************/
  77
  78 uint32 unix_perms_to_wire(mode_t perms)
  79 {
  80         unsigned int ret = 0;
  81
  82         ret |= ((perms & S_IXOTH) ?  UNIX_X_OTH : 0);
  83         ret |= ((perms & S_IWOTH) ?  UNIX_W_OTH : 0);
  84         ret |= ((perms & S_IROTH) ?  UNIX_R_OTH : 0);
  85         ret |= ((perms & S_IXGRP) ?  UNIX_X_GRP : 0);
  86         ret |= ((perms & S_IWGRP) ?  UNIX_W_GRP : 0);
  87         ret |= ((perms & S_IRGRP) ?  UNIX_R_GRP : 0);
  88         ret |= ((perms & S_IXUSR) ?  UNIX_X_USR : 0);
  89         ret |= ((perms & S_IWUSR) ?  UNIX_W_USR : 0);
  90         ret |= ((perms & S_IRUSR) ?  UNIX_R_USR : 0);
  91 #ifdef S_ISVTX
  92         ret |= ((perms & S_ISVTX) ?  UNIX_STICKY : 0);
  93 #endif
  94 #ifdef S_ISGID
  95         ret |= ((perms & S_ISGID) ?  UNIX_SET_GID : 0);
  96 #endif
  97 #ifdef S_ISUID
  98         ret |= ((perms & S_ISUID) ?  UNIX_SET_UID : 0);
  99 #endif
 100         return ret;
 101 }
 102
 103 /****************************************************************************
 104  Map wire permissions to standard UNIX.
 105 ****************************************************************************/
 106
 107 mode_t wire_perms_to_unix(uint32 perms)
 108 {
 109         mode_t ret = (mode_t)0;
 110
 111         ret |= ((perms & UNIX_X_OTH) ? S_IXOTH : 0);
 112         ret |= ((perms & UNIX_W_OTH) ? S_IWOTH : 0);
 113         ret |= ((perms & UNIX_R_OTH) ? S_IROTH : 0);
 114         ret |= ((perms & UNIX_X_GRP) ? S_IXGRP : 0);
 115         ret |= ((perms & UNIX_W_GRP) ? S_IWGRP : 0);
 116         ret |= ((perms & UNIX_R_GRP) ? S_IRGRP : 0);
 117         ret |= ((perms & UNIX_X_USR) ? S_IXUSR : 0);
 118         ret |= ((perms & UNIX_W_USR) ? S_IWUSR : 0);
 119         ret |= ((perms & UNIX_R_USR) ? S_IRUSR : 0);
 120 #ifdef S_ISVTX
 121         ret |= ((perms & UNIX_STICKY) ? S_ISVTX : 0);
 122 #endif
 123 #ifdef S_ISGID
 124         ret |= ((perms & UNIX_SET_GID) ? S_ISGID : 0);
 125 #endif
 126 #ifdef S_ISUID
 127         ret |= ((perms & UNIX_SET_UID) ? S_ISUID : 0);
 128 #endif
 129         return ret;
 130 }
 131
 132 /****************************************************************************
 133  Return the file type from the wire filetype for UNIX extensions.
 134 ****************************************************************************/
 135
 136 static mode_t unix_filetype_from_wire(uint32 wire_type)
 137 {
 138         switch (wire_type) {
 139                 case UNIX_TYPE_FILE:
 140                         return S_IFREG;
 141                 case UNIX_TYPE_DIR:
 142                         return S_IFDIR;
 143 #ifdef S_IFLNK
 144                 case UNIX_TYPE_SYMLINK:
 145                         return S_IFLNK;
 146 #endif
 147 #ifdef S_IFCHR
 148                 case UNIX_TYPE_CHARDEV:
 149                         return S_IFCHR;
 150 #endif
 151 #ifdef S_IFBLK
 152                 case UNIX_TYPE_BLKDEV:
 153                         return S_IFBLK;
 154 #endif
 155 #ifdef S_IFIFO
 156                 case UNIX_TYPE_FIFO:
 157                         return S_IFIFO;
 158 #endif
 159 #ifdef S_IFSOCK
 160                 case UNIX_TYPE_SOCKET:
 161                         return S_IFSOCK;
 162 #endif
 163                 default:
 164                         return (mode_t)0;
 165         }
 166 }
 167
 168 /****************************************************************************
 169  Do a POSIX getfacl (UNIX extensions).
 170 ****************************************************************************/
 171
 172 BOOL cli_unix_getfacl(struct cli_state *cli, const char *name, size_t *prb_size, char **retbuf)
 173 {
 174         unsigned int param_len = 0;
 175         unsigned int data_len = 0;
 176         uint16 setup = TRANSACT2_QPATHINFO;
 177         char param[sizeof(pstring)+6];
 178         char *rparam=NULL, *rdata=NULL;
 179         char *p;
 180
 181         p = param;
 182         memset(p, 0, 6);
 183         SSVAL(p, 0, SMB_QUERY_POSIX_ACL);
 184         p += 6;
 185         p += clistr_push(cli, p, name, sizeof(pstring)-6, STR_TERMINATE);
 186         param_len = PTR_DIFF(p, param);
 187
 188         if (!cli_send_trans(cli, SMBtrans2,
 189                 NULL,                        /* name */
 190                 -1, 0,                       /* fid, flags */
 191                 &setup, 1, 0,                /* setup, length, max */
 192                 param, param_len, 2,         /* param, length, max */
 193                 NULL,  0, cli->max_xmit      /* data, length, max */
 194                 )) {
 195                         return False;
 196         }
 197
 198         if (!cli_receive_trans(cli, SMBtrans2,
 199                 &rparam, &param_len,
 200                 &rdata, &data_len)) {
 201                         return False;
 202         }
 203
 204         if (data_len < 6) {
 205                 SAFE_FREE(rdata);
 206                 SAFE_FREE(rparam);
 207                 return False;
 208         }
 209
 210         SAFE_FREE(rparam);
 211         *retbuf = rdata;
 212         *prb_size = (size_t)data_len;
 213
 214         return True;
 215 }
 216
 217 /****************************************************************************
 218  Stat a file (UNIX extensions).
 219 ****************************************************************************/
 220
 221 BOOL cli_unix_stat(struct cli_state *cli, const char *name, SMB_STRUCT_STAT *sbuf)
 222 {
 223         unsigned int param_len = 0;
 224         unsigned int data_len = 0;
 225         uint16 setup = TRANSACT2_QPATHINFO;
 226         char param[sizeof(pstring)+6];
 227         char *rparam=NULL, *rdata=NULL;
 228         char *p;
 229
 230         ZERO_STRUCTP(sbuf);
 231
 232         p = param;
 233         memset(p, 0, 6);
 234         SSVAL(p, 0, SMB_QUERY_FILE_UNIX_BASIC);
 235         p += 6;
 236         p += clistr_push(cli, p, name, sizeof(pstring)-6, STR_TERMINATE);
 237         param_len = PTR_DIFF(p, param);
 238
 239         if (!cli_send_trans(cli, SMBtrans2,
 240                 NULL,                        /* name */
 241                 -1, 0,                       /* fid, flags */
 242                 &setup, 1, 0,                /* setup, length, max */
 243                 param, param_len, 2,         /* param, length, max */
 244                 NULL,  0, cli->max_xmit      /* data, length, max */
 245                 )) {
 246                         return False;
 247         }
 248
 249         if (!cli_receive_trans(cli, SMBtrans2,
 250                 &rparam, &param_len,
 251                 &rdata, &data_len)) {
 252                         return False;
 253         }
 254
 255         if (data_len < 96) {
 256                 SAFE_FREE(rdata);
 257                 SAFE_FREE(rparam);
 258                 return False;
 259         }
 260
 261         sbuf->st_size = IVAL2_TO_SMB_BIG_UINT(rdata,0);     /* total size, in bytes */
 262         sbuf->st_blocks = IVAL2_TO_SMB_BIG_UINT(rdata,8);   /* number of blocks allocated */
 263 #if defined (HAVE_STAT_ST_BLOCKS) && defined(STAT_ST_BLOCKSIZE)
 264         sbuf->st_blocks /= STAT_ST_BLOCKSIZE;
 265 #else
 266         /* assume 512 byte blocks */
 267         sbuf->st_blocks /= 512;
 268 #endif
 269         sbuf->st_ctime = interpret_long_date(rdata + 16);    /* time of last change */
 270         sbuf->st_atime = interpret_long_date(rdata + 24);    /* time of last access */
 271         sbuf->st_mtime = interpret_long_date(rdata + 32);    /* time of last modification */
 272         sbuf->st_uid = (uid_t) IVAL(rdata,40);      /* user ID of owner */
 273         sbuf->st_gid = (gid_t) IVAL(rdata,48);      /* group ID of owner */
 274         sbuf->st_mode |= unix_filetype_from_wire(IVAL(rdata, 56));
 275 #if defined(HAVE_MAKEDEV)
 276         {
 277                 uint32 dev_major = IVAL(rdata,60);
 278                 uint32 dev_minor = IVAL(rdata,68);
 279                 sbuf->st_rdev = makedev(dev_major, dev_minor);
 280         }
 281 #endif
 282         sbuf->st_ino = (SMB_INO_T)IVAL2_TO_SMB_BIG_UINT(rdata,76);      /* inode */
 283         sbuf->st_mode |= wire_perms_to_unix(IVAL(rdata,84));     /* protection */
 284         sbuf->st_nlink = IVAL(rdata,92);    /* number of hard links */
 285
 286         SAFE_FREE(rdata);
 287         SAFE_FREE(rparam);
 288
 289         return True;
 290 }
 291
 292 /****************************************************************************
 293  Symlink a file (UNIX extensions).
 294 ****************************************************************************/
 295
 296 BOOL cli_unix_symlink(struct cli_state *cli, const char *oldname, const char *newname)
 297 {
 298         return cli_link_internal(cli, oldname, newname, False);
 299 }
 300
 301 /****************************************************************************
 302  Hard a file (UNIX extensions).
 303 ****************************************************************************/
 304
 305 BOOL cli_unix_hardlink(struct cli_state *cli, const char *oldname, const char *newname)
 306 {
 307         return cli_link_internal(cli, oldname, newname, True);
 308 }
 309
 310 /****************************************************************************
 311  Chmod or chown a file internal (UNIX extensions).
 312 ****************************************************************************/
 313
 314 static BOOL cli_unix_chmod_chown_internal(struct cli_state *cli, const char *fname, uint32 mode, uint32 uid, uint32 gid)
 315 {
 316         unsigned int data_len = 0;
 317         unsigned int param_len = 0;
 318         uint16 setup = TRANSACT2_SETPATHINFO;
 319         char param[sizeof(pstring)+6];
 320         char data[100];
 321         char *rparam=NULL, *rdata=NULL;
 322         char *p;
 323
 324         memset(param, 0, sizeof(param));
 325         memset(data, 0, sizeof(data));
 326         SSVAL(param,0,SMB_SET_FILE_UNIX_BASIC);
 327         p = &param[6];
 328
 329         p += clistr_push(cli, p, fname, -1, STR_TERMINATE);
 330         param_len = PTR_DIFF(p, param);
 331
 332         SIVAL(data,40,uid);
 333         SIVAL(data,48,gid);
 334         SIVAL(data,84,mode);
 335
 336         data_len = 100;
 337
 338         if (!cli_send_trans(cli, SMBtrans2,
 339                 NULL,                        /* name */
 340                 -1, 0,                          /* fid, flags */
 341                 &setup, 1, 0,                   /* setup, length, max */
 342                 param, param_len, 2,            /* param, length, max */
 343                 (char *)&data,  data_len, cli->max_xmit /* data, length, max */
 344                 )) {
 345                         return False;
 346         }
 347
 348         if (!cli_receive_trans(cli, SMBtrans2,
 349                 &rparam, &param_len,
 350                 &rdata, &data_len)) {
 351                         return False;
 352         }
 353
 354         SAFE_FREE(rdata);
 355         SAFE_FREE(rparam);
 356
 357         return True;
 358 }
 359
 360 /****************************************************************************
 361  chmod a file (UNIX extensions).
 362 ****************************************************************************/
 363
 364 BOOL cli_unix_chmod(struct cli_state *cli, const char *fname, mode_t mode)
 365 {
 366         return cli_unix_chmod_chown_internal(cli, fname,
 367                 unix_perms_to_wire(mode), SMB_UID_NO_CHANGE, SMB_GID_NO_CHANGE);
 368 }
 369
 370 /****************************************************************************
 371  chown a file (UNIX extensions).
 372 ****************************************************************************/
 373
 374 BOOL cli_unix_chown(struct cli_state *cli, const char *fname, uid_t uid, gid_t gid)
 375 {
 376         return cli_unix_chmod_chown_internal(cli, fname, SMB_MODE_NO_CHANGE, (uint32)uid, (uint32)gid);
 377 }
 378
 379 /****************************************************************************
 380  Rename a file.
 381 ****************************************************************************/
 382
 383 BOOL cli_rename(struct cli_state *cli, const char *fname_src, const char *fname_dst)
 384 {
 385         char *p;
 386
 387         memset(cli->outbuf,'\0',smb_size);
 388         memset(cli->inbuf,'\0',smb_size);
 389
 390         set_message(cli->outbuf,1, 0, True);
 391
 392         SCVAL(cli->outbuf,smb_com,SMBmv);
 393         SSVAL(cli->outbuf,smb_tid,cli->cnum);
 394         cli_setup_packet(cli);
 395
 396         SSVAL(cli->outbuf,smb_vwv0,aSYSTEM | aHIDDEN | aDIR);
 397
 398         p = smb_buf(cli->outbuf);
 399         *p++ = 4;
 400         p += clistr_push(cli, p, fname_src, -1, STR_TERMINATE);
 401         *p++ = 4;
 402         p += clistr_push(cli, p, fname_dst, -1, STR_TERMINATE);
 403
 404         cli_setup_bcc(cli, p);
 405
 406         cli_send_smb(cli);
 407         if (!cli_receive_smb(cli))
 408                 return False;
 409
 410         if (cli_is_error(cli))
 411                 return False;
 412
 413         return True;
 414 }
 415
 416 /****************************************************************************
 417  NT Rename a file.
 418 ****************************************************************************/
 419
 420 BOOL cli_ntrename(struct cli_state *cli, const char *fname_src, const char *fname_dst)
 421 {
 422         char *p;
 423
 424         memset(cli->outbuf,'\0',smb_size);
 425         memset(cli->inbuf,'\0',smb_size);
 426
 427         set_message(cli->outbuf, 4, 0, True);
 428
 429         SCVAL(cli->outbuf,smb_com,SMBntrename);
 430         SSVAL(cli->outbuf,smb_tid,cli->cnum);
 431         cli_setup_packet(cli);
 432
 433         SSVAL(cli->outbuf,smb_vwv0,aSYSTEM | aHIDDEN | aDIR);
 434         SSVAL(cli->outbuf,smb_vwv1, RENAME_FLAG_RENAME);
 435
 436         p = smb_buf(cli->outbuf);
 437         *p++ = 4;
 438         p += clistr_push(cli, p, fname_src, -1, STR_TERMINATE);
 439         *p++ = 4;
 440         p += clistr_push(cli, p, fname_dst, -1, STR_TERMINATE);
 441
 442         cli_setup_bcc(cli, p);
 443
 444         cli_send_smb(cli);
 445         if (!cli_receive_smb(cli))
 446                 return False;
 447
 448         if (cli_is_error(cli))
 449                 return False;
 450
 451         return True;
 452 }
 453
 454 /****************************************************************************
 455  NT hardlink a file.
 456 ****************************************************************************/
 457
 458 BOOL cli_nt_hardlink(struct cli_state *cli, const char *fname_src, const char *fname_dst)
 459 {
 460         char *p;
 461
 462         memset(cli->outbuf,'\0',smb_size);
 463         memset(cli->inbuf,'\0',smb_size);
 464
 465         set_message(cli->outbuf, 4, 0, True);
 466
 467         SCVAL(cli->outbuf,smb_com,SMBntrename);
 468         SSVAL(cli->outbuf,smb_tid,cli->cnum);
 469         cli_setup_packet(cli);
 470
 471         SSVAL(cli->outbuf,smb_vwv0,aSYSTEM | aHIDDEN | aDIR);
 472         SSVAL(cli->outbuf,smb_vwv1, RENAME_FLAG_HARD_LINK);
 473
 474         p = smb_buf(cli->outbuf);
 475         *p++ = 4;
 476         p += clistr_push(cli, p, fname_src, -1, STR_TERMINATE);
 477         *p++ = 4;
 478         p += clistr_push(cli, p, fname_dst, -1, STR_TERMINATE);
 479
 480         cli_setup_bcc(cli, p);
 481
 482         cli_send_smb(cli);
 483         if (!cli_receive_smb(cli))
 484                 return False;
 485
 486         if (cli_is_error(cli))
 487                 return False;
 488
 489         return True;
 490 }
 491
 492 /****************************************************************************
 493  Delete a file.
 494 ****************************************************************************/
 495
 496 BOOL cli_unlink(struct cli_state *cli, const char *fname)
 497 {
 498         char *p;
 499
 500         memset(cli->outbuf,'\0',smb_size);
 501         memset(cli->inbuf,'\0',smb_size);
 502
 503         set_message(cli->outbuf,1, 0,True);
 504
 505         SCVAL(cli->outbuf,smb_com,SMBunlink);
 506         SSVAL(cli->outbuf,smb_tid,cli->cnum);
 507         cli_setup_packet(cli);
 508
 509         SSVAL(cli->outbuf,smb_vwv0,aSYSTEM | aHIDDEN);
 510
 511         p = smb_buf(cli->outbuf);
 512         *p++ = 4;
 513         p += clistr_push(cli, p, fname, -1, STR_TERMINATE);
 514
 515         cli_setup_bcc(cli, p);
 516         cli_send_smb(cli);
 517         if (!cli_receive_smb(cli)) {
 518                 return False;
 519         }
 520
 521         if (cli_is_error(cli)) {
 522                 return False;
 523         }
 524
 525         return True;
 526 }
 527
 528 /****************************************************************************
 529  Create a directory.
 530 ****************************************************************************/
 531
 532 BOOL cli_mkdir(struct cli_state *cli, const char *dname)
 533 {
 534         char *p;
 535
 536         memset(cli->outbuf,'\0',smb_size);
 537         memset(cli->inbuf,'\0',smb_size);
 538
 539         set_message(cli->outbuf,0, 0,True);
 540
 541         SCVAL(cli->outbuf,smb_com,SMBmkdir);
 542         SSVAL(cli->outbuf,smb_tid,cli->cnum);
 543         cli_setup_packet(cli);
 544
 545         p = smb_buf(cli->outbuf);
 546         *p++ = 4;
 547         p += clistr_push(cli, p, dname, -1, STR_TERMINATE);
 548
 549         cli_setup_bcc(cli, p);
 550
 551         cli_send_smb(cli);
 552         if (!cli_receive_smb(cli)) {
 553                 return False;
 554         }
 555
 556         if (cli_is_error(cli)) {
 557                 return False;
 558         }
 559
 560         return True;
 561 }
 562
 563 /****************************************************************************
 564  Remove a directory.
 565 ****************************************************************************/
 566
 567 BOOL cli_rmdir(struct cli_state *cli, const char *dname)
 568 {
 569         char *p;
 570
 571         memset(cli->outbuf,'\0',smb_size);
 572         memset(cli->inbuf,'\0',smb_size);
 573
 574         set_message(cli->outbuf,0, 0, True);
 575
 576         SCVAL(cli->outbuf,smb_com,SMBrmdir);
 577         SSVAL(cli->outbuf,smb_tid,cli->cnum);
 578         cli_setup_packet(cli);
 579
 580         p = smb_buf(cli->outbuf);
 581         *p++ = 4;
 582         p += clistr_push(cli, p, dname, -1, STR_TERMINATE);
 583
 584         cli_setup_bcc(cli, p);
 585
 586         cli_send_smb(cli);
 587         if (!cli_receive_smb(cli)) {
 588                 return False;
 589         }
 590
 591         if (cli_is_error(cli)) {
 592                 return False;
 593         }
 594
 595         return True;
 596 }
 597
 598 /****************************************************************************
 599  Set or clear the delete on close flag.
 600 ****************************************************************************/
 601
 602 int cli_nt_delete_on_close(struct cli_state *cli, int fnum, BOOL flag)
 603 {
 604         unsigned int data_len = 1;
 605         unsigned int param_len = 6;
 606         uint16 setup = TRANSACT2_SETFILEINFO;
 607         pstring param;
 608         unsigned char data;
 609         char *rparam=NULL, *rdata=NULL;
 610
 611         memset(param, 0, param_len);
 612         SSVAL(param,0,fnum);
 613         SSVAL(param,2,SMB_SET_FILE_DISPOSITION_INFO);
 614
 615         data = flag ? 1 : 0;
 616
 617         if (!cli_send_trans(cli, SMBtrans2,
 618                                                 NULL,                        /* name */
 619                                                 -1, 0,                          /* fid, flags */
 620                                                 &setup, 1, 0,                   /* setup, length, max */
 621                                                 param, param_len, 2,            /* param, length, max */
 622                                                 (char *)&data,  data_len, cli->max_xmit /* data, length, max */
 623                                                 )) {
 624                 return False;
 625         }
 626
 627         if (!cli_receive_trans(cli, SMBtrans2,
 628                                                 &rparam, &param_len,
 629                                                 &rdata, &data_len)) {
 630                 return False;
 631         }
 632
 633         SAFE_FREE(rdata);
 634         SAFE_FREE(rparam);
 635
 636         return True;
 637 }
 638
 639 /****************************************************************************
 640  Open a file - exposing the full horror of the NT API :-).
 641  Used in smbtorture.
 642 ****************************************************************************/
 643
 644 int cli_nt_create_full(struct cli_state *cli, const char *fname,
 645                  uint32 CreatFlags, uint32 DesiredAccess,
 646                  uint32 FileAttributes, uint32 ShareAccess,
 647                  uint32 CreateDisposition, uint32 CreateOptions,
 648                  uint8 SecuityFlags)
 649 {
 650         char *p;
 651         int len;
 652
 653         memset(cli->outbuf,'\0',smb_size);
 654         memset(cli->inbuf,'\0',smb_size);
 655
 656         set_message(cli->outbuf,24,0,True);
 657
 658         SCVAL(cli->outbuf,smb_com,SMBntcreateX);
 659         SSVAL(cli->outbuf,smb_tid,cli->cnum);
 660         cli_setup_packet(cli);
 661
 662         SSVAL(cli->outbuf,smb_vwv0,0xFF);
 663         if (cli->use_oplocks)
 664                 CreatFlags |= (REQUEST_OPLOCK|REQUEST_BATCH_OPLOCK);
 665
 666         SIVAL(cli->outbuf,smb_ntcreate_Flags, CreatFlags);
 667         SIVAL(cli->outbuf,smb_ntcreate_RootDirectoryFid, 0x0);
 668         SIVAL(cli->outbuf,smb_ntcreate_DesiredAccess, DesiredAccess);
 669         SIVAL(cli->outbuf,smb_ntcreate_FileAttributes, FileAttributes);
 670         SIVAL(cli->outbuf,smb_ntcreate_ShareAccess, ShareAccess);
 671         SIVAL(cli->outbuf,smb_ntcreate_CreateDisposition, CreateDisposition);
 672         SIVAL(cli->outbuf,smb_ntcreate_CreateOptions, CreateOptions);
 673         SIVAL(cli->outbuf,smb_ntcreate_ImpersonationLevel, 0x02);
 674         SCVAL(cli->outbuf,smb_ntcreate_SecurityFlags, SecuityFlags);
 675
 676         p = smb_buf(cli->outbuf);
 677         /* this alignment and termination is critical for netapp filers. Don't change */
 678         p += clistr_align_out(cli, p, 0);
 679         len = clistr_push(cli, p, fname, -1, 0);
 680         p += len;
 681         SSVAL(cli->outbuf,smb_ntcreate_NameLength, len);
 682         /* sigh. this copes with broken netapp filer behaviour */
 683         p += clistr_push(cli, p, "", -1, STR_TERMINATE);
 684
 685         cli_setup_bcc(cli, p);
 686
 687         cli_send_smb(cli);
 688         if (!cli_receive_smb(cli)) {
 689                 return -1;
 690         }
 691
 692         if (cli_is_error(cli)) {
 693                 return -1;
 694         }
 695
 696         return SVAL(cli->inbuf,smb_vwv2 + 1);
 697 }
 698
 699 /****************************************************************************
 700  Open a file.
 701 ****************************************************************************/
 702
 703 int cli_nt_create(struct cli_state *cli, const char *fname, uint32 DesiredAccess)
 704 {
 705         return cli_nt_create_full(cli, fname, 0, DesiredAccess, 0,
 706                                 FILE_SHARE_READ|FILE_SHARE_WRITE, FILE_OPEN, 0x0, 0x0);
 707 }
 708
 709 /****************************************************************************
 710  Open a file
 711  WARNING: if you open with O_WRONLY then getattrE won't work!
 712 ****************************************************************************/
 713
 714 int cli_open(struct cli_state *cli, const char *fname, int flags, int share_mode)
 715 {
 716         char *p;
 717         unsigned openfn=0;
 718         unsigned accessmode=0;
 719
 720         if (flags & O_CREAT)
 721                 openfn |= (1<<4);
 722         if (!(flags & O_EXCL)) {
 723                 if (flags & O_TRUNC)
 724                         openfn |= (1<<1);
 725                 else
 726                         openfn |= (1<<0);
 727         }
 728
 729         accessmode = (share_mode<<4);
 730
 731         if ((flags & O_ACCMODE) == O_RDWR) {
 732                 accessmode |= 2;
 733         } else if ((flags & O_ACCMODE) == O_WRONLY) {
 734                 accessmode |= 1;
 735         }
 736
 737 #if defined(O_SYNC)
 738         if ((flags & O_SYNC) == O_SYNC) {
 739                 accessmode |= (1<<14);
 740         }
 741 #endif /* O_SYNC */
 742
 743         if (share_mode == DENY_FCB) {
 744                 accessmode = 0xFF;
 745         }
 746
 747         memset(cli->outbuf,'\0',smb_size);
 748         memset(cli->inbuf,'\0',smb_size);
 749
 750         set_message(cli->outbuf,15,0,True);
 751
 752         SCVAL(cli->outbuf,smb_com,SMBopenX);
 753         SSVAL(cli->outbuf,smb_tid,cli->cnum);
 754         cli_setup_packet(cli);
 755
 756         SSVAL(cli->outbuf,smb_vwv0,0xFF);
 757         SSVAL(cli->outbuf,smb_vwv2,0);  /* no additional info */
 758         SSVAL(cli->outbuf,smb_vwv3,accessmode);
 759         SSVAL(cli->outbuf,smb_vwv4,aSYSTEM | aHIDDEN);
 760         SSVAL(cli->outbuf,smb_vwv5,0);
 761         SSVAL(cli->outbuf,smb_vwv8,openfn);
 762
 763         if (cli->use_oplocks) {
 764                 /* if using oplocks then ask for a batch oplock via
 765                    core and extended methods */
 766                 SCVAL(cli->outbuf,smb_flg, CVAL(cli->outbuf,smb_flg)|
 767                         FLAG_REQUEST_OPLOCK|FLAG_REQUEST_BATCH_OPLOCK);
 768                 SSVAL(cli->outbuf,smb_vwv2,SVAL(cli->outbuf,smb_vwv2) | 6);
 769         }
 770
 771         p = smb_buf(cli->outbuf);
 772         p += clistr_push(cli, p, fname, -1, STR_TERMINATE);
 773
 774         cli_setup_bcc(cli, p);
 775
 776         cli_send_smb(cli);
 777         if (!cli_receive_smb(cli)) {
 778                 return -1;
 779         }
 780
 781         if (cli_is_error(cli)) {
 782                 return -1;
 783         }
 784
 785         return SVAL(cli->inbuf,smb_vwv2);
 786 }
 787
 788 /****************************************************************************
 789  Close a file.
 790 ****************************************************************************/
 791
 792 BOOL cli_close(struct cli_state *cli, int fnum)
 793 {
 794         memset(cli->outbuf,'\0',smb_size);
 795         memset(cli->inbuf,'\0',smb_size);
 796
 797         set_message(cli->outbuf,3,0,True);
 798
 799         SCVAL(cli->outbuf,smb_com,SMBclose);
 800         SSVAL(cli->outbuf,smb_tid,cli->cnum);
 801         cli_setup_packet(cli);
 802
 803         SSVAL(cli->outbuf,smb_vwv0,fnum);
 804         SIVALS(cli->outbuf,smb_vwv1,-1);
 805
 806         cli_send_smb(cli);
 807         if (!cli_receive_smb(cli)) {
 808                 return False;
 809         }
 810
 811         return !cli_is_error(cli);
 812 }
 813
 814
 815 /****************************************************************************
 816  send a lock with a specified locktype
 817  this is used for testing LOCKING_ANDX_CANCEL_LOCK
 818 ****************************************************************************/
 819
 820 NTSTATUS cli_locktype(struct cli_state *cli, int fnum,
 821                       uint32 offset, uint32 len, int timeout, unsigned char locktype)
 822 {
 823         char *p;
 824         int saved_timeout = cli->timeout;
 825
 826         memset(cli->outbuf,'\0',smb_size);
 827         memset(cli->inbuf,'\0', smb_size);
 828
 829         set_message(cli->outbuf,8,0,True);
 830
 831         SCVAL(cli->outbuf,smb_com,SMBlockingX);
 832         SSVAL(cli->outbuf,smb_tid,cli->cnum);
 833         cli_setup_packet(cli);
 834
 835         SCVAL(cli->outbuf,smb_vwv0,0xFF);
 836         SSVAL(cli->outbuf,smb_vwv2,fnum);
 837         SCVAL(cli->outbuf,smb_vwv3,locktype);
 838         SIVALS(cli->outbuf, smb_vwv4, timeout);
 839         SSVAL(cli->outbuf,smb_vwv6,0);
 840         SSVAL(cli->outbuf,smb_vwv7,1);
 841
 842         p = smb_buf(cli->outbuf);
 843         SSVAL(p, 0, cli->pid);
 844         SIVAL(p, 2, offset);
 845         SIVAL(p, 6, len);
 846
 847         p += 10;
 848
 849         cli_setup_bcc(cli, p);
 850
 851         cli_send_smb(cli);
 852
 853         if (timeout != 0) {
 854                 cli->timeout = (timeout == -1) ? 0x7FFFFFFF : (timeout + 2*1000);
 855         }
 856
 857         if (!cli_receive_smb(cli)) {
 858                 cli->timeout = saved_timeout;
 859                 return NT_STATUS_UNSUCCESSFUL;
 860         }
 861
 862         cli->timeout = saved_timeout;
 863
 864         return cli_nt_error(cli);
 865 }
 866
 867 /****************************************************************************
 868  Lock a file.
 869  note that timeout is in units of 2 milliseconds
 870 ****************************************************************************/
 871
 872 BOOL cli_lock(struct cli_state *cli, int fnum,
 873               uint32 offset, uint32 len, int timeout, enum brl_type lock_type)
 874 {
 875         char *p;
 876         int saved_timeout = cli->timeout;
 877
 878         memset(cli->outbuf,'\0',smb_size);
 879         memset(cli->inbuf,'\0', smb_size);
 880
 881         set_message(cli->outbuf,8,0,True);
 882
 883         SCVAL(cli->outbuf,smb_com,SMBlockingX);
 884         SSVAL(cli->outbuf,smb_tid,cli->cnum);
 885         cli_setup_packet(cli);
 886
 887         SCVAL(cli->outbuf,smb_vwv0,0xFF);
 888         SSVAL(cli->outbuf,smb_vwv2,fnum);
 889         SCVAL(cli->outbuf,smb_vwv3,(lock_type == READ_LOCK? 1 : 0));
 890         SIVALS(cli->outbuf, smb_vwv4, timeout);
 891         SSVAL(cli->outbuf,smb_vwv6,0);
 892         SSVAL(cli->outbuf,smb_vwv7,1);
 893
 894         p = smb_buf(cli->outbuf);
 895         SSVAL(p, 0, cli->pid);
 896         SIVAL(p, 2, offset);
 897         SIVAL(p, 6, len);
 898
 899         p += 10;
 900
 901         cli_setup_bcc(cli, p);
 902
 903         cli_send_smb(cli);
 904
 905         if (timeout != 0) {
 906                 cli->timeout = (timeout == -1) ? 0x7FFFFFFF : (timeout*2 + 5*1000);
 907         }
 908
 909         if (!cli_receive_smb(cli)) {
 910                 cli->timeout = saved_timeout;
 911                 return False;
 912         }
 913
 914         cli->timeout = saved_timeout;
 915
 916         if (cli_is_error(cli)) {
 917                 return False;
 918         }
 919
 920         return True;
 921 }
 922
 923 /****************************************************************************
 924  Unlock a file.
 925 ****************************************************************************/
 926
 927 BOOL cli_unlock(struct cli_state *cli, int fnum, uint32 offset, uint32 len)
 928 {
 929         char *p;
 930
 931         memset(cli->outbuf,'\0',smb_size);
 932         memset(cli->inbuf,'\0',smb_size);
 933
 934         set_message(cli->outbuf,8,0,True);
 935
 936         SCVAL(cli->outbuf,smb_com,SMBlockingX);
 937         SSVAL(cli->outbuf,smb_tid,cli->cnum);
 938         cli_setup_packet(cli);
 939
 940         SCVAL(cli->outbuf,smb_vwv0,0xFF);
 941         SSVAL(cli->outbuf,smb_vwv2,fnum);
 942         SCVAL(cli->outbuf,smb_vwv3,0);
 943         SIVALS(cli->outbuf, smb_vwv4, 0);
 944         SSVAL(cli->outbuf,smb_vwv6,1);
 945         SSVAL(cli->outbuf,smb_vwv7,0);
 946
 947         p = smb_buf(cli->outbuf);
 948         SSVAL(p, 0, cli->pid);
 949         SIVAL(p, 2, offset);
 950         SIVAL(p, 6, len);
 951         p += 10;
 952         cli_setup_bcc(cli, p);
 953         cli_send_smb(cli);
 954         if (!cli_receive_smb(cli)) {
 955                 return False;
 956         }
 957
 958         if (cli_is_error(cli)) {
 959                 return False;
 960         }
 961
 962         return True;
 963 }
 964
 965 /****************************************************************************
 966  Lock a file with 64 bit offsets.
 967 ****************************************************************************/
 968
 969 BOOL cli_lock64(struct cli_state *cli, int fnum,
 970                 SMB_BIG_UINT offset, SMB_BIG_UINT len, int timeout, enum brl_type lock_type)
 971 {
 972         char *p;
 973         int saved_timeout = cli->timeout;
 974         int ltype;
 975
 976         if (! (cli->capabilities & CAP_LARGE_FILES)) {
 977                 return cli_lock(cli, fnum, offset, len, timeout, lock_type);
 978         }
 979
 980         ltype = (lock_type == READ_LOCK? 1 : 0);
 981         ltype |= LOCKING_ANDX_LARGE_FILES;
 982
 983         memset(cli->outbuf,'\0',smb_size);
 984         memset(cli->inbuf,'\0', smb_size);
 985
 986         set_message(cli->outbuf,8,0,True);
 987
 988         SCVAL(cli->outbuf,smb_com,SMBlockingX);
 989         SSVAL(cli->outbuf,smb_tid,cli->cnum);
 990         cli_setup_packet(cli);
 991
 992         SCVAL(cli->outbuf,smb_vwv0,0xFF);
 993         SSVAL(cli->outbuf,smb_vwv2,fnum);
 994         SCVAL(cli->outbuf,smb_vwv3,ltype);
 995         SIVALS(cli->outbuf, smb_vwv4, timeout);
 996         SSVAL(cli->outbuf,smb_vwv6,0);
 997         SSVAL(cli->outbuf,smb_vwv7,1);
 998
 999         p = smb_buf(cli->outbuf);
1000         SIVAL(p, 0, cli->pid);
1001         SOFF_T_R(p, 4, offset);
1002         SOFF_T_R(p, 12, len);
1003         p += 20;
1004
1005         cli_setup_bcc(cli, p);
1006         cli_send_smb(cli);
1007
1008         if (timeout != 0) {
1009                 cli->timeout = (timeout == -1) ? 0x7FFFFFFF : (timeout + 5*1000);
1010         }
1011
1012         if (!cli_receive_smb(cli)) {
1013                 cli->timeout = saved_timeout;
1014                 return False;
1015         }
1016
1017         cli->timeout = saved_timeout;
1018
1019         if (cli_is_error(cli)) {
1020                 return False;
1021         }
1022
1023         return True;
1024 }
1025
1026 /****************************************************************************
1027  Unlock a file with 64 bit offsets.
1028 ****************************************************************************/
1029
1030 BOOL cli_unlock64(struct cli_state *cli, int fnum, SMB_BIG_UINT offset, SMB_BIG_UINT len)
1031 {
1032         char *p;
1033
1034         if (! (cli->capabilities & CAP_LARGE_FILES)) {
1035                 return cli_unlock(cli, fnum, offset, len);
1036         }
1037
1038         memset(cli->outbuf,'\0',smb_size);
1039         memset(cli->inbuf,'\0',smb_size);
1040
1041         set_message(cli->outbuf,8,0,True);
1042
1043         SCVAL(cli->outbuf,smb_com,SMBlockingX);
1044         SSVAL(cli->outbuf,smb_tid,cli->cnum);
1045         cli_setup_packet(cli);
1046
1047         SCVAL(cli->outbuf,smb_vwv0,0xFF);
1048         SSVAL(cli->outbuf,smb_vwv2,fnum);
1049         SCVAL(cli->outbuf,smb_vwv3,LOCKING_ANDX_LARGE_FILES);
1050         SIVALS(cli->outbuf, smb_vwv4, 0);
1051         SSVAL(cli->outbuf,smb_vwv6,1);
1052         SSVAL(cli->outbuf,smb_vwv7,0);
1053
1054         p = smb_buf(cli->outbuf);
1055         SIVAL(p, 0, cli->pid);
1056         SOFF_T_R(p, 4, offset);
1057         SOFF_T_R(p, 12, len);
1058         p += 20;
1059         cli_setup_bcc(cli, p);
1060         cli_send_smb(cli);
1061         if (!cli_receive_smb(cli)) {
1062                 return False;
1063         }
1064
1065         if (cli_is_error(cli)) {
1066                 return False;
1067         }
1068
1069         return True;
1070 }
1071
1072 /****************************************************************************
1073  Get/unlock a POSIX lock on a file - internal function.
1074 ****************************************************************************/
1075
1076 static BOOL cli_posix_lock_internal(struct cli_state *cli, int fnum,
1077                 SMB_BIG_UINT offset, SMB_BIG_UINT len, BOOL wait_lock, enum brl_type lock_type)
1078 {
1079         unsigned int param_len = 4;
1080         unsigned int data_len = POSIX_LOCK_DATA_SIZE;
1081         uint16 setup = TRANSACT2_SETFILEINFO;
1082         char param[4];
1083         unsigned char data[POSIX_LOCK_DATA_SIZE];
1084         char *rparam=NULL, *rdata=NULL;
1085         int saved_timeout = cli->timeout;
1086
1087         SSVAL(param,0,fnum);
1088         SSVAL(param,2,SMB_SET_POSIX_LOCK);
1089
1090         switch (lock_type) {
1091                 case READ_LOCK:
1092                         SSVAL(data, POSIX_LOCK_TYPE_OFFSET, POSIX_LOCK_TYPE_READ);
1093                         break;
1094                 case WRITE_LOCK:
1095                         SSVAL(data, POSIX_LOCK_TYPE_OFFSET, POSIX_LOCK_TYPE_WRITE);
1096                         break;
1097                 case UNLOCK_LOCK:
1098                         SSVAL(data, POSIX_LOCK_TYPE_OFFSET, POSIX_LOCK_TYPE_UNLOCK);
1099                         break;
1100                 default:
1101                         return False;
1102         }
1103
1104         if (wait_lock) {
1105                 SSVAL(data, POSIX_LOCK_FLAGS_OFFSET, POSIX_LOCK_FLAG_WAIT);
1106                 cli->timeout = 0x7FFFFFFF;
1107         } else {
1108                 SSVAL(data, POSIX_LOCK_FLAGS_OFFSET, POSIX_LOCK_FLAG_NOWAIT);
1109         }
1110
1111         SIVAL(data, POSIX_LOCK_PID_OFFSET, cli->pid);
1112         SOFF_T(data, POSIX_LOCK_START_OFFSET, offset);
1113         SOFF_T(data, POSIX_LOCK_LEN_OFFSET, len);
1114
1115         if (!cli_send_trans(cli, SMBtrans2,
1116                                 NULL,                        /* name */
1117                                 -1, 0,                          /* fid, flags */
1118                                 &setup, 1, 0,                   /* setup, length, max */
1119                                 param, param_len, 2,            /* param, length, max */
1120                                 (char *)&data,  data_len, cli->max_xmit /* data, length, max */
1121                                 )) {
1122                 cli->timeout = saved_timeout;
1123                 return False;
1124         }
1125
1126         if (!cli_receive_trans(cli, SMBtrans2,
1127                                 &rparam, &param_len,
1128                                 &rdata, &data_len)) {
1129                 cli->timeout = saved_timeout;
1130                 SAFE_FREE(rdata);
1131                 SAFE_FREE(rparam);
1132                 return False;
1133         }
1134
1135         cli->timeout = saved_timeout;
1136
1137         SAFE_FREE(rdata);
1138         SAFE_FREE(rparam);
1139
1140         return True;
1141 }
1142
1143 /****************************************************************************
1144  POSIX Lock a file.
1145 ****************************************************************************/
1146
1147 BOOL cli_posix_lock(struct cli_state *cli, int fnum,
1148                         SMB_BIG_UINT offset, SMB_BIG_UINT len,
1149                         BOOL wait_lock, enum brl_type lock_type)
1150 {
1151         if (lock_type != READ_LOCK && lock_type != WRITE_LOCK) {
1152                 return False;
1153         }
1154         return cli_posix_lock_internal(cli, fnum, offset, len, wait_lock, lock_type);
1155 }
1156
1157 /****************************************************************************
1158  POSIX Unlock a file.
1159 ****************************************************************************/
1160
1161 BOOL cli_posix_unlock(struct cli_state *cli, int fnum, SMB_BIG_UINT offset, SMB_BIG_UINT len)
1162 {
1163         return cli_posix_lock_internal(cli, fnum, offset, len, False, UNLOCK_LOCK);
1164 }
1165
1166 /****************************************************************************
1167  POSIX Get any lock covering a file.
1168 ****************************************************************************/
1169
1170 BOOL cli_posix_getlock(struct cli_state *cli, int fnum, SMB_BIG_UINT *poffset, SMB_BIG_UINT *plen)
1171 {
1172         return True;
1173 }
1174
1175 /****************************************************************************
1176  Do a SMBgetattrE call.
1177 ****************************************************************************/
1178
1179 BOOL cli_getattrE(struct cli_state *cli, int fd,
1180                   uint16 *attr, SMB_OFF_T *size,
1181                   time_t *c_time, time_t *a_time, time_t *m_time)
1182 {
1183         memset(cli->outbuf,'\0',smb_size);
1184         memset(cli->inbuf,'\0',smb_size);
1185
1186         set_message(cli->outbuf,1,0,True);
1187
1188         SCVAL(cli->outbuf,smb_com,SMBgetattrE);
1189         SSVAL(cli->outbuf,smb_tid,cli->cnum);
1190         cli_setup_packet(cli);
1191
1192         SSVAL(cli->outbuf,smb_vwv0,fd);
1193
1194         cli_send_smb(cli);
1195         if (!cli_receive_smb(cli)) {
1196                 return False;
1197         }
1198
1199         if (cli_is_error(cli)) {
1200                 return False;
1201         }
1202
1203         if (size) {
1204                 *size = IVAL(cli->inbuf, smb_vwv6);
1205         }
1206
1207         if (attr) {
1208                 *attr = SVAL(cli->inbuf,smb_vwv10);
1209         }
1210
1211         if (c_time) {
1212                 *c_time = cli_make_unix_date2(cli, cli->inbuf+smb_vwv0);
1213         }
1214
1215         if (a_time) {
1216                 *a_time = cli_make_unix_date2(cli, cli->inbuf+smb_vwv2);
1217         }
1218
1219         if (m_time) {
1220                 *m_time = cli_make_unix_date2(cli, cli->inbuf+smb_vwv4);
1221         }
1222
1223         return True;
1224 }
1225
1226 /****************************************************************************
1227  Do a SMBgetatr call
1228 ****************************************************************************/
1229
1230 BOOL cli_getatr(struct cli_state *cli, const char *fname,
1231                 uint16 *attr, SMB_OFF_T *size, time_t *t)
1232 {
1233         char *p;
1234
1235         memset(cli->outbuf,'\0',smb_size);
1236         memset(cli->inbuf,'\0',smb_size);
1237
1238         set_message(cli->outbuf,0,0,True);
1239
1240         SCVAL(cli->outbuf,smb_com,SMBgetatr);
1241         SSVAL(cli->outbuf,smb_tid,cli->cnum);
1242         cli_setup_packet(cli);
1243
1244         p = smb_buf(cli->outbuf);
1245         *p++ = 4;
1246         p += clistr_push(cli, p, fname, -1, STR_TERMINATE);
1247
1248         cli_setup_bcc(cli, p);
1249
1250         cli_send_smb(cli);
1251         if (!cli_receive_smb(cli)) {
1252                 return False;
1253         }
1254
1255         if (cli_is_error(cli)) {
1256                 return False;
1257         }
1258
1259         if (size) {
1260                 *size = IVAL(cli->inbuf, smb_vwv3);
1261         }
1262
1263         if (t) {
1264                 *t = cli_make_unix_date3(cli, cli->inbuf+smb_vwv1);
1265         }
1266
1267         if (attr) {
1268                 *attr = SVAL(cli->inbuf,smb_vwv0);
1269         }
1270
1271
1272         return True;
1273 }
1274
1275 /****************************************************************************
1276  Do a SMBsetattrE call.
1277 ****************************************************************************/
1278
1279 BOOL cli_setattrE(struct cli_state *cli, int fd,
1280                   time_t c_time, time_t a_time, time_t m_time)
1281
1282 {
1283         char *p;
1284
1285         memset(cli->outbuf,'\0',smb_size);
1286         memset(cli->inbuf,'\0',smb_size);
1287
1288         set_message(cli->outbuf,7,0,True);
1289
1290         SCVAL(cli->outbuf,smb_com,SMBsetattrE);
1291         SSVAL(cli->outbuf,smb_tid,cli->cnum);
1292         cli_setup_packet(cli);
1293
1294         SSVAL(cli->outbuf,smb_vwv0, fd);
1295         cli_put_dos_date2(cli, cli->outbuf,smb_vwv1, c_time);
1296         cli_put_dos_date2(cli, cli->outbuf,smb_vwv3, a_time);
1297         cli_put_dos_date2(cli, cli->outbuf,smb_vwv5, m_time);
1298
1299         p = smb_buf(cli->outbuf);
1300         *p++ = 4;
1301
1302         cli_setup_bcc(cli, p);
1303
1304         cli_send_smb(cli);
1305         if (!cli_receive_smb(cli)) {
1306                 return False;
1307         }
1308
1309         if (cli_is_error(cli)) {
1310                 return False;
1311         }
1312
1313         return True;
1314 }
1315
1316 /****************************************************************************
1317  Do a SMBsetatr call.
1318 ****************************************************************************/
1319
1320 BOOL cli_setatr(struct cli_state *cli, const char *fname, uint16 attr, time_t t)
1321 {
1322         char *p;
1323
1324         memset(cli->outbuf,'\0',smb_size);
1325         memset(cli->inbuf,'\0',smb_size);
1326
1327         set_message(cli->outbuf,8,0,True);
1328
1329         SCVAL(cli->outbuf,smb_com,SMBsetatr);
1330         SSVAL(cli->outbuf,smb_tid,cli->cnum);
1331         cli_setup_packet(cli);
1332
1333         SSVAL(cli->outbuf,smb_vwv0, attr);
1334         cli_put_dos_date3(cli, cli->outbuf,smb_vwv1, t);
1335
1336         p = smb_buf(cli->outbuf);
1337         *p++ = 4;
1338         p += clistr_push(cli, p, fname, -1, STR_TERMINATE);
1339         *p++ = 4;
1340
1341         cli_setup_bcc(cli, p);
1342
1343         cli_send_smb(cli);
1344         if (!cli_receive_smb(cli)) {
1345                 return False;
1346         }
1347
1348         if (cli_is_error(cli)) {
1349                 return False;
1350         }
1351
1352         return True;
1353 }
1354
1355 /****************************************************************************
1356  Check for existance of a dir.
1357 ****************************************************************************/
1358 BOOL cli_chkpath(struct cli_state *cli, const char *path)
1359 {
1360         pstring path2;
1361         char *p;
1362
1363         pstrcpy(path2,path);
1364         trim_char(path2,'\0','\\');
1365         if (!*path2)
1366                 *path2 = '\\';
1367
1368         memset(cli->outbuf,'\0',smb_size);
1369         set_message(cli->outbuf,0,0,True);
1370         SCVAL(cli->outbuf,smb_com,SMBchkpth);
1371         SSVAL(cli->outbuf,smb_tid,cli->cnum);
1372         cli_setup_packet(cli);
1373         p = smb_buf(cli->outbuf);
1374         *p++ = 4;
1375         p += clistr_push(cli, p, path2, -1, STR_TERMINATE);
1376
1377         cli_setup_bcc(cli, p);
1378
1379         cli_send_smb(cli);
1380         if (!cli_receive_smb(cli)) {
1381                 return False;
1382         }
1383
1384         if (cli_is_error(cli)) return False;
1385
1386         return True;
1387 }
1388
1389 /****************************************************************************
1390  Query disk space.
1391 ****************************************************************************/
1392
1393 BOOL cli_dskattr(struct cli_state *cli, int *bsize, int *total, int *avail)
1394 {
1395         memset(cli->outbuf,'\0',smb_size);
1396         set_message(cli->outbuf,0,0,True);
1397         SCVAL(cli->outbuf,smb_com,SMBdskattr);
1398         SSVAL(cli->outbuf,smb_tid,cli->cnum);
1399         cli_setup_packet(cli);
1400
1401         cli_send_smb(cli);
1402         if (!cli_receive_smb(cli)) {
1403                 return False;
1404         }
1405
1406         *bsize = SVAL(cli->inbuf,smb_vwv1)*SVAL(cli->inbuf,smb_vwv2);
1407         *total = SVAL(cli->inbuf,smb_vwv0);
1408         *avail = SVAL(cli->inbuf,smb_vwv3);
1409
1410         return True;
1411 }
1412
1413 /****************************************************************************
1414  Create and open a temporary file.
1415 ****************************************************************************/
1416
1417 int cli_ctemp(struct cli_state *cli, const char *path, char **tmp_path)
1418 {
1419         int len;
1420         char *p;
1421
1422         memset(cli->outbuf,'\0',smb_size);
1423         memset(cli->inbuf,'\0',smb_size);
1424
1425         set_message(cli->outbuf,3,0,True);
1426
1427         SCVAL(cli->outbuf,smb_com,SMBctemp);
1428         SSVAL(cli->outbuf,smb_tid,cli->cnum);
1429         cli_setup_packet(cli);
1430
1431         SSVAL(cli->outbuf,smb_vwv0,0);
1432         SIVALS(cli->outbuf,smb_vwv1,-1);
1433
1434         p = smb_buf(cli->outbuf);
1435         *p++ = 4;
1436         p += clistr_push(cli, p, path, -1, STR_TERMINATE);
1437
1438         cli_setup_bcc(cli, p);
1439
1440         cli_send_smb(cli);
1441         if (!cli_receive_smb(cli)) {
1442                 return -1;
1443         }
1444
1445         if (cli_is_error(cli)) {
1446                 return -1;
1447         }
1448
1449         /* despite the spec, the result has a -1, followed by
1450            length, followed by name */
1451         p = smb_buf(cli->inbuf);
1452         p += 4;
1453         len = smb_buflen(cli->inbuf) - 4;
1454         if (len <= 0) return -1;
1455
1456         if (tmp_path) {
1457                 pstring path2;
1458                 clistr_pull(cli, path2, p,
1459                             sizeof(path2), len, STR_ASCII);
1460                 *tmp_path = SMB_STRDUP(path2);
1461         }
1462
1463         return SVAL(cli->inbuf,smb_vwv0);
1464 }
1465
1466
1467 /*
1468    send a raw ioctl - used by the torture code
1469 */
1470 NTSTATUS cli_raw_ioctl(struct cli_state *cli, int fnum, uint32 code, DATA_BLOB *blob)
1471 {
1472         memset(cli->outbuf,'\0',smb_size);
1473         memset(cli->inbuf,'\0',smb_size);
1474
1475         set_message(cli->outbuf, 3, 0, True);
1476         SCVAL(cli->outbuf,smb_com,SMBioctl);
1477         cli_setup_packet(cli);
1478
1479         SSVAL(cli->outbuf, smb_vwv0, fnum);
1480         SSVAL(cli->outbuf, smb_vwv1, code>>16);
1481         SSVAL(cli->outbuf, smb_vwv2, (code&0xFFFF));
1482
1483         cli_send_smb(cli);
1484         if (!cli_receive_smb(cli)) {
1485                 return NT_STATUS_UNEXPECTED_NETWORK_ERROR;
1486         }
1487
1488         if (cli_is_error(cli)) {
1489                 return cli_nt_error(cli);
1490         }
1491
1492         *blob = data_blob(NULL, 0);
1493
1494         return NT_STATUS_OK;
1495 }
1496
1497 /*********************************************************
1498  Set an extended attribute utility fn.
1499 *********************************************************/
1500
1501 static BOOL cli_set_ea(struct cli_state *cli, uint16 setup, char *param, unsigned int param_len,
1502                         const char *ea_name, const char *ea_val, size_t ea_len)
1503 {
1504         unsigned int data_len = 0;
1505         char *data = NULL;
1506         char *rparam=NULL, *rdata=NULL;
1507         char *p;
1508         size_t ea_namelen = strlen(ea_name);
1509
1510         if (ea_namelen == 0 && ea_len == 0) {
1511                 data_len = 4;
1512                 data = (char *)SMB_MALLOC(data_len);
1513                 if (!data) {
1514                         return False;
1515                 }
1516                 p = data;
1517                 SIVAL(p,0,data_len);
1518         } else {
1519                 data_len = 4 + 4 + ea_namelen + 1 + ea_len;
1520                 data = (char *)SMB_MALLOC(data_len);
1521                 if (!data) {
1522                         return False;
1523                 }
1524                 p = data;
1525                 SIVAL(p,0,data_len);
1526                 p += 4;
1527                 SCVAL(p, 0, 0); /* EA flags. */
1528                 SCVAL(p, 1, ea_namelen);
1529                 SSVAL(p, 2, ea_len);
1530                 memcpy(p+4, ea_name, ea_namelen+1); /* Copy in the name. */
1531                 memcpy(p+4+ea_namelen+1, ea_val, ea_len);
1532         }
1533
1534         if (!cli_send_trans(cli, SMBtrans2,
1535                 NULL,                        /* name */
1536                 -1, 0,                          /* fid, flags */
1537                 &setup, 1, 0,                   /* setup, length, max */
1538                 param, param_len, 2,            /* param, length, max */
1539                 data,  data_len, cli->max_xmit /* data, length, max */
1540                 )) {
1541                         return False;
1542         }
1543
1544         if (!cli_receive_trans(cli, SMBtrans2,
1545                 &rparam, &param_len,
1546                 &rdata, &data_len)) {
1547                         return False;
1548         }
1549
1550         SAFE_FREE(data);
1551         SAFE_FREE(rdata);
1552         SAFE_FREE(rparam);
1553
1554         return True;
1555 }
1556
1557 /*********************************************************
1558  Set an extended attribute on a pathname.
1559 *********************************************************/
1560
1561 BOOL cli_set_ea_path(struct cli_state *cli, const char *path, const char *ea_name, const char *ea_val, size_t ea_len)
1562 {
1563         uint16 setup = TRANSACT2_SETPATHINFO;
1564         unsigned int param_len = 0;
1565         char param[sizeof(pstring)+6];
1566         size_t srclen = 2*(strlen(path)+1);
1567         char *p;
1568
1569         memset(param, 0, sizeof(param));
1570         SSVAL(param,0,SMB_INFO_SET_EA);
1571         p = &param[6];
1572
1573         p += clistr_push(cli, p, path, MIN(srclen, sizeof(param)-6), STR_TERMINATE);
1574         param_len = PTR_DIFF(p, param);
1575
1576         return cli_set_ea(cli, setup, param, param_len, ea_name, ea_val, ea_len);
1577 }
1578
1579 /*********************************************************
1580  Set an extended attribute on an fnum.
1581 *********************************************************/
1582
1583 BOOL cli_set_ea_fnum(struct cli_state *cli, int fnum, const char *ea_name, const char *ea_val, size_t ea_len)
1584 {
1585         char param[6];
1586         uint16 setup = TRANSACT2_SETFILEINFO;
1587
1588         memset(param, 0, 6);
1589         SSVAL(param,0,fnum);
1590         SSVAL(param,2,SMB_INFO_SET_EA);
1591
1592         return cli_set_ea(cli, setup, param, 6, ea_name, ea_val, ea_len);
1593 }
1594
1595 /*********************************************************
1596  Get an extended attribute list tility fn.
1597 *********************************************************/
1598
1599 static BOOL cli_get_ea_list(struct cli_state *cli,
1600                 uint16 setup, char *param, unsigned int param_len,
1601                 TALLOC_CTX *ctx,
1602                 size_t *pnum_eas,
1603                 struct ea_struct **pea_list)
1604 {
1605         unsigned int data_len = 0;
1606         unsigned int rparam_len, rdata_len;
1607         char *rparam=NULL, *rdata=NULL;
1608         char *p;
1609         size_t ea_size;
1610         size_t num_eas;
1611         BOOL ret = False;
1612         struct ea_struct *ea_list;
1613
1614         *pnum_eas = 0;
1615         *pea_list = NULL;
1616
1617         if (!cli_send_trans(cli, SMBtrans2,
1618                         NULL,           /* Name */
1619                         -1, 0,          /* fid, flags */
1620                         &setup, 1, 0,   /* setup, length, max */
1621                         param, param_len, 10, /* param, length, max */
1622                         NULL, data_len, cli->max_xmit /* data, length, max */
1623                                 )) {
1624                 return False;
1625         }
1626
1627         if (!cli_receive_trans(cli, SMBtrans2,
1628                         &rparam, &rparam_len,
1629                         &rdata, &rdata_len)) {
1630                 return False;
1631         }
1632
1633         if (!rdata || rdata_len < 4) {
1634                 goto out;
1635         }
1636
1637         ea_size = (size_t)IVAL(rdata,0);
1638         if (ea_size > rdata_len) {
1639                 goto out;
1640         }
1641
1642         if (ea_size == 0) {
1643                 /* No EA's present. */
1644                 ret = True;
1645                 goto out;
1646         }
1647
1648         p = rdata + 4;
1649         ea_size -= 4;
1650
1651         /* Validate the EA list and count it. */
1652         for (num_eas = 0; ea_size >= 4; num_eas++) {
1653                 unsigned int ea_namelen = CVAL(p,1);
1654                 unsigned int ea_valuelen = SVAL(p,2);
1655                 if (ea_namelen == 0) {
1656                         goto out;
1657                 }
1658                 if (4 + ea_namelen + 1 + ea_valuelen > ea_size) {
1659                         goto out;
1660                 }
1661                 ea_size -= 4 + ea_namelen + 1 + ea_valuelen;
1662                 p += 4 + ea_namelen + 1 + ea_valuelen;
1663         }
1664
1665         if (num_eas == 0) {
1666                 ret = True;
1667                 goto out;
1668         }
1669
1670         *pnum_eas = num_eas;
1671         if (!pea_list) {
1672                 /* Caller only wants number of EA's. */
1673                 ret = True;
1674                 goto out;
1675         }
1676
1677         ea_list = TALLOC_ARRAY(ctx, struct ea_struct, num_eas);
1678         if (!ea_list) {
1679                 goto out;
1680         }
1681
1682         ea_size = (size_t)IVAL(rdata,0);
1683         p = rdata + 4;
1684
1685         for (num_eas = 0; num_eas < *pnum_eas; num_eas++ ) {
1686                 struct ea_struct *ea = &ea_list[num_eas];
1687                 fstring unix_ea_name;
1688                 unsigned int ea_namelen = CVAL(p,1);
1689                 unsigned int ea_valuelen = SVAL(p,2);
1690
1691                 ea->flags = CVAL(p,0);
1692                 unix_ea_name[0] = '\0';
1693                 pull_ascii_fstring(unix_ea_name, p + 4);
1694                 ea->name = talloc_strdup(ctx, unix_ea_name);
1695                 /* Ensure the value is null terminated (in case it's a string). */
1696                 ea->value = data_blob_talloc(ctx, NULL, ea_valuelen + 1);
1697                 if (!ea->value.data) {
1698                         goto out;
1699                 }
1700                 if (ea_valuelen) {
1701                         memcpy(ea->value.data, p+4+ea_namelen+1, ea_valuelen);
1702                 }
1703                 ea->value.data[ea_valuelen] = 0;
1704                 ea->value.length--;
1705                 p += 4 + ea_namelen + 1 + ea_valuelen;
1706         }
1707
1708         *pea_list = ea_list;
1709         ret = True;
1710
1711  out :
1712
1713         SAFE_FREE(rdata);
1714         SAFE_FREE(rparam);
1715         return ret;
1716 }
1717
1718 /*********************************************************
1719  Get an extended attribute list from a pathname.
1720 *********************************************************/
1721
1722 BOOL cli_get_ea_list_path(struct cli_state *cli, const char *path,
1723                 TALLOC_CTX *ctx,
1724                 size_t *pnum_eas,
1725                 struct ea_struct **pea_list)
1726 {
1727         uint16 setup = TRANSACT2_QPATHINFO;
1728         unsigned int param_len = 0;
1729         char param[sizeof(pstring)+6];
1730         char *p;
1731
1732         p = param;
1733         memset(p, 0, 6);
1734         SSVAL(p, 0, SMB_INFO_QUERY_ALL_EAS);
1735         p += 6;
1736         p += clistr_push(cli, p, path, sizeof(pstring)-6, STR_TERMINATE);
1737         param_len = PTR_DIFF(p, param);
1738
1739         return cli_get_ea_list(cli, setup, param, param_len, ctx, pnum_eas, pea_list);
1740 }
1741
1742 /*********************************************************
1743  Get an extended attribute list from an fnum.
1744 *********************************************************/
1745
1746 BOOL cli_get_ea_list_fnum(struct cli_state *cli, int fnum,
1747                 TALLOC_CTX *ctx,
1748                 size_t *pnum_eas,
1749                 struct ea_struct **pea_list)
1750 {
1751         uint16 setup = TRANSACT2_QFILEINFO;
1752         char param[6];
1753
1754         memset(param, 0, 6);
1755         SSVAL(param,0,fnum);
1756         SSVAL(param,2,SMB_INFO_SET_EA);
1757
1758         return cli_get_ea_list(cli, setup, param, 6, ctx, pnum_eas, pea_list);
1759 }