Home | History | Annotate | Line # | Download | only in coda
coda_namecache.c revision 1.12
      1  1.12      wiz /*	$NetBSD: coda_namecache.c,v 1.12 2003/03/29 22:48:39 wiz Exp $	*/
      2   1.2      rvb 
      3   1.1      rvb /*
      4   1.2      rvb  *
      5   1.2      rvb  *             Coda: an Experimental Distributed File System
      6   1.2      rvb  *                              Release 3.1
      7   1.2      rvb  *
      8   1.2      rvb  *           Copyright (c) 1987-1998 Carnegie Mellon University
      9   1.2      rvb  *                          All Rights Reserved
     10   1.2      rvb  *
     11   1.2      rvb  * Permission  to  use, copy, modify and distribute this software and its
     12   1.2      rvb  * documentation is hereby granted,  provided  that  both  the  copyright
     13   1.2      rvb  * notice  and  this  permission  notice  appear  in  all  copies  of the
     14   1.2      rvb  * software, derivative works or  modified  versions,  and  any  portions
     15   1.2      rvb  * thereof, and that both notices appear in supporting documentation, and
     16   1.2      rvb  * that credit is given to Carnegie Mellon University  in  all  documents
     17   1.2      rvb  * and publicity pertaining to direct or indirect use of this code or its
     18   1.2      rvb  * derivatives.
     19   1.2      rvb  *
     20   1.2      rvb  * CODA IS AN EXPERIMENTAL SOFTWARE SYSTEM AND IS  KNOWN  TO  HAVE  BUGS,
     21   1.2      rvb  * SOME  OF  WHICH MAY HAVE SERIOUS CONSEQUENCES.  CARNEGIE MELLON ALLOWS
     22   1.2      rvb  * FREE USE OF THIS SOFTWARE IN ITS "AS IS" CONDITION.   CARNEGIE  MELLON
     23   1.2      rvb  * DISCLAIMS  ANY  LIABILITY  OF  ANY  KIND  FOR  ANY  DAMAGES WHATSOEVER
     24   1.2      rvb  * RESULTING DIRECTLY OR INDIRECTLY FROM THE USE OF THIS SOFTWARE  OR  OF
     25   1.2      rvb  * ANY DERIVATIVE WORK.
     26   1.2      rvb  *
     27   1.2      rvb  * Carnegie  Mellon  encourages  users  of  this  software  to return any
     28   1.2      rvb  * improvements or extensions that  they  make,  and  to  grant  Carnegie
     29   1.2      rvb  * Mellon the rights to redistribute these changes without encumbrance.
     30   1.2      rvb  *
     31   1.4      rvb  * 	@(#) coda/coda_namecache.c,v 1.1.1.1 1998/08/29 21:26:45 rvb Exp $
     32   1.2      rvb  */
     33   1.1      rvb 
     34   1.1      rvb /*
     35   1.1      rvb  * Mach Operating System
     36   1.1      rvb  * Copyright (c) 1990 Carnegie-Mellon University
     37   1.1      rvb  * Copyright (c) 1989 Carnegie-Mellon University
     38   1.1      rvb  * All rights reserved.  The CMU software License Agreement specifies
     39   1.1      rvb  * the terms and conditions for use and redistribution.
     40   1.1      rvb  */
     41   1.1      rvb 
     42   1.1      rvb /*
     43   1.1      rvb  * This code was written for the Coda file system at Carnegie Mellon University.
     44   1.1      rvb  * Contributers include David Steere, James Kistler, and M. Satyanarayanan.
     45   1.1      rvb  */
     46   1.1      rvb 
     47   1.1      rvb /*
     48   1.3      rvb  * This module contains the routines to implement the CODA name cache. The
     49   1.1      rvb  * purpose of this cache is to reduce the cost of translating pathnames
     50   1.1      rvb  * into Vice FIDs. Each entry in the cache contains the name of the file,
     51   1.1      rvb  * the vnode (FID) of the parent directory, and the cred structure of the
     52   1.1      rvb  * user accessing the file.
     53   1.1      rvb  *
     54   1.1      rvb  * The first time a file is accessed, it is looked up by the local Venus
     55   1.1      rvb  * which first insures that the user has access to the file. In addition
     56   1.1      rvb  * we are guaranteed that Venus will invalidate any name cache entries in
     57   1.1      rvb  * case the user no longer should be able to access the file. For these
     58   1.1      rvb  * reasons we do not need to keep access list information as well as a
     59   1.1      rvb  * cred structure for each entry.
     60   1.1      rvb  *
     61   1.1      rvb  * The table can be accessed through the routines cnc_init(), cnc_enter(),
     62   1.1      rvb  * cnc_lookup(), cnc_rmfidcred(), cnc_rmfid(), cnc_rmcred(), and cnc_purge().
     63   1.1      rvb  * There are several other routines which aid in the implementation of the
     64   1.1      rvb  * hash table.
     65   1.1      rvb  */
     66   1.1      rvb 
     67   1.1      rvb /*
     68   1.1      rvb  * NOTES: rvb@cs
     69   1.1      rvb  * 1.	The name cache holds a reference to every vnode in it.  Hence files can not be
     70   1.1      rvb  *	 closed or made inactive until they are released.
     71   1.3      rvb  * 2.	coda_nc_name(cp) was added to get a name for a cnode pointer for debugging.
     72   1.3      rvb  * 3.	coda_nc_find() has debug code to detect when entries are stored with different
     73   1.1      rvb  *	 credentials.  We don't understand yet, if/how entries are NOT EQ but still
     74   1.1      rvb  *	 EQUAL
     75   1.1      rvb  * 4.	I wonder if this name cache could be replace by the vnode name cache.
     76   1.1      rvb  *	The latter has no zapping functions, so probably not.
     77   1.1      rvb  */
     78  1.11    lukem 
     79  1.11    lukem #include <sys/cdefs.h>
     80  1.12      wiz __KERNEL_RCSID(0, "$NetBSD: coda_namecache.c,v 1.12 2003/03/29 22:48:39 wiz Exp $");
     81   1.1      rvb 
     82   1.1      rvb #include <sys/param.h>
     83   1.1      rvb #include <sys/errno.h>
     84   1.1      rvb #include <sys/malloc.h>
     85   1.1      rvb #include <sys/select.h>
     86   1.1      rvb 
     87   1.4      rvb #include <coda/coda.h>
     88   1.4      rvb #include <coda/cnode.h>
     89   1.4      rvb #include <coda/coda_namecache.h>
     90   1.1      rvb 
     91   1.5      rvb #ifdef	DEBUG
     92   1.5      rvb #include <coda/coda_vnops.h>
     93   1.5      rvb #endif
     94   1.5      rvb 
     95   1.1      rvb #ifndef insque
     96   1.1      rvb #include <sys/systm.h>
     97   1.1      rvb #endif /* insque */
     98   1.1      rvb 
     99   1.1      rvb /*
    100   1.1      rvb  * Declaration of the name cache data structure.
    101   1.1      rvb  */
    102   1.1      rvb 
    103   1.3      rvb int 	coda_nc_use = 1;			 /* Indicate use of CODA Name Cache */
    104   1.1      rvb 
    105   1.3      rvb int	coda_nc_size = CODA_NC_CACHESIZE;	 /* size of the cache */
    106   1.3      rvb int	coda_nc_hashsize = CODA_NC_HASHSIZE; /* size of the primary hash */
    107   1.1      rvb 
    108   1.3      rvb struct 	coda_cache *coda_nc_heap;	/* pointer to the cache entries */
    109   1.3      rvb struct	coda_hash  *coda_nc_hash;	/* hash table of cfscache pointers */
    110   1.3      rvb struct	coda_lru   coda_nc_lru;		/* head of lru chain */
    111   1.1      rvb 
    112   1.3      rvb struct coda_nc_statistics coda_nc_stat;	/* Keep various stats */
    113   1.1      rvb 
    114   1.1      rvb /*
    115   1.1      rvb  * for testing purposes
    116   1.1      rvb  */
    117   1.3      rvb int coda_nc_debug = 0;
    118   1.1      rvb 
    119   1.1      rvb /*
    120   1.3      rvb  * Entry points for the CODA Name Cache
    121   1.1      rvb  */
    122   1.3      rvb static struct coda_cache *
    123   1.3      rvb coda_nc_find(struct cnode *dcp, const char *name, int namelen,
    124   1.1      rvb 	struct ucred *cred, int hash);
    125   1.1      rvb static void
    126   1.3      rvb coda_nc_remove(struct coda_cache *cncp, enum dc_status dcstat);
    127   1.1      rvb 
    128   1.1      rvb /*
    129   1.1      rvb  * Initialize the cache, the LRU structure and the Hash structure(s)
    130   1.1      rvb  */
    131   1.1      rvb 
    132   1.3      rvb #define TOTAL_CACHE_SIZE 	(sizeof(struct coda_cache) * coda_nc_size)
    133   1.3      rvb #define TOTAL_HASH_SIZE 	(sizeof(struct coda_hash)  * coda_nc_hashsize)
    134   1.1      rvb 
    135   1.3      rvb int coda_nc_initialized = 0;      /* Initially the cache has not been initialized */
    136   1.1      rvb 
    137   1.1      rvb void
    138   1.3      rvb coda_nc_init(void)
    139   1.1      rvb {
    140   1.1      rvb     int i;
    141   1.1      rvb 
    142   1.1      rvb     /* zero the statistics structure */
    143   1.1      rvb 
    144  1.10  thorpej     memset(&coda_nc_stat, 0, (sizeof(struct coda_nc_statistics)));
    145   1.1      rvb 
    146   1.7      rvb #ifdef	CODA_VERBOSE
    147   1.3      rvb     printf("CODA NAME CACHE: CACHE %d, HASH TBL %d\n", CODA_NC_CACHESIZE, CODA_NC_HASHSIZE);
    148   1.5      rvb #endif
    149   1.3      rvb     CODA_ALLOC(coda_nc_heap, struct coda_cache *, TOTAL_CACHE_SIZE);
    150   1.3      rvb     CODA_ALLOC(coda_nc_hash, struct coda_hash *, TOTAL_HASH_SIZE);
    151   1.1      rvb 
    152   1.3      rvb     coda_nc_lru.lru_next =
    153   1.3      rvb 	coda_nc_lru.lru_prev = (struct coda_cache *)LRU_PART(&coda_nc_lru);
    154   1.1      rvb 
    155   1.1      rvb 
    156   1.3      rvb     for (i=0; i < coda_nc_size; i++) {	/* initialize the heap */
    157   1.3      rvb 	CODA_NC_LRUINS(&coda_nc_heap[i], &coda_nc_lru);
    158   1.3      rvb 	CODA_NC_HSHNUL(&coda_nc_heap[i]);
    159   1.3      rvb 	coda_nc_heap[i].cp = coda_nc_heap[i].dcp = (struct cnode *)0;
    160   1.1      rvb     }
    161   1.1      rvb 
    162   1.3      rvb     for (i=0; i < coda_nc_hashsize; i++) {	/* initialize the hashtable */
    163   1.3      rvb 	CODA_NC_HSHNUL((struct coda_cache *)&coda_nc_hash[i]);
    164   1.1      rvb     }
    165   1.1      rvb 
    166   1.3      rvb     coda_nc_initialized++;
    167   1.1      rvb }
    168   1.1      rvb 
    169   1.1      rvb /*
    170   1.1      rvb  * Auxillary routines -- shouldn't be entry points
    171   1.1      rvb  */
    172   1.1      rvb 
    173   1.3      rvb static struct coda_cache *
    174   1.3      rvb coda_nc_find(dcp, name, namelen, cred, hash)
    175   1.1      rvb 	struct cnode *dcp;
    176   1.1      rvb 	const char *name;
    177   1.1      rvb 	int namelen;
    178   1.1      rvb 	struct ucred *cred;
    179   1.1      rvb 	int hash;
    180   1.1      rvb {
    181   1.1      rvb 	/*
    182   1.1      rvb 	 * hash to find the appropriate bucket, look through the chain
    183   1.1      rvb 	 * for the right entry (especially right cred, unless cred == 0)
    184   1.1      rvb 	 */
    185   1.3      rvb 	struct coda_cache *cncp;
    186   1.1      rvb 	int count = 1;
    187   1.1      rvb 
    188   1.3      rvb 	CODA_NC_DEBUG(CODA_NC_FIND,
    189   1.3      rvb 		    myprintf(("coda_nc_find(dcp %p, name %s, len %d, cred %p, hash %d\n",
    190   1.1      rvb 			   dcp, name, namelen, cred, hash));)
    191   1.1      rvb 
    192   1.3      rvb 	for (cncp = coda_nc_hash[hash].hash_next;
    193   1.3      rvb 	     cncp != (struct coda_cache *)&coda_nc_hash[hash];
    194   1.1      rvb 	     cncp = cncp->hash_next, count++)
    195   1.1      rvb 	{
    196   1.1      rvb 
    197   1.3      rvb 	    if ((CODA_NAMEMATCH(cncp, name, namelen, dcp)) &&
    198   1.1      rvb 		((cred == 0) || (cncp->cred == cred)))
    199   1.1      rvb 	    {
    200   1.1      rvb 		/* compare cr_uid instead */
    201   1.3      rvb 		coda_nc_stat.Search_len += count;
    202   1.1      rvb 		return(cncp);
    203   1.1      rvb 	    }
    204   1.1      rvb #ifdef	DEBUG
    205   1.3      rvb 	    else if (CODA_NAMEMATCH(cncp, name, namelen, dcp)) {
    206   1.3      rvb 	    	printf("coda_nc_find: name %s, new cred = %p, cred = %p\n",
    207   1.1      rvb 			name, cred, cncp->cred);
    208   1.1      rvb 		printf("nref %d, nuid %d, ngid %d // oref %d, ocred %d, ogid %d\n",
    209   1.1      rvb 			cred->cr_ref, cred->cr_uid, cred->cr_gid,
    210   1.1      rvb 			cncp->cred->cr_ref, cncp->cred->cr_uid, cncp->cred->cr_gid);
    211   1.1      rvb 		print_cred(cred);
    212   1.1      rvb 		print_cred(cncp->cred);
    213   1.1      rvb 	    }
    214   1.1      rvb #endif
    215   1.1      rvb 	}
    216   1.1      rvb 
    217   1.3      rvb 	return((struct coda_cache *)0);
    218   1.1      rvb }
    219   1.1      rvb 
    220   1.1      rvb /*
    221   1.1      rvb  * Enter a new (dir cnode, name) pair into the cache, updating the
    222   1.1      rvb  * LRU and Hash as needed.
    223   1.1      rvb  */
    224   1.1      rvb void
    225   1.3      rvb coda_nc_enter(dcp, name, namelen, cred, cp)
    226   1.1      rvb     struct cnode *dcp;
    227   1.1      rvb     const char *name;
    228   1.1      rvb     int namelen;
    229   1.1      rvb     struct ucred *cred;
    230   1.1      rvb     struct cnode *cp;
    231   1.1      rvb {
    232   1.3      rvb     struct coda_cache *cncp;
    233   1.1      rvb     int hash;
    234   1.1      rvb 
    235   1.3      rvb     if (coda_nc_use == 0)			/* Cache is off */
    236   1.1      rvb 	return;
    237   1.1      rvb 
    238   1.3      rvb     CODA_NC_DEBUG(CODA_NC_ENTER,
    239   1.1      rvb 		myprintf(("Enter: dcp %p cp %p name %s cred %p \n",
    240   1.1      rvb 		       dcp, cp, name, cred)); )
    241   1.1      rvb 
    242   1.3      rvb     if (namelen > CODA_NC_NAMELEN) {
    243   1.3      rvb 	CODA_NC_DEBUG(CODA_NC_ENTER,
    244   1.1      rvb 		    myprintf(("long name enter %s\n",name));)
    245   1.3      rvb 	    coda_nc_stat.long_name_enters++;	/* record stats */
    246   1.1      rvb 	return;
    247   1.1      rvb     }
    248   1.1      rvb 
    249   1.3      rvb     hash = CODA_NC_HASH(name, namelen, dcp);
    250   1.3      rvb     cncp = coda_nc_find(dcp, name, namelen, cred, hash);
    251   1.3      rvb     if (cncp != (struct coda_cache *) 0) {
    252   1.3      rvb 	coda_nc_stat.dbl_enters++;		/* duplicate entry */
    253   1.1      rvb 	return;
    254   1.1      rvb     }
    255   1.1      rvb 
    256   1.3      rvb     coda_nc_stat.enters++;		/* record the enters statistic */
    257   1.1      rvb 
    258   1.1      rvb     /* Grab the next element in the lru chain */
    259   1.3      rvb     cncp = CODA_NC_LRUGET(coda_nc_lru);
    260   1.1      rvb 
    261   1.3      rvb     CODA_NC_LRUREM(cncp);	/* remove it from the lists */
    262   1.1      rvb 
    263   1.3      rvb     if (CODA_NC_VALID(cncp)) {
    264   1.1      rvb 	/* Seems really ugly, but we have to decrement the appropriate
    265   1.1      rvb 	   hash bucket length here, so we have to find the hash bucket
    266   1.1      rvb 	   */
    267   1.3      rvb 	coda_nc_hash[CODA_NC_HASH(cncp->name, cncp->namelen, cncp->dcp)].length--;
    268   1.1      rvb 
    269   1.3      rvb 	coda_nc_stat.lru_rm++;	/* zapped a valid entry */
    270   1.3      rvb 	CODA_NC_HSHREM(cncp);
    271   1.1      rvb 	vrele(CTOV(cncp->dcp));
    272   1.1      rvb 	vrele(CTOV(cncp->cp));
    273   1.1      rvb 	crfree(cncp->cred);
    274   1.1      rvb     }
    275   1.1      rvb 
    276   1.1      rvb     /*
    277   1.1      rvb      * Put a hold on the current vnodes and fill in the cache entry.
    278   1.1      rvb      */
    279   1.1      rvb     vref(CTOV(cp));
    280   1.1      rvb     vref(CTOV(dcp));
    281   1.1      rvb     crhold(cred);
    282   1.1      rvb     cncp->dcp = dcp;
    283   1.1      rvb     cncp->cp = cp;
    284   1.1      rvb     cncp->namelen = namelen;
    285   1.1      rvb     cncp->cred = cred;
    286   1.1      rvb 
    287   1.1      rvb     bcopy(name, cncp->name, (unsigned)namelen);
    288   1.1      rvb 
    289   1.1      rvb     /* Insert into the lru and hash chains. */
    290   1.1      rvb 
    291   1.3      rvb     CODA_NC_LRUINS(cncp, &coda_nc_lru);
    292   1.3      rvb     CODA_NC_HSHINS(cncp, &coda_nc_hash[hash]);
    293   1.3      rvb     coda_nc_hash[hash].length++;                      /* Used for tuning */
    294   1.1      rvb 
    295   1.3      rvb     CODA_NC_DEBUG(CODA_NC_PRINTCODA_NC, print_coda_nc(); )
    296   1.1      rvb }
    297   1.1      rvb 
    298   1.1      rvb /*
    299   1.1      rvb  * Find the (dir cnode, name) pair in the cache, if it's cred
    300   1.1      rvb  * matches the input, return it, otherwise return 0
    301   1.1      rvb  */
    302   1.1      rvb struct cnode *
    303   1.3      rvb coda_nc_lookup(dcp, name, namelen, cred)
    304   1.1      rvb 	struct cnode *dcp;
    305   1.1      rvb 	const char *name;
    306   1.1      rvb 	int namelen;
    307   1.1      rvb 	struct ucred *cred;
    308   1.1      rvb {
    309   1.1      rvb 	int hash;
    310   1.3      rvb 	struct coda_cache *cncp;
    311   1.1      rvb 
    312   1.3      rvb 	if (coda_nc_use == 0)			/* Cache is off */
    313   1.1      rvb 		return((struct cnode *) 0);
    314   1.1      rvb 
    315   1.3      rvb 	if (namelen > CODA_NC_NAMELEN) {
    316   1.3      rvb 	        CODA_NC_DEBUG(CODA_NC_LOOKUP,
    317   1.1      rvb 			    myprintf(("long name lookup %s\n",name));)
    318   1.3      rvb 		coda_nc_stat.long_name_lookups++;		/* record stats */
    319   1.1      rvb 		return((struct cnode *) 0);
    320   1.1      rvb 	}
    321   1.1      rvb 
    322   1.1      rvb 	/* Use the hash function to locate the starting point,
    323   1.1      rvb 	   then the search routine to go down the list looking for
    324   1.1      rvb 	   the correct cred.
    325   1.1      rvb  	 */
    326   1.1      rvb 
    327   1.3      rvb 	hash = CODA_NC_HASH(name, namelen, dcp);
    328   1.3      rvb 	cncp = coda_nc_find(dcp, name, namelen, cred, hash);
    329   1.3      rvb 	if (cncp == (struct coda_cache *) 0) {
    330   1.3      rvb 		coda_nc_stat.misses++;			/* record miss */
    331   1.1      rvb 		return((struct cnode *) 0);
    332   1.1      rvb 	}
    333   1.1      rvb 
    334   1.3      rvb 	coda_nc_stat.hits++;
    335   1.1      rvb 
    336   1.1      rvb 	/* put this entry at the end of the LRU */
    337   1.3      rvb 	CODA_NC_LRUREM(cncp);
    338   1.3      rvb 	CODA_NC_LRUINS(cncp, &coda_nc_lru);
    339   1.1      rvb 
    340   1.1      rvb 	/* move it to the front of the hash chain */
    341   1.1      rvb 	/* don't need to change the hash bucket length */
    342   1.3      rvb 	CODA_NC_HSHREM(cncp);
    343   1.3      rvb 	CODA_NC_HSHINS(cncp, &coda_nc_hash[hash]);
    344   1.1      rvb 
    345   1.3      rvb 	CODA_NC_DEBUG(CODA_NC_LOOKUP,
    346   1.1      rvb 		printf("lookup: dcp %p, name %s, cred %p = cp %p\n",
    347   1.1      rvb 			dcp, name, cred, cncp->cp); )
    348   1.1      rvb 
    349   1.1      rvb 	return(cncp->cp);
    350   1.1      rvb }
    351   1.1      rvb 
    352   1.1      rvb static void
    353   1.3      rvb coda_nc_remove(cncp, dcstat)
    354   1.3      rvb 	struct coda_cache *cncp;
    355   1.1      rvb 	enum dc_status dcstat;
    356   1.1      rvb {
    357   1.1      rvb 	/*
    358   1.1      rvb 	 * remove an entry -- vrele(cncp->dcp, cp), crfree(cred),
    359   1.1      rvb 	 * remove it from it's hash chain, and
    360   1.1      rvb 	 * place it at the head of the lru list.
    361   1.1      rvb 	 */
    362   1.3      rvb         CODA_NC_DEBUG(CODA_NC_REMOVE,
    363   1.3      rvb 		    myprintf(("coda_nc_remove %s from parent %lx.%lx.%lx\n",
    364   1.1      rvb 			   cncp->name, (cncp->dcp)->c_fid.Volume,
    365   1.1      rvb 			   (cncp->dcp)->c_fid.Vnode, (cncp->dcp)->c_fid.Unique));)
    366   1.1      rvb 
    367   1.3      rvb   	CODA_NC_HSHREM(cncp);
    368   1.1      rvb 
    369   1.3      rvb 	CODA_NC_HSHNUL(cncp);		/* have it be a null chain */
    370   1.1      rvb 	if ((dcstat == IS_DOWNCALL) && (CTOV(cncp->dcp)->v_usecount == 1)) {
    371   1.1      rvb 		cncp->dcp->c_flags |= C_PURGING;
    372   1.1      rvb 	}
    373   1.1      rvb 	vrele(CTOV(cncp->dcp));
    374   1.1      rvb 
    375   1.1      rvb 	if ((dcstat == IS_DOWNCALL) && (CTOV(cncp->cp)->v_usecount == 1)) {
    376   1.1      rvb 		cncp->cp->c_flags |= C_PURGING;
    377   1.1      rvb 	}
    378   1.1      rvb 	vrele(CTOV(cncp->cp));
    379   1.1      rvb 
    380   1.1      rvb 	crfree(cncp->cred);
    381  1.10  thorpej 	memset(DATA_PART(cncp), 0, DATA_SIZE);
    382   1.1      rvb 
    383   1.1      rvb 	/* Put the null entry just after the least-recently-used entry */
    384   1.1      rvb 	/* LRU_TOP adjusts the pointer to point to the top of the structure. */
    385   1.3      rvb 	CODA_NC_LRUREM(cncp);
    386   1.3      rvb 	CODA_NC_LRUINS(cncp, LRU_TOP(coda_nc_lru.lru_prev));
    387   1.1      rvb }
    388   1.1      rvb 
    389   1.1      rvb /*
    390   1.1      rvb  * Remove all entries with a parent which has the input fid.
    391   1.1      rvb  */
    392   1.1      rvb void
    393   1.3      rvb coda_nc_zapParentfid(fid, dcstat)
    394   1.1      rvb 	ViceFid *fid;
    395   1.1      rvb 	enum dc_status dcstat;
    396   1.1      rvb {
    397   1.1      rvb 	/* To get to a specific fid, we might either have another hashing
    398   1.1      rvb 	   function or do a sequential search through the cache for the
    399   1.1      rvb 	   appropriate entries. The later may be acceptable since I don't
    400  1.12      wiz 	   think callbacks or whatever Case 1 covers are frequent occurrences.
    401   1.1      rvb 	 */
    402   1.3      rvb 	struct coda_cache *cncp, *ncncp;
    403   1.1      rvb 	int i;
    404   1.1      rvb 
    405   1.3      rvb 	if (coda_nc_use == 0)			/* Cache is off */
    406   1.1      rvb 		return;
    407   1.1      rvb 
    408   1.3      rvb 	CODA_NC_DEBUG(CODA_NC_ZAPPFID,
    409   1.1      rvb 		myprintf(("ZapParent: fid 0x%lx, 0x%lx, 0x%lx \n",
    410   1.1      rvb 			fid->Volume, fid->Vnode, fid->Unique)); )
    411   1.1      rvb 
    412   1.3      rvb 	coda_nc_stat.zapPfids++;
    413   1.1      rvb 
    414   1.3      rvb 	for (i = 0; i < coda_nc_hashsize; i++) {
    415   1.1      rvb 
    416   1.1      rvb 		/*
    417   1.1      rvb 		 * Need to save the hash_next pointer in case we remove the
    418   1.1      rvb 		 * entry. remove causes hash_next to point to itself.
    419   1.1      rvb 		 */
    420   1.1      rvb 
    421   1.3      rvb 		for (cncp = coda_nc_hash[i].hash_next;
    422   1.3      rvb 		     cncp != (struct coda_cache *)&coda_nc_hash[i];
    423   1.1      rvb 		     cncp = ncncp) {
    424   1.1      rvb 			ncncp = cncp->hash_next;
    425   1.1      rvb 			if ((cncp->dcp->c_fid.Volume == fid->Volume) &&
    426   1.1      rvb 			    (cncp->dcp->c_fid.Vnode == fid->Vnode)   &&
    427   1.1      rvb 			    (cncp->dcp->c_fid.Unique == fid->Unique)) {
    428   1.3      rvb 			        coda_nc_hash[i].length--;      /* Used for tuning */
    429   1.3      rvb 				coda_nc_remove(cncp, dcstat);
    430   1.1      rvb 			}
    431   1.1      rvb 		}
    432   1.1      rvb 	}
    433   1.1      rvb }
    434   1.1      rvb 
    435   1.1      rvb /*
    436   1.1      rvb  * Remove all entries which have the same fid as the input
    437   1.1      rvb  */
    438   1.1      rvb void
    439   1.3      rvb coda_nc_zapfid(fid, dcstat)
    440   1.1      rvb 	ViceFid *fid;
    441   1.1      rvb 	enum dc_status dcstat;
    442   1.1      rvb {
    443   1.1      rvb 	/* See comment for zapParentfid. This routine will be used
    444   1.1      rvb 	   if attributes are being cached.
    445   1.1      rvb 	 */
    446   1.3      rvb 	struct coda_cache *cncp, *ncncp;
    447   1.1      rvb 	int i;
    448   1.1      rvb 
    449   1.3      rvb 	if (coda_nc_use == 0)			/* Cache is off */
    450   1.1      rvb 		return;
    451   1.1      rvb 
    452   1.3      rvb 	CODA_NC_DEBUG(CODA_NC_ZAPFID,
    453   1.1      rvb 		myprintf(("Zapfid: fid 0x%lx, 0x%lx, 0x%lx \n",
    454   1.1      rvb 			fid->Volume, fid->Vnode, fid->Unique)); )
    455   1.1      rvb 
    456   1.3      rvb 	coda_nc_stat.zapFids++;
    457   1.1      rvb 
    458   1.3      rvb 	for (i = 0; i < coda_nc_hashsize; i++) {
    459   1.3      rvb 		for (cncp = coda_nc_hash[i].hash_next;
    460   1.3      rvb 		     cncp != (struct coda_cache *)&coda_nc_hash[i];
    461   1.1      rvb 		     cncp = ncncp) {
    462   1.1      rvb 			ncncp = cncp->hash_next;
    463   1.1      rvb 			if ((cncp->cp->c_fid.Volume == fid->Volume) &&
    464   1.1      rvb 			    (cncp->cp->c_fid.Vnode == fid->Vnode)   &&
    465   1.1      rvb 			    (cncp->cp->c_fid.Unique == fid->Unique)) {
    466   1.3      rvb 			        coda_nc_hash[i].length--;     /* Used for tuning */
    467   1.3      rvb 				coda_nc_remove(cncp, dcstat);
    468   1.1      rvb 			}
    469   1.1      rvb 		}
    470   1.1      rvb 	}
    471   1.1      rvb }
    472   1.1      rvb 
    473   1.1      rvb /*
    474   1.1      rvb  * Remove all entries which match the fid and the cred
    475   1.1      rvb  */
    476   1.1      rvb void
    477   1.3      rvb coda_nc_zapvnode(fid, cred, dcstat)
    478   1.1      rvb 	ViceFid *fid;
    479   1.1      rvb 	struct ucred *cred;
    480   1.1      rvb 	enum dc_status dcstat;
    481   1.1      rvb {
    482   1.1      rvb 	/* See comment for zapfid. I don't think that one would ever
    483   1.1      rvb 	   want to zap a file with a specific cred from the kernel.
    484   1.1      rvb 	   We'll leave this one unimplemented.
    485   1.1      rvb 	 */
    486   1.3      rvb 	if (coda_nc_use == 0)			/* Cache is off */
    487   1.1      rvb 		return;
    488   1.1      rvb 
    489   1.3      rvb 	CODA_NC_DEBUG(CODA_NC_ZAPVNODE,
    490   1.1      rvb 		myprintf(("Zapvnode: fid 0x%lx, 0x%lx, 0x%lx cred %p\n",
    491   1.1      rvb 			  fid->Volume, fid->Vnode, fid->Unique, cred)); )
    492   1.1      rvb 
    493   1.1      rvb }
    494   1.1      rvb 
    495   1.1      rvb /*
    496   1.1      rvb  * Remove all entries which have the (dir vnode, name) pair
    497   1.1      rvb  */
    498   1.1      rvb void
    499   1.3      rvb coda_nc_zapfile(dcp, name, namelen)
    500   1.1      rvb 	struct cnode *dcp;
    501   1.1      rvb 	const char *name;
    502   1.1      rvb 	int namelen;
    503   1.1      rvb {
    504   1.1      rvb 	/* use the hash function to locate the file, then zap all
    505   1.1      rvb  	   entries of it regardless of the cred.
    506   1.1      rvb 	 */
    507   1.3      rvb 	struct coda_cache *cncp;
    508   1.1      rvb 	int hash;
    509   1.1      rvb 
    510   1.3      rvb 	if (coda_nc_use == 0)			/* Cache is off */
    511   1.1      rvb 		return;
    512   1.1      rvb 
    513   1.3      rvb 	CODA_NC_DEBUG(CODA_NC_ZAPFILE,
    514   1.1      rvb 		myprintf(("Zapfile: dcp %p name %s \n",
    515   1.1      rvb 			  dcp, name)); )
    516   1.1      rvb 
    517   1.3      rvb 	if (namelen > CODA_NC_NAMELEN) {
    518   1.3      rvb 		coda_nc_stat.long_remove++;		/* record stats */
    519   1.1      rvb 		return;
    520   1.1      rvb 	}
    521   1.1      rvb 
    522   1.3      rvb 	coda_nc_stat.zapFile++;
    523   1.1      rvb 
    524   1.3      rvb 	hash = CODA_NC_HASH(name, namelen, dcp);
    525   1.3      rvb 	cncp = coda_nc_find(dcp, name, namelen, 0, hash);
    526   1.1      rvb 
    527   1.1      rvb 	while (cncp) {
    528   1.3      rvb 	  coda_nc_hash[hash].length--;                 /* Used for tuning */
    529   1.1      rvb /* 1.3 */
    530   1.3      rvb 	  coda_nc_remove(cncp, NOT_DOWNCALL);
    531   1.3      rvb 	  cncp = coda_nc_find(dcp, name, namelen, 0, hash);
    532   1.1      rvb 	}
    533   1.1      rvb }
    534   1.1      rvb 
    535   1.1      rvb /*
    536   1.1      rvb  * Remove all the entries for a particular user. Used when tokens expire.
    537   1.1      rvb  * A user is determined by his/her effective user id (id_uid).
    538   1.1      rvb  */
    539   1.1      rvb void
    540   1.3      rvb coda_nc_purge_user(uid, dcstat)
    541   1.1      rvb 	vuid_t	uid;
    542   1.1      rvb 	enum dc_status  dcstat;
    543   1.1      rvb {
    544   1.1      rvb 	/*
    545   1.1      rvb 	 * I think the best approach is to go through the entire cache
    546   1.1      rvb 	 * via HASH or whatever and zap all entries which match the
    547   1.1      rvb 	 * input cred. Or just flush the whole cache.  It might be
    548   1.1      rvb 	 * best to go through on basis of LRU since cache will almost
    549   1.1      rvb 	 * always be full and LRU is more straightforward.
    550   1.1      rvb 	 */
    551   1.1      rvb 
    552   1.3      rvb 	struct coda_cache *cncp, *ncncp;
    553   1.1      rvb 	int hash;
    554   1.1      rvb 
    555   1.3      rvb 	if (coda_nc_use == 0)			/* Cache is off */
    556   1.1      rvb 		return;
    557   1.1      rvb 
    558   1.3      rvb 	CODA_NC_DEBUG(CODA_NC_PURGEUSER,
    559   1.8      rvb 		myprintf(("ZapDude: uid %x\n", uid)); )
    560   1.3      rvb 	coda_nc_stat.zapUsers++;
    561   1.1      rvb 
    562   1.3      rvb 	for (cncp = CODA_NC_LRUGET(coda_nc_lru);
    563   1.3      rvb 	     cncp != (struct coda_cache *)(&coda_nc_lru);
    564   1.1      rvb 	     cncp = ncncp) {
    565   1.3      rvb 		ncncp = CODA_NC_LRUGET(*cncp);
    566   1.1      rvb 
    567   1.3      rvb 		if ((CODA_NC_VALID(cncp)) &&
    568   1.1      rvb 		   ((cncp->cred)->cr_uid == uid)) {
    569   1.1      rvb 		        /* Seems really ugly, but we have to decrement the appropriate
    570   1.1      rvb 			   hash bucket length here, so we have to find the hash bucket
    571   1.1      rvb 			   */
    572   1.3      rvb 		        hash = CODA_NC_HASH(cncp->name, cncp->namelen, cncp->dcp);
    573   1.3      rvb 			coda_nc_hash[hash].length--;     /* For performance tuning */
    574   1.1      rvb 
    575   1.3      rvb 			coda_nc_remove(cncp, dcstat);
    576   1.1      rvb 		}
    577   1.1      rvb 	}
    578   1.1      rvb }
    579   1.1      rvb 
    580   1.1      rvb /*
    581   1.1      rvb  * Flush the entire name cache. In response to a flush of the Venus cache.
    582   1.1      rvb  */
    583   1.1      rvb void
    584   1.3      rvb coda_nc_flush(dcstat)
    585   1.1      rvb 	enum dc_status dcstat;
    586   1.1      rvb {
    587   1.1      rvb 	/* One option is to deallocate the current name cache and
    588   1.1      rvb 	   call init to start again. Or just deallocate, then rebuild.
    589   1.1      rvb 	   Or again, we could just go through the array and zero the
    590   1.1      rvb 	   appropriate fields.
    591   1.1      rvb 	 */
    592   1.1      rvb 
    593   1.1      rvb 	/*
    594   1.1      rvb 	 * Go through the whole lru chain and kill everything as we go.
    595   1.1      rvb 	 * I don't use remove since that would rebuild the lru chain
    596   1.1      rvb 	 * as it went and that seemed unneccesary.
    597   1.1      rvb 	 */
    598   1.3      rvb 	struct coda_cache *cncp;
    599   1.1      rvb 	int i;
    600   1.1      rvb 
    601   1.3      rvb 	if (coda_nc_use == 0)			/* Cache is off */
    602   1.1      rvb 		return;
    603   1.1      rvb 
    604   1.3      rvb 	coda_nc_stat.Flushes++;
    605   1.1      rvb 
    606   1.3      rvb 	for (cncp = CODA_NC_LRUGET(coda_nc_lru);
    607   1.3      rvb 	     cncp != (struct coda_cache *)&coda_nc_lru;
    608   1.3      rvb 	     cncp = CODA_NC_LRUGET(*cncp)) {
    609   1.3      rvb 		if (CODA_NC_VALID(cncp)) {
    610   1.1      rvb 
    611   1.3      rvb 			CODA_NC_HSHREM(cncp);	/* only zero valid nodes */
    612   1.3      rvb 			CODA_NC_HSHNUL(cncp);
    613   1.1      rvb 			if ((dcstat == IS_DOWNCALL)
    614   1.1      rvb 			    && (CTOV(cncp->dcp)->v_usecount == 1))
    615   1.1      rvb 			{
    616   1.1      rvb 				cncp->dcp->c_flags |= C_PURGING;
    617   1.1      rvb 			}
    618   1.1      rvb 			vrele(CTOV(cncp->dcp));
    619   1.1      rvb 
    620   1.1      rvb 			if (CTOV(cncp->cp)->v_flag & VTEXT) {
    621   1.3      rvb 			    if (coda_vmflush(cncp->cp))
    622   1.3      rvb 				CODADEBUG(CODA_FLUSH,
    623   1.3      rvb 					 myprintf(("coda_nc_flush: (%lx.%lx.%lx) busy\n", cncp->cp->c_fid.Volume, cncp->cp->c_fid.Vnode, cncp->cp->c_fid.Unique)); )
    624   1.1      rvb 			}
    625   1.1      rvb 
    626   1.1      rvb 			if ((dcstat == IS_DOWNCALL)
    627   1.1      rvb 			    && (CTOV(cncp->cp)->v_usecount == 1))
    628   1.1      rvb 			{
    629   1.1      rvb 				cncp->cp->c_flags |= C_PURGING;
    630   1.1      rvb 			}
    631   1.1      rvb 			vrele(CTOV(cncp->cp));
    632   1.1      rvb 
    633   1.1      rvb 			crfree(cncp->cred);
    634  1.10  thorpej 			memset(DATA_PART(cncp), 0, DATA_SIZE);
    635   1.1      rvb 		}
    636   1.1      rvb 	}
    637   1.1      rvb 
    638   1.3      rvb 	for (i = 0; i < coda_nc_hashsize; i++)
    639   1.3      rvb 	  coda_nc_hash[i].length = 0;
    640   1.1      rvb }
    641   1.1      rvb 
    642   1.1      rvb /*
    643   1.1      rvb  * Debugging routines
    644   1.1      rvb  */
    645   1.1      rvb 
    646   1.1      rvb /*
    647   1.1      rvb  * This routine should print out all the hash chains to the console.
    648   1.1      rvb  */
    649   1.1      rvb void
    650   1.3      rvb print_coda_nc(void)
    651   1.1      rvb {
    652   1.1      rvb 	int hash;
    653   1.3      rvb 	struct coda_cache *cncp;
    654   1.1      rvb 
    655   1.3      rvb 	for (hash = 0; hash < coda_nc_hashsize; hash++) {
    656   1.1      rvb 		myprintf(("\nhash %d\n",hash));
    657   1.1      rvb 
    658   1.3      rvb 		for (cncp = coda_nc_hash[hash].hash_next;
    659   1.3      rvb 		     cncp != (struct coda_cache *)&coda_nc_hash[hash];
    660   1.1      rvb 		     cncp = cncp->hash_next) {
    661   1.1      rvb 			myprintf(("cp %p dcp %p cred %p name %s\n",
    662   1.1      rvb 				  cncp->cp, cncp->dcp,
    663   1.1      rvb 				  cncp->cred, cncp->name));
    664   1.1      rvb 		     }
    665   1.1      rvb 	}
    666   1.1      rvb }
    667   1.1      rvb 
    668   1.1      rvb void
    669   1.3      rvb coda_nc_gather_stats(void)
    670   1.1      rvb {
    671   1.1      rvb     int i, max = 0, sum = 0, temp, zeros = 0, ave, n;
    672   1.1      rvb 
    673   1.3      rvb 	for (i = 0; i < coda_nc_hashsize; i++) {
    674   1.3      rvb 	  if (coda_nc_hash[i].length) {
    675   1.3      rvb 	    sum += coda_nc_hash[i].length;
    676   1.1      rvb 	  } else {
    677   1.1      rvb 	    zeros++;
    678   1.1      rvb 	  }
    679   1.1      rvb 
    680   1.3      rvb 	  if (coda_nc_hash[i].length > max)
    681   1.3      rvb 	    max = coda_nc_hash[i].length;
    682   1.1      rvb 	}
    683   1.1      rvb 
    684   1.1      rvb 	/*
    685   1.1      rvb 	 * When computing the Arithmetic mean, only count slots which
    686   1.1      rvb 	 * are not empty in the distribution.
    687   1.1      rvb 	 */
    688   1.3      rvb         coda_nc_stat.Sum_bucket_len = sum;
    689   1.3      rvb         coda_nc_stat.Num_zero_len = zeros;
    690   1.3      rvb         coda_nc_stat.Max_bucket_len = max;
    691   1.1      rvb 
    692   1.3      rvb 	if ((n = coda_nc_hashsize - zeros) > 0)
    693   1.1      rvb 	  ave = sum / n;
    694   1.1      rvb 	else
    695   1.1      rvb 	  ave = 0;
    696   1.1      rvb 
    697   1.1      rvb 	sum = 0;
    698   1.3      rvb 	for (i = 0; i < coda_nc_hashsize; i++) {
    699   1.3      rvb 	  if (coda_nc_hash[i].length) {
    700   1.3      rvb 	    temp = coda_nc_hash[i].length - ave;
    701   1.1      rvb 	    sum += temp * temp;
    702   1.1      rvb 	  }
    703   1.1      rvb 	}
    704   1.3      rvb         coda_nc_stat.Sum2_bucket_len = sum;
    705   1.1      rvb }
    706   1.1      rvb 
    707   1.1      rvb /*
    708   1.1      rvb  * The purpose of this routine is to allow the hash and cache sizes to be
    709   1.1      rvb  * changed dynamically. This should only be used in controlled environments,
    710   1.1      rvb  * it makes no effort to lock other users from accessing the cache while it
    711   1.1      rvb  * is in an improper state (except by turning the cache off).
    712   1.1      rvb  */
    713   1.1      rvb int
    714   1.3      rvb coda_nc_resize(hashsize, heapsize, dcstat)
    715   1.1      rvb      int hashsize, heapsize;
    716   1.1      rvb      enum dc_status dcstat;
    717   1.1      rvb {
    718   1.1      rvb     if ((hashsize % 2) || (heapsize % 2)) { /* Illegal hash or cache sizes */
    719   1.1      rvb 	return(EINVAL);
    720   1.1      rvb     }
    721   1.1      rvb 
    722   1.3      rvb     coda_nc_use = 0;                       /* Turn the cache off */
    723   1.1      rvb 
    724   1.3      rvb     coda_nc_flush(dcstat);                 /* free any cnodes in the cache */
    725   1.1      rvb 
    726   1.1      rvb     /* WARNING: free must happen *before* size is reset */
    727   1.3      rvb     CODA_FREE(coda_nc_heap,TOTAL_CACHE_SIZE);
    728   1.3      rvb     CODA_FREE(coda_nc_hash,TOTAL_HASH_SIZE);
    729   1.1      rvb 
    730   1.3      rvb     coda_nc_hashsize = hashsize;
    731   1.3      rvb     coda_nc_size = heapsize;
    732   1.1      rvb 
    733   1.3      rvb     coda_nc_init();                        /* Set up a cache with the new size */
    734   1.1      rvb 
    735   1.3      rvb     coda_nc_use = 1;                       /* Turn the cache back on */
    736   1.1      rvb     return(0);
    737   1.1      rvb }
    738   1.1      rvb 
    739   1.3      rvb char coda_nc_name_buf[CODA_MAXNAMLEN+1];
    740   1.1      rvb 
    741   1.1      rvb void
    742   1.3      rvb coda_nc_name(struct cnode *cp)
    743   1.1      rvb {
    744   1.3      rvb 	struct coda_cache *cncp, *ncncp;
    745   1.1      rvb 	int i;
    746   1.1      rvb 
    747   1.3      rvb 	if (coda_nc_use == 0)			/* Cache is off */
    748   1.1      rvb 		return;
    749   1.1      rvb 
    750   1.3      rvb 	for (i = 0; i < coda_nc_hashsize; i++) {
    751   1.3      rvb 		for (cncp = coda_nc_hash[i].hash_next;
    752   1.3      rvb 		     cncp != (struct coda_cache *)&coda_nc_hash[i];
    753   1.1      rvb 		     cncp = ncncp) {
    754   1.1      rvb 			ncncp = cncp->hash_next;
    755   1.1      rvb 			if (cncp->cp == cp) {
    756   1.3      rvb 				bcopy(cncp->name, coda_nc_name_buf, cncp->namelen);
    757   1.3      rvb 				coda_nc_name_buf[cncp->namelen] = 0;
    758   1.1      rvb 				printf(" is %s (%p,%p)@%p",
    759   1.3      rvb 					coda_nc_name_buf, cncp->cp, cncp->dcp, cncp);
    760   1.1      rvb 			}
    761   1.1      rvb 
    762   1.1      rvb 		}
    763   1.1      rvb 	}
    764   1.1      rvb }
    765