source3/smbd/reply.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    Main SMB reply routines
   4    Copyright (C) Andrew Tridgell 1992-1998
   5    Copyright (C) Andrew Bartlett      2001
   6    Copyright (C) Jeremy Allison 1992-2007.
   7    Copyright (C) Volker Lendecke 2007
   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 3 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, see <http://www.gnu.org/licenses/>.
  21 */
  22 /*
  23    This file handles most of the reply_ calls that the server
  24    makes to handle specific protocols
  25 */
  26
  27 #include "includes.h"
  28 #include "smbd/globals.h"
  29
  30 extern enum protocol_types Protocol;
  31
  32 /****************************************************************************
  33  Ensure we check the path in *exactly* the same way as W2K for a findfirst/findnext
  34  path or anything including wildcards.
  35  We're assuming here that '/' is not the second byte in any multibyte char
  36  set (a safe assumption). '\\' *may* be the second byte in a multibyte char
  37  set.
  38 ****************************************************************************/
  39
  40 /* Custom version for processing POSIX paths. */
  41 #define IS_PATH_SEP(c,posix_only) ((c) == '/' || (!(posix_only) && (c) == '\\'))
  42
  43 static NTSTATUS check_path_syntax_internal(char *path,
  44                                            bool posix_path,
  45                                            bool *p_last_component_contains_wcard)
  46 {
  47         char *d = path;
  48         const char *s = path;
  49         NTSTATUS ret = NT_STATUS_OK;
  50         bool start_of_name_component = True;
  51         bool stream_started = false;
  52
  53         *p_last_component_contains_wcard = False;
  54
  55         while (*s) {
  56                 if (stream_started) {
  57                         switch (*s) {
  58                         case '/':
  59                         case '\\':
  60                                 return NT_STATUS_OBJECT_NAME_INVALID;
  61                         case ':':
  62                                 if (s[1] == '\0') {
  63                                         return NT_STATUS_OBJECT_NAME_INVALID;
  64                                 }
  65                                 if (strchr_m(&s[1], ':')) {
  66                                         return NT_STATUS_OBJECT_NAME_INVALID;
  67                                 }
  68                                 if (StrCaseCmp(s, ":$DATA") != 0) {
  69                                         return NT_STATUS_INVALID_PARAMETER;
  70                                 }
  71                                 break;
  72                         }
  73                 }
  74
  75                 if (!posix_path && !stream_started && *s == ':') {
  76                         if (*p_last_component_contains_wcard) {
  77                                 return NT_STATUS_OBJECT_NAME_INVALID;
  78                         }
  79                         /* Stream names allow more characters than file names.
  80                            We're overloading posix_path here to allow a wider
  81                            range of characters. If stream_started is true this
  82                            is still a Windows path even if posix_path is true.
  83                            JRA.
  84                         */
  85                         stream_started = true;
  86                         start_of_name_component = false;
  87                         posix_path = true;
  88
  89                         if (s[1] == '\0') {
  90                                 return NT_STATUS_OBJECT_NAME_INVALID;
  91                         }
  92                 }
  93
  94                 if (!stream_started && IS_PATH_SEP(*s,posix_path)) {
  95                         /*
  96                          * Safe to assume is not the second part of a mb char
  97                          * as this is handled below.
  98                          */
  99                         /* Eat multiple '/' or '\\' */
 100                         while (IS_PATH_SEP(*s,posix_path)) {
 101                                 s++;
 102                         }
 103                         if ((d != path) && (*s != '\0')) {
 104                                 /* We only care about non-leading or trailing '/' or '\\' */
 105                                 *d++ = '/';
 106                         }
 107
 108                         start_of_name_component = True;
 109                         /* New component. */
 110                         *p_last_component_contains_wcard = False;
 111                         continue;
 112                 }
 113
 114                 if (start_of_name_component) {
 115                         if ((s[0] == '.') && (s[1] == '.') && (IS_PATH_SEP(s[2],posix_path) || s[2] == '\0')) {
 116                                 /* Uh oh - "/../" or "\\..\\"  or "/..\0" or "\\..\0" ! */
 117
 118                                 /*
 119                                  * No mb char starts with '.' so we're safe checking the directory separator here.
 120                                  */
 121
 122                                 /* If  we just added a '/' - delete it */
 123                                 if ((d > path) && (*(d-1) == '/')) {
 124                                         *(d-1) = '\0';
 125                                         d--;
 126                                 }
 127
 128                                 /* Are we at the start ? Can't go back further if so. */
 129                                 if (d <= path) {
 130                                         ret = NT_STATUS_OBJECT_PATH_SYNTAX_BAD;
 131                                         break;
 132                                 }
 133                                 /* Go back one level... */
 134                                 /* We know this is safe as '/' cannot be part of a mb sequence. */
 135                                 /* NOTE - if this assumption is invalid we are not in good shape... */
 136                                 /* Decrement d first as d points to the *next* char to write into. */
 137                                 for (d--; d > path; d--) {
 138                                         if (*d == '/')
 139                                                 break;
 140                                 }
 141                                 s += 2; /* Else go past the .. */
 142                                 /* We're still at the start of a name component, just the previous one. */
 143                                 continue;
 144
 145                         } else if ((s[0] == '.') && ((s[1] == '\0') || IS_PATH_SEP(s[1],posix_path))) {
 146                                 if (posix_path) {
 147                                         /* Eat the '.' */
 148                                         s++;
 149                                         continue;
 150                                 }
 151                         }
 152
 153                 }
 154
 155                 if (!(*s & 0x80)) {
 156                         if (!posix_path) {
 157                                 if (*s <= 0x1f || *s == '|') {
 158                                         return NT_STATUS_OBJECT_NAME_INVALID;
 159                                 }
 160                                 switch (*s) {
 161                                         case '*':
 162                                         case '?':
 163                                         case '<':
 164                                         case '>':
 165                                         case '"':
 166                                                 *p_last_component_contains_wcard = True;
 167                                                 break;
 168                                         default:
 169                                                 break;
 170                                 }
 171                         }
 172                         *d++ = *s++;
 173                 } else {
 174                         size_t siz;
 175                         /* Get the size of the next MB character. */
 176                         next_codepoint(s,&siz);
 177                         switch(siz) {
 178                                 case 5:
 179                                         *d++ = *s++;
 180                                         /*fall through*/
 181                                 case 4:
 182                                         *d++ = *s++;
 183                                         /*fall through*/
 184                                 case 3:
 185                                         *d++ = *s++;
 186                                         /*fall through*/
 187                                 case 2:
 188                                         *d++ = *s++;
 189                                         /*fall through*/
 190                                 case 1:
 191                                         *d++ = *s++;
 192                                         break;
 193                                 default:
 194                                         DEBUG(0,("check_path_syntax_internal: character length assumptions invalid !\n"));
 195                                         *d = '\0';
 196                                         return NT_STATUS_INVALID_PARAMETER;
 197                         }
 198                 }
 199                 start_of_name_component = False;
 200         }
 201
 202         *d = '\0';
 203
 204         return ret;
 205 }
 206
 207 /****************************************************************************
 208  Ensure we check the path in *exactly* the same way as W2K for regular pathnames.
 209  No wildcards allowed.
 210 ****************************************************************************/
 211
 212 NTSTATUS check_path_syntax(char *path)
 213 {
 214         bool ignore;
 215         return check_path_syntax_internal(path, False, &ignore);
 216 }
 217
 218 /****************************************************************************
 219  Ensure we check the path in *exactly* the same way as W2K for regular pathnames.
 220  Wildcards allowed - p_contains_wcard returns true if the last component contained
 221  a wildcard.
 222 ****************************************************************************/
 223
 224 NTSTATUS check_path_syntax_wcard(char *path, bool *p_contains_wcard)
 225 {
 226         return check_path_syntax_internal(path, False, p_contains_wcard);
 227 }
 228
 229 /****************************************************************************
 230  Check the path for a POSIX client.
 231  We're assuming here that '/' is not the second byte in any multibyte char
 232  set (a safe assumption).
 233 ****************************************************************************/
 234
 235 NTSTATUS check_path_syntax_posix(char *path)
 236 {
 237         bool ignore;
 238         return check_path_syntax_internal(path, True, &ignore);
 239 }
 240
 241 /****************************************************************************
 242  Pull a string and check the path allowing a wilcard - provide for error return.
 243 ****************************************************************************/
 244
 245 size_t srvstr_get_path_wcard(TALLOC_CTX *ctx,
 246                         const char *base_ptr,
 247                         uint16 smb_flags2,
 248                         char **pp_dest,
 249                         const char *src,
 250                         size_t src_len,
 251                         int flags,
 252                         NTSTATUS *err,
 253                         bool *contains_wcard)
 254 {
 255         size_t ret;
 256
 257         *pp_dest = NULL;
 258
 259         ret = srvstr_pull_talloc(ctx, base_ptr, smb_flags2, pp_dest, src,
 260                                  src_len, flags);
 261
 262         if (!*pp_dest) {
 263                 *err = NT_STATUS_INVALID_PARAMETER;
 264                 return ret;
 265         }
 266
 267         *contains_wcard = False;
 268
 269         if (smb_flags2 & FLAGS2_DFS_PATHNAMES) {
 270                 /*
 271                  * For a DFS path the function parse_dfs_path()
 272                  * will do the path processing, just make a copy.
 273                  */
 274                 *err = NT_STATUS_OK;
 275                 return ret;
 276         }
 277
 278         if (lp_posix_pathnames()) {
 279                 *err = check_path_syntax_posix(*pp_dest);
 280         } else {
 281                 *err = check_path_syntax_wcard(*pp_dest, contains_wcard);
 282         }
 283
 284         return ret;
 285 }
 286
 287 /****************************************************************************
 288  Pull a string and check the path - provide for error return.
 289 ****************************************************************************/
 290
 291 size_t srvstr_get_path(TALLOC_CTX *ctx,
 292                         const char *base_ptr,
 293                         uint16 smb_flags2,
 294                         char **pp_dest,
 295                         const char *src,
 296                         size_t src_len,
 297                         int flags,
 298                         NTSTATUS *err)
 299 {
 300         bool ignore;
 301         return srvstr_get_path_wcard(ctx, base_ptr, smb_flags2, pp_dest, src,
 302                                      src_len, flags, err, &ignore);
 303 }
 304
 305 size_t srvstr_get_path_req_wcard(TALLOC_CTX *mem_ctx, struct smb_request *req,
 306                                  char **pp_dest, const char *src, int flags,
 307                                  NTSTATUS *err, bool *contains_wcard)
 308 {
 309         return srvstr_get_path_wcard(mem_ctx, (char *)req->inbuf, req->flags2,
 310                                      pp_dest, src, smbreq_bufrem(req, src),
 311                                      flags, err, contains_wcard);
 312 }
 313
 314 size_t srvstr_get_path_req(TALLOC_CTX *mem_ctx, struct smb_request *req,
 315                            char **pp_dest, const char *src, int flags,
 316                            NTSTATUS *err)
 317 {
 318         bool ignore;
 319         return srvstr_get_path_req_wcard(mem_ctx, req, pp_dest, src,
 320                                          flags, err, &ignore);
 321 }
 322
 323 /****************************************************************************
 324  Check if we have a correct fsp pointing to a file. Basic check for open fsp.
 325 ****************************************************************************/
 326
 327 bool check_fsp_open(connection_struct *conn, struct smb_request *req,
 328                     files_struct *fsp)
 329 {
 330         if (!(fsp) || !(conn)) {
 331                 reply_nterror(req, NT_STATUS_INVALID_HANDLE);
 332                 return False;
 333         }
 334         if (((conn) != (fsp)->conn) || req->vuid != (fsp)->vuid) {
 335                 reply_nterror(req, NT_STATUS_INVALID_HANDLE);
 336                 return False;
 337         }
 338         return True;
 339 }
 340
 341 /****************************************************************************
 342  Check if we have a correct fsp pointing to a file.
 343 ****************************************************************************/
 344
 345 bool check_fsp(connection_struct *conn, struct smb_request *req,
 346                files_struct *fsp)
 347 {
 348         if (!check_fsp_open(conn, req, fsp)) {
 349                 return False;
 350         }
 351         if ((fsp)->is_directory) {
 352                 reply_nterror(req, NT_STATUS_INVALID_DEVICE_REQUEST);
 353                 return False;
 354         }
 355         if ((fsp)->fh->fd == -1) {
 356                 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
 357                 return False;
 358         }
 359         (fsp)->num_smb_operations++;
 360         return True;
 361 }
 362
 363 /****************************************************************************
 364  Check if we have a correct fsp pointing to a quota fake file. Replacement for
 365  the CHECK_NTQUOTA_HANDLE_OK macro.
 366 ****************************************************************************/
 367
 368 bool check_fsp_ntquota_handle(connection_struct *conn, struct smb_request *req,
 369                               files_struct *fsp)
 370 {
 371         if (!check_fsp_open(conn, req, fsp)) {
 372                 return false;
 373         }
 374
 375         if (fsp->is_directory) {
 376                 return false;
 377         }
 378
 379         if (fsp->fake_file_handle == NULL) {
 380                 return false;
 381         }
 382
 383         if (fsp->fake_file_handle->type != FAKE_FILE_TYPE_QUOTA) {
 384                 return false;
 385         }
 386
 387         if (fsp->fake_file_handle->private_data == NULL) {
 388                 return false;
 389         }
 390
 391         return true;
 392 }
 393
 394 /****************************************************************************
 395  Check if we have a correct fsp. Replacement for the FSP_BELONGS_CONN macro
 396 ****************************************************************************/
 397
 398 bool fsp_belongs_conn(connection_struct *conn, struct smb_request *req,
 399                       files_struct *fsp)
 400 {
 401         if ((fsp) && (conn) && ((conn)==(fsp)->conn)
 402             && (req->vuid == (fsp)->vuid)) {
 403                 return True;
 404         }
 405
 406         reply_nterror(req, NT_STATUS_INVALID_HANDLE);
 407         return False;
 408 }
 409
 410 static bool netbios_session_retarget(const char *name, int name_type)
 411 {
 412         char *trim_name;
 413         char *trim_name_type;
 414         const char *retarget_parm;
 415         char *retarget;
 416         char *p;
 417         int retarget_type = 0x20;
 418         int retarget_port = 139;
 419         struct sockaddr_storage retarget_addr;
 420         struct sockaddr_in *in_addr;
 421         bool ret = false;
 422         uint8_t outbuf[10];
 423
 424         if (get_socket_port(smbd_server_fd()) != 139) {
 425                 return false;
 426         }
 427
 428         trim_name = talloc_strdup(talloc_tos(), name);
 429         if (trim_name == NULL) {
 430                 goto fail;
 431         }
 432         trim_char(trim_name, ' ', ' ');
 433
 434         trim_name_type = talloc_asprintf(trim_name, "%s#%2.2x", trim_name,
 435                                          name_type);
 436         if (trim_name_type == NULL) {
 437                 goto fail;
 438         }
 439
 440         retarget_parm = lp_parm_const_string(-1, "netbios retarget",
 441                                              trim_name_type, NULL);
 442         if (retarget_parm == NULL) {
 443                 retarget_parm = lp_parm_const_string(-1, "netbios retarget",
 444                                                      trim_name, NULL);
 445         }
 446         if (retarget_parm == NULL) {
 447                 goto fail;
 448         }
 449
 450         retarget = talloc_strdup(trim_name, retarget_parm);
 451         if (retarget == NULL) {
 452                 goto fail;
 453         }
 454
 455         DEBUG(10, ("retargeting %s to %s\n", trim_name_type, retarget));
 456
 457         p = strchr(retarget, ':');
 458         if (p != NULL) {
 459                 *p++ = '\0';
 460                 retarget_port = atoi(p);
 461         }
 462
 463         p = strchr_m(retarget, '#');
 464         if (p != NULL) {
 465                 *p++ = '\0';
 466                 sscanf(p, "%x", &retarget_type);
 467         }
 468
 469         ret = resolve_name(retarget, &retarget_addr, retarget_type);
 470         if (!ret) {
 471                 DEBUG(10, ("could not resolve %s\n", retarget));
 472                 goto fail;
 473         }
 474
 475         if (retarget_addr.ss_family != AF_INET) {
 476                 DEBUG(10, ("Retarget target not an IPv4 addr\n"));
 477                 goto fail;
 478         }
 479
 480         in_addr = (struct sockaddr_in *)&retarget_addr;
 481
 482         _smb_setlen(outbuf, 6);
 483         SCVAL(outbuf, 0, 0x84);
 484         *(uint32_t *)(outbuf+4) = in_addr->sin_addr.s_addr;
 485         *(uint16_t *)(outbuf+8) = htons(retarget_port);
 486
 487         if (!srv_send_smb(smbd_server_fd(), (char *)outbuf, false, 0, false,
 488                           NULL)) {
 489                 exit_server_cleanly("netbios_session_regarget: srv_send_smb "
 490                                     "failed.");
 491         }
 492
 493         ret = true;
 494  fail:
 495         TALLOC_FREE(trim_name);
 496         return ret;
 497 }
 498
 499 /****************************************************************************
 500  Reply to a (netbios-level) special message.
 501 ****************************************************************************/
 502
 503 void reply_special(char *inbuf)
 504 {
 505         int msg_type = CVAL(inbuf,0);
 506         int msg_flags = CVAL(inbuf,1);
 507         fstring name1,name2;
 508         char name_type1, name_type2;
 509
 510         /*
 511          * We only really use 4 bytes of the outbuf, but for the smb_setlen
 512          * calculation & friends (srv_send_smb uses that) we need the full smb
 513          * header.
 514          */
 515         char outbuf[smb_size];
 516
 517         *name1 = *name2 = 0;
 518
 519         memset(outbuf, '\0', sizeof(outbuf));
 520
 521         smb_setlen(outbuf,0);
 522
 523         switch (msg_type) {
 524         case 0x81: /* session request */
 525
 526                 if (already_got_session) {
 527                         exit_server_cleanly("multiple session request not permitted");
 528                 }
 529
 530                 SCVAL(outbuf,0,0x82);
 531                 SCVAL(outbuf,3,0);
 532                 if (name_len(inbuf+4) > 50 ||
 533                     name_len(inbuf+4 + name_len(inbuf + 4)) > 50) {
 534                         DEBUG(0,("Invalid name length in session request\n"));
 535                         return;
 536                 }
 537                 name_type1 = name_extract(inbuf,4,name1);
 538                 name_type2 = name_extract(inbuf,4 + name_len(inbuf + 4),name2);
 539                 DEBUG(2,("netbios connect: name1=%s0x%x name2=%s0x%x\n",
 540                          name1, name_type1, name2, name_type2));
 541
 542                 if (netbios_session_retarget(name1, name_type1)) {
 543                         exit_server_cleanly("retargeted client");
 544                 }
 545
 546                 set_local_machine_name(name1, True);
 547                 set_remote_machine_name(name2, True);
 548
 549                 DEBUG(2,("netbios connect: local=%s remote=%s, name type = %x\n",
 550                          get_local_machine_name(), get_remote_machine_name(),
 551                          name_type2));
 552
 553                 if (name_type2 == 'R') {
 554                         /* We are being asked for a pathworks session ---
 555                            no thanks! */
 556                         SCVAL(outbuf, 0,0x83);
 557                         break;
 558                 }
 559
 560                 /* only add the client's machine name to the list
 561                    of possibly valid usernames if we are operating
 562                    in share mode security */
 563                 if (lp_security() == SEC_SHARE) {
 564                         add_session_user(get_remote_machine_name());
 565                 }
 566
 567                 reload_services(True);
 568                 reopen_logs();
 569
 570                 already_got_session = True;
 571                 break;
 572
 573         case 0x89: /* session keepalive request
 574                       (some old clients produce this?) */
 575                 SCVAL(outbuf,0,SMBkeepalive);
 576                 SCVAL(outbuf,3,0);
 577                 break;
 578
 579         case 0x82: /* positive session response */
 580         case 0x83: /* negative session response */
 581         case 0x84: /* retarget session response */
 582                 DEBUG(0,("Unexpected session response\n"));
 583                 break;
 584
 585         case SMBkeepalive: /* session keepalive */
 586         default:
 587                 return;
 588         }
 589
 590         DEBUG(5,("init msg_type=0x%x msg_flags=0x%x\n",
 591                     msg_type, msg_flags));
 592
 593         srv_send_smb(smbd_server_fd(), outbuf, false, 0, false, NULL);
 594         return;
 595 }
 596
 597 /****************************************************************************
 598  Reply to a tcon.
 599  conn POINTER CAN BE NULL HERE !
 600 ****************************************************************************/
 601
 602 void reply_tcon(struct smb_request *req)
 603 {
 604         connection_struct *conn = req->conn;
 605         const char *service;
 606         char *service_buf = NULL;
 607         char *password = NULL;
 608         char *dev = NULL;
 609         int pwlen=0;
 610         NTSTATUS nt_status;
 611         const char *p;
 612         DATA_BLOB password_blob;
 613         TALLOC_CTX *ctx = talloc_tos();
 614
 615         START_PROFILE(SMBtcon);
 616
 617         if (req->buflen < 4) {
 618                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
 619                 END_PROFILE(SMBtcon);
 620                 return;
 621         }
 622
 623         p = (const char *)req->buf + 1;
 624         p += srvstr_pull_req_talloc(ctx, req, &service_buf, p, STR_TERMINATE);
 625         p += 1;
 626         pwlen = srvstr_pull_req_talloc(ctx, req, &password, p, STR_TERMINATE);
 627         p += pwlen+1;
 628         p += srvstr_pull_req_talloc(ctx, req, &dev, p, STR_TERMINATE);
 629         p += 1;
 630
 631         if (service_buf == NULL || password == NULL || dev == NULL) {
 632                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
 633                 END_PROFILE(SMBtcon);
 634                 return;
 635         }
 636         p = strrchr_m(service_buf,'\\');
 637         if (p) {
 638                 service = p+1;
 639         } else {
 640                 service = service_buf;
 641         }
 642
 643         password_blob = data_blob(password, pwlen+1);
 644
 645         conn = make_connection(service,password_blob,dev,req->vuid,&nt_status);
 646         req->conn = conn;
 647
 648         data_blob_clear_free(&password_blob);
 649
 650         if (!conn) {
 651                 reply_nterror(req, nt_status);
 652                 END_PROFILE(SMBtcon);
 653                 return;
 654         }
 655
 656         reply_outbuf(req, 2, 0);
 657         SSVAL(req->outbuf,smb_vwv0,max_recv);
 658         SSVAL(req->outbuf,smb_vwv1,conn->cnum);
 659         SSVAL(req->outbuf,smb_tid,conn->cnum);
 660
 661         DEBUG(3,("tcon service=%s cnum=%d\n",
 662                  service, conn->cnum));
 663
 664         END_PROFILE(SMBtcon);
 665         return;
 666 }
 667
 668 /****************************************************************************
 669  Reply to a tcon and X.
 670  conn POINTER CAN BE NULL HERE !
 671 ****************************************************************************/
 672
 673 void reply_tcon_and_X(struct smb_request *req)
 674 {
 675         connection_struct *conn = req->conn;
 676         const char *service = NULL;
 677         DATA_BLOB password;
 678         TALLOC_CTX *ctx = talloc_tos();
 679         /* what the cleint thinks the device is */
 680         char *client_devicetype = NULL;
 681         /* what the server tells the client the share represents */
 682         const char *server_devicetype;
 683         NTSTATUS nt_status;
 684         int passlen;
 685         char *path = NULL;
 686         const char *p, *q;
 687         uint16 tcon_flags;
 688
 689         START_PROFILE(SMBtconX);
 690
 691         if (req->wct < 4) {
 692                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
 693                 END_PROFILE(SMBtconX);
 694                 return;
 695         }
 696
 697         passlen = SVAL(req->vwv+3, 0);
 698         tcon_flags = SVAL(req->vwv+2, 0);
 699
 700         /* we might have to close an old one */
 701         if ((tcon_flags & 0x1) && conn) {
 702                 close_cnum(conn,req->vuid);
 703                 req->conn = NULL;
 704                 conn = NULL;
 705         }
 706
 707         if ((passlen > MAX_PASS_LEN) || (passlen >= req->buflen)) {
 708                 reply_doserror(req, ERRDOS, ERRbuftoosmall);
 709                 END_PROFILE(SMBtconX);
 710                 return;
 711         }
 712
 713         if (global_encrypted_passwords_negotiated) {
 714                 password = data_blob_talloc(talloc_tos(), req->buf, passlen);
 715                 if (lp_security() == SEC_SHARE) {
 716                         /*
 717                          * Security = share always has a pad byte
 718                          * after the password.
 719                          */
 720                         p = (const char *)req->buf + passlen + 1;
 721                 } else {
 722                         p = (const char *)req->buf + passlen;
 723                 }
 724         } else {
 725                 password = data_blob_talloc(talloc_tos(), req->buf, passlen+1);
 726                 /* Ensure correct termination */
 727                 password.data[passlen]=0;
 728                 p = (const char *)req->buf + passlen + 1;
 729         }
 730
 731         p += srvstr_pull_req_talloc(ctx, req, &path, p, STR_TERMINATE);
 732
 733         if (path == NULL) {
 734                 data_blob_clear_free(&password);
 735                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
 736                 END_PROFILE(SMBtconX);
 737                 return;
 738         }
 739
 740         /*
 741          * the service name can be either: \\server\share
 742          * or share directly like on the DELL PowerVault 705
 743          */
 744         if (*path=='\\') {
 745                 q = strchr_m(path+2,'\\');
 746                 if (!q) {
 747                         data_blob_clear_free(&password);
 748                         reply_doserror(req, ERRDOS, ERRnosuchshare);
 749                         END_PROFILE(SMBtconX);
 750                         return;
 751                 }
 752                 service = q+1;
 753         } else {
 754                 service = path;
 755         }
 756
 757         p += srvstr_pull_talloc(ctx, req->inbuf, req->flags2,
 758                                 &client_devicetype, p,
 759                                 MIN(6, smbreq_bufrem(req, p)), STR_ASCII);
 760
 761         if (client_devicetype == NULL) {
 762                 data_blob_clear_free(&password);
 763                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
 764                 END_PROFILE(SMBtconX);
 765                 return;
 766         }
 767
 768         DEBUG(4,("Client requested device type [%s] for share [%s]\n", client_devicetype, service));
 769
 770         conn = make_connection(service, password, client_devicetype,
 771                                req->vuid, &nt_status);
 772         req->conn =conn;
 773
 774         data_blob_clear_free(&password);
 775
 776         if (!conn) {
 777                 reply_nterror(req, nt_status);
 778                 END_PROFILE(SMBtconX);
 779                 return;
 780         }
 781
 782         if ( IS_IPC(conn) )
 783                 server_devicetype = "IPC";
 784         else if ( IS_PRINT(conn) )
 785                 server_devicetype = "LPT1:";
 786         else
 787                 server_devicetype = "A:";
 788
 789         if (Protocol < PROTOCOL_NT1) {
 790                 reply_outbuf(req, 2, 0);
 791                 if (message_push_string(&req->outbuf, server_devicetype,
 792                                         STR_TERMINATE|STR_ASCII) == -1) {
 793                         reply_nterror(req, NT_STATUS_NO_MEMORY);
 794                         END_PROFILE(SMBtconX);
 795                         return;
 796                 }
 797         } else {
 798                 /* NT sets the fstype of IPC$ to the null string */
 799                 const char *fstype = IS_IPC(conn) ? "" : lp_fstype(SNUM(conn));
 800
 801                 if (tcon_flags & TCONX_FLAG_EXTENDED_RESPONSE) {
 802                         /* Return permissions. */
 803                         uint32 perm1 = 0;
 804                         uint32 perm2 = 0;
 805
 806                         reply_outbuf(req, 7, 0);
 807
 808                         if (IS_IPC(conn)) {
 809                                 perm1 = FILE_ALL_ACCESS;
 810                                 perm2 = FILE_ALL_ACCESS;
 811                         } else {
 812                                 perm1 = CAN_WRITE(conn) ?
 813                                                 SHARE_ALL_ACCESS :
 814                                                 SHARE_READ_ONLY;
 815                         }
 816
 817                         SIVAL(req->outbuf, smb_vwv3, perm1);
 818                         SIVAL(req->outbuf, smb_vwv5, perm2);
 819                 } else {
 820                         reply_outbuf(req, 3, 0);
 821                 }
 822
 823                 if ((message_push_string(&req->outbuf, server_devicetype,
 824                                          STR_TERMINATE|STR_ASCII) == -1)
 825                     || (message_push_string(&req->outbuf, fstype,
 826                                             STR_TERMINATE) == -1)) {
 827                         reply_nterror(req, NT_STATUS_NO_MEMORY);
 828                         END_PROFILE(SMBtconX);
 829                         return;
 830                 }
 831
 832                 /* what does setting this bit do? It is set by NT4 and
 833                    may affect the ability to autorun mounted cdroms */
 834                 SSVAL(req->outbuf, smb_vwv2, SMB_SUPPORT_SEARCH_BITS|
 835                       (lp_csc_policy(SNUM(conn)) << 2));
 836
 837                 if (lp_msdfs_root(SNUM(conn)) && lp_host_msdfs()) {
 838                         DEBUG(2,("Serving %s as a Dfs root\n",
 839                                  lp_servicename(SNUM(conn)) ));
 840                         SSVAL(req->outbuf, smb_vwv2,
 841                               SMB_SHARE_IN_DFS | SVAL(req->outbuf, smb_vwv2));
 842                 }
 843         }
 844
 845
 846         DEBUG(3,("tconX service=%s \n",
 847                  service));
 848
 849         /* set the incoming and outgoing tid to the just created one */
 850         SSVAL(req->inbuf,smb_tid,conn->cnum);
 851         SSVAL(req->outbuf,smb_tid,conn->cnum);
 852
 853         END_PROFILE(SMBtconX);
 854
 855         chain_reply(req);
 856         return;
 857 }
 858
 859 /****************************************************************************
 860  Reply to an unknown type.
 861 ****************************************************************************/
 862
 863 void reply_unknown_new(struct smb_request *req, uint8 type)
 864 {
 865         DEBUG(0, ("unknown command type (%s): type=%d (0x%X)\n",
 866                   smb_fn_name(type), type, type));
 867         reply_doserror(req, ERRSRV, ERRunknownsmb);
 868         return;
 869 }
 870
 871 /****************************************************************************
 872  Reply to an ioctl.
 873  conn POINTER CAN BE NULL HERE !
 874 ****************************************************************************/
 875
 876 void reply_ioctl(struct smb_request *req)
 877 {
 878         connection_struct *conn = req->conn;
 879         uint16 device;
 880         uint16 function;
 881         uint32 ioctl_code;
 882         int replysize;
 883         char *p;
 884
 885         START_PROFILE(SMBioctl);
 886
 887         if (req->wct < 3) {
 888                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
 889                 END_PROFILE(SMBioctl);
 890                 return;
 891         }
 892
 893         device     = SVAL(req->vwv+1, 0);
 894         function   = SVAL(req->vwv+2, 0);
 895         ioctl_code = (device << 16) + function;
 896
 897         DEBUG(4, ("Received IOCTL (code 0x%x)\n", ioctl_code));
 898
 899         switch (ioctl_code) {
 900             case IOCTL_QUERY_JOB_INFO:
 901                     replysize = 32;
 902                     break;
 903             default:
 904                     reply_doserror(req, ERRSRV, ERRnosupport);
 905                     END_PROFILE(SMBioctl);
 906                     return;
 907         }
 908
 909         reply_outbuf(req, 8, replysize+1);
 910         SSVAL(req->outbuf,smb_vwv1,replysize); /* Total data bytes returned */
 911         SSVAL(req->outbuf,smb_vwv5,replysize); /* Data bytes this buffer */
 912         SSVAL(req->outbuf,smb_vwv6,52);        /* Offset to data */
 913         p = smb_buf(req->outbuf);
 914         memset(p, '\0', replysize+1); /* valgrind-safe. */
 915         p += 1;          /* Allow for alignment */
 916
 917         switch (ioctl_code) {
 918                 case IOCTL_QUERY_JOB_INFO:
 919                 {
 920                         files_struct *fsp = file_fsp(
 921                                 req, SVAL(req->vwv+0, 0));
 922                         if (!fsp) {
 923                                 reply_doserror(req, ERRDOS, ERRbadfid);
 924                                 END_PROFILE(SMBioctl);
 925                                 return;
 926                         }
 927                         SSVAL(p,0,fsp->rap_print_jobid);             /* Job number */
 928                         srvstr_push((char *)req->outbuf, req->flags2, p+2,
 929                                     global_myname(), 15,
 930                                     STR_TERMINATE|STR_ASCII);
 931                         if (conn) {
 932                                 srvstr_push((char *)req->outbuf, req->flags2,
 933                                             p+18, lp_servicename(SNUM(conn)),
 934                                             13, STR_TERMINATE|STR_ASCII);
 935                         } else {
 936                                 memset(p+18, 0, 13);
 937                         }
 938                         break;
 939                 }
 940         }
 941
 942         END_PROFILE(SMBioctl);
 943         return;
 944 }
 945
 946 /****************************************************************************
 947  Strange checkpath NTSTATUS mapping.
 948 ****************************************************************************/
 949
 950 static NTSTATUS map_checkpath_error(uint16_t flags2, NTSTATUS status)
 951 {
 952         /* Strange DOS error code semantics only for checkpath... */
 953         if (!(flags2 & FLAGS2_32_BIT_ERROR_CODES)) {
 954                 if (NT_STATUS_EQUAL(NT_STATUS_OBJECT_NAME_INVALID,status)) {
 955                         /* We need to map to ERRbadpath */
 956                         return NT_STATUS_OBJECT_PATH_NOT_FOUND;
 957                 }
 958         }
 959         return status;
 960 }
 961
 962 /****************************************************************************
 963  Reply to a checkpath.
 964 ****************************************************************************/
 965
 966 void reply_checkpath(struct smb_request *req)
 967 {
 968         connection_struct *conn = req->conn;
 969         char *name = NULL;
 970         SMB_STRUCT_STAT sbuf;
 971         NTSTATUS status;
 972         TALLOC_CTX *ctx = talloc_tos();
 973
 974         START_PROFILE(SMBcheckpath);
 975
 976         srvstr_get_path_req(ctx, req, &name, (const char *)req->buf + 1,
 977                             STR_TERMINATE, &status);
 978
 979         if (!NT_STATUS_IS_OK(status)) {
 980                 status = map_checkpath_error(req->flags2, status);
 981                 reply_nterror(req, status);
 982                 END_PROFILE(SMBcheckpath);
 983                 return;
 984         }
 985
 986         status = resolve_dfspath(ctx, conn,
 987                         req->flags2 & FLAGS2_DFS_PATHNAMES,
 988                         name,
 989                         &name);
 990         if (!NT_STATUS_IS_OK(status)) {
 991                 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
 992                         reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
 993                                         ERRSRV, ERRbadpath);
 994                         END_PROFILE(SMBcheckpath);
 995                         return;
 996                 }
 997                 goto path_err;
 998         }
 999
