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