source3/smbd/open.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    file opening and share modes
   4    Copyright (C) Andrew Tridgell 1992-1998
   5    Copyright (C) Jeremy Allison 2001-2004
   6    Copyright (C) Volker Lendecke 2005
   7
   8    This program is free software; you can redistribute it and/or modify
   9    it under the terms of the GNU General Public License as published by
  10    the Free Software Foundation; either version 3 of the License, or
  11    (at your option) any later version.
  12
  13    This program is distributed in the hope that it will be useful,
  14    but WITHOUT ANY WARRANTY; without even the implied warranty of
  15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16    GNU General Public License for more details.
  17
  18    You should have received a copy of the GNU General Public License
  19    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  20 */
  21
  22 #include "includes.h"
  23
  24 extern const struct generic_mapping file_generic_mapping;
  25 extern bool global_client_failed_oplock_break;
  26
  27 struct deferred_open_record {
  28         bool delayed_for_oplocks;
  29         struct file_id id;
  30 };
  31
  32 static NTSTATUS create_file_unixpath(connection_struct *conn,
  33                                      struct smb_request *req,
  34                                      const char *fname,
  35                                      uint32_t access_mask,
  36                                      uint32_t share_access,
  37                                      uint32_t create_disposition,
  38                                      uint32_t create_options,
  39                                      uint32_t file_attributes,
  40                                      uint32_t oplock_request,
  41                                      uint64_t allocation_size,
  42                                      struct security_descriptor *sd,
  43                                      struct ea_list *ea_list,
  44
  45                                      files_struct **result,
  46                                      int *pinfo,
  47                                      SMB_STRUCT_STAT *psbuf);
  48
  49 /****************************************************************************
  50  SMB1 file varient of se_access_check. Never test FILE_READ_ATTRIBUTES.
  51 ****************************************************************************/
  52
  53 NTSTATUS smb1_file_se_access_check(const struct security_descriptor *sd,
  54                           const NT_USER_TOKEN *token,
  55                           uint32_t access_desired,
  56                           uint32_t *access_granted)
  57 {
  58         return se_access_check(sd,
  59                                 token,
  60                                 (access_desired & ~FILE_READ_ATTRIBUTES),
  61                                 access_granted);
  62 }
  63
  64 /****************************************************************************
  65  Check if we have open rights.
  66 ****************************************************************************/
  67
  68 static NTSTATUS check_open_rights(struct connection_struct *conn,
  69                                 const char *fname,
  70                                 uint32_t access_mask)
  71 {
  72         /* Check if we have rights to open. */
  73         NTSTATUS status;
  74         uint32_t access_granted = 0;
  75         struct security_descriptor *sd;
  76
  77         status = SMB_VFS_GET_NT_ACL(conn, fname,
  78                         (OWNER_SECURITY_INFORMATION |
  79                         GROUP_SECURITY_INFORMATION |
  80                         DACL_SECURITY_INFORMATION),&sd);
  81
  82         if (!NT_STATUS_IS_OK(status)) {
  83                 DEBUG(10, ("check_open_rights: Could not get acl "
  84                         "on %s: %s\n",
  85                         fname,
  86                         nt_errstr(status)));
  87                 return status;
  88         }
  89
  90         status = smb1_file_se_access_check(sd,
  91                                 conn->server_info->ptok,
  92                                 access_mask,
  93                                 &access_granted);
  94
  95         TALLOC_FREE(sd);
  96         return status;
  97 }
  98
  99 /****************************************************************************
 100  fd support routines - attempt to do a dos_open.
 101 ****************************************************************************/
 102
 103 static NTSTATUS fd_open(struct connection_struct *conn,
 104                     const char *fname,
 105                     files_struct *fsp,
 106                     int flags,
 107                     mode_t mode)
 108 {
 109         NTSTATUS status = NT_STATUS_OK;
 110
 111 #ifdef O_NOFOLLOW
 112         /*
 113          * Never follow symlinks on a POSIX client. The
 114          * client should be doing this.
 115          */
 116
 117         if (fsp->posix_open || !lp_symlinks(SNUM(conn))) {
 118                 flags |= O_NOFOLLOW;
 119         }
 120 #endif
 121
 122         fsp->fh->fd = SMB_VFS_OPEN(conn,fname,fsp,flags,mode);
 123         if (fsp->fh->fd == -1) {
 124                 status = map_nt_error_from_unix(errno);
 125         }
 126
 127         DEBUG(10,("fd_open: name %s, flags = 0%o mode = 0%o, fd = %d. %s\n",
 128                     fname, flags, (int)mode, fsp->fh->fd,
 129                 (fsp->fh->fd == -1) ? strerror(errno) : "" ));
 130
 131         return status;
 132 }
 133
 134 /****************************************************************************
 135  Close the file associated with a fsp.
 136 ****************************************************************************/
 137
 138 NTSTATUS fd_close(files_struct *fsp)
 139 {
 140         int ret;
 141
 142         if (fsp->fh->fd == -1) {
 143                 return NT_STATUS_OK; /* What we used to call a stat open. */
 144         }
 145         if (fsp->fh->ref_count > 1) {
 146                 return NT_STATUS_OK; /* Shared handle. Only close last reference. */
 147         }
 148
 149         ret = SMB_VFS_CLOSE(fsp);
 150         fsp->fh->fd = -1;
 151         if (ret == -1) {
 152                 return map_nt_error_from_unix(errno);
 153         }
 154         return NT_STATUS_OK;
 155 }
 156
 157 /****************************************************************************
 158  Change the ownership of a file to that of the parent directory.
 159  Do this by fd if possible.
 160 ****************************************************************************/
 161
 162 static void change_file_owner_to_parent(connection_struct *conn,
 163                                         const char *inherit_from_dir,
 164                                         files_struct *fsp)
 165 {
 166         SMB_STRUCT_STAT parent_st;
 167         int ret;
 168
 169         ret = SMB_VFS_STAT(conn, inherit_from_dir, &parent_st);
 170         if (ret == -1) {
 171                 DEBUG(0,("change_file_owner_to_parent: failed to stat parent "
 172                          "directory %s. Error was %s\n",
 173                          inherit_from_dir, strerror(errno) ));
 174                 return;
 175         }
 176
 177         become_root();
 178         ret = SMB_VFS_FCHOWN(fsp, parent_st.st_uid, (gid_t)-1);
 179         unbecome_root();
 180         if (ret == -1) {
 181                 DEBUG(0,("change_file_owner_to_parent: failed to fchown "
 182                          "file %s to parent directory uid %u. Error "
 183                          "was %s\n", fsp->fsp_name,
 184                          (unsigned int)parent_st.st_uid,
 185                          strerror(errno) ));
 186         }
 187
 188         DEBUG(10,("change_file_owner_to_parent: changed new file %s to "
 189                   "parent directory uid %u.\n", fsp->fsp_name,
 190                   (unsigned int)parent_st.st_uid ));
 191 }
 192
 193 static NTSTATUS change_dir_owner_to_parent(connection_struct *conn,
 194                                        const char *inherit_from_dir,
 195                                        const char *fname,
 196                                        SMB_STRUCT_STAT *psbuf)
 197 {
 198         char *saved_dir = NULL;
 199         SMB_STRUCT_STAT sbuf;
 200         SMB_STRUCT_STAT parent_st;
 201         TALLOC_CTX *ctx = talloc_tos();
 202         NTSTATUS status = NT_STATUS_OK;
 203         int ret;
 204
 205         ret = SMB_VFS_STAT(conn, inherit_from_dir, &parent_st);
 206         if (ret == -1) {
 207                 status = map_nt_error_from_unix(errno);
 208                 DEBUG(0,("change_dir_owner_to_parent: failed to stat parent "
 209                          "directory %s. Error was %s\n",
 210                          inherit_from_dir, strerror(errno) ));
 211                 return status;
 212         }
 213
 214         /* We've already done an lstat into psbuf, and we know it's a
 215            directory. If we can cd into the directory and the dev/ino
 216            are the same then we can safely chown without races as
 217            we're locking the directory in place by being in it.  This
 218            should work on any UNIX (thanks tridge :-). JRA.
 219         */
 220
 221         saved_dir = vfs_GetWd(ctx,conn);
 222         if (!saved_dir) {
 223                 status = map_nt_error_from_unix(errno);
 224                 DEBUG(0,("change_dir_owner_to_parent: failed to get "
 225                          "current working directory. Error was %s\n",
 226                          strerror(errno)));
 227                 return status;
 228         }
 229
 230         /* Chdir into the new path. */
 231         if (vfs_ChDir(conn, fname) == -1) {
 232                 status = map_nt_error_from_unix(errno);
 233                 DEBUG(0,("change_dir_owner_to_parent: failed to change "
 234                          "current working directory to %s. Error "
 235                          "was %s\n", fname, strerror(errno) ));
 236                 goto out;
 237         }
 238
 239         if (SMB_VFS_STAT(conn,".",&sbuf) == -1) {
 240                 status = map_nt_error_from_unix(errno);
 241                 DEBUG(0,("change_dir_owner_to_parent: failed to stat "
 242                          "directory '.' (%s) Error was %s\n",
 243                          fname, strerror(errno)));
 244                 goto out;
 245         }
 246
 247         /* Ensure we're pointing at the same place. */
 248         if (sbuf.st_dev != psbuf->st_dev ||
 249             sbuf.st_ino != psbuf->st_ino ||
 250             sbuf.st_mode != psbuf->st_mode ) {
 251                 DEBUG(0,("change_dir_owner_to_parent: "
 252                          "device/inode/mode on directory %s changed. "
 253                          "Refusing to chown !\n", fname ));
 254                 status = NT_STATUS_ACCESS_DENIED;
 255                 goto out;
 256         }
 257
 258         become_root();
 259         ret = SMB_VFS_CHOWN(conn, ".", parent_st.st_uid, (gid_t)-1);
 260         unbecome_root();
 261         if (ret == -1) {
 262                 status = map_nt_error_from_unix(errno);
 263                 DEBUG(10,("change_dir_owner_to_parent: failed to chown "
 264                           "directory %s to parent directory uid %u. "
 265                           "Error was %s\n", fname,
 266                           (unsigned int)parent_st.st_uid, strerror(errno) ));
 267                 goto out;
 268         }
 269
 270         DEBUG(10,("change_dir_owner_to_parent: changed ownership of new "
 271                   "directory %s to parent directory uid %u.\n",
 272                   fname, (unsigned int)parent_st.st_uid ));
 273
 274  out:
 275
 276         vfs_ChDir(conn,saved_dir);
 277         return status;
 278 }
 279
 280 /****************************************************************************
 281  Open a file.
 282 ****************************************************************************/
 283
 284 static NTSTATUS open_file(files_struct *fsp,
 285                           connection_struct *conn,
 286                           struct smb_request *req,
 287                           const char *parent_dir,
 288                           const char *name,
 289                           const char *path,
 290                           SMB_STRUCT_STAT *psbuf,
 291                           int flags,
 292                           mode_t unx_mode,
 293                           uint32 access_mask, /* client requested access mask. */
 294                           uint32 open_access_mask) /* what we're actually using in the open. */
 295 {
 296         NTSTATUS status = NT_STATUS_OK;
 297         int accmode = (flags & O_ACCMODE);
 298         int local_flags = flags;
 299         bool file_existed = VALID_STAT(*psbuf);
 300
 301         fsp->fh->fd = -1;
 302         errno = EPERM;
 303
 304         /* Check permissions */
 305
 306         /*
 307          * This code was changed after seeing a client open request
 308          * containing the open mode of (DENY_WRITE/read-only) with
 309          * the 'create if not exist' bit set. The previous code
 310          * would fail to open the file read only on a read-only share
 311          * as it was checking the flags parameter  directly against O_RDONLY,
 312          * this was failing as the flags parameter was set to O_RDONLY|O_CREAT.
 313          * JRA.
 314          */
 315
 316         if (!CAN_WRITE(conn)) {
 317                 /* It's a read-only share - fail if we wanted to write. */
 318                 if(accmode != O_RDONLY) {
 319                         DEBUG(3,("Permission denied opening %s\n", path));
 320                         return NT_STATUS_ACCESS_DENIED;
 321                 } else if(flags & O_CREAT) {
 322                         /* We don't want to write - but we must make sure that
 323                            O_CREAT doesn't create the file if we have write
 324                            access into the directory.
 325                         */
 326                         flags &= ~O_CREAT;
 327                         local_flags &= ~O_CREAT;
 328                 }
 329         }
 330
 331         /*
 332          * This little piece of insanity is inspired by the
 333          * fact that an NT client can open a file for O_RDONLY,
 334          * but set the create disposition to FILE_EXISTS_TRUNCATE.
 335          * If the client *can* write to the file, then it expects to
 336          * truncate the file, even though it is opening for readonly.
 337          * Quicken uses this stupid trick in backup file creation...
 338          * Thanks *greatly* to "David W. Chapman Jr." <dwcjr@inethouston.net>
 339          * for helping track this one down. It didn't bite us in 2.0.x
 340          * as we always opened files read-write in that release. JRA.
 341          */
 342
 343         if ((accmode == O_RDONLY) && ((flags & O_TRUNC) == O_TRUNC)) {
 344                 DEBUG(10,("open_file: truncate requested on read-only open "
 345                           "for file %s\n", path));
 346                 local_flags = (flags & ~O_ACCMODE)|O_RDWR;
 347         }
 348
 349         if ((open_access_mask & (FILE_READ_DATA|FILE_WRITE_DATA|FILE_APPEND_DATA|FILE_EXECUTE)) ||
 350             (!file_existed && (local_flags & O_CREAT)) ||
 351             ((local_flags & O_TRUNC) == O_TRUNC) ) {
 352                 const char *wild;
 353
 354                 /*
 355                  * We can't actually truncate here as the file may be locked.
 356                  * open_file_ntcreate will take care of the truncate later. JRA.
 357                  */
 358
 359                 local_flags &= ~O_TRUNC;
 360
 361 #if defined(O_NONBLOCK) && defined(S_ISFIFO)
 362                 /*
 363                  * We would block on opening a FIFO with no one else on the
 364                  * other end. Do what we used to do and add O_NONBLOCK to the
 365                  * open flags. JRA.
 366                  */
 367
 368                 if (file_existed && S_ISFIFO(psbuf->st_mode)) {
 369                         local_flags |= O_NONBLOCK;
 370                 }
 371 #endif
 372
 373                 /* Don't create files with Microsoft wildcard characters. */
 374                 if (fsp->base_fsp) {
 375                         /*
 376                          * wildcard characters are allowed in stream names
 377                          * only test the basefilename
 378                          */
 379                         wild = fsp->base_fsp->fsp_name;
 380                 } else {
 381                         wild = path;
 382                 }
 383                 if ((local_flags & O_CREAT) && !file_existed &&
 384                     ms_has_wild(wild))  {
 385                         return NT_STATUS_OBJECT_NAME_INVALID;
 386                 }
 387
 388                 /* Actually do the open */
 389                 status = fd_open(conn, path, fsp, local_flags, unx_mode);
 390                 if (!NT_STATUS_IS_OK(status)) {
 391                         DEBUG(3,("Error opening file %s (%s) (local_flags=%d) "
 392                                  "(flags=%d)\n",
 393                                  path,nt_errstr(status),local_flags,flags));
 394                         return status;
 395                 }
 396
 397                 if ((local_flags & O_CREAT) && !file_existed) {
 398
 399                         /* Inherit the ACL if required */
 400                         if (lp_inherit_perms(SNUM(conn))) {
 401                                 inherit_access_posix_acl(conn, parent_dir, path,
 402                                                    unx_mode);
 403                         }
 404
 405                         /* Change the owner if required. */
 406                         if (lp_inherit_owner(SNUM(conn))) {
 407                                 change_file_owner_to_parent(conn, parent_dir,
 408                                                             fsp);
 409                         }
 410
 411                         notify_fname(conn, NOTIFY_ACTION_ADDED,
 412                                      FILE_NOTIFY_CHANGE_FILE_NAME, path);
 413                 }
 414
 415         } else {
 416                 fsp->fh->fd = -1; /* What we used to call a stat open. */
 417                 if (file_existed) {
 418                         status = check_open_rights(conn,
 419                                         path,
 420                                         access_mask);
 421                         if (!NT_STATUS_IS_OK(status)) {
 422                                 DEBUG(10, ("open_file: Access denied on "
 423                                         "file %s\n",
 424                                         path));
 425                                 return status;
 426                         }
 427                 }
 428         }
 429
 430         if (!file_existed) {
 431                 int ret;
 432
 433                 if (fsp->fh->fd == -1) {
 434                         ret = SMB_VFS_STAT(conn, path, psbuf);
 435                 } else {
 436                         ret = SMB_VFS_FSTAT(fsp, psbuf);
 437                         /* If we have an fd, this stat should succeed. */
 438                         if (ret == -1) {
 439                                 DEBUG(0,("Error doing fstat on open file %s "
 440                                          "(%s)\n", path,strerror(errno) ));
 441                         }
 442                 }
 443
 444                 /* For a non-io open, this stat failing means file not found. JRA */
 445                 if (ret == -1) {
 446                         status = map_nt_error_from_unix(errno);
 447                         fd_close(fsp);
 448                         return status;
 449                 }
 450         }
 451
 452         /*
 453          * POSIX allows read-only opens of directories. We don't
 454          * want to do this (we use a different code path for this)
 455          * so catch a directory open and return an EISDIR. JRA.
 456          */
 457
 458         if(S_ISDIR(psbuf->st_mode)) {
 459                 fd_close(fsp);
 460                 errno = EISDIR;
 461                 return NT_STATUS_FILE_IS_A_DIRECTORY;
 462         }
 463
 464         fsp->mode = psbuf->st_mode;
 465         fsp->file_id = vfs_file_id_from_sbuf(conn, psbuf);
 466         fsp->vuid = req ? req->vuid : UID_FIELD_INVALID;
 467         fsp->file_pid = req ? req->smbpid : 0;
 468         fsp->can_lock = True;
 469         fsp->can_read = (access_mask & (FILE_READ_DATA)) ? True : False;
 470         if (!CAN_WRITE(conn)) {
 471                 fsp->can_write = False;
 472         } else {
 473                 fsp->can_write = (access_mask & (FILE_WRITE_DATA | FILE_APPEND_DATA)) ?
 474                         True : False;
 475         }
 476         fsp->print_file = False;
 477         fsp->modified = False;
 478         fsp->sent_oplock_break = NO_BREAK_SENT;
 479         fsp->is_directory = False;
 480         if (conn->aio_write_behind_list &&
 481             is_in_path(path, conn->aio_write_behind_list, conn->case_sensitive)) {
 482                 fsp->aio_write_behind = True;
 483         }
 484
 485         string_set(&fsp->fsp_name, path);
 486         fsp->wcp = NULL; /* Write cache pointer. */
 487
 488         DEBUG(2,("%s opened file %s read=%s write=%s (numopen=%d)\n",
 489                  conn->server_info->unix_name,
 490                  fsp->fsp_name,
 491                  BOOLSTR(fsp->can_read), BOOLSTR(fsp->can_write),
 492                  conn->num_files_open));
 493
 494         errno = 0;
 495         return NT_STATUS_OK;
 496 }
 497
 498 /*******************************************************************
 499  Return True if the filename is one of the special executable types.
 500 ********************************************************************/
 501
 502 static bool is_executable(const char *fname)
 503 {
 504         if ((fname = strrchr_m(fname,'.'))) {
 505                 if (strequal(fname,".com") ||
 506                     strequal(fname,".dll") ||
 507                     strequal(fname,".exe") ||
 508                     strequal(fname,".sym")) {
 509                         return True;
 510                 }
 511         }
 512         return False;
 513 }
 514
 515 /****************************************************************************
 516  Check if we can open a file with a share mode.
 517  Returns True if conflict, False if not.
 518 ****************************************************************************/
 519
 520 static bool share_conflict(struct share_mode_entry *entry,
 521                            uint32 access_mask,
 522                            uint32 share_access)
 523 {
 524         DEBUG(10,("share_conflict: entry->access_mask = 0x%x, "
 525                   "entry->share_access = 0x%x, "
 526                   "entry->private_options = 0x%x\n",
 527                   (unsigned int)entry->access_mask,
 528                   (unsigned int)entry->share_access,
 529                   (unsigned int)entry->private_options));
 530
 531         DEBUG(10,("share_conflict: access_mask = 0x%x, share_access = 0x%x\n",
 532                   (unsigned int)access_mask, (unsigned int)share_access));
 533
 534         if ((entry->access_mask & (FILE_WRITE_DATA|
 535                                    FILE_APPEND_DATA|
 536                                    FILE_READ_DATA|
 537                                    FILE_EXECUTE|
 538                                    DELETE_ACCESS)) == 0) {
 539                 DEBUG(10,("share_conflict: No conflict due to "
 540                           "entry->access_mask = 0x%x\n",
 541                           (unsigned int)entry->access_mask ));
 542                 return False;
 543         }
 544
 545         if ((access_mask & (FILE_WRITE_DATA|
 546                             FILE_APPEND_DATA|
 547                             FILE_READ_DATA|
 548                             FILE_EXECUTE|
 549                             DELETE_ACCESS)) == 0) {
 550                 DEBUG(10,("share_conflict: No conflict due to "
 551                           "access_mask = 0x%x\n",
 552                           (unsigned int)access_mask ));
 553                 return False;
 554         }
 555
 556 #if 1 /* JRA TEST - Superdebug. */
 557 #define CHECK_MASK(num, am, right, sa, share) \
 558         DEBUG(10,("share_conflict: [%d] am (0x%x) & right (0x%x) = 0x%x\n", \
 559                 (unsigned int)(num), (unsigned int)(am), \
 560                 (unsigned int)(right), (unsigned int)(am)&(right) )); \
 561         DEBUG(10,("share_conflict: [%d] sa (0x%x) & share (0x%x) = 0x%x\n", \
 562                 (unsigned int)(num), (unsigned int)(sa), \
 563                 (unsigned int)(share), (unsigned int)(sa)&(share) )); \
 564         if (((am) & (right)) && !((sa) & (share))) { \
 565                 DEBUG(10,("share_conflict: check %d conflict am = 0x%x, right = 0x%x, \
 566 sa = 0x%x, share = 0x%x\n", (num), (unsigned int)(am), (unsigned int)(right), (unsigned int)(sa), \
 567                         (unsigned int)(share) )); \
 568                 return True; \
 569         }
 570 #else
 571 #define CHECK_MASK(num, am, right, sa, share) \
 572         if (((am) & (right)) && !((sa) & (share))) { \
 573                 DEBUG(10,("share_conflict: check %d conflict am = 0x%x, right = 0x%x, \
 574 sa = 0x%x, share = 0x%x\n", (num), (unsigned int)(am), (unsigned int)(right), (unsigned int)(sa), \
 575                         (unsigned int)(share) )); \
 576                 return True; \
 577         }
 578 #endif
 579
 580         CHECK_MASK(1, entry->access_mask, FILE_WRITE_DATA | FILE_APPEND_DATA,
 581                    share_access, FILE_SHARE_WRITE);
 582         CHECK_MASK(2, access_mask, FILE_WRITE_DATA | FILE_APPEND_DATA,
 583                    entry->share_access, FILE_SHARE_WRITE);
 584
 585         CHECK_MASK(3, entry->access_mask, FILE_READ_DATA | FILE_EXECUTE,
 586                    share_access, FILE_SHARE_READ);
 587         CHECK_MASK(4, access_mask, FILE_READ_DATA | FILE_EXECUTE,
 588                    entry->share_access, FILE_SHARE_READ);
 589
 590         CHECK_MASK(5, entry->access_mask, DELETE_ACCESS,
 591                    share_access, FILE_SHARE_DELETE);
 592         CHECK_MASK(6, access_mask, DELETE_ACCESS,
 593                    entry->share_access, FILE_SHARE_DELETE);
 594
 595         DEBUG(10,("share_conflict: No conflict.\n"));
 596         return False;
 597 }
 598
 599 #if defined(DEVELOPER)
 600 static void validate_my_share_entries(int num,
 601                                       struct share_mode_entry *share_entry)
 602 {
 603         files_struct *fsp;
 604
 605         if (!procid_is_me(&share_entry->pid)) {
 606                 return;
 607         }
 608
 609         if (is_deferred_open_entry(share_entry) &&
 610             !open_was_deferred(share_entry->op_mid)) {
 611                 char *str = talloc_asprintf(talloc_tos(),
 612                         "Got a deferred entry without a request: "
 613                         "PANIC: %s\n",
 614                         share_mode_str(talloc_tos(), num, share_entry));
 615                 smb_panic(str);
 616         }
 617
 618         if (!is_valid_share_mode_entry(share_entry)) {
 619                 return;
 620         }
 621
 622         fsp = file_find_dif(share_entry->id,
 623                             share_entry->share_file_id);
 624         if (!fsp) {
 625                 DEBUG(0,("validate_my_share_entries: PANIC : %s\n",
 626                          share_mode_str(talloc_tos(), num, share_entry) ));
 627                 smb_panic("validate_my_share_entries: Cannot match a "
 628                           "share entry with an open file\n");
 629         }
 630
 631         if (is_deferred_open_entry(share_entry) ||
 632             is_unused_share_mode_entry(share_entry)) {
 633                 goto panic;
 634         }
 635
 636         if ((share_entry->op_type == NO_OPLOCK) &&
 637             (fsp->oplock_type == FAKE_LEVEL_II_OPLOCK)) {
 638                 /* Someone has already written to it, but I haven't yet
 639                  * noticed */
 640                 return;
 641         }
 642
 643         if (((uint16)fsp->oplock_type) != share_entry->op_type) {
 644                 goto panic;
 645         }
 646
 647         return;
 648
 649  panic:
 650         {
 651                 char *str;
 652                 DEBUG(0,("validate_my_share_entries: PANIC : %s\n",
 653                          share_mode_str(talloc_tos(), num, share_entry) ));
 654                 str = talloc_asprintf(talloc_tos(),
 655                         "validate_my_share_entries: "
 656                         "file %s, oplock_type = 0x%x, op_type = 0x%x\n",
 657                          fsp->fsp_name, (unsigned int)fsp->oplock_type,
 658                          (unsigned int)share_entry->op_type );
 659                 smb_panic(str);
 660         }
 661 }
 662 #endif
 663
 664 static bool is_stat_open(uint32 access_mask)
 665 {
 666         return (access_mask &&
 667                 ((access_mask & ~(SYNCHRONIZE_ACCESS| FILE_READ_ATTRIBUTES|
 668                                   FILE_WRITE_ATTRIBUTES))==0) &&
 669                 ((access_mask & (SYNCHRONIZE_ACCESS|FILE_READ_ATTRIBUTES|
 670                                  FILE_WRITE_ATTRIBUTES)) != 0));
 671 }
 672
 673 /****************************************************************************
 674  Deal with share modes
 675  Invarient: Share mode must be locked on entry and exit.
 676  Returns -1 on error, or number of share modes on success (may be zero).
 677 ****************************************************************************/
 678
 679 static NTSTATUS open_mode_check(connection_struct *conn,
 680                                 const char *fname,
 681                                 struct share_mode_lock *lck,
 682                                 uint32 access_mask,
 683                                 uint32 share_access,
 684                                 uint32 create_options,
 685                                 bool *file_existed)
 686 {
 687         int i;
 688
 689         if(lck->num_share_modes == 0) {
 690                 return NT_STATUS_OK;
 691         }
 692
 693         *file_existed = True;
 694
 695         /* A delete on close prohibits everything */
 696
 697         if (lck->delete_on_close) {
 698                 return NT_STATUS_DELETE_PENDING;
 699         }
 700
 701         if (is_stat_open(access_mask)) {
 702                 /* Stat open that doesn't trigger oplock breaks or share mode
 703                  * checks... ! JRA. */
 704                 return NT_STATUS_OK;
 705         }
 706
 707         /*
 708          * Check if the share modes will give us access.
 709          */
 710
 711 #if defined(DEVELOPER)
 712         for(i = 0; i < lck->num_share_modes; i++) {
 713                 validate_my_share_entries(i, &lck->share_modes[i]);
 714         }
 715 #endif
 716
 717         if (!lp_share_modes(SNUM(conn))) {
 718                 return NT_STATUS_OK;
 719         }
 720
 721         /* Now we check the share modes, after any oplock breaks. */
 722         for(i = 0; i < lck->num_share_modes; i++) {
 723
 724                 if (!is_valid_share_mode_entry(&lck->share_modes[i])) {
 725                         continue;
 726                 }
 727
 728                 /* someone else has a share lock on it, check to see if we can
 729                  * too */
 730                 if (share_conflict(&lck->share_modes[i],
 731                                    access_mask, share_access)) {
 732                         return NT_STATUS_SHARING_VIOLATION;
 733                 }
 734         }
 735
 736         return NT_STATUS_OK;
 737 }
 738
 739 static bool is_delete_request(files_struct *fsp) {
 740         return ((fsp->access_mask == DELETE_ACCESS) &&
 741                 (fsp->oplock_type == NO_OPLOCK));
 742 }
 743
 744 /*
 745  * 1) No files open at all or internal open: Grant whatever the client wants.
 746  *
 747  * 2) Exclusive (or batch) oplock around: If the requested access is a delete
 748  *    request, break if the oplock around is a batch oplock. If it's another
 749  *    requested access type, break.
 750  *
 751  * 3) Only level2 around: Grant level2 and do nothing else.
 752  */
 753
 754 static bool delay_for_oplocks(struct share_mode_lock *lck,
 755                               files_struct *fsp,
 756                               uint16 mid,
 757                               int pass_number,
 758                               int oplock_request)
 759 {
 760         int i;
 761         struct share_mode_entry *exclusive = NULL;
 762         bool valid_entry = False;
 763         bool delay_it = False;
 764         bool have_level2 = False;
 765         NTSTATUS status;
 766         char msg[MSG_SMB_SHARE_MODE_ENTRY_SIZE];
 767
 768         if (oplock_request & INTERNAL_OPEN_ONLY) {
 769                 fsp->oplock_type = NO_OPLOCK;
 770         }
 771
 772         if ((oplock_request & INTERNAL_OPEN_ONLY) || is_stat_open(fsp->access_mask)) {
 773                 return False;
 774         }
 775
 776         for (i=0; i<lck->num_share_modes; i++) {
 777
 778                 if (!is_valid_share_mode_entry(&lck->share_modes[i])) {
 779                         continue;
 780                 }
 781
 782                 /* At least one entry is not an invalid or deferred entry. */
 783                 valid_entry = True;
 784
 785                 if (pass_number == 1) {
 786                         if (BATCH_OPLOCK_TYPE(lck->share_modes[i].op_type)) {
 787                                 SMB_ASSERT(exclusive == NULL);
 788                                 exclusive = &lck->share_modes[i];
 789                         }
 790                 } else {
 791                         if (EXCLUSIVE_OPLOCK_TYPE(lck->share_modes[i].op_type)) {
 792                                 SMB_ASSERT(exclusive == NULL);
 793                                 exclusive = &lck->share_modes[i];
 794                         }
 795                 }
 796
 797                 if (lck->share_modes[i].op_type == LEVEL_II_OPLOCK) {
 798                         SMB_ASSERT(exclusive == NULL);
 799                         have_level2 = True;
 800                 }
 801         }
 802
 803         if (!valid_entry) {
 804                 /* All entries are placeholders or deferred.
 805                  * Directly grant whatever the client wants. */
 806                 if (fsp->oplock_type == NO_OPLOCK) {
 807                         /* Store a level2 oplock, but don't tell the client */
 808                         fsp->oplock_type = FAKE_LEVEL_II_OPLOCK;
 809                 }
 810                 return False;
 811         }
 812
 813         if (exclusive != NULL) { /* Found an exclusive oplock */
 814                 SMB_ASSERT(!have_level2);
 815                 delay_it = is_delete_request(fsp) ?
 816                         BATCH_OPLOCK_TYPE(exclusive->op_type) : True;
 817         }
 818
 819         if (EXCLUSIVE_OPLOCK_TYPE(fsp->oplock_type)) {
 820                 /* We can at most grant level2 as there are other
 821                  * level2 or NO_OPLOCK entries. */
 822                 fsp->oplock_type = LEVEL_II_OPLOCK;
 823         }
 824
 825         if ((fsp->oplock_type == NO_OPLOCK) && have_level2) {
 826                 /* Store a level2 oplock, but don't tell the client */
 827                 fsp->oplock_type = FAKE_LEVEL_II_OPLOCK;
 828         }
 829
 830         if (!delay_it) {
 831                 return False;
 832         }
 833
 834         /*
 835          * Send a break message to the oplock holder and delay the open for
 836          * our client.
 837          */
 838
 839         DEBUG(10, ("Sending break request to PID %s\n",
 840                    procid_str_static(&exclusive->pid)));
 841         exclusive->op_mid = mid;
 842
 843         /* Create the message. */
 844         share_mode_entry_to_message(msg, exclusive);
 845
 846         /* Add in the FORCE_OPLOCK_BREAK_TO_NONE bit in the message if set. We
 847            don't want this set in the share mode struct pointed to by lck. */
 848
 849         if (oplock_request & FORCE_OPLOCK_BREAK_TO_NONE) {
 850                 SSVAL(msg,6,exclusive->op_type | FORCE_OPLOCK_BREAK_TO_NONE);
 851         }
 852
 853         status = messaging_send_buf(smbd_messaging_context(), exclusive->pid,
 854                                     MSG_SMB_BREAK_REQUEST,
 855                                     (uint8 *)msg,
 856                                     MSG_SMB_SHARE_MODE_ENTRY_SIZE);
 857         if (!NT_STATUS_IS_OK(status)) {
 858                 DEBUG(3, ("Could not send oplock break message: %s\n",
 859                           nt_errstr(status)));
 860         }
 861
 862         return True;
 863 }
 864
 865 static bool request_timed_out(struct timeval request_time,
 866                               struct timeval timeout)
 867 {
 868         struct timeval now, end_time;
 869         GetTimeOfDay(&now);
 870         end_time = timeval_sum(&request_time, &timeout);
 871         return (timeval_compare(&end_time, &now) < 0);
 872 }
 873
 874 /****************************************************************************
 875  Handle the 1 second delay in returning a SHARING_VIOLATION error.
 876 ****************************************************************************/
 877
 878 static void defer_open(struct share_mode_lock *lck,
 879                        struct timeval request_time,
 880                        struct timeval timeout,
 881                        struct smb_request *req,
 882                        struct deferred_open_record *state)
 883 {
 884         int i;
 885
 886         /* Paranoia check */
 887
 888         for (i=0; i<lck->num_share_modes; i++) {
 889                 struct share_mode_entry *e = &lck->share_modes[i];
 890
 891                 if (!is_deferred_open_entry(e)) {
 892                         continue;
 893                 }
 894
 895                 if (procid_is_me(&e->pid) && (e->op_mid == req->mid)) {
 896                         DEBUG(0, ("Trying to defer an already deferred "
 897                                   "request: mid=%d, exiting\n", req->mid));
 898                         exit_server("attempt to defer a deferred request");
 899                 }
 900         }
 901
 902         /* End paranoia check */
 903
 904         DEBUG(10,("defer_open_sharing_error: time [%u.%06u] adding deferred "
 905                   "open entry for mid %u\n",
 906                   (unsigned int)request_time.tv_sec,
 907                   (unsigned int)request_time.tv_usec,
 908                   (unsigned int)req->mid));
 909
 910         if (!push_deferred_smb_message(req, request_time, timeout,
 911                                        (char *)state, sizeof(*state))) {
 912                 exit_server("push_deferred_smb_message failed");
 913         }
 914         add_deferred_open(lck, req->mid, request_time, state->id);
 915
 916         /*
 917          * Push the MID of this packet on the signing queue.
 918          * We only do this once, the first time we push the packet
 919          * onto the deferred open queue, as this has a side effect
 920          * of incrementing the response sequence number.
 921          */
 922
 923         srv_defer_sign_response(req->mid);
 924 }
 925
 926
 927 /****************************************************************************
 928  On overwrite open ensure that the attributes match.
 929 ****************************************************************************/
 930
 931 static bool open_match_attributes(connection_struct *conn,
 932                                   const char *path,
 933                                   uint32 old_dos_attr,
 934                                   uint32 new_dos_attr,
 935                                   mode_t existing_unx_mode,
 936                                   mode_t new_unx_mode,
 937                                   mode_t *returned_unx_mode)
 938 {
 939         uint32 noarch_old_dos_attr, noarch_new_dos_attr;
 940
 941         noarch_old_dos_attr = (old_dos_attr & ~FILE_ATTRIBUTE_ARCHIVE);
 942         noarch_new_dos_attr = (new_dos_attr & ~FILE_ATTRIBUTE_ARCHIVE);
 943
 944         if((noarch_old_dos_attr == 0 && noarch_new_dos_attr != 0) ||
 945            (noarch_old_dos_attr != 0 && ((noarch_old_dos_attr & noarch_new_dos_attr) == noarch_old_dos_attr))) {
 946                 *returned_unx_mode = new_unx_mode;
 947         } else {
 948                 *returned_unx_mode = (mode_t)0;
 949         }
 950
 951         DEBUG(10,("open_match_attributes: file %s old_dos_attr = 0x%x, "
 952                   "existing_unx_mode = 0%o, new_dos_attr = 0x%x "
 953                   "returned_unx_mode = 0%o\n",
 954                   path,
 955                   (unsigned int)old_dos_attr,
 956                   (unsigned int)existing_unx_mode,
 957                   (unsigned int)new_dos_attr,
 958                   (unsigned int)*returned_unx_mode ));
 959
 960         /* If we're mapping SYSTEM and HIDDEN ensure they match. */
 961         if (lp_map_system(SNUM(conn)) || lp_store_dos_attributes(SNUM(conn))) {
 962                 if ((old_dos_attr & FILE_ATTRIBUTE_SYSTEM) &&
 963                     !(new_dos_attr & FILE_ATTRIBUTE_SYSTEM)) {
 964                         return False;
 965                 }
 966         }
 967         if (lp_map_hidden(SNUM(conn)) || lp_store_dos_attributes(SNUM(conn))) {
 968                 if ((old_dos_attr & FILE_ATTRIBUTE_HIDDEN) &&
 969                     !(new_dos_attr & FILE_ATTRIBUTE_HIDDEN)) {
 970                         return False;
 971                 }
 972         }
 973         return True;
 974 }
 975
 976 /****************************************************************************
 977  Special FCB or DOS processing in the case of a sharing violation.
 978  Try and find a duplicated file handle.
 979 ****************************************************************************/
 980
 981 static NTSTATUS fcb_or_dos_open(struct smb_request *req,
 982                                      connection_struct *conn,
 983                                      files_struct *fsp_to_dup_into,
 984                                      const char *fname,
 985                                      struct file_id id,
 986                                      uint16 file_pid,
 987                                      uint16 vuid,
 988                                      uint32 access_mask,
 989                                      uint32 share_access,
 990                                      uint32 create_options)
 991 {
 992         files_struct *fsp;
 993
 994         DEBUG(5,("fcb_or_dos_open: attempting old open semantics for "
 995                  "file %s.\n", fname ));
 996
 997         for(fsp = file_find_di_first(id); fsp;
 998             fsp = file_find_di_next(fsp)) {
 999
1000                 DEBUG(10,("fcb_or_dos_open: checking file %s, fd = %d, "
1001                           "vuid = %u, file_pid = %u, private_options = 0x%x "
1002                           "access_mask = 0x%x\n", fsp->fsp_name,
1003                           fsp->fh->fd, (unsigned int)fsp->vuid,
1004                           (unsigned int)fsp->file_pid,
1005                           (unsigned int)fsp->fh->private_options,
1006                           (unsigned int)fsp->access_mask ));
1007
1008                 if (fsp->fh->fd != -1 &&
1009                     fsp->vuid == vuid &&
1010                     fsp->file_pid == file_pid &&
1011                     (fsp->fh->private_options & (NTCREATEX_OPTIONS_PRIVATE_DENY_DOS |
1012                                                  NTCREATEX_OPTIONS_PRIVATE_DENY_FCB)) &&
1013                     (fsp->access_mask & FILE_WRITE_DATA) &&
1014                     strequal(fsp->fsp_name, fname)) {
1015                         DEBUG(10,("fcb_or_dos_open: file match\n"));
1016                         break;
1017                 }
1018         }
1019
1020         if (!fsp) {
1021                 return NT_STATUS_NOT_FOUND;
1022         }
1023
1024         /* quite an insane set of semantics ... */
1025         if (is_executable(fname) &&
1026             (fsp->fh->private_options & NTCREATEX_OPTIONS_PRIVATE_DENY_DOS)) {
1027                 DEBUG(10,("fcb_or_dos_open: file fail due to is_executable.\n"));
1028                 return NT_STATUS_INVALID_PARAMETER;
1029         }
1030
1031         /* We need to duplicate this fsp. */
1032         dup_file_fsp(req, fsp, access_mask, share_access,
1033                         create_options, fsp_to_dup_into);
1034
1035         return NT_STATUS_OK;
1036 }
1037
1038 /****************************************************************************
1039  Open a file with a share mode - old openX method - map into NTCreate.
1040 ****************************************************************************/
1041
1042 bool map_open_params_to_ntcreate(const char *fname, int deny_mode, int open_func,
1043                                  uint32 *paccess_mask,
1044                                  uint32 *pshare_mode,
1045                                  uint32 *pcreate_disposition,
1046                                  uint32 *pcreate_options)
1047 {
1048         uint32 access_mask;
1049         uint32 share_mode;
1050         uint32 create_disposition;
1051         uint32 create_options = 0;
1052
1053         DEBUG(10,("map_open_params_to_ntcreate: fname = %s, deny_mode = 0x%x, "
1054                   "open_func = 0x%x\n",
1055                   fname, (unsigned int)deny_mode, (unsigned int)open_func ));
1056
1057         /* Create the NT compatible access_mask. */
1058         switch (GET_OPENX_MODE(deny_mode)) {
1059                 case DOS_OPEN_EXEC: /* Implies read-only - used to be FILE_READ_DATA */
1060                 case DOS_OPEN_RDONLY:
1061                         access_mask = FILE_GENERIC_READ;
1062                         break;
1063                 case DOS_OPEN_WRONLY:
1064                         access_mask = FILE_GENERIC_WRITE;
1065                         break;
1066                 case DOS_OPEN_RDWR:
1067                 case DOS_OPEN_FCB:
1068                         access_mask = FILE_GENERIC_READ|FILE_GENERIC_WRITE;
1069                         break;
1070                 default:
1071                         DEBUG(10,("map_open_params_to_ntcreate: bad open mode = 0x%x\n",
1072                                   (unsigned int)GET_OPENX_MODE(deny_mode)));
1073                         return False;
1074         }
1075
1076         /* Create the NT compatible create_disposition. */
1077         switch (open_func) {
1078                 case OPENX_FILE_EXISTS_FAIL|OPENX_FILE_CREATE_IF_NOT_EXIST:
1079                         create_disposition = FILE_CREATE;
1080                         break;
1081
1082                 case OPENX_FILE_EXISTS_OPEN:
1083                         create_disposition = FILE_OPEN;
1084                         break;
1085
1086                 case OPENX_FILE_EXISTS_OPEN|OPENX_FILE_CREATE_IF_NOT_EXIST:
1087                         create_disposition = FILE_OPEN_IF;
1088                         break;
1089
1090                 case OPENX_FILE_EXISTS_TRUNCATE:
1091                         create_disposition = FILE_OVERWRITE;
1092                         break;
1093
1094                 case OPENX_FILE_EXISTS_TRUNCATE|OPENX_FILE_CREATE_IF_NOT_EXIST:
1095                         create_disposition = FILE_OVERWRITE_IF;
1096                         break;
1097
1098                 default:
1099                         /* From samba4 - to be confirmed. */
1100                         if (GET_OPENX_MODE(deny_mode) == DOS_OPEN_EXEC) {
1101                                 create_disposition = FILE_CREATE;
1102                                 break;
1103                         }
1104                         DEBUG(10,("map_open_params_to_ntcreate: bad "
1105                                   "open_func 0x%x\n", (unsigned int)open_func));
1106                         return False;
1107         }
1108
1109         /* Create the NT compatible share modes. */
1110         switch (GET_DENY_MODE(deny_mode)) {
1111                 case DENY_ALL:
1112                         share_mode = FILE_SHARE_NONE;
1113                         break;
1114
1115                 case DENY_WRITE:
1116                         share_mode = FILE_SHARE_READ;
1117                         break;
1118
1119                 case DENY_READ:
1120                         share_mode = FILE_SHARE_WRITE;
1121                         break;
1122
1123                 case DENY_NONE:
1124                         share_mode = FILE_SHARE_READ|FILE_SHARE_WRITE;
1125                         break;
1126
1127                 case DENY_DOS:
1128                         create_options |= NTCREATEX_OPTIONS_PRIVATE_DENY_DOS;
1129                         if (is_executable(fname)) {
1130                                 share_mode = FILE_SHARE_READ|FILE_SHARE_WRITE;
1131                         } else {
1132                                 if (GET_OPENX_MODE(deny_mode) == DOS_OPEN_RDONLY) {
1133                                         share_mode = FILE_SHARE_READ;
1134                                 } else {
1135                                         share_mode = FILE_SHARE_NONE;
1136                                 }
1137                         }
1138                         break;
1139
1140                 case DENY_FCB:
1141                         create_options |= NTCREATEX_OPTIONS_PRIVATE_DENY_FCB;
1142                         share_mode = FILE_SHARE_NONE;
1143                         break;
1144
1145                 default:
1146                         DEBUG(10,("map_open_params_to_ntcreate: bad deny_mode 0x%x\n",
1147                                 (unsigned int)GET_DENY_MODE(deny_mode) ));
1148                         return False;
1149         }
1150
1151         DEBUG(10,("map_open_params_to_ntcreate: file %s, access_mask = 0x%x, "
1152                   "share_mode = 0x%x, create_disposition = 0x%x, "
1153                   "create_options = 0x%x\n",
1154                   fname,
1155                   (unsigned int)access_mask,
1156                   (unsigned int)share_mode,
1157                   (unsigned int)create_disposition,
1158                   (unsigned int)create_options ));
1159
1160         if (paccess_mask) {
1161                 *paccess_mask = access_mask;
1162         }
1163         if (pshare_mode) {
1164                 *pshare_mode = share_mode;
1165         }
1166         if (pcreate_disposition) {
1167                 *pcreate_disposition = create_disposition;
1168         }
1169         if (pcreate_options) {
1170                 *pcreate_options = create_options;
1171         }
1172
1173         return True;
1174
1175 }
1176
1177 static void schedule_defer_open(struct share_mode_lock *lck,
1178                                 struct timeval request_time,
1179                                 struct smb_request *req)
1180 {
1181         struct deferred_open_record state;
1182
1183         /* This is a relative time, added to the absolute
1184            request_time value to get the absolute timeout time.
1185            Note that if this is the second or greater time we enter
1186            this codepath for this particular request mid then
1187            request_time is left as the absolute time of the *first*
1188            time this request mid was processed. This is what allows
1189            the request to eventually time out. */
1190
1191         struct timeval timeout;
1192
1193         /* Normally the smbd we asked should respond within
1194          * OPLOCK_BREAK_TIMEOUT seconds regardless of whether
1195          * the client did, give twice the timeout as a safety
1196          * measure here in case the other smbd is stuck
1197          * somewhere else. */
1198
1199         timeout = timeval_set(OPLOCK_BREAK_TIMEOUT*2, 0);
1200
1201         /* Nothing actually uses state.delayed_for_oplocks
1202            but it's handy to differentiate in debug messages
1203            between a 30 second delay due to oplock break, and
1204            a 1 second delay for share mode conflicts. */
1205
1206         state.delayed_for_oplocks = True;
1207         state.id = lck->id;
1208
1209         if (!request_timed_out(request_time, timeout)) {
1210                 defer_open(lck, request_time, timeout, req, &state);
1211         }
1212 }
1213
1214 /****************************************************************************
1215  Work out what access_mask to use from what the client sent us.
1216 ****************************************************************************/
1217
1218 static NTSTATUS calculate_access_mask(connection_struct *conn,
1219                                         const char *fname,
1220                                         bool file_existed,
1221                                         uint32_t access_mask,
1222                                         uint32_t *access_mask_out)
1223 {
1224         NTSTATUS status;
1225
1226         /*
1227          * Convert GENERIC bits to specific bits.
1228          */
1229
1230         se_map_generic(&access_mask, &file_generic_mapping);
1231
1232         /* Calculate MAXIMUM_ALLOWED_ACCESS if requested. */
1233         if (access_mask & MAXIMUM_ALLOWED_ACCESS) {
1234                 if (file_existed) {
1235
1236                         struct security_descriptor *sd;
1237                         uint32_t access_granted = 0;
1238
1239                         status = SMB_VFS_GET_NT_ACL(conn, fname,
1240                                         (OWNER_SECURITY_INFORMATION |
1241                                         GROUP_SECURITY_INFORMATION |
1242                                         DACL_SECURITY_INFORMATION),&sd);
1243
1244                         if (!NT_STATUS_IS_OK(status)) {
1245                                 DEBUG(10, ("calculate_access_mask: Could not get acl "
1246                                         "on file %s: %s\n",
1247                                         fname,
1248                                         nt_errstr(status)));
1249                                 return NT_STATUS_ACCESS_DENIED;
1250                         }
1251
1252                         status = smb1_file_se_access_check(sd,
1253                                         conn->server_info->ptok,
1254                                         access_mask,
1255                                         &access_granted);
1256
1257                         TALLOC_FREE(sd);
1258
1259                         if (!NT_STATUS_IS_OK(status)) {
1260                                 DEBUG(10, ("calculate_access_mask: Access denied on "
1261                                         "file %s: when calculating maximum access\n",
1262                                         fname));
1263                                 return NT_STATUS_ACCESS_DENIED;
1264                         }
1265
1266                         access_mask = access_granted;
1267                 } else {
1268                         access_mask = FILE_GENERIC_ALL;
1269                 }
1270         }
1271
1272         *access_mask_out = access_mask;
1273         return NT_STATUS_OK;
1274 }
1275
1276 /****************************************************************************
1277  Open a file with a share mode. Passed in an already created files_struct *.
1278 ****************************************************************************/
1279
1280 static NTSTATUS open_file_ntcreate(connection_struct *conn,
1281                             struct smb_request *req,
1282                             const char *fname,
1283                             SMB_STRUCT_STAT *psbuf,
1284                             uint32 access_mask,         /* access bits (FILE_READ_DATA etc.) */
1285                             uint32 share_access,        /* share constants (FILE_SHARE_READ etc) */
1286                             uint32 create_disposition,  /* FILE_OPEN_IF etc. */
1287                             uint32 create_options,      /* options such as delete on close. */
1288                             uint32 new_dos_attributes,  /* attributes used for new file. */
1289                             int oplock_request,         /* internal Samba oplock codes. */
1290                                                         /* Information (FILE_EXISTS etc.) */
1291                             int *pinfo,
1292                             files_struct *fsp)
1293 {
1294         int flags=0;
1295         int flags2=0;
1296         bool file_existed = VALID_STAT(*psbuf);
1297         bool def_acl = False;
1298         bool posix_open = False;
1299         bool new_file_created = False;
1300         struct file_id id;
1301         NTSTATUS fsp_open = NT_STATUS_ACCESS_DENIED;
1302         mode_t new_unx_mode = (mode_t)0;
1303         mode_t unx_mode = (mode_t)0;
1304         int info;
1305         uint32 existing_dos_attributes = 0;
1306         struct pending_message_list *pml = NULL;
1307         struct timeval request_time = timeval_zero();
1308         struct share_mode_lock *lck = NULL;
1309         uint32 open_access_mask = access_mask;
1310         NTSTATUS status;
1311         int ret_flock;
1312         char *parent_dir;
1313         const char *newname;
1314
1315         ZERO_STRUCT(id);
1316
1317         if (conn->printer) {
1318                 /*
1319                  * Printers are handled completely differently.
1320                  * Most of the passed parameters are ignored.
1321                  */
1322
1323                 if (pinfo) {
1324                         *pinfo = FILE_WAS_CREATED;
1325                 }
1326
1327                 DEBUG(10, ("open_file_ntcreate: printer open fname=%s\n", fname));
1328
1329                 return print_fsp_open(req, conn, fname, req->vuid, fsp);
1330         }
1331
1332         if (!parent_dirname_talloc(talloc_tos(), fname, &parent_dir,
1333                                    &newname)) {
1334                 return NT_STATUS_NO_MEMORY;
1335         }
1336
1337         if (new_dos_attributes & FILE_FLAG_POSIX_SEMANTICS) {
1338                 posix_open = True;
1339                 unx_mode = (mode_t)(new_dos_attributes & ~FILE_FLAG_POSIX_SEMANTICS);
1340                 new_dos_attributes = 0;
1341         } else {
1342                 /* We add aARCH to this as this mode is only used if the file is
1343                  * created new. */
1344                 unx_mode = unix_mode(conn, new_dos_attributes | aARCH, fname,
1345                                      parent_dir);
1346         }
1347
1348         DEBUG(10, ("open_file_ntcreate: fname=%s, dos_attrs=0x%x "
1349                    "access_mask=0x%x share_access=0x%x "
1350                    "create_disposition = 0x%x create_options=0x%x "
1351                    "unix mode=0%o oplock_request=%d\n",
1352                    fname, new_dos_attributes, access_mask, share_access,
1353                    create_disposition, create_options, unx_mode,
1354                    oplock_request));
1355
1356         if ((req == NULL) && ((oplock_request & INTERNAL_OPEN_ONLY) == 0)) {
1357                 DEBUG(0, ("No smb request but not an internal only open!\n"));
1358                 return NT_STATUS_INTERNAL_ERROR;
1359         }
1360
1361         /*
1362          * Only non-internal opens can be deferred at all
1363          */
1364
1365         if ((req != NULL)
1366             && ((pml = get_open_deferred_message(req->mid)) != NULL)) {
1367                 struct deferred_open_record *state =
1368                         (struct deferred_open_record *)pml->private_data.data;
1369
1370                 /* Remember the absolute time of the original
1371                    request with this mid. We'll use it later to
1372                    see if this has timed out. */
1373
1374                 request_time = pml->request_time;
1375
1376                 /* Remove the deferred open entry under lock. */
1377                 lck = get_share_mode_lock(talloc_tos(), state->id, NULL, NULL,
1378                                           NULL);
1379                 if (lck == NULL) {
1380                         DEBUG(0, ("could not get share mode lock\n"));
1381                 } else {
1382                         del_deferred_open_entry(lck, req->mid);
1383                         TALLOC_FREE(lck);
1384                 }
1385
1386                 /* Ensure we don't reprocess this message. */
1387                 remove_deferred_open_smb_message(req->mid);
1388         }
1389
1390         status = check_name(conn, fname);
1391         if (!NT_STATUS_IS_OK(status)) {
1392                 return status;
1393         }
1394
1395         if (!posix_open) {
1396                 new_dos_attributes &= SAMBA_ATTRIBUTES_MASK;
1397                 if (file_existed) {
1398                         existing_dos_attributes = dos_mode(conn, fname, psbuf);
1399                 }
1400         }
1401
1402         /* ignore any oplock requests if oplocks are disabled */
1403         if (!lp_oplocks(SNUM(conn)) || global_client_failed_oplock_break ||
1404             IS_VETO_OPLOCK_PATH(conn, fname)) {
1405                 /* Mask off everything except the private Samba bits. */
1406                 oplock_request &= SAMBA_PRIVATE_OPLOCK_MASK;
1407         }
1408
1409         /* this is for OS/2 long file names - say we don't support them */
1410         if (!lp_posix_pathnames() && strstr(fname,".+,;=[].")) {
1411                 /* OS/2 Workplace shell fix may be main code stream in a later
1412                  * release. */
1413                 DEBUG(5,("open_file_ntcreate: OS/2 long filenames are not "
1414                          "supported.\n"));
1415                 if (use_nt_status()) {
1416                         return NT_STATUS_OBJECT_NAME_NOT_FOUND;
1417                 }
1418                 return NT_STATUS_DOS(ERRDOS, ERRcannotopen);
1419         }
1420
1421         switch( create_disposition ) {
1422                 /*
1423                  * Currently we're using FILE_SUPERSEDE as the same as
1424                  * FILE_OVERWRITE_IF but they really are
1425                  * different. FILE_SUPERSEDE deletes an existing file
1426                  * (requiring delete access) then recreates it.
1427                  */
1428                 case FILE_SUPERSEDE:
1429                         /* If file exists replace/overwrite. If file doesn't
1430                          * exist create. */
1431                         flags2 |= (O_CREAT | O_TRUNC);
1432                         break;
1433
1434                 case FILE_OVERWRITE_IF:
1435                         /* If file exists replace/overwrite. If file doesn't
1436                          * exist create. */
1437                         flags2 |= (O_CREAT | O_TRUNC);
1438                         break;
1439
1440                 case FILE_OPEN:
1441                         /* If file exists open. If file doesn't exist error. */
1442                         if (!file_existed) {
1443                                 DEBUG(5,("open_file_ntcreate: FILE_OPEN "
1444                                          "requested for file %s and file "
1445                                          "doesn't exist.\n", fname ));
1446                                 errno = ENOENT;
1447                                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
1448                         }
1449                         break;
1450
1451                 case FILE_OVERWRITE:
1452                         /* If file exists overwrite. If file doesn't exist
1453                          * error. */
1454                         if (!file_existed) {
1455                                 DEBUG(5,("open_file_ntcreate: FILE_OVERWRITE "
1456                                          "requested for file %s and file "
1457                                          "doesn't exist.\n", fname ));
1458                                 errno = ENOENT;
1459                                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
1460                         }
1461                         flags2 |= O_TRUNC;
1462                         break;
1463
1464                 case FILE_CREATE:
1465                         /* If file exists error. If file doesn't exist
1466                          * create. */
1467                         if (file_existed) {
1468                                 DEBUG(5,("open_file_ntcreate: FILE_CREATE "
1469                                          "requested for file %s and file "
1470                                          "already exists.\n", fname ));
1471                                 if (S_ISDIR(psbuf->st_mode)) {
1472                                         errno = EISDIR;
1473                                 } else {
1474                                         errno = EEXIST;
1475                                 }
1476                                 return map_nt_error_from_unix(errno);
1477                         }
1478                         flags2 |= (O_CREAT|O_EXCL);
1479                         break;
1480
1481                 case FILE_OPEN_IF:
1482                         /* If file exists open. If file doesn't exist
1483                          * create. */
1484                         flags2 |= O_CREAT;
1485                         break;
1486
1487                 default:
1488                         return NT_STATUS_INVALID_PARAMETER;
1489         }
1490
1491         /* We only care about matching attributes on file exists and
1492          * overwrite. */
1493
1494         if (!posix_open && file_existed && ((create_disposition == FILE_OVERWRITE) ||
1495                              (create_disposition == FILE_OVERWRITE_IF))) {
1496                 if (!open_match_attributes(conn, fname,
1497                                            existing_dos_attributes,
1498                                            new_dos_attributes, psbuf->st_mode,
1499                                            unx_mode, &new_unx_mode)) {
1500                         DEBUG(5,("open_file_ntcreate: attributes missmatch "
1501                                  "for file %s (%x %x) (0%o, 0%o)\n",
1502                                  fname, existing_dos_attributes,
1503                                  new_dos_attributes,
1504                                  (unsigned int)psbuf->st_mode,
1505                                  (unsigned int)unx_mode ));
1506                         errno = EACCES;
1507                         return NT_STATUS_ACCESS_DENIED;
1508                 }
1509         }
1510
1511         status = calculate_access_mask(conn, fname, file_existed,
1512                                         access_mask,
1513                                         &access_mask);
1514         if (!NT_STATUS_IS_OK(status)) {
1515                 DEBUG(10, ("open_file_ntcreate: calculate_access_mask "
1516                         "on file %s returned %s\n",
1517                         fname,
1518                         nt_errstr(status)));
1519                 return status;
1520         }
1521
1522         open_access_mask = access_mask;
1523
1524         if ((flags2 & O_TRUNC) || (oplock_request & FORCE_OPLOCK_BREAK_TO_NONE)) {
1525                 open_access_mask |= FILE_WRITE_DATA; /* This will cause oplock breaks. */
1526         }
1527
1528         DEBUG(10, ("open_file_ntcreate: fname=%s, after mapping "
1529                    "access_mask=0x%x\n", fname, access_mask ));
1530
1531         /*
1532          * Note that we ignore the append flag as append does not
1533          * mean the same thing under DOS and Unix.
1534          */
1535
1536         if ((access_mask & (FILE_WRITE_DATA | FILE_APPEND_DATA)) ||
1537                         (oplock_request & FORCE_OPLOCK_BREAK_TO_NONE)) {
1538                 /* DENY_DOS opens are always underlying read-write on the
1539                    file handle, no matter what the requested access mask
1540                     says. */
1541                 if ((create_options & NTCREATEX_OPTIONS_PRIVATE_DENY_DOS) ||
1542                         access_mask & (FILE_READ_ATTRIBUTES|FILE_READ_DATA|FILE_READ_EA|FILE_EXECUTE)) {
1543                         flags = O_RDWR;
1544                 } else {
1545                         flags = O_WRONLY;
1546                 }
1547         } else {
1548                 flags = O_RDONLY;
1549         }
1550
1551         /*
1552          * Currently we only look at FILE_WRITE_THROUGH for create options.
1553          */
1554
1555 #if defined(O_SYNC)
1556         if ((create_options & FILE_WRITE_THROUGH) && lp_strict_sync(SNUM(conn))) {
1557                 flags2 |= O_SYNC;
1558         }
1559 #endif /* O_SYNC */
1560
1561         if (posix_open && (access_mask & FILE_APPEND_DATA)) {
1562                 flags2 |= O_APPEND;
1563         }
1564
1565         if (!posix_open && !CAN_WRITE(conn)) {
1566                 /*
1567                  * We should really return a permission denied error if either
1568                  * O_CREAT or O_TRUNC are set, but for compatibility with
1569                  * older versions of Samba we just AND them out.
1570                  */
1571                 flags2 &= ~(O_CREAT|O_TRUNC);
1572         }
1573
1574         /*
1575          * Ensure we can't write on a read-only share or file.
1576          */
1577
1578         if (flags != O_RDONLY && file_existed &&
1579             (!CAN_WRITE(conn) || IS_DOS_READONLY(existing_dos_attributes))) {
1580                 DEBUG(5,("open_file_ntcreate: write access requested for "
1581                          "file %s on read only %s\n",
1582                          fname, !CAN_WRITE(conn) ? "share" : "file" ));
1583                 errno = EACCES;
1584                 return NT_STATUS_ACCESS_DENIED;
1585         }
1586
1587         fsp->file_id = vfs_file_id_from_sbuf(conn, psbuf);
1588         fsp->share_access = share_access;
1589         fsp->fh->private_options = create_options;
1590         fsp->access_mask = open_access_mask; /* We change this to the
1591                                               * requested access_mask after
1592                                               * the open is done. */
1593         fsp->posix_open = posix_open;
1594
1595         /* Ensure no SAMBA_PRIVATE bits can be set. */
1596         fsp->oplock_type = (oplock_request & ~SAMBA_PRIVATE_OPLOCK_MASK);
1597
1598         if (timeval_is_zero(&request_time)) {
1599                 request_time = fsp->open_time;
1600         }
1601
1602         if (file_existed) {
1603                 struct timespec old_write_time = get_mtimespec(psbuf);
1604                 id = vfs_file_id_from_sbuf(conn, psbuf);
1605
1606                 lck = get_share_mode_lock(talloc_tos(), id,
1607                                           conn->connectpath,
1608                                           fname, &old_write_time);
1609
1610                 if (lck == NULL) {
1611                         DEBUG(0, ("Could not get share mode lock\n"));
1612                         return NT_STATUS_SHARING_VIOLATION;
1613                 }
1614
1615                 /* First pass - send break only on batch oplocks. */
1616                 if ((req != NULL)
1617                     && delay_for_oplocks(lck, fsp, req->mid, 1,
1618                                          oplock_request)) {
1619                         schedule_defer_open(lck, request_time, req);
1620                         TALLOC_FREE(lck);
1621                         return NT_STATUS_SHARING_VIOLATION;
1622                 }
1623
1624                 /* Use the client requested access mask here, not the one we
1625                  * open with. */
1626                 status = open_mode_check(conn, fname, lck,
1627                                          access_mask, share_access,
1628                                          create_options, &file_existed);
1629
1630                 if (NT_STATUS_IS_OK(status)) {
1631                         /* We might be going to allow this open. Check oplock
1632                          * status again. */
1633                         /* Second pass - send break for both batch or
1634                          * exclusive oplocks. */
1635                         if ((req != NULL)
1636                              && delay_for_oplocks(lck, fsp, req->mid, 2,
1637                                                   oplock_request)) {
1638                                 schedule_defer_open(lck, request_time, req);
1639                                 TALLOC_FREE(lck);
1640                                 return NT_STATUS_SHARING_VIOLATION;
1641                         }
1642                 }
1643
1644                 if (NT_STATUS_EQUAL(status, NT_STATUS_DELETE_PENDING)) {
1645                         /* DELETE_PENDING is not deferred for a second */
1646                         TALLOC_FREE(lck);
1647                         return status;
1648                 }
1649
1650                 if (!NT_STATUS_IS_OK(status)) {
1651                         uint32 can_access_mask;
1652                         bool can_access = True;
1653
1654                         SMB_ASSERT(NT_STATUS_EQUAL(status, NT_STATUS_SHARING_VIOLATION));
1655
1656                         /* Check if this can be done with the deny_dos and fcb
1657                          * calls. */
1658                         if (create_options &
1659                             (NTCREATEX_OPTIONS_PRIVATE_DENY_DOS|
1660                              NTCREATEX_OPTIONS_PRIVATE_DENY_FCB)) {
1661                                 if (req == NULL) {
1662                                         DEBUG(0, ("DOS open without an SMB "
1663                                                   "request!\n"));
1664                                         TALLOC_FREE(lck);
1665                                         return NT_STATUS_INTERNAL_ERROR;
1666                                 }
1667
1668                                 /* Use the client requested access mask here,
1669                                  * not the one we open with. */
1670                                 status = fcb_or_dos_open(req,
1671                                                         conn,
1672                                                         fsp,
1673                                                         fname,
1674                                                         id,
1675                                                         req->smbpid,
1676                                                         req->vuid,
1677                                                         access_mask,
1678                                                         share_access,
1679                                                         create_options);
1680
1681                                 if (NT_STATUS_IS_OK(status)) {
1682                                         TALLOC_FREE(lck);
1683                                         if (pinfo) {
1684                                                 *pinfo = FILE_WAS_OPENED;
1685                                         }
1686                                         return NT_STATUS_OK;
1687                                 }
1688                         }
1689
1690                         /*
1691                          * This next line is a subtlety we need for
1692                          * MS-Access. If a file open will fail due to share
1693                          * permissions and also for security (access) reasons,
1694                          * we need to return the access failed error, not the
1695                          * share error. We can't open the file due to kernel
1696                          * oplock deadlock (it's possible we failed above on
1697                          * the open_mode_check()) so use a userspace check.
1698                          */
1699
1700                         if (flags & O_RDWR) {
1701                                 can_access_mask = FILE_READ_DATA|FILE_WRITE_DATA;
1702                         } else if (flags & O_WRONLY) {
1703                                 can_access_mask = FILE_WRITE_DATA;
1704                         } else {
1705                                 can_access_mask = FILE_READ_DATA;
1706                         }
1707
1708                         if (((can_access_mask & FILE_WRITE_DATA) && !CAN_WRITE(conn)) ||
1709                             !can_access_file_data(conn,fname,psbuf,can_access_mask)) {
1710                                 can_access = False;
1711                         }
1712
1713                         /*
1714                          * If we're returning a share violation, ensure we
1715                          * cope with the braindead 1 second delay.
1716                          */
1717
1718                         if (!(oplock_request & INTERNAL_OPEN_ONLY) &&
1719                             lp_defer_sharing_violations()) {
1720                                 struct timeval timeout;
1721                                 struct deferred_open_record state;
1722                                 int timeout_usecs;
1723
1724                                 /* this is a hack to speed up torture tests
1725                                    in 'make test' */
1726                                 timeout_usecs = lp_parm_int(SNUM(conn),
1727                                                             "smbd","sharedelay",
1728                                                             SHARING_VIOLATION_USEC_WAIT);
1729
1730                                 /* This is a relative time, added to the absolute
1731                                    request_time value to get the absolute timeout time.
1732                                    Note that if this is the second or greater time we enter
1733                                    this codepath for this particular request mid then
1734                                    request_time is left as the absolute time of the *first*
1735                                    time this request mid was processed. This is what allows
1736                                    the request to eventually time out. */
1737
1738                                 timeout = timeval_set(0, timeout_usecs);
1739
1740                                 /* Nothing actually uses state.delayed_for_oplocks
1741                                    but it's handy to differentiate in debug messages
1742                                    between a 30 second delay due to oplock break, and
1743                                    a 1 second delay for share mode conflicts. */
1744
1745                                 state.delayed_for_oplocks = False;
1746                                 state.id = id;
1747
1748                                 if ((req != NULL)
1749                                     && !request_timed_out(request_time,
1750                                                           timeout)) {
1751                                         defer_open(lck, request_time, timeout,
1752                                                    req, &state);
1753                                 }
1754                         }
1755
1756                         TALLOC_FREE(lck);
1757                         if (can_access) {
1758                                 /*
1759                                  * We have detected a sharing violation here
1760                                  * so return the correct error code
1761                                  */
1762                                 status = NT_STATUS_SHARING_VIOLATION;
1763                         } else {
1764                                 status = NT_STATUS_ACCESS_DENIED;
1765                         }
1766                         return status;
1767                 }
1768
1769                 /*
1770                  * We exit this block with the share entry *locked*.....
1771                  */
1772         }
1773
1774         SMB_ASSERT(!file_existed || (lck != NULL));
1775
1776         /*
1777          * Ensure we pay attention to default ACLs on directories if required.
1778          */
1779
1780         if ((flags2 & O_CREAT) && lp_inherit_acls(SNUM(conn)) &&
1781             (def_acl = directory_has_default_acl(conn, parent_dir))) {
1782                 unx_mode = 0777;
1783         }
1784
1785         DEBUG(4,("calling open_file with flags=0x%X flags2=0x%X mode=0%o, "
1786                 "access_mask = 0x%x, open_access_mask = 0x%x\n",
1787                  (unsigned int)flags, (unsigned int)flags2,
1788                  (unsigned int)unx_mode, (unsigned int)access_mask,
1789                  (unsigned int)open_access_mask));
1790
1791         /*
1792          * open_file strips any O_TRUNC flags itself.
1793          */
1794
1795         fsp_open = open_file(fsp, conn, req, parent_dir, newname, fname, psbuf,
1796                              flags|flags2, unx_mode, access_mask,
1797                              open_access_mask);
1798
1799         if (!NT_STATUS_IS_OK(fsp_open)) {
1800                 if (lck != NULL) {
1801                         TALLOC_FREE(lck);
1802                 }
1803                 return fsp_open;
1804         }
1805
1806         if (!file_existed) {
1807                 struct timespec old_write_time = get_mtimespec(psbuf);
1808                 /*
1809                  * Deal with the race condition where two smbd's detect the
1810                  * file doesn't exist and do the create at the same time. One
1811                  * of them will win and set a share mode, the other (ie. this
1812                  * one) should check if the requested share mode for this
1813                  * create is allowed.
1814                  */
1815
1816                 /*
1817                  * Now the file exists and fsp is successfully opened,
1818                  * fsp->dev and fsp->inode are valid and should replace the
1819                  * dev=0,inode=0 from a non existent file. Spotted by
1820                  * Nadav Danieli <nadavd@exanet.com>. JRA.
1821                  */
1822
1823                 id = fsp->file_id;
1824
1825                 lck = get_share_mode_lock(talloc_tos(), id,
1826                                           conn->connectpath,
1827                                           fname, &old_write_time);
1828
1829                 if (lck == NULL) {
1830                         DEBUG(0, ("open_file_ntcreate: Could not get share "
1831                                   "mode lock for %s\n", fname));
1832                         fd_close(fsp);
1833                         return NT_STATUS_SHARING_VIOLATION;
1834                 }
1835
1836                 /* First pass - send break only on batch oplocks. */
1837                 if ((req != NULL)
1838                     && delay_for_oplocks(lck, fsp, req->mid, 1,
1839                                          oplock_request)) {
1840                         schedule_defer_open(lck, request_time, req);
1841                         TALLOC_FREE(lck);
1842                         fd_close(fsp);
1843                         return NT_STATUS_SHARING_VIOLATION;
1844                 }
1845
1846                 status = open_mode_check(conn, fname, lck,
1847                                          access_mask, share_access,
1848                                          create_options, &file_existed);
1849
1850                 if (NT_STATUS_IS_OK(status)) {
1851                         /* We might be going to allow this open. Check oplock
1852                          * status again. */
1853                         /* Second pass - send break for both batch or
1854                          * exclusive oplocks. */
1855                         if ((req != NULL)
1856                             && delay_for_oplocks(lck, fsp, req->mid, 2,
1857                                                  oplock_request)) {
1858                                 schedule_defer_open(lck, request_time, req);
1859                                 TALLOC_FREE(lck);
1860                                 fd_close(fsp);
1861                                 return NT_STATUS_SHARING_VIOLATION;
1862                         }
1863                 }
1864
1865                 if (!NT_STATUS_IS_OK(status)) {
1866                         struct deferred_open_record state;
1867
1868                         fd_close(fsp);
1869
1870                         state.delayed_for_oplocks = False;
1871                         state.id = id;
1872
1873                         /* Do it all over again immediately. In the second
1874                          * round we will find that the file existed and handle
1875                          * the DELETE_PENDING and FCB cases correctly. No need
1876                          * to duplicate the code here. Essentially this is a
1877                          * "goto top of this function", but don't tell
1878                          * anybody... */
1879
1880                         if (req != NULL) {
1881                                 defer_open(lck, request_time, timeval_zero(),
1882                                            req, &state);
1883                         }
1884                         TALLOC_FREE(lck);
1885                         return status;
1886                 }
1887
1888                 /*
1889                  * We exit this block with the share entry *locked*.....
1890                  */
1891
1892         }
1893
1894         SMB_ASSERT(lck != NULL);
1895
1896         /* note that we ignore failure for the following. It is
1897            basically a hack for NFS, and NFS will never set one of
1898            these only read them. Nobody but Samba can ever set a deny
1899            mode and we have already checked our more authoritative
1900            locking database for permission to set this deny mode. If
1901            the kernel refuses the operations then the kernel is wrong.
1902            note that GPFS supports it as well - jmcd */
1903
1904         if (fsp->fh->fd != -1) {
1905                 ret_flock = SMB_VFS_KERNEL_FLOCK(fsp, share_access);
1906                 if(ret_flock == -1 ){
1907
1908                         TALLOC_FREE(lck);
1909                         fd_close(fsp);
1910
1911                         return NT_STATUS_SHARING_VIOLATION;
1912                 }
1913         }
1914
1915         /*
1916          * At this point onwards, we can guarentee that the share entry
1917          * is locked, whether we created the file or not, and that the
1918          * deny mode is compatible with all current opens.
1919          */
1920
1921         /*
1922          * If requested, truncate the file.
1923          */
1924
1925         if (flags2&O_TRUNC) {
1926                 /*
1927                  * We are modifing the file after open - update the stat
1928                  * struct..
1929                  */
1930                 if ((SMB_VFS_FTRUNCATE(fsp, 0) == -1) ||
1931                     (SMB_VFS_FSTAT(fsp, psbuf)==-1)) {
1932                         status = map_nt_error_from_unix(errno);
1933                         TALLOC_FREE(lck);
1934                         fd_close(fsp);
1935                         return status;
1936                 }
1937         }
1938
1939         /* Record the options we were opened with. */
1940         fsp->share_access = share_access;
1941         fsp->fh->private_options = create_options;
1942         /*
1943          * According to Samba4, SEC_FILE_READ_ATTRIBUTE is always granted,
1944          */
1945         fsp->access_mask = access_mask | FILE_READ_ATTRIBUTES;
1946
1947         if (file_existed) {
1948                 /* stat opens on existing files don't get oplocks. */
1949                 if (is_stat_open(open_access_mask)) {
1950                         fsp->oplock_type = NO_OPLOCK;
1951                 }
1952
1953                 if (!(flags2 & O_TRUNC)) {
1954                         info = FILE_WAS_OPENED;
1955                 } else {
1956                         info = FILE_WAS_OVERWRITTEN;
1957                 }
1958         } else {
1959                 info = FILE_WAS_CREATED;
1960         }
1961
1962         if (pinfo) {
1963                 *pinfo = info;
1964         }
1965
1966         /*
1967          * Setup the oplock info in both the shared memory and
1968          * file structs.
1969          */
1970
1971         if ((fsp->oplock_type != NO_OPLOCK) &&
1972             (fsp->oplock_type != FAKE_LEVEL_II_OPLOCK)) {
1973                 if (!set_file_oplock(fsp, fsp->oplock_type)) {
1974                         /* Could not get the kernel oplock */
1975                         fsp->oplock_type = NO_OPLOCK;
1976                 }
1977         }
1978
1979         if (info == FILE_WAS_OVERWRITTEN || info == FILE_WAS_CREATED || info == FILE_WAS_SUPERSEDED) {
1980                 new_file_created = True;
1981         }
1982
1983         set_share_mode(lck, fsp, conn->server_info->utok.uid, 0,
1984                        fsp->oplock_type, new_file_created);
1985
1986         /* Handle strange delete on close create semantics. */
1987         if ((create_options & FILE_DELETE_ON_CLOSE)
1988             && (((conn->fs_capabilities & FILE_NAMED_STREAMS)
1989                         && is_ntfs_stream_name(fname))
1990                 || can_set_initial_delete_on_close(lck))) {
1991                 status = can_set_delete_on_close(fsp, True, new_dos_attributes);
1992
1993                 if (!NT_STATUS_IS_OK(status)) {
1994                         /* Remember to delete the mode we just added. */
1995                         del_share_mode(lck, fsp);
1996                         TALLOC_FREE(lck);
1997                         fd_close(fsp);
1998                         return status;
1999                 }
2000                 /* Note that here we set the *inital* delete on close flag,
2001                    not the regular one. The magic gets handled in close. */
2002                 fsp->initial_delete_on_close = True;
2003         }
2004
2005         if (new_file_created) {
2006                 /* Files should be initially set as archive */
2007                 if (lp_map_archive(SNUM(conn)) ||
2008                     lp_store_dos_attributes(SNUM(conn))) {
2009                         if (!posix_open) {
2010                                 SMB_STRUCT_STAT tmp_sbuf;
2011                                 SET_STAT_INVALID(tmp_sbuf);
2012                                 if (file_set_dosmode(
2013                                             conn, fname,
2014                                             new_dos_attributes | aARCH,
2015                                             &tmp_sbuf, parent_dir,
2016                                             true) == 0) {
2017                                         unx_mode = tmp_sbuf.st_mode;
2018                                 }
2019                         }
2020                 }
2021         }
2022
2023         /*
2024          * Take care of inherited ACLs on created files - if default ACL not
2025          * selected.
2026          */
2027
2028         if (!posix_open && !file_existed && !def_acl) {
2029
2030                 int saved_errno = errno; /* We might get ENOSYS in the next
2031                                           * call.. */
2032
2033                 if (SMB_VFS_FCHMOD_ACL(fsp, unx_mode) == -1 &&
2034                     errno == ENOSYS) {
2035                         errno = saved_errno; /* Ignore ENOSYS */
2036                 }
2037
2038         } else if (new_unx_mode) {
2039
2040                 int ret = -1;
2041
2042                 /* Attributes need changing. File already existed. */
2043
2044                 {
2045                         int saved_errno = errno; /* We might get ENOSYS in the
2046                                                   * next call.. */
2047                         ret = SMB_VFS_FCHMOD_ACL(fsp, new_unx_mode);
2048
2049                         if (ret == -1 && errno == ENOSYS) {
2050                                 errno = saved_errno; /* Ignore ENOSYS */
2051                         } else {
2052                                 DEBUG(5, ("open_file_ntcreate: reset "
2053                                           "attributes of file %s to 0%o\n",
2054                                           fname, (unsigned int)new_unx_mode));
2055                                 ret = 0; /* Don't do the fchmod below. */
2056                         }
2057                 }
2058
2059                 if ((ret == -1) &&
2060                     (SMB_VFS_FCHMOD(fsp, new_unx_mode) == -1))
2061                         DEBUG(5, ("open_file_ntcreate: failed to reset "
2062                                   "attributes of file %s to 0%o\n",
2063                                   fname, (unsigned int)new_unx_mode));
2064         }
2065
2066         /* If this is a successful open, we must remove any deferred open
2067          * records. */
2068         if (req != NULL) {
2069                 del_deferred_open_entry(lck, req->mid);
2070         }
2071         TALLOC_FREE(lck);
2072
2073         return NT_STATUS_OK;
2074 }
2075
2076
2077 /****************************************************************************
2078  Open a file for for write to ensure that we can fchmod it.
2079 ****************************************************************************/
2080
2081 NTSTATUS open_file_fchmod(struct smb_request *req, connection_struct *conn,
2082                           const char *fname,
2083                           SMB_STRUCT_STAT *psbuf, files_struct **result)
2084 {
2085         files_struct *fsp = NULL;
2086         NTSTATUS status;
2087
2088         if (!VALID_STAT(*psbuf)) {
2089                 return NT_STATUS_INVALID_PARAMETER;
2090         }
2091
2092         status = file_new(req, conn, &fsp);
2093         if(!NT_STATUS_IS_OK(status)) {
2094                 return status;
2095         }
2096
2097         status = SMB_VFS_CREATE_FILE(
2098                 conn,                                   /* conn */
2099                 NULL,                                   /* req */
2100                 0,                                      /* root_dir_fid */
2101                 fname,                                  /* fname */
2102                 0,                                      /* create_file_flags */
2103                 FILE_WRITE_DATA,                        /* access_mask */
2104                 (FILE_SHARE_READ | FILE_SHARE_WRITE |   /* share_access */
2105                     FILE_SHARE_DELETE),
2106                 FILE_OPEN,                              /* create_disposition*/
2107                 0,                                      /* create_options */
2108                 0,                                      /* file_attributes */
2109                 0,                                      /* oplock_request */
2110                 0,                                      /* allocation_size */
2111                 NULL,                                   /* sd */
2112                 NULL,                                   /* ea_list */
2113                 &fsp,                                   /* result */
2114                 NULL,                                   /* pinfo */
2115                 psbuf);                                 /* psbuf */
2116
2117         /*
2118          * This is not a user visible file open.
2119          * Don't set a share mode.
2120          */
2121
2122         if (!NT_STATUS_IS_OK(status)) {
2123                 file_free(req, fsp);
2124                 return status;
2125         }
2126
2127         *result = fsp;
2128         return NT_STATUS_OK;
2129 }
2130
2131 /****************************************************************************
2132  Close the fchmod file fd - ensure no locks are lost.
2133 ****************************************************************************/
2134
2135 NTSTATUS close_file_fchmod(struct smb_request *req, files_struct *fsp)
2136 {
2137         NTSTATUS status = fd_close(fsp);
2138         file_free(req, fsp);
2139         return status;
2140 }
2141
2142 static NTSTATUS mkdir_internal(connection_struct *conn,
2143                                 const char *name,
2144                                 uint32 file_attributes,
2145                                 SMB_STRUCT_STAT *psbuf)
2146 {
2147         mode_t mode;
2148         char *parent_dir;
2149         const char *dirname;
2150         NTSTATUS status;
2151         bool posix_open = false;
2152
2153         if(!CAN_WRITE(conn)) {
2154                 DEBUG(5,("mkdir_internal: failing create on read-only share "
2155                          "%s\n", lp_servicename(SNUM(conn))));
2156                 return NT_STATUS_ACCESS_DENIED;
2157         }
2158
2159         status = check_name(conn, name);
2160         if (!NT_STATUS_IS_OK(status)) {
2161                 return status;
2162         }
2163
2164         if (!parent_dirname_talloc(talloc_tos(), name, &parent_dir,
2165                                    &dirname)) {
2166                 return NT_STATUS_NO_MEMORY;
2167         }
2168
2169         if (file_attributes & FILE_FLAG_POSIX_SEMANTICS) {
2170                 posix_open = true;
2171                 mode = (mode_t)(file_attributes & ~FILE_FLAG_POSIX_SEMANTICS);
2172         } else {
2173                 mode = unix_mode(conn, aDIR, name, parent_dir);
2174         }
2175
2176         if (SMB_VFS_MKDIR(conn, name, mode) != 0) {
2177                 return map_nt_error_from_unix(errno);
2178         }
2179
2180         /* Ensure we're checking for a symlink here.... */
2181         /* We don't want to get caught by a symlink racer. */
2182
2183         if (SMB_VFS_LSTAT(conn, name, psbuf) == -1) {
2184                 DEBUG(2, ("Could not stat directory '%s' just created: %s\n",
2185                           name, strerror(errno)));
2186                 return map_nt_error_from_unix(errno);
2187         }
2188
2189         if (!S_ISDIR(psbuf->st_mode)) {
2190                 DEBUG(0, ("Directory just '%s' created is not a directory\n",
2191                           name));
2192                 return NT_STATUS_ACCESS_DENIED;
2193         }
2194
2195         if (lp_store_dos_attributes(SNUM(conn))) {
2196                 if (!posix_open) {
2197                         file_set_dosmode(conn, name,
2198                                  file_attributes | aDIR, NULL,
2199                                  parent_dir,
2200                                  true);
2201                 }
2202         }
2203
2204         if (lp_inherit_perms(SNUM(conn))) {
2205                 inherit_access_posix_acl(conn, parent_dir, name, mode);
2206         }
2207
2208         if (!(file_attributes & FILE_FLAG_POSIX_SEMANTICS)) {
2209                 /*
2210                  * Check if high bits should have been set,
2211                  * then (if bits are missing): add them.
2212                  * Consider bits automagically set by UNIX, i.e. SGID bit from parent
2213                  * dir.
2214                  */
2215                 if (mode & ~(S_IRWXU|S_IRWXG|S_IRWXO) && (mode & ~psbuf->st_mode)) {
2216                         SMB_VFS_CHMOD(conn, name,
2217                                       psbuf->st_mode | (mode & ~psbuf->st_mode));
2218                 }
2219         }
2220
2221         /* Change the owner if required. */
2222         if (lp_inherit_owner(SNUM(conn))) {
2223                 change_dir_owner_to_parent(conn, parent_dir, name, psbuf);
2224         }
2225
2226         notify_fname(conn, NOTIFY_ACTION_ADDED, FILE_NOTIFY_CHANGE_DIR_NAME,
2227                      name);
2228
2229         return NT_STATUS_OK;
2230 }
2231
2232 /****************************************************************************
2233  Open a directory from an NT SMB call.
2234 ****************************************************************************/
2235
2236 static NTSTATUS open_directory(connection_struct *conn,
2237                                struct smb_request *req,
2238                                const char *fname,
2239                                SMB_STRUCT_STAT *psbuf,
2240                                uint32 access_mask,
2241                                uint32 share_access,
2242                                uint32 create_disposition,
2243                                uint32 create_options,
2244                                uint32 file_attributes,
2245                                int *pinfo,
2246                                files_struct **result)
2247 {
2248         files_struct *fsp = NULL;
2249         bool dir_existed = VALID_STAT(*psbuf) ? True : False;
2250         struct share_mode_lock *lck = NULL;
2251         NTSTATUS status;
2252         struct timespec mtimespec;
2253         int info = 0;
2254
2255         DEBUG(5,("open_directory: opening directory %s, access_mask = 0x%x, "
2256                  "share_access = 0x%x create_options = 0x%x, "
2257                  "create_disposition = 0x%x, file_attributes = 0x%x\n",
2258                  fname,
2259                  (unsigned int)access_mask,
2260                  (unsigned int)share_access,
2261                  (unsigned int)create_options,
2262                  (unsigned int)create_disposition,
2263                  (unsigned int)file_attributes));
2264
2265         if (!(file_attributes & FILE_FLAG_POSIX_SEMANTICS) &&
2266                         (conn->fs_capabilities & FILE_NAMED_STREAMS) &&
2267                         is_ntfs_stream_name(fname)) {
2268                 DEBUG(2, ("open_directory: %s is a stream name!\n", fname));
2269                 return NT_STATUS_NOT_A_DIRECTORY;
2270         }
2271
2272         status = calculate_access_mask(conn, fname, dir_existed,
2273                                         access_mask,
2274                                         &access_mask);
2275         if (!NT_STATUS_IS_OK(status)) {
2276                 DEBUG(10, ("open_directory: calculate_access_mask "
2277                         "on file %s returned %s\n",
2278                         fname,
2279                         nt_errstr(status)));
2280                 return status;
2281         }
2282
2283         switch( create_disposition ) {
2284                 case FILE_OPEN:
2285
2286                         info = FILE_WAS_OPENED;
2287
2288                         /*
2289                          * We want to follow symlinks here.
2290                          */
2291
2292                         if (SMB_VFS_STAT(conn, fname, psbuf) != 0) {
2293                                 return map_nt_error_from_unix(errno);
2294                         }
2295
2296                         break;
2297
2298                 case FILE_CREATE:
2299
2300                         /* If directory exists error. If directory doesn't
2301                          * exist create. */
2302
2303                         status = mkdir_internal(conn,
2304                                                 fname,
2305                                                 file_attributes,
2306                                                 psbuf);
2307
2308                         if (!NT_STATUS_IS_OK(status)) {
2309                                 DEBUG(2, ("open_directory: unable to create "
2310                                           "%s. Error was %s\n", fname,
2311                                           nt_errstr(status)));
2312                                 return status;
2313                         }
2314
2315                         info = FILE_WAS_CREATED;
2316                         break;
2317
2318                 case FILE_OPEN_IF:
2319                         /*
2320                          * If directory exists open. If directory doesn't
2321                          * exist create.
2322                          */
2323
2324                         status = mkdir_internal(conn,
2325                                                 fname,
2326                                                 file_attributes,
2327                                                 psbuf);
2328
2329                         if (NT_STATUS_IS_OK(status)) {
2330                                 info = FILE_WAS_CREATED;
2331                         }
2332
2333                         if (NT_STATUS_EQUAL(status,
2334                                             NT_STATUS_OBJECT_NAME_COLLISION)) {
2335                                 info = FILE_WAS_OPENED;
2336                                 status = NT_STATUS_OK;
2337                         }
2338
2339                         break;
2340
2341                 case FILE_SUPERSEDE:
2342                 case FILE_OVERWRITE:
2343                 case FILE_OVERWRITE_IF:
2344                 default:
2345                         DEBUG(5,("open_directory: invalid create_disposition "
2346                                  "0x%x for directory %s\n",
2347                                  (unsigned int)create_disposition, fname));
2348                         return NT_STATUS_INVALID_PARAMETER;
2349         }
2350
2351         if(!S_ISDIR(psbuf->st_mode)) {
2352                 DEBUG(5,("open_directory: %s is not a directory !\n",
2353                          fname ));
2354                 return NT_STATUS_NOT_A_DIRECTORY;
2355         }
2356
2357         if (info == FILE_WAS_OPENED) {
2358                 status = check_open_rights(conn,
2359                                         fname,
2360                                         access_mask);
2361                 if (!NT_STATUS_IS_OK(status)) {
2362                         DEBUG(10, ("open_directory: check_open_rights on "
2363                                 "file %s failed with %s\n",
2364                                 fname,
2365                                 nt_errstr(status)));
2366                         return status;
2367                 }
2368         }
2369
2370         status = file_new(req, conn, &fsp);
2371         if(!NT_STATUS_IS_OK(status)) {
2372                 return status;
2373         }
2374
2375         /*
2376          * Setup the files_struct for it.
2377          */
2378
2379         fsp->mode = psbuf->st_mode;
2380         fsp->file_id = vfs_file_id_from_sbuf(conn, psbuf);
2381         fsp->vuid = req ? req->vuid : UID_FIELD_INVALID;
2382         fsp->file_pid = req ? req->smbpid : 0;
2383         fsp->can_lock = False;
2384         fsp->can_read = False;
2385         fsp->can_write = False;
2386
2387         fsp->share_access = share_access;
2388         fsp->fh->private_options = create_options;
2389         /*
2390          * According to Samba4, SEC_FILE_READ_ATTRIBUTE is always granted,
2391          */
2392         fsp->access_mask = access_mask | FILE_READ_ATTRIBUTES;
2393         fsp->print_file = False;
2394         fsp->modified = False;
2395         fsp->oplock_type = NO_OPLOCK;
2396         fsp->sent_oplock_break = NO_BREAK_SENT;
2397         fsp->is_directory = True;
2398         fsp->posix_open = (file_attributes & FILE_FLAG_POSIX_SEMANTICS) ? True : False;
2399
2400         string_set(&fsp->fsp_name,fname);
2401
2402         mtimespec = get_mtimespec(psbuf);
2403
2404         lck = get_share_mode_lock(talloc_tos(), fsp->file_id,
2405                                   conn->connectpath,
2406                                   fname, &mtimespec);
2407
2408         if (lck == NULL) {
2409                 DEBUG(0, ("open_directory: Could not get share mode lock for %s\n", fname));
2410                 file_free(req, fsp);
2411                 return NT_STATUS_SHARING_VIOLATION;
2412         }
2413
2414         status = open_mode_check(conn, fname, lck,
2415                                 access_mask, share_access,
2416                                 create_options, &dir_existed);
2417
2418         if (!NT_STATUS_IS_OK(status)) {
2419                 TALLOC_FREE(lck);
2420                 file_free(req, fsp);
2421                 return status;
2422         }
2423
2424         set_share_mode(lck, fsp, conn->server_info->utok.uid, 0, NO_OPLOCK,
2425                        True);
2426
2427         /* For directories the delete on close bit at open time seems
2428            always to be honored on close... See test 19 in Samba4 BASE-DELETE. */
2429         if (create_options & FILE_DELETE_ON_CLOSE) {
2430                 status = can_set_delete_on_close(fsp, True, 0);
2431                 if (!NT_STATUS_IS_OK(status) && !NT_STATUS_EQUAL(status, NT_STATUS_DIRECTORY_NOT_EMPTY)) {
2432                         TALLOC_FREE(lck);
2433                         file_free(req, fsp);
2434                         return status;
2435                 }
2436
2437                 if (NT_STATUS_IS_OK(status)) {
2438                         /* Note that here we set the *inital* delete on close flag,
2439                            not the regular one. The magic gets handled in close. */
2440                         fsp->initial_delete_on_close = True;
2441                 }
2442         }
2443
2444         TALLOC_FREE(lck);
2445
2446         if (pinfo) {
2447                 *pinfo = info;
2448         }
2449
2450         *result = fsp;
2451         return NT_STATUS_OK;
2452 }
2453
2454 NTSTATUS create_directory(connection_struct *conn, struct smb_request *req, const char *directory)
2455 {
2456         NTSTATUS status;
2457         SMB_STRUCT_STAT sbuf;
2458         files_struct *fsp;
2459
2460         SET_STAT_INVALID(sbuf);
2461
2462         status = SMB_VFS_CREATE_FILE(
2463                 conn,                                   /* conn */
2464                 req,                                    /* req */
2465                 0,                                      /* root_dir_fid */
2466                 directory,                              /* fname */
2467                 0,                                      /* create_file_flags */
2468                 FILE_READ_ATTRIBUTES,                   /* access_mask */
2469                 FILE_SHARE_NONE,                        /* share_access */
2470                 FILE_CREATE,                            /* create_disposition*/
2471                 FILE_DIRECTORY_FILE,                    /* create_options */
2472                 FILE_ATTRIBUTE_DIRECTORY,               /* file_attributes */
2473                 0,                                      /* oplock_request */
2474                 0,                                      /* allocation_size */
2475                 NULL,                                   /* sd */
2476                 NULL,                                   /* ea_list */
2477                 &fsp,                                   /* result */
2478                 NULL,                                   /* pinfo */
2479                 &sbuf);                                 /* psbuf */
2480
2481         if (NT_STATUS_IS_OK(status)) {
2482                 close_file(req, fsp, NORMAL_CLOSE);
2483         }
2484
2485         return status;
2486 }
2487
2488 /****************************************************************************
2489  Receive notification that one of our open files has been renamed by another
2490  smbd process.
2491 ****************************************************************************/
2492
2493 void msg_file_was_renamed(struct messaging_context *msg,
2494                           void *private_data,
2495                           uint32_t msg_type,
2496                           struct server_id server_id,
2497                           DATA_BLOB *data)
2498 {
2499         files_struct *fsp;
2500         char *frm = (char *)data->data;
2501         struct file_id id;
2502         const char *sharepath;
2503         const char *newname;
2504         size_t sp_len;
2505
2506         if (data->data == NULL
2507             || data->length < MSG_FILE_RENAMED_MIN_SIZE + 2) {
2508                 DEBUG(0, ("msg_file_was_renamed: Got invalid msg len %d\n",
2509                           (int)data->length));
2510                 return;
2511         }
2512
2513         /* Unpack the message. */
2514         pull_file_id_16(frm, &id);
2515         sharepath = &frm[16];
2516         newname = sharepath + strlen(sharepath) + 1;
2517         sp_len = strlen(sharepath);
2518
2519         DEBUG(10,("msg_file_was_renamed: Got rename message for sharepath %s, new name %s, "
2520                 "file_id %s\n",
2521                   sharepath, newname, file_id_string_tos(&id)));
2522
2523         for(fsp = file_find_di_first(id); fsp; fsp = file_find_di_next(fsp)) {
2524                 if (memcmp(fsp->conn->connectpath, sharepath, sp_len) == 0) {
2525                         DEBUG(10,("msg_file_was_renamed: renaming file fnum %d from %s -> %s\n",
2526                                 fsp->fnum, fsp->fsp_name, newname ));
2527                         string_set(&fsp->fsp_name, newname);
2528                 } else {
2529                         /* TODO. JRA. */
2530                         /* Now we have the complete path we can work out if this is
2531                            actually within this share and adjust newname accordingly. */
2532                         DEBUG(10,("msg_file_was_renamed: share mismatch (sharepath %s "
2533                                 "not sharepath %s) "
2534                                 "fnum %d from %s -> %s\n",
2535                                 fsp->conn->connectpath,
2536                                 sharepath,
2537                                 fsp->fnum,
2538                                 fsp->fsp_name,
2539                                 newname ));
2540                 }
2541         }
2542 }
2543
2544 struct case_semantics_state {
2545         connection_struct *conn;
2546         bool case_sensitive;
2547         bool case_preserve;
2548         bool short_case_preserve;
2549 };
2550
2551 /****************************************************************************
2552  Restore case semantics.
2553 ****************************************************************************/
2554 static int restore_case_semantics(struct case_semantics_state *state)
2555 {
2556         state->conn->case_sensitive = state->case_sensitive;
2557         state->conn->case_preserve = state->case_preserve;
2558         state->conn->short_case_preserve = state->short_case_preserve;
2559         return 0;
2560 }
2561
2562 /****************************************************************************
2563  Save case semantics.
2564 ****************************************************************************/
2565 static struct case_semantics_state *set_posix_case_semantics(TALLOC_CTX *mem_ctx,
2566                                                              connection_struct *conn)
2567 {
2568         struct case_semantics_state *result;
2569
2570         if (!(result = talloc(mem_ctx, struct case_semantics_state))) {
2571                 DEBUG(0, ("talloc failed\n"));
2572                 return NULL;
2573         }
2574
2575         result->conn = conn;
2576         result->case_sensitive = conn->case_sensitive;
2577         result->case_preserve = conn->case_preserve;
2578         result->short_case_preserve = conn->short_case_preserve;
2579
2580         /* Set to POSIX. */
2581         conn->case_sensitive = True;
2582         conn->case_preserve = True;
2583         conn->short_case_preserve = True;
2584
2585         talloc_set_destructor(result, restore_case_semantics);
2586
2587         return result;
2588 }
2589
2590 /*
2591  * If a main file is opened for delete, all streams need to be checked for
2592  * !FILE_SHARE_DELETE. Do this by opening with DELETE_ACCESS.
2593  * If that works, delete them all by setting the delete on close and close.
2594  */
2595
2596 static NTSTATUS open_streams_for_delete(connection_struct *conn,
2597                                         const char *fname)
2598 {
2599         struct stream_struct *stream_info;
2600         files_struct **streams;
2601         int i;
2602         unsigned int num_streams;
2603         TALLOC_CTX *frame = talloc_stackframe();
2604         NTSTATUS status;
2605
2606         status = SMB_VFS_STREAMINFO(conn, NULL, fname, talloc_tos(),
2607                                     &num_streams, &stream_info);
2608
2609         if (NT_STATUS_EQUAL(status, NT_STATUS_NOT_IMPLEMENTED)
2610             || NT_STATUS_EQUAL(status, NT_STATUS_OBJECT_NAME_NOT_FOUND)) {
2611                 DEBUG(10, ("no streams around\n"));
2612                 TALLOC_FREE(frame);
2613                 return NT_STATUS_OK;
2614         }
2615
2616         if (!NT_STATUS_IS_OK(status)) {
2617                 DEBUG(10, ("SMB_VFS_STREAMINFO failed: %s\n",
2618                            nt_errstr(status)));
2619                 goto fail;
2620         }
2621
2622         DEBUG(10, ("open_streams_for_delete found %d streams\n",
2623                    num_streams));
2624
2625         if (num_streams == 0) {
2626                 TALLOC_FREE(frame);
2627                 return NT_STATUS_OK;
2628         }
2629
2630         streams = TALLOC_ARRAY(talloc_tos(), files_struct *, num_streams);
2631         if (streams == NULL) {
2632                 DEBUG(0, ("talloc failed\n"));
2633                 status = NT_STATUS_NO_MEMORY;
2634                 goto fail;
2635         }
2636
2637         for (i=0; i<num_streams; i++) {
2638                 char *streamname;
2639
2640                 if (strequal(stream_info[i].name, "::$DATA")) {
2641                         streams[i] = NULL;
2642                         continue;
2643                 }
2644
2645                 streamname = talloc_asprintf(talloc_tos(), "%s%s", fname,
2646                                              stream_info[i].name);
2647
2648                 if (streamname == NULL) {
2649                         DEBUG(0, ("talloc_aprintf failed\n"));
2650                         status = NT_STATUS_NO_MEMORY;
2651                         goto fail;
2652                 }
2653
2654                 status = create_file_unixpath
2655                         (conn,                  /* conn */
2656                          NULL,                  /* req */
2657                          streamname,            /* fname */
2658                          DELETE_ACCESS,         /* access_mask */
2659                          FILE_SHARE_READ | FILE_SHARE_WRITE
2660                          | FILE_SHARE_DELETE,   /* share_access */
2661                          FILE_OPEN,             /* create_disposition*/
2662                          NTCREATEX_OPTIONS_PRIVATE_STREAM_DELETE, /* create_options */
2663                          FILE_ATTRIBUTE_NORMAL, /* file_attributes */
2664                          0,                     /* oplock_request */
2665                          0,                     /* allocation_size */
2666                          NULL,                  /* sd */
2667                          NULL,                  /* ea_list */
2668                          &streams[i],           /* result */
2669                          NULL,                  /* pinfo */
2670                          NULL);                 /* psbuf */
2671
2672                 TALLOC_FREE(streamname);
2673
2674                 if (!NT_STATUS_IS_OK(status)) {
2675                         DEBUG(10, ("Could not open stream %s: %s\n",
2676                                    streamname, nt_errstr(status)));
2677                         break;
2678                 }
2679         }
2680
2681         /*
2682          * don't touch the variable "status" beyond this point :-)
2683          */
2684
2685         for (i -= 1 ; i >= 0; i--) {
2686                 if (streams[i] == NULL) {
2687                         continue;
2688                 }
2689
2690                 DEBUG(10, ("Closing stream # %d, %s\n", i,
2691                            streams[i]->fsp_name));
2692                 close_file(NULL, streams[i], NORMAL_CLOSE);
2693         }
2694
2695  fail:
2696         TALLOC_FREE(frame);
2697         return status;
2698 }
2699
2700 /*
2701  * Wrapper around open_file_ntcreate and open_directory
2702  */
2703
2704 static NTSTATUS create_file_unixpath(connection_struct *conn,
2705                                      struct smb_request *req,
2706                                      const char *fname,
2707                                      uint32_t access_mask,
2708                                      uint32_t share_access,
2709                                      uint32_t create_disposition,
2710                                      uint32_t create_options,
2711                                      uint32_t file_attributes,
2712                                      uint32_t oplock_request,
2713                                      uint64_t allocation_size,
2714                                      struct security_descriptor *sd,
2715                                      struct ea_list *ea_list,
2716
2717                                      files_struct **result,
2718                                      int *pinfo,
2719                                      SMB_STRUCT_STAT *psbuf)
2720 {
2721         SMB_STRUCT_STAT sbuf;
2722         int info = FILE_WAS_OPENED;
2723         files_struct *base_fsp = NULL;
2724         files_struct *fsp = NULL;
2725         NTSTATUS status;
2726
2727         DEBUG(10,("create_file_unixpath: access_mask = 0x%x "
2728                   "file_attributes = 0x%x, share_access = 0x%x, "
2729                   "create_disposition = 0x%x create_options = 0x%x "
2730                   "oplock_request = 0x%x ea_list = 0x%p, sd = 0x%p, "
2731                   "fname = %s\n",
2732                   (unsigned int)access_mask,
2733                   (unsigned int)file_attributes,
2734                   (unsigned int)share_access,
2735                   (unsigned int)create_disposition,
2736                   (unsigned int)create_options,
2737                   (unsigned int)oplock_request,
2738                   ea_list, sd, fname));
2739
2740         if (create_options & FILE_OPEN_BY_FILE_ID) {
2741                 status = NT_STATUS_NOT_SUPPORTED;
2742                 goto fail;
2743         }
2744
2745         if (create_options & NTCREATEX_OPTIONS_INVALID_PARAM_MASK) {
2746                 status = NT_STATUS_INVALID_PARAMETER;
2747                 goto fail;
2748         }
2749
2750         if (req == NULL) {
2751                 oplock_request |= INTERNAL_OPEN_ONLY;
2752         }
2753
2754         if (psbuf != NULL) {
2755                 sbuf = *psbuf;
2756         }
2757         else {
2758                 if (SMB_VFS_STAT(conn, fname, &sbuf) == -1) {
2759                         SET_STAT_INVALID(sbuf);
2760                 }
2761         }
2762
2763         if ((conn->fs_capabilities & FILE_NAMED_STREAMS)
2764             && (access_mask & DELETE_ACCESS)
2765             && !is_ntfs_stream_name(fname)) {
2766                 /*
2767                  * We can't open a file with DELETE access if any of the
2768                  * streams is open without FILE_SHARE_DELETE
2769                  */
2770                 status = open_streams_for_delete(conn, fname);
2771
2772                 if (!NT_STATUS_IS_OK(status)) {
2773                         goto fail;
2774                 }
2775         }
2776
2777         /* This is the correct thing to do (check every time) but can_delete
2778          * is expensive (it may have to read the parent directory
2779          * permissions). So for now we're not doing it unless we have a strong
2780          * hint the client is really going to delete this file. If the client
2781          * is forcing FILE_CREATE let the filesystem take care of the
2782          * permissions. */
2783
2784         /* Setting FILE_SHARE_DELETE is the hint. */
2785
2786         if (lp_acl_check_permissions(SNUM(conn))
2787             && (create_disposition != FILE_CREATE)
2788             && (share_access & FILE_SHARE_DELETE)
2789             && (access_mask & DELETE_ACCESS)
2790             && (!can_delete_file_in_directory(conn, fname))) {
2791                 status = NT_STATUS_ACCESS_DENIED;
2792                 goto fail;
2793         }
2794
2795 #if 0
2796         /* We need to support SeSecurityPrivilege for this. */
2797         if ((access_mask & SEC_RIGHT_SYSTEM_SECURITY) &&
2798             !user_has_privileges(current_user.nt_user_token,
2799                                  &se_security)) {
2800                 status = NT_STATUS_PRIVILEGE_NOT_HELD;
2801                 goto fail;
2802         }
2803 #endif
2804
2805         if ((conn->fs_capabilities & FILE_NAMED_STREAMS)
2806             && is_ntfs_stream_name(fname)
2807             && (!(create_options & NTCREATEX_OPTIONS_PRIVATE_STREAM_DELETE))) {
2808                 char *base;
2809                 uint32 base_create_disposition;
2810
2811                 if (create_options & FILE_DIRECTORY_FILE) {
2812                         status = NT_STATUS_NOT_A_DIRECTORY;
2813                         goto fail;
2814                 }
2815
2816                 status = split_ntfs_stream_name(talloc_tos(), fname,
2817                                                 &base, NULL);
2818                 if (!NT_STATUS_IS_OK(status)) {
2819                         DEBUG(10, ("create_file_unixpath: "
2820                                 "split_ntfs_stream_name failed: %s\n",
2821                                 nt_errstr(status)));
2822                         goto fail;
2823                 }
2824
2825                 SMB_ASSERT(!is_ntfs_stream_name(base)); /* paranoia.. */
2826
2827                 switch (create_disposition) {
2828                 case FILE_OPEN:
2829                         base_create_disposition = FILE_OPEN;
2830                         break;
2831                 default:
2832                         base_create_disposition = FILE_OPEN_IF;
2833                         break;
2834                 }
2835
2836                 status = create_file_unixpath(conn, NULL, base, 0,
2837                                               FILE_SHARE_READ
2838                                               | FILE_SHARE_WRITE
2839                                               | FILE_SHARE_DELETE,
2840                                               base_create_disposition,
2841                                               0, 0, 0, 0, NULL, NULL,
2842                                               &base_fsp, NULL, NULL);
2843                 if (!NT_STATUS_IS_OK(status)) {
2844                         DEBUG(10, ("create_file_unixpath for base %s failed: "
2845                                    "%s\n", base, nt_errstr(status)));
2846                         goto fail;
2847                 }
2848                 /* we don't need to low level fd */
2849                 fd_close(base_fsp);
2850         }
2851
2852         /*
2853          * If it's a request for a directory open, deal with it separately.
2854          */
2855
2856         if (create_options & FILE_DIRECTORY_FILE) {
2857
2858                 if (create_options & FILE_NON_DIRECTORY_FILE) {
2859                         status = NT_STATUS_INVALID_PARAMETER;
2860                         goto fail;
2861                 }
2862
2863                 /* Can't open a temp directory. IFS kit test. */
2864                 if (!(file_attributes & FILE_FLAG_POSIX_SEMANTICS) &&
2865                      (file_attributes & FILE_ATTRIBUTE_TEMPORARY)) {
2866                         status = NT_STATUS_INVALID_PARAMETER;
2867                         goto fail;
2868                 }
2869
2870                 /*
2871                  * We will get a create directory here if the Win32
2872                  * app specified a security descriptor in the
2873                  * CreateDirectory() call.
2874                  */
2875
2876                 oplock_request = 0;
2877                 status = open_directory(
2878                         conn, req, fname, &sbuf, access_mask, share_access,
2879                         create_disposition, create_options, file_attributes,
2880                         &info, &fsp);
2881         } else {
2882
2883                 /*
2884                  * Ordinary file case.
2885                  */
2886
2887                 status = file_new(req, conn, &fsp);
2888                 if(!NT_STATUS_IS_OK(status)) {
2889                         goto fail;
2890                 }
2891
2892                 /*
2893                  * We're opening the stream element of a base_fsp
2894                  * we already opened. Set up the base_fsp pointer.
2895                  */
2896                 if (base_fsp) {
2897                         fsp->base_fsp = base_fsp;
2898                 }
2899
2900                 status = open_file_ntcreate(conn,
2901                                             req,
2902                                             fname,
2903                                             &sbuf,
2904                                             access_mask,
2905                                             share_access,
2906                                             create_disposition,
2907                                             create_options,
2908                                             file_attributes,
2909                                             oplock_request,
2910                                             &info,
2911                                             fsp);
2912
2913                 if(!NT_STATUS_IS_OK(status)) {
2914                         file_free(req, fsp);
2915                         fsp = NULL;
2916                 }
2917
2918                 if (NT_STATUS_EQUAL(status, NT_STATUS_FILE_IS_A_DIRECTORY)) {
2919
2920                         /* A stream open never opens a directory */
2921
2922                         if (base_fsp) {
2923                                 status = NT_STATUS_FILE_IS_A_DIRECTORY;
2924                                 goto fail;
2925                         }
2926
2927                         /*
2928                          * Fail the open if it was explicitly a non-directory
2929                          * file.
2930                          */
2931
2932                         if (create_options & FILE_NON_DIRECTORY_FILE) {
2933                                 status = NT_STATUS_FILE_IS_A_DIRECTORY;
2934                                 goto fail;
2935                         }
2936
2937                         oplock_request = 0;
2938                         status = open_directory(
2939                                 conn, req, fname, &sbuf, access_mask,
2940                                 share_access, create_disposition,
2941                                 create_options, file_attributes,
2942                                 &info, &fsp);
2943                 }
2944         }
2945
2946         if (!NT_STATUS_IS_OK(status)) {
2947                 goto fail;
2948         }
2949
2950         fsp->base_fsp = base_fsp;
2951
2952         /*
2953          * According to the MS documentation, the only time the security
2954          * descriptor is applied to the opened file is iff we *created* the
2955          * file; an existing file stays the same.
2956          *
2957          * Also, it seems (from observation) that you can open the file with
2958          * any access mask but you can still write the sd. We need to override
2959          * the granted access before we call set_sd
2960          * Patch for bug #2242 from Tom Lackemann <cessnatomny@yahoo.com>.
2961          */
2962
2963         if ((sd != NULL) && (info == FILE_WAS_CREATED)
2964             && lp_nt_acl_support(SNUM(conn))) {
2965
2966                 uint32_t sec_info_sent = ALL_SECURITY_INFORMATION;
2967                 uint32_t saved_access_mask = fsp->access_mask;
2968
2969                 if (sd->owner_sid == NULL) {
2970                         sec_info_sent &= ~OWNER_SECURITY_INFORMATION;
2971                 }
2972                 if (sd->group_sid == NULL) {
2973                         sec_info_sent &= ~GROUP_SECURITY_INFORMATION;
2974                 }
2975                 if (sd->sacl == NULL) {
2976                         sec_info_sent &= ~SACL_SECURITY_INFORMATION;
2977                 }
2978                 if (sd->dacl == NULL) {
2979                         sec_info_sent &= ~DACL_SECURITY_INFORMATION;
2980                 }
2981
2982                 fsp->access_mask = FILE_GENERIC_ALL;
2983
2984                 /* Convert all the generic bits. */
2985                 security_acl_map_generic(sd->dacl, &file_generic_mapping);
2986                 security_acl_map_generic(sd->sacl, &file_generic_mapping);
2987
2988                 if (sec_info_sent & (OWNER_SECURITY_INFORMATION|
2989                                         GROUP_SECURITY_INFORMATION|
2990                                         DACL_SECURITY_INFORMATION|
2991                                         SACL_SECURITY_INFORMATION)) {
2992                         status = SMB_VFS_FSET_NT_ACL(fsp, sec_info_sent, sd);
2993                 }
2994
2995                 fsp->access_mask = saved_access_mask;
2996
2997                 if (!NT_STATUS_IS_OK(status)) {
2998                         goto fail;
2999                 }
3000         }
3001
3002         if ((ea_list != NULL) && (info == FILE_WAS_CREATED)) {
3003                 status = set_ea(conn, fsp, fname, ea_list);
3004                 if (!NT_STATUS_IS_OK(status)) {
3005                         goto fail;
3006                 }
3007         }
3008
3009         if (!fsp->is_directory && S_ISDIR(sbuf.st_mode)) {
3010                 status = NT_STATUS_ACCESS_DENIED;
3011                 goto fail;
3012         }
3013
3014         /* Save the requested allocation size. */
3015         if ((info == FILE_WAS_CREATED) || (info == FILE_WAS_OVERWRITTEN)) {
3016                 if (allocation_size
3017                     && (allocation_size > sbuf.st_size)) {
3018                         fsp->initial_allocation_size = smb_roundup(
3019                                 fsp->conn, allocation_size);
3020                         if (fsp->is_directory) {
3021                                 /* Can't set allocation size on a directory. */
3022                                 status = NT_STATUS_ACCESS_DENIED;
3023                                 goto fail;
3024                         }
3025                         if (vfs_allocate_file_space(
3026                                     fsp, fsp->initial_allocation_size) == -1) {
3027                                 status = NT_STATUS_DISK_FULL;
3028                                 goto fail;
3029                         }
3030                 } else {
3031                         fsp->initial_allocation_size = smb_roundup(
3032                                 fsp->conn, (uint64_t)sbuf.st_size);
3033                 }
3034         }
3035
3036         DEBUG(10, ("create_file_unixpath: info=%d\n", info));
3037
3038         *result = fsp;
3039         if (pinfo != NULL) {
3040                 *pinfo = info;
3041         }
3042         if (psbuf != NULL) {
3043                 if ((fsp->fh == NULL) || (fsp->fh->fd == -1)) {
3044                         *psbuf = sbuf;
3045                 }
3046                 else {
3047                         SMB_VFS_FSTAT(fsp, psbuf);
3048                 }
3049         }
3050         return NT_STATUS_OK;
3051
3052  fail:
3053         DEBUG(10, ("create_file_unixpath: %s\n", nt_errstr(status)));
3054
3055         if (fsp != NULL) {
3056                 if (base_fsp && fsp->base_fsp == base_fsp) {
3057                         /*
3058                          * The close_file below will close
3059                          * fsp->base_fsp.
3060                          */
3061                         base_fsp = NULL;
3062                 }
3063                 close_file(req, fsp, ERROR_CLOSE);
3064                 fsp = NULL;
3065         }
3066         if (base_fsp != NULL) {
3067                 close_file(req, base_fsp, ERROR_CLOSE);
3068                 base_fsp = NULL;
3069         }
3070         return status;
3071 }
3072
3073 NTSTATUS create_file_default(connection_struct *conn,
3074                              struct smb_request *req,
3075                              uint16_t root_dir_fid,
3076                              const char *fname,
3077                              uint32_t create_file_flags,
3078                              uint32_t access_mask,
3079                              uint32_t share_access,
3080                              uint32_t create_disposition,
3081                              uint32_t create_options,
3082                              uint32_t file_attributes,
3083                              uint32_t oplock_request,
3084                              uint64_t allocation_size,
3085                              struct security_descriptor *sd,
3086                              struct ea_list *ea_list,
3087
3088                              files_struct **result,
3089                              int *pinfo,
3090                              SMB_STRUCT_STAT *psbuf)
3091 {
3092         struct case_semantics_state *case_state = NULL;
3093         SMB_STRUCT_STAT sbuf;
3094         int info = FILE_WAS_OPENED;
3095         files_struct *fsp = NULL;
3096         NTSTATUS status;
3097
3098         DEBUG(10,("create_file: access_mask = 0x%x "
3099                   "file_attributes = 0x%x, share_access = 0x%x, "
3100                   "create_disposition = 0x%x create_options = 0x%x "
3101                   "oplock_request = 0x%x "
3102                   "root_dir_fid = 0x%x, ea_list = 0x%p, sd = 0x%p, "
3103                   "create_file_flags = 0x%x, fname = %s\n",
3104                   (unsigned int)access_mask,
3105                   (unsigned int)file_attributes,
3106                   (unsigned int)share_access,
3107                   (unsigned int)create_disposition,
3108                   (unsigned int)create_options,
3109                   (unsigned int)oplock_request,
3110                   (unsigned int)root_dir_fid,
3111                   ea_list, sd, create_file_flags, fname));
3112
3113         /*
3114          * Get the file name.
3115          */
3116
3117         if (root_dir_fid != 0) {
3118                 /*
3119                  * This filename is relative to a directory fid.
3120                  */
3121                 char *parent_fname = NULL;
3122                 files_struct *dir_fsp = file_fsp(req, root_dir_fid);
3123
3124                 if (dir_fsp == NULL) {
3125                         status = NT_STATUS_INVALID_HANDLE;
3126                         goto fail;
3127                 }
3128
3129                 if (!dir_fsp->is_directory) {
3130
3131                         /*
3132                          * Check to see if this is a mac fork of some kind.
3133                          */
3134
3135                         if ((conn->fs_capabilities & FILE_NAMED_STREAMS) &&
3136                                         is_ntfs_stream_name(fname)) {
3137                                 status = NT_STATUS_OBJECT_PATH_NOT_FOUND;
3138                                 goto fail;
3139                         }
3140
3141                         /*
3142                           we need to handle the case when we get a
3143                           relative open relative to a file and the
3144                           pathname is blank - this is a reopen!
3145                           (hint from demyn plantenberg)
3146                         */
3147
3148                         status = NT_STATUS_INVALID_HANDLE;
3149                         goto fail;
3150                 }
3151
3152                 if (ISDOT(dir_fsp->fsp_name)) {
3153                         /*
3154                          * We're at the toplevel dir, the final file name
3155                          * must not contain ./, as this is filtered out
3156                          * normally by srvstr_get_path and unix_convert
3157                          * explicitly rejects paths containing ./.
3158                          */
3159                         parent_fname = talloc_strdup(talloc_tos(), "");
3160                         if (parent_fname == NULL) {
3161                                 status = NT_STATUS_NO_MEMORY;
3162                                 goto fail;
3163                         }
3164                 } else {
3165                         size_t dir_name_len = strlen(dir_fsp->fsp_name);
3166
3167                         /*
3168                          * Copy in the base directory name.
3169                          */
3170
3171                         parent_fname = TALLOC_ARRAY(talloc_tos(), char,
3172                                                     dir_name_len+2);
3173                         if (parent_fname == NULL) {
3174                                 status = NT_STATUS_NO_MEMORY;
3175                                 goto fail;
3176                         }
3177                         memcpy(parent_fname, dir_fsp->fsp_name,
3178                                dir_name_len+1);
3179
3180                         /*
3181                          * Ensure it ends in a '/'.
3182                          * We used TALLOC_SIZE +2 to add space for the '/'.
3183                          */
3184
3185                         if(dir_name_len
3186                            && (parent_fname[dir_name_len-1] != '\\')
3187                            && (parent_fname[dir_name_len-1] != '/')) {
3188                                 parent_fname[dir_name_len] = '/';
3189                                 parent_fname[dir_name_len+1] = '\0';
3190                         }
3191                 }
3192
3193                 fname = talloc_asprintf(talloc_tos(), "%s%s", parent_fname,
3194                                         fname);
3195                 if (fname == NULL) {
3196                         status = NT_STATUS_NO_MEMORY;
3197                         goto fail;
3198                 }
3199         }
3200
3201         /*
3202          * Check to see if this is a mac fork of some kind.
3203          */
3204
3205         if (is_ntfs_stream_name(fname)) {
3206                 enum FAKE_FILE_TYPE fake_file_type;
3207
3208                 fake_file_type = is_fake_file(fname);
3209
3210                 if (fake_file_type != FAKE_FILE_TYPE_NONE) {
3211
3212                         /*
3213                          * Here we go! support for changing the disk quotas
3214                          * --metze
3215                          *
3216                          * We need to fake up to open this MAGIC QUOTA file
3217                          * and return a valid FID.
3218                          *
3219                          * w2k close this file directly after openening xp
3220                          * also tries a QUERY_FILE_INFO on the file and then
3221                          * close it
3222                          */
3223                         status = open_fake_file(req, conn, req->vuid,
3224                                                 fake_file_type, fname,
3225                                                 access_mask, &fsp);
3226                         if (!NT_STATUS_IS_OK(status)) {
3227                                 goto fail;
3228                         }
3229
3230                         ZERO_STRUCT(sbuf);
3231                         goto done;
3232                 }
3233
3234                 if (!(conn->fs_capabilities & FILE_NAMED_STREAMS)) {
3235                         status = NT_STATUS_OBJECT_PATH_NOT_FOUND;
3236                         goto fail;
3237                 }
3238         }
3239
3240         if ((req != NULL) && (req->flags2 & FLAGS2_DFS_PATHNAMES)) {
3241                 char *resolved_fname;
3242
3243                 status = resolve_dfspath(talloc_tos(), conn, true, fname,
3244                                          &resolved_fname);
3245
3246                 if (!NT_STATUS_IS_OK(status)) {
3247                         /*
3248                          * For PATH_NOT_COVERED we had
3249                          * reply_botherror(req, NT_STATUS_PATH_NOT_COVERED,
3250                          *                 ERRSRV, ERRbadpath);
3251                          * Need to fix in callers
3252                          */
3253                         goto fail;
3254                 }
3255                 fname = resolved_fname;
3256         }
3257
3258         /*
3259          * Check if POSIX semantics are wanted.
3260          */
3261
3262         if (file_attributes & FILE_FLAG_POSIX_SEMANTICS) {
3263                 case_state = set_posix_case_semantics(talloc_tos(), conn);
3264         }
3265
3266         if (create_file_flags & CFF_DOS_PATH) {
3267                 char *converted_fname;
3268
3269                 SET_STAT_INVALID(sbuf);
3270
3271                 status = unix_convert(talloc_tos(), conn, fname, False,
3272                                       &converted_fname, NULL, &sbuf);
3273                 if (!NT_STATUS_IS_OK(status)) {
3274                         goto fail;
3275                 }
3276                 fname = converted_fname;
3277         } else {
3278                 if (psbuf != NULL) {
3279                         sbuf = *psbuf;
3280                 } else {
3281                         if (SMB_VFS_STAT(conn, fname, &sbuf) == -1) {
3282                                 SET_STAT_INVALID(sbuf);
3283                         }
3284                 }
3285
3286         }
3287
3288         TALLOC_FREE(case_state);
3289
3290         /* All file access must go through check_name() */
3291
3292         status = check_name(conn, fname);
3293         if (!NT_STATUS_IS_OK(status)) {
3294                 goto fail;
3295         }
3296
3297         status = create_file_unixpath(
3298                 conn, req, fname, access_mask, share_access,
3299                 create_disposition, create_options, file_attributes,
3300                 oplock_request, allocation_size, sd, ea_list,
3301                 &fsp, &info, &sbuf);
3302
3303         if (!NT_STATUS_IS_OK(status)) {
3304                 goto fail;
3305         }
3306
3307  done:
3308         DEBUG(10, ("create_file: info=%d\n", info));
3309
3310         *result = fsp;
3311         if (pinfo != NULL) {
3312                 *pinfo = info;
3313         }
3314         if (psbuf != NULL) {
3315                 *psbuf = sbuf;
3316         }
3317         return NT_STATUS_OK;
3318
3319  fail:
3320         DEBUG(10, ("create_file: %s\n", nt_errstr(status)));
3321
3322         if (fsp != NULL) {
3323                 close_file(req, fsp, ERROR_CLOSE);
3324                 fsp = NULL;
3325         }
3326         return status;
3327 }