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