/*      $NetBSD: subr.c,v 1.28 2019/09/23 12:00:57 christos Exp $       */

/*
* Copyright (c) 2006 Antti Kantee.  All Rights Reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
*    notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
*    notice, this list of conditions and the following disclaimer in the
*    documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS
* OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
* DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
* SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*/

#include <sys/cdefs.h>
#if !defined(lint)
__RCSID("$NetBSD: subr.c,v 1.28 2019/09/23 12:00:57 christos Exp $");
#endif /* !lint */

#include <sys/types.h>
#include <sys/time.h>
#include <sys/vnode.h>
#include <sys/dirent.h>

#include <assert.h>
#include <errno.h>
#include <puffs.h>
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <unistd.h>

#include "puffs_priv.h"

int
puffs_gendotdent(struct dirent **dent, ino_t id, int dotdot, size_t *reslen)
{
       const char *name;

       assert(dotdot == 0 || dotdot == 1);
       name = dotdot == 0 ? "." : "..";

       return puffs_nextdent(dent, name, id, DT_DIR, reslen);
}

int
puffs_nextdent(struct dirent **dent, const char *name, ino_t id, uint8_t dtype,
       size_t *reslen)
{
       struct dirent *d = *dent;

       /* check if we have enough room for our dent-aligned dirent */
       if (_DIRENT_RECLEN(d, strlen(name)) > *reslen)
               return 0;

       d->d_fileno = id;
       d->d_type = dtype;
       d->d_namlen = (uint16_t)strlen(name);
       (void)memcpy(&d->d_name, name, (size_t)d->d_namlen);
       d->d_name[d->d_namlen] = '\0';
       d->d_reclen = (uint16_t)_DIRENT_SIZE(d);

       *reslen -= d->d_reclen;
       *dent = _DIRENT_NEXT(d);

       return 1;
}

/*ARGSUSED*/
int
puffs_fsnop_unmount(struct puffs_usermount *dontuse1, int dontuse2)
{

       /* would you like to see puffs rule again, my friend? */
       return 0;
}

/*ARGSUSED*/
int
puffs_fsnop_sync(struct puffs_usermount *dontuse1, int dontuse2,
       const struct puffs_cred *dontuse3)
{

       return 0;
}

/*ARGSUSED*/
int
puffs_fsnop_statvfs(struct puffs_usermount *dontuse1, struct puffs_statvfs *sbp)
{

       sbp->f_bsize = sbp->f_frsize = sbp->f_iosize = DEV_BSIZE;

       sbp->f_bfree=sbp->f_bavail=sbp->f_bresvd=sbp->f_blocks = (fsblkcnt_t)0;
       sbp->f_ffree=sbp->f_favail=sbp->f_fresvd=sbp->f_files = (fsfilcnt_t)0;

       sbp->f_namemax = MAXNAMLEN;

       return 0;
}

/*ARGSUSED3*/
int
puffs_genfs_node_getattr(struct puffs_usermount *pu, puffs_cookie_t opc,
       struct vattr *va, const struct puffs_cred *pcr)
{
       struct puffs_node *pn = PU_CMAP(pu, opc);

       memcpy(va, &pn->pn_va, sizeof(struct vattr));
       return 0;
}

/*
* Just put the node, don't do anything else.  Don't use this if
* your fs needs more cleanup.
*/
/*ARGSUSED2*/
int
puffs_genfs_node_reclaim(struct puffs_usermount *pu, puffs_cookie_t opc)
{

       puffs_pn_put(PU_CMAP(pu, opc));

       return 0;
}

/*
* Just a wrapper to make calling the above nicer without having to pass
* NULLs from application code
*/
void
puffs_zerostatvfs(struct puffs_statvfs *sbp)
{

       puffs_fsnop_statvfs(NULL, sbp);
}

/*
* Set vattr values for those applicable (i.e. not PUFFS_VNOVAL).
*/
void
puffs_setvattr(struct vattr *vap, const struct vattr *sva)
{

#define SETIFVAL(a, t) if (sva->a != (t)PUFFS_VNOVAL) vap->a = sva->a
       if (sva->va_type != VNON)
               vap->va_type = sva->va_type;
       SETIFVAL(va_mode, mode_t);
       SETIFVAL(va_nlink, nlink_t);
       SETIFVAL(va_uid, uid_t);
       SETIFVAL(va_gid, gid_t);
       SETIFVAL(va_fsid, dev_t);
       SETIFVAL(va_size, u_quad_t);
       SETIFVAL(va_fileid, ino_t);
       SETIFVAL(va_blocksize, long);
       SETIFVAL(va_atime.tv_sec, time_t);
       SETIFVAL(va_ctime.tv_sec, time_t);
       SETIFVAL(va_mtime.tv_sec, time_t);
       SETIFVAL(va_birthtime.tv_sec, time_t);
       SETIFVAL(va_atime.tv_nsec, long);
       SETIFVAL(va_ctime.tv_nsec, long);
       SETIFVAL(va_mtime.tv_nsec, long);
       SETIFVAL(va_birthtime.tv_nsec, long);
       SETIFVAL(va_gen, u_long);
       SETIFVAL(va_flags, u_long);
       SETIFVAL(va_rdev, dev_t);
       SETIFVAL(va_bytes, u_quad_t);
#undef SETIFVAL
       /* ignore va->va_vaflags */
}

