Git conversion: Make reactos the root directory, move rosapps, rostests, wallpapers...
[reactos.git] / base / services / nfsd / setattr.c
diff --git a/base/services/nfsd/setattr.c b/base/services/nfsd/setattr.c
new file mode 100644 (file)
index 0000000..ea4b058
--- /dev/null
@@ -0,0 +1,526 @@
+/* NFSv4.1 client for Windows
+ * Copyright © 2012 The Regents of the University of Michigan
+ *
+ * Olga Kornievskaia <aglo@umich.edu>
+ * Casey Bodley <cbodley@umich.edu>
+ *
+ * This library is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU Lesser General Public License as published by
+ * the Free Software Foundation; either version 2.1 of the License, or (at
+ * your option) any later version.
+ *
+ * This library 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 Lesser General Public
+ * License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public License
+ * along with this library; if not, write to the Free Software Foundation,
+ * Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+ */
+
+#include <windows.h>
+#include <stdio.h>
+#include <strsafe.h>
+
+#include "from_kernel.h"
+#include "nfs41_ops.h"
+#include "delegation.h"
+#include "name_cache.h"
+#include "upcall.h"
+#include "util.h"
+#include "daemon_debug.h"
+
+
+/* NFS41_FILE_SET */
+static int parse_setattr(unsigned char *buffer, uint32_t length, nfs41_upcall *upcall)
+{
+    int status;
+    setattr_upcall_args *args = &upcall->args.setattr;
+
+    status = get_name(&buffer, &length, &args->path);
+    if (status) goto out;
+    status = safe_read(&buffer, &length, &args->set_class, sizeof(args->set_class));
+    if (status) goto out;
+    status = safe_read(&buffer, &length, &args->buf_len, sizeof(args->buf_len));
+    if (status) goto out;
+
+    args->buf = buffer;
+    args->root = upcall->root_ref;
+    args->state = upcall->state_ref;
+
+    dprintf(1, "parsing NFS41_FILE_SET: filename='%s' info_class=%d "
+        "buf_len=%d\n", args->path, args->set_class, args->buf_len);
+out:
+    return status;
+}
+
+static int handle_nfs41_setattr(setattr_upcall_args *args)
+{
+    PFILE_BASIC_INFO basic_info = (PFILE_BASIC_INFO)args->buf;
+    nfs41_open_state *state = args->state;
+    nfs41_superblock *superblock = state->file.fh.superblock;
+    stateid_arg stateid;
+    nfs41_file_info info = { 0 }, old_info = { 0 };
+    int status = NO_ERROR, getattr_status;
+       
+       if (basic_info->FileAttributes) {
+               info.hidden = basic_info->FileAttributes & FILE_ATTRIBUTE_HIDDEN ? 1 : 0;
+               info.system = basic_info->FileAttributes & FILE_ATTRIBUTE_SYSTEM ? 1 : 0;
+               info.archive = basic_info->FileAttributes & FILE_ATTRIBUTE_ARCHIVE ? 1 : 0;
+               getattr_status = nfs41_attr_cache_lookup(session_name_cache(state->session),
+                       state->file.fh.fileid, &old_info);
+
+               if (getattr_status || info.hidden != old_info.hidden) {
+                       info.attrmask.arr[0] = FATTR4_WORD0_HIDDEN;
+                       info.attrmask.count = 1;
+               }
+               if (getattr_status || info.archive != old_info.archive) {
+                       info.attrmask.arr[0] |= FATTR4_WORD0_ARCHIVE;
+                       info.attrmask.count = 1;
+               }
+               if (getattr_status || info.system != old_info.system) {
+                       info.attrmask.arr[1] = FATTR4_WORD1_SYSTEM;
+                       info.attrmask.count = 2;
+               }
+       }
+    if (old_info.mode == 0444 && 
+            ((basic_info->FileAttributes & FILE_ATTRIBUTE_READONLY) == 0)) {
+        info.mode = 0644;
+        info.attrmask.arr[1] |= FATTR4_WORD1_MODE;
+        info.attrmask.count = 2;
+    }
+
+    if (superblock->cansettime) {
+        /* set the time_delta so xdr_settime4() can decide
+         * whether or not to use SET_TO_SERVER_TIME4 */
+        info.time_delta = &superblock->time_delta;
+
+        /* time_create */
+        if (basic_info->CreationTime.QuadPart > 0) {
+            file_time_to_nfs_time(&basic_info->CreationTime,
+                &info.time_create);
+            info.attrmask.arr[1] |= FATTR4_WORD1_TIME_CREATE;
+            info.attrmask.count = 2;
+        }
+        /* time_access_set */
+        if (basic_info->LastAccessTime.QuadPart > 0) {
+            file_time_to_nfs_time(&basic_info->LastAccessTime,
+                &info.time_access);
+            info.attrmask.arr[1] |= FATTR4_WORD1_TIME_ACCESS_SET;
+            info.attrmask.count = 2;
+        }
+        /* time_modify_set */
+        if (basic_info->LastWriteTime.QuadPart > 0) {
+            file_time_to_nfs_time(&basic_info->LastWriteTime,
+                &info.time_modify);
+            info.attrmask.arr[1] |= FATTR4_WORD1_TIME_MODIFY_SET;
+            info.attrmask.count = 2;
+        }
+    }
+
+    /* mode */
+    if (basic_info->FileAttributes & FILE_ATTRIBUTE_READONLY) {
+        info.mode = 0444;
+        info.attrmask.arr[1] |= FATTR4_WORD1_MODE;
+        info.attrmask.count = 2;
+    }
+
+    /* mask out unsupported attributes */
+    nfs41_superblock_supported_attrs(superblock, &info.attrmask);
+
+    if (!info.attrmask.count)
+        goto out;
+
+    /* break read delegations before SETATTR */
+    nfs41_delegation_return(state->session, &state->file,
+        OPEN_DELEGATE_READ, FALSE);
+
+    nfs41_open_stateid_arg(state, &stateid);
+
+    status = nfs41_setattr(state->session, &state->file, &stateid, &info);
+    if (status) {
+        dprintf(1, "nfs41_setattr() failed with error %s.\n",
+            nfs_error_string(status));
+        status = nfs_to_windows_error(status, ERROR_NOT_SUPPORTED);
+    }
+    args->ctime = info.change;
+out:
+    return status;
+}
+
+static int handle_nfs41_remove(setattr_upcall_args *args)
+{
+    nfs41_open_state *state = args->state;
+    int status;
+
+    /* break any delegations and truncate before REMOVE */
+    nfs41_delegation_return(state->session, &state->file,
+        OPEN_DELEGATE_WRITE, TRUE);
+
+    status = nfs41_remove(state->session, &state->parent,
+        &state->file.name, state->file.fh.fileid);
+    if (status)
+        dprintf(1, "nfs41_remove() failed with error %s.\n",
+            nfs_error_string(status));
+
+    return nfs_to_windows_error(status, ERROR_ACCESS_DENIED);
+}
+
+static void open_state_rename(
+    OUT nfs41_open_state *state,
+    IN const nfs41_abs_path *path)
+{
+    AcquireSRWLockExclusive(&state->path.lock);
+
+    abs_path_copy(&state->path, path);
+    last_component(state->path.path, state->path.path + state->path.len,
+        &state->file.name);
+    last_component(state->path.path, state->file.name.name,
+        &state->parent.name);
+
+    ReleaseSRWLockExclusive(&state->path.lock);
+}
+
+static int nfs41_abs_path_compare(
+    IN const struct list_entry *entry,
+    IN const void *value)
+{
+    nfs41_open_state *client = list_container(entry, nfs41_open_state, client_entry);
+    const nfs41_abs_path *name = (const nfs41_abs_path *)value;
+    if (client->path.len == name->len && 
+            !strncmp(client->path.path, name->path, client->path.len))
+        return NO_ERROR;
+    return ERROR_FILE_NOT_FOUND;
+}
+
+static int is_dst_name_opened(nfs41_abs_path *dst_path, nfs41_session *dst_session)
+{
+    int status;
+    nfs41_client *client = dst_session->client;
+
+    EnterCriticalSection(&client->state.lock);
+    if (list_search(&client->state.opens, dst_path, nfs41_abs_path_compare))
+        status = TRUE;
+    else
+        status = FALSE;
+    LeaveCriticalSection(&client->state.lock);
+
+    return status;
+}
+static int handle_nfs41_rename(setattr_upcall_args *args)
+{
+    nfs41_open_state *state = args->state;
+    nfs41_session *dst_session;
+    PFILE_RENAME_INFO rename = (PFILE_RENAME_INFO)args->buf;
+    nfs41_abs_path dst_path = { 0 };
+    nfs41_path_fh dst_dir, dst;
+    nfs41_component dst_name, *src_name;
+    uint32_t depth = 0;
+    int status;
+
+    src_name = &state->file.name;
+
+    if (rename->FileNameLength == 0) {
+        /* start from state->path instead of args->path, in case we got
+         * the file from a referred server */
+        AcquireSRWLockShared(&state->path.lock);
+        abs_path_copy(&dst_path, &state->path);
+        ReleaseSRWLockShared(&state->path.lock);
+
+        path_fh_init(&dst_dir, &dst_path);
+        fh_copy(&dst_dir.fh, &state->parent.fh);
+
+        create_silly_rename(&dst_path, &state->file.fh, &dst_name);
+        dprintf(1, "silly rename: %s -> %s\n", src_name->name, dst_name.name);
+
+        /* break any delegations and truncate before silly rename */
+        nfs41_delegation_return(state->session, &state->file,
+            OPEN_DELEGATE_WRITE, TRUE);
+
+        status = nfs41_rename(state->session,
+            &state->parent, src_name,
+            &dst_dir, &dst_name);
+        if (status) {
+            dprintf(1, "nfs41_rename() failed with error %s.\n",
+                nfs_error_string(status));
+            status = nfs_to_windows_error(status, ERROR_ACCESS_DENIED);
+        } else {
+            /* rename state->path on success */
+            open_state_rename(state, &dst_path);
+        }
+        goto out;
+    }
+
+    dst_path.len = (unsigned short)WideCharToMultiByte(CP_UTF8, 0,
+        rename->FileName, rename->FileNameLength/sizeof(WCHAR),
+        dst_path.path, NFS41_MAX_PATH_LEN, NULL, NULL);
+    if (dst_path.len == 0) {
+        eprintf("WideCharToMultiByte failed to convert destination "
+            "filename %S.\n", rename->FileName);
+        status = ERROR_INVALID_PARAMETER;
+        goto out;
+    }
+    path_fh_init(&dst_dir, &dst_path);
+
+    /* the destination path is absolute, so start from the root session */
+    status = nfs41_lookup(args->root, nfs41_root_session(args->root),
+        &dst_path, &dst_dir, &dst, NULL, &dst_session);
+
+    while (status == ERROR_REPARSE) {
+        if (++depth > NFS41_MAX_SYMLINK_DEPTH) {
+            status = ERROR_TOO_MANY_LINKS;
+            goto out;
+        }
+
+        /* replace the path with the symlink target's */
+        status = nfs41_symlink_target(dst_session, &dst_dir, &dst_path);
+        if (status) {
+            eprintf("nfs41_symlink_target() for %s failed with %d\n", 
+                dst_dir.path->path, status);
+            goto out;
+        }
+
+        /* redo the lookup until it doesn't return REPARSE */
+        status = nfs41_lookup(args->root, dst_session,
+            &dst_path, &dst_dir, NULL, NULL, &dst_session);
+    }
+
+    /* get the components after lookup in case a referral changed its path */
+    last_component(dst_path.path, dst_path.path + dst_path.len, &dst_name);
+    last_component(dst_path.path, dst_name.name, &dst_dir.name);
+
+    if (status == NO_ERROR) {
+        if (!rename->ReplaceIfExists) {
+            status = ERROR_FILE_EXISTS;
+            goto out;
+        }
+        /* break any delegations and truncate the destination file */
+        nfs41_delegation_return(dst_session, &dst,
+            OPEN_DELEGATE_WRITE, TRUE);
+    } else if (status != ERROR_FILE_NOT_FOUND) {
+        dprintf(1, "nfs41_lookup('%s') failed to find destination "
+            "directory with %d\n", dst_path.path, status);
+        goto out;
+    }
+
+    /* http://tools.ietf.org/html/rfc5661#section-18.26.3
+     * "Source and target directories MUST reside on the same
+     * file system on the server." */
+    if (state->parent.fh.superblock != dst_dir.fh.superblock) {
+        status = ERROR_NOT_SAME_DEVICE;
+        goto out;
+    }
+
+    status = is_dst_name_opened(&dst_path, dst_session);
+    if (status) {
+        /* AGLO: 03/21/2011: we can't handle rename of a file with a filename 
+         * that is currently opened by this client
+         */
+        eprintf("handle_nfs41_rename: %s is opened\n", dst_path.path);
+        status = ERROR_FILE_EXISTS;
+        goto out;
+    }
+
+    /* break any delegations on the source file */
+    nfs41_delegation_return(state->session, &state->file,
+        OPEN_DELEGATE_WRITE, FALSE);
+
+    status = nfs41_rename(state->session,
+        &state->parent, src_name,
+        &dst_dir, &dst_name);
+    if (status) {
+        dprintf(1, "nfs41_rename() failed with error %s.\n",
+            nfs_error_string(status));
+        status = nfs_to_windows_error(status, ERROR_ACCESS_DENIED);
+    } else {
+        /* rename state->path on success */
+        open_state_rename(state, &dst_path);
+    }
+out:
+    return status;
+}
+
+static int handle_nfs41_set_size(setattr_upcall_args *args)
+{
+    nfs41_file_info info = { 0 };
+    stateid_arg stateid;
+    /* note: this is called with either FILE_END_OF_FILE_INFO or
+     * FILE_ALLOCATION_INFO, both of which contain a single LARGE_INTEGER */
+    PLARGE_INTEGER size = (PLARGE_INTEGER)args->buf;
+    nfs41_open_state *state = args->state;
+    int status;
+
+    /* break read delegations before SETATTR */
+    nfs41_delegation_return(state->session, &state->file,
+        OPEN_DELEGATE_READ, FALSE);
+
+    nfs41_open_stateid_arg(state, &stateid);
+
+    info.size = size->QuadPart;
+    info.attrmask.count = 1;
+    info.attrmask.arr[0] = FATTR4_WORD0_SIZE;
+
+    dprintf(2, "calling setattr() with size=%lld\n", info.size);
+    status = nfs41_setattr(state->session, &state->file, &stateid, &info);
+    if (status) {
+        dprintf(1, "nfs41_setattr() failed with error %s.\n",
+            nfs_error_string(status));
+        goto out;
+    }
+
+    /* update the last offset for LAYOUTCOMMIT */
+    AcquireSRWLockExclusive(&state->lock);
+    state->pnfs_last_offset = info.size ? info.size - 1 : 0;
+    ReleaseSRWLockExclusive(&state->lock);
+    args->ctime = info.change;
+out:
+    return status = nfs_to_windows_error(status, ERROR_NOT_SUPPORTED);
+}
+
+static int handle_nfs41_link(setattr_upcall_args *args)
+{
+    nfs41_open_state *state = args->state;
+    PFILE_LINK_INFORMATION link = (PFILE_LINK_INFORMATION)args->buf;
+    nfs41_session *dst_session;
+    nfs41_abs_path dst_path = { 0 };
+    nfs41_path_fh dst_dir, dst;
+    nfs41_component dst_name;
+    uint32_t depth = 0;
+    nfs41_file_info info = { 0 };
+    int status;
+
+    dst_path.len = (unsigned short)WideCharToMultiByte(CP_UTF8, 0,
+        link->FileName, link->FileNameLength/sizeof(WCHAR),
+        dst_path.path, NFS41_MAX_PATH_LEN, NULL, NULL);
+    if (dst_path.len == 0) {
+        eprintf("WideCharToMultiByte failed to convert destination "
+            "filename %S.\n", link->FileName);
+        status = ERROR_INVALID_PARAMETER;
+        goto out;
+    }
+    path_fh_init(&dst_dir, &dst_path);
+
+    /* the destination path is absolute, so start from the root session */
+    status = nfs41_lookup(args->root, nfs41_root_session(args->root),
+        &dst_path, &dst_dir, &dst, NULL, &dst_session);
+
+    while (status == ERROR_REPARSE) {
+        if (++depth > NFS41_MAX_SYMLINK_DEPTH) {
+            status = ERROR_TOO_MANY_LINKS;
+            goto out;
+        }
+
+        /* replace the path with the symlink target's */
+        status = nfs41_symlink_target(dst_session, &dst_dir, &dst_path);
+        if (status) {
+            eprintf("nfs41_symlink_target() for %s failed with %d\n", 
+                dst_dir.path->path, status);
+            goto out;
+        }
+
+        /* redo the lookup until it doesn't return REPARSE */
+        status = nfs41_lookup(args->root, dst_session,
+            &dst_path, &dst_dir, &dst, NULL, &dst_session);
+    }
+
+    /* get the components after lookup in case a referral changed its path */
+    last_component(dst_path.path, dst_path.path + dst_path.len, &dst_name);
+    last_component(dst_path.path, dst_name.name, &dst_dir.name);
+
+    if (status == NO_ERROR) {
+        if (!link->ReplaceIfExists) {
+            status = ERROR_FILE_EXISTS;
+            goto out;
+        }
+    } else if (status != ERROR_FILE_NOT_FOUND) {
+        dprintf(1, "nfs41_lookup('%s') failed to find destination "
+            "directory with %d\n", dst_path.path, status);
+        goto out;
+    }
+
+    /* http://tools.ietf.org/html/rfc5661#section-18.9.3
+     * "The existing file and the target directory must reside within
+     * the same file system on the server." */
+    if (state->file.fh.superblock != dst_dir.fh.superblock) {
+        status = ERROR_NOT_SAME_DEVICE;
+        goto out;
+    }
+
+    if (status == NO_ERROR) {
+        /* break any delegations and truncate the destination file */
+        nfs41_delegation_return(dst_session, &dst,
+            OPEN_DELEGATE_WRITE, TRUE);
+
+        /* LINK will return NFS4ERR_EXIST if the target file exists,
+         * so we have to remove it ourselves */
+        status = nfs41_remove(state->session,
+            &dst_dir, &dst_name, dst.fh.fileid);
+        if (status) {
+            dprintf(1, "nfs41_remove() failed with error %s.\n",
+                nfs_error_string(status));
+            status = ERROR_FILE_EXISTS;
+            goto out;
+        }
+    }
+
+    /* break read delegations on the source file */
+    nfs41_delegation_return(state->session, &state->file,
+        OPEN_DELEGATE_READ, FALSE);
+
+    status = nfs41_link(state->session, &state->file, &dst_dir, &dst_name, 
+            &info);
+    if (status) {
+        dprintf(1, "nfs41_link() failed with error %s.\n",
+            nfs_error_string(status));
+        status = nfs_to_windows_error(status, ERROR_INVALID_PARAMETER);
+    }
+    args->ctime = info.change;
+out:
+    return status;
+}
+
+static int handle_setattr(nfs41_upcall *upcall)
+{
+    setattr_upcall_args *args = &upcall->args.setattr;
+    int status;
+
+    switch (args->set_class) {
+    case FileBasicInformation:
+        status = handle_nfs41_setattr(args);
+        break;
+    case FileDispositionInformation:
+        status = handle_nfs41_remove(args);
+        break;
+    case FileRenameInformation:
+        status = handle_nfs41_rename(args);
+        break;
+    case FileAllocationInformation:
+    case FileEndOfFileInformation:
+        status = handle_nfs41_set_size(args);
+        break;
+    case FileLinkInformation:
+        status = handle_nfs41_link(args);
+        break;
+    default:
+        eprintf("unknown set_file information class %d\n",
+            args->set_class);
+        status = ERROR_NOT_SUPPORTED;
+        break;
+    }
+
+    return status;
+}
+
+static int marshall_setattr(unsigned char *buffer, uint32_t *length, nfs41_upcall *upcall)
+{
+    setattr_upcall_args *args = &upcall->args.setattr;
+    return safe_write(&buffer, length, &args->ctime, sizeof(args->ctime));
+}
+
+
+const nfs41_upcall_op nfs41_op_setattr = {
+    parse_setattr,
+    handle_setattr,
+    marshall_setattr
+};