1998-08-29 21:14:52 +00:00
|
|
|
/*
|
1998-09-02 19:09:53 +00:00
|
|
|
*
|
|
|
|
* Coda: an Experimental Distributed File System
|
|
|
|
* Release 3.1
|
|
|
|
*
|
|
|
|
* Copyright (c) 1987-1998 Carnegie Mellon University
|
|
|
|
* All Rights Reserved
|
|
|
|
*
|
|
|
|
* Permission to use, copy, modify and distribute this software and its
|
|
|
|
* documentation is hereby granted, provided that both the copyright
|
|
|
|
* notice and this permission notice appear in all copies of the
|
|
|
|
* software, derivative works or modified versions, and any portions
|
|
|
|
* thereof, and that both notices appear in supporting documentation, and
|
|
|
|
* that credit is given to Carnegie Mellon University in all documents
|
|
|
|
* and publicity pertaining to direct or indirect use of this code or its
|
|
|
|
* derivatives.
|
|
|
|
*
|
|
|
|
* CODA IS AN EXPERIMENTAL SOFTWARE SYSTEM AND IS KNOWN TO HAVE BUGS,
|
|
|
|
* SOME OF WHICH MAY HAVE SERIOUS CONSEQUENCES. CARNEGIE MELLON ALLOWS
|
|
|
|
* FREE USE OF THIS SOFTWARE IN ITS "AS IS" CONDITION. CARNEGIE MELLON
|
|
|
|
* DISCLAIMS ANY LIABILITY OF ANY KIND FOR ANY DAMAGES WHATSOEVER
|
|
|
|
* RESULTING DIRECTLY OR INDIRECTLY FROM THE USE OF THIS SOFTWARE OR OF
|
|
|
|
* ANY DERIVATIVE WORK.
|
|
|
|
*
|
|
|
|
* Carnegie Mellon encourages users of this software to return any
|
|
|
|
* improvements or extensions that they make, and to grant Carnegie
|
|
|
|
* Mellon the rights to redistribute these changes without encumbrance.
|
|
|
|
*
|
1998-09-13 13:57:59 +00:00
|
|
|
* @(#) src/sys/coda/coda_psdev.c,v 1.1.1.1 1998/08/29 21:14:52 rvb Exp $
|
1999-08-28 01:08:13 +00:00
|
|
|
* $FreeBSD$
|
1998-09-02 19:09:53 +00:00
|
|
|
*
|
|
|
|
*/
|
1998-08-29 21:14:52 +00:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Mach Operating System
|
|
|
|
* Copyright (c) 1989 Carnegie-Mellon University
|
|
|
|
* All rights reserved. The CMU software License Agreement specifies
|
|
|
|
* the terms and conditions for use and redistribution.
|
|
|
|
*/
|
|
|
|
|
|
|
|
/*
|
|
|
|
* This code was written for the Coda file system at Carnegie Mellon
|
|
|
|
* University. Contributers include David Steere, James Kistler, and
|
|
|
|
* M. Satyanarayanan. */
|
|
|
|
|
1998-09-02 19:09:53 +00:00
|
|
|
/*
|
|
|
|
* These routines define the psuedo device for communication between
|
1998-08-29 21:14:52 +00:00
|
|
|
* Coda's Venus and Minicache in Mach 2.6. They used to be in cfs_subr.c,
|
|
|
|
* but I moved them to make it easier to port the Minicache without
|
|
|
|
* porting coda. -- DCS 10/12/94
|
|
|
|
*/
|
|
|
|
|
|
|
|
/* These routines are the device entry points for Venus. */
|
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
extern int coda_nc_initialized; /* Set if cache has been initialized */
|
1998-08-29 21:14:52 +00:00
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
#include <vcoda.h>
|
1998-09-02 19:09:53 +00:00
|
|
|
|
1998-08-29 21:14:52 +00:00
|
|
|
#include <sys/param.h>
|
|
|
|
#include <sys/systm.h>
|
|
|
|
#include <sys/kernel.h>
|
|
|
|
#include <sys/proc.h>
|
1998-09-02 19:09:53 +00:00
|
|
|
#include <sys/malloc.h>
|
1998-08-29 21:14:52 +00:00
|
|
|
#include <sys/mount.h>
|
|
|
|
#include <sys/file.h>
|
|
|
|
#include <sys/ioccom.h>
|
|
|
|
#include <sys/poll.h>
|
1998-09-02 19:09:53 +00:00
|
|
|
#include <sys/conf.h>
|
1998-08-29 21:14:52 +00:00
|
|
|
|
1998-09-13 13:57:59 +00:00
|
|
|
#include <coda/coda.h>
|
|
|
|
#include <coda/cnode.h>
|
|
|
|
#include <coda/coda_namecache.h>
|
|
|
|
#include <coda/coda_io.h>
|
1998-09-25 17:38:32 +00:00
|
|
|
#include <coda/coda_psdev.h>
|
1998-08-29 21:14:52 +00:00
|
|
|
|
1998-09-02 19:09:53 +00:00
|
|
|
#define CTL_C
|
|
|
|
|
1999-09-29 15:03:48 +00:00
|
|
|
#ifdef CTL_C
|
|
|
|
#include <sys/signalvar.h>
|
|
|
|
#endif
|
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
int coda_psdev_print_entry = 0;
|
1998-10-28 20:31:13 +00:00
|
|
|
static
|
|
|
|
int outstanding_upcalls = 0;
|
|
|
|
int coda_call_sleep = PZERO - 1;
|
|
|
|
#ifdef CTL_C
|
|
|
|
int coda_pcatch = PCATCH;
|
|
|
|
#else
|
|
|
|
#endif
|
1998-08-29 21:14:52 +00:00
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
#define ENTRY if(coda_psdev_print_entry) myprintf(("Entered %s\n",__FUNCTION__))
|
1998-08-29 21:14:52 +00:00
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
void vcodaattach(int n);
|
1998-08-29 21:14:52 +00:00
|
|
|
|
|
|
|
struct vmsg {
|
|
|
|
struct queue vm_chain;
|
|
|
|
caddr_t vm_data;
|
|
|
|
u_short vm_flags;
|
|
|
|
u_short vm_inSize; /* Size is at most 5000 bytes */
|
|
|
|
u_short vm_outSize;
|
|
|
|
u_short vm_opcode; /* copied from data to save ptr lookup */
|
|
|
|
int vm_unique;
|
|
|
|
caddr_t vm_sleep; /* Not used by Mach. */
|
|
|
|
};
|
|
|
|
|
|
|
|
#define VM_READ 1
|
|
|
|
#define VM_WRITE 2
|
|
|
|
#define VM_INTR 4
|
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
/* vcodaattach: do nothing */
|
1998-08-29 21:14:52 +00:00
|
|
|
void
|
1998-09-11 18:50:17 +00:00
|
|
|
vcodaattach(n)
|
1998-08-29 21:14:52 +00:00
|
|
|
int n;
|
|
|
|
{
|
|
|
|
}
|
|
|
|
|
|
|
|
int
|
|
|
|
vc_nb_open(dev, flag, mode, p)
|
|
|
|
dev_t dev;
|
|
|
|
int flag;
|
|
|
|
int mode;
|
|
|
|
struct proc *p; /* NetBSD only */
|
|
|
|
{
|
|
|
|
register struct vcomm *vcp;
|
|
|
|
|
|
|
|
ENTRY;
|
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
if (minor(dev) >= NVCODA || minor(dev) < 0)
|
1998-08-29 21:14:52 +00:00
|
|
|
return(ENXIO);
|
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
if (!coda_nc_initialized)
|
|
|
|
coda_nc_init();
|
1998-08-29 21:14:52 +00:00
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
vcp = &coda_mnttbl[minor(dev)].mi_vcomm;
|
1998-08-29 21:14:52 +00:00
|
|
|
if (VC_OPEN(vcp))
|
|
|
|
return(EBUSY);
|
|
|
|
|
|
|
|
bzero(&(vcp->vc_selproc), sizeof (struct selinfo));
|
|
|
|
INIT_QUEUE(vcp->vc_requests);
|
|
|
|
INIT_QUEUE(vcp->vc_replys);
|
|
|
|
MARK_VC_OPEN(vcp);
|
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
coda_mnttbl[minor(dev)].mi_vfsp = NULL;
|
|
|
|
coda_mnttbl[minor(dev)].mi_rootvp = NULL;
|
1998-08-29 21:14:52 +00:00
|
|
|
|
|
|
|
return(0);
|
|
|
|
}
|
|
|
|
|
|
|
|
int
|
|
|
|
vc_nb_close (dev, flag, mode, p)
|
|
|
|
dev_t dev;
|
|
|
|
int flag;
|
|
|
|
int mode;
|
|
|
|
struct proc *p;
|
|
|
|
{
|
|
|
|
register struct vcomm *vcp;
|
1998-11-11 20:32:20 +00:00
|
|
|
register struct vmsg *vmp, *nvmp = NULL;
|
1998-09-11 18:50:17 +00:00
|
|
|
struct coda_mntinfo *mi;
|
1998-08-29 21:14:52 +00:00
|
|
|
int err;
|
|
|
|
|
|
|
|
ENTRY;
|
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
if (minor(dev) >= NVCODA || minor(dev) < 0)
|
1998-08-29 21:14:52 +00:00
|
|
|
return(ENXIO);
|
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
mi = &coda_mnttbl[minor(dev)];
|
1998-08-29 21:14:52 +00:00
|
|
|
vcp = &(mi->mi_vcomm);
|
|
|
|
|
|
|
|
if (!VC_OPEN(vcp))
|
|
|
|
panic("vcclose: not open");
|
|
|
|
|
|
|
|
/* prevent future operations on this vfs from succeeding by auto-
|
|
|
|
* unmounting any vfs mounted via this device. This frees user or
|
|
|
|
* sysadm from having to remember where all mount points are located.
|
|
|
|
* Put this before WAKEUPs to avoid queuing new messages between
|
|
|
|
* the WAKEUP and the unmount (which can happen if we're unlucky)
|
|
|
|
*/
|
1998-10-28 20:31:13 +00:00
|
|
|
if (!mi->mi_rootvp) {
|
|
|
|
/* just a simple open/close w no mount */
|
|
|
|
MARK_VC_CLOSED(vcp);
|
|
|
|
return 0;
|
1998-08-29 21:14:52 +00:00
|
|
|
}
|
1998-10-28 20:31:13 +00:00
|
|
|
|
|
|
|
/* Let unmount know this is for real */
|
|
|
|
VTOC(mi->mi_rootvp)->c_flags |= C_UNMOUNTING;
|
|
|
|
coda_unmounting(mi->mi_vfsp);
|
|
|
|
|
|
|
|
outstanding_upcalls = 0;
|
1998-08-29 21:14:52 +00:00
|
|
|
/* Wakeup clients so they can return. */
|
|
|
|
for (vmp = (struct vmsg *)GETNEXT(vcp->vc_requests);
|
|
|
|
!EOQ(vmp, vcp->vc_requests);
|
1998-11-11 20:32:20 +00:00
|
|
|
vmp = nvmp)
|
|
|
|
{
|
|
|
|
nvmp = (struct vmsg *)GETNEXT(vmp->vm_chain);
|
1998-08-29 21:14:52 +00:00
|
|
|
/* Free signal request messages and don't wakeup cause
|
|
|
|
no one is waiting. */
|
1998-09-11 18:50:17 +00:00
|
|
|
if (vmp->vm_opcode == CODA_SIGNAL) {
|
|
|
|
CODA_FREE((caddr_t)vmp->vm_data, (u_int)VC_IN_NO_DATA);
|
|
|
|
CODA_FREE((caddr_t)vmp, (u_int)sizeof(struct vmsg));
|
1998-08-29 21:14:52 +00:00
|
|
|
continue;
|
|
|
|
}
|
1998-10-28 20:31:13 +00:00
|
|
|
outstanding_upcalls++;
|
1998-08-29 21:14:52 +00:00
|
|
|
wakeup(&vmp->vm_sleep);
|
|
|
|
}
|
1998-10-28 20:31:13 +00:00
|
|
|
|
1998-08-29 21:14:52 +00:00
|
|
|
for (vmp = (struct vmsg *)GETNEXT(vcp->vc_replys);
|
|
|
|
!EOQ(vmp, vcp->vc_replys);
|
|
|
|
vmp = (struct vmsg *)GETNEXT(vmp->vm_chain))
|
|
|
|
{
|
1998-10-28 20:31:13 +00:00
|
|
|
outstanding_upcalls++;
|
1998-08-29 21:14:52 +00:00
|
|
|
wakeup(&vmp->vm_sleep);
|
|
|
|
}
|
1998-10-28 20:31:13 +00:00
|
|
|
|
1998-08-29 21:14:52 +00:00
|
|
|
MARK_VC_CLOSED(vcp);
|
1998-10-28 20:31:13 +00:00
|
|
|
|
|
|
|
if (outstanding_upcalls) {
|
|
|
|
#ifdef CODA_VERBOSE
|
|
|
|
printf("presleep: outstanding_upcalls = %d\n", outstanding_upcalls);
|
|
|
|
(void) tsleep(&outstanding_upcalls, coda_call_sleep, "coda_umount", 0);
|
|
|
|
printf("postsleep: outstanding_upcalls = %d\n", outstanding_upcalls);
|
|
|
|
#else
|
|
|
|
(void) tsleep(&outstanding_upcalls, coda_call_sleep, "coda_umount", 0);
|
|
|
|
#endif
|
|
|
|
}
|
|
|
|
|
|
|
|
err = dounmount(mi->mi_vfsp, flag, p);
|
|
|
|
if (err)
|
|
|
|
myprintf(("Error %d unmounting vfs in vcclose(%d)\n",
|
|
|
|
err, minor(dev)));
|
1998-08-29 21:14:52 +00:00
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
int
|
|
|
|
vc_nb_read(dev, uiop, flag)
|
|
|
|
dev_t dev;
|
|
|
|
struct uio *uiop;
|
|
|
|
int flag;
|
|
|
|
{
|
|
|
|
register struct vcomm * vcp;
|
|
|
|
register struct vmsg *vmp;
|
|
|
|
int error = 0;
|
|
|
|
|
|
|
|
ENTRY;
|
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
if (minor(dev) >= NVCODA || minor(dev) < 0)
|
1998-08-29 21:14:52 +00:00
|
|
|
return(ENXIO);
|
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
vcp = &coda_mnttbl[minor(dev)].mi_vcomm;
|
1998-08-29 21:14:52 +00:00
|
|
|
/* Get message at head of request queue. */
|
|
|
|
if (EMPTY(vcp->vc_requests))
|
|
|
|
return(0); /* Nothing to read */
|
|
|
|
|
|
|
|
vmp = (struct vmsg *)GETNEXT(vcp->vc_requests);
|
|
|
|
|
|
|
|
/* Move the input args into userspace */
|
|
|
|
uiop->uio_rw = UIO_READ;
|
|
|
|
error = uiomove(vmp->vm_data, vmp->vm_inSize, uiop);
|
|
|
|
if (error) {
|
|
|
|
myprintf(("vcread: error (%d) on uiomove\n", error));
|
|
|
|
error = EINVAL;
|
|
|
|
}
|
|
|
|
|
1998-09-25 17:38:32 +00:00
|
|
|
#ifdef OLD_DIAGNOSTIC
|
1998-08-29 21:14:52 +00:00
|
|
|
if (vmp->vm_chain.forw == 0 || vmp->vm_chain.back == 0)
|
|
|
|
panic("vc_nb_read: bad chain");
|
|
|
|
#endif
|
|
|
|
|
|
|
|
REMQUE(vmp->vm_chain);
|
|
|
|
|
|
|
|
/* If request was a signal, free up the message and don't
|
|
|
|
enqueue it in the reply queue. */
|
1998-09-11 18:50:17 +00:00
|
|
|
if (vmp->vm_opcode == CODA_SIGNAL) {
|
|
|
|
if (codadebug)
|
1998-08-29 21:14:52 +00:00
|
|
|
myprintf(("vcread: signal msg (%d, %d)\n",
|
|
|
|
vmp->vm_opcode, vmp->vm_unique));
|
1998-09-11 18:50:17 +00:00
|
|
|
CODA_FREE((caddr_t)vmp->vm_data, (u_int)VC_IN_NO_DATA);
|
|
|
|
CODA_FREE((caddr_t)vmp, (u_int)sizeof(struct vmsg));
|
1998-08-29 21:14:52 +00:00
|
|
|
return(error);
|
|
|
|
}
|
|
|
|
|
|
|
|
vmp->vm_flags |= VM_READ;
|
|
|
|
INSQUE(vmp->vm_chain, vcp->vc_replys);
|
|
|
|
|
|
|
|
return(error);
|
|
|
|
}
|
|
|
|
|
|
|
|
int
|
|
|
|
vc_nb_write(dev, uiop, flag)
|
|
|
|
dev_t dev;
|
|
|
|
struct uio *uiop;
|
|
|
|
int flag;
|
|
|
|
{
|
|
|
|
register struct vcomm * vcp;
|
|
|
|
register struct vmsg *vmp;
|
1998-09-11 18:50:17 +00:00
|
|
|
struct coda_out_hdr *out;
|
1998-08-29 21:14:52 +00:00
|
|
|
u_long seq;
|
|
|
|
u_long opcode;
|
|
|
|
int buf[2];
|
|
|
|
int error = 0;
|
|
|
|
|
|
|
|
ENTRY;
|
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
if (minor(dev) >= NVCODA || minor(dev) < 0)
|
1998-08-29 21:14:52 +00:00
|
|
|
return(ENXIO);
|
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
vcp = &coda_mnttbl[minor(dev)].mi_vcomm;
|
1998-08-29 21:14:52 +00:00
|
|
|
|
|
|
|
/* Peek at the opcode, unique without transfering the data. */
|
|
|
|
uiop->uio_rw = UIO_WRITE;
|
|
|
|
error = uiomove((caddr_t)buf, sizeof(int) * 2, uiop);
|
|
|
|
if (error) {
|
|
|
|
myprintf(("vcwrite: error (%d) on uiomove\n", error));
|
|
|
|
return(EINVAL);
|
|
|
|
}
|
|
|
|
|
|
|
|
opcode = buf[0];
|
|
|
|
seq = buf[1];
|
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
if (codadebug)
|
1998-08-29 21:14:52 +00:00
|
|
|
myprintf(("vcwrite got a call for %ld.%ld\n", opcode, seq));
|
|
|
|
|
|
|
|
if (DOWNCALL(opcode)) {
|
|
|
|
union outputArgs pbuf;
|
|
|
|
|
|
|
|
/* get the rest of the data. */
|
|
|
|
uiop->uio_rw = UIO_WRITE;
|
1998-09-11 18:50:17 +00:00
|
|
|
error = uiomove((caddr_t)&pbuf.coda_purgeuser.oh.result, sizeof(pbuf) - (sizeof(int)*2), uiop);
|
1998-08-29 21:14:52 +00:00
|
|
|
if (error) {
|
|
|
|
myprintf(("vcwrite: error (%d) on uiomove (Op %ld seq %ld)\n",
|
|
|
|
error, opcode, seq));
|
|
|
|
return(EINVAL);
|
|
|
|
}
|
|
|
|
|
|
|
|
return handleDownCall(opcode, &pbuf);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Look for the message on the (waiting for) reply queue. */
|
|
|
|
for (vmp = (struct vmsg *)GETNEXT(vcp->vc_replys);
|
|
|
|
!EOQ(vmp, vcp->vc_replys);
|
|
|
|
vmp = (struct vmsg *)GETNEXT(vmp->vm_chain))
|
|
|
|
{
|
|
|
|
if (vmp->vm_unique == seq) break;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (EOQ(vmp, vcp->vc_replys)) {
|
1998-09-11 18:50:17 +00:00
|
|
|
if (codadebug)
|
1998-08-29 21:14:52 +00:00
|
|
|
myprintf(("vcwrite: msg (%ld, %ld) not found\n", opcode, seq));
|
|
|
|
|
|
|
|
return(ESRCH);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Remove the message from the reply queue */
|
|
|
|
REMQUE(vmp->vm_chain);
|
|
|
|
|
|
|
|
/* move data into response buffer. */
|
1998-09-11 18:50:17 +00:00
|
|
|
out = (struct coda_out_hdr *)vmp->vm_data;
|
1998-08-29 21:14:52 +00:00
|
|
|
/* Don't need to copy opcode and uniquifier. */
|
|
|
|
|
|
|
|
/* get the rest of the data. */
|
|
|
|
if (vmp->vm_outSize < uiop->uio_resid) {
|
|
|
|
myprintf(("vcwrite: more data than asked for (%d < %d)\n",
|
|
|
|
vmp->vm_outSize, uiop->uio_resid));
|
|
|
|
wakeup(&vmp->vm_sleep); /* Notify caller of the error. */
|
|
|
|
return(EINVAL);
|
|
|
|
}
|
|
|
|
|
|
|
|
buf[0] = uiop->uio_resid; /* Save this value. */
|
|
|
|
uiop->uio_rw = UIO_WRITE;
|
|
|
|
error = uiomove((caddr_t) &out->result, vmp->vm_outSize - (sizeof(int) * 2), uiop);
|
|
|
|
if (error) {
|
|
|
|
myprintf(("vcwrite: error (%d) on uiomove (op %ld seq %ld)\n",
|
|
|
|
error, opcode, seq));
|
|
|
|
return(EINVAL);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* I don't think these are used, but just in case. */
|
|
|
|
/* XXX - aren't these two already correct? -bnoble */
|
|
|
|
out->opcode = opcode;
|
|
|
|
out->unique = seq;
|
|
|
|
vmp->vm_outSize = buf[0]; /* Amount of data transferred? */
|
|
|
|
vmp->vm_flags |= VM_WRITE;
|
|
|
|
wakeup(&vmp->vm_sleep);
|
|
|
|
|
|
|
|
return(0);
|
|
|
|
}
|
|
|
|
|
|
|
|
int
|
|
|
|
vc_nb_ioctl(dev, cmd, addr, flag, p)
|
|
|
|
dev_t dev;
|
1998-09-25 17:38:32 +00:00
|
|
|
u_long cmd;
|
1998-08-29 21:14:52 +00:00
|
|
|
caddr_t addr;
|
|
|
|
int flag;
|
|
|
|
struct proc *p;
|
|
|
|
{
|
|
|
|
ENTRY;
|
|
|
|
|
|
|
|
switch(cmd) {
|
1998-09-11 18:50:17 +00:00
|
|
|
case CODARESIZE: {
|
|
|
|
struct coda_resize *data = (struct coda_resize *)addr;
|
|
|
|
return(coda_nc_resize(data->hashsize, data->heapsize, IS_DOWNCALL));
|
1998-08-29 21:14:52 +00:00
|
|
|
break;
|
|
|
|
}
|
1998-09-11 18:50:17 +00:00
|
|
|
case CODASTATS:
|
|
|
|
if (coda_nc_use) {
|
|
|
|
coda_nc_gather_stats();
|
1998-08-29 21:14:52 +00:00
|
|
|
return(0);
|
|
|
|
} else {
|
|
|
|
return(ENODEV);
|
|
|
|
}
|
|
|
|
break;
|
1998-09-11 18:50:17 +00:00
|
|
|
case CODAPRINT:
|
|
|
|
if (coda_nc_use) {
|
|
|
|
print_coda_nc();
|
1998-08-29 21:14:52 +00:00
|
|
|
return(0);
|
|
|
|
} else {
|
|
|
|
return(ENODEV);
|
|
|
|
}
|
|
|
|
break;
|
1998-11-11 20:32:20 +00:00
|
|
|
case CIOC_KERNEL_VERSION:
|
|
|
|
switch (*(u_int *)addr) {
|
|
|
|
case 0:
|
|
|
|
*(u_int *)addr = coda_kernel_version;
|
|
|
|
return 0;
|
|
|
|
break;
|
|
|
|
case 1:
|
|
|
|
case 2:
|
|
|
|
if (coda_kernel_version != *(u_int *)addr)
|
|
|
|
return ENOENT;
|
|
|
|
else
|
|
|
|
return 0;
|
|
|
|
default:
|
|
|
|
return ENOENT;
|
|
|
|
}
|
|
|
|
break;
|
1998-08-29 21:14:52 +00:00
|
|
|
default :
|
|
|
|
return(EINVAL);
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
int
|
|
|
|
vc_nb_poll(dev, events, p)
|
|
|
|
dev_t dev;
|
|
|
|
int events;
|
|
|
|
struct proc *p;
|
|
|
|
{
|
|
|
|
register struct vcomm *vcp;
|
|
|
|
int event_msk = 0;
|
|
|
|
|
|
|
|
ENTRY;
|
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
if (minor(dev) >= NVCODA || minor(dev) < 0)
|
1998-08-29 21:14:52 +00:00
|
|
|
return(ENXIO);
|
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
vcp = &coda_mnttbl[minor(dev)].mi_vcomm;
|
1998-08-29 21:14:52 +00:00
|
|
|
|
|
|
|
event_msk = events & (POLLIN|POLLRDNORM);
|
|
|
|
if (!event_msk)
|
|
|
|
return(0);
|
|
|
|
|
|
|
|
if (!EMPTY(vcp->vc_requests))
|
|
|
|
return(events & (POLLIN|POLLRDNORM));
|
|
|
|
|
|
|
|
selrecord(p, &(vcp->vc_selproc));
|
|
|
|
|
|
|
|
return(0);
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Statistics
|
|
|
|
*/
|
1998-09-11 18:50:17 +00:00
|
|
|
struct coda_clstat coda_clstat;
|
1998-08-29 21:14:52 +00:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Key question: whether to sleep interuptably or uninteruptably when
|
|
|
|
* waiting for Venus. The former seems better (cause you can ^C a
|
|
|
|
* job), but then GNU-EMACS completion breaks. Use tsleep with no
|
|
|
|
* timeout, and no longjmp happens. But, when sleeping
|
|
|
|
* "uninterruptibly", we don't get told if it returns abnormally
|
|
|
|
* (e.g. kill -9).
|
|
|
|
*/
|
|
|
|
|
|
|
|
int
|
1998-09-11 18:50:17 +00:00
|
|
|
coda_call(mntinfo, inSize, outSize, buffer)
|
|
|
|
struct coda_mntinfo *mntinfo; int inSize; int *outSize; caddr_t buffer;
|
1998-08-29 21:14:52 +00:00
|
|
|
{
|
|
|
|
struct vcomm *vcp;
|
|
|
|
struct vmsg *vmp;
|
|
|
|
int error;
|
|
|
|
#ifdef CTL_C
|
|
|
|
struct proc *p = curproc;
|
1999-09-29 15:03:48 +00:00
|
|
|
sigset_t psig_omask = p->p_sigmask;
|
|
|
|
sigset_t tempset;
|
1998-08-29 21:14:52 +00:00
|
|
|
int i;
|
|
|
|
#endif
|
|
|
|
if (mntinfo == NULL) {
|
|
|
|
/* Unlikely, but could be a race condition with a dying warden */
|
|
|
|
return ENODEV;
|
|
|
|
}
|
|
|
|
|
|
|
|
vcp = &(mntinfo->mi_vcomm);
|
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
coda_clstat.ncalls++;
|
|
|
|
coda_clstat.reqs[((struct coda_in_hdr *)buffer)->opcode]++;
|
1998-08-29 21:14:52 +00:00
|
|
|
|
|
|
|
if (!VC_OPEN(vcp))
|
|
|
|
return(ENODEV);
|
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
CODA_ALLOC(vmp,struct vmsg *,sizeof(struct vmsg));
|
1998-08-29 21:14:52 +00:00
|
|
|
/* Format the request message. */
|
|
|
|
vmp->vm_data = buffer;
|
|
|
|
vmp->vm_flags = 0;
|
|
|
|
vmp->vm_inSize = inSize;
|
|
|
|
vmp->vm_outSize
|
|
|
|
= *outSize ? *outSize : inSize; /* |buffer| >= inSize */
|
1998-09-11 18:50:17 +00:00
|
|
|
vmp->vm_opcode = ((struct coda_in_hdr *)buffer)->opcode;
|
1998-08-29 21:14:52 +00:00
|
|
|
vmp->vm_unique = ++vcp->vc_seq;
|
1998-09-11 18:50:17 +00:00
|
|
|
if (codadebug)
|
1998-08-29 21:14:52 +00:00
|
|
|
myprintf(("Doing a call for %d.%d\n",
|
|
|
|
vmp->vm_opcode, vmp->vm_unique));
|
|
|
|
|
|
|
|
/* Fill in the common input args. */
|
1998-09-11 18:50:17 +00:00
|
|
|
((struct coda_in_hdr *)buffer)->unique = vmp->vm_unique;
|
1998-08-29 21:14:52 +00:00
|
|
|
|
|
|
|
/* Append msg to request queue and poke Venus. */
|
|
|
|
INSQUE(vmp->vm_chain, vcp->vc_requests);
|
|
|
|
selwakeup(&(vcp->vc_selproc));
|
|
|
|
|
|
|
|
/* We can be interrupted while we wait for Venus to process
|
|
|
|
* our request. If the interrupt occurs before Venus has read
|
|
|
|
* the request, we dequeue and return. If it occurs after the
|
|
|
|
* read but before the reply, we dequeue, send a signal
|
|
|
|
* message, and return. If it occurs after the reply we ignore
|
|
|
|
* it. In no case do we want to restart the syscall. If it
|
|
|
|
* was interrupted by a venus shutdown (vcclose), return
|
|
|
|
* ENODEV. */
|
|
|
|
|
|
|
|
/* Ignore return, We have to check anyway */
|
|
|
|
#ifdef CTL_C
|
1998-09-11 18:50:17 +00:00
|
|
|
/* This is work in progress. Setting coda_pcatch lets tsleep reawaken
|
1998-08-29 21:14:52 +00:00
|
|
|
on a ^c or ^z. The problem is that emacs sets certain interrupts
|
|
|
|
as SA_RESTART. This means that we should exit sleep handle the
|
|
|
|
"signal" and then go to sleep again. Mostly this is done by letting
|
|
|
|
the syscall complete and be restarted. We are not idempotent and
|
|
|
|
can not do this. A better solution is necessary.
|
|
|
|
*/
|
|
|
|
i = 0;
|
|
|
|
do {
|
1999-09-29 15:03:48 +00:00
|
|
|
error = tsleep(&vmp->vm_sleep,
|
|
|
|
(coda_call_sleep|coda_pcatch), "coda_call",
|
|
|
|
hz*2);
|
|
|
|
if (error == 0)
|
|
|
|
break;
|
|
|
|
else if (error == EWOULDBLOCK) {
|
1998-09-28 20:52:58 +00:00
|
|
|
#ifdef CODA_VERBOSE
|
1999-09-29 15:03:48 +00:00
|
|
|
printf("coda_call: tsleep TIMEOUT %d sec\n", 2+2*i);
|
1998-09-25 17:38:32 +00:00
|
|
|
#endif
|
1999-09-29 15:03:48 +00:00
|
|
|
}
|
|
|
|
else {
|
|
|
|
SIGEMPTYSET(tempset);
|
|
|
|
SIGADDSET(tempset, SIGIO);
|
|
|
|
if (SIGSETEQ(p->p_siglist, tempset)) {
|
|
|
|
SIGADDSET(p->p_sigmask, SIGIO);
|
1998-09-28 20:52:58 +00:00
|
|
|
#ifdef CODA_VERBOSE
|
1999-09-29 15:03:48 +00:00
|
|
|
printf("coda_call: tsleep returns %d SIGIO, cnt %d\n",
|
|
|
|
error, i);
|
1998-10-28 20:31:13 +00:00
|
|
|
#endif
|
1999-09-29 15:03:48 +00:00
|
|
|
} else {
|
|
|
|
SIGDELSET(tempset, SIGIO);
|
|
|
|
SIGADDSET(tempset, SIGALRM);
|
|
|
|
if (SIGSETEQ(p->p_siglist, tempset)) {
|
|
|
|
SIGADDSET(p->p_sigmask, SIGALRM);
|
1998-10-28 20:31:13 +00:00
|
|
|
#ifdef CODA_VERBOSE
|
1999-09-29 15:03:48 +00:00
|
|
|
printf("coda_call: tsleep returns %d SIGALRM, cnt %d\n",
|
|
|
|
error, i);
|
1998-09-25 17:38:32 +00:00
|
|
|
#endif
|
1999-09-29 15:03:48 +00:00
|
|
|
}
|
|
|
|
else {
|
|
|
|
printf("coda_call: tsleep returns %d, cnt %d\n",
|
|
|
|
error, i);
|
|
|
|
|
|
|
|
#if notyet
|
|
|
|
tempset = p->p_siglist;
|
|
|
|
SIGSETNAND(tempset, p->p_sigmask);
|
|
|
|
printf("coda_call: siglist = %p, sigmask = %p, mask %p\n",
|
|
|
|
p->p_siglist, p->p_sigmask,
|
|
|
|
tempset);
|
|
|
|
break;
|
|
|
|
SIGSETOR(p->p_sigmask, p->p_siglist);
|
|
|
|
tempset = p->p_siglist;
|
|
|
|
SIGSETNAND(tempset, p->p_sigmask);
|
|
|
|
printf("coda_call: new mask, siglist = %p, sigmask = %p, mask %p\n",
|
|
|
|
p->p_siglist, p->p_sigmask,
|
|
|
|
tempset);
|
1998-09-25 17:38:32 +00:00
|
|
|
#endif
|
1999-09-29 15:03:48 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
1998-10-28 20:31:13 +00:00
|
|
|
} while (error && i++ < 128 && VC_OPEN(vcp));
|
1998-08-29 21:14:52 +00:00
|
|
|
p->p_sigmask = psig_omask;
|
|
|
|
#else
|
1998-09-11 18:50:17 +00:00
|
|
|
(void) tsleep(&vmp->vm_sleep, coda_call_sleep, "coda_call", 0);
|
1998-08-29 21:14:52 +00:00
|
|
|
#endif
|
|
|
|
if (VC_OPEN(vcp)) { /* Venus is still alive */
|
|
|
|
/* Op went through, interrupt or not... */
|
|
|
|
if (vmp->vm_flags & VM_WRITE) {
|
|
|
|
error = 0;
|
|
|
|
*outSize = vmp->vm_outSize;
|
|
|
|
}
|
|
|
|
|
|
|
|
else if (!(vmp->vm_flags & VM_READ)) {
|
|
|
|
/* Interrupted before venus read it. */
|
1998-09-28 20:52:58 +00:00
|
|
|
#ifdef CODA_VERBOSE
|
1998-09-25 17:38:32 +00:00
|
|
|
if (1)
|
|
|
|
#else
|
|
|
|
if (codadebug)
|
|
|
|
#endif
|
1998-08-29 21:14:52 +00:00
|
|
|
myprintf(("interrupted before read: op = %d.%d, flags = %x\n",
|
|
|
|
vmp->vm_opcode, vmp->vm_unique, vmp->vm_flags));
|
|
|
|
REMQUE(vmp->vm_chain);
|
|
|
|
error = EINTR;
|
|
|
|
}
|
|
|
|
|
|
|
|
else {
|
|
|
|
/* (!(vmp->vm_flags & VM_WRITE)) means interrupted after
|
|
|
|
upcall started */
|
|
|
|
/* Interrupted after start of upcall, send venus a signal */
|
1998-09-11 18:50:17 +00:00
|
|
|
struct coda_in_hdr *dog;
|
1998-08-29 21:14:52 +00:00
|
|
|
struct vmsg *svmp;
|
|
|
|
|
1998-09-28 20:52:58 +00:00
|
|
|
#ifdef CODA_VERBOSE
|
1998-09-25 17:38:32 +00:00
|
|
|
if (1)
|
|
|
|
#else
|
|
|
|
if (codadebug)
|
|
|
|
#endif
|
1998-08-29 21:14:52 +00:00
|
|
|
myprintf(("Sending Venus a signal: op = %d.%d, flags = %x\n",
|
|
|
|
vmp->vm_opcode, vmp->vm_unique, vmp->vm_flags));
|
|
|
|
|
|
|
|
REMQUE(vmp->vm_chain);
|
|
|
|
error = EINTR;
|
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
CODA_ALLOC(svmp, struct vmsg *, sizeof (struct vmsg));
|
1998-08-29 21:14:52 +00:00
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
CODA_ALLOC((svmp->vm_data), char *, sizeof (struct coda_in_hdr));
|
|
|
|
dog = (struct coda_in_hdr *)svmp->vm_data;
|
1998-08-29 21:14:52 +00:00
|
|
|
|
|
|
|
svmp->vm_flags = 0;
|
1998-09-11 18:50:17 +00:00
|
|
|
dog->opcode = svmp->vm_opcode = CODA_SIGNAL;
|
1998-08-29 21:14:52 +00:00
|
|
|
dog->unique = svmp->vm_unique = vmp->vm_unique;
|
1998-09-11 18:50:17 +00:00
|
|
|
svmp->vm_inSize = sizeof (struct coda_in_hdr);
|
|
|
|
/*??? rvb */ svmp->vm_outSize = sizeof (struct coda_in_hdr);
|
1998-08-29 21:14:52 +00:00
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
if (codadebug)
|
|
|
|
myprintf(("coda_call: enqueing signal msg (%d, %d)\n",
|
1998-08-29 21:14:52 +00:00
|
|
|
svmp->vm_opcode, svmp->vm_unique));
|
|
|
|
|
|
|
|
/* insert at head of queue! */
|
|
|
|
INSQUE(svmp->vm_chain, vcp->vc_requests);
|
|
|
|
selwakeup(&(vcp->vc_selproc));
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
else { /* If venus died (!VC_OPEN(vcp)) */
|
1998-09-11 18:50:17 +00:00
|
|
|
if (codadebug)
|
1998-08-29 21:14:52 +00:00
|
|
|
myprintf(("vcclose woke op %d.%d flags %d\n",
|
|
|
|
vmp->vm_opcode, vmp->vm_unique, vmp->vm_flags));
|
|
|
|
|
|
|
|
error = ENODEV;
|
|
|
|
}
|
|
|
|
|
1998-09-11 18:50:17 +00:00
|
|
|
CODA_FREE(vmp, sizeof(struct vmsg));
|
1998-08-29 21:14:52 +00:00
|
|
|
|
1998-10-28 20:31:13 +00:00
|
|
|
if (outstanding_upcalls > 0 && (--outstanding_upcalls == 0))
|
|
|
|
wakeup(&outstanding_upcalls);
|
|
|
|
|
1998-08-29 21:14:52 +00:00
|
|
|
if (!error)
|
1998-09-11 18:50:17 +00:00
|
|
|
error = ((struct coda_out_hdr *)buffer)->result;
|
1998-08-29 21:14:52 +00:00
|
|
|
return(error);
|
|
|
|
}
|