Home | History | Annotate | Line # | Download | only in nfs
nfs_subs.c revision 1.37
      1  1.37      fvdl /*	$NetBSD: nfs_subs.c,v 1.37 1996/12/09 11:31:11 fvdl Exp $	*/
      2  1.14       cgd 
      3   1.1       cgd /*
      4  1.12   mycroft  * Copyright (c) 1989, 1993
      5  1.12   mycroft  *	The Regents of the University of California.  All rights reserved.
      6   1.1       cgd  *
      7   1.1       cgd  * This code is derived from software contributed to Berkeley by
      8   1.1       cgd  * Rick Macklem at The University of Guelph.
      9   1.1       cgd  *
     10   1.1       cgd  * Redistribution and use in source and binary forms, with or without
     11   1.1       cgd  * modification, are permitted provided that the following conditions
     12   1.1       cgd  * are met:
     13   1.1       cgd  * 1. Redistributions of source code must retain the above copyright
     14   1.1       cgd  *    notice, this list of conditions and the following disclaimer.
     15   1.1       cgd  * 2. Redistributions in binary form must reproduce the above copyright
     16   1.1       cgd  *    notice, this list of conditions and the following disclaimer in the
     17   1.1       cgd  *    documentation and/or other materials provided with the distribution.
     18   1.1       cgd  * 3. All advertising materials mentioning features or use of this software
     19   1.1       cgd  *    must display the following acknowledgement:
     20   1.1       cgd  *	This product includes software developed by the University of
     21   1.1       cgd  *	California, Berkeley and its contributors.
     22   1.1       cgd  * 4. Neither the name of the University nor the names of its contributors
     23   1.1       cgd  *    may be used to endorse or promote products derived from this software
     24   1.1       cgd  *    without specific prior written permission.
     25   1.1       cgd  *
     26   1.1       cgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     27   1.1       cgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     28   1.1       cgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     29   1.1       cgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     30   1.1       cgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     31   1.1       cgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     32   1.1       cgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     33   1.1       cgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     34   1.1       cgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     35   1.1       cgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     36   1.1       cgd  * SUCH DAMAGE.
     37   1.1       cgd  *
     38  1.25      fvdl  *	@(#)nfs_subs.c	8.8 (Berkeley) 5/22/95
     39   1.1       cgd  */
     40   1.1       cgd 
     41  1.25      fvdl 
     42   1.1       cgd /*
     43   1.1       cgd  * These functions support the macros and help fiddle mbuf chains for
     44   1.1       cgd  * the nfs op functions. They do things like create the rpc header and
     45   1.1       cgd  * copy data between mbuf chains and uio lists.
     46   1.1       cgd  */
     47   1.9   mycroft #include <sys/param.h>
     48   1.9   mycroft #include <sys/proc.h>
     49   1.9   mycroft #include <sys/systm.h>
     50   1.9   mycroft #include <sys/kernel.h>
     51   1.9   mycroft #include <sys/mount.h>
     52   1.9   mycroft #include <sys/vnode.h>
     53   1.9   mycroft #include <sys/namei.h>
     54   1.9   mycroft #include <sys/mbuf.h>
     55  1.12   mycroft #include <sys/socket.h>
     56  1.12   mycroft #include <sys/stat.h>
     57  1.25      fvdl #include <sys/malloc.h>
     58  1.30      fvdl #include <sys/time.h>
     59  1.25      fvdl 
     60  1.25      fvdl #include <vm/vm.h>
     61   1.1       cgd 
     62   1.9   mycroft #include <nfs/rpcv2.h>
     63  1.25      fvdl #include <nfs/nfsproto.h>
     64   1.9   mycroft #include <nfs/nfsnode.h>
     65   1.9   mycroft #include <nfs/nfs.h>
     66   1.9   mycroft #include <nfs/xdr_subs.h>
     67   1.9   mycroft #include <nfs/nfsm_subs.h>
     68  1.12   mycroft #include <nfs/nfsmount.h>
     69  1.12   mycroft #include <nfs/nqnfs.h>
     70  1.12   mycroft #include <nfs/nfsrtt.h>
     71  1.24  christos #include <nfs/nfs_var.h>
     72  1.12   mycroft 
     73  1.12   mycroft #include <miscfs/specfs/specdev.h>
     74  1.12   mycroft 
     75  1.24  christos #include <vm/vm.h>
     76  1.24  christos 
     77  1.12   mycroft #include <netinet/in.h>
     78  1.12   mycroft #ifdef ISO
     79  1.12   mycroft #include <netiso/iso.h>
     80  1.12   mycroft #endif
     81   1.1       cgd 
     82   1.1       cgd /*
     83   1.1       cgd  * Data items converted to xdr at startup, since they are constant
     84   1.1       cgd  * This is kinda hokey, but may save a little time doing byte swaps
     85   1.1       cgd  */
     86  1.22       cgd u_int32_t nfs_xdrneg1;
     87  1.22       cgd u_int32_t rpc_call, rpc_vers, rpc_reply, rpc_msgdenied, rpc_autherr,
     88  1.25      fvdl 	rpc_mismatch, rpc_auth_unix, rpc_msgaccepted,
     89  1.12   mycroft 	rpc_auth_kerb;
     90  1.25      fvdl u_int32_t nfs_prog, nqnfs_prog, nfs_true, nfs_false;
     91  1.12   mycroft 
     92   1.1       cgd /* And other global data */
     93  1.22       cgd static u_int32_t nfs_xid = 0;
     94  1.25      fvdl nfstype nfsv2_type[9] = { NFNON, NFREG, NFDIR, NFBLK, NFCHR, NFLNK, NFNON,
     95  1.25      fvdl 		      NFCHR, NFNON };
     96  1.25      fvdl nfstype nfsv3_type[9] = { NFNON, NFREG, NFDIR, NFBLK, NFCHR, NFLNK, NFSOCK,
     97  1.25      fvdl 		      NFFIFO, NFNON };
     98  1.25      fvdl enum vtype nv2tov_type[8] = { VNON, VREG, VDIR, VBLK, VCHR, VLNK, VNON, VNON };
     99  1.25      fvdl enum vtype nv3tov_type[8]={ VNON, VREG, VDIR, VBLK, VCHR, VLNK, VSOCK, VFIFO };
    100  1.25      fvdl int nfs_ticks;
    101  1.25      fvdl 
    102  1.35   thorpej /* NFS client/server stats. */
    103  1.35   thorpej struct nfsstats nfsstats;
    104  1.35   thorpej 
    105  1.25      fvdl /*
    106  1.25      fvdl  * Mapping of old NFS Version 2 RPC numbers to generic numbers.
    107  1.25      fvdl  */
    108  1.25      fvdl int nfsv3_procid[NFS_NPROCS] = {
    109  1.25      fvdl 	NFSPROC_NULL,
    110  1.25      fvdl 	NFSPROC_GETATTR,
    111  1.25      fvdl 	NFSPROC_SETATTR,
    112  1.25      fvdl 	NFSPROC_NOOP,
    113  1.25      fvdl 	NFSPROC_LOOKUP,
    114  1.25      fvdl 	NFSPROC_READLINK,
    115  1.25      fvdl 	NFSPROC_READ,
    116  1.25      fvdl 	NFSPROC_NOOP,
    117  1.25      fvdl 	NFSPROC_WRITE,
    118  1.25      fvdl 	NFSPROC_CREATE,
    119  1.25      fvdl 	NFSPROC_REMOVE,
    120  1.25      fvdl 	NFSPROC_RENAME,
    121  1.25      fvdl 	NFSPROC_LINK,
    122  1.25      fvdl 	NFSPROC_SYMLINK,
    123  1.25      fvdl 	NFSPROC_MKDIR,
    124  1.25      fvdl 	NFSPROC_RMDIR,
    125  1.25      fvdl 	NFSPROC_READDIR,
    126  1.25      fvdl 	NFSPROC_FSSTAT,
    127  1.25      fvdl 	NFSPROC_NOOP,
    128  1.25      fvdl 	NFSPROC_NOOP,
    129  1.25      fvdl 	NFSPROC_NOOP,
    130  1.25      fvdl 	NFSPROC_NOOP,
    131  1.25      fvdl 	NFSPROC_NOOP,
    132  1.25      fvdl 	NFSPROC_NOOP,
    133  1.25      fvdl 	NFSPROC_NOOP,
    134  1.25      fvdl 	NFSPROC_NOOP
    135  1.25      fvdl };
    136  1.25      fvdl 
    137  1.25      fvdl /*
    138  1.25      fvdl  * and the reverse mapping from generic to Version 2 procedure numbers
    139  1.25      fvdl  */
    140  1.25      fvdl int nfsv2_procid[NFS_NPROCS] = {
    141  1.25      fvdl 	NFSV2PROC_NULL,
    142  1.25      fvdl 	NFSV2PROC_GETATTR,
    143  1.25      fvdl 	NFSV2PROC_SETATTR,
    144  1.25      fvdl 	NFSV2PROC_LOOKUP,
    145  1.25      fvdl 	NFSV2PROC_NOOP,
    146  1.25      fvdl 	NFSV2PROC_READLINK,
    147  1.25      fvdl 	NFSV2PROC_READ,
    148  1.25      fvdl 	NFSV2PROC_WRITE,
    149  1.25      fvdl 	NFSV2PROC_CREATE,
    150  1.25      fvdl 	NFSV2PROC_MKDIR,
    151  1.25      fvdl 	NFSV2PROC_SYMLINK,
    152  1.25      fvdl 	NFSV2PROC_CREATE,
    153  1.25      fvdl 	NFSV2PROC_REMOVE,
    154  1.25      fvdl 	NFSV2PROC_RMDIR,
    155  1.25      fvdl 	NFSV2PROC_RENAME,
    156  1.25      fvdl 	NFSV2PROC_LINK,
    157  1.25      fvdl 	NFSV2PROC_READDIR,
    158  1.25      fvdl 	NFSV2PROC_NOOP,
    159  1.25      fvdl 	NFSV2PROC_STATFS,
    160  1.25      fvdl 	NFSV2PROC_NOOP,
    161  1.25      fvdl 	NFSV2PROC_NOOP,
    162  1.25      fvdl 	NFSV2PROC_NOOP,
    163  1.25      fvdl 	NFSV2PROC_NOOP,
    164  1.25      fvdl 	NFSV2PROC_NOOP,
    165  1.25      fvdl 	NFSV2PROC_NOOP,
    166  1.25      fvdl 	NFSV2PROC_NOOP,
    167  1.25      fvdl };
    168  1.25      fvdl 
    169  1.25      fvdl /*
    170  1.25      fvdl  * Maps errno values to nfs error numbers.
    171  1.25      fvdl  * Use NFSERR_IO as the catch all for ones not specifically defined in
    172  1.25      fvdl  * RFC 1094.
    173  1.25      fvdl  */
    174  1.25      fvdl static u_char nfsrv_v2errmap[ELAST] = {
    175  1.25      fvdl   NFSERR_PERM,	NFSERR_NOENT,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,
    176  1.25      fvdl   NFSERR_NXIO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,
    177  1.25      fvdl   NFSERR_IO,	NFSERR_IO,	NFSERR_ACCES,	NFSERR_IO,	NFSERR_IO,
    178  1.25      fvdl   NFSERR_IO,	NFSERR_EXIST,	NFSERR_IO,	NFSERR_NODEV,	NFSERR_NOTDIR,
    179  1.25      fvdl   NFSERR_ISDIR,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,
    180  1.25      fvdl   NFSERR_IO,	NFSERR_FBIG,	NFSERR_NOSPC,	NFSERR_IO,	NFSERR_ROFS,
    181  1.25      fvdl   NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,
    182  1.25      fvdl   NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,
    183  1.25      fvdl   NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,
    184  1.25      fvdl   NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,
    185  1.25      fvdl   NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,
    186  1.25      fvdl   NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,
    187  1.25      fvdl   NFSERR_IO,	NFSERR_IO,	NFSERR_NAMETOL,	NFSERR_IO,	NFSERR_IO,
    188  1.25      fvdl   NFSERR_NOTEMPTY, NFSERR_IO,	NFSERR_IO,	NFSERR_DQUOT,	NFSERR_STALE,
    189  1.25      fvdl   NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,
    190  1.25      fvdl   NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,	NFSERR_IO,
    191  1.25      fvdl   NFSERR_IO,
    192  1.25      fvdl };
    193  1.25      fvdl 
    194  1.25      fvdl /*
    195  1.25      fvdl  * Maps errno values to nfs error numbers.
    196  1.25      fvdl  * Although it is not obvious whether or not NFS clients really care if
    197  1.25      fvdl  * a returned error value is in the specified list for the procedure, the
    198  1.25      fvdl  * safest thing to do is filter them appropriately. For Version 2, the
    199  1.25      fvdl  * X/Open XNFS document is the only specification that defines error values
    200  1.25      fvdl  * for each RPC (The RFC simply lists all possible error values for all RPCs),
    201  1.25      fvdl  * so I have decided to not do this for Version 2.
    202  1.25      fvdl  * The first entry is the default error return and the rest are the valid
    203  1.25      fvdl  * errors for that RPC in increasing numeric order.
    204  1.25      fvdl  */
    205  1.25      fvdl static short nfsv3err_null[] = {
    206  1.25      fvdl 	0,
    207  1.25      fvdl 	0,
    208  1.25      fvdl };
    209  1.25      fvdl 
    210  1.25      fvdl static short nfsv3err_getattr[] = {
    211  1.25      fvdl 	NFSERR_IO,
    212  1.25      fvdl 	NFSERR_IO,
    213  1.25      fvdl 	NFSERR_STALE,
    214  1.25      fvdl 	NFSERR_BADHANDLE,
    215  1.25      fvdl 	NFSERR_SERVERFAULT,
    216  1.25      fvdl 	0,
    217  1.25      fvdl };
    218  1.25      fvdl 
    219  1.25      fvdl static short nfsv3err_setattr[] = {
    220  1.25      fvdl 	NFSERR_IO,
    221  1.25      fvdl 	NFSERR_PERM,
    222  1.25      fvdl 	NFSERR_IO,
    223  1.25      fvdl 	NFSERR_ACCES,
    224  1.25      fvdl 	NFSERR_INVAL,
    225  1.25      fvdl 	NFSERR_NOSPC,
    226  1.25      fvdl 	NFSERR_ROFS,
    227  1.25      fvdl 	NFSERR_DQUOT,
    228  1.25      fvdl 	NFSERR_STALE,
    229  1.25      fvdl 	NFSERR_BADHANDLE,
    230  1.25      fvdl 	NFSERR_NOT_SYNC,
    231  1.25      fvdl 	NFSERR_SERVERFAULT,
    232  1.25      fvdl 	0,
    233  1.25      fvdl };
    234  1.25      fvdl 
    235  1.25      fvdl static short nfsv3err_lookup[] = {
    236  1.25      fvdl 	NFSERR_IO,
    237  1.25      fvdl 	NFSERR_NOENT,
    238  1.25      fvdl 	NFSERR_IO,
    239  1.25      fvdl 	NFSERR_ACCES,
    240  1.25      fvdl 	NFSERR_NOTDIR,
    241  1.25      fvdl 	NFSERR_NAMETOL,
    242  1.25      fvdl 	NFSERR_STALE,
    243  1.25      fvdl 	NFSERR_BADHANDLE,
    244  1.25      fvdl 	NFSERR_SERVERFAULT,
    245  1.25      fvdl 	0,
    246  1.25      fvdl };
    247  1.25      fvdl 
    248  1.25      fvdl static short nfsv3err_access[] = {
    249  1.25      fvdl 	NFSERR_IO,
    250  1.25      fvdl 	NFSERR_IO,
    251  1.25      fvdl 	NFSERR_STALE,
    252  1.25      fvdl 	NFSERR_BADHANDLE,
    253  1.25      fvdl 	NFSERR_SERVERFAULT,
    254  1.25      fvdl 	0,
    255  1.25      fvdl };
    256  1.25      fvdl 
    257  1.25      fvdl static short nfsv3err_readlink[] = {
    258  1.25      fvdl 	NFSERR_IO,
    259  1.25      fvdl 	NFSERR_IO,
    260  1.25      fvdl 	NFSERR_ACCES,
    261  1.25      fvdl 	NFSERR_INVAL,
    262  1.25      fvdl 	NFSERR_STALE,
    263  1.25      fvdl 	NFSERR_BADHANDLE,
    264  1.25      fvdl 	NFSERR_NOTSUPP,
    265  1.25      fvdl 	NFSERR_SERVERFAULT,
    266  1.25      fvdl 	0,
    267  1.25      fvdl };
    268  1.25      fvdl 
    269  1.25      fvdl static short nfsv3err_read[] = {
    270  1.25      fvdl 	NFSERR_IO,
    271  1.25      fvdl 	NFSERR_IO,
    272  1.25      fvdl 	NFSERR_NXIO,
    273  1.25      fvdl 	NFSERR_ACCES,
    274  1.25      fvdl 	NFSERR_INVAL,
    275  1.25      fvdl 	NFSERR_STALE,
    276  1.25      fvdl 	NFSERR_BADHANDLE,
    277  1.25      fvdl 	NFSERR_SERVERFAULT,
    278  1.25      fvdl 	0,
    279  1.25      fvdl };
    280  1.25      fvdl 
    281  1.25      fvdl static short nfsv3err_write[] = {
    282  1.25      fvdl 	NFSERR_IO,
    283  1.25      fvdl 	NFSERR_IO,
    284  1.25      fvdl 	NFSERR_ACCES,
    285  1.25      fvdl 	NFSERR_INVAL,
    286  1.25      fvdl 	NFSERR_FBIG,
    287  1.25      fvdl 	NFSERR_NOSPC,
    288  1.25      fvdl 	NFSERR_ROFS,
    289  1.25      fvdl 	NFSERR_DQUOT,
    290  1.25      fvdl 	NFSERR_STALE,
    291  1.25      fvdl 	NFSERR_BADHANDLE,
    292  1.25      fvdl 	NFSERR_SERVERFAULT,
    293  1.25      fvdl 	0,
    294  1.25      fvdl };
    295  1.25      fvdl 
    296  1.25      fvdl static short nfsv3err_create[] = {
    297  1.25      fvdl 	NFSERR_IO,
    298  1.25      fvdl 	NFSERR_IO,
    299  1.25      fvdl 	NFSERR_ACCES,
    300  1.25      fvdl 	NFSERR_EXIST,
    301  1.25      fvdl 	NFSERR_NOTDIR,
    302  1.25      fvdl 	NFSERR_NOSPC,
    303  1.25      fvdl 	NFSERR_ROFS,
    304  1.25      fvdl 	NFSERR_NAMETOL,
    305  1.25      fvdl 	NFSERR_DQUOT,
    306  1.25      fvdl 	NFSERR_STALE,
    307  1.25      fvdl 	NFSERR_BADHANDLE,
    308  1.25      fvdl 	NFSERR_NOTSUPP,
    309  1.25      fvdl 	NFSERR_SERVERFAULT,
    310  1.25      fvdl 	0,
    311  1.25      fvdl };
    312  1.25      fvdl 
    313  1.25      fvdl static short nfsv3err_mkdir[] = {
    314  1.25      fvdl 	NFSERR_IO,
    315  1.25      fvdl 	NFSERR_IO,
    316  1.25      fvdl 	NFSERR_ACCES,
    317  1.25      fvdl 	NFSERR_EXIST,
    318  1.25      fvdl 	NFSERR_NOTDIR,
    319  1.25      fvdl 	NFSERR_NOSPC,
    320  1.25      fvdl 	NFSERR_ROFS,
    321  1.25      fvdl 	NFSERR_NAMETOL,
    322  1.25      fvdl 	NFSERR_DQUOT,
    323  1.25      fvdl 	NFSERR_STALE,
    324  1.25      fvdl 	NFSERR_BADHANDLE,
    325  1.25      fvdl 	NFSERR_NOTSUPP,
    326  1.25      fvdl 	NFSERR_SERVERFAULT,
    327  1.25      fvdl 	0,
    328  1.25      fvdl };
    329  1.25      fvdl 
    330  1.25      fvdl static short nfsv3err_symlink[] = {
    331  1.25      fvdl 	NFSERR_IO,
    332  1.25      fvdl 	NFSERR_IO,
    333  1.25      fvdl 	NFSERR_ACCES,
    334  1.25      fvdl 	NFSERR_EXIST,
    335  1.25      fvdl 	NFSERR_NOTDIR,
    336  1.25      fvdl 	NFSERR_NOSPC,
    337  1.25      fvdl 	NFSERR_ROFS,
    338  1.25      fvdl 	NFSERR_NAMETOL,
    339  1.25      fvdl 	NFSERR_DQUOT,
    340  1.25      fvdl 	NFSERR_STALE,
    341  1.25      fvdl 	NFSERR_BADHANDLE,
    342  1.25      fvdl 	NFSERR_NOTSUPP,
    343  1.25      fvdl 	NFSERR_SERVERFAULT,
    344  1.25      fvdl 	0,
    345  1.25      fvdl };
    346  1.25      fvdl 
    347  1.25      fvdl static short nfsv3err_mknod[] = {
    348  1.25      fvdl 	NFSERR_IO,
    349  1.25      fvdl 	NFSERR_IO,
    350  1.25      fvdl 	NFSERR_ACCES,
    351  1.25      fvdl 	NFSERR_EXIST,
    352  1.25      fvdl 	NFSERR_NOTDIR,
    353  1.25      fvdl 	NFSERR_NOSPC,
    354  1.25      fvdl 	NFSERR_ROFS,
    355  1.25      fvdl 	NFSERR_NAMETOL,
    356  1.25      fvdl 	NFSERR_DQUOT,
    357  1.25      fvdl 	NFSERR_STALE,
    358  1.25      fvdl 	NFSERR_BADHANDLE,
    359  1.25      fvdl 	NFSERR_NOTSUPP,
    360  1.25      fvdl 	NFSERR_SERVERFAULT,
    361  1.25      fvdl 	NFSERR_BADTYPE,
    362  1.25      fvdl 	0,
    363  1.25      fvdl };
    364  1.25      fvdl 
    365  1.25      fvdl static short nfsv3err_remove[] = {
    366  1.25      fvdl 	NFSERR_IO,
    367  1.25      fvdl 	NFSERR_NOENT,
    368  1.25      fvdl 	NFSERR_IO,
    369  1.25      fvdl 	NFSERR_ACCES,
    370  1.25      fvdl 	NFSERR_NOTDIR,
    371  1.25      fvdl 	NFSERR_ROFS,
    372  1.25      fvdl 	NFSERR_NAMETOL,
    373  1.25      fvdl 	NFSERR_STALE,
    374  1.25      fvdl 	NFSERR_BADHANDLE,
    375  1.25      fvdl 	NFSERR_SERVERFAULT,
    376  1.25      fvdl 	0,
    377  1.25      fvdl };
    378  1.25      fvdl 
    379  1.25      fvdl static short nfsv3err_rmdir[] = {
    380  1.25      fvdl 	NFSERR_IO,
    381  1.25      fvdl 	NFSERR_NOENT,
    382  1.25      fvdl 	NFSERR_IO,
    383  1.25      fvdl 	NFSERR_ACCES,
    384  1.25      fvdl 	NFSERR_EXIST,
    385  1.25      fvdl 	NFSERR_NOTDIR,
    386  1.25      fvdl 	NFSERR_INVAL,
    387  1.25      fvdl 	NFSERR_ROFS,
    388  1.25      fvdl 	NFSERR_NAMETOL,
    389  1.25      fvdl 	NFSERR_NOTEMPTY,
    390  1.25      fvdl 	NFSERR_STALE,
    391  1.25      fvdl 	NFSERR_BADHANDLE,
    392  1.25      fvdl 	NFSERR_NOTSUPP,
    393  1.25      fvdl 	NFSERR_SERVERFAULT,
    394  1.25      fvdl 	0,
    395  1.25      fvdl };
    396  1.25      fvdl 
    397  1.25      fvdl static short nfsv3err_rename[] = {
    398  1.25      fvdl 	NFSERR_IO,
    399  1.25      fvdl 	NFSERR_NOENT,
    400  1.25      fvdl 	NFSERR_IO,
    401  1.25      fvdl 	NFSERR_ACCES,
    402  1.25      fvdl 	NFSERR_EXIST,
    403  1.25      fvdl 	NFSERR_XDEV,
    404  1.25      fvdl 	NFSERR_NOTDIR,
    405  1.25      fvdl 	NFSERR_ISDIR,
    406  1.25      fvdl 	NFSERR_INVAL,
    407  1.25      fvdl 	NFSERR_NOSPC,
    408  1.25      fvdl 	NFSERR_ROFS,
    409  1.25      fvdl 	NFSERR_MLINK,
    410  1.25      fvdl 	NFSERR_NAMETOL,
    411  1.25      fvdl 	NFSERR_NOTEMPTY,
    412  1.25      fvdl 	NFSERR_DQUOT,
    413  1.25      fvdl 	NFSERR_STALE,
    414  1.25      fvdl 	NFSERR_BADHANDLE,
    415  1.25      fvdl 	NFSERR_NOTSUPP,
    416  1.25      fvdl 	NFSERR_SERVERFAULT,
    417  1.25      fvdl 	0,
    418  1.25      fvdl };
    419  1.25      fvdl 
    420  1.25      fvdl static short nfsv3err_link[] = {
    421  1.25      fvdl 	NFSERR_IO,
    422  1.25      fvdl 	NFSERR_IO,
    423  1.25      fvdl 	NFSERR_ACCES,
    424  1.25      fvdl 	NFSERR_EXIST,
    425  1.25      fvdl 	NFSERR_XDEV,
    426  1.25      fvdl 	NFSERR_NOTDIR,
    427  1.25      fvdl 	NFSERR_INVAL,
    428  1.25      fvdl 	NFSERR_NOSPC,
    429  1.25      fvdl 	NFSERR_ROFS,
    430  1.25      fvdl 	NFSERR_MLINK,
    431  1.25      fvdl 	NFSERR_NAMETOL,
    432  1.25      fvdl 	NFSERR_DQUOT,
    433  1.25      fvdl 	NFSERR_STALE,
    434  1.25      fvdl 	NFSERR_BADHANDLE,
    435  1.25      fvdl 	NFSERR_NOTSUPP,
    436  1.25      fvdl 	NFSERR_SERVERFAULT,
    437  1.25      fvdl 	0,
    438  1.25      fvdl };
    439  1.25      fvdl 
    440  1.25      fvdl static short nfsv3err_readdir[] = {
    441  1.25      fvdl 	NFSERR_IO,
    442  1.25      fvdl 	NFSERR_IO,
    443  1.25      fvdl 	NFSERR_ACCES,
    444  1.25      fvdl 	NFSERR_NOTDIR,
    445  1.25      fvdl 	NFSERR_STALE,
    446  1.25      fvdl 	NFSERR_BADHANDLE,
    447  1.25      fvdl 	NFSERR_BAD_COOKIE,
    448  1.25      fvdl 	NFSERR_TOOSMALL,
    449  1.25      fvdl 	NFSERR_SERVERFAULT,
    450  1.25      fvdl 	0,
    451  1.25      fvdl };
    452  1.25      fvdl 
    453  1.25      fvdl static short nfsv3err_readdirplus[] = {
    454  1.25      fvdl 	NFSERR_IO,
    455  1.25      fvdl 	NFSERR_IO,
    456  1.25      fvdl 	NFSERR_ACCES,
    457  1.25      fvdl 	NFSERR_NOTDIR,
    458  1.25      fvdl 	NFSERR_STALE,
    459  1.25      fvdl 	NFSERR_BADHANDLE,
    460  1.25      fvdl 	NFSERR_BAD_COOKIE,
    461  1.25      fvdl 	NFSERR_NOTSUPP,
    462  1.25      fvdl 	NFSERR_TOOSMALL,
    463  1.25      fvdl 	NFSERR_SERVERFAULT,
    464  1.25      fvdl 	0,
    465  1.25      fvdl };
    466  1.25      fvdl 
    467  1.25      fvdl static short nfsv3err_fsstat[] = {
    468  1.25      fvdl 	NFSERR_IO,
    469  1.25      fvdl 	NFSERR_IO,
    470  1.25      fvdl 	NFSERR_STALE,
    471  1.25      fvdl 	NFSERR_BADHANDLE,
    472  1.25      fvdl 	NFSERR_SERVERFAULT,
    473  1.25      fvdl 	0,
    474  1.25      fvdl };
    475  1.25      fvdl 
    476  1.25      fvdl static short nfsv3err_fsinfo[] = {
    477  1.25      fvdl 	NFSERR_STALE,
    478  1.25      fvdl 	NFSERR_STALE,
    479  1.25      fvdl 	NFSERR_BADHANDLE,
    480  1.25      fvdl 	NFSERR_SERVERFAULT,
    481  1.25      fvdl 	0,
    482  1.25      fvdl };
    483  1.25      fvdl 
    484  1.25      fvdl static short nfsv3err_pathconf[] = {
    485  1.25      fvdl 	NFSERR_STALE,
    486  1.25      fvdl 	NFSERR_STALE,
    487  1.25      fvdl 	NFSERR_BADHANDLE,
    488  1.25      fvdl 	NFSERR_SERVERFAULT,
    489  1.25      fvdl 	0,
    490  1.25      fvdl };
    491  1.25      fvdl 
    492  1.25      fvdl static short nfsv3err_commit[] = {
    493  1.25      fvdl 	NFSERR_IO,
    494  1.25      fvdl 	NFSERR_IO,
    495  1.25      fvdl 	NFSERR_STALE,
    496  1.25      fvdl 	NFSERR_BADHANDLE,
    497  1.25      fvdl 	NFSERR_SERVERFAULT,
    498  1.25      fvdl 	0,
    499  1.25      fvdl };
    500  1.25      fvdl 
    501  1.25      fvdl static short *nfsrv_v3errmap[] = {
    502  1.25      fvdl 	nfsv3err_null,
    503  1.25      fvdl 	nfsv3err_getattr,
    504  1.25      fvdl 	nfsv3err_setattr,
    505  1.25      fvdl 	nfsv3err_lookup,
    506  1.25      fvdl 	nfsv3err_access,
    507  1.25      fvdl 	nfsv3err_readlink,
    508  1.25      fvdl 	nfsv3err_read,
    509  1.25      fvdl 	nfsv3err_write,
    510  1.25      fvdl 	nfsv3err_create,
    511  1.25      fvdl 	nfsv3err_mkdir,
    512  1.25      fvdl 	nfsv3err_symlink,
    513  1.25      fvdl 	nfsv3err_mknod,
    514  1.25      fvdl 	nfsv3err_remove,
    515  1.25      fvdl 	nfsv3err_rmdir,
    516  1.25      fvdl 	nfsv3err_rename,
    517  1.25      fvdl 	nfsv3err_link,
    518  1.25      fvdl 	nfsv3err_readdir,
    519  1.25      fvdl 	nfsv3err_readdirplus,
    520  1.25      fvdl 	nfsv3err_fsstat,
    521  1.25      fvdl 	nfsv3err_fsinfo,
    522  1.25      fvdl 	nfsv3err_pathconf,
    523  1.25      fvdl 	nfsv3err_commit,
    524  1.25      fvdl };
    525  1.25      fvdl 
    526  1.12   mycroft extern struct nfsrtt nfsrtt;
    527  1.12   mycroft extern time_t nqnfsstarttime;
    528  1.12   mycroft extern int nqsrv_clockskew;
    529  1.12   mycroft extern int nqsrv_writeslack;
    530  1.12   mycroft extern int nqsrv_maxlease;
    531  1.25      fvdl extern int nqnfs_piggy[NFS_NPROCS];
    532  1.25      fvdl extern nfstype nfsv2_type[9];
    533  1.25      fvdl extern nfstype nfsv3_type[9];
    534  1.25      fvdl extern struct nfsnodehashhead *nfsnodehashtbl;
    535  1.25      fvdl extern u_long nfsnodehash;
    536   1.1       cgd 
    537  1.18   mycroft LIST_HEAD(nfsnodehashhead, nfsnode);
    538  1.18   mycroft 
    539   1.1       cgd /*
    540   1.1       cgd  * Create the header for an rpc request packet
    541   1.1       cgd  * The hsiz is the size of the rest of the nfs request header.
    542   1.1       cgd  * (just used to decide if a cluster is a good idea)
    543   1.1       cgd  */
    544  1.12   mycroft struct mbuf *
    545  1.12   mycroft nfsm_reqh(vp, procid, hsiz, bposp)
    546  1.12   mycroft 	struct vnode *vp;
    547   1.1       cgd 	u_long procid;
    548   1.1       cgd 	int hsiz;
    549  1.12   mycroft 	caddr_t *bposp;
    550  1.12   mycroft {
    551  1.12   mycroft 	register struct mbuf *mb;
    552  1.22       cgd 	register u_int32_t *tl;
    553  1.12   mycroft 	register caddr_t bpos;
    554  1.12   mycroft 	struct mbuf *mb2;
    555  1.12   mycroft 	struct nfsmount *nmp;
    556  1.12   mycroft 	int nqflag;
    557  1.12   mycroft 
    558  1.12   mycroft 	MGET(mb, M_WAIT, MT_DATA);
    559  1.12   mycroft 	if (hsiz >= MINCLSIZE)
    560  1.12   mycroft 		MCLGET(mb, M_WAIT);
    561  1.12   mycroft 	mb->m_len = 0;
    562  1.12   mycroft 	bpos = mtod(mb, caddr_t);
    563  1.12   mycroft 
    564  1.12   mycroft 	/*
    565  1.12   mycroft 	 * For NQNFS, add lease request.
    566  1.12   mycroft 	 */
    567  1.12   mycroft 	if (vp) {
    568  1.12   mycroft 		nmp = VFSTONFS(vp->v_mount);
    569  1.12   mycroft 		if (nmp->nm_flag & NFSMNT_NQNFS) {
    570  1.12   mycroft 			nqflag = NQNFS_NEEDLEASE(vp, procid);
    571  1.12   mycroft 			if (nqflag) {
    572  1.22       cgd 				nfsm_build(tl, u_int32_t *, 2*NFSX_UNSIGNED);
    573  1.12   mycroft 				*tl++ = txdr_unsigned(nqflag);
    574  1.12   mycroft 				*tl = txdr_unsigned(nmp->nm_leaseterm);
    575  1.12   mycroft 			} else {
    576  1.22       cgd 				nfsm_build(tl, u_int32_t *, NFSX_UNSIGNED);
    577  1.12   mycroft 				*tl = 0;
    578  1.12   mycroft 			}
    579  1.12   mycroft 		}
    580  1.12   mycroft 	}
    581  1.12   mycroft 	/* Finally, return values */
    582  1.12   mycroft 	*bposp = bpos;
    583  1.12   mycroft 	return (mb);
    584  1.12   mycroft }
    585  1.12   mycroft 
    586  1.12   mycroft /*
    587  1.12   mycroft  * Build the RPC header and fill in the authorization info.
    588  1.12   mycroft  * The authorization string argument is only used when the credentials
    589  1.12   mycroft  * come from outside of the kernel.
    590  1.12   mycroft  * Returns the head of the mbuf list.
    591  1.12   mycroft  */
    592  1.12   mycroft struct mbuf *
    593  1.25      fvdl nfsm_rpchead(cr, nmflag, procid, auth_type, auth_len, auth_str, verf_len,
    594  1.25      fvdl 	verf_str, mrest, mrest_len, mbp, xidp)
    595  1.12   mycroft 	register struct ucred *cr;
    596  1.25      fvdl 	int nmflag;
    597  1.12   mycroft 	int procid;
    598  1.12   mycroft 	int auth_type;
    599  1.12   mycroft 	int auth_len;
    600  1.12   mycroft 	char *auth_str;
    601  1.25      fvdl 	int verf_len;
    602  1.25      fvdl 	char *verf_str;
    603  1.12   mycroft 	struct mbuf *mrest;
    604  1.12   mycroft 	int mrest_len;
    605  1.12   mycroft 	struct mbuf **mbp;
    606  1.22       cgd 	u_int32_t *xidp;
    607   1.1       cgd {
    608  1.12   mycroft 	register struct mbuf *mb;
    609  1.22       cgd 	register u_int32_t *tl;
    610  1.12   mycroft 	register caddr_t bpos;
    611  1.12   mycroft 	register int i;
    612  1.12   mycroft 	struct mbuf *mreq, *mb2;
    613  1.12   mycroft 	int siz, grpsiz, authsiz;
    614  1.30      fvdl 	struct timeval tv;
    615  1.30      fvdl 	static u_int32_t base;
    616   1.1       cgd 
    617  1.12   mycroft 	authsiz = nfsm_rndup(auth_len);
    618  1.12   mycroft 	MGETHDR(mb, M_WAIT, MT_DATA);
    619  1.25      fvdl 	if ((authsiz + 10 * NFSX_UNSIGNED) >= MINCLSIZE) {
    620  1.12   mycroft 		MCLGET(mb, M_WAIT);
    621  1.25      fvdl 	} else if ((authsiz + 10 * NFSX_UNSIGNED) < MHLEN) {
    622  1.25      fvdl 		MH_ALIGN(mb, authsiz + 10 * NFSX_UNSIGNED);
    623  1.12   mycroft 	} else {
    624  1.25      fvdl 		MH_ALIGN(mb, 8 * NFSX_UNSIGNED);
    625   1.1       cgd 	}
    626  1.12   mycroft 	mb->m_len = 0;
    627  1.12   mycroft 	mreq = mb;
    628  1.12   mycroft 	bpos = mtod(mb, caddr_t);
    629  1.12   mycroft 
    630  1.12   mycroft 	/*
    631  1.12   mycroft 	 * First the RPC header.
    632  1.12   mycroft 	 */
    633  1.25      fvdl 	nfsm_build(tl, u_int32_t *, 8 * NFSX_UNSIGNED);
    634  1.30      fvdl 
    635  1.30      fvdl 	/*
    636  1.30      fvdl 	 * derive initial xid from system time
    637  1.30      fvdl 	 * XXX time is invalid if root not yet mounted
    638  1.30      fvdl 	 */
    639  1.30      fvdl 	if (!base && (rootvp)) {
    640  1.30      fvdl 		microtime(&tv);
    641  1.30      fvdl 		base = tv.tv_sec << 12;
    642  1.30      fvdl 		nfs_xid = base;
    643  1.30      fvdl 	}
    644  1.30      fvdl 	/*
    645  1.30      fvdl 	 * Skip zero xid if it should ever happen.
    646  1.30      fvdl 	 */
    647  1.12   mycroft 	if (++nfs_xid == 0)
    648  1.12   mycroft 		nfs_xid++;
    649  1.30      fvdl 
    650  1.12   mycroft 	*tl++ = *xidp = txdr_unsigned(nfs_xid);
    651   1.1       cgd 	*tl++ = rpc_call;
    652   1.1       cgd 	*tl++ = rpc_vers;
    653  1.25      fvdl 	if (nmflag & NFSMNT_NQNFS) {
    654  1.12   mycroft 		*tl++ = txdr_unsigned(NQNFS_PROG);
    655  1.25      fvdl 		*tl++ = txdr_unsigned(NQNFS_VER3);
    656   1.1       cgd 	} else {
    657  1.12   mycroft 		*tl++ = txdr_unsigned(NFS_PROG);
    658  1.25      fvdl 		if (nmflag & NFSMNT_NFSV3)
    659  1.25      fvdl 			*tl++ = txdr_unsigned(NFS_VER3);
    660  1.25      fvdl 		else
    661  1.25      fvdl 			*tl++ = txdr_unsigned(NFS_VER2);
    662   1.1       cgd 	}
    663  1.25      fvdl 	if (nmflag & NFSMNT_NFSV3)
    664  1.25      fvdl 		*tl++ = txdr_unsigned(procid);
    665  1.25      fvdl 	else
    666  1.25      fvdl 		*tl++ = txdr_unsigned(nfsv2_procid[procid]);
    667  1.12   mycroft 
    668  1.12   mycroft 	/*
    669  1.12   mycroft 	 * And then the authorization cred.
    670  1.12   mycroft 	 */
    671  1.12   mycroft 	*tl++ = txdr_unsigned(auth_type);
    672  1.12   mycroft 	*tl = txdr_unsigned(authsiz);
    673  1.12   mycroft 	switch (auth_type) {
    674  1.12   mycroft 	case RPCAUTH_UNIX:
    675  1.22       cgd 		nfsm_build(tl, u_int32_t *, auth_len);
    676  1.12   mycroft 		*tl++ = 0;		/* stamp ?? */
    677  1.12   mycroft 		*tl++ = 0;		/* NULL hostname */
    678  1.12   mycroft 		*tl++ = txdr_unsigned(cr->cr_uid);
    679  1.19       jtc 		*tl++ = txdr_unsigned(cr->cr_gid);
    680  1.12   mycroft 		grpsiz = (auth_len >> 2) - 5;
    681  1.12   mycroft 		*tl++ = txdr_unsigned(grpsiz);
    682  1.20   mycroft 		for (i = 0; i < grpsiz; i++)
    683  1.12   mycroft 			*tl++ = txdr_unsigned(cr->cr_groups[i]);
    684  1.12   mycroft 		break;
    685  1.25      fvdl 	case RPCAUTH_KERB4:
    686  1.12   mycroft 		siz = auth_len;
    687  1.12   mycroft 		while (siz > 0) {
    688  1.12   mycroft 			if (M_TRAILINGSPACE(mb) == 0) {
    689  1.12   mycroft 				MGET(mb2, M_WAIT, MT_DATA);
    690  1.12   mycroft 				if (siz >= MINCLSIZE)
    691  1.12   mycroft 					MCLGET(mb2, M_WAIT);
    692  1.12   mycroft 				mb->m_next = mb2;
    693  1.12   mycroft 				mb = mb2;
    694  1.12   mycroft 				mb->m_len = 0;
    695  1.12   mycroft 				bpos = mtod(mb, caddr_t);
    696  1.12   mycroft 			}
    697  1.12   mycroft 			i = min(siz, M_TRAILINGSPACE(mb));
    698  1.12   mycroft 			bcopy(auth_str, bpos, i);
    699  1.12   mycroft 			mb->m_len += i;
    700  1.12   mycroft 			auth_str += i;
    701  1.12   mycroft 			bpos += i;
    702  1.12   mycroft 			siz -= i;
    703  1.12   mycroft 		}
    704  1.12   mycroft 		if ((siz = (nfsm_rndup(auth_len) - auth_len)) > 0) {
    705  1.12   mycroft 			for (i = 0; i < siz; i++)
    706  1.12   mycroft 				*bpos++ = '\0';
    707  1.12   mycroft 			mb->m_len += siz;
    708  1.12   mycroft 		}
    709  1.12   mycroft 		break;
    710  1.12   mycroft 	};
    711  1.25      fvdl 
    712  1.25      fvdl 	/*
    713  1.25      fvdl 	 * And the verifier...
    714  1.25      fvdl 	 */
    715  1.25      fvdl 	nfsm_build(tl, u_int32_t *, 2 * NFSX_UNSIGNED);
    716  1.25      fvdl 	if (verf_str) {
    717  1.25      fvdl 		*tl++ = txdr_unsigned(RPCAUTH_KERB4);
    718  1.25      fvdl 		*tl = txdr_unsigned(verf_len);
    719  1.25      fvdl 		siz = verf_len;
    720  1.25      fvdl 		while (siz > 0) {
    721  1.25      fvdl 			if (M_TRAILINGSPACE(mb) == 0) {
    722  1.25      fvdl 				MGET(mb2, M_WAIT, MT_DATA);
    723  1.25      fvdl 				if (siz >= MINCLSIZE)
    724  1.25      fvdl 					MCLGET(mb2, M_WAIT);
    725  1.25      fvdl 				mb->m_next = mb2;
    726  1.25      fvdl 				mb = mb2;
    727  1.25      fvdl 				mb->m_len = 0;
    728  1.25      fvdl 				bpos = mtod(mb, caddr_t);
    729  1.25      fvdl 			}
    730  1.25      fvdl 			i = min(siz, M_TRAILINGSPACE(mb));
    731  1.25      fvdl 			bcopy(verf_str, bpos, i);
    732  1.25      fvdl 			mb->m_len += i;
    733  1.25      fvdl 			verf_str += i;
    734  1.25      fvdl 			bpos += i;
    735  1.25      fvdl 			siz -= i;
    736  1.25      fvdl 		}
    737  1.25      fvdl 		if ((siz = (nfsm_rndup(verf_len) - verf_len)) > 0) {
    738  1.25      fvdl 			for (i = 0; i < siz; i++)
    739  1.25      fvdl 				*bpos++ = '\0';
    740  1.25      fvdl 			mb->m_len += siz;
    741  1.25      fvdl 		}
    742  1.25      fvdl 	} else {
    743  1.25      fvdl 		*tl++ = txdr_unsigned(RPCAUTH_NULL);
    744  1.25      fvdl 		*tl = 0;
    745  1.25      fvdl 	}
    746  1.12   mycroft 	mb->m_next = mrest;
    747  1.25      fvdl 	mreq->m_pkthdr.len = authsiz + 10 * NFSX_UNSIGNED + mrest_len;
    748  1.12   mycroft 	mreq->m_pkthdr.rcvif = (struct ifnet *)0;
    749  1.12   mycroft 	*mbp = mb;
    750   1.1       cgd 	return (mreq);
    751   1.1       cgd }
    752   1.1       cgd 
    753   1.1       cgd /*
    754   1.1       cgd  * copies mbuf chain to the uio scatter/gather list
    755   1.1       cgd  */
    756  1.24  christos int
    757   1.1       cgd nfsm_mbuftouio(mrep, uiop, siz, dpos)
    758   1.1       cgd 	struct mbuf **mrep;
    759   1.1       cgd 	register struct uio *uiop;
    760   1.1       cgd 	int siz;
    761   1.1       cgd 	caddr_t *dpos;
    762   1.1       cgd {
    763   1.1       cgd 	register char *mbufcp, *uiocp;
    764   1.1       cgd 	register int xfer, left, len;
    765   1.1       cgd 	register struct mbuf *mp;
    766   1.1       cgd 	long uiosiz, rem;
    767   1.1       cgd 	int error = 0;
    768   1.1       cgd 
    769   1.1       cgd 	mp = *mrep;
    770   1.1       cgd 	mbufcp = *dpos;
    771   1.1       cgd 	len = mtod(mp, caddr_t)+mp->m_len-mbufcp;
    772   1.1       cgd 	rem = nfsm_rndup(siz)-siz;
    773   1.1       cgd 	while (siz > 0) {
    774   1.1       cgd 		if (uiop->uio_iovcnt <= 0 || uiop->uio_iov == NULL)
    775   1.1       cgd 			return (EFBIG);
    776   1.1       cgd 		left = uiop->uio_iov->iov_len;
    777   1.1       cgd 		uiocp = uiop->uio_iov->iov_base;
    778   1.1       cgd 		if (left > siz)
    779   1.1       cgd 			left = siz;
    780   1.1       cgd 		uiosiz = left;
    781   1.1       cgd 		while (left > 0) {
    782   1.1       cgd 			while (len == 0) {
    783   1.1       cgd 				mp = mp->m_next;
    784   1.1       cgd 				if (mp == NULL)
    785   1.1       cgd 					return (EBADRPC);
    786   1.1       cgd 				mbufcp = mtod(mp, caddr_t);
    787   1.1       cgd 				len = mp->m_len;
    788   1.1       cgd 			}
    789   1.1       cgd 			xfer = (left > len) ? len : left;
    790   1.1       cgd #ifdef notdef
    791   1.1       cgd 			/* Not Yet.. */
    792   1.1       cgd 			if (uiop->uio_iov->iov_op != NULL)
    793   1.1       cgd 				(*(uiop->uio_iov->iov_op))
    794   1.1       cgd 				(mbufcp, uiocp, xfer);
    795   1.1       cgd 			else
    796   1.1       cgd #endif
    797   1.1       cgd 			if (uiop->uio_segflg == UIO_SYSSPACE)
    798   1.1       cgd 				bcopy(mbufcp, uiocp, xfer);
    799   1.1       cgd 			else
    800   1.1       cgd 				copyout(mbufcp, uiocp, xfer);
    801   1.1       cgd 			left -= xfer;
    802   1.1       cgd 			len -= xfer;
    803   1.1       cgd 			mbufcp += xfer;
    804   1.1       cgd 			uiocp += xfer;
    805   1.1       cgd 			uiop->uio_offset += xfer;
    806   1.1       cgd 			uiop->uio_resid -= xfer;
    807   1.1       cgd 		}
    808   1.1       cgd 		if (uiop->uio_iov->iov_len <= siz) {
    809   1.1       cgd 			uiop->uio_iovcnt--;
    810   1.1       cgd 			uiop->uio_iov++;
    811   1.1       cgd 		} else {
    812   1.1       cgd 			uiop->uio_iov->iov_base += uiosiz;
    813   1.1       cgd 			uiop->uio_iov->iov_len -= uiosiz;
    814   1.1       cgd 		}
    815   1.1       cgd 		siz -= uiosiz;
    816   1.1       cgd 	}
    817   1.1       cgd 	*dpos = mbufcp;
    818   1.1       cgd 	*mrep = mp;
    819   1.1       cgd 	if (rem > 0) {
    820   1.1       cgd 		if (len < rem)
    821   1.1       cgd 			error = nfs_adv(mrep, dpos, rem, len);
    822   1.1       cgd 		else
    823   1.1       cgd 			*dpos += rem;
    824   1.1       cgd 	}
    825   1.1       cgd 	return (error);
    826   1.1       cgd }
    827   1.1       cgd 
    828   1.1       cgd /*
    829  1.29      fvdl  * copies a uio scatter/gather list to an mbuf chain.
    830  1.29      fvdl  * NOTE: can ony handle iovcnt == 1
    831   1.1       cgd  */
    832  1.24  christos int
    833   1.1       cgd nfsm_uiotombuf(uiop, mq, siz, bpos)
    834   1.1       cgd 	register struct uio *uiop;
    835   1.1       cgd 	struct mbuf **mq;
    836   1.1       cgd 	int siz;
    837   1.1       cgd 	caddr_t *bpos;
    838   1.1       cgd {
    839   1.1       cgd 	register char *uiocp;
    840   1.1       cgd 	register struct mbuf *mp, *mp2;
    841  1.12   mycroft 	register int xfer, left, mlen;
    842   1.1       cgd 	int uiosiz, clflg, rem;
    843   1.1       cgd 	char *cp;
    844   1.1       cgd 
    845  1.29      fvdl #ifdef DIAGNOSTIC
    846  1.29      fvdl 	if (uiop->uio_iovcnt != 1)
    847  1.29      fvdl 		panic("nfsm_uiotombuf: iovcnt != 1");
    848  1.29      fvdl #endif
    849  1.29      fvdl 
    850   1.1       cgd 	if (siz > MLEN)		/* or should it >= MCLBYTES ?? */
    851   1.1       cgd 		clflg = 1;
    852   1.1       cgd 	else
    853   1.1       cgd 		clflg = 0;
    854   1.1       cgd 	rem = nfsm_rndup(siz)-siz;
    855  1.12   mycroft 	mp = mp2 = *mq;
    856   1.1       cgd 	while (siz > 0) {
    857   1.1       cgd 		left = uiop->uio_iov->iov_len;
    858   1.1       cgd 		uiocp = uiop->uio_iov->iov_base;
    859   1.1       cgd 		if (left > siz)
    860   1.1       cgd 			left = siz;
    861   1.1       cgd 		uiosiz = left;
    862   1.1       cgd 		while (left > 0) {
    863  1.12   mycroft 			mlen = M_TRAILINGSPACE(mp);
    864  1.12   mycroft 			if (mlen == 0) {
    865  1.12   mycroft 				MGET(mp, M_WAIT, MT_DATA);
    866  1.12   mycroft 				if (clflg)
    867  1.12   mycroft 					MCLGET(mp, M_WAIT);
    868  1.12   mycroft 				mp->m_len = 0;
    869  1.12   mycroft 				mp2->m_next = mp;
    870  1.12   mycroft 				mp2 = mp;
    871  1.12   mycroft 				mlen = M_TRAILINGSPACE(mp);
    872  1.12   mycroft 			}
    873  1.12   mycroft 			xfer = (left > mlen) ? mlen : left;
    874   1.1       cgd #ifdef notdef
    875   1.1       cgd 			/* Not Yet.. */
    876   1.1       cgd 			if (uiop->uio_iov->iov_op != NULL)
    877   1.1       cgd 				(*(uiop->uio_iov->iov_op))
    878  1.12   mycroft 				(uiocp, mtod(mp, caddr_t)+mp->m_len, xfer);
    879   1.1       cgd 			else
    880   1.1       cgd #endif
    881   1.1       cgd 			if (uiop->uio_segflg == UIO_SYSSPACE)
    882  1.12   mycroft 				bcopy(uiocp, mtod(mp, caddr_t)+mp->m_len, xfer);
    883   1.1       cgd 			else
    884  1.12   mycroft 				copyin(uiocp, mtod(mp, caddr_t)+mp->m_len, xfer);
    885  1.12   mycroft 			mp->m_len += xfer;
    886   1.1       cgd 			left -= xfer;
    887   1.1       cgd 			uiocp += xfer;
    888   1.1       cgd 			uiop->uio_offset += xfer;
    889   1.1       cgd 			uiop->uio_resid -= xfer;
    890   1.1       cgd 		}
    891  1.29      fvdl 		uiop->uio_iov->iov_base += uiosiz;
    892  1.29      fvdl 		uiop->uio_iov->iov_len -= uiosiz;
    893   1.1       cgd 		siz -= uiosiz;
    894   1.1       cgd 	}
    895   1.1       cgd 	if (rem > 0) {
    896  1.12   mycroft 		if (rem > M_TRAILINGSPACE(mp)) {
    897   1.1       cgd 			MGET(mp, M_WAIT, MT_DATA);
    898   1.1       cgd 			mp->m_len = 0;
    899   1.1       cgd 			mp2->m_next = mp;
    900   1.1       cgd 		}
    901   1.1       cgd 		cp = mtod(mp, caddr_t)+mp->m_len;
    902   1.1       cgd 		for (left = 0; left < rem; left++)
    903   1.1       cgd 			*cp++ = '\0';
    904   1.1       cgd 		mp->m_len += rem;
    905   1.1       cgd 		*bpos = cp;
    906   1.1       cgd 	} else
    907   1.1       cgd 		*bpos = mtod(mp, caddr_t)+mp->m_len;
    908   1.1       cgd 	*mq = mp;
    909   1.1       cgd 	return (0);
    910   1.1       cgd }
    911   1.1       cgd 
    912   1.1       cgd /*
    913   1.1       cgd  * Help break down an mbuf chain by setting the first siz bytes contiguous
    914   1.1       cgd  * pointed to by returned val.
    915  1.12   mycroft  * This is used by the macros nfsm_dissect and nfsm_dissecton for tough
    916   1.1       cgd  * cases. (The macros use the vars. dpos and dpos2)
    917   1.1       cgd  */
    918  1.24  christos int
    919  1.12   mycroft nfsm_disct(mdp, dposp, siz, left, cp2)
    920   1.1       cgd 	struct mbuf **mdp;
    921   1.1       cgd 	caddr_t *dposp;
    922   1.1       cgd 	int siz;
    923   1.1       cgd 	int left;
    924   1.1       cgd 	caddr_t *cp2;
    925   1.1       cgd {
    926   1.1       cgd 	register struct mbuf *mp, *mp2;
    927   1.1       cgd 	register int siz2, xfer;
    928  1.12   mycroft 	register caddr_t p;
    929   1.1       cgd 
    930   1.1       cgd 	mp = *mdp;
    931   1.1       cgd 	while (left == 0) {
    932   1.1       cgd 		*mdp = mp = mp->m_next;
    933   1.1       cgd 		if (mp == NULL)
    934   1.1       cgd 			return (EBADRPC);
    935   1.1       cgd 		left = mp->m_len;
    936   1.1       cgd 		*dposp = mtod(mp, caddr_t);
    937   1.1       cgd 	}
    938   1.1       cgd 	if (left >= siz) {
    939   1.1       cgd 		*cp2 = *dposp;
    940   1.1       cgd 		*dposp += siz;
    941   1.1       cgd 	} else if (mp->m_next == NULL) {
    942   1.1       cgd 		return (EBADRPC);
    943   1.1       cgd 	} else if (siz > MHLEN) {
    944   1.1       cgd 		panic("nfs S too big");
    945   1.1       cgd 	} else {
    946  1.12   mycroft 		MGET(mp2, M_WAIT, MT_DATA);
    947  1.12   mycroft 		mp2->m_next = mp->m_next;
    948  1.12   mycroft 		mp->m_next = mp2;
    949  1.12   mycroft 		mp->m_len -= left;
    950  1.12   mycroft 		mp = mp2;
    951  1.12   mycroft 		*cp2 = p = mtod(mp, caddr_t);
    952  1.12   mycroft 		bcopy(*dposp, p, left);		/* Copy what was left */
    953   1.1       cgd 		siz2 = siz-left;
    954  1.12   mycroft 		p += left;
    955   1.1       cgd 		mp2 = mp->m_next;
    956   1.1       cgd 		/* Loop around copying up the siz2 bytes */
    957   1.1       cgd 		while (siz2 > 0) {
    958   1.1       cgd 			if (mp2 == NULL)
    959   1.1       cgd 				return (EBADRPC);
    960   1.1       cgd 			xfer = (siz2 > mp2->m_len) ? mp2->m_len : siz2;
    961   1.1       cgd 			if (xfer > 0) {
    962  1.12   mycroft 				bcopy(mtod(mp2, caddr_t), p, xfer);
    963   1.1       cgd 				NFSMADV(mp2, xfer);
    964   1.1       cgd 				mp2->m_len -= xfer;
    965  1.12   mycroft 				p += xfer;
    966   1.1       cgd 				siz2 -= xfer;
    967   1.1       cgd 			}
    968   1.1       cgd 			if (siz2 > 0)
    969   1.1       cgd 				mp2 = mp2->m_next;
    970   1.1       cgd 		}
    971   1.1       cgd 		mp->m_len = siz;
    972   1.1       cgd 		*mdp = mp2;
    973   1.1       cgd 		*dposp = mtod(mp2, caddr_t);
    974   1.1       cgd 	}
    975   1.1       cgd 	return (0);
    976   1.1       cgd }
    977   1.1       cgd 
    978   1.1       cgd /*
    979   1.1       cgd  * Advance the position in the mbuf chain.
    980   1.1       cgd  */
    981  1.24  christos int
    982   1.1       cgd nfs_adv(mdp, dposp, offs, left)
    983   1.1       cgd 	struct mbuf **mdp;
    984   1.1       cgd 	caddr_t *dposp;
    985   1.1       cgd 	int offs;
    986   1.1       cgd 	int left;
    987   1.1       cgd {
    988   1.1       cgd 	register struct mbuf *m;
    989   1.1       cgd 	register int s;
    990   1.1       cgd 
    991   1.1       cgd 	m = *mdp;
    992   1.1       cgd 	s = left;
    993   1.1       cgd 	while (s < offs) {
    994   1.1       cgd 		offs -= s;
    995   1.1       cgd 		m = m->m_next;
    996   1.1       cgd 		if (m == NULL)
    997   1.1       cgd 			return (EBADRPC);
    998   1.1       cgd 		s = m->m_len;
    999   1.1       cgd 	}
   1000   1.1       cgd 	*mdp = m;
   1001   1.1       cgd 	*dposp = mtod(m, caddr_t)+offs;
   1002   1.1       cgd 	return (0);
   1003   1.1       cgd }
   1004   1.1       cgd 
   1005   1.1       cgd /*
   1006   1.1       cgd  * Copy a string into mbufs for the hard cases...
   1007   1.1       cgd  */
   1008  1.24  christos int
   1009   1.1       cgd nfsm_strtmbuf(mb, bpos, cp, siz)
   1010   1.1       cgd 	struct mbuf **mb;
   1011   1.1       cgd 	char **bpos;
   1012  1.33       cgd 	const char *cp;
   1013   1.1       cgd 	long siz;
   1014   1.1       cgd {
   1015  1.24  christos 	register struct mbuf *m1 = NULL, *m2;
   1016   1.1       cgd 	long left, xfer, len, tlen;
   1017  1.22       cgd 	u_int32_t *tl;
   1018   1.1       cgd 	int putsize;
   1019   1.1       cgd 
   1020   1.1       cgd 	putsize = 1;
   1021   1.1       cgd 	m2 = *mb;
   1022  1.12   mycroft 	left = M_TRAILINGSPACE(m2);
   1023   1.1       cgd 	if (left > 0) {
   1024  1.22       cgd 		tl = ((u_int32_t *)(*bpos));
   1025   1.1       cgd 		*tl++ = txdr_unsigned(siz);
   1026   1.1       cgd 		putsize = 0;
   1027   1.1       cgd 		left -= NFSX_UNSIGNED;
   1028   1.1       cgd 		m2->m_len += NFSX_UNSIGNED;
   1029   1.1       cgd 		if (left > 0) {
   1030   1.1       cgd 			bcopy(cp, (caddr_t) tl, left);
   1031   1.1       cgd 			siz -= left;
   1032   1.1       cgd 			cp += left;
   1033   1.1       cgd 			m2->m_len += left;
   1034   1.1       cgd 			left = 0;
   1035   1.1       cgd 		}
   1036   1.1       cgd 	}
   1037  1.12   mycroft 	/* Loop around adding mbufs */
   1038   1.1       cgd 	while (siz > 0) {
   1039   1.1       cgd 		MGET(m1, M_WAIT, MT_DATA);
   1040   1.1       cgd 		if (siz > MLEN)
   1041   1.1       cgd 			MCLGET(m1, M_WAIT);
   1042   1.1       cgd 		m1->m_len = NFSMSIZ(m1);
   1043   1.1       cgd 		m2->m_next = m1;
   1044   1.1       cgd 		m2 = m1;
   1045  1.22       cgd 		tl = mtod(m1, u_int32_t *);
   1046   1.1       cgd 		tlen = 0;
   1047   1.1       cgd 		if (putsize) {
   1048   1.1       cgd 			*tl++ = txdr_unsigned(siz);
   1049   1.1       cgd 			m1->m_len -= NFSX_UNSIGNED;
   1050   1.1       cgd 			tlen = NFSX_UNSIGNED;
   1051   1.1       cgd 			putsize = 0;
   1052   1.1       cgd 		}
   1053   1.1       cgd 		if (siz < m1->m_len) {
   1054   1.1       cgd 			len = nfsm_rndup(siz);
   1055   1.1       cgd 			xfer = siz;
   1056   1.1       cgd 			if (xfer < len)
   1057   1.1       cgd 				*(tl+(xfer>>2)) = 0;
   1058   1.1       cgd 		} else {
   1059   1.1       cgd 			xfer = len = m1->m_len;
   1060   1.1       cgd 		}
   1061   1.1       cgd 		bcopy(cp, (caddr_t) tl, xfer);
   1062   1.1       cgd 		m1->m_len = len+tlen;
   1063   1.1       cgd 		siz -= xfer;
   1064   1.1       cgd 		cp += xfer;
   1065   1.1       cgd 	}
   1066   1.1       cgd 	*mb = m1;
   1067   1.1       cgd 	*bpos = mtod(m1, caddr_t)+m1->m_len;
   1068   1.1       cgd 	return (0);
   1069   1.1       cgd }
   1070   1.1       cgd 
   1071   1.1       cgd /*
   1072  1.35   thorpej  * Called once before VFS init to initialize shared and
   1073  1.35   thorpej  * server-specific data structures.
   1074   1.1       cgd  */
   1075  1.24  christos void
   1076   1.1       cgd nfs_init()
   1077   1.1       cgd {
   1078   1.1       cgd 
   1079  1.25      fvdl #if !defined(alpha) && defined(DIAGNOSTIC)
   1080  1.25      fvdl 	/*
   1081  1.25      fvdl 	 * Check to see if major data structures haven't bloated.
   1082  1.25      fvdl 	 */
   1083  1.25      fvdl 	if (sizeof (struct nfsnode) > NFS_NODEALLOC) {
   1084  1.32  christos 		printf("struct nfsnode bloated (> %dbytes)\n", NFS_NODEALLOC);
   1085  1.32  christos 		printf("Try reducing NFS_SMALLFH\n");
   1086  1.25      fvdl 	}
   1087  1.25      fvdl 	if (sizeof (struct nfsmount) > NFS_MNTALLOC) {
   1088  1.32  christos 		printf("struct nfsmount bloated (> %dbytes)\n", NFS_MNTALLOC);
   1089  1.32  christos 		printf("Try reducing NFS_MUIDHASHSIZ\n");
   1090  1.25      fvdl 	}
   1091  1.25      fvdl 	if (sizeof (struct nfssvc_sock) > NFS_SVCALLOC) {
   1092  1.32  christos 		printf("struct nfssvc_sock bloated (> %dbytes)\n",NFS_SVCALLOC);
   1093  1.32  christos 		printf("Try reducing NFS_UIDHASHSIZ\n");
   1094  1.25      fvdl 	}
   1095  1.25      fvdl 	if (sizeof (struct nfsuid) > NFS_UIDALLOC) {
   1096  1.32  christos 		printf("struct nfsuid bloated (> %dbytes)\n",NFS_UIDALLOC);
   1097  1.32  christos 		printf("Try unionizing the nu_nickname and nu_flag fields\n");
   1098  1.25      fvdl 	}
   1099  1.25      fvdl #endif
   1100  1.25      fvdl 
   1101  1.12   mycroft 	nfsrtt.pos = 0;
   1102   1.1       cgd 	rpc_vers = txdr_unsigned(RPC_VER2);
   1103   1.1       cgd 	rpc_call = txdr_unsigned(RPC_CALL);
   1104   1.1       cgd 	rpc_reply = txdr_unsigned(RPC_REPLY);
   1105   1.1       cgd 	rpc_msgdenied = txdr_unsigned(RPC_MSGDENIED);
   1106   1.1       cgd 	rpc_msgaccepted = txdr_unsigned(RPC_MSGACCEPTED);
   1107   1.1       cgd 	rpc_mismatch = txdr_unsigned(RPC_MISMATCH);
   1108  1.12   mycroft 	rpc_autherr = txdr_unsigned(RPC_AUTHERR);
   1109   1.1       cgd 	rpc_auth_unix = txdr_unsigned(RPCAUTH_UNIX);
   1110  1.25      fvdl 	rpc_auth_kerb = txdr_unsigned(RPCAUTH_KERB4);
   1111   1.1       cgd 	nfs_prog = txdr_unsigned(NFS_PROG);
   1112  1.25      fvdl 	nqnfs_prog = txdr_unsigned(NQNFS_PROG);
   1113   1.1       cgd 	nfs_true = txdr_unsigned(TRUE);
   1114   1.1       cgd 	nfs_false = txdr_unsigned(FALSE);
   1115  1.12   mycroft 	nfs_xdrneg1 = txdr_unsigned(-1);
   1116  1.25      fvdl 	nfs_ticks = (hz * NFS_TICKINTVL + 500) / 1000;
   1117  1.25      fvdl 	if (nfs_ticks < 1)
   1118  1.25      fvdl 		nfs_ticks = 1;
   1119   1.2     glass #ifdef NFSSERVER
   1120  1.12   mycroft 	nfsrv_init(0);			/* Init server data structures */
   1121   1.1       cgd 	nfsrv_initcache();		/* Init the server request cache */
   1122  1.36      fvdl #endif /* NFSSERVER */
   1123  1.12   mycroft 
   1124  1.12   mycroft 	/*
   1125  1.37      fvdl 	 * Initialize the nqnfs data structures.
   1126  1.12   mycroft 	 */
   1127  1.12   mycroft 	if (nqnfsstarttime == 0) {
   1128  1.12   mycroft 		nqnfsstarttime = boottime.tv_sec + nqsrv_maxlease
   1129  1.12   mycroft 			+ nqsrv_clockskew + nqsrv_writeslack;
   1130  1.12   mycroft 		NQLOADNOVRAM(nqnfsstarttime);
   1131  1.18   mycroft 		CIRCLEQ_INIT(&nqtimerhead);
   1132  1.18   mycroft 		nqfhhashtbl = hashinit(NQLCHSZ, M_NQLEASE, &nqfhhash);
   1133  1.12   mycroft 	}
   1134  1.12   mycroft 
   1135   1.1       cgd 	/*
   1136   1.1       cgd 	 * Initialize reply list and start timer
   1137   1.1       cgd 	 */
   1138  1.16   mycroft 	TAILQ_INIT(&nfs_reqq);
   1139  1.24  christos 	nfs_timer(NULL);
   1140   1.1       cgd }
   1141   1.1       cgd 
   1142  1.12   mycroft #ifdef NFSCLIENT
   1143  1.35   thorpej /*
   1144  1.35   thorpej  * Called once at VFS init to initialize client-specific data structures.
   1145  1.35   thorpej  */
   1146  1.35   thorpej void
   1147  1.35   thorpej nfs_vfs_init()
   1148  1.35   thorpej {
   1149  1.35   thorpej 	register int i;
   1150  1.35   thorpej 
   1151  1.35   thorpej 	/* Ensure async daemons disabled */
   1152  1.35   thorpej 	for (i = 0; i < NFS_MAXASYNCDAEMON; i++) {
   1153  1.35   thorpej 		nfs_iodwant[i] = (struct proc *)0;
   1154  1.35   thorpej 		nfs_iodmount[i] = (struct nfsmount *)0;
   1155  1.35   thorpej 	}
   1156  1.35   thorpej 	nfs_nhinit();			/* Init the nfsnode table */
   1157  1.35   thorpej }
   1158  1.35   thorpej 
   1159   1.1       cgd /*
   1160  1.12   mycroft  * Attribute cache routines.
   1161  1.12   mycroft  * nfs_loadattrcache() - loads or updates the cache contents from attributes
   1162  1.12   mycroft  *	that are on the mbuf list
   1163  1.12   mycroft  * nfs_getattrcache() - returns valid attributes if found in cache, returns
   1164  1.12   mycroft  *	error otherwise
   1165   1.1       cgd  */
   1166  1.12   mycroft 
   1167  1.12   mycroft /*
   1168  1.12   mycroft  * Load the attribute cache (that lives in the nfsnode entry) with
   1169  1.12   mycroft  * the values on the mbuf list and
   1170  1.12   mycroft  * Iff vap not NULL
   1171  1.12   mycroft  *    copy the attributes to *vaper
   1172  1.12   mycroft  */
   1173  1.24  christos int
   1174  1.12   mycroft nfs_loadattrcache(vpp, mdp, dposp, vaper)
   1175  1.12   mycroft 	struct vnode **vpp;
   1176  1.12   mycroft 	struct mbuf **mdp;
   1177  1.12   mycroft 	caddr_t *dposp;
   1178  1.12   mycroft 	struct vattr *vaper;
   1179   1.1       cgd {
   1180  1.12   mycroft 	register struct vnode *vp = *vpp;
   1181  1.12   mycroft 	register struct vattr *vap;
   1182  1.25      fvdl 	register struct nfs_fattr *fp;
   1183  1.24  christos 	extern int (**spec_nfsv2nodeop_p) __P((void *));
   1184  1.18   mycroft 	register struct nfsnode *np;
   1185  1.22       cgd 	register int32_t t1;
   1186  1.25      fvdl 	caddr_t cp2;
   1187  1.25      fvdl 	int error = 0;
   1188  1.25      fvdl 	int32_t rdev;
   1189  1.12   mycroft 	struct mbuf *md;
   1190  1.12   mycroft 	enum vtype vtyp;
   1191  1.12   mycroft 	u_short vmode;
   1192  1.12   mycroft 	struct timespec mtime;
   1193  1.12   mycroft 	struct vnode *nvp;
   1194  1.25      fvdl 	int v3 = NFS_ISV3(vp);
   1195   1.1       cgd 
   1196  1.12   mycroft 	md = *mdp;
   1197  1.25      fvdl 	t1 = (mtod(md, caddr_t) + md->m_len) - *dposp;
   1198  1.25      fvdl 	error = nfsm_disct(mdp, dposp, NFSX_FATTR(v3), t1, &cp2);
   1199  1.24  christos 	if (error)
   1200  1.12   mycroft 		return (error);
   1201  1.25      fvdl 	fp = (struct nfs_fattr *)cp2;
   1202  1.25      fvdl 	if (v3) {
   1203  1.25      fvdl 		vtyp = nfsv3tov_type(fp->fa_type);
   1204  1.25      fvdl 		vmode = fxdr_unsigned(u_short, fp->fa_mode);
   1205  1.25      fvdl 		rdev = makedev(fxdr_unsigned(u_char, fp->fa3_rdev.specdata1),
   1206  1.25      fvdl 			fxdr_unsigned(u_char, fp->fa3_rdev.specdata2));
   1207  1.25      fvdl 		fxdr_nfsv3time(&fp->fa3_mtime, &mtime);
   1208  1.12   mycroft 	} else {
   1209  1.25      fvdl 		vtyp = nfsv2tov_type(fp->fa_type);
   1210  1.25      fvdl 		vmode = fxdr_unsigned(u_short, fp->fa_mode);
   1211  1.25      fvdl 		if (vtyp == VNON || vtyp == VREG)
   1212  1.25      fvdl 			vtyp = IFTOVT(vmode);
   1213  1.25      fvdl 		rdev = fxdr_unsigned(int32_t, fp->fa2_rdev);
   1214  1.25      fvdl 		fxdr_nfsv2time(&fp->fa2_mtime, &mtime);
   1215  1.25      fvdl 
   1216  1.25      fvdl 		/*
   1217  1.25      fvdl 		 * Really ugly NFSv2 kludge.
   1218  1.25      fvdl 		 */
   1219  1.25      fvdl 		if (vtyp == VCHR && rdev == 0xffffffff)
   1220  1.25      fvdl 			vtyp = VFIFO;
   1221  1.12   mycroft 	}
   1222  1.25      fvdl 
   1223  1.12   mycroft 	/*
   1224  1.12   mycroft 	 * If v_type == VNON it is a new node, so fill in the v_type,
   1225  1.12   mycroft 	 * n_mtime fields. Check to see if it represents a special
   1226  1.12   mycroft 	 * device, and if so, check for a possible alias. Once the
   1227  1.12   mycroft 	 * correct vnode has been obtained, fill in the rest of the
   1228  1.12   mycroft 	 * information.
   1229  1.12   mycroft 	 */
   1230  1.12   mycroft 	np = VTONFS(vp);
   1231  1.28      fvdl 	if (vp->v_type != vtyp) {
   1232  1.25      fvdl 		vp->v_type = vtyp;
   1233  1.12   mycroft 		if (vp->v_type == VFIFO) {
   1234  1.27   thorpej #ifndef FIFO
   1235  1.27   thorpej 			return (EOPNOTSUPP);
   1236  1.27   thorpej #else
   1237  1.24  christos 			extern int (**fifo_nfsv2nodeop_p) __P((void *));
   1238  1.12   mycroft 			vp->v_op = fifo_nfsv2nodeop_p;
   1239  1.27   thorpej #endif /* FIFO */
   1240  1.12   mycroft 		}
   1241  1.12   mycroft 		if (vp->v_type == VCHR || vp->v_type == VBLK) {
   1242  1.12   mycroft 			vp->v_op = spec_nfsv2nodeop_p;
   1243  1.24  christos 			nvp = checkalias(vp, (dev_t)rdev, vp->v_mount);
   1244  1.24  christos 			if (nvp) {
   1245  1.12   mycroft 				/*
   1246  1.12   mycroft 				 * Discard unneeded vnode, but save its nfsnode.
   1247  1.25      fvdl 				 * Since the nfsnode does not have a lock, its
   1248  1.25      fvdl 				 * vnode lock has to be carried over.
   1249  1.12   mycroft 				 */
   1250  1.25      fvdl #ifdef Lite2_integrated
   1251  1.25      fvdl 				nvp->v_vnlock = vp->v_vnlock;
   1252  1.25      fvdl 				vp->v_vnlock = NULL;
   1253  1.25      fvdl #endif
   1254  1.12   mycroft 				nvp->v_data = vp->v_data;
   1255  1.12   mycroft 				vp->v_data = NULL;
   1256  1.12   mycroft 				vp->v_op = spec_vnodeop_p;
   1257  1.12   mycroft 				vrele(vp);
   1258  1.12   mycroft 				vgone(vp);
   1259  1.12   mycroft 				/*
   1260  1.12   mycroft 				 * Reinitialize aliased node.
   1261  1.12   mycroft 				 */
   1262  1.12   mycroft 				np->n_vnode = nvp;
   1263  1.12   mycroft 				*vpp = vp = nvp;
   1264  1.12   mycroft 			}
   1265  1.12   mycroft 		}
   1266  1.23       jtc 		np->n_mtime = mtime.tv_sec;
   1267  1.12   mycroft 	}
   1268  1.12   mycroft 	vap = &np->n_vattr;
   1269  1.12   mycroft 	vap->va_type = vtyp;
   1270  1.12   mycroft 	vap->va_mode = (vmode & 07777);
   1271  1.12   mycroft 	vap->va_rdev = (dev_t)rdev;
   1272  1.12   mycroft 	vap->va_mtime = mtime;
   1273  1.12   mycroft 	vap->va_fsid = vp->v_mount->mnt_stat.f_fsid.val[0];
   1274  1.25      fvdl 	if (v3) {
   1275  1.25      fvdl 		vap->va_nlink = fxdr_unsigned(u_short, fp->fa_nlink);
   1276  1.25      fvdl 		vap->va_uid = fxdr_unsigned(uid_t, fp->fa_uid);
   1277  1.25      fvdl 		vap->va_gid = fxdr_unsigned(gid_t, fp->fa_gid);
   1278  1.25      fvdl 		fxdr_hyper(&fp->fa3_size, &vap->va_size);
   1279  1.25      fvdl 		vap->va_blocksize = NFS_FABLKSIZE;
   1280  1.25      fvdl 		fxdr_hyper(&fp->fa3_used, &vap->va_bytes);
   1281  1.25      fvdl 		vap->va_fileid = fxdr_unsigned(int32_t,
   1282  1.25      fvdl 		    fp->fa3_fileid.nfsuquad[1]);
   1283  1.25      fvdl 		fxdr_nfsv3time(&fp->fa3_atime, &vap->va_atime);
   1284  1.25      fvdl 		fxdr_nfsv3time(&fp->fa3_ctime, &vap->va_ctime);
   1285  1.25      fvdl 		vap->va_flags = 0;
   1286  1.25      fvdl 		vap->va_filerev = 0;
   1287  1.12   mycroft 	} else {
   1288  1.25      fvdl 		vap->va_nlink = fxdr_unsigned(u_short, fp->fa_nlink);
   1289  1.25      fvdl 		vap->va_uid = fxdr_unsigned(uid_t, fp->fa_uid);
   1290  1.25      fvdl 		vap->va_gid = fxdr_unsigned(gid_t, fp->fa_gid);
   1291  1.25      fvdl 		vap->va_size = fxdr_unsigned(u_int32_t, fp->fa2_size);
   1292  1.25      fvdl 		vap->va_blocksize = fxdr_unsigned(int32_t, fp->fa2_blocksize);
   1293  1.25      fvdl 		vap->va_bytes = fxdr_unsigned(int32_t, fp->fa2_blocks)
   1294  1.25      fvdl 		    * NFS_FABLKSIZE;
   1295  1.25      fvdl 		vap->va_fileid = fxdr_unsigned(int32_t, fp->fa2_fileid);
   1296  1.25      fvdl 		fxdr_nfsv2time(&fp->fa2_atime, &vap->va_atime);
   1297  1.12   mycroft 		vap->va_flags = 0;
   1298  1.25      fvdl 		vap->va_ctime.tv_sec = fxdr_unsigned(u_int32_t,
   1299  1.25      fvdl 		    fp->fa2_ctime.nfsv2_sec);
   1300  1.25      fvdl 		vap->va_ctime.tv_nsec = 0;
   1301  1.25      fvdl 		vap->va_gen = fxdr_unsigned(u_int32_t,fp->fa2_ctime.nfsv2_usec);
   1302  1.12   mycroft 		vap->va_filerev = 0;
   1303  1.12   mycroft 	}
   1304  1.12   mycroft 	if (vap->va_size != np->n_size) {
   1305  1.12   mycroft 		if (vap->va_type == VREG) {
   1306  1.12   mycroft 			if (np->n_flag & NMODIFIED) {
   1307  1.12   mycroft 				if (vap->va_size < np->n_size)
   1308  1.12   mycroft 					vap->va_size = np->n_size;
   1309  1.12   mycroft 				else
   1310  1.12   mycroft 					np->n_size = vap->va_size;
   1311  1.12   mycroft 			} else
   1312  1.12   mycroft 				np->n_size = vap->va_size;
   1313  1.12   mycroft 			vnode_pager_setsize(vp, (u_long)np->n_size);
   1314  1.12   mycroft 		} else
   1315  1.12   mycroft 			np->n_size = vap->va_size;
   1316  1.12   mycroft 	}
   1317  1.12   mycroft 	np->n_attrstamp = time.tv_sec;
   1318  1.12   mycroft 	if (vaper != NULL) {
   1319  1.12   mycroft 		bcopy((caddr_t)vap, (caddr_t)vaper, sizeof(*vap));
   1320  1.12   mycroft 		if (np->n_flag & NCHG) {
   1321  1.25      fvdl 			if (np->n_flag & NACC)
   1322  1.25      fvdl 				vaper->va_atime = np->n_atim;
   1323  1.25      fvdl 			if (np->n_flag & NUPD)
   1324  1.25      fvdl 				vaper->va_mtime = np->n_mtim;
   1325  1.12   mycroft 		}
   1326  1.12   mycroft 	}
   1327  1.12   mycroft 	return (0);
   1328  1.12   mycroft }
   1329  1.12   mycroft 
   1330  1.12   mycroft /*
   1331  1.12   mycroft  * Check the time stamp
   1332  1.12   mycroft  * If the cache is valid, copy contents to *vap and return 0
   1333  1.12   mycroft  * otherwise return an error
   1334  1.12   mycroft  */
   1335  1.24  christos int
   1336  1.12   mycroft nfs_getattrcache(vp, vaper)
   1337  1.12   mycroft 	register struct vnode *vp;
   1338  1.12   mycroft 	struct vattr *vaper;
   1339  1.12   mycroft {
   1340  1.12   mycroft 	register struct nfsnode *np = VTONFS(vp);
   1341  1.12   mycroft 	register struct vattr *vap;
   1342  1.12   mycroft 
   1343  1.25      fvdl 	if ((time.tv_sec - np->n_attrstamp) >= NFS_ATTRTIMEO(np)) {
   1344  1.12   mycroft 		nfsstats.attrcache_misses++;
   1345  1.12   mycroft 		return (ENOENT);
   1346  1.12   mycroft 	}
   1347  1.12   mycroft 	nfsstats.attrcache_hits++;
   1348  1.12   mycroft 	vap = &np->n_vattr;
   1349  1.12   mycroft 	if (vap->va_size != np->n_size) {
   1350  1.12   mycroft 		if (vap->va_type == VREG) {
   1351  1.12   mycroft 			if (np->n_flag & NMODIFIED) {
   1352  1.12   mycroft 				if (vap->va_size < np->n_size)
   1353  1.12   mycroft 					vap->va_size = np->n_size;
   1354  1.12   mycroft 				else
   1355  1.12   mycroft 					np->n_size = vap->va_size;
   1356  1.12   mycroft 			} else
   1357  1.12   mycroft 				np->n_size = vap->va_size;
   1358  1.12   mycroft 			vnode_pager_setsize(vp, (u_long)np->n_size);
   1359  1.12   mycroft 		} else
   1360  1.12   mycroft 			np->n_size = vap->va_size;
   1361  1.12   mycroft 	}
   1362  1.12   mycroft 	bcopy((caddr_t)vap, (caddr_t)vaper, sizeof(struct vattr));
   1363  1.12   mycroft 	if (np->n_flag & NCHG) {
   1364  1.25      fvdl 		if (np->n_flag & NACC)
   1365  1.25      fvdl 			vaper->va_atime = np->n_atim;
   1366  1.25      fvdl 		if (np->n_flag & NUPD)
   1367  1.25      fvdl 			vaper->va_mtime = np->n_mtim;
   1368   1.1       cgd 	}
   1369  1.12   mycroft 	return (0);
   1370   1.1       cgd }
   1371  1.25      fvdl #endif /* NFSCLIENT */
   1372   1.1       cgd 
   1373   1.1       cgd /*
   1374  1.12   mycroft  * Set up nameidata for a lookup() call and do it
   1375   1.1       cgd  */
   1376  1.24  christos int
   1377  1.25      fvdl nfs_namei(ndp, fhp, len, slp, nam, mdp, dposp, retdirp, p, kerbflag)
   1378   1.1       cgd 	register struct nameidata *ndp;
   1379   1.1       cgd 	fhandle_t *fhp;
   1380   1.1       cgd 	int len;
   1381  1.12   mycroft 	struct nfssvc_sock *slp;
   1382  1.12   mycroft 	struct mbuf *nam;
   1383   1.1       cgd 	struct mbuf **mdp;
   1384   1.1       cgd 	caddr_t *dposp;
   1385  1.25      fvdl 	struct vnode **retdirp;
   1386   1.1       cgd 	struct proc *p;
   1387  1.25      fvdl 	int kerbflag;
   1388   1.1       cgd {
   1389   1.1       cgd 	register int i, rem;
   1390   1.1       cgd 	register struct mbuf *md;
   1391   1.1       cgd 	register char *fromcp, *tocp;
   1392   1.1       cgd 	struct vnode *dp;
   1393  1.12   mycroft 	int error, rdonly;
   1394  1.12   mycroft 	struct componentname *cnp = &ndp->ni_cnd;
   1395   1.1       cgd 
   1396  1.25      fvdl 	*retdirp = (struct vnode *)0;
   1397  1.12   mycroft 	MALLOC(cnp->cn_pnbuf, char *, len + 1, M_NAMEI, M_WAITOK);
   1398   1.1       cgd 	/*
   1399   1.1       cgd 	 * Copy the name from the mbuf list to ndp->ni_pnbuf
   1400   1.1       cgd 	 * and set the various ndp fields appropriately.
   1401   1.1       cgd 	 */
   1402   1.1       cgd 	fromcp = *dposp;
   1403  1.12   mycroft 	tocp = cnp->cn_pnbuf;
   1404   1.1       cgd 	md = *mdp;
   1405   1.1       cgd 	rem = mtod(md, caddr_t) + md->m_len - fromcp;
   1406   1.1       cgd 	for (i = 0; i < len; i++) {
   1407   1.1       cgd 		while (rem == 0) {
   1408   1.1       cgd 			md = md->m_next;
   1409   1.1       cgd 			if (md == NULL) {
   1410   1.1       cgd 				error = EBADRPC;
   1411   1.1       cgd 				goto out;
   1412   1.1       cgd 			}
   1413   1.1       cgd 			fromcp = mtod(md, caddr_t);
   1414   1.1       cgd 			rem = md->m_len;
   1415   1.1       cgd 		}
   1416   1.1       cgd 		if (*fromcp == '\0' || *fromcp == '/') {
   1417  1.25      fvdl 			error = EACCES;
   1418   1.1       cgd 			goto out;
   1419   1.1       cgd 		}
   1420   1.1       cgd 		*tocp++ = *fromcp++;
   1421   1.1       cgd 		rem--;
   1422   1.1       cgd 	}
   1423   1.1       cgd 	*tocp = '\0';
   1424   1.1       cgd 	*mdp = md;
   1425   1.1       cgd 	*dposp = fromcp;
   1426   1.1       cgd 	len = nfsm_rndup(len)-len;
   1427   1.1       cgd 	if (len > 0) {
   1428   1.1       cgd 		if (rem >= len)
   1429   1.1       cgd 			*dposp += len;
   1430  1.24  christos 		else if ((error = nfs_adv(mdp, dposp, len, rem)) != 0)
   1431   1.1       cgd 			goto out;
   1432   1.1       cgd 	}
   1433  1.12   mycroft 	ndp->ni_pathlen = tocp - cnp->cn_pnbuf;
   1434  1.12   mycroft 	cnp->cn_nameptr = cnp->cn_pnbuf;
   1435   1.1       cgd 	/*
   1436   1.1       cgd 	 * Extract and set starting directory.
   1437   1.1       cgd 	 */
   1438  1.24  christos 	error = nfsrv_fhtovp(fhp, FALSE, &dp, ndp->ni_cnd.cn_cred, slp,
   1439  1.25      fvdl 	    nam, &rdonly, kerbflag);
   1440  1.24  christos 	if (error)
   1441   1.1       cgd 		goto out;
   1442   1.1       cgd 	if (dp->v_type != VDIR) {
   1443   1.1       cgd 		vrele(dp);
   1444   1.1       cgd 		error = ENOTDIR;
   1445   1.1       cgd 		goto out;
   1446   1.1       cgd 	}
   1447  1.25      fvdl 	VREF(dp);
   1448  1.25      fvdl 	*retdirp = dp;
   1449   1.1       cgd 	ndp->ni_startdir = dp;
   1450  1.12   mycroft 	if (rdonly)
   1451  1.12   mycroft 		cnp->cn_flags |= (NOCROSSMOUNT | RDONLY);
   1452  1.12   mycroft 	else
   1453  1.12   mycroft 		cnp->cn_flags |= NOCROSSMOUNT;
   1454   1.1       cgd 	/*
   1455   1.1       cgd 	 * And call lookup() to do the real work
   1456   1.1       cgd 	 */
   1457  1.12   mycroft 	cnp->cn_proc = p;
   1458  1.25      fvdl 	error = lookup(ndp);
   1459  1.25      fvdl 	if (error)
   1460   1.1       cgd 		goto out;
   1461   1.1       cgd 	/*
   1462   1.1       cgd 	 * Check for encountering a symbolic link
   1463   1.1       cgd 	 */
   1464  1.12   mycroft 	if (cnp->cn_flags & ISSYMLINK) {
   1465  1.12   mycroft 		if ((cnp->cn_flags & LOCKPARENT) && ndp->ni_pathlen == 1)
   1466   1.1       cgd 			vput(ndp->ni_dvp);
   1467   1.1       cgd 		else
   1468   1.1       cgd 			vrele(ndp->ni_dvp);
   1469   1.1       cgd 		vput(ndp->ni_vp);
   1470   1.1       cgd 		ndp->ni_vp = NULL;
   1471   1.1       cgd 		error = EINVAL;
   1472   1.1       cgd 		goto out;
   1473   1.1       cgd 	}
   1474   1.1       cgd 	/*
   1475   1.1       cgd 	 * Check for saved name request
   1476   1.1       cgd 	 */
   1477  1.12   mycroft 	if (cnp->cn_flags & (SAVENAME | SAVESTART)) {
   1478  1.12   mycroft 		cnp->cn_flags |= HASBUF;
   1479   1.1       cgd 		return (0);
   1480   1.1       cgd 	}
   1481   1.1       cgd out:
   1482  1.12   mycroft 	FREE(cnp->cn_pnbuf, M_NAMEI);
   1483   1.1       cgd 	return (error);
   1484   1.1       cgd }
   1485   1.1       cgd 
   1486   1.1       cgd /*
   1487   1.1       cgd  * A fiddled version of m_adj() that ensures null fill to a long
   1488   1.1       cgd  * boundary and only trims off the back end
   1489   1.1       cgd  */
   1490  1.12   mycroft void
   1491   1.1       cgd nfsm_adj(mp, len, nul)
   1492   1.1       cgd 	struct mbuf *mp;
   1493   1.1       cgd 	register int len;
   1494   1.1       cgd 	int nul;
   1495   1.1       cgd {
   1496   1.1       cgd 	register struct mbuf *m;
   1497   1.1       cgd 	register int count, i;
   1498   1.1       cgd 	register char *cp;
   1499   1.1       cgd 
   1500   1.1       cgd 	/*
   1501   1.1       cgd 	 * Trim from tail.  Scan the mbuf chain,
   1502   1.1       cgd 	 * calculating its length and finding the last mbuf.
   1503   1.1       cgd 	 * If the adjustment only affects this mbuf, then just
   1504   1.1       cgd 	 * adjust and return.  Otherwise, rescan and truncate
   1505   1.1       cgd 	 * after the remaining size.
   1506   1.1       cgd 	 */
   1507   1.1       cgd 	count = 0;
   1508   1.1       cgd 	m = mp;
   1509   1.1       cgd 	for (;;) {
   1510   1.1       cgd 		count += m->m_len;
   1511   1.1       cgd 		if (m->m_next == (struct mbuf *)0)
   1512   1.1       cgd 			break;
   1513   1.1       cgd 		m = m->m_next;
   1514   1.1       cgd 	}
   1515   1.1       cgd 	if (m->m_len > len) {
   1516   1.1       cgd 		m->m_len -= len;
   1517   1.1       cgd 		if (nul > 0) {
   1518   1.1       cgd 			cp = mtod(m, caddr_t)+m->m_len-nul;
   1519   1.1       cgd 			for (i = 0; i < nul; i++)
   1520   1.1       cgd 				*cp++ = '\0';
   1521   1.1       cgd 		}
   1522   1.1       cgd 		return;
   1523   1.1       cgd 	}
   1524   1.1       cgd 	count -= len;
   1525   1.1       cgd 	if (count < 0)
   1526   1.1       cgd 		count = 0;
   1527   1.1       cgd 	/*
   1528   1.1       cgd 	 * Correct length for chain is "count".
   1529   1.1       cgd 	 * Find the mbuf with last data, adjust its length,
   1530   1.1       cgd 	 * and toss data from remaining mbufs on chain.
   1531   1.1       cgd 	 */
   1532   1.1       cgd 	for (m = mp; m; m = m->m_next) {
   1533   1.1       cgd 		if (m->m_len >= count) {
   1534   1.1       cgd 			m->m_len = count;
   1535   1.1       cgd 			if (nul > 0) {
   1536   1.1       cgd 				cp = mtod(m, caddr_t)+m->m_len-nul;
   1537   1.1       cgd 				for (i = 0; i < nul; i++)
   1538   1.1       cgd 					*cp++ = '\0';
   1539   1.1       cgd 			}
   1540   1.1       cgd 			break;
   1541   1.1       cgd 		}
   1542   1.1       cgd 		count -= m->m_len;
   1543   1.1       cgd 	}
   1544  1.25      fvdl 	for (m = m->m_next;m;m = m->m_next)
   1545   1.1       cgd 		m->m_len = 0;
   1546   1.1       cgd }
   1547   1.1       cgd 
   1548   1.1       cgd /*
   1549  1.25      fvdl  * Make these functions instead of macros, so that the kernel text size
   1550  1.25      fvdl  * doesn't get too big...
   1551  1.25      fvdl  */
   1552  1.25      fvdl void
   1553  1.25      fvdl nfsm_srvwcc(nfsd, before_ret, before_vap, after_ret, after_vap, mbp, bposp)
   1554  1.25      fvdl 	struct nfsrv_descript *nfsd;
   1555  1.25      fvdl 	int before_ret;
   1556  1.25      fvdl 	register struct vattr *before_vap;
   1557  1.25      fvdl 	int after_ret;
   1558  1.25      fvdl 	struct vattr *after_vap;
   1559  1.25      fvdl 	struct mbuf **mbp;
   1560  1.25      fvdl 	char **bposp;
   1561  1.25      fvdl {
   1562  1.25      fvdl 	register struct mbuf *mb = *mbp, *mb2;
   1563  1.25      fvdl 	register char *bpos = *bposp;
   1564  1.25      fvdl 	register u_int32_t *tl;
   1565  1.25      fvdl 
   1566  1.25      fvdl 	if (before_ret) {
   1567  1.25      fvdl 		nfsm_build(tl, u_int32_t *, NFSX_UNSIGNED);
   1568  1.25      fvdl 		*tl = nfs_false;
   1569  1.25      fvdl 	} else {
   1570  1.25      fvdl 		nfsm_build(tl, u_int32_t *, 7 * NFSX_UNSIGNED);
   1571  1.25      fvdl 		*tl++ = nfs_true;
   1572  1.25      fvdl 		txdr_hyper(&(before_vap->va_size), tl);
   1573  1.25      fvdl 		tl += 2;
   1574  1.25      fvdl 		txdr_nfsv3time(&(before_vap->va_mtime), tl);
   1575  1.25      fvdl 		tl += 2;
   1576  1.25      fvdl 		txdr_nfsv3time(&(before_vap->va_ctime), tl);
   1577  1.25      fvdl 	}
   1578  1.25      fvdl 	*bposp = bpos;
   1579  1.25      fvdl 	*mbp = mb;
   1580  1.25      fvdl 	nfsm_srvpostopattr(nfsd, after_ret, after_vap, mbp, bposp);
   1581  1.25      fvdl }
   1582  1.25      fvdl 
   1583  1.25      fvdl void
   1584  1.25      fvdl nfsm_srvpostopattr(nfsd, after_ret, after_vap, mbp, bposp)
   1585  1.25      fvdl 	struct nfsrv_descript *nfsd;
   1586  1.25      fvdl 	int after_ret;
   1587  1.25      fvdl 	struct vattr *after_vap;
   1588  1.25      fvdl 	struct mbuf **mbp;
   1589  1.25      fvdl 	char **bposp;
   1590  1.25      fvdl {
   1591  1.25      fvdl 	register struct mbuf *mb = *mbp, *mb2;
   1592  1.25      fvdl 	register char *bpos = *bposp;
   1593  1.25      fvdl 	register u_int32_t *tl;
   1594  1.25      fvdl 	register struct nfs_fattr *fp;
   1595  1.25      fvdl 
   1596  1.25      fvdl 	if (after_ret) {
   1597  1.25      fvdl 		nfsm_build(tl, u_int32_t *, NFSX_UNSIGNED);
   1598  1.25      fvdl 		*tl = nfs_false;
   1599  1.25      fvdl 	} else {
   1600  1.25      fvdl 		nfsm_build(tl, u_int32_t *, NFSX_UNSIGNED + NFSX_V3FATTR);
   1601  1.25      fvdl 		*tl++ = nfs_true;
   1602  1.25      fvdl 		fp = (struct nfs_fattr *)tl;
   1603  1.25      fvdl 		nfsm_srvfattr(nfsd, after_vap, fp);
   1604  1.25      fvdl 	}
   1605  1.25      fvdl 	*mbp = mb;
   1606  1.25      fvdl 	*bposp = bpos;
   1607  1.25      fvdl }
   1608  1.25      fvdl 
   1609  1.25      fvdl void
   1610  1.25      fvdl nfsm_srvfattr(nfsd, vap, fp)
   1611  1.25      fvdl 	register struct nfsrv_descript *nfsd;
   1612  1.25      fvdl 	register struct vattr *vap;
   1613  1.25      fvdl 	register struct nfs_fattr *fp;
   1614  1.25      fvdl {
   1615  1.25      fvdl 
   1616  1.25      fvdl 	fp->fa_nlink = txdr_unsigned(vap->va_nlink);
   1617  1.25      fvdl 	fp->fa_uid = txdr_unsigned(vap->va_uid);
   1618  1.25      fvdl 	fp->fa_gid = txdr_unsigned(vap->va_gid);
   1619  1.25      fvdl 	if (nfsd->nd_flag & ND_NFSV3) {
   1620  1.25      fvdl 		fp->fa_type = vtonfsv3_type(vap->va_type);
   1621  1.25      fvdl 		fp->fa_mode = vtonfsv3_mode(vap->va_mode);
   1622  1.25      fvdl 		txdr_hyper(&vap->va_size, &fp->fa3_size);
   1623  1.25      fvdl 		txdr_hyper(&vap->va_bytes, &fp->fa3_used);
   1624  1.25      fvdl 		fp->fa3_rdev.specdata1 = txdr_unsigned(major(vap->va_rdev));
   1625  1.25      fvdl 		fp->fa3_rdev.specdata2 = txdr_unsigned(minor(vap->va_rdev));
   1626  1.25      fvdl 		fp->fa3_fsid.nfsuquad[0] = 0;
   1627  1.25      fvdl 		fp->fa3_fsid.nfsuquad[1] = txdr_unsigned(vap->va_fsid);
   1628  1.25      fvdl 		fp->fa3_fileid.nfsuquad[0] = 0;
   1629  1.25      fvdl 		fp->fa3_fileid.nfsuquad[1] = txdr_unsigned(vap->va_fileid);
   1630  1.25      fvdl 		txdr_nfsv3time(&vap->va_atime, &fp->fa3_atime);
   1631  1.25      fvdl 		txdr_nfsv3time(&vap->va_mtime, &fp->fa3_mtime);
   1632  1.25      fvdl 		txdr_nfsv3time(&vap->va_ctime, &fp->fa3_ctime);
   1633  1.25      fvdl 	} else {
   1634  1.25      fvdl 		fp->fa_type = vtonfsv2_type(vap->va_type);
   1635  1.25      fvdl 		fp->fa_mode = vtonfsv2_mode(vap->va_type, vap->va_mode);
   1636  1.25      fvdl 		fp->fa2_size = txdr_unsigned(vap->va_size);
   1637  1.25      fvdl 		fp->fa2_blocksize = txdr_unsigned(vap->va_blocksize);
   1638  1.25      fvdl 		if (vap->va_type == VFIFO)
   1639  1.25      fvdl 			fp->fa2_rdev = 0xffffffff;
   1640  1.25      fvdl 		else
   1641  1.25      fvdl 			fp->fa2_rdev = txdr_unsigned(vap->va_rdev);
   1642  1.25      fvdl 		fp->fa2_blocks = txdr_unsigned(vap->va_bytes / NFS_FABLKSIZE);
   1643  1.25      fvdl 		fp->fa2_fsid = txdr_unsigned(vap->va_fsid);
   1644  1.25      fvdl 		fp->fa2_fileid = txdr_unsigned(vap->va_fileid);
   1645  1.25      fvdl 		txdr_nfsv2time(&vap->va_atime, &fp->fa2_atime);
   1646  1.25      fvdl 		txdr_nfsv2time(&vap->va_mtime, &fp->fa2_mtime);
   1647  1.25      fvdl 		txdr_nfsv2time(&vap->va_ctime, &fp->fa2_ctime);
   1648  1.25      fvdl 	}
   1649  1.25      fvdl }
   1650  1.25      fvdl 
   1651  1.25      fvdl /*
   1652   1.1       cgd  * nfsrv_fhtovp() - convert a fh to a vnode ptr (optionally locked)
   1653   1.1       cgd  * 	- look up fsid in mount list (if not found ret error)
   1654  1.12   mycroft  *	- get vp and export rights by calling VFS_FHTOVP()
   1655  1.12   mycroft  *	- if cred->cr_uid == 0 or MNT_EXPORTANON set it to credanon
   1656   1.1       cgd  *	- if not lockflag unlock it with VOP_UNLOCK()
   1657   1.1       cgd  */
   1658  1.24  christos int
   1659  1.25      fvdl nfsrv_fhtovp(fhp, lockflag, vpp, cred, slp, nam, rdonlyp, kerbflag)
   1660   1.1       cgd 	fhandle_t *fhp;
   1661   1.1       cgd 	int lockflag;
   1662   1.1       cgd 	struct vnode **vpp;
   1663   1.1       cgd 	struct ucred *cred;
   1664  1.12   mycroft 	struct nfssvc_sock *slp;
   1665  1.12   mycroft 	struct mbuf *nam;
   1666  1.12   mycroft 	int *rdonlyp;
   1667  1.25      fvdl 	int kerbflag;
   1668   1.1       cgd {
   1669  1.25      fvdl #ifdef Lite2_integrated
   1670  1.25      fvdl 	struct proc *p = curproc;	/* XXX */
   1671  1.25      fvdl #endif
   1672   1.1       cgd 	register struct mount *mp;
   1673  1.12   mycroft 	register int i;
   1674  1.12   mycroft 	struct ucred *credanon;
   1675  1.12   mycroft 	int error, exflags;
   1676   1.1       cgd 
   1677  1.12   mycroft 	*vpp = (struct vnode *)0;
   1678  1.25      fvdl #ifdef Lite2_integrated
   1679  1.25      fvdl 	mp = vfs_getvfs(&fhp->fh_fsid);
   1680  1.25      fvdl #else
   1681  1.25      fvdl 	mp = getvfs(&fhp->fh_fsid);
   1682  1.25      fvdl #endif
   1683  1.25      fvdl 	if (!mp)
   1684   1.1       cgd 		return (ESTALE);
   1685  1.24  christos 	error = VFS_FHTOVP(mp, &fhp->fh_fid, nam, vpp, &exflags, &credanon);
   1686  1.24  christos 	if (error)
   1687  1.12   mycroft 		return (error);
   1688  1.12   mycroft 	/*
   1689  1.12   mycroft 	 * Check/setup credentials.
   1690  1.12   mycroft 	 */
   1691  1.12   mycroft 	if (exflags & MNT_EXKERB) {
   1692  1.25      fvdl 		if (!kerbflag) {
   1693  1.12   mycroft 			vput(*vpp);
   1694  1.25      fvdl 			return (NFSERR_AUTHERR | AUTH_TOOWEAK);
   1695  1.12   mycroft 		}
   1696  1.25      fvdl 	} else if (kerbflag) {
   1697  1.25      fvdl 		vput(*vpp);
   1698  1.25      fvdl 		return (NFSERR_AUTHERR | AUTH_TOOWEAK);
   1699  1.12   mycroft 	} else if (cred->cr_uid == 0 || (exflags & MNT_EXPORTANON)) {
   1700  1.12   mycroft 		cred->cr_uid = credanon->cr_uid;
   1701  1.19       jtc 		cred->cr_gid = credanon->cr_gid;
   1702  1.12   mycroft 		for (i = 0; i < credanon->cr_ngroups && i < NGROUPS; i++)
   1703  1.12   mycroft 			cred->cr_groups[i] = credanon->cr_groups[i];
   1704  1.15   mycroft 		cred->cr_ngroups = i;
   1705  1.12   mycroft 	}
   1706  1.12   mycroft 	if (exflags & MNT_EXRDONLY)
   1707  1.12   mycroft 		*rdonlyp = 1;
   1708  1.12   mycroft 	else
   1709  1.12   mycroft 		*rdonlyp = 0;
   1710   1.1       cgd 	if (!lockflag)
   1711  1.25      fvdl #ifdef Lite2_integrated
   1712  1.25      fvdl 		VOP_UNLOCK(*vpp, 0, p);
   1713  1.25      fvdl #else
   1714   1.1       cgd 		VOP_UNLOCK(*vpp);
   1715  1.25      fvdl #endif
   1716   1.1       cgd 	return (0);
   1717   1.1       cgd }
   1718   1.1       cgd 
   1719   1.1       cgd /*
   1720  1.12   mycroft  * This function compares two net addresses by family and returns TRUE
   1721  1.12   mycroft  * if they are the same host.
   1722  1.12   mycroft  * If there is any doubt, return FALSE.
   1723  1.12   mycroft  * The AF_INET family is handled as a special case so that address mbufs
   1724  1.12   mycroft  * don't need to be saved to store "struct in_addr", which is only 4 bytes.
   1725   1.1       cgd  */
   1726  1.24  christos int
   1727  1.12   mycroft netaddr_match(family, haddr, nam)
   1728  1.12   mycroft 	int family;
   1729  1.12   mycroft 	union nethostaddr *haddr;
   1730  1.12   mycroft 	struct mbuf *nam;
   1731   1.1       cgd {
   1732  1.12   mycroft 	register struct sockaddr_in *inetaddr;
   1733   1.1       cgd 
   1734  1.12   mycroft 	switch (family) {
   1735  1.12   mycroft 	case AF_INET:
   1736  1.12   mycroft 		inetaddr = mtod(nam, struct sockaddr_in *);
   1737  1.12   mycroft 		if (inetaddr->sin_family == AF_INET &&
   1738  1.12   mycroft 		    inetaddr->sin_addr.s_addr == haddr->had_inetaddr)
   1739  1.12   mycroft 			return (1);
   1740  1.12   mycroft 		break;
   1741  1.12   mycroft #ifdef ISO
   1742  1.12   mycroft 	case AF_ISO:
   1743  1.12   mycroft 	    {
   1744  1.12   mycroft 		register struct sockaddr_iso *isoaddr1, *isoaddr2;
   1745  1.12   mycroft 
   1746  1.12   mycroft 		isoaddr1 = mtod(nam, struct sockaddr_iso *);
   1747  1.12   mycroft 		isoaddr2 = mtod(haddr->had_nam, struct sockaddr_iso *);
   1748  1.12   mycroft 		if (isoaddr1->siso_family == AF_ISO &&
   1749  1.12   mycroft 		    isoaddr1->siso_nlen > 0 &&
   1750  1.12   mycroft 		    isoaddr1->siso_nlen == isoaddr2->siso_nlen &&
   1751  1.12   mycroft 		    SAME_ISOADDR(isoaddr1, isoaddr2))
   1752  1.12   mycroft 			return (1);
   1753  1.12   mycroft 		break;
   1754  1.12   mycroft 	    }
   1755  1.12   mycroft #endif	/* ISO */
   1756  1.12   mycroft 	default:
   1757  1.12   mycroft 		break;
   1758  1.12   mycroft 	};
   1759  1.12   mycroft 	return (0);
   1760  1.25      fvdl }
   1761  1.25      fvdl 
   1762  1.25      fvdl static nfsuint64 nfs_nullcookie = {{ 0, 0 }};
   1763  1.25      fvdl /*
   1764  1.25      fvdl  * This function finds the directory cookie that corresponds to the
   1765  1.25      fvdl  * logical byte offset given.
   1766  1.25      fvdl  */
   1767  1.25      fvdl nfsuint64 *
   1768  1.25      fvdl nfs_getcookie(np, off, add)
   1769  1.25      fvdl 	register struct nfsnode *np;
   1770  1.25      fvdl 	off_t off;
   1771  1.25      fvdl 	int add;
   1772  1.25      fvdl {
   1773  1.25      fvdl 	register struct nfsdmap *dp, *dp2;
   1774  1.25      fvdl 	register int pos;
   1775  1.25      fvdl 
   1776  1.25      fvdl 	pos = off / NFS_DIRBLKSIZ;
   1777  1.25      fvdl 	if (pos == 0) {
   1778  1.25      fvdl #ifdef DIAGNOSTIC
   1779  1.25      fvdl 		if (add)
   1780  1.25      fvdl 			panic("nfs getcookie add at 0");
   1781  1.25      fvdl #endif
   1782  1.25      fvdl 		return (&nfs_nullcookie);
   1783  1.25      fvdl 	}
   1784  1.25      fvdl 	pos--;
   1785  1.25      fvdl 	dp = np->n_cookies.lh_first;
   1786  1.25      fvdl 	if (!dp) {
   1787  1.25      fvdl 		if (add) {
   1788  1.25      fvdl 			MALLOC(dp, struct nfsdmap *, sizeof (struct nfsdmap),
   1789  1.25      fvdl 				M_NFSDIROFF, M_WAITOK);
   1790  1.25      fvdl 			dp->ndm_eocookie = 0;
   1791  1.25      fvdl 			LIST_INSERT_HEAD(&np->n_cookies, dp, ndm_list);
   1792  1.25      fvdl 		} else
   1793  1.25      fvdl 			return ((nfsuint64 *)0);
   1794  1.25      fvdl 	}
   1795  1.25      fvdl 	while (pos >= NFSNUMCOOKIES) {
   1796  1.25      fvdl 		pos -= NFSNUMCOOKIES;
   1797  1.25      fvdl 		if (dp->ndm_list.le_next) {
   1798  1.25      fvdl 			if (!add && dp->ndm_eocookie < NFSNUMCOOKIES &&
   1799  1.25      fvdl 				pos >= dp->ndm_eocookie)
   1800  1.25      fvdl 				return ((nfsuint64 *)0);
   1801  1.25      fvdl 			dp = dp->ndm_list.le_next;
   1802  1.25      fvdl 		} else if (add) {
   1803  1.25      fvdl 			MALLOC(dp2, struct nfsdmap *, sizeof (struct nfsdmap),
   1804  1.25      fvdl 				M_NFSDIROFF, M_WAITOK);
   1805  1.25      fvdl 			dp2->ndm_eocookie = 0;
   1806  1.25      fvdl 			LIST_INSERT_AFTER(dp, dp2, ndm_list);
   1807  1.25      fvdl 			dp = dp2;
   1808  1.25      fvdl 		} else
   1809  1.25      fvdl 			return ((nfsuint64 *)0);
   1810  1.25      fvdl 	}
   1811  1.25      fvdl 	if (pos >= dp->ndm_eocookie) {
   1812  1.25      fvdl 		if (add)
   1813  1.25      fvdl 			dp->ndm_eocookie = pos + 1;
   1814  1.25      fvdl 		else
   1815  1.25      fvdl 			return ((nfsuint64 *)0);
   1816  1.25      fvdl 	}
   1817  1.25      fvdl 	return (&dp->ndm_cookies[pos]);
   1818  1.25      fvdl }
   1819  1.25      fvdl 
   1820  1.25      fvdl /*
   1821  1.25      fvdl  * Invalidate cached directory information, except for the actual directory
   1822  1.25      fvdl  * blocks (which are invalidated separately).
   1823  1.25      fvdl  * Done mainly to avoid the use of stale offset cookies.
   1824  1.25      fvdl  */
   1825  1.25      fvdl void
   1826  1.25      fvdl nfs_invaldir(vp)
   1827  1.25      fvdl 	register struct vnode *vp;
   1828  1.25      fvdl {
   1829  1.26      fvdl #ifdef notdef /* XXX */
   1830  1.25      fvdl 	register struct nfsnode *np = VTONFS(vp);
   1831  1.25      fvdl 
   1832  1.25      fvdl #ifdef DIAGNOSTIC
   1833  1.25      fvdl 	if (vp->v_type != VDIR)
   1834  1.25      fvdl 		panic("nfs: invaldir not dir");
   1835  1.25      fvdl #endif
   1836  1.25      fvdl 	np->n_direofoffset = 0;
   1837  1.25      fvdl 	np->n_cookieverf.nfsuquad[0] = 0;
   1838  1.25      fvdl 	np->n_cookieverf.nfsuquad[1] = 0;
   1839  1.25      fvdl 	if (np->n_cookies.lh_first)
   1840  1.25      fvdl 		np->n_cookies.lh_first->ndm_eocookie = 0;
   1841  1.26      fvdl #endif
   1842  1.25      fvdl }
   1843  1.25      fvdl 
   1844  1.25      fvdl /*
   1845  1.25      fvdl  * The write verifier has changed (probably due to a server reboot), so all
   1846  1.25      fvdl  * B_NEEDCOMMIT blocks will have to be written again. Since they are on the
   1847  1.25      fvdl  * dirty block list as B_DELWRI, all this takes is clearing the B_NEEDCOMMIT
   1848  1.25      fvdl  * flag. Once done the new write verifier can be set for the mount point.
   1849  1.25      fvdl  */
   1850  1.25      fvdl void
   1851  1.25      fvdl nfs_clearcommit(mp)
   1852  1.25      fvdl 	struct mount *mp;
   1853  1.25      fvdl {
   1854  1.25      fvdl 	register struct vnode *vp, *nvp;
   1855  1.25      fvdl 	register struct buf *bp, *nbp;
   1856  1.25      fvdl 	int s;
   1857  1.25      fvdl 
   1858  1.25      fvdl 	s = splbio();
   1859  1.25      fvdl loop:
   1860  1.25      fvdl 	for (vp = mp->mnt_vnodelist.lh_first; vp; vp = nvp) {
   1861  1.25      fvdl 		if (vp->v_mount != mp)	/* Paranoia */
   1862  1.25      fvdl 			goto loop;
   1863  1.25      fvdl 		nvp = vp->v_mntvnodes.le_next;
   1864  1.25      fvdl 		for (bp = vp->v_dirtyblkhd.lh_first; bp; bp = nbp) {
   1865  1.25      fvdl 			nbp = bp->b_vnbufs.le_next;
   1866  1.25      fvdl 			if ((bp->b_flags & (B_BUSY | B_DELWRI | B_NEEDCOMMIT))
   1867  1.25      fvdl 				== (B_DELWRI | B_NEEDCOMMIT))
   1868  1.25      fvdl 				bp->b_flags &= ~B_NEEDCOMMIT;
   1869  1.25      fvdl 		}
   1870  1.25      fvdl 	}
   1871  1.25      fvdl 	splx(s);
   1872  1.25      fvdl }
   1873  1.25      fvdl 
   1874  1.25      fvdl /*
   1875  1.25      fvdl  * Map errnos to NFS error numbers. For Version 3 also filter out error
   1876  1.25      fvdl  * numbers not specified for the associated procedure.
   1877  1.25      fvdl  */
   1878  1.25      fvdl int
   1879  1.25      fvdl nfsrv_errmap(nd, err)
   1880  1.25      fvdl 	struct nfsrv_descript *nd;
   1881  1.25      fvdl 	register int err;
   1882  1.25      fvdl {
   1883  1.25      fvdl 	register short *defaulterrp, *errp;
   1884  1.25      fvdl 
   1885  1.25      fvdl 	if (nd->nd_flag & ND_NFSV3) {
   1886  1.25      fvdl 	    if (nd->nd_procnum <= NFSPROC_COMMIT) {
   1887  1.25      fvdl 		errp = defaulterrp = nfsrv_v3errmap[nd->nd_procnum];
   1888  1.25      fvdl 		while (*++errp) {
   1889  1.25      fvdl 			if (*errp == err)
   1890  1.25      fvdl 				return (err);
   1891  1.25      fvdl 			else if (*errp > err)
   1892  1.25      fvdl 				break;
   1893  1.25      fvdl 		}
   1894  1.25      fvdl 		return ((int)*defaulterrp);
   1895  1.25      fvdl 	    } else
   1896  1.25      fvdl 		return (err & 0xffff);
   1897  1.25      fvdl 	}
   1898  1.25      fvdl 	if (err <= ELAST)
   1899  1.25      fvdl 		return ((int)nfsrv_v2errmap[err - 1]);
   1900  1.25      fvdl 	return (NFSERR_IO);
   1901  1.25      fvdl }
   1902  1.25      fvdl 
   1903  1.25      fvdl /*
   1904  1.25      fvdl  * Sort the group list in increasing numerical order.
   1905  1.25      fvdl  * (Insertion sort by Chris Torek, who was grossed out by the bubble sort
   1906  1.25      fvdl  *  that used to be here.)
   1907  1.25      fvdl  */
   1908  1.25      fvdl void
   1909  1.25      fvdl nfsrvw_sort(list, num)
   1910  1.25      fvdl         register gid_t *list;
   1911  1.25      fvdl         register int num;
   1912  1.25      fvdl {
   1913  1.25      fvdl 	register int i, j;
   1914  1.25      fvdl 	gid_t v;
   1915  1.25      fvdl 
   1916  1.25      fvdl 	/* Insertion sort. */
   1917  1.25      fvdl 	for (i = 1; i < num; i++) {
   1918  1.25      fvdl 		v = list[i];
   1919  1.25      fvdl 		/* find correct slot for value v, moving others up */
   1920  1.25      fvdl 		for (j = i; --j >= 0 && v < list[j];)
   1921  1.25      fvdl 			list[j + 1] = list[j];
   1922  1.25      fvdl 		list[j + 1] = v;
   1923  1.25      fvdl 	}
   1924  1.25      fvdl }
   1925  1.25      fvdl 
   1926  1.25      fvdl /*
   1927  1.25      fvdl  * copy credentials making sure that the result can be compared with bcmp().
   1928  1.25      fvdl  */
   1929  1.25      fvdl void
   1930  1.25      fvdl nfsrv_setcred(incred, outcred)
   1931  1.25      fvdl 	register struct ucred *incred, *outcred;
   1932  1.25      fvdl {
   1933  1.25      fvdl 	register int i;
   1934  1.25      fvdl 
   1935  1.25      fvdl 	bzero((caddr_t)outcred, sizeof (struct ucred));
   1936  1.25      fvdl 	outcred->cr_ref = 1;
   1937  1.25      fvdl 	outcred->cr_uid = incred->cr_uid;
   1938  1.25      fvdl 	outcred->cr_gid = incred->cr_gid;
   1939  1.25      fvdl 	outcred->cr_ngroups = incred->cr_ngroups;
   1940  1.25      fvdl 	for (i = 0; i < incred->cr_ngroups; i++)
   1941  1.25      fvdl 		outcred->cr_groups[i] = incred->cr_groups[i];
   1942  1.25      fvdl 	nfsrvw_sort(outcred->cr_groups, outcred->cr_ngroups);
   1943   1.1       cgd }
   1944