void
puffs_vattr_null(struct vattr *vap)
{

       vap->va_type = VNON;

       /*
        * Assign individually so that it is safe even if size and
        * sign of each member are varied.
        */
       vap->va_mode = (mode_t)PUFFS_VNOVAL;
       vap->va_nlink = (nlink_t)PUFFS_VNOVAL;
       vap->va_uid = (uid_t)PUFFS_VNOVAL;
       vap->va_gid = (gid_t)PUFFS_VNOVAL;
       vap->va_fsid = (dev_t)PUFFS_VNOVAL;
       vap->va_fileid = (ino_t)PUFFS_VNOVAL;
       vap->va_size = (u_quad_t)PUFFS_VNOVAL;
       vap->va_blocksize = sysconf(_SC_PAGESIZE);
           vap->va_atime.tv_sec =
           vap->va_mtime.tv_sec =
           vap->va_ctime.tv_sec =
       vap->va_birthtime.tv_sec = PUFFS_VNOVAL;
           vap->va_atime.tv_nsec =
           vap->va_mtime.tv_nsec =
           vap->va_ctime.tv_nsec =
       vap->va_birthtime.tv_nsec = PUFFS_VNOVAL;
       vap->va_rdev = (dev_t)PUFFS_VNOVAL;
       vap->va_bytes = (u_quad_t)PUFFS_VNOVAL;

       vap->va_flags = 0;
       vap->va_gen = 0;
       vap->va_vaflags = 0;
}

static int vdmap[] = {
       DT_UNKNOWN,     /* VNON */
       DT_REG,         /* VREG */
       DT_DIR,         /* VDIR */
       DT_BLK,         /* VBLK */
       DT_CHR,         /* VCHR */
       DT_LNK,         /* VLNK */
       DT_SOCK,        /* VSUCK*/
       DT_FIFO,        /* VFIFO*/
       DT_UNKNOWN      /* VBAD */
};
/* XXX: DT_WHT ? */
int
puffs_vtype2dt(enum vtype vt)
{

       if ((int)vt >= VNON && vt < (sizeof(vdmap)/sizeof(vdmap[0])))
               return vdmap[vt];

       return DT_UNKNOWN;
}

enum vtype
puffs_mode2vt(mode_t mode)
{

       switch (mode & S_IFMT) {
       case S_IFIFO:
               return VFIFO;
       case S_IFCHR:
               return VCHR;
       case S_IFDIR:
               return VDIR;
       case S_IFBLK:
               return VBLK;
       case S_IFREG:
               return VREG;
       case S_IFLNK:
               return VLNK;
       case S_IFSOCK:
               return VSOCK;
       default:
               return VBAD; /* XXX: not really true, but ... */
       }
}

void
puffs_stat2vattr(struct vattr *va, const struct stat *sb)
{

       va->va_type = puffs_mode2vt(sb->st_mode);
       va->va_mode = sb->st_mode;
       va->va_nlink = sb->st_nlink;
       va->va_uid = sb->st_uid;
       va->va_gid = sb->st_gid;
       va->va_fsid = sb->st_dev;
       va->va_fileid = sb->st_ino;
       va->va_size = sb->st_size;
       va->va_blocksize = sb->st_blksize;
       va->va_atime = sb->st_atimespec;
       va->va_ctime = sb->st_ctimespec;
       va->va_mtime = sb->st_mtimespec;
       va->va_birthtime = sb->st_birthtimespec;
       va->va_gen = sb->st_gen;
       va->va_flags = sb->st_flags;
       va->va_rdev = sb->st_rdev;
       va->va_bytes = sb->st_blocks << DEV_BSHIFT;
       va->va_filerev = 0;
       va->va_vaflags = 0;
}

mode_t
puffs_addvtype2mode(mode_t mode, enum vtype type)
{

       switch (type) {
       case VCHR:
               mode |= S_IFCHR;
               break;
       case VBLK:
               mode |= S_IFBLK;
               break;
       case VSOCK:
               mode |= S_IFSOCK;
               break;
       case VFIFO:
               mode |= S_IFIFO;
               break;
       case VREG:
               mode |= S_IFREG;
               break;
       case VLNK:
               mode |= S_IFLNK;
               break;
       case VDIR:
               mode |= S_IFDIR;
               break;
       default:
               break;
       }

       return mode;
}