/* $NetBSD: verified_exec.c,v 1.7 2005/04/20 13:44:45 blymn Exp $ */ /*- * Copyright 2005 Elad Efrat * Copyright 2005 Brett Lymn * * This code is derived from software contributed to The NetBSD Foundation * by Brett Lymn and Elad Efrat * * 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. Neither the name of The NetBSD Foundation nor the names of its * contributors may be used to endorse or promote products derived * from this software without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS * ``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 FOUNDATION 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 #if defined(__NetBSD__) __KERNEL_RCSID(0, "$NetBSD: verified_exec.c,v 1.7 2005/04/20 13:44:45 blymn Exp $"); #else __RCSID("$Id: verified_exec.c,v 1.7 2005/04/20 13:44:45 blymn Exp $\n$NetBSD: verified_exec.c,v 1.7 2005/04/20 13:44:45 blymn Exp $"); #endif #include #include #include #include #include #include #ifdef __FreeBSD__ #include #include #include #else #include #include #define DEVPORT_DEVICE struct device #endif #include #include #include #include #include #include #include /* count of number of times device is open (we really only allow one open) */ static unsigned veriexec_dev_usage; struct veriexec_softc { DEVPORT_DEVICE veriexec_dev; }; #if defined(__FreeBSD__) # define CDEV_MAJOR 216 # define BDEV_MAJOR -1 #endif const struct cdevsw veriexec_cdevsw = { veriexecopen, veriexecclose, noread, nowrite, veriexecioctl, #ifdef __NetBSD__ nostop, notty, #endif nopoll, nommap, #if defined(__NetBSD__) nokqfilter, #elif defined(__FreeBSD__) nostrategy, "veriexec", CDEV_MAJOR, nodump, nopsize, 0, /* flags */ BDEV_MAJOR #endif }; /* Autoconfiguration glue */ void veriexecattach(DEVPORT_DEVICE *parent, DEVPORT_DEVICE *self, void *aux); int veriexecopen(dev_t dev, int flags, int fmt, struct proc *p); int veriexecclose(dev_t dev, int flags, int fmt, struct proc *p); int veriexecioctl(dev_t dev, u_long cmd, caddr_t data, int flags, struct proc *p); void veriexecattach(DEVPORT_DEVICE *parent, DEVPORT_DEVICE *self, void *aux) { veriexec_dev_usage = 0; veriexec_dprintf(("Veriexec: veriexecattach: Veriexec pseudo-device " "attached.\n")); } int veriexecopen(dev_t dev __unused, int flags __unused, int fmt __unused, struct proc *p __unused) { #ifdef VERIFIED_EXEC_DEBUG_VERBOSE printf("Veriexec: veriexecopen: Veriexec load device open attempt by " "uid=%u, pid=%u. (dev=%d)\n", p->p_ucred->cr_uid, p->p_pid, dev); #endif if (veriexec_dev_usage > 0) { veriexec_dprintf(("Veriexec: load device already in use\n")); return(EBUSY); } veriexec_dev_usage++; return (0); } int veriexecclose(dev_t dev __unused, int flags __unused, int fmt __unused, struct proc *p __unused) { if (veriexec_dev_usage > 0) veriexec_dev_usage--; return (0); } int veriexecioctl(dev_t dev __unused, u_long cmd, caddr_t data, int flags __unused, struct proc *p) { struct veriexec_hashtbl *tbl; struct nameidata nid; struct vattr va; int error = 0; u_long hashmask; /* * Don't allow updates in multi-user mode, but we will allow * queries of supported fingerprints. * */ if ((securelevel >= 1) && (cmd != VERIEXEC_FINGERPRINTS)) { printf("Veriexec: veriexecioctl: Securelevel raised, loading" "fingerprints is not permitted\n"); return (EPERM); } switch (cmd) { case VERIEXEC_TABLESIZE: { struct veriexec_sizing_params *params = (struct veriexec_sizing_params *) data; /* Allocate and initialize a Veriexec hash table. */ tbl = malloc(sizeof(struct veriexec_hashtbl), M_TEMP, M_WAITOK); tbl->hash_size = params->hash_size; tbl->hash_dev = params->dev; tbl->hash_tbl = hashinit(params->hash_size, HASH_LIST, M_TEMP, M_WAITOK, &hashmask); LIST_INSERT_HEAD(&veriexec_tables, tbl, hash_list); break; } case VERIEXEC_LOAD: { struct veriexec_params *params = (struct veriexec_params *) data; struct veriexec_hash_entry *hh; struct veriexec_hash_entry *e; NDINIT(&nid, LOOKUP, FOLLOW, UIO_SYSSPACE, params->file, p); error = namei(&nid); if (error) return (error); /* Add only regular files. */ if (nid.ni_vp->v_type != VREG) { printf("Veriexec: veriexecioctl: Not adding \"%s\": " "Not a regular file.\n", params->file); vrele(nid.ni_vp); return (EINVAL); } nid.ni_vp->fp_status = FINGERPRINT_NOTEVAL; /* Get attributes for device and inode. */ error = VOP_GETATTR(nid.ni_vp, &va, p->p_ucred, p); if (error) return (error); /* Release our reference to the vnode. (namei) */ vrele(nid.ni_vp); /* Get table for the device. */ tbl = veriexec_tblfind(va.va_fsid); if (tbl == NULL) { return (EINVAL); } hh = veriexec_lookup(va.va_fsid, va.va_fileid); if (hh != NULL) { /* * Duplicate entry. Still check the type to * ensure enforcement of a stricter policy. * i.e. if orignal entry was direct exec but * the new params flag the file as indirect or * file then update the hash entry to the new * type to ensure duplicate entries do not * degrade the security policy... */ if ((hh->type != params->type) && ((params->type == VERIEXEC_INDIRECT) || (params->type == VERIEXEC_FILE))) { hh->type = params->type; printf("Veriexec: veriexecioctl: Duplicate " "entry for %s, (dev=%ld, inode=%ld) " "but type mismatched. " "Updating type to stricter one\n", params->file, va.va_fsid, va.va_fileid); } #ifdef VERIFIED_EXEC_DEBUG_VERBOSE printf("Veriexec: veriexecioctl: Duplicate " "entry for %s. (dev=%ld, inode=%ld) " "Ignoring.\n", params->file, va.va_fsid, va.va_fileid); #endif return (0); } e = malloc(sizeof(*e), M_TEMP, M_WAITOK); e->inode = va.va_fileid; e->type = params->type; if ((e->ops = veriexec_find_ops(params->fp_type)) == NULL) { free(e, M_TEMP); printf("Veriexec: veriexecioctl: Invalid or unknown " "fingerprint type \"%s\" for file \"%s\" " "(dev=%ld, inode=%ld)\n", params->fp_type, params->file, va.va_fsid, va.va_fileid); return(EINVAL); } /* * Just a bit of a sanity check - require the size of * the fp to be passed in, check this against the expected * size. Of course userland could lie deliberately, this * really only protects against the obvious fumble of * changing the fp type but not updating the fingerprint * string. */ if (e->ops->hash_len != params->size) { printf("Veriexec: veriexecioctl: Inconsistent " "fingerprint size for type \"%s\" for file " "\"%s\" (dev=%ld, inode=%ld), size was %u " "was expecting %d\n", params->fp_type, params->file, va.va_fsid, va.va_fileid, params->size, e->ops->hash_len); free(e, M_TEMP); return(EINVAL); } e->fp = malloc(e->ops->hash_len, M_TEMP, M_WAITOK); memcpy(e->fp, params->fingerprint, e->ops->hash_len); veriexec_dprintf(("Veriexec: veriexecioctl: New entry. (file=%s," " dev=%d, inode=%u)\n", params->vxp_file, va.va_fsid, va.va_fileid)); error = veriexec_hashadd(tbl, e); break; } case VERIEXEC_FINGERPRINTS: { struct veriexec_fp_report *params = (struct veriexec_fp_report *) data; if (strlen(veriexec_fp_names) >= params->size) { params->size = strlen(veriexec_fp_names) + 1; } else { strlcpy(params->fingerprints, veriexec_fp_names, params->size); } break; } default: /* Invalid operation. */ error = ENODEV; break; } return (error); } #if defined(__FreeBSD__) static void veriexec_drvinit(void *unused __unused) { make_dev(&verifiedexec_cdevsw, 0, UID_ROOT, GID_WHEEL, 0600, "veriexec"); verifiedexecattach(0, 0, 0); } SYSINIT(veriexec, SI_SUB_PSEUDO, SI_ORDER_ANY, veriexec_drvinit, NULL); #endif