/* -*- mode:c; c-file-style:"k&r"; c-basic-offset: 4; tab-width:4; indent-tabs-mode:nil; mode:auto-fill; fill-column:78; -*- */
/* vim: set ts=4 sw=4 et tw=78 fo=cqt wm=0: */

/* Copyright (C) 2014 Stony Brook University
   This file is part of Graphene Library OS.

   Graphene Library OS 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 3 of the
   License, or (at your option) any later version.

   Graphene Library OS 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 program.  If not, see <http://www.gnu.org/licenses/>.  */

/*
 * shim_getcwd.c
 *
 * Implementation of system call "getcwd", "chdir" and "fchdir".
 */

#include <shim_internal.h>
#include <shim_table.h>
#include <shim_thread.h>
#include <shim_handle.h>
#include <shim_fs.h>
#include <shim_utils.h>

#include <pal.h>
#include <pal_error.h>

#include <errno.h>

int shim_do_getcwd (char * buf, size_t len)
{
    int ret = 0;

    if (buf == NULL || len == 0) {
        ret = -EINVAL;
        goto out;
    }

    struct shim_thread * thread = get_cur_thread();
    assert(thread);

    struct shim_dentry * cwd = thread->cwd;

    int plen;
    const char * path = dentry_get_path(cwd, true, &plen);

    if (plen > len) {
        ret = -ENAMETOOLONG;
        goto out;
    } else
        ret = plen;

    memcpy(buf, path, plen + 1);
out:
    return ret;
}

int shim_do_chdir (const char * filename)
{
    struct shim_thread * thread = get_cur_thread();
    assert(thread);
    struct shim_dentry * dent = NULL;
    int ret;

    if ((ret = path_lookupat(NULL, filename, LOOKUP_OPEN, &dent, NULL)) < 0)
        return ret;

    if (!dent)
        return -ENOENT;

    if (!(dent->state & DENTRY_ISDIRECTORY)) {
        debug("%s is not a directory\n", dentry_get_path(dent, false, NULL));
        put_dentry(dent);
        return -ENOTDIR;
    }

    lock(thread->lock);
    put_dentry(thread->cwd);
    thread->cwd = dent;
    unlock(thread->lock);
    return 0;
}

int shim_do_fchdir (int fd)
{
    struct shim_thread * thread = get_cur_thread();
    struct shim_handle * hdl = get_fd_handle(fd, NULL, thread->handle_map);
    if (!hdl)
        return -EBADF;

    struct shim_dentry * dent = hdl->dentry;

    if (!(dent->state & DENTRY_ISDIRECTORY)) {
        debug("%s is not a directory\n", dentry_get_path(dent, false, NULL));
        put_handle(hdl);
        return -ENOTDIR;
    }

    lock(thread->lock);
    get_dentry(dent);
    put_dentry(thread->cwd);
    thread->cwd = dent;
    unlock(thread->lock);
    put_handle(hdl);
    return 0;
}