1000         DEBUG(3,("reply_checkpath %s mode=%d\n", name, (int)SVAL(req->vwv+0, 0)));
1001
1002         status = unix_convert(ctx, conn, name, False, &name, NULL, &sbuf);
1003         if (!NT_STATUS_IS_OK(status)) {
1004                 goto path_err;
1005         }
1006
1007         status = check_name(conn, name);
1008         if (!NT_STATUS_IS_OK(status)) {
1009                 DEBUG(3,("reply_checkpath: check_name of %s failed (%s)\n",name,nt_errstr(status)));
1010                 goto path_err;
1011         }
1012
1013         if (!VALID_STAT(sbuf) && (SMB_VFS_STAT(conn,name,&sbuf) != 0)) {
1014                 DEBUG(3,("reply_checkpath: stat of %s failed (%s)\n",name,strerror(errno)));
1015                 status = map_nt_error_from_unix(errno);
1016                 goto path_err;
1017         }
1018
1019         if (!S_ISDIR(sbuf.st_mode)) {
1020                 reply_botherror(req, NT_STATUS_NOT_A_DIRECTORY,
1021                                 ERRDOS, ERRbadpath);
1022                 END_PROFILE(SMBcheckpath);
1023                 return;
1024         }
1025
1026         reply_outbuf(req, 0, 0);
1027
1028         END_PROFILE(SMBcheckpath);
1029         return;
1030
1031   path_err:
1032
1033         END_PROFILE(SMBcheckpath);
1034
1035         /* We special case this - as when a Windows machine
1036                 is parsing a path is steps through the components
1037                 one at a time - if a component fails it expects
1038                 ERRbadpath, not ERRbadfile.
1039         */
1040         status = map_checkpath_error(req->flags2, status);
1041         if (NT_STATUS_EQUAL(status, NT_STATUS_OBJECT_NAME_NOT_FOUND)) {
1042                 /*
1043                  * Windows returns different error codes if
1044                  * the parent directory is valid but not the
1045                  * last component - it returns NT_STATUS_OBJECT_NAME_NOT_FOUND
1046                  * for that case and NT_STATUS_OBJECT_PATH_NOT_FOUND
1047                  * if the path is invalid.
1048                  */
1049                 reply_botherror(req, NT_STATUS_OBJECT_NAME_NOT_FOUND,
1050                                 ERRDOS, ERRbadpath);
1051                 return;
1052         }
1053
1054         reply_nterror(req, status);
1055 }
1056
1057 /****************************************************************************
1058  Reply to a getatr.
1059 ****************************************************************************/
1060
1061 void reply_getatr(struct smb_request *req)
1062 {
1063         connection_struct *conn = req->conn;
1064         char *fname = NULL;
1065         SMB_STRUCT_STAT sbuf;
1066         int mode=0;
1067         SMB_OFF_T size=0;
1068         time_t mtime=0;
1069         const char *p;
1070         NTSTATUS status;
1071         TALLOC_CTX *ctx = talloc_tos();
1072
1073         START_PROFILE(SMBgetatr);
1074
1075         p = (const char *)req->buf + 1;
1076         p += srvstr_get_path_req(ctx, req, &fname, p, STR_TERMINATE, &status);
1077         if (!NT_STATUS_IS_OK(status)) {
1078                 reply_nterror(req, status);
1079                 END_PROFILE(SMBgetatr);
1080                 return;
1081         }
1082
1083         status = resolve_dfspath(ctx, conn,
1084                                 req->flags2 & FLAGS2_DFS_PATHNAMES,
1085                                 fname,
1086                                 &fname);
1087         if (!NT_STATUS_IS_OK(status)) {
1088                 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
1089                         reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
1090                                         ERRSRV, ERRbadpath);
1091                         END_PROFILE(SMBgetatr);
1092                         return;
1093                 }
1094                 reply_nterror(req, status);
1095                 END_PROFILE(SMBgetatr);
1096                 return;
1097         }
1098
1099         /* dos smetimes asks for a stat of "" - it returns a "hidden directory"
1100                 under WfWg - weird! */
1101         if (*fname == '\0') {
1102                 mode = aHIDDEN | aDIR;
1103                 if (!CAN_WRITE(conn)) {
1104                         mode |= aRONLY;
1105                 }
1106                 size = 0;
1107                 mtime = 0;
1108         } else {
1109                 status = unix_convert(ctx, conn, fname, False, &fname, NULL,&sbuf);
1110                 if (!NT_STATUS_IS_OK(status)) {
1111                         reply_nterror(req, status);
1112                         END_PROFILE(SMBgetatr);
1113                         return;
1114                 }
1115                 status = check_name(conn, fname);
1116                 if (!NT_STATUS_IS_OK(status)) {
1117                         DEBUG(3,("reply_getatr: check_name of %s failed (%s)\n",fname,nt_errstr(status)));
1118                         reply_nterror(req, status);
1119                         END_PROFILE(SMBgetatr);
1120                         return;
1121                 }
1122                 if (!VALID_STAT(sbuf) && (SMB_VFS_STAT(conn,fname,&sbuf) != 0)) {
1123                         DEBUG(3,("reply_getatr: stat of %s failed (%s)\n",fname,strerror(errno)));
1124                         reply_unixerror(req, ERRDOS,ERRbadfile);
1125                         END_PROFILE(SMBgetatr);
1126                         return;
1127                 }
1128
1129                 mode = dos_mode(conn,fname,&sbuf);
1130                 size = sbuf.st_size;
1131                 mtime = sbuf.st_mtime;
1132                 if (mode & aDIR) {
1133                         size = 0;
1134                 }
1135         }
1136
1137         reply_outbuf(req, 10, 0);
1138
1139         SSVAL(req->outbuf,smb_vwv0,mode);
1140         if(lp_dos_filetime_resolution(SNUM(conn)) ) {
1141                 srv_put_dos_date3((char *)req->outbuf,smb_vwv1,mtime & ~1);
1142         } else {
1143                 srv_put_dos_date3((char *)req->outbuf,smb_vwv1,mtime);
1144         }
1145         SIVAL(req->outbuf,smb_vwv3,(uint32)size);
1146
1147         if (Protocol >= PROTOCOL_NT1) {
1148                 SSVAL(req->outbuf, smb_flg2,
1149                       SVAL(req->outbuf, smb_flg2) | FLAGS2_IS_LONG_NAME);
1150         }
1151
1152         DEBUG(3,("reply_getatr: name=%s mode=%d size=%u\n", fname, mode, (unsigned int)size ) );
1153
1154         END_PROFILE(SMBgetatr);
1155         return;
1156 }
1157
1158 /****************************************************************************
1159  Reply to a setatr.
1160 ****************************************************************************/
1161
1162 void reply_setatr(struct smb_request *req)
1163 {
1164         struct smb_file_time ft;
1165         connection_struct *conn = req->conn;
1166         char *fname = NULL;
1167         int mode;
1168         time_t mtime;
1169         SMB_STRUCT_STAT sbuf;
1170         const char *p;
1171         NTSTATUS status;
1172         TALLOC_CTX *ctx = talloc_tos();
1173
1174         START_PROFILE(SMBsetatr);
1175
1176         ZERO_STRUCT(ft);
1177
1178         if (req->wct < 2) {
1179                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
1180                 return;
1181         }
1182
1183         p = (const char *)req->buf + 1;
1184         p += srvstr_get_path_req(ctx, req, &fname, p, STR_TERMINATE, &status);
1185         if (!NT_STATUS_IS_OK(status)) {
1186                 reply_nterror(req, status);
1187                 END_PROFILE(SMBsetatr);
1188                 return;
1189         }
1190
1191         status = resolve_dfspath(ctx, conn,
1192                                 req->flags2 & FLAGS2_DFS_PATHNAMES,
1193                                 fname,
1194                                 &fname);
1195         if (!NT_STATUS_IS_OK(status)) {
1196                 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
1197                         reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
1198                                         ERRSRV, ERRbadpath);
1199                         END_PROFILE(SMBsetatr);
1200                         return;
1201                 }
1202                 reply_nterror(req, status);
1203                 END_PROFILE(SMBsetatr);
1204                 return;
1205         }
1206
1207         status = unix_convert(ctx, conn, fname, False, &fname, NULL, &sbuf);
1208         if (!NT_STATUS_IS_OK(status)) {
1209                 reply_nterror(req, status);
1210                 END_PROFILE(SMBsetatr);
1211                 return;
1212         }
1213
1214         status = check_name(conn, fname);
1215         if (!NT_STATUS_IS_OK(status)) {
1216                 reply_nterror(req, status);
1217                 END_PROFILE(SMBsetatr);
1218                 return;
1219         }
1220
1221         if (fname[0] == '.' && fname[1] == '\0') {
1222                 /*
1223                  * Not sure here is the right place to catch this
1224                  * condition. Might be moved to somewhere else later -- vl
1225                  */
1226                 reply_nterror(req, NT_STATUS_ACCESS_DENIED);
1227                 END_PROFILE(SMBsetatr);
1228                 return;
1229         }
1230
1231         mode = SVAL(req->vwv+0, 0);
1232         mtime = srv_make_unix_date3(req->vwv+1);
1233
1234         ft.mtime = convert_time_t_to_timespec(mtime);
1235         status = smb_set_file_time(conn, NULL, fname,
1236                                    &sbuf, &ft, true);
1237         if (!NT_STATUS_IS_OK(status)) {
1238                 reply_unixerror(req, ERRDOS, ERRnoaccess);
1239                 END_PROFILE(SMBsetatr);
1240                 return;
1241         }
1242
1243         if (mode != FILE_ATTRIBUTE_NORMAL) {
1244                 if (VALID_STAT_OF_DIR(sbuf))
1245                         mode |= aDIR;
1246                 else
1247                         mode &= ~aDIR;
1248
1249                 if (file_set_dosmode(conn,fname,mode,&sbuf,NULL,false) != 0) {
1250                         reply_unixerror(req, ERRDOS, ERRnoaccess);
1251                         END_PROFILE(SMBsetatr);
1252                         return;
1253                 }
1254         }
1255
1256         reply_outbuf(req, 0, 0);
1257
1258         DEBUG( 3, ( "setatr name=%s mode=%d\n", fname, mode ) );
1259
1260         END_PROFILE(SMBsetatr);
1261         return;
1262 }
1263
1264 /****************************************************************************
1265  Reply to a dskattr.
1266 ****************************************************************************/
1267
1268 void reply_dskattr(struct smb_request *req)
1269 {
1270         connection_struct *conn = req->conn;
1271         uint64_t dfree,dsize,bsize;
1272         START_PROFILE(SMBdskattr);
1273
1274         if (get_dfree_info(conn,".",True,&bsize,&dfree,&dsize) == (uint64_t)-1) {
1275                 reply_unixerror(req, ERRHRD, ERRgeneral);
1276                 END_PROFILE(SMBdskattr);
1277                 return;
1278         }
1279
1280         reply_outbuf(req, 5, 0);
1281
1282         if (Protocol <= PROTOCOL_LANMAN2) {
1283                 double total_space, free_space;
1284                 /* we need to scale this to a number that DOS6 can handle. We
1285                    use floating point so we can handle large drives on systems
1286                    that don't have 64 bit integers
1287
1288                    we end up displaying a maximum of 2G to DOS systems
1289                 */
1290                 total_space = dsize * (double)bsize;
1291                 free_space = dfree * (double)bsize;
1292
1293                 dsize = (uint64_t)((total_space+63*512) / (64*512));
1294                 dfree = (uint64_t)((free_space+63*512) / (64*512));
1295
1296                 if (dsize > 0xFFFF) dsize = 0xFFFF;
1297                 if (dfree > 0xFFFF) dfree = 0xFFFF;
1298
1299                 SSVAL(req->outbuf,smb_vwv0,dsize);
1300                 SSVAL(req->outbuf,smb_vwv1,64); /* this must be 64 for dos systems */
1301                 SSVAL(req->outbuf,smb_vwv2,512); /* and this must be 512 */
1302                 SSVAL(req->outbuf,smb_vwv3,dfree);
1303         } else {
1304                 SSVAL(req->outbuf,smb_vwv0,dsize);
1305                 SSVAL(req->outbuf,smb_vwv1,bsize/512);
1306                 SSVAL(req->outbuf,smb_vwv2,512);
1307                 SSVAL(req->outbuf,smb_vwv3,dfree);
1308         }
1309
1310         DEBUG(3,("dskattr dfree=%d\n", (unsigned int)dfree));
1311
1312         END_PROFILE(SMBdskattr);
1313         return;
1314 }
1315
1316 /****************************************************************************
1317  Reply to a search.
1318  Can be called from SMBsearch, SMBffirst or SMBfunique.
1319 ****************************************************************************/
1320
1321 void reply_search(struct smb_request *req)
1322 {
1323         connection_struct *conn = req->conn;
1324         const char *mask = NULL;
1325         char *directory = NULL;
1326         char *fname = NULL;
1327         SMB_OFF_T size;
1328         uint32 mode;
1329         time_t date;
1330         uint32 dirtype;
1331         unsigned int numentries = 0;
1332         unsigned int maxentries = 0;
1333         bool finished = False;
1334         const char *p;
1335         int status_len;
1336         char *path = NULL;
1337         char status[21];
1338         int dptr_num= -1;
1339         bool check_descend = False;
1340         bool expect_close = False;
1341         NTSTATUS nt_status;
1342         bool mask_contains_wcard = False;
1343         bool allow_long_path_components = (req->flags2 & FLAGS2_LONG_PATH_COMPONENTS) ? True : False;
1344         TALLOC_CTX *ctx = talloc_tos();
1345         bool ask_sharemode = lp_parm_bool(SNUM(conn), "smbd", "search ask sharemode", true);
1346
1347         START_PROFILE(SMBsearch);
1348
1349         if (req->wct < 2) {
1350                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
1351                 END_PROFILE(SMBsearch);
1352                 return;
1353         }
1354
1355         if (lp_posix_pathnames()) {
1356                 reply_unknown_new(req, req->cmd);
1357                 END_PROFILE(SMBsearch);
1358                 return;
1359         }
1360
1361         /* If we were called as SMBffirst then we must expect close. */
1362         if(req->cmd == SMBffirst) {
1363                 expect_close = True;
1364         }
1365
1366         reply_outbuf(req, 1, 3);
1367         maxentries = SVAL(req->vwv+0, 0);
1368         dirtype = SVAL(req->vwv+1, 0);
1369         p = (const char *)req->buf + 1;
1370         p += srvstr_get_path_req_wcard(ctx, req, &path, p, STR_TERMINATE,
1371                                        &nt_status, &mask_contains_wcard);
1372         if (!NT_STATUS_IS_OK(nt_status)) {
1373                 reply_nterror(req, nt_status);
1374                 END_PROFILE(SMBsearch);
1375                 return;
1376         }
1377
1378         nt_status = resolve_dfspath_wcard(ctx, conn,
1379                                           req->flags2 & FLAGS2_DFS_PATHNAMES,
1380                                           path,
1381                                           &path,
1382                                           &mask_contains_wcard);
1383         if (!NT_STATUS_IS_OK(nt_status)) {
1384                 if (NT_STATUS_EQUAL(nt_status,NT_STATUS_PATH_NOT_COVERED)) {
1385                         reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
1386                                         ERRSRV, ERRbadpath);
1387                         END_PROFILE(SMBsearch);
1388                         return;
1389                 }
1390                 reply_nterror(req, nt_status);
1391                 END_PROFILE(SMBsearch);
1392                 return;
1393         }
1394
1395         p++;
1396         status_len = SVAL(p, 0);
1397         p += 2;
1398
1399         /* dirtype &= ~aDIR; */
1400
1401         if (status_len == 0) {
1402                 SMB_STRUCT_STAT sbuf;
1403
1404                 nt_status = unix_convert(ctx, conn, path, True,
1405                                 &directory, NULL, &sbuf);
1406                 if (!NT_STATUS_IS_OK(nt_status)) {
1407                         reply_nterror(req, nt_status);
1408                         END_PROFILE(SMBsearch);
1409                         return;
1410                 }
1411
1412                 nt_status = check_name(conn, directory);
1413                 if (!NT_STATUS_IS_OK(nt_status)) {
1414                         reply_nterror(req, nt_status);
1415                         END_PROFILE(SMBsearch);
1416                         return;
1417                 }
1418
1419                 p = strrchr_m(directory,'/');
1420                 if ((p != NULL) && (*directory != '/')) {
1421                         mask = p + 1;
1422                         directory = talloc_strndup(ctx, directory,
1423                                                    PTR_DIFF(p, directory));
1424                 } else {
1425                         mask = directory;
1426                         directory = talloc_strdup(ctx,".");
1427                 }
1428
1429                 if (!directory) {
1430                         reply_nterror(req, NT_STATUS_NO_MEMORY);
1431                         END_PROFILE(SMBsearch);
1432                         return;
1433                 }
1434
1435                 memset((char *)status,'\0',21);
1436                 SCVAL(status,0,(dirtype & 0x1F));
1437
1438                 nt_status = dptr_create(conn,
1439                                         directory,
1440                                         True,
1441                                         expect_close,
1442                                         req->smbpid,
1443                                         mask,
1444                                         mask_contains_wcard,
1445                                         dirtype,
1446                                         &conn->dirptr);
1447                 if (!NT_STATUS_IS_OK(nt_status)) {
1448                         reply_nterror(req, nt_status);
1449                         END_PROFILE(SMBsearch);
1450                         return;
1451                 }
1452                 dptr_num = dptr_dnum(conn->dirptr);
1453         } else {
1454                 int status_dirtype;
1455
1456                 memcpy(status,p,21);
1457                 status_dirtype = CVAL(status,0) & 0x1F;
1458                 if (status_dirtype != (dirtype & 0x1F)) {
1459                         dirtype = status_dirtype;
1460                 }
1461
1462                 conn->dirptr = dptr_fetch(status+12,&dptr_num);
1463                 if (!conn->dirptr) {
1464                         goto SearchEmpty;
1465                 }
1466                 string_set(&conn->dirpath,dptr_path(dptr_num));
1467                 mask = dptr_wcard(dptr_num);
1468                 if (!mask) {
1469                         goto SearchEmpty;
1470                 }
1471                 /*
1472                  * For a 'continue' search we have no string. So
1473                  * check from the initial saved string.
1474                  */
1475                 mask_contains_wcard = ms_has_wild(mask);
1476                 dirtype = dptr_attr(dptr_num);
1477         }
1478
1479         DEBUG(4,("dptr_num is %d\n",dptr_num));
1480
1481         /* Initialize per SMBsearch/SMBffirst/SMBfunique operation data */
1482         dptr_init_search_op(conn->dirptr);
1483
1484         if ((dirtype&0x1F) == aVOLID) {
1485                 char buf[DIR_STRUCT_SIZE];
1486                 memcpy(buf,status,21);
1487                 if (!make_dir_struct(ctx,buf,"???????????",volume_label(SNUM(conn)),
1488                                 0,aVOLID,0,!allow_long_path_components)) {
1489                         reply_nterror(req, NT_STATUS_NO_MEMORY);
1490                         END_PROFILE(SMBsearch);
1491                         return;
1492                 }
1493                 dptr_fill(buf+12,dptr_num);
1494                 if (dptr_zero(buf+12) && (status_len==0)) {
1495                         numentries = 1;
1496                 } else {
1497                         numentries = 0;
1498                 }
1499                 if (message_push_blob(&req->outbuf,
1500                                       data_blob_const(buf, sizeof(buf)))
1501                     == -1) {
1502                         reply_nterror(req, NT_STATUS_NO_MEMORY);
1503                         END_PROFILE(SMBsearch);
1504                         return;
1505                 }
1506         } else {
1507                 unsigned int i;
1508                 maxentries = MIN(
1509                         maxentries,
1510                         ((BUFFER_SIZE -
1511                           ((uint8 *)smb_buf(req->outbuf) + 3 - req->outbuf))
1512                          /DIR_STRUCT_SIZE));
1513
1514                 DEBUG(8,("dirpath=<%s> dontdescend=<%s>\n",
1515                         conn->dirpath,lp_dontdescend(SNUM(conn))));
1516                 if (in_list(conn->dirpath, lp_dontdescend(SNUM(conn)),True)) {
1517                         check_descend = True;
1518                 }
1519
1520                 for (i=numentries;(i<maxentries) && !finished;i++) {
1521                         finished = !get_dir_entry(ctx,
1522                                                   conn,
1523                                                   mask,
1524                                                   dirtype,
1525                                                   &fname,
1526                                                   &size,
1527                                                   &mode,
1528                                                   &date,
1529                                                   check_descend,
1530                                                   ask_sharemode);
1531                         if (!finished) {
1532                                 char buf[DIR_STRUCT_SIZE];
1533                                 memcpy(buf,status,21);
1534                                 if (!make_dir_struct(ctx,
1535                                                 buf,
1536                                                 mask,
1537                                                 fname,
1538                                                 size,
1539                                                 mode,
1540                                                 date,
1541                                                 !allow_long_path_components)) {
1542                                         reply_nterror(req, NT_STATUS_NO_MEMORY);
1543                                         END_PROFILE(SMBsearch);
1544                                         return;
1545                                 }
1546                                 if (!dptr_fill(buf+12,dptr_num)) {
1547                                         break;
1548                                 }
1549                                 if (message_push_blob(&req->outbuf,
1550                                                       data_blob_const(buf, sizeof(buf)))
1551                                     == -1) {
1552                                         reply_nterror(req, NT_STATUS_NO_MEMORY);
1553                                         END_PROFILE(SMBsearch);
1554                                         return;
1555                                 }
1556                                 numentries++;
1557                         }
1558                 }
1559         }
1560
1561   SearchEmpty:
1562
1563         /* If we were called as SMBffirst with smb_search_id == NULL
1564                 and no entries were found then return error and close dirptr
1565                 (X/Open spec) */
1566
1567         if (numentries == 0) {
1568                 dptr_close(&dptr_num);
1569         } else if(expect_close && status_len == 0) {
1570                 /* Close the dptr - we know it's gone */
1571                 dptr_close(&dptr_num);
1572         }
1573
1574         /* If we were called as SMBfunique, then we can close the dirptr now ! */
1575         if(dptr_num >= 0 && req->cmd == SMBfunique) {
1576                 dptr_close(&dptr_num);
1577         }
1578
1579         if ((numentries == 0) && !mask_contains_wcard) {
1580                 reply_botherror(req, STATUS_NO_MORE_FILES, ERRDOS, ERRnofiles);
1581                 END_PROFILE(SMBsearch);
1582                 return;
1583         }
1584
1585         SSVAL(req->outbuf,smb_vwv0,numentries);
1586         SSVAL(req->outbuf,smb_vwv1,3 + numentries * DIR_STRUCT_SIZE);
1587         SCVAL(smb_buf(req->outbuf),0,5);
1588         SSVAL(smb_buf(req->outbuf),1,numentries*DIR_STRUCT_SIZE);
1589
1590         /* The replies here are never long name. */
1591         SSVAL(req->outbuf, smb_flg2,
1592               SVAL(req->outbuf, smb_flg2) & (~FLAGS2_IS_LONG_NAME));
1593         if (!allow_long_path_components) {
1594                 SSVAL(req->outbuf, smb_flg2,
1595                       SVAL(req->outbuf, smb_flg2)
1596                       & (~FLAGS2_LONG_PATH_COMPONENTS));
1597         }
1598
1599         /* This SMB *always* returns ASCII names. Remove the unicode bit in flags2. */
1600         SSVAL(req->outbuf, smb_flg2,
1601               (SVAL(req->outbuf, smb_flg2) & (~FLAGS2_UNICODE_STRINGS)));
1602
1603         if (!directory) {
1604                 directory = dptr_path(dptr_num);
1605         }
1606
1607         DEBUG(4,("%s mask=%s path=%s dtype=%d nument=%u of %u\n",
1608                 smb_fn_name(req->cmd),
1609                 mask,
1610                 directory ? directory : "./",
1611                 dirtype,
1612                 numentries,
1613                 maxentries ));
1614
1615         END_PROFILE(SMBsearch);
1616         return;
1617 }
1618
1619 /****************************************************************************
1620  Reply to a fclose (stop directory search).
1621 ****************************************************************************/
1622
1623 void reply_fclose(struct smb_request *req)
1624 {
1625         int status_len;
1626         char status[21];
1627         int dptr_num= -2;
1628         const char *p;
1629         char *path = NULL;
1630         NTSTATUS err;
1631         bool path_contains_wcard = False;
1632         TALLOC_CTX *ctx = talloc_tos();
1633
1634         START_PROFILE(SMBfclose);
1635
1636         if (lp_posix_pathnames()) {
1637                 reply_unknown_new(req, req->cmd);
1638                 END_PROFILE(SMBfclose);
1639                 return;
1640         }
1641
1642         p = (const char *)req->buf + 1;
1643         p += srvstr_get_path_req_wcard(ctx, req, &path, p, STR_TERMINATE,
1644                                        &err, &path_contains_wcard);
1645         if (!NT_STATUS_IS_OK(err)) {
1646                 reply_nterror(req, err);
1647                 END_PROFILE(SMBfclose);
1648                 return;
1649         }
1650         p++;
1651         status_len = SVAL(p,0);
1652         p += 2;
1653
1654         if (status_len == 0) {
1655                 reply_doserror(req, ERRSRV, ERRsrverror);
1656                 END_PROFILE(SMBfclose);
1657                 return;
1658         }
1659
1660         memcpy(status,p,21);
1661
1662         if(dptr_fetch(status+12,&dptr_num)) {
1663                 /*  Close the dptr - we know it's gone */
1664                 dptr_close(&dptr_num);
1665         }
1666
1667         reply_outbuf(req, 1, 0);
1668         SSVAL(req->outbuf,smb_vwv0,0);
1669
1670         DEBUG(3,("search close\n"));
1671
1672         END_PROFILE(SMBfclose);
1673         return;
1674 }
1675
1676 /****************************************************************************
1677  Reply to an open.
1678 ****************************************************************************/
1679
1680 void reply_open(struct smb_request *req)
1681 {
1682         connection_struct *conn = req->conn;
1683         char *fname = NULL;
1684         uint32 fattr=0;
1685         SMB_OFF_T size = 0;
1686         time_t mtime=0;
1687         int info;
1688         SMB_STRUCT_STAT sbuf;
1689         files_struct *fsp;
1690         int oplock_request;
1691         int deny_mode;
1692         uint32 dos_attr;
1693         uint32 access_mask;
1694         uint32 share_mode;
1695         uint32 create_disposition;
1696         uint32 create_options = 0;
1697         NTSTATUS status;
1698         TALLOC_CTX *ctx = talloc_tos();
1699
1700         START_PROFILE(SMBopen);
1701
1702         SET_STAT_INVALID(sbuf);
1703
1704         if (req->wct < 2) {
1705                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
1706                 END_PROFILE(SMBopen);
1707                 return;
1708         }
1709
1710         oplock_request = CORE_OPLOCK_REQUEST(req->inbuf);
1711         deny_mode = SVAL(req->vwv+0, 0);
1712         dos_attr = SVAL(req->vwv+1, 0);
1713
1714         srvstr_get_path_req(ctx, req, &fname, (const char *)req->buf+1,
1715                             STR_TERMINATE, &status);
1716         if (!NT_STATUS_IS_OK(status)) {
1717                 reply_nterror(req, status);
1718                 END_PROFILE(SMBopen);
1719                 return;
1720         }
1721
1722         if (!map_open_params_to_ntcreate(
1723                     fname, deny_mode, OPENX_FILE_EXISTS_OPEN, &access_mask,
1724                     &share_mode, &create_disposition, &create_options)) {
1725                 reply_nterror(req, NT_STATUS_DOS(ERRDOS, ERRbadaccess));
1726                 END_PROFILE(SMBopen);
1727                 return;
1728         }
1729
1730         status = SMB_VFS_CREATE_FILE(
1731                 conn,                                   /* conn */
1732                 req,                                    /* req */
1733                 0,                                      /* root_dir_fid */
1734                 fname,                                  /* fname */
1735                 CFF_DOS_PATH,                           /* create_file_flags */
1736                 access_mask,                            /* access_mask */
1737                 share_mode,                             /* share_access */
1738                 create_disposition,                     /* create_disposition*/
1739                 create_options,                         /* create_options */
1740                 dos_attr,                               /* file_attributes */
1741                 oplock_request,                         /* oplock_request */
1742                 0,                                      /* allocation_size */
1743                 NULL,                                   /* sd */
1744                 NULL,                                   /* ea_list */
1745                 &fsp,                                   /* result */
1746                 &info,                                  /* pinfo */
1747                 &sbuf);                                 /* psbuf */
1748
1749         if (!NT_STATUS_IS_OK(status)) {
1750                 if (open_was_deferred(req->mid)) {
1751                         /* We have re-scheduled this call. */
1752                         END_PROFILE(SMBopen);
1753                         return;
1754                 }
1755                 reply_openerror(req, status);
1756                 END_PROFILE(SMBopen);
1757                 return;
1758         }
1759
1760         size = sbuf.st_size;
1761         fattr = dos_mode(conn,fsp->fsp_name,&sbuf);
1762         mtime = sbuf.st_mtime;
1763
1764         if (fattr & aDIR) {
1765                 DEBUG(3,("attempt to open a directory %s\n",fsp->fsp_name));
1766                 close_file(req, fsp, ERROR_CLOSE);
1767                 reply_doserror(req, ERRDOS,ERRnoaccess);
1768                 END_PROFILE(SMBopen);
1769                 return;
1770         }
1771
1772         reply_outbuf(req, 7, 0);
1773         SSVAL(req->outbuf,smb_vwv0,fsp->fnum);
1774         SSVAL(req->outbuf,smb_vwv1,fattr);
1775         if(lp_dos_filetime_resolution(SNUM(conn)) ) {
1776                 srv_put_dos_date3((char *)req->outbuf,smb_vwv2,mtime & ~1);
1777         } else {
1778                 srv_put_dos_date3((char *)req->outbuf,smb_vwv2,mtime);
1779         }
1780         SIVAL(req->outbuf,smb_vwv4,(uint32)size);
1781         SSVAL(req->outbuf,smb_vwv6,deny_mode);
1782
1783         if (oplock_request && lp_fake_oplocks(SNUM(conn))) {
1784                 SCVAL(req->outbuf,smb_flg,
1785                       CVAL(req->outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
1786         }
1787
1788         if(EXCLUSIVE_OPLOCK_TYPE(fsp->oplock_type)) {
1789                 SCVAL(req->outbuf,smb_flg,
1790                       CVAL(req->outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
1791         }
1792         END_PROFILE(SMBopen);
1793         return;
1794 }
1795
1796 /****************************************************************************
1797  Reply to an open and X.
1798 ****************************************************************************/
1799
1800 void reply_open_and_X(struct smb_request *req)
1801 {
1802         connection_struct *conn = req->conn;
1803         char *fname = NULL;
1804         uint16 open_flags;
1805         int deny_mode;
1806         uint32 smb_attr;
1807         /* Breakout the oplock request bits so we can set the
1808                 reply bits separately. */
1809         int ex_oplock_request;
1810         int core_oplock_request;
1811         int oplock_request;
1812 #if 0
1813         int smb_sattr = SVAL(req->vwv+4, 0);
1814         uint32 smb_time = make_unix_date3(req->vwv+6);
1815 #endif
1816         int smb_ofun;
1817         uint32 fattr=0;
1818         int mtime=0;
1819         SMB_STRUCT_STAT sbuf;
1820         int smb_action = 0;
1821         files_struct *fsp;
1822         NTSTATUS status;
1823         uint64_t allocation_size;
1824         ssize_t retval = -1;
1825         uint32 access_mask;
1826         uint32 share_mode;
1827         uint32 create_disposition;
1828         uint32 create_options = 0;
1829         TALLOC_CTX *ctx = talloc_tos();
1830
1831         START_PROFILE(SMBopenX);
1832
1833         if (req->wct < 15) {
1834                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
1835                 END_PROFILE(SMBopenX);
1836                 return;
1837         }
1838
1839         SET_STAT_INVALID(sbuf);
1840
1841         open_flags = SVAL(req->vwv+2, 0);
1842         deny_mode = SVAL(req->vwv+3, 0);
1843         smb_attr = SVAL(req->vwv+5, 0);
1844         ex_oplock_request = EXTENDED_OPLOCK_REQUEST(req->inbuf);
1845         core_oplock_request = CORE_OPLOCK_REQUEST(req->inbuf);
1846         oplock_request = ex_oplock_request | core_oplock_request;
1847         smb_ofun = SVAL(req->vwv+8, 0);
1848         allocation_size = (uint64_t)IVAL(req->vwv+9, 0);
1849
1850         /* If it's an IPC, pass off the pipe handler. */
1851         if (IS_IPC(conn)) {
1852                 if (lp_nt_pipe_support()) {
1853                         reply_open_pipe_and_X(conn, req);
1854                 } else {
1855                         reply_doserror(req, ERRSRV, ERRaccess);
1856                 }
1857                 END_PROFILE(SMBopenX);
1858                 return;
1859         }
1860
1861         /* XXXX we need to handle passed times, sattr and flags */
1862         srvstr_get_path_req(ctx, req, &fname, (const char *)req->buf,
1863                         STR_TERMINATE, &status);
1864         if (!NT_STATUS_IS_OK(status)) {
1865                 reply_nterror(req, status);
1866                 END_PROFILE(SMBopenX);
1867                 return;
1868         }
1869
1870         if (!map_open_params_to_ntcreate(
1871                     fname, deny_mode, smb_ofun, &access_mask,
1872                     &share_mode, &create_disposition, &create_options)) {
1873                 reply_nterror(req, NT_STATUS_DOS(ERRDOS, ERRbadaccess));
1874                 END_PROFILE(SMBopenX);
1875                 return;
1876         }
1877
1878         status = SMB_VFS_CREATE_FILE(
1879                 conn,                                   /* conn */
1880                 req,                                    /* req */
1881                 0,                                      /* root_dir_fid */
1882                 fname,                                  /* fname */
1883                 CFF_DOS_PATH,                           /* create_file_flags */
1884                 access_mask,                            /* access_mask */
1885                 share_mode,                             /* share_access */
1886                 create_disposition,                     /* create_disposition*/
1887                 create_options,                         /* create_options */
1888                 smb_attr,                               /* file_attributes */
1889                 oplock_request,                         /* oplock_request */
1890                 0,                                      /* allocation_size */
1891                 NULL,                                   /* sd */
1892                 NULL,                                   /* ea_list */
1893                 &fsp,                                   /* result */
1894                 &smb_action,                            /* pinfo */
1895                 &sbuf);                                 /* psbuf */
1896
1897         if (!NT_STATUS_IS_OK(status)) {
1898                 END_PROFILE(SMBopenX);
1899                 if (open_was_deferred(req->mid)) {
1900                         /* We have re-scheduled this call. */
1901                         return;
1902                 }
1903                 reply_openerror(req, status);
1904                 return;
1905         }
1906
1907         /* Setting the "size" field in vwv9 and vwv10 causes the file to be set to this size,
1908            if the file is truncated or created. */
1909         if (((smb_action == FILE_WAS_CREATED) || (smb_action == FILE_WAS_OVERWRITTEN)) && allocation_size) {
1910                 fsp->initial_allocation_size = smb_roundup(fsp->conn, allocation_size);
1911                 if (vfs_allocate_file_space(fsp, fsp->initial_allocation_size) == -1) {
1912                         close_file(req, fsp, ERROR_CLOSE);
1913                         reply_nterror(req, NT_STATUS_DISK_FULL);
1914                         END_PROFILE(SMBopenX);
1915                         return;
1916                 }
1917                 retval = vfs_set_filelen(fsp, (SMB_OFF_T)allocation_size);
1918                 if (retval < 0) {
1919                         close_file(req, fsp, ERROR_CLOSE);
1920                         reply_nterror(req, NT_STATUS_DISK_FULL);
1921                         END_PROFILE(SMBopenX);
1922                         return;
1923                 }
1924                 sbuf.st_size = SMB_VFS_GET_ALLOC_SIZE(conn,fsp,&sbuf);
1925         }
1926
1927         fattr = dos_mode(conn,fsp->fsp_name,&sbuf);
1928         mtime = sbuf.st_mtime;
1929         if (fattr & aDIR) {
1930                 close_file(req, fsp, ERROR_CLOSE);
1931                 reply_doserror(req, ERRDOS, ERRnoaccess);
1932                 END_PROFILE(SMBopenX);
1933                 return;
1934         }
1935
1936         /* If the caller set the extended oplock request bit
1937                 and we granted one (by whatever means) - set the
1938                 correct bit for extended oplock reply.
1939         */
1940
1941         if (ex_oplock_request && lp_fake_oplocks(SNUM(conn))) {
1942                 smb_action |= EXTENDED_OPLOCK_GRANTED;
1943         }
1944
1945         if(ex_oplock_request && EXCLUSIVE_OPLOCK_TYPE(fsp->oplock_type)) {
1946                 smb_action |= EXTENDED_OPLOCK_GRANTED;
1947         }
1948
1949         /* If the caller set the core oplock request bit
1950                 and we granted one (by whatever means) - set the
1951                 correct bit for core oplock reply.
1952         */
1953
1954         if (open_flags & EXTENDED_RESPONSE_REQUIRED) {
1955                 reply_outbuf(req, 19, 0);
1956         } else {
1957                 reply_outbuf(req, 15, 0);
1958         }
1959
1960         if (core_oplock_request && lp_fake_oplocks(SNUM(conn))) {
1961                 SCVAL(req->outbuf, smb_flg,
1962                       CVAL(req->outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
1963         }
1964
1965         if(core_oplock_request && EXCLUSIVE_OPLOCK_TYPE(fsp->oplock_type)) {
1966                 SCVAL(req->outbuf, smb_flg,
1967                       CVAL(req->outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
1968         }
1969
1970         SSVAL(req->outbuf,smb_vwv2,fsp->fnum);
1971         SSVAL(req->outbuf,smb_vwv3,fattr);
1972         if(lp_dos_filetime_resolution(SNUM(conn)) ) {
1973                 srv_put_dos_date3((char *)req->outbuf,smb_vwv4,mtime & ~1);
1974         } else {
1975                 srv_put_dos_date3((char *)req->outbuf,smb_vwv4,mtime);
1976         }
1977         SIVAL(req->outbuf,smb_vwv6,(uint32)sbuf.st_size);
1978         SSVAL(req->outbuf,smb_vwv8,GET_OPENX_MODE(deny_mode));
1979         SSVAL(req->outbuf,smb_vwv11,smb_action);
1980
1981         if (open_flags & EXTENDED_RESPONSE_REQUIRED) {
1982                 SIVAL(req->outbuf, smb_vwv15, STD_RIGHT_ALL_ACCESS);
1983         }
1984
1985         END_PROFILE(SMBopenX);
1986         chain_reply(req);
1987         return;
1988 }
1989
1990 /****************************************************************************
1991  Reply to a SMBulogoffX.
1992 ****************************************************************************/
1993
1994 void reply_ulogoffX(struct smb_request *req)
1995 {
1996         user_struct *vuser;
1997
1998         START_PROFILE(SMBulogoffX);
1999
2000         vuser = get_valid_user_struct(req->vuid);
2001
2002         if(vuser == NULL) {
2003                 DEBUG(3,("ulogoff, vuser id %d does not map to user.\n",
2004                          req->vuid));
2005         }
2006
2007         /* in user level security we are supposed to close any files
2008                 open by this user */
2009         if ((vuser != NULL) && (lp_security() != SEC_SHARE)) {
2010                 file_close_user(req->vuid);
2011         }
2012
2013         invalidate_vuid(req->vuid);
2014
2015         reply_outbuf(req, 2, 0);
2016
2017         DEBUG( 3, ( "ulogoffX vuid=%d\n", req->vuid ) );
2018
2019         END_PROFILE(SMBulogoffX);
2020         chain_reply(req);
2021 }
2022
2023 /****************************************************************************
2024  Reply to a mknew or a create.
2025 ****************************************************************************/
2026
2027 void reply_mknew(struct smb_request *req)
2028 {
2029         connection_struct *conn = req->conn;
2030         char *fname = NULL;
2031         uint32 fattr = 0;
2032         struct smb_file_time ft;
2033         files_struct *fsp;
2034         int oplock_request = 0;
2035         SMB_STRUCT_STAT sbuf;
2036         NTSTATUS status;
2037         uint32 access_mask = FILE_GENERIC_READ | FILE_GENERIC_WRITE;
2038         uint32 share_mode = FILE_SHARE_READ|FILE_SHARE_WRITE;
2039         uint32 create_disposition;
2040         uint32 create_options = 0;
2041         TALLOC_CTX *ctx = talloc_tos();
2042
2043         START_PROFILE(SMBcreate);
2044         ZERO_STRUCT(ft);
2045         SET_STAT_INVALID(sbuf);
2046
2047         if (req->wct < 3) {
2048                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
2049                 END_PROFILE(SMBcreate);
2050                 return;
2051         }
2052
2053         fattr = SVAL(req->vwv+0, 0);
2054         oplock_request = CORE_OPLOCK_REQUEST(req->inbuf);
2055
2056         /* mtime. */
2057         ft.mtime = convert_time_t_to_timespec(srv_make_unix_date3(req->vwv+1));
2058
2059         srvstr_get_path_req(ctx, req, &fname, (const char *)req->buf + 1,
2060                             STR_TERMINATE, &status);
2061         if (!NT_STATUS_IS_OK(status)) {
2062                 reply_nterror(req, status);
2063                 END_PROFILE(SMBcreate);
2064                 return;
2065         }
2066
2067         if (fattr & aVOLID) {
2068                 DEBUG(0,("Attempt to create file (%s) with volid set - "
2069                         "please report this\n", fname));
2070         }
2071
2072         if(req->cmd == SMBmknew) {
2073                 /* We should fail if file exists. */
2074                 create_disposition = FILE_CREATE;
2075         } else {
2076                 /* Create if file doesn't exist, truncate if it does. */
2077                 create_disposition = FILE_OVERWRITE_IF;
2078         }
2079
2080         status = SMB_VFS_CREATE_FILE(
2081                 conn,                                   /* conn */
2082                 req,                                    /* req */
2083                 0,                                      /* root_dir_fid */
2084                 fname,                                  /* fname */
2085                 CFF_DOS_PATH,                           /* create_file_flags */
2086                 access_mask,                            /* access_mask */
2087                 share_mode,                             /* share_access */
2088                 create_disposition,                     /* create_disposition*/
2089                 create_options,                         /* create_options */
2090                 fattr,                                  /* file_attributes */
2091                 oplock_request,                         /* oplock_request */
2092                 0,                                      /* allocation_size */
2093                 NULL,                                   /* sd */
2094                 NULL,                                   /* ea_list */
2095                 &fsp,                                   /* result */
2096                 NULL,                                   /* pinfo */
2097                 &sbuf);                                 /* psbuf */
2098
2099         if (!NT_STATUS_IS_OK(status)) {
2100                 END_PROFILE(SMBcreate);
2101                 if (open_was_deferred(req->mid)) {
2102                         /* We have re-scheduled this call. */
2103                         return;
2104                 }
2105                 reply_openerror(req, status);
2106                 return;
2107         }
2108
2109         ft.atime = get_atimespec(&sbuf); /* atime. */
2110         status = smb_set_file_time(conn, fsp, fsp->fsp_name, &sbuf, &ft, true);
2111         if (!NT_STATUS_IS_OK(status)) {
2112                 END_PROFILE(SMBcreate);
2113                 reply_openerror(req, status);
2114                 return;
2115         }
2116
2117         reply_outbuf(req, 1, 0);
2118         SSVAL(req->outbuf,smb_vwv0,fsp->fnum);
2119
2120         if (oplock_request && lp_fake_oplocks(SNUM(conn))) {
2121                 SCVAL(req->outbuf,smb_flg,
2122                                 CVAL(req->outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
2123         }
2124
2125         if(EXCLUSIVE_OPLOCK_TYPE(fsp->oplock_type)) {
2126                 SCVAL(req->outbuf,smb_flg,
2127                                 CVAL(req->outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
2128         }
2129
2130         DEBUG( 2, ( "reply_mknew: file %s\n", fsp->fsp_name ) );
2131         DEBUG( 3, ( "reply_mknew %s fd=%d dmode=0x%x\n",
2132                     fsp->fsp_name, fsp->fh->fd, (unsigned int)fattr ) );
2133
2134         END_PROFILE(SMBcreate);
2135         return;
2136 }
2137
2138 /****************************************************************************
2139  Reply to a create temporary file.
2140 ****************************************************************************/
2141
2142 void reply_ctemp(struct smb_request *req)
2143 {
2144         connection_struct *conn = req->conn;
2145         char *fname = NULL;
2146         uint32 fattr;
2147         files_struct *fsp;
2148         int oplock_request;
2149         int tmpfd;
2150         SMB_STRUCT_STAT sbuf;
2151         char *s;
2152         NTSTATUS status;
2153         TALLOC_CTX *ctx = talloc_tos();
2154
2155         START_PROFILE(SMBctemp);
2156
2157         if (req->wct < 3) {
2158                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
2159                 END_PROFILE(SMBctemp);
2160                 return;
2161         }
2162
2163         fattr = SVAL(req->vwv+0, 0);
2164         oplock_request = CORE_OPLOCK_REQUEST(req->inbuf);
2165
2166         srvstr_get_path_req(ctx, req, &fname, (const char *)req->buf+1,
2167                             STR_TERMINATE, &status);
2168         if (!NT_STATUS_IS_OK(status)) {
2169                 reply_nterror(req, status);
2170                 END_PROFILE(SMBctemp);
2171                 return;
2172         }
2173         if (*fname) {
2174                 fname = talloc_asprintf(ctx,
2175                                 "%s/TMXXXXXX",
2176                                 fname);
2177         } else {
2178                 fname = talloc_strdup(ctx, "TMXXXXXX");
2179         }
2180
2181         if (!fname) {
2182                 reply_nterror(req, NT_STATUS_NO_MEMORY);
2183                 END_PROFILE(SMBctemp);
2184                 return;
2185         }
2186
2187         status = resolve_dfspath(ctx, conn,
2188                                 req->flags2 & FLAGS2_DFS_PATHNAMES,
2189                                 fname,
2190                                 &fname);
2191         if (!NT_STATUS_IS_OK(status)) {
2192                 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
2193                         reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
2194                                         ERRSRV, ERRbadpath);
2195                         END_PROFILE(SMBctemp);
2196                         return;
2197                 }
2198                 reply_nterror(req, status);
2199                 END_PROFILE(SMBctemp);
2200                 return;
2201         }
2202
2203         status = unix_convert(ctx, conn, fname, False, &fname, NULL, &sbuf);
2204         if (!NT_STATUS_IS_OK(status)) {
2205                 reply_nterror(req, status);
2206                 END_PROFILE(SMBctemp);
2207                 return;
2208         }
2209
2210         status = check_name(conn, fname);
2211         if (!NT_STATUS_IS_OK(status)) {
2212                 reply_nterror(req, status);
2213                 END_PROFILE(SMBctemp);
2214                 return;
2215         }
2216
2217         tmpfd = smb_mkstemp(fname);
2218         if (tmpfd == -1) {
2219                 reply_unixerror(req, ERRDOS, ERRnoaccess);
2220                 END_PROFILE(SMBctemp);
2221                 return;
2222         }
2223
2224         SET_STAT_INVALID(sbuf);
2225         SMB_VFS_STAT(conn,fname,&sbuf);
2226
2227         /* We should fail if file does not exist. */
2228         status = SMB_VFS_CREATE_FILE(
2229                 conn,                                   /* conn */
2230                 req,                                    /* req */
2231                 0,                                      /* root_dir_fid */
2232                 fname,                                  /* fname */
2233                 0,                                      /* create_file_flags */
2234                 FILE_GENERIC_READ | FILE_GENERIC_WRITE, /* access_mask */
2235                 FILE_SHARE_READ | FILE_SHARE_WRITE,     /* share_access */
2236                 FILE_OPEN,                              /* create_disposition*/
2237                 0,                                      /* create_options */
2238                 fattr,                                  /* file_attributes */
2239                 oplock_request,                         /* oplock_request */
2240                 0,                                      /* allocation_size */
2241                 NULL,                                   /* sd */
2242                 NULL,                                   /* ea_list */
2243                 &fsp,                                   /* result */
2244                 NULL,                                   /* pinfo */
2245                 &sbuf);                                 /* psbuf */
2246
2247         /* close fd from smb_mkstemp() */
2248         close(tmpfd);
2249
2250         if (!NT_STATUS_IS_OK(status)) {
2251                 if (open_was_deferred(req->mid)) {
2252                         /* We have re-scheduled this call. */
2253                         END_PROFILE(SMBctemp);
2254                         return;
2255                 }
2256                 reply_openerror(req, status);
2257                 END_PROFILE(SMBctemp);
2258                 return;
2259         }
2260
2261         reply_outbuf(req, 1, 0);
2262         SSVAL(req->outbuf,smb_vwv0,fsp->fnum);
2263
2264         /* the returned filename is relative to the directory */
2265         s = strrchr_m(fsp->fsp_name, '/');
2266         if (!s) {
2267                 s = fsp->fsp_name;
2268         } else {
2269                 s++;
2270         }
2271
2272 #if 0
2273         /* Tested vs W2K3 - this doesn't seem to be here - null terminated filename is the only
2274            thing in the byte section. JRA */
2275         SSVALS(p, 0, -1); /* what is this? not in spec */
2276 #endif
2277         if (message_push_string(&req->outbuf, s, STR_ASCII|STR_TERMINATE)
2278             == -1) {
2279                 reply_nterror(req, NT_STATUS_NO_MEMORY);
2280                 END_PROFILE(SMBctemp);
2281                 return;
2282         }
2283
2284         if (oplock_request && lp_fake_oplocks(SNUM(conn))) {
2285                 SCVAL(req->outbuf, smb_flg,
2286                       CVAL(req->outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
2287         }
2288
2289         if (EXCLUSIVE_OPLOCK_TYPE(fsp->oplock_type)) {
2290                 SCVAL(req->outbuf, smb_flg,
2291                       CVAL(req->outbuf,smb_flg)|CORE_OPLOCK_GRANTED);
2292         }
2293
2294         DEBUG( 2, ( "reply_ctemp: created temp file %s\n", fsp->fsp_name ) );
2295         DEBUG( 3, ( "reply_ctemp %s fd=%d umode=0%o\n", fsp->fsp_name,
2296                     fsp->fh->fd, (unsigned int)sbuf.st_mode ) );
2297
2298         END_PROFILE(SMBctemp);
2299         return;
2300 }
2301
2302 /*******************************************************************
2303  Check if a user is allowed to rename a file.
2304 ********************************************************************/
2305
2306 static NTSTATUS can_rename(connection_struct *conn, files_struct *fsp,
2307                            uint16 dirtype, SMB_STRUCT_STAT *pst)
2308 {
2309         uint32 fmode;
2310
2311         if (!CAN_WRITE(conn)) {
2312                 return NT_STATUS_MEDIA_WRITE_PROTECTED;
2313         }
2314
2315         fmode = dos_mode(conn, fsp->fsp_name, pst);
2316         if ((fmode & ~dirtype) & (aHIDDEN | aSYSTEM)) {
2317                 return NT_STATUS_NO_SUCH_FILE;
2318         }
2319
2320         if (S_ISDIR(pst->st_mode)) {
2321                 if (fsp->posix_open) {
2322                         return NT_STATUS_OK;
2323                 }
2324
2325                 /* If no pathnames are open below this
2326                    directory, allow the rename. */
2327
2328                 if (file_find_subpath(fsp)) {
2329                         return NT_STATUS_ACCESS_DENIED;
2330                 }
2331                 return NT_STATUS_OK;
2332         }
2333
2334         if (fsp->access_mask & (DELETE_ACCESS|FILE_WRITE_ATTRIBUTES)) {
2335                 return NT_STATUS_OK;
2336         }
2337
2338         return NT_STATUS_ACCESS_DENIED;
2339 }
2340
2341 /*******************************************************************
2342  * unlink a file with all relevant access checks
2343  *******************************************************************/
2344
2345 static NTSTATUS do_unlink(connection_struct *conn,
2346                         struct smb_request *req,
2347                         const char *fname,
2348                         uint32 dirtype)
2349 {
2350         SMB_STRUCT_STAT sbuf;
2351         uint32 fattr;
2352         files_struct *fsp;
2353         uint32 dirtype_orig = dirtype;
2354         NTSTATUS status;
2355
2356         DEBUG(10,("do_unlink: %s, dirtype = %d\n", fname, dirtype ));
2357
2358         if (!CAN_WRITE(conn)) {
2359                 return NT_STATUS_MEDIA_WRITE_PROTECTED;
2360         }
2361
2362         if (SMB_VFS_LSTAT(conn,fname,&sbuf) != 0) {
2363                 return map_nt_error_from_unix(errno);
2364         }
2365
2366         fattr = dos_mode(conn,fname,&sbuf);
2367
2368         if (dirtype & FILE_ATTRIBUTE_NORMAL) {
2369                 dirtype = aDIR|aARCH|aRONLY;
2370         }
2371
2372         dirtype &= (aDIR|aARCH|aRONLY|aHIDDEN|aSYSTEM);
2373         if (!dirtype) {
2374                 return NT_STATUS_NO_SUCH_FILE;
2375         }
2376
2377         if (!dir_check_ftype(conn, fattr, dirtype)) {
2378                 if (fattr & aDIR) {
2379                         return NT_STATUS_FILE_IS_A_DIRECTORY;
2380                 }
2381                 return NT_STATUS_NO_SUCH_FILE;
2382         }
2383
2384         if (dirtype_orig & 0x8000) {
2385                 /* These will never be set for POSIX. */
2386                 return NT_STATUS_NO_SUCH_FILE;
2387         }
2388
2389 #if 0
2390         if ((fattr & dirtype) & FILE_ATTRIBUTE_DIRECTORY) {
2391                 return NT_STATUS_FILE_IS_A_DIRECTORY;
2392         }
2393
2394         if ((fattr & ~dirtype) & (FILE_ATTRIBUTE_HIDDEN|FILE_ATTRIBUTE_SYSTEM)) {
2395                 return NT_STATUS_NO_SUCH_FILE;
2396         }
2397
2398         if (dirtype & 0xFF00) {
2399                 /* These will never be set for POSIX. */
2400                 return NT_STATUS_NO_SUCH_FILE;
2401         }
2402
2403         dirtype &= 0xFF;
2404         if (!dirtype) {
2405                 return NT_STATUS_NO_SUCH_FILE;
2406         }
2407
2408         /* Can't delete a directory. */
2409         if (fattr & aDIR) {
2410                 return NT_STATUS_FILE_IS_A_DIRECTORY;
2411         }
2412 #endif
2413
2414 #if 0 /* JRATEST */
2415         else if (dirtype & aDIR) /* Asked for a directory and it isn't. */
2416                 return NT_STATUS_OBJECT_NAME_INVALID;
2417 #endif /* JRATEST */
2418
2419         /* Fix for bug #3035 from SATOH Fumiyasu <fumiyas@miraclelinux.com>
2420
2421           On a Windows share, a file with read-only dosmode can be opened with
2422           DELETE_ACCESS. But on a Samba share (delete readonly = no), it
2423           fails with NT_STATUS_CANNOT_DELETE error.
2424
2425           This semantic causes a problem that a user can not
2426           rename a file with read-only dosmode on a Samba share
2427           from a Windows command prompt (i.e. cmd.exe, but can rename
2428           from Windows Explorer).
2429         */
2430
2431         if (!lp_delete_readonly(SNUM(conn))) {
2432                 if (fattr & aRONLY) {
2433                         return NT_STATUS_CANNOT_DELETE;
2434                 }
2435         }
2436
2437         /* On open checks the open itself will check the share mode, so
2438            don't do it here as we'll get it wrong. */
2439
2440         status = SMB_VFS_CREATE_FILE
2441                 (conn,                  /* conn */
2442                  req,                   /* req */
2443                  0,                     /* root_dir_fid */
2444                  fname,                 /* fname */
2445                  0,                     /* create_file_flags */
2446                  DELETE_ACCESS,         /* access_mask */
2447                  FILE_SHARE_NONE,       /* share_access */
2448                  FILE_OPEN,             /* create_disposition*/
2449                  FILE_NON_DIRECTORY_FILE, /* create_options */
2450                  FILE_ATTRIBUTE_NORMAL, /* file_attributes */
2451                  0,                     /* oplock_request */
2452                  0,                     /* allocation_size */
2453                  NULL,                  /* sd */
2454                  NULL,                  /* ea_list */
2455                  &fsp,                  /* result */
2456                  NULL,                  /* pinfo */
2457                  &sbuf);                /* psbuf */
2458
2459         if (!NT_STATUS_IS_OK(status)) {
2460                 DEBUG(10, ("SMB_VFS_CREATEFILE failed: %s\n",
2461                            nt_errstr(status)));
2462                 return status;
2463         }
2464
2465         /* The set is across all open files on this dev/inode pair. */
2466         if (!set_delete_on_close(fsp, True, &conn->server_info->utok)) {
2467                 close_file(req, fsp, NORMAL_CLOSE);
2468                 return NT_STATUS_ACCESS_DENIED;
2469         }
2470
2471         return close_file(req, fsp, NORMAL_CLOSE);
2472 }
2473
2474 /****************************************************************************
2475  The guts of the unlink command, split out so it may be called by the NT SMB
2476  code.
2477 ****************************************************************************/
2478
2479 NTSTATUS unlink_internals(connection_struct *conn, struct smb_request *req,
2480                           uint32 dirtype, const char *name_in, bool has_wild)
2481 {
2482         const char *directory = NULL;
2483         char *mask = NULL;
2484         char *name = NULL;
2485         char *p = NULL;
2486         int count=0;
2487         NTSTATUS status = NT_STATUS_OK;
2488         SMB_STRUCT_STAT sbuf, st;
2489         TALLOC_CTX *ctx = talloc_tos();
2490
2491         status = unix_convert(ctx, conn, name_in, has_wild, &name, NULL, &sbuf);
2492         if (!NT_STATUS_IS_OK(status)) {
2493                 return status;
2494         }
2495
2496         p = strrchr_m(name,'/');
2497         if (!p) {
2498                 directory = talloc_strdup(ctx, ".");
2499                 if (!directory) {
2500                         return NT_STATUS_NO_MEMORY;
2501                 }
2502                 mask = name;
2503         } else {
2504                 *p = 0;
2505                 directory = name;
2506                 mask = p+1;
2507         }
2508
2509         /*
2510          * We should only check the mangled cache
2511          * here if unix_convert failed. This means
2512          * that the path in 'mask' doesn't exist
2513          * on the file system and so we need to look
2514          * for a possible mangle. This patch from
2515          * Tine Smukavec <valentin.smukavec@hermes.si>.
2516          */
2517
2518         if (!VALID_STAT(sbuf) && mangle_is_mangled(mask,conn->params)) {
2519                 char *new_mask = NULL;
2520                 mangle_lookup_name_from_8_3(ctx,
2521                                 mask,
2522                                 &new_mask,
2523                                 conn->params );
2524                 if (new_mask) {
2525                         mask = new_mask;
2526                 }
2527         }
2528
2529         if (!has_wild) {
2530                 directory = talloc_asprintf(ctx,
2531                                 "%s/%s",
2532                                 directory,
2533                                 mask);
2534                 if (!directory) {
2535                         return NT_STATUS_NO_MEMORY;
2536                 }
2537                 if (dirtype == 0) {
2538                         dirtype = FILE_ATTRIBUTE_NORMAL;
2539                 }
2540
2541                 status = check_name(conn, directory);
2542                 if (!NT_STATUS_IS_OK(status)) {
2543                         return status;
2544                 }
2545
2546                 status = do_unlink(conn, req, directory, dirtype);
2547                 if (!NT_STATUS_IS_OK(status)) {
2548                         return status;
2549                 }
2550
2551                 count++;
2552         } else {
2553                 struct smb_Dir *dir_hnd = NULL;
2554                 long offset = 0;
2555                 const char *dname;
2556
2557                 if ((dirtype & SAMBA_ATTRIBUTES_MASK) == aDIR) {
2558                         return NT_STATUS_OBJECT_NAME_INVALID;
2559                 }
2560
2561                 if (strequal(mask,"????????.???")) {
2562                         mask[0] = '*';
2563                         mask[1] = '\0';
2564                 }
2565
2566                 status = check_name(conn, directory);
2567                 if (!NT_STATUS_IS_OK(status)) {
2568                         return status;
2569                 }
2570
2571                 dir_hnd = OpenDir(talloc_tos(), conn, directory, mask,
2572                                   dirtype);
2573                 if (dir_hnd == NULL) {
2574                         return map_nt_error_from_unix(errno);
2575                 }
2576
2577                 /* XXXX the CIFS spec says that if bit0 of the flags2 field is set then
2578                    the pattern matches against the long name, otherwise the short name
2579                    We don't implement this yet XXXX
2580                 */
2581
2582                 status = NT_STATUS_NO_SUCH_FILE;
2583
2584                 while ((dname = ReadDirName(dir_hnd, &offset, &st))) {
2585                         char *fname = NULL;
2586
2587                         if (!is_visible_file(conn, directory, dname, &st,
2588                             true))
2589                         {
2590                                 continue;
2591                         }
2592
2593                         /* Quick check for "." and ".." */
2594                         if (ISDOT(dname) || ISDOTDOT(dname)) {
2595                                 continue;
2596                         }
2597
2598                         if(!mask_match(dname, mask, conn->case_sensitive)) {
2599                                 continue;
2600                         }
2601
2602                         fname = talloc_asprintf(ctx, "%s/%s",
2603                                         directory,
2604                                         dname);
2605                         if (!fname) {
2606                                 return NT_STATUS_NO_MEMORY;
2607                         }
2608
2609                         status = check_name(conn, fname);
2610                         if (!NT_STATUS_IS_OK(status)) {
2611                                 TALLOC_FREE(dir_hnd);
2612                                 return status;
2613                         }
2614
2615                         status = do_unlink(conn, req, fname, dirtype);
2616                         if (!NT_STATUS_IS_OK(status)) {
2617                                 TALLOC_FREE(fname);
2618                                 continue;
2619                         }
2620
2621                         count++;
2622                         DEBUG(3,("unlink_internals: successful unlink [%s]\n",
2623                                  fname));
2624
2625                         TALLOC_FREE(fname);
2626                 }
2627                 TALLOC_FREE(dir_hnd);
2628         }
2629
2630         if (count == 0 && NT_STATUS_IS_OK(status) && errno != 0) {
2631                 status = map_nt_error_from_unix(errno);
2632         }
2633
2634         return status;
2635 }
2636
2637 /****************************************************************************
2638  Reply to a unlink
2639 ****************************************************************************/
2640
2641 void reply_unlink(struct smb_request *req)
2642 {
2643         connection_struct *conn = req->conn;
2644         char *name = NULL;
2645         uint32 dirtype;
2646         NTSTATUS status;
2647         bool path_contains_wcard = False;
2648         TALLOC_CTX *ctx = talloc_tos();
2649
2650         START_PROFILE(SMBunlink);
2651
2652         if (req->wct < 1) {
2653                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
2654                 END_PROFILE(SMBunlink);
2655                 return;
2656         }
2657
2658         dirtype = SVAL(req->vwv+0, 0);
2659
2660         srvstr_get_path_req_wcard(ctx, req, &name, (const char *)req->buf + 1,
2661                                   STR_TERMINATE, &status,
2662                                   &path_contains_wcard);
2663         if (!NT_STATUS_IS_OK(status)) {
2664                 reply_nterror(req, status);
2665                 END_PROFILE(SMBunlink);
2666                 return;
2667         }
2668
2669         status = resolve_dfspath_wcard(ctx, conn,
2670                                        req->flags2 & FLAGS2_DFS_PATHNAMES,
2671                                        name,
2672                                        &name,
2673                                        &path_contains_wcard);
2674         if (!NT_STATUS_IS_OK(status)) {
2675                 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
2676                         reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
2677                                         ERRSRV, ERRbadpath);
2678                         END_PROFILE(SMBunlink);
2679                         return;
2680                 }
2681                 reply_nterror(req, status);
2682                 END_PROFILE(SMBunlink);
2683                 return;
2684         }
2685
2686         DEBUG(3,("reply_unlink : %s\n",name));
2687
2688         status = unlink_internals(conn, req, dirtype, name,
2689                                   path_contains_wcard);
2690         if (!NT_STATUS_IS_OK(status)) {
2691                 if (open_was_deferred(req->mid)) {
2692                         /* We have re-scheduled this call. */
2693                         END_PROFILE(SMBunlink);
2694                         return;
2695                 }
2696                 reply_nterror(req, status);
2697                 END_PROFILE(SMBunlink);
2698                 return;
2699         }
2700
2701         reply_outbuf(req, 0, 0);
2702         END_PROFILE(SMBunlink);
2703
2704         return;
2705 }
2706
2707 /****************************************************************************
2708  Fail for readbraw.
2709 ****************************************************************************/
2710
2711 static void fail_readraw(void)
2712 {
2713         const char *errstr = talloc_asprintf(talloc_tos(),
2714                         "FAIL ! reply_readbraw: socket write fail (%s)",
2715                         strerror(errno));
2716         if (!errstr) {
2717                 errstr = "";
2718         }
2719         exit_server_cleanly(errstr);
2720 }
2721
2722 /****************************************************************************
2723  Fake (read/write) sendfile. Returns -1 on read or write fail.
2724 ****************************************************************************/
2725
2726 static ssize_t fake_sendfile(files_struct *fsp, SMB_OFF_T startpos,
2727                              size_t nread)
2728 {
2729         size_t bufsize;
2730         size_t tosend = nread;
2731         char *buf;
2732
2733         if (nread == 0) {
2734                 return 0;
2735         }
2736
2737         bufsize = MIN(nread, 65536);
2738
2739         if (!(buf = SMB_MALLOC_ARRAY(char, bufsize))) {
2740                 return -1;
2741         }
2742
2743         while (tosend > 0) {
2744                 ssize_t ret;
2745                 size_t cur_read;
2746
2747                 if (tosend > bufsize) {
2748                         cur_read = bufsize;
2749                 } else {
2750                         cur_read = tosend;
2751                 }
2752                 ret = read_file(fsp,buf,startpos,cur_read);
2753                 if (ret == -1) {
2754                         SAFE_FREE(buf);
2755                         return -1;
2756                 }
2757
2758                 /* If we had a short read, fill with zeros. */
2759                 if (ret < cur_read) {
2760                         memset(buf, '\0', cur_read - ret);
2761                 }
2762
2763                 if (write_data(smbd_server_fd(),buf,cur_read) != cur_read) {
2764                         SAFE_FREE(buf);
2765                         return -1;
2766                 }
2767                 tosend -= cur_read;
2768                 startpos += cur_read;
2769         }
2770
2771         SAFE_FREE(buf);
2772         return (ssize_t)nread;
2773 }
2774
2775 #if defined(WITH_SENDFILE)
2776 /****************************************************************************
2777  Deal with the case of sendfile reading less bytes from the file than
2778  requested. Fill with zeros (all we can do).
2779 ****************************************************************************/
2780
2781 static void sendfile_short_send(files_struct *fsp,
2782                                 ssize_t nread,
2783                                 size_t headersize,
2784                                 size_t smb_maxcnt)
2785 {
2786         if (nread < headersize) {
2787                 DEBUG(0,("sendfile_short_send: sendfile failed to send "
2788                         "header for file %s (%s). Terminating\n",
2789                         fsp->fsp_name, strerror(errno) ));
2790                 exit_server_cleanly("sendfile_short_send failed");
2791         }
2792
2793         nread -= headersize;
2794
2795         if (nread < smb_maxcnt) {
2796                 char *buf = SMB_CALLOC_ARRAY(char, 1024);
2797                 if (!buf) {
2798                         exit_server_cleanly("sendfile_short_send: "
2799                                 "malloc failed");
2800                 }
2801
2802                 DEBUG(0,("sendfile_short_send: filling truncated file %s "
2803                         "with zeros !\n", fsp->fsp_name));
2804
2805                 while (nread < smb_maxcnt) {
2806                         /*
2807                          * We asked for the real file size and told sendfile
2808                          * to not go beyond the end of the file. But it can
2809                          * happen that in between our fstat call and the
2810                          * sendfile call the file was truncated. This is very
2811                          * bad because we have already announced the larger
2812                          * number of bytes to the client.
2813                          *
2814                          * The best we can do now is to send 0-bytes, just as
2815                          * a read from a hole in a sparse file would do.
2816                          *
2817                          * This should happen rarely enough that I don't care
2818                          * about efficiency here :-)
2819                          */
2820                         size_t to_write;
2821
2822                         to_write = MIN(sizeof(buf), smb_maxcnt - nread);
2823                         if (write_data(smbd_server_fd(), buf, to_write) != to_write) {
2824                                 exit_server_cleanly("sendfile_short_send: "
2825                                         "write_data failed");
2826                         }
2827                         nread += to_write;
2828                 }
2829                 SAFE_FREE(buf);
2830         }
2831 }
2832 #endif /* defined WITH_SENDFILE */
2833
2834 /****************************************************************************
2835  Return a readbraw error (4 bytes of zero).
2836 ****************************************************************************/
2837
2838 static void reply_readbraw_error(void)
2839 {
2840         char header[4];
2841         SIVAL(header,0,0);
2842         if (write_data(smbd_server_fd(),header,4) != 4) {
2843                 fail_readraw();
2844         }
2845 }
2846
2847 /****************************************************************************
2848  Use sendfile in readbraw.
2849 ****************************************************************************/
2850
2851 static void send_file_readbraw(connection_struct *conn,
2852                                struct smb_request *req,
2853                                files_struct *fsp,
2854                                SMB_OFF_T startpos,
2855                                size_t nread,
2856                                ssize_t mincount)
2857 {
2858         char *outbuf = NULL;
2859         ssize_t ret=0;
2860
2861 #if defined(WITH_SENDFILE)
2862         /*
2863          * We can only use sendfile on a non-chained packet
2864          * but we can use on a non-oplocked file. tridge proved this
2865          * on a train in Germany :-). JRA.
2866          * reply_readbraw has already checked the length.
2867          */
2868
2869         if ( !req_is_in_chain(req) && (nread > 0) && (fsp->base_fsp == NULL) &&
2870             (fsp->wcp == NULL) &&
2871             lp_use_sendfile(SNUM(conn), smbd_server_conn->signing_state) ) {
2872                 ssize_t sendfile_read = -1;
2873                 char header[4];
2874                 DATA_BLOB header_blob;
2875
2876                 _smb_setlen(header,nread);
2877                 header_blob = data_blob_const(header, 4);
2878
2879                 if ((sendfile_read = SMB_VFS_SENDFILE(smbd_server_fd(), fsp,
2880                                 &header_blob, startpos, nread)) == -1) {
2881                         /* Returning ENOSYS means no data at all was sent.
2882                          * Do this as a normal read. */
2883                         if (errno == ENOSYS) {
2884                                 goto normal_readbraw;
2885                         }
2886
2887                         /*
2888                          * Special hack for broken Linux with no working sendfile. If we
2889                          * return EINTR we sent the header but not the rest of the data.
2890                          * Fake this up by doing read/write calls.
2891                          */
2892                         if (errno == EINTR) {
2893                                 /* Ensure we don't do this again. */
2894                                 set_use_sendfile(SNUM(conn), False);
2895                                 DEBUG(0,("send_file_readbraw: sendfile not available. Faking..\n"));
2896
2897                                 if (fake_sendfile(fsp, startpos, nread) == -1) {
2898                                         DEBUG(0,("send_file_readbraw: fake_sendfile failed for file %s (%s).\n",
2899                                                 fsp->fsp_name, strerror(errno) ));
2900                                         exit_server_cleanly("send_file_readbraw fake_sendfile failed");
2901                                 }
2902                                 return;
2903                         }
2904
2905                         DEBUG(0,("send_file_readbraw: sendfile failed for file %s (%s). Terminating\n",
2906                                 fsp->fsp_name, strerror(errno) ));
2907                         exit_server_cleanly("send_file_readbraw sendfile failed");
2908                 } else if (sendfile_read == 0) {
2909                         /*
2910                          * Some sendfile implementations return 0 to indicate
2911                          * that there was a short read, but nothing was
2912                          * actually written to the socket.  In this case,
2913                          * fallback to the normal read path so the header gets
2914                          * the correct byte count.
2915                          */
2916                         DEBUG(3, ("send_file_readbraw: sendfile sent zero "
2917                                   "bytes falling back to the normal read: "
2918                                   "%s\n", fsp->fsp_name));
2919                         goto normal_readbraw;
2920                 }
2921
2922                 /* Deal with possible short send. */
2923                 if (sendfile_read != 4+nread) {
2924                         sendfile_short_send(fsp, sendfile_read, 4, nread);
2925                 }
2926                 return;
2927         }
2928
2929 normal_readbraw:
2930 #endif
2931
2932         outbuf = TALLOC_ARRAY(NULL, char, nread+4);
2933         if (!outbuf) {
2934                 DEBUG(0,("send_file_readbraw: TALLOC_ARRAY failed for size %u.\n",
2935                         (unsigned)(nread+4)));
2936                 reply_readbraw_error();
2937                 return;
2938         }
2939
2940         if (nread > 0) {
2941                 ret = read_file(fsp,outbuf+4,startpos,nread);
2942 #if 0 /* mincount appears to be ignored in a W2K server. JRA. */
2943                 if (ret < mincount)
2944                         ret = 0;
2945 #else
2946                 if (ret < nread)
2947                         ret = 0;
2948 #endif
2949         }
2950
2951         _smb_setlen(outbuf,ret);
2952         if (write_data(smbd_server_fd(),outbuf,4+ret) != 4+ret)
2953                 fail_readraw();
2954
2955         TALLOC_FREE(outbuf);
2956 }
2957
2958 /****************************************************************************
2959  Reply to a readbraw (core+ protocol).
2960 ****************************************************************************/
2961
2962 void reply_readbraw(struct smb_request *req)
2963 {
2964         connection_struct *conn = req->conn;
2965         ssize_t maxcount,mincount;
2966         size_t nread = 0;
2967         SMB_OFF_T startpos;
2968         files_struct *fsp;
2969         struct lock_struct lock;
2970         SMB_STRUCT_STAT st;
2971         SMB_OFF_T size = 0;
2972
2973         START_PROFILE(SMBreadbraw);
2974
2975         if (srv_is_signing_active(smbd_server_conn) ||
2976             is_encrypted_packet(req->inbuf)) {
2977                 exit_server_cleanly("reply_readbraw: SMB signing/sealing is active - "
2978                         "raw reads/writes are disallowed.");
2979         }
2980
2981         if (req->wct < 8) {
2982                 reply_readbraw_error();
2983                 END_PROFILE(SMBreadbraw);
2984                 return;
2985         }
2986
2987         /*
2988          * Special check if an oplock break has been issued
2989          * and the readraw request croses on the wire, we must
2990          * return a zero length response here.
2991          */
2992
2993         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
2994
2995         /*
2996          * We have to do a check_fsp by hand here, as
2997          * we must always return 4 zero bytes on error,
2998          * not a NTSTATUS.
2999          */
3000
3001         if (!fsp || !conn || conn != fsp->conn ||
3002                         req->vuid != fsp->vuid ||
3003                         fsp->is_directory || fsp->fh->fd == -1) {
3004                 /*
3005                  * fsp could be NULL here so use the value from the packet. JRA.
3006                  */
3007                 DEBUG(3,("reply_readbraw: fnum %d not valid "
3008                         "- cache prime?\n",
3009                         (int)SVAL(req->vwv+0, 0)));
3010                 reply_readbraw_error();
3011                 END_PROFILE(SMBreadbraw);
3012                 return;
3013         }
3014
3015         /* Do a "by hand" version of CHECK_READ. */
3016         if (!(fsp->can_read ||
3017                         ((req->flags2 & FLAGS2_READ_PERMIT_EXECUTE) &&
3018                                 (fsp->access_mask & FILE_EXECUTE)))) {
3019                 DEBUG(3,("reply_readbraw: fnum %d not readable.\n",
3020                                 (int)SVAL(req->vwv+0, 0)));
3021                 reply_readbraw_error();
3022                 END_PROFILE(SMBreadbraw);
3023                 return;
3024         }
3025
3026         flush_write_cache(fsp, READRAW_FLUSH);
3027
3028         startpos = IVAL_TO_SMB_OFF_T(req->vwv+1, 0);
3029         if(req->wct == 10) {
3030                 /*
3031                  * This is a large offset (64 bit) read.
3032                  */
3033 #ifdef LARGE_SMB_OFF_T
3034
3035                 startpos |= (((SMB_OFF_T)IVAL(req->vwv+8, 0)) << 32);
3036
3037 #else /* !LARGE_SMB_OFF_T */
3038
3039                 /*
3040                  * Ensure we haven't been sent a >32 bit offset.
3041                  */
3042
3043                 if(IVAL(req->vwv+8, 0) != 0) {
3044                         DEBUG(0,("reply_readbraw: large offset "
3045                                 "(%x << 32) used and we don't support "
3046                                 "64 bit offsets.\n",
3047                         (unsigned int)IVAL(req->vwv+8, 0) ));
3048                         reply_readbraw_error();
3049                         END_PROFILE(SMBreadbraw);
3050                         return;
3051                 }
3052
3053 #endif /* LARGE_SMB_OFF_T */
3054
3055                 if(startpos < 0) {
3056                         DEBUG(0,("reply_readbraw: negative 64 bit "
3057                                 "readraw offset (%.0f) !\n",
3058                                 (double)startpos ));
3059                         reply_readbraw_error();
3060                         END_PROFILE(SMBreadbraw);
3061                         return;
3062                 }
3063         }
3064
3065         maxcount = (SVAL(req->vwv+3, 0) & 0xFFFF);
3066         mincount = (SVAL(req->vwv+4, 0) & 0xFFFF);
3067
3068         /* ensure we don't overrun the packet size */
3069         maxcount = MIN(65535,maxcount);
3070
3071         init_strict_lock_struct(fsp, (uint32)req->smbpid,
3072             (uint64_t)startpos, (uint64_t)maxcount, READ_LOCK,
3073             &lock);
3074
3075         if (!SMB_VFS_STRICT_LOCK(conn, fsp, &lock)) {
3076                 reply_readbraw_error();
3077                 END_PROFILE(SMBreadbraw);
3078                 return;
3079         }
3080
3081         if (SMB_VFS_FSTAT(fsp, &st) == 0) {
3082                 size = st.st_size;
3083         }
3084
3085         if (startpos >= size) {
3086                 nread = 0;
3087         } else {
3088                 nread = MIN(maxcount,(size - startpos));
3089         }
3090
3091 #if 0 /* mincount appears to be ignored in a W2K server. JRA. */
3092         if (nread < mincount)
3093                 nread = 0;
3094 #endif
3095
3096         DEBUG( 3, ( "reply_readbraw: fnum=%d start=%.0f max=%lu "
3097                 "min=%lu nread=%lu\n",
3098                 fsp->fnum, (double)startpos,
3099                 (unsigned long)maxcount,
3100                 (unsigned long)mincount,
3101                 (unsigned long)nread ) );
3102
3103         send_file_readbraw(conn, req, fsp, startpos, nread, mincount);
3104
3105         DEBUG(5,("reply_readbraw finished\n"));
3106
3107         SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
3108
3109         END_PROFILE(SMBreadbraw);
3110         return;
3111 }
3112
3113 #undef DBGC_CLASS
3114 #define DBGC_CLASS DBGC_LOCKING
3115
3116 /****************************************************************************
3117  Reply to a lockread (core+ protocol).
3118 ****************************************************************************/
3119
3120 void reply_lockread(struct smb_request *req)
3121 {
3122         connection_struct *conn = req->conn;
3123         ssize_t nread = -1;
3124         char *data;
3125         SMB_OFF_T startpos;
3126         size_t numtoread;
3127         NTSTATUS status;
3128         files_struct *fsp;
3129         struct byte_range_lock *br_lck = NULL;
3130         char *p = NULL;
3131
3132         START_PROFILE(SMBlockread);
3133
3134         if (req->wct < 5) {
3135                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
3136                 END_PROFILE(SMBlockread);
3137                 return;
3138         }
3139
3140         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
3141
3142         if (!check_fsp(conn, req, fsp)) {
3143                 END_PROFILE(SMBlockread);
3144                 return;
3145         }
3146
3147         if (!CHECK_READ(fsp,req)) {
3148                 reply_doserror(req, ERRDOS, ERRbadaccess);
3149                 END_PROFILE(SMBlockread);
3150                 return;
3151         }
3152
3153         numtoread = SVAL(req->vwv+1, 0);
3154         startpos = IVAL_TO_SMB_OFF_T(req->vwv+2, 0);
3155
3156         numtoread = MIN(BUFFER_SIZE - (smb_size + 3*2 + 3), numtoread);
3157
3158         reply_outbuf(req, 5, numtoread + 3);
3159
3160         data = smb_buf(req->outbuf) + 3;
3161
3162         /*
3163          * NB. Discovered by Menny Hamburger at Mainsoft. This is a core+
3164          * protocol request that predates the read/write lock concept.
3165          * Thus instead of asking for a read lock here we need to ask
3166          * for a write lock. JRA.
3167          * Note that the requested lock size is unaffected by max_recv.
3168          */
3169
3170         br_lck = do_lock(smbd_messaging_context(),
3171                         fsp,
3172                         req->smbpid,
3173                         (uint64_t)numtoread,
3174                         (uint64_t)startpos,
3175                         WRITE_LOCK,
3176                         WINDOWS_LOCK,
3177                         False, /* Non-blocking lock. */
3178                         &status,
3179                         NULL,
3180                         NULL);
3181         TALLOC_FREE(br_lck);
3182
3183         if (NT_STATUS_V(status)) {
3184                 reply_nterror(req, status);
3185                 END_PROFILE(SMBlockread);
3186                 return;
3187         }
3188
3189         /*
3190          * However the requested READ size IS affected by max_recv. Insanity.... JRA.
3191          */
3192
3193         if (numtoread > max_recv) {
3194                 DEBUG(0,("reply_lockread: requested read size (%u) is greater than maximum allowed (%u). \
3195 Returning short read of maximum allowed for compatibility with Windows 2000.\n",
3196                         (unsigned int)numtoread, (unsigned int)max_recv ));
3197                 numtoread = MIN(numtoread,max_recv);
3198         }
3199         nread = read_file(fsp,data,startpos,numtoread);
3200
3201         if (nread < 0) {
3202                 reply_unixerror(req, ERRDOS, ERRnoaccess);
3203                 END_PROFILE(SMBlockread);
3204                 return;
3205         }
3206
3207         srv_set_message((char *)req->outbuf, 5, nread+3, False);
3208
3209         SSVAL(req->outbuf,smb_vwv0,nread);
3210         SSVAL(req->outbuf,smb_vwv5,nread+3);
3211         p = smb_buf(req->outbuf);
3212         SCVAL(p,0,0); /* pad byte. */
3213         SSVAL(p,1,nread);
3214
3215         DEBUG(3,("lockread fnum=%d num=%d nread=%d\n",
3216                  fsp->fnum, (int)numtoread, (int)nread));
3217
3218         END_PROFILE(SMBlockread);
3219         return;
3220 }
3221
3222 #undef DBGC_CLASS
3223 #define DBGC_CLASS DBGC_ALL
3224
3225 /****************************************************************************
3226  Reply to a read.
3227 ****************************************************************************/
3228
3229 void reply_read(struct smb_request *req)
3230 {
3231         connection_struct *conn = req->conn;
3232         size_t numtoread;
3233         ssize_t nread = 0;
3234         char *data;
3235         SMB_OFF_T startpos;
3236         int outsize = 0;
3237         files_struct *fsp;
3238         struct lock_struct lock;
3239
3240         START_PROFILE(SMBread);
3241
3242         if (req->wct < 3) {
3243                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
3244                 END_PROFILE(SMBread);
3245                 return;
3246         }
3247
3248         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
3249
3250         if (!check_fsp(conn, req, fsp)) {
3251                 END_PROFILE(SMBread);
3252                 return;
3253         }
3254
3255         if (!CHECK_READ(fsp,req)) {
3256                 reply_doserror(req, ERRDOS, ERRbadaccess);
3257                 END_PROFILE(SMBread);
3258                 return;
3259         }
3260
3261         numtoread = SVAL(req->vwv+1, 0);
3262         startpos = IVAL_TO_SMB_OFF_T(req->vwv+2, 0);
3263
3264         numtoread = MIN(BUFFER_SIZE-outsize,numtoread);
3265
3266         /*
3267          * The requested read size cannot be greater than max_recv. JRA.
3268          */
3269         if (numtoread > max_recv) {
3270                 DEBUG(0,("reply_read: requested read size (%u) is greater than maximum allowed (%u). \
3271 Returning short read of maximum allowed for compatibility with Windows 2000.\n",
3272                         (unsigned int)numtoread, (unsigned int)max_recv ));
3273                 numtoread = MIN(numtoread,max_recv);
3274         }
3275
3276         reply_outbuf(req, 5, numtoread+3);
3277
3278         data = smb_buf(req->outbuf) + 3;
3279
3280         init_strict_lock_struct(fsp, (uint32)req->smbpid,
3281             (uint64_t)startpos, (uint64_t)numtoread, READ_LOCK,
3282             &lock);
3283
3284         if (!SMB_VFS_STRICT_LOCK(conn, fsp, &lock)) {
3285                 reply_doserror(req, ERRDOS,ERRlock);
3286                 END_PROFILE(SMBread);
3287                 return;
3288         }
3289
3290         if (numtoread > 0)
3291                 nread = read_file(fsp,data,startpos,numtoread);
3292
3293         if (nread < 0) {
3294                 reply_unixerror(req, ERRDOS,ERRnoaccess);
3295                 goto strict_unlock;
3296         }
3297
3298         srv_set_message((char *)req->outbuf, 5, nread+3, False);
3299
3300         SSVAL(req->outbuf,smb_vwv0,nread);
3301         SSVAL(req->outbuf,smb_vwv5,nread+3);
3302         SCVAL(smb_buf(req->outbuf),0,1);
3303         SSVAL(smb_buf(req->outbuf),1,nread);
3304
3305         DEBUG( 3, ( "read fnum=%d num=%d nread=%d\n",
3306                 fsp->fnum, (int)numtoread, (int)nread ) );
3307
3308 strict_unlock:
3309         SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
3310
3311         END_PROFILE(SMBread);
3312         return;
3313 }
3314
3315 /****************************************************************************
3316  Setup readX header.
3317 ****************************************************************************/
3318
3319 static int setup_readX_header(struct smb_request *req, char *outbuf,
3320                               size_t smb_maxcnt)
3321 {
3322         int outsize;
3323         char *data;
3324
3325         outsize = srv_set_message(outbuf,12,smb_maxcnt,False);
3326         data = smb_buf(outbuf);
3327
3328         memset(outbuf+smb_vwv0,'\0',24); /* valgrind init. */
3329
3330         SCVAL(outbuf,smb_vwv0,0xFF);
3331         SSVAL(outbuf,smb_vwv2,0xFFFF); /* Remaining - must be -1. */
3332         SSVAL(outbuf,smb_vwv5,smb_maxcnt);
3333         SSVAL(outbuf,smb_vwv6,
3334               req_wct_ofs(req)
3335               + 1               /* the wct field */
3336               + 12 * sizeof(uint16_t) /* vwv */
3337               + 2);             /* the buflen field */
3338         SSVAL(outbuf,smb_vwv7,(smb_maxcnt >> 16));
3339         SSVAL(outbuf,smb_vwv11,smb_maxcnt);
3340         /* Reset the outgoing length, set_message truncates at 0x1FFFF. */
3341         _smb_setlen_large(outbuf,(smb_size + 12*2 + smb_maxcnt - 4));
3342         return outsize;
3343 }
3344
3345 /****************************************************************************
3346  Reply to a read and X - possibly using sendfile.
3347 ****************************************************************************/
3348
3349 static void send_file_readX(connection_struct *conn, struct smb_request *req,
3350                             files_struct *fsp, SMB_OFF_T startpos,
3351                             size_t smb_maxcnt)
3352 {
3353         SMB_STRUCT_STAT sbuf;
3354         ssize_t nread = -1;
3355
3356         if(SMB_VFS_FSTAT(fsp, &sbuf) == -1) {
3357                 reply_unixerror(req, ERRDOS, ERRnoaccess);
3358                 return;
3359         }
3360
3361         if (startpos > sbuf.st_size) {
3362                 smb_maxcnt = 0;
3363         } else if (smb_maxcnt > (sbuf.st_size - startpos)) {
3364                 smb_maxcnt = (sbuf.st_size - startpos);
3365         }
3366
3367         if (smb_maxcnt == 0) {
3368                 goto normal_read;
3369         }
3370
3371 #if defined(WITH_SENDFILE)
3372         /*
3373          * We can only use sendfile on a non-chained packet
3374          * but we can use on a non-oplocked file. tridge proved this
3375          * on a train in Germany :-). JRA.
3376          */
3377
3378         if (!req_is_in_chain(req) &&
3379             !is_encrypted_packet(req->inbuf) && (fsp->base_fsp == NULL) &&
3380             (fsp->wcp == NULL) &&
3381             lp_use_sendfile(SNUM(conn), smbd_server_conn->signing_state) ) {
3382                 uint8 headerbuf[smb_size + 12 * 2];
3383                 DATA_BLOB header;
3384
3385                 /*
3386                  * Set up the packet header before send. We
3387                  * assume here the sendfile will work (get the
3388                  * correct amount of data).
3389                  */
3390
3391                 header = data_blob_const(headerbuf, sizeof(headerbuf));
3392
3393                 construct_reply_common_req(req, (char *)headerbuf);
3394                 setup_readX_header(req, (char *)headerbuf, smb_maxcnt);
3395
3396                 if ((nread = SMB_VFS_SENDFILE(smbd_server_fd(), fsp, &header, startpos, smb_maxcnt)) == -1) {
3397                         /* Returning ENOSYS means no data at all was sent.
3398                            Do this as a normal read. */
3399                         if (errno == ENOSYS) {
3400                                 goto normal_read;
3401                         }
3402
3403                         /*
3404                          * Special hack for broken Linux with no working sendfile. If we
3405                          * return EINTR we sent the header but not the rest of the data.
3406                          * Fake this up by doing read/write calls.
3407                          */
3408
3409                         if (errno == EINTR) {
3410                                 /* Ensure we don't do this again. */
3411                                 set_use_sendfile(SNUM(conn), False);
3412                                 DEBUG(0,("send_file_readX: sendfile not available. Faking..\n"));
3413                                 nread = fake_sendfile(fsp, startpos,
3414                                                       smb_maxcnt);
3415                                 if (nread == -1) {
3416                                         DEBUG(0,("send_file_readX: fake_sendfile failed for file %s (%s).\n",
3417                                                 fsp->fsp_name, strerror(errno) ));
3418                                         exit_server_cleanly("send_file_readX: fake_sendfile failed");
3419                                 }
3420                                 DEBUG( 3, ( "send_file_readX: fake_sendfile fnum=%d max=%d nread=%d\n",
3421                                         fsp->fnum, (int)smb_maxcnt, (int)nread ) );
3422                                 /* No outbuf here means successful sendfile. */
3423                                 TALLOC_FREE(req->outbuf);
3424                                 return;
3425                         }
3426
3427                         DEBUG(0,("send_file_readX: sendfile failed for file %s (%s). Terminating\n",
3428                                 fsp->fsp_name, strerror(errno) ));
3429                         exit_server_cleanly("send_file_readX sendfile failed");
3430                 } else if (nread == 0) {
3431                         /*
3432                          * Some sendfile implementations return 0 to indicate
3433                          * that there was a short read, but nothing was
3434                          * actually written to the socket.  In this case,
3435                          * fallback to the normal read path so the header gets
3436                          * the correct byte count.
3437                          */
3438                         DEBUG(3, ("send_file_readX: sendfile sent zero bytes "
3439                                   "falling back to the normal read: %s\n",
3440                                   fsp->fsp_name));
3441                         goto normal_read;
3442                 }
3443
3444                 DEBUG( 3, ( "send_file_readX: sendfile fnum=%d max=%d nread=%d\n",
3445                         fsp->fnum, (int)smb_maxcnt, (int)nread ) );
3446
3447                 /* Deal with possible short send. */
3448                 if (nread != smb_maxcnt + sizeof(headerbuf)) {
3449                         sendfile_short_send(fsp, nread, sizeof(headerbuf), smb_maxcnt);
3450                 }
3451
3452                 /* No outbuf here means successful sendfile. */
3453                 TALLOC_FREE(req->outbuf);
3454                 SMB_PERFCOUNT_SET_MSGLEN_OUT(&req->pcd, nread);
3455                 SMB_PERFCOUNT_END(&req->pcd);
3456                 return;
3457         }
3458 #endif
3459
3460 normal_read:
3461
3462         if ((smb_maxcnt & 0xFF0000) > 0x10000) {
3463                 uint8 headerbuf[smb_size + 2*12];
3464
3465                 construct_reply_common_req(req, (char *)headerbuf);
3466                 setup_readX_header(req, (char *)headerbuf, smb_maxcnt);
3467
3468                 /* Send out the header. */
3469                 if (write_data(smbd_server_fd(), (char *)headerbuf,
3470                                sizeof(headerbuf)) != sizeof(headerbuf)) {
3471                         DEBUG(0,("send_file_readX: write_data failed for file %s (%s). Terminating\n",
3472                                 fsp->fsp_name, strerror(errno) ));
3473                         exit_server_cleanly("send_file_readX sendfile failed");
3474                 }
3475                 nread = fake_sendfile(fsp, startpos, smb_maxcnt);
3476                 if (nread == -1) {
3477                         DEBUG(0,("send_file_readX: fake_sendfile failed for file %s (%s).\n",
3478                                 fsp->fsp_name, strerror(errno) ));
3479                         exit_server_cleanly("send_file_readX: fake_sendfile failed");
3480                 }
3481                 TALLOC_FREE(req->outbuf);
3482                 return;
3483         }
3484
3485         reply_outbuf(req, 12, smb_maxcnt);
3486
3487         nread = read_file(fsp, smb_buf(req->outbuf), startpos, smb_maxcnt);
3488         if (nread < 0) {
3489                 reply_unixerror(req, ERRDOS, ERRnoaccess);
3490                 return;
3491         }
3492
3493         setup_readX_header(req, (char *)req->outbuf, nread);
3494
3495         DEBUG( 3, ( "send_file_readX fnum=%d max=%d nread=%d\n",
3496                     fsp->fnum, (int)smb_maxcnt, (int)nread ) );
3497
3498         chain_reply(req);
3499 }
3500
3501 /****************************************************************************
3502  Reply to a read and X.
3503 ****************************************************************************/
3504
3505 void reply_read_and_X(struct smb_request *req)
3506 {
3507         connection_struct *conn = req->conn;
3508         files_struct *fsp;
3509         SMB_OFF_T startpos;
3510         size_t smb_maxcnt;
3511         struct lock_struct lock;
3512         bool big_readX = False;
3513 #if 0
3514         size_t smb_mincnt = SVAL(req->vwv+6, 0);
3515 #endif
3516
3517         START_PROFILE(SMBreadX);
3518
3519         if ((req->wct != 10) && (req->wct != 12)) {
3520                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
3521                 return;
3522         }
3523
3524         fsp = file_fsp(req, SVAL(req->vwv+2, 0));
3525         startpos = IVAL_TO_SMB_OFF_T(req->vwv+3, 0);
3526         smb_maxcnt = SVAL(req->vwv+5, 0);
3527
3528         /* If it's an IPC, pass off the pipe handler. */
3529         if (IS_IPC(conn)) {
3530                 reply_pipe_read_and_X(req);
3531                 END_PROFILE(SMBreadX);
3532                 return;
3533         }
3534
3535         if (!check_fsp(conn, req, fsp)) {
3536                 END_PROFILE(SMBreadX);
3537                 return;
3538         }
3539
3540         if (!CHECK_READ(fsp,req)) {
3541                 reply_doserror(req, ERRDOS,ERRbadaccess);
3542                 END_PROFILE(SMBreadX);
3543                 return;
3544         }
3545
3546         if (global_client_caps & CAP_LARGE_READX) {
3547                 size_t upper_size = SVAL(req->vwv+7, 0);
3548                 smb_maxcnt |= (upper_size<<16);
3549                 if (upper_size > 1) {
3550                         /* Can't do this on a chained packet. */
3551                         if ((CVAL(req->vwv+0, 0) != 0xFF)) {
3552                                 reply_nterror(req, NT_STATUS_NOT_SUPPORTED);
3553                                 END_PROFILE(SMBreadX);
3554                                 return;
3555                         }
3556                         /* We currently don't do this on signed or sealed data. */
3557                         if (srv_is_signing_active(smbd_server_conn) ||
3558                             is_encrypted_packet(req->inbuf)) {
3559                                 reply_nterror(req, NT_STATUS_NOT_SUPPORTED);
3560                                 END_PROFILE(SMBreadX);
3561                                 return;
3562                         }
3563                         /* Is there room in the reply for this data ? */
3564                         if (smb_maxcnt > (0xFFFFFF - (smb_size -4 + 12*2)))  {
3565                                 reply_nterror(req,
3566                                               NT_STATUS_INVALID_PARAMETER);
3567                                 END_PROFILE(SMBreadX);
3568                                 return;
3569                         }
3570                         big_readX = True;
3571                 }
3572         }
3573
3574         if (req->wct == 12) {
3575 #ifdef LARGE_SMB_OFF_T
3576                 /*
3577                  * This is a large offset (64 bit) read.
3578                  */
3579                 startpos |= (((SMB_OFF_T)IVAL(req->vwv+10, 0)) << 32);
3580
3581 #else /* !LARGE_SMB_OFF_T */
3582
3583                 /*
3584                  * Ensure we haven't been sent a >32 bit offset.
3585                  */
3586
3587                 if(IVAL(req->vwv+10, 0) != 0) {
3588                         DEBUG(0,("reply_read_and_X - large offset (%x << 32) "
3589                                  "used and we don't support 64 bit offsets.\n",
3590                                  (unsigned int)IVAL(req->vwv+10, 0) ));
3591                         END_PROFILE(SMBreadX);
3592                         reply_doserror(req, ERRDOS, ERRbadaccess);
3593                         return;
3594                 }
3595
3596 #endif /* LARGE_SMB_OFF_T */
3597
3598         }
3599
3600         init_strict_lock_struct(fsp, (uint32)req->smbpid,
3601             (uint64_t)startpos, (uint64_t)smb_maxcnt, READ_LOCK,
3602             &lock);
3603
3604         if (!SMB_VFS_STRICT_LOCK(conn, fsp, &lock)) {
3605                 END_PROFILE(SMBreadX);
3606                 reply_doserror(req, ERRDOS, ERRlock);
3607                 return;
3608         }
3609
3610         if (!big_readX &&
3611             schedule_aio_read_and_X(conn, req, fsp, startpos, smb_maxcnt)) {
3612                 goto strict_unlock;
3613         }
3614
3615         send_file_readX(conn, req, fsp, startpos, smb_maxcnt);
3616
3617 strict_unlock:
3618         SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
3619
3620         END_PROFILE(SMBreadX);
3621         return;
3622 }
3623
3624 /****************************************************************************
3625  Error replies to writebraw must have smb_wct == 1. Fix this up.
3626 ****************************************************************************/
3627
3628 void error_to_writebrawerr(struct smb_request *req)
3629 {
3630         uint8 *old_outbuf = req->outbuf;
3631
3632         reply_outbuf(req, 1, 0);
3633
3634         memcpy(req->outbuf, old_outbuf, smb_size);
3635         TALLOC_FREE(old_outbuf);
3636 }
3637
3638 /****************************************************************************
3639  Reply to a writebraw (core+ or LANMAN1.0 protocol).
3640 ****************************************************************************/
3641
3642 void reply_writebraw(struct smb_request *req)
3643 {
3644         connection_struct *conn = req->conn;
3645         char *buf = NULL;
3646         ssize_t nwritten=0;
3647         ssize_t total_written=0;
3648         size_t numtowrite=0;
3649         size_t tcount;
3650         SMB_OFF_T startpos;
3651         char *data=NULL;
3652         bool write_through;
3653         files_struct *fsp;
3654         struct lock_struct lock;
3655         NTSTATUS status;
3656
3657         START_PROFILE(SMBwritebraw);
3658
3659         /*
3660          * If we ever reply with an error, it must have the SMB command
3661          * type of SMBwritec, not SMBwriteBraw, as this tells the client
3662          * we're finished.
3663          */
3664         SCVAL(req->inbuf,smb_com,SMBwritec);
3665
3666         if (srv_is_signing_active(smbd_server_conn)) {
3667                 END_PROFILE(SMBwritebraw);
3668                 exit_server_cleanly("reply_writebraw: SMB signing is active - "
3669                                 "raw reads/writes are disallowed.");
3670         }
3671
3672         if (req->wct < 12) {
3673                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
3674                 error_to_writebrawerr(req);
3675                 END_PROFILE(SMBwritebraw);
3676                 return;
3677         }
3678
3679         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
3680         if (!check_fsp(conn, req, fsp)) {
3681                 error_to_writebrawerr(req);
3682                 END_PROFILE(SMBwritebraw);
3683                 return;
3684         }
3685
3686         if (!CHECK_WRITE(fsp)) {
3687                 reply_doserror(req, ERRDOS, ERRbadaccess);
3688                 error_to_writebrawerr(req);
3689                 END_PROFILE(SMBwritebraw);
3690                 return;
3691         }
3692
3693         tcount = IVAL(req->vwv+1, 0);
3694         startpos = IVAL_TO_SMB_OFF_T(req->vwv+3, 0);
3695         write_through = BITSETW(req->vwv+7,0);
3696
3697         /* We have to deal with slightly different formats depending
3698                 on whether we are using the core+ or lanman1.0 protocol */
3699
3700         if(Protocol <= PROTOCOL_COREPLUS) {
3701                 numtowrite = SVAL(smb_buf(req->inbuf),-2);
3702                 data = smb_buf(req->inbuf);
3703         } else {
3704                 numtowrite = SVAL(req->vwv+10, 0);
3705                 data = smb_base(req->inbuf) + SVAL(req->vwv+11, 0);
3706         }
3707
3708         /* Ensure we don't write bytes past the end of this packet. */
3709         if (data + numtowrite > smb_base(req->inbuf) + smb_len(req->inbuf)) {
3710                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
3711                 error_to_writebrawerr(req);
3712                 END_PROFILE(SMBwritebraw);
3713                 return;
3714         }
3715
3716         init_strict_lock_struct(fsp, (uint32)req->smbpid,
3717             (uint64_t)startpos, (uint64_t)tcount, WRITE_LOCK,
3718             &lock);
3719
3720         if (!SMB_VFS_STRICT_LOCK(conn, fsp, &lock)) {
3721                 reply_doserror(req, ERRDOS, ERRlock);
3722                 error_to_writebrawerr(req);
3723                 END_PROFILE(SMBwritebraw);
3724                 return;
3725         }
3726
3727         if (numtowrite>0) {
3728                 nwritten = write_file(req,fsp,data,startpos,numtowrite);
3729         }
3730
3731         DEBUG(3,("reply_writebraw: initial write fnum=%d start=%.0f num=%d "
3732                         "wrote=%d sync=%d\n",
3733                 fsp->fnum, (double)startpos, (int)numtowrite,
3734                 (int)nwritten, (int)write_through));
3735
3736         if (nwritten < (ssize_t)numtowrite)  {
3737                 reply_unixerror(req, ERRHRD, ERRdiskfull);
3738                 error_to_writebrawerr(req);
3739                 goto strict_unlock;
3740         }
3741
3742         total_written = nwritten;
3743
3744         /* Allocate a buffer of 64k + length. */
3745         buf = TALLOC_ARRAY(NULL, char, 65540);
3746         if (!buf) {
3747                 reply_doserror(req, ERRDOS, ERRnomem);
3748                 error_to_writebrawerr(req);
3749                 goto strict_unlock;
3750         }
3751
3752         /* Return a SMBwritebraw message to the redirector to tell
3753          * it to send more bytes */
3754
3755         memcpy(buf, req->inbuf, smb_size);
3756         srv_set_message(buf,Protocol>PROTOCOL_COREPLUS?1:0,0,True);
3757         SCVAL(buf,smb_com,SMBwritebraw);
3758         SSVALS(buf,smb_vwv0,0xFFFF);
3759         show_msg(buf);
3760         if (!srv_send_smb(smbd_server_fd(),
3761                           buf,
3762                           false, 0, /* no signing */
3763                           IS_CONN_ENCRYPTED(conn),
3764                           &req->pcd)) {
3765                 exit_server_cleanly("reply_writebraw: srv_send_smb "
3766                         "failed.");
3767         }
3768
3769         /* Now read the raw data into the buffer and write it */
3770         status = read_smb_length(smbd_server_fd(), buf, SMB_SECONDARY_WAIT,
3771                                  &numtowrite);
3772         if (!NT_STATUS_IS_OK(status)) {
3773                 exit_server_cleanly("secondary writebraw failed");
3774         }
3775
3776         /* Set up outbuf to return the correct size */
3777         reply_outbuf(req, 1, 0);
3778
3779         if (numtowrite != 0) {
3780
3781                 if (numtowrite > 0xFFFF) {
3782                         DEBUG(0,("reply_writebraw: Oversize secondary write "
3783                                 "raw requested (%u). Terminating\n",
3784                                 (unsigned int)numtowrite ));
3785                         exit_server_cleanly("secondary writebraw failed");
3786                 }
3787
3788                 if (tcount > nwritten+numtowrite) {
3789                         DEBUG(3,("reply_writebraw: Client overestimated the "
3790                                 "write %d %d %d\n",
3791                                 (int)tcount,(int)nwritten,(int)numtowrite));
3792                 }
3793
3794                 status = read_data(smbd_server_fd(), buf+4, numtowrite);
3795
3796                 if (!NT_STATUS_IS_OK(status)) {
3797                         DEBUG(0,("reply_writebraw: Oversize secondary write "
3798                                  "raw read failed (%s). Terminating\n",
3799                                  nt_errstr(status)));
3800                         exit_server_cleanly("secondary writebraw failed");
3801                 }
3802
3803                 nwritten = write_file(req,fsp,buf+4,startpos+nwritten,numtowrite);
3804                 if (nwritten == -1) {
3805                         TALLOC_FREE(buf);
3806                         reply_unixerror(req, ERRHRD, ERRdiskfull);
3807                         error_to_writebrawerr(req);
3808                         goto strict_unlock;
3809                 }
3810
3811                 if (nwritten < (ssize_t)numtowrite) {
3812                         SCVAL(req->outbuf,smb_rcls,ERRHRD);
3813                         SSVAL(req->outbuf,smb_err,ERRdiskfull);
3814                 }
3815
3816                 if (nwritten > 0) {
3817                         total_written += nwritten;
3818                 }
3819         }
3820
3821         TALLOC_FREE(buf);
3822         SSVAL(req->outbuf,smb_vwv0,total_written);
3823
3824         status = sync_file(conn, fsp, write_through);
3825         if (!NT_STATUS_IS_OK(status)) {
3826                 DEBUG(5,("reply_writebraw: sync_file for %s returned %s\n",
3827                         fsp->fsp_name, nt_errstr(status) ));
3828                 reply_nterror(req, status);
3829                 error_to_writebrawerr(req);
3830                 goto strict_unlock;
3831         }
3832
3833         DEBUG(3,("reply_writebraw: secondart write fnum=%d start=%.0f num=%d "
3834                 "wrote=%d\n",
3835                 fsp->fnum, (double)startpos, (int)numtowrite,
3836                 (int)total_written));
3837
3838         SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
3839
3840         /* We won't return a status if write through is not selected - this
3841          * follows what WfWg does */
3842         END_PROFILE(SMBwritebraw);
3843
3844         if (!write_through && total_written==tcount) {
3845
3846 #if RABBIT_PELLET_FIX
3847                 /*
3848                  * Fix for "rabbit pellet" mode, trigger an early TCP ack by
3849                  * sending a SMBkeepalive. Thanks to DaveCB at Sun for this.
3850                  * JRA.
3851                  */
3852                 if (!send_keepalive(smbd_server_fd())) {
3853                         exit_server_cleanly("reply_writebraw: send of "
3854                                 "keepalive failed");
3855                 }
3856 #endif
3857                 TALLOC_FREE(req->outbuf);
3858         }
3859         return;
3860
3861 strict_unlock:
3862         SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
3863
3864         END_PROFILE(SMBwritebraw);
3865         return;
3866 }
3867
3868 #undef DBGC_CLASS
3869 #define DBGC_CLASS DBGC_LOCKING
3870
3871 /****************************************************************************
3872  Reply to a writeunlock (core+).
3873 ****************************************************************************/
3874
3875 void reply_writeunlock(struct smb_request *req)
3876 {
3877         connection_struct *conn = req->conn;
3878         ssize_t nwritten = -1;
3879         size_t numtowrite;
3880         SMB_OFF_T startpos;
3881         const char *data;
3882         NTSTATUS status = NT_STATUS_OK;
3883         files_struct *fsp;
3884         struct lock_struct lock;
3885
3886         START_PROFILE(SMBwriteunlock);
3887
3888         if (req->wct < 5) {
3889                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
3890                 END_PROFILE(SMBwriteunlock);
3891                 return;
3892         }
3893
3894         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
3895
3896         if (!check_fsp(conn, req, fsp)) {
3897                 END_PROFILE(SMBwriteunlock);
3898                 return;
3899         }
3900
3901         if (!CHECK_WRITE(fsp)) {
3902                 reply_doserror(req, ERRDOS,ERRbadaccess);
3903                 END_PROFILE(SMBwriteunlock);
3904                 return;
3905         }
3906
3907         numtowrite = SVAL(req->vwv+1, 0);
3908         startpos = IVAL_TO_SMB_OFF_T(req->vwv+2, 0);
3909         data = (const char *)req->buf + 3;
3910
3911         if (numtowrite) {
3912                 init_strict_lock_struct(fsp, (uint32)req->smbpid,
3913                     (uint64_t)startpos, (uint64_t)numtowrite, WRITE_LOCK,
3914                     &lock);
3915
3916                 if (!SMB_VFS_STRICT_LOCK(conn, fsp, &lock)) {
3917                         reply_doserror(req, ERRDOS, ERRlock);
3918                         END_PROFILE(SMBwriteunlock);
3919                         return;
3920                 }
3921         }
3922
3923         /* The special X/Open SMB protocol handling of
3924            zero length writes is *NOT* done for
3925            this call */
3926         if(numtowrite == 0) {
3927                 nwritten = 0;
3928         } else {
3929                 nwritten = write_file(req,fsp,data,startpos,numtowrite);
3930         }
3931
3932         status = sync_file(conn, fsp, False /* write through */);
3933         if (!NT_STATUS_IS_OK(status)) {
3934                 DEBUG(5,("reply_writeunlock: sync_file for %s returned %s\n",
3935                         fsp->fsp_name, nt_errstr(status) ));
3936                 reply_nterror(req, status);
3937                 goto strict_unlock;
3938         }
3939
3940         if(((nwritten < numtowrite) && (numtowrite != 0))||(nwritten < 0)) {
3941                 reply_unixerror(req, ERRHRD, ERRdiskfull);
3942                 goto strict_unlock;
3943         }
3944
3945         if (numtowrite) {
3946                 status = do_unlock(smbd_messaging_context(),
3947                                 fsp,
3948                                 req->smbpid,
3949                                 (uint64_t)numtowrite,
3950                                 (uint64_t)startpos,
3951                                 WINDOWS_LOCK);
3952
3953                 if (NT_STATUS_V(status)) {
3954                         reply_nterror(req, status);
3955                         goto strict_unlock;
3956                 }
3957         }
3958
3959         reply_outbuf(req, 1, 0);
3960
3961         SSVAL(req->outbuf,smb_vwv0,nwritten);
3962
3963         DEBUG(3,("writeunlock fnum=%d num=%d wrote=%d\n",
3964                  fsp->fnum, (int)numtowrite, (int)nwritten));
3965
3966 strict_unlock:
3967         if (numtowrite) {
3968                 SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
3969         }
3970
3971         END_PROFILE(SMBwriteunlock);
3972         return;
3973 }
3974
3975 #undef DBGC_CLASS
3976 #define DBGC_CLASS DBGC_ALL
3977
3978 /****************************************************************************
3979  Reply to a write.
3980 ****************************************************************************/
3981
3982 void reply_write(struct smb_request *req)
3983 {
3984         connection_struct *conn = req->conn;
3985         size_t numtowrite;
3986         ssize_t nwritten = -1;
3987         SMB_OFF_T startpos;
3988         const char *data;
3989         files_struct *fsp;
3990         struct lock_struct lock;
3991         NTSTATUS status;
3992
3993         START_PROFILE(SMBwrite);
3994
3995         if (req->wct < 5) {
3996                 END_PROFILE(SMBwrite);
3997                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
3998                 return;
3999         }
4000
4001         /* If it's an IPC, pass off the pipe handler. */
4002         if (IS_IPC(conn)) {
4003                 reply_pipe_write(req);
4004                 END_PROFILE(SMBwrite);
4005                 return;
4006         }
4007
4008         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
4009
4010         if (!check_fsp(conn, req, fsp)) {
4011                 END_PROFILE(SMBwrite);
4012                 return;
4013         }
4014
4015         if (!CHECK_WRITE(fsp)) {
4016                 reply_doserror(req, ERRDOS, ERRbadaccess);
4017                 END_PROFILE(SMBwrite);
4018                 return;
4019         }
4020
4021         numtowrite = SVAL(req->vwv+1, 0);
4022         startpos = IVAL_TO_SMB_OFF_T(req->vwv+2, 0);
4023         data = (const char *)req->buf + 3;
4024
4025         init_strict_lock_struct(fsp, (uint32)req->smbpid,
4026             (uint64_t)startpos, (uint64_t)numtowrite, WRITE_LOCK,
4027             &lock);
4028
4029         if (!SMB_VFS_STRICT_LOCK(conn, fsp, &lock)) {
4030                 reply_doserror(req, ERRDOS, ERRlock);
4031                 END_PROFILE(SMBwrite);
4032                 return;
4033         }
4034
4035         /*
4036          * X/Open SMB protocol says that if smb_vwv1 is
4037          * zero then the file size should be extended or
4038          * truncated to the size given in smb_vwv[2-3].
4039          */
4040
4041         if(numtowrite == 0) {
4042                 /*
4043                  * This is actually an allocate call, and set EOF. JRA.
4044                  */
4045                 nwritten = vfs_allocate_file_space(fsp, (SMB_OFF_T)startpos);
4046                 if (nwritten < 0) {
4047                         reply_nterror(req, NT_STATUS_DISK_FULL);
4048                         goto strict_unlock;
4049                 }
4050                 nwritten = vfs_set_filelen(fsp, (SMB_OFF_T)startpos);
4051                 if (nwritten < 0) {
4052                         reply_nterror(req, NT_STATUS_DISK_FULL);
4053                         goto strict_unlock;
4054                 }
4055                 trigger_write_time_update_immediate(fsp);
4056         } else {
4057                 nwritten = write_file(req,fsp,data,startpos,numtowrite);
4058         }
4059
4060         status = sync_file(conn, fsp, False);
4061         if (!NT_STATUS_IS_OK(status)) {
4062                 DEBUG(5,("reply_write: sync_file for %s returned %s\n",
4063                         fsp->fsp_name, nt_errstr(status) ));
4064                 reply_nterror(req, status);
4065                 goto strict_unlock;
4066         }
4067
4068         if(((nwritten == 0) && (numtowrite != 0))||(nwritten < 0)) {
4069                 reply_unixerror(req, ERRHRD, ERRdiskfull);
4070                 goto strict_unlock;
4071         }
4072
4073         reply_outbuf(req, 1, 0);
4074
4075         SSVAL(req->outbuf,smb_vwv0,nwritten);
4076
4077         if (nwritten < (ssize_t)numtowrite) {
4078                 SCVAL(req->outbuf,smb_rcls,ERRHRD);
4079                 SSVAL(req->outbuf,smb_err,ERRdiskfull);
4080         }
4081
4082         DEBUG(3,("write fnum=%d num=%d wrote=%d\n", fsp->fnum, (int)numtowrite, (int)nwritten));
4083
4084 strict_unlock:
4085         SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
4086
4087         END_PROFILE(SMBwrite);
4088         return;
4089 }
4090
4091 /****************************************************************************
4092  Ensure a buffer is a valid writeX for recvfile purposes.
4093 ****************************************************************************/
4094
4095 #define STANDARD_WRITE_AND_X_HEADER_SIZE (smb_size - 4 + /* basic header */ \
4096                                                 (2*14) + /* word count (including bcc) */ \
4097                                                 1 /* pad byte */)
4098
4099 bool is_valid_writeX_buffer(const uint8_t *inbuf)
4100 {
4101         size_t numtowrite;
4102         connection_struct *conn = NULL;
4103         unsigned int doff = 0;
4104         size_t len = smb_len_large(inbuf);
4105
4106         if (is_encrypted_packet(inbuf)) {
4107                 /* Can't do this on encrypted
4108                  * connections. */
4109                 return false;
4110         }
4111
4112         if (CVAL(inbuf,smb_com) != SMBwriteX) {
4113                 return false;
4114         }
4115
4116         if (CVAL(inbuf,smb_vwv0) != 0xFF ||
4117                         CVAL(inbuf,smb_wct) != 14) {
4118                 DEBUG(10,("is_valid_writeX_buffer: chained or "
4119                         "invalid word length.\n"));
4120                 return false;
4121         }
4122
4123         conn = conn_find(SVAL(inbuf, smb_tid));
4124         if (conn == NULL) {
4125                 DEBUG(10,("is_valid_writeX_buffer: bad tid\n"));
4126                 return false;
4127         }
4128         if (IS_IPC(conn)) {
4129                 DEBUG(10,("is_valid_writeX_buffer: IPC$ tid\n"));
4130                 return false;
4131         }
4132         if (IS_PRINT(conn)) {
4133                 DEBUG(10,("is_valid_writeX_buffer: printing tid\n"));
4134                 return false;
4135         }
4136         doff = SVAL(inbuf,smb_vwv11);
4137
4138         numtowrite = SVAL(inbuf,smb_vwv10);
4139
4140         if (len > doff && len - doff > 0xFFFF) {
4141                 numtowrite |= (((size_t)SVAL(inbuf,smb_vwv9))<<16);
4142         }
4143
4144         if (numtowrite == 0) {
4145                 DEBUG(10,("is_valid_writeX_buffer: zero write\n"));
4146                 return false;
4147         }
4148
4149         /* Ensure the sizes match up. */
4150         if (doff < STANDARD_WRITE_AND_X_HEADER_SIZE) {
4151                 /* no pad byte...old smbclient :-( */
4152                 DEBUG(10,("is_valid_writeX_buffer: small doff %u (min %u)\n",
4153                         (unsigned int)doff,
4154                         (unsigned int)STANDARD_WRITE_AND_X_HEADER_SIZE));
4155                 return false;
4156         }
4157
4158         if (len - doff != numtowrite) {
4159                 DEBUG(10,("is_valid_writeX_buffer: doff mismatch "
4160                         "len = %u, doff = %u, numtowrite = %u\n",
4161                         (unsigned int)len,
4162                         (unsigned int)doff,
4163                         (unsigned int)numtowrite ));
4164                 return false;
4165         }
4166
4167         DEBUG(10,("is_valid_writeX_buffer: true "
4168                 "len = %u, doff = %u, numtowrite = %u\n",
4169                 (unsigned int)len,
4170                 (unsigned int)doff,
4171                 (unsigned int)numtowrite ));
4172
4173         return true;
4174 }
4175
4176 /****************************************************************************
4177  Reply to a write and X.
4178 ****************************************************************************/
4179
4180 void reply_write_and_X(struct smb_request *req)
4181 {
4182         connection_struct *conn = req->conn;
4183         files_struct *fsp;
4184         struct lock_struct lock;
4185         SMB_OFF_T startpos;
4186         size_t numtowrite;
4187         bool write_through;
4188         ssize_t nwritten;
4189         unsigned int smb_doff;
4190         unsigned int smblen;
4191         char *data;
4192         NTSTATUS status;
4193
4194         START_PROFILE(SMBwriteX);
4195
4196         if ((req->wct != 12) && (req->wct != 14)) {
4197                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4198                 END_PROFILE(SMBwriteX);
4199                 return;
4200         }
4201
4202         numtowrite = SVAL(req->vwv+10, 0);
4203         smb_doff = SVAL(req->vwv+11, 0);
4204         smblen = smb_len(req->inbuf);
4205
4206         if (req->unread_bytes > 0xFFFF ||
4207                         (smblen > smb_doff &&
4208                                 smblen - smb_doff > 0xFFFF)) {
4209                 numtowrite |= (((size_t)SVAL(req->vwv+9, 0))<<16);
4210         }
4211
4212         if (req->unread_bytes) {
4213                 /* Can't do a recvfile write on IPC$ */
4214                 if (IS_IPC(conn)) {
4215                         reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4216                         END_PROFILE(SMBwriteX);
4217                         return;
4218                 }
4219                 if (numtowrite != req->unread_bytes) {
4220                         reply_doserror(req, ERRDOS, ERRbadmem);
4221                         END_PROFILE(SMBwriteX);
4222                         return;
4223                 }
4224         } else {
4225                 if (smb_doff > smblen || smb_doff + numtowrite < numtowrite ||
4226                                 smb_doff + numtowrite > smblen) {
4227                         reply_doserror(req, ERRDOS, ERRbadmem);
4228                         END_PROFILE(SMBwriteX);
4229                         return;
4230                 }
4231         }
4232
4233         /* If it's an IPC, pass off the pipe handler. */
4234         if (IS_IPC(conn)) {
4235                 if (req->unread_bytes) {
4236                         reply_doserror(req, ERRDOS, ERRbadmem);
4237                         END_PROFILE(SMBwriteX);
4238                         return;
4239                 }
4240                 reply_pipe_write_and_X(req);
4241                 END_PROFILE(SMBwriteX);
4242                 return;
4243         }
4244
4245         fsp = file_fsp(req, SVAL(req->vwv+2, 0));
4246         startpos = IVAL_TO_SMB_OFF_T(req->vwv+3, 0);
4247         write_through = BITSETW(req->vwv+7,0);
4248
4249         if (!check_fsp(conn, req, fsp)) {
4250                 END_PROFILE(SMBwriteX);
4251                 return;
4252         }
4253
4254         if (!CHECK_WRITE(fsp)) {
4255                 reply_doserror(req, ERRDOS, ERRbadaccess);
4256                 END_PROFILE(SMBwriteX);
4257                 return;
4258         }
4259
4260         data = smb_base(req->inbuf) + smb_doff;
4261
4262         if(req->wct == 14) {
4263 #ifdef LARGE_SMB_OFF_T
4264                 /*
4265                  * This is a large offset (64 bit) write.
4266                  */
4267                 startpos |= (((SMB_OFF_T)IVAL(req->vwv+12, 0)) << 32);
4268
4269 #else /* !LARGE_SMB_OFF_T */
4270
4271                 /*
4272                  * Ensure we haven't been sent a >32 bit offset.
4273                  */
4274
4275                 if(IVAL(req->vwv+12, 0) != 0) {
4276                         DEBUG(0,("reply_write_and_X - large offset (%x << 32) "
4277                                  "used and we don't support 64 bit offsets.\n",
4278                                  (unsigned int)IVAL(req->vwv+12, 0) ));
4279                         reply_doserror(req, ERRDOS, ERRbadaccess);
4280                         END_PROFILE(SMBwriteX);
4281                         return;
4282                 }
4283
4284 #endif /* LARGE_SMB_OFF_T */
4285         }
4286
4287         init_strict_lock_struct(fsp, (uint32)req->smbpid,
4288             (uint64_t)startpos, (uint64_t)numtowrite, WRITE_LOCK,
4289             &lock);
4290
4291         if (!SMB_VFS_STRICT_LOCK(conn, fsp, &lock)) {
4292                 reply_doserror(req, ERRDOS, ERRlock);
4293                 END_PROFILE(SMBwriteX);
4294                 return;
4295         }
4296
4297         /* X/Open SMB protocol says that, unlike SMBwrite
4298         if the length is zero then NO truncation is
4299         done, just a write of zero. To truncate a file,
4300         use SMBwrite. */
4301
4302         if(numtowrite == 0) {
4303                 nwritten = 0;
4304         } else {
4305
4306                 if ((req->unread_bytes == 0) &&
4307                     schedule_aio_write_and_X(conn, req, fsp, data, startpos,
4308                                              numtowrite)) {
4309                         goto strict_unlock;
4310                 }
4311
4312                 nwritten = write_file(req,fsp,data,startpos,numtowrite);
4313         }
4314
4315         if(((nwritten == 0) && (numtowrite != 0))||(nwritten < 0)) {
4316                 reply_unixerror(req, ERRHRD, ERRdiskfull);
4317                 goto strict_unlock;
4318         }
4319
4320         reply_outbuf(req, 6, 0);
4321         SSVAL(req->outbuf,smb_vwv2,nwritten);
4322         SSVAL(req->outbuf,smb_vwv4,nwritten>>16);
4323
4324         if (nwritten < (ssize_t)numtowrite) {
4325                 SCVAL(req->outbuf,smb_rcls,ERRHRD);
4326                 SSVAL(req->outbuf,smb_err,ERRdiskfull);
4327         }
4328
4329         DEBUG(3,("writeX fnum=%d num=%d wrote=%d\n",
4330                 fsp->fnum, (int)numtowrite, (int)nwritten));
4331
4332         status = sync_file(conn, fsp, write_through);
4333         if (!NT_STATUS_IS_OK(status)) {
4334                 DEBUG(5,("reply_write_and_X: sync_file for %s returned %s\n",
4335                         fsp->fsp_name, nt_errstr(status) ));
4336                 reply_nterror(req, status);
4337                 goto strict_unlock;
4338         }
4339
4340         SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
4341
4342         END_PROFILE(SMBwriteX);
4343         chain_reply(req);
4344         return;
4345
4346 strict_unlock:
4347         SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
4348
4349         END_PROFILE(SMBwriteX);
4350         return;
4351 }
4352
4353 /****************************************************************************
4354  Reply to a lseek.
4355 ****************************************************************************/
4356
4357 void reply_lseek(struct smb_request *req)
4358 {
4359         connection_struct *conn = req->conn;
4360         SMB_OFF_T startpos;
4361         SMB_OFF_T res= -1;
4362         int mode,umode;
4363         files_struct *fsp;
4364
4365         START_PROFILE(SMBlseek);
4366
4367         if (req->wct < 4) {
4368                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4369                 END_PROFILE(SMBlseek);
4370                 return;
4371         }
4372
4373         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
4374
4375         if (!check_fsp(conn, req, fsp)) {
4376                 return;
4377         }
4378
4379         flush_write_cache(fsp, SEEK_FLUSH);
4380
4381         mode = SVAL(req->vwv+1, 0) & 3;
4382         /* NB. This doesn't use IVAL_TO_SMB_OFF_T as startpos can be signed in this case. */
4383         startpos = (SMB_OFF_T)IVALS(req->vwv+2, 0);
4384
4385         switch (mode) {
4386                 case 0:
4387                         umode = SEEK_SET;
4388                         res = startpos;
4389                         break;
4390                 case 1:
4391                         umode = SEEK_CUR;
4392                         res = fsp->fh->pos + startpos;
4393                         break;
4394                 case 2:
4395                         umode = SEEK_END;
4396                         break;
4397                 default:
4398                         umode = SEEK_SET;
4399                         res = startpos;
4400                         break;
4401         }
4402
4403         if (umode == SEEK_END) {
4404                 if((res = SMB_VFS_LSEEK(fsp,startpos,umode)) == -1) {
4405                         if(errno == EINVAL) {
4406                                 SMB_OFF_T current_pos = startpos;
4407                                 SMB_STRUCT_STAT sbuf;
4408
4409                                 if(SMB_VFS_FSTAT(fsp, &sbuf) == -1) {
4410                                         reply_unixerror(req, ERRDOS,
4411                                                         ERRnoaccess);
4412                                         END_PROFILE(SMBlseek);
4413                                         return;
4414                                 }
4415
4416                                 current_pos += sbuf.st_size;
4417                                 if(current_pos < 0)
4418                                         res = SMB_VFS_LSEEK(fsp,0,SEEK_SET);
4419                         }
4420                 }
4421
4422                 if(res == -1) {
4423                         reply_unixerror(req, ERRDOS, ERRnoaccess);
4424                         END_PROFILE(SMBlseek);
4425                         return;
4426                 }
4427         }
4428
4429         fsp->fh->pos = res;
4430
4431         reply_outbuf(req, 2, 0);
4432         SIVAL(req->outbuf,smb_vwv0,res);
4433
4434         DEBUG(3,("lseek fnum=%d ofs=%.0f newpos = %.0f mode=%d\n",
4435                 fsp->fnum, (double)startpos, (double)res, mode));
4436
4437         END_PROFILE(SMBlseek);
4438         return;
4439 }
4440
4441 /****************************************************************************
4442  Reply to a flush.
4443 ****************************************************************************/
4444
4445 void reply_flush(struct smb_request *req)
4446 {
4447         connection_struct *conn = req->conn;
4448         uint16 fnum;
4449         files_struct *fsp;
4450
4451         START_PROFILE(SMBflush);
4452
4453         if (req->wct < 1) {
4454                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4455                 return;
4456         }
4457
4458         fnum = SVAL(req->vwv+0, 0);
4459         fsp = file_fsp(req, fnum);
4460
4461         if ((fnum != 0xFFFF) && !check_fsp(conn, req, fsp)) {
4462                 return;
4463         }
4464
4465         if (!fsp) {
4466                 file_sync_all(conn);
4467         } else {
4468                 NTSTATUS status = sync_file(conn, fsp, True);
4469                 if (!NT_STATUS_IS_OK(status)) {
4470                         DEBUG(5,("reply_flush: sync_file for %s returned %s\n",
4471                                 fsp->fsp_name, nt_errstr(status) ));
4472                         reply_nterror(req, status);
4473                         END_PROFILE(SMBflush);
4474                         return;
4475                 }
4476         }
4477
4478         reply_outbuf(req, 0, 0);
4479
4480         DEBUG(3,("flush\n"));
4481         END_PROFILE(SMBflush);
4482         return;
4483 }
4484
4485 /****************************************************************************
4486  Reply to a exit.
4487  conn POINTER CAN BE NULL HERE !
4488 ****************************************************************************/
4489
4490 void reply_exit(struct smb_request *req)
4491 {
4492         START_PROFILE(SMBexit);
4493
4494         file_close_pid(req->smbpid, req->vuid);
4495
4496         reply_outbuf(req, 0, 0);
4497
4498         DEBUG(3,("exit\n"));
4499
4500         END_PROFILE(SMBexit);
4501         return;
4502 }
4503
4504 /****************************************************************************
4505  Reply to a close - has to deal with closing a directory opened by NT SMB's.
4506 ****************************************************************************/
4507
4508 void reply_close(struct smb_request *req)
4509 {
4510         connection_struct *conn = req->conn;
4511         NTSTATUS status = NT_STATUS_OK;
4512         files_struct *fsp = NULL;
4513         START_PROFILE(SMBclose);
4514
4515         if (req->wct < 3) {
4516                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4517                 END_PROFILE(SMBclose);
4518                 return;
4519         }
4520
4521         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
4522
4523         /*
4524          * We can only use check_fsp if we know it's not a directory.
4525          */
4526
4527         if(!fsp || (fsp->conn != conn) || (fsp->vuid != req->vuid)) {
4528                 reply_doserror(req, ERRDOS, ERRbadfid);
4529                 END_PROFILE(SMBclose);
4530                 return;
4531         }
4532
4533         if(fsp->is_directory) {
4534                 /*
4535                  * Special case - close NT SMB directory handle.
4536                  */
4537                 DEBUG(3,("close directory fnum=%d\n", fsp->fnum));
4538                 status = close_file(req, fsp, NORMAL_CLOSE);
4539         } else {
4540                 time_t t;
4541                 /*
4542                  * Close ordinary file.
4543                  */
4544
4545                 DEBUG(3,("close fd=%d fnum=%d (numopen=%d)\n",
4546                          fsp->fh->fd, fsp->fnum,
4547                          conn->num_files_open));
4548
4549                 /*
4550                  * Take care of any time sent in the close.
4551                  */
4552
4553                 t = srv_make_unix_date3(req->vwv+1);
4554                 set_close_write_time(fsp, convert_time_t_to_timespec(t));
4555
4556                 /*
4557                  * close_file() returns the unix errno if an error
4558                  * was detected on close - normally this is due to
4559                  * a disk full error. If not then it was probably an I/O error.
4560                  */
4561
4562                 status = close_file(req, fsp, NORMAL_CLOSE);
4563         }
4564
4565         if (!NT_STATUS_IS_OK(status)) {
4566                 reply_nterror(req, status);
4567                 END_PROFILE(SMBclose);
4568                 return;
4569         }
4570
4571         reply_outbuf(req, 0, 0);
4572         END_PROFILE(SMBclose);
4573         return;
4574 }
4575
4576 /****************************************************************************
4577  Reply to a writeclose (Core+ protocol).
4578 ****************************************************************************/
4579
4580 void reply_writeclose(struct smb_request *req)
4581 {
4582         connection_struct *conn = req->conn;
4583         size_t numtowrite;
4584         ssize_t nwritten = -1;
4585         NTSTATUS close_status = NT_STATUS_OK;
4586         SMB_OFF_T startpos;
4587         const char *data;
4588         struct timespec mtime;
4589         files_struct *fsp;
4590         struct lock_struct lock;
4591
4592         START_PROFILE(SMBwriteclose);
4593
4594         if (req->wct < 6) {
4595                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4596                 END_PROFILE(SMBwriteclose);
4597                 return;
4598         }
4599
4600         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
4601
4602         if (!check_fsp(conn, req, fsp)) {
4603                 END_PROFILE(SMBwriteclose);
4604                 return;
4605         }
4606         if (!CHECK_WRITE(fsp)) {
4607                 reply_doserror(req, ERRDOS,ERRbadaccess);
4608                 END_PROFILE(SMBwriteclose);
4609                 return;
4610         }
4611
4612         numtowrite = SVAL(req->vwv+1, 0);
4613         startpos = IVAL_TO_SMB_OFF_T(req->vwv+2, 0);
4614         mtime = convert_time_t_to_timespec(srv_make_unix_date3(req->vwv+4));
4615         data = (const char *)req->buf + 1;
4616
4617         if (numtowrite) {
4618                 init_strict_lock_struct(fsp, (uint32)req->smbpid,
4619                     (uint64_t)startpos, (uint64_t)numtowrite, WRITE_LOCK,
4620                     &lock);
4621
4622                 if (!SMB_VFS_STRICT_LOCK(conn, fsp, &lock)) {
4623                         reply_doserror(req, ERRDOS,ERRlock);
4624                         END_PROFILE(SMBwriteclose);
4625                         return;
4626                 }
4627         }
4628
4629         nwritten = write_file(req,fsp,data,startpos,numtowrite);
4630
4631         set_close_write_time(fsp, mtime);
4632
4633         /*
4634          * More insanity. W2K only closes the file if writelen > 0.
4635          * JRA.
4636          */
4637
4638         if (numtowrite) {
4639                 DEBUG(3,("reply_writeclose: zero length write doesn't close file %s\n",
4640                         fsp->fsp_name ));
4641                 close_status = close_file(req, fsp, NORMAL_CLOSE);
4642         }
4643
4644         DEBUG(3,("writeclose fnum=%d num=%d wrote=%d (numopen=%d)\n",
4645                  fsp->fnum, (int)numtowrite, (int)nwritten,
4646                  conn->num_files_open));
4647
4648         if(((nwritten == 0) && (numtowrite != 0))||(nwritten < 0)) {
4649                 reply_doserror(req, ERRHRD, ERRdiskfull);
4650                 goto strict_unlock;
4651         }
4652
4653         if(!NT_STATUS_IS_OK(close_status)) {
4654                 reply_nterror(req, close_status);
4655                 goto strict_unlock;
4656         }
4657
4658         reply_outbuf(req, 1, 0);
4659
4660         SSVAL(req->outbuf,smb_vwv0,nwritten);
4661
4662 strict_unlock:
4663         if (numtowrite) {
4664                 SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
4665         }
4666
4667         END_PROFILE(SMBwriteclose);
4668         return;
4669 }
4670
4671 #undef DBGC_CLASS
4672 #define DBGC_CLASS DBGC_LOCKING
4673
4674 /****************************************************************************
4675  Reply to a lock.
4676 ****************************************************************************/
4677
4678 void reply_lock(struct smb_request *req)
4679 {
4680         connection_struct *conn = req->conn;
4681         uint64_t count,offset;
4682         NTSTATUS status;
4683         files_struct *fsp;
4684         struct byte_range_lock *br_lck = NULL;
4685
4686         START_PROFILE(SMBlock);
4687
4688         if (req->wct < 5) {
4689                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4690                 END_PROFILE(SMBlock);
4691                 return;
4692         }
4693
4694         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
4695
4696         if (!check_fsp(conn, req, fsp)) {
4697                 END_PROFILE(SMBlock);
4698                 return;
4699         }
4700
4701         count = (uint64_t)IVAL(req->vwv+1, 0);
4702         offset = (uint64_t)IVAL(req->vwv+3, 0);
4703
4704         DEBUG(3,("lock fd=%d fnum=%d offset=%.0f count=%.0f\n",
4705                  fsp->fh->fd, fsp->fnum, (double)offset, (double)count));
4706
4707         br_lck = do_lock(smbd_messaging_context(),
4708                         fsp,
4709                         req->smbpid,
4710                         count,
4711                         offset,
4712                         WRITE_LOCK,
4713                         WINDOWS_LOCK,
4714                         False, /* Non-blocking lock. */
4715                         &status,
4716                         NULL,
4717                         NULL);
4718
4719         TALLOC_FREE(br_lck);
4720
4721         if (NT_STATUS_V(status)) {
4722                 reply_nterror(req, status);
4723                 END_PROFILE(SMBlock);
4724                 return;
4725         }
4726
4727         reply_outbuf(req, 0, 0);
4728
4729         END_PROFILE(SMBlock);
4730         return;
4731 }
4732
4733 /****************************************************************************
4734  Reply to a unlock.
4735 ****************************************************************************/
4736
4737 void reply_unlock(struct smb_request *req)
4738 {
4739         connection_struct *conn = req->conn;
4740         uint64_t count,offset;
4741         NTSTATUS status;
4742         files_struct *fsp;
4743
4744         START_PROFILE(SMBunlock);
4745
4746         if (req->wct < 5) {
4747                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4748                 END_PROFILE(SMBunlock);
4749                 return;
4750         }
4751
4752         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
4753
4754         if (!check_fsp(conn, req, fsp)) {
4755                 END_PROFILE(SMBunlock);
4756                 return;
4757         }
4758
4759         count = (uint64_t)IVAL(req->vwv+1, 0);
4760         offset = (uint64_t)IVAL(req->vwv+3, 0);
4761
4762         status = do_unlock(smbd_messaging_context(),
4763                         fsp,
4764                         req->smbpid,
4765                         count,
4766                         offset,
4767                         WINDOWS_LOCK);
4768
4769         if (NT_STATUS_V(status)) {
4770                 reply_nterror(req, status);
4771                 END_PROFILE(SMBunlock);
4772                 return;
4773         }
4774
4775         DEBUG( 3, ( "unlock fd=%d fnum=%d offset=%.0f count=%.0f\n",
4776                     fsp->fh->fd, fsp->fnum, (double)offset, (double)count ) );
4777
4778         reply_outbuf(req, 0, 0);
4779
4780         END_PROFILE(SMBunlock);
4781         return;
4782 }
4783
4784 #undef DBGC_CLASS
4785 #define DBGC_CLASS DBGC_ALL
4786
4787 /****************************************************************************
4788  Reply to a tdis.
4789  conn POINTER CAN BE NULL HERE !
4790 ****************************************************************************/
4791
4792 void reply_tdis(struct smb_request *req)
4793 {
4794         connection_struct *conn = req->conn;
4795         START_PROFILE(SMBtdis);
4796
4797         if (!conn) {
4798                 DEBUG(4,("Invalid connection in tdis\n"));
4799                 reply_doserror(req, ERRSRV, ERRinvnid);
4800                 END_PROFILE(SMBtdis);
4801                 return;
4802         }
4803
4804         conn->used = False;
4805
4806         close_cnum(conn,req->vuid);
4807         req->conn = NULL;
4808
4809         reply_outbuf(req, 0, 0);
4810         END_PROFILE(SMBtdis);
4811         return;
4812 }
4813
4814 /****************************************************************************
4815  Reply to a echo.
4816  conn POINTER CAN BE NULL HERE !
4817 ****************************************************************************/
4818
4819 void reply_echo(struct smb_request *req)
4820 {
4821         connection_struct *conn = req->conn;
4822         struct smb_perfcount_data local_pcd;
4823         struct smb_perfcount_data *cur_pcd;
4824         int smb_reverb;
4825         int seq_num;
4826
4827         START_PROFILE(SMBecho);
4828
4829         smb_init_perfcount_data(&local_pcd);
4830
4831         if (req->wct < 1) {
4832                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4833                 END_PROFILE(SMBecho);
4834                 return;
4835         }
4836
4837         smb_reverb = SVAL(req->vwv+0, 0);
4838
4839         reply_outbuf(req, 1, req->buflen);
4840
4841         /* copy any incoming data back out */
4842         if (req->buflen > 0) {
4843                 memcpy(smb_buf(req->outbuf), req->buf, req->buflen);
4844         }
4845
4846         if (smb_reverb > 100) {
4847                 DEBUG(0,("large reverb (%d)?? Setting to 100\n",smb_reverb));
4848                 smb_reverb = 100;
4849         }
4850
4851         for (seq_num = 1 ; seq_num <= smb_reverb ; seq_num++) {
4852
4853                 /* this makes sure we catch the request pcd */
4854                 if (seq_num == smb_reverb) {
4855                         cur_pcd = &req->pcd;
4856                 } else {
4857                         SMB_PERFCOUNT_COPY_CONTEXT(&req->pcd, &local_pcd);
4858                         cur_pcd = &local_pcd;
4859                 }
4860
4861                 SSVAL(req->outbuf,smb_vwv0,seq_num);
4862
4863                 show_msg((char *)req->outbuf);
4864                 if (!srv_send_smb(smbd_server_fd(),
4865                                 (char *)req->outbuf,
4866                                 true, req->seqnum+1,
4867                                 IS_CONN_ENCRYPTED(conn)||req->encrypted,
4868                                 cur_pcd))
4869                         exit_server_cleanly("reply_echo: srv_send_smb failed.");
4870         }
4871
4872         DEBUG(3,("echo %d times\n", smb_reverb));
4873
4874         TALLOC_FREE(req->outbuf);
4875
4876         END_PROFILE(SMBecho);
4877         return;
4878 }
4879
4880 /****************************************************************************
4881  Reply to a printopen.
4882 ****************************************************************************/
4883
4884 void reply_printopen(struct smb_request *req)
4885 {
4886         connection_struct *conn = req->conn;
4887         files_struct *fsp;
4888         SMB_STRUCT_STAT sbuf;
4889         NTSTATUS status;
4890
4891         START_PROFILE(SMBsplopen);
4892
4893         if (req->wct < 2) {
4894                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4895                 END_PROFILE(SMBsplopen);
4896                 return;
4897         }
4898
4899         if (!CAN_PRINT(conn)) {
4900                 reply_doserror(req, ERRDOS, ERRnoaccess);
4901                 END_PROFILE(SMBsplopen);
4902                 return;
4903         }
4904
4905         status = file_new(req, conn, &fsp);
4906         if(!NT_STATUS_IS_OK(status)) {
4907                 reply_nterror(req, status);
4908                 END_PROFILE(SMBsplopen);
4909                 return;
4910         }
4911
4912         /* Open for exclusive use, write only. */
4913         status = print_fsp_open(req, conn, NULL, req->vuid, fsp, &sbuf);
4914
4915         if (!NT_STATUS_IS_OK(status)) {
4916                 reply_nterror(req, status);
4917                 END_PROFILE(SMBsplopen);
4918                 return;
4919         }
4920
4921         reply_outbuf(req, 1, 0);
4922         SSVAL(req->outbuf,smb_vwv0,fsp->fnum);
4923
4924         DEBUG(3,("openprint fd=%d fnum=%d\n",
4925                  fsp->fh->fd, fsp->fnum));
4926
4927         END_PROFILE(SMBsplopen);
4928         return;
4929 }
4930
4931 /****************************************************************************
4932  Reply to a printclose.
4933 ****************************************************************************/
4934
4935 void reply_printclose(struct smb_request *req)
4936 {
4937         connection_struct *conn = req->conn;
4938         files_struct *fsp;
4939         NTSTATUS status;
4940
4941         START_PROFILE(SMBsplclose);
4942
4943         if (req->wct < 1) {
4944                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4945                 END_PROFILE(SMBsplclose);
4946                 return;
4947         }
4948
4949         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
4950
4951         if (!check_fsp(conn, req, fsp)) {
4952                 END_PROFILE(SMBsplclose);
4953                 return;
4954         }
4955
4956         if (!CAN_PRINT(conn)) {
4957                 reply_nterror(req, NT_STATUS_DOS(ERRSRV, ERRerror));
4958                 END_PROFILE(SMBsplclose);
4959                 return;
4960         }
4961
4962         DEBUG(3,("printclose fd=%d fnum=%d\n",
4963                  fsp->fh->fd,fsp->fnum));
4964
4965         status = close_file(req, fsp, NORMAL_CLOSE);
4966
4967         if(!NT_STATUS_IS_OK(status)) {
4968                 reply_nterror(req, status);
4969                 END_PROFILE(SMBsplclose);
4970                 return;
4971         }
4972
4973         reply_outbuf(req, 0, 0);
4974
4975         END_PROFILE(SMBsplclose);
4976         return;
4977 }
4978
4979 /****************************************************************************
4980  Reply to a printqueue.
4981 ****************************************************************************/
4982
4983 void reply_printqueue(struct smb_request *req)
4984 {
4985         connection_struct *conn = req->conn;
4986         int max_count;
4987         int start_index;
4988
4989         START_PROFILE(SMBsplretq);
4990
4991         if (req->wct < 2) {
4992                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4993                 END_PROFILE(SMBsplretq);
4994                 return;
4995         }
4996
4997         max_count = SVAL(req->vwv+0, 0);
4998         start_index = SVAL(req->vwv+1, 0);
4999
5000         /* we used to allow the client to get the cnum wrong, but that
5001            is really quite gross and only worked when there was only
5002            one printer - I think we should now only accept it if they
5003            get it right (tridge) */
5004         if (!CAN_PRINT(conn)) {
5005                 reply_doserror(req, ERRDOS, ERRnoaccess);
5006                 END_PROFILE(SMBsplretq);
5007                 return;
5008         }
5009
5010         reply_outbuf(req, 2, 3);
5011         SSVAL(req->outbuf,smb_vwv0,0);
5012         SSVAL(req->outbuf,smb_vwv1,0);
5013         SCVAL(smb_buf(req->outbuf),0,1);
5014         SSVAL(smb_buf(req->outbuf),1,0);
5015
5016         DEBUG(3,("printqueue start_index=%d max_count=%d\n",
5017                  start_index, max_count));
5018
5019         {
5020                 print_queue_struct *queue = NULL;
5021                 print_status_struct status;
5022                 int count = print_queue_status(SNUM(conn), &queue, &status);
5023                 int num_to_get = ABS(max_count);
5024                 int first = (max_count>0?start_index:start_index+max_count+1);
5025                 int i;
5026
5027                 if (first >= count)
5028                         num_to_get = 0;
5029                 else
5030                         num_to_get = MIN(num_to_get,count-first);
5031
5032
5033                 for (i=first;i<first+num_to_get;i++) {
5034                         char blob[28];
5035                         char *p = blob;
5036
5037                         srv_put_dos_date2(p,0,queue[i].time);
5038                         SCVAL(p,4,(queue[i].status==LPQ_PRINTING?2:3));
5039                         SSVAL(p,5, queue[i].job);
5040                         SIVAL(p,7,queue[i].size);
5041                         SCVAL(p,11,0);
5042                         srvstr_push(blob, req->flags2, p+12,
5043                                     queue[i].fs_user, 16, STR_ASCII);
5044
5045                         if (message_push_blob(
5046                                     &req->outbuf,
5047                                     data_blob_const(
5048                                             blob, sizeof(blob))) == -1) {
5049                                 reply_nterror(req, NT_STATUS_NO_MEMORY);
5050                                 END_PROFILE(SMBsplretq);
5051                                 return;
5052                         }
5053                 }
5054
5055                 if (count > 0) {
5056                         SSVAL(req->outbuf,smb_vwv0,count);
5057                         SSVAL(req->outbuf,smb_vwv1,
5058                               (max_count>0?first+count:first-1));
5059                         SCVAL(smb_buf(req->outbuf),0,1);
5060                         SSVAL(smb_buf(req->outbuf),1,28*count);
5061                 }
5062
5063                 SAFE_FREE(queue);
5064
5065                 DEBUG(3,("%d entries returned in queue\n",count));
5066         }
5067
5068         END_PROFILE(SMBsplretq);
5069         return;
5070 }
5071
5072 /****************************************************************************
5073  Reply to a printwrite.
5074 ****************************************************************************/
5075
5076 void reply_printwrite(struct smb_request *req)
5077 {
5078         connection_struct *conn = req->conn;
5079         int numtowrite;
5080         const char *data;
5081         files_struct *fsp;
5082
5083         START_PROFILE(SMBsplwr);
5084
5085         if (req->wct < 1) {
5086                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
5087                 END_PROFILE(SMBsplwr);
5088                 return;
5089         }
5090
5091         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
5092
5093         if (!check_fsp(conn, req, fsp)) {
5094                 END_PROFILE(SMBsplwr);
5095                 return;
5096         }
5097
5098         if (!CAN_PRINT(conn)) {
5099                 reply_doserror(req, ERRDOS, ERRnoaccess);
5100                 END_PROFILE(SMBsplwr);
5101                 return;
5102         }
5103
5104         if (!CHECK_WRITE(fsp)) {
5105                 reply_doserror(req, ERRDOS, ERRbadaccess);
5106                 END_PROFILE(SMBsplwr);
5107                 return;
5108         }
5109
5110         numtowrite = SVAL(req->buf, 1);
5111
5112         if (req->buflen < numtowrite + 3) {
5113                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
5114                 END_PROFILE(SMBsplwr);
5115                 return;
5116         }
5117
5118         data = (const char *)req->buf + 3;
5119
5120         if (write_file(req,fsp,data,-1,numtowrite) != numtowrite) {
5121                 reply_unixerror(req, ERRHRD, ERRdiskfull);
5122                 END_PROFILE(SMBsplwr);
5123                 return;
5124         }
5125
5126         DEBUG( 3, ( "printwrite fnum=%d num=%d\n", fsp->fnum, numtowrite ) );
5127
5128         END_PROFILE(SMBsplwr);
5129         return;
5130 }
5131
5132 /****************************************************************************
5133  Reply to a mkdir.
5134 ****************************************************************************/
5135
5136 void reply_mkdir(struct smb_request *req)
5137 {
5138         connection_struct *conn = req->conn;
5139         char *directory = NULL;
5140         NTSTATUS status;
5141         SMB_STRUCT_STAT sbuf;
5142         TALLOC_CTX *ctx = talloc_tos();
5143
5144         START_PROFILE(SMBmkdir);
5145
5146         srvstr_get_path_req(ctx, req, &directory, (const char *)req->buf + 1,
5147                             STR_TERMINATE, &status);
5148         if (!NT_STATUS_IS_OK(status)) {
5149                 reply_nterror(req, status);
5150                 END_PROFILE(SMBmkdir);
5151                 return;
5152         }
5153
5154         status = resolve_dfspath(ctx, conn,
5155                                  req->flags2 & FLAGS2_DFS_PATHNAMES,
5156                                  directory,
5157                                  &directory);
5158         if (!NT_STATUS_IS_OK(status)) {
5159                 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
5160                         reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
5161                                         ERRSRV, ERRbadpath);
5162                         END_PROFILE(SMBmkdir);
5163                         return;
5164                 }
5165                 reply_nterror(req, status);
5166                 END_PROFILE(SMBmkdir);
5167                 return;
5168         }
5169
5170         status = unix_convert(ctx, conn, directory, False, &directory, NULL, &sbuf);
5171         if (!NT_STATUS_IS_OK(status)) {
5172                 reply_nterror(req, status);
5173                 END_PROFILE(SMBmkdir);
5174                 return;
5175         }
5176
5177         status = check_name(conn, directory);
5178         if (!NT_STATUS_IS_OK(status)) {
5179                 reply_nterror(req, status);
5180                 END_PROFILE(SMBmkdir);
5181                 return;
5182         }
5183
5184         status = create_directory(conn, req, directory);
5185
5186         DEBUG(5, ("create_directory returned %s\n", nt_errstr(status)));
5187
5188         if (!NT_STATUS_IS_OK(status)) {
5189
5190                 if (!use_nt_status()
5191                     && NT_STATUS_EQUAL(status,
5192                                        NT_STATUS_OBJECT_NAME_COLLISION)) {
5193                         /*
5194                          * Yes, in the DOS error code case we get a
5195                          * ERRDOS:ERRnoaccess here. See BASE-SAMBA3ERROR
5196                          * samba4 torture test.
5197                          */
5198                         status = NT_STATUS_DOS(ERRDOS, ERRnoaccess);
5199                 }
5200
5201                 reply_nterror(req, status);
5202                 END_PROFILE(SMBmkdir);
5203                 return;
5204         }
5205
5206         reply_outbuf(req, 0, 0);
5207
5208         DEBUG( 3, ( "mkdir %s\n", directory ) );
5209
5210         END_PROFILE(SMBmkdir);
5211         return;
5212 }
5213
5214 /****************************************************************************
5215  Static function used by reply_rmdir to delete an entire directory
5216  tree recursively. Return True on ok, False on fail.
5217 ****************************************************************************/
5218
5219 static bool recursive_rmdir(TALLOC_CTX *ctx,
5220                         connection_struct *conn,
5221                         char *directory)
5222 {
5223         const char *dname = NULL;
5224         bool ret = True;
5225         long offset = 0;
5226         SMB_STRUCT_STAT st;
5227         struct smb_Dir *dir_hnd = OpenDir(talloc_tos(), conn, directory,
5228                                           NULL, 0);
5229
5230         if(dir_hnd == NULL)
5231                 return False;
5232
5233         while((dname = ReadDirName(dir_hnd, &offset, &st))) {
5234                 char *fullname = NULL;
5235
5236                 if (ISDOT(dname) || ISDOTDOT(dname)) {
5237                         continue;
5238                 }
5239
5240                 if (!is_visible_file(conn, directory, dname, &st, False)) {
5241                         continue;
5242                 }
5243
5244                 /* Construct the full name. */
5245                 fullname = talloc_asprintf(ctx,
5246                                 "%s/%s",
5247                                 directory,
5248                                 dname);
5249                 if (!fullname) {
5250                         errno = ENOMEM;
5251                         ret = False;
5252                         break;
5253                 }
5254
5255                 if(SMB_VFS_LSTAT(conn,fullname, &st) != 0) {
5256                         ret = False;
5257                         break;
5258                 }
5259
5260                 if(st.st_mode & S_IFDIR) {
5261                         if(!recursive_rmdir(ctx, conn, fullname)) {
5262                                 ret = False;
5263                                 break;
5264                         }
5265                         if(SMB_VFS_RMDIR(conn,fullname) != 0) {
5266                                 ret = False;
5267                                 break;
5268                         }
5269                 } else if(SMB_VFS_UNLINK(conn,fullname) != 0) {
5270                         ret = False;
5271                         break;
5272                 }
5273                 TALLOC_FREE(fullname);
5274         }
5275         TALLOC_FREE(dir_hnd);
5276         return ret;
5277 }
5278
5279 /****************************************************************************
5280  The internals of the rmdir code - called elsewhere.
5281 ****************************************************************************/
5282
5283 NTSTATUS rmdir_internals(TALLOC_CTX *ctx,
5284                         connection_struct *conn,
5285                         const char *directory)
5286 {
5287         int ret;
5288         SMB_STRUCT_STAT st;
5289
5290         /* Might be a symlink. */
5291         if(SMB_VFS_LSTAT(conn, directory, &st) != 0) {
5292                 return map_nt_error_from_unix(errno);
5293         }
5294
5295         if (S_ISLNK(st.st_mode)) {
5296                 /* Is what it points to a directory ? */
5297                 if(SMB_VFS_STAT(conn, directory, &st) != 0) {
5298                         return map_nt_error_from_unix(errno);
5299                 }
5300                 if (!(S_ISDIR(st.st_mode))) {
5301                         return NT_STATUS_NOT_A_DIRECTORY;
5302                 }
5303                 ret = SMB_VFS_UNLINK(conn,directory);
5304         } else {
5305                 ret = SMB_VFS_RMDIR(conn,directory);
5306         }
5307         if (ret == 0) {
5308                 notify_fname(conn, NOTIFY_ACTION_REMOVED,
5309                              FILE_NOTIFY_CHANGE_DIR_NAME,
5310                              directory);
5311                 return NT_STATUS_OK;
5312         }
5313
5314         if(((errno == ENOTEMPTY)||(errno == EEXIST)) && lp_veto_files(SNUM(conn))) {
5315                 /*
5316                  * Check to see if the only thing in this directory are
5317                  * vetoed files/directories. If so then delete them and
5318                  * retry. If we fail to delete any of them (and we *don't*
5319                  * do a recursive delete) then fail the rmdir.
5320                  */
5321                 const char *dname;
5322                 long dirpos = 0;
5323                 struct smb_Dir *dir_hnd = OpenDir(talloc_tos(), conn,
5324                                                   directory, NULL, 0);
5325
5326                 if(dir_hnd == NULL) {
5327                         errno = ENOTEMPTY;
5328                         goto err;
5329                 }
5330
5331                 while ((dname = ReadDirName(dir_hnd, &dirpos, &st))) {
5332                         if((strcmp(dname, ".") == 0) || (strcmp(dname, "..")==0))
5333                                 continue;
5334                         if (!is_visible_file(conn, directory, dname, &st, False))
5335                                 continue;
5336                         if(!IS_VETO_PATH(conn, dname)) {
5337                                 TALLOC_FREE(dir_hnd);
5338                                 errno = ENOTEMPTY;
5339                                 goto err;
5340                         }
5341                 }
5342
5343                 /* We only have veto files/directories.
5344                  * Are we allowed to delete them ? */
5345
5346                 if(!lp_recursive_veto_delete(SNUM(conn))) {
5347                         TALLOC_FREE(dir_hnd);
5348                         errno = ENOTEMPTY;
5349                         goto err;
5350                 }
5351
5352                 /* Do a recursive delete. */
5353                 RewindDir(dir_hnd,&dirpos);
5354                 while ((dname = ReadDirName(dir_hnd, &dirpos, &st))) {
5355                         char *fullname = NULL;
5356
5357                         if (ISDOT(dname) || ISDOTDOT(dname)) {
5358                                 continue;
5359                         }
5360                         if (!is_visible_file(conn, directory, dname, &st, False)) {
5361                                 continue;
5362                         }
5363
5364                         fullname = talloc_asprintf(ctx,
5365                                         "%s/%s",
5366                                         directory,
5367                                         dname);
5368
5369                         if(!fullname) {
5370                                 errno = ENOMEM;
5371                                 break;
5372                         }
5373
5374                         if(SMB_VFS_LSTAT(conn,fullname, &st) != 0) {
5375                                 break;
5376                         }
5377                         if(st.st_mode & S_IFDIR) {
5378                                 if(!recursive_rmdir(ctx, conn, fullname)) {
5379                                         break;
5380                                 }
5381                                 if(SMB_VFS_RMDIR(conn,fullname) != 0) {
5382                                         break;
5383                                 }
5384                         } else if(SMB_VFS_UNLINK(conn,fullname) != 0) {
5385                                 break;
5386                         }
5387                         TALLOC_FREE(fullname);
5388                 }
5389                 TALLOC_FREE(dir_hnd);
5390                 /* Retry the rmdir */
5391                 ret = SMB_VFS_RMDIR(conn,directory);
5392         }
5393
5394   err:
5395
5396         if (ret != 0) {
5397                 DEBUG(3,("rmdir_internals: couldn't remove directory %s : "
5398                          "%s\n", directory,strerror(errno)));
5399                 return map_nt_error_from_unix(errno);
5400         }
5401
5402         notify_fname(conn, NOTIFY_ACTION_REMOVED,
5403                      FILE_NOTIFY_CHANGE_DIR_NAME,
5404                      directory);
5405
5406         return NT_STATUS_OK;
5407 }
5408
5409 /****************************************************************************
5410  Reply to a rmdir.
5411 ****************************************************************************/
5412
5413 void reply_rmdir(struct smb_request *req)
5414 {
5415         connection_struct *conn = req->conn;
5416         char *directory = NULL;
5417         SMB_STRUCT_STAT sbuf;
5418         NTSTATUS status;
5419         TALLOC_CTX *ctx = talloc_tos();
5420
5421         START_PROFILE(SMBrmdir);
5422
5423         srvstr_get_path_req(ctx, req, &directory, (const char *)req->buf + 1,
5424                             STR_TERMINATE, &status);
5425         if (!NT_STATUS_IS_OK(status)) {
5426                 reply_nterror(req, status);
5427                 END_PROFILE(SMBrmdir);
5428                 return;
5429         }
5430
5431         status = resolve_dfspath(ctx, conn,
5432                                  req->flags2 & FLAGS2_DFS_PATHNAMES,
5433                                  directory,
5434                                  &directory);
5435         if (!NT_STATUS_IS_OK(status)) {
5436                 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
5437                         reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
5438                                         ERRSRV, ERRbadpath);
5439                         END_PROFILE(SMBrmdir);
5440                         return;
5441                 }
5442                 reply_nterror(req, status);
5443                 END_PROFILE(SMBrmdir);
5444                 return;
5445         }
5446
5447         status = unix_convert(ctx, conn, directory, False, &directory,
5448                         NULL, &sbuf);
5449         if (!NT_STATUS_IS_OK(status)) {
5450                 reply_nterror(req, status);
5451                 END_PROFILE(SMBrmdir);
5452                 return;
5453         }
5454
5455         status = check_name(conn, directory);
5456         if (!NT_STATUS_IS_OK(status)) {
5457                 reply_nterror(req, status);
5458                 END_PROFILE(SMBrmdir);
5459                 return;
5460         }
5461
5462         dptr_closepath(directory, req->smbpid);
5463         status = rmdir_internals(ctx, conn, directory);
5464         if (!NT_STATUS_IS_OK(status)) {
5465                 reply_nterror(req, status);
5466                 END_PROFILE(SMBrmdir);
5467                 return;
5468         }
5469
5470         reply_outbuf(req, 0, 0);
5471
5472         DEBUG( 3, ( "rmdir %s\n", directory ) );
5473
5474         END_PROFILE(SMBrmdir);
5475         return;
5476 }
5477
5478 /*******************************************************************
5479  Resolve wildcards in a filename rename.
5480 ********************************************************************/
5481
5482 static bool resolve_wildcards(TALLOC_CTX *ctx,
5483                                 const char *name1,
5484                                 const char *name2,
5485                                 char **pp_newname)
5486 {
5487         char *name2_copy = NULL;
5488         char *root1 = NULL;
5489         char *root2 = NULL;
5490         char *ext1 = NULL;
5491         char *ext2 = NULL;
5492         char *p,*p2, *pname1, *pname2;
5493
5494         name2_copy = talloc_strdup(ctx, name2);
5495         if (!name2_copy) {
5496                 return False;
5497         }
5498
5499         pname1 = strrchr_m(name1,'/');
5500         pname2 = strrchr_m(name2_copy,'/');
5501
5502         if (!pname1 || !pname2) {
5503                 return False;
5504         }
5505
5506         /* Truncate the copy of name2 at the last '/' */
5507         *pname2 = '\0';
5508
5509         /* Now go past the '/' */
5510         pname1++;
5511         pname2++;
5512
5513         root1 = talloc_strdup(ctx, pname1);
5514         root2 = talloc_strdup(ctx, pname2);
5515
5516         if (!root1 || !root2) {
5517                 return False;
5518         }
5519
5520         p = strrchr_m(root1,'.');
5521         if (p) {
5522                 *p = 0;
5523                 ext1 = talloc_strdup(ctx, p+1);
5524         } else {
5525                 ext1 = talloc_strdup(ctx, "");
5526         }
5527         p = strrchr_m(root2,'.');
5528         if (p) {
5529                 *p = 0;
5530                 ext2 = talloc_strdup(ctx, p+1);
5531         } else {
5532                 ext2 = talloc_strdup(ctx, "");
5533         }
5534
5535         if (!ext1 || !ext2) {
5536                 return False;
5537         }
5538
5539         p = root1;
5540         p2 = root2;
5541         while (*p2) {
5542                 if (*p2 == '?') {
5543                         /* Hmmm. Should this be mb-aware ? */
5544                         *p2 = *p;
5545                         p2++;
5546                 } else if (*p2 == '*') {
5547                         *p2 = '\0';
5548                         root2 = talloc_asprintf(ctx, "%s%s",
5549                                                 root2,
5550                                                 p);
5551                         if (!root2) {
5552                                 return False;
5553                         }
5554                         break;
5555                 } else {
5556                         p2++;
5557                 }
5558                 if (*p) {
5559                         p++;
5560                 }
5561         }
5562
5563         p = ext1;
5564         p2 = ext2;
5565         while (*p2) {
5566                 if (*p2 == '?') {
5567                         /* Hmmm. Should this be mb-aware ? */
5568                         *p2 = *p;
5569                         p2++;
5570                 } else if (*p2 == '*') {
5571                         *p2 = '\0';
5572                         ext2 = talloc_asprintf(ctx, "%s%s",
5573                                                 ext2,
5574                                                 p);
5575                         if (!ext2) {
5576                                 return False;
5577                         }
5578                         break;
5579                 } else {
5580                         p2++;
5581                 }
5582                 if (*p) {
5583                         p++;
5584                 }
5585         }
5586
5587         if (*ext2) {
5588                 *pp_newname = talloc_asprintf(ctx, "%s/%s.%s",
5589                                 name2_copy,
5590                                 root2,
5591                                 ext2);
5592         } else {
5593                 *pp_newname = talloc_asprintf(ctx, "%s/%s",
5594                                 name2_copy,
5595                                 root2);
5596         }
5597
5598         if (!*pp_newname) {
5599                 return False;
5600         }
5601
5602         return True;
5603 }
5604
5605 /****************************************************************************
5606  Ensure open files have their names updated. Updated to notify other smbd's
5607  asynchronously.
5608 ****************************************************************************/
5609
5610 static void rename_open_files(connection_struct *conn,
5611                               struct share_mode_lock *lck,
5612                               const char *newname)
5613 {
5614         files_struct *fsp;
5615         bool did_rename = False;
5616
5617         for(fsp = file_find_di_first(lck->id); fsp;
5618             fsp = file_find_di_next(fsp)) {
5619                 /* fsp_name is a relative path under the fsp. To change this for other
5620                    sharepaths we need to manipulate relative paths. */
5621                 /* TODO - create the absolute path and manipulate the newname
5622                    relative to the sharepath. */
5623                 if (!strequal(fsp->conn->connectpath, conn->connectpath)) {
5624                         continue;
5625                 }
5626                 DEBUG(10,("rename_open_files: renaming file fnum %d (file_id %s) from %s -> %s\n",
5627                           fsp->fnum, file_id_string_tos(&fsp->file_id),
5628                         fsp->fsp_name, newname ));
5629                 string_set(&fsp->fsp_name, newname);
5630                 did_rename = True;
5631         }
5632
5633         if (!did_rename) {
5634                 DEBUG(10,("rename_open_files: no open files on file_id %s for %s\n",
5635                           file_id_string_tos(&lck->id), newname ));
5636         }
5637
5638         /* Send messages to all smbd's (not ourself) that the name has changed. */
5639         rename_share_filename(smbd_messaging_context(), lck, conn->connectpath,
5640                               newname);
5641 }
5642
5643 /****************************************************************************
5644  We need to check if the source path is a parent directory of the destination
5645  (ie. a rename of /foo/bar/baz -> /foo/bar/baz/bibble/bobble. If so we must
5646  refuse the rename with a sharing violation. Under UNIX the above call can
5647  *succeed* if /foo/bar/baz is a symlink to another area in the share. We
5648  probably need to check that the client is a Windows one before disallowing
5649  this as a UNIX client (one with UNIX extensions) can know the source is a
5650  symlink and make this decision intelligently. Found by an excellent bug
5651  report from <AndyLiebman@aol.com>.
5652 ****************************************************************************/
5653
5654 static bool rename_path_prefix_equal(const char *src, const char *dest)
5655 {
5656         const char *psrc = src;
5657         const char *pdst = dest;
5658         size_t slen;
5659
5660         if (psrc[0] == '.' && psrc[1] == '/') {
5661                 psrc += 2;
5662         }
5663         if (pdst[0] == '.' && pdst[1] == '/') {
5664                 pdst += 2;
5665         }
5666         if ((slen = strlen(psrc)) > strlen(pdst)) {
5667                 return False;
5668         }
5669         return ((memcmp(psrc, pdst, slen) == 0) && pdst[slen] == '/');
5670 }
5671
5672 /*
5673  * Do the notify calls from a rename
5674  */
5675
5676 static void notify_rename(connection_struct *conn, bool is_dir,
5677                           const char *oldpath, const char *newpath)
5678 {
5679         char *olddir, *newdir;
5680         const char *oldname, *newname;
5681         uint32 mask;
5682
5683         mask = is_dir ? FILE_NOTIFY_CHANGE_DIR_NAME
5684                 : FILE_NOTIFY_CHANGE_FILE_NAME;
5685
5686         if (!parent_dirname(talloc_tos(), oldpath, &olddir, &oldname)
5687             || !parent_dirname(talloc_tos(), newpath, &newdir, &newname)) {
5688                 TALLOC_FREE(olddir);
5689                 return;
5690         }
5691
5692         if (strcmp(olddir, newdir) == 0) {
5693                 notify_fname(conn, NOTIFY_ACTION_OLD_NAME, mask, oldpath);
5694                 notify_fname(conn, NOTIFY_ACTION_NEW_NAME, mask, newpath);
5695         }
5696         else {
5697                 notify_fname(conn, NOTIFY_ACTION_REMOVED, mask, oldpath);
5698                 notify_fname(conn, NOTIFY_ACTION_ADDED, mask, newpath);
5699         }
5700         TALLOC_FREE(olddir);
5701         TALLOC_FREE(newdir);
5702
5703         /* this is a strange one. w2k3 gives an additional event for
5704            CHANGE_ATTRIBUTES and CHANGE_CREATION on the new file when renaming
5705            files, but not directories */
5706         if (!is_dir) {
5707                 notify_fname(conn, NOTIFY_ACTION_MODIFIED,
5708                              FILE_NOTIFY_CHANGE_ATTRIBUTES
5709                              |FILE_NOTIFY_CHANGE_CREATION,
5710                              newpath);
5711         }
5712 }
5713
5714 /****************************************************************************
5715  Rename an open file - given an fsp.
5716 ****************************************************************************/
5717
5718 NTSTATUS rename_internals_fsp(connection_struct *conn,
5719                         files_struct *fsp,
5720                         char *newname,
5721                         const char *newname_last_component,
5722                         uint32 attrs,
5723                         bool replace_if_exists)
5724 {
5725         TALLOC_CTX *ctx = talloc_tos();
5726         SMB_STRUCT_STAT sbuf, sbuf1;
5727         NTSTATUS status = NT_STATUS_OK;
5728         struct share_mode_lock *lck = NULL;
5729         bool dst_exists, old_is_stream, new_is_stream;
5730
5731         ZERO_STRUCT(sbuf);
5732
5733         status = check_name(conn, newname);
5734         if (!NT_STATUS_IS_OK(status)) {
5735                 return status;
5736         }
5737
5738         /* Ensure newname contains a '/' */
5739         if(strrchr_m(newname,'/') == 0) {
5740                 newname = talloc_asprintf(ctx,
5741                                         "./%s",
5742                                         newname);
5743                 if (!newname) {
5744                         return NT_STATUS_NO_MEMORY;
5745                 }
5746         }
5747
5748         /*
5749          * Check for special case with case preserving and not
5750          * case sensitive. If the old last component differs from the original
5751          * last component only by case, then we should allow
5752          * the rename (user is trying to change the case of the
5753          * filename).
5754          */
5755
5756         if((conn->case_sensitive == False) && (conn->case_preserve == True) &&
5757                         strequal(newname, fsp->fsp_name)) {
5758                 char *p;
5759                 char *newname_modified_last_component = NULL;
5760
5761                 /*
5762                  * Get the last component of the modified name.
5763                  * Note that we guarantee that newname contains a '/'
5764                  * character above.
5765                  */
5766                 p = strrchr_m(newname,'/');
5767                 newname_modified_last_component = talloc_strdup(ctx,
5768                                                 p+1);
5769                 if (!newname_modified_last_component) {
5770                         return NT_STATUS_NO_MEMORY;
5771                 }
5772
5773                 if(strcsequal(newname_modified_last_component,
5774                               newname_last_component) == False) {
5775                         /*
5776                          * Replace the modified last component with
5777                          * the original.
5778                          */
5779                         *p = '\0'; /* Truncate at the '/' */
5780                         newname = talloc_asprintf(ctx,
5781                                         "%s/%s",
5782                                         newname,
5783                                         newname_last_component);
5784                 }
5785         }
5786
5787         /*
5788          * If the src and dest names are identical - including case,
5789          * don't do the rename, just return success.
5790          */
5791
5792         if (strcsequal(fsp->fsp_name, newname)) {
5793                 DEBUG(3,("rename_internals_fsp: identical names in rename %s - returning success\n",
5794                         newname));
5795                 return NT_STATUS_OK;
5796         }
5797
5798         old_is_stream = is_ntfs_stream_name(fsp->fsp_name);
5799         new_is_stream = is_ntfs_stream_name(newname);
5800
5801         /* Return the correct error code if both names aren't streams. */
5802         if (!old_is_stream && new_is_stream) {
5803                 return NT_STATUS_OBJECT_NAME_INVALID;
5804         }
5805
5806         if (old_is_stream && !new_is_stream) {
5807                 return NT_STATUS_INVALID_PARAMETER;
5808         }
5809
5810         /*
5811          * Have vfs_object_exist also fill sbuf1
5812          */
5813         dst_exists = vfs_object_exist(conn, newname, &sbuf1);
5814
5815         if(!replace_if_exists && dst_exists) {
5816                 DEBUG(3,("rename_internals_fsp: dest exists doing rename %s -> %s\n",
5817                         fsp->fsp_name,newname));
5818                 return NT_STATUS_OBJECT_NAME_COLLISION;
5819         }
5820
5821         if (dst_exists) {
5822                 struct file_id fileid = vfs_file_id_from_sbuf(conn, &sbuf1);
5823                 files_struct *dst_fsp = file_find_di_first(fileid);
5824                 /* The file can be open when renaming a stream */
5825                 if (dst_fsp && !new_is_stream) {
5826                         DEBUG(3, ("rename_internals_fsp: Target file open\n"));
5827                         return NT_STATUS_ACCESS_DENIED;
5828                 }
5829         }
5830
5831         /* Ensure we have a valid stat struct for the source. */
5832         if (fsp->fh->fd != -1) {
5833                 if (SMB_VFS_FSTAT(fsp, &sbuf) == -1) {
5834                         return map_nt_error_from_unix(errno);
5835                 }
5836         } else {
5837                 int ret = -1;
5838                 if (fsp->posix_open) {
5839                         ret = SMB_VFS_LSTAT(conn,fsp->fsp_name,&sbuf);
5840                 } else {
5841                         ret = SMB_VFS_STAT(conn,fsp->fsp_name,&sbuf);
5842                 }
5843                 if (ret == -1) {
5844                         return map_nt_error_from_unix(errno);
5845                 }
5846         }
5847
5848         status = can_rename(conn, fsp, attrs, &sbuf);
5849
5850         if (!NT_STATUS_IS_OK(status)) {
5851                 DEBUG(3,("rename_internals_fsp: Error %s rename %s -> %s\n",
5852                         nt_errstr(status), fsp->fsp_name,newname));
5853                 if (NT_STATUS_EQUAL(status,NT_STATUS_SHARING_VIOLATION))
5854                         status = NT_STATUS_ACCESS_DENIED;
5855                 return status;
5856         }
5857
5858         if (rename_path_prefix_equal(fsp->fsp_name, newname)) {
5859                 return NT_STATUS_ACCESS_DENIED;
5860         }
5861
5862         lck = get_share_mode_lock(talloc_tos(), fsp->file_id, NULL, NULL,
5863                                   NULL);
5864
5865         /*
5866          * We have the file open ourselves, so not being able to get the
5867          * corresponding share mode lock is a fatal error.
5868          */
5869
5870         SMB_ASSERT(lck != NULL);
5871
5872         if(SMB_VFS_RENAME(conn,fsp->fsp_name, newname) == 0) {
5873                 uint32 create_options = fsp->fh->private_options;
5874
5875                 DEBUG(3,("rename_internals_fsp: succeeded doing rename on %s -> %s\n",
5876                         fsp->fsp_name,newname));
5877
5878                 notify_rename(conn, fsp->is_directory, fsp->fsp_name, newname);
5879
5880                 rename_open_files(conn, lck, newname);
5881
5882                 /*
5883                  * A rename acts as a new file create w.r.t. allowing an initial delete
5884                  * on close, probably because in Windows there is a new handle to the
5885                  * new file. If initial delete on close was requested but not
5886                  * originally set, we need to set it here. This is probably not 100% correct,
5887                  * but will work for the CIFSFS client which in non-posix mode
5888                  * depends on these semantics. JRA.
5889                  */
5890
5891                 if (create_options & FILE_DELETE_ON_CLOSE) {
5892                         status = can_set_delete_on_close(fsp, True, 0);
5893
5894                         if (NT_STATUS_IS_OK(status)) {
5895                                 /* Note that here we set the *inital* delete on close flag,
5896                                  * not the regular one. The magic gets handled in close. */
5897                                 fsp->initial_delete_on_close = True;
5898                         }
5899                 }
5900                 TALLOC_FREE(lck);
5901                 return NT_STATUS_OK;
5902         }
5903
5904         TALLOC_FREE(lck);
5905
5906         if (errno == ENOTDIR || errno == EISDIR) {
5907                 status = NT_STATUS_OBJECT_NAME_COLLISION;
5908         } else {
5909                 status = map_nt_error_from_unix(errno);
5910         }
5911
5912         DEBUG(3,("rename_internals_fsp: Error %s rename %s -> %s\n",
5913                 nt_errstr(status), fsp->fsp_name,newname));
5914
5915         return status;
5916 }
5917
5918 /****************************************************************************
5919  The guts of the rename command, split out so it may be called by the NT SMB
5920  code.
5921 ****************************************************************************/
5922
5923 NTSTATUS rename_internals(TALLOC_CTX *ctx,
5924                         connection_struct *conn,
5925                         struct smb_request *req,
5926                         const char *name_in,
5927                         const char *newname_in,
5928                         uint32 attrs,
5929                         bool replace_if_exists,
5930                         bool src_has_wild,
5931                         bool dest_has_wild,
5932                         uint32_t access_mask)
5933 {
5934         char *directory = NULL;
5935         char *mask = NULL;
5936         char *last_component_src = NULL;
5937         char *last_component_dest = NULL;
5938         char *name = NULL;
5939         char *newname = NULL;
5940         char *p;
5941         int count=0;
5942         NTSTATUS status = NT_STATUS_OK;
5943         SMB_STRUCT_STAT sbuf1, sbuf2;
5944         struct smb_Dir *dir_hnd = NULL;
5945         const char *dname;
5946         long offset = 0;
5947         int create_options = 0;
5948         bool posix_pathnames = lp_posix_pathnames();
5949
5950         ZERO_STRUCT(sbuf1);
5951         ZERO_STRUCT(sbuf2);
5952
5953         status = unix_convert(ctx, conn, name_in, src_has_wild, &name,
5954                         &last_component_src, &sbuf1);
5955         if (!NT_STATUS_IS_OK(status)) {
5956                 return status;
5957         }
5958
5959         status = unix_convert(ctx, conn, newname_in, dest_has_wild, &newname,
5960                         &last_component_dest, &sbuf2);
5961         if (!NT_STATUS_IS_OK(status)) {
5962                 return status;
5963         }
5964
5965         /*
5966          * Split the old name into directory and last component
5967          * strings. Note that unix_convert may have stripped off a
5968          * leading ./ from both name and newname if the rename is
5969          * at the root of the share. We need to make sure either both
5970          * name and newname contain a / character or neither of them do
5971          * as this is checked in resolve_wildcards().
5972          */
5973
5974         p = strrchr_m(name,'/');
5975         if (!p) {
5976                 directory = talloc_strdup(ctx, ".");
5977                 if (!directory) {
5978                         return NT_STATUS_NO_MEMORY;
5979                 }
5980                 mask = name;
5981         } else {
5982                 *p = 0;
5983                 directory = talloc_strdup(ctx, name);
5984                 if (!directory) {
5985                         return NT_STATUS_NO_MEMORY;
5986                 }
5987                 mask = p+1;
5988                 *p = '/'; /* Replace needed for exceptional test below. */
5989         }
5990
5991         /*
5992          * We should only check the mangled cache
5993          * here if unix_convert failed. This means
5994          * that the path in 'mask' doesn't exist
5995          * on the file system and so we need to look
5996          * for a possible mangle. This patch from
5997          * Tine Smukavec <valentin.smukavec@hermes.si>.
5998          */
5999
6000         if (!VALID_STAT(sbuf1) && mangle_is_mangled(mask, conn->params)) {
6001                 char *new_mask = NULL;
6002                 mangle_lookup_name_from_8_3(ctx,
6003                                         mask,
6004                                         &new_mask,
6005                                         conn->params );
6006                 if (new_mask) {
6007                         mask = new_mask;
6008                 }
6009         }
6010
6011         if (!src_has_wild) {
6012                 files_struct *fsp;
6013
6014                 /*
6015                  * No wildcards - just process the one file.
6016                  */
6017                 bool is_short_name = mangle_is_8_3(name, True, conn->params);
6018
6019                 /* Add a terminating '/' to the directory name. */
6020                 directory = talloc_asprintf_append(directory,
6021                                 "/%s",
6022                                 mask);
6023                 if (!directory) {
6024                         return NT_STATUS_NO_MEMORY;
6025                 }
6026
6027                 /* Ensure newname contains a '/' also */
6028                 if(strrchr_m(newname,'/') == 0) {
6029                         newname = talloc_asprintf(ctx,
6030                                                 "./%s",
6031                                                 newname);
6032                         if (!newname) {
6033                                 return NT_STATUS_NO_MEMORY;
6034                         }
6035                 }
6036
6037                 DEBUG(3, ("rename_internals: case_sensitive = %d, "
6038                           "case_preserve = %d, short case preserve = %d, "
6039                           "directory = %s, newname = %s, "
6040                           "last_component_dest = %s, is_8_3 = %d\n",
6041                           conn->case_sensitive, conn->case_preserve,
6042                           conn->short_case_preserve, directory,
6043                           newname, last_component_dest, is_short_name));
6044
6045                 /* The dest name still may have wildcards. */
6046                 if (dest_has_wild) {
6047                         char *mod_newname = NULL;
6048                         if (!resolve_wildcards(ctx,
6049                                         directory,newname,&mod_newname)) {
6050                                 DEBUG(6, ("rename_internals: resolve_wildcards "
6051                                         "%s %s failed\n",
6052                                         directory,
6053                                         newname));
6054                                 return NT_STATUS_NO_MEMORY;
6055                         }
6056                         newname = mod_newname;
6057                 }
6058
6059                 ZERO_STRUCT(sbuf1);
6060                 if (posix_pathnames) {
6061                         SMB_VFS_LSTAT(conn, directory, &sbuf1);
6062                 } else {
6063                         SMB_VFS_STAT(conn, directory, &sbuf1);
6064                 }
6065
6066                 if (S_ISDIR(sbuf1.st_mode)) {
6067                         create_options |= FILE_DIRECTORY_FILE;
6068                 }
6069
6070                 status = SMB_VFS_CREATE_FILE(
6071                         conn,                           /* conn */
6072                         req,                            /* req */
6073                         0,                              /* root_dir_fid */
6074                         directory,                      /* fname */
6075                         0,                              /* create_file_flags */
6076                         access_mask,                    /* access_mask */
6077                         (FILE_SHARE_READ |              /* share_access */
6078                             FILE_SHARE_WRITE),
6079                         FILE_OPEN,                      /* create_disposition*/
6080                         create_options,                 /* create_options */
6081                         posix_pathnames ? FILE_FLAG_POSIX_SEMANTICS|0777 : 0, /* file_attributes */
6082                         0,                              /* oplock_request */
6083                         0,                              /* allocation_size */
6084                         NULL,                           /* sd */
6085                         NULL,                           /* ea_list */
6086                         &fsp,                           /* result */
6087                         NULL,                           /* pinfo */
6088                         &sbuf1);                        /* psbuf */
6089
6090                 if (!NT_STATUS_IS_OK(status)) {
6091                         DEBUG(3, ("Could not open rename source %s: %s\n",
6092                                   directory, nt_errstr(status)));
6093                         return status;
6094                 }
6095
6096                 status = rename_internals_fsp(conn, fsp, newname,
6097                                               last_component_dest,
6098                                               attrs, replace_if_exists);
6099
6100                 close_file(req, fsp, NORMAL_CLOSE);
6101
6102                 DEBUG(3, ("rename_internals: Error %s rename %s -> %s\n",
6103                           nt_errstr(status), directory,newname));
6104
6105                 return status;
6106         }
6107
6108         /*
6109          * Wildcards - process each file that matches.
6110          */
6111         if (strequal(mask,"????????.???")) {
6112                 mask[0] = '*';
6113                 mask[1] = '\0';
6114         }
6115
6116         status = check_name(conn, directory);
6117         if (!NT_STATUS_IS_OK(status)) {
6118                 return status;
6119         }
6120
6121         dir_hnd = OpenDir(talloc_tos(), conn, directory, mask, attrs);
6122         if (dir_hnd == NULL) {
6123                 return map_nt_error_from_unix(errno);
6124         }
6125
6126         status = NT_STATUS_NO_SUCH_FILE;
6127         /*
6128          * Was status = NT_STATUS_OBJECT_NAME_NOT_FOUND;
6129          * - gentest fix. JRA
6130          */
6131
6132         while ((dname = ReadDirName(dir_hnd, &offset, &sbuf1))) {
6133                 files_struct *fsp = NULL;
6134                 char *fname = NULL;
6135                 char *destname = NULL;
6136                 bool sysdir_entry = False;
6137
6138                 /* Quick check for "." and ".." */
6139                 if (ISDOT(dname) || ISDOTDOT(dname)) {
6140                         if (attrs & aDIR) {
6141                                 sysdir_entry = True;
6142                         } else {
6143                                 continue;
6144                         }
6145                 }
6146
6147                 if (!is_visible_file(conn, directory, dname, &sbuf1, False)) {
6148                         continue;
6149                 }
6150
6151                 if(!mask_match(dname, mask, conn->case_sensitive)) {
6152                         continue;
6153                 }
6154
6155                 if (sysdir_entry) {
6156                         status = NT_STATUS_OBJECT_NAME_INVALID;
6157                         break;
6158                 }
6159
6160                 fname = talloc_asprintf(ctx,
6161                                 "%s/%s",
6162                                 directory,
6163                                 dname);
6164                 if (!fname) {
6165                         return NT_STATUS_NO_MEMORY;
6166                 }
6167
6168                 if (!resolve_wildcards(ctx,
6169                                 fname,newname,&destname)) {
6170                         DEBUG(6, ("resolve_wildcards %s %s failed\n",
6171                                   fname, destname));
6172                         TALLOC_FREE(fname);
6173                         continue;
6174                 }
6175                 if (!destname) {
6176                         return NT_STATUS_NO_MEMORY;
6177                 }
6178
6179                 ZERO_STRUCT(sbuf1);
6180                 if (posix_pathnames) {
6181                         SMB_VFS_LSTAT(conn, fname, &sbuf1);
6182                 } else {
6183                         SMB_VFS_STAT(conn, fname, &sbuf1);
6184                 }
6185
6186                 create_options = 0;
6187
6188                 if (S_ISDIR(sbuf1.st_mode)) {
6189                         create_options |= FILE_DIRECTORY_FILE;
6190                 }
6191
6192                 status = SMB_VFS_CREATE_FILE(
6193                         conn,                           /* conn */
6194                         req,                            /* req */
6195                         0,                              /* root_dir_fid */
6196                         fname,                          /* fname */
6197                         0,                              /* create_file_flags */
6198                         access_mask,                    /* access_mask */
6199                         (FILE_SHARE_READ |              /* share_access */
6200                             FILE_SHARE_WRITE),
6201                         FILE_OPEN,                      /* create_disposition*/
6202                         create_options,                 /* create_options */
6203                         posix_pathnames ? FILE_FLAG_POSIX_SEMANTICS|0777 : 0, /* file_attributes */
6204                         0,                              /* oplock_request */
6205                         0,                              /* allocation_size */
6206                         NULL,                           /* sd */
6207                         NULL,                           /* ea_list */
6208                         &fsp,                           /* result */
6209                         NULL,                           /* pinfo */
6210                         &sbuf1);                        /* psbuf */
6211
6212                 if (!NT_STATUS_IS_OK(status)) {
6213                         DEBUG(3,("rename_internals: SMB_VFS_CREATE_FILE "
6214                                  "returned %s rename %s -> %s\n",
6215                                  nt_errstr(status), directory, newname));
6216                         break;
6217                 }
6218
6219                 status = rename_internals_fsp(conn, fsp, destname, dname,
6220                                               attrs, replace_if_exists);
6221
6222                 close_file(req, fsp, NORMAL_CLOSE);
6223
6224                 if (!NT_STATUS_IS_OK(status)) {
6225                         DEBUG(3, ("rename_internals_fsp returned %s for "
6226                                   "rename %s -> %s\n", nt_errstr(status),
6227                                   directory, newname));
6228                         break;
6229                 }
6230
6231                 count++;
6232
6233                 DEBUG(3,("rename_internals: doing rename on %s -> "
6234                          "%s\n",fname,destname));
6235
6236                 TALLOC_FREE(fname);
6237                 TALLOC_FREE(destname);
6238         }
6239         TALLOC_FREE(dir_hnd);
6240
6241         if (count == 0 && NT_STATUS_IS_OK(status) && errno != 0) {
6242                 status = map_nt_error_from_unix(errno);
6243         }
6244
6245         return status;
6246 }
6247
6248 /****************************************************************************
6249  Reply to a mv.
6250 ****************************************************************************/
6251
6252 void reply_mv(struct smb_request *req)
6253 {
6254         connection_struct *conn = req->conn;
6255         char *name = NULL;
6256         char *newname = NULL;
6257         const char *p;
6258         uint32 attrs;
6259         NTSTATUS status;
6260         bool src_has_wcard = False;
6261         bool dest_has_wcard = False;
6262         TALLOC_CTX *ctx = talloc_tos();
6263
6264         START_PROFILE(SMBmv);
6265
6266         if (req->wct < 1) {
6267                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
6268                 END_PROFILE(SMBmv);
6269                 return;
6270         }
6271
6272         attrs = SVAL(req->vwv+0, 0);
6273
6274         p = (const char *)req->buf + 1;
6275         p += srvstr_get_path_req_wcard(ctx, req, &name, p, STR_TERMINATE,
6276                                        &status, &src_has_wcard);
6277         if (!NT_STATUS_IS_OK(status)) {
6278                 reply_nterror(req, status);
6279                 END_PROFILE(SMBmv);
6280                 return;
6281         }
6282         p++;
6283         p += srvstr_get_path_req_wcard(ctx, req, &newname, p, STR_TERMINATE,
6284                                        &status, &dest_has_wcard);
6285         if (!NT_STATUS_IS_OK(status)) {
6286                 reply_nterror(req, status);
6287                 END_PROFILE(SMBmv);
6288                 return;
6289         }
6290
6291         status = resolve_dfspath_wcard(ctx, conn,
6292                                        req->flags2 & FLAGS2_DFS_PATHNAMES,
6293                                        name,
6294                                        &name,
6295                                        &src_has_wcard);
6296         if (!NT_STATUS_IS_OK(status)) {
6297                 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
6298                         reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
6299                                         ERRSRV, ERRbadpath);
6300                         END_PROFILE(SMBmv);
6301                         return;
6302                 }
6303                 reply_nterror(req, status);
6304                 END_PROFILE(SMBmv);
6305                 return;
6306         }
6307
6308         status = resolve_dfspath_wcard(ctx, conn,
6309                                        req->flags2 & FLAGS2_DFS_PATHNAMES,
6310                                        newname,
6311                                        &newname,
6312                                        &dest_has_wcard);
6313         if (!NT_STATUS_IS_OK(status)) {
6314                 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
6315                         reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
6316                                         ERRSRV, ERRbadpath);
6317                         END_PROFILE(SMBmv);
6318                         return;
6319                 }
6320                 reply_nterror(req, status);
6321                 END_PROFILE(SMBmv);
6322                 return;
6323         }
6324
6325         DEBUG(3,("reply_mv : %s -> %s\n",name,newname));
6326
6327         status = rename_internals(ctx, conn, req, name, newname, attrs, False,
6328                                   src_has_wcard, dest_has_wcard, DELETE_ACCESS);
6329         if (!NT_STATUS_IS_OK(status)) {
6330                 if (open_was_deferred(req->mid)) {
6331                         /* We have re-scheduled this call. */
6332                         END_PROFILE(SMBmv);
6333                         return;
6334                 }
6335                 reply_nterror(req, status);
6336                 END_PROFILE(SMBmv);
6337                 return;
6338         }
6339
6340         reply_outbuf(req, 0, 0);
6341
6342         END_PROFILE(SMBmv);
6343         return;
6344 }
6345
6346 /*******************************************************************
6347  Copy a file as part of a reply_copy.
6348 ******************************************************************/
6349
6350 /*
6351  * TODO: check error codes on all callers
6352  */
6353
6354 NTSTATUS copy_file(TALLOC_CTX *ctx,
6355                         connection_struct *conn,
6356                         const char *src,
6357                         const char *dest1,
6358                         int ofun,
6359                         int count,
6360                         bool target_is_directory)
6361 {
6362         SMB_STRUCT_STAT src_sbuf, sbuf2;
6363         SMB_OFF_T ret=-1;
6364         files_struct *fsp1,*fsp2;
6365         char *dest = NULL;
6366         uint32 dosattrs;
6367         uint32 new_create_disposition;
6368         NTSTATUS status;
6369
6370         dest = talloc_strdup(ctx, dest1);
6371         if (!dest) {
6372                 return NT_STATUS_NO_MEMORY;
6373         }
6374         if (target_is_directory) {
6375                 const char *p = strrchr_m(src,'/');
6376                 if (p) {
6377                         p++;
6378                 } else {
6379                         p = src;
6380                 }
6381                 dest = talloc_asprintf_append(dest,
6382                                 "/%s",
6383                                 p);
6384                 if (!dest) {
6385                         return NT_STATUS_NO_MEMORY;
6386                 }
6387         }
6388
6389         if (!vfs_file_exist(conn,src,&src_sbuf)) {
6390                 TALLOC_FREE(dest);
6391                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
6392         }
6393
6394         if (!target_is_directory && count) {
6395                 new_create_disposition = FILE_OPEN;
6396         } else {
6397                 if (!map_open_params_to_ntcreate(dest1,0,ofun,
6398                                 NULL, NULL, &new_create_disposition, NULL)) {
6399                         TALLOC_FREE(dest);
6400                         return NT_STATUS_INVALID_PARAMETER;
6401                 }
6402         }
6403
6404         status = SMB_VFS_CREATE_FILE(
6405                 conn,                                   /* conn */
6406                 NULL,                                   /* req */
6407                 0,                                      /* root_dir_fid */
6408                 src,                                    /* fname */
6409                 0,                                      /* create_file_flags */
6410                 FILE_GENERIC_READ,                      /* access_mask */
6411                 FILE_SHARE_READ | FILE_SHARE_WRITE,     /* share_access */
6412                 FILE_OPEN,                              /* create_disposition*/
6413                 0,                                      /* create_options */
6414                 FILE_ATTRIBUTE_NORMAL,                  /* file_attributes */
6415                 INTERNAL_OPEN_ONLY,                     /* oplock_request */
6416                 0,                                      /* allocation_size */
6417                 NULL,                                   /* sd */
6418                 NULL,                                   /* ea_list */
6419                 &fsp1,                                  /* result */
6420                 NULL,                                   /* pinfo */
6421                 &src_sbuf);                             /* psbuf */
6422
6423         if (!NT_STATUS_IS_OK(status)) {
6424                 TALLOC_FREE(dest);
6425                 return status;
6426         }
6427
6428         dosattrs = dos_mode(conn, src, &src_sbuf);
6429         if (SMB_VFS_STAT(conn,dest,&sbuf2) == -1) {
6430                 ZERO_STRUCTP(&sbuf2);
6431         }
6432
6433         status = SMB_VFS_CREATE_FILE(
6434                 conn,                                   /* conn */
6435                 NULL,                                   /* req */
6436                 0,                                      /* root_dir_fid */
6437                 dest,                                   /* fname */
6438                 0,                                      /* create_file_flags */
6439                 FILE_GENERIC_WRITE,                     /* access_mask */
6440                 FILE_SHARE_READ | FILE_SHARE_WRITE,     /* share_access */
6441                 new_create_disposition,                 /* create_disposition*/
6442                 0,                                      /* create_options */
6443                 dosattrs,                               /* file_attributes */
6444                 INTERNAL_OPEN_ONLY,                     /* oplock_request */
6445                 0,                                      /* allocation_size */
6446                 NULL,                                   /* sd */
6447                 NULL,                                   /* ea_list */
6448                 &fsp2,                                  /* result */
6449                 NULL,                                   /* pinfo */
6450                 &sbuf2);                                /* psbuf */
6451
6452         TALLOC_FREE(dest);
6453
6454         if (!NT_STATUS_IS_OK(status)) {
6455                 close_file(NULL, fsp1, ERROR_CLOSE);
6456                 return status;
6457         }
6458
6459         if ((ofun&3) == 1) {
6460                 if(SMB_VFS_LSEEK(fsp2,0,SEEK_END) == -1) {
6461                         DEBUG(0,("copy_file: error - vfs lseek returned error %s\n", strerror(errno) ));
6462                         /*
6463                          * Stop the copy from occurring.
6464                          */
6465                         ret = -1;
6466                         src_sbuf.st_size = 0;
6467                 }
6468         }
6469
6470         if (src_sbuf.st_size) {
6471                 ret = vfs_transfer_file(fsp1, fsp2, src_sbuf.st_size);
6472         }
6473
6474         close_file(NULL, fsp1, NORMAL_CLOSE);
6475
6476         /* Ensure the modtime is set correctly on the destination file. */
6477         set_close_write_time(fsp2, get_mtimespec(&src_sbuf));
6478
6479         /*
6480          * As we are opening fsp1 read-only we only expect
6481          * an error on close on fsp2 if we are out of space.
6482          * Thus we don't look at the error return from the
6483          * close of fsp1.
6484          */
6485         status = close_file(NULL, fsp2, NORMAL_CLOSE);
6486
6487         if (!NT_STATUS_IS_OK(status)) {
6488                 return status;
6489         }
6490
6491         if (ret != (SMB_OFF_T)src_sbuf.st_size) {
6492                 return NT_STATUS_DISK_FULL;
6493         }
6494
6495         return NT_STATUS_OK;
6496 }
6497
6498 /****************************************************************************
6499  Reply to a file copy.
6500 ****************************************************************************/
6501
6502 void reply_copy(struct smb_request *req)
6503 {
6504         connection_struct *conn = req->conn;
6505         char *name = NULL;
6506         char *newname = NULL;
6507         char *directory = NULL;
6508         const char *mask = NULL;
6509         const char mask_star[] = "*";
6510         const char *p;
6511         int count=0;
6512         int error = ERRnoaccess;
6513         int err = 0;
6514         int tid2;
6515         int ofun;
6516         int flags;
6517         bool target_is_directory=False;
6518         bool source_has_wild = False;
6519         bool dest_has_wild = False;
6520         SMB_STRUCT_STAT sbuf1, sbuf2;
6521         NTSTATUS status;
6522         TALLOC_CTX *ctx = talloc_tos();
6523
6524         START_PROFILE(SMBcopy);
6525
6526         if (req->wct < 3) {
6527                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
6528                 END_PROFILE(SMBcopy);
6529                 return;
6530         }
6531
6532         tid2 = SVAL(req->vwv+0, 0);
6533         ofun = SVAL(req->vwv+1, 0);
6534         flags = SVAL(req->vwv+2, 0);
6535
6536         p = (const char *)req->buf;
6537         p += srvstr_get_path_req_wcard(ctx, req, &name, p, STR_TERMINATE,
6538                                        &status, &source_has_wild);
6539         if (!NT_STATUS_IS_OK(status)) {
6540                 reply_nterror(req, status);
6541                 END_PROFILE(SMBcopy);
6542                 return;
6543         }
6544         p += srvstr_get_path_req_wcard(ctx, req, &newname, p, STR_TERMINATE,
6545                                        &status, &dest_has_wild);
6546         if (!NT_STATUS_IS_OK(status)) {
6547                 reply_nterror(req, status);
6548                 END_PROFILE(SMBcopy);
6549                 return;
6550         }
6551
6552         DEBUG(3,("reply_copy : %s -> %s\n",name,newname));
6553
6554         if (tid2 != conn->cnum) {
6555                 /* can't currently handle inter share copies XXXX */
6556                 DEBUG(3,("Rejecting inter-share copy\n"));
6557                 reply_doserror(req, ERRSRV, ERRinvdevice);
6558                 END_PROFILE(SMBcopy);
6559                 return;
6560         }
6561
6562         status = resolve_dfspath_wcard(ctx, conn,
6563                                        req->flags2 & FLAGS2_DFS_PATHNAMES,
6564                                        name,
6565                                        &name,
6566                                        &source_has_wild);
6567         if (!NT_STATUS_IS_OK(status)) {
6568                 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
6569                         reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
6570                                         ERRSRV, ERRbadpath);
6571                         END_PROFILE(SMBcopy);
6572                         return;
6573                 }
6574                 reply_nterror(req, status);
6575                 END_PROFILE(SMBcopy);
6576                 return;
6577         }
6578
6579         status = resolve_dfspath_wcard(ctx, conn,
6580                                        req->flags2 & FLAGS2_DFS_PATHNAMES,
6581                                        newname,
6582                                        &newname,
6583                                        &dest_has_wild);
6584         if (!NT_STATUS_IS_OK(status)) {
6585                 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
6586                         reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
6587                                         ERRSRV, ERRbadpath);
6588                         END_PROFILE(SMBcopy);
6589                         return;
6590                 }
6591                 reply_nterror(req, status);
6592                 END_PROFILE(SMBcopy);
6593                 return;
6594         }
6595
6596         status = unix_convert(ctx, conn, name, source_has_wild,
6597                         &name, NULL, &sbuf1);
6598         if (!NT_STATUS_IS_OK(status)) {
6599                 reply_nterror(req, status);
6600                 END_PROFILE(SMBcopy);
6601                 return;
6602         }
6603
6604         status = unix_convert(ctx, conn, newname, dest_has_wild,
6605                         &newname, NULL, &sbuf2);
6606         if (!NT_STATUS_IS_OK(status)) {
6607                 reply_nterror(req, status);
6608                 END_PROFILE(SMBcopy);
6609                 return;
6610         }
6611
6612         target_is_directory = VALID_STAT_OF_DIR(sbuf2);
6613
6614         if ((flags&1) && target_is_directory) {
6615                 reply_doserror(req, ERRDOS, ERRbadfile);
6616                 END_PROFILE(SMBcopy);
6617                 return;
6618         }
6619
6620         if ((flags&2) && !target_is_directory) {
6621                 reply_doserror(req, ERRDOS, ERRbadpath);
6622                 END_PROFILE(SMBcopy);
6623                 return;
6624         }
6625
6626         if ((flags&(1<<5)) && VALID_STAT_OF_DIR(sbuf1)) {
6627                 /* wants a tree copy! XXXX */
6628                 DEBUG(3,("Rejecting tree copy\n"));
6629                 reply_doserror(req, ERRSRV, ERRerror);
6630                 END_PROFILE(SMBcopy);
6631                 return;
6632         }
6633
6634         p = strrchr_m(name,'/');
6635         if (p != NULL) {
6636                 directory = talloc_strndup(ctx, name, PTR_DIFF(p, name));
6637                 mask = p+1;
6638         } else {
6639                 directory = talloc_strdup(ctx, "./");
6640                 mask = name;
6641         }
6642
6643         if (!directory) {
6644                 reply_nterror(req, NT_STATUS_NO_MEMORY);
6645                 END_PROFILE(SMBcopy);
6646                 return;
6647         }
6648
6649         /*
6650          * We should only check the mangled cache
6651          * here if unix_convert failed. This means
6652          * that the path in 'mask' doesn't exist
6653          * on the file system and so we need to look
6654          * for a possible mangle. This patch from
6655          * Tine Smukavec <valentin.smukavec@hermes.si>.
6656          */
6657
6658         if (!VALID_STAT(sbuf1) && mangle_is_mangled(mask, conn->params)) {
6659                 char *new_mask = NULL;
6660                 mangle_lookup_name_from_8_3(ctx,
6661                                         mask,
6662                                         &new_mask,
6663                                         conn->params );
6664                 if (new_mask) {
6665                         mask = new_mask;
6666                 }
6667         }
6668
6669         if (!source_has_wild) {
6670                 directory = talloc_asprintf_append(directory,
6671                                 "/%s",
6672                                 mask);
6673                 if (dest_has_wild) {
6674                         char *mod_newname = NULL;
6675                         if (!resolve_wildcards(ctx,
6676                                         directory,newname,&mod_newname)) {
6677                                 reply_nterror(req, NT_STATUS_NO_MEMORY);
6678                                 END_PROFILE(SMBcopy);
6679                                 return;
6680                         }
6681                         newname = mod_newname;
6682                 }
6683
6684                 status = check_name(conn, directory);
6685                 if (!NT_STATUS_IS_OK(status)) {
6686                         reply_nterror(req, status);
6687                         END_PROFILE(SMBcopy);
6688                         return;
6689                 }
6690
6691                 status = check_name(conn, newname);
6692                 if (!NT_STATUS_IS_OK(status)) {
6693                         reply_nterror(req, status);
6694                         END_PROFILE(SMBcopy);
6695                         return;
6696                 }
6697
6698                 status = copy_file(ctx,conn,directory,newname,ofun,
6699                                 count,target_is_directory);
6700
6701                 if(!NT_STATUS_IS_OK(status)) {
6702                         reply_nterror(req, status);
6703                         END_PROFILE(SMBcopy);
6704                         return;
6705                 } else {
6706                         count++;
6707                 }
6708         } else {
6709                 struct smb_Dir *dir_hnd = NULL;
6710                 const char *dname = NULL;
6711                 long offset = 0;
6712
6713                 if (strequal(mask,"????????.???")) {
6714                         mask = mask_star;
6715                 }
6716
6717                 status = check_name(conn, directory);
6718                 if (!NT_STATUS_IS_OK(status)) {
6719                         reply_nterror(req, status);
6720                         END_PROFILE(SMBcopy);
6721                         return;
6722                 }
6723
6724                 dir_hnd = OpenDir(talloc_tos(), conn, directory, mask, 0);
6725                 if (dir_hnd == NULL) {
6726                         status = map_nt_error_from_unix(errno);
6727                         reply_nterror(req, status);
6728                         END_PROFILE(SMBcopy);
6729                         return;
6730                 }
6731
6732                 error = ERRbadfile;
6733
6734                 while ((dname = ReadDirName(dir_hnd, &offset, &sbuf1))) {
6735                         char *destname = NULL;
6736                         char *fname = NULL;
6737
6738                         if (ISDOT(dname) || ISDOTDOT(dname)) {
6739                                 continue;
6740                         }
6741
6742                         if (!is_visible_file(conn, directory, dname, &sbuf1, False)) {
6743                                 continue;
6744                         }
6745
6746                         if(!mask_match(dname, mask, conn->case_sensitive)) {
6747                                 continue;
6748                         }
6749
6750                         error = ERRnoaccess;
6751                         fname = talloc_asprintf(ctx,
6752                                         "%s/%s",
6753                                         directory,
6754                                         dname);
6755                         if (!fname) {
6756                                 TALLOC_FREE(dir_hnd);
6757                                 reply_nterror(req, NT_STATUS_NO_MEMORY);
6758                                 END_PROFILE(SMBcopy);
6759                                 return;
6760                         }
6761
6762                         if (!resolve_wildcards(ctx,
6763                                         fname,newname,&destname)) {
6764                                 continue;
6765                         }
6766                         if (!destname) {
6767                                 TALLOC_FREE(dir_hnd);
6768                                 reply_nterror(req, NT_STATUS_NO_MEMORY);
6769                                 END_PROFILE(SMBcopy);
6770                                 return;
6771                         }
6772
6773                         status = check_name(conn, fname);
6774                         if (!NT_STATUS_IS_OK(status)) {
6775                                 TALLOC_FREE(dir_hnd);
6776                                 reply_nterror(req, status);
6777                                 END_PROFILE(SMBcopy);
6778                                 return;
6779                         }
6780
6781                         status = check_name(conn, destname);
6782                         if (!NT_STATUS_IS_OK(status)) {
6783                                 TALLOC_FREE(dir_hnd);
6784                                 reply_nterror(req, status);
6785                                 END_PROFILE(SMBcopy);
6786                                 return;
6787                         }
6788
6789                         DEBUG(3,("reply_copy : doing copy on %s -> %s\n",fname, destname));
6790
6791                         status = copy_file(ctx,conn,fname,destname,ofun,
6792                                         count,target_is_directory);
6793                         if (NT_STATUS_IS_OK(status)) {
6794                                 count++;
6795                         }
6796                         TALLOC_FREE(fname);
6797                         TALLOC_FREE(destname);
6798                 }
6799                 TALLOC_FREE(dir_hnd);
6800         }
6801
6802         if (count == 0) {
6803                 if(err) {
6804                         /* Error on close... */
6805                         errno = err;
6806                         reply_unixerror(req, ERRHRD, ERRgeneral);
6807                         END_PROFILE(SMBcopy);
6808                         return;
6809                 }
6810
6811                 reply_doserror(req, ERRDOS, error);
6812                 END_PROFILE(SMBcopy);
6813                 return;
6814         }
6815
6816         reply_outbuf(req, 1, 0);
6817         SSVAL(req->outbuf,smb_vwv0,count);
6818
6819         END_PROFILE(SMBcopy);
6820         return;
6821 }
6822
6823 #undef DBGC_CLASS
6824 #define DBGC_CLASS DBGC_LOCKING
6825
6826 /****************************************************************************
6827  Get a lock pid, dealing with large count requests.
6828 ****************************************************************************/
6829
6830 uint32 get_lock_pid(const uint8_t *data, int data_offset,
6831                     bool large_file_format)
6832 {
6833         if(!large_file_format)
6834                 return (uint32)SVAL(data,SMB_LPID_OFFSET(data_offset));
6835         else
6836                 return (uint32)SVAL(data,SMB_LARGE_LPID_OFFSET(data_offset));
6837 }
6838
6839 /****************************************************************************
6840  Get a lock count, dealing with large count requests.
6841 ****************************************************************************/
6842
6843 uint64_t get_lock_count(const uint8_t *data, int data_offset,
6844                         bool large_file_format)
6845 {
6846         uint64_t count = 0;
6847
6848         if(!large_file_format) {
6849                 count = (uint64_t)IVAL(data,SMB_LKLEN_OFFSET(data_offset));
6850         } else {
6851
6852 #if defined(HAVE_LONGLONG)
6853                 count = (((uint64_t) IVAL(data,SMB_LARGE_LKLEN_OFFSET_HIGH(data_offset))) << 32) |
6854                         ((uint64_t) IVAL(data,SMB_LARGE_LKLEN_OFFSET_LOW(data_offset)));
6855 #else /* HAVE_LONGLONG */
6856
6857                 /*
6858                  * NT4.x seems to be broken in that it sends large file (64 bit)
6859                  * lockingX calls even if the CAP_LARGE_FILES was *not*
6860                  * negotiated. For boxes without large unsigned ints truncate the
6861                  * lock count by dropping the top 32 bits.
6862                  */
6863
6864                 if(IVAL(data,SMB_LARGE_LKLEN_OFFSET_HIGH(data_offset)) != 0) {
6865                         DEBUG(3,("get_lock_count: truncating lock count (high)0x%x (low)0x%x to just low count.\n",
6866                                 (unsigned int)IVAL(data,SMB_LARGE_LKLEN_OFFSET_HIGH(data_offset)),
6867                                 (unsigned int)IVAL(data,SMB_LARGE_LKLEN_OFFSET_LOW(data_offset)) ));
6868                                 SIVAL(data,SMB_LARGE_LKLEN_OFFSET_HIGH(data_offset),0);
6869                 }
6870
6871                 count = (uint64_t)IVAL(data,SMB_LARGE_LKLEN_OFFSET_LOW(data_offset));
6872 #endif /* HAVE_LONGLONG */
6873         }
6874
6875         return count;
6876 }
6877
6878 #if !defined(HAVE_LONGLONG)
6879 /****************************************************************************
6880  Pathetically try and map a 64 bit lock offset into 31 bits. I hate Windows :-).
6881 ****************************************************************************/
6882
6883 static uint32 map_lock_offset(uint32 high, uint32 low)
6884 {
6885         unsigned int i;
6886         uint32 mask = 0;
6887         uint32 highcopy = high;
6888
6889         /*
6890          * Try and find out how many significant bits there are in high.
6891          */
6892
6893         for(i = 0; highcopy; i++)
6894                 highcopy >>= 1;
6895
6896         /*
6897          * We use 31 bits not 32 here as POSIX
6898          * lock offsets may not be negative.
6899          */
6900
6901         mask = (~0) << (31 - i);
6902
6903         if(low & mask)
6904                 return 0; /* Fail. */
6905
6906         high <<= (31 - i);
6907
6908         return (high|low);
6909 }
6910 #endif /* !defined(HAVE_LONGLONG) */
6911
6912 /****************************************************************************
6913  Get a lock offset, dealing with large offset requests.
6914 ****************************************************************************/
6915
6916 uint64_t get_lock_offset(const uint8_t *data, int data_offset,
6917                          bool large_file_format, bool *err)
6918 {
6919         uint64_t offset = 0;
6920
6921         *err = False;
6922
6923         if(!large_file_format) {
6924                 offset = (uint64_t)IVAL(data,SMB_LKOFF_OFFSET(data_offset));
6925         } else {
6926
6927 #if defined(HAVE_LONGLONG)
6928                 offset = (((uint64_t) IVAL(data,SMB_LARGE_LKOFF_OFFSET_HIGH(data_offset))) << 32) |
6929                                 ((uint64_t) IVAL(data,SMB_LARGE_LKOFF_OFFSET_LOW(data_offset)));
6930 #else /* HAVE_LONGLONG */
6931
6932                 /*
6933                  * NT4.x seems to be broken in that it sends large file (64 bit)
6934                  * lockingX calls even if the CAP_LARGE_FILES was *not*
6935                  * negotiated. For boxes without large unsigned ints mangle the
6936                  * lock offset by mapping the top 32 bits onto the lower 32.
6937                  */
6938
6939                 if(IVAL(data,SMB_LARGE_LKOFF_OFFSET_HIGH(data_offset)) != 0) {
6940                         uint32 low = IVAL(data,SMB_LARGE_LKOFF_OFFSET_LOW(data_offset));
6941                         uint32 high = IVAL(data,SMB_LARGE_LKOFF_OFFSET_HIGH(data_offset));
6942                         uint32 new_low = 0;
6943
6944                         if((new_low = map_lock_offset(high, low)) == 0) {
6945                                 *err = True;
6946                                 return (uint64_t)-1;
6947                         }
6948
6949                         DEBUG(3,("get_lock_offset: truncating lock offset (high)0x%x (low)0x%x to offset 0x%x.\n",
6950                                 (unsigned int)high, (unsigned int)low, (unsigned int)new_low ));
6951                         SIVAL(data,SMB_LARGE_LKOFF_OFFSET_HIGH(data_offset),0);
6952                         SIVAL(data,SMB_LARGE_LKOFF_OFFSET_LOW(data_offset),new_low);
6953                 }
6954
6955                 offset = (uint64_t)IVAL(data,SMB_LARGE_LKOFF_OFFSET_LOW(data_offset));
6956 #endif /* HAVE_LONGLONG */
6957         }
6958
6959         return offset;
6960 }
6961
6962 /****************************************************************************
6963  Reply to a lockingX request.
6964 ****************************************************************************/
6965
6966 void reply_lockingX(struct smb_request *req)
6967 {
6968         connection_struct *conn = req->conn;
6969         files_struct *fsp;
6970         unsigned char locktype;
6971         unsigned char oplocklevel;
6972         uint16 num_ulocks;
6973         uint16 num_locks;
6974         uint64_t count = 0, offset = 0;
6975         uint32 lock_pid;
6976         int32 lock_timeout;
6977         int i;
6978         const uint8_t *data;
6979         bool large_file_format;
6980         bool err;
6981         NTSTATUS status = NT_STATUS_UNSUCCESSFUL;
6982
6983         START_PROFILE(SMBlockingX);
6984
6985         if (req->wct < 8) {
6986                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
6987                 END_PROFILE(SMBlockingX);
6988                 return;
6989         }
6990
6991         fsp = file_fsp(req, SVAL(req->vwv+2, 0));
6992         locktype = CVAL(req->vwv+3, 0);
6993         oplocklevel = CVAL(req->vwv+3, 1);
6994         num_ulocks = SVAL(req->vwv+6, 0);
6995         num_locks = SVAL(req->vwv+7, 0);
6996         lock_timeout = IVAL(req->vwv+4, 0);
6997         large_file_format = (locktype & LOCKING_ANDX_LARGE_FILES)?True:False;
6998
6999         if (!check_fsp(conn, req, fsp)) {
7000                 END_PROFILE(SMBlockingX);
7001                 return;
7002         }
7003
7004         data = req->buf;
7005
7006         if (locktype & LOCKING_ANDX_CHANGE_LOCKTYPE) {
7007                 /* we don't support these - and CANCEL_LOCK makes w2k
7008                    and XP reboot so I don't really want to be
7009                    compatible! (tridge) */
7010                 reply_nterror(req, NT_STATUS_DOS(ERRDOS, ERRnoatomiclocks));
7011                 END_PROFILE(SMBlockingX);
7012                 return;
7013         }
7014
7015         /* Check if this is an oplock break on a file
7016            we have granted an oplock on.
7017         */
7018         if ((locktype & LOCKING_ANDX_OPLOCK_RELEASE)) {
7019                 /* Client can insist on breaking to none. */
7020                 bool break_to_none = (oplocklevel == 0);
7021                 bool result;
7022
7023                 DEBUG(5,("reply_lockingX: oplock break reply (%u) from client "
7024                          "for fnum = %d\n", (unsigned int)oplocklevel,
7025                          fsp->fnum ));
7026
7027                 /*
7028                  * Make sure we have granted an exclusive or batch oplock on
7029                  * this file.
7030                  */
7031
7032                 if (fsp->oplock_type == 0) {
7033
7034                         /* The Samba4 nbench simulator doesn't understand
7035                            the difference between break to level2 and break
7036                            to none from level2 - it sends oplock break
7037                            replies in both cases. Don't keep logging an error
7038                            message here - just ignore it. JRA. */
7039
7040                         DEBUG(5,("reply_lockingX: Error : oplock break from "
7041                                  "client for fnum = %d (oplock=%d) and no "
7042                                  "oplock granted on this file (%s).\n",
7043                                  fsp->fnum, fsp->oplock_type, fsp->fsp_name));
7044
7045                         /* if this is a pure oplock break request then don't
7046                          * send a reply */
7047                         if (num_locks == 0 && num_ulocks == 0) {
7048                                 END_PROFILE(SMBlockingX);
7049                                 return;
7050                         } else {
7051                                 END_PROFILE(SMBlockingX);
7052                                 reply_doserror(req, ERRDOS, ERRlock);
7053                                 return;
7054                         }
7055                 }
7056
7057                 if ((fsp->sent_oplock_break == BREAK_TO_NONE_SENT) ||
7058                     (break_to_none)) {
7059                         result = remove_oplock(fsp);
7060                 } else {
7061                         result = downgrade_oplock(fsp);
7062                 }
7063
7064                 if (!result) {
7065                         DEBUG(0, ("reply_lockingX: error in removing "
7066                                   "oplock on file %s\n", fsp->fsp_name));
7067                         /* Hmmm. Is this panic justified? */
7068                         smb_panic("internal tdb error");
7069                 }
7070
7071                 reply_to_oplock_break_requests(fsp);
7072
7073                 /* if this is a pure oplock break request then don't send a
7074                  * reply */
7075                 if (num_locks == 0 && num_ulocks == 0) {
7076                         /* Sanity check - ensure a pure oplock break is not a
7077                            chained request. */
7078                         if(CVAL(req->vwv+0, 0) != 0xff)
7079                                 DEBUG(0,("reply_lockingX: Error : pure oplock "
7080                                          "break is a chained %d request !\n",
7081                                          (unsigned int)CVAL(req->vwv+0, 0)));
7082                         END_PROFILE(SMBlockingX);
7083                         return;
7084                 }
7085         }
7086
7087         if (req->buflen <
7088             (num_ulocks + num_locks) * (large_file_format ? 20 : 10)) {
7089                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
7090                 END_PROFILE(SMBlockingX);
7091                 return;
7092         }
7093
7094         /* Data now points at the beginning of the list
7095            of smb_unlkrng structs */
7096         for(i = 0; i < (int)num_ulocks; i++) {
7097                 lock_pid = get_lock_pid( data, i, large_file_format);
7098                 count = get_lock_count( data, i, large_file_format);
7099                 offset = get_lock_offset( data, i, large_file_format, &err);
7100
7101                 /*
7102                  * There is no error code marked "stupid client bug".... :-).
7103                  */
7104                 if(err) {
7105                         END_PROFILE(SMBlockingX);
7106                         reply_doserror(req, ERRDOS, ERRnoaccess);
7107                         return;
7108                 }
7109
7110                 DEBUG(10,("reply_lockingX: unlock start=%.0f, len=%.0f for "
7111                           "pid %u, file %s\n", (double)offset, (double)count,
7112                           (unsigned int)lock_pid, fsp->fsp_name ));
7113
7114                 status = do_unlock(smbd_messaging_context(),
7115                                 fsp,
7116                                 lock_pid,
7117                                 count,
7118                                 offset,
7119                                 WINDOWS_LOCK);
7120
7121                 DEBUG(10, ("reply_lockingX: unlock returned %s\n",
7122                     nt_errstr(status)));
7123
7124                 if (NT_STATUS_V(status)) {
7125                         END_PROFILE(SMBlockingX);
7126                         reply_nterror(req, status);
7127                         return;
7128                 }
7129         }
7130
7131         /* Setup the timeout in seconds. */
7132
7133         if (!lp_blocking_locks(SNUM(conn))) {
7134                 lock_timeout = 0;
7135         }
7136
7137         /* Now do any requested locks */
7138         data += ((large_file_format ? 20 : 10)*num_ulocks);
7139
7140         /* Data now points at the beginning of the list
7141            of smb_lkrng structs */
7142
7143         for(i = 0; i < (int)num_locks; i++) {
7144                 enum brl_type lock_type = ((locktype & LOCKING_ANDX_SHARED_LOCK) ?
7145                                 READ_LOCK:WRITE_LOCK);
7146                 lock_pid = get_lock_pid( data, i, large_file_format);
7147                 count = get_lock_count( data, i, large_file_format);
7148                 offset = get_lock_offset( data, i, large_file_format, &err);
7149
7150                 /*
7151                  * There is no error code marked "stupid client bug".... :-).
7152                  */
7153                 if(err) {
7154                         END_PROFILE(SMBlockingX);
7155                         reply_doserror(req, ERRDOS, ERRnoaccess);
7156                         return;
7157                 }
7158
7159                 DEBUG(10,("reply_lockingX: lock start=%.0f, len=%.0f for pid "
7160                           "%u, file %s timeout = %d\n", (double)offset,
7161                           (double)count, (unsigned int)lock_pid,
7162                           fsp->fsp_name, (int)lock_timeout ));
7163
7164                 if (locktype & LOCKING_ANDX_CANCEL_LOCK) {
7165                         struct blocking_lock_record *blr = NULL;
7166
7167                         if (lp_blocking_locks(SNUM(conn))) {
7168
7169                                 /* Schedule a message to ourselves to
7170                                    remove the blocking lock record and
7171                                    return the right error. */
7172
7173                                 blr = blocking_lock_cancel(fsp,
7174                                                 lock_pid,
7175                                                 offset,
7176                                                 count,
7177                                                 WINDOWS_LOCK,
7178                                                 locktype,
7179                                                 NT_STATUS_FILE_LOCK_CONFLICT);
7180                                 if (blr == NULL) {
7181                                         END_PROFILE(SMBlockingX);
7182                                         reply_nterror(
7183                                                 req,
7184                                                 NT_STATUS_DOS(
7185                                                         ERRDOS,
7186                                                         ERRcancelviolation));
7187                                         return;
7188                                 }
7189                         }
7190                         /* Remove a matching pending lock. */
7191                         status = do_lock_cancel(fsp,
7192                                                 lock_pid,
7193                                                 count,
7194                                                 offset,
7195                                                 WINDOWS_LOCK,
7196                                                 blr);
7197                 } else {
7198                         bool blocking_lock = lock_timeout ? True : False;
7199                         bool defer_lock = False;
7200                         struct byte_range_lock *br_lck;
7201                         uint32 block_smbpid;
7202
7203                         br_lck = do_lock(smbd_messaging_context(),
7204                                         fsp,
7205                                         lock_pid,
7206                                         count,
7207                                         offset,
7208                                         lock_type,
7209                                         WINDOWS_LOCK,
7210                                         blocking_lock,
7211                                         &status,
7212                                         &block_smbpid,
7213                                         NULL);
7214
7215                         if (br_lck && blocking_lock && ERROR_WAS_LOCK_DENIED(status)) {
7216                                 /* Windows internal resolution for blocking locks seems
7217                                    to be about 200ms... Don't wait for less than that. JRA. */
7218                                 if (lock_timeout != -1 && lock_timeout < lp_lock_spin_time()) {
7219                                         lock_timeout = lp_lock_spin_time();
7220                                 }
7221                                 defer_lock = True;
7222                         }
7223
7224                         /* This heuristic seems to match W2K3 very well. If a
7225                            lock sent with timeout of zero would fail with NT_STATUS_FILE_LOCK_CONFLICT
7226                            it pretends we asked for a timeout of between 150 - 300 milliseconds as
7227                            far as I can tell. Replacement for do_lock_spin(). JRA. */
7228
7229                         if (br_lck && lp_blocking_locks(SNUM(conn)) && !blocking_lock &&
7230                                         NT_STATUS_EQUAL((status), NT_STATUS_FILE_LOCK_CONFLICT)) {
7231                                 defer_lock = True;
7232                                 lock_timeout = lp_lock_spin_time();
7233                         }
7234
7235                         if (br_lck && defer_lock) {
7236                                 /*
7237                                  * A blocking lock was requested. Package up
7238                                  * this smb into a queued request and push it
7239                                  * onto the blocking lock queue.
7240                                  */
7241                                 if(push_blocking_lock_request(br_lck,
7242                                                         req,
7243                                                         fsp,
7244                                                         lock_timeout,
7245                                                         i,
7246                                                         lock_pid,
7247                                                         lock_type,
7248                                                         WINDOWS_LOCK,
7249                                                         offset,
7250                                                         count,
7251                                                         block_smbpid)) {
7252                                         TALLOC_FREE(br_lck);
7253                                         END_PROFILE(SMBlockingX);
7254                                         return;
7255                                 }
7256                         }
7257
7258                         TALLOC_FREE(br_lck);
7259                 }
7260
7261                 if (NT_STATUS_V(status)) {
7262                         END_PROFILE(SMBlockingX);
7263                         reply_nterror(req, status);
7264                         return;
7265                 }
7266         }
7267
7268         /* If any of the above locks failed, then we must unlock
7269            all of the previous locks (X/Open spec). */
7270
7271         if (!(locktype & LOCKING_ANDX_CANCEL_LOCK) &&
7272                         (i != num_locks) &&
7273                         (num_locks != 0)) {
7274                 /*
7275                  * Ensure we don't do a remove on the lock that just failed,
7276                  * as under POSIX rules, if we have a lock already there, we
7277                  * will delete it (and we shouldn't) .....
7278                  */
7279                 for(i--; i >= 0; i--) {
7280                         lock_pid = get_lock_pid( data, i, large_file_format);
7281                         count = get_lock_count( data, i, large_file_format);
7282                         offset = get_lock_offset( data, i, large_file_format,
7283                                                   &err);
7284
7285                         /*
7286                          * There is no error code marked "stupid client
7287                          * bug".... :-).
7288                          */
7289                         if(err) {
7290                                 END_PROFILE(SMBlockingX);
7291                                 reply_doserror(req, ERRDOS, ERRnoaccess);
7292                                 return;
7293                         }
7294
7295                         do_unlock(smbd_messaging_context(),
7296                                 fsp,
7297                                 lock_pid,
7298                                 count,
7299                                 offset,
7300                                 WINDOWS_LOCK);
7301                 }
7302                 END_PROFILE(SMBlockingX);
7303                 reply_nterror(req, status);
7304                 return;
7305         }
7306
7307         reply_outbuf(req, 2, 0);
7308
7309         DEBUG(3, ("lockingX fnum=%d type=%d num_locks=%d num_ulocks=%d\n",
7310                   fsp->fnum, (unsigned int)locktype, num_locks, num_ulocks));
7311
7312         END_PROFILE(SMBlockingX);
7313         chain_reply(req);
7314 }
7315
7316 #undef DBGC_CLASS
7317 #define DBGC_CLASS DBGC_ALL
7318
7319 /****************************************************************************
7320  Reply to a SMBreadbmpx (read block multiplex) request.
7321  Always reply with an error, if someone has a platform really needs this,
7322  please contact vl@samba.org
7323 ****************************************************************************/
7324
7325 void reply_readbmpx(struct smb_request *req)
7326 {
7327         START_PROFILE(SMBreadBmpx);
7328         reply_doserror(req, ERRSRV, ERRuseSTD);
7329         END_PROFILE(SMBreadBmpx);
7330         return;
7331 }
7332
7333 /****************************************************************************
7334  Reply to a SMBreadbs (read block multiplex secondary) request.
7335  Always reply with an error, if someone has a platform really needs this,
7336  please contact vl@samba.org
7337 ****************************************************************************/
7338
7339 void reply_readbs(struct smb_request *req)
7340 {
7341         START_PROFILE(SMBreadBs);
7342         reply_doserror(req, ERRSRV, ERRuseSTD);
7343         END_PROFILE(SMBreadBs);
7344         return;
7345 }
7346
7347 /****************************************************************************
7348  Reply to a SMBsetattrE.
7349 ****************************************************************************/
7350
7351 void reply_setattrE(struct smb_request *req)
7352 {
7353         connection_struct *conn = req->conn;
7354         struct smb_file_time ft;
7355         files_struct *fsp;
7356         SMB_STRUCT_STAT sbuf;
7357         NTSTATUS status;
7358
7359         START_PROFILE(SMBsetattrE);
7360         ZERO_STRUCT(ft);
7361
7362         if (req->wct < 7) {
7363                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
7364                 END_PROFILE(SMBsetattrE);
7365                 return;
7366         }
7367
7368         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
7369
7370         if(!fsp || (fsp->conn != conn)) {
7371                 reply_doserror(req, ERRDOS, ERRbadfid);
7372                 END_PROFILE(SMBsetattrE);
7373                 return;
7374         }
7375
7376
7377         /*
7378          * Convert the DOS times into unix times.
7379          */
7380
7381         ft.atime = convert_time_t_to_timespec(
7382             srv_make_unix_date2(req->vwv+3));
7383         ft.mtime = convert_time_t_to_timespec(
7384             srv_make_unix_date2(req->vwv+5));
7385         ft.create_time = convert_time_t_to_timespec(
7386             srv_make_unix_date2(req->vwv+1));
7387
7388         reply_outbuf(req, 0, 0);
7389
7390         /*
7391          * Patch from Ray Frush <frush@engr.colostate.edu>
7392          * Sometimes times are sent as zero - ignore them.
7393          */
7394
7395         /* Ensure we have a valid stat struct for the source. */
7396         if (fsp->fh->fd != -1) {
7397                 if (SMB_VFS_FSTAT(fsp, &sbuf) == -1) {
7398                         status = map_nt_error_from_unix(errno);
7399                         reply_nterror(req, status);
7400                         END_PROFILE(SMBsetattrE);
7401                         return;
7402                 }
7403         } else {
7404                 int ret = -1;
7405
7406                 if (fsp->posix_open) {
7407                         ret = SMB_VFS_LSTAT(conn, fsp->fsp_name, &sbuf);
7408                 } else {
7409                         ret = SMB_VFS_STAT(conn, fsp->fsp_name, &sbuf);
7410                 }
7411                 if (ret == -1) {
7412                         status = map_nt_error_from_unix(errno);
7413                         reply_nterror(req, status);
7414                         END_PROFILE(SMBsetattrE);
7415                         return;
7416                 }
7417         }
7418
7419         status = smb_set_file_time(conn, fsp, fsp->fsp_name,
7420                                    &sbuf, &ft, true);
7421         if (!NT_STATUS_IS_OK(status)) {
7422                 reply_doserror(req, ERRDOS, ERRnoaccess);
7423                 END_PROFILE(SMBsetattrE);
7424                 return;
7425         }
7426
7427         DEBUG( 3, ( "reply_setattrE fnum=%d actime=%u modtime=%u "
7428                " createtime=%u\n",
7429                 fsp->fnum,
7430                 (unsigned int)ft.atime.tv_sec,
7431                 (unsigned int)ft.mtime.tv_sec,
7432                 (unsigned int)ft.create_time.tv_sec
7433                 ));
7434
7435         END_PROFILE(SMBsetattrE);
7436         return;
7437 }
7438
7439
7440 /* Back from the dead for OS/2..... JRA. */
7441
7442 /****************************************************************************
7443  Reply to a SMBwritebmpx (write block multiplex primary) request.
7444  Always reply with an error, if someone has a platform really needs this,
7445  please contact vl@samba.org
7446 ****************************************************************************/
7447
7448 void reply_writebmpx(struct smb_request *req)
7449 {
7450         START_PROFILE(SMBwriteBmpx);
7451         reply_doserror(req, ERRSRV, ERRuseSTD);
7452         END_PROFILE(SMBwriteBmpx);
7453         return;
7454 }
7455
7456 /****************************************************************************
7457  Reply to a SMBwritebs (write block multiplex secondary) request.
7458  Always reply with an error, if someone has a platform really needs this,
7459  please contact vl@samba.org
7460 ****************************************************************************/
7461
7462 void reply_writebs(struct smb_request *req)
7463 {
7464         START_PROFILE(SMBwriteBs);
7465         reply_doserror(req, ERRSRV, ERRuseSTD);
7466         END_PROFILE(SMBwriteBs);
7467         return;
7468 }
7469
7470 /****************************************************************************
7471  Reply to a SMBgetattrE.
7472 ****************************************************************************/
7473
7474 void reply_getattrE(struct smb_request *req)
7475 {
7476         connection_struct *conn = req->conn;
7477         SMB_STRUCT_STAT sbuf;
7478         int mode;
7479         files_struct *fsp;
7480         struct timespec create_ts;
7481
7482         START_PROFILE(SMBgetattrE);
7483
7484         if (req->wct < 1) {
7485                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
7486                 END_PROFILE(SMBgetattrE);
7487                 return;
7488         }
7489
7490         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
7491
7492         if(!fsp || (fsp->conn != conn)) {
7493                 reply_doserror(req, ERRDOS, ERRbadfid);
7494                 END_PROFILE(SMBgetattrE);
7495                 return;
7496         }
7497
7498         /* Do an fstat on this file */
7499         if(fsp_stat(fsp, &sbuf)) {
7500                 reply_unixerror(req, ERRDOS, ERRnoaccess);
7501                 END_PROFILE(SMBgetattrE);
7502                 return;
7503         }
7504
7505         mode = dos_mode(conn,fsp->fsp_name,&sbuf);
7506
7507         /*
7508          * Convert the times into dos times. Set create
7509          * date to be last modify date as UNIX doesn't save
7510          * this.
7511          */
7512
7513         reply_outbuf(req, 11, 0);
7514
7515         create_ts = get_create_timespec(&sbuf,
7516                                   lp_fake_dir_create_times(SNUM(conn)));
7517         srv_put_dos_date2((char *)req->outbuf, smb_vwv0, create_ts.tv_sec);
7518         srv_put_dos_date2((char *)req->outbuf, smb_vwv2, sbuf.st_atime);
7519         /* Should we check pending modtime here ? JRA */
7520         srv_put_dos_date2((char *)req->outbuf, smb_vwv4, sbuf.st_mtime);
7521
7522         if (mode & aDIR) {
7523                 SIVAL(req->outbuf, smb_vwv6, 0);
7524                 SIVAL(req->outbuf, smb_vwv8, 0);
7525         } else {
7526                 uint32 allocation_size = SMB_VFS_GET_ALLOC_SIZE(conn,fsp, &sbuf);
7527                 SIVAL(req->outbuf, smb_vwv6, (uint32)sbuf.st_size);
7528                 SIVAL(req->outbuf, smb_vwv8, allocation_size);
7529         }
7530         SSVAL(req->outbuf,smb_vwv10, mode);
7531
7532         DEBUG( 3, ( "reply_getattrE fnum=%d\n", fsp->fnum));
7533
7534         END_PROFILE(SMBgetattrE);
7535         return;
7536 }