/*
Unix SMB/CIFS implementation.
file opening and share modes
Copyright (C) Andrew Tridgell 1992-1998
Copyright (C) Jeremy Allison 2001-2004
Copyright (C) Volker Lendecke 2005
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*/
#include "includes.h"
extern struct current_user current_user;
extern userdom_struct current_user_info;
extern uint16 global_oplock_port;
extern uint16 global_smbpid;
extern BOOL global_client_failed_oplock_break;
struct dev_inode_bundle {
SMB_DEV_T dev;
SMB_INO_T inode;
};
/****************************************************************************
fd support routines - attempt to do a dos_open.
****************************************************************************/
static int fd_open(struct connection_struct *conn,
const char *fname,
int flags,
mode_t mode)
{
int fd;
#ifdef O_NOFOLLOW
if (!lp_symlinks(SNUM(conn))) {
flags |= O_NOFOLLOW;
}
#endif
fd = SMB_VFS_OPEN(conn,fname,flags,mode);
DEBUG(10,("fd_open: name %s, flags = 0%o mode = 0%o, fd = %d. %s\n", fname,
flags, (int)mode, fd, (fd == -1) ? strerror(errno) : "" ));
return fd;
}
/****************************************************************************
Close the file associated with a fsp.
****************************************************************************/
int fd_close(struct connection_struct *conn,
files_struct *fsp)
{
if (fsp->fh->fd == -1) {
return 0; /* What we used to call a stat open. */
}
if (fsp->fh->ref_count > 1) {
return 0; /* Shared handle. Only close last reference. */
}
return fd_close_posix(conn, fsp);
}
/****************************************************************************
Check a filename for the pipe string.
****************************************************************************/
static void check_for_pipe(const char *fname)
{
/* special case of pipe opens */
char s[10];
StrnCpy(s,fname,sizeof(s)-1);
strlower_m(s);
if (strstr(s,"pipe/")) {
DEBUG(3,("Rejecting named pipe open for %s\n",fname));
set_saved_error_triple(ERRSRV, ERRaccess, NT_STATUS_ACCESS_DENIED);
}
}
/****************************************************************************
Change the ownership of a file to that of the parent directory.
Do this by fd if possible.
****************************************************************************/
void change_owner_to_parent(connection_struct *conn,
files_struct *fsp,
const char *fname,
SMB_STRUCT_STAT *psbuf)
{
const char *parent_path = parent_dirname(fname);
SMB_STRUCT_STAT parent_st;
int ret;
ret = SMB_VFS_STAT(conn, parent_path, &parent_st);
if (ret == -1) {
DEBUG(0,("change_owner_to_parent: failed to stat parent "
"directory %s. Error was %s\n",
parent_path, strerror(errno) ));
return;
}
if (fsp && fsp->fh->fd != -1) {
become_root();
ret = SMB_VFS_FCHOWN(fsp, fsp->fh->fd, parent_st.st_uid, (gid_t)-1);
unbecome_root();
if (ret == -1) {
DEBUG(0,("change_owner_to_parent: failed to fchown "
"file %s to parent directory uid %u. Error "
"was %s\n", fname,
(unsigned int)parent_st.st_uid,
strerror(errno) ));
}
DEBUG(10,("change_owner_to_parent: changed new file %s to "
"parent directory uid %u.\n", fname,
(unsigned int)parent_st.st_uid ));
} else {
/* We've already done an lstat into psbuf, and we know it's a
directory. If we can cd into the directory and the dev/ino
are the same then we can safely chown without races as
we're locking the directory in place by being in it. This
should work on any UNIX (thanks tridge :-). JRA.
*/
pstring saved_dir;
SMB_STRUCT_STAT sbuf;
if (!vfs_GetWd(conn,saved_dir)) {
DEBUG(0,("change_owner_to_parent: failed to get "
"current working directory\n"));
return;
}
/* Chdir into the new path. */
if (vfs_ChDir(conn, fname) == -1) {
DEBUG(0,("change_owner_to_parent: failed to change "
"current working directory to %s. Error "
"was %s\n", fname, strerror(errno) ));
goto out;
}
if (SMB_VFS_STAT(conn,".",&sbuf) == -1) {
DEBUG(0,("change_owner_to_parent: failed to stat "
"directory '.' (%s) Error was %s\n",
fname, strerror(errno)));
goto out;
}
/* Ensure we're pointing at the same place. */
if (sbuf.st_dev != psbuf->st_dev ||
sbuf.st_ino != psbuf->st_ino ||
sbuf.st_mode != psbuf->st_mode ) {
DEBUG(0,("change_owner_to_parent: "
"device/inode/mode on directory %s changed. "
"Refusing to chown !\n", fname ));
goto out;
}
become_root();
ret = SMB_VFS_CHOWN(conn, ".", parent_st.st_uid, (gid_t)-1);
unbecome_root();
if (ret == -1) {
DEBUG(10,("change_owner_to_parent: failed to chown "
"directory %s to parent directory uid %u. "
"Error was %s\n", fname,
(unsigned int)parent_st.st_uid, strerror(errno) ));
goto out;
}
DEBUG(10,("change_owner_to_parent: changed ownership of new "
"directory %s to parent directory uid %u.\n",
fname, (unsigned int)parent_st.st_uid ));
out:
vfs_ChDir(conn,saved_dir);
}
}
/****************************************************************************
Open a file.
****************************************************************************/
static BOOL open_file(files_struct *fsp,
connection_struct *conn,
const char *fname,
SMB_STRUCT_STAT *psbuf,
int flags,
mode_t unx_mode,
uint32 access_mask)
{
int accmode = (flags & O_ACCMODE);
int local_flags = flags;
BOOL file_existed = VALID_STAT(*psbuf);
fsp->fh->fd = -1;
fsp->oplock_type = NO_OPLOCK;
errno = EPERM;
/* Check permissions */
/*
* This code was changed after seeing a client open request
* containing the open mode of (DENY_WRITE/read-only) with
* the 'create if not exist' bit set. The previous code
* would fail to open the file read only on a read-only share
* as it was checking the flags parameter directly against O_RDONLY,
* this was failing as the flags parameter was set to O_RDONLY|O_CREAT.
* JRA.
*/
if (!CAN_WRITE(conn)) {
/* It's a read-only share - fail if we wanted to write. */
if(accmode != O_RDONLY) {
DEBUG(3,("Permission denied opening %s\n",fname));
check_for_pipe(fname);
return False;
} else if(flags & O_CREAT) {
/* We don't want to write - but we must make sure that
O_CREAT doesn't create the file if we have write
access into the directory.
*/
flags &= ~O_CREAT;
local_flags &= ~O_CREAT;
}
}
/*
* This little piece of insanity is inspired by the
* fact that an NT client can open a file for O_RDONLY,
* but set the create disposition to FILE_EXISTS_TRUNCATE.
* If the client *can* write to the file, then it expects to
* truncate the file, even though it is opening for readonly.
* Quicken uses this stupid trick in backup file creation...
* Thanks *greatly* to "David W. Chapman Jr." <dwcjr@inethouston.net>
* for helping track this one down. It didn't bite us in 2.0.x
* as we always opened files read-write in that release. JRA.
*/
if ((accmode == O_RDONLY) && ((flags & O_TRUNC) == O_TRUNC)) {
DEBUG(10,("open_file: truncate requested on read-only open "
"for file %s\n",fname ));
local_flags = (flags & ~O_ACCMODE)|O_RDWR;
}
if ((access_mask & (FILE_READ_DATA|FILE_WRITE_DATA|FILE_APPEND_DATA|FILE_EXECUTE)) ||
(local_flags & O_CREAT) ||
((local_flags & O_TRUNC) == O_TRUNC) ) {
/*
* We can't actually truncate here as the file may be locked.
* open_file_shared will take care of the truncate later. JRA.
*/
local_flags &= ~O_TRUNC;
#if defined(O_NONBLOCK) && defined(S_ISFIFO)
/*
* We would block on opening a FIFO with no one else on the
* other end. Do what we used to do and add O_NONBLOCK to the
* open flags. JRA.
*/
if (file_existed && S_ISFIFO(psbuf->st_mode)) {
local_flags |= O_NONBLOCK;
}
#endif
/* Don't create files with Microsoft wildcard characters. */
if ((local_flags & O_CREAT) && !file_existed &&
ms_has_wild(fname)) {
set_saved_error_triple(ERRDOS, ERRinvalidname,
NT_STATUS_OBJECT_NAME_INVALID);
return False;
}
/* Actually do the open */
fsp->fh->fd = fd_open(conn, fname, local_flags, unx_mode);
if (fsp->fh->fd == -1) {
DEBUG(3,("Error opening file %s (%s) (local_flags=%d) "
"(flags=%d)\n",
fname,strerror(errno),local_flags,flags));
check_for_pipe(fname);
return False;
}
/* Inherit the ACL if the file was created. */
if ((local_flags & O_CREAT) && !file_existed) {
inherit_access_acl(conn, fname, unx_mode);
}
} else {
fsp->fh->fd = -1; /* What we used to call a stat open. */
}
if (!file_existed) {
int ret;
if (fsp->fh->fd == -1) {
ret = SMB_VFS_STAT(conn, fname, psbuf);
} else {
ret = SMB_VFS_FSTAT(fsp,fsp->fh->fd,psbuf);
/* If we have an fd, this stat should succeed. */
if (ret == -1) {
DEBUG(0,("Error doing fstat on open file %s "
"(%s)\n", fname,strerror(errno) ));
}
}
/* For a non-io open, this stat failing means file not found. JRA */
if (ret == -1) {
fd_close(conn, fsp);
return False;
}
}
/*
* POSIX allows read-only opens of directories. We don't
* want to do this (we use a different code path for this)
* so catch a directory open and return an EISDIR. JRA.
*/
if(S_ISDIR(psbuf->st_mode)) {
fd_close(conn, fsp);
errno = EISDIR;
return False;
}
fsp->mode = psbuf->st_mode;
fsp->inode = psbuf->st_ino;
fsp->dev = psbuf->st_dev;
fsp->vuid = current_user.vuid;
fsp->file_pid = global_smbpid;
fsp->can_lock = True;
fsp->can_read = (access_mask & (FILE_READ_DATA)) ? True : False;
if (!CAN_WRITE(conn)) {
fsp->can_write = False;
} else {
fsp->can_write = (access_mask & (FILE_WRITE_DATA | FILE_APPEND_DATA)) ? True : False;
}
fsp->print_file = False;
fsp->modified = False;
fsp->oplock_type = NO_OPLOCK;
fsp->sent_oplock_break = NO_BREAK_SENT;
fsp->is_directory = False;
fsp->is_stat = False;
if (conn->aio_write_behind_list &&
is_in_path(fname, conn->aio_write_behind_list, conn->case_sensitive)) {
fsp->aio_write_behind = True;
}
string_set(&fsp->fsp_name,fname);
fsp->wcp = NULL; /* Write cache pointer. */
DEBUG(2,("%s opened file %s read=%s write=%s (numopen=%d)\n",
*current_user_info.smb_name ? current_user_info.smb_name : conn->user,fsp->fsp_name,
BOOLSTR(fsp->can_read), BOOLSTR(fsp->can_write),
conn->num_files_open + 1));
errno = 0;
return True;
}
/*******************************************************************
Return True if the filename is one of the special executable types.
********************************************************************/
static BOOL is_executable(const char *fname)
{
if ((fname = strrchr_m(fname,'.'))) {
if (strequal(fname,".com") ||
strequal(fname,".dll") ||
strequal(fname,".exe") ||
strequal(fname,".sym")) {
return True;
}
}
return False;
}
/****************************************************************************
Check if we can open a file with a share mode.
Returns True if conflict, False if not.
****************************************************************************/
static BOOL share_conflict(share_mode_entry *entry,
uint32 access_mask,
uint32 share_access)
{
DEBUG(10,("share_conflict: entry->access_mask = 0x%x, "
"entry->share_access = 0x%x, "
"entry->private_options = 0x%x\n",
(unsigned int)entry->access_mask,
(unsigned int)entry->share_access,
(unsigned int)entry->private_options));
DEBUG(10,("share_conflict: access_mask = 0x%x, share_access = 0x%x\n",
(unsigned int)access_mask, (unsigned int)share_access));
if ((entry->access_mask & (FILE_WRITE_DATA|
FILE_APPEND_DATA|
FILE_READ_DATA|
FILE_EXECUTE|
DELETE_ACCESS)) == 0) {
DEBUG(10,("share_conflict: No conflict due to "
"entry->access_mask = 0x%x\n",
(unsigned int)entry->access_mask ));
return False;
}
if ((access_mask & (FILE_WRITE_DATA|
FILE_APPEND_DATA|
FILE_READ_DATA|
FILE_EXECUTE|
DELETE_ACCESS)) == 0) {
DEBUG(10,("share_conflict: No conflict due to "
"access_mask = 0x%x\n",
(unsigned int)access_mask ));
return False;
}
#if 1 /* JRA TEST - Superdebug. */
#define CHECK_MASK(num, am, right, sa, share) \
DEBUG(10,("share_conflict: [%d] am (0x%x) & right (0x%x) = 0x%x\n", \
(unsigned int)(num), (unsigned int)(am), \
(unsigned int)(right), (unsigned int)(am)&(right) )); \
DEBUG(10,("share_conflict: [%d] sa (0x%x) & share (0x%x) = 0x%x\n", \
(unsigned int)(num), (unsigned int)(sa), \
(unsigned int)(share), (unsigned int)(sa)&(share) )); \
if (((am) & (right)) && !((sa) & (share))) { \
DEBUG(10,("share_conflict: check %d conflict am = 0x%x, right = 0x%x, \
sa = 0x%x, share = 0x%x\n", (num), (unsigned int)(am), (unsigned int)(right), (unsigned int)(sa), \
(unsigned int)(share) )); \
set_saved_error_triple(ERRDOS, ERRbadshare, NT_STATUS_SHARING_VIOLATION); \
return True; \
}
#else
#define CHECK_MASK(num, am, right, sa, share) \
if (((am) & (right)) && !((sa) & (share))) { \
DEBUG(10,("share_conflict: check %d conflict am = 0x%x, right = 0x%x, \
sa = 0x%x, share = 0x%x\n", (num), (unsigned int)(am), (unsigned int)(right), (unsigned int)(sa), \
(unsigned int)(share) )); \
set_saved_error_triple(ERRDOS, ERRbadshare, NT_STATUS_SHARING_VIOLATION); \
return True; \
}
#endif
CHECK_MASK(1, entry->access_mask, FILE_WRITE_DATA | FILE_APPEND_DATA,
share_access, FILE_SHARE_WRITE);
CHECK_MASK(2, access_mask, FILE_WRITE_DATA | FILE_APPEND_DATA,
entry->share_access, FILE_SHARE_WRITE);
CHECK_MASK(3, entry->access_mask, FILE_READ_DATA | FILE_EXECUTE,
share_access, FILE_SHARE_READ);
CHECK_MASK(4, access_mask, FILE_READ_DATA | FILE_EXECUTE,
entry->share_access, FILE_SHARE_READ);
CHECK_MASK(5, entry->access_mask, DELETE_ACCESS,
share_access, FILE_SHARE_DELETE);
CHECK_MASK(6, access_mask, DELETE_ACCESS,
entry->share_access, FILE_SHARE_DELETE);
DEBUG(10,("share_conflict: No conflict.\n"));
return False;
}
#if defined(DEVELOPER)
static void validate_my_share_entries(int num,
share_mode_entry *share_entry)
{
files_struct *fsp;
if (share_entry->pid != sys_getpid()) {
return;
}
fsp = file_find_dif(share_entry->dev, share_entry->inode,
share_entry->share_file_id);
if (!fsp) {
DEBUG(0,("validate_my_share_entries: PANIC : %s\n",
share_mode_str(num, share_entry) ));
smb_panic("validate_my_share_entries: Cannot match a "
"share entry with an open file\n");
}
if (((uint16)fsp->oplock_type) != share_entry->op_type) {
pstring str;
DEBUG(0,("validate_my_share_entries: PANIC : %s\n",
share_mode_str(num, share_entry) ));
slprintf(str, sizeof(str)-1, "validate_my_share_entries: "
"file %s, oplock_type = 0x%x, op_type = 0x%x\n",
fsp->fsp_name, (unsigned int)fsp->oplock_type,
(unsigned int)share_entry->op_type );
smb_panic(str);
}
}
#endif
struct share_mode_entry_list {
struct share_mode_entry_list *next, *prev;
share_mode_entry entry;
};
static void free_broken_entry_list(struct share_mode_entry_list *broken_entry_list)
{
while (broken_entry_list) {
struct share_mode_entry_list *broken_entry = broken_entry_list;
DLIST_REMOVE(broken_entry_list, broken_entry);
SAFE_FREE(broken_entry);
}
}
static BOOL cause_oplock_break(int request, int existing, uint32 access_mask)
{
if ((access_mask == DELETE_ACCESS) &&
(request == NO_OPLOCK)) {
/* This is a delete request */
return (BATCH_OPLOCK_TYPE(existing) != 0);
}
if (EXCLUSIVE_OPLOCK_TYPE(existing) && (request != NO_OPLOCK)) {
return True;
}
if ((existing != NO_OPLOCK) && (request == NO_OPLOCK)) {
return True;
}
return False;
}
/****************************************************************************
Deal with open deny mode and oplock break processing.
Invarient: Share mode must be locked on entry and exit.
Returns -1 on error, or number of share modes on success (may be zero).
****************************************************************************/
static int open_mode_check(connection_struct *conn,
const char *fname,
SMB_DEV_T dev,
SMB_INO_T inode,
uint32 access_mask,
uint32 share_access,
uint32 create_options,
int *p_oplock_request,
BOOL *p_all_current_opens_are_level_II)
{
int i;
int num_share_modes;
int oplock_contention_count = 0;
share_mode_entry *old_shares = NULL;
BOOL broke_oplock;
BOOL delete_on_close;
num_share_modes = get_share_modes(dev, inode, &old_shares, &delete_on_close);
if(num_share_modes == 0) {
SAFE_FREE(old_shares);
return 0;
}
if (access_mask &&
((access_mask & ~(SYNCHRONIZE_ACCESS| FILE_READ_ATTRIBUTES|
FILE_WRITE_ATTRIBUTES))==0) &&
((access_mask & (SYNCHRONIZE_ACCESS|FILE_READ_ATTRIBUTES|
FILE_WRITE_ATTRIBUTES)) != 0)) {
/* Stat open that doesn't trigger oplock breaks or share mode
* checks... ! JRA. */
SAFE_FREE(old_shares);
return num_share_modes;
}
/* A delete on close prohibits everything */
if (delete_on_close) {
SAFE_FREE(old_shares);
errno = EACCES;
return -1;
}
/*
* Check if the share modes will give us access.
*/
do {
struct share_mode_entry_list *broken_entry_list = NULL;
struct share_mode_entry_list *broken_entry = NULL;
broke_oplock = False;
*p_all_current_opens_are_level_II = True;
for(i = 0; i < num_share_modes; i++) {
share_mode_entry *share_entry = &old_shares[i];
BOOL opb_ret;
#if defined(DEVELOPER)
validate_my_share_entries(i, share_entry);
#endif
/*
* By observation of NetBench, oplocks are broken
* *before* share modes are checked. This allows a
* file to be closed by the client if the share mode
* would deny access and the client has an oplock.
* Check if someone has an oplock on this file. If so
* we must break it before continuing.
*/
if (!cause_oplock_break(*p_oplock_request,
share_entry->op_type,
access_mask)) {
if (!LEVEL_II_OPLOCK_TYPE(share_entry->op_type)) {
*p_all_current_opens_are_level_II = False;
}
continue;
}
/* This is an oplock break */
DEBUG(5,("open_mode_check: oplock_request = %d, "
"breaking oplock (%x) on file %s, "
"dev = %x, inode = %.0f\n",
*p_oplock_request, share_entry->op_type,
fname, (unsigned int)dev, (double)inode));
/* Ensure the reply for the open uses the correct
* sequence number. */
/* This isn't a real deferred packet as it's response
* will also increment the sequence.
*/
srv_defer_sign_response(get_current_mid());
/* Oplock break - unlock to request it. */
unlock_share_entry(conn, dev, inode);
opb_ret = request_oplock_break(share_entry);
/* Now relock. */
lock_share_entry(conn, dev, inode);
if (!opb_ret) {
DEBUG(0,("open_mode_check: FAILED when breaking "
"oplock (%x) on file %s, dev = %x, "
"inode = %.0f\n",
old_shares[i].op_type, fname,
(unsigned int)dev, (double)inode));
SAFE_FREE(old_shares);
set_saved_error_triple(ERRDOS, ERRbadshare,
NT_STATUS_SHARING_VIOLATION);
return -1;
}
broken_entry = SMB_MALLOC_P(struct share_mode_entry_list);
if (!broken_entry) {
smb_panic("open_mode_check: malloc fail.\n");
}
broken_entry->entry = *share_entry;
DLIST_ADD(broken_entry_list, broken_entry);
broke_oplock = True;
} /* end for */
if (broke_oplock) {
/* Update the current open table. */
SAFE_FREE(old_shares);
num_share_modes = get_share_modes(dev, inode,
&old_shares,
&delete_on_close);
}
if (lp_share_modes(SNUM(conn))) {
/* Now we check the share modes, after any oplock breaks. */
for(i = 0; i < num_share_modes; i++) {
share_mode_entry *share_entry = &old_shares[i];
/* someone else has a share lock on it, check to see
* if we can too */
if (share_conflict(share_entry, access_mask,
share_access)) {
SAFE_FREE(old_shares);
free_broken_entry_list(broken_entry_list);
errno = EACCES;
return -1;
}
}
}
for(broken_entry = broken_entry_list; broken_entry;
broken_entry = broken_entry->next) {
oplock_contention_count++;
/* Paranoia check that this is no longer an exlusive entry. */
for(i = 0; i < num_share_modes; i++) {
share_mode_entry *share_entry = &old_shares[i];
if (!(share_modes_identical(&broken_entry->entry,
share_entry) &&
EXCLUSIVE_OPLOCK_TYPE(share_entry->op_type))) {
continue;
}
/*
* This should not happen. The target left this oplock
* as exlusive.... The process *must* be dead....
*/
DEBUG(0,("open_mode_check: exlusive oplock left by "
"process %d after break ! For file %s, "
"dev = %x, inode = %.0f. Deleting it to "
"continue...\n",
(int)broken_entry->entry.pid, fname,
(unsigned int)dev, (double)inode));
if (process_exists(broken_entry->entry.pid)) {
DEBUG(0,("open_mode_check: Existent process "
"%lu left active oplock.\n",
(unsigned long)broken_entry->entry.pid ));
}
if (del_share_entry(dev, inode, &broken_entry->entry,
NULL, &delete_on_close) == -1) {
free_broken_entry_list(broken_entry_list);
errno = EACCES;
set_saved_error_triple(ERRDOS, ERRbadshare,
NT_STATUS_SHARING_VIOLATION);
return -1;
}
/*
* We must reload the share modes after deleting the
* other process's entry.
*/
SAFE_FREE(old_shares);
num_share_modes = get_share_modes(dev, inode,
&old_shares,
&delete_on_close);
break;
} /* end for paranoia... */
} /* end for broken_entry */
free_broken_entry_list(broken_entry_list);
} while(broke_oplock);
/*
* Refuse to grant an oplock in case the contention limit is
* reached when going through the lock list multiple times.
*/
if(oplock_contention_count >= lp_oplock_contention_limit(SNUM(conn))) {
*p_oplock_request = 0;
DEBUG(4,("open_mode_check: oplock contention = %d. Not granting oplock.\n",
oplock_contention_count ));
}
SAFE_FREE(old_shares);
return num_share_modes;
}
/****************************************************************************
Delete the record for a handled deferred open entry.
****************************************************************************/
static void delete_defered_open_entry_record(connection_struct *conn,
SMB_DEV_T dev,
SMB_INO_T inode)
{
uint16 mid = get_current_mid();
pid_t mypid = sys_getpid();
deferred_open_entry *de_array = NULL;
int num_de_entries, i;
if (!lp_defer_sharing_violations()) {
return;
}
num_de_entries = get_deferred_opens(conn, dev, inode, &de_array);
for (i = 0; i < num_de_entries; i++) {
deferred_open_entry *entry = &de_array[i];
if (entry->pid == mypid && entry->mid == mid && entry->dev == dev &&
entry->inode == inode) {
/* Remove the deferred open entry from the array. */
delete_deferred_open_entry(entry);
SAFE_FREE(de_array);
return;
}
}
SAFE_FREE(de_array);
}
/****************************************************************************
Handle the 1 second delay in returning a SHARING_VIOLATION error.
****************************************************************************/
static void defer_open_sharing_error(connection_struct *conn,
struct timeval *ptv,
const char *fname,
SMB_DEV_T dev,
SMB_INO_T inode)
{
uint16 mid = get_current_mid();
pid_t mypid = sys_getpid();
deferred_open_entry *de_array = NULL;
int num_de_entries, i;
struct dev_inode_bundle dib;
if (!lp_defer_sharing_violations()) {
return;
}
dib.dev = dev;
dib.inode = inode;
num_de_entries = get_deferred_opens(conn, dev, inode, &de_array);
for (i = 0; i < num_de_entries; i++) {
deferred_open_entry *entry = &de_array[i];
if (entry->pid == mypid && entry->mid == mid) {
/*
* Check if a 1 second timeout has expired.
*/
if (usec_time_diff(ptv, &entry->time) >
SHARING_VIOLATION_USEC_WAIT) {
DEBUG(10,("defer_open_sharing_error: Deleting "
"deferred open entry for mid %u, "
"file %s\n",
(unsigned int)mid, fname ));
/* Expired, return a real error. */
/* Remove the deferred open entry from the array. */
delete_deferred_open_entry(entry);
SAFE_FREE(de_array);
return;
}
/*
* If the timeout hasn't expired yet and we still have
* a sharing violation, just leave the entry in the
* deferred open array alone. We do need to reschedule
* this open call though (with the original created
* time).
*/
DEBUG(10,("defer_open_sharing_error: time [%u.%06u] "
"updating deferred open entry for mid %u, file %s\n",
(unsigned int)entry->time.tv_sec,
(unsigned int)entry->time.tv_usec,
(unsigned int)mid, fname ));
push_sharing_violation_open_smb_message(&entry->time,
(char *)&dib,
sizeof(dib));
SAFE_FREE(de_array);
return;
}
}
DEBUG(10,("defer_open_sharing_error: time [%u.%06u] adding deferred "
"open entry for mid %u, file %s\n",
(unsigned int)ptv->tv_sec, (unsigned int)ptv->tv_usec,
(unsigned int)mid, fname ));
if (!push_sharing_violation_open_smb_message(ptv, (char *)&dib, sizeof(dib))) {
SAFE_FREE(de_array);
return;
}
if (!add_deferred_open(mid, ptv, dev, inode, global_oplock_port, fname)) {
remove_sharing_violation_open_smb_message(mid);
}
/*
* Push the MID of this packet on the signing queue.
* We only do this once, the first time we push the packet
* onto the deferred open queue, as this has a side effect
* of incrementing the response sequence number.
*/
srv_defer_sign_response(mid);
SAFE_FREE(de_array);
}
/****************************************************************************
Set a kernel flock on a file for NFS interoperability.
This requires a patch to Linux.
****************************************************************************/
static void kernel_flock(files_struct *fsp, uint32 share_mode)
{
#if HAVE_KERNEL_SHARE_MODES
int kernel_mode = 0;
if (share_mode == FILE_SHARE_WRITE) {
kernel_mode = LOCK_MAND|LOCK_WRITE;
} else if (share_mode == FILE_SHARE_READ) {
kernel_mode = LOCK_MAND|LOCK_READ;
} else if (share_mode == FILE_SHARE_NONE) {
kernel_mode = LOCK_MAND;
}
if (kernel_mode) {
flock(fsp->fh->fd, kernel_mode);
}
#endif
;
}
/****************************************************************************
On overwrite open ensure that the attributes match.
****************************************************************************/
static BOOL open_match_attributes(connection_struct *conn,
const char *path,
uint32 old_dos_attr,
uint32 new_dos_attr,
mode_t existing_unx_mode,
mode_t new_unx_mode,
mode_t *returned_unx_mode)
{
uint32 noarch_old_dos_attr, noarch_new_dos_attr;
noarch_old_dos_attr = (old_dos_attr & ~FILE_ATTRIBUTE_ARCHIVE);
noarch_new_dos_attr = (new_dos_attr & ~FILE_ATTRIBUTE_ARCHIVE);
if((noarch_old_dos_attr == 0 && noarch_new_dos_attr != 0) ||
(noarch_old_dos_attr != 0 && ((noarch_old_dos_attr & noarch_new_dos_attr) == noarch_old_dos_attr))) {
*returned_unx_mode = new_unx_mode;
} else {
*returned_unx_mode = (mode_t)0;
}
DEBUG(10,("open_match_attributes: file %s old_dos_attr = 0x%x, "
"existing_unx_mode = 0%o, new_dos_attr = 0x%x "
"returned_unx_mode = 0%o\n",
path,
(unsigned int)old_dos_attr,
(unsigned int)existing_unx_mode,
(unsigned int)new_dos_attr,
(unsigned int)*returned_unx_mode ));
/* If we're mapping SYSTEM and HIDDEN ensure they match. */
if (lp_map_system(SNUM(conn)) || lp_store_dos_attributes(SNUM(conn))) {
if ((old_dos_attr & FILE_ATTRIBUTE_SYSTEM) &&
!(new_dos_attr & FILE_ATTRIBUTE_SYSTEM)) {
return False;
}
}
if (lp_map_hidden(SNUM(conn)) || lp_store_dos_attributes(SNUM(conn))) {
if ((old_dos_attr & FILE_ATTRIBUTE_HIDDEN) &&
!(new_dos_attr & FILE_ATTRIBUTE_HIDDEN)) {
return False;
}
}
return True;
}
/****************************************************************************
Special FCB or DOS processing in the case of a sharing violation.
Try and find a duplicated file handle.
****************************************************************************/
static files_struct *fcb_or_dos_open(connection_struct *conn,
const char *fname, SMB_DEV_T dev,
SMB_INO_T inode,
uint32 access_mask,
uint32 share_access,
uint32 create_options)
{
files_struct *fsp;
files_struct *dup_fsp;
DEBUG(5,("fcb_or_dos_open: attempting old open semantics for "
"file %s.\n", fname ));
for(fsp = file_find_di_first(dev, inode); fsp;
fsp = file_find_di_next(fsp)) {
DEBUG(10,("fcb_or_dos_open: checking file %s, fd = %d, "
"vuid = %u, file_pid = %u, private_options = 0x%x "
"access_mask = 0x%x\n", fsp->fsp_name,
fsp->fh->fd, (unsigned int)fsp->vuid,
(unsigned int)fsp->file_pid,
(unsigned int)fsp->fh->private_options,
(unsigned int)fsp->access_mask ));
if (fsp->fh->fd != -1 &&
fsp->vuid == current_user.vuid &&
fsp->file_pid == global_smbpid &&
(fsp->fh->private_options & (NTCREATEX_OPTIONS_PRIVATE_DENY_DOS |
NTCREATEX_OPTIONS_PRIVATE_DENY_FCB)) &&
(fsp->access_mask & FILE_WRITE_DATA) &&
strequal(fsp->fsp_name, fname)) {
DEBUG(10,("fcb_or_dos_open: file match\n"));
break;
}
}
if (!fsp) {
return NULL;
}
/* quite an insane set of semantics ... */
if (is_executable(fname) &&
(fsp->fh->private_options & NTCREATEX_OPTIONS_PRIVATE_DENY_DOS)) {
DEBUG(10,("fcb_or_dos_open: file fail due to is_executable.\n"));
return NULL;
}
/* We need to duplicate this fsp. */
dup_fsp = dup_file_fsp(fsp, access_mask, share_access, create_options);
if (!dup_fsp) {
return NULL;
}
return dup_fsp;
}
/****************************************************************************
Open a file with a share mode - old openX method - map into NTCreate.
****************************************************************************/
BOOL map_open_params_to_ntcreate(const char *fname, int deny_mode, int open_func,
uint32 *paccess_mask,
uint32 *pshare_mode,
uint32 *pcreate_disposition,
uint32 *pcreate_options)
{
uint32 access_mask;
uint32 share_mode;
uint32 create_disposition;
uint32 create_options = 0;
DEBUG(10,("map_open_params_to_ntcreate: fname = %s, deny_mode = 0x%x, "
"open_func = 0x%x\n",
fname, (unsigned int)deny_mode, (unsigned int)open_func ));
/* Create the NT compatible access_mask. */
switch (GET_OPENX_MODE(deny_mode)) {
case DOS_OPEN_RDONLY:
access_mask = FILE_GENERIC_READ;
break;
case DOS_OPEN_WRONLY:
access_mask = FILE_GENERIC_WRITE;
break;
case DOS_OPEN_EXEC: /* This used to be FILE_READ_DATA... */
case DOS_OPEN_RDWR:
case DOS_OPEN_FCB:
access_mask = FILE_GENERIC_READ|FILE_GENERIC_WRITE;
break;
default:
DEBUG(10,("map_open_params_to_ntcreate: bad open mode = 0x%x\n",
(unsigned int)GET_OPENX_MODE(deny_mode)));
return False;
}
/* Create the NT compatible create_disposition. */
switch (open_func) {
case OPENX_FILE_EXISTS_FAIL|OPENX_FILE_CREATE_IF_NOT_EXIST:
create_disposition = FILE_CREATE;
break;
case OPENX_FILE_EXISTS_OPEN:
create_disposition = FILE_OPEN;
break;
case OPENX_FILE_EXISTS_OPEN|OPENX_FILE_CREATE_IF_NOT_EXIST:
create_disposition = FILE_OPEN_IF;
break;
case OPENX_FILE_EXISTS_TRUNCATE:
create_disposition = FILE_OVERWRITE;
break;
case OPENX_FILE_EXISTS_TRUNCATE|OPENX_FILE_CREATE_IF_NOT_EXIST:
create_disposition = FILE_OVERWRITE_IF;
break;
default:
/* From samba4 - to be confirmed. */
if (GET_OPENX_MODE(deny_mode) == DOS_OPEN_EXEC) {
create_disposition = FILE_CREATE;
break;
}
DEBUG(10,("map_open_params_to_ntcreate: bad "
"open_func 0x%x\n", (unsigned int)open_func));
return False;
}
/* Create the NT compatible share modes. */
switch (GET_DENY_MODE(deny_mode)) {
case DENY_ALL:
share_mode = FILE_SHARE_NONE;
break;
case DENY_WRITE:
share_mode = FILE_SHARE_READ;
break;
case DENY_READ:
share_mode = FILE_SHARE_WRITE;
break;
case DENY_NONE:
share_mode = FILE_SHARE_READ|FILE_SHARE_WRITE;
break;
case DENY_DOS:
create_options |= NTCREATEX_OPTIONS_PRIVATE_DENY_DOS;
if (is_executable(fname)) {
share_mode = FILE_SHARE_READ|FILE_SHARE_WRITE;
} else {
if (GET_OPENX_MODE(deny_mode) == DOS_OPEN_RDONLY) {
share_mode = FILE_SHARE_READ;
} else {
share_mode = FILE_SHARE_NONE;
}
}
break;
case DENY_FCB:
create_options |= NTCREATEX_OPTIONS_PRIVATE_DENY_FCB;
share_mode = FILE_SHARE_NONE;
break;
default:
DEBUG(10,("map_open_params_to_ntcreate: bad deny_mode 0x%x\n",
(unsigned int)GET_DENY_MODE(deny_mode) ));
return False;
}
DEBUG(10,("map_open_params_to_ntcreate: file %s, access_mask = 0x%x, "
"share_mode = 0x%x, create_disposition = 0x%x, "
"create_options = 0x%x\n",
fname,
(unsigned int)access_mask,
(unsigned int)share_mode,
(unsigned int)create_disposition,
(unsigned int)create_options ));
if (paccess_mask) {
*paccess_mask = access_mask;
}
if (pshare_mode) {
*pshare_mode = share_mode;
}
if (pcreate_disposition) {
*pcreate_disposition = create_disposition;
}
if (pcreate_options) {
*pcreate_options = create_options;
}
return True;
}
/* Map generic permissions to file object specific permissions */
struct generic_mapping file_generic_mapping = {
FILE_GENERIC_READ,
FILE_GENERIC_WRITE,
FILE_GENERIC_EXECUTE,
FILE_GENERIC_ALL
};
/****************************************************************************
Open a file with a share mode.
****************************************************************************/
files_struct *open_file_ntcreate(connection_struct *conn,
const char *fname,
SMB_STRUCT_STAT *psbuf,
uint32 access_mask, /* access bits (FILE_READ_DATA etc.) */
uint32 share_access, /* share constants (FILE_SHARE_READ etc). */
uint32 create_disposition, /* FILE_OPEN_IF etc. */
uint32 create_options, /* options such as delete on close. */
uint32 new_dos_attributes, /* attributes used for new file. */
int oplock_request, /* internal Samba oplock codes. */
/* Information (FILE_EXISTS etc.) */
int *pinfo)
{
int flags=0;
int flags2=0;
BOOL file_existed = VALID_STAT(*psbuf);
BOOL def_acl = False;
BOOL internal_only_open = False;
SMB_DEV_T dev = 0;
SMB_INO_T inode = 0;
int num_share_modes = 0;
BOOL all_current_opens_are_level_II = False;
BOOL fsp_open = False;
files_struct *fsp = NULL;
mode_t new_unx_mode = (mode_t)0;
mode_t unx_mode = (mode_t)0;
int info;
uint32 existing_dos_attributes = 0;
struct pending_message_list *pml = NULL;
uint16 port = 0;
uint16 mid = get_current_mid();
if (conn->printer) {
/*
* Printers are handled completely differently.
* Most of the passed parameters are ignored.
*/
if (pinfo) {
*pinfo = FILE_WAS_CREATED;
}
DEBUG(10, ("open_file_ntcreate: printer open fname=%s\n", fname));
return print_fsp_open(conn, fname);
}
/* We add aARCH to this as this mode is only used if the file is
* created new. */
unx_mode = unix_mode(conn, new_dos_attributes | aARCH,fname, True);
DEBUG(10, ("open_file_ntcreate: fname=%s, dos_attrs=0x%x "
"access_mask=0x%x share_access=0x%x "
"create_disposition = 0x%x create_options=0x%x "
"unix mode=0%o oplock_request=%d\n",
fname, new_dos_attributes, access_mask, share_access,
create_disposition, create_options, unx_mode,
oplock_request));
if (oplock_request == INTERNAL_OPEN_ONLY) {
internal_only_open = True;
oplock_request = 0;
}
if ((pml = get_open_deferred_message(mid)) != NULL) {
struct dev_inode_bundle dib;
memcpy(&dib, pml->private_data.data, sizeof(dib));
/* There could be a race condition where the dev/inode pair
has changed since we deferred the message. If so, just
remove the deferred open entry and return sharing
violation. */
/* If the timeout value is non-zero, we need to just return
sharing violation. Don't retry the open as we were not
notified of a close and we don't want to trigger another
spurious oplock break. */
if (!file_existed || dib.dev != psbuf->st_dev ||
dib.inode != psbuf->st_ino || pml->msg_time.tv_sec ||
pml->msg_time.tv_usec) {
/* Ensure we don't reprocess this message. */
remove_sharing_violation_open_smb_message(mid);
/* Now remove the deferred open entry under lock. */
lock_share_entry(conn, dib.dev, dib.inode);
delete_defered_open_entry_record(conn, dib.dev,
dib.inode);
unlock_share_entry(conn, dib.dev, dib.inode);
set_saved_error_triple(ERRDOS, ERRbadshare,
NT_STATUS_SHARING_VIOLATION);
return NULL;
}
/* Ensure we don't reprocess this message. */
remove_sharing_violation_open_smb_message(mid);
}
if (!check_name(fname,conn)) {
return NULL;
}
new_dos_attributes &= SAMBA_ATTRIBUTES_MASK;
if (file_existed) {
existing_dos_attributes = dos_mode(conn, fname, psbuf);
}
/* ignore any oplock requests if oplocks are disabled */
if (!lp_oplocks(SNUM(conn)) || global_client_failed_oplock_break) {
oplock_request = 0;
}
/* this is for OS/2 long file names - say we don't support them */
if (!lp_posix_pathnames() && strstr(fname,".+,;=[].")) {
/* OS/2 Workplace shell fix may be main code stream in a later
* release. */
set_saved_error_triple(ERRDOS, ERRcannotopen,
NT_STATUS_OBJECT_NAME_NOT_FOUND);
DEBUG(5,("open_file_ntcreate: OS/2 long filenames are not "
"supported.\n"));
return NULL;
}
switch( create_disposition ) {
/*
* Currently we're using FILE_SUPERSEDE as the same as
* FILE_OVERWRITE_IF but they really are
* different. FILE_SUPERSEDE deletes an existing file
* (requiring delete access) then recreates it.
*/
case FILE_SUPERSEDE:
/* If file exists replace/overwrite. If file doesn't
* exist create. */
flags2 |= (O_CREAT | O_TRUNC);
break;
case FILE_OVERWRITE_IF:
/* If file exists replace/overwrite. If file doesn't
* exist create. */
flags2 |= (O_CREAT | O_TRUNC);
break;
case FILE_OPEN:
/* If file exists open. If file doesn't exist error. */
if (!file_existed) {
DEBUG(5,("open_file_ntcreate: FILE_OPEN "
"requested for file %s and file "
"doesn't exist.\n", fname ));
set_saved_error_triple(ERRDOS, ERRbadfile, NT_STATUS_OBJECT_NAME_NOT_FOUND);
errno = ENOENT;
return NULL;
}
break;
case FILE_OVERWRITE:
/* If file exists overwrite. If file doesn't exist
* error. */
if (!file_existed) {
DEBUG(5,("open_file_ntcreate: FILE_OVERWRITE "
"requested for file %s and file "
"doesn't exist.\n", fname ));
set_saved_error_triple(ERRDOS, ERRbadfile, NT_STATUS_OBJECT_NAME_NOT_FOUND);
errno = ENOENT;
return NULL;
}
flags2 |= O_TRUNC;
break;
case FILE_CREATE:
/* If file exists error. If file doesn't exist
* create. */
if (file_existed) {
DEBUG(5,("open_file_ntcreate: FILE_CREATE "
"requested for file %s and file "
"already exists.\n", fname ));
if (S_ISDIR(psbuf->st_mode)) {
errno = EISDIR;
} else {
errno = EEXIST;
}
return NULL;
}
flags2 |= (O_CREAT|O_EXCL);
break;
case FILE_OPEN_IF:
/* If file exists open. If file doesn't exist
* create. */
flags2 |= O_CREAT;
break;
default:
set_saved_error_triple(ERRDOS, ERRinvalidparam,
NT_STATUS_INVALID_PARAMETER);
return NULL;
}
/* We only care about matching attributes on file exists and
* overwrite. */
if (file_existed && ((create_disposition == FILE_OVERWRITE) ||
(create_disposition == FILE_OVERWRITE_IF))) {
if (!open_match_attributes(conn, fname,
existing_dos_attributes,
new_dos_attributes, psbuf->st_mode,
unx_mode, &new_unx_mode)) {
DEBUG(5,("open_file_ntcreate: attributes missmatch "
"for file %s (%x %x) (0%o, 0%o)\n",
fname, existing_dos_attributes,
new_dos_attributes,
(unsigned int)psbuf->st_mode,
(unsigned int)unx_mode ));
errno = EACCES;
return NULL;
}
}
/* This is a nasty hack - must fix... JRA. */
if (access_mask == MAXIMUM_ALLOWED_ACCESS) {
access_mask = FILE_GENERIC_ALL;
}
/*
* Convert GENERIC bits to specific bits.
*/
se_map_generic(&access_mask, &file_generic_mapping);
DEBUG(10, ("open_file_ntcreate: fname=%s, after mapping "
"access_mask=0x%x\n", fname, access_mask ));
/*
* Note that we ignore the append flag as append does not
* mean the same thing under DOS and Unix.
*/
if (access_mask & (FILE_WRITE_DATA | FILE_APPEND_DATA)) {
flags = O_RDWR;
} else {
flags = O_RDONLY;
}
/*
* Currently we only look at FILE_WRITE_THROUGH for create options.
*/
#if defined(O_SYNC)
if (create_options & FILE_WRITE_THROUGH) {
flags2 |= O_SYNC;
}
#endif /* O_SYNC */
if (!CAN_WRITE(conn)) {
/*
* We should really return a permission denied error if either
* O_CREAT or O_TRUNC are set, but for compatibility with
* older versions of Samba we just AND them out.
*/
flags2 &= ~(O_CREAT|O_TRUNC);
}
/*
* Ensure we can't write on a read-only share or file.
*/
if (flags != O_RDONLY && file_existed &&
(!CAN_WRITE(conn) || IS_DOS_READONLY(existing_dos_attributes))) {
DEBUG(5,("open_file_ntcreate: write access requested for "
"file %s on read only %s\n",
fname, !CAN_WRITE(conn) ? "share" : "file" ));
set_saved_error_triple(ERRDOS, ERRnoaccess,
NT_STATUS_ACCESS_DENIED);
errno = EACCES;
return NULL;
}
fsp = file_new(conn);
if(!fsp) {
return NULL;
}
if (file_existed) {
dev = psbuf->st_dev;
inode = psbuf->st_ino;
lock_share_entry(conn, dev, inode);
num_share_modes = open_mode_check(conn, fname, dev, inode,
access_mask, share_access,
create_options,
&oplock_request,
&all_current_opens_are_level_II);
if(num_share_modes == -1) {
if (!internal_only_open) {
NTSTATUS status;
get_saved_error_triple(NULL, NULL, &status);
if (NT_STATUS_EQUAL(status,NT_STATUS_SHARING_VIOLATION)) {
/* Check if this can be done with the
* deny_dos and fcb calls. */
if (create_options &
(NTCREATEX_OPTIONS_PRIVATE_DENY_DOS|
NTCREATEX_OPTIONS_PRIVATE_DENY_FCB)) {
files_struct *fsp_dup;
fsp_dup = fcb_or_dos_open(conn, fname, dev,
inode, access_mask,
share_access,
create_options);
if (fsp_dup) {
unlock_share_entry(conn, dev, inode);
file_free(fsp);
if (pinfo) {
*pinfo = FILE_WAS_OPENED;
}
conn->num_files_open++;
return fsp_dup;
}
}
}
}
/*
* This next line is a subtlety we need for
* MS-Access. If a file open will fail due to share
* permissions and also for security (access) reasons,
* we need to return the access failed error, not the
* share error. This means we must attempt to open the
* file anyway in order to get the UNIX access error -
* even if we're going to fail the open for share
* reasons. This is bad, as we're burning another fd
* if there are existing locks but there's nothing
* else we can do. We also ensure we're not going to
* create or tuncate the file as we only want an
* access decision at this stage. JRA.
*/
errno = 0;
fsp_open = open_file(fsp,conn,fname,psbuf,
flags|(flags2&~(O_TRUNC|O_CREAT)),
unx_mode,access_mask);
DEBUG(4,("open_file_ntcreate : share_mode deny - "
"calling open_file with flags=0x%X "
"flags2=0x%X mode=0%o returned %d\n",
flags, (flags2&~(O_TRUNC|O_CREAT)),
(unsigned int)unx_mode, (int)fsp_open ));
if (!fsp_open && errno) {
/* Default error. */
set_saved_error_triple(ERRDOS, ERRnoaccess,
NT_STATUS_ACCESS_DENIED);
}
/*
* If we're returning a share violation, ensure we
* cope with the braindead 1 second delay.
*/
if (!internal_only_open) {
NTSTATUS status;
get_saved_error_triple(NULL, NULL, &status);
if (NT_STATUS_EQUAL(status,NT_STATUS_SHARING_VIOLATION)) {
/* The fsp->open_time here represents
* the current time of day. */
defer_open_sharing_error(conn,
&fsp->open_time,
fname, dev, inode);
}
}
unlock_share_entry(conn, dev, inode);
if (fsp_open) {
fd_close(conn, fsp);
/*
* We have detected a sharing violation here
* so return the correct error code
*/
set_saved_error_triple(ERRDOS, ERRbadshare,
NT_STATUS_SHARING_VIOLATION);
}
file_free(fsp);
return NULL;
}
/*
* We exit this block with the share entry *locked*.....
*/
}
/*
* Ensure we pay attention to default ACLs on directories if required.
*/
if ((flags2 & O_CREAT) && lp_inherit_acls(SNUM(conn)) &&
(def_acl = directory_has_default_acl(conn, parent_dirname(fname)))) {
unx_mode = 0777;
}
DEBUG(4,("calling open_file with flags=0x%X flags2=0x%X mode=0%o\n",
(unsigned int)flags,(unsigned int)flags2,(unsigned int)unx_mode));
/*
* open_file strips any O_TRUNC flags itself.
*/
fsp_open = open_file(fsp,conn,fname,psbuf,flags|flags2,unx_mode,access_mask);
if (!fsp_open && (flags == O_RDWR) && (errno != ENOENT)) {
if((fsp_open = open_file(fsp,conn,fname,psbuf,
O_RDONLY,unx_mode,access_mask)) == True) {
flags = O_RDONLY;
}
}
if (!fsp_open) {
if(file_existed) {
unlock_share_entry(conn, dev, inode);
}
file_free(fsp);
return NULL;
}
/*
* Deal with the race condition where two smbd's detect the file
* doesn't exist and do the create at the same time. One of them will
* win and set a share mode, the other (ie. this one) should check if
* the requested share mode for this create is allowed.
*/
if (!file_existed) {
/*
* Now the file exists and fsp is successfully opened,
* fsp->dev and fsp->inode are valid and should replace the
* dev=0,inode=0 from a non existent file. Spotted by
* Nadav Danieli <nadavd@exanet.com>. JRA.
*/
dev = fsp->dev;
inode = fsp->inode;
lock_share_entry_fsp(fsp);
num_share_modes = open_mode_check(conn, fname, dev, inode,
access_mask, share_access,
create_options,
&oplock_request,
&all_current_opens_are_level_II);
if(num_share_modes == -1) {
NTSTATUS status;
get_saved_error_triple(NULL, NULL, &status);
if (NT_STATUS_EQUAL(status,NT_STATUS_SHARING_VIOLATION)) {
/* Check if this can be done with the deny_dos
* and fcb calls. */
if (create_options &
(NTCREATEX_OPTIONS_PRIVATE_DENY_DOS|
NTCREATEX_OPTIONS_PRIVATE_DENY_FCB)) {
files_struct *fsp_dup;
fsp_dup = fcb_or_dos_open(conn, fname, dev, inode,
access_mask, share_access,
create_options);
if (fsp_dup) {
unlock_share_entry(conn, dev, inode);
fd_close(conn, fsp);
file_free(fsp);
if (pinfo) {
*pinfo = FILE_WAS_OPENED;
}
conn->num_files_open++;
return fsp_dup;
}
}
/*
* If we're returning a share violation,
* ensure we cope with the braindead 1 second
* delay.
*/
/* The fsp->open_time here represents the
* current time of day. */
defer_open_sharing_error(conn, &fsp->open_time,
fname, dev, inode);
}
unlock_share_entry_fsp(fsp);
fd_close(conn,fsp);
file_free(fsp);
/*
* We have detected a sharing violation here, so
* return the correct code.
*/
set_saved_error_triple(ERRDOS, ERRbadshare,
NT_STATUS_SHARING_VIOLATION);
return NULL;
}
/*
* If there are any share modes set then the file *did*
* exist. Ensure we return the correct value for action.
*/
if (num_share_modes > 0) {
file_existed = True;
}
/*
* We exit this block with the share entry *locked*.....
*/
}
/* note that we ignore failure for the following. It is
basically a hack for NFS, and NFS will never set one of
these only read them. Nobody but Samba can ever set a deny
mode and we have already checked our more authoritative
locking database for permission to set this deny mode. If
the kernel refuses the operations then the kernel is wrong */
kernel_flock(fsp, share_access);
/*
* At this point onwards, we can guarentee that the share entry
* is locked, whether we created the file or not, and that the
* deny mode is compatible with all current opens.
*/
/*
* If requested, truncate the file.
*/
if (flags2&O_TRUNC) {
/*
* We are modifing the file after open - update the stat
* struct..
*/
if ((SMB_VFS_FTRUNCATE(fsp,fsp->fh->fd,0) == -1) ||
(SMB_VFS_FSTAT(fsp,fsp->fh->fd,psbuf)==-1)) {
unlock_share_entry_fsp(fsp);
fd_close(conn,fsp);
file_free(fsp);
return NULL;
}
}
/* Record the options we were opened with. */
fsp->share_access = share_access;
fsp->fh->private_options = create_options;
fsp->access_mask = access_mask;
if (file_existed) {
if (!(flags2 & O_TRUNC)) {
info = FILE_WAS_OPENED;
} else {
info = FILE_WAS_OVERWRITTEN;
}
} else {
info = FILE_WAS_CREATED;
/* Change the owner if required. */
if (lp_inherit_owner(SNUM(conn))) {
change_owner_to_parent(conn, fsp, fsp->fsp_name,
psbuf);
}
}
if (pinfo) {
*pinfo = info;
}
/*
* Setup the oplock info in both the shared memory and
* file structs.
*/
if(oplock_request && (num_share_modes == 0) &&
!IS_VETO_OPLOCK_PATH(conn,fname) &&
set_file_oplock(fsp, oplock_request) ) {
port = global_oplock_port;
} else if (oplock_request && all_current_opens_are_level_II) {
port = global_oplock_port;
oplock_request = LEVEL_II_OPLOCK;
set_file_oplock(fsp, oplock_request);
} else {
port = 0;
oplock_request = 0;
}
set_share_mode(fsp, port, oplock_request);
if (create_options & FILE_DELETE_ON_CLOSE) {
uint32 dosattr= existing_dos_attributes;
NTSTATUS result;
if (info == FILE_WAS_OVERWRITTEN || info == FILE_WAS_CREATED ||
info == FILE_WAS_SUPERSEDED) {
dosattr = new_dos_attributes;
}
result = can_set_delete_on_close(fsp, True, dosattr);
if (!NT_STATUS_IS_OK(result)) {
uint8 u_e_c;
uint32 u_e_code;
BOOL dummy_del_on_close;
/* Remember to delete the mode we just added. */
del_share_mode(fsp, NULL, &dummy_del_on_close);
unlock_share_entry_fsp(fsp);
fd_close(conn,fsp);
file_free(fsp);
ntstatus_to_dos(result, &u_e_c, &u_e_code);
set_saved_error_triple(u_e_c, u_e_code, result);
return NULL;
}
set_delete_on_close(fsp, True);
}
if (info == FILE_WAS_OVERWRITTEN || info == FILE_WAS_CREATED ||
info == FILE_WAS_SUPERSEDED) {
/* Files should be initially set as archive */
if (lp_map_archive(SNUM(conn)) ||
lp_store_dos_attributes(SNUM(conn))) {
file_set_dosmode(conn, fname,
new_dos_attributes | aARCH, NULL,
True);
}
}
/*
* Take care of inherited ACLs on created files - if default ACL not
* selected.
*/
if (!file_existed && !def_acl) {
int saved_errno = errno; /* We might get ENOSYS in the next
* call.. */
if (SMB_VFS_FCHMOD_ACL(fsp, fsp->fh->fd, unx_mode) == -1
&& errno == ENOSYS) {
errno = saved_errno; /* Ignore ENOSYS */
}
} else if (new_unx_mode) {
int ret = -1;
/* Attributes need changing. File already existed. */
{
int saved_errno = errno; /* We might get ENOSYS in the
* next call.. */
ret = SMB_VFS_FCHMOD_ACL(fsp, fsp->fh->fd,
new_unx_mode);
if (ret == -1 && errno == ENOSYS) {
errno = saved_errno; /* Ignore ENOSYS */
} else {
DEBUG(5, ("open_file_shared: failed to reset "
"attributes of file %s to 0%o\n",
fname, (unsigned int)new_unx_mode));
ret = 0; /* Don't do the fchmod below. */
}
}
if ((ret == -1) &&
(SMB_VFS_FCHMOD(fsp, fsp->fh->fd, new_unx_mode) == -1))
DEBUG(5, ("open_file_shared: failed to reset "
"attributes of file %s to 0%o\n",
fname, (unsigned int)new_unx_mode));
}
/* If this is a successful open, we must remove any deferred open
* records. */
delete_defered_open_entry_record(conn, fsp->dev, fsp->inode);
unlock_share_entry_fsp(fsp);
conn->num_files_open++;
return fsp;
}
/****************************************************************************
Open a file for for write to ensure that we can fchmod it.
****************************************************************************/
files_struct *open_file_fchmod(connection_struct *conn, const char *fname,
SMB_STRUCT_STAT *psbuf)
{
files_struct *fsp = NULL;
BOOL fsp_open;
if (!VALID_STAT(*psbuf)) {
return NULL;
}
fsp = file_new(conn);
if(!fsp) {
return NULL;
}
/* note! we must use a non-zero desired access or we don't get
a real file descriptor. Oh what a twisted web we weave. */
fsp_open = open_file(fsp,conn,fname,psbuf,O_WRONLY,0,FILE_WRITE_DATA);
/*
* This is not a user visible file open.
* Don't set a share mode and don't increment
* the conn->num_files_open.
*/
if (!fsp_open) {
file_free(fsp);
return NULL;
}
return fsp;
}
/****************************************************************************
Close the fchmod file fd - ensure no locks are lost.
****************************************************************************/
int close_file_fchmod(files_struct *fsp)
{
int ret = fd_close(fsp->conn, fsp);
file_free(fsp);
return ret;
}
/****************************************************************************
Open a directory from an NT SMB call.
****************************************************************************/
files_struct *open_directory(connection_struct *conn,
const char *fname,
SMB_STRUCT_STAT *psbuf,
uint32 access_mask,
uint32 share_access,
uint32 create_disposition,
uint32 create_options,
int *pinfo)
{
files_struct *fsp = NULL;
BOOL dir_existed = VALID_STAT(*psbuf) ? True : False;
BOOL create_dir = False;
int info = 0;
DEBUG(5,("open_directory: opening directory %s, access_mask = 0x%x, "
"share_access = 0x%x create_options = 0x%x, "
"create_disposition = 0x%x\n",
fname,
(unsigned int)access_mask,
(unsigned int)share_access,
(unsigned int)create_options,
(unsigned int)create_disposition));
if (is_ntfs_stream_name(fname)) {
DEBUG(0,("open_directory: %s is a stream name!\n", fname ));
/* NB. Is the DOS error ERRbadpath or ERRbaddirectory ? */
set_saved_error_triple(ERRDOS, ERRbadpath,
NT_STATUS_NOT_A_DIRECTORY);
return NULL;
}
if (dir_existed && !S_ISDIR(psbuf->st_mode)) {
DEBUG(0,("open_directory: %s is not a directory !\n", fname ));
/* NB. Is the DOS error ERRbadpath or ERRbaddirectory ? */
set_saved_error_triple(ERRDOS, ERRbadpath,
NT_STATUS_NOT_A_DIRECTORY);
return NULL;
}
switch( create_disposition ) {
case FILE_OPEN:
/* If directory exists open. If directory doesn't
* exist error. */
if (!dir_existed) {
DEBUG(5,("open_directory: FILE_OPEN requested "
"for directory %s and it doesn't "
"exist.\n", fname ));
set_saved_error_triple(ERRDOS, ERRbadfile,
NT_STATUS_OBJECT_NAME_NOT_FOUND);
return NULL;
}
info = FILE_WAS_OPENED;
break;
case FILE_CREATE:
/* If directory exists error. If directory doesn't
* exist create. */
if (dir_existed) {
DEBUG(5,("open_directory: FILE_CREATE "
"requested for directory %s and it "
"already exists.\n", fname ));
set_saved_error_triple(ERRDOS, ERRfilexists,
NT_STATUS_OBJECT_NAME_COLLISION);
return NULL;
}
create_dir = True;
info = FILE_WAS_CREATED;
break;
case FILE_OPEN_IF:
/* If directory exists open. If directory doesn't
* exist create. */
if (!dir_existed) {
create_dir = True;
info = FILE_WAS_CREATED;
} else {
info = FILE_WAS_OPENED;
}
break;
case FILE_SUPERSEDE:
case FILE_OVERWRITE:
case FILE_OVERWRITE_IF:
default:
DEBUG(5,("open_directory: invalid create_disposition "
"0x%x for directory %s\n",
(unsigned int)create_disposition, fname));
file_free(fsp);
set_saved_error_triple(ERRDOS, ERRinvalidparam,
NT_STATUS_INVALID_PARAMETER);
return NULL;
}
if (create_dir) {
/*
* Try and create the directory.
*/
/* We know bad_path is false as it's caught earlier. */
NTSTATUS status = mkdir_internal(conn, fname, False);
if (!NT_STATUS_IS_OK(status)) {
DEBUG(2,("open_directory: unable to create %s. "
"Error was %s\n", fname, strerror(errno) ));
/* Ensure we return the correct NT status to the
* client. */
set_saved_error_triple(0, 0, status);
return NULL;
}
/* Ensure we're checking for a symlink here.... */
/* We don't want to get caught by a symlink racer. */
if(SMB_VFS_LSTAT(conn,fname, psbuf) != 0) {
return NULL;
}
if(!S_ISDIR(psbuf->st_mode)) {
DEBUG(0,("open_directory: %s is not a directory !\n",
fname ));
return NULL;
}
}
fsp = file_new(conn);
if(!fsp) {
return NULL;
}
/*
* Setup the files_struct for it.
*/
fsp->mode = psbuf->st_mode;
fsp->inode = psbuf->st_ino;
fsp->dev = psbuf->st_dev;
fsp->vuid = current_user.vuid;
fsp->file_pid = global_smbpid;
fsp->can_lock = True;
fsp->can_read = False;
fsp->can_write = False;
fsp->share_access = share_access;
fsp->fh->private_options = create_options;
fsp->access_mask = access_mask;
fsp->print_file = False;
fsp->modified = False;
fsp->oplock_type = NO_OPLOCK;
fsp->sent_oplock_break = NO_BREAK_SENT;
fsp->is_directory = True;
fsp->is_stat = False;
string_set(&fsp->fsp_name,fname);
if (create_options & FILE_DELETE_ON_CLOSE) {
NTSTATUS status = can_set_delete_on_close(fsp, True, 0);
if (!NT_STATUS_IS_OK(status)) {
file_free(fsp);
return NULL;
}
}
/* Change the owner if required. */
if ((info == FILE_WAS_CREATED) && lp_inherit_owner(SNUM(conn))) {
change_owner_to_parent(conn, fsp, fsp->fsp_name, psbuf);
}
if (pinfo) {
*pinfo = info;
}
conn->num_files_open++;
return fsp;
}
/****************************************************************************
Open a pseudo-file (no locking checks - a 'stat' open).
****************************************************************************/
files_struct *open_file_stat(connection_struct *conn, char *fname,
SMB_STRUCT_STAT *psbuf)
{
files_struct *fsp = NULL;
if (!VALID_STAT(*psbuf))
return NULL;
/* Can't 'stat' open directories. */
if(S_ISDIR(psbuf->st_mode))
return NULL;
fsp = file_new(conn);
if(!fsp)
return NULL;
DEBUG(5,("open_file_stat: 'opening' file %s\n", fname));
/*
* Setup the files_struct for it.
*/
fsp->mode = psbuf->st_mode;
fsp->inode = psbuf->st_ino;
fsp->dev = psbuf->st_dev;
fsp->vuid = current_user.vuid;
fsp->file_pid = global_smbpid;
fsp->can_lock = False;
fsp->can_read = False;
fsp->can_write = False;
fsp->print_file = False;
fsp->modified = False;
fsp->oplock_type = NO_OPLOCK;
fsp->sent_oplock_break = NO_BREAK_SENT;
fsp->is_directory = False;
fsp->is_stat = True;
string_set(&fsp->fsp_name,fname);
conn->num_files_open++;
return fsp;
}