f9555d02ab0779007bd0af84ee64d74b4a6316b8
[openafs.git] / src / afs / afs_pioctl.c
1 /*
2  * Copyright 2000, International Business Machines Corporation and others.
3  * All Rights Reserved.
4  *
5  * This software has been released under the terms of the IBM Public
6  * License.  For details, see the LICENSE file in the top-level source
7  * directory or online at http://www.openafs.org/dl/license10.html
8  */
9
10 #include <afsconfig.h>
11 #include "afs/param.h"
12
13 RCSID
14     ("$Header$");
15
16 #include "afs/sysincludes.h"    /* Standard vendor system headers */
17 #ifdef AFS_OBSD_ENV
18 #include "h/syscallargs.h"
19 #endif
20 #ifdef AFS_FBSD50_ENV
21 #include "h/sysproto.h"
22 #endif
23 #include "afsincludes.h"        /* Afs-based standard headers */
24 #include "afs/afs_stats.h"      /* afs statistics */
25 #include "afs/vice.h"
26 #include "rx/rx_globals.h"
27
28 struct VenusFid afs_rootFid;
29 afs_int32 afs_waitForever = 0;
30 short afs_waitForeverCount = 0;
31 afs_int32 afs_showflags = GAGUSER | GAGCONSOLE; /* show all messages */
32
33 #define DECL_PIOCTL(x) static int x(struct vcache *avc, int afun, struct vrequest *areq, \
34         char *ain, char *aout, afs_int32 ainSize, afs_int32 *aoutSize, \
35         struct AFS_UCRED **acred)
36
37 /* Prototypes for pioctl routines */
38 DECL_PIOCTL(PGetFID);
39 DECL_PIOCTL(PSetAcl);
40 DECL_PIOCTL(PStoreBehind);
41 DECL_PIOCTL(PGCPAGs);
42 DECL_PIOCTL(PGetAcl);
43 DECL_PIOCTL(PNoop);
44 DECL_PIOCTL(PBogus);
45 DECL_PIOCTL(PGetFileCell);
46 DECL_PIOCTL(PGetWSCell);
47 DECL_PIOCTL(PGetUserCell);
48 DECL_PIOCTL(PSetTokens);
49 DECL_PIOCTL(PGetVolumeStatus);
50 DECL_PIOCTL(PSetVolumeStatus);
51 DECL_PIOCTL(PFlush);
52 DECL_PIOCTL(PNewStatMount);
53 DECL_PIOCTL(PGetTokens);
54 DECL_PIOCTL(PUnlog);
55 DECL_PIOCTL(PMariner);
56 DECL_PIOCTL(PCheckServers);
57 DECL_PIOCTL(PCheckVolNames);
58 DECL_PIOCTL(PCheckAuth);
59 DECL_PIOCTL(PFindVolume);
60 DECL_PIOCTL(PViceAccess);
61 DECL_PIOCTL(PSetCacheSize);
62 DECL_PIOCTL(PGetCacheSize);
63 DECL_PIOCTL(PRemoveCallBack);
64 DECL_PIOCTL(PNewCell);
65 DECL_PIOCTL(PNewAlias);
66 DECL_PIOCTL(PListCells);
67 DECL_PIOCTL(PListAliases);
68 DECL_PIOCTL(PRemoveMount);
69 DECL_PIOCTL(PVenusLogging);
70 DECL_PIOCTL(PGetCellStatus);
71 DECL_PIOCTL(PSetCellStatus);
72 DECL_PIOCTL(PFlushVolumeData);
73 DECL_PIOCTL(PGetVnodeXStatus);
74 DECL_PIOCTL(PSetSysName);
75 DECL_PIOCTL(PSetSPrefs);
76 DECL_PIOCTL(PSetSPrefs33);
77 DECL_PIOCTL(PGetSPrefs);
78 DECL_PIOCTL(PExportAfs);
79 DECL_PIOCTL(PGag);
80 DECL_PIOCTL(PTwiddleRx);
81 DECL_PIOCTL(PGetInitParams);
82 DECL_PIOCTL(PGetRxkcrypt);
83 DECL_PIOCTL(PSetRxkcrypt);
84 DECL_PIOCTL(PGetCPrefs);
85 DECL_PIOCTL(PSetCPrefs);
86 DECL_PIOCTL(PFlushMount);
87 DECL_PIOCTL(PRxStatProc);
88 DECL_PIOCTL(PRxStatPeer);
89 DECL_PIOCTL(PPrefetchFromTape);
90 DECL_PIOCTL(PResidencyCmd);
91
92 /*
93  * A macro that says whether we're going to need HandleClientContext().
94  * This is currently used only by the nfs translator.
95  */
96 #if !defined(AFS_NONFSTRANS) || defined(AFS_AIX_IAUTH_ENV)
97 #define AFS_NEED_CLIENTCONTEXT
98 #endif
99
100 /* Prototypes for private routines */
101 #ifdef AFS_NEED_CLIENTCONTEXT
102 static int HandleClientContext(struct afs_ioctl *ablob, int *com,
103                                struct AFS_UCRED **acred,
104                                struct AFS_UCRED *credp);
105 #endif
106 int HandleIoctl(register struct vcache *avc, register afs_int32 acom,
107                 struct afs_ioctl *adata);
108 int afs_HandlePioctl(struct vnode *avp, afs_int32 acom,
109                      register struct afs_ioctl *ablob, int afollow,
110                      struct AFS_UCRED **acred);
111 static int Prefetch(char *apath, struct afs_ioctl *adata, int afollow,
112                     struct AFS_UCRED *acred);
113
114
115 static int (*(VpioctlSw[])) () = {
116     PBogus,                     /* 0 */
117         PSetAcl,                /* 1 */
118         PGetAcl,                /* 2 */
119         PSetTokens,             /* 3 */
120         PGetVolumeStatus,       /* 4 */
121         PSetVolumeStatus,       /* 5 */
122         PFlush,                 /* 6 */
123         PBogus,                 /* 7 */
124         PGetTokens,             /* 8 */
125         PUnlog,                 /* 9 */
126         PCheckServers,          /* 10 */
127         PCheckVolNames,         /* 11 */
128         PCheckAuth,             /* 12 */
129         PBogus,                 /* 13 -- used to be quick check time */
130         PFindVolume,            /* 14 */
131         PBogus,                 /* 15 -- prefetch is now special-cased; see pioctl code! */
132         PBogus,                 /* 16 -- used to be testing code */
133         PNoop,                  /* 17 -- used to be enable group */
134         PNoop,                  /* 18 -- used to be disable group */
135         PBogus,                 /* 19 -- used to be list group */
136         PViceAccess,            /* 20 */
137         PUnlog,                 /* 21 -- unlog *is* unpag in this system */
138         PGetFID,                /* 22 -- get file ID */
139         PBogus,                 /* 23 -- used to be waitforever */
140         PSetCacheSize,          /* 24 */
141         PRemoveCallBack,        /* 25 -- flush only the callback */
142         PNewCell,               /* 26 */
143         PListCells,             /* 27 */
144         PRemoveMount,           /* 28 -- delete mount point */
145         PNewStatMount,          /* 29 -- new style mount point stat */
146         PGetFileCell,           /* 30 -- get cell name for input file */
147         PGetWSCell,             /* 31 -- get cell name for workstation */
148         PMariner,               /* 32 - set/get mariner host */
149         PGetUserCell,           /* 33 -- get cell name for user */
150         PVenusLogging,          /* 34 -- Enable/Disable logging */
151         PGetCellStatus,         /* 35 */
152         PSetCellStatus,         /* 36 */
153         PFlushVolumeData,       /* 37 -- flush all data from a volume */
154         PSetSysName,            /* 38 - Set system name */
155         PExportAfs,             /* 39 - Export Afs to remote nfs clients */
156         PGetCacheSize,          /* 40 - get cache size and usage */
157         PGetVnodeXStatus,       /* 41 - get vcache's special status */
158         PSetSPrefs33,           /* 42 - Set CM Server preferences... */
159         PGetSPrefs,             /* 43 - Get CM Server preferences... */
160         PGag,                   /* 44 - turn off/on all CM messages */
161         PTwiddleRx,             /* 45 - adjust some RX params       */
162         PSetSPrefs,             /* 46 - Set CM Server preferences... */
163         PStoreBehind,           /* 47 - set degree of store behind to be done */
164         PGCPAGs,                /* 48 - disable automatic pag gc-ing */
165         PGetInitParams,         /* 49 - get initial cm params */
166         PGetCPrefs,             /* 50 - get client interface addresses */
167         PSetCPrefs,             /* 51 - set client interface addresses */
168         PFlushMount,            /* 52 - flush mount symlink data */
169         PRxStatProc,            /* 53 - control process RX statistics */
170         PRxStatPeer,            /* 54 - control peer RX statistics */
171         PGetRxkcrypt,           /* 55 -- Get rxkad encryption flag */
172         PSetRxkcrypt,           /* 56 -- Set rxkad encryption flag */
173         PBogus,                 /* 57 -- arla: set file prio */
174         PBogus,                 /* 58 -- arla: fallback getfh */
175         PBogus,                 /* 59 -- arla: fallback fhopen */
176         PBogus,                 /* 60 -- arla: controls xfsdebug */
177         PBogus,                 /* 61 -- arla: controls arla debug */
178         PBogus,                 /* 62 -- arla: debug interface */
179         PBogus,                 /* 63 -- arla: print xfs status */
180         PBogus,                 /* 64 -- arla: force cache check */
181         PBogus,                 /* 65 -- arla: break callback */
182         PPrefetchFromTape,      /* 66 -- MR-AFS: prefetch file from tape */
183         PResidencyCmd,          /* 67 -- MR-AFS: generic commnd interface */
184         PBogus,                 /* 68 -- arla: fetch stats */
185 };
186
187 static int (*(CpioctlSw[])) () = {
188     PBogus,                     /* 0 */
189         PNewAlias,              /* 1 -- create new cell alias */
190         PListAliases,           /* 2 -- list cell aliases */
191 };
192
193 #define PSetClientContext 99    /*  Special pioctl to setup caller's creds  */
194 int afs_nobody = NFS_NOBODY;
195
196 static void
197 afs_ioctl32_to_afs_ioctl(const struct afs_ioctl32 *src, struct afs_ioctl *dst)
198 {
199     dst->in = (char *)(unsigned long)src->in;
200     dst->out = (char *)(unsigned long)src->out;
201     dst->in_size = src->in_size;
202     dst->out_size = src->out_size;
203 }
204
205 /*
206  * If you need to change copyin_afs_ioctl(), you may also need to change
207  * copyin_iparam().
208  */
209
210 static int
211 copyin_afs_ioctl(caddr_t cmarg, struct afs_ioctl *dst)
212 {
213     int code;
214 #if defined(AFS_AIX51_ENV) && defined(AFS_64BIT_KERNEL)
215     struct afs_ioctl32 dst32;
216
217     if (!(IS64U)) {
218         AFS_COPYIN(cmarg, (caddr_t) & dst32, sizeof dst32, code);
219         if (!code)
220             afs_ioctl32_to_afs_ioctl(&dst32, dst);
221         return code;
222     }
223 #endif /* defined(AFS_AIX51_ENV) && defined(AFS_64BIT_KERNEL) */
224
225
226 #if defined(AFS_HPUX_64BIT_ENV)
227     struct afs_ioctl32 dst32;
228
229     if (is_32bit(u.u_procp)) {  /* is_32bit() in proc_iface.h */
230         AFS_COPYIN(cmarg, (caddr_t) & dst32, sizeof dst32, code);
231         if (!code)
232             afs_ioctl32_to_afs_ioctl(&dst32, dst);
233         return code;
234     }
235 #endif /* defined(AFS_HPUX_64BIT_ENV) */
236
237 #if defined(AFS_SUN57_64BIT_ENV)
238     struct afs_ioctl32 dst32;
239
240     if (get_udatamodel() == DATAMODEL_ILP32) {
241         AFS_COPYIN(cmarg, (caddr_t) & dst32, sizeof dst32, code);
242         if (!code)
243             afs_ioctl32_to_afs_ioctl(&dst32, dst);
244         return code;
245     }
246 #endif /* defined(AFS_SUN57_64BIT_ENV) */
247
248 #if defined(AFS_SGI_ENV) && (_MIPS_SZLONG==64)
249     struct afs_ioctl32 dst32;
250
251     if (!ABI_IS_64BIT(get_current_abi())) {
252         AFS_COPYIN(cmarg, (caddr_t) & dst32, sizeof dst32, code);
253         if (!code)
254             afs_ioctl32_to_afs_ioctl(&dst32, dst);
255         return code;
256     }
257 #endif /* defined(AFS_SGI_ENV) && (_MIPS_SZLONG==64) */
258
259 #if defined(AFS_LINUX_64BIT_KERNEL) && !defined(AFS_ALPHA_LINUX20_ENV) && !defined(AFS_IA64_LINUX20_ENV) && !defined(AFS_AMD64_LINUX20_ENV)
260     struct afs_ioctl32 dst32;
261
262 #ifdef AFS_SPARC64_LINUX24_ENV
263     if (current->thread.flags & SPARC_FLAG_32BIT)
264 #elif defined(AFS_SPARC64_LINUX20_ENV)
265     if (current->tss.flags & SPARC_FLAG_32BIT)
266 #elif defined(AFS_AMD64_LINUX20_ENV)
267     if (current->thread.flags & THREAD_IA32)
268 #elif defined(AFS_PPC64_LINUX20_ENV)
269     if (current->thread.flags & PPC_FLAG_32BIT)
270 #else
271 #error Not done for this linux type
272 #endif
273     {
274         AFS_COPYIN(cmarg, (caddr_t) & dst32, sizeof dst32, code);
275         if (!code)
276             afs_ioctl32_to_afs_ioctl(&dst32, dst);
277         return code;
278     }
279 #endif /* defined(AFS_LINUX_64BIT_KERNEL) */
280
281     AFS_COPYIN(cmarg, (caddr_t) dst, sizeof *dst, code);
282     return code;
283 }
284
285 int
286 HandleIoctl(register struct vcache *avc, register afs_int32 acom,
287             struct afs_ioctl *adata)
288 {
289     register afs_int32 code;
290
291     code = 0;
292     AFS_STATCNT(HandleIoctl);
293
294     switch (acom & 0xff) {
295     case 1:
296         avc->states |= CSafeStore;
297         avc->asynchrony = 0;
298         break;
299
300         /* case 2 used to be abort store, but this is no longer provided,
301          * since it is impossible to implement under normal Unix.
302          */
303
304     case 3:{
305             /* return the name of the cell this file is open on */
306             register struct cell *tcell;
307             register afs_int32 i;
308
309             tcell = afs_GetCell(avc->fid.Cell, READ_LOCK);
310             if (tcell) {
311                 i = strlen(tcell->cellName) + 1;        /* bytes to copy out */
312
313                 if (i > adata->out_size) {
314                     /* 0 means we're not interested in the output */
315                     if (adata->out_size != 0)
316                         code = EFAULT;
317                 } else {
318                     /* do the copy */
319                     AFS_COPYOUT(tcell->cellName, adata->out, i, code);
320                 }
321                 afs_PutCell(tcell, READ_LOCK);
322             } else
323                 code = ENOTTY;
324         }
325         break;
326
327     case 49:                    /* VIOC_GETINITPARAMS */
328         if (adata->out_size < sizeof(struct cm_initparams)) {
329             code = EFAULT;
330         } else {
331             AFS_COPYOUT(&cm_initParams, adata->out,
332                         sizeof(struct cm_initparams), code);
333         }
334         break;
335
336     default:
337
338         code = EINVAL;
339 #ifdef AFS_AIX51_ENV
340         code = ENOSYS;
341 #endif
342         break;
343     }
344     return code;                /* so far, none implemented */
345 }
346
347
348 #ifdef  AFS_AIX_ENV
349 /* For aix we don't temporarily bypass ioctl(2) but rather do our
350  * thing directly in the vnode layer call, VNOP_IOCTL; thus afs_ioctl
351  * is now called from afs_gn_ioctl.
352  */
353 int
354 afs_ioctl(struct vcache *tvc, int cmd, int arg)
355 {
356     struct afs_ioctl data;
357     int error = 0;
358
359     AFS_STATCNT(afs_ioctl);
360     if (((cmd >> 8) & 0xff) == 'V') {
361         /* This is a VICEIOCTL call */
362         AFS_COPYIN(arg, (caddr_t) & data, sizeof(data), error);
363         if (error)
364             return (error);
365         error = HandleIoctl(tvc, cmd, &data);
366         return (error);
367     } else {
368         /* No-op call; just return. */
369         return (ENOTTY);
370     }
371 }
372 #endif /* AFS_AIX_ENV */
373
374 #if defined(AFS_SGI_ENV)
375 afs_ioctl(OSI_VN_DECL(tvc), int cmd, void *arg, int flag, cred_t * cr,
376           rval_t * rvalp
377 #ifdef AFS_SGI65_ENV
378           , struct vopbd * vbds
379 #endif
380     )
381 {
382     struct afs_ioctl data;
383     int error = 0;
384     int locked;
385
386     OSI_VN_CONVERT(tvc);
387
388     AFS_STATCNT(afs_ioctl);
389     if (((cmd >> 8) & 0xff) == 'V') {
390         /* This is a VICEIOCTL call */
391         error = copyin_afs_ioctl(arg, &data);
392         if (error)
393             return (error);
394         locked = ISAFS_GLOCK();
395         if (!locked)
396             AFS_GLOCK();
397         error = HandleIoctl(tvc, cmd, &data);
398         if (!locked)
399             AFS_GUNLOCK();
400         return (error);
401     } else {
402         /* No-op call; just return. */
403         return (ENOTTY);
404     }
405 }
406 #endif /* AFS_SGI_ENV */
407
408 /* unlike most calls here, this one uses u.u_error to return error conditions,
409    since this is really an intercepted chapter 2 call, rather than a vnode
410    interface call.
411    */
412 /* AFS_HPUX102 and up uses VNODE ioctl instead */
413 #ifndef AFS_HPUX102_ENV
414 #if !defined(AFS_SGI_ENV)
415 #ifdef  AFS_AIX32_ENV
416 #ifdef AFS_AIX51_ENV
417 #ifdef __64BIT__
418 kioctl(fdes, com, arg, ext, arg2, arg3)
419 #else /* __64BIT__ */
420 kioctl32(fdes, com, arg, ext, arg2, arg3)
421 #endif /* __64BIT__ */
422      caddr_t arg2, arg3;
423 #else
424 kioctl(fdes, com, arg, ext)
425 #endif
426      int fdes, com;
427      caddr_t arg, ext;
428 {
429     struct a {
430         int fd, com;
431         caddr_t arg, ext;
432 #ifdef AFS_AIX51_ENV
433         caddr_t arg2, arg3;
434 #endif
435     } u_uap, *uap = &u_uap;
436 #else
437 #if defined(AFS_SUN5_ENV)
438
439 struct afs_ioctl_sys {
440     int fd;
441     int com;
442     int arg;
443 };
444
445 afs_xioctl(uap, rvp)
446      struct afs_ioctl_sys *uap;
447      rval_t *rvp;
448 {
449 #elif defined(AFS_OSF_ENV)
450 afs_xioctl(p, args, retval)
451      struct proc *p;
452      void *args;
453      long *retval;
454 {
455     struct a {
456         long fd;
457         u_long com;
458         caddr_t arg;
459     } *uap = (struct a *)args;
460 #elif defined(AFS_FBSD50_ENV)
461 #define arg data
462 int
463 afs_xioctl(td, uap, retval)
464      struct thread *td;
465      register struct ioctl_args *uap;
466      register_t *retval;
467 {
468     struct proc *p = td->td_proc;
469 #elif defined(AFS_DARWIN_ENV) || defined(AFS_XBSD_ENV)
470 struct ioctl_args {
471     int fd;
472     u_long com;
473     caddr_t arg;
474 };
475
476 int
477 afs_xioctl(p, uap, retval)
478      struct proc *p;
479      register struct ioctl_args *uap;
480      register_t *retval;
481 {
482 #elif defined(AFS_LINUX22_ENV)
483 struct afs_ioctl_sys {
484     unsigned int com;
485     unsigned long arg;
486 };
487 asmlinkage int
488 afs_xioctl(struct inode *ip, struct file *fp, unsigned int com,
489            unsigned long arg)
490 {
491     struct afs_ioctl_sys ua, *uap = &ua;
492 #else
493 int
494 afs_xioctl(void)
495 {
496     register struct a {
497         int fd;
498         int com;
499         caddr_t arg;
500     } *uap = (struct a *)u.u_ap;
501 #endif /* AFS_SUN5_ENV */
502 #endif
503 #if defined(AFS_AIX32_ENV) || defined(AFS_SUN5_ENV) || defined(AFS_OSF_ENV) || defined(AFS_DARWIN_ENV)
504     struct file *fd;
505 #elif !defined(AFS_LINUX22_ENV)
506     register struct file *fd;
507 #endif
508 #if defined(AFS_XBSD_ENV)
509     register struct filedesc *fdp;
510 #endif
511     register struct vcache *tvc;
512     register int ioctlDone = 0, code = 0;
513
514     AFS_STATCNT(afs_xioctl);
515 #if defined(AFS_XBSD_ENV)
516     fdp = p->p_fd;
517     if ((u_int) uap->fd >= fdp->fd_nfiles
518         || (fd = fdp->fd_ofiles[uap->fd]) == NULL)
519         return EBADF;
520     if ((fd->f_flag & (FREAD | FWRITE)) == 0)
521         return EBADF;
522 #elif defined(AFS_DARWIN_ENV)
523     if ((code = fdgetf(p, uap->fd, &fd)))
524         return code;
525 #elif defined(AFS_LINUX22_ENV)
526     ua.com = com;
527     ua.arg = arg;
528 #elif defined(AFS_AIX32_ENV)
529     uap->fd = fdes;
530     uap->com = com;
531     uap->arg = arg;
532 #ifdef AFS_AIX51_ENV
533     uap->arg2 = arg2;
534     uap->arg3 = arg3;
535 #endif
536     if (setuerror(getf(uap->fd, &fd))) {
537         return -1;
538     }
539 #elif defined(AFS_OSF_ENV)
540     fd = NULL;
541     if (code = getf(&fd, uap->fd, FILE_FLAGS_NULL, &u.u_file_state))
542         return code;
543 #elif defined(AFS_SUN5_ENV)
544 # if defined(AFS_SUN57_ENV)
545     fd = getf(uap->fd);
546     if (!fd)
547         return (EBADF);
548 # elif defined(AFS_SUN54_ENV)
549     fd = GETF(uap->fd);
550     if (!fd)
551         return (EBADF);
552 # else
553     if (code = getf(uap->fd, &fd)) {
554         return (code);
555     }
556 # endif /* AFS_SUN57_ENV */
557 #else
558     fd = getf(uap->fd);
559     if (!fd)
560         return (EBADF);
561 #endif
562     /* first determine whether this is any sort of vnode */
563 #if defined(AFS_LINUX22_ENV)
564     tvc = VTOAFS(ip);
565     {
566 #else
567 #ifdef AFS_SUN5_ENV
568     if (fd->f_vnode->v_type == VREG || fd->f_vnode->v_type == VDIR) {
569 #else
570     if (fd->f_type == DTYPE_VNODE) {
571 #endif
572         /* good, this is a vnode; next see if it is an AFS vnode */
573 #if     defined(AFS_AIX32_ENV) || defined(AFS_SUN5_ENV)
574         tvc = VTOAFS(fd->f_vnode);      /* valid, given a vnode */
575 #elif defined(AFS_OBSD_ENV)
576         tvc =
577             IsAfsVnode((struct vnode *)fd->
578                        f_data) ? VTOAFS((struct vnode *)fd->f_data) : NULL;
579 #else
580         tvc = VTOAFS((struct vnode *)fd->f_data);       /* valid, given a vnode */
581 #endif
582 #endif /* AFS_LINUX22_ENV */
583         if (tvc && IsAfsVnode(AFSTOV(tvc))) {
584 #ifdef AFS_DEC_ENV
585             tvc = VTOAFS(afs_gntovn((struct gnode *)tvc));
586             if (!tvc) {         /* shouldn't happen with held gnodes */
587                 u.u_error = ENOENT;
588                 return;
589             }
590 #endif
591             /* This is an AFS vnode */
592             if (((uap->com >> 8) & 0xff) == 'V') {
593                 register struct afs_ioctl *datap;
594                 AFS_GLOCK();
595                 datap =
596                     (struct afs_ioctl *)osi_AllocSmallSpace(AFS_SMALLOCSIZ);
597                 AFS_COPYIN((char *)uap->arg, (caddr_t) datap,
598                            sizeof(struct afs_ioctl), code);
599                 if (code) {
600                     osi_FreeSmallSpace(datap);
601                     AFS_GUNLOCK();
602 #if defined(AFS_DARWIN_ENV) || defined(AFS_XBSD_ENV)
603                     return code;
604 #else
605 #if     defined(AFS_SUN5_ENV)
606 #ifdef  AFS_SUN54_ENV
607                     releasef(uap->fd);
608 #else
609                     releasef(fd);
610 #endif
611                     return (EFAULT);
612 #else
613 #ifdef  AFS_OSF_ENV
614 #ifdef  AFS_OSF30_ENV
615                     FP_UNREF_ALWAYS(fd);
616 #else
617                     FP_UNREF(fd);
618 #endif
619                     return code;
620 #else /* AFS_OSF_ENV */
621 #ifdef  AFS_AIX41_ENV
622                     ufdrele(uap->fd);
623 #endif
624 #ifdef AFS_LINUX22_ENV
625                     return -code;
626 #else
627                     setuerror(code);
628                     return;
629 #endif
630 #endif
631 #endif
632 #endif
633                 }
634                 code = HandleIoctl(tvc, uap->com, datap);
635                 osi_FreeSmallSpace(datap);
636                 AFS_GUNLOCK();
637                 ioctlDone = 1;
638 #ifdef  AFS_AIX41_ENV
639                 ufdrele(uap->fd);
640 #endif
641 #ifdef  AFS_OSF_ENV
642 #ifdef  AFS_OSF30_ENV
643                 FP_UNREF_ALWAYS(fd);
644 #else
645                 FP_UNREF(fd);
646 #endif
647 #endif
648             }
649 #if defined(AFS_LINUX22_ENV)
650             else
651                 code = EINVAL;
652 #endif
653         }
654     }
655
656     if (!ioctlDone) {
657 #ifdef  AFS_AIX41_ENV
658         ufdrele(uap->fd);
659 #ifdef AFS_AIX51_ENV
660 #ifdef __64BIT__
661         code = okioctl(fdes, com, arg, ext, arg2, arg3);
662 #else /* __64BIT__ */
663         code = okioctl32(fdes, com, arg, ext, arg2, arg3);
664 #endif /* __64BIT__ */
665 #else /* !AFS_AIX51_ENV */
666         code = okioctl(fdes, com, arg, ext);
667 #endif /* AFS_AIX51_ENV */
668         return code;
669 #else /* !AFS_AIX41_ENV */
670 #ifdef  AFS_AIX32_ENV
671         okioctl(fdes, com, arg, ext);
672 #elif defined(AFS_SUN5_ENV)
673 #if defined(AFS_SUN57_ENV)
674         releasef(uap->fd);
675 #elif defined(AFS_SUN54_ENV)
676         RELEASEF(uap->fd);
677 #else
678         releasef(fd);
679 #endif
680         code = ioctl(uap, rvp);
681 #elif defined(AFS_FBSD50_ENV)
682         return ioctl(td, uap);
683 #elif defined(AFS_FBSD_ENV)
684         return ioctl(p, uap);
685 #elif defined(AFS_OBSD_ENV)
686         code = sys_ioctl(p, uap, retval);
687 #elif defined(AFS_DARWIN_ENV)
688         return ioctl(p, uap, retval);
689 #elif defined(AFS_OSF_ENV)
690         code = ioctl(p, args, retval);
691 #ifdef  AFS_OSF30_ENV
692         FP_UNREF_ALWAYS(fd);
693 #else
694         FP_UNREF(fd);
695 #endif
696         return code;
697 #elif !defined(AFS_LINUX22_ENV)
698         ioctl();
699 #endif
700 #endif
701     }
702 #ifdef  AFS_SUN5_ENV
703     if (ioctlDone)
704 #ifdef  AFS_SUN54_ENV
705         releasef(uap->fd);
706 #else
707         releasef(fd);
708 #endif
709     return (code);
710 #else
711 #ifdef AFS_LINUX22_ENV
712     return -code;
713 #else
714 #if defined(KERNEL_HAVE_UERROR)
715     if (!getuerror())
716         setuerror(code);
717 #if     defined(AFS_AIX32_ENV) && !defined(AFS_AIX41_ENV)
718     return (getuerror()? -1 : u.u_ioctlrv);
719 #else
720     return getuerror()? -1 : 0;
721 #endif
722 #endif
723 #endif /* AFS_LINUX22_ENV */
724 #endif /* AFS_SUN5_ENV */
725 #if defined(AFS_OSF_ENV) || defined(AFS_DARWIN_ENV) || defined(AFS_XBSD_ENV)
726     return (code);
727 #endif
728 }
729 #endif /* AFS_SGI_ENV */
730 #endif /* AFS_HPUX102_ENV */
731
732 #if defined(AFS_SGI_ENV)
733   /* "pioctl" system call entry point; just pass argument to the parameterized
734    * call below */
735 struct pioctlargs {
736     char *path;
737     sysarg_t cmd;
738     caddr_t cmarg;
739     sysarg_t follow;
740 };
741 int
742 afs_pioctl(struct pioctlargs *uap, rval_t * rvp)
743 {
744     int code;
745
746     AFS_STATCNT(afs_pioctl);
747     AFS_GLOCK();
748     code = afs_syscall_pioctl(uap->path, uap->cmd, uap->cmarg, uap->follow);
749     AFS_GUNLOCK();
750 #ifdef AFS_SGI64_ENV
751     return code;
752 #else
753     return u.u_error;
754 #endif
755 }
756
757 #elif defined(AFS_OSF_ENV)
758 afs_pioctl(p, args, retval)
759      struct proc *p;
760      void *args;
761      int *retval;
762 {
763     struct a {
764         char *path;
765         int cmd;
766         caddr_t cmarg;
767         int follow;
768     } *uap = (struct a *)args;
769
770     AFS_STATCNT(afs_pioctl);
771     return (afs_syscall_pioctl(uap->path, uap->cmd, uap->cmarg, uap->follow));
772 }
773
774 #elif defined(AFS_FBSD50_ENV)
775 int
776 afs_pioctl(td, args, retval)
777      struct thread *td;
778      void *args;
779      int *retval;
780 {
781     struct a {
782         char *path;
783         int cmd;
784         caddr_t cmarg;
785         int follow;
786     } *uap = (struct a *)args;
787
788     AFS_STATCNT(afs_pioctl);
789     return (afs_syscall_pioctl
790             (uap->path, uap->cmd, uap->cmarg, uap->follow, td->td_ucred));
791 }
792
793 #elif defined(AFS_DARWIN_ENV) || defined(AFS_XBSD_ENV)
794 int
795 afs_pioctl(p, args, retval)
796      struct proc *p;
797      void *args;
798      int *retval;
799 {
800     struct a {
801         char *path;
802         int cmd;
803         caddr_t cmarg;
804         int follow;
805     } *uap = (struct a *)args;
806
807     AFS_STATCNT(afs_pioctl);
808     return (afs_syscall_pioctl
809             (uap->path, uap->cmd, uap->cmarg, uap->follow,
810              p->p_cred->pc_ucred));
811 }
812
813 #endif
814
815 /* macro to avoid adding any more #ifdef's to pioctl code. */
816 #if defined(AFS_LINUX22_ENV) || defined(AFS_AIX41_ENV)
817 #define PIOCTL_FREE_CRED() crfree(credp)
818 #else
819 #define PIOCTL_FREE_CRED()
820 #endif
821
822 int
823 #ifdef  AFS_SUN5_ENV
824 afs_syscall_pioctl(path, com, cmarg, follow, rvp, credp)
825      rval_t *rvp;
826      struct AFS_UCRED *credp;
827 #else
828 #if defined(AFS_DARWIN_ENV) || defined(AFS_XBSD_ENV)
829 afs_syscall_pioctl(path, com, cmarg, follow, credp)
830      struct AFS_UCRED *credp;
831 #else
832 afs_syscall_pioctl(path, com, cmarg, follow)
833 #endif
834 #endif
835      char *path;
836      unsigned int com;
837      caddr_t cmarg;
838      int follow;
839 {
840     struct afs_ioctl data;
841     struct AFS_UCRED *tmpcred, *foreigncreds = NULL;
842     register afs_int32 code = 0;
843     struct vnode *vp;
844 #ifdef AFS_DEC_ENV
845     struct vnode *gp;
846 #endif
847 #ifdef  AFS_AIX41_ENV
848     struct ucred *credp = crref();      /* don't free until done! */
849 #endif
850 #ifdef AFS_LINUX22_ENV
851     cred_t *credp = crref();    /* don't free until done! */
852     struct dentry *dp;
853 #endif
854
855     AFS_STATCNT(afs_syscall_pioctl);
856     if (follow)
857         follow = 1;             /* compat. with old venus */
858     code = copyin_afs_ioctl(cmarg, &data);
859     if (code) {
860         PIOCTL_FREE_CRED();
861 #if defined(KERNEL_HAVE_UERROR)
862         setuerror(code);
863 #endif
864         return (code);
865     }
866     if ((com & 0xff) == PSetClientContext) {
867 #ifdef AFS_NEED_CLIENTCONTEXT
868 #if defined(AFS_SUN5_ENV) || defined(AFS_AIX41_ENV)
869         code = HandleClientContext(&data, &com, &foreigncreds, credp);
870 #else
871         code = HandleClientContext(&data, &com, &foreigncreds, osi_curcred());
872 #endif
873         if (code) {
874             if (foreigncreds) {
875                 crfree(foreigncreds);
876             }
877             PIOCTL_FREE_CRED();
878 #if defined(KERNEL_HAVE_UERROR)
879             return (setuerror(code), code);
880 #else
881             return (code);
882 #endif
883         }
884 #else /* AFS_NEED_CLIENTCONTEXT */
885         return EINVAL;
886 #endif /* AFS_NEED_CLIENTCONTEXT */
887     }
888 #ifdef AFS_NEED_CLIENTCONTEXT
889     if (foreigncreds) {
890         /*
891          * We could have done without temporary setting the u.u_cred below
892          * (foreigncreds could be passed as param the pioctl modules)
893          * but calls such as afs_osi_suser() doesn't allow that since it
894          * references u.u_cred directly.  We could, of course, do something
895          * like afs_osi_suser(cred) which, I think, is better since it
896          * generalizes and supports multi cred environments...
897          */
898 #ifdef  AFS_SUN5_ENV
899         tmpcred = credp;
900         credp = foreigncreds;
901 #elif defined(AFS_AIX41_ENV)
902         tmpcred = crref();      /* XXX */
903         crset(foreigncreds);
904 #elif defined(AFS_HPUX101_ENV)
905         tmpcred = p_cred(u.u_procp);
906         set_p_cred(u.u_procp, foreigncreds);
907 #elif defined(AFS_SGI_ENV)
908         tmpcred = OSI_GET_CURRENT_CRED();
909         OSI_SET_CURRENT_CRED(foreigncreds);
910 #else
911         tmpcred = u.u_cred;
912         u.u_cred = foreigncreds;
913 #endif
914     }
915 #endif /* AFS_NEED_CLIENTCONTEXT */
916     if ((com & 0xff) == 15) {
917         /* special case prefetch so entire pathname eval occurs in helper process.
918          * otherwise, the pioctl call is essentially useless */
919 #if     defined(AFS_SUN5_ENV) || defined(AFS_AIX41_ENV) || defined(AFS_LINUX22_ENV) || defined(AFS_DARWIN_ENV) || defined(AFS_XBSD_ENV)
920         code =
921             Prefetch(path, &data, follow,
922                      foreigncreds ? foreigncreds : credp);
923 #else
924         code = Prefetch(path, &data, follow, osi_curcred());
925 #endif
926         vp = NULL;
927 #if defined(KERNEL_HAVE_UERROR)
928         setuerror(code);
929 #endif
930         goto rescred;
931     }
932     if (path) {
933         AFS_GUNLOCK();
934 #ifdef  AFS_AIX41_ENV
935         code =
936             lookupname(path, USR, follow, NULL, &vp,
937                        foreigncreds ? foreigncreds : credp);
938 #else
939 #ifdef AFS_LINUX22_ENV
940         code = gop_lookupname(path, AFS_UIOUSER, follow, NULL, &dp);
941         if (!code)
942             vp = (struct vnode *)dp->d_inode;
943 #else
944         code = gop_lookupname(path, AFS_UIOUSER, follow, NULL, &vp);
945 #endif /* AFS_LINUX22_ENV */
946 #endif /* AFS_AIX41_ENV */
947         AFS_GLOCK();
948         if (code) {
949             vp = NULL;
950 #if defined(KERNEL_HAVE_UERROR)
951             setuerror(code);
952 #endif
953             goto rescred;
954         }
955     } else
956         vp = NULL;
957
958     /* now make the call if we were passed no file, or were passed an AFS file */
959     if (!vp || IsAfsVnode(vp)) {
960 #if defined(AFS_DEC_ENV)
961         /* Ultrix 4.0: can't get vcache entry unless we've got an AFS gnode.
962          * So, we must test in this part of the code.  Also, must arrange to
963          * GRELE the original gnode pointer when we're done, since in Ultrix 4.0,
964          * we hold gnodes, whose references hold our vcache entries.
965          */
966         if (vp) {
967             gp = vp;            /* remember for "put" */
968             vp = (struct vnode *)afs_gntovn(vp);        /* get vcache from gp */
969         } else
970             gp = NULL;
971 #elif defined(AFS_SUN5_ENV)
972         code = afs_HandlePioctl(vp, com, &data, follow, &credp);
973 #elif defined(AFS_AIX41_ENV)
974         {
975             struct ucred *cred1, *cred2;
976
977             if (foreigncreds) {
978                 cred1 = cred2 = foreigncreds;
979             } else {
980                 cred1 = cred2 = credp;
981             }
982             code = afs_HandlePioctl(vp, com, &data, follow, &cred1);
983             if (cred1 != cred2) {
984                 /* something changed the creds */
985                 crset(cred1);
986             }
987         }
988 #elif defined(AFS_HPUX101_ENV)
989         {
990             struct ucred *cred = p_cred(u.u_procp);
991             code = afs_HandlePioctl(vp, com, &data, follow, &cred);
992         }
993 #elif defined(AFS_SGI_ENV)
994         {
995             struct cred *credp;
996             credp = OSI_GET_CURRENT_CRED();
997             code = afs_HandlePioctl(vp, com, &data, follow, &credp);
998         }
999 #elif defined(AFS_LINUX22_ENV) || defined(AFS_DARWIN_ENV) || defined(AFS_XBSD_ENV)
1000         code = afs_HandlePioctl(vp, com, &data, follow, &credp);
1001 #else
1002         code = afs_HandlePioctl(vp, com, &data, follow, &u.u_cred);
1003 #endif
1004     } else {
1005 #if defined(KERNEL_HAVE_UERROR)
1006         setuerror(EINVAL);
1007 #else
1008         code = EINVAL;          /* not in /afs */
1009 #endif
1010 #ifdef AFS_DEC_ENV
1011         if (vp) {
1012             GRELE(vp);
1013             vp = NULL;
1014         }
1015 #endif
1016     }
1017
1018   rescred:
1019 #if defined(AFS_NEED_CLIENTCONTEXT)
1020     if (foreigncreds) {
1021 #ifdef  AFS_AIX41_ENV
1022         crset(tmpcred);         /* restore original credentials */
1023 #else
1024 #if     defined(AFS_HPUX101_ENV)
1025         set_p_cred(u.u_procp, tmpcred); /* restore original credentials */
1026 #elif   defined(AFS_SGI_ENV)
1027         OSI_SET_CURRENT_CRED(tmpcred);  /* restore original credentials */
1028 #elif   !defined(AFS_SUN5_ENV)
1029         osi_curcred() = tmpcred;        /* restore original credentials */
1030 #endif /* AFS_HPUX101_ENV */
1031         crfree(foreigncreds);
1032 #endif /* AIX41 */
1033     }
1034 #endif /* AFS_NEED_CLIENTCONTEXT */
1035     if (vp) {
1036 #ifdef AFS_LINUX22_ENV
1037         dput(dp);
1038 #else
1039         AFS_RELE(vp);           /* put vnode back */
1040 #endif
1041     }
1042     PIOCTL_FREE_CRED();
1043 #if defined(KERNEL_HAVE_UERROR)
1044     if (!getuerror())
1045         setuerror(code);
1046     return (getuerror());
1047 #else
1048     return (code);
1049 #endif
1050 }
1051
1052 #define MAXPIOCTLTOKENLEN \
1053 (3*sizeof(afs_int32)+MAXKTCTICKETLEN+sizeof(struct ClearToken)+MAXKTCREALMLEN)
1054
1055 int
1056 afs_HandlePioctl(struct vnode *avp, afs_int32 acom,
1057                  register struct afs_ioctl *ablob, int afollow,
1058                  struct AFS_UCRED **acred)
1059 {
1060     struct vcache *avc;
1061     struct vrequest treq;
1062     register afs_int32 code;
1063     register afs_int32 function, device;
1064     afs_int32 inSize, outSize, outSizeMax;
1065     char *inData, *outData;
1066     int (*(*pioctlSw)) ();
1067     int pioctlSwSize;
1068     struct afs_fakestat_state fakestate;
1069
1070     avc = avp ? VTOAFS(avp) : NULL;
1071     afs_Trace3(afs_iclSetp, CM_TRACE_PIOCTL, ICL_TYPE_INT32, acom & 0xff,
1072                ICL_TYPE_POINTER, avc, ICL_TYPE_INT32, afollow);
1073     AFS_STATCNT(HandlePioctl);
1074     if ((code = afs_InitReq(&treq, *acred)))
1075         return code;
1076     afs_InitFakeStat(&fakestate);
1077     if (avc) {
1078         code = afs_EvalFakeStat(&avc, &fakestate, &treq);
1079         if (code) {
1080             afs_PutFakeStat(&fakestate);
1081             return code;
1082         }
1083     }
1084     device = (acom & 0xff00) >> 8;
1085     switch (device) {
1086     case 'V':                   /* Original pioctls */
1087         pioctlSw = VpioctlSw;
1088         pioctlSwSize = sizeof(VpioctlSw);
1089         break;
1090     case 'C':                   /* Coordinated/common pioctls */
1091         pioctlSw = CpioctlSw;
1092         pioctlSwSize = sizeof(CpioctlSw);
1093         break;
1094     default:
1095         afs_PutFakeStat(&fakestate);
1096         return EINVAL;
1097     }
1098     function = acom & 0xff;
1099     if (function >= (pioctlSwSize / sizeof(char *))) {
1100         afs_PutFakeStat(&fakestate);
1101         return EINVAL;          /* out of range */
1102     }
1103     inSize = ablob->in_size;
1104
1105     /* Do all range checking before continuing */
1106     if (inSize > MAXPIOCTLTOKENLEN || inSize < 0 || ablob->out_size < 0)
1107         return E2BIG;
1108
1109     if (inSize > AFS_LRALLOCSIZ) {
1110         inData = osi_AllocLargeSpace(inSize+1);
1111     } else {
1112         inData = osi_AllocLargeSpace(AFS_LRALLOCSIZ);
1113     }
1114     if (!inData)
1115         return ENOMEM;
1116     if (inSize > 0) {
1117         AFS_COPYIN(ablob->in, inData, inSize, code);
1118         inData[inSize] = '\0';
1119     } else
1120         code = 0;
1121     if (code) {
1122     if (inSize > AFS_LRALLOCSIZ) {
1123         osi_Free(inData, inSize+1);
1124     } else {
1125         osi_FreeLargeSpace(inData);
1126     }
1127     afs_PutFakeStat(&fakestate);
1128     return code;
1129     }
1130     if (function == 8 && device == 'V') { /* PGetTokens */
1131         outSizeMax = MAXPIOCTLTOKENLEN;
1132         outData = osi_Alloc(outSizeMax);
1133     } else {
1134         outSizeMax = AFS_LRALLOCSIZ;
1135         outData = osi_AllocLargeSpace(AFS_LRALLOCSIZ);
1136     }
1137     if (!outData) {
1138         if (inSize > AFS_LRALLOCSIZ) {
1139             osi_Free(inData, inSize+1);
1140         } else {
1141             osi_FreeLargeSpace(inData);
1142         }
1143         return ENOMEM;
1144     }
1145     outSize = 0;
1146     code =
1147         (*pioctlSw[function]) (avc, function, &treq, inData, outData, inSize,
1148                                &outSize, acred);
1149     if (inSize > AFS_LRALLOCSIZ) {
1150         osi_Free(inData, inSize+1);
1151     } else {
1152         osi_FreeLargeSpace(inData);
1153     }
1154     if (code == 0 && ablob->out_size > 0) {
1155         if (outSize > ablob->out_size) {
1156             code = E2BIG; /* data wont fit in user buffer */
1157         } else if (outSize) {
1158             AFS_COPYOUT(outData, ablob->out, outSize, code);
1159         }
1160     }
1161     if (outSizeMax > AFS_LRALLOCSIZ) {
1162         osi_Free(outData, outSizeMax);
1163     } else {
1164         osi_FreeLargeSpace(outData);
1165     }
1166     afs_PutFakeStat(&fakestate);
1167     return afs_CheckCode(code, &treq, 41);
1168 }
1169
1170 DECL_PIOCTL(PGetFID)
1171 {
1172     AFS_STATCNT(PGetFID);
1173     if (!avc)
1174         return EINVAL;
1175     memcpy(aout, (char *)&avc->fid, sizeof(struct VenusFid));
1176     *aoutSize = sizeof(struct VenusFid);
1177     return 0;
1178 }
1179
1180 DECL_PIOCTL(PSetAcl)
1181 {
1182     register afs_int32 code;
1183     struct conn *tconn;
1184     struct AFSOpaque acl;
1185     struct AFSVolSync tsync;
1186     struct AFSFetchStatus OutStatus;
1187     XSTATS_DECLS;
1188
1189     AFS_STATCNT(PSetAcl);
1190     if (!avc)
1191         return EINVAL;
1192     if ((acl.AFSOpaque_len = strlen(ain) + 1) > 1000)
1193         return EINVAL;
1194
1195     acl.AFSOpaque_val = ain;
1196     do {
1197         tconn = afs_Conn(&avc->fid, areq, SHARED_LOCK);
1198         if (tconn) {
1199             XSTATS_START_TIME(AFS_STATS_FS_RPCIDX_STOREACL);
1200             RX_AFS_GUNLOCK();
1201             code =
1202                 RXAFS_StoreACL(tconn->id, (struct AFSFid *)&avc->fid.Fid,
1203                                &acl, &OutStatus, &tsync);
1204             RX_AFS_GLOCK();
1205             XSTATS_END_TIME;
1206         } else
1207             code = -1;
1208     } while (afs_Analyze
1209              (tconn, code, &avc->fid, areq, AFS_STATS_FS_RPCIDX_STOREACL,
1210               SHARED_LOCK, NULL));
1211
1212     /* now we've forgotten all of the access info */
1213     ObtainWriteLock(&afs_xcbhash, 455);
1214     avc->callback = 0;
1215     afs_DequeueCallback(avc);
1216     avc->states &= ~(CStatd | CUnique);
1217     ReleaseWriteLock(&afs_xcbhash);
1218     if (avc->fid.Fid.Vnode & 1 || (vType(avc) == VDIR))
1219         osi_dnlc_purgedp(avc);
1220     return code;
1221 }
1222
1223 int afs_defaultAsynchrony = 0;
1224
1225 DECL_PIOCTL(PStoreBehind)
1226 {
1227     afs_int32 code = 0;
1228     struct sbstruct *sbr;
1229
1230     sbr = (struct sbstruct *)ain;
1231     if (sbr->sb_default != -1) {
1232         if (afs_osi_suser(*acred))
1233             afs_defaultAsynchrony = sbr->sb_default;
1234         else
1235             code = EPERM;
1236     }
1237
1238     if (avc && (sbr->sb_thisfile != -1)) {
1239         if (afs_AccessOK
1240             (avc, PRSFS_WRITE | PRSFS_ADMINISTER, areq, DONT_CHECK_MODE_BITS))
1241             avc->asynchrony = sbr->sb_thisfile;
1242         else
1243             code = EACCES;
1244     }
1245
1246     *aoutSize = sizeof(struct sbstruct);
1247     sbr = (struct sbstruct *)aout;
1248     sbr->sb_default = afs_defaultAsynchrony;
1249     if (avc) {
1250         sbr->sb_thisfile = avc->asynchrony;
1251     }
1252
1253     return code;
1254 }
1255
1256 DECL_PIOCTL(PGCPAGs)
1257 {
1258     if (!afs_osi_suser(*acred)) {
1259         return EACCES;
1260     }
1261     afs_gcpags = AFS_GCPAGS_USERDISABLED;
1262     return 0;
1263 }
1264
1265 DECL_PIOCTL(PGetAcl)
1266 {
1267     struct AFSOpaque acl;
1268     struct AFSVolSync tsync;
1269     struct AFSFetchStatus OutStatus;
1270     afs_int32 code;
1271     struct conn *tconn;
1272     struct AFSFid Fid;
1273     XSTATS_DECLS;
1274
1275     AFS_STATCNT(PGetAcl);
1276     if (!avc)
1277         return EINVAL;
1278     Fid.Volume = avc->fid.Fid.Volume;
1279     Fid.Vnode = avc->fid.Fid.Vnode;
1280     Fid.Unique = avc->fid.Fid.Unique;
1281     if (avc->states & CForeign) {
1282         /*
1283          * For a dfs xlator acl we have a special hack so that the
1284          * xlator will distinguish which type of acl will return. So
1285          * we currently use the top 2-bytes (vals 0-4) to tell which
1286          * type of acl to bring back. Horrible hack but this will
1287          * cause the least number of changes to code size and interfaces.
1288          */
1289         if (Fid.Vnode & 0xc0000000)
1290             return ERANGE;
1291         Fid.Vnode |= (ainSize << 30);
1292     }
1293     acl.AFSOpaque_val = aout;
1294     do {
1295         tconn = afs_Conn(&avc->fid, areq, SHARED_LOCK);
1296         if (tconn) {
1297             *aout = 0;
1298             XSTATS_START_TIME(AFS_STATS_FS_RPCIDX_FETCHACL);
1299             RX_AFS_GUNLOCK();
1300             code = RXAFS_FetchACL(tconn->id, &Fid, &acl, &OutStatus, &tsync);
1301             RX_AFS_GLOCK();
1302             XSTATS_END_TIME;
1303         } else
1304             code = -1;
1305     } while (afs_Analyze
1306              (tconn, code, &avc->fid, areq, AFS_STATS_FS_RPCIDX_FETCHACL,
1307               SHARED_LOCK, NULL));
1308
1309     if (code == 0) {
1310         *aoutSize = (acl.AFSOpaque_len == 0 ? 1 : acl.AFSOpaque_len);
1311     }
1312     return code;
1313 }
1314
1315 DECL_PIOCTL(PNoop)
1316 {
1317     AFS_STATCNT(PNoop);
1318     return 0;
1319 }
1320
1321 DECL_PIOCTL(PBogus)
1322 {
1323     AFS_STATCNT(PBogus);
1324     return EINVAL;
1325 }
1326
1327 DECL_PIOCTL(PGetFileCell)
1328 {
1329     register struct cell *tcell;
1330
1331     AFS_STATCNT(PGetFileCell);
1332     if (!avc)
1333         return EINVAL;
1334     tcell = afs_GetCell(avc->fid.Cell, READ_LOCK);
1335     if (!tcell)
1336         return ESRCH;
1337     strcpy(aout, tcell->cellName);
1338     afs_PutCell(tcell, READ_LOCK);
1339     *aoutSize = strlen(aout) + 1;
1340     return 0;
1341 }
1342
1343 DECL_PIOCTL(PGetWSCell)
1344 {
1345     struct cell *tcell = NULL;
1346
1347     AFS_STATCNT(PGetWSCell);
1348     if (!afs_resourceinit_flag) /* afs daemons haven't started yet */
1349         return EIO;             /* Inappropriate ioctl for device */
1350
1351     tcell = afs_GetPrimaryCell(READ_LOCK);
1352     if (!tcell)                 /* no primary cell? */
1353         return ESRCH;
1354     strcpy(aout, tcell->cellName);
1355     *aoutSize = strlen(aout) + 1;
1356     afs_PutCell(tcell, READ_LOCK);
1357     return 0;
1358 }
1359
1360 DECL_PIOCTL(PGetUserCell)
1361 {
1362     register afs_int32 i;
1363     register struct unixuser *tu;
1364     register struct cell *tcell;
1365
1366     AFS_STATCNT(PGetUserCell);
1367     if (!afs_resourceinit_flag) /* afs daemons haven't started yet */
1368         return EIO;             /* Inappropriate ioctl for device */
1369
1370     /* return the cell name of the primary cell for this user */
1371     i = UHash(areq->uid);
1372     ObtainWriteLock(&afs_xuser, 224);
1373     for (tu = afs_users[i]; tu; tu = tu->next) {
1374         if (tu->uid == areq->uid && (tu->states & UPrimary)) {
1375             tu->refCount++;
1376             ReleaseWriteLock(&afs_xuser);
1377             break;
1378         }
1379     }
1380     if (tu) {
1381         tcell = afs_GetCell(tu->cell, READ_LOCK);
1382         afs_PutUser(tu, WRITE_LOCK);
1383         if (!tcell)
1384             return ESRCH;
1385         else {
1386             strcpy(aout, tcell->cellName);
1387             afs_PutCell(tcell, READ_LOCK);
1388             *aoutSize = strlen(aout) + 1;       /* 1 for the null */
1389         }
1390     } else {
1391         ReleaseWriteLock(&afs_xuser);
1392         *aout = 0;
1393         *aoutSize = 1;
1394     }
1395     return 0;
1396 }
1397
1398 DECL_PIOCTL(PSetTokens)
1399 {
1400     afs_int32 i;
1401     register struct unixuser *tu;
1402     struct ClearToken clear;
1403     register struct cell *tcell;
1404     char *stp;
1405     int stLen;
1406     struct vrequest treq;
1407     afs_int32 flag, set_parent_pag = 0;
1408
1409     AFS_STATCNT(PSetTokens);
1410     if (!afs_resourceinit_flag) {
1411         return EIO;
1412     }
1413     memcpy((char *)&i, ain, sizeof(afs_int32));
1414     ain += sizeof(afs_int32);
1415     stp = ain;                  /* remember where the ticket is */
1416     if (i < 0 || i > MAXKTCTICKETLEN)
1417         return EINVAL;          /* malloc may fail */
1418     stLen = i;
1419     ain += i;                   /* skip over ticket */
1420     memcpy((char *)&i, ain, sizeof(afs_int32));
1421     ain += sizeof(afs_int32);
1422     if (i != sizeof(struct ClearToken)) {
1423         return EINVAL;
1424     }
1425     memcpy((char *)&clear, ain, sizeof(struct ClearToken));
1426     if (clear.AuthHandle == -1)
1427         clear.AuthHandle = 999; /* more rxvab compat stuff */
1428     ain += sizeof(struct ClearToken);
1429     if (ainSize != 2 * sizeof(afs_int32) + stLen + sizeof(struct ClearToken)) {
1430         /* still stuff left?  we've got primary flag and cell name.  Set these */
1431         memcpy((char *)&flag, ain, sizeof(afs_int32));  /* primary id flag */
1432         ain += sizeof(afs_int32);       /* skip id field */
1433         /* rest is cell name, look it up */
1434         /* some versions of gcc appear to need != 0 in order to get this right */
1435         if ((flag & 0x8000) != 0) {     /* XXX Use Constant XXX */
1436             flag &= ~0x8000;
1437             set_parent_pag = 1;
1438         }
1439         tcell = afs_GetCellByName(ain, READ_LOCK);
1440         if (!tcell)
1441             goto nocell;
1442     } else {
1443         /* default to primary cell, primary id */
1444         flag = 1;               /* primary id */
1445         tcell = afs_GetPrimaryCell(READ_LOCK);
1446         if (!tcell)
1447             goto nocell;
1448     }
1449     i = tcell->cellNum;
1450     afs_PutCell(tcell, READ_LOCK);
1451     if (set_parent_pag) {
1452         afs_int32 pag;
1453 #if defined(AFS_DARWIN_ENV) || defined(AFS_XBSD_ENV)
1454 #if defined(AFS_DARWIN_ENV)
1455         struct proc *p = current_proc();        /* XXX */
1456 #else
1457         struct proc *p = curproc;       /* XXX */
1458 #endif
1459         uprintf("Process %d (%s) tried to change pags in PSetTokens\n",
1460                 p->p_pid, p->p_comm);
1461         if (!setpag(p, acred, -1, &pag, 1)) {
1462 #else
1463 #ifdef  AFS_OSF_ENV
1464         if (!setpag(u.u_procp, acred, -1, &pag, 1)) {   /* XXX u.u_procp is a no-op XXX */
1465 #else
1466         if (!setpag(acred, -1, &pag, 1)) {
1467 #endif
1468 #endif
1469             afs_InitReq(&treq, *acred);
1470             areq = &treq;
1471         }
1472     }
1473     /* now we just set the tokens */
1474     tu = afs_GetUser(areq->uid, i, WRITE_LOCK); /* i has the cell # */
1475     tu->vid = clear.ViceId;
1476     if (tu->stp != NULL) {
1477         afs_osi_Free(tu->stp, tu->stLen);
1478     }
1479     tu->stp = (char *)afs_osi_Alloc(stLen);
1480     tu->stLen = stLen;
1481     memcpy(tu->stp, stp, stLen);
1482     tu->ct = clear;
1483 #ifndef AFS_NOSTATS
1484     afs_stats_cmfullperf.authent.TicketUpdates++;
1485     afs_ComputePAGStats();
1486 #endif /* AFS_NOSTATS */
1487     tu->states |= UHasTokens;
1488     tu->states &= ~UTokensBad;
1489     afs_SetPrimary(tu, flag);
1490     tu->tokenTime = osi_Time();
1491     afs_ResetUserConns(tu);
1492     afs_PutUser(tu, WRITE_LOCK);
1493
1494     return 0;
1495
1496   nocell:
1497     {
1498         int t1;
1499         t1 = afs_initState;
1500         if (t1 < 101)
1501             return EIO;
1502         else
1503             return ESRCH;
1504     }
1505 }
1506
1507 DECL_PIOCTL(PGetVolumeStatus)
1508 {
1509     char volName[32];
1510     char *offLineMsg = afs_osi_Alloc(256);
1511     char *motd = afs_osi_Alloc(256);
1512     register struct conn *tc;
1513     register afs_int32 code = 0;
1514     struct VolumeStatus volstat;
1515     register char *cp;
1516     char *Name, *OfflineMsg, *MOTD;
1517     XSTATS_DECLS;
1518
1519     AFS_STATCNT(PGetVolumeStatus);
1520     if (!avc) {
1521         code = EINVAL;
1522         goto out;
1523     }
1524     Name = volName;
1525     OfflineMsg = offLineMsg;
1526     MOTD = motd;
1527     do {
1528         tc = afs_Conn(&avc->fid, areq, SHARED_LOCK);
1529         if (tc) {
1530             XSTATS_START_TIME(AFS_STATS_FS_RPCIDX_GETVOLUMESTATUS);
1531             RX_AFS_GUNLOCK();
1532             code =
1533                 RXAFS_GetVolumeStatus(tc->id, avc->fid.Fid.Volume, &volstat,
1534                                       &Name, &OfflineMsg, &MOTD);
1535             RX_AFS_GLOCK();
1536             XSTATS_END_TIME;
1537         } else
1538             code = -1;
1539     } while (afs_Analyze
1540              (tc, code, &avc->fid, areq, AFS_STATS_FS_RPCIDX_GETVOLUMESTATUS,
1541               SHARED_LOCK, NULL));
1542
1543     if (code)
1544         goto out;
1545     /* Copy all this junk into msg->im_data, keeping track of the lengths. */
1546     cp = aout;
1547     memcpy(cp, (char *)&volstat, sizeof(VolumeStatus));
1548     cp += sizeof(VolumeStatus);
1549     strcpy(cp, volName);
1550     cp += strlen(volName) + 1;
1551     strcpy(cp, offLineMsg);
1552     cp += strlen(offLineMsg) + 1;
1553     strcpy(cp, motd);
1554     cp += strlen(motd) + 1;
1555     *aoutSize = (cp - aout);
1556   out:
1557     afs_osi_Free(offLineMsg, 256);
1558     afs_osi_Free(motd, 256);
1559     return code;
1560 }
1561
1562 DECL_PIOCTL(PSetVolumeStatus)
1563 {
1564     char volName[32];
1565     char *offLineMsg = afs_osi_Alloc(256);
1566     char *motd = afs_osi_Alloc(256);
1567     register struct conn *tc;
1568     register afs_int32 code = 0;
1569     struct AFSFetchVolumeStatus volstat;
1570     struct AFSStoreVolumeStatus storeStat;
1571     register struct volume *tvp;
1572     register char *cp;
1573     XSTATS_DECLS;
1574
1575     AFS_STATCNT(PSetVolumeStatus);
1576     if (!avc) {
1577         code = EINVAL;
1578         goto out;
1579     }
1580
1581     tvp = afs_GetVolume(&avc->fid, areq, READ_LOCK);
1582     if (tvp) {
1583         if (tvp->states & (VRO | VBackup)) {
1584             afs_PutVolume(tvp, READ_LOCK);
1585             code = EROFS;
1586             goto out;
1587         }
1588         afs_PutVolume(tvp, READ_LOCK);
1589     } else {
1590         code = ENODEV;
1591         goto out;
1592     }
1593     /* Copy the junk out, using cp as a roving pointer. */
1594     cp = ain;
1595     memcpy((char *)&volstat, cp, sizeof(AFSFetchVolumeStatus));
1596     cp += sizeof(AFSFetchVolumeStatus);
1597     if (strlen(cp) >= sizeof(volName)) {
1598         code = E2BIG;
1599         goto out;
1600     }
1601     strcpy(volName, cp);
1602     cp += strlen(volName) + 1;
1603     if (strlen(cp) >= sizeof(offLineMsg)) {
1604         code = E2BIG;
1605         goto out;
1606     }
1607     strcpy(offLineMsg, cp);
1608     cp += strlen(offLineMsg) + 1;
1609     if (strlen(cp) >= sizeof(motd)) {
1610         code = E2BIG;
1611         goto out;
1612     }
1613     strcpy(motd, cp);
1614     storeStat.Mask = 0;
1615     if (volstat.MinQuota != -1) {
1616         storeStat.MinQuota = volstat.MinQuota;
1617         storeStat.Mask |= AFS_SETMINQUOTA;
1618     }
1619     if (volstat.MaxQuota != -1) {
1620         storeStat.MaxQuota = volstat.MaxQuota;
1621         storeStat.Mask |= AFS_SETMAXQUOTA;
1622     }
1623     do {
1624         tc = afs_Conn(&avc->fid, areq, SHARED_LOCK);
1625         if (tc) {
1626             XSTATS_START_TIME(AFS_STATS_FS_RPCIDX_SETVOLUMESTATUS);
1627             RX_AFS_GUNLOCK();
1628             code =
1629                 RXAFS_SetVolumeStatus(tc->id, avc->fid.Fid.Volume, &storeStat,
1630                                       volName, offLineMsg, motd);
1631             RX_AFS_GLOCK();
1632             XSTATS_END_TIME;
1633         } else
1634             code = -1;
1635     } while (afs_Analyze
1636              (tc, code, &avc->fid, areq, AFS_STATS_FS_RPCIDX_SETVOLUMESTATUS,
1637               SHARED_LOCK, NULL));
1638
1639     if (code)
1640         goto out;
1641     /* we are sending parms back to make compat. with prev system.  should
1642      * change interface later to not ask for current status, just set new status */
1643     cp = aout;
1644     memcpy(cp, (char *)&volstat, sizeof(VolumeStatus));
1645     cp += sizeof(VolumeStatus);
1646     strcpy(cp, volName);
1647     cp += strlen(volName) + 1;
1648     strcpy(cp, offLineMsg);
1649     cp += strlen(offLineMsg) + 1;
1650     strcpy(cp, motd);
1651     cp += strlen(motd) + 1;
1652     *aoutSize = cp - aout;
1653   out:
1654     afs_osi_Free(offLineMsg, 256);
1655     afs_osi_Free(motd, 256);
1656     return code;
1657 }
1658
1659 DECL_PIOCTL(PFlush)
1660 {
1661     AFS_STATCNT(PFlush);
1662     if (!avc)
1663         return EINVAL;
1664 #if     defined(AFS_SUN_ENV) || defined(AFS_ALPHA_ENV) || defined(AFS_SUN5_ENV)
1665     afs_BozonLock(&avc->pvnLock, avc);  /* Since afs_TryToSmush will do a pvn_vptrunc */
1666 #endif
1667     ObtainWriteLock(&avc->lock, 225);
1668     ObtainWriteLock(&afs_xcbhash, 456);
1669     afs_DequeueCallback(avc);
1670     avc->states &= ~(CStatd | CDirty);  /* next reference will re-stat cache entry */
1671     ReleaseWriteLock(&afs_xcbhash);
1672     /* now find the disk cache entries */
1673     afs_TryToSmush(avc, *acred, 1);
1674     osi_dnlc_purgedp(avc);
1675     afs_symhint_inval(avc);
1676     if (avc->linkData && !(avc->states & CCore)) {
1677         afs_osi_Free(avc->linkData, strlen(avc->linkData) + 1);
1678         avc->linkData = NULL;
1679     }
1680     ReleaseWriteLock(&avc->lock);
1681 #if     defined(AFS_SUN_ENV) || defined(AFS_ALPHA_ENV) || defined(AFS_SUN5_ENV)
1682     afs_BozonUnlock(&avc->pvnLock, avc);
1683 #endif
1684     return 0;
1685 }
1686
1687 DECL_PIOCTL(PNewStatMount)
1688 {
1689     register afs_int32 code;
1690     register struct vcache *tvc;
1691     register struct dcache *tdc;
1692     struct VenusFid tfid;
1693     char *bufp;
1694     struct sysname_info sysState;
1695     afs_size_t offset, len;
1696
1697     AFS_STATCNT(PNewStatMount);
1698     if (!avc)
1699         return EINVAL;
1700     code = afs_VerifyVCache(avc, areq);
1701     if (code)
1702         return code;
1703     if (vType(avc) != VDIR) {
1704         return ENOTDIR;
1705     }
1706     tdc = afs_GetDCache(avc, (afs_size_t) 0, areq, &offset, &len, 1);
1707     if (!tdc)
1708         return ENOENT;
1709     Check_AtSys(avc, ain, &sysState, areq);
1710     ObtainReadLock(&tdc->lock);
1711     do {
1712         code = afs_dir_Lookup(&tdc->f.inode, sysState.name, &tfid.Fid);
1713     } while (code == ENOENT && Next_AtSys(avc, areq, &sysState));
1714     ReleaseReadLock(&tdc->lock);
1715     afs_PutDCache(tdc);         /* we're done with the data */
1716     bufp = sysState.name;
1717     if (code) {
1718         goto out;
1719     }
1720     tfid.Cell = avc->fid.Cell;
1721     tfid.Fid.Volume = avc->fid.Fid.Volume;
1722     if (!tfid.Fid.Unique && (avc->states & CForeign)) {
1723         tvc = afs_LookupVCache(&tfid, areq, NULL, avc, bufp);
1724     } else {
1725         tvc = afs_GetVCache(&tfid, areq, NULL, NULL);
1726     }
1727     if (!tvc) {
1728         code = ENOENT;
1729         goto out;
1730     }
1731     if (tvc->mvstat != 1) {
1732         afs_PutVCache(tvc);
1733         code = EINVAL;
1734         goto out;
1735     }
1736     ObtainWriteLock(&tvc->lock, 226);
1737     code = afs_HandleLink(tvc, areq);
1738     if (code == 0) {
1739         if (tvc->linkData) {
1740             if ((tvc->linkData[0] != '#') && (tvc->linkData[0] != '%'))
1741                 code = EINVAL;
1742             else {
1743                 /* we have the data */
1744                 strcpy(aout, tvc->linkData);
1745                 *aoutSize = strlen(tvc->linkData) + 1;
1746             }
1747         } else
1748             code = EIO;
1749     }
1750     ReleaseWriteLock(&tvc->lock);
1751     afs_PutVCache(tvc);
1752   out:
1753     if (sysState.allocked)
1754         osi_FreeLargeSpace(bufp);
1755     return code;
1756 }
1757
1758 DECL_PIOCTL(PGetTokens)
1759 {
1760     register struct cell *tcell;
1761     register afs_int32 i;
1762     register struct unixuser *tu;
1763     register char *cp;
1764     afs_int32 iterator;
1765     int newStyle;
1766
1767     AFS_STATCNT(PGetTokens);
1768     if (!afs_resourceinit_flag) /* afs daemons haven't started yet */
1769         return EIO;             /* Inappropriate ioctl for device */
1770
1771     /* weird interface.  If input parameter is present, it is an integer and
1772      * we're supposed to return the parm'th tokens for this unix uid.
1773      * If not present, we just return tokens for cell 1.
1774      * If counter out of bounds, return EDOM.
1775      * If no tokens for the particular cell, return ENOTCONN.
1776      * Also, if this mysterious parm is present, we return, along with the
1777      * tokens, the primary cell indicator (an afs_int32 0) and the cell name
1778      * at the end, in that order.
1779      */
1780     if ((newStyle = (ainSize > 0))) {
1781         memcpy((char *)&iterator, ain, sizeof(afs_int32));
1782     }
1783     i = UHash(areq->uid);
1784     ObtainReadLock(&afs_xuser);
1785     for (tu = afs_users[i]; tu; tu = tu->next) {
1786         if (newStyle) {
1787             if (tu->uid == areq->uid && (tu->states & UHasTokens)) {
1788                 if (iterator-- == 0)
1789                     break;      /* are we done yet? */
1790             }
1791         } else {
1792             if (tu->uid == areq->uid && afs_IsPrimaryCellNum(tu->cell))
1793                 break;
1794         }
1795     }
1796     if (tu) {
1797         /*
1798          * No need to hold a read lock on each user entry
1799          */
1800         tu->refCount++;
1801     }
1802     ReleaseReadLock(&afs_xuser);
1803
1804     if (!tu) {
1805         return EDOM;
1806     }
1807     if (((tu->states & UHasTokens) == 0)
1808         || (tu->ct.EndTimestamp < osi_Time())) {
1809         tu->states |= (UTokensBad | UNeedsReset);
1810         afs_PutUser(tu, READ_LOCK);
1811         return ENOTCONN;
1812     }
1813     /* use iterator for temp */
1814     cp = aout;
1815     iterator = tu->stLen;       /* for compat, we try to return 56 byte tix if they fit */
1816     if (iterator < 56)
1817         iterator = 56;          /* # of bytes we're returning */
1818     memcpy(cp, (char *)&iterator, sizeof(afs_int32));
1819     cp += sizeof(afs_int32);
1820     memcpy(cp, tu->stp, tu->stLen);     /* copy out st */
1821     cp += iterator;
1822     iterator = sizeof(struct ClearToken);
1823     memcpy(cp, (char *)&iterator, sizeof(afs_int32));
1824     cp += sizeof(afs_int32);
1825     memcpy(cp, (char *)&tu->ct, sizeof(struct ClearToken));
1826     cp += sizeof(struct ClearToken);
1827     if (newStyle) {
1828         /* put out primary id and cell name, too */
1829         iterator = (tu->states & UPrimary ? 1 : 0);
1830         memcpy(cp, (char *)&iterator, sizeof(afs_int32));
1831         cp += sizeof(afs_int32);
1832         tcell = afs_GetCell(tu->cell, READ_LOCK);
1833         if (tcell) {
1834             strcpy(cp, tcell->cellName);
1835             cp += strlen(tcell->cellName) + 1;
1836             afs_PutCell(tcell, READ_LOCK);
1837         } else
1838             *cp++ = 0;
1839     }
1840     *aoutSize = cp - aout;
1841     afs_PutUser(tu, READ_LOCK);
1842     return 0;
1843 }
1844
1845 DECL_PIOCTL(PUnlog)
1846 {
1847     register afs_int32 i;
1848     register struct unixuser *tu;
1849
1850     AFS_STATCNT(PUnlog);
1851     if (!afs_resourceinit_flag) /* afs daemons haven't started yet */
1852         return EIO;             /* Inappropriate ioctl for device */
1853
1854     i = UHash(areq->uid);
1855     ObtainWriteLock(&afs_xuser, 227);
1856     for (tu = afs_users[i]; tu; tu = tu->next) {
1857         if (tu->uid == areq->uid) {
1858             tu->vid = UNDEFVID;
1859             tu->states &= ~UHasTokens;
1860             /* security is not having to say you're sorry */
1861             memset((char *)&tu->ct, 0, sizeof(struct ClearToken));
1862             tu->refCount++;
1863             ReleaseWriteLock(&afs_xuser);
1864             /* We have to drop the lock over the call to afs_ResetUserConns, since
1865              * it obtains the afs_xvcache lock.  We could also keep the lock, and
1866              * modify ResetUserConns to take parm saying we obtained the lock
1867              * already, but that is overkill.  By keeping the "tu" pointer
1868              * held over the released lock, we guarantee that we won't lose our
1869              * place, and that we'll pass over every user conn that existed when
1870              * we began this call.
1871              */
1872             afs_ResetUserConns(tu);
1873             tu->refCount--;
1874             ObtainWriteLock(&afs_xuser, 228);
1875 #ifdef UKERNEL
1876             /* set the expire times to 0, causes
1877              * afs_GCUserData to remove this entry
1878              */
1879             tu->ct.EndTimestamp = 0;
1880             tu->tokenTime = 0;
1881 #endif /* UKERNEL */
1882         }
1883     }
1884     ReleaseWriteLock(&afs_xuser);
1885     return 0;
1886 }
1887
1888 DECL_PIOCTL(PMariner)
1889 {
1890     afs_int32 newHostAddr;
1891     afs_int32 oldHostAddr;
1892
1893     AFS_STATCNT(PMariner);
1894     if (afs_mariner)
1895         memcpy((char *)&oldHostAddr, (char *)&afs_marinerHost,
1896                sizeof(afs_int32));
1897     else
1898         oldHostAddr = 0xffffffff;       /* disabled */
1899
1900     memcpy((char *)&newHostAddr, ain, sizeof(afs_int32));
1901     if (newHostAddr == 0xffffffff) {
1902         /* disable mariner operations */
1903         afs_mariner = 0;
1904     } else if (newHostAddr) {
1905         afs_mariner = 1;
1906         afs_marinerHost = newHostAddr;
1907     }
1908     memcpy(aout, (char *)&oldHostAddr, sizeof(afs_int32));
1909     *aoutSize = sizeof(afs_int32);
1910     return 0;
1911 }
1912
1913 DECL_PIOCTL(PCheckServers)
1914 {
1915     register char *cp = 0;
1916     register int i;
1917     register struct server *ts;
1918     afs_int32 temp, *lp = (afs_int32 *) ain, havecell = 0;
1919     struct cell *cellp;
1920     struct chservinfo *pcheck;
1921
1922     AFS_STATCNT(PCheckServers);
1923
1924     if (!afs_resourceinit_flag) /* afs daemons haven't started yet */
1925         return EIO;             /* Inappropriate ioctl for device */
1926
1927     if (*lp == 0x12345678) {    /* For afs3.3 version */
1928         pcheck = (struct chservinfo *)ain;
1929         if (pcheck->tinterval >= 0) {
1930             cp = aout;
1931             memcpy(cp, (char *)&PROBE_INTERVAL, sizeof(afs_int32));
1932             *aoutSize = sizeof(afs_int32);
1933             if (pcheck->tinterval > 0) {
1934                 if (!afs_osi_suser(*acred))
1935                     return EACCES;
1936                 PROBE_INTERVAL = pcheck->tinterval;
1937             }
1938             return 0;
1939         }
1940         if (pcheck->tsize)
1941             havecell = 1;
1942         temp = pcheck->tflags;
1943         cp = pcheck->tbuffer;
1944     } else {                    /* For pre afs3.3 versions */
1945         memcpy((char *)&temp, ain, sizeof(afs_int32));
1946         cp = ain + sizeof(afs_int32);
1947         if (ainSize > sizeof(afs_int32))
1948             havecell = 1;
1949     }
1950
1951     /*
1952      * 1: fast check, don't contact servers.
1953      * 2: local cell only.
1954      */
1955     if (havecell) {
1956         /* have cell name, too */
1957         cellp = afs_GetCellByName(cp, READ_LOCK);
1958         if (!cellp)
1959             return ENOENT;
1960     } else
1961         cellp = NULL;
1962     if (!cellp && (temp & 2)) {
1963         /* use local cell */
1964         cellp = afs_GetPrimaryCell(READ_LOCK);
1965     }
1966     if (!(temp & 1)) {          /* if not fast, call server checker routine */
1967         afs_CheckServers(1, cellp);     /* check down servers */
1968         afs_CheckServers(0, cellp);     /* check up servers */
1969     }
1970     /* now return the current down server list */
1971     cp = aout;
1972     ObtainReadLock(&afs_xserver);
1973     for (i = 0; i < NSERVERS; i++) {
1974         for (ts = afs_servers[i]; ts; ts = ts->next) {
1975             if (cellp && ts->cell != cellp)
1976                 continue;       /* cell spec'd and wrong */
1977             if ((ts->flags & SRVR_ISDOWN)
1978                 && ts->addr->sa_portal != ts->cell->vlport) {
1979                 memcpy(cp, (char *)&ts->addr->sa_ip, sizeof(afs_int32));
1980                 cp += sizeof(afs_int32);
1981             }
1982         }
1983     }
1984     ReleaseReadLock(&afs_xserver);
1985     if (cellp)
1986         afs_PutCell(cellp, READ_LOCK);
1987     *aoutSize = cp - aout;
1988     return 0;
1989 }
1990
1991 DECL_PIOCTL(PCheckVolNames)
1992 {
1993     AFS_STATCNT(PCheckVolNames);
1994     if (!afs_resourceinit_flag) /* afs daemons haven't started yet */
1995         return EIO;             /* Inappropriate ioctl for device */
1996
1997     afs_CheckRootVolume();
1998     afs_CheckVolumeNames(AFS_VOLCHECK_FORCE | AFS_VOLCHECK_EXPIRED |
1999                          AFS_VOLCHECK_BUSY | AFS_VOLCHECK_MTPTS);
2000     return 0;
2001 }
2002
2003 DECL_PIOCTL(PCheckAuth)
2004 {
2005     int i;
2006     struct srvAddr *sa;
2007     struct conn *tc;
2008     struct unixuser *tu;
2009     afs_int32 retValue;
2010
2011     AFS_STATCNT(PCheckAuth);
2012     if (!afs_resourceinit_flag) /* afs daemons haven't started yet */
2013         return EIO;             /* Inappropriate ioctl for device */
2014
2015     retValue = 0;
2016     tu = afs_GetUser(areq->uid, 1, READ_LOCK);  /* check local cell authentication */
2017     if (!tu)
2018         retValue = EACCES;
2019     else {
2020         /* we have a user */
2021         ObtainReadLock(&afs_xsrvAddr);
2022         ObtainReadLock(&afs_xconn);
2023
2024         /* any tokens set? */
2025         if ((tu->states & UHasTokens) == 0)
2026             retValue = EACCES;
2027         /* all connections in cell 1 working? */
2028         for (i = 0; i < NSERVERS; i++) {
2029             for (sa = afs_srvAddrs[i]; sa; sa = sa->next_bkt) {
2030                 for (tc = sa->conns; tc; tc = tc->next) {
2031                     if (tc->user == tu && (tu->states & UTokensBad))
2032                         retValue = EACCES;
2033                 }
2034             }
2035         }
2036         ReleaseReadLock(&afs_xsrvAddr);
2037         ReleaseReadLock(&afs_xconn);
2038         afs_PutUser(tu, READ_LOCK);
2039     }
2040     memcpy(aout, (char *)&retValue, sizeof(afs_int32));
2041     *aoutSize = sizeof(afs_int32);
2042     return 0;
2043 }
2044
2045 static int
2046 Prefetch(char *apath, struct afs_ioctl *adata, int afollow,
2047          struct AFS_UCRED *acred)
2048 {
2049     register char *tp;
2050     register afs_int32 code;
2051 #if defined(AFS_SGI61_ENV) || defined(AFS_SUN57_ENV) || defined(AFS_DARWIN_ENV) || defined(AFS_XBSD_ENV)
2052     size_t bufferSize;
2053 #else
2054     u_int bufferSize;
2055 #endif
2056
2057     AFS_STATCNT(Prefetch);
2058     if (!apath)
2059         return EINVAL;
2060     tp = osi_AllocLargeSpace(1024);
2061     AFS_COPYINSTR(apath, tp, 1024, &bufferSize, code);
2062     if (code) {
2063         osi_FreeLargeSpace(tp);
2064         return code;
2065     }
2066     if (afs_BBusy()) {          /* do this as late as possible */
2067         osi_FreeLargeSpace(tp);
2068         return EWOULDBLOCK;     /* pretty close */
2069     }
2070     afs_BQueue(BOP_PATH, (struct vcache *)0, 0, 0, acred, (afs_size_t) 0,
2071                (afs_size_t) 0, tp);
2072     return 0;
2073 }
2074
2075 DECL_PIOCTL(PFindVolume)
2076 {
2077     register struct volume *tvp;
2078     register struct server *ts;
2079     register afs_int32 i;
2080     register char *cp;
2081
2082     AFS_STATCNT(PFindVolume);
2083     if (!avc)
2084         return EINVAL;
2085     tvp = afs_GetVolume(&avc->fid, areq, READ_LOCK);
2086     if (tvp) {
2087         cp = aout;
2088         for (i = 0; i < MAXHOSTS; i++) {
2089             ts = tvp->serverHost[i];
2090             if (!ts)
2091                 break;
2092             memcpy(cp, (char *)&ts->addr->sa_ip, sizeof(afs_int32));
2093             cp += sizeof(afs_int32);
2094         }
2095         if (i < MAXHOSTS) {
2096             /* still room for terminating NULL, add it on */
2097             ainSize = 0;        /* reuse vbl */
2098             memcpy(cp, (char *)&ainSize, sizeof(afs_int32));
2099             cp += sizeof(afs_int32);
2100         }
2101         *aoutSize = cp - aout;
2102         afs_PutVolume(tvp, READ_LOCK);
2103         return 0;
2104     }
2105     return ENODEV;
2106 }
2107
2108 DECL_PIOCTL(PViceAccess)
2109 {
2110     register afs_int32 code;
2111     afs_int32 temp;
2112
2113     AFS_STATCNT(PViceAccess);
2114     if (!avc)
2115         return EINVAL;
2116     code = afs_VerifyVCache(avc, areq);
2117     if (code)
2118         return code;
2119     memcpy((char *)&temp, ain, sizeof(afs_int32));
2120     code = afs_AccessOK(avc, temp, areq, CHECK_MODE_BITS);
2121     if (code)
2122         return 0;
2123     else
2124         return EACCES;
2125 }
2126
2127 DECL_PIOCTL(PSetCacheSize)
2128 {
2129     afs_int32 newValue;
2130     int waitcnt = 0;
2131
2132     AFS_STATCNT(PSetCacheSize);
2133     if (!afs_osi_suser(*acred))
2134         return EACCES;
2135     /* too many things are setup initially in mem cache version */
2136     if (cacheDiskType == AFS_FCACHE_TYPE_MEM)
2137         return EROFS;
2138     memcpy((char *)&newValue, ain, sizeof(afs_int32));
2139     if (newValue == 0)
2140         afs_cacheBlocks = afs_stats_cmperf.cacheBlocksOrig;
2141     else {
2142         if (newValue < afs_min_cache)
2143             afs_cacheBlocks = afs_min_cache;
2144         else
2145             afs_cacheBlocks = newValue;
2146     }
2147     afs_stats_cmperf.cacheBlocksTotal = afs_cacheBlocks;
2148     afs_ComputeCacheParms();    /* recompute basic cache parameters */
2149     afs_MaybeWakeupTruncateDaemon();
2150     while (waitcnt++ < 100 && afs_cacheBlocks < afs_blocksUsed) {
2151         afs_osi_Wait(1000, 0, 0);
2152         afs_MaybeWakeupTruncateDaemon();
2153     }
2154     return 0;
2155 }
2156
2157 #define MAXGCSTATS      16
2158 DECL_PIOCTL(PGetCacheSize)
2159 {
2160     afs_int32 results[MAXGCSTATS];
2161
2162     AFS_STATCNT(PGetCacheSize);
2163     memset((char *)results, 0, sizeof(results));
2164     results[0] = afs_cacheBlocks;
2165     results[1] = afs_blocksUsed;
2166     memcpy(aout, (char *)results, sizeof(results));
2167     *aoutSize = sizeof(results);
2168     return 0;
2169 }
2170
2171 DECL_PIOCTL(PRemoveCallBack)
2172 {
2173     register struct conn *tc;
2174     register afs_int32 code = 0;
2175     struct AFSCallBack CallBacks_Array[1];
2176     struct AFSCBFids theFids;
2177     struct AFSCBs theCBs;
2178     XSTATS_DECLS;
2179
2180     AFS_STATCNT(PRemoveCallBack);
2181     if (!avc)
2182         return EINVAL;
2183     if (avc->states & CRO)
2184         return 0;               /* read-only-ness can't change */
2185     ObtainWriteLock(&avc->lock, 229);
2186     theFids.AFSCBFids_len = 1;
2187     theCBs.AFSCBs_len = 1;
2188     theFids.AFSCBFids_val = (struct AFSFid *)&avc->fid.Fid;
2189     theCBs.AFSCBs_val = CallBacks_Array;
2190     CallBacks_Array[0].CallBackType = CB_DROPPED;
2191     if (avc->callback) {
2192         do {
2193             tc = afs_Conn(&avc->fid, areq, SHARED_LOCK);
2194             if (tc) {
2195                 XSTATS_START_TIME(AFS_STATS_FS_RPCIDX_GIVEUPCALLBACKS);
2196                 RX_AFS_GUNLOCK();
2197                 code = RXAFS_GiveUpCallBacks(tc->id, &theFids, &theCBs);
2198                 RX_AFS_GLOCK();
2199                 XSTATS_END_TIME;
2200             }
2201             /* don't set code on failure since we wouldn't use it */
2202         } while (afs_Analyze
2203                  (tc, code, &avc->fid, areq,
2204                   AFS_STATS_FS_RPCIDX_GIVEUPCALLBACKS, SHARED_LOCK, NULL));
2205
2206         ObtainWriteLock(&afs_xcbhash, 457);
2207         afs_DequeueCallback(avc);
2208         avc->callback = 0;
2209         avc->states &= ~(CStatd | CUnique);
2210         ReleaseWriteLock(&afs_xcbhash);
2211         if (avc->fid.Fid.Vnode & 1 || (vType(avc) == VDIR))
2212             osi_dnlc_purgedp(avc);
2213     }
2214     ReleaseWriteLock(&avc->lock);
2215     return 0;
2216 }
2217
2218 DECL_PIOCTL(PNewCell)
2219 {
2220     /* create a new cell */
2221     afs_int32 cellHosts[MAXCELLHOSTS], *lp, magic = 0;
2222     char *newcell = 0, *linkedcell = 0, *tp = ain;
2223     register afs_int32 code, linkedstate = 0, ls;
2224     u_short fsport = 0, vlport = 0;
2225     afs_int32 scount;
2226
2227     AFS_STATCNT(PNewCell);
2228     if (!afs_resourceinit_flag) /* afs daemons haven't started yet */
2229         return EIO;             /* Inappropriate ioctl for device */
2230
2231     if (!afs_osi_suser(*acred))
2232         return EACCES;
2233
2234     memcpy((char *)&magic, tp, sizeof(afs_int32));
2235     tp += sizeof(afs_int32);
2236     if (magic != 0x12345678)
2237         return EINVAL;
2238
2239     /* A 3.4 fs newcell command will pass an array of MAXCELLHOSTS
2240      * server addresses while the 3.5 fs newcell command passes
2241      * MAXHOSTS. To figure out which is which, check if the cellname
2242      * is good.
2243      */
2244     newcell = tp + (MAXCELLHOSTS + 3) * sizeof(afs_int32);
2245     scount = ((newcell[0] != '\0') ? MAXCELLHOSTS : MAXHOSTS);
2246
2247     /* MAXCELLHOSTS (=8) is less than MAXHOSTS (=13) */
2248     memcpy((char *)cellHosts, tp, MAXCELLHOSTS * sizeof(afs_int32));
2249     tp += (scount * sizeof(afs_int32));
2250
2251     lp = (afs_int32 *) tp;
2252     fsport = *lp++;
2253     vlport = *lp++;
2254     if (fsport < 1024)
2255         fsport = 0;             /* Privileged ports not allowed */
2256     if (vlport < 1024)
2257         vlport = 0;             /* Privileged ports not allowed */
2258     tp += (3 * sizeof(afs_int32));
2259     newcell = tp;
2260     if ((ls = *lp) & 1) {
2261         linkedcell = tp + strlen(newcell) + 1;
2262         linkedstate |= CLinkedCell;
2263     }
2264
2265     linkedstate |= CNoSUID;     /* setuid is disabled by default for fs newcell */
2266     code =
2267         afs_NewCell(newcell, cellHosts, linkedstate, linkedcell, fsport,
2268                     vlport, (int)0);
2269     return code;
2270 }
2271
2272 DECL_PIOCTL(PNewAlias)
2273 {
2274     /* create a new cell alias */
2275     char *tp = ain;
2276     register afs_int32 code;
2277     char *realName, *aliasName;
2278
2279     if (!afs_resourceinit_flag) /* afs daemons haven't started yet */
2280         return EIO;             /* Inappropriate ioctl for device */
2281
2282     if (!afs_osi_suser(*acred))
2283         return EACCES;
2284
2285     aliasName = tp;
2286     tp += strlen(aliasName) + 1;
2287     realName = tp;
2288
2289     code = afs_NewCellAlias(aliasName, realName);
2290     *aoutSize = 0;
2291     return code;
2292 }
2293
2294 DECL_PIOCTL(PListCells)
2295 {
2296     afs_int32 whichCell;
2297     register struct cell *tcell = 0;
2298     register afs_int32 i;
2299     register char *cp, *tp = ain;
2300
2301     AFS_STATCNT(PListCells);
2302     if (!afs_resourceinit_flag) /* afs daemons haven't started yet */
2303         return EIO;             /* Inappropriate ioctl for device */
2304
2305     memcpy((char *)&whichCell, tp, sizeof(afs_int32));
2306     tp += sizeof(afs_int32);
2307     tcell = afs_GetCellByIndex(whichCell, READ_LOCK);
2308     if (tcell) {
2309         cp = aout;
2310         memset(cp, 0, MAXCELLHOSTS * sizeof(afs_int32));
2311         for (i = 0; i < MAXCELLHOSTS; i++) {
2312             if (tcell->cellHosts[i] == 0)
2313                 break;
2314             memcpy(cp, (char *)&tcell->cellHosts[i]->addr->sa_ip,
2315                    sizeof(afs_int32));
2316             cp += sizeof(afs_int32);
2317         }
2318         cp = aout + MAXCELLHOSTS * sizeof(afs_int32);
2319         strcpy(cp, tcell->cellName);
2320         cp += strlen(tcell->cellName) + 1;
2321         *aoutSize = cp - aout;
2322         afs_PutCell(tcell, READ_LOCK);
2323     }
2324     if (tcell)
2325         return 0;
2326     else
2327         return EDOM;
2328 }
2329
2330 DECL_PIOCTL(PListAliases)
2331 {
2332     afs_int32 whichAlias;
2333     register struct cell_alias *tcalias = 0;
2334     register char *cp, *tp = ain;
2335
2336     if (!afs_resourceinit_flag) /* afs daemons haven't started yet */
2337         return EIO;             /* Inappropriate ioctl for device */
2338     if (ainSize < sizeof(afs_int32))
2339         return EINVAL;
2340
2341     memcpy((char *)&whichAlias, tp, sizeof(afs_int32));
2342     tp += sizeof(afs_int32);
2343
2344     tcalias = afs_GetCellAlias(whichAlias);
2345     if (tcalias) {
2346         cp = aout;
2347         strcpy(cp, tcalias->alias);
2348         cp += strlen(tcalias->alias) + 1;
2349         strcpy(cp, tcalias->cell);
2350         cp += strlen(tcalias->cell) + 1;
2351         *aoutSize = cp - aout;
2352         afs_PutCellAlias(tcalias);
2353     }
2354     if (tcalias)
2355         return 0;
2356     else
2357         return EDOM;
2358 }
2359
2360 DECL_PIOCTL(PRemoveMount)
2361 {
2362     register afs_int32 code;
2363     char *bufp;
2364     struct sysname_info sysState;
2365     afs_size_t offset, len;
2366     register struct conn *tc;
2367     register struct dcache *tdc;
2368     register struct vcache *tvc;
2369     struct AFSFetchStatus OutDirStatus;
2370     struct VenusFid tfid;
2371     struct AFSVolSync tsync;
2372     XSTATS_DECLS;
2373
2374
2375     /* "ain" is the name of the file in this dir to remove */
2376
2377     AFS_STATCNT(PRemoveMount);
2378     if (!avc)
2379         return EINVAL;
2380     code = afs_VerifyVCache(avc, areq);
2381     if (code)
2382         return code;
2383     if (vType(avc) != VDIR)
2384         return ENOTDIR;
2385
2386     tdc = afs_GetDCache(avc, (afs_size_t) 0, areq, &offset, &len, 1);   /* test for error below */
2387     if (!tdc)
2388         return ENOENT;
2389     Check_AtSys(avc, ain, &sysState, areq);
2390     ObtainReadLock(&tdc->lock);
2391     do {
2392         code = afs_dir_Lookup(&tdc->f.inode, sysState.name, &tfid.Fid);
2393     } while (code == ENOENT && Next_AtSys(avc, areq, &sysState));
2394     ReleaseReadLock(&tdc->lock);
2395     bufp = sysState.name;
2396     if (code) {
2397         afs_PutDCache(tdc);
2398         goto out;
2399     }
2400     tfid.Cell = avc->fid.Cell;
2401     tfid.Fid.Volume = avc->fid.Fid.Volume;
2402     if (!tfid.Fid.Unique && (avc->states & CForeign)) {
2403         tvc = afs_LookupVCache(&tfid, areq, NULL, avc, bufp);
2404     } else {
2405         tvc = afs_GetVCache(&tfid, areq, NULL, NULL);
2406     }
2407     if (!tvc) {
2408         code = ENOENT;
2409         afs_PutDCache(tdc);
2410         goto out;
2411     }
2412     if (tvc->mvstat != 1) {
2413         afs_PutDCache(tdc);
2414         afs_PutVCache(tvc);
2415         code = EINVAL;
2416         goto out;
2417     }
2418     ObtainWriteLock(&tvc->lock, 230);
2419     code = afs_HandleLink(tvc, areq);
2420     if (!code) {
2421         if (tvc->linkData) {
2422             if ((tvc->linkData[0] != '#') && (tvc->linkData[0] != '%'))
2423                 code = EINVAL;
2424         } else
2425             code = EIO;
2426     }
2427     ReleaseWriteLock(&tvc->lock);
2428     osi_dnlc_purgedp(tvc);
2429     afs_PutVCache(tvc);
2430     if (code) {
2431         afs_PutDCache(tdc);
2432         goto out;
2433     }
2434     ObtainWriteLock(&avc->lock, 231);
2435     osi_dnlc_remove(avc, bufp, tvc);
2436     do {
2437         tc = afs_Conn(&avc->fid, areq, SHARED_LOCK);
2438         if (tc) {
2439             XSTATS_START_TIME(AFS_STATS_FS_RPCIDX_REMOVEFILE);
2440             RX_AFS_GUNLOCK();
2441             code =
2442                 RXAFS_RemoveFile(tc->id, (struct AFSFid *)&avc->fid.Fid, bufp,
2443                                  &OutDirStatus, &tsync);
2444             RX_AFS_GLOCK();
2445             XSTATS_END_TIME;
2446         } else
2447             code = -1;
2448     } while (afs_Analyze
2449              (tc, code, &avc->fid, areq, AFS_STATS_FS_RPCIDX_REMOVEFILE,
2450               SHARED_LOCK, NULL));
2451
2452     if (code) {
2453         if (tdc)
2454             afs_PutDCache(tdc);
2455         ReleaseWriteLock(&avc->lock);
2456         goto out;
2457     }
2458     if (tdc) {
2459         /* we have the thing in the cache */
2460         ObtainWriteLock(&tdc->lock, 661);
2461         if (afs_LocalHero(avc, tdc, &OutDirStatus, 1)) {
2462             /* we can do it locally */
2463             code = afs_dir_Delete(&tdc->f.inode, bufp);
2464             if (code) {
2465                 ZapDCE(tdc);    /* surprise error -- invalid value */
2466                 DZap(&tdc->f.inode);
2467             }
2468         }
2469         ReleaseWriteLock(&tdc->lock);
2470         afs_PutDCache(tdc);     /* drop ref count */
2471     }
2472     avc->states &= ~CUnique;    /* For the dfs xlator */
2473     ReleaseWriteLock(&avc->lock);
2474     code = 0;
2475   out:
2476     if (sysState.allocked)
2477         osi_FreeLargeSpace(bufp);
2478     return code;
2479 }
2480
2481 DECL_PIOCTL(PVenusLogging)
2482 {
2483     return EINVAL;              /* OBSOLETE */
2484 }
2485
2486 DECL_PIOCTL(PGetCellStatus)
2487 {
2488     register struct cell *tcell;
2489     afs_int32 temp;
2490
2491     AFS_STATCNT(PGetCellStatus);
2492     if (!afs_resourceinit_flag) /* afs daemons haven't started yet */
2493         return EIO;             /* Inappropriate ioctl for device */
2494
2495     tcell = afs_GetCellByName(ain, READ_LOCK);
2496     if (!tcell)
2497         return ENOENT;
2498     temp = tcell->states;
2499     afs_PutCell(tcell, READ_LOCK);
2500     memcpy(aout, (char *)&temp, sizeof(afs_int32));
2501     *aoutSize = sizeof(afs_int32);
2502     return 0;
2503 }
2504
2505 DECL_PIOCTL(PSetCellStatus)
2506 {
2507     register struct cell *tcell;
2508     afs_int32 temp;
2509
2510     if (!afs_osi_suser(*acred))
2511         return EACCES;
2512     if (!afs_resourceinit_flag) /* afs daemons haven't started yet */
2513         return EIO;             /* Inappropriate ioctl for device */
2514
2515     tcell = afs_GetCellByName(ain + 2 * sizeof(afs_int32), WRITE_LOCK);
2516     if (!tcell)
2517         return ENOENT;
2518     memcpy((char *)&temp, ain, sizeof(afs_int32));
2519     if (temp & CNoSUID)
2520         tcell->states |= CNoSUID;
2521     else
2522         tcell->states &= ~CNoSUID;
2523     afs_PutCell(tcell, WRITE_LOCK);
2524     return 0;
2525 }
2526
2527 DECL_PIOCTL(PFlushVolumeData)
2528 {
2529     register afs_int32 i;
2530     register struct dcache *tdc;
2531     register struct vcache *tvc;
2532     register struct volume *tv;
2533     afs_int32 cell, volume;
2534
2535     AFS_STATCNT(PFlushVolumeData);
2536     if (!avc)
2537         return EINVAL;
2538     if (!afs_resourceinit_flag) /* afs daemons haven't started yet */
2539         return EIO;             /* Inappropriate ioctl for device */
2540
2541     volume = avc->fid.Fid.Volume;       /* who to zap */
2542     cell = avc->fid.Cell;
2543
2544     /*
2545      * Clear stat'd flag from all vnodes from this volume; this will invalidate all
2546      * the vcaches associated with the volume.
2547      */
2548     ObtainReadLock(&afs_xvcache);
2549     for (i = 0; i < VCSIZE; i++) {
2550         for (tvc = afs_vhashT[i]; tvc; tvc = tvc->hnext) {
2551             if (tvc->fid.Fid.Volume == volume && tvc->fid.Cell == cell) {
2552 #if     defined(AFS_SGI_ENV) || defined(AFS_ALPHA_ENV)  || defined(AFS_SUN5_ENV)  || defined(AFS_HPUX_ENV) || defined(AFS_LINUX20_ENV)
2553                 VN_HOLD(AFSTOV(tvc));
2554 #else
2555 #if defined(AFS_DARWIN_ENV) || defined(AFS_XBSD_ENV)
2556                 osi_vnhold(tvc, 0);
2557 #else
2558                 VREFCOUNT_INC(tvc);
2559 #endif
2560 #endif
2561                 ReleaseReadLock(&afs_xvcache);
2562 #if     defined(AFS_SUN_ENV) || defined(AFS_ALPHA_ENV) || defined(AFS_SUN5_ENV)
2563                 afs_BozonLock(&tvc->pvnLock, tvc);      /* Since afs_TryToSmush will do a pvn_vptrunc */
2564 #endif
2565                 ObtainWriteLock(&tvc->lock, 232);
2566
2567                 ObtainWriteLock(&afs_xcbhash, 458);
2568                 afs_DequeueCallback(tvc);
2569                 tvc->states &= ~(CStatd | CDirty);
2570                 ReleaseWriteLock(&afs_xcbhash);
2571                 if (tvc->fid.Fid.Vnode & 1 || (vType(tvc) == VDIR))
2572                     osi_dnlc_purgedp(tvc);
2573                 afs_TryToSmush(tvc, *acred, 1);
2574                 ReleaseWriteLock(&tvc->lock);
2575 #if     defined(AFS_SUN_ENV) || defined(AFS_ALPHA_ENV) || defined(AFS_SUN5_ENV)
2576                 afs_BozonUnlock(&tvc->pvnLock, tvc);
2577 #endif
2578                 ObtainReadLock(&afs_xvcache);
2579                 /* our tvc ptr is still good until now */
2580                 AFS_FAST_RELE(tvc);
2581             }
2582         }
2583     }
2584     ReleaseReadLock(&afs_xvcache);
2585
2586
2587     MObtainWriteLock(&afs_xdcache, 328);        /* needed if you're going to flush any stuff */
2588     for (i = 0; i < afs_cacheFiles; i++) {
2589         if (!(afs_indexFlags[i] & IFEverUsed))
2590             continue;           /* never had any data */
2591         tdc = afs_GetDSlot(i, NULL);
2592         if (tdc->refCount <= 1) {       /* too high, in use by running sys call */
2593             ReleaseReadLock(&tdc->tlock);
2594             if (tdc->f.fid.Fid.Volume == volume && tdc->f.fid.Cell == cell) {
2595                 if (!(afs_indexFlags[i] & IFDataMod)) {
2596                     /* if the file is modified, but has a ref cnt of only 1, then
2597                      * someone probably has the file open and is writing into it.
2598                      * Better to skip flushing such a file, it will be brought back
2599                      * immediately on the next write anyway.
2600                      * 
2601                      * If we *must* flush, then this code has to be rearranged to call
2602                      * afs_storeAllSegments() first */
2603                     afs_FlushDCache(tdc);
2604                 }
2605             }
2606         } else {
2607             ReleaseReadLock(&tdc->tlock);
2608         }
2609         afs_PutDCache(tdc);     /* bumped by getdslot */
2610     }
2611     MReleaseWriteLock(&afs_xdcache);
2612
2613     ObtainReadLock(&afs_xvolume);
2614     for (i = 0; i < NVOLS; i++) {
2615         for (tv = afs_volumes[i]; tv; tv = tv->next) {
2616             if (tv->volume == volume) {
2617                 afs_ResetVolumeInfo(tv);
2618                 break;
2619             }
2620         }
2621     }
2622     ReleaseReadLock(&afs_xvolume);
2623
2624     /* probably, a user is doing this, probably, because things are screwed up.
2625      * maybe it's the dnlc's fault? */
2626     osi_dnlc_purge();
2627     return 0;
2628 }
2629
2630
2631
2632 DECL_PIOCTL(PGetVnodeXStatus)
2633 {
2634     register afs_int32 code;
2635     struct vcxstat stat;
2636     afs_int32 mode, i;
2637
2638 /*  AFS_STATCNT(PGetVnodeXStatus); */
2639     if (!avc)
2640         return EINVAL;
2641     code = afs_VerifyVCache(avc, areq);
2642     if (code)
2643         return code;
2644     if (vType(avc) == VDIR)
2645         mode = PRSFS_LOOKUP;
2646     else
2647         mode = PRSFS_READ;
2648     if (!afs_AccessOK(avc, mode, areq, CHECK_MODE_BITS))
2649         return EACCES;
2650     stat.fid = avc->fid;
2651     hset32(stat.DataVersion, hgetlo(avc->m.DataVersion));
2652     stat.lock = avc->lock;
2653     stat.parentVnode = avc->parentVnode;
2654     stat.parentUnique = avc->parentUnique;
2655     hset(stat.flushDV, avc->flushDV);
2656     hset(stat.mapDV, avc->mapDV);
2657     stat.truncPos = avc->truncPos;
2658     {                           /* just grab the first two - won't break anything... */
2659         struct axscache *ac;
2660
2661         for (i = 0, ac = avc->Access; ac && i < CPSIZE; i++, ac = ac->next) {
2662             stat.randomUid[i] = ac->uid;
2663             stat.randomAccess[i] = ac->axess;
2664         }
2665     }
2666     stat.callback = afs_data_pointer_to_int32(avc->callback);
2667     stat.cbExpires = avc->cbExpires;
2668     stat.anyAccess = avc->anyAccess;
2669     stat.opens = avc->opens;
2670     stat.execsOrWriters = avc->execsOrWriters;
2671     stat.flockCount = avc->flockCount;
2672     stat.mvstat = avc->mvstat;
2673     stat.states = avc->states;
2674     memcpy(aout, (char *)&stat, sizeof(struct vcxstat));
2675     *aoutSize = sizeof(struct vcxstat);
2676     return 0;
2677 }
2678
2679
2680 /* We require root for local sysname changes, but not for remote */
2681 /* (since we don't really believe remote uids anyway) */
2682  /* outname[] shouldn't really be needed- this is left as an excercise */
2683  /* for the reader.  */
2684 DECL_PIOCTL(PSetSysName)
2685 {
2686     char *cp, *cp2, inname[MAXSYSNAME], outname[MAXSYSNAME];
2687     int setsysname, foundname = 0;
2688     register struct afs_exporter *exporter;
2689     register struct unixuser *au;
2690     register afs_int32 pag, error;
2691     int t, count, num = 0;
2692     char **sysnamelist[MAXSYSNAME];
2693
2694     AFS_STATCNT(PSetSysName);
2695     if (!afs_globalVFS) {
2696         /* Afsd is NOT running; disable it */
2697 #if defined(KERNEL_HAVE_UERROR)
2698         return (setuerror(EINVAL), EINVAL);
2699 #else
2700         return (EINVAL);
2701 #endif
2702     }
2703     memset(inname, 0, MAXSYSNAME);
2704     memcpy((char *)&setsysname, ain, sizeof(afs_int32));
2705     ain += sizeof(afs_int32);
2706     if (setsysname) {
2707
2708         /* Check my args */
2709         if (setsysname < 0 || setsysname > MAXNUMSYSNAMES)
2710             return EINVAL;
2711         cp2 = ain;
2712         for (cp = ain, count = 0; count < setsysname; count++) {
2713             /* won't go past end of ain since maxsysname*num < ain length */
2714             t = strlen(cp);
2715             if (t >= MAXSYSNAME || t <= 0)
2716                 return EINVAL;
2717             /* check for names that can shoot us in the foot */
2718             if (*cp == '.' && (cp[1] == 0 || (cp[1] == '.' && cp[2] == 0)))
2719                 return EINVAL;
2720             cp += t + 1;
2721         }
2722         /* args ok */
2723
2724         /* inname gets first entry in case we're being a translator */
2725         t = strlen(ain);
2726         memcpy(inname, ain, t + 1);     /* include terminating null */
2727         ain += t + 1;
2728         num = count;
2729     }
2730     if ((*acred)->cr_gid == RMTUSER_REQ) {      /* Handles all exporters */
2731         pag = PagInCred(*acred);
2732         if (pag == NOPAG) {
2733             return EINVAL;      /* Better than panicing */
2734         }
2735         if (!(au = afs_FindUser(pag, -1, READ_LOCK))) {
2736             return EINVAL;      /* Better than panicing */
2737         }
2738         if (!(exporter = au->exporter)) {
2739             afs_PutUser(au, READ_LOCK);
2740             return EINVAL;      /* Better than panicing */
2741         }
2742         error = EXP_SYSNAME(exporter, (setsysname ? cp2 : NULL), sysnamelist,
2743                             &num);
2744         if (error) {
2745             if (error == ENODEV)
2746                 foundname = 0;  /* sysname not set yet! */
2747             else {
2748                 afs_PutUser(au, READ_LOCK);
2749                 return error;
2750             }
2751         } else {
2752             foundname = num;
2753             strcpy(outname, (*sysnamelist)[0]);
2754         }
2755         afs_PutUser(au, READ_LOCK);
2756     } else {
2757         /* Not xlating, so local case */
2758         if (!afs_sysname)
2759             osi_Panic("PSetSysName: !afs_sysname\n");
2760         if (!setsysname) {      /* user just wants the info */
2761             strcpy(outname, afs_sysname);
2762             foundname = afs_sysnamecount;
2763             *sysnamelist = afs_sysnamelist;
2764         } else {                /* Local guy; only root can change sysname */
2765             if (!afs_osi_suser(*acred))
2766                 return EACCES;
2767
2768             /* clear @sys entries from the dnlc, once afs_lookup can
2769              * do lookups of @sys entries and thinks it can trust them */
2770             /* privs ok, store the entry, ... */
2771             strcpy(afs_sysname, inname);
2772             if (setsysname > 1) {       /* ... or list */
2773                 cp = ain;
2774                 for (count = 1; count < setsysname; ++count) {
2775                     if (!afs_sysnamelist[count])
2776                         osi_Panic
2777                             ("PSetSysName: no afs_sysnamelist entry to write\n");
2778                     t = strlen(cp);
2779                     memcpy(afs_sysnamelist[count], cp, t + 1);  /* include null */
2780                     cp += t + 1;
2781                 }
2782             }
2783             afs_sysnamecount = setsysname;
2784         }
2785     }
2786     if (!setsysname) {
2787         cp = aout;              /* not changing so report back the count and ... */
2788         memcpy(cp, (char *)&foundname, sizeof(afs_int32));
2789         cp += sizeof(afs_int32);
2790         if (foundname) {
2791             strcpy(cp, outname);        /* ... the entry, ... */
2792             cp += strlen(outname) + 1;
2793             for (count = 1; count < foundname; ++count) {       /* ... or list. */
2794                 if (!(*sysnamelist)[count])
2795                     osi_Panic
2796                         ("PSetSysName: no afs_sysnamelist entry to read\n");
2797                 t = strlen((*sysnamelist)[count]);
2798                 if (t >= MAXSYSNAME)
2799                     osi_Panic("PSetSysName: sysname entry garbled\n");
2800                 strcpy(cp, (*sysnamelist)[count]);
2801                 cp += t + 1;
2802             }
2803         }
2804         *aoutSize = cp - aout;
2805     }
2806     return 0;
2807 }
2808
2809 /* sequential search through the list of touched cells is not a good
2810  * long-term solution here. For small n, though, it should be just
2811  * fine.  Should consider special-casing the local cell for large n.
2812  * Likewise for PSetSPrefs.
2813  *
2814  * s - number of ids in array l[] -- NOT index of last id
2815  * l - array of cell ids which have volumes that need to be sorted
2816  * vlonly - sort vl servers or file servers?
2817  */
2818 static void *
2819 ReSortCells_cb(struct cell *cell, void *arg)
2820 {
2821     afs_int32 *p = (afs_int32 *) arg;
2822     afs_int32 *l = p + 1;
2823     int i, s = p[0];
2824
2825     for (i = 0; i < s; i++) {
2826         if (l[i] == cell->cellNum) {
2827             ObtainWriteLock(&cell->lock, 690);
2828             afs_SortServers(cell->cellHosts, MAXCELLHOSTS);
2829             ReleaseWriteLock(&cell->lock);
2830         }
2831     }
2832
2833     return NULL;
2834 }
2835
2836 static void
2837 ReSortCells(int s, afs_int32 * l, int vlonly)
2838 {
2839     int i;
2840     struct volume *j;
2841     register int k;
2842
2843     if (vlonly) {
2844         afs_int32 *p;
2845         p = (afs_int32 *) afs_osi_Alloc(sizeof(afs_int32) * (s + 1));
2846         p[0] = s;
2847         memcpy(p + 1, l, s * sizeof(afs_int32));
2848         afs_TraverseCells(&ReSortCells_cb, p);
2849         afs_osi_Free(p, sizeof(afs_int32) * (s + 1));
2850         return;
2851     }
2852
2853     ObtainReadLock(&afs_xvolume);
2854     for (i = 0; i < NVOLS; i++) {
2855         for (j = afs_volumes[i]; j; j = j->next) {
2856             for (k = 0; k < s; k++)
2857                 if (j->cell == l[k]) {
2858                     ObtainWriteLock(&j->lock, 233);
2859                     afs_SortServers(j->serverHost, MAXHOSTS);
2860                     ReleaseWriteLock(&j->lock);
2861                     break;
2862                 }
2863         }
2864     }
2865     ReleaseReadLock(&afs_xvolume);
2866 }
2867
2868
2869 static int debugsetsp = 0;
2870 static int
2871 afs_setsprefs(sp, num, vlonly)
2872      struct spref *sp;
2873      unsigned int num;
2874      unsigned int vlonly;
2875 {
2876     struct srvAddr *sa;
2877     int i, j, k, matches, touchedSize;
2878     struct server *srvr = NULL;
2879     afs_int32 touched[34];
2880     int isfs;
2881
2882     touchedSize = 0;
2883     for (k = 0; k < num; sp++, k++) {
2884         if (debugsetsp) {
2885             printf("sp host=%x, rank=%d\n", sp->host.s_addr, sp->rank);
2886         }
2887         matches = 0;
2888         ObtainReadLock(&afs_xserver);
2889
2890         i = SHash(sp->host.s_addr);
2891         for (sa = afs_srvAddrs[i]; sa; sa = sa->next_bkt) {
2892             if (sa->sa_ip == sp->host.s_addr) {
2893                 srvr = sa->server;
2894                 isfs = (srvr->cell && (sa->sa_portal == srvr->cell->fsport))
2895                     || (sa->sa_portal == AFS_FSPORT);
2896                 if ((!vlonly && isfs) || (vlonly && !isfs)) {
2897                     matches++;
2898                     break;
2899                 }
2900             }
2901         }
2902
2903         if (sa && matches) {    /* found one! */
2904             if (debugsetsp) {
2905                 printf("sa ip=%x, ip_rank=%d\n", sa->sa_ip, sa->sa_iprank);
2906             }
2907             sa->sa_iprank = sp->rank + afs_randomMod15();
2908             afs_SortOneServer(sa->server);
2909
2910             if (srvr->cell) {
2911                 /* if we don't know yet what cell it's in, this is moot */
2912                 for (j = touchedSize - 1;
2913                      j >= 0 && touched[j] != srvr->cell->cellNum; j--)
2914                     /* is it in our list of touched cells ?  */ ;
2915                 if (j < 0) {    /* no, it's not */
2916                     touched[touchedSize++] = srvr->cell->cellNum;
2917                     if (touchedSize >= 32) {    /* watch for ovrflow */
2918                         ReleaseReadLock(&afs_xserver);
2919                         ReSortCells(touchedSize, touched, vlonly);
2920                         touchedSize = 0;
2921                         ObtainReadLock(&afs_xserver);
2922                     }
2923                 }
2924             }
2925         }
2926
2927         ReleaseReadLock(&afs_xserver);
2928         /* if we didn't find one, start to create one. */
2929         /* Note that it doesn't have a cell yet...     */
2930         if (!matches) {
2931             afs_uint32 temp = sp->host.s_addr;
2932             srvr =
2933                 afs_GetServer(&temp, 1, 0, (vlonly ? AFS_VLPORT : AFS_FSPORT),
2934                               WRITE_LOCK, (afsUUID *) 0, 0);
2935             srvr->addr->sa_iprank = sp->rank + afs_randomMod15();
2936             afs_PutServer(srvr, WRITE_LOCK);
2937         }
2938     }                           /* for all cited preferences */
2939
2940     ReSortCells(touchedSize, touched, vlonly);
2941     return 0;
2942 }
2943
2944  /* Note that this may only be performed by the local root user.
2945   */
2946 DECL_PIOCTL(PSetSPrefs)
2947 {
2948     struct setspref *ssp;
2949     AFS_STATCNT(PSetSPrefs);
2950
2951     if (!afs_resourceinit_flag) /* afs daemons haven't started yet */
2952         return EIO;             /* Inappropriate ioctl for device */
2953
2954     if (!afs_osi_suser(*acred))
2955         return EACCES;
2956
2957     if (ainSize < sizeof(struct setspref))
2958         return EINVAL;
2959
2960     ssp = (struct setspref *)ain;
2961     if (ainSize < sizeof(struct spref) * ssp->num_servers)
2962         return EINVAL;
2963
2964     afs_setsprefs(&(ssp->servers[0]), ssp->num_servers,
2965                   (ssp->flags & DBservers));
2966     return 0;
2967 }
2968
2969 DECL_PIOCTL(PSetSPrefs33)
2970 {
2971     struct spref *sp;
2972     AFS_STATCNT(PSetSPrefs);
2973     if (!afs_resourceinit_flag) /* afs daemons haven't started yet */
2974         return EIO;             /* Inappropriate ioctl for device */
2975
2976
2977     if (!afs_osi_suser(*acred))
2978         return EACCES;
2979
2980     sp = (struct spref *)ain;
2981     afs_setsprefs(sp, ainSize / (sizeof(struct spref)), 0 /*!vlonly */ );
2982     return 0;
2983 }
2984
2985 /* some notes on the following code...
2986  * in the hash table of server structs, all servers with the same IP address
2987  * will be on the same overflow chain.
2988  * This could be sped slightly in some circumstances by having it cache the
2989  * immediately previous slot in the hash table and some supporting information
2990  * Only reports file servers now.
2991  */
2992 DECL_PIOCTL(PGetSPrefs)
2993 {
2994     struct sprefrequest *spin;  /* input */
2995     struct sprefinfo *spout;    /* output */
2996     struct spref *srvout;       /* one output component */
2997     int i, j;                   /* counters for hash table traversal */
2998     struct server *srvr;        /* one of CM's server structs */
2999     struct srvAddr *sa;
3000     int vlonly;                 /* just return vlservers ? */
3001     int isfs;
3002
3003     AFS_STATCNT(PGetSPrefs);
3004     if (!afs_resourceinit_flag) /* afs daemons haven't started yet */
3005         return EIO;             /* Inappropriate ioctl for device */
3006
3007
3008     if (ainSize < sizeof(struct sprefrequest_33)) {
3009         return ENOENT;
3010     } else {
3011         spin = ((struct sprefrequest *)ain);
3012     }
3013
3014     if (ainSize > sizeof(struct sprefrequest_33)) {
3015         vlonly = (spin->flags & DBservers);
3016     } else
3017         vlonly = 0;
3018
3019     /* struct sprefinfo includes 1 server struct...  that size gets added
3020      * in during the loop that follows.
3021      */
3022     *aoutSize = sizeof(struct sprefinfo) - sizeof(struct spref);
3023     spout = (struct sprefinfo *)aout;
3024     spout->next_offset = spin->offset;
3025     spout->num_servers = 0;
3026     srvout = spout->servers;
3027
3028     ObtainReadLock(&afs_xserver);
3029     for (i = 0, j = 0; j < NSERVERS; j++) {     /* sift through hash table */
3030         for (sa = afs_srvAddrs[j]; sa; sa = sa->next_bkt, i++) {
3031             if (spin->offset > (unsigned short)i) {
3032                 continue;       /* catch up to where we left off */
3033             }
3034             spout->next_offset++;
3035
3036             srvr = sa->server;
3037             isfs = (srvr->cell && (sa->sa_portal == srvr->cell->fsport))
3038                 || (sa->sa_portal == AFS_FSPORT);
3039
3040             if ((vlonly && isfs) || (!vlonly && !isfs)) {
3041                 /* only report ranks for vl servers */
3042                 continue;
3043             }
3044
3045             srvout->host.s_addr = sa->sa_ip;
3046             srvout->rank = sa->sa_iprank;
3047             *aoutSize += sizeof(struct spref);
3048             spout->num_servers++;
3049             srvout++;
3050
3051             if (*aoutSize > (PIGGYSIZE - sizeof(struct spref))) {
3052                 ReleaseReadLock(&afs_xserver);  /* no more room! */
3053                 return 0;
3054             }
3055         }
3056     }
3057     ReleaseReadLock(&afs_xserver);
3058
3059     spout->next_offset = 0;     /* start over from the beginning next time */
3060     return 0;
3061 }
3062
3063 /* Enable/Disable the specified exporter. Must be root to disable an exporter */
3064 int afs_NFSRootOnly = 1;
3065 DECL_PIOCTL(PExportAfs)
3066 {
3067     afs_int32 export, newint =
3068         0, type, changestate, handleValue, convmode, pwsync, smounts;
3069     register struct afs_exporter *exporter;
3070
3071     AFS_STATCNT(PExportAfs);
3072     memcpy((char *)&handleValue, ain, sizeof(afs_int32));
3073     type = handleValue >> 24;
3074     if (type == 0x71) {
3075         newint = 1;
3076         type = 1;               /* nfs */
3077     }
3078     exporter = exporter_find(type);
3079     if (newint) {
3080         export = handleValue & 3;
3081         changestate = handleValue & 0xff;
3082         smounts = (handleValue >> 2) & 3;
3083         pwsync = (handleValue >> 4) & 3;
3084         convmode = (handleValue >> 6) & 3;
3085     } else {
3086         changestate = (handleValue >> 16) & 0x1;
3087         convmode = (handleValue >> 16) & 0x2;
3088         pwsync = (handleValue >> 16) & 0x4;
3089         smounts = (handleValue >> 16) & 0x8;
3090         export = handleValue & 0xff;
3091     }
3092     if (!exporter) {
3093         /*  Failed finding desired exporter; */
3094         return ENODEV;
3095     }
3096     if (!changestate) {
3097         handleValue = exporter->exp_states;
3098         memcpy(aout, (char *)&handleValue, sizeof(afs_int32));
3099         *aoutSize = sizeof(afs_int32);
3100     } else {
3101         if (!afs_osi_suser(*acred))
3102             return EACCES;      /* Only superuser can do this */
3103         if (newint) {
3104             if (export & 2) {
3105                 if (export & 1)
3106                     exporter->exp_states |= EXP_EXPORTED;
3107                 else
3108                     exporter->exp_states &= ~EXP_EXPORTED;
3109             }
3110             if (convmode & 2) {
3111                 if (convmode & 1)
3112                     exporter->exp_states |= EXP_UNIXMODE;
3113                 else
3114                     exporter->exp_states &= ~EXP_UNIXMODE;
3115             }
3116             if (pwsync & 2) {
3117                 if (pwsync & 1)
3118                     exporter->exp_states |= EXP_PWSYNC;
3119                 else
3120                     exporter->exp_states &= ~EXP_PWSYNC;
3121             }
3122             if (smounts & 2) {
3123                 if (smounts & 1) {
3124                     afs_NFSRootOnly = 0;
3125                     exporter->exp_states |= EXP_SUBMOUNTS;
3126                 } else {
3127                     afs_NFSRootOnly = 1;
3128                     exporter->exp_states &= ~EXP_SUBMOUNTS;
3129                 }
3130             }
3131             handleValue = exporter->exp_states;
3132             memcpy(aout, (char *)&handleValue, sizeof(afs_int32));
3133             *aoutSize = sizeof(afs_int32);
3134         } else {
3135             if (export)
3136                 exporter->exp_states |= EXP_EXPORTED;
3137             else
3138                 exporter->exp_states &= ~EXP_EXPORTED;
3139             if (convmode)
3140                 exporter->exp_states |= EXP_UNIXMODE;
3141             else
3142                 exporter->exp_states &= ~EXP_UNIXMODE;
3143             if (pwsync)
3144                 exporter->exp_states |= EXP_PWSYNC;
3145             else
3146                 exporter->exp_states &= ~EXP_PWSYNC;
3147             if (smounts) {
3148                 afs_NFSRootOnly = 0;
3149                 exporter->exp_states |= EXP_SUBMOUNTS;
3150             } else {
3151                 afs_NFSRootOnly = 1;
3152                 exporter->exp_states &= ~EXP_SUBMOUNTS;
3153             }
3154         }
3155     }
3156
3157     return 0;
3158 }
3159
3160 DECL_PIOCTL(PGag)
3161 {
3162     struct gaginfo *gagflags;
3163
3164     if (!afs_osi_suser(*acred))
3165         return EACCES;
3166
3167     gagflags = (struct gaginfo *)ain;
3168     afs_showflags = gagflags->showflags;
3169
3170     return 0;
3171 }
3172
3173
3174 DECL_PIOCTL(PTwiddleRx)
3175 {
3176     struct rxparams *rxp;
3177
3178     if (!afs_osi_suser(*acred))
3179         return EACCES;
3180
3181     rxp = (struct rxparams *)ain;
3182
3183     if (rxp->rx_initReceiveWindow)
3184         rx_initReceiveWindow = rxp->rx_initReceiveWindow;
3185     if (rxp->rx_maxReceiveWindow)
3186         rx_maxReceiveWindow = rxp->rx_maxReceiveWindow;
3187     if (rxp->rx_initSendWindow)
3188         rx_initSendWindow = rxp->rx_initSendWindow;
3189     if (rxp->rx_maxSendWindow)
3190         rx_maxSendWindow = rxp->rx_maxSendWindow;
3191     if (rxp->rxi_nSendFrags)
3192         rxi_nSendFrags = rxp->rxi_nSendFrags;
3193     if (rxp->rxi_nRecvFrags)
3194         rxi_nRecvFrags = rxp->rxi_nRecvFrags;
3195     if (rxp->rxi_OrphanFragSize)
3196         rxi_OrphanFragSize = rxp->rxi_OrphanFragSize;
3197     if (rxp->rx_maxReceiveSize) {
3198         rx_maxReceiveSize = rxp->rx_maxReceiveSize;
3199         rx_maxReceiveSizeUser = rxp->rx_maxReceiveSize;
3200     }
3201     if (rxp->rx_MyMaxSendSize)
3202         rx_MyMaxSendSize = rxp->rx_MyMaxSendSize;
3203
3204     return 0;
3205 }
3206
3207 DECL_PIOCTL(PGetInitParams)
3208 {
3209     if (sizeof(struct cm_initparams) > PIGGYSIZE)
3210         return E2BIG;
3211
3212     memcpy(aout, (char *)&cm_initParams, sizeof(struct cm_initparams));
3213     *aoutSize = sizeof(struct cm_initparams);
3214     return 0;
3215 }
3216
3217 #ifdef AFS_SGI65_ENV
3218 /* They took crget() from us, so fake it. */
3219 static cred_t *
3220 crget(void)
3221 {
3222     cred_t *cr;
3223     cr = crdup(get_current_cred());
3224     memset((char *)cr, 0, sizeof(cred_t));
3225 #if CELL || CELL_PREPARE
3226     cr->cr_id = -1;
3227 #endif
3228     return cr;
3229 }
3230 #endif
3231
3232 DECL_PIOCTL(PGetRxkcrypt)
3233 {
3234     memcpy(aout, (char *)&cryptall, sizeof(afs_int32));
3235     *aoutSize = sizeof(afs_int32);
3236     return 0;
3237 }
3238
3239 DECL_PIOCTL(PSetRxkcrypt)
3240 {
3241     afs_int32 tmpval;
3242
3243     if (!afs_osi_suser(*acred))
3244         return EPERM;
3245     if (ainSize != sizeof(afs_int32) || ain == NULL)
3246         return EINVAL;
3247     memcpy((char *)&tmpval, ain, sizeof(afs_int32));
3248     /* if new mappings added later this will need to be changed */
3249     if (tmpval != 0 && tmpval != 1)
3250         return EINVAL;
3251     cryptall = tmpval;
3252     return 0;
3253 }
3254
3255 #ifdef AFS_NEED_CLIENTCONTEXT
3256 /*
3257  * Create new credentials to correspond to a remote user with given
3258  * <hostaddr, uid, g0, g1>.  This allows a server running as root to
3259  * provide pioctl (and other) services to foreign clients (i.e. nfs
3260  * clients) by using this call to `become' the client.
3261  */
3262 #define PSETPAG         110
3263 #define PIOCTL_HEADER   6
3264 static int
3265 HandleClientContext(struct afs_ioctl *ablob, int *com,
3266                     struct AFS_UCRED **acred, struct AFS_UCRED *credp)
3267 {
3268     char *ain, *inData;
3269     afs_uint32 hostaddr;
3270     afs_int32 uid, g0, g1, i, code, pag, exporter_type;
3271     struct afs_exporter *exporter, *outexporter;
3272     struct AFS_UCRED *newcred;
3273     struct unixuser *au;
3274
3275 #if defined(AFS_SGIMP_ENV)
3276     osi_Assert(ISAFS_GLOCK());
3277 #endif
3278     AFS_STATCNT(HandleClientContext);
3279     if (ablob->in_size < PIOCTL_HEADER * sizeof(afs_int32)) {
3280         /* Must at least include the PIOCTL_HEADER header words required by the protocol */
3281         return EINVAL;          /* Too small to be good  */
3282     }
3283     ain = inData = osi_AllocLargeSpace(AFS_LRALLOCSIZ);
3284     AFS_COPYIN(ablob->in, ain, PIOCTL_HEADER * sizeof(afs_int32), code);
3285     if (code) {
3286         osi_FreeLargeSpace(inData);
3287         return code;
3288     }
3289
3290     /* Extract information for remote user */
3291     hostaddr = *((afs_uint32 *) ain);
3292     ain += sizeof(hostaddr);
3293     uid = *((afs_uint32 *) ain);
3294     ain += sizeof(uid);
3295     g0 = *((afs_uint32 *) ain);
3296     ain += sizeof(g0);
3297     g1 = *((afs_uint32 *) ain);
3298     ain += sizeof(g1);
3299     *com = *((afs_uint32 *) ain);
3300     ain += sizeof(afs_int32);
3301     exporter_type = *((afs_uint32 *) ain);      /* In case we support more than NFS */
3302
3303     /*
3304      * Of course, one must be root for most of these functions, but
3305      * we'll allow (for knfs) you to set things if the pag is 0 and
3306      * you're setting tokens or unlogging.
3307      */
3308     i = (*com) & 0xff;
3309     if (!afs_osi_suser(credp)) {
3310 #if defined(AFS_SGI_ENV) && !defined(AFS_SGI64_ENV)
3311         /* Since SGI's suser() returns explicit failure after the call.. */
3312         u.u_error = 0;
3313 #endif
3314         /* check for acceptable opcodes for normal folks, which are, so far,
3315          * set tokens and unlog.
3316          */
3317         if (i != 9 && i != 3 && i != 38 && i != 8) {
3318             osi_FreeLargeSpace(inData);
3319             return EACCES;
3320         }
3321     }
3322
3323     ablob->in_size -= PIOCTL_HEADER * sizeof(afs_int32);
3324     ablob->in += PIOCTL_HEADER * sizeof(afs_int32);
3325     osi_FreeLargeSpace(inData);
3326     if (uid == 0) {
3327         /*
3328          * We map uid 0 to nobody to match the mapping that the nfs
3329          * server does and to ensure that the suser() calls in the afs
3330          * code fails for remote client roots.
3331          */
3332         uid = afs_nobody;       /* NFS_NOBODY == -2 */
3333     }
3334     newcred = crget();
3335 #ifdef  AFS_AIX41_ENV
3336     setuerror(0);
3337 #endif
3338     newcred->cr_gid = RMTUSER_REQ;
3339 #ifdef AFS_AIX51_ENV
3340     newcred->cr_groupset.gs_union.un_groups[0] = g0;
3341     newcred->cr_groupset.gs_union.un_groups[1] = g1;
3342 #else
3343     newcred->cr_groups[0] = g0;
3344     newcred->cr_groups[1] = g1;
3345 #endif
3346 #ifdef AFS_AIX_ENV
3347     newcred->cr_ngrps = 2;
3348 #else
3349 #if defined(AFS_SGI_ENV) || defined(AFS_SUN5_ENV)
3350     newcred->cr_ngroups = 2;
3351 #else
3352     for (i = 2; i < NGROUPS; i++)
3353         newcred->cr_groups[i] = NOGROUP;
3354 #endif
3355 #endif
3356 #if     !defined(AFS_OSF_ENV) && !defined(AFS_DEC_ENV)
3357     afs_nfsclient_init();       /* before looking for exporter, ensure one exists */
3358 #endif
3359     if (!(exporter = exporter_find(exporter_type))) {
3360         /* Exporter wasn't initialized or an invalid exporter type */
3361         crfree(newcred);
3362         return EINVAL;
3363     }
3364     if (exporter->exp_states & EXP_PWSYNC) {
3365         if (uid != credp->cr_uid) {
3366             crfree(newcred);
3367             return ENOEXEC;     /* XXX Find a better errno XXX */
3368         }
3369     }
3370     newcred->cr_uid = uid;      /* Only temporary  */
3371     code = EXP_REQHANDLER(exporter, &newcred, hostaddr, &pag, &outexporter);
3372     /* The client's pag is the only unique identifier for it */
3373     newcred->cr_uid = pag;
3374     *acred = newcred;
3375     if (!code && *com == PSETPAG) {
3376         /* Special case for 'setpag' */
3377         afs_uint32 pagvalue = genpag();
3378
3379         au = afs_GetUser(pagvalue, -1, WRITE_LOCK);     /* a new unixuser struct */
3380         /*
3381          * Note that we leave the 'outexporter' struct held so it won't
3382          * dissappear on us
3383          */
3384         au->exporter = outexporter;
3385         if (ablob->out_size >= 4) {
3386             AFS_COPYOUT((char *)&pagvalue, ablob->out, sizeof(afs_int32),
3387                         code);
3388         }
3389         afs_PutUser(au, WRITE_LOCK);
3390         if (code)
3391             return code;
3392         return PSETPAG;         /*  Special return for setpag  */
3393     } else if (!code) {
3394         EXP_RELE(outexporter);
3395     }
3396     return code;
3397 }
3398 #endif /* AFS_NEED_CLIENTCONTEXT */
3399
3400 /* get all interface addresses of this client */
3401
3402 DECL_PIOCTL(PGetCPrefs)
3403 {
3404     struct sprefrequest *spin;  /* input */
3405     struct sprefinfo *spout;    /* output */
3406     struct spref *srvout;       /* one output component */
3407     int maxNumber;
3408     int i, j;
3409
3410     AFS_STATCNT(PGetCPrefs);
3411     if (!afs_resourceinit_flag) /* afs daemons haven't started yet */
3412         return EIO;             /* Inappropriate ioctl for device */
3413
3414     if (ainSize < sizeof(struct sprefrequest))
3415         return EINVAL;
3416
3417     spin = (struct sprefrequest *)ain;
3418     spout = (struct sprefinfo *)aout;
3419
3420     maxNumber = spin->num_servers;      /* max addrs this time */
3421     srvout = spout->servers;
3422
3423     ObtainReadLock(&afs_xinterface);
3424
3425     /* copy out the client interface information from the
3426      ** kernel data structure "interface" to the output buffer
3427      */
3428     for (i = spin->offset, j = 0; (i < afs_cb_interface.numberOfInterfaces)
3429          && (j < maxNumber); i++, j++, srvout++)
3430         srvout->host.s_addr = afs_cb_interface.addr_in[i];
3431
3432     spout->num_servers = j;
3433     *aoutSize = sizeof(struct sprefinfo) + (j - 1) * sizeof(struct spref);
3434
3435     if (i >= afs_cb_interface.numberOfInterfaces)
3436         spout->next_offset = 0; /* start from beginning again */
3437     else
3438         spout->next_offset = spin->offset + j;
3439
3440     ReleaseReadLock(&afs_xinterface);
3441     return 0;
3442 }
3443
3444 DECL_PIOCTL(PSetCPrefs)
3445 {
3446     struct setspref *sin;
3447     int i;
3448
3449     AFS_STATCNT(PSetCPrefs);
3450     if (!afs_resourceinit_flag) /* afs daemons haven't started yet */
3451         return EIO;             /* Inappropriate ioctl for device */
3452
3453     sin = (struct setspref *)ain;
3454
3455     if (ainSize < sizeof(struct setspref))
3456         return EINVAL;
3457 #if 0                           /* num_servers is unsigned */
3458     if (sin->num_servers < 0)
3459         return EINVAL;
3460 #endif
3461     if (sin->num_servers > AFS_MAX_INTERFACE_ADDR)
3462         return ENOMEM;
3463
3464     ObtainWriteLock(&afs_xinterface, 412);
3465     afs_cb_interface.numberOfInterfaces = sin->num_servers;
3466     for (i = 0; (unsigned short)i < sin->num_servers; i++)
3467         afs_cb_interface.addr_in[i] = sin->servers[i].host.s_addr;
3468
3469     ReleaseWriteLock(&afs_xinterface);
3470     return 0;
3471 }
3472
3473 DECL_PIOCTL(PFlushMount)
3474 {
3475     register afs_int32 code;
3476     register struct vcache *tvc;
3477     register struct dcache *tdc;
3478     struct VenusFid tfid;
3479     char *bufp;
3480     struct sysname_info sysState;
3481     afs_size_t offset, len;
3482
3483     AFS_STATCNT(PFlushMount);
3484     if (!avc)
3485         return EINVAL;
3486     code = afs_VerifyVCache(avc, areq);
3487     if (code)
3488         return code;
3489     if (vType(avc) != VDIR) {
3490         return ENOTDIR;
3491     }
3492     tdc = afs_GetDCache(avc, (afs_size_t) 0, areq, &offset, &len, 1);
3493     if (!tdc)
3494         return ENOENT;
3495     Check_AtSys(avc, ain, &sysState, areq);
3496     ObtainReadLock(&tdc->lock);
3497     do {
3498         code = afs_dir_Lookup(&tdc->f.inode, sysState.name, &tfid.Fid);
3499     } while (code == ENOENT && Next_AtSys(avc, areq, &sysState));
3500     ReleaseReadLock(&tdc->lock);
3501     afs_PutDCache(tdc);         /* we're done with the data */
3502     bufp = sysState.name;
3503     if (code) {
3504         goto out;
3505     }
3506     tfid.Cell = avc->fid.Cell;
3507     tfid.Fid.Volume = avc->fid.Fid.Volume;
3508     if (!tfid.Fid.Unique && (avc->states & CForeign)) {
3509         tvc = afs_LookupVCache(&tfid, areq, NULL, avc, bufp);
3510     } else {
3511         tvc = afs_GetVCache(&tfid, areq, NULL, NULL);
3512     }
3513     if (!tvc) {
3514         code = ENOENT;
3515         goto out;
3516     }
3517     if (tvc->mvstat != 1) {
3518         afs_PutVCache(tvc);
3519         code = EINVAL;
3520         goto out;
3521     }
3522 #if     defined(AFS_SUN_ENV) || defined(AFS_ALPHA_ENV) || defined(AFS_SUN5_ENV)
3523     afs_BozonLock(&tvc->pvnLock, tvc);  /* Since afs_TryToSmush will do a pvn_vptrunc */
3524 #endif
3525     ObtainWriteLock(&tvc->lock, 649);
3526     ObtainWriteLock(&afs_xcbhash, 650);
3527     afs_DequeueCallback(tvc);
3528     tvc->states &= ~(CStatd | CDirty);  /* next reference will re-stat cache entry */
3529     ReleaseWriteLock(&afs_xcbhash);
3530     /* now find the disk cache entries */
3531     afs_TryToSmush(tvc, *acred, 1);
3532     osi_dnlc_purgedp(tvc);
3533     afs_symhint_inval(tvc);
3534     if (tvc->linkData && !(tvc->states & CCore)) {
3535         afs_osi_Free(tvc->linkData, strlen(tvc->linkData) + 1);
3536         tvc->linkData = NULL;
3537     }
3538     ReleaseWriteLock(&tvc->lock);
3539 #if     defined(AFS_SUN_ENV) || defined(AFS_ALPHA_ENV) || defined(AFS_SUN5_ENV)
3540     afs_BozonUnlock(&tvc->pvnLock, tvc);
3541 #endif
3542     afs_PutVCache(tvc);
3543   out:
3544     if (sysState.allocked)
3545         osi_FreeLargeSpace(bufp);
3546     return code;
3547 }
3548
3549 DECL_PIOCTL(PRxStatProc)
3550 {
3551     int code = 0;
3552     afs_int32 flags;
3553
3554     if (!afs_osi_suser(*acred)) {
3555         code = EACCES;
3556         goto out;
3557     }
3558     if (ainSize != sizeof(afs_int32)) {
3559         code = EINVAL;
3560         goto out;
3561     }
3562     memcpy((char *)&flags, ain, sizeof(afs_int32));
3563     if (!(flags & AFSCALL_RXSTATS_MASK) || (flags & ~AFSCALL_RXSTATS_MASK)) {
3564         code = EINVAL;
3565         goto out;
3566     }
3567     if (flags & AFSCALL_RXSTATS_ENABLE) {
3568         rx_enableProcessRPCStats();
3569     }
3570     if (flags & AFSCALL_RXSTATS_DISABLE) {
3571         rx_disableProcessRPCStats();
3572     }
3573     if (flags & AFSCALL_RXSTATS_CLEAR) {
3574         rx_clearProcessRPCStats(AFS_RX_STATS_CLEAR_ALL);
3575     }
3576   out:
3577     *aoutSize = 0;
3578     return code;
3579 }
3580
3581
3582 DECL_PIOCTL(PRxStatPeer)
3583 {
3584     int code = 0;
3585     afs_int32 flags;
3586
3587     if (!afs_osi_suser(*acred)) {
3588         code = EACCES;
3589         goto out;
3590     }
3591     if (ainSize != sizeof(afs_int32)) {
3592         code = EINVAL;
3593         goto out;
3594     }
3595     memcpy((char *)&flags, ain, sizeof(afs_int32));
3596     if (!(flags & AFSCALL_RXSTATS_MASK) || (flags & ~AFSCALL_RXSTATS_MASK)) {
3597         code = EINVAL;
3598         goto out;
3599     }
3600     if (flags & AFSCALL_RXSTATS_ENABLE) {
3601         rx_enablePeerRPCStats();
3602     }
3603     if (flags & AFSCALL_RXSTATS_DISABLE) {
3604         rx_disablePeerRPCStats();
3605     }
3606     if (flags & AFSCALL_RXSTATS_CLEAR) {
3607         rx_clearPeerRPCStats(AFS_RX_STATS_CLEAR_ALL);
3608     }
3609   out:
3610     *aoutSize = 0;
3611     return code;
3612 }
3613
3614 DECL_PIOCTL(PPrefetchFromTape)
3615 {
3616     register afs_int32 code, code1;
3617     afs_int32 bytes;
3618     struct conn *tc;
3619     struct rx_call *tcall;
3620     struct AFSVolSync tsync;
3621     struct AFSFetchStatus OutStatus;
3622     struct AFSCallBack CallBack;
3623     struct VenusFid tfid;
3624     struct AFSFid *Fid;
3625     struct vcache *tvc;
3626
3627     AFS_STATCNT(PSetAcl);
3628     if (!avc)
3629         return EINVAL;
3630
3631     if (ain && (ainSize == 3 * sizeof(afs_int32)))
3632         Fid = (struct AFSFid *)ain;
3633     else
3634         Fid = &avc->fid.Fid;
3635     tfid.Cell = avc->fid.Cell;
3636     tfid.Fid.Volume = Fid->Volume;
3637     tfid.Fid.Vnode = Fid->Vnode;
3638     tfid.Fid.Unique = Fid->Unique;
3639
3640     tvc = afs_GetVCache(&tfid, areq, NULL, NULL);
3641     if (!tvc) {
3642         afs_Trace3(afs_iclSetp, CM_TRACE_PREFETCHCMD, ICL_TYPE_POINTER, tvc,
3643                    ICL_TYPE_FID, &tfid, ICL_TYPE_FID, &avc->fid);
3644         return ENOENT;
3645     }
3646     afs_Trace3(afs_iclSetp, CM_TRACE_PREFETCHCMD, ICL_TYPE_POINTER, tvc,
3647                ICL_TYPE_FID, &tfid, ICL_TYPE_FID, &tvc->fid);
3648
3649     do {
3650         tc = afs_Conn(&tvc->fid, areq, SHARED_LOCK);
3651         if (tc) {
3652
3653             RX_AFS_GUNLOCK();
3654             tcall = rx_NewCall(tc->id);
3655             code =
3656                 StartRXAFS_FetchData(tcall, (struct AFSFid *)&tvc->fid.Fid, 0,
3657                                      0);
3658             if (!code) {
3659                 bytes = rx_Read(tcall, (char *)aout, sizeof(afs_int32));
3660                 code =
3661                     EndRXAFS_FetchData(tcall, &OutStatus, &CallBack, &tsync);
3662             }
3663             code1 = rx_EndCall(tcall, code);
3664             RX_AFS_GLOCK();
3665         } else
3666             code = -1;
3667     } while (afs_Analyze
3668              (tc, code, &tvc->fid, areq, AFS_STATS_FS_RPCIDX_RESIDENCYRPCS,
3669               SHARED_LOCK, NULL));
3670     /* This call is done only to have the callback things handled correctly */
3671     afs_FetchStatus(tvc, &tfid, areq, &OutStatus);
3672     afs_PutVCache(tvc);
3673
3674     if (!code) {
3675         *aoutSize = sizeof(afs_int32);
3676     }
3677     return code;
3678 }
3679
3680 DECL_PIOCTL(PResidencyCmd)
3681 {
3682     register afs_int32 code;
3683     struct conn *tc;
3684     struct vcache *tvc;
3685     struct ResidencyCmdInputs *Inputs;
3686     struct ResidencyCmdOutputs *Outputs;
3687     struct VenusFid tfid;
3688     struct AFSFid *Fid;
3689
3690     Inputs = (struct ResidencyCmdInputs *)ain;
3691     Outputs = (struct ResidencyCmdOutputs *)aout;
3692     if (!avc)
3693         return EINVAL;
3694     if (!ain || ainSize != sizeof(struct ResidencyCmdInputs))
3695         return EINVAL;
3696
3697     Fid = &Inputs->fid;
3698     if (!Fid->Volume)
3699         Fid = &avc->fid.Fid;
3700
3701     tfid.Cell = avc->fid.Cell;
3702     tfid.Fid.Volume = Fid->Volume;
3703     tfid.Fid.Vnode = Fid->Vnode;
3704     tfid.Fid.Unique = Fid->Unique;
3705
3706     tvc = afs_GetVCache(&tfid, areq, NULL, NULL);
3707     afs_Trace3(afs_iclSetp, CM_TRACE_RESIDCMD, ICL_TYPE_POINTER, tvc,
3708                ICL_TYPE_INT32, Inputs->command, ICL_TYPE_FID, &tfid);
3709     if (!tvc)
3710         return ENOENT;
3711
3712     if (Inputs->command) {
3713         do {
3714             tc = afs_Conn(&tvc->fid, areq, SHARED_LOCK);
3715             if (tc) {
3716                 RX_AFS_GUNLOCK();
3717                 code =
3718                     RXAFS_ResidencyCmd(tc->id, Fid, Inputs,
3719                                        (struct ResidencyCmdOutputs *)aout);
3720                 RX_AFS_GLOCK();
3721             } else
3722                 code = -1;
3723         } while (afs_Analyze
3724                  (tc, code, &tvc->fid, areq,
3725                   AFS_STATS_FS_RPCIDX_RESIDENCYRPCS, SHARED_LOCK, NULL));
3726         /* This call is done to have the callback things handled correctly */
3727         afs_FetchStatus(tvc, &tfid, areq, &Outputs->status);
3728     } else {                    /* just a status request, return also link data */
3729         code = 0;
3730         Outputs->code = afs_FetchStatus(tvc, &tfid, areq, &Outputs->status);
3731         Outputs->chars[0] = 0;
3732         if (vType(tvc) == VLNK) {
3733             ObtainWriteLock(&tvc->lock, 555);
3734             if (afs_HandleLink(tvc, areq) == 0)
3735                 strncpy((char *)&Outputs->chars, tvc->linkData, MAXCMDCHARS);
3736             ReleaseWriteLock(&tvc->lock);
3737         }
3738     }
3739
3740     afs_PutVCache(tvc);
3741
3742     if (!code) {
3743         *aoutSize = sizeof(struct ResidencyCmdOutputs);
3744     }
3745     return code;
3746 }