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