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