#include <kernel/syscalls.h>
#include <sys/stat.h>
#include <kernel/fd.h>
#include <arch/cls.h>
#include <kernel/vfs.h>
#include <arch/spinlock.h>
#include <string.h>

syscallret syscall_fstatat(int ifd, char* path, stat* st, int flags){
	syscallret retv;
	retv.ret = -1;

	if(flags){
		retv.errno = EINVAL;
		return retv;
	}

	if(st > USER_SPACE_END || path > USER_SPACE_END){
		retv.errno = EFAULT;
		return retv;
	}

	size_t len = strlen(path);
	
	char buff[len+1];

	strcpy(buff, path);

	proc_t* proc = arch_getcls()->thread->proc;
	
	dirnode_t* targnode;
	fd_t* fd;

	if(ifd != AT_FDCWD){

		
		int err = fd_access(&proc->fdtable, &fd, ifd);

		if(err){
			retv.errno = err;
			return retv;
		}

		if(buff[0] != '/' && GETTYPE(fd->mode) != TYPE_DIR){
			retv.errno = ENOTDIR;
			goto _fail;
		}
		
		targnode = fd->node;

	}
	else
		targnode = proc->cwd;
	

	vnode_t* node;

	retv.errno = vfs_open(&node, buff[0] == '/' ? proc->root : targnode, buff);

	if(retv.errno)
		goto _fail;


	memcpy(st, &node->st, sizeof(stat)); // XXX user memcpy

	vfs_close(node);

	retv.ret = 0;

	_fail:
	
	if(ifd != AT_FDCWD)
		fd_release(fd);

	return retv;

}