// Copyright 2020 The Fuchsia Authors. All rights reserved.
// Use of this source code is governed by a BSD-style license that can be
// found in the LICENSE file.

#include <dirent.h>
#include <errno.h>
#include <fcntl.h>
#include <poll.h>
#include <sys/eventfd.h>
#include <sys/select.h>
#include <sys/stat.h>
#include <sys/statfs.h>
#include <sys/timerfd.h>
#include <sys/uio.h>
#include <sys/utsname.h>
#include <unistd.h>

#include "libc.h"
#include "stdio_impl.h"

// Temporary handler for IO functions not being implemented.
// Long term solution is to split out POSIX-dependent parts from libc.
// By marking this function noinline, its name will appear in the crash stack trace,
// indicating that the program did not link in a working IO function implementation.
//
// If you see this method in your stack, it is usually an indication that you
// should include fdio in your build.
static void __attribute__((noinline)) libc_io_functions_not_implemented_use_fdio_instead(void) {
  __builtin_trap();
}

static ssize_t stub_read(int fd, void* buf, size_t count) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_read, read);

static ssize_t stub_write(int fd, const void* buf, size_t count) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_write, write);

static zx_status_t stub__mmap_file(size_t offset, size_t len, uint32_t zx_flags, int flags, int fd,
                                   off_t fd_off, uintptr_t* out) {
  libc_io_functions_not_implemented_use_fdio_instead();
  return ZX_ERR_NOT_SUPPORTED;
}
weak_alias(stub__mmap_file, _mmap_file);

static int stub_close(int fd) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_close, close);

static int stub_open(const char* path, int flags, ...) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_open, open);

static int stub_openat(int fd, const char* filename, int flags, ...) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_openat, openat);

static off_t stub_lseek(int fd, off_t offset, int whence) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_lseek, lseek);

static int stub_isatty(int fd) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return 0;
}
weak_alias(stub_isatty, isatty);

static ssize_t stub_readv(int fd, const struct iovec* iov, int num) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_readv, readv);

static ssize_t stub_writev(int fd, const struct iovec* iov, int num) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_writev, writev);

static ssize_t stub_preadv(int fd, const struct iovec* iov, int count, off_t ofs) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_preadv, preadv);

static ssize_t stub_pread(int fd, void* buf, size_t size, off_t ofs) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_pread, pread);

static ssize_t stub_pwritev(int fd, const struct iovec* iov, int count, off_t ofs) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_pwritev, pwritev);

static ssize_t stub_pwrite(int fd, const void* buf, size_t size, off_t ofs) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_pwrite, pwrite);

static int stub_link(const char* oldpath, const char* newpath) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_link, link);

static int stub_linkat(int fd1, const char* existing, int fd2, const char* new, int flag) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_linkat, linkat);

static int stub_unlinkat(int fd, const char* path, int flag) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_unlinkat, unlinkat);

static int stub_unlink(const char* path) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_unlink, unlink);

static ssize_t stub_readlink(const char* path, char* buf, size_t bufsiz) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_readlink, readlink);

static ssize_t stub_readlinkat(int fd, const char* restrict path, char* restrict buf,
                               size_t bufsize) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_readlinkat, readlinkat);

static char* stub_realpath(const char* restrict filename, char* restrict resolved) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return NULL;
}
weak_alias(stub_realpath, realpath);

static int stub_mkdir(const char* path, mode_t mode) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_mkdir, mkdir);

static int stub_mkdirat(int fd, const char* path, mode_t mode) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_mkdirat, mkdirat);

static int stub_rmdir(const char* path) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_rmdir, rmdir);

static char* stub_getcwd(char* buf, size_t size) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return NULL;
}
weak_alias(stub_getcwd, getcwd);

static int stub_fstat(int fd, struct stat* s) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_fstat, fstat);

static int stub_fstatat(int fd, const char* restrict path, struct stat* restrict buf, int flag) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_fstatat, fstatat);

static int stub_stat(const char* fn, struct stat* s) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_stat, stat);

static int stub_lstat(const char* restrict path, struct stat* restrict buf) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_lstat, lstat);

static int stub_dup(int oldfd) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_dup, dup);

static int stub_dup2(int oldfd, int newfd) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_dup2, dup2);

static int stub_dup3(int oldfd, int newfd, int flags) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_dup3, dup3);

static int stub_pipe(int pipefd[2]) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_pipe, pipe);

static int stub_pipe2(int pipe2fd[2], int flags) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_pipe2, pipe2);

static int stub_futimens(int fd, const struct timespec times[2]) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_futimens, futimens);

static int stub_utimensat(int fd, const char* path, const struct timespec times[2], int flags) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_utimensat, utimensat);

static int stub_chdir(const char* path) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_chdir, chdir);

static DIR* stub_opendir(const char* name) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return NULL;
}
weak_alias(stub_opendir, opendir);

static DIR* stub_fdopendir(int fd) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return NULL;
}
weak_alias(stub_fdopendir, fdopendir);

static int stub_closedir(DIR* dir) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_closedir, closedir);

static struct dirent* stub_readdir(DIR* dir) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return NULL;
}
weak_alias(stub_readdir, readdir);

