/* File metadata wrapper tests. */
#include "aksl_capture.h"
#include <errno.h>
#include <fcntl.h>

static int test_stat_success_and_fstat(void)
{
    char path[AKSL_TMP_MAX];
    int fd = -1;
    struct stat path_dest;
    struct stat fd_dest;
    struct statvfs vfs_dest;
    AKSL_CHECK(aksl_temp_file(path, sizeof(path)) == 0);
    fd = open(path, O_RDWR);
    AKSL_CHECK(fd >= 0);
    AKSL_CHECK(write(fd, "stat", 4) == 4);
    AKSL_CHECK_OK(aksl_stat(path, &path_dest));
    AKSL_CHECK(S_ISREG(path_dest.st_mode));
    AKSL_CHECK(path_dest.st_size == 4);
    AKSL_CHECK_OK(aksl_fstat(fd, &fd_dest));
    AKSL_CHECK(fd_dest.st_ino == path_dest.st_ino);
    AKSL_CHECK_OK(aksl_fstatvfs(fd, &vfs_dest));
    AKSL_CHECK(vfs_dest.f_frsize != 0);
    AKSL_CHECK(close(fd) == 0);
    AKSL_CHECK_STATUS(aksl_fstat(fd, &fd_dest), EBADF);
    AKSL_CHECK(unlink(path) == 0);
    return 0;
}

static int test_stat_paths_and_fstatat(void)
{
    char path[AKSL_TMP_MAX];
    char child[AKSL_TMP_MAX * 2];
    char linkpath[AKSL_TMP_MAX * 2];
    struct stat dest;
    struct stat ldest;
    struct statvfs vdest;
    AKSL_CHECK_STATUS(aksl_stat("/nonexistent/aksl/stat", &dest), ENOENT);
    AKSL_CHECK(aksl_temp_file(path, sizeof(path)) == 0);
    AKSL_CHECK(snprintf(child, sizeof(child), "%s/child", path) < (int)sizeof(child));
    AKSL_CHECK_STATUS(aksl_stat(child, &dest), ENOTDIR);
    AKSL_CHECK(snprintf(linkpath, sizeof(linkpath), "%s.link", path) < (int)sizeof(linkpath));
    AKSL_CHECK(symlink(path, linkpath) == 0);
    AKSL_CHECK_OK(aksl_stat(linkpath, &dest));
    AKSL_CHECK_OK(aksl_lstat(linkpath, &ldest));
    AKSL_CHECK(S_ISREG(dest.st_mode));
    AKSL_CHECK(S_ISLNK(ldest.st_mode));
    AKSL_CHECK_OK(aksl_fstatat(AT_FDCWD, path, &dest, 0));
    errno = E2BIG;
    AKSL_CHECK_STATUS(aksl_fstatat(AT_FDCWD, path, &dest, 0x40000000), EINVAL);
    AKSL_CHECK(errno == EINVAL);
    AKSL_CHECK_OK(aksl_statvfs(".", &vdest));
    AKSL_CHECK(vdest.f_frsize != 0);
    AKSL_CHECK(unlink(linkpath) == 0);
    AKSL_CHECK(unlink(path) == 0);
    return 0;
}

static int test_stat_null_arguments(void)
{
    char path[AKSL_TMP_MAX];
    struct stat dest;
    struct statvfs vdest;
    AKSL_CHECK(aksl_temp_file(path, sizeof(path)) == 0);
    AKSL_CHECK_STATUS(aksl_stat(NULL, &dest), AKERR_NULLPOINTER);
    AKSL_CHECK_STATUS(aksl_stat(path, NULL), AKERR_NULLPOINTER);
    AKSL_CHECK_STATUS(aksl_lstat(NULL, &dest), AKERR_NULLPOINTER);
    AKSL_CHECK_STATUS(aksl_lstat(path, NULL), AKERR_NULLPOINTER);
    AKSL_CHECK_STATUS(aksl_fstat(0, NULL), AKERR_NULLPOINTER);
    AKSL_CHECK_STATUS(aksl_fstatat(AT_FDCWD, NULL, &dest, 0), AKERR_NULLPOINTER);
    AKSL_CHECK_STATUS(aksl_fstatat(AT_FDCWD, path, NULL, 0), AKERR_NULLPOINTER);
    AKSL_CHECK_STATUS(aksl_statvfs(NULL, &vdest), AKERR_NULLPOINTER);
    AKSL_CHECK_STATUS(aksl_statvfs(path, NULL), AKERR_NULLPOINTER);
    AKSL_CHECK_STATUS(aksl_fstatvfs(0, NULL), AKERR_NULLPOINTER);
    AKSL_CHECK(unlink(path) == 0);
    return 0;
}

int main(void)
{
    int failures = 0;
    AKSL_RUN(failures, test_stat_success_and_fstat);
    AKSL_RUN(failures, test_stat_paths_and_fstatat);
    AKSL_RUN(failures, test_stat_null_arguments);
    AKSL_REPORT(failures);
}