diff options
| author | pooka <pooka@NetBSD.org> | 2007-08-09 22:01:25 +0000 |
|---|---|---|
| committer | pooka <pooka@NetBSD.org> | 2007-08-09 22:01:25 +0000 |
| commit | ba4e596bc9a895b849b377fae3f736cf5e5e77a1 (patch) | |
| tree | 74f4828bb9bdcbb14f489ca055ee12c1b33af8e1 /share/examples | |
| parent | 5b593f2aeb4e8f47e7e65324f274c9115535d765 (diff) | |
move sysctlfs from examples to base
Diffstat (limited to 'share/examples')
| -rw-r--r-- | share/examples/puffs/sysctlfs/Makefile | 11 | ||||
| -rw-r--r-- | share/examples/puffs/sysctlfs/sysctlfs.c | 674 |
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; -} |
