NetBSD/share/examples/puffs/dtfs/dtfs_vnops.c

408 lines
9.4 KiB
C

/* $NetBSD: dtfs_vnops.c,v 1.15 2007/02/27 22:03:45 pooka 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.
* 3. The name of the company nor the name of the author may be used to
* endorse or promote products derived from this software without specific
* prior written permission.
*
* 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/types.h>
#include <assert.h>
#include <errno.h>
#include <puffs.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ucontext.h>
#include <util.h>
#include "dtfs.h"
int
dtfs_node_lookup(struct puffs_cc *pcc, void *opc, void **newnode,
enum vtype *newtype, voff_t *newsize, dev_t *newrdev,
const struct puffs_cn *pcn)
{
struct dtfs_file *df = DTFS_CTOF(opc);
struct dtfs_dirent *dfd;
/* parent dir? */
if (PCNISDOTDOT(pcn)) {
*newnode = df->df_dotdot;
*newtype = df->df_dotdot->pn_va.va_type;
assert(*newtype == VDIR);
return 0;
}
dfd = dtfs_dirgetbyname(df, pcn->pcn_name);
if (dfd) {
*newnode = dfd->dfd_node;
*newtype = dfd->dfd_node->pn_va.va_type;
*newsize = dfd->dfd_node->pn_va.va_size;
if (*newtype == VBLK || *newtype == VCHR)
*newrdev = DTFS_PTOF(dfd->dfd_node)->df_rdev;
return 0;
}
return ENOENT;
}
/* no credcheck */
int
dtfs_node_getattr(struct puffs_cc *pcc, void *opc,
struct vattr *va, const struct puffs_cred *pcr, pid_t pid)
{
struct dtfs_file *df = DTFS_CTOF(opc);
struct puffs_node *pn = opc;
memcpy(va, &pn->pn_va, sizeof(struct vattr));
if (pn->pn_va.va_type == VBLK || pn->pn_va.va_type == VCHR)
va->va_rdev = df->df_rdev;
return 0;
}
/* no credcheck */
int
dtfs_node_setattr(struct puffs_cc *pcc, void *opc,
const struct vattr *va, const struct puffs_cred *pcr, pid_t pid)
{
struct puffs_node *pn = opc;
/* check if we need to modify our internal size */
/* (must be called before setattr! XXX) */
if (va->va_size != PUFFS_VNOVAL) {
switch (pn->pn_va.va_type) {
case VREG:
dtfs_setsize(pn, va->va_size, 1);
pn->pn_va.va_bytes = va->va_size;
break;
case VBLK:
case VCHR:
case VFIFO:
break;
case VDIR:
return EISDIR;
default:
return EOPNOTSUPP;
}
}
puffs_setvattr(&pn->pn_va, va);
return 0;
}
/* create a new node in the parent directory specified by opc */
int
dtfs_node_create(struct puffs_cc *pcc, void *opc, void **newnode,
const struct puffs_cn *pcn, const struct vattr *va)
{
struct puffs_node *pn_parent = opc;
struct puffs_node *pn_new;
if (!(va->va_type == VREG || va->va_type == VSOCK))
return ENODEV;
pn_new = dtfs_genfile(pn_parent, pcn->pcn_name, va->va_type);
puffs_setvattr(&pn_new->pn_va, va);
*newnode = pn_new;
return 0;
}
int
dtfs_node_remove(struct puffs_cc *pcc, void *opc, void *targ,
const struct puffs_cn *pcn)
{
struct puffs_node *pn_parent = opc;
struct puffs_node *pn = targ;
if (pn->pn_va.va_type == VDIR)
return EPERM;
dtfs_nukenode(targ, pn_parent, pcn->pcn_name);
return 0;
}
int
dtfs_node_mkdir(struct puffs_cc *pcc, void *opc, void **newnode,
const struct puffs_cn *pcn, const struct vattr *va)
{
struct puffs_node *pn_parent = opc;
struct puffs_node *pn_new;
pn_new = dtfs_genfile(pn_parent, pcn->pcn_name, VDIR);
puffs_setvattr(&pn_new->pn_va, va);
*newnode = pn_new;
return 0;
}
int
dtfs_node_rmdir(struct puffs_cc *pcc, void *opc, void *targ,
const struct puffs_cn *pcn)
{
struct puffs_node *pn_parent = opc;
struct dtfs_file *df = DTFS_CTOF(targ);
if (!LIST_EMPTY(&df->df_dirents))
return ENOTEMPTY;
dtfs_nukenode(targ, pn_parent, pcn->pcn_name);
return 0;
}
int
dtfs_node_readdir(struct puffs_cc *pcc, void *opc,
struct dirent *dent, const struct puffs_cred *pcr, off_t *readoff,
size_t *reslen)
{
struct puffs_node *pn = opc;
struct puffs_node *pn_nth;
struct dtfs_dirent *dfd_nth;
if (pn->pn_va.va_type != VDIR)
return ENOTDIR;
dtfs_updatetimes(pn, 1, 0, 0);
again:
if (*readoff == DENT_DOT || *readoff == DENT_DOTDOT) {
puffs_gendotdent(&dent, pn->pn_va.va_fileid, *readoff, reslen);
(*readoff)++;
goto again;
}
for (;;) {
dfd_nth = dtfs_dirgetnth(pn->pn_data, DENT_ADJ(*readoff));
if (!dfd_nth)
return 0;
pn_nth = dfd_nth->dfd_node;
if (!puffs_nextdent(&dent, dfd_nth->dfd_name,
pn_nth->pn_va.va_fileid,
puffs_vtype2dt(pn_nth->pn_va.va_type),
reslen))
return 0;
(*readoff)++;
}
}
int
dtfs_node_rename(struct puffs_cc *pcc, void *opc, void *src,
const struct puffs_cn *pcn_src, void *targ_dir, void *targ,
const struct puffs_cn *pcn_targ)
{
struct dtfs_dirent *dfd_src;
struct puffs_node *pn_sdir = opc;
struct puffs_node *pn_tdir = targ_dir;
struct puffs_node *pn_tfile = targ;
dfd_src = dtfs_dirgetbyname(DTFS_PTOF(pn_sdir),
pcn_src->pcn_name);
/* asked for "." or ".." XXX: make sure? */
if (!dfd_src)
return EINVAL;
/* if there's a target file, nuke it for atomic replacement */
if (pn_tfile) {
if (pn_tfile->pn_va.va_type == VDIR) {
assert(/*CONSTCOND*/0); /* XXX FIXME */
}
dtfs_nukenode(pn_tfile, pn_sdir, pcn_targ->pcn_name);
}
/* out with the old */
dtfs_removedent(pn_sdir, dfd_src);
/* and in with the new */
dtfs_adddent(pn_tdir, dfd_src);
/* update name */
free(dfd_src->dfd_name);
dfd_src->dfd_name = estrdup(pcn_targ->pcn_name);
dtfs_updatetimes(src, 0, 1, 0);
return 0;
}
int
dtfs_node_link(struct puffs_cc *pcc, void *opc, void *targ,
const struct puffs_cn *pcn)
{
struct puffs_node *pn_dir = opc;
struct dtfs_dirent *dfd;
dfd = emalloc(sizeof(struct dtfs_dirent));
dfd->dfd_node = targ;
dfd->dfd_name = estrdup(pcn->pcn_name);
dtfs_adddent(pn_dir, dfd);
dtfs_updatetimes(targ, 0, 1, 0);
return 0;
}
int
dtfs_node_symlink(struct puffs_cc *pcc, void *opc, void **newnode,
const struct puffs_cn *pcn_src, const struct vattr *va,
const char *link_target)
{
struct puffs_node *pn_parent = opc;
struct puffs_node *pn_new;
struct dtfs_file *df_new;
if (va->va_type != VLNK)
return ENODEV;
pn_new = dtfs_genfile(pn_parent, pcn_src->pcn_name, VLNK);
puffs_setvattr(&pn_new->pn_va, va);
df_new = DTFS_PTOF(pn_new);
df_new->df_linktarget = estrdup(link_target);
pn_new->pn_va.va_size = strlen(df_new->df_linktarget);
*newnode = pn_new;
return 0;
}
int
dtfs_node_readlink(struct puffs_cc *pcc, void *opc,
const struct puffs_cred *cred, char *linkname, size_t *linklen)
{
struct dtfs_file *df = DTFS_CTOF(opc);
struct puffs_node *pn = opc;
assert(pn->pn_va.va_type == VLNK);
strlcpy(linkname, df->df_linktarget, *linklen);
*linklen = strlen(linkname);
return 0;
}
int
dtfs_node_mknod(struct puffs_cc *pcc, void *opc, void **newnode,
const struct puffs_cn *pcn, const struct vattr *va)
{
struct puffs_node *pn_parent = opc;
struct puffs_node *pn_new;
struct dtfs_file *df;
if (!(va->va_type == VBLK || va->va_type == VCHR
|| va->va_type == VFIFO))
return EINVAL;
pn_new = dtfs_genfile(pn_parent, pcn->pcn_name, va->va_type);
puffs_setvattr(&pn_new->pn_va, va);
df = DTFS_PTOF(pn_new);
df->df_rdev = va->va_rdev;
*newnode = pn_new;
return 0;
}
/*
* Read operation, used both for VOP_READ and VOP_GETPAGES
*/
int
dtfs_node_read(struct puffs_cc *pcc, void *opc, uint8_t *buf,
off_t offset, size_t *resid, const struct puffs_cred *pcr, int ioflag)
{
struct puffs_node *pn = opc;
struct dtfs_file *df = DTFS_CTOF(opc);
quad_t xfer;
if (pn->pn_va.va_type != VREG)
return EISDIR;
xfer = MIN(*resid, df->df_datalen - offset);
if (xfer < 0)
return EINVAL;
memcpy(buf, df->df_data + offset, xfer);
*resid -= xfer;
dtfs_updatetimes(pn, 1, 0, 0);
return 0;
}
/*
* write operation on the wing
*/
int
dtfs_node_write(struct puffs_cc *pcc, void *opc, uint8_t *buf,
off_t offset, size_t *resid, const struct puffs_cred *pcr, int ioflag)
{
struct puffs_node *pn = opc;
struct dtfs_file *df = DTFS_CTOF(opc);
if (pn->pn_va.va_type != VREG)
return EISDIR;
if (ioflag & PUFFS_IO_APPEND)
offset = pn->pn_va.va_size;
dtfs_setsize(pn, *resid + offset, 0);
memcpy(df->df_data + offset, buf, *resid);
*resid = 0;
dtfs_updatetimes(pn, 0, 1, 1);
return 0;
}
int
dtfs_node_reclaim(struct puffs_cc *pcc, void *opc, pid_t pid)
{
struct puffs_node *pn = opc;
if (pn->pn_va.va_nlink == 0)
dtfs_freenode(pn);
return 0;
}
int
dtfs_node_inactive(struct puffs_cc *pcc, void *opc, pid_t pid,
int *refcount)
{
struct puffs_node *pn = opc;
*refcount = pn->pn_va.va_nlink;
return 0;
}