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 *)(void *)&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 = 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 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         struct lock_struct lock;
3356
3357         if(SMB_VFS_FSTAT(fsp, &sbuf) == -1) {
3358                 reply_unixerror(req, ERRDOS, ERRnoaccess);
3359                 return;
3360         }
3361
3362         init_strict_lock_struct(fsp, (uint32)req->smbpid,
3363             (uint64_t)startpos, (uint64_t)smb_maxcnt, READ_LOCK,
3364             &lock);
3365
3366         if (!SMB_VFS_STRICT_LOCK(conn, fsp, &lock)) {
3367                 reply_doserror(req, ERRDOS, ERRlock);
3368                 return;
3369         }
3370
3371         if (!S_ISREG(sbuf.st_mode) || (startpos > sbuf.st_size)
3372             || (smb_maxcnt > (sbuf.st_size - startpos))) {
3373                 /*
3374                  * We already know that we would do a short read, so don't
3375                  * try the sendfile() path.
3376                  */
3377                 goto nosendfile_read;
3378         }
3379
3380 #if defined(WITH_SENDFILE)
3381         /*
3382          * We can only use sendfile on a non-chained packet
3383          * but we can use on a non-oplocked file. tridge proved this
3384          * on a train in Germany :-). JRA.
3385          */
3386
3387         if (!req_is_in_chain(req) &&
3388             !is_encrypted_packet(req->inbuf) && (fsp->base_fsp == NULL) &&
3389             (fsp->wcp == NULL) &&
3390             lp_use_sendfile(SNUM(conn), smbd_server_conn->signing_state) ) {
3391                 uint8 headerbuf[smb_size + 12 * 2];
3392                 DATA_BLOB header;
3393
3394                 /*
3395                  * Set up the packet header before send. We
3396                  * assume here the sendfile will work (get the
3397                  * correct amount of data).
3398                  */
3399
3400                 header = data_blob_const(headerbuf, sizeof(headerbuf));
3401
3402                 construct_reply_common_req(req, (char *)headerbuf);
3403                 setup_readX_header(req, (char *)headerbuf, smb_maxcnt);
3404
3405                 if ((nread = SMB_VFS_SENDFILE(smbd_server_fd(), fsp, &header, startpos, smb_maxcnt)) == -1) {
3406                         /* Returning ENOSYS means no data at all was sent.
3407                            Do this as a normal read. */
3408                         if (errno == ENOSYS) {
3409                                 goto normal_read;
3410                         }
3411
3412                         /*
3413                          * Special hack for broken Linux with no working sendfile. If we
3414                          * return EINTR we sent the header but not the rest of the data.
3415                          * Fake this up by doing read/write calls.
3416                          */
3417
3418                         if (errno == EINTR) {
3419                                 /* Ensure we don't do this again. */
3420                                 set_use_sendfile(SNUM(conn), False);
3421                                 DEBUG(0,("send_file_readX: sendfile not available. Faking..\n"));
3422                                 nread = fake_sendfile(fsp, startpos,
3423                                                       smb_maxcnt);
3424                                 if (nread == -1) {
3425                                         DEBUG(0,("send_file_readX: fake_sendfile failed for file %s (%s).\n",
3426                                                 fsp->fsp_name, strerror(errno) ));
3427                                         exit_server_cleanly("send_file_readX: fake_sendfile failed");
3428                                 }
3429                                 DEBUG( 3, ( "send_file_readX: fake_sendfile fnum=%d max=%d nread=%d\n",
3430                                         fsp->fnum, (int)smb_maxcnt, (int)nread ) );
3431                                 /* No outbuf here means successful sendfile. */
3432                                 goto strict_unlock;
3433                         }
3434
3435                         DEBUG(0,("send_file_readX: sendfile failed for file %s (%s). Terminating\n",
3436                                 fsp->fsp_name, strerror(errno) ));
3437                         exit_server_cleanly("send_file_readX sendfile failed");
3438                 } else if (nread == 0) {
3439                         /*
3440                          * Some sendfile implementations return 0 to indicate
3441                          * that there was a short read, but nothing was
3442                          * actually written to the socket.  In this case,
3443                          * fallback to the normal read path so the header gets
3444                          * the correct byte count.
3445                          */
3446                         DEBUG(3, ("send_file_readX: sendfile sent zero bytes "
3447                                   "falling back to the normal read: %s\n",
3448                                   fsp->fsp_name));
3449                         goto normal_read;
3450                 }
3451
3452                 DEBUG( 3, ( "send_file_readX: sendfile fnum=%d max=%d nread=%d\n",
3453                         fsp->fnum, (int)smb_maxcnt, (int)nread ) );
3454
3455                 /* Deal with possible short send. */
3456                 if (nread != smb_maxcnt + sizeof(headerbuf)) {
3457                         sendfile_short_send(fsp, nread, sizeof(headerbuf), smb_maxcnt);
3458                 }
3459                 /* No outbuf here means successful sendfile. */
3460                 SMB_PERFCOUNT_SET_MSGLEN_OUT(&req->pcd, nread);
3461                 SMB_PERFCOUNT_END(&req->pcd);
3462                 goto strict_unlock;
3463         }
3464
3465 normal_read:
3466
3467 #endif
3468
3469         if ((smb_maxcnt & 0xFF0000) > 0x10000) {
3470                 uint8 headerbuf[smb_size + 2*12];
3471
3472                 construct_reply_common_req(req, (char *)headerbuf);
3473                 setup_readX_header(req, (char *)headerbuf, smb_maxcnt);
3474
3475                 /* Send out the header. */
3476                 if (write_data(smbd_server_fd(), (char *)headerbuf,
3477                                sizeof(headerbuf)) != sizeof(headerbuf)) {
3478                         DEBUG(0,("send_file_readX: write_data failed for file %s (%s). Terminating\n",
3479                                 fsp->fsp_name, strerror(errno) ));
3480                         exit_server_cleanly("send_file_readX sendfile failed");
3481                 }
3482                 nread = fake_sendfile(fsp, startpos, smb_maxcnt);
3483                 if (nread == -1) {
3484                         DEBUG(0,("send_file_readX: fake_sendfile failed for file %s (%s).\n",
3485                                 fsp->fsp_name, strerror(errno) ));
3486                         exit_server_cleanly("send_file_readX: fake_sendfile failed");
3487                 }
3488                 goto strict_unlock;
3489         }
3490
3491 nosendfile_read:
3492
3493         reply_outbuf(req, 12, smb_maxcnt);
3494
3495         nread = read_file(fsp, smb_buf(req->outbuf), startpos, smb_maxcnt);
3496
3497         SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
3498
3499         if (nread < 0) {
3500                 reply_unixerror(req, ERRDOS, ERRnoaccess);
3501                 return;
3502         }
3503
3504         setup_readX_header(req, (char *)req->outbuf, nread);
3505
3506         DEBUG( 3, ( "send_file_readX fnum=%d max=%d nread=%d\n",
3507                     fsp->fnum, (int)smb_maxcnt, (int)nread ) );
3508
3509         chain_reply(req);
3510         return;
3511
3512  strict_unlock:
3513         SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
3514         TALLOC_FREE(req->outbuf);
3515         return;
3516 }
3517
3518 /****************************************************************************
3519  Reply to a read and X.
3520 ****************************************************************************/
3521
3522 void reply_read_and_X(struct smb_request *req)
3523 {
3524         connection_struct *conn = req->conn;
3525         files_struct *fsp;
3526         SMB_OFF_T startpos;
3527         size_t smb_maxcnt;
3528         bool big_readX = False;
3529 #if 0
3530         size_t smb_mincnt = SVAL(req->vwv+6, 0);
3531 #endif
3532
3533         START_PROFILE(SMBreadX);
3534
3535         if ((req->wct != 10) && (req->wct != 12)) {
3536                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
3537                 return;
3538         }
3539
3540         fsp = file_fsp(req, SVAL(req->vwv+2, 0));
3541         startpos = IVAL_TO_SMB_OFF_T(req->vwv+3, 0);
3542         smb_maxcnt = SVAL(req->vwv+5, 0);
3543
3544         /* If it's an IPC, pass off the pipe handler. */
3545         if (IS_IPC(conn)) {
3546                 reply_pipe_read_and_X(req);
3547                 END_PROFILE(SMBreadX);
3548                 return;
3549         }
3550
3551         if (!check_fsp(conn, req, fsp)) {
3552                 END_PROFILE(SMBreadX);
3553                 return;
3554         }
3555
3556         if (!CHECK_READ(fsp,req)) {
3557                 reply_doserror(req, ERRDOS,ERRbadaccess);
3558                 END_PROFILE(SMBreadX);
3559                 return;
3560         }
3561
3562         if (global_client_caps & CAP_LARGE_READX) {
3563                 size_t upper_size = SVAL(req->vwv+7, 0);
3564                 smb_maxcnt |= (upper_size<<16);
3565                 if (upper_size > 1) {
3566                         /* Can't do this on a chained packet. */
3567                         if ((CVAL(req->vwv+0, 0) != 0xFF)) {
3568                                 reply_nterror(req, NT_STATUS_NOT_SUPPORTED);
3569                                 END_PROFILE(SMBreadX);
3570                                 return;
3571                         }
3572                         /* We currently don't do this on signed or sealed data. */
3573                         if (srv_is_signing_active(smbd_server_conn) ||
3574                             is_encrypted_packet(req->inbuf)) {
3575                                 reply_nterror(req, NT_STATUS_NOT_SUPPORTED);
3576                                 END_PROFILE(SMBreadX);
3577                                 return;
3578                         }
3579                         /* Is there room in the reply for this data ? */
3580                         if (smb_maxcnt > (0xFFFFFF - (smb_size -4 + 12*2)))  {
3581                                 reply_nterror(req,
3582                                               NT_STATUS_INVALID_PARAMETER);
3583                                 END_PROFILE(SMBreadX);
3584                                 return;
3585                         }
3586                         big_readX = True;
3587                 }
3588         }
3589
3590         if (req->wct == 12) {
3591 #ifdef LARGE_SMB_OFF_T
3592                 /*
3593                  * This is a large offset (64 bit) read.
3594                  */
3595                 startpos |= (((SMB_OFF_T)IVAL(req->vwv+10, 0)) << 32);
3596
3597 #else /* !LARGE_SMB_OFF_T */
3598
3599                 /*
3600                  * Ensure we haven't been sent a >32 bit offset.
3601                  */
3602
3603                 if(IVAL(req->vwv+10, 0) != 0) {
3604                         DEBUG(0,("reply_read_and_X - large offset (%x << 32) "
3605                                  "used and we don't support 64 bit offsets.\n",
3606                                  (unsigned int)IVAL(req->vwv+10, 0) ));
3607                         END_PROFILE(SMBreadX);
3608                         reply_doserror(req, ERRDOS, ERRbadaccess);
3609                         return;
3610                 }
3611
3612 #endif /* LARGE_SMB_OFF_T */
3613
3614         }
3615
3616         if (!big_readX &&
3617             schedule_aio_read_and_X(conn, req, fsp, startpos, smb_maxcnt)) {
3618                 goto out;
3619         }
3620
3621         send_file_readX(conn, req, fsp, startpos, smb_maxcnt);
3622
3623  out:
3624         END_PROFILE(SMBreadX);
3625         return;
3626 }
3627
3628 /****************************************************************************
3629  Error replies to writebraw must have smb_wct == 1. Fix this up.
3630 ****************************************************************************/
3631
3632 void error_to_writebrawerr(struct smb_request *req)
3633 {
3634         uint8 *old_outbuf = req->outbuf;
3635
3636         reply_outbuf(req, 1, 0);
3637
3638         memcpy(req->outbuf, old_outbuf, smb_size);
3639         TALLOC_FREE(old_outbuf);
3640 }
3641
3642 /****************************************************************************
3643  Reply to a writebraw (core+ or LANMAN1.0 protocol).
3644 ****************************************************************************/
3645
3646 void reply_writebraw(struct smb_request *req)
3647 {
3648         connection_struct *conn = req->conn;
3649         char *buf = NULL;
3650         ssize_t nwritten=0;
3651         ssize_t total_written=0;
3652         size_t numtowrite=0;
3653         size_t tcount;
3654         SMB_OFF_T startpos;
3655         char *data=NULL;
3656         bool write_through;
3657         files_struct *fsp;
3658         struct lock_struct lock;
3659         NTSTATUS status;
3660
3661         START_PROFILE(SMBwritebraw);
3662
3663         /*
3664          * If we ever reply with an error, it must have the SMB command
3665          * type of SMBwritec, not SMBwriteBraw, as this tells the client
3666          * we're finished.
3667          */
3668         SCVAL(req->inbuf,smb_com,SMBwritec);
3669
3670         if (srv_is_signing_active(smbd_server_conn)) {
3671                 END_PROFILE(SMBwritebraw);
3672                 exit_server_cleanly("reply_writebraw: SMB signing is active - "
3673                                 "raw reads/writes are disallowed.");
3674         }
3675
3676         if (req->wct < 12) {
3677                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
3678                 error_to_writebrawerr(req);
3679                 END_PROFILE(SMBwritebraw);
3680                 return;
3681         }
3682
3683         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
3684         if (!check_fsp(conn, req, fsp)) {
3685                 error_to_writebrawerr(req);
3686                 END_PROFILE(SMBwritebraw);
3687                 return;
3688         }
3689
3690         if (!CHECK_WRITE(fsp)) {
3691                 reply_doserror(req, ERRDOS, ERRbadaccess);
3692                 error_to_writebrawerr(req);
3693                 END_PROFILE(SMBwritebraw);
3694                 return;
3695         }
3696
3697         tcount = IVAL(req->vwv+1, 0);
3698         startpos = IVAL_TO_SMB_OFF_T(req->vwv+3, 0);
3699         write_through = BITSETW(req->vwv+7,0);
3700
3701         /* We have to deal with slightly different formats depending
3702                 on whether we are using the core+ or lanman1.0 protocol */
3703
3704         if(Protocol <= PROTOCOL_COREPLUS) {
3705                 numtowrite = SVAL(smb_buf(req->inbuf),-2);
3706                 data = smb_buf(req->inbuf);
3707         } else {
3708                 numtowrite = SVAL(req->vwv+10, 0);
3709                 data = smb_base(req->inbuf) + SVAL(req->vwv+11, 0);
3710         }
3711
3712         /* Ensure we don't write bytes past the end of this packet. */
3713         if (data + numtowrite > smb_base(req->inbuf) + smb_len(req->inbuf)) {
3714                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
3715                 error_to_writebrawerr(req);
3716                 END_PROFILE(SMBwritebraw);
3717                 return;
3718         }
3719
3720         init_strict_lock_struct(fsp, (uint32)req->smbpid,
3721             (uint64_t)startpos, (uint64_t)tcount, WRITE_LOCK,
3722             &lock);
3723
3724         if (!SMB_VFS_STRICT_LOCK(conn, fsp, &lock)) {
3725                 reply_doserror(req, ERRDOS, ERRlock);
3726                 error_to_writebrawerr(req);
3727                 END_PROFILE(SMBwritebraw);
3728                 return;
3729         }
3730
3731         if (numtowrite>0) {
3732                 nwritten = write_file(req,fsp,data,startpos,numtowrite);
3733         }
3734
3735         DEBUG(3,("reply_writebraw: initial write fnum=%d start=%.0f num=%d "
3736                         "wrote=%d sync=%d\n",
3737                 fsp->fnum, (double)startpos, (int)numtowrite,
3738                 (int)nwritten, (int)write_through));
3739
3740         if (nwritten < (ssize_t)numtowrite)  {
3741                 reply_unixerror(req, ERRHRD, ERRdiskfull);
3742                 error_to_writebrawerr(req);
3743                 goto strict_unlock;
3744         }
3745
3746         total_written = nwritten;
3747
3748         /* Allocate a buffer of 64k + length. */
3749         buf = TALLOC_ARRAY(NULL, char, 65540);
3750         if (!buf) {
3751                 reply_doserror(req, ERRDOS, ERRnomem);
3752                 error_to_writebrawerr(req);
3753                 goto strict_unlock;
3754         }
3755
3756         /* Return a SMBwritebraw message to the redirector to tell
3757          * it to send more bytes */
3758
3759         memcpy(buf, req->inbuf, smb_size);
3760         srv_set_message(buf,Protocol>PROTOCOL_COREPLUS?1:0,0,True);
3761         SCVAL(buf,smb_com,SMBwritebraw);
3762         SSVALS(buf,smb_vwv0,0xFFFF);
3763         show_msg(buf);
3764         if (!srv_send_smb(smbd_server_fd(),
3765                           buf,
3766                           false, 0, /* no signing */
3767                           IS_CONN_ENCRYPTED(conn),
3768                           &req->pcd)) {
3769                 exit_server_cleanly("reply_writebraw: srv_send_smb "
3770                         "failed.");
3771         }
3772
3773         /* Now read the raw data into the buffer and write it */
3774         status = read_smb_length(smbd_server_fd(), buf, SMB_SECONDARY_WAIT,
3775                                  &numtowrite);
3776         if (!NT_STATUS_IS_OK(status)) {
3777                 exit_server_cleanly("secondary writebraw failed");
3778         }
3779
3780         /* Set up outbuf to return the correct size */
3781         reply_outbuf(req, 1, 0);
3782
3783         if (numtowrite != 0) {
3784
3785                 if (numtowrite > 0xFFFF) {
3786                         DEBUG(0,("reply_writebraw: Oversize secondary write "
3787                                 "raw requested (%u). Terminating\n",
3788                                 (unsigned int)numtowrite ));
3789                         exit_server_cleanly("secondary writebraw failed");
3790                 }
3791
3792                 if (tcount > nwritten+numtowrite) {
3793                         DEBUG(3,("reply_writebraw: Client overestimated the "
3794                                 "write %d %d %d\n",
3795                                 (int)tcount,(int)nwritten,(int)numtowrite));
3796                 }
3797
3798                 status = read_data(smbd_server_fd(), buf+4, numtowrite);
3799
3800                 if (!NT_STATUS_IS_OK(status)) {
3801                         DEBUG(0,("reply_writebraw: Oversize secondary write "
3802                                  "raw read failed (%s). Terminating\n",
3803                                  nt_errstr(status)));
3804                         exit_server_cleanly("secondary writebraw failed");
3805                 }
3806
3807                 nwritten = write_file(req,fsp,buf+4,startpos+nwritten,numtowrite);
3808                 if (nwritten == -1) {
3809                         TALLOC_FREE(buf);
3810                         reply_unixerror(req, ERRHRD, ERRdiskfull);
3811                         error_to_writebrawerr(req);
3812                         goto strict_unlock;
3813                 }
3814
3815                 if (nwritten < (ssize_t)numtowrite) {
3816                         SCVAL(req->outbuf,smb_rcls,ERRHRD);
3817                         SSVAL(req->outbuf,smb_err,ERRdiskfull);
3818                 }
3819
3820                 if (nwritten > 0) {
3821                         total_written += nwritten;
3822                 }
3823         }
3824
3825         TALLOC_FREE(buf);
3826         SSVAL(req->outbuf,smb_vwv0,total_written);
3827
3828         status = sync_file(conn, fsp, write_through);
3829         if (!NT_STATUS_IS_OK(status)) {
3830                 DEBUG(5,("reply_writebraw: sync_file for %s returned %s\n",
3831                         fsp->fsp_name, nt_errstr(status) ));
3832                 reply_nterror(req, status);
3833                 error_to_writebrawerr(req);
3834                 goto strict_unlock;
3835         }
3836
3837         DEBUG(3,("reply_writebraw: secondart write fnum=%d start=%.0f num=%d "
3838                 "wrote=%d\n",
3839                 fsp->fnum, (double)startpos, (int)numtowrite,
3840                 (int)total_written));
3841
3842         SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
3843
3844         /* We won't return a status if write through is not selected - this
3845          * follows what WfWg does */
3846         END_PROFILE(SMBwritebraw);
3847
3848         if (!write_through && total_written==tcount) {
3849
3850 #if RABBIT_PELLET_FIX
3851                 /*
3852                  * Fix for "rabbit pellet" mode, trigger an early TCP ack by
3853                  * sending a SMBkeepalive. Thanks to DaveCB at Sun for this.
3854                  * JRA.
3855                  */
3856                 if (!send_keepalive(smbd_server_fd())) {
3857                         exit_server_cleanly("reply_writebraw: send of "
3858                                 "keepalive failed");
3859                 }
3860 #endif
3861                 TALLOC_FREE(req->outbuf);
3862         }
3863         return;
3864
3865 strict_unlock:
3866         SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
3867
3868         END_PROFILE(SMBwritebraw);
3869         return;
3870 }
3871
3872 #undef DBGC_CLASS
3873 #define DBGC_CLASS DBGC_LOCKING
3874
3875 /****************************************************************************
3876  Reply to a writeunlock (core+).
3877 ****************************************************************************/
3878
3879 void reply_writeunlock(struct smb_request *req)
3880 {
3881         connection_struct *conn = req->conn;
3882         ssize_t nwritten = -1;
3883         size_t numtowrite;
3884         SMB_OFF_T startpos;
3885         const char *data;
3886         NTSTATUS status = NT_STATUS_OK;
3887         files_struct *fsp;
3888         struct lock_struct lock;
3889
3890         START_PROFILE(SMBwriteunlock);
3891
3892         if (req->wct < 5) {
3893                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
3894                 END_PROFILE(SMBwriteunlock);
3895                 return;
3896         }
3897
3898         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
3899
3900         if (!check_fsp(conn, req, fsp)) {
3901                 END_PROFILE(SMBwriteunlock);
3902                 return;
3903         }
3904
3905         if (!CHECK_WRITE(fsp)) {
3906                 reply_doserror(req, ERRDOS,ERRbadaccess);
3907                 END_PROFILE(SMBwriteunlock);
3908                 return;
3909         }
3910
3911         numtowrite = SVAL(req->vwv+1, 0);
3912         startpos = IVAL_TO_SMB_OFF_T(req->vwv+2, 0);
3913         data = (const char *)req->buf + 3;
3914
3915         if (numtowrite) {
3916                 init_strict_lock_struct(fsp, (uint32)req->smbpid,
3917                     (uint64_t)startpos, (uint64_t)numtowrite, WRITE_LOCK,
3918                     &lock);
3919
3920                 if (!SMB_VFS_STRICT_LOCK(conn, fsp, &lock)) {
3921                         reply_doserror(req, ERRDOS, ERRlock);
3922                         END_PROFILE(SMBwriteunlock);
3923                         return;
3924                 }
3925         }
3926
3927         /* The special X/Open SMB protocol handling of
3928            zero length writes is *NOT* done for
3929            this call */
3930         if(numtowrite == 0) {
3931                 nwritten = 0;
3932         } else {
3933                 nwritten = write_file(req,fsp,data,startpos,numtowrite);
3934         }
3935
3936         status = sync_file(conn, fsp, False /* write through */);
3937         if (!NT_STATUS_IS_OK(status)) {
3938                 DEBUG(5,("reply_writeunlock: sync_file for %s returned %s\n",
3939                         fsp->fsp_name, nt_errstr(status) ));
3940                 reply_nterror(req, status);
3941                 goto strict_unlock;
3942         }
3943
3944         if(((nwritten < numtowrite) && (numtowrite != 0))||(nwritten < 0)) {
3945                 reply_unixerror(req, ERRHRD, ERRdiskfull);
3946                 goto strict_unlock;
3947         }
3948
3949         if (numtowrite) {
3950                 status = do_unlock(smbd_messaging_context(),
3951                                 fsp,
3952                                 req->smbpid,
3953                                 (uint64_t)numtowrite,
3954                                 (uint64_t)startpos,
3955                                 WINDOWS_LOCK);
3956
3957                 if (NT_STATUS_V(status)) {
3958                         reply_nterror(req, status);
3959                         goto strict_unlock;
3960                 }
3961         }
3962
3963         reply_outbuf(req, 1, 0);
3964
3965         SSVAL(req->outbuf,smb_vwv0,nwritten);
3966
3967         DEBUG(3,("writeunlock fnum=%d num=%d wrote=%d\n",
3968                  fsp->fnum, (int)numtowrite, (int)nwritten));
3969
3970 strict_unlock:
3971         if (numtowrite) {
3972                 SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
3973         }
3974
3975         END_PROFILE(SMBwriteunlock);
3976         return;
3977 }
3978
3979 #undef DBGC_CLASS
3980 #define DBGC_CLASS DBGC_ALL
3981
3982 /****************************************************************************
3983  Reply to a write.
3984 ****************************************************************************/
3985
3986 void reply_write(struct smb_request *req)
3987 {
3988         connection_struct *conn = req->conn;
3989         size_t numtowrite;
3990         ssize_t nwritten = -1;
3991         SMB_OFF_T startpos;
3992         const char *data;
3993         files_struct *fsp;
3994         struct lock_struct lock;
3995         NTSTATUS status;
3996
3997         START_PROFILE(SMBwrite);
3998
3999         if (req->wct < 5) {
4000                 END_PROFILE(SMBwrite);
4001                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4002                 return;
4003         }
4004
4005         /* If it's an IPC, pass off the pipe handler. */
4006         if (IS_IPC(conn)) {
4007                 reply_pipe_write(req);
4008                 END_PROFILE(SMBwrite);
4009                 return;
4010         }
4011
4012         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
4013
4014         if (!check_fsp(conn, req, fsp)) {
4015                 END_PROFILE(SMBwrite);
4016                 return;
4017         }
4018
4019         if (!CHECK_WRITE(fsp)) {
4020                 reply_doserror(req, ERRDOS, ERRbadaccess);
4021                 END_PROFILE(SMBwrite);
4022                 return;
4023         }
4024
4025         numtowrite = SVAL(req->vwv+1, 0);
4026         startpos = IVAL_TO_SMB_OFF_T(req->vwv+2, 0);
4027         data = (const char *)req->buf + 3;
4028
4029         init_strict_lock_struct(fsp, (uint32)req->smbpid,
4030             (uint64_t)startpos, (uint64_t)numtowrite, WRITE_LOCK,
4031             &lock);
4032
4033         if (!SMB_VFS_STRICT_LOCK(conn, fsp, &lock)) {
4034                 reply_doserror(req, ERRDOS, ERRlock);
4035                 END_PROFILE(SMBwrite);
4036                 return;
4037         }
4038
4039         /*
4040          * X/Open SMB protocol says that if smb_vwv1 is
4041          * zero then the file size should be extended or
4042          * truncated to the size given in smb_vwv[2-3].
4043          */
4044
4045         if(numtowrite == 0) {
4046                 /*
4047                  * This is actually an allocate call, and set EOF. JRA.
4048                  */
4049                 nwritten = vfs_allocate_file_space(fsp, (SMB_OFF_T)startpos);
4050                 if (nwritten < 0) {
4051                         reply_nterror(req, NT_STATUS_DISK_FULL);
4052                         goto strict_unlock;
4053                 }
4054                 nwritten = vfs_set_filelen(fsp, (SMB_OFF_T)startpos);
4055                 if (nwritten < 0) {
4056                         reply_nterror(req, NT_STATUS_DISK_FULL);
4057                         goto strict_unlock;
4058                 }
4059                 trigger_write_time_update_immediate(fsp);
4060         } else {
4061                 nwritten = write_file(req,fsp,data,startpos,numtowrite);
4062         }
4063
4064         status = sync_file(conn, fsp, False);
4065         if (!NT_STATUS_IS_OK(status)) {
4066                 DEBUG(5,("reply_write: sync_file for %s returned %s\n",
4067                         fsp->fsp_name, nt_errstr(status) ));
4068                 reply_nterror(req, status);
4069                 goto strict_unlock;
4070         }
4071
4072         if(((nwritten == 0) && (numtowrite != 0))||(nwritten < 0)) {
4073                 reply_unixerror(req, ERRHRD, ERRdiskfull);
4074                 goto strict_unlock;
4075         }
4076
4077         reply_outbuf(req, 1, 0);
4078
4079         SSVAL(req->outbuf,smb_vwv0,nwritten);
4080
4081         if (nwritten < (ssize_t)numtowrite) {
4082                 SCVAL(req->outbuf,smb_rcls,ERRHRD);
4083                 SSVAL(req->outbuf,smb_err,ERRdiskfull);
4084         }
4085
4086         DEBUG(3,("write fnum=%d num=%d wrote=%d\n", fsp->fnum, (int)numtowrite, (int)nwritten));
4087
4088 strict_unlock:
4089         SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
4090
4091         END_PROFILE(SMBwrite);
4092         return;
4093 }
4094
4095 /****************************************************************************
4096  Ensure a buffer is a valid writeX for recvfile purposes.
4097 ****************************************************************************/
4098
4099 #define STANDARD_WRITE_AND_X_HEADER_SIZE (smb_size - 4 + /* basic header */ \
4100                                                 (2*14) + /* word count (including bcc) */ \
4101                                                 1 /* pad byte */)
4102
4103 bool is_valid_writeX_buffer(const uint8_t *inbuf)
4104 {
4105         size_t numtowrite;
4106         connection_struct *conn = NULL;
4107         unsigned int doff = 0;
4108         size_t len = smb_len_large(inbuf);
4109
4110         if (is_encrypted_packet(inbuf)) {
4111                 /* Can't do this on encrypted
4112                  * connections. */
4113                 return false;
4114         }
4115
4116         if (CVAL(inbuf,smb_com) != SMBwriteX) {
4117                 return false;
4118         }
4119
4120         if (CVAL(inbuf,smb_vwv0) != 0xFF ||
4121                         CVAL(inbuf,smb_wct) != 14) {
4122                 DEBUG(10,("is_valid_writeX_buffer: chained or "
4123                         "invalid word length.\n"));
4124                 return false;
4125         }
4126
4127         conn = conn_find(SVAL(inbuf, smb_tid));
4128         if (conn == NULL) {
4129                 DEBUG(10,("is_valid_writeX_buffer: bad tid\n"));
4130                 return false;
4131         }
4132         if (IS_IPC(conn)) {
4133                 DEBUG(10,("is_valid_writeX_buffer: IPC$ tid\n"));
4134                 return false;
4135         }
4136         if (IS_PRINT(conn)) {
4137                 DEBUG(10,("is_valid_writeX_buffer: printing tid\n"));
4138                 return false;
4139         }
4140         doff = SVAL(inbuf,smb_vwv11);
4141
4142         numtowrite = SVAL(inbuf,smb_vwv10);
4143
4144         if (len > doff && len - doff > 0xFFFF) {
4145                 numtowrite |= (((size_t)SVAL(inbuf,smb_vwv9))<<16);
4146         }
4147
4148         if (numtowrite == 0) {
4149                 DEBUG(10,("is_valid_writeX_buffer: zero write\n"));
4150                 return false;
4151         }
4152
4153         /* Ensure the sizes match up. */
4154         if (doff < STANDARD_WRITE_AND_X_HEADER_SIZE) {
4155                 /* no pad byte...old smbclient :-( */
4156                 DEBUG(10,("is_valid_writeX_buffer: small doff %u (min %u)\n",
4157                         (unsigned int)doff,
4158                         (unsigned int)STANDARD_WRITE_AND_X_HEADER_SIZE));
4159                 return false;
4160         }
4161
4162         if (len - doff != numtowrite) {
4163                 DEBUG(10,("is_valid_writeX_buffer: doff mismatch "
4164                         "len = %u, doff = %u, numtowrite = %u\n",
4165                         (unsigned int)len,
4166                         (unsigned int)doff,
4167                         (unsigned int)numtowrite ));
4168                 return false;
4169         }
4170
4171         DEBUG(10,("is_valid_writeX_buffer: true "
4172                 "len = %u, doff = %u, numtowrite = %u\n",
4173                 (unsigned int)len,
4174                 (unsigned int)doff,
4175                 (unsigned int)numtowrite ));
4176
4177         return true;
4178 }
4179
4180 /****************************************************************************
4181  Reply to a write and X.
4182 ****************************************************************************/
4183
4184 void reply_write_and_X(struct smb_request *req)
4185 {
4186         connection_struct *conn = req->conn;
4187         files_struct *fsp;
4188         struct lock_struct lock;
4189         SMB_OFF_T startpos;
4190         size_t numtowrite;
4191         bool write_through;
4192         ssize_t nwritten;
4193         unsigned int smb_doff;
4194         unsigned int smblen;
4195         char *data;
4196         NTSTATUS status;
4197
4198         START_PROFILE(SMBwriteX);
4199
4200         if ((req->wct != 12) && (req->wct != 14)) {
4201                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4202                 END_PROFILE(SMBwriteX);
4203                 return;
4204         }
4205
4206         numtowrite = SVAL(req->vwv+10, 0);
4207         smb_doff = SVAL(req->vwv+11, 0);
4208         smblen = smb_len(req->inbuf);
4209
4210         if (req->unread_bytes > 0xFFFF ||
4211                         (smblen > smb_doff &&
4212                                 smblen - smb_doff > 0xFFFF)) {
4213                 numtowrite |= (((size_t)SVAL(req->vwv+9, 0))<<16);
4214         }
4215
4216         if (req->unread_bytes) {
4217                 /* Can't do a recvfile write on IPC$ */
4218                 if (IS_IPC(conn)) {
4219                         reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4220                         END_PROFILE(SMBwriteX);
4221                         return;
4222                 }
4223                 if (numtowrite != req->unread_bytes) {
4224                         reply_doserror(req, ERRDOS, ERRbadmem);
4225                         END_PROFILE(SMBwriteX);
4226                         return;
4227                 }
4228         } else {
4229                 if (smb_doff > smblen || smb_doff + numtowrite < numtowrite ||
4230                                 smb_doff + numtowrite > smblen) {
4231                         reply_doserror(req, ERRDOS, ERRbadmem);
4232                         END_PROFILE(SMBwriteX);
4233                         return;
4234                 }
4235         }
4236
4237         /* If it's an IPC, pass off the pipe handler. */
4238         if (IS_IPC(conn)) {
4239                 if (req->unread_bytes) {
4240                         reply_doserror(req, ERRDOS, ERRbadmem);
4241                         END_PROFILE(SMBwriteX);
4242                         return;
4243                 }
4244                 reply_pipe_write_and_X(req);
4245                 END_PROFILE(SMBwriteX);
4246                 return;
4247         }
4248
4249         fsp = file_fsp(req, SVAL(req->vwv+2, 0));
4250         startpos = IVAL_TO_SMB_OFF_T(req->vwv+3, 0);
4251         write_through = BITSETW(req->vwv+7,0);
4252
4253         if (!check_fsp(conn, req, fsp)) {
4254                 END_PROFILE(SMBwriteX);
4255                 return;
4256         }
4257
4258         if (!CHECK_WRITE(fsp)) {
4259                 reply_doserror(req, ERRDOS, ERRbadaccess);
4260                 END_PROFILE(SMBwriteX);
4261                 return;
4262         }
4263
4264         data = smb_base(req->inbuf) + smb_doff;
4265
4266         if(req->wct == 14) {
4267 #ifdef LARGE_SMB_OFF_T
4268                 /*
4269                  * This is a large offset (64 bit) write.
4270                  */
4271                 startpos |= (((SMB_OFF_T)IVAL(req->vwv+12, 0)) << 32);
4272
4273 #else /* !LARGE_SMB_OFF_T */
4274
4275                 /*
4276                  * Ensure we haven't been sent a >32 bit offset.
4277                  */
4278
4279                 if(IVAL(req->vwv+12, 0) != 0) {
4280                         DEBUG(0,("reply_write_and_X - large offset (%x << 32) "
4281                                  "used and we don't support 64 bit offsets.\n",
4282                                  (unsigned int)IVAL(req->vwv+12, 0) ));
4283                         reply_doserror(req, ERRDOS, ERRbadaccess);
4284                         END_PROFILE(SMBwriteX);
4285                         return;
4286                 }
4287
4288 #endif /* LARGE_SMB_OFF_T */
4289         }
4290
4291         init_strict_lock_struct(fsp, (uint32)req->smbpid,
4292             (uint64_t)startpos, (uint64_t)numtowrite, WRITE_LOCK,
4293             &lock);
4294
4295         if (!SMB_VFS_STRICT_LOCK(conn, fsp, &lock)) {
4296                 reply_doserror(req, ERRDOS, ERRlock);
4297                 END_PROFILE(SMBwriteX);
4298                 return;
4299         }
4300
4301         /* X/Open SMB protocol says that, unlike SMBwrite
4302         if the length is zero then NO truncation is
4303         done, just a write of zero. To truncate a file,
4304         use SMBwrite. */
4305
4306         if(numtowrite == 0) {
4307                 nwritten = 0;
4308         } else {
4309
4310                 if ((req->unread_bytes == 0) &&
4311                     schedule_aio_write_and_X(conn, req, fsp, data, startpos,
4312                                              numtowrite)) {
4313                         goto strict_unlock;
4314                 }
4315
4316                 nwritten = write_file(req,fsp,data,startpos,numtowrite);
4317         }
4318
4319         if(((nwritten == 0) && (numtowrite != 0))||(nwritten < 0)) {
4320                 reply_unixerror(req, ERRHRD, ERRdiskfull);
4321                 goto strict_unlock;
4322         }
4323
4324         reply_outbuf(req, 6, 0);
4325         SSVAL(req->outbuf,smb_vwv2,nwritten);
4326         SSVAL(req->outbuf,smb_vwv4,nwritten>>16);
4327
4328         if (nwritten < (ssize_t)numtowrite) {
4329                 SCVAL(req->outbuf,smb_rcls,ERRHRD);
4330                 SSVAL(req->outbuf,smb_err,ERRdiskfull);
4331         }
4332
4333         DEBUG(3,("writeX fnum=%d num=%d wrote=%d\n",
4334                 fsp->fnum, (int)numtowrite, (int)nwritten));
4335
4336         status = sync_file(conn, fsp, write_through);
4337         if (!NT_STATUS_IS_OK(status)) {
4338                 DEBUG(5,("reply_write_and_X: sync_file for %s returned %s\n",
4339                         fsp->fsp_name, nt_errstr(status) ));
4340                 reply_nterror(req, status);
4341                 goto strict_unlock;
4342         }
4343
4344         SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
4345
4346         END_PROFILE(SMBwriteX);
4347         chain_reply(req);
4348         return;
4349
4350 strict_unlock:
4351         SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
4352
4353         END_PROFILE(SMBwriteX);
4354         return;
4355 }
4356
4357 /****************************************************************************
4358  Reply to a lseek.
4359 ****************************************************************************/
4360
4361 void reply_lseek(struct smb_request *req)
4362 {
4363         connection_struct *conn = req->conn;
4364         SMB_OFF_T startpos;
4365         SMB_OFF_T res= -1;
4366         int mode,umode;
4367         files_struct *fsp;
4368
4369         START_PROFILE(SMBlseek);
4370
4371         if (req->wct < 4) {
4372                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4373                 END_PROFILE(SMBlseek);
4374                 return;
4375         }
4376
4377         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
4378
4379         if (!check_fsp(conn, req, fsp)) {
4380                 return;
4381         }
4382
4383         flush_write_cache(fsp, SEEK_FLUSH);
4384
4385         mode = SVAL(req->vwv+1, 0) & 3;
4386         /* NB. This doesn't use IVAL_TO_SMB_OFF_T as startpos can be signed in this case. */
4387         startpos = (SMB_OFF_T)IVALS(req->vwv+2, 0);
4388
4389         switch (mode) {
4390                 case 0:
4391                         umode = SEEK_SET;
4392                         res = startpos;
4393                         break;
4394                 case 1:
4395                         umode = SEEK_CUR;
4396                         res = fsp->fh->pos + startpos;
4397                         break;
4398                 case 2:
4399                         umode = SEEK_END;
4400                         break;
4401                 default:
4402                         umode = SEEK_SET;
4403                         res = startpos;
4404                         break;
4405         }
4406
4407         if (umode == SEEK_END) {
4408                 if((res = SMB_VFS_LSEEK(fsp,startpos,umode)) == -1) {
4409                         if(errno == EINVAL) {
4410                                 SMB_OFF_T current_pos = startpos;
4411                                 SMB_STRUCT_STAT sbuf;
4412
4413                                 if(SMB_VFS_FSTAT(fsp, &sbuf) == -1) {
4414                                         reply_unixerror(req, ERRDOS,
4415                                                         ERRnoaccess);
4416                                         END_PROFILE(SMBlseek);
4417                                         return;
4418                                 }
4419
4420                                 current_pos += sbuf.st_size;
4421                                 if(current_pos < 0)
4422                                         res = SMB_VFS_LSEEK(fsp,0,SEEK_SET);
4423                         }
4424                 }
4425
4426                 if(res == -1) {
4427                         reply_unixerror(req, ERRDOS, ERRnoaccess);
4428                         END_PROFILE(SMBlseek);
4429                         return;
4430                 }
4431         }
4432
4433         fsp->fh->pos = res;
4434
4435         reply_outbuf(req, 2, 0);
4436         SIVAL(req->outbuf,smb_vwv0,res);
4437
4438         DEBUG(3,("lseek fnum=%d ofs=%.0f newpos = %.0f mode=%d\n",
4439                 fsp->fnum, (double)startpos, (double)res, mode));
4440
4441         END_PROFILE(SMBlseek);
4442         return;
4443 }
4444
4445 /****************************************************************************
4446  Reply to a flush.
4447 ****************************************************************************/
4448
4449 void reply_flush(struct smb_request *req)
4450 {
4451         connection_struct *conn = req->conn;
4452         uint16 fnum;
4453         files_struct *fsp;
4454
4455         START_PROFILE(SMBflush);
4456
4457         if (req->wct < 1) {
4458                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4459                 return;
4460         }
4461
4462         fnum = SVAL(req->vwv+0, 0);
4463         fsp = file_fsp(req, fnum);
4464
4465         if ((fnum != 0xFFFF) && !check_fsp(conn, req, fsp)) {
4466                 return;
4467         }
4468
4469         if (!fsp) {
4470                 file_sync_all(conn);
4471         } else {
4472                 NTSTATUS status = sync_file(conn, fsp, True);
4473                 if (!NT_STATUS_IS_OK(status)) {
4474                         DEBUG(5,("reply_flush: sync_file for %s returned %s\n",
4475                                 fsp->fsp_name, nt_errstr(status) ));
4476                         reply_nterror(req, status);
4477                         END_PROFILE(SMBflush);
4478                         return;
4479                 }
4480         }
4481
4482         reply_outbuf(req, 0, 0);
4483
4484         DEBUG(3,("flush\n"));
4485         END_PROFILE(SMBflush);
4486         return;
4487 }
4488
4489 /****************************************************************************
4490  Reply to a exit.
4491  conn POINTER CAN BE NULL HERE !
4492 ****************************************************************************/
4493
4494 void reply_exit(struct smb_request *req)
4495 {
4496         START_PROFILE(SMBexit);
4497
4498         file_close_pid(req->smbpid, req->vuid);
4499
4500         reply_outbuf(req, 0, 0);
4501
4502         DEBUG(3,("exit\n"));
4503
4504         END_PROFILE(SMBexit);
4505         return;
4506 }
4507
4508 /****************************************************************************
4509  Reply to a close - has to deal with closing a directory opened by NT SMB's.
4510 ****************************************************************************/
4511
4512 void reply_close(struct smb_request *req)
4513 {
4514         connection_struct *conn = req->conn;
4515         NTSTATUS status = NT_STATUS_OK;
4516         files_struct *fsp = NULL;
4517         START_PROFILE(SMBclose);
4518
4519         if (req->wct < 3) {
4520                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4521                 END_PROFILE(SMBclose);
4522                 return;
4523         }
4524
4525         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
4526
4527         /*
4528          * We can only use check_fsp if we know it's not a directory.
4529          */
4530
4531         if(!fsp || (fsp->conn != conn) || (fsp->vuid != req->vuid)) {
4532                 reply_doserror(req, ERRDOS, ERRbadfid);
4533                 END_PROFILE(SMBclose);
4534                 return;
4535         }
4536
4537         if(fsp->is_directory) {
4538                 /*
4539                  * Special case - close NT SMB directory handle.
4540                  */
4541                 DEBUG(3,("close directory fnum=%d\n", fsp->fnum));
4542                 status = close_file(req, fsp, NORMAL_CLOSE);
4543         } else {
4544                 time_t t;
4545                 /*
4546                  * Close ordinary file.
4547                  */
4548
4549                 DEBUG(3,("close fd=%d fnum=%d (numopen=%d)\n",
4550                          fsp->fh->fd, fsp->fnum,
4551                          conn->num_files_open));
4552
4553                 /*
4554                  * Take care of any time sent in the close.
4555                  */
4556
4557                 t = srv_make_unix_date3(req->vwv+1);
4558                 set_close_write_time(fsp, convert_time_t_to_timespec(t));
4559
4560                 /*
4561                  * close_file() returns the unix errno if an error
4562                  * was detected on close - normally this is due to
4563                  * a disk full error. If not then it was probably an I/O error.
4564                  */
4565
4566                 status = close_file(req, fsp, NORMAL_CLOSE);
4567         }
4568
4569         if (!NT_STATUS_IS_OK(status)) {
4570                 reply_nterror(req, status);
4571                 END_PROFILE(SMBclose);
4572                 return;
4573         }
4574
4575         reply_outbuf(req, 0, 0);
4576         END_PROFILE(SMBclose);
4577         return;
4578 }
4579
4580 /****************************************************************************
4581  Reply to a writeclose (Core+ protocol).
4582 ****************************************************************************/
4583
4584 void reply_writeclose(struct smb_request *req)
4585 {
4586         connection_struct *conn = req->conn;
4587         size_t numtowrite;
4588         ssize_t nwritten = -1;
4589         NTSTATUS close_status = NT_STATUS_OK;
4590         SMB_OFF_T startpos;
4591         const char *data;
4592         struct timespec mtime;
4593         files_struct *fsp;
4594         struct lock_struct lock;
4595
4596         START_PROFILE(SMBwriteclose);
4597
4598         if (req->wct < 6) {
4599                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4600                 END_PROFILE(SMBwriteclose);
4601                 return;
4602         }
4603
4604         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
4605
4606         if (!check_fsp(conn, req, fsp)) {
4607                 END_PROFILE(SMBwriteclose);
4608                 return;
4609         }
4610         if (!CHECK_WRITE(fsp)) {
4611                 reply_doserror(req, ERRDOS,ERRbadaccess);
4612                 END_PROFILE(SMBwriteclose);
4613                 return;
4614         }
4615
4616         numtowrite = SVAL(req->vwv+1, 0);
4617         startpos = IVAL_TO_SMB_OFF_T(req->vwv+2, 0);
4618         mtime = convert_time_t_to_timespec(srv_make_unix_date3(req->vwv+4));
4619         data = (const char *)req->buf + 1;
4620
4621         if (numtowrite) {
4622                 init_strict_lock_struct(fsp, (uint32)req->smbpid,
4623                     (uint64_t)startpos, (uint64_t)numtowrite, WRITE_LOCK,
4624                     &lock);
4625
4626                 if (!SMB_VFS_STRICT_LOCK(conn, fsp, &lock)) {
4627                         reply_doserror(req, ERRDOS,ERRlock);
4628                         END_PROFILE(SMBwriteclose);
4629                         return;
4630                 }
4631         }
4632
4633         nwritten = write_file(req,fsp,data,startpos,numtowrite);
4634
4635         set_close_write_time(fsp, mtime);
4636
4637         /*
4638          * More insanity. W2K only closes the file if writelen > 0.
4639          * JRA.
4640          */
4641
4642         if (numtowrite) {
4643                 DEBUG(3,("reply_writeclose: zero length write doesn't close file %s\n",
4644                         fsp->fsp_name ));
4645                 close_status = close_file(req, fsp, NORMAL_CLOSE);
4646         }
4647
4648         DEBUG(3,("writeclose fnum=%d num=%d wrote=%d (numopen=%d)\n",
4649                  fsp->fnum, (int)numtowrite, (int)nwritten,
4650                  conn->num_files_open));
4651
4652         if(((nwritten == 0) && (numtowrite != 0))||(nwritten < 0)) {
4653                 reply_doserror(req, ERRHRD, ERRdiskfull);
4654                 goto strict_unlock;
4655         }
4656
4657         if(!NT_STATUS_IS_OK(close_status)) {
4658                 reply_nterror(req, close_status);
4659                 goto strict_unlock;
4660         }
4661
4662         reply_outbuf(req, 1, 0);
4663
4664         SSVAL(req->outbuf,smb_vwv0,nwritten);
4665
4666 strict_unlock:
4667         if (numtowrite) {
4668                 SMB_VFS_STRICT_UNLOCK(conn, fsp, &lock);
4669         }
4670
4671         END_PROFILE(SMBwriteclose);
4672         return;
4673 }
4674
4675 #undef DBGC_CLASS
4676 #define DBGC_CLASS DBGC_LOCKING
4677
4678 /****************************************************************************
4679  Reply to a lock.
4680 ****************************************************************************/
4681
4682 void reply_lock(struct smb_request *req)
4683 {
4684         connection_struct *conn = req->conn;
4685         uint64_t count,offset;
4686         NTSTATUS status;
4687         files_struct *fsp;
4688         struct byte_range_lock *br_lck = NULL;
4689
4690         START_PROFILE(SMBlock);
4691
4692         if (req->wct < 5) {
4693                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4694                 END_PROFILE(SMBlock);
4695                 return;
4696         }
4697
4698         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
4699
4700         if (!check_fsp(conn, req, fsp)) {
4701                 END_PROFILE(SMBlock);
4702                 return;
4703         }
4704
4705         count = (uint64_t)IVAL(req->vwv+1, 0);
4706         offset = (uint64_t)IVAL(req->vwv+3, 0);
4707
4708         DEBUG(3,("lock fd=%d fnum=%d offset=%.0f count=%.0f\n",
4709                  fsp->fh->fd, fsp->fnum, (double)offset, (double)count));
4710
4711         br_lck = do_lock(smbd_messaging_context(),
4712                         fsp,
4713                         req->smbpid,
4714                         count,
4715                         offset,
4716                         WRITE_LOCK,
4717                         WINDOWS_LOCK,
4718                         False, /* Non-blocking lock. */
4719                         &status,
4720                         NULL,
4721                         NULL);
4722
4723         TALLOC_FREE(br_lck);
4724
4725         if (NT_STATUS_V(status)) {
4726                 reply_nterror(req, status);
4727                 END_PROFILE(SMBlock);
4728                 return;
4729         }
4730
4731         reply_outbuf(req, 0, 0);
4732
4733         END_PROFILE(SMBlock);
4734         return;
4735 }
4736
4737 /****************************************************************************
4738  Reply to a unlock.
4739 ****************************************************************************/
4740
4741 void reply_unlock(struct smb_request *req)
4742 {
4743         connection_struct *conn = req->conn;
4744         uint64_t count,offset;
4745         NTSTATUS status;
4746         files_struct *fsp;
4747
4748         START_PROFILE(SMBunlock);
4749
4750         if (req->wct < 5) {
4751                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4752                 END_PROFILE(SMBunlock);
4753                 return;
4754         }
4755
4756         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
4757
4758         if (!check_fsp(conn, req, fsp)) {
4759                 END_PROFILE(SMBunlock);
4760                 return;
4761         }
4762
4763         count = (uint64_t)IVAL(req->vwv+1, 0);
4764         offset = (uint64_t)IVAL(req->vwv+3, 0);
4765
4766         status = do_unlock(smbd_messaging_context(),
4767                         fsp,
4768                         req->smbpid,
4769                         count,
4770                         offset,
4771                         WINDOWS_LOCK);
4772
4773         if (NT_STATUS_V(status)) {
4774                 reply_nterror(req, status);
4775                 END_PROFILE(SMBunlock);
4776                 return;
4777         }
4778
4779         DEBUG( 3, ( "unlock fd=%d fnum=%d offset=%.0f count=%.0f\n",
4780                     fsp->fh->fd, fsp->fnum, (double)offset, (double)count ) );
4781
4782         reply_outbuf(req, 0, 0);
4783
4784         END_PROFILE(SMBunlock);
4785         return;
4786 }
4787
4788 #undef DBGC_CLASS
4789 #define DBGC_CLASS DBGC_ALL
4790
4791 /****************************************************************************
4792  Reply to a tdis.
4793  conn POINTER CAN BE NULL HERE !
4794 ****************************************************************************/
4795
4796 void reply_tdis(struct smb_request *req)
4797 {
4798         connection_struct *conn = req->conn;
4799         START_PROFILE(SMBtdis);
4800
4801         if (!conn) {
4802                 DEBUG(4,("Invalid connection in tdis\n"));
4803                 reply_doserror(req, ERRSRV, ERRinvnid);
4804                 END_PROFILE(SMBtdis);
4805                 return;
4806         }
4807
4808         conn->used = False;
4809
4810         close_cnum(conn,req->vuid);
4811         req->conn = NULL;
4812
4813         reply_outbuf(req, 0, 0);
4814         END_PROFILE(SMBtdis);
4815         return;
4816 }
4817
4818 /****************************************************************************
4819  Reply to a echo.
4820  conn POINTER CAN BE NULL HERE !
4821 ****************************************************************************/
4822
4823 void reply_echo(struct smb_request *req)
4824 {
4825         connection_struct *conn = req->conn;
4826         struct smb_perfcount_data local_pcd;
4827         struct smb_perfcount_data *cur_pcd;
4828         int smb_reverb;
4829         int seq_num;
4830
4831         START_PROFILE(SMBecho);
4832
4833         smb_init_perfcount_data(&local_pcd);
4834
4835         if (req->wct < 1) {
4836                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4837                 END_PROFILE(SMBecho);
4838                 return;
4839         }
4840
4841         smb_reverb = SVAL(req->vwv+0, 0);
4842
4843         reply_outbuf(req, 1, req->buflen);
4844
4845         /* copy any incoming data back out */
4846         if (req->buflen > 0) {
4847                 memcpy(smb_buf(req->outbuf), req->buf, req->buflen);
4848         }
4849
4850         if (smb_reverb > 100) {
4851                 DEBUG(0,("large reverb (%d)?? Setting to 100\n",smb_reverb));
4852                 smb_reverb = 100;
4853         }
4854
4855         for (seq_num = 1 ; seq_num <= smb_reverb ; seq_num++) {
4856
4857                 /* this makes sure we catch the request pcd */
4858                 if (seq_num == smb_reverb) {
4859                         cur_pcd = &req->pcd;
4860                 } else {
4861                         SMB_PERFCOUNT_COPY_CONTEXT(&req->pcd, &local_pcd);
4862                         cur_pcd = &local_pcd;
4863                 }
4864
4865                 SSVAL(req->outbuf,smb_vwv0,seq_num);
4866
4867                 show_msg((char *)req->outbuf);
4868                 if (!srv_send_smb(smbd_server_fd(),
4869                                 (char *)req->outbuf,
4870                                 true, req->seqnum+1,
4871                                 IS_CONN_ENCRYPTED(conn)||req->encrypted,
4872                                 cur_pcd))
4873                         exit_server_cleanly("reply_echo: srv_send_smb failed.");
4874         }
4875
4876         DEBUG(3,("echo %d times\n", smb_reverb));
4877
4878         TALLOC_FREE(req->outbuf);
4879
4880         END_PROFILE(SMBecho);
4881         return;
4882 }
4883
4884 /****************************************************************************
4885  Reply to a printopen.
4886 ****************************************************************************/
4887
4888 void reply_printopen(struct smb_request *req)
4889 {
4890         connection_struct *conn = req->conn;
4891         files_struct *fsp;
4892         SMB_STRUCT_STAT sbuf;
4893         NTSTATUS status;
4894
4895         START_PROFILE(SMBsplopen);
4896
4897         if (req->wct < 2) {
4898                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4899                 END_PROFILE(SMBsplopen);
4900                 return;
4901         }
4902
4903         if (!CAN_PRINT(conn)) {
4904                 reply_doserror(req, ERRDOS, ERRnoaccess);
4905                 END_PROFILE(SMBsplopen);
4906                 return;
4907         }
4908
4909         status = file_new(req, conn, &fsp);
4910         if(!NT_STATUS_IS_OK(status)) {
4911                 reply_nterror(req, status);
4912                 END_PROFILE(SMBsplopen);
4913                 return;
4914         }
4915
4916         /* Open for exclusive use, write only. */
4917         status = print_fsp_open(req, conn, NULL, req->vuid, fsp, &sbuf);
4918
4919         if (!NT_STATUS_IS_OK(status)) {
4920                 reply_nterror(req, status);
4921                 END_PROFILE(SMBsplopen);
4922                 return;
4923         }
4924
4925         reply_outbuf(req, 1, 0);
4926         SSVAL(req->outbuf,smb_vwv0,fsp->fnum);
4927
4928         DEBUG(3,("openprint fd=%d fnum=%d\n",
4929                  fsp->fh->fd, fsp->fnum));
4930
4931         END_PROFILE(SMBsplopen);
4932         return;
4933 }
4934
4935 /****************************************************************************
4936  Reply to a printclose.
4937 ****************************************************************************/
4938
4939 void reply_printclose(struct smb_request *req)
4940 {
4941         connection_struct *conn = req->conn;
4942         files_struct *fsp;
4943         NTSTATUS status;
4944
4945         START_PROFILE(SMBsplclose);
4946
4947         if (req->wct < 1) {
4948                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4949                 END_PROFILE(SMBsplclose);
4950                 return;
4951         }
4952
4953         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
4954
4955         if (!check_fsp(conn, req, fsp)) {
4956                 END_PROFILE(SMBsplclose);
4957                 return;
4958         }
4959
4960         if (!CAN_PRINT(conn)) {
4961                 reply_nterror(req, NT_STATUS_DOS(ERRSRV, ERRerror));
4962                 END_PROFILE(SMBsplclose);
4963                 return;
4964         }
4965
4966         DEBUG(3,("printclose fd=%d fnum=%d\n",
4967                  fsp->fh->fd,fsp->fnum));
4968
4969         status = close_file(req, fsp, NORMAL_CLOSE);
4970
4971         if(!NT_STATUS_IS_OK(status)) {
4972                 reply_nterror(req, status);
4973                 END_PROFILE(SMBsplclose);
4974                 return;
4975         }
4976
4977         reply_outbuf(req, 0, 0);
4978
4979         END_PROFILE(SMBsplclose);
4980         return;
4981 }
4982
4983 /****************************************************************************
4984  Reply to a printqueue.
4985 ****************************************************************************/
4986
4987 void reply_printqueue(struct smb_request *req)
4988 {
4989         connection_struct *conn = req->conn;
4990         int max_count;
4991         int start_index;
4992
4993         START_PROFILE(SMBsplretq);
4994
4995         if (req->wct < 2) {
4996                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
4997                 END_PROFILE(SMBsplretq);
4998                 return;
4999         }
5000
5001         max_count = SVAL(req->vwv+0, 0);
5002         start_index = SVAL(req->vwv+1, 0);
5003
5004         /* we used to allow the client to get the cnum wrong, but that
5005            is really quite gross and only worked when there was only
5006            one printer - I think we should now only accept it if they
5007            get it right (tridge) */
5008         if (!CAN_PRINT(conn)) {
5009                 reply_doserror(req, ERRDOS, ERRnoaccess);
5010                 END_PROFILE(SMBsplretq);
5011                 return;
5012         }
5013
5014         reply_outbuf(req, 2, 3);
5015         SSVAL(req->outbuf,smb_vwv0,0);
5016         SSVAL(req->outbuf,smb_vwv1,0);
5017         SCVAL(smb_buf(req->outbuf),0,1);
5018         SSVAL(smb_buf(req->outbuf),1,0);
5019
5020         DEBUG(3,("printqueue start_index=%d max_count=%d\n",
5021                  start_index, max_count));
5022
5023         {
5024                 print_queue_struct *queue = NULL;
5025                 print_status_struct status;
5026                 int count = print_queue_status(SNUM(conn), &queue, &status);
5027                 int num_to_get = ABS(max_count);
5028                 int first = (max_count>0?start_index:start_index+max_count+1);
5029                 int i;
5030
5031                 if (first >= count)
5032                         num_to_get = 0;
5033                 else
5034                         num_to_get = MIN(num_to_get,count-first);
5035
5036
5037                 for (i=first;i<first+num_to_get;i++) {
5038                         char blob[28];
5039                         char *p = blob;
5040
5041                         srv_put_dos_date2(p,0,queue[i].time);
5042                         SCVAL(p,4,(queue[i].status==LPQ_PRINTING?2:3));
5043                         SSVAL(p,5, queue[i].job);
5044                         SIVAL(p,7,queue[i].size);
5045                         SCVAL(p,11,0);
5046                         srvstr_push(blob, req->flags2, p+12,
5047                                     queue[i].fs_user, 16, STR_ASCII);
5048
5049                         if (message_push_blob(
5050                                     &req->outbuf,
5051                                     data_blob_const(
5052                                             blob, sizeof(blob))) == -1) {
5053                                 reply_nterror(req, NT_STATUS_NO_MEMORY);
5054                                 END_PROFILE(SMBsplretq);
5055                                 return;
5056                         }
5057                 }
5058
5059                 if (count > 0) {
5060                         SSVAL(req->outbuf,smb_vwv0,count);
5061                         SSVAL(req->outbuf,smb_vwv1,
5062                               (max_count>0?first+count:first-1));
5063                         SCVAL(smb_buf(req->outbuf),0,1);
5064                         SSVAL(smb_buf(req->outbuf),1,28*count);
5065                 }
5066
5067                 SAFE_FREE(queue);
5068
5069                 DEBUG(3,("%d entries returned in queue\n",count));
5070         }
5071
5072         END_PROFILE(SMBsplretq);
5073         return;
5074 }
5075
5076 /****************************************************************************
5077  Reply to a printwrite.
5078 ****************************************************************************/
5079
5080 void reply_printwrite(struct smb_request *req)
5081 {
5082         connection_struct *conn = req->conn;
5083         int numtowrite;
5084         const char *data;
5085         files_struct *fsp;
5086
5087         START_PROFILE(SMBsplwr);
5088
5089         if (req->wct < 1) {
5090                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
5091                 END_PROFILE(SMBsplwr);
5092                 return;
5093         }
5094
5095         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
5096
5097         if (!check_fsp(conn, req, fsp)) {
5098                 END_PROFILE(SMBsplwr);
5099                 return;
5100         }
5101
5102         if (!CAN_PRINT(conn)) {
5103                 reply_doserror(req, ERRDOS, ERRnoaccess);
5104                 END_PROFILE(SMBsplwr);
5105                 return;
5106         }
5107
5108         if (!CHECK_WRITE(fsp)) {
5109                 reply_doserror(req, ERRDOS, ERRbadaccess);
5110                 END_PROFILE(SMBsplwr);
5111                 return;
5112         }
5113
5114         numtowrite = SVAL(req->buf, 1);
5115
5116         if (req->buflen < numtowrite + 3) {
5117                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
5118                 END_PROFILE(SMBsplwr);
5119                 return;
5120         }
5121
5122         data = (const char *)req->buf + 3;
5123
5124         if (write_file(req,fsp,data,-1,numtowrite) != numtowrite) {
5125                 reply_unixerror(req, ERRHRD, ERRdiskfull);
5126                 END_PROFILE(SMBsplwr);
5127                 return;
5128         }
5129
5130         DEBUG( 3, ( "printwrite fnum=%d num=%d\n", fsp->fnum, numtowrite ) );
5131
5132         END_PROFILE(SMBsplwr);
5133         return;
5134 }
5135
5136 /****************************************************************************
5137  Reply to a mkdir.
5138 ****************************************************************************/
5139
5140 void reply_mkdir(struct smb_request *req)
5141 {
5142         connection_struct *conn = req->conn;
5143         char *directory = NULL;
5144         NTSTATUS status;
5145         SMB_STRUCT_STAT sbuf;
5146         TALLOC_CTX *ctx = talloc_tos();
5147
5148         START_PROFILE(SMBmkdir);
5149
5150         srvstr_get_path_req(ctx, req, &directory, (const char *)req->buf + 1,
5151                             STR_TERMINATE, &status);
5152         if (!NT_STATUS_IS_OK(status)) {
5153                 reply_nterror(req, status);
5154                 END_PROFILE(SMBmkdir);
5155                 return;
5156         }
5157
5158         status = resolve_dfspath(ctx, conn,
5159                                  req->flags2 & FLAGS2_DFS_PATHNAMES,
5160                                  directory,
5161                                  &directory);
5162         if (!NT_STATUS_IS_OK(status)) {
5163                 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
5164                         reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
5165                                         ERRSRV, ERRbadpath);
5166                         END_PROFILE(SMBmkdir);
5167                         return;
5168                 }
5169                 reply_nterror(req, status);
5170                 END_PROFILE(SMBmkdir);
5171                 return;
5172         }
5173
5174         status = unix_convert(ctx, conn, directory, False, &directory, NULL, &sbuf);
5175         if (!NT_STATUS_IS_OK(status)) {
5176                 reply_nterror(req, status);
5177                 END_PROFILE(SMBmkdir);
5178                 return;
5179         }
5180
5181         status = check_name(conn, directory);
5182         if (!NT_STATUS_IS_OK(status)) {
5183                 reply_nterror(req, status);
5184                 END_PROFILE(SMBmkdir);
5185                 return;
5186         }
5187
5188         status = create_directory(conn, req, directory);
5189
5190         DEBUG(5, ("create_directory returned %s\n", nt_errstr(status)));
5191
5192         if (!NT_STATUS_IS_OK(status)) {
5193
5194                 if (!use_nt_status()
5195                     && NT_STATUS_EQUAL(status,
5196                                        NT_STATUS_OBJECT_NAME_COLLISION)) {
5197                         /*
5198                          * Yes, in the DOS error code case we get a
5199                          * ERRDOS:ERRnoaccess here. See BASE-SAMBA3ERROR
5200                          * samba4 torture test.
5201                          */
5202                         status = NT_STATUS_DOS(ERRDOS, ERRnoaccess);
5203                 }
5204
5205                 reply_nterror(req, status);
5206                 END_PROFILE(SMBmkdir);
5207                 return;
5208         }
5209
5210         reply_outbuf(req, 0, 0);
5211
5212         DEBUG( 3, ( "mkdir %s\n", directory ) );
5213
5214         END_PROFILE(SMBmkdir);
5215         return;
5216 }
5217
5218 /****************************************************************************
5219  Static function used by reply_rmdir to delete an entire directory
5220  tree recursively. Return True on ok, False on fail.
5221 ****************************************************************************/
5222
5223 static bool recursive_rmdir(TALLOC_CTX *ctx,
5224                         connection_struct *conn,
5225                         char *directory)
5226 {
5227         const char *dname = NULL;
5228         bool ret = True;
5229         long offset = 0;
5230         SMB_STRUCT_STAT st;
5231         struct smb_Dir *dir_hnd = OpenDir(talloc_tos(), conn, directory,
5232                                           NULL, 0);
5233
5234         if(dir_hnd == NULL)
5235                 return False;
5236
5237         while((dname = ReadDirName(dir_hnd, &offset, &st))) {
5238                 char *fullname = NULL;
5239
5240                 if (ISDOT(dname) || ISDOTDOT(dname)) {
5241                         continue;
5242                 }
5243
5244                 if (!is_visible_file(conn, directory, dname, &st, False)) {
5245                         continue;
5246                 }
5247
5248                 /* Construct the full name. */
5249                 fullname = talloc_asprintf(ctx,
5250                                 "%s/%s",
5251                                 directory,
5252                                 dname);
5253                 if (!fullname) {
5254                         errno = ENOMEM;
5255                         ret = False;
5256                         break;
5257                 }
5258
5259                 if(SMB_VFS_LSTAT(conn,fullname, &st) != 0) {
5260                         ret = False;
5261                         break;
5262                 }
5263
5264                 if(st.st_mode & S_IFDIR) {
5265                         if(!recursive_rmdir(ctx, conn, fullname)) {
5266                                 ret = False;
5267                                 break;
5268                         }
5269                         if(SMB_VFS_RMDIR(conn,fullname) != 0) {
5270                                 ret = False;
5271                                 break;
5272                         }
5273                 } else if(SMB_VFS_UNLINK(conn,fullname) != 0) {
5274                         ret = False;
5275                         break;
5276                 }
5277                 TALLOC_FREE(fullname);
5278         }
5279         TALLOC_FREE(dir_hnd);
5280         return ret;
5281 }
5282
5283 /****************************************************************************
5284  The internals of the rmdir code - called elsewhere.
5285 ****************************************************************************/
5286
5287 NTSTATUS rmdir_internals(TALLOC_CTX *ctx,
5288                         connection_struct *conn,
5289                         const char *directory)
5290 {
5291         int ret;
5292         SMB_STRUCT_STAT st;
5293
5294         /* Might be a symlink. */
5295         if(SMB_VFS_LSTAT(conn, directory, &st) != 0) {
5296                 return map_nt_error_from_unix(errno);
5297         }
5298
5299         if (S_ISLNK(st.st_mode)) {
5300                 /* Is what it points to a directory ? */
5301                 if(SMB_VFS_STAT(conn, directory, &st) != 0) {
5302                         return map_nt_error_from_unix(errno);
5303                 }
5304                 if (!(S_ISDIR(st.st_mode))) {
5305                         return NT_STATUS_NOT_A_DIRECTORY;
5306                 }
5307                 ret = SMB_VFS_UNLINK(conn,directory);
5308         } else {
5309                 ret = SMB_VFS_RMDIR(conn,directory);
5310         }
5311         if (ret == 0) {
5312                 notify_fname(conn, NOTIFY_ACTION_REMOVED,
5313                              FILE_NOTIFY_CHANGE_DIR_NAME,
5314                              directory);
5315                 return NT_STATUS_OK;
5316         }
5317
5318         if(((errno == ENOTEMPTY)||(errno == EEXIST)) && lp_veto_files(SNUM(conn))) {
5319                 /*
5320                  * Check to see if the only thing in this directory are
5321                  * vetoed files/directories. If so then delete them and
5322                  * retry. If we fail to delete any of them (and we *don't*
5323                  * do a recursive delete) then fail the rmdir.
5324                  */
5325                 const char *dname;
5326                 long dirpos = 0;
5327                 struct smb_Dir *dir_hnd = OpenDir(talloc_tos(), conn,
5328                                                   directory, NULL, 0);
5329
5330                 if(dir_hnd == NULL) {
5331                         errno = ENOTEMPTY;
5332                         goto err;
5333                 }
5334
5335                 while ((dname = ReadDirName(dir_hnd, &dirpos, &st))) {
5336                         if((strcmp(dname, ".") == 0) || (strcmp(dname, "..")==0))
5337                                 continue;
5338                         if (!is_visible_file(conn, directory, dname, &st, False))
5339                                 continue;
5340                         if(!IS_VETO_PATH(conn, dname)) {
5341                                 TALLOC_FREE(dir_hnd);
5342                                 errno = ENOTEMPTY;
5343                                 goto err;
5344                         }
5345                 }
5346
5347                 /* We only have veto files/directories.
5348                  * Are we allowed to delete them ? */
5349
5350                 if(!lp_recursive_veto_delete(SNUM(conn))) {
5351                         TALLOC_FREE(dir_hnd);
5352                         errno = ENOTEMPTY;
5353                         goto err;
5354                 }
5355
5356                 /* Do a recursive delete. */
5357                 RewindDir(dir_hnd,&dirpos);
5358                 while ((dname = ReadDirName(dir_hnd, &dirpos, &st))) {
5359                         char *fullname = NULL;
5360
5361                         if (ISDOT(dname) || ISDOTDOT(dname)) {
5362                                 continue;
5363                         }
5364                         if (!is_visible_file(conn, directory, dname, &st, False)) {
5365                                 continue;
5366                         }
5367
5368                         fullname = talloc_asprintf(ctx,
5369                                         "%s/%s",
5370                                         directory,
5371                                         dname);
5372
5373                         if(!fullname) {
5374                                 errno = ENOMEM;
5375                                 break;
5376                         }
5377
5378                         if(SMB_VFS_LSTAT(conn,fullname, &st) != 0) {
5379                                 break;
5380                         }
5381                         if(st.st_mode & S_IFDIR) {
5382                                 if(!recursive_rmdir(ctx, conn, fullname)) {
5383                                         break;
5384                                 }
5385                                 if(SMB_VFS_RMDIR(conn,fullname) != 0) {
5386                                         break;
5387                                 }
5388                         } else if(SMB_VFS_UNLINK(conn,fullname) != 0) {
5389                                 break;
5390                         }
5391                         TALLOC_FREE(fullname);
5392                 }
5393                 TALLOC_FREE(dir_hnd);
5394                 /* Retry the rmdir */
5395                 ret = SMB_VFS_RMDIR(conn,directory);
5396         }
5397
5398   err:
5399
5400         if (ret != 0) {
5401                 DEBUG(3,("rmdir_internals: couldn't remove directory %s : "
5402                          "%s\n", directory,strerror(errno)));
5403                 return map_nt_error_from_unix(errno);
5404         }
5405
5406         notify_fname(conn, NOTIFY_ACTION_REMOVED,
5407                      FILE_NOTIFY_CHANGE_DIR_NAME,
5408                      directory);
5409
5410         return NT_STATUS_OK;
5411 }
5412
5413 /****************************************************************************
5414  Reply to a rmdir.
5415 ****************************************************************************/
5416
5417 void reply_rmdir(struct smb_request *req)
5418 {
5419         connection_struct *conn = req->conn;
5420         char *directory = NULL;
5421         SMB_STRUCT_STAT sbuf;
5422         NTSTATUS status;
5423         TALLOC_CTX *ctx = talloc_tos();
5424
5425         START_PROFILE(SMBrmdir);
5426
5427         srvstr_get_path_req(ctx, req, &directory, (const char *)req->buf + 1,
5428                             STR_TERMINATE, &status);
5429         if (!NT_STATUS_IS_OK(status)) {
5430                 reply_nterror(req, status);
5431                 END_PROFILE(SMBrmdir);
5432                 return;
5433         }
5434
5435         status = resolve_dfspath(ctx, conn,
5436                                  req->flags2 & FLAGS2_DFS_PATHNAMES,
5437                                  directory,
5438                                  &directory);
5439         if (!NT_STATUS_IS_OK(status)) {
5440                 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
5441                         reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
5442                                         ERRSRV, ERRbadpath);
5443                         END_PROFILE(SMBrmdir);
5444                         return;
5445                 }
5446                 reply_nterror(req, status);
5447                 END_PROFILE(SMBrmdir);
5448                 return;
5449         }
5450
5451         status = unix_convert(ctx, conn, directory, False, &directory,
5452                         NULL, &sbuf);
5453         if (!NT_STATUS_IS_OK(status)) {
5454                 reply_nterror(req, status);
5455                 END_PROFILE(SMBrmdir);
5456                 return;
5457         }
5458
5459         status = check_name(conn, directory);
5460         if (!NT_STATUS_IS_OK(status)) {
5461                 reply_nterror(req, status);
5462                 END_PROFILE(SMBrmdir);
5463                 return;
5464         }
5465
5466         dptr_closepath(directory, req->smbpid);
5467         status = rmdir_internals(ctx, conn, directory);
5468         if (!NT_STATUS_IS_OK(status)) {
5469                 reply_nterror(req, status);
5470                 END_PROFILE(SMBrmdir);
5471                 return;
5472         }
5473
5474         reply_outbuf(req, 0, 0);
5475
5476         DEBUG( 3, ( "rmdir %s\n", directory ) );
5477
5478         END_PROFILE(SMBrmdir);
5479         return;
5480 }
5481
5482 /*******************************************************************
5483  Resolve wildcards in a filename rename.
5484 ********************************************************************/
5485
5486 static bool resolve_wildcards(TALLOC_CTX *ctx,
5487                                 const char *name1,
5488                                 const char *name2,
5489                                 char **pp_newname)
5490 {
5491         char *name2_copy = NULL;
5492         char *root1 = NULL;
5493         char *root2 = NULL;
5494         char *ext1 = NULL;
5495         char *ext2 = NULL;
5496         char *p,*p2, *pname1, *pname2;
5497
5498         name2_copy = talloc_strdup(ctx, name2);
5499         if (!name2_copy) {
5500                 return False;
5501         }
5502
5503         pname1 = strrchr_m(name1,'/');
5504         pname2 = strrchr_m(name2_copy,'/');
5505
5506         if (!pname1 || !pname2) {
5507                 return False;
5508         }
5509
5510         /* Truncate the copy of name2 at the last '/' */
5511         *pname2 = '\0';
5512
5513         /* Now go past the '/' */
5514         pname1++;
5515         pname2++;
5516
5517         root1 = talloc_strdup(ctx, pname1);
5518         root2 = talloc_strdup(ctx, pname2);
5519
5520         if (!root1 || !root2) {
5521                 return False;
5522         }
5523
5524         p = strrchr_m(root1,'.');
5525         if (p) {
5526                 *p = 0;
5527                 ext1 = talloc_strdup(ctx, p+1);
5528         } else {
5529                 ext1 = talloc_strdup(ctx, "");
5530         }
5531         p = strrchr_m(root2,'.');
5532         if (p) {
5533                 *p = 0;
5534                 ext2 = talloc_strdup(ctx, p+1);
5535         } else {
5536                 ext2 = talloc_strdup(ctx, "");
5537         }
5538
5539         if (!ext1 || !ext2) {
5540                 return False;
5541         }
5542
5543         p = root1;
5544         p2 = root2;
5545         while (*p2) {
5546                 if (*p2 == '?') {
5547                         /* Hmmm. Should this be mb-aware ? */
5548                         *p2 = *p;
5549                         p2++;
5550                 } else if (*p2 == '*') {
5551                         *p2 = '\0';
5552                         root2 = talloc_asprintf(ctx, "%s%s",
5553                                                 root2,
5554                                                 p);
5555                         if (!root2) {
5556                                 return False;
5557                         }
5558                         break;
5559                 } else {
5560                         p2++;
5561                 }
5562                 if (*p) {
5563                         p++;
5564                 }
5565         }
5566
5567         p = ext1;
5568         p2 = ext2;
5569         while (*p2) {
5570                 if (*p2 == '?') {
5571                         /* Hmmm. Should this be mb-aware ? */
5572                         *p2 = *p;
5573                         p2++;
5574                 } else if (*p2 == '*') {
5575                         *p2 = '\0';
5576                         ext2 = talloc_asprintf(ctx, "%s%s",
5577                                                 ext2,
5578                                                 p);
5579                         if (!ext2) {
5580                                 return False;
5581                         }
5582                         break;
5583                 } else {
5584                         p2++;
5585                 }
5586                 if (*p) {
5587                         p++;
5588                 }
5589         }
5590
5591         if (*ext2) {
5592                 *pp_newname = talloc_asprintf(ctx, "%s/%s.%s",
5593                                 name2_copy,
5594                                 root2,
5595                                 ext2);
5596         } else {
5597                 *pp_newname = talloc_asprintf(ctx, "%s/%s",
5598                                 name2_copy,
5599                                 root2);
5600         }
5601
5602         if (!*pp_newname) {
5603                 return False;
5604         }
5605
5606         return True;
5607 }
5608
5609 /****************************************************************************
5610  Ensure open files have their names updated. Updated to notify other smbd's
5611  asynchronously.
5612 ****************************************************************************/
5613
5614 static void rename_open_files(connection_struct *conn,
5615                               struct share_mode_lock *lck,
5616                               const char *newname)
5617 {
5618         files_struct *fsp;
5619         bool did_rename = False;
5620
5621         for(fsp = file_find_di_first(lck->id); fsp;
5622             fsp = file_find_di_next(fsp)) {
5623                 /* fsp_name is a relative path under the fsp. To change this for other
5624                    sharepaths we need to manipulate relative paths. */
5625                 /* TODO - create the absolute path and manipulate the newname
5626                    relative to the sharepath. */
5627                 if (!strequal(fsp->conn->connectpath, conn->connectpath)) {
5628                         continue;
5629                 }
5630                 DEBUG(10,("rename_open_files: renaming file fnum %d (file_id %s) from %s -> %s\n",
5631                           fsp->fnum, file_id_string_tos(&fsp->file_id),
5632                         fsp->fsp_name, newname ));
5633                 string_set(&fsp->fsp_name, newname);
5634                 did_rename = True;
5635         }
5636
5637         if (!did_rename) {
5638                 DEBUG(10,("rename_open_files: no open files on file_id %s for %s\n",
5639                           file_id_string_tos(&lck->id), newname ));
5640         }
5641
5642         /* Send messages to all smbd's (not ourself) that the name has changed. */
5643         rename_share_filename(smbd_messaging_context(), lck, conn->connectpath,
5644                               newname);
5645 }
5646
5647 /****************************************************************************
5648  We need to check if the source path is a parent directory of the destination
5649  (ie. a rename of /foo/bar/baz -> /foo/bar/baz/bibble/bobble. If so we must
5650  refuse the rename with a sharing violation. Under UNIX the above call can
5651  *succeed* if /foo/bar/baz is a symlink to another area in the share. We
5652  probably need to check that the client is a Windows one before disallowing
5653  this as a UNIX client (one with UNIX extensions) can know the source is a
5654  symlink and make this decision intelligently. Found by an excellent bug
5655  report from <AndyLiebman@aol.com>.
5656 ****************************************************************************/
5657
5658 static bool rename_path_prefix_equal(const char *src, const char *dest)
5659 {
5660         const char *psrc = src;
5661         const char *pdst = dest;
5662         size_t slen;
5663
5664         if (psrc[0] == '.' && psrc[1] == '/') {
5665                 psrc += 2;
5666         }
5667         if (pdst[0] == '.' && pdst[1] == '/') {
5668                 pdst += 2;
5669         }
5670         if ((slen = strlen(psrc)) > strlen(pdst)) {
5671                 return False;
5672         }
5673         return ((memcmp(psrc, pdst, slen) == 0) && pdst[slen] == '/');
5674 }
5675
5676 /*
5677  * Do the notify calls from a rename
5678  */
5679
5680 static void notify_rename(connection_struct *conn, bool is_dir,
5681                           const char *oldpath, const char *newpath)
5682 {
5683         char *olddir, *newdir;
5684         const char *oldname, *newname;
5685         uint32 mask;
5686
5687         mask = is_dir ? FILE_NOTIFY_CHANGE_DIR_NAME
5688                 : FILE_NOTIFY_CHANGE_FILE_NAME;
5689
5690         if (!parent_dirname(talloc_tos(), oldpath, &olddir, &oldname)
5691             || !parent_dirname(talloc_tos(), newpath, &newdir, &newname)) {
5692                 TALLOC_FREE(olddir);
5693                 return;
5694         }
5695
5696         if (strcmp(olddir, newdir) == 0) {
5697                 notify_fname(conn, NOTIFY_ACTION_OLD_NAME, mask, oldpath);
5698                 notify_fname(conn, NOTIFY_ACTION_NEW_NAME, mask, newpath);
5699         }
5700         else {
5701                 notify_fname(conn, NOTIFY_ACTION_REMOVED, mask, oldpath);
5702                 notify_fname(conn, NOTIFY_ACTION_ADDED, mask, newpath);
5703         }
5704         TALLOC_FREE(olddir);
5705         TALLOC_FREE(newdir);
5706
5707         /* this is a strange one. w2k3 gives an additional event for
5708            CHANGE_ATTRIBUTES and CHANGE_CREATION on the new file when renaming
5709            files, but not directories */
5710         if (!is_dir) {
5711                 notify_fname(conn, NOTIFY_ACTION_MODIFIED,
5712                              FILE_NOTIFY_CHANGE_ATTRIBUTES
5713                              |FILE_NOTIFY_CHANGE_CREATION,
5714                              newpath);
5715         }
5716 }
5717
5718 /****************************************************************************
5719  Rename an open file - given an fsp.
5720 ****************************************************************************/
5721
5722 NTSTATUS rename_internals_fsp(connection_struct *conn,
5723                         files_struct *fsp,
5724                         char *newname,
5725                         const char *newname_last_component,
5726                         uint32 attrs,
5727                         bool replace_if_exists)
5728 {
5729         TALLOC_CTX *ctx = talloc_tos();
5730         SMB_STRUCT_STAT sbuf, sbuf1;
5731         NTSTATUS status = NT_STATUS_OK;
5732         struct share_mode_lock *lck = NULL;
5733         bool dst_exists, old_is_stream, new_is_stream;
5734
5735         ZERO_STRUCT(sbuf);
5736
5737         status = check_name(conn, newname);
5738         if (!NT_STATUS_IS_OK(status)) {
5739                 return status;
5740         }
5741
5742         /* Ensure newname contains a '/' */
5743         if(strrchr_m(newname,'/') == 0) {
5744                 newname = talloc_asprintf(ctx,
5745                                         "./%s",
5746                                         newname);
5747                 if (!newname) {
5748                         return NT_STATUS_NO_MEMORY;
5749                 }
5750         }
5751
5752         /*
5753          * Check for special case with case preserving and not
5754          * case sensitive. If the old last component differs from the original
5755          * last component only by case, then we should allow
5756          * the rename (user is trying to change the case of the
5757          * filename).
5758          */
5759
5760         if((conn->case_sensitive == False) && (conn->case_preserve == True) &&
5761                         strequal(newname, fsp->fsp_name)) {
5762                 char *p;
5763                 char *newname_modified_last_component = NULL;
5764
5765                 /*
5766                  * Get the last component of the modified name.
5767                  * Note that we guarantee that newname contains a '/'
5768                  * character above.
5769                  */
5770                 p = strrchr_m(newname,'/');
5771                 newname_modified_last_component = talloc_strdup(ctx,
5772                                                 p+1);
5773                 if (!newname_modified_last_component) {
5774                         return NT_STATUS_NO_MEMORY;
5775                 }
5776
5777                 if(strcsequal(newname_modified_last_component,
5778                               newname_last_component) == False) {
5779                         /*
5780                          * Replace the modified last component with
5781                          * the original.
5782                          */
5783                         *p = '\0'; /* Truncate at the '/' */
5784                         newname = talloc_asprintf(ctx,
5785                                         "%s/%s",
5786                                         newname,
5787                                         newname_last_component);
5788                 }
5789         }
5790
5791         /*
5792          * If the src and dest names are identical - including case,
5793          * don't do the rename, just return success.
5794          */
5795
5796         if (strcsequal(fsp->fsp_name, newname)) {
5797                 DEBUG(3,("rename_internals_fsp: identical names in rename %s - returning success\n",
5798                         newname));
5799                 return NT_STATUS_OK;
5800         }
5801
5802         old_is_stream = is_ntfs_stream_name(fsp->fsp_name);
5803         new_is_stream = is_ntfs_stream_name(newname);
5804
5805         /* Return the correct error code if both names aren't streams. */
5806         if (!old_is_stream && new_is_stream) {
5807                 return NT_STATUS_OBJECT_NAME_INVALID;
5808         }
5809
5810         if (old_is_stream && !new_is_stream) {
5811                 return NT_STATUS_INVALID_PARAMETER;
5812         }
5813
5814         /*
5815          * Have vfs_object_exist also fill sbuf1
5816          */
5817         dst_exists = vfs_object_exist(conn, newname, &sbuf1);
5818
5819         if(!replace_if_exists && dst_exists) {
5820                 DEBUG(3,("rename_internals_fsp: dest exists doing rename %s -> %s\n",
5821                         fsp->fsp_name,newname));
5822                 return NT_STATUS_OBJECT_NAME_COLLISION;
5823         }
5824
5825         if (dst_exists) {
5826                 struct file_id fileid = vfs_file_id_from_sbuf(conn, &sbuf1);
5827                 files_struct *dst_fsp = file_find_di_first(fileid);
5828                 /* The file can be open when renaming a stream */
5829                 if (dst_fsp && !new_is_stream) {
5830                         DEBUG(3, ("rename_internals_fsp: Target file open\n"));
5831                         return NT_STATUS_ACCESS_DENIED;
5832                 }
5833         }
5834
5835         /* Ensure we have a valid stat struct for the source. */
5836         if (fsp->fh->fd != -1) {
5837                 if (SMB_VFS_FSTAT(fsp, &sbuf) == -1) {
5838                         return map_nt_error_from_unix(errno);
5839                 }
5840         } else {
5841                 int ret = -1;
5842                 if (fsp->posix_open) {
5843                         ret = SMB_VFS_LSTAT(conn,fsp->fsp_name,&sbuf);
5844                 } else {
5845                         ret = SMB_VFS_STAT(conn,fsp->fsp_name,&sbuf);
5846                 }
5847                 if (ret == -1) {
5848                         return map_nt_error_from_unix(errno);
5849                 }
5850         }
5851
5852         status = can_rename(conn, fsp, attrs, &sbuf);
5853
5854         if (!NT_STATUS_IS_OK(status)) {
5855                 DEBUG(3,("rename_internals_fsp: Error %s rename %s -> %s\n",
5856                         nt_errstr(status), fsp->fsp_name,newname));
5857                 if (NT_STATUS_EQUAL(status,NT_STATUS_SHARING_VIOLATION))
5858                         status = NT_STATUS_ACCESS_DENIED;
5859                 return status;
5860         }
5861
5862         if (rename_path_prefix_equal(fsp->fsp_name, newname)) {
5863                 return NT_STATUS_ACCESS_DENIED;
5864         }
5865
5866         lck = get_share_mode_lock(talloc_tos(), fsp->file_id, NULL, NULL,
5867                                   NULL);
5868
5869         /*
5870          * We have the file open ourselves, so not being able to get the
5871          * corresponding share mode lock is a fatal error.
5872          */
5873
5874         SMB_ASSERT(lck != NULL);
5875
5876         if(SMB_VFS_RENAME(conn,fsp->fsp_name, newname) == 0) {
5877                 uint32 create_options = fsp->fh->private_options;
5878
5879                 DEBUG(3,("rename_internals_fsp: succeeded doing rename on %s -> %s\n",
5880                         fsp->fsp_name,newname));
5881
5882                 notify_rename(conn, fsp->is_directory, fsp->fsp_name, newname);
5883
5884                 rename_open_files(conn, lck, newname);
5885
5886                 /*
5887                  * A rename acts as a new file create w.r.t. allowing an initial delete
5888                  * on close, probably because in Windows there is a new handle to the
5889                  * new file. If initial delete on close was requested but not
5890                  * originally set, we need to set it here. This is probably not 100% correct,
5891                  * but will work for the CIFSFS client which in non-posix mode
5892                  * depends on these semantics. JRA.
5893                  */
5894
5895                 if (create_options & FILE_DELETE_ON_CLOSE) {
5896                         status = can_set_delete_on_close(fsp, True, 0);
5897
5898                         if (NT_STATUS_IS_OK(status)) {
5899                                 /* Note that here we set the *inital* delete on close flag,
5900                                  * not the regular one. The magic gets handled in close. */
5901                                 fsp->initial_delete_on_close = True;
5902                         }
5903                 }
5904                 TALLOC_FREE(lck);
5905                 return NT_STATUS_OK;
5906         }
5907
5908         TALLOC_FREE(lck);
5909
5910         if (errno == ENOTDIR || errno == EISDIR) {
5911                 status = NT_STATUS_OBJECT_NAME_COLLISION;
5912         } else {
5913                 status = map_nt_error_from_unix(errno);
5914         }
5915
5916         DEBUG(3,("rename_internals_fsp: Error %s rename %s -> %s\n",
5917                 nt_errstr(status), fsp->fsp_name,newname));
5918
5919         return status;
5920 }
5921
5922 /****************************************************************************
5923  The guts of the rename command, split out so it may be called by the NT SMB
5924  code.
5925 ****************************************************************************/
5926
5927 NTSTATUS rename_internals(TALLOC_CTX *ctx,
5928                         connection_struct *conn,
5929                         struct smb_request *req,
5930                         const char *name_in,
5931                         const char *newname_in,
5932                         uint32 attrs,
5933                         bool replace_if_exists,
5934                         bool src_has_wild,
5935                         bool dest_has_wild,
5936                         uint32_t access_mask)
5937 {
5938         char *directory = NULL;
5939         char *mask = NULL;
5940         char *last_component_src = NULL;
5941         char *last_component_dest = NULL;
5942         char *name = NULL;
5943         char *newname = NULL;
5944         char *p;
5945         int count=0;
5946         NTSTATUS status = NT_STATUS_OK;
5947         SMB_STRUCT_STAT sbuf1, sbuf2;
5948         struct smb_Dir *dir_hnd = NULL;
5949         const char *dname;
5950         long offset = 0;
5951         int create_options = 0;
5952         bool posix_pathnames = lp_posix_pathnames();
5953
5954         ZERO_STRUCT(sbuf1);
5955         ZERO_STRUCT(sbuf2);
5956
5957         status = unix_convert(ctx, conn, name_in, src_has_wild, &name,
5958                         &last_component_src, &sbuf1);
5959         if (!NT_STATUS_IS_OK(status)) {
5960                 return status;
5961         }
5962
5963         status = unix_convert(ctx, conn, newname_in, dest_has_wild, &newname,
5964                         &last_component_dest, &sbuf2);
5965         if (!NT_STATUS_IS_OK(status)) {
5966                 return status;
5967         }
5968
5969         /*
5970          * Split the old name into directory and last component
5971          * strings. Note that unix_convert may have stripped off a
5972          * leading ./ from both name and newname if the rename is
5973          * at the root of the share. We need to make sure either both
5974          * name and newname contain a / character or neither of them do
5975          * as this is checked in resolve_wildcards().
5976          */
5977
5978         p = strrchr_m(name,'/');
5979         if (!p) {
5980                 directory = talloc_strdup(ctx, ".");
5981                 if (!directory) {
5982                         return NT_STATUS_NO_MEMORY;
5983                 }
5984                 mask = name;
5985         } else {
5986                 *p = 0;
5987                 directory = talloc_strdup(ctx, name);
5988                 if (!directory) {
5989                         return NT_STATUS_NO_MEMORY;
5990                 }
5991                 mask = p+1;
5992                 *p = '/'; /* Replace needed for exceptional test below. */
5993         }
5994
5995         /*
5996          * We should only check the mangled cache
5997          * here if unix_convert failed. This means
5998          * that the path in 'mask' doesn't exist
5999          * on the file system and so we need to look
6000          * for a possible mangle. This patch from
6001          * Tine Smukavec <valentin.smukavec@hermes.si>.
6002          */
6003
6004         if (!VALID_STAT(sbuf1) && mangle_is_mangled(mask, conn->params)) {
6005                 char *new_mask = NULL;
6006                 mangle_lookup_name_from_8_3(ctx,
6007                                         mask,
6008                                         &new_mask,
6009                                         conn->params );
6010                 if (new_mask) {
6011                         mask = new_mask;
6012                 }
6013         }
6014
6015         if (!src_has_wild) {
6016                 files_struct *fsp;
6017
6018                 /*
6019                  * No wildcards - just process the one file.
6020                  */
6021                 /* Add a terminating '/' to the directory name. */
6022                 directory = talloc_asprintf_append(directory,
6023                                 "/%s",
6024                                 mask);
6025                 if (!directory) {
6026                         return NT_STATUS_NO_MEMORY;
6027                 }
6028
6029                 /* Ensure newname contains a '/' also */
6030                 if(strrchr_m(newname,'/') == 0) {
6031                         newname = talloc_asprintf(ctx,
6032                                                 "./%s",
6033                                                 newname);
6034                         if (!newname) {
6035                                 return NT_STATUS_NO_MEMORY;
6036                         }
6037                 }
6038
6039                 DEBUG(3, ("rename_internals: case_sensitive = %d, "
6040                           "case_preserve = %d, short case preserve = %d, "
6041                           "directory = %s, newname = %s, "
6042                           "last_component_dest = %s\n",
6043                           conn->case_sensitive, conn->case_preserve,
6044                           conn->short_case_preserve, directory,
6045                           newname, last_component_dest));
6046
6047                 /* The dest name still may have wildcards. */
6048                 if (dest_has_wild) {
6049                         char *mod_newname = NULL;
6050                         if (!resolve_wildcards(ctx,
6051                                         directory,newname,&mod_newname)) {
6052                                 DEBUG(6, ("rename_internals: resolve_wildcards "
6053                                         "%s %s failed\n",
6054                                         directory,
6055                                         newname));
6056                                 return NT_STATUS_NO_MEMORY;
6057                         }
6058                         newname = mod_newname;
6059                 }
6060
6061                 ZERO_STRUCT(sbuf1);
6062                 if (posix_pathnames) {
6063                         SMB_VFS_LSTAT(conn, directory, &sbuf1);
6064                 } else {
6065                         SMB_VFS_STAT(conn, directory, &sbuf1);
6066                 }
6067
6068                 if (S_ISDIR(sbuf1.st_mode)) {
6069                         create_options |= FILE_DIRECTORY_FILE;
6070                 }
6071
6072                 status = SMB_VFS_CREATE_FILE(
6073                         conn,                           /* conn */
6074                         req,                            /* req */
6075                         0,                              /* root_dir_fid */
6076                         directory,                      /* fname */
6077                         0,                              /* create_file_flags */
6078                         access_mask,                    /* access_mask */
6079                         (FILE_SHARE_READ |              /* share_access */
6080                             FILE_SHARE_WRITE),
6081                         FILE_OPEN,                      /* create_disposition*/
6082                         create_options,                 /* create_options */
6083                         posix_pathnames ? FILE_FLAG_POSIX_SEMANTICS|0777 : 0, /* file_attributes */
6084                         0,                              /* oplock_request */
6085                         0,                              /* allocation_size */
6086                         NULL,                           /* sd */
6087                         NULL,                           /* ea_list */
6088                         &fsp,                           /* result */
6089                         NULL,                           /* pinfo */
6090                         &sbuf1);                        /* psbuf */
6091
6092                 if (!NT_STATUS_IS_OK(status)) {
6093                         DEBUG(3, ("Could not open rename source %s: %s\n",
6094                                   directory, nt_errstr(status)));
6095                         return status;
6096                 }
6097
6098                 status = rename_internals_fsp(conn, fsp, newname,
6099                                               last_component_dest,
6100                                               attrs, replace_if_exists);
6101
6102                 close_file(req, fsp, NORMAL_CLOSE);
6103
6104                 DEBUG(3, ("rename_internals: Error %s rename %s -> %s\n",
6105                           nt_errstr(status), directory,newname));
6106
6107                 return status;
6108         }
6109
6110         /*
6111          * Wildcards - process each file that matches.
6112          */
6113         if (strequal(mask,"????????.???")) {
6114                 mask[0] = '*';
6115                 mask[1] = '\0';
6116         }
6117
6118         status = check_name(conn, directory);
6119         if (!NT_STATUS_IS_OK(status)) {
6120                 return status;
6121         }
6122
6123         dir_hnd = OpenDir(talloc_tos(), conn, directory, mask, attrs);
6124         if (dir_hnd == NULL) {
6125                 return map_nt_error_from_unix(errno);
6126         }
6127
6128         status = NT_STATUS_NO_SUCH_FILE;
6129         /*
6130          * Was status = NT_STATUS_OBJECT_NAME_NOT_FOUND;
6131          * - gentest fix. JRA
6132          */
6133
6134         while ((dname = ReadDirName(dir_hnd, &offset, &sbuf1))) {
6135                 files_struct *fsp = NULL;
6136                 char *fname = NULL;
6137                 char *destname = NULL;
6138                 bool sysdir_entry = False;
6139
6140                 /* Quick check for "." and ".." */
6141                 if (ISDOT(dname) || ISDOTDOT(dname)) {
6142                         if (attrs & aDIR) {
6143                                 sysdir_entry = True;
6144                         } else {
6145                                 continue;
6146                         }
6147                 }
6148
6149                 if (!is_visible_file(conn, directory, dname, &sbuf1, False)) {
6150                         continue;
6151                 }
6152
6153                 if(!mask_match(dname, mask, conn->case_sensitive)) {
6154                         continue;
6155                 }
6156
6157                 if (sysdir_entry) {
6158                         status = NT_STATUS_OBJECT_NAME_INVALID;
6159                         break;
6160                 }
6161
6162                 fname = talloc_asprintf(ctx,
6163                                 "%s/%s",
6164                                 directory,
6165                                 dname);
6166                 if (!fname) {
6167                         return NT_STATUS_NO_MEMORY;
6168                 }
6169
6170                 if (!resolve_wildcards(ctx,
6171                                 fname,newname,&destname)) {
6172                         DEBUG(6, ("resolve_wildcards %s %s failed\n",
6173                                   fname, destname));
6174                         TALLOC_FREE(fname);
6175                         continue;
6176                 }
6177                 if (!destname) {
6178                         return NT_STATUS_NO_MEMORY;
6179                 }
6180
6181                 ZERO_STRUCT(sbuf1);
6182                 if (posix_pathnames) {
6183                         SMB_VFS_LSTAT(conn, fname, &sbuf1);
6184                 } else {
6185                         SMB_VFS_STAT(conn, fname, &sbuf1);
6186                 }
6187
6188                 create_options = 0;
6189
6190                 if (S_ISDIR(sbuf1.st_mode)) {
6191                         create_options |= FILE_DIRECTORY_FILE;
6192                 }
6193
6194                 status = SMB_VFS_CREATE_FILE(
6195                         conn,                           /* conn */
6196                         req,                            /* req */
6197                         0,                              /* root_dir_fid */
6198                         fname,                          /* fname */
6199                         0,                              /* create_file_flags */
6200                         access_mask,                    /* access_mask */
6201                         (FILE_SHARE_READ |              /* share_access */
6202                             FILE_SHARE_WRITE),
6203                         FILE_OPEN,                      /* create_disposition*/
6204                         create_options,                 /* create_options */
6205                         posix_pathnames ? FILE_FLAG_POSIX_SEMANTICS|0777 : 0, /* file_attributes */
6206                         0,                              /* oplock_request */
6207                         0,                              /* allocation_size */
6208                         NULL,                           /* sd */
6209                         NULL,                           /* ea_list */
6210                         &fsp,                           /* result */
6211                         NULL,                           /* pinfo */
6212                         &sbuf1);                        /* psbuf */
6213
6214                 if (!NT_STATUS_IS_OK(status)) {
6215                         DEBUG(3,("rename_internals: SMB_VFS_CREATE_FILE "
6216                                  "returned %s rename %s -> %s\n",
6217                                  nt_errstr(status), directory, newname));
6218                         break;
6219                 }
6220
6221                 status = rename_internals_fsp(conn, fsp, destname, dname,
6222                                               attrs, replace_if_exists);
6223
6224                 close_file(req, fsp, NORMAL_CLOSE);
6225
6226                 if (!NT_STATUS_IS_OK(status)) {
6227                         DEBUG(3, ("rename_internals_fsp returned %s for "
6228                                   "rename %s -> %s\n", nt_errstr(status),
6229                                   directory, newname));
6230                         break;
6231                 }
6232
6233                 count++;
6234
6235                 DEBUG(3,("rename_internals: doing rename on %s -> "
6236                          "%s\n",fname,destname));
6237
6238                 TALLOC_FREE(fname);
6239                 TALLOC_FREE(destname);
6240         }
6241         TALLOC_FREE(dir_hnd);
6242
6243         if (count == 0 && NT_STATUS_IS_OK(status) && errno != 0) {
6244                 status = map_nt_error_from_unix(errno);
6245         }
6246
6247         return status;
6248 }
6249
6250 /****************************************************************************
6251  Reply to a mv.
6252 ****************************************************************************/
6253
6254 void reply_mv(struct smb_request *req)
6255 {
6256         connection_struct *conn = req->conn;
6257         char *name = NULL;
6258         char *newname = NULL;
6259         const char *p;
6260         uint32 attrs;
6261         NTSTATUS status;
6262         bool src_has_wcard = False;
6263         bool dest_has_wcard = False;
6264         TALLOC_CTX *ctx = talloc_tos();
6265
6266         START_PROFILE(SMBmv);
6267
6268         if (req->wct < 1) {
6269                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
6270                 END_PROFILE(SMBmv);
6271                 return;
6272         }
6273
6274         attrs = SVAL(req->vwv+0, 0);
6275
6276         p = (const char *)req->buf + 1;
6277         p += srvstr_get_path_req_wcard(ctx, req, &name, p, STR_TERMINATE,
6278                                        &status, &src_has_wcard);
6279         if (!NT_STATUS_IS_OK(status)) {
6280                 reply_nterror(req, status);
6281                 END_PROFILE(SMBmv);
6282                 return;
6283         }
6284         p++;
6285         p += srvstr_get_path_req_wcard(ctx, req, &newname, p, STR_TERMINATE,
6286                                        &status, &dest_has_wcard);
6287         if (!NT_STATUS_IS_OK(status)) {
6288                 reply_nterror(req, status);
6289                 END_PROFILE(SMBmv);
6290                 return;
6291         }
6292
6293         status = resolve_dfspath_wcard(ctx, conn,
6294                                        req->flags2 & FLAGS2_DFS_PATHNAMES,
6295                                        name,
6296                                        &name,
6297                                        &src_has_wcard);
6298         if (!NT_STATUS_IS_OK(status)) {
6299                 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
6300                         reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
6301                                         ERRSRV, ERRbadpath);
6302                         END_PROFILE(SMBmv);
6303                         return;
6304                 }
6305                 reply_nterror(req, status);
6306                 END_PROFILE(SMBmv);
6307                 return;
6308         }
6309
6310         status = resolve_dfspath_wcard(ctx, conn,
6311                                        req->flags2 & FLAGS2_DFS_PATHNAMES,
6312                                        newname,
6313                                        &newname,
6314                                        &dest_has_wcard);
6315         if (!NT_STATUS_IS_OK(status)) {
6316                 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
6317                         reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
6318                                         ERRSRV, ERRbadpath);
6319                         END_PROFILE(SMBmv);
6320                         return;
6321                 }
6322                 reply_nterror(req, status);
6323                 END_PROFILE(SMBmv);
6324                 return;
6325         }
6326
6327         DEBUG(3,("reply_mv : %s -> %s\n",name,newname));
6328
6329         status = rename_internals(ctx, conn, req, name, newname, attrs, False,
6330                                   src_has_wcard, dest_has_wcard, DELETE_ACCESS);
6331         if (!NT_STATUS_IS_OK(status)) {
6332                 if (open_was_deferred(req->mid)) {
6333                         /* We have re-scheduled this call. */
6334                         END_PROFILE(SMBmv);
6335                         return;
6336                 }
6337                 reply_nterror(req, status);
6338                 END_PROFILE(SMBmv);
6339                 return;
6340         }
6341
6342         reply_outbuf(req, 0, 0);
6343
6344         END_PROFILE(SMBmv);
6345         return;
6346 }
6347
6348 /*******************************************************************
6349  Copy a file as part of a reply_copy.
6350 ******************************************************************/
6351
6352 /*
6353  * TODO: check error codes on all callers
6354  */
6355
6356 NTSTATUS copy_file(TALLOC_CTX *ctx,
6357                         connection_struct *conn,
6358                         const char *src,
6359                         const char *dest1,
6360                         int ofun,
6361                         int count,
6362                         bool target_is_directory)
6363 {
6364         SMB_STRUCT_STAT src_sbuf, sbuf2;
6365         SMB_OFF_T ret=-1;
6366         files_struct *fsp1,*fsp2;
6367         char *dest = NULL;
6368         uint32 dosattrs;
6369         uint32 new_create_disposition;
6370         NTSTATUS status;
6371
6372         dest = talloc_strdup(ctx, dest1);
6373         if (!dest) {
6374                 return NT_STATUS_NO_MEMORY;
6375         }
6376         if (target_is_directory) {
6377                 const char *p = strrchr_m(src,'/');
6378                 if (p) {
6379                         p++;
6380                 } else {
6381                         p = src;
6382                 }
6383                 dest = talloc_asprintf_append(dest,
6384                                 "/%s",
6385                                 p);
6386                 if (!dest) {
6387                         return NT_STATUS_NO_MEMORY;
6388                 }
6389         }
6390
6391         if (!vfs_file_exist(conn,src,&src_sbuf)) {
6392                 TALLOC_FREE(dest);
6393                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
6394         }
6395
6396         if (!target_is_directory && count) {
6397                 new_create_disposition = FILE_OPEN;
6398         } else {
6399                 if (!map_open_params_to_ntcreate(dest1,0,ofun,
6400                                 NULL, NULL, &new_create_disposition, NULL)) {
6401                         TALLOC_FREE(dest);
6402                         return NT_STATUS_INVALID_PARAMETER;
6403                 }
6404         }
6405
6406         status = SMB_VFS_CREATE_FILE(
6407                 conn,                                   /* conn */
6408                 NULL,                                   /* req */
6409                 0,                                      /* root_dir_fid */
6410                 src,                                    /* fname */
6411                 0,                                      /* create_file_flags */
6412                 FILE_GENERIC_READ,                      /* access_mask */
6413                 FILE_SHARE_READ | FILE_SHARE_WRITE,     /* share_access */
6414                 FILE_OPEN,                              /* create_disposition*/
6415                 0,                                      /* create_options */
6416                 FILE_ATTRIBUTE_NORMAL,                  /* file_attributes */
6417                 INTERNAL_OPEN_ONLY,                     /* oplock_request */
6418                 0,                                      /* allocation_size */
6419                 NULL,                                   /* sd */
6420                 NULL,                                   /* ea_list */
6421                 &fsp1,                                  /* result */
6422                 NULL,                                   /* pinfo */
6423                 &src_sbuf);                             /* psbuf */
6424
6425         if (!NT_STATUS_IS_OK(status)) {
6426                 TALLOC_FREE(dest);
6427                 return status;
6428         }
6429
6430         dosattrs = dos_mode(conn, src, &src_sbuf);
6431         if (SMB_VFS_STAT(conn,dest,&sbuf2) == -1) {
6432                 ZERO_STRUCTP(&sbuf2);
6433         }
6434
6435         status = SMB_VFS_CREATE_FILE(
6436                 conn,                                   /* conn */
6437                 NULL,                                   /* req */
6438                 0,                                      /* root_dir_fid */
6439                 dest,                                   /* fname */
6440                 0,                                      /* create_file_flags */
6441                 FILE_GENERIC_WRITE,                     /* access_mask */
6442                 FILE_SHARE_READ | FILE_SHARE_WRITE,     /* share_access */
6443                 new_create_disposition,                 /* create_disposition*/
6444                 0,                                      /* create_options */
6445                 dosattrs,                               /* file_attributes */
6446                 INTERNAL_OPEN_ONLY,                     /* oplock_request */
6447                 0,                                      /* allocation_size */
6448                 NULL,                                   /* sd */
6449                 NULL,                                   /* ea_list */
6450                 &fsp2,                                  /* result */
6451                 NULL,                                   /* pinfo */
6452                 &sbuf2);                                /* psbuf */
6453
6454         TALLOC_FREE(dest);
6455
6456         if (!NT_STATUS_IS_OK(status)) {
6457                 close_file(NULL, fsp1, ERROR_CLOSE);
6458                 return status;
6459         }
6460
6461         if ((ofun&3) == 1) {
6462                 if(SMB_VFS_LSEEK(fsp2,0,SEEK_END) == -1) {
6463                         DEBUG(0,("copy_file: error - vfs lseek returned error %s\n", strerror(errno) ));
6464                         /*
6465                          * Stop the copy from occurring.
6466                          */
6467                         ret = -1;
6468                         src_sbuf.st_size = 0;
6469                 }
6470         }
6471
6472         if (src_sbuf.st_size) {
6473                 ret = vfs_transfer_file(fsp1, fsp2, src_sbuf.st_size);
6474         }
6475
6476         close_file(NULL, fsp1, NORMAL_CLOSE);
6477
6478         /* Ensure the modtime is set correctly on the destination file. */
6479         set_close_write_time(fsp2, get_mtimespec(&src_sbuf));
6480
6481         /*
6482          * As we are opening fsp1 read-only we only expect
6483          * an error on close on fsp2 if we are out of space.
6484          * Thus we don't look at the error return from the
6485          * close of fsp1.
6486          */
6487         status = close_file(NULL, fsp2, NORMAL_CLOSE);
6488
6489         if (!NT_STATUS_IS_OK(status)) {
6490                 return status;
6491         }
6492
6493         if (ret != (SMB_OFF_T)src_sbuf.st_size) {
6494                 return NT_STATUS_DISK_FULL;
6495         }
6496
6497         return NT_STATUS_OK;
6498 }
6499
6500 /****************************************************************************
6501  Reply to a file copy.
6502 ****************************************************************************/
6503
6504 void reply_copy(struct smb_request *req)
6505 {
6506         connection_struct *conn = req->conn;
6507         char *name = NULL;
6508         char *newname = NULL;
6509         char *directory = NULL;
6510         const char *mask = NULL;
6511         const char mask_star[] = "*";
6512         const char *p;
6513         int count=0;
6514         int error = ERRnoaccess;
6515         int err = 0;
6516         int tid2;
6517         int ofun;
6518         int flags;
6519         bool target_is_directory=False;
6520         bool source_has_wild = False;
6521         bool dest_has_wild = False;
6522         SMB_STRUCT_STAT sbuf1, sbuf2;
6523         NTSTATUS status;
6524         TALLOC_CTX *ctx = talloc_tos();
6525
6526         START_PROFILE(SMBcopy);
6527
6528         if (req->wct < 3) {
6529                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
6530                 END_PROFILE(SMBcopy);
6531                 return;
6532         }
6533
6534         tid2 = SVAL(req->vwv+0, 0);
6535         ofun = SVAL(req->vwv+1, 0);
6536         flags = SVAL(req->vwv+2, 0);
6537
6538         p = (const char *)req->buf;
6539         p += srvstr_get_path_req_wcard(ctx, req, &name, p, STR_TERMINATE,
6540                                        &status, &source_has_wild);
6541         if (!NT_STATUS_IS_OK(status)) {
6542                 reply_nterror(req, status);
6543                 END_PROFILE(SMBcopy);
6544                 return;
6545         }
6546         p += srvstr_get_path_req_wcard(ctx, req, &newname, p, STR_TERMINATE,
6547                                        &status, &dest_has_wild);
6548         if (!NT_STATUS_IS_OK(status)) {
6549                 reply_nterror(req, status);
6550                 END_PROFILE(SMBcopy);
6551                 return;
6552         }
6553
6554         DEBUG(3,("reply_copy : %s -> %s\n",name,newname));
6555
6556         if (tid2 != conn->cnum) {
6557                 /* can't currently handle inter share copies XXXX */
6558                 DEBUG(3,("Rejecting inter-share copy\n"));
6559                 reply_doserror(req, ERRSRV, ERRinvdevice);
6560                 END_PROFILE(SMBcopy);
6561                 return;
6562         }
6563
6564         status = resolve_dfspath_wcard(ctx, conn,
6565                                        req->flags2 & FLAGS2_DFS_PATHNAMES,
6566                                        name,
6567                                        &name,
6568                                        &source_has_wild);
6569         if (!NT_STATUS_IS_OK(status)) {
6570                 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
6571                         reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
6572                                         ERRSRV, ERRbadpath);
6573                         END_PROFILE(SMBcopy);
6574                         return;
6575                 }
6576                 reply_nterror(req, status);
6577                 END_PROFILE(SMBcopy);
6578                 return;
6579         }
6580
6581         status = resolve_dfspath_wcard(ctx, conn,
6582                                        req->flags2 & FLAGS2_DFS_PATHNAMES,
6583                                        newname,
6584                                        &newname,
6585                                        &dest_has_wild);
6586         if (!NT_STATUS_IS_OK(status)) {
6587                 if (NT_STATUS_EQUAL(status,NT_STATUS_PATH_NOT_COVERED)) {
6588                         reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
6589                                         ERRSRV, ERRbadpath);
6590                         END_PROFILE(SMBcopy);
6591                         return;
6592                 }
6593                 reply_nterror(req, status);
6594                 END_PROFILE(SMBcopy);
6595                 return;
6596         }
6597
6598         status = unix_convert(ctx, conn, name, source_has_wild,
6599                         &name, NULL, &sbuf1);
6600         if (!NT_STATUS_IS_OK(status)) {
6601                 reply_nterror(req, status);
6602                 END_PROFILE(SMBcopy);
6603                 return;
6604         }
6605
6606         status = unix_convert(ctx, conn, newname, dest_has_wild,
6607                         &newname, NULL, &sbuf2);
6608         if (!NT_STATUS_IS_OK(status)) {
6609                 reply_nterror(req, status);
6610                 END_PROFILE(SMBcopy);
6611                 return;
6612         }
6613
6614         target_is_directory = VALID_STAT_OF_DIR(sbuf2);
6615
6616         if ((flags&1) && target_is_directory) {
6617                 reply_doserror(req, ERRDOS, ERRbadfile);
6618                 END_PROFILE(SMBcopy);
6619                 return;
6620         }
6621
6622         if ((flags&2) && !target_is_directory) {
6623                 reply_doserror(req, ERRDOS, ERRbadpath);
6624                 END_PROFILE(SMBcopy);
6625                 return;
6626         }
6627
6628         if ((flags&(1<<5)) && VALID_STAT_OF_DIR(sbuf1)) {
6629                 /* wants a tree copy! XXXX */
6630                 DEBUG(3,("Rejecting tree copy\n"));
6631                 reply_doserror(req, ERRSRV, ERRerror);
6632                 END_PROFILE(SMBcopy);
6633                 return;
6634         }
6635
6636         p = strrchr_m(name,'/');
6637         if (p != NULL) {
6638                 directory = talloc_strndup(ctx, name, PTR_DIFF(p, name));
6639                 mask = p+1;
6640         } else {
6641                 directory = talloc_strdup(ctx, "./");
6642                 mask = name;
6643         }
6644
6645         if (!directory) {
6646                 reply_nterror(req, NT_STATUS_NO_MEMORY);
6647                 END_PROFILE(SMBcopy);
6648                 return;
6649         }
6650
6651         /*
6652          * We should only check the mangled cache
6653          * here if unix_convert failed. This means
6654          * that the path in 'mask' doesn't exist
6655          * on the file system and so we need to look
6656          * for a possible mangle. This patch from
6657          * Tine Smukavec <valentin.smukavec@hermes.si>.
6658          */
6659
6660         if (!VALID_STAT(sbuf1) && mangle_is_mangled(mask, conn->params)) {
6661                 char *new_mask = NULL;
6662                 mangle_lookup_name_from_8_3(ctx,
6663                                         mask,
6664                                         &new_mask,
6665                                         conn->params );
6666                 if (new_mask) {
6667                         mask = new_mask;
6668                 }
6669         }
6670
6671         if (!source_has_wild) {
6672                 directory = talloc_asprintf_append(directory,
6673                                 "/%s",
6674                                 mask);
6675                 if (dest_has_wild) {
6676                         char *mod_newname = NULL;
6677                         if (!resolve_wildcards(ctx,
6678                                         directory,newname,&mod_newname)) {
6679                                 reply_nterror(req, NT_STATUS_NO_MEMORY);
6680                                 END_PROFILE(SMBcopy);
6681                                 return;
6682                         }
6683                         newname = mod_newname;
6684                 }
6685
6686                 status = check_name(conn, directory);
6687                 if (!NT_STATUS_IS_OK(status)) {
6688                         reply_nterror(req, status);
6689                         END_PROFILE(SMBcopy);
6690                         return;
6691                 }
6692
6693                 status = check_name(conn, newname);
6694                 if (!NT_STATUS_IS_OK(status)) {
6695                         reply_nterror(req, status);
6696                         END_PROFILE(SMBcopy);
6697                         return;
6698                 }
6699
6700                 status = copy_file(ctx,conn,directory,newname,ofun,
6701                                 count,target_is_directory);
6702
6703                 if(!NT_STATUS_IS_OK(status)) {
6704                         reply_nterror(req, status);
6705                         END_PROFILE(SMBcopy);
6706                         return;
6707                 } else {
6708                         count++;
6709                 }
6710         } else {
6711                 struct smb_Dir *dir_hnd = NULL;
6712                 const char *dname = NULL;
6713                 long offset = 0;
6714
6715                 if (strequal(mask,"????????.???")) {
6716                         mask = mask_star;
6717                 }
6718
6719                 status = check_name(conn, directory);
6720                 if (!NT_STATUS_IS_OK(status)) {
6721                         reply_nterror(req, status);
6722                         END_PROFILE(SMBcopy);
6723                         return;
6724                 }
6725
6726                 dir_hnd = OpenDir(talloc_tos(), conn, directory, mask, 0);
6727                 if (dir_hnd == NULL) {
6728                         status = map_nt_error_from_unix(errno);
6729                         reply_nterror(req, status);
6730                         END_PROFILE(SMBcopy);
6731                         return;
6732                 }
6733
6734                 error = ERRbadfile;
6735
6736                 while ((dname = ReadDirName(dir_hnd, &offset, &sbuf1))) {
6737                         char *destname = NULL;
6738                         char *fname = NULL;
6739
6740                         if (ISDOT(dname) || ISDOTDOT(dname)) {
6741                                 continue;
6742                         }
6743
6744                         if (!is_visible_file(conn, directory, dname, &sbuf1, False)) {
6745                                 continue;
6746                         }
6747
6748                         if(!mask_match(dname, mask, conn->case_sensitive)) {
6749                                 continue;
6750                         }
6751
6752                         error = ERRnoaccess;
6753                         fname = talloc_asprintf(ctx,
6754                                         "%s/%s",
6755                                         directory,
6756                                         dname);
6757                         if (!fname) {
6758                                 TALLOC_FREE(dir_hnd);
6759                                 reply_nterror(req, NT_STATUS_NO_MEMORY);
6760                                 END_PROFILE(SMBcopy);
6761                                 return;
6762                         }
6763
6764                         if (!resolve_wildcards(ctx,
6765                                         fname,newname,&destname)) {
6766                                 continue;
6767                         }
6768                         if (!destname) {
6769                                 TALLOC_FREE(dir_hnd);
6770                                 reply_nterror(req, NT_STATUS_NO_MEMORY);
6771                                 END_PROFILE(SMBcopy);
6772                                 return;
6773                         }
6774
6775                         status = check_name(conn, fname);
6776                         if (!NT_STATUS_IS_OK(status)) {
6777                                 TALLOC_FREE(dir_hnd);
6778                                 reply_nterror(req, status);
6779                                 END_PROFILE(SMBcopy);
6780                                 return;
6781                         }
6782
6783                         status = check_name(conn, destname);
6784                         if (!NT_STATUS_IS_OK(status)) {
6785                                 TALLOC_FREE(dir_hnd);
6786                                 reply_nterror(req, status);
6787                                 END_PROFILE(SMBcopy);
6788                                 return;
6789                         }
6790
6791                         DEBUG(3,("reply_copy : doing copy on %s -> %s\n",fname, destname));
6792
6793                         status = copy_file(ctx,conn,fname,destname,ofun,
6794                                         count,target_is_directory);
6795                         if (NT_STATUS_IS_OK(status)) {
6796                                 count++;
6797                         }
6798                         TALLOC_FREE(fname);
6799                         TALLOC_FREE(destname);
6800                 }
6801                 TALLOC_FREE(dir_hnd);
6802         }
6803
6804         if (count == 0) {
6805                 if(err) {
6806                         /* Error on close... */
6807                         errno = err;
6808                         reply_unixerror(req, ERRHRD, ERRgeneral);
6809                         END_PROFILE(SMBcopy);
6810                         return;
6811                 }
6812
6813                 reply_doserror(req, ERRDOS, error);
6814                 END_PROFILE(SMBcopy);
6815                 return;
6816         }
6817
6818         reply_outbuf(req, 1, 0);
6819         SSVAL(req->outbuf,smb_vwv0,count);
6820
6821         END_PROFILE(SMBcopy);
6822         return;
6823 }
6824
6825 #undef DBGC_CLASS
6826 #define DBGC_CLASS DBGC_LOCKING
6827
6828 /****************************************************************************
6829  Get a lock pid, dealing with large count requests.
6830 ****************************************************************************/
6831
6832 uint32 get_lock_pid(const uint8_t *data, int data_offset,
6833                     bool large_file_format)
6834 {
6835         if(!large_file_format)
6836                 return (uint32)SVAL(data,SMB_LPID_OFFSET(data_offset));
6837         else
6838                 return (uint32)SVAL(data,SMB_LARGE_LPID_OFFSET(data_offset));
6839 }
6840
6841 /****************************************************************************
6842  Get a lock count, dealing with large count requests.
6843 ****************************************************************************/
6844
6845 uint64_t get_lock_count(const uint8_t *data, int data_offset,
6846                         bool large_file_format)
6847 {
6848         uint64_t count = 0;
6849
6850         if(!large_file_format) {
6851                 count = (uint64_t)IVAL(data,SMB_LKLEN_OFFSET(data_offset));
6852         } else {
6853
6854 #if defined(HAVE_LONGLONG)
6855                 count = (((uint64_t) IVAL(data,SMB_LARGE_LKLEN_OFFSET_HIGH(data_offset))) << 32) |
6856                         ((uint64_t) IVAL(data,SMB_LARGE_LKLEN_OFFSET_LOW(data_offset)));
6857 #else /* HAVE_LONGLONG */
6858
6859                 /*
6860                  * NT4.x seems to be broken in that it sends large file (64 bit)
6861                  * lockingX calls even if the CAP_LARGE_FILES was *not*
6862                  * negotiated. For boxes without large unsigned ints truncate the
6863                  * lock count by dropping the top 32 bits.
6864                  */
6865
6866                 if(IVAL(data,SMB_LARGE_LKLEN_OFFSET_HIGH(data_offset)) != 0) {
6867                         DEBUG(3,("get_lock_count: truncating lock count (high)0x%x (low)0x%x to just low count.\n",
6868                                 (unsigned int)IVAL(data,SMB_LARGE_LKLEN_OFFSET_HIGH(data_offset)),
6869                                 (unsigned int)IVAL(data,SMB_LARGE_LKLEN_OFFSET_LOW(data_offset)) ));
6870                                 SIVAL(data,SMB_LARGE_LKLEN_OFFSET_HIGH(data_offset),0);
6871                 }
6872
6873                 count = (uint64_t)IVAL(data,SMB_LARGE_LKLEN_OFFSET_LOW(data_offset));
6874 #endif /* HAVE_LONGLONG */
6875         }
6876
6877         return count;
6878 }
6879
6880 #if !defined(HAVE_LONGLONG)
6881 /****************************************************************************
6882  Pathetically try and map a 64 bit lock offset into 31 bits. I hate Windows :-).
6883 ****************************************************************************/
6884
6885 static uint32 map_lock_offset(uint32 high, uint32 low)
6886 {
6887         unsigned int i;
6888         uint32 mask = 0;
6889         uint32 highcopy = high;
6890
6891         /*
6892          * Try and find out how many significant bits there are in high.
6893          */
6894
6895         for(i = 0; highcopy; i++)
6896                 highcopy >>= 1;
6897
6898         /*
6899          * We use 31 bits not 32 here as POSIX
6900          * lock offsets may not be negative.
6901          */
6902
6903         mask = (~0) << (31 - i);
6904
6905         if(low & mask)
6906                 return 0; /* Fail. */
6907
6908         high <<= (31 - i);
6909
6910         return (high|low);
6911 }
6912 #endif /* !defined(HAVE_LONGLONG) */
6913
6914 /****************************************************************************
6915  Get a lock offset, dealing with large offset requests.
6916 ****************************************************************************/
6917
6918 uint64_t get_lock_offset(const uint8_t *data, int data_offset,
6919                          bool large_file_format, bool *err)
6920 {
6921         uint64_t offset = 0;
6922
6923         *err = False;
6924
6925         if(!large_file_format) {
6926                 offset = (uint64_t)IVAL(data,SMB_LKOFF_OFFSET(data_offset));
6927         } else {
6928
6929 #if defined(HAVE_LONGLONG)
6930                 offset = (((uint64_t) IVAL(data,SMB_LARGE_LKOFF_OFFSET_HIGH(data_offset))) << 32) |
6931                                 ((uint64_t) IVAL(data,SMB_LARGE_LKOFF_OFFSET_LOW(data_offset)));
6932 #else /* HAVE_LONGLONG */
6933
6934                 /*
6935                  * NT4.x seems to be broken in that it sends large file (64 bit)
6936                  * lockingX calls even if the CAP_LARGE_FILES was *not*
6937                  * negotiated. For boxes without large unsigned ints mangle the
6938                  * lock offset by mapping the top 32 bits onto the lower 32.
6939                  */
6940
6941                 if(IVAL(data,SMB_LARGE_LKOFF_OFFSET_HIGH(data_offset)) != 0) {
6942                         uint32 low = IVAL(data,SMB_LARGE_LKOFF_OFFSET_LOW(data_offset));
6943                         uint32 high = IVAL(data,SMB_LARGE_LKOFF_OFFSET_HIGH(data_offset));
6944                         uint32 new_low = 0;
6945
6946                         if((new_low = map_lock_offset(high, low)) == 0) {
6947                                 *err = True;
6948                                 return (uint64_t)-1;
6949                         }
6950
6951                         DEBUG(3,("get_lock_offset: truncating lock offset (high)0x%x (low)0x%x to offset 0x%x.\n",
6952                                 (unsigned int)high, (unsigned int)low, (unsigned int)new_low ));
6953                         SIVAL(data,SMB_LARGE_LKOFF_OFFSET_HIGH(data_offset),0);
6954                         SIVAL(data,SMB_LARGE_LKOFF_OFFSET_LOW(data_offset),new_low);
6955                 }
6956
6957                 offset = (uint64_t)IVAL(data,SMB_LARGE_LKOFF_OFFSET_LOW(data_offset));
6958 #endif /* HAVE_LONGLONG */
6959         }
6960
6961         return offset;
6962 }
6963
6964 /****************************************************************************
6965  Reply to a lockingX request.
6966 ****************************************************************************/
6967
6968 void reply_lockingX(struct smb_request *req)
6969 {
6970         connection_struct *conn = req->conn;
6971         files_struct *fsp;
6972         unsigned char locktype;
6973         unsigned char oplocklevel;
6974         uint16 num_ulocks;
6975         uint16 num_locks;
6976         uint64_t count = 0, offset = 0;
6977         uint32 lock_pid;
6978         int32 lock_timeout;
6979         int i;
6980         const uint8_t *data;
6981         bool large_file_format;
6982         bool err;
6983         NTSTATUS status = NT_STATUS_UNSUCCESSFUL;
6984
6985         START_PROFILE(SMBlockingX);
6986
6987         if (req->wct < 8) {
6988                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
6989                 END_PROFILE(SMBlockingX);
6990                 return;
6991         }
6992
6993         fsp = file_fsp(req, SVAL(req->vwv+2, 0));
6994         locktype = CVAL(req->vwv+3, 0);
6995         oplocklevel = CVAL(req->vwv+3, 1);
6996         num_ulocks = SVAL(req->vwv+6, 0);
6997         num_locks = SVAL(req->vwv+7, 0);
6998         lock_timeout = IVAL(req->vwv+4, 0);
6999         large_file_format = (locktype & LOCKING_ANDX_LARGE_FILES)?True:False;
7000
7001         if (!check_fsp(conn, req, fsp)) {
7002                 END_PROFILE(SMBlockingX);
7003                 return;
7004         }
7005
7006         data = req->buf;
7007
7008         if (locktype & LOCKING_ANDX_CHANGE_LOCKTYPE) {
7009                 /* we don't support these - and CANCEL_LOCK makes w2k
7010                    and XP reboot so I don't really want to be
7011                    compatible! (tridge) */
7012                 reply_nterror(req, NT_STATUS_DOS(ERRDOS, ERRnoatomiclocks));
7013                 END_PROFILE(SMBlockingX);
7014                 return;
7015         }
7016
7017         /* Check if this is an oplock break on a file
7018            we have granted an oplock on.
7019         */
7020         if ((locktype & LOCKING_ANDX_OPLOCK_RELEASE)) {
7021                 /* Client can insist on breaking to none. */
7022                 bool break_to_none = (oplocklevel == 0);
7023                 bool result;
7024
7025                 DEBUG(5,("reply_lockingX: oplock break reply (%u) from client "
7026                          "for fnum = %d\n", (unsigned int)oplocklevel,
7027                          fsp->fnum ));
7028
7029                 /*
7030                  * Make sure we have granted an exclusive or batch oplock on
7031                  * this file.
7032                  */
7033
7034                 if (fsp->oplock_type == 0) {
7035
7036                         /* The Samba4 nbench simulator doesn't understand
7037                            the difference between break to level2 and break
7038                            to none from level2 - it sends oplock break
7039                            replies in both cases. Don't keep logging an error
7040                            message here - just ignore it. JRA. */
7041
7042                         DEBUG(5,("reply_lockingX: Error : oplock break from "
7043                                  "client for fnum = %d (oplock=%d) and no "
7044                                  "oplock granted on this file (%s).\n",
7045                                  fsp->fnum, fsp->oplock_type, fsp->fsp_name));
7046
7047                         /* if this is a pure oplock break request then don't
7048                          * send a reply */
7049                         if (num_locks == 0 && num_ulocks == 0) {
7050                                 END_PROFILE(SMBlockingX);
7051                                 return;
7052                         } else {
7053                                 END_PROFILE(SMBlockingX);
7054                                 reply_doserror(req, ERRDOS, ERRlock);
7055                                 return;
7056                         }
7057                 }
7058
7059                 if ((fsp->sent_oplock_break == BREAK_TO_NONE_SENT) ||
7060                     (break_to_none)) {
7061                         result = remove_oplock(fsp);
7062                 } else {
7063                         result = downgrade_oplock(fsp);
7064                 }
7065
7066                 if (!result) {
7067                         DEBUG(0, ("reply_lockingX: error in removing "
7068                                   "oplock on file %s\n", fsp->fsp_name));
7069                         /* Hmmm. Is this panic justified? */
7070                         smb_panic("internal tdb error");
7071                 }
7072
7073                 reply_to_oplock_break_requests(fsp);
7074
7075                 /* if this is a pure oplock break request then don't send a
7076                  * reply */
7077                 if (num_locks == 0 && num_ulocks == 0) {
7078                         /* Sanity check - ensure a pure oplock break is not a
7079                            chained request. */
7080                         if(CVAL(req->vwv+0, 0) != 0xff)
7081                                 DEBUG(0,("reply_lockingX: Error : pure oplock "
7082                                          "break is a chained %d request !\n",
7083                                          (unsigned int)CVAL(req->vwv+0, 0)));
7084                         END_PROFILE(SMBlockingX);
7085                         return;
7086                 }
7087         }
7088
7089         if (req->buflen <
7090             (num_ulocks + num_locks) * (large_file_format ? 20 : 10)) {
7091                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
7092                 END_PROFILE(SMBlockingX);
7093                 return;
7094         }
7095
7096         /* Data now points at the beginning of the list
7097            of smb_unlkrng structs */
7098         for(i = 0; i < (int)num_ulocks; i++) {
7099                 lock_pid = get_lock_pid( data, i, large_file_format);
7100                 count = get_lock_count( data, i, large_file_format);
7101                 offset = get_lock_offset( data, i, large_file_format, &err);
7102
7103                 /*
7104                  * There is no error code marked "stupid client bug".... :-).
7105                  */
7106                 if(err) {
7107                         END_PROFILE(SMBlockingX);
7108                         reply_doserror(req, ERRDOS, ERRnoaccess);
7109                         return;
7110                 }
7111
7112                 DEBUG(10,("reply_lockingX: unlock start=%.0f, len=%.0f for "
7113                           "pid %u, file %s\n", (double)offset, (double)count,
7114                           (unsigned int)lock_pid, fsp->fsp_name ));
7115
7116                 status = do_unlock(smbd_messaging_context(),
7117                                 fsp,
7118                                 lock_pid,
7119                                 count,
7120                                 offset,
7121                                 WINDOWS_LOCK);
7122
7123                 DEBUG(10, ("reply_lockingX: unlock returned %s\n",
7124                     nt_errstr(status)));
7125
7126                 if (NT_STATUS_V(status)) {
7127                         END_PROFILE(SMBlockingX);
7128                         reply_nterror(req, status);
7129                         return;
7130                 }
7131         }
7132
7133         /* Setup the timeout in seconds. */
7134
7135         if (!lp_blocking_locks(SNUM(conn))) {
7136                 lock_timeout = 0;
7137         }
7138
7139         /* Now do any requested locks */
7140         data += ((large_file_format ? 20 : 10)*num_ulocks);
7141
7142         /* Data now points at the beginning of the list
7143            of smb_lkrng structs */
7144
7145         for(i = 0; i < (int)num_locks; i++) {
7146                 enum brl_type lock_type = ((locktype & LOCKING_ANDX_SHARED_LOCK) ?
7147                                 READ_LOCK:WRITE_LOCK);
7148                 lock_pid = get_lock_pid( data, i, large_file_format);
7149                 count = get_lock_count( data, i, large_file_format);
7150                 offset = get_lock_offset( data, i, large_file_format, &err);
7151
7152                 /*
7153                  * There is no error code marked "stupid client bug".... :-).
7154                  */
7155                 if(err) {
7156                         END_PROFILE(SMBlockingX);
7157                         reply_doserror(req, ERRDOS, ERRnoaccess);
7158                         return;
7159                 }
7160
7161                 DEBUG(10,("reply_lockingX: lock start=%.0f, len=%.0f for pid "
7162                           "%u, file %s timeout = %d\n", (double)offset,
7163                           (double)count, (unsigned int)lock_pid,
7164                           fsp->fsp_name, (int)lock_timeout ));
7165
7166                 if (locktype & LOCKING_ANDX_CANCEL_LOCK) {
7167                         struct blocking_lock_record *blr = NULL;
7168
7169                         if (lp_blocking_locks(SNUM(conn))) {
7170
7171                                 /* Schedule a message to ourselves to
7172                                    remove the blocking lock record and
7173                                    return the right error. */
7174
7175                                 blr = blocking_lock_cancel(fsp,
7176                                                 lock_pid,
7177                                                 offset,
7178                                                 count,
7179                                                 WINDOWS_LOCK,
7180                                                 locktype,
7181                                                 NT_STATUS_FILE_LOCK_CONFLICT);
7182                                 if (blr == NULL) {
7183                                         END_PROFILE(SMBlockingX);
7184                                         reply_nterror(
7185                                                 req,
7186                                                 NT_STATUS_DOS(
7187                                                         ERRDOS,
7188                                                         ERRcancelviolation));
7189                                         return;
7190                                 }
7191                         }
7192                         /* Remove a matching pending lock. */
7193                         status = do_lock_cancel(fsp,
7194                                                 lock_pid,
7195                                                 count,
7196                                                 offset,
7197                                                 WINDOWS_LOCK,
7198                                                 blr);
7199                 } else {
7200                         bool blocking_lock = lock_timeout ? True : False;
7201                         bool defer_lock = False;
7202                         struct byte_range_lock *br_lck;
7203                         uint32 block_smbpid;
7204
7205                         br_lck = do_lock(smbd_messaging_context(),
7206                                         fsp,
7207                                         lock_pid,
7208                                         count,
7209                                         offset,
7210                                         lock_type,
7211                                         WINDOWS_LOCK,
7212                                         blocking_lock,
7213                                         &status,
7214                                         &block_smbpid,
7215                                         NULL);
7216
7217                         if (br_lck && blocking_lock && ERROR_WAS_LOCK_DENIED(status)) {
7218                                 /* Windows internal resolution for blocking locks seems
7219                                    to be about 200ms... Don't wait for less than that. JRA. */
7220                                 if (lock_timeout != -1 && lock_timeout < lp_lock_spin_time()) {
7221                                         lock_timeout = lp_lock_spin_time();
7222                                 }
7223                                 defer_lock = True;
7224                         }
7225
7226                         /* This heuristic seems to match W2K3 very well. If a
7227                            lock sent with timeout of zero would fail with NT_STATUS_FILE_LOCK_CONFLICT
7228                            it pretends we asked for a timeout of between 150 - 300 milliseconds as
7229                            far as I can tell. Replacement for do_lock_spin(). JRA. */
7230
7231                         if (br_lck && lp_blocking_locks(SNUM(conn)) && !blocking_lock &&
7232                                         NT_STATUS_EQUAL((status), NT_STATUS_FILE_LOCK_CONFLICT)) {
7233                                 defer_lock = True;
7234                                 lock_timeout = lp_lock_spin_time();
7235                         }
7236
7237                         if (br_lck && defer_lock) {
7238                                 /*
7239                                  * A blocking lock was requested. Package up
7240                                  * this smb into a queued request and push it
7241                                  * onto the blocking lock queue.
7242                                  */
7243                                 if(push_blocking_lock_request(br_lck,
7244                                                         req,
7245                                                         fsp,
7246                                                         lock_timeout,
7247                                                         i,
7248                                                         lock_pid,
7249                                                         lock_type,
7250                                                         WINDOWS_LOCK,
7251                                                         offset,
7252                                                         count,
7253                                                         block_smbpid)) {
7254                                         TALLOC_FREE(br_lck);
7255                                         END_PROFILE(SMBlockingX);
7256                                         return;
7257                                 }
7258                         }
7259
7260                         TALLOC_FREE(br_lck);
7261                 }
7262
7263                 if (NT_STATUS_V(status)) {
7264                         END_PROFILE(SMBlockingX);
7265                         reply_nterror(req, status);
7266                         return;
7267                 }
7268         }
7269
7270         /* If any of the above locks failed, then we must unlock
7271            all of the previous locks (X/Open spec). */
7272
7273         if (!(locktype & LOCKING_ANDX_CANCEL_LOCK) &&
7274                         (i != num_locks) &&
7275                         (num_locks != 0)) {
7276                 /*
7277                  * Ensure we don't do a remove on the lock that just failed,
7278                  * as under POSIX rules, if we have a lock already there, we
7279                  * will delete it (and we shouldn't) .....
7280                  */
7281                 for(i--; i >= 0; i--) {
7282                         lock_pid = get_lock_pid( data, i, large_file_format);
7283                         count = get_lock_count( data, i, large_file_format);
7284                         offset = get_lock_offset( data, i, large_file_format,
7285                                                   &err);
7286
7287                         /*
7288                          * There is no error code marked "stupid client
7289                          * bug".... :-).
7290                          */
7291                         if(err) {
7292                                 END_PROFILE(SMBlockingX);
7293                                 reply_doserror(req, ERRDOS, ERRnoaccess);
7294                                 return;
7295                         }
7296
7297                         do_unlock(smbd_messaging_context(),
7298                                 fsp,
7299                                 lock_pid,
7300                                 count,
7301                                 offset,
7302                                 WINDOWS_LOCK);
7303                 }
7304                 END_PROFILE(SMBlockingX);
7305                 reply_nterror(req, status);
7306                 return;
7307         }
7308
7309         reply_outbuf(req, 2, 0);
7310
7311         DEBUG(3, ("lockingX fnum=%d type=%d num_locks=%d num_ulocks=%d\n",
7312                   fsp->fnum, (unsigned int)locktype, num_locks, num_ulocks));
7313
7314         END_PROFILE(SMBlockingX);
7315         chain_reply(req);
7316 }
7317
7318 #undef DBGC_CLASS
7319 #define DBGC_CLASS DBGC_ALL
7320
7321 /****************************************************************************
7322  Reply to a SMBreadbmpx (read block multiplex) request.
7323  Always reply with an error, if someone has a platform really needs this,
7324  please contact vl@samba.org
7325 ****************************************************************************/
7326
7327 void reply_readbmpx(struct smb_request *req)
7328 {
7329         START_PROFILE(SMBreadBmpx);
7330         reply_doserror(req, ERRSRV, ERRuseSTD);
7331         END_PROFILE(SMBreadBmpx);
7332         return;
7333 }
7334
7335 /****************************************************************************
7336  Reply to a SMBreadbs (read block multiplex secondary) request.
7337  Always reply with an error, if someone has a platform really needs this,
7338  please contact vl@samba.org
7339 ****************************************************************************/
7340
7341 void reply_readbs(struct smb_request *req)
7342 {
7343         START_PROFILE(SMBreadBs);
7344         reply_doserror(req, ERRSRV, ERRuseSTD);
7345         END_PROFILE(SMBreadBs);
7346         return;
7347 }
7348
7349 /****************************************************************************
7350  Reply to a SMBsetattrE.
7351 ****************************************************************************/
7352
7353 void reply_setattrE(struct smb_request *req)
7354 {
7355         connection_struct *conn = req->conn;
7356         struct smb_file_time ft;
7357         files_struct *fsp;
7358         SMB_STRUCT_STAT sbuf;
7359         NTSTATUS status;
7360
7361         START_PROFILE(SMBsetattrE);
7362         ZERO_STRUCT(ft);
7363
7364         if (req->wct < 7) {
7365                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
7366                 END_PROFILE(SMBsetattrE);
7367                 return;
7368         }
7369
7370         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
7371
7372         if(!fsp || (fsp->conn != conn)) {
7373                 reply_doserror(req, ERRDOS, ERRbadfid);
7374                 END_PROFILE(SMBsetattrE);
7375                 return;
7376         }
7377
7378
7379         /*
7380          * Convert the DOS times into unix times.
7381          */
7382
7383         ft.atime = convert_time_t_to_timespec(
7384             srv_make_unix_date2(req->vwv+3));
7385         ft.mtime = convert_time_t_to_timespec(
7386             srv_make_unix_date2(req->vwv+5));
7387         ft.create_time = convert_time_t_to_timespec(
7388             srv_make_unix_date2(req->vwv+1));
7389
7390         reply_outbuf(req, 0, 0);
7391
7392         /*
7393          * Patch from Ray Frush <frush@engr.colostate.edu>
7394          * Sometimes times are sent as zero - ignore them.
7395          */
7396
7397         /* Ensure we have a valid stat struct for the source. */
7398         if (fsp->fh->fd != -1) {
7399                 if (SMB_VFS_FSTAT(fsp, &sbuf) == -1) {
7400                         status = map_nt_error_from_unix(errno);
7401                         reply_nterror(req, status);
7402                         END_PROFILE(SMBsetattrE);
7403                         return;
7404                 }
7405         } else {
7406                 int ret = -1;
7407
7408                 if (fsp->posix_open) {
7409                         ret = SMB_VFS_LSTAT(conn, fsp->fsp_name, &sbuf);
7410                 } else {
7411                         ret = SMB_VFS_STAT(conn, fsp->fsp_name, &sbuf);
7412                 }
7413                 if (ret == -1) {
7414                         status = map_nt_error_from_unix(errno);
7415                         reply_nterror(req, status);
7416                         END_PROFILE(SMBsetattrE);
7417                         return;
7418                 }
7419         }
7420
7421         status = smb_set_file_time(conn, fsp, fsp->fsp_name,
7422                                    &sbuf, &ft, true);
7423         if (!NT_STATUS_IS_OK(status)) {
7424                 reply_doserror(req, ERRDOS, ERRnoaccess);
7425                 END_PROFILE(SMBsetattrE);
7426                 return;
7427         }
7428
7429         DEBUG( 3, ( "reply_setattrE fnum=%d actime=%u modtime=%u "
7430                " createtime=%u\n",
7431                 fsp->fnum,
7432                 (unsigned int)ft.atime.tv_sec,
7433                 (unsigned int)ft.mtime.tv_sec,
7434                 (unsigned int)ft.create_time.tv_sec
7435                 ));
7436
7437         END_PROFILE(SMBsetattrE);
7438         return;
7439 }
7440
7441
7442 /* Back from the dead for OS/2..... JRA. */
7443
7444 /****************************************************************************
7445  Reply to a SMBwritebmpx (write block multiplex primary) request.
7446  Always reply with an error, if someone has a platform really needs this,
7447  please contact vl@samba.org
7448 ****************************************************************************/
7449
7450 void reply_writebmpx(struct smb_request *req)
7451 {
7452         START_PROFILE(SMBwriteBmpx);
7453         reply_doserror(req, ERRSRV, ERRuseSTD);
7454         END_PROFILE(SMBwriteBmpx);
7455         return;
7456 }
7457
7458 /****************************************************************************
7459  Reply to a SMBwritebs (write block multiplex secondary) request.
7460  Always reply with an error, if someone has a platform really needs this,
7461  please contact vl@samba.org
7462 ****************************************************************************/
7463
7464 void reply_writebs(struct smb_request *req)
7465 {
7466         START_PROFILE(SMBwriteBs);
7467         reply_doserror(req, ERRSRV, ERRuseSTD);
7468         END_PROFILE(SMBwriteBs);
7469         return;
7470 }
7471
7472 /****************************************************************************
7473  Reply to a SMBgetattrE.
7474 ****************************************************************************/
7475
7476 void reply_getattrE(struct smb_request *req)
7477 {
7478         connection_struct *conn = req->conn;
7479         SMB_STRUCT_STAT sbuf;
7480         int mode;
7481         files_struct *fsp;
7482         struct timespec create_ts;
7483
7484         START_PROFILE(SMBgetattrE);
7485
7486         if (req->wct < 1) {
7487                 reply_nterror(req, NT_STATUS_INVALID_PARAMETER);
7488                 END_PROFILE(SMBgetattrE);
7489                 return;
7490         }
7491
7492         fsp = file_fsp(req, SVAL(req->vwv+0, 0));
7493
7494         if(!fsp || (fsp->conn != conn)) {
7495                 reply_doserror(req, ERRDOS, ERRbadfid);
7496                 END_PROFILE(SMBgetattrE);
7497                 return;
7498         }
7499
7500         /* Do an fstat on this file */
7501         if(fsp_stat(fsp, &sbuf)) {
7502                 reply_unixerror(req, ERRDOS, ERRnoaccess);
7503                 END_PROFILE(SMBgetattrE);
7504                 return;
7505         }
7506
7507         mode = dos_mode(conn,fsp->fsp_name,&sbuf);
7508
7509         /*
7510          * Convert the times into dos times. Set create
7511          * date to be last modify date as UNIX doesn't save
7512          * this.
7513          */
7514
7515         reply_outbuf(req, 11, 0);
7516
7517         create_ts = get_create_timespec(&sbuf,
7518                                   lp_fake_dir_create_times(SNUM(conn)));
7519         srv_put_dos_date2((char *)req->outbuf, smb_vwv0, create_ts.tv_sec);
7520         srv_put_dos_date2((char *)req->outbuf, smb_vwv2, sbuf.st_atime);
7521         /* Should we check pending modtime here ? JRA */
7522         srv_put_dos_date2((char *)req->outbuf, smb_vwv4, sbuf.st_mtime);
7523
7524         if (mode & aDIR) {
7525                 SIVAL(req->outbuf, smb_vwv6, 0);
7526                 SIVAL(req->outbuf, smb_vwv8, 0);
7527         } else {
7528                 uint32 allocation_size = SMB_VFS_GET_ALLOC_SIZE(conn,fsp, &sbuf);
7529                 SIVAL(req->outbuf, smb_vwv6, (uint32)sbuf.st_size);
7530                 SIVAL(req->outbuf, smb_vwv8, allocation_size);
7531         }
7532         SSVAL(req->outbuf,smb_vwv10, mode);
7533
7534         DEBUG( 3, ( "reply_getattrE fnum=%d\n", fsp->fnum));
7535
7536         END_PROFILE(SMBgetattrE);
7537         return;
7538 }