summaryrefslogtreecommitdiff
path: root/share/examples
diff options
context:
space:
mode:
authorpooka <pooka@NetBSD.org>2007-08-09 22:01:25 +0000
committerpooka <pooka@NetBSD.org>2007-08-09 22:01:25 +0000
commitba4e596bc9a895b849b377fae3f736cf5e5e77a1 (patch)
tree74f4828bb9bdcbb14f489ca055ee12c1b33af8e1 /share/examples
parent5b593f2aeb4e8f47e7e65324f274c9115535d765 (diff)
move sysctlfs from examples to base
Diffstat (limited to 'share/examples')
-rw-r--r--share/examples/puffs/sysctlfs/Makefile11
-rw-r--r--share/examples/puffs/sysctlfs/sysctlfs.c674
2 files changed, 0 insertions, 685 deletions
diff --git a/share/examples/puffs/sysctlfs/Makefile b/share/examples/puffs/sysctlfs/Makefile
deleted file mode 100644
index 5bdaa143118..00000000000
--- a/share/examples/puffs/sysctlfs/Makefile
+++ /dev/null
@@ -1,11 +0,0 @@
-# $NetBSD: Makefile,v 1.2 2007/01/15 00:40:37 pooka Exp $
-
-PROG= sysctlfs
-LDADD+= -lpuffs -lutil
-DBG=-g -O0
-
-WARNS= 3
-
-NOMAN= 1
-
-.include <bsd.prog.mk>
diff --git a/share/examples/puffs/sysctlfs/sysctlfs.c b/share/examples/puffs/sysctlfs/sysctlfs.c
deleted file mode 100644
index 543609bddc7..00000000000
--- a/share/examples/puffs/sysctlfs/sysctlfs.c
+++ /dev/null
@@ -1,674 +0,0 @@
-/* $NetBSD: sysctlfs.c,v 1.31 2007/08/09 21:54:16 pooka Exp $ */
-
-/*
- * Copyright (c) 2006, 2007 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.
- */
-
-/*
- * sysctlfs: mount sysctls as a file system tree. Supports query and
- * modify of nodes in the sysctl namespace in addition to namespace
- * traversal.
- */
-
-#include <sys/types.h>
-#include <sys/sysctl.h>
-
-#include <assert.h>
-#include <err.h>
-#include <errno.h>
-#include <mntopts.h>
-#include <paths.h>
-#include <puffs.h>
-#include <stdlib.h>
-#include <string.h>
-#include <unistd.h>
-#include <util.h>
-
-PUFFSOP_PROTOS(sysctlfs)
-
-struct sfsnode {
- int sysctl_flags;
- ino_t myid;
-};
-
-#define SFSPATH_DOTDOT 0
-#define SFSPATH_NORMAL 1
-
-#define N_HIERARCHY 10
-typedef int SfsName[N_HIERARCHY];
-
-struct sfsfid {
- int len;
- SfsName path;
-};
-
-struct sfsnode rn;
-SfsName sname_root;
-struct timespec fstime;
-
-ino_t nextid = 3;
-
-#define ISADIR(a) ((SYSCTL_TYPE(a->sysctl_flags) == CTLTYPE_NODE))
-#define SFS_MAXFILE 8192
-#define SFS_NODEPERDIR 128
-
-static int sysctlfs_domount(struct puffs_usermount *);
-
-/*
- * build paths. doesn't support rename (but neither does the fs)
- */
-static int
-sysctlfs_pathbuild(struct puffs_usermount *pu,
- const struct puffs_pathobj *parent, const struct puffs_pathobj *comp,
- size_t offset, struct puffs_pathobj *res)
-{
- SfsName *sname;
- size_t clen;
-
- assert(parent->po_len < N_HIERARCHY); /* code uses +1 */
-
- sname = malloc(sizeof(SfsName));
- assert(sname != NULL);
-
- clen = parent->po_len;
- if (comp->po_len == SFSPATH_DOTDOT) {
- assert(clen != 0);
- clen--;
- }
-
- memcpy(sname, parent->po_path, clen * sizeof(int));
-
- res->po_path = sname;
- res->po_len = clen;
-
- return 0;
-}
-
-static int
-sysctlfs_pathtransform(struct puffs_usermount *pu,
- const struct puffs_pathobj *p, const const struct puffs_cn *pcn,
- struct puffs_pathobj *res)
-{
-
- res->po_path = NULL;
- /*
- * XXX: overload. prevents us from doing rename, but the fs
- * (and sysctl(3)) doesn't support it, so no biggie
- */
- if (PCNISDOTDOT(pcn)) {
- res->po_len = SFSPATH_DOTDOT;
- }else {
- res->po_len = SFSPATH_NORMAL;
- }
-
- return 0;
-}
-
-static int
-sysctlfs_pathcmp(struct puffs_usermount *pu, struct puffs_pathobj *po1,
- struct puffs_pathobj *po2, size_t clen, int checkprefix)
-{
-
- if (memcmp(po1->po_path, po2->po_path, clen * sizeof(int)) == 0)
- return 0;
- return 1;
-}
-
-static void
-sysctlfs_pathfree(struct puffs_usermount *pu, struct puffs_pathobj *po)
-{
-
- free(po->po_path);
-}
-
-static struct puffs_node *
-getnode(struct puffs_usermount *pu, struct puffs_pathobj *po, int nodetype)
-{
- struct sysctlnode sn[SFS_NODEPERDIR];
- struct sysctlnode qnode;
- struct puffs_node *pn;
- struct sfsnode *sfs;
- SfsName myname, *sname;
- size_t sl;
- int i;
-
- /*
- * Check if we need to create a new in-memory node or if we
- * already have one for this path. Shortcut for the rootnode.
- * Also, memcmp against zero-length would be quite true always.
- */
- if (po->po_len == 0)
- pn = puffs_getroot(pu);
- else
- pn = puffs_pn_nodewalk(pu, puffs_path_walkcmp, po);
-
- if (pn == NULL) {
- /*
- * don't know nodetype? query...
- *
- * XXX1: nothing really guarantees 0 is an invalid nodetype
- * XXX2: is there really no easier way of doing this? we
- * know the whole mib path
- */
- if (!nodetype) {
- sname = po->po_path;
- memcpy(myname, po->po_path, po->po_len * sizeof(int));
-
- memset(&qnode, 0, sizeof(qnode));
- qnode.sysctl_flags = SYSCTL_VERSION;
- myname[po->po_len-1] = CTL_QUERY;
-
- sl = sizeof(sn);
- if (sysctl(myname, po->po_len, sn, &sl,
- &qnode, sizeof(qnode)) == -1)
- abort();
-
- for (i = 0; i < sl / sizeof(struct sysctlnode); i++) {
- if (sn[i].sysctl_num==(*sname)[po->po_len-1]) {
- nodetype = sn[i].sysctl_flags;
- break;
- }
- }
- if (!nodetype)
- return NULL;
- }
-
- sfs = emalloc(sizeof(struct sfsnode));
- sfs->sysctl_flags = nodetype;
- sfs->myid = nextid++;
-
- pn = puffs_pn_new(pu, sfs);
- assert(pn);
- }
-
- return pn;
-}
-
-int
-main(int argc, char *argv[])
-{
- struct puffs_usermount *pu;
- struct puffs_ops *pops;
- mntoptparse_t mp;
- int mntflags, pflags, lflags;
- int ch;
-
- setprogname(argv[0]);
-
- if (argc < 2)
- errx(1, "usage: %s sysctlfs [-o mntopts] mountpath",
- getprogname());
-
- mntflags = pflags = lflags = 0;
- while ((ch = getopt(argc, argv, "o:s")) != -1) {
- switch (ch) {
- case 'o':
- mp = getmntopts(optarg, puffsmopts, &mntflags, &pflags);
- if (mp == NULL)
- err(1, "getmntopts");
- freemntopts(mp);
- break;
- case 's':
- lflags = PUFFSLOOP_NODAEMON;
- break;
- }
- }
- argv += optind;
- argc -= optind;
- pflags |= PUFFS_FLAG_BUILDPATH | PUFFS_KFLAG_NOCACHE;
-
- if (pflags & PUFFS_FLAG_OPDUMP)
- lflags |= PUFFSLOOP_NODAEMON;
-
- if (argc != 2)
- errx(1, "usage: %s [-o mntopts] mountpath", getprogname());
-
- PUFFSOP_INIT(pops);
-
- PUFFSOP_SETFSNOP(pops, unmount);
- PUFFSOP_SETFSNOP(pops, sync);
- PUFFSOP_SETFSNOP(pops, statvfs);
- PUFFSOP_SET(pops, sysctlfs, fs, nodetofh);
- PUFFSOP_SET(pops, sysctlfs, fs, fhtonode);
-
- PUFFSOP_SET(pops, sysctlfs, node, lookup);
- PUFFSOP_SET(pops, sysctlfs, node, getattr);
- PUFFSOP_SET(pops, sysctlfs, node, setattr);
- PUFFSOP_SET(pops, sysctlfs, node, readdir);
- PUFFSOP_SET(pops, sysctlfs, node, read);
- PUFFSOP_SET(pops, sysctlfs, node, write);
- PUFFSOP_SET(pops, puffs_genfs, node, reclaim);
-
- pu = puffs_init(pops, _PATH_PUFFS, "sysctlfs", NULL, pflags);
- if (pu == NULL)
- err(1, "puffs_init");
-
- puffs_set_pathbuild(pu, sysctlfs_pathbuild);
- puffs_set_pathtransform(pu, sysctlfs_pathtransform);
- puffs_set_pathcmp(pu, sysctlfs_pathcmp);
- puffs_set_pathfree(pu, sysctlfs_pathfree);
-
- puffs_setfhsize(pu, sizeof(struct sfsfid), PUFFS_FHFLAG_NFSV3);
-
- if (sysctlfs_domount(pu) != 0)
- errx(1, "domount");
-
- if (puffs_mount(pu, argv[1], mntflags, puffs_getroot(pu)) == -1)
- err(1, "puffs_mount");
-
- if (puffs_mainloop(pu, lflags) == -1)
- err(1, "mainloop");
-
- return 0;
-}
-
-static int
-sysctlfs_domount(struct puffs_usermount *pu)
-{
- struct puffs_pathobj *po_root;
- struct puffs_node *pn_root;
- struct timeval tv_now;
-
- rn.myid = 2;
- rn.sysctl_flags = CTLTYPE_NODE;
-
- gettimeofday(&tv_now, NULL);
- TIMEVAL_TO_TIMESPEC(&tv_now, &fstime);
-
- pn_root = puffs_pn_new(pu, &rn);
- assert(pn_root != NULL);
- puffs_setroot(pu, pn_root);
-
- po_root = puffs_getrootpathobj(pu);
- po_root->po_path = &sname_root;
- po_root->po_len = 0;
-
- return 0;
-}
-
-int
-sysctlfs_fs_fhtonode(struct puffs_cc *pcc, void *fid, size_t fidsize,
- struct puffs_newinfo *pni)
-{
- struct puffs_pathobj po;
- struct puffs_node *pn;
- struct sfsnode *sfs;
- struct sfsfid *sfid;
-
- sfid = fid;
-
- po.po_len = sfid->len;
- po.po_path = &sfid->path;
-
- pn = getnode(puffs_cc_getusermount(pcc), &po, 0);
- if (pn == NULL)
- return EINVAL;
- sfs = pn->pn_data;
-
- puffs_newinfo_setcookie(pni, pn);
- if (ISADIR(sfs))
- puffs_newinfo_setvtype(pni, VDIR);
- else
- puffs_newinfo_setvtype(pni, VREG);
-
- return 0;
-}
-
-int
-sysctlfs_fs_nodetofh(struct puffs_cc *pcc, void *cookie,
- void *fid, size_t *fidsize)
-{
- struct puffs_node *pn = cookie;
- struct sfsfid *sfid;
-
- sfid = fid;
- sfid->len = PNPLEN(pn);
- memcpy(&sfid->path, PNPATH(pn), sfid->len * sizeof(int));
-
- return 0;
-}
-
-static void
-doprint(struct sfsnode *sfs, struct puffs_pathobj *po,
- char *buf, size_t bufsize)
-{
- size_t sz;
-
- assert(!ISADIR(sfs));
-
- memset(buf, 0, bufsize);
- switch (SYSCTL_TYPE(sfs->sysctl_flags)) {
- case CTLTYPE_INT: {
- int i;
- sz = sizeof(int);
- if (sysctl(po->po_path, po->po_len, &i, &sz, NULL, 0) == -1)
- break;
- snprintf(buf, bufsize, "%d", i);
- break;
- }
- case CTLTYPE_QUAD: {
- quad_t q;
- sz = sizeof(q);
- if (sysctl(po->po_path, po->po_len, &q, &sz, NULL, 0) == -1)
- break;
- snprintf(buf, bufsize, "%" PRId64, q);
- break;
- }
- case CTLTYPE_STRUCT:
- snprintf(buf, bufsize, "CTLTYPE_STRUCT: implement me and "
- "score a cookie");
- break;
- case CTLTYPE_STRING: {
- sz = bufsize;
- if (sysctl(po->po_path, po->po_len, buf, &sz, NULL, 0) == -1)
- break;
- break;
- }
- default:
- snprintf(buf, bufsize, "invalid sysctl CTLTYPE");
- break;
- }
-}
-
-static int
-getlinks(struct sfsnode *sfs, struct puffs_pathobj *po)
-{
- struct sysctlnode sn[SFS_NODEPERDIR];
- struct sysctlnode qnode;
- SfsName *sname;
- size_t sl;
-
- if (!ISADIR(sfs))
- return 1;
-
- memset(&qnode, 0, sizeof(qnode));
- sl = sizeof(sn);
- qnode.sysctl_flags = SYSCTL_VERSION;
- sname = po->po_path;
- (*sname)[po->po_len] = CTL_QUERY;
-
- if (sysctl(*sname, po->po_len + 1, sn, &sl,
- &qnode, sizeof(qnode)) == -1)
- return 0;
-
- return (sl / sizeof(sn[0])) + 2;
-}
-
-static int
-getsize(struct sfsnode *sfs, struct puffs_pathobj *po)
-{
- char buf[SFS_MAXFILE];
-
- if (ISADIR(sfs))
- return getlinks(sfs, po) * 16; /* totally arbitrary */
-
- doprint(sfs, po, buf, sizeof(buf));
- return strlen(buf) + 1;
-}
-
-int
-sysctlfs_node_lookup(struct puffs_cc *pcc, void *opc, struct puffs_newinfo *pni,
- const struct puffs_cn *pcn)
-{
- struct puffs_usermount *pu = puffs_cc_getusermount(pcc);
- struct puffs_cn *p2cn = __UNCONST(pcn); /* XXX: fix the interface */
- struct sysctlnode sn[SFS_NODEPERDIR];
- struct sysctlnode qnode;
- struct puffs_node *pn_dir = opc;
- struct puffs_node *pn_new;
- struct sfsnode *sfs_dir = pn_dir->pn_data, *sfs_new;
- SfsName *sname = PCNPATH(pcn);
- size_t sl;
- int i, nodetype;
-
- assert(ISADIR(sfs_dir));
-
- /*
- * If we're looking for dotdot, we already have the entire pathname
- * in sname, courtesy of pathbuild, so we can skip this step.
- */
- if (!PCNISDOTDOT(pcn)) {
- memset(&qnode, 0, sizeof(qnode));
- sl = SFS_NODEPERDIR * sizeof(struct sysctlnode);
- qnode.sysctl_flags = SYSCTL_VERSION;
- (*sname)[PCNPLEN(pcn)] = CTL_QUERY;
-
- if (sysctl(*sname, PCNPLEN(pcn) + 1, sn, &sl,
- &qnode, sizeof(qnode)) == -1)
- return ENOENT;
-
- for (i = 0; i < sl / sizeof(struct sysctlnode); i++)
- if (strcmp(sn[i].sysctl_name, pcn->pcn_name) == 0)
- break;
- if (i == sl / sizeof(struct sysctlnode))
- return ENOENT;
-
- (*sname)[PCNPLEN(pcn)] = sn[i].sysctl_num;
- p2cn->pcn_po_full.po_len++;
- nodetype = sn[i].sysctl_flags;
- } else
- nodetype = CTLTYPE_NODE;
-
- pn_new = getnode(pu, &p2cn->pcn_po_full, nodetype);
- sfs_new = pn_new->pn_data;
-
- puffs_newinfo_setcookie(pni, pn_new);
- if (ISADIR(sfs_new))
- puffs_newinfo_setvtype(pni, VDIR);
- else
- puffs_newinfo_setvtype(pni, VREG);
-
- return 0;
-}
-
-int
-sysctlfs_node_getattr(struct puffs_cc *pcc, void *opc, struct vattr *va,
- const struct puffs_cred *pcr, const struct puffs_cid *pcid)
-{
- struct puffs_node *pn = opc;
- struct sfsnode *sfs = pn->pn_data;
-
- memset(va, 0, sizeof(struct vattr));
-
- if (ISADIR(sfs)) {
- va->va_type = VDIR;
- va->va_mode = 0777;
- } else {
- va->va_type = VREG;
- va->va_mode = 0666;
- }
- va->va_nlink = getlinks(sfs, &pn->pn_po);
- va->va_fileid = sfs->myid;
- va->va_size = getsize(sfs, &pn->pn_po);
- va->va_gen = 1;
- va->va_rdev = PUFFS_VNOVAL;
- va->va_blocksize = 512;
- va->va_filerev = 1;
-
- va->va_atime = va->va_mtime = va->va_ctime = va->va_birthtime = fstime;
-
- return 0;
-}
-
-int
-sysctlfs_node_setattr(struct puffs_cc *pcc, void *opc,
- const struct vattr *va, const struct puffs_cred *pcr,
- const struct puffs_cid *pcid)
-{
-
- /* dummy, but required for write */
- return 0;
-}
-
-int
-sysctlfs_node_readdir(struct puffs_cc *pcc, void *opc, struct dirent *dent,
- off_t *readoff, size_t *reslen, const struct puffs_cred *pcr,
- int *eofflag, off_t *cookies, size_t *ncookies)
-{
- struct puffs_usermount *pu = puffs_cc_getusermount(pcc);
- struct sysctlnode sn[SFS_NODEPERDIR];
- struct sysctlnode qnode;
- struct puffs_node *pn_dir = opc;
- struct puffs_node *pn_res;
- struct puffs_pathobj po;
- struct sfsnode *sfs_dir = pn_dir->pn_data, *sfs_ent;
- SfsName *sname;
- size_t sl;
- enum vtype vt;
- ino_t id;
- int i;
-
- *ncookies = 0;
-
- again:
- if (*readoff == DENT_DOT || *readoff == DENT_DOTDOT) {
- puffs_gendotdent(&dent, sfs_dir->myid, *readoff, reslen);
- (*readoff)++;
- PUFFS_STORE_DCOOKIE(cookies, ncookies, *readoff);
- goto again;
- }
-
- memset(&qnode, 0, sizeof(qnode));
- sl = SFS_NODEPERDIR * sizeof(struct sysctlnode);
- qnode.sysctl_flags = SYSCTL_VERSION;
- sname = PNPATH(pn_dir);
- (*sname)[PNPLEN(pn_dir)] = CTL_QUERY;
-
- if (sysctl(*sname, PNPLEN(pn_dir) + 1, sn, &sl,
- &qnode, sizeof(qnode)) == -1)
- return ENOENT;
-
- po.po_path = sname;
- po.po_len = PNPLEN(pn_dir)+1;
-
- for (i = DENT_ADJ(*readoff); i < sl / sizeof(struct sysctlnode); i++) {
- if (SYSCTL_TYPE(sn[i].sysctl_flags) == CTLTYPE_NODE)
- vt = VDIR;
- else
- vt = VREG;
-
- /*
- * check if the node exists. if so, give it the real
- * inode number. otherwise just fake it.
- */
- (*sname)[PNPLEN(pn_dir)] = sn[i].sysctl_num;
- pn_res = puffs_pn_nodewalk(pu, puffs_path_walkcmp, &po);
- if (pn_res) {
- sfs_ent = pn_res->pn_data;
- id = sfs_ent->myid;
- } else {
- id = nextid++;
- }
-
- if (!puffs_nextdent(&dent, sn[i].sysctl_name, id,
- puffs_vtype2dt(vt), reslen))
- return 0;
-
- (*readoff)++;
- PUFFS_STORE_DCOOKIE(cookies, ncookies, *readoff);
- }
-
- *eofflag = 1;
- return 0;
-}
-
-int
-sysctlfs_node_read(struct puffs_cc *pcc, void *opc, uint8_t *buf,
- off_t offset, size_t *resid, const struct puffs_cred *pcr,
- int ioflag)
-{
- char localbuf[SFS_MAXFILE];
- struct puffs_node *pn = opc;
- struct sfsnode *sfs = pn->pn_data;
- int xfer;
-
- if (ISADIR(sfs))
- return EISDIR;
-
- doprint(sfs, &pn->pn_po, localbuf, sizeof(localbuf));
- xfer = MIN(*resid, strlen(localbuf) - offset);
-
- if (xfer <= 0)
- return 0;
-
- memcpy(buf, localbuf + offset, xfer);
- *resid -= xfer;
-
- if (*resid) {
- buf[xfer] = '\n';
- (*resid)--;
- }
-
- return 0;
-}
-
-int
-sysctlfs_node_write(struct puffs_cc *pcc, void *opc, uint8_t *buf,
- off_t offset, size_t *resid, const struct puffs_cred *cred,
- int ioflag)
-{
- struct puffs_node *pn = opc;
- struct sfsnode *sfs = pn->pn_data;
- long long ll;
- int i, rv;
-
- if (puffs_cred_isjuggernaut(cred) == 0)
- return EACCES;
-
- if (ISADIR(sfs))
- return EISDIR;
-
- if (offset != 0)
- return EINVAL;
-
- if (ioflag & PUFFS_IO_APPEND)
- return EINVAL;
-
- switch (SYSCTL_TYPE(sfs->sysctl_flags)) {
- case CTLTYPE_INT:
- if (sscanf((const char *)buf, "%d", &i) != 1)
- return EINVAL;
- rv = sysctl(PNPATH(pn), PNPLEN(pn), NULL, NULL,
- &i, sizeof(int));
- break;
- case CTLTYPE_QUAD:
- if (sscanf((const char *)buf, "%lld", &ll) != 1)
- return EINVAL;
- rv = sysctl(PNPATH(pn), PNPLEN(pn), NULL, NULL,
- &ll, sizeof(long long));
- break;
- case CTLTYPE_STRING:
- rv = sysctl(PNPATH(pn), PNPLEN(pn), NULL, NULL, buf, *resid);
- break;
- default:
- rv = EINVAL;
- break;
- }
-
- if (rv)
- return rv;
-
- *resid = 0;
- return 0;
-}