#pragma ident "@(#)auto_vnops.c 1.70 05/12/19 SMI"
#include <mach/mach_types.h>
#include <mach/machine/boolean.h>
#include <mach/host_priv.h>
#include <mach/host_special_ports.h>
#include <mach/vm_map.h>
#include <vm/vm_map.h>
#include <vm/vm_kern.h>
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/kernel.h>
#include <sys/file.h>
#include <sys/stat.h>
#include <sys/buf.h>
#include <sys/proc.h>
#include <sys/conf.h>
#include <sys/mount.h>
#include <sys/vnode.h>
#include <sys/malloc.h>
#include <sys/dirent.h>
#include <sys/namei.h>
#include <sys/kauth.h>
#include <sys/attr.h>
#include <sys/vnode_if.h>
#include <sys/vfs_context.h>
#include <sys/vm.h>
#include <sys/errno.h>
#include <vfs/vfs_support.h>
#include <sys/uio.h>
#include <kern/assert.h>
#include <kern/host.h>
#include <IOKit/IOLib.h>
#include "autofs.h"
#include "triggers.h"
#include "triggers_priv.h"
#include "autofs_kern.h"
#include "autofs_protUser.h"
static int auto_getattr(struct vnop_getattr_args *);
static int auto_setattr(struct vnop_setattr_args *);
static int auto_lookup(struct vnop_lookup_args *);
static int auto_readdir(struct vnop_readdir_args *);
static int auto_readlink(struct vnop_readlink_args *);
static int auto_pathconf(struct vnop_pathconf_args *);
static int auto_fsctl(struct vnop_ioctl_args *);
static int auto_getxattr(struct vnop_getxattr_args *);
static int auto_listxattr(struct vnop_listxattr_args *);
static int auto_inactive(struct vnop_inactive_args *);
static int auto_reclaim(struct vnop_reclaim_args *);
int (**autofs_vnodeop_p)(void *);
#define VOPFUNC int (*)(void *)
struct vnodeopv_entry_desc autofs_vnodeop_entries[] = {
{&vnop_default_desc, (VOPFUNC)vn_default_error},
{&vnop_lookup_desc, (VOPFUNC)auto_lookup},
{&vnop_open_desc, (VOPFUNC)nop_open},
{&vnop_close_desc, (VOPFUNC)nop_close},
{&vnop_getattr_desc, (VOPFUNC)auto_getattr},
{&vnop_setattr_desc, (VOPFUNC)auto_setattr},
{&vnop_fsync_desc, (VOPFUNC)nop_fsync},
{&vnop_readdir_desc, (VOPFUNC)auto_readdir},
{&vnop_readlink_desc, (VOPFUNC)auto_readlink},
{&vnop_pathconf_desc, (VOPFUNC)auto_pathconf},
{&vnop_ioctl_desc, (VOPFUNC)auto_fsctl},
{&vnop_getxattr_desc, (VOPFUNC)auto_getxattr},
{&vnop_listxattr_desc, (VOPFUNC)auto_listxattr},
{&vnop_inactive_desc, (VOPFUNC)auto_inactive},
{&vnop_reclaim_desc, (VOPFUNC)auto_reclaim},
{NULL, NULL}
};
struct vnodeopv_desc autofsfs_vnodeop_opv_desc =
{ &autofs_vnodeop_p, autofs_vnodeop_entries };
static int autofs_nobrowse = 0;
int
auto_nobrowse(vnode_t vp)
{
fnnode_t *fnp = vntofn(vp);
fninfo_t *fnip = vfstofni(vnode_mount(vp));
if (fnp == vntofn(fnip->fi_rootvp)) {
return (autofs_nobrowse ||
(fnip->fi_mntflags & AUTOFS_MNT_NOBROWSE));
} else {
return (0);
}
}
static int
auto_getattr(ap)
struct vnop_getattr_args *ap;
{
vnode_t vp = ap->a_vp;
struct vnode_attr *vap = ap->a_vap;
AUTOFS_DPRINT((4, "auto_getattr vp %p\n", (void *)vp));
auto_get_attributes(vp, vap);
return (0);
}
void
auto_get_attributes(vnode_t vp, struct vnode_attr *vap)
{
fnnode_t *fnp = vntofn(vp);
VATTR_RETURN(vap, va_rdev, 0);
switch (vnode_vtype(vp)) {
case VDIR:
VATTR_RETURN(vap, va_nlink, fnp->fn_linkcnt + 1);
VATTR_RETURN(vap, va_data_size, fnp->fn_direntcnt + 1);
break;
case VLNK:
VATTR_RETURN(vap, va_nlink, fnp->fn_linkcnt);
VATTR_RETURN(vap, va_data_size, fnp->fn_symlinklen);
break;
default:
VATTR_RETURN(vap, va_nlink, fnp->fn_linkcnt);
VATTR_RETURN(vap, va_data_size, 0);
break;
}
VATTR_RETURN(vap, va_total_size, roundup(vap->va_data_size, AUTOFS_BLOCKSIZE));
VATTR_RETURN(vap, va_iosize, AUTOFS_BLOCKSIZE);
VATTR_RETURN(vap, va_uid, fnp->fn_uid);
VATTR_RETURN(vap, va_gid, 0);
VATTR_RETURN(vap, va_mode, fnp->fn_mode);
if (VATTR_IS_ACTIVE(vap, va_flags)) {
if (vnode_isvroot(vp)) {
fninfo_t *fnip = vfstofni(vnode_mount(vp));
if (fnip->fi_mntflags & AUTOFS_MNT_HIDEFROMFINDER)
VATTR_RETURN(vap, va_flags, UF_HIDDEN);
else
VATTR_RETURN(vap, va_flags, 0);
} else
VATTR_RETURN(vap, va_flags, 0);
}
vap->va_access_time.tv_sec = fnp->fn_atime.tv_sec;
vap->va_access_time.tv_nsec = fnp->fn_atime.tv_usec * 1000;
VATTR_SET_SUPPORTED(vap, va_access_time);
vap->va_modify_time.tv_sec = fnp->fn_mtime.tv_sec;
vap->va_modify_time.tv_nsec = fnp->fn_mtime.tv_usec * 1000;
VATTR_SET_SUPPORTED(vap, va_modify_time);
vap->va_change_time.tv_sec = fnp->fn_ctime.tv_sec;
vap->va_change_time.tv_nsec = fnp->fn_ctime.tv_usec * 1000;
VATTR_SET_SUPPORTED(vap, va_change_time);
VATTR_RETURN(vap, va_fileid, fnp->fn_nodeid);
VATTR_RETURN(vap, va_fsid, vfs_statfs(vnode_mount(vp))->f_fsid.val[0]);
VATTR_RETURN(vap, va_filerev, 0);
VATTR_RETURN(vap, va_type, vnode_vtype(vp));
}
static int
auto_setattr(ap)
struct vnop_setattr_args *ap;
{
vnode_t vp = ap->a_vp;
struct vnode_attr *vap = ap->a_vap;
fnnode_t *fnp = vntofn(vp);
AUTOFS_DPRINT((4, "auto_setattr vp %p\n", (void *)vp));
if (!kauth_cred_issuser(vfs_context_ucred(ap->a_context)))
return (EPERM);
VATTR_SET_SUPPORTED(vap, va_uid);
if (VATTR_IS_ACTIVE(vap, va_uid))
fnp->fn_uid = vap->va_uid;
VATTR_SET_SUPPORTED(vap, va_gid);
VATTR_SET_SUPPORTED(vap, va_mode);
if (VATTR_IS_ACTIVE(vap, va_mode))
fnp->fn_mode = vap->va_mode & ALLPERMS;
return (0);
}
static int
auto_lookup(ap)
struct vnop_lookup_args *ap;
{
vnode_t dvp = ap->a_dvp;
vnode_t *vpp = ap->a_vpp;
struct componentname *cnp = ap->a_cnp;
u_long nameiop = cnp->cn_nameiop;
u_long flags = cnp->cn_flags;
int namelen = cnp->cn_namelen;
vfs_context_t context = ap->a_context;
int pid = vfs_context_pid(context);
int error = 0;
fninfo_t *dfnip;
fnnode_t *dfnp = NULL;
fnnode_t *fnp = NULL;
vnode_t vp;
uint32_t vid;
char *searchnm;
int searchnmlen;
int do_notify = 0;
struct vnode_attr vattr;
int node_type;
dfnip = vfstofni(vnode_mount(dvp));
AUTOFS_DPRINT((3, "auto_lookup: dvp=%p (%s) name=%.*s\n",
(void *)dvp, dfnip->fi_map, namelen, cnp->cn_nameptr));
if (!vnode_isdir(dvp))
return (ENOTDIR);
if (namelen == 0) {
error = vnode_get(dvp);
if (error)
return (error);
*vpp = dvp;
return (0);
}
if (cnp->cn_nameptr[0] == '.') {
if (namelen == 1) {
if ((nameiop == RENAME) && (flags & WANTPARENT) &&
(flags & ISLASTCN))
return (EISDIR);
error = vnode_get(dvp);
if (error)
return (error);
*vpp = dvp;
return (0);
} else if ((namelen == 2) && (cnp->cn_nameptr[1] == '.')) {
fnnode_t *pdfnp;
pdfnp = (vntofn(dvp))->fn_parent;
assert(pdfnp != NULL);
#if 0
if (pdfnp == pdfnp->fn_globals->fng_rootfnnodep) {
vnode_t vp;
vfs_lock_wait(vnode_mount(dvp));
if (vnode_mount(dvp)->vfs_flag & VFS_UNMOUNTED) {
vfs_unlock(vnode_mount(dvp));
return (EIO);
}
vp = vnode_mount(dvp)->mnt_vnodecovered;
error = vnode_get(vp);
vfs_unlock(vnode_mount(dvp));
error = VNOP_LOOKUP(vp, nm, vpp, pnp, flags, rdir, cred);
vnode_put(vp);
return (error);
} else {
#else
{
#endif
*vpp = fntovn(pdfnp);
return (vnode_get(*vpp));
}
}
}
dfnp = vntofn(dvp);
searchnm = cnp->cn_nameptr;
searchnmlen = namelen;
AUTOFS_DPRINT((3, "auto_lookup: dvp=%p dfnp=%p\n", (void *)dvp,
(void *)dfnp));
auto_fninfo_lock_shared(dfnip, pid);
top:
if (dfnp->fn_trigger_info != NULL) {
error = ENOENT;
goto fail;
}
lck_rw_lock_shared(dfnp->fn_rwlock);
fnp = auto_search(dfnp, cnp->cn_nameptr, cnp->cn_namelen);
if (fnp == NULL) {
lck_rw_unlock_shared(dfnp->fn_rwlock);
if (dfnip->fi_flags & MF_UNMOUNTING) {
error = ENOENT;
goto fail;
}
error = auto_lookup_aux(dfnip, dfnp, searchnm,
searchnmlen, context, &node_type);
if (error != 0)
goto fail;
error = auto_makefnnode(&fnp, node_type,
vnode_mount(dvp), cnp, NULL, dvp, 0,
dfnp->fn_globals);
if (error)
goto fail;
error = auto_enter(dfnp, cnp, &fnp);
if (error) {
if (error == EEXIST) {
error = 0;
} else {
error = 0;
goto top;
}
} else {
do_notify = 1;
}
} else {
vp = fntovn(fnp);
vid = fnp->fn_vid;
lck_rw_unlock_shared(dfnp->fn_rwlock);
if (vnode_getwithvid(vp, vid) != 0) {
error = 0;
goto top;
}
}
fail:
auto_fninfo_unlock_shared(dfnip, pid);
if (error) {
if (error == ENOENT &&
(nameiop == CREATE || nameiop == RENAME) &&
(flags & ISLASTCN))
error = ENOTSUP;
goto done;
}
*vpp = fntovn(fnp);
if (do_notify && vnode_ismonitored(dvp) && auto_nobrowse(dvp)) {
vfs_get_notify_attributes(&vattr);
auto_get_attributes(dvp, &vattr);
vnode_notify(dvp, VNODE_EVENT_WRITE, &vattr);
}
done:
AUTOFS_DPRINT((5, "auto_lookup: name=%s *vpp=%p return=%d\n",
cnp->cn_nameptr, (void *)*vpp, error));
return (error);
}
#define MAXDIRBUFSIZE 65536
#define IS_TRANSIENT(fnp) \
(!vnode_mountedhere(fntovn(fnp)) && (fnp)->fn_direntcnt == 0)
int
auto_readdir(ap)
struct vnop_readdir_args *ap;
{
vnode_t vp = ap->a_vp;
struct uio *uiop = ap->a_uio;
int pid = vfs_context_pid(ap->a_context);
int64_t return_offset;
boolean_t return_eof;
byte_buffer return_buffer;
mach_msg_type_number_t return_bufcount;
vm_map_offset_t map_data;
vm_offset_t data;
fnnode_t *fnp = vntofn(vp);
fnnode_t *cfnp, *nfnp;
struct dirent *dp;
off_t offset;
u_int outcount = 0;
mach_msg_type_number_t count;
void *outbuf;
user_ssize_t user_alloc_count;
u_int alloc_count;
fninfo_t *fnip = vfstofni(vnode_mount(vp));
kern_return_t ret;
int error = 0;
int reached_max = 0;
int myeof = 0;
u_int this_reclen;
AUTOFS_DPRINT((4, "auto_readdir vp=%p offset=%lld\n",
(void *)vp, uio_offset(uiop)));
if (ap->a_numdirent != NULL)
*ap->a_numdirent = 0;
if (ap->a_flags & (VNODE_READDIR_EXTENDED | VNODE_READDIR_REQSEEKOFF))
return (EINVAL);
if (ap->a_eofflag != NULL)
*ap->a_eofflag = 0;
user_alloc_count = uio_resid(uiop);
if (user_alloc_count < (user_ssize_t) DIRENT_RECLEN(1))
return (EINVAL);
if (user_alloc_count > (user_ssize_t) MAXDIRBUFSIZE)
user_alloc_count = MAXDIRBUFSIZE;
alloc_count = (u_int)user_alloc_count;
auto_fninfo_lock_shared(fnip, pid);
lck_rw_lock_shared(fnp->fn_rwlock);
if (uio_offset(uiop) >= AUTOFS_DAEMONCOOKIE) {
if (fnip->fi_flags & MF_UNMOUNTING) {
myeof = 1;
if (ap->a_eofflag != NULL)
*ap->a_eofflag = 1;
goto done;
}
again:
lck_rw_unlock_shared(fnp->fn_rwlock);
count = 0;
error = auto_readdir_aux(fnip, fnp,
uio_offset(uiop), alloc_count,
&return_offset, &return_eof, &return_buffer,
&return_bufcount);
lck_rw_lock_shared(fnp->fn_rwlock);
if (error)
goto done;
ret = vm_map_copyout(kernel_map, &map_data,
(vm_map_copy_t)return_buffer);
if (ret != KERN_SUCCESS) {
IOLog("autofs: vm_map_copyout failed, status 0x%08x\n",
ret);
error = EIO;
goto done;
}
data = CAST_DOWN(vm_offset_t, map_data);
if (return_bufcount != 0) {
struct dirent *odp;
struct dirent *cdp;
dp = (struct dirent *)data;
odp = dp;
cdp = dp;
do {
this_reclen = RECLEN(cdp);
cfnp = auto_search(fnp, cdp->d_name,
cdp->d_namlen);
if (cfnp == NULL || IS_TRANSIENT(cfnp)) {
if (cdp != odp)
bcopy(cdp, odp,
(size_t)this_reclen);
odp = nextdp(odp);
outcount += this_reclen;
if (ap->a_numdirent)
++(*ap->a_numdirent);
} else {
if (odp == dp) {
dp = nextdp(dp);
odp = dp;
}
}
count += this_reclen;
cdp = (struct dirent *)
((char *)cdp + this_reclen);
} while (count < return_bufcount);
if (outcount)
error = uiomove((caddr_t)dp, outcount, uiop);
uio_setoffset(uiop, return_offset);
} else {
if (return_eof == 0) {
error = EINVAL;
}
}
vm_deallocate(kernel_map, data, return_bufcount);
if (return_eof && !error) {
myeof = 1;
if (ap->a_eofflag != NULL)
*ap->a_eofflag = 1;
}
if (!error && !myeof && outcount == 0) {
goto again;
}
goto done;
}
MALLOC(outbuf, void *, alloc_count, M_AUTOFS, M_WAITOK);
dp = outbuf;
if (uio_offset(uiop) == 0) {
this_reclen = DIRENT_RECLEN(1);
if (alloc_count < this_reclen) {
error = EINVAL;
goto done;
}
dp->d_ino = (ino_t)fnp->fn_nodeid;
dp->d_reclen = (uint16_t)this_reclen;
#if 0
dp->d_type = DT_DIR;
#else
dp->d_type = DT_UNKNOWN;
#endif
dp->d_namlen = 1;
(void) strncpy(dp->d_name, ".", DIRENT_NAMELEN(this_reclen));
outcount += dp->d_reclen;
dp = nextdp(dp);
if (ap->a_numdirent)
++(*ap->a_numdirent);
this_reclen = DIRENT_RECLEN(2);
if (alloc_count < outcount + this_reclen) {
error = EINVAL;
FREE(outbuf, M_AUTOFS);
goto done;
}
dp->d_reclen = (uint16_t)this_reclen;
dp->d_ino = (ino_t)fnp->fn_parent->fn_nodeid;
#if 0
dp->d_type = DT_DIR;
#else
dp->d_type = DT_UNKNOWN;
#endif
dp->d_namlen = 2;
(void) strncpy(dp->d_name, "..",
DIRENT_NAMELEN(this_reclen));
outcount += dp->d_reclen;
dp = nextdp(dp);
if (ap->a_numdirent)
++(*ap->a_numdirent);
}
offset = 2;
cfnp = fnp->fn_dirents;
while (cfnp != NULL) {
nfnp = cfnp->fn_next;
offset = cfnp->fn_offset;
lck_rw_lock_shared(cfnp->fn_rwlock);
if ((offset >= uio_offset(uiop)) && !IS_TRANSIENT(cfnp)) {
int reclen;
lck_rw_unlock_shared(cfnp->fn_rwlock);
reclen = (int)DIRENT_RECLEN(cfnp->fn_namelen);
if (outcount + reclen > alloc_count) {
reached_max = 1;
break;
}
dp->d_reclen = (uint16_t)reclen;
dp->d_ino = (ino_t)cfnp->fn_nodeid;
#if 0
dp->d_type = vnode_isdir(fntovn(cfnp)) ? DT_DIR : DT_LNK;
#else
dp->d_type = DT_UNKNOWN;
#endif
dp->d_namlen = cfnp->fn_namelen;
(void) strncpy(dp->d_name, cfnp->fn_name,
DIRENT_NAMELEN(reclen));
outcount += dp->d_reclen;
dp = nextdp(dp);
if (ap->a_numdirent)
++(*ap->a_numdirent);
} else
lck_rw_unlock_shared(cfnp->fn_rwlock);
cfnp = nfnp;
}
if (outcount)
error = uiomove(outbuf, outcount, uiop);
if (!error) {
if (reached_max) {
uio_setoffset(uiop, offset);
if (outcount == 0)
error = EINVAL;
} else if (auto_nobrowse(vp)) {
uio_setoffset(uiop, offset + 1);
if (ap->a_eofflag != NULL)
*ap->a_eofflag = 1;
} else {
uio_setoffset(uiop, AUTOFS_DAEMONCOOKIE);
}
}
FREE(outbuf, M_AUTOFS);
done:
lck_rw_unlock_shared(fnp->fn_rwlock);
auto_fninfo_unlock_shared(fnip, pid);
AUTOFS_DPRINT((5, "auto_readdir vp=%p offset=%lld eof=%d\n",
(void *)vp, uio_offset(uiop), myeof));
return (error);
}
static int
auto_readlink(ap)
struct vnop_readlink_args *ap;
{
vnode_t vp = ap->a_vp;
uio_t uiop = ap->a_uio;
fnnode_t *fnp = vntofn(vp);
struct timeval now;
int error;
AUTOFS_DPRINT((4, "auto_readlink: vp=%p\n", (void *)vp));
if (!vnode_islnk(vp))
error = EINVAL;
else {
microtime(&now);
fnp->fn_atime = now;
error = uiomove(fnp->fn_symlink, MIN(fnp->fn_symlinklen,
(int)uio_resid(uiop)), uiop);
}
AUTOFS_DPRINT((5, "auto_readlink: error=%d\n", error));
return (error);
}
static int
auto_pathconf(ap)
struct vnop_pathconf_args *ap;
{
switch (ap->a_name) {
case _PC_LINK_MAX:
*ap->a_retval = 32767;
break;
case _PC_NAME_MAX:
*ap->a_retval = NAME_MAX;
break;
case _PC_PATH_MAX:
*ap->a_retval = PATH_MAX;
break;
case _PC_CHOWN_RESTRICTED:
*ap->a_retval = 200112;
break;
case _PC_NO_TRUNC:
*ap->a_retval = 0;
break;
case _PC_CASE_SENSITIVE:
*ap->a_retval = 1;
break;
case _PC_CASE_PRESERVING:
*ap->a_retval = 1;
break;
default:
return (EINVAL);
}
return (0);
}
static int
auto_fsctl(ap)
struct vnop_ioctl_args *ap;
{
vnode_t vp = ap->a_vp;
if (ap->a_command != IOCBASECMD(AUTOFS_MARK_HOMEDIRMOUNT))
return (EINVAL);
return (auto_mark_vnode_homedirmount(vp, vfs_context_pid(ap->a_context)));
}
static int
auto_getxattr(ap)
struct vnop_getxattr_args *ap;
{
struct uio *uio = ap->a_uio;
if (uio_offset(uio) != 0)
return (EINVAL);
return (ENOATTR);
}
static int
auto_listxattr(ap)
struct vnop_listxattr_args *ap;
{
*ap->a_size = 0;
return (0);
}
static int
auto_inactive(ap)
struct vnop_inactive_args *ap;
{
AUTOFS_DPRINT((4, "auto_inactive: vp=%p\n", (void *)vp));
vnode_recycle(ap->a_vp);
AUTOFS_DPRINT((5, "auto_inactive: (exit) vp=%p\n", (void *)vp));
return (0);
}
static int
auto_reclaim(ap)
struct vnop_reclaim_args *ap;
{
vnode_t vp = ap->a_vp;
fnnode_t *fnp = vntofn(vp);
fnnode_t *dfnp = fnp->fn_parent;
AUTOFS_DPRINT((4, "auto_reclaim: vp=%p fn_link=%d\n",
(void *)vp, fnp->fn_linkcnt));
if (dfnp != NULL) {
lck_rw_lock_exclusive(dfnp->fn_rwlock);
if (fnp->fn_linkcnt == 1) {
auto_disconnect(dfnp, fnp);
} else if (fnp->fn_linkcnt == 0) {
fnp->fn_parent = NULL;
lck_rw_unlock_exclusive(dfnp->fn_rwlock);
} else {
IOLog("auto_reclaim: reclaiming fnnode with linkcnt %u > 1\n",
fnp->fn_linkcnt);
lck_rw_unlock_exclusive(dfnp->fn_rwlock);
}
}
auto_freefnnode(fnp);
vnode_clearfsnode(vp);
AUTOFS_DPRINT((5, "auto_reclaim: (exit) vp=%p freed\n",
(void *)vp));
return (0);
}