static int stub_readdir_r(DIR* dir, struct dirent* entry, struct dirent** result) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_readdir_r, readdir_r);

static void stub_rewinddir(DIR* dir) { libc_io_functions_not_implemented_use_fdio_instead(); }
weak_alias(stub_rewinddir, rewinddir);

static void stub_seekdir(DIR* dir, long loc) {
  libc_io_functions_not_implemented_use_fdio_instead();
}
weak_alias(stub_seekdir, seekdir);

static long stub_telldir(DIR* dir) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_telldir, telldir);

static int stub_access(const char* path, int mode) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_access, access);

static int stub_faccessat(int fd, const char* path, int amode, int flags) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_faccessat, faccessat);

static int stub_chmod(const char* path, mode_t mode) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_chmod, chmod);

static int stub_fchmod(int fd, mode_t mode) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_fchmod, fchmod);

static int stub_fchmodat(int fd, const char* path, mode_t mode, int flag) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_fchmodat, fchmodat);

static int stub_chown(const char* path, uid_t owner, gid_t group) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_chown, chown);

static int stub_fchown(int fd, uid_t owner, gid_t group) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_fchown, fchown);

static int stub_fchownat(int fd, const char* path, uid_t uid, gid_t gid, int flag) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_fchownat, fchownat);

static int stub_lchown(const char* path, uid_t owner, gid_t group) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_lchown, lchown);

static int stub_fcntl(int fd, int cmd, ...) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_fcntl, fcntl);

static int stub_fdatasync(int fd) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_fdatasync, fdatasync);

static int stub_fsync(int fd) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_fsync, fsync);

static int stub_ftruncate(int fd, off_t length) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_ftruncate, ftruncate);

static int stub_truncate(const char* path, off_t length) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_truncate, truncate);

static int stub_mkfifo(const char* path, mode_t mode) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_mkfifo, mkfifo);

static int stub_mknod(const char* path, mode_t mode, dev_t dev) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_mknod, mknod);

static int stub_rename(const char* oldpath, const char* newpath) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_rename, rename);

static int stub_renameat(int oldfd, const char* old, int newfd, const char* new) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_renameat, renameat);

static int stub_symlink(const char* oldpath, const char* newpath) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_symlink, symlink);

static int stub_symlinkat(const char* existing, int fd, const char* new) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_symlinkat, symlinkat);

static void stub_sync(void) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
}
weak_alias(stub_sync, sync);

static int stub_syncfs(int fd) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_syncfs, syncfs);

static mode_t stub_umask(mode_t mask) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_umask, umask);

int stub_select(int n, fd_set* restrict rfds, fd_set* restrict wfds, fd_set* restrict efds,
                struct timeval* restrict tv) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_select, select);

int stub_pselect(int n, fd_set* restrict rfds, fd_set* restrict wfds, fd_set* restrict efds,
                 const struct timespec* restrict ts, const sigset_t* restrict mask) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_pselect, pselect);

static int stub_poll(struct pollfd* fds, nfds_t n, int timeout) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_poll, poll);

static int stub_ppoll(struct pollfd* fds, nfds_t n, const struct timespec* timeout_ts,
                      const sigset_t* sigmask) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_ppoll, ppoll);

static int stub_ioctl(int fd, int req, ...) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_ioctl, ioctl);

static int stub_posix_fadvise(int fd, off_t base, off_t len, int advice) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_posix_fadvise, posix_fadvise);

static int stub_posix_fallocate(int fd, off_t base, off_t len) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_posix_fallocate, posix_fallocate);

static int stub_ttyname_r(int fd, char* name, size_t size) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_ttyname_r, ttyname_r);

static int stub_uname(struct utsname* uts) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_uname, uname);

static int stub__fd_open_max(void) {
  libc_io_functions_not_implemented_use_fdio_instead();
  return -1;
}
weak_alias(stub__fd_open_max, _fd_open_max);

static int stub_statfs(const char* path, struct statfs* buf) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_statfs, statfs);

static int stub_fstatfs(int fd, struct statfs* buf) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_fstatfs, fstatfs);

static int stub_statvfs(const char* restrict path, struct statvfs* restrict buf) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_statvfs, statvfs);

static int stub_fstatvfs(int fd, struct statvfs* buf) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_fstatvfs, fstatvfs);

static int stub_timerfd_create(int clockid, int flags) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_timerfd_create, timerfd_create);

static int stub_timerfd_settime(int fd, int flags, const struct itimerspec* new_value,
                                struct itimerspec* old_value) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_timerfd_settime, timerfd_settime);

static int stub_timerfd_gettime(int fd, struct itimerspec* curr_value) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_timerfd_gettime, timerfd_gettime);

static int stub_eventfd(unsigned int initval, int flags) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_eventfd, eventfd);

static int stub_eventfd_read(int fd, eventfd_t* value) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_eventfd_read, eventfd_read);

static int stub_eventfd_write(int fd, eventfd_t value) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_eventfd_write, eventfd_write);

static int stub_chroot(const char* path) {
  libc_io_functions_not_implemented_use_fdio_instead();
  errno = ENOSYS;
  return -1;
}
weak_alias(stub_chroot, chroot);