1d78f0c67db560899c1da1756e1cfaa2451bac87
[openafs.git] / src / WINNT / afsd / cm_ioctl.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 <afs/param.h>
11 #include <afs/stds.h>
12 #include <afs/cellconfig.h>
13 #include <afs/ptserver.h>
14 #include <ubik.h>
15
16 #include <windows.h>
17 #include <errno.h>
18 #include <stdlib.h>
19 #include <malloc.h>
20 #include <string.h>
21 #include <stdio.h>
22 #include <time.h>
23
24 #include <osi.h>
25
26 #include "afsd.h"
27 #include "afsd_init.h"
28 #include <WINNT\afsreg.h>
29
30 #include "smb.h"
31
32 #include <rx/rxkad.h>
33 #include "afsrpc.h"
34
35 #include "cm_rpc.h"
36 #include <strsafe.h>
37 #include <winioctl.h>
38 #include <rx\rx.h>
39
40 #include "cm_btree.h"
41
42 #ifdef _DEBUG
43 #include <crtdbg.h>
44 #endif
45
46 /* Copied from afs_tokens.h */
47 #define PIOCTL_LOGON    0x1
48 #define MAX_PATH 260
49
50 const char utf8_prefix[] = UTF8_PREFIX;
51 const int  utf8_prefix_size = sizeof(utf8_prefix) -  sizeof(char);
52
53 osi_mutex_t cm_Afsdsbmt_Lock;
54
55 extern afs_int32 cryptall;
56 extern char cm_NetbiosName[];
57 extern clientchar_t cm_NetbiosNameC[];
58
59 extern void afsi_log(char *pattern, ...);
60
61 void cm_InitIoctl(void)
62 {
63     lock_InitializeMutex(&cm_Afsdsbmt_Lock, "AFSDSBMT.INI Access Lock",
64                           LOCK_HIERARCHY_AFSDBSBMT_GLOBAL);
65 }
66
67 /* 
68  * Utility function.  (Not currently in use.)
69  * This function forces all dirty buffers to the file server and 
70  * then discards the status info.
71  */
72 afs_int32
73 cm_CleanFile(cm_scache_t *scp, cm_user_t *userp, cm_req_t *reqp)
74 {
75     long code;
76
77     code = buf_CleanVnode(scp, userp, reqp);
78     if (!code) {
79         lock_ObtainWrite(&scp->rw);
80         cm_DiscardSCache(scp);
81         lock_ReleaseWrite(&scp->rw);
82     }
83     osi_Log2(afsd_logp,"cm_CleanFile scp 0x%x returns error: [%x]",scp, code);
84     return code;
85 }
86
87 /* 
88  * Utility function.  Used within this file.
89  * scp must be held but not locked.
90  */
91 afs_int32
92 cm_FlushFile(cm_scache_t *scp, cm_user_t *userp, cm_req_t *reqp)
93 {
94     afs_int32 code;
95
96 #ifdef AFS_FREELANCE_CLIENT
97     if ( scp->fid.cell == AFS_FAKE_ROOT_CELL_ID && scp->fid.volume == AFS_FAKE_ROOT_VOL_ID ) {
98         cm_noteLocalMountPointChange();
99         return 0;
100     }
101 #endif
102
103     code = buf_FlushCleanPages(scp, userp, reqp);
104         
105     lock_ObtainWrite(&scp->rw);
106     cm_DiscardSCache(scp);
107     if (scp->fileType == CM_SCACHETYPE_DIRECTORY)
108         cm_ResetSCacheDirectory(scp);
109     lock_ReleaseWrite(&scp->rw);
110
111     osi_Log2(afsd_logp,"cm_FlushFile scp 0x%x returns error: [%x]",scp, code);
112     return code;
113 }
114
115 /* 
116  * Utility function.  (Not currently in use)
117  * IoctlPath must be parsed or skipped prior to calling.
118  * scp must be held but not locked.
119  */
120 afs_int32
121 cm_FlushParent(cm_scache_t *scp, cm_user_t *userp, cm_req_t *reqp)
122 {
123     afs_int32 code = 0;
124     cm_scache_t * pscp;
125   
126     pscp = cm_FindSCacheParent(scp);
127   
128     /* now flush the file */
129     code = cm_FlushFile(pscp, userp, reqp);
130     cm_ReleaseSCache(pscp);
131
132     return code;
133 }
134
135 /* 
136  * Utility function.  Used within this function.
137  */
138 afs_int32
139 cm_FlushVolume(cm_user_t *userp, cm_req_t *reqp, afs_uint32 cell, afs_uint32 volume)
140 {
141     afs_int32 code = 0;
142     cm_scache_t *scp;
143     int i;
144
145 #ifdef AFS_FREELANCE_CLIENT
146     if ( cell == AFS_FAKE_ROOT_CELL_ID && volume == AFS_FAKE_ROOT_VOL_ID ) {
147         cm_noteLocalMountPointChange();
148         return 0;
149     }
150 #endif
151
152     lock_ObtainWrite(&cm_scacheLock);
153     for (i=0; i<cm_data.scacheHashTableSize; i++) {
154         for (scp = cm_data.scacheHashTablep[i]; scp; scp = scp->nextp) {
155             if (scp->fid.volume == volume && scp->fid.cell == cell) {
156                 cm_HoldSCacheNoLock(scp);
157                 lock_ReleaseWrite(&cm_scacheLock);
158
159                 /* now flush the file */
160                 code = cm_FlushFile(scp, userp, reqp);
161                 lock_ObtainWrite(&cm_scacheLock);
162                 cm_ReleaseSCacheNoLock(scp);
163             }
164         }
165     }
166     lock_ReleaseWrite(&cm_scacheLock);
167
168     return code;
169 }
170
171 /*
172  *  TranslateExtendedChars - This is a fix for TR 54482.
173  *
174  *  If an extended character (80 - FF) is entered into a file
175  *  or directory name in Windows, the character is translated
176  *  into the OEM character map before being passed to us.
177  *  The pioctl functions must match
178  *  this translation for paths given via our own commands (like
179  *  fs).  If we do not do this, then we will try to perform an
180  *  operation on a non-translated path, which we will fail to 
181  *  find, since the path was created with the translated chars.
182  *  This function performs the required translation.
183  *
184  *  OEM character code pages are used by the non-Unicode SMB
185  *  mode.  Do not use if the CM_IOCTLFLAG_USEUTF8 is set.
186  */
187 void 
188 TranslateExtendedChars(char *str)
189 {
190     if (!str || !*str)
191         return;
192
193     CharToOemA(str, str);
194 }
195
196 void cm_SkipIoctlPath(cm_ioctl_t *ioctlp)
197 {
198     size_t temp;
199
200     temp = strlen(ioctlp->inDatap) + 1;
201     ioctlp->inDatap += temp;
202 }
203
204
205 clientchar_t * cm_ParseIoctlStringAlloc(cm_ioctl_t *ioctlp, const char * ext_instrp)
206 {
207     clientchar_t * rs = NULL;
208     const char * instrp;
209
210     instrp = (ext_instrp)?ext_instrp:ioctlp->inDatap;
211
212     if ((ioctlp->flags & CM_IOCTLFLAG_USEUTF8) == CM_IOCTLFLAG_USEUTF8) {
213         rs = cm_Utf8ToClientStringAlloc(instrp, -1, NULL);
214     } else {
215         int cch;
216
217         /* Not a UTF-8 string */
218         if (smb_StoreAnsiFilenames) {
219             cch = cm_AnsiToClientString(instrp, -1, NULL, 0);
220 #ifdef DEBUG
221             osi_assert(cch > 0);
222 #endif
223             rs = malloc(cch * sizeof(clientchar_t));
224             cm_AnsiToClientString(instrp, -1, rs, cch);
225         } else {
226             cch = cm_OemToClientString(instrp, -1, NULL, 0);
227 #ifdef DEBUG
228             osi_assert(cch > 0);
229 #endif
230             rs = malloc(cch * sizeof(clientchar_t));
231             cm_OemToClientString(instrp, -1, rs, cch);
232         }
233     }
234
235     if (ext_instrp == NULL) {
236         ioctlp->inDatap += strlen(ioctlp->inDatap) + 1;
237     }
238     return rs;
239 }
240
241 int cm_UnparseIoctlString(cm_ioctl_t *ioctlp,
242                           char * ext_outp,
243                           const clientchar_t * cstr, int cchlen)
244 {
245     char *outp;
246     int cchout;
247
248     outp = ((ext_outp == NULL)? ioctlp->outDatap : ext_outp);
249
250     if ((ioctlp->flags & CM_IOCTLFLAG_USEUTF8) == CM_IOCTLFLAG_USEUTF8) {
251         cchout = cm_ClientStringToUtf8(cstr, cchlen, outp,
252                                        SMB_IOCTL_MAXDATA - (outp - ioctlp->outAllocp));
253     } else {
254         if (smb_StoreAnsiFilenames) {
255             cchout = WideCharToMultiByte(CP_ACP, 0, cstr, cchlen,
256                                          outp,
257                                          SMB_IOCTL_MAXDATA - (outp - ioctlp->outAllocp),
258                                          NULL, NULL);
259         } else {
260             cchout = WideCharToMultiByte(CP_OEMCP, 0, cstr, cchlen,
261                                          outp,
262                                          SMB_IOCTL_MAXDATA - (outp - ioctlp->outAllocp),
263                                          NULL, NULL);
264         }
265     }
266
267     if (cchout > 0 && ext_outp == NULL) {
268         ioctlp->outDatap += cchout;
269     }
270
271     return cchout;
272 }
273
274 /* 
275  * Must be called before XXX_ParseIoctlPath or cm_SkipIoctlPath 
276  */
277 cm_ioctlQueryOptions_t * 
278 cm_IoctlGetQueryOptions(struct cm_ioctl *ioctlp, struct cm_user *userp)
279 {
280     afs_uint32 pathlen = strlen(ioctlp->inDatap) + 1;
281     char *p = ioctlp->inDatap + pathlen;
282     cm_ioctlQueryOptions_t * optionsp = NULL;
283
284     if (ioctlp->inCopied > p - ioctlp->inAllocp) {
285         optionsp = (cm_ioctlQueryOptions_t *)p;
286         if (optionsp->size < 12 /* minimum size of struct */)
287             optionsp = NULL;
288     }
289
290     return optionsp;
291 }
292
293 /* 
294  * Must be called after smb_ParseIoctlPath or cm_SkipIoctlPath
295  * or any other time that ioctlp->inDatap points at the 
296  * cm_ioctlQueryOptions_t object.
297  */
298 void
299 cm_IoctlSkipQueryOptions(struct cm_ioctl *ioctlp, struct cm_user *userp)
300 {
301     cm_ioctlQueryOptions_t * optionsp = (cm_ioctlQueryOptions_t *)ioctlp->inDatap;
302     ioctlp->inDatap += optionsp->size;
303 }
304
305 /* format the specified path to look like "/afs/<cellname>/usr", by
306  * adding "/afs" (if necessary) in front, changing any \'s to /'s, and
307  * removing any trailing "/"'s. One weirdo caveat: "/afs" will be
308  * intentionally returned as "/afs/"--this makes submount manipulation
309  * easier (because we can always jump past the initial "/afs" to find
310  * the AFS path that should be written into afsdsbmt.ini).
311  */
312 void 
313 cm_NormalizeAfsPath(clientchar_t *outpathp, long cchlen, clientchar_t *inpathp)
314 {
315     clientchar_t *cp;
316     clientchar_t bslash_mountRoot[256];
317        
318     cm_ClientStrCpy(bslash_mountRoot, lengthof(bslash_mountRoot), cm_mountRootC);
319     bslash_mountRoot[0] = '\\';
320
321     if (!cm_ClientStrCmpNI(inpathp, cm_mountRootC, cm_mountRootCLen))
322         cm_ClientStrCpy(outpathp, cchlen, inpathp);
323     else if (!cm_ClientStrCmpNI(inpathp, bslash_mountRoot,
324                                 cm_ClientStrLen(bslash_mountRoot)))
325         cm_ClientStrCpy(outpathp, cchlen, inpathp);
326     else if ((inpathp[0] == '/') || (inpathp[0] == '\\'))
327         cm_ClientStrPrintfN(outpathp, cchlen, _C("%s%s"), cm_mountRootC, inpathp);
328     else // inpathp looks like "<cell>/usr"
329         cm_ClientStrPrintfN(outpathp, cchlen, _C("%s/%s"), cm_mountRootC, inpathp);
330
331     for (cp = outpathp; *cp != 0; ++cp) {
332         if (*cp == '\\')
333             *cp = '/';
334     }
335
336     if (cm_ClientStrLen(outpathp) && (outpathp[cm_ClientStrLen(outpathp)-1] == '/')) {
337         outpathp[cm_ClientStrLen(outpathp)-1] = 0;
338     }
339
340     if (!cm_ClientStrCmpI(outpathp, cm_mountRootC)) {
341         cm_ClientStrCpy(outpathp, cchlen, cm_mountRootC);
342     }
343 }
344
345 void cm_NormalizeAfsPathAscii(char *outpathp, long outlen, char *inpathp)
346 {
347     char *cp;
348     char bslash_mountRoot[256];
349        
350     strncpy(bslash_mountRoot, cm_mountRoot, sizeof(bslash_mountRoot) - 1);
351     bslash_mountRoot[0] = '\\';
352        
353     if (!strnicmp (inpathp, cm_mountRoot, strlen(cm_mountRoot)))
354         StringCbCopy(outpathp, outlen, inpathp);
355     else if (!strnicmp (inpathp, bslash_mountRoot, strlen(bslash_mountRoot)))
356         StringCbCopy(outpathp, outlen, inpathp);
357     else if ((inpathp[0] == '/') || (inpathp[0] == '\\'))
358         StringCbPrintfA(outpathp, outlen, "%s%s", cm_mountRoot, inpathp);
359     else // inpathp looks like "<cell>/usr"
360         StringCbPrintfA(outpathp, outlen, "%s/%s", cm_mountRoot, inpathp);
361
362     for (cp = outpathp; *cp != 0; ++cp) {
363         if (*cp == '\\')
364             *cp = '/';
365     }       
366
367     if (strlen(outpathp) && (outpathp[strlen(outpathp)-1] == '/')) {
368         outpathp[strlen(outpathp)-1] = 0;
369     }
370
371     if (!strcmpi (outpathp, cm_mountRoot)) {
372         StringCbCopy(outpathp, outlen, cm_mountRoot);
373     }
374 }
375
376
377 /* 
378  * VIOCGETAL internals.
379  * 
380  * Assumes that pioctl path has been parsed or skipped.
381  * scp is held but not locked.
382  */
383 afs_int32 
384 cm_IoctlGetACL(cm_ioctl_t *ioctlp, cm_user_t *userp, cm_scache_t *scp, cm_req_t *reqp)
385 {
386     afs_int32 code;
387     cm_conn_t *connp;
388     AFSOpaque acl;
389     AFSFetchStatus fileStatus;
390     AFSVolSync volSync;
391     AFSFid afid;
392     int tlen;
393     struct rx_connection * rxconnp;
394
395     /* now make the get acl call */
396 #ifdef AFS_FREELANCE_CLIENT
397     if ( scp->fid.cell == AFS_FAKE_ROOT_CELL_ID && scp->fid.volume == AFS_FAKE_ROOT_VOL_ID ) {
398         code = 0;
399         ioctlp->outDatap[0] ='\0';
400     } else
401 #endif
402     {
403         afid.Volume = scp->fid.volume;
404         afid.Vnode = scp->fid.vnode;
405         afid.Unique = scp->fid.unique;
406         do {
407             acl.AFSOpaque_val = ioctlp->outDatap;
408             acl.AFSOpaque_len = 0;
409             code = cm_ConnFromFID(&scp->fid, userp, reqp, &connp);
410             if (code) 
411                 continue;
412
413             rxconnp = cm_GetRxConn(connp);
414             code = RXAFS_FetchACL(rxconnp, &afid, &acl, &fileStatus, &volSync);
415             rx_PutConnection(rxconnp);
416
417         } while (cm_Analyze(connp, userp, reqp, &scp->fid, &volSync, NULL, NULL, code));
418         code = cm_MapRPCError(code, reqp);
419
420         if (code) 
421             return code;
422     }
423     /* skip over return data */
424     tlen = (int)strlen(ioctlp->outDatap) + 1;
425     ioctlp->outDatap += tlen;
426
427     /* and return success */
428     return 0;
429 }
430
431
432 /* 
433  * VIOC_FILE_CELL_NAME internals.
434  * 
435  * Assumes that pioctl path has been parsed or skipped.
436  * scp is held but not locked.
437  */
438 afs_int32 
439 cm_IoctlGetFileCellName(struct cm_ioctl *ioctlp, struct cm_user *userp, cm_scache_t *scp, cm_req_t *reqp)
440 {
441     afs_int32 code;
442     cm_cell_t *cellp;
443
444 #ifdef AFS_FREELANCE_CLIENT
445     if ( cm_freelanceEnabled && 
446          scp->fid.cell==AFS_FAKE_ROOT_CELL_ID &&
447          scp->fid.volume==AFS_FAKE_ROOT_VOL_ID &&
448          scp->fid.vnode==0x1 && scp->fid.unique==0x1 ) {
449         StringCbCopyA(ioctlp->outDatap, SMB_IOCTL_MAXDATA - (ioctlp->outDatap - ioctlp->outAllocp), "Freelance.Local.Root");
450         ioctlp->outDatap += strlen(ioctlp->outDatap) + 1;
451         code = 0;
452     } else 
453 #endif /* AFS_FREELANCE_CLIENT */
454     {
455         cellp = cm_FindCellByID(scp->fid.cell, CM_FLAG_NOPROBE);
456         if (cellp) {
457             clientchar_t * cellname;
458
459             cellname = cm_FsStringToClientStringAlloc(cellp->name, -1, NULL); 
460             cm_UnparseIoctlString(ioctlp, NULL, cellname, -1);
461             free(cellname);
462             code = 0;
463         } else
464             code = CM_ERROR_NOSUCHCELL;
465     }
466
467     return code;
468 }
469
470         
471 /* 
472  * VIOCSETAL internals.
473  * 
474  * Assumes that pioctl path has been parsed or skipped.
475  * scp is held but not locked.
476  */
477 afs_int32 
478 cm_IoctlSetACL(struct cm_ioctl *ioctlp, struct cm_user *userp, cm_scache_t *scp, cm_req_t *reqp)
479 {
480     afs_int32 code;
481     cm_conn_t *connp;
482     AFSOpaque acl;
483     AFSFetchStatus fileStatus;
484     AFSVolSync volSync;
485     AFSFid fid;
486     struct rx_connection * rxconnp;
487
488 #ifdef AFS_FREELANCE_CLIENT
489     if ( scp->fid.cell == AFS_FAKE_ROOT_CELL_ID && scp->fid.volume == AFS_FAKE_ROOT_VOL_ID ) {
490         code = CM_ERROR_NOACCESS;
491     } else
492 #endif
493     {
494         /* now make the get acl call */
495         fid.Volume = scp->fid.volume;
496         fid.Vnode = scp->fid.vnode;
497         fid.Unique = scp->fid.unique;
498         do {
499             acl.AFSOpaque_val = ioctlp->inDatap;
500             acl.AFSOpaque_len = (u_int)strlen(ioctlp->inDatap)+1;
501             code = cm_ConnFromFID(&scp->fid, userp, reqp, &connp);
502             if (code) 
503                 continue;
504
505             rxconnp = cm_GetRxConn(connp);
506             code = RXAFS_StoreACL(rxconnp, &fid, &acl, &fileStatus, &volSync);
507             rx_PutConnection(rxconnp);
508
509         } while (cm_Analyze(connp, userp, reqp, &scp->fid, &volSync, NULL, NULL, code));
510         code = cm_MapRPCError(code, reqp);
511
512         /* invalidate cache info, since we just trashed the ACL cache */
513         lock_ObtainWrite(&scp->rw);
514         cm_DiscardSCache(scp);
515         lock_ReleaseWrite(&scp->rw);
516     }
517
518     return code;
519 }
520
521 /* 
522  * VIOC_FLUSHALL internals.
523  * 
524  * Assumes that pioctl path has been parsed or skipped.
525  */
526 afs_int32 
527 cm_IoctlFlushAllVolumes(struct cm_ioctl *ioctlp, struct cm_user *userp, cm_req_t *reqp)
528 {
529     afs_int32 code;
530     cm_scache_t *scp;
531     int i;
532
533     lock_ObtainWrite(&cm_scacheLock);
534     for (i=0; i<cm_data.scacheHashTableSize; i++) {
535         for (scp = cm_data.scacheHashTablep[i]; scp; scp = scp->nextp) {
536             cm_HoldSCacheNoLock(scp);
537             lock_ReleaseWrite(&cm_scacheLock);
538
539             /* now flush the file */
540             code = cm_FlushFile(scp, userp, reqp);
541             lock_ObtainWrite(&cm_scacheLock);
542             cm_ReleaseSCacheNoLock(scp);
543         }
544     }
545     lock_ReleaseWrite(&cm_scacheLock);
546
547     return code;
548 }
549
550 /* 
551  * VIOC_FLUSHVOLUME internals.
552  * 
553  * Assumes that pioctl path has been parsed or skipped.
554  * scp is held but not locked.
555  */
556 afs_int32 
557 cm_IoctlFlushVolume(struct cm_ioctl *ioctlp, struct cm_user *userp, cm_scache_t *scp, cm_req_t *reqp)
558 {
559     afs_int32 code;
560     afs_uint32 volume;
561     afs_uint32 cell;
562
563 #ifdef AFS_FREELANCE_CLIENT
564     if ( scp->fid.cell == AFS_FAKE_ROOT_CELL_ID && scp->fid.volume == AFS_FAKE_ROOT_VOL_ID ) {
565         code = CM_ERROR_NOACCESS;
566     } else
567 #endif
568     {
569         volume = scp->fid.volume;
570         cell = scp->fid.cell;
571         code = cm_FlushVolume(userp, reqp, cell, volume);
572     }
573     return code;
574 }
575
576 /* 
577  * VIOCFLUSH internals.
578  * 
579  * Assumes that pioctl path has been parsed or skipped.
580  * scp is held but not locked.
581  */
582 afs_int32 
583 cm_IoctlFlushFile(struct cm_ioctl *ioctlp, struct cm_user *userp, cm_scache_t *scp, cm_req_t *reqp)
584 {
585     afs_int32 code;
586
587 #ifdef AFS_FREELANCE_CLIENT
588     if ( scp->fid.cell == AFS_FAKE_ROOT_CELL_ID && scp->fid.volume == AFS_FAKE_ROOT_VOL_ID ) {
589         code = CM_ERROR_NOACCESS;
590     } else
591 #endif
592     {
593         cm_FlushFile(scp, userp, reqp);
594     }
595     return 0;
596 }
597
598
599 /* 
600  * VIOCSETVOLSTAT internals.
601  * 
602  * Assumes that pioctl path has been parsed or skipped.
603  * scp is held but not locked.
604  */
605 afs_int32 
606 cm_IoctlSetVolumeStatus(struct cm_ioctl *ioctlp, struct cm_user *userp, cm_scache_t *scp, cm_req_t *reqp)
607 {
608     afs_int32 code;
609     char volName[32];
610     char offLineMsg[256];
611     char motd[256];
612     cm_conn_t *tcp;
613     AFSFetchVolumeStatus volStat;
614     AFSStoreVolumeStatus storeStat;
615     cm_volume_t *tvp;
616     cm_cell_t *cellp;
617     char *cp;
618     clientchar_t *strp;
619     struct rx_connection * rxconnp;
620
621 #ifdef AFS_FREELANCE_CLIENT
622     if ( scp->fid.cell == AFS_FAKE_ROOT_CELL_ID && scp->fid.volume == AFS_FAKE_ROOT_VOL_ID ) {
623         code = CM_ERROR_NOACCESS;
624     } else
625 #endif
626     {
627         cellp = cm_FindCellByID(scp->fid.cell, 0);
628         osi_assertx(cellp, "null cm_cell_t");
629
630         if (scp->flags & CM_SCACHEFLAG_RO)
631             return CM_ERROR_READONLY;
632
633         code = cm_FindVolumeByID(cellp, scp->fid.volume, userp, reqp, 
634                                  CM_GETVOL_FLAG_CREATE, &tvp);
635         if (code) 
636             return code;
637
638         cm_PutVolume(tvp);
639
640         /* Copy the junk out, using cp as a roving pointer. */
641         memcpy((char *)&volStat, ioctlp->inDatap, sizeof(AFSFetchVolumeStatus));
642         ioctlp->inDatap += sizeof(AFSFetchVolumeStatus);
643
644         strp = cm_ParseIoctlStringAlloc(ioctlp, NULL);
645         cm_ClientStringToFsString(strp, -1, volName, lengthof(volName));
646         free(strp);
647
648         strp = cm_ParseIoctlStringAlloc(ioctlp, NULL);
649         cm_ClientStringToFsString(strp, -1, offLineMsg, lengthof(offLineMsg));
650         free(strp);
651
652         strp = cm_ParseIoctlStringAlloc(ioctlp, NULL);
653         cm_ClientStringToFsString(strp, -1, motd, lengthof(motd));
654         free(strp);
655
656         strp = NULL;
657
658         storeStat.Mask = 0;
659         if (volStat.MinQuota != -1) {
660             storeStat.MinQuota = volStat.MinQuota;
661             storeStat.Mask |= AFS_SETMINQUOTA;
662         }
663         if (volStat.MaxQuota != -1) {
664             storeStat.MaxQuota = volStat.MaxQuota;
665             storeStat.Mask |= AFS_SETMAXQUOTA;
666         }
667
668         do {
669             code = cm_ConnFromFID(&scp->fid, userp, reqp, &tcp);
670             if (code)
671                 continue;
672
673             rxconnp = cm_GetRxConn(tcp);
674             code = RXAFS_SetVolumeStatus(rxconnp, scp->fid.volume,
675                                          &storeStat, volName, offLineMsg, motd);
676             rx_PutConnection(rxconnp);
677
678         } while (cm_Analyze(tcp, userp, reqp, &scp->fid, NULL, NULL, NULL, code));
679         code = cm_MapRPCError(code, reqp);
680     }
681     
682     /* return on failure */
683     if (code)
684         return code;
685
686     /* we are sending parms back to make compat. with prev system.  should
687      * change interface later to not ask for current status, just set
688      * new status
689      */
690     cp = ioctlp->outDatap;
691     memcpy(cp, (char *)&volStat, sizeof(VolumeStatus));
692     cp += sizeof(VolumeStatus);
693     StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), volName);
694     cp += strlen(volName)+1;
695     StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), offLineMsg);
696     cp += strlen(offLineMsg)+1;
697     StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), motd);
698     cp += strlen(motd)+1;
699
700     /* now return updated return data pointer */
701     ioctlp->outDatap = cp;
702
703     return 0;
704 }       
705
706
707 /* 
708  * VIOCGETVOLSTAT internals.
709  * 
710  * Assumes that pioctl path has been parsed or skipped.
711  * scp is held but not locked.
712  */
713 afs_int32 
714 cm_IoctlGetVolumeStatus(struct cm_ioctl *ioctlp, struct cm_user *userp, cm_scache_t *scp, cm_req_t *reqp)
715 {
716     afs_int32 code;
717     char volName[32]="(unknown)";
718     char offLineMsg[256]="server temporarily inaccessible";
719     char motd[256]="server temporarily inaccessible";
720     cm_conn_t *connp;
721     AFSFetchVolumeStatus volStat;
722     char *cp;
723     char *Name;
724     char *OfflineMsg;
725     char *MOTD;
726     struct rx_connection * rxconnp;
727
728 #ifdef AFS_FREELANCE_CLIENT
729     if ( scp->fid.cell == AFS_FAKE_ROOT_CELL_ID && scp->fid.volume == AFS_FAKE_ROOT_VOL_ID ) {
730         code = 0;
731         strncpy(volName, "Freelance.Local.Root", sizeof(volName));
732         offLineMsg[0] = '\0';
733         strncpy(motd, "Freelance mode in use.", sizeof(motd));
734         volStat.Vid = scp->fid.volume;
735         volStat.MaxQuota = 0;
736         volStat.BlocksInUse = 100;
737         volStat.PartBlocksAvail = 0;
738         volStat.PartMaxBlocks = 100;
739     } else
740 #endif
741     {
742         Name = volName;
743         OfflineMsg = offLineMsg;
744         MOTD = motd;
745         do {
746             code = cm_ConnFromFID(&scp->fid, userp, reqp, &connp);
747             if (code) continue;
748
749             rxconnp = cm_GetRxConn(connp);
750             code = RXAFS_GetVolumeStatus(rxconnp, scp->fid.volume,
751                                          &volStat, &Name, &OfflineMsg, &MOTD);
752             rx_PutConnection(rxconnp);
753
754         } while (cm_Analyze(connp, userp, reqp, &scp->fid, NULL, NULL, NULL, code));
755         code = cm_MapRPCError(code, reqp);
756     }
757
758     if (code) 
759         return code;
760
761     /* Copy all this junk into msg->im_data, keeping track of the lengths. */
762     cp = ioctlp->outDatap;
763     memcpy(cp, (char *)&volStat, sizeof(AFSFetchVolumeStatus));
764     cp += sizeof(AFSFetchVolumeStatus);
765     StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), volName);
766     cp += strlen(volName)+1;
767     StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), offLineMsg);
768     cp += strlen(offLineMsg)+1;
769     StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), motd);
770     cp += strlen(motd)+1;
771
772     /* return new size */
773     ioctlp->outDatap = cp;
774
775     return 0;
776 }
777
778 /* 
779  * VIOCGETFID internals.
780  * 
781  * Assumes that pioctl path has been parsed or skipped.
782  * scp is held but not locked.
783  */
784 afs_int32 
785 cm_IoctlGetFid(struct cm_ioctl *ioctlp, struct cm_user *userp, cm_scache_t *scp, cm_req_t *reqp)
786 {
787     char *cp;
788     cm_fid_t fid;
789
790     memset(&fid, 0, sizeof(cm_fid_t));
791     fid.cell   = scp->fid.cell;
792     fid.volume = scp->fid.volume;
793     fid.vnode  = scp->fid.vnode;
794     fid.unique = scp->fid.unique;
795
796     /* Copy all this junk into msg->im_data, keeping track of the lengths. */
797     cp = ioctlp->outDatap;
798     memcpy(cp, (char *)&fid, sizeof(cm_fid_t));
799     cp += sizeof(cm_fid_t);
800
801     /* return new size */
802     ioctlp->outDatap = cp;
803
804     return 0;
805 }
806
807 /* 
808  * VIOC_GETFILETYPE internals.
809  * 
810  * Assumes that pioctl path has been parsed or skipped.
811  * scp is held but not locked.
812  */
813 afs_int32 
814 cm_IoctlGetFileType(struct cm_ioctl *ioctlp, struct cm_user *userp, cm_scache_t *scp, cm_req_t *reqp)
815 {
816     afs_int32 code = 0;
817     char *cp;
818     afs_uint32 fileType = 0;
819
820     if (scp->fileType == 0) {
821         lock_ObtainWrite(&scp->rw);
822         code = cm_SyncOp(scp, NULL, userp, reqp, 0,
823                          CM_SCACHESYNC_NEEDCALLBACK | CM_SCACHESYNC_GETSTATUS);
824         if (code == 0)
825             cm_SyncOpDone(scp, NULL, CM_SCACHESYNC_NEEDCALLBACK | CM_SCACHESYNC_GETSTATUS);
826         lock_ReleaseWrite(&scp->rw);
827     }
828
829     if (code == 0) {
830         fileType = scp->fileType;
831
832         /* Copy all this junk into msg->im_data, keeping track of the lengths. */
833         cp = ioctlp->outDatap;
834         memcpy(cp, (char *)&fileType, sizeof(fileType));
835         cp += sizeof(fileType);
836
837         /* return new size */
838         ioctlp->outDatap = cp;
839     }
840     return code;
841 }
842
843 /* 
844  * VIOCGETOWNER internals.
845  * 
846  * Assumes that pioctl path has been parsed or skipped.
847  * scp is held but not locked.
848  */
849 afs_int32 
850 cm_IoctlGetOwner(struct cm_ioctl *ioctlp, struct cm_user *userp, cm_scache_t *scp, cm_req_t *reqp)
851 {
852     afs_int32 code = 0;
853     char *cp;
854
855     lock_ObtainWrite(&scp->rw);
856     code = cm_SyncOp(scp, NULL, userp, reqp, 0,
857                       CM_SCACHESYNC_NEEDCALLBACK | CM_SCACHESYNC_GETSTATUS);
858     if (code == 0)
859         cm_SyncOpDone(scp, NULL, CM_SCACHESYNC_NEEDCALLBACK | CM_SCACHESYNC_GETSTATUS);
860     lock_ReleaseWrite(&scp->rw);
861
862     if (code == 0) {
863         /* Copy all this junk into msg->im_data, keeping track of the lengths. */
864         cp = ioctlp->outDatap;
865         memcpy(cp, (char *)&scp->owner, sizeof(afs_uint32));
866         cp += sizeof(afs_uint32);
867         memcpy(cp, (char *)&scp->group, sizeof(afs_uint32));
868         cp += sizeof(afs_uint32);
869
870         /* return new size */
871         ioctlp->outDatap = cp;
872     }
873     return code;
874 }
875
876
877 /* 
878  * VIOCWHEREIS internals.
879  * 
880  * Assumes that pioctl path has been parsed or skipped.
881  * scp is held but not locked.
882  */
883 afs_int32 
884 cm_IoctlWhereIs(struct cm_ioctl *ioctlp, struct cm_user *userp, cm_scache_t *scp, cm_req_t *reqp)
885 {
886     afs_int32 code = 0;
887     cm_cell_t *cellp;
888     cm_volume_t *tvp;
889     cm_serverRef_t **tsrpp, *current;
890     cm_server_t *tsp;
891     afs_uint32 volume;
892     char *cp;
893
894     volume = scp->fid.volume;
895
896     cellp = cm_FindCellByID(scp->fid.cell, 0);
897
898     if (!cellp)
899         return CM_ERROR_NOSUCHCELL;
900
901 #ifdef AFS_FREELANCE_CLIENT
902     if ( cellp->cellID == AFS_FAKE_ROOT_CELL_ID) {
903         struct in_addr addr;
904
905         addr.s_net = 127;
906         addr.s_host = 0;
907         addr.s_lh = 0;
908         addr.s_impno = 1;
909
910         cp = ioctlp->outDatap;
911         
912         memcpy(cp, (char *)&addr, sizeof(addr));
913         cp += sizeof(addr);
914
915         /* still room for terminating NULL, add it on */
916         addr.s_addr = 0;
917         memcpy(cp, (char *)&addr, sizeof(addr));
918         cp += sizeof(addr);
919
920         ioctlp->outDatap = cp;
921     } else 
922 #endif
923     {
924         code = cm_FindVolumeByID(cellp, volume, userp, reqp, CM_GETVOL_FLAG_CREATE, &tvp);
925         if (code) 
926             return code;
927         
928         cp = ioctlp->outDatap;
929         
930         tsrpp = cm_GetVolServers(tvp, volume, userp, reqp);
931         if (tsrpp == NULL) {
932             code = CM_ERROR_NOSUCHVOLUME;
933         } else {
934             lock_ObtainRead(&cm_serverLock);
935             for (current = *tsrpp; current; current = current->next) {
936                 tsp = current->server;
937                 memcpy(cp, (char *)&tsp->addr.sin_addr.s_addr, sizeof(long));
938                 cp += sizeof(long);
939             }
940             lock_ReleaseRead(&cm_serverLock);
941             cm_FreeServerList(tsrpp, 0);
942         }
943         /* still room for terminating NULL, add it on */
944         volume = 0;     /* reuse vbl */
945         memcpy(cp, (char *)&volume, sizeof(long));
946         cp += sizeof(long);
947
948         ioctlp->outDatap = cp;
949         cm_PutVolume(tvp);
950     }
951     return code;
952 }       
953
954 /* 
955  * VIOC_AFS_STAT_MT_PT internals.
956  * 
957  * Assumes that pioctl path has been parsed or skipped.
958  * scp is held but not locked.
959  */
960 afs_int32 
961 cm_IoctlStatMountPoint(struct cm_ioctl *ioctlp, struct cm_user *userp, cm_scache_t *dscp, cm_req_t *reqp)
962 {
963     afs_int32 code;
964     cm_scache_t *scp;
965     clientchar_t *cp;
966
967     cp = cm_ParseIoctlStringAlloc(ioctlp, NULL);
968
969     code = cm_Lookup(dscp, cp[0] ? cp : L".", CM_FLAG_NOMOUNTCHASE, userp, reqp, &scp);
970     if (code) 
971         goto done_2;
972
973     lock_ObtainWrite(&scp->rw);
974     code = cm_SyncOp(scp, NULL, userp, reqp, 0,
975                       CM_SCACHESYNC_NEEDCALLBACK | CM_SCACHESYNC_GETSTATUS);
976     if (code == 0)
977         cm_SyncOpDone(scp, NULL, CM_SCACHESYNC_NEEDCALLBACK | CM_SCACHESYNC_GETSTATUS);
978     else
979         goto done;
980
981     /* now check that this is a real mount point */
982     if (scp->fileType != CM_SCACHETYPE_MOUNTPOINT) {
983         code = CM_ERROR_INVAL;
984         goto done;
985     }
986
987     code = cm_ReadMountPoint(scp, userp, reqp);
988     if (code == 0) {
989         char * strp;
990         strp = ioctlp->outDatap;
991         StringCbCopyA(strp, SMB_IOCTL_MAXDATA - (strp - ioctlp->outAllocp), scp->mountPointStringp);
992         strp += strlen(strp) + 1;
993         ioctlp->outDatap = strp;
994     }
995
996   done:
997     lock_ReleaseWrite(&scp->rw);
998     cm_ReleaseSCache(scp);
999
1000  done_2:
1001     if (cp)
1002         free(cp);
1003
1004     return code;
1005 }       
1006
1007 /* 
1008  * VIOC_AFS_DELETE_MT_PT internals.
1009  * 
1010  * Assumes that pioctl path has been parsed or skipped.
1011  * scp is held but not locked.
1012  */
1013 afs_int32 
1014 cm_IoctlDeleteMountPoint(struct cm_ioctl *ioctlp, struct cm_user *userp, cm_scache_t *dscp, cm_req_t *reqp)
1015 {
1016     afs_int32 code;
1017     cm_scache_t *scp;
1018     clientchar_t *cp = NULL;
1019     fschar_t *originalName = NULL;
1020     cm_dirOp_t dirop;
1021
1022     cp = cm_ParseIoctlStringAlloc(ioctlp, NULL);
1023
1024     code = cm_Lookup(dscp, cp[0] ? cp : L".", CM_FLAG_NOMOUNTCHASE, userp, reqp, &scp);
1025         
1026     /* if something went wrong, bail out now */
1027     if (code)
1028         goto done3;
1029         
1030     lock_ObtainWrite(&scp->rw);
1031     code = cm_SyncOp(scp, NULL, userp, reqp, 0,
1032                      CM_SCACHESYNC_NEEDCALLBACK | CM_SCACHESYNC_GETSTATUS);
1033     if (code)  
1034         goto done2;
1035
1036     /* now check that this is a real mount point */
1037     if (scp->fileType != CM_SCACHETYPE_MOUNTPOINT) {
1038         code = CM_ERROR_INVAL;
1039         goto done1;
1040     }
1041
1042     /* time to make the RPC, so drop the lock */
1043     lock_ReleaseWrite(&scp->rw);
1044
1045 #ifdef USE_BPLUS
1046     code = cm_BeginDirOp(dscp, userp, reqp, CM_DIRLOCK_READ, &dirop);
1047     if (code == 0) {
1048         code = cm_BPlusDirLookupOriginalName(&dirop, cp, &originalName);
1049         /* The cm_Dir* functions can't be used to lookup the
1050            originalName.  Those functions only know of the original
1051            name. */
1052         cm_EndDirOp(&dirop);
1053     }
1054 #endif
1055
1056     /* If this name doesn't have a non-normalized name associated with
1057        it, we assume that what we had is what is actually present on
1058        the file server. */
1059
1060     if (originalName == NULL) {
1061         originalName = cm_ClientStringToFsStringAlloc(cp, -1, NULL);
1062     }
1063
1064     /* cp is a normalized name.  originalName is the actual name we
1065        saw on the fileserver. */
1066 #ifdef AFS_FREELANCE_CLIENT
1067     if (cm_freelanceEnabled && dscp == cm_data.rootSCachep) {
1068         /* we are removing the mount point to the root dir., so call
1069          * the freelance code to do the deletion. */
1070         osi_Log0(afsd_logp,"IoctlDeleteMountPoint from Freelance root dir");
1071         code = cm_FreelanceRemoveMount(originalName);
1072     } else 
1073 #endif
1074     {
1075         /* easier to do it this way */
1076         code = cm_Unlink(dscp, originalName, cp, userp, reqp);
1077     }
1078     if (code == 0 && (dscp->flags & CM_SCACHEFLAG_ANYWATCH))
1079         smb_NotifyChange(FILE_ACTION_REMOVED,
1080                          FILE_NOTIFY_CHANGE_DIR_NAME,
1081                          dscp, cp, NULL, TRUE);
1082
1083     lock_ObtainWrite(&scp->rw);
1084   done1:
1085     cm_SyncOpDone(scp, NULL, CM_SCACHESYNC_NEEDCALLBACK | CM_SCACHESYNC_GETSTATUS);
1086
1087   done2:
1088     cm_DiscardSCache(scp);
1089     lock_ReleaseWrite(&scp->rw);
1090     cm_ReleaseSCache(scp);
1091
1092   done3:
1093     if (originalName != NULL)
1094         free(originalName);
1095
1096     if (cp != NULL)
1097         free(cp);
1098
1099     return code;
1100 }
1101
1102 /* 
1103  * VIOCCKSERV internals.
1104  * 
1105  * Assumes that pioctl path has been parsed or skipped.
1106  */
1107 afs_int32 
1108 cm_IoctlCheckServers(struct cm_ioctl *ioctlp, struct cm_user *userp)
1109 {
1110     cm_cell_t *cellp;
1111     chservinfo_t csi;
1112     char *tp;
1113     char *cp;
1114     long temp;
1115     cm_server_t *tsp;
1116     int haveCell;
1117         
1118     tp = ioctlp->inDatap;
1119     haveCell = 0;
1120
1121     memcpy(&temp, tp, sizeof(temp));
1122     if (temp == 0x12345678) {   /* For afs3.3 version */
1123         memcpy(&csi, tp, sizeof(csi));
1124         if (csi.tinterval >= 0) {
1125             cp = ioctlp->outDatap;
1126             memcpy(cp, (char *)&cm_daemonCheckDownInterval, sizeof(long));
1127             ioctlp->outDatap += sizeof(long);
1128             if (csi.tinterval > 0) {
1129                 if (!smb_SUser(userp))
1130                     return CM_ERROR_NOACCESS;
1131                 cm_daemonCheckDownInterval = csi.tinterval;
1132             }
1133             return 0;
1134         }
1135         if (csi.tsize)
1136             haveCell = 1;
1137         temp = csi.tflags;
1138         cp = csi.tbuffer;
1139     } else {    /* For pre afs3.3 versions */
1140         memcpy((char *)&temp, ioctlp->inDatap, sizeof(long));
1141         ioctlp->inDatap = cp = ioctlp->inDatap + sizeof(long);
1142         if (cp - ioctlp->inAllocp < ioctlp->inCopied)   /* still more data available */
1143             haveCell = 1;
1144     }
1145
1146     /* 
1147      * 1: fast check, don't contact servers.
1148      * 2: local cell only.
1149      */
1150     if (haveCell) {
1151         /* have cell name, too */
1152         cellp = cm_GetCell(cp, (temp & 1) ? CM_FLAG_NOPROBE : 0);
1153         if (!cellp) 
1154             return CM_ERROR_NOSUCHCELL;
1155     }
1156     else 
1157         cellp = (cm_cell_t *) 0;
1158     if (!cellp && (temp & 2)) {
1159         /* use local cell */
1160         fschar_t wscell[CELL_MAXNAMELEN+1];
1161         cm_GetRootCellName(wscell);
1162         cellp = cm_GetCell(wscell, 0);
1163     }
1164     if (!(temp & 1)) {  /* if not fast, call server checker routine */
1165         /* check down servers */
1166         cm_CheckServers(CM_FLAG_CHECKDOWNSERVERS | CM_FLAG_CHECKUPSERVERS, cellp);
1167     }
1168
1169     /* now return the current down server list */
1170     cp = ioctlp->outDatap;
1171     lock_ObtainRead(&cm_serverLock);
1172     for (tsp = cm_allServersp; tsp; tsp=tsp->allNextp) {
1173         if (cellp && tsp->cellp != cellp) 
1174             continue;   /* cell spec'd and wrong */
1175         if ((tsp->flags & CM_SERVERFLAG_DOWN)
1176             && tsp->type == CM_SERVER_FILE) {
1177             memcpy(cp, (char *)&tsp->addr.sin_addr.s_addr, sizeof(long));
1178             cp += sizeof(long);
1179         }
1180     }
1181     lock_ReleaseRead(&cm_serverLock);
1182
1183     ioctlp->outDatap = cp;
1184     return 0;
1185 }
1186
1187 /* 
1188  * VIOCCKBACK internals.
1189  * 
1190  * Assumes that pioctl path has been parsed or skipped.
1191  */
1192 afs_int32 
1193 cm_IoctlCheckVolumes(cm_ioctl_t *ioctlp, cm_user_t *userp)
1194 {
1195     cm_RefreshVolumes();
1196     return 0;
1197 }       
1198
1199 /* 
1200  * VIOCSETCACHESIZE internals.
1201  * 
1202  * Assumes that pioctl path has been parsed or skipped.
1203  *
1204  * This function is no longer meaningful in the current day world
1205  * of persistent caches.  The buf_SetNBuffers() function will
1206  * inevitably fail.
1207  */
1208 afs_int32 
1209 cm_IoctlSetCacheSize(struct cm_ioctl *ioctlp, struct cm_user *userp)
1210 {
1211     afs_int32 code;
1212     afs_uint64 temp;
1213
1214     memcpy(&temp, ioctlp->inDatap, sizeof(temp));
1215     if (temp == 0) 
1216         temp = cm_data.buf_nOrigBuffers;
1217     else {
1218         /* temp is in 1K units, convert to # of buffers */
1219         temp = temp / (cm_data.buf_blockSize / 1024);
1220     }       
1221
1222     /* now adjust the cache size */
1223     code = buf_SetNBuffers(temp);
1224
1225     return code;
1226 }
1227
1228 /* 
1229  * VIOC_TRACECTL internals.
1230  * 
1231  * Assumes that pioctl path has been parsed or skipped.
1232  */
1233 afs_int32 
1234 cm_IoctlTraceControl(cm_ioctl_t *ioctlp, cm_user_t *userp)
1235 {
1236     afs_uint32 inValue;
1237
1238     memcpy(&inValue, ioctlp->inDatap, sizeof(afs_uint32));
1239
1240     /* print trace */
1241     if (inValue & 8) {
1242         afsd_ForceTrace(FALSE);
1243         buf_ForceTrace(FALSE);
1244     }
1245         
1246     if (inValue & 2) {
1247         /* set tracing value to low order bit */
1248         if ((inValue & 1) == 0) {
1249             /* disable tracing */
1250             osi_LogDisable(afsd_logp);
1251             rx_DebugOnOff(FALSE);
1252         }
1253         else {
1254             /* enable tracing */
1255             osi_LogEnable(afsd_logp);
1256             rx_DebugOnOff(TRUE);
1257         }
1258     }
1259
1260     /* see if we're supposed to do a reset, too */
1261     if (inValue & 4) {
1262         osi_LogReset(afsd_logp);
1263     }
1264
1265     /* and copy out tracing flag */
1266     inValue = afsd_logp->enabled;       /* use as a temp vbl */
1267     memcpy(ioctlp->outDatap, &inValue, sizeof(afs_uint32));
1268     ioctlp->outDatap += sizeof(afs_uint32);
1269     return 0;
1270 }       
1271
1272 /* 
1273  * VIOCGETCACHEPARMS internals.
1274  * 
1275  * Assumes that pioctl path has been parsed or skipped.
1276  */
1277 afs_int32 
1278 cm_IoctlGetCacheParms(struct cm_ioctl *ioctlp, struct cm_user *userp)
1279 {
1280     cm_cacheParms_t parms;
1281
1282     memset(&parms, 0, sizeof(parms));
1283
1284     /* first we get, in 1K units, the cache size */
1285     parms.parms[0] = cm_data.buf_nbuffers * (cm_data.buf_blockSize / 1024);
1286
1287     /* and then the actual # of buffers in use (not in the free list, I guess,
1288      * will be what we do).
1289      */
1290     parms.parms[1] = (cm_data.buf_nbuffers - buf_CountFreeList()) * (cm_data.buf_blockSize / 1024);
1291
1292     memcpy(ioctlp->outDatap, &parms, sizeof(parms));
1293     ioctlp->outDatap += sizeof(parms);
1294
1295     return 0;
1296 }
1297
1298 /* 
1299  * VIOCGETCELL internals.
1300  * 
1301  * Assumes that pioctl path has been parsed or skipped.
1302  */
1303 afs_int32 
1304 cm_IoctlGetCell(struct cm_ioctl *ioctlp, struct cm_user *userp)
1305 {
1306     long whichCell;
1307     long magic = 0;
1308     cm_cell_t *tcellp;
1309     cm_serverRef_t *serverRefp;
1310     cm_server_t *serverp;
1311     long i;
1312     char *cp;
1313     char *tp;
1314     char *basep;
1315
1316     tp = ioctlp->inDatap;
1317
1318     memcpy((char *)&whichCell, tp, sizeof(long));
1319     tp += sizeof(long);
1320
1321     /* see if more than one long passed in, ignoring the null pathname (the -1) */
1322     if (ioctlp->inCopied-1 > sizeof(afs_uint32)) {
1323         memcpy((char *)&magic, tp, sizeof(afs_uint32));
1324     }
1325
1326     lock_ObtainRead(&cm_cellLock);
1327     for (tcellp = cm_data.allCellsp; tcellp; tcellp = tcellp->allNextp) {
1328         if (whichCell == 0)
1329             break;
1330         whichCell--;
1331     }
1332     lock_ReleaseRead(&cm_cellLock);
1333     if (tcellp) {
1334         int max = 8;
1335         clientchar_t * cellnamep;
1336
1337         cp = ioctlp->outDatap;
1338
1339         if (magic == 0x12345678) {
1340             memcpy(cp, (char *)&magic, sizeof(long));
1341             max = 13;
1342         }
1343         memset(cp, 0, max * sizeof(long));
1344         basep = cp;
1345         lock_ObtainRead(&cm_serverLock);        /* for going down server list */
1346         for (i=0, serverRefp = tcellp->vlServersp; 
1347              serverRefp && i<max; 
1348              i++, serverRefp = serverRefp->next) {
1349             serverp = serverRefp->server;
1350             memcpy(cp, &serverp->addr.sin_addr.s_addr, sizeof(long));
1351             cp += sizeof(long);
1352         }
1353         lock_ReleaseRead(&cm_serverLock);
1354         ioctlp->outDatap = basep + max * sizeof(afs_int32);
1355
1356         cellnamep = cm_FsStringToClientStringAlloc(tcellp->name, -1, NULL);
1357         cm_UnparseIoctlString(ioctlp, NULL, cellnamep, -1);
1358         free(cellnamep);
1359     }
1360
1361     if (tcellp) 
1362         return 0;
1363     else 
1364         return CM_ERROR_NOMORETOKENS;   /* mapped to EDOM */
1365 }
1366
1367
1368 /* 
1369  * VIOCNEWCELL internals.
1370  * 
1371  * Assumes that pioctl path has been parsed or skipped.
1372  */
1373 afs_int32 
1374 cm_IoctlNewCell(struct cm_ioctl *ioctlp, struct cm_user *userp)
1375 {
1376     /* 
1377      * All that needs to be done is to refresh server information for all cells that 
1378      * are already loaded.
1379   
1380      * cell list will be cm_CellLock and cm_ServerLock will be held for write.
1381      */  
1382   
1383     cm_cell_t *cp;
1384     cm_cell_rock_t rock;
1385
1386     lock_ObtainWrite(&cm_cellLock);
1387   
1388     for (cp = cm_data.allCellsp; cp; cp=cp->allNextp) 
1389     {
1390         afs_int32 code;
1391
1392         /* delete all previous server lists - cm_FreeServerList will ask for write on cm_ServerLock*/
1393         cm_FreeServerList(&cp->vlServersp, CM_FREESERVERLIST_DELETE);
1394         cp->vlServersp = NULL;
1395         lock_ReleaseWrite(&cm_cellLock);
1396
1397         rock.cellp = cp;
1398         rock.flags = 0;
1399         code = cm_SearchCellFile(cp->name, cp->name, cm_AddCellProc, &rock);
1400 #ifdef AFS_AFSDB_ENV
1401         if (code) {
1402             if (cm_dnsEnabled) {
1403                 int ttl;
1404                 code = cm_SearchCellByDNS(cp->name, cp->name, &ttl, cm_AddCellProc, &rock);
1405                 if ( code == 0 ) { /* got cell from DNS */
1406                     lock_ObtainMutex(&cp->mx);
1407                     cp->flags |= CM_CELLFLAG_DNS;
1408                     cp->flags &= ~CM_CELLFLAG_VLSERVER_INVALID;
1409                     cp->timeout = time(0) + ttl;
1410                     lock_ReleaseMutex(&cp->mx);
1411                 }
1412             }
1413         } 
1414         else {
1415             lock_ObtainMutex(&cp->mx);
1416             cp->flags &= ~CM_CELLFLAG_DNS;
1417             lock_ReleaseMutex(&cp->mx);
1418         }
1419 #endif /* AFS_AFSDB_ENV */
1420         if (code) {
1421             lock_ObtainMutex(&cp->mx);
1422             cp->flags |= CM_CELLFLAG_VLSERVER_INVALID;
1423             lock_ReleaseMutex(&cp->mx);
1424             lock_ObtainWrite(&cm_cellLock);
1425         }
1426         else {
1427             lock_ObtainMutex(&cp->mx);
1428             cp->flags &= ~CM_CELLFLAG_VLSERVER_INVALID;
1429             lock_ReleaseMutex(&cp->mx);
1430             lock_ObtainWrite(&cm_cellLock);
1431             cm_RandomizeServer(&cp->vlServersp);
1432         }
1433     }
1434     lock_ReleaseWrite(&cm_cellLock);
1435     return 0;       
1436 }
1437
1438 /* 
1439  * VIOC_GET_WS_CELL internals.
1440  * 
1441  * Assumes that pioctl path has been parsed or skipped.
1442  */
1443 afs_int32 
1444 cm_IoctlGetWsCell(cm_ioctl_t *ioctlp, cm_user_t *userp)
1445 {
1446     afs_int32 code = 0;
1447
1448     if (cm_freelanceEnabled) {
1449         if (cm_GetRootCellName(ioctlp->outDatap))
1450             StringCbCopyA(ioctlp->outDatap, SMB_IOCTL_MAXDATA - (ioctlp->outDatap - ioctlp->outAllocp), "Freelance.Local.Root");
1451         ioctlp->outDatap += strlen(ioctlp->outDatap) +1;
1452     } else if (cm_data.rootCellp) {
1453         clientchar_t * cellnamep = cm_FsStringToClientStringAlloc(cm_data.rootCellp->name, -1, NULL);
1454         /* return the default cellname to the caller */
1455         cm_UnparseIoctlString(ioctlp, NULL, cellnamep, -1);
1456         free(cellnamep);
1457     } else {
1458         /* if we don't know our default cell, return failure */
1459         code = CM_ERROR_NOSUCHCELL;
1460     }   
1461
1462     return code;
1463 }
1464
1465 /* 
1466  * VIOC_AFS_SYSNAME internals.
1467  * 
1468  * Assumes that pioctl path has been parsed or skipped.
1469  */
1470 afs_int32 
1471 cm_IoctlSysName(struct cm_ioctl *ioctlp, struct cm_user *userp)
1472 {
1473     afs_uint32 setSysName;
1474     char *cp, *cp2;
1475     clientchar_t *inname = NULL;
1476     int t, count;
1477
1478     memcpy(&setSysName, ioctlp->inDatap, sizeof(afs_uint32));
1479     ioctlp->inDatap += sizeof(afs_uint32);
1480
1481     if (setSysName) {
1482         /* check my args */
1483         if ( setSysName < 0 || setSysName > MAXNUMSYSNAMES )
1484             return EINVAL;
1485         cp2 = ioctlp->inDatap;
1486         for ( cp=ioctlp->inDatap, count = 0; count < setSysName; count++ ) {
1487             /* won't go past end of ioctlp->inDatap since
1488                maxsysname*num < ioctlp->inDatap length */
1489             t = (int)strlen(cp);
1490             if (t >= MAXSYSNAME || t <= 0)
1491                 return EINVAL;
1492             /* check for names that can shoot us in the foot */
1493             if (*cp == '.' && (cp[1] == 0 || (cp[1] == '.' && cp[2] == 0)))
1494                 return EINVAL;
1495             cp += t + 1;
1496         }
1497         /* args ok */
1498
1499         /* inname gets first entry in case we're being a translator */
1500         /* (we are never a translator) */
1501         inname = cm_ParseIoctlStringAlloc(ioctlp, NULL);
1502     }
1503
1504     /* Not xlating, so local case */
1505     if (!cm_sysName)
1506         osi_panic("cm_IoctlSysName: !cm_sysName\n", __FILE__, __LINE__);
1507
1508     if (setSysName) {
1509         /* Local guy; only root can change sysname */
1510         /* clear @sys entries from the dnlc, once afs_lookup can
1511          * do lookups of @sys entries and thinks it can trust them */
1512         /* privs ok, store the entry, ... */
1513
1514         cm_ClientStrCpy(cm_sysName, lengthof(cm_sysName), inname);
1515         cm_ClientStrCpy(cm_sysNameList[0], MAXSYSNAME, inname);
1516
1517         if (setSysName > 1) {       /* ... or list */
1518             for (count = 1; count < setSysName; ++count) {
1519                 clientchar_t * newsysname;
1520
1521                 if (!cm_sysNameList[count])
1522                     osi_panic("cm_IoctlSysName: no cm_sysNameList entry to write\n",
1523                               __FILE__, __LINE__);
1524
1525                 newsysname = cm_ParseIoctlStringAlloc(ioctlp, NULL);
1526                 cm_ClientStrCpy(cm_sysNameList[count], MAXSYSNAME, newsysname);
1527                 free(newsysname);
1528             }
1529         }
1530         cm_sysNameCount = setSysName;
1531     } else {
1532         afs_int32 i32;
1533
1534         /* return the sysname to the caller */
1535         i32 = cm_sysNameCount;
1536         memcpy(ioctlp->outDatap, &i32, sizeof(afs_int32));
1537         ioctlp->outDatap += sizeof(afs_int32);  /* skip found flag */
1538
1539         if (cm_sysNameCount) {
1540             for ( count=0; count < cm_sysNameCount ; ++count) {   /* ... or list */
1541                 if ( !cm_sysNameList[count] || *cm_sysNameList[count] == _C('\0'))
1542                     osi_panic("cm_IoctlSysName: no cm_sysNameList entry to read\n", 
1543                               __FILE__, __LINE__);
1544                 cm_UnparseIoctlString(ioctlp, NULL, cm_sysNameList[count], -1);
1545             }
1546         }
1547     }
1548
1549     if (inname) {
1550         free(inname);
1551         inname = NULL;
1552     }
1553
1554     /* done: success */
1555     return 0;
1556 }
1557
1558 /* 
1559  * VIOC_GETCELLSTATUS internals.
1560  * 
1561  * Assumes that pioctl path has been parsed or skipped.
1562  */
1563 afs_int32 
1564 cm_IoctlGetCellStatus(struct cm_ioctl *ioctlp, struct cm_user *userp)
1565 {
1566     afs_uint32 temp;
1567     cm_cell_t *cellp;
1568     clientchar_t * cellnamep;
1569     fschar_t     * fscellnamep;
1570
1571     cellnamep = cm_ParseIoctlStringAlloc(ioctlp, NULL);
1572     fscellnamep = cm_ClientStringToFsStringAlloc(cellnamep, -1, NULL);
1573     cellp = cm_GetCell(fscellnamep, 0);
1574     free(fscellnamep);
1575     free(cellnamep);
1576
1577     if (!cellp) 
1578         return CM_ERROR_NOSUCHCELL;
1579
1580     temp = 0;
1581     lock_ObtainMutex(&cellp->mx);
1582     if (cellp->flags & CM_CELLFLAG_SUID)
1583         temp |= CM_SETCELLFLAG_SUID;
1584     lock_ReleaseMutex(&cellp->mx);
1585
1586     /* now copy out parm */
1587     memcpy(ioctlp->outDatap, &temp, sizeof(afs_uint32));
1588     ioctlp->outDatap += sizeof(afs_uint32);
1589
1590     return 0;
1591 }
1592
1593 /* 
1594  * VIOC_SETCELLSTATUS internals.
1595  * 
1596  * Assumes that pioctl path has been parsed or skipped.
1597  */
1598 afs_int32 
1599 cm_IoctlSetCellStatus(struct cm_ioctl *ioctlp, struct cm_user *userp)
1600 {
1601     afs_uint32 flags;
1602     cm_cell_t *cellp;
1603     clientchar_t *temp;
1604     fschar_t * cellnamep;
1605
1606     temp = cm_ParseIoctlStringAlloc(ioctlp, ioctlp->inDatap + 2*sizeof(afs_uint32));
1607     cellnamep = cm_ClientStringToFsStringAlloc(temp, -1, NULL);
1608     cellp = cm_GetCell(cellnamep, 0);
1609     free(temp);
1610     free(cellnamep);
1611
1612     if (!cellp) 
1613         return CM_ERROR_NOSUCHCELL;
1614
1615     memcpy((char *)&flags, ioctlp->inDatap, sizeof(afs_uint32));
1616
1617     lock_ObtainMutex(&cellp->mx);
1618     if (flags & CM_SETCELLFLAG_SUID)
1619         cellp->flags |= CM_CELLFLAG_SUID;
1620     else
1621         cellp->flags &= ~CM_CELLFLAG_SUID;
1622     lock_ReleaseMutex(&cellp->mx);
1623
1624     return 0;
1625 }
1626
1627 /* 
1628  * VIOC_SETSPREFS internals.
1629  * 
1630  * Assumes that pioctl path has been parsed or skipped.
1631  */
1632 afs_int32 
1633 cm_IoctlSetSPrefs(struct cm_ioctl *ioctlp, struct cm_user *userp)
1634 {
1635     cm_SSetPref_t     *spin;    /* input */
1636     cm_SPref_t        *srvin;   /* one input component */
1637     cm_server_t       *tsp;
1638     int                i, vlonly, noServers, type;
1639     struct sockaddr_in tmp;
1640     unsigned short     rank;
1641
1642     spin           = (cm_SSetPref_t *)ioctlp->inDatap;
1643     noServers  = spin->num_servers;
1644     vlonly     = spin->flags;
1645     if ( vlonly )
1646         type = CM_SERVER_VLDB;
1647     else    
1648         type = CM_SERVER_FILE;
1649
1650     for ( i=0; i < noServers; i++) 
1651     {
1652         srvin          = &(spin->servers[i]);
1653         rank           = srvin->rank + (rand() & 0x000f);
1654         tmp.sin_addr   = srvin->host;
1655         tmp.sin_family = AF_INET;
1656
1657         tsp = cm_FindServer(&tmp, type);
1658         if ( tsp )              /* an existing server - ref count increased */
1659         {
1660             tsp->ipRank = rank; /* no need to protect by mutex*/
1661
1662             if (type == CM_SERVER_FILE)
1663             {   /* fileserver */
1664                 /* find volumes which might have RO copy 
1665                 /* on server and change the ordering of 
1666                  * their RO list 
1667                  */
1668                 cm_ChangeRankVolume(tsp);
1669             }
1670             else        
1671             {
1672                 /* set preferences for an existing vlserver */
1673                 cm_ChangeRankCellVLServer(tsp);
1674             }
1675         }
1676         else    /* add a new server without a cell */
1677         {
1678             tsp = cm_NewServer(&tmp, type, NULL, CM_FLAG_NOPROBE); /* refcount = 1 */
1679             tsp->ipRank = rank;
1680         }
1681         lock_ObtainMutex(&tsp->mx);
1682         tsp->flags |= CM_SERVERFLAG_PREF_SET;
1683         lock_ReleaseMutex(&tsp->mx);
1684         cm_PutServer(tsp);  /* decrease refcount */
1685     }
1686     return 0;
1687 }
1688
1689 /* 
1690  * VIOC_GETSPREFS internals.
1691  * 
1692  * Assumes that pioctl path has been parsed or skipped.
1693  */
1694 afs_int32
1695 cm_IoctlGetSPrefs(struct cm_ioctl *ioctlp, struct cm_user *userp)
1696 {
1697     cm_SPrefRequest_t *spin; /* input */
1698     cm_SPrefInfo_t    *spout;   /* output */
1699     cm_SPref_t        *srvout;   /* one output component */
1700     cm_server_t       *tsp;
1701     int                   i, vlonly, noServers;
1702
1703     spin      = (cm_SPrefRequest_t *)ioctlp->inDatap;
1704     spout     = (cm_SPrefInfo_t *) ioctlp->outDatap;
1705     srvout    = spout->servers;
1706     noServers = spin->num_servers; 
1707     vlonly    = spin->flags & CM_SPREF_VLONLY;
1708     spout->num_servers = 0;
1709
1710     lock_ObtainRead(&cm_serverLock); /* get server lock */
1711
1712     for (tsp=cm_allServersp, i=0; tsp && noServers; tsp=tsp->allNextp,i++){
1713         if (spin->offset > i) {
1714             continue;    /* catch up to where we left off */
1715         }
1716
1717         if ( vlonly && (tsp->type == CM_SERVER_FILE) )
1718             continue;   /* ignore fileserver for -vlserver option*/
1719         if ( !vlonly && (tsp->type == CM_SERVER_VLDB) )
1720             continue;   /* ignore vlservers */
1721
1722         srvout->host = tsp->addr.sin_addr;
1723         srvout->rank = tsp->ipRank;
1724         srvout++;       
1725         spout->num_servers++;
1726         noServers--;
1727     }
1728     lock_ReleaseRead(&cm_serverLock); /* release server lock */
1729
1730     if ( tsp )  /* we ran out of space in the output buffer */
1731         spout->next_offset = i;
1732     else    
1733         spout->next_offset = 0; 
1734     ioctlp->outDatap += sizeof(cm_SPrefInfo_t) + 
1735         (spout->num_servers -1 ) * sizeof(cm_SPref_t) ;
1736     return 0;
1737 }
1738
1739
1740 /* 
1741  * VIOC_AFS_CREATE_MT_PT internals.
1742  * 
1743  * Assumes that pioctl path has been parsed or skipped.
1744  * dscp is held but not locked.
1745  */
1746 afs_int32
1747 cm_IoctlCreateMountPoint(struct cm_ioctl *ioctlp, struct cm_user *userp, cm_scache_t *dscp, cm_req_t *reqp, clientchar_t *leaf)
1748 {
1749     afs_int32 code;
1750     cm_attr_t tattr;
1751     clientchar_t *cp;
1752     fschar_t mpInfo[512];           /* mount point string */
1753     fschar_t fullCell[CELL_MAXNAMELEN];
1754     fschar_t *fscell = NULL;
1755     fschar_t *fsvolume = NULL;
1756     clientchar_t volume[VL_MAXNAMELEN];
1757     clientchar_t *mpp = NULL;
1758     clientchar_t *cell = NULL;
1759     cm_volume_t *volp = NULL;
1760     cm_cell_t *cellp = NULL;
1761     size_t len;
1762
1763    /* 
1764      * The fs command allows the user to specify partial cell names on NT.  These must
1765      * be expanded to the full cell name for mount points so that the mount points will
1766      * work on UNIX clients.
1767      */
1768
1769     /* Extract the possibly partial cell name */
1770     mpp = cm_ParseIoctlStringAlloc(ioctlp, NULL);
1771     cell = cm_ClientCharNext(mpp);
1772     if (cp = cm_ClientStrChr(cell, ':')) {
1773
1774         /* Extract the volume name */
1775         *cp = 0;
1776         cm_ClientStrCpy(volume, lengthof(volume), cm_ClientCharNext(cp));
1777
1778         fscell = cm_ClientStringToFsStringAlloc(cell, -1, NULL);
1779         fsvolume = cm_ClientStringToFsStringAlloc(volume, -1, NULL);
1780
1781         /* Get the full name for this cell */
1782         cellp = cm_GetCell_Gen(fscell, fullCell, CM_FLAG_NOPROBE);
1783         if (!cellp) {
1784             code = CM_ERROR_NOSUCHCELL;
1785             goto done;
1786         }
1787
1788         StringCbPrintfA(mpInfo, sizeof(mpInfo), "%c%s:%s", (char) *mpp,
1789                         fullCell, fsvolume);
1790
1791     } else {
1792         /* No cell name specified, so cell points at the volume instead. */
1793         fsvolume = cm_ClientStringToFsStringAlloc(cell, -1, NULL);
1794         cm_ClientStringToFsString(mpp, -1, mpInfo, lengthof(mpInfo));
1795         cellp = cm_FindCellByID(dscp->fid.cell, CM_FLAG_NOPROBE);
1796     }
1797
1798     /* remove the trailing dot if it is present */
1799     len = strlen(fsvolume);
1800     if (len > 1 && fsvolume[len-1] == '.')
1801         fsvolume[len-1] = '\0';
1802
1803     /* validate the target info */
1804     if (cm_VolNameIsID(fsvolume)) {
1805         code = cm_FindVolumeByID(cellp, atoi(fsvolume), userp, reqp, 
1806                                 CM_GETVOL_FLAG_CREATE, &volp);
1807     } else {
1808         code = cm_FindVolumeByName(cellp, fsvolume, userp, reqp, 
1809                                   CM_GETVOL_FLAG_CREATE, &volp);
1810     }
1811     if (code)
1812         goto done;
1813
1814 #ifdef AFS_FREELANCE_CLIENT
1815     if (cm_freelanceEnabled && dscp == cm_data.rootSCachep) {
1816         /* we are adding the mount point to the root dir, so call
1817          * the freelance code to do the add. */
1818         fschar_t * fsleaf = cm_ClientStringToFsStringAlloc(leaf, -1, NULL);
1819         osi_Log0(afsd_logp,"IoctlCreateMountPoint within Freelance root dir");
1820         code = cm_FreelanceAddMount(fsleaf, fullCell, fsvolume, *mpInfo == '%', NULL);
1821         free(fsleaf);
1822     } else
1823 #endif
1824     {
1825         /* create the symlink with mode 644.  The lack of X bits tells
1826          * us that it is a mount point.
1827          */
1828         tattr.mask = CM_ATTRMASK_UNIXMODEBITS | CM_ATTRMASK_CLIENTMODTIME;
1829         tattr.unixModeBits = 0644;
1830         tattr.clientModTime = time(NULL);
1831
1832         code = cm_SymLink(dscp, leaf, mpInfo, 0, &tattr, userp, reqp);
1833     }
1834     
1835     if (code == 0 && (dscp->flags & CM_SCACHEFLAG_ANYWATCH))
1836         smb_NotifyChange(FILE_ACTION_ADDED,
1837                          FILE_NOTIFY_CHANGE_DIR_NAME,
1838                          dscp, leaf, NULL, TRUE);
1839
1840   done:
1841     if (volp)
1842         cm_PutVolume(volp);
1843     if (mpp)
1844         free(mpp);
1845     if (fscell)
1846         free(fscell);
1847     if (fsvolume)
1848         free(fsvolume);
1849
1850     return code;
1851 }
1852
1853 /* 
1854  * VIOC_SYMLINK internals.
1855  * 
1856  * Assumes that pioctl path has been parsed or skipped.
1857  * dscp is held but not locked.
1858  */
1859 afs_int32 
1860 cm_IoctlSymlink(struct cm_ioctl *ioctlp, struct cm_user *userp, cm_scache_t *dscp, cm_req_t *reqp, clientchar_t *leaf)
1861 {
1862     afs_int32 code;
1863     cm_attr_t tattr;
1864     char *cp;
1865     char *symlp;
1866     int free_syml = FALSE;
1867
1868     if (!(ioctlp->flags & CM_IOCTLFLAG_USEUTF8)) {
1869         /* Translate chars for the linked to name */
1870         TranslateExtendedChars(ioctlp->inDatap);
1871     }
1872
1873     cp = symlp = ioctlp->inDatap;               /* contents of link */
1874
1875 #ifdef AFS_FREELANCE_CLIENT
1876     if (cm_freelanceEnabled && dscp == cm_data.rootSCachep) {
1877         /* we are adding the symlink to the root dir., so call
1878          * the freelance code to do the add. */
1879         fschar_t *fsleaf;
1880
1881         if (cp[0] == cp[1] && cp[1] == '\\' && 
1882             !_strnicmp(cm_NetbiosName,cp+2,strlen(cm_NetbiosName))) 
1883         {
1884             /* skip \\AFS\ or \\AFS\all\ */
1885             char * p;
1886             p = cp + 2 + strlen(cm_NetbiosName) + 1;
1887             if ( !_strnicmp("all", p, 3) )
1888                 p += 4;
1889             cp = p;
1890         }
1891
1892         osi_Log0(afsd_logp,"IoctlCreateSymlink within Freelance root dir");
1893         fsleaf = cm_ClientStringToFsStringAlloc(leaf, -1, NULL);
1894         code = cm_FreelanceAddSymlink(fsleaf, cp, NULL);
1895         free(fsleaf);
1896     } else
1897 #endif
1898     {
1899         /* Create symlink with mode 0755. */
1900         tattr.mask = CM_ATTRMASK_UNIXMODEBITS;
1901         tattr.unixModeBits = 0755;
1902
1903         code = cm_SymLink(dscp, leaf, cp, 0, &tattr, userp, reqp);
1904     }
1905
1906     if (code == 0 && (dscp->flags & CM_SCACHEFLAG_ANYWATCH))
1907         smb_NotifyChange(FILE_ACTION_ADDED,
1908                           FILE_NOTIFY_CHANGE_FILE_NAME
1909                           | FILE_NOTIFY_CHANGE_DIR_NAME,
1910                           dscp, leaf, NULL, TRUE);
1911     return code;
1912 }
1913
1914
1915 /* 
1916  * VIOC_LISTSYMLINK internals.
1917  * 
1918  * Assumes that pioctl path has been parsed or skipped.
1919  * dscp is held but not locked.
1920  */
1921 afs_int32 
1922 cm_IoctlListlink(struct cm_ioctl *ioctlp, struct cm_user *userp, cm_scache_t *dscp, cm_req_t *reqp)
1923 {
1924     afs_int32 code;
1925     cm_scache_t *scp;
1926     char *cp;
1927     cm_space_t *spacep;
1928     cm_scache_t *newRootScp;
1929     clientchar_t *clientp;
1930
1931     if (!(ioctlp->flags & CM_IOCTLFLAG_USEUTF8)) {
1932         /* Translate chars for the link name */
1933         TranslateExtendedChars(ioctlp->inDatap);
1934     }
1935     cp = ioctlp->inDatap;
1936
1937     clientp = cm_Utf8ToClientStringAlloc(cp, -1, NULL);
1938     code = cm_Lookup(dscp, clientp[0] ? clientp : L".", CM_FLAG_NOMOUNTCHASE, userp, reqp, &scp);
1939     free(clientp);
1940     if (code) 
1941         return code;
1942
1943     /* Check that it's a real symlink */
1944     if (scp->fileType != CM_SCACHETYPE_SYMLINK &&
1945         scp->fileType != CM_SCACHETYPE_DFSLINK &&
1946         scp->fileType != CM_SCACHETYPE_INVALID) {
1947         cm_ReleaseSCache(scp);
1948         return CM_ERROR_INVAL;
1949     }
1950
1951     code = cm_AssembleLink(scp, "", &newRootScp, &spacep, userp, reqp);
1952     cm_ReleaseSCache(scp);
1953     if (code == 0) {
1954         char * linkstr;
1955         cp = ioctlp->outDatap;
1956         if (newRootScp != NULL) {
1957             StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), cm_mountRoot);
1958             StringCbCatA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), "/");
1959             cp += strlen(cp);
1960         }
1961
1962         linkstr = cm_ClientStringToFsStringAlloc(spacep->wdata, -1, NULL);
1963         StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), linkstr);
1964         cp += strlen(cp) + 1;
1965         ioctlp->outDatap = cp;
1966         cm_FreeSpace(spacep);
1967         free(linkstr);
1968         if (newRootScp != NULL)
1969             cm_ReleaseSCache(newRootScp);
1970         code = 0;
1971     } else if (code == CM_ERROR_PATH_NOT_COVERED && 
1972                 scp->fileType == CM_SCACHETYPE_DFSLINK ||
1973                code == CM_ERROR_NOSUCHPATH &&
1974                 scp->fileType == CM_SCACHETYPE_INVALID) {
1975
1976         cp = ioctlp->outDatap;
1977         StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), scp->mountPointStringp);
1978         cp += strlen(cp) + 1;
1979         ioctlp->outDatap = cp;
1980         code = 0;
1981     }
1982
1983     return code;
1984 }
1985
1986 /* 
1987  * VIOC_ISSYMLINK internals.
1988  * 
1989  * Assumes that pioctl path has been parsed or skipped.
1990  * dscp is held but not locked.
1991  */
1992 afs_int32 
1993 cm_IoctlIslink(struct cm_ioctl *ioctlp, struct cm_user *userp, cm_scache_t *dscp, cm_req_t *reqp)
1994 {/*CHECK FOR VALID SYMLINK*/
1995     afs_int32 code;
1996     cm_scache_t *scp;
1997     char *cp;
1998     clientchar_t *clientp;
1999
2000     if (!(ioctlp->flags & CM_IOCTLFLAG_USEUTF8)) {
2001         /* Translate chars for the link name */
2002         TranslateExtendedChars(ioctlp->inDatap);
2003     }
2004     cp = ioctlp->inDatap;
2005     osi_LogEvent("cm_IoctlListlink",NULL," name[%s]",cp);
2006
2007     clientp = cm_Utf8ToClientStringAlloc(cp, -1, NULL);
2008     code = cm_Lookup(dscp, clientp[0] ? clientp : L".", CM_FLAG_NOMOUNTCHASE, userp, reqp, &scp);
2009     free(clientp);
2010     if (code)
2011         return code;
2012
2013     /* Check that it's a real symlink */
2014     if (scp->fileType != CM_SCACHETYPE_SYMLINK &&
2015         scp->fileType != CM_SCACHETYPE_DFSLINK &&
2016         scp->fileType != CM_SCACHETYPE_INVALID)
2017         code = CM_ERROR_INVAL;
2018     cm_ReleaseSCache(scp);
2019     return code;
2020 }
2021
2022 /* 
2023  * VIOC_DELSYMLINK internals.
2024  * 
2025  * Assumes that pioctl path has been parsed or skipped.
2026  * dscp is held but not locked.
2027  */
2028 afs_int32
2029 cm_IoctlDeletelink(struct cm_ioctl *ioctlp, struct cm_user *userp, cm_scache_t *dscp, cm_req_t *reqp)
2030 {
2031     afs_int32 code;
2032     cm_scache_t *scp;
2033     char *cp;
2034     char * originalName = NULL;
2035     cm_dirOp_t dirop;
2036     clientchar_t *clientp;
2037
2038     if (!(ioctlp->flags & CM_IOCTLFLAG_USEUTF8)) {
2039         /* Translate chars for the link name */
2040         TranslateExtendedChars(ioctlp->inDatap);
2041     }
2042     cp = ioctlp->inDatap;
2043
2044     clientp = cm_Utf8ToClientStringAlloc(cp, -1, NULL);
2045     code = cm_Lookup(dscp, clientp[0] ? clientp : L".", CM_FLAG_NOMOUNTCHASE, userp, reqp, &scp);
2046
2047     /* if something went wrong, bail out now */
2048     if (code)
2049         goto done3;
2050         
2051     lock_ObtainWrite(&scp->rw);
2052     code = cm_SyncOp(scp, NULL, userp, reqp, 0,
2053                       CM_SCACHESYNC_NEEDCALLBACK | CM_SCACHESYNC_GETSTATUS);
2054     if (code)
2055         goto done2;
2056         
2057     /* now check that this is a real symlink */
2058     if (scp->fileType != CM_SCACHETYPE_SYMLINK &&
2059         scp->fileType != CM_SCACHETYPE_DFSLINK &&
2060         scp->fileType != CM_SCACHETYPE_INVALID) {
2061         code = CM_ERROR_INVAL;
2062         goto done1;
2063     }
2064         
2065     /* time to make the RPC, so drop the lock */
2066     lock_ReleaseWrite(&scp->rw);
2067         
2068 #ifdef USE_BPLUS
2069     code = cm_BeginDirOp(dscp, userp, reqp, CM_DIRLOCK_READ, &dirop);
2070     if (code == 0) {
2071         code = cm_BPlusDirLookupOriginalName(&dirop, clientp, &originalName);
2072         /* cm_Dir*() functions can't be used to lookup the original
2073            name since those functions only know of the original
2074            name. */
2075         cm_EndDirOp(&dirop);
2076     }
2077 #endif
2078
2079     /* If this name doesn't have a non-normalized name associated with
2080        it, we assume that what we had is what is actually present on
2081        the file server. */
2082
2083     if (originalName == NULL)
2084         originalName = cp;
2085
2086     /* cp is a normalized name.  originalName is the actual name we
2087        saw on the fileserver. */
2088
2089
2090 #ifdef AFS_FREELANCE_CLIENT
2091     if (cm_freelanceEnabled && dscp == cm_data.rootSCachep) {
2092         /* we are adding the mount point to the root dir., so call
2093          * the freelance code to do the add. */
2094         osi_Log0(afsd_logp,"IoctlDeletelink from Freelance root dir");
2095         code = cm_FreelanceRemoveSymlink(originalName);
2096     } else 
2097 #endif
2098     {
2099         /* easier to do it this way */
2100         code = cm_Unlink(dscp, originalName, clientp, userp, reqp);
2101     }
2102     if (code == 0 && (dscp->flags & CM_SCACHEFLAG_ANYWATCH))
2103         smb_NotifyChange(FILE_ACTION_REMOVED,
2104                           FILE_NOTIFY_CHANGE_FILE_NAME
2105                           | FILE_NOTIFY_CHANGE_DIR_NAME,
2106                           dscp, clientp, NULL, TRUE);
2107
2108     if (originalName != NULL && originalName != cp) {
2109         free(originalName);
2110         originalName = NULL;
2111     }
2112
2113     lock_ObtainWrite(&scp->rw);
2114   done1:
2115     cm_SyncOpDone(scp, NULL, CM_SCACHESYNC_NEEDCALLBACK | CM_SCACHESYNC_GETSTATUS);
2116
2117   done2:
2118     cm_DiscardSCache(scp);
2119     lock_ReleaseWrite(&scp->rw);
2120     cm_ReleaseSCache(scp);
2121
2122   done3:
2123     free(clientp);
2124
2125     return code;
2126 }
2127
2128 #ifdef QUERY_AFSID
2129 /* Utility function.  Not currently used.  
2130  * This function performs a PTS lookup which has traditionally
2131  * not been performed by the cache manager.
2132  */
2133 afs_int32 
2134 cm_UsernameToId(char *uname, cm_ucell_t * ucellp, afs_uint32* uid)
2135 {
2136     afs_int32 code;
2137     namelist lnames;
2138     idlist lids;
2139     static struct afsconf_cell info;
2140     struct rx_connection *serverconns[MAXSERVERS];
2141     struct rx_securityClass *sc[3];
2142     afs_int32 scIndex = 2;      /* authenticated - we have a token */
2143     struct ubik_client *pruclient = NULL;
2144     struct afsconf_dir *tdir;
2145     int i;
2146     char * p, * r;
2147
2148     tdir = afsconf_Open(AFSDIR_CLIENT_ETC_DIRPATH);
2149     code = afsconf_GetCellInfo(tdir, ucellp->cellp->name, "afsprot", &info);
2150     afsconf_Close(tdir);
2151
2152     sc[0] = 0;
2153     sc[1] = 0;
2154     sc[2] = 0;
2155
2156     /* we have the token that was given to us in the settoken 
2157      * call.   we just have to use it. 
2158      */
2159     scIndex = 2;        /* kerberos ticket */
2160     sc[2] = rxkad_NewClientSecurityObject(rxkad_clear, &ucellp->sessionKey,
2161                                           ucellp->kvno, ucellp->ticketLen,
2162                                           ucellp->ticketp);
2163
2164     memset(serverconns, 0, sizeof(serverconns));        /* terminate list!!! */
2165     for (i = 0; i < info.numServers; i++)
2166         serverconns[i] =
2167             rx_NewConnection(info.hostAddr[i].sin_addr.s_addr,
2168                              info.hostAddr[i].sin_port, PRSRV, sc[scIndex],
2169                              scIndex);
2170
2171     code = ubik_ClientInit(serverconns, &pruclient);
2172     if (code) {
2173         return code;
2174     }
2175
2176     code = rxs_Release(sc[scIndex]);
2177
2178     lids.idlist_len = 0;
2179     lids.idlist_val = 0;
2180     lnames.namelist_len = 1;
2181     lnames.namelist_val = (prname *) malloc(PR_MAXNAMELEN);
2182     strncpy(lnames.namelist_val[0], uname, PR_MAXNAMELEN);
2183     lnames.namelist_val[0][PR_MAXNAMELEN-1] = '\0';
2184     for ( p=lnames.namelist_val[0], r=NULL; *p; p++ ) {
2185         if (isupper(*p))
2186             *p = tolower(*p);
2187         if (*p == '@')
2188             r = p;
2189     }
2190     if (r && !cm_stricmp_utf8(r+1,ucellp->cellp->name))
2191         *r = '\0';
2192
2193     code = ubik_PR_NameToID(pruclient, 0, &lnames, &lids);
2194     if (lids.idlist_val) {
2195         *uid = *lids.idlist_val;
2196         free(lids.idlist_val);
2197     }
2198     if (lnames.namelist_val)
2199         free(lnames.namelist_val);
2200
2201     if ( pruclient ) {
2202         ubik_ClientDestroy(pruclient);
2203         pruclient = NULL;
2204     }
2205
2206     return 0;
2207 }
2208 #endif /* QUERY_AFSID */
2209
2210 #if 0
2211 /* This has been copied to smb_IoctlSetToken in its entirety.
2212  * An equivalent version will need to be produced for the 
2213  * redirector and some extensive refactoring might be required.
2214  */
2215 afs_int32
2216 cm_IoctlSetToken(struct cm_ioctl *ioctlp, struct cm_user *userp)
2217 {
2218     char *saveDataPtr;
2219     char *tp;
2220     int ticketLen;
2221     char *ticket;
2222     int ctSize;
2223     struct ClearToken ct;
2224     cm_cell_t *cellp;
2225     cm_ucell_t *ucellp;
2226     char *uname = NULL;
2227     afs_uuid_t uuid;
2228     int flags;
2229     char sessionKey[8];
2230     char *smbname;
2231     int release_userp = 0;
2232     char * wdir = NULL;
2233
2234     saveDataPtr = ioctlp->inDatap;
2235
2236     cm_SkipIoctlPath(ioctlp);
2237
2238     tp = ioctlp->inDatap;
2239
2240     /* ticket length */
2241     memcpy(&ticketLen, tp, sizeof(ticketLen));
2242     tp += sizeof(ticketLen);
2243     if (ticketLen < MINKTCTICKETLEN || ticketLen > MAXKTCTICKETLEN)
2244         return CM_ERROR_INVAL;
2245
2246     /* remember ticket and skip over it for now */
2247     ticket = tp;
2248     tp += ticketLen;
2249
2250     /* clear token size */
2251     memcpy(&ctSize, tp, sizeof(ctSize));
2252     tp += sizeof(ctSize);
2253     if (ctSize != sizeof(struct ClearToken))
2254         return CM_ERROR_INVAL;
2255
2256     /* clear token */
2257     memcpy(&ct, tp, ctSize);
2258     tp += ctSize;
2259     if (ct.AuthHandle == -1)
2260         ct.AuthHandle = 999;    /* more rxvab compat stuff */
2261
2262     /* more stuff, if any */
2263     if (ioctlp->inCopied > tp - saveDataPtr) {
2264         /* flags:  logon flag */
2265         memcpy(&flags, tp, sizeof(int));
2266         tp += sizeof(int);
2267
2268         /* cell name */
2269         cellp = cm_GetCell(tp, CM_FLAG_CREATE | CM_FLAG_NOPROBE);
2270         if (!cellp) 
2271             return CM_ERROR_NOSUCHCELL;
2272         tp += strlen(tp) + 1;
2273
2274         /* user name */
2275         uname = tp;
2276         tp += strlen(tp) + 1;
2277
2278         if (flags & PIOCTL_LOGON) {
2279             /* SMB user name with which to associate tokens */
2280             smbname = tp;
2281             osi_Log2(smb_logp,"cm_IoctlSetToken for user [%s] smbname [%s]",
2282                      osi_LogSaveString(smb_logp,uname), osi_LogSaveString(smb_logp,smbname));
2283             fprintf(stderr, "SMB name = %s\n", smbname);
2284             tp += strlen(tp) + 1;
2285         } else {
2286             osi_Log1(smb_logp,"cm_IoctlSetToken for user [%s]",
2287                      osi_LogSaveString(smb_logp, uname));
2288         }
2289
2290                 /* uuid */
2291         memcpy(&uuid, tp, sizeof(uuid));
2292         if (!cm_FindTokenEvent(uuid, sessionKey))
2293             return CM_ERROR_INVAL;
2294     } else {
2295         cellp = cm_data.rootCellp;
2296         osi_Log0(smb_logp,"cm_IoctlSetToken - no name specified");
2297     }
2298
2299     if (flags & PIOCTL_LOGON) {
2300         userp = smb_FindCMUserByName(smbname, ioctlp->fidp->vcp->rname,
2301                                      SMB_FLAG_CREATE|SMB_FLAG_AFSLOGON);
2302         release_userp = 1;
2303     }
2304
2305     /* store the token */
2306     lock_ObtainMutex(&userp->mx);
2307     ucellp = cm_GetUCell(userp, cellp);
2308     osi_Log1(smb_logp,"cm_IoctlSetToken ucellp %lx", ucellp);
2309     ucellp->ticketLen = ticketLen;
2310     if (ucellp->ticketp)
2311         free(ucellp->ticketp);  /* Discard old token if any */
2312     ucellp->ticketp = malloc(ticketLen);
2313     memcpy(ucellp->ticketp, ticket, ticketLen);
2314     /*
2315      * Get the session key from the RPC, rather than from the pioctl.
2316      */
2317     /*
2318     memcpy(&ucellp->sessionKey, ct.HandShakeKey, sizeof(ct.HandShakeKey));
2319     */
2320     memcpy(ucellp->sessionKey.data, sessionKey, sizeof(sessionKey));
2321     ucellp->kvno = ct.AuthHandle;
2322     ucellp->expirationTime = ct.EndTimestamp;
2323     ucellp->gen++;
2324 #ifdef QUERY_AFSID
2325     ucellp->uid = ANONYMOUSID;
2326 #endif
2327     if (uname) {
2328         StringCbCopyA(ucellp->userName, MAXKTCNAMELEN, uname);
2329 #ifdef QUERY_AFSID
2330         cm_UsernameToId(uname, ucellp, &ucellp->uid);
2331 #endif
2332     }
2333     ucellp->flags |= CM_UCELLFLAG_RXKAD;
2334     lock_ReleaseMutex(&userp->mx);
2335
2336     if (flags & PIOCTL_LOGON) {
2337         ioctlp->flags |= CM_IOCTLFLAG_LOGON;
2338     }
2339
2340     cm_ResetACLCache(userp);
2341
2342     if (release_userp)
2343         cm_ReleaseUser(userp);
2344
2345     return 0;
2346 }
2347 #endif
2348
2349 /* 
2350  * VIOC_GETTOK internals.
2351  * 
2352  * Assumes that pioctl path has been parsed or skipped.
2353  */
2354 afs_int32
2355 cm_IoctlGetTokenIter(struct cm_ioctl *ioctlp, struct cm_user *userp)
2356 {
2357     char *tp, *cp;
2358     int iterator;
2359     int temp;
2360     cm_ucell_t *ucellp;
2361     struct ClearToken ct;
2362
2363     tp = ioctlp->inDatap;
2364     cp = ioctlp->outDatap;
2365
2366     /* iterator */
2367     memcpy(&iterator, tp, sizeof(iterator));
2368     tp += sizeof(iterator);
2369
2370     lock_ObtainMutex(&userp->mx);
2371
2372     /* look for token */
2373     for (;;iterator++) {
2374         ucellp = cm_FindUCell(userp, iterator);
2375         if (!ucellp) {
2376             lock_ReleaseMutex(&userp->mx);
2377             return CM_ERROR_NOMORETOKENS;
2378         }
2379         if (ucellp->flags & CM_UCELLFLAG_RXKAD)
2380             break;
2381     }       
2382
2383     /* new iterator */
2384     temp = ucellp->iterator + 1;
2385     memcpy(cp, &temp, sizeof(temp));
2386     cp += sizeof(temp);
2387
2388     /* ticket length */
2389     memcpy(cp, &ucellp->ticketLen, sizeof(ucellp->ticketLen));
2390     cp += sizeof(ucellp->ticketLen);
2391
2392     /* ticket */
2393     memcpy(cp, ucellp->ticketp, ucellp->ticketLen);
2394     cp += ucellp->ticketLen;
2395
2396     /* clear token size */
2397     temp = sizeof(ct);
2398     memcpy(cp, &temp, sizeof(temp));
2399     cp += sizeof(temp);
2400
2401     /* clear token */
2402     ct.AuthHandle = ucellp->kvno;
2403
2404     /*
2405      * This field is supposed to hold the session key
2406      * but we don't want to make it easier for someone 
2407      * to attack the cache.  The user gave us the session
2408      * key in the first place.
2409      */
2410     memset(ct.HandShakeKey, 0, sizeof(ct.HandShakeKey));
2411     ct.ViceId = 37;                     /* XXX */
2412     ct.BeginTimestamp = 0;              /* XXX */
2413     ct.EndTimestamp = ucellp->expirationTime;
2414     memcpy(cp, &ct, sizeof(ct));
2415     cp += sizeof(ct);
2416
2417     /* Primary flag (unused) */
2418     temp = 0;
2419     memcpy(cp, &temp, sizeof(temp));
2420     cp += sizeof(temp);
2421
2422     /* cell name */
2423     StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), ucellp->cellp->name);
2424     cp += strlen(cp) + 1;
2425
2426     /* user name */
2427     StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), ucellp->userName);
2428     cp += strlen(cp) + 1;
2429
2430     ioctlp->outDatap = cp;
2431
2432     lock_ReleaseMutex(&userp->mx);
2433
2434     return 0;
2435 }
2436
2437 /* 
2438  * VIOC_NEWGETTOK internals.
2439  * 
2440  * Assumes that pioctl path has been parsed or skipped.
2441  */
2442 afs_int32
2443 cm_IoctlGetToken(struct cm_ioctl *ioctlp, struct cm_user *userp)
2444 {
2445     char *cp;
2446     int temp;
2447     cm_cell_t *cellp;
2448     cm_ucell_t *ucellp;
2449     struct ClearToken ct;
2450     char *tp;
2451     afs_uuid_t uuid;
2452
2453     tp = ioctlp->inDatap;
2454
2455     cp = ioctlp->outDatap;
2456
2457     /* cell name is right here */
2458     cellp = cm_GetCell(tp, 0);
2459     if (!cellp) 
2460         return CM_ERROR_NOSUCHCELL;
2461     tp += strlen(tp) + 1;
2462
2463     /* uuid */
2464     memcpy(&uuid, tp, sizeof(uuid));
2465
2466     lock_ObtainMutex(&userp->mx);
2467
2468     ucellp = cm_GetUCell(userp, cellp);
2469     if (!ucellp || !(ucellp->flags & CM_UCELLFLAG_RXKAD)) {
2470         lock_ReleaseMutex(&userp->mx);
2471         return CM_ERROR_NOMORETOKENS;
2472     }
2473
2474     /* ticket length */
2475     memcpy(cp, &ucellp->ticketLen, sizeof(ucellp->ticketLen));
2476     cp += sizeof(ucellp->ticketLen);
2477
2478     /* ticket */
2479     memcpy(cp, ucellp->ticketp, ucellp->ticketLen);
2480     cp += ucellp->ticketLen;
2481
2482     /* clear token size */
2483     temp = sizeof(ct);
2484     memcpy(cp, &temp, sizeof(temp));
2485     cp += sizeof(temp);
2486
2487     /* clear token */
2488     ct.AuthHandle = ucellp->kvno;
2489
2490     /* do not give out the session key */
2491     memset(ct.HandShakeKey, 0, sizeof(ct.HandShakeKey));
2492     ct.ViceId = 37;                     /* XXX */
2493     ct.BeginTimestamp = 0;              /* XXX */
2494     ct.EndTimestamp = ucellp->expirationTime;
2495     memcpy(cp, &ct, sizeof(ct));
2496     cp += sizeof(ct);
2497
2498     /* Primary flag (unused) */
2499     temp = 0;
2500     memcpy(cp, &temp, sizeof(temp));
2501     cp += sizeof(temp);
2502
2503     /* cell name */
2504     StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), ucellp->cellp->name);
2505     cp += strlen(cp) + 1;
2506
2507     /* user name */
2508     StringCbCopyA(cp, SMB_IOCTL_MAXDATA - (cp - ioctlp->outAllocp), ucellp->userName);
2509     cp += strlen(cp) + 1;
2510
2511     ioctlp->outDatap = cp;
2512
2513     lock_ReleaseMutex(&userp->mx);
2514
2515     cm_RegisterNewTokenEvent(uuid, ucellp->sessionKey.data);
2516
2517     return 0;
2518 }
2519
2520 /* 
2521  * VIOCDELTOK internals.
2522  * 
2523  * Assumes that pioctl path has been parsed or skipped.
2524  */
2525 afs_int32
2526 cm_IoctlDelToken(struct cm_ioctl *ioctlp, struct cm_user *userp)
2527 {
2528     char *cp;
2529     cm_cell_t *cellp;
2530     cm_ucell_t *ucellp;
2531
2532     cp = ioctlp->outDatap;
2533
2534     /* cell name is right here */
2535     cellp = cm_GetCell(ioctlp->inDatap, 0);
2536     if (!cellp) 
2537         return CM_ERROR_NOSUCHCELL;
2538
2539     lock_ObtainMutex(&userp->mx);
2540
2541     ucellp = cm_GetUCell(userp, cellp);
2542     if (!ucellp) {
2543         lock_ReleaseMutex(&userp->mx);
2544         return CM_ERROR_NOMORETOKENS;
2545     }
2546
2547     osi_Log1(smb_logp,"cm_IoctlDelToken ucellp %lx", ucellp);
2548
2549     if (ucellp->ticketp) {
2550         free(ucellp->ticketp);
2551         ucellp->ticketp = NULL;
2552     }
2553     ucellp->ticketLen = 0;
2554     memset(ucellp->sessionKey.data, 0, 8);
2555     ucellp->kvno = 0;
2556     ucellp->expirationTime = 0;
2557     ucellp->userName[0] = '\0';
2558     ucellp->flags &= ~CM_UCELLFLAG_RXKAD;
2559     ucellp->gen++;
2560
2561     lock_ReleaseMutex(&userp->mx);
2562
2563     cm_ResetACLCache(userp);
2564
2565     return 0;
2566 }
2567
2568 /* 
2569  * VIOCDELALLTOK internals.
2570  * 
2571  * Assumes that pioctl path has been parsed or skipped.
2572  */
2573 afs_int32
2574 cm_IoctlDelAllToken(struct cm_ioctl *ioctlp, struct cm_user *userp)
2575 {
2576     cm_ucell_t *ucellp;
2577
2578     lock_ObtainMutex(&userp->mx);
2579
2580     for (ucellp = userp->cellInfop; ucellp; ucellp = ucellp->nextp) {
2581         osi_Log1(smb_logp,"cm_IoctlDelAllToken ucellp %lx", ucellp);
2582
2583         if (ucellp->ticketp) {
2584             free(ucellp->ticketp);
2585             ucellp->ticketp = NULL;
2586         }
2587         ucellp->ticketLen = 0;
2588         memset(ucellp->sessionKey.data, 0, 8);
2589         ucellp->kvno = 0;
2590         ucellp->expirationTime = 0;
2591         ucellp->userName[0] = '\0';
2592         ucellp->flags &= ~CM_UCELLFLAG_RXKAD;
2593         ucellp->gen++;
2594     }
2595
2596     lock_ReleaseMutex(&userp->mx);
2597
2598     cm_ResetACLCache(userp);
2599
2600     return 0;
2601 }
2602
2603 /* 
2604  * VIOC_MAKESUBMOUNT internals.  (This function should be deprecated)
2605  * 
2606  * Assumes that pioctl path has been parsed or skipped.
2607  */
2608 afs_int32
2609 cm_IoctlMakeSubmount(cm_ioctl_t *ioctlp, cm_user_t *userp)
2610 {
2611     char afspath[MAX_PATH];
2612     char *submountreqp;
2613     int nextAutoSubmount;
2614     HKEY hkSubmounts;
2615     DWORD dwType, dwSize;
2616     DWORD status;
2617     DWORD dwIndex;
2618     DWORD dwSubmounts;
2619
2620     /* Serialize this one, to prevent simultaneous mods
2621      * to afsdsbmt.ini
2622      */
2623     lock_ObtainMutex(&cm_Afsdsbmt_Lock);
2624
2625     /* Parse the input parameters--first the required afs path,
2626      * then the requested submount name (which may be "").
2627      */
2628     cm_NormalizeAfsPathAscii(afspath, sizeof(afspath), ioctlp->inDatap);
2629     submountreqp = ioctlp->inDatap + (strlen(ioctlp->inDatap)+1);
2630
2631     /* If the caller supplied a suggested submount name, see if
2632      * that submount name is in use... if so, the submount's path
2633      * has to match our path.
2634      */
2635
2636     RegCreateKeyEx( HKEY_LOCAL_MACHINE, 
2637                     AFSREG_CLT_OPENAFS_SUBKEY "\\Submounts",
2638                     0, 
2639                     "AFS", 
2640                     REG_OPTION_NON_VOLATILE,
2641                     KEY_READ|KEY_WRITE|KEY_QUERY_VALUE,
2642                     NULL, 
2643                     &hkSubmounts,
2644                     NULL );
2645
2646     if (submountreqp && *submountreqp) {
2647         char submountPath[MAX_PATH];
2648
2649         dwSize = sizeof(submountPath);
2650         status = RegQueryValueEx( hkSubmounts, submountreqp, 0,
2651                                   &dwType, submountPath, &dwSize);
2652
2653         if (status != ERROR_SUCCESS) {
2654
2655             /* The suggested submount name isn't in use now--
2656              * so we can safely map the requested submount name
2657              * to the supplied path. Remember not to write the
2658              * leading "/afs" when writing out the submount.
2659              */
2660             RegSetValueEx( hkSubmounts, submountreqp, 0,
2661                            REG_EXPAND_SZ, 
2662                            (strlen(&afspath[strlen(cm_mountRoot)])) ?
2663                            &afspath[strlen(cm_mountRoot)]:"/",
2664                            (strlen(&afspath[strlen(cm_mountRoot)])) ?
2665                            (DWORD)strlen(&afspath[strlen(cm_mountRoot)])+1:2);
2666
2667             RegCloseKey( hkSubmounts );
2668             StringCbCopyA(ioctlp->outDatap, SMB_IOCTL_MAXDATA - (ioctlp->outDatap - ioctlp->outAllocp), submountreqp);
2669             ioctlp->outDatap += strlen(ioctlp->outDatap) +1;
2670             lock_ReleaseMutex(&cm_Afsdsbmt_Lock);
2671             return 0;
2672         }
2673
2674         /* The suggested submount name is already in use--if the
2675          * supplied path matches the submount's path, we can still
2676          * use the suggested submount name.
2677          */
2678         if (!strcmp (submountPath, afspath)) {
2679             StringCbCopyA(ioctlp->outDatap, SMB_IOCTL_MAXDATA - (ioctlp->outDatap - ioctlp->outAllocp), submountreqp);
2680             ioctlp->outDatap += strlen(ioctlp->outDatap) +1;
2681             RegCloseKey( hkSubmounts );
2682             lock_ReleaseMutex(&cm_Afsdsbmt_Lock);
2683             return 0;
2684         }
2685     }
2686
2687     RegQueryInfoKey( hkSubmounts,
2688                      NULL,  /* lpClass */
2689                      NULL,  /* lpcClass */
2690                      NULL,  /* lpReserved */
2691                      NULL,  /* lpcSubKeys */
2692                      NULL,  /* lpcMaxSubKeyLen */
2693                      NULL,  /* lpcMaxClassLen */
2694                      &dwSubmounts, /* lpcValues */
2695                      NULL,  /* lpcMaxValueNameLen */
2696                      NULL,  /* lpcMaxValueLen */
2697                      NULL,  /* lpcbSecurityDescriptor */
2698                      NULL   /* lpftLastWriteTime */
2699                      );
2700
2701
2702     /* Having obtained a list of all available submounts, start
2703      * searching that list for a path which matches the requested
2704      * AFS path. We'll also keep track of the highest "auto15"/"auto47"
2705      * submount, in case we need to add a new one later.
2706      */
2707
2708     nextAutoSubmount = 1;
2709
2710     for ( dwIndex = 0; dwIndex < dwSubmounts; dwIndex ++ ) {
2711         char submountPath[MAX_PATH] = "";
2712         DWORD submountPathLen = sizeof(submountPath);
2713         char submountName[MAX_PATH];
2714         DWORD submountNameLen = sizeof(submountName);
2715
2716         dwType = 0;
2717         RegEnumValue( hkSubmounts, dwIndex, submountName, &submountNameLen, NULL,
2718                       &dwType, submountPath, &submountPathLen);
2719         if (dwType == REG_EXPAND_SZ) {
2720             char buf[MAX_PATH];
2721             StringCbCopyA(buf, MAX_PATH, submountPath);
2722             submountPathLen = ExpandEnvironmentStrings(buf, submountPath, MAX_PATH);
2723             if (submountPathLen > MAX_PATH)
2724                 continue;
2725         }
2726
2727         /* If this is an Auto### submount, remember its ### value */
2728         if ((!strnicmp (submountName, "auto", 4)) &&
2729              (isdigit (submountName[strlen("auto")]))) {
2730             int thisAutoSubmount;
2731             thisAutoSubmount = atoi (&submountName[strlen("auto")]);
2732             nextAutoSubmount = max (nextAutoSubmount,
2733                                      thisAutoSubmount+1);
2734         }       
2735
2736         if ((submountPathLen == 0) ||
2737              (submountPathLen == sizeof(submountPath) - 1)) {
2738             continue;
2739         }
2740
2741         /* See if the path for this submount matches the path
2742          * that our caller specified. If so, we can return
2743          * this submount.
2744          */
2745         if (!strcmp (submountPath, afspath)) {
2746             StringCbCopyA(ioctlp->outDatap, SMB_IOCTL_MAXDATA - (ioctlp->outDatap - ioctlp->outAllocp), submountName);
2747             ioctlp->outDatap += strlen(ioctlp->outDatap) +1;
2748             RegCloseKey(hkSubmounts);
2749             lock_ReleaseMutex(&cm_Afsdsbmt_Lock);
2750             return 0;
2751
2752         }
2753     }
2754
2755     /* We've been through the entire list of existing submounts, and
2756      * didn't find any which matched the specified path. So, we'll
2757      * just have to add one. Remember not to write the leading "/afs"
2758      * when writing out the submount.
2759      */
2760
2761     StringCbPrintfA(ioctlp->outDatap, SMB_IOCTL_MAXDATA - (ioctlp->outDatap - ioctlp->outAllocp), "auto%ld", nextAutoSubmount);
2762
2763     RegSetValueEx( hkSubmounts, 
2764                    ioctlp->outDatap,
2765                    0,
2766                    REG_EXPAND_SZ, 
2767                    (strlen(&afspath[strlen(cm_mountRoot)])) ?
2768                    &afspath[strlen(cm_mountRoot)]:"/",
2769                    (strlen(&afspath[strlen(cm_mountRoot)])) ?
2770                    (DWORD)strlen(&afspath[strlen(cm_mountRoot)])+1:2);
2771
2772     ioctlp->outDatap += strlen(ioctlp->outDatap) +1;
2773     RegCloseKey(hkSubmounts);
2774     lock_ReleaseMutex(&cm_Afsdsbmt_Lock);
2775     return 0;
2776 }
2777
2778 /* 
2779  * VIOC_GETRXKCRYPT internals.
2780  * 
2781  * Assumes that pioctl path has been parsed or skipped.
2782  */
2783 afs_int32
2784 cm_IoctlGetRxkcrypt(cm_ioctl_t *ioctlp, cm_user_t *userp)
2785 {
2786     memcpy(ioctlp->outDatap, &cryptall, sizeof(cryptall));
2787     ioctlp->outDatap += sizeof(cryptall);
2788
2789     return 0;
2790 }
2791
2792 /* 
2793  * VIOC_SETRXKCRYPT internals.
2794  * 
2795  * Assumes that pioctl path has been parsed or skipped.
2796  */
2797 afs_int32
2798 cm_IoctlSetRxkcrypt(cm_ioctl_t *ioctlp, cm_user_t *userp)
2799 {
2800     afs_int32 c = cryptall;
2801
2802     memcpy(&cryptall, ioctlp->inDatap, sizeof(cryptall));
2803
2804     if (c != cryptall) {
2805         if (cryptall == 1)
2806             LogEvent(EVENTLOG_INFORMATION_TYPE, MSG_CRYPT_ON);
2807         else if (cryptall == 2)
2808             LogEvent(EVENTLOG_INFORMATION_TYPE, MSG_CRYPT_AUTH);
2809         else
2810             LogEvent(EVENTLOG_INFORMATION_TYPE, MSG_CRYPT_OFF);
2811     }
2812     return 0;
2813 }
2814
2815 /* 
2816  * VIOC_RXSTAT_PROC internals.
2817  * 
2818  * Assumes that pioctl path has been parsed or skipped.
2819  */
2820 afs_int32
2821 cm_IoctlRxStatProcess(struct cm_ioctl *ioctlp, struct cm_user *userp)
2822 {
2823     afs_int32 flags;
2824     int code = 0;
2825
2826     memcpy((char *)&flags, ioctlp->inDatap, sizeof(afs_int32));
2827     if (!(flags & AFSCALL_RXSTATS_MASK) || (flags & ~AFSCALL_RXSTATS_MASK)) {
2828         return -1;
2829     }
2830     if (flags & AFSCALL_RXSTATS_ENABLE) {
2831         rx_enableProcessRPCStats();
2832     }
2833     if (flags & AFSCALL_RXSTATS_DISABLE) {
2834         rx_disableProcessRPCStats();
2835     }
2836     if (flags & AFSCALL_RXSTATS_CLEAR) {
2837         rx_clearProcessRPCStats(AFS_RX_STATS_CLEAR_ALL);
2838     }
2839     return 0;
2840 }
2841
2842 /* 
2843  * VIOC_RXSTAT_PEER internals.
2844  * 
2845  * Assumes that pioctl path has been parsed or skipped.
2846  */
2847 afs_int32
2848 cm_IoctlRxStatPeer(struct cm_ioctl *ioctlp, struct cm_user *userp)
2849 {
2850     afs_int32 flags;
2851     int code = 0;
2852
2853     memcpy((char *)&flags, ioctlp->inDatap, sizeof(afs_int32));
2854     if (!(flags & AFSCALL_RXSTATS_MASK) || (flags & ~AFSCALL_RXSTATS_MASK)) {
2855         return -1;
2856     }
2857     if (flags & AFSCALL_RXSTATS_ENABLE) {
2858         rx_enablePeerRPCStats();
2859     }
2860     if (flags & AFSCALL_RXSTATS_DISABLE) {
2861         rx_disablePeerRPCStats();
2862     }
2863     if (flags & AFSCALL_RXSTATS_CLEAR) {
2864         rx_clearPeerRPCStats(AFS_RX_STATS_CLEAR_ALL);
2865     }
2866     return 0;
2867 }
2868
2869 /* 
2870  * VIOC_UNICODECTL internals.
2871  * 
2872  * Assumes that pioctl path has been parsed or skipped.
2873  */
2874 afs_int32
2875 cm_IoctlUnicodeControl(struct cm_ioctl *ioctlp, struct cm_user * userp)
2876 {
2877     afs_int32 result = 0;
2878 #ifdef SMB_UNICODE
2879     afs_uint32 cmd;
2880
2881     memcpy(&cmd, ioctlp->inDatap, sizeof(afs_uint32));
2882
2883     if (cmd & 2) {
2884         /* Setting the Unicode flag */
2885         LONG newflag;
2886
2887         newflag = ((cmd & 1) == 1);
2888
2889         InterlockedExchange(&smb_UseUnicode, newflag);
2890     }
2891
2892     result = smb_UseUnicode;
2893 #else
2894     result = 2;
2895 #endif
2896
2897     memcpy(ioctlp->outDatap, &result, sizeof(result));
2898     ioctlp->outDatap += sizeof(result);
2899
2900     return 0;
2901 }
2902
2903 /* 
2904  * VIOC_UUIDCTL internals.
2905  * 
2906  * Assumes that pioctl path has been parsed or skipped.
2907  */
2908 afs_int32
2909 cm_IoctlUUIDControl(struct cm_ioctl * ioctlp, struct cm_user *userp)
2910 {
2911     afs_uint32 cmd;
2912     afsUUID uuid;
2913
2914     memcpy(&cmd, ioctlp->inDatap, sizeof(afs_uint32));
2915
2916     if (cmd) {             /* generate a new UUID */
2917         UuidCreate((UUID *) &uuid);
2918         cm_data.Uuid = uuid;
2919         cm_ForceNewConnectionsAllServers();
2920     }
2921
2922     memcpy(ioctlp->outDatap, &cm_data.Uuid, sizeof(cm_data.Uuid));
2923     ioctlp->outDatap += sizeof(cm_data.Uuid);
2924
2925     return 0;
2926 }
2927
2928
2929
2930 /* 
2931  * functions to dump contents of various structures. 
2932  * In debug build (linked with crt debug library) will dump allocated but not freed memory
2933  */
2934 extern int cm_DumpSCache(FILE *outputFile, char *cookie, int lock);
2935 extern int cm_DumpBufHashTable(FILE *outputFile, char *cookie, int lock);
2936
2937 /* 
2938  * VIOC_TRACEMEMDUMP internals.
2939  * 
2940  * Assumes that pioctl path has been parsed or skipped.
2941  * dscp is held but not locked.
2942  */
2943 afs_int32
2944 cm_IoctlMemoryDump(struct cm_ioctl *ioctlp, struct cm_user *userp)
2945 {
2946     afs_int32 inValue = 0;
2947     HANDLE hLogFile;
2948     char logfileName[MAX_PATH+1];
2949     char *cookie;
2950     DWORD dwSize;
2951   
2952 #ifdef _DEBUG  
2953     static _CrtMemState memstate;
2954 #endif
2955   
2956     memcpy(&inValue, ioctlp->inDatap, sizeof(afs_int32));
2957   
2958     dwSize = GetEnvironmentVariable("TEMP", logfileName, sizeof(logfileName));
2959     if ( dwSize == 0 || dwSize > sizeof(logfileName) )
2960     {
2961         GetWindowsDirectory(logfileName, sizeof(logfileName));
2962     }
2963     strncat(logfileName, "\\afsd_alloc.log", sizeof(logfileName));
2964
2965     hLogFile = CreateFile(logfileName, GENERIC_WRITE, FILE_SHARE_WRITE, NULL, OPEN_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);
2966   
2967     if (!hLogFile)
2968     {
2969       /* error */
2970       inValue = -1;
2971       memcpy(ioctlp->outDatap, &inValue, sizeof(afs_int32));
2972       ioctlp->outDatap += sizeof(afs_int32);
2973       
2974       return 0;               
2975     }
2976   
2977     SetFilePointer(hLogFile, 0, NULL, FILE_END);
2978   
2979     cookie = inValue ? "b" : "e";
2980   
2981 #ifdef _DEBUG  
2982   
2983     if (inValue)
2984     {
2985       _CrtMemCheckpoint(&memstate);           
2986     }
2987     else
2988     {
2989         _CrtSetReportMode(_CRT_WARN, _CRTDBG_MODE_FILE);
2990         _CrtSetReportFile(_CRT_WARN, hLogFile);
2991         _CrtMemDumpAllObjectsSince(&memstate);
2992     }
2993 #endif
2994   
2995     /* dump all interesting data */
2996     cm_MemDumpDirStats(hLogFile, cookie, 1);
2997     cm_MemDumpBPlusStats(hLogFile, cookie, 1);
2998     cm_DumpCells(hLogFile, cookie, 1);
2999     cm_DumpVolumes(hLogFile, cookie, 1);
3000     cm_DumpSCache(hLogFile, cookie, 1);
3001     cm_DumpBufHashTable(hLogFile, cookie, 1);
3002     smb_DumpVCP(hLogFile, cookie, 1);
3003
3004     CloseHandle(hLogFile);                          
3005   
3006     inValue = 0;        /* success */
3007     memcpy(ioctlp->outDatap, &inValue, sizeof(long));
3008     ioctlp->outDatap += sizeof(long);
3009   
3010     return 0;
3011 }
3012
3013 /* Utility functon.  Not currently used. */
3014 static afs_int32
3015 cm_CheckServersStatus(cm_serverRef_t *serversp)
3016 {
3017     afs_int32 code = 0;
3018     cm_serverRef_t *tsrp;
3019     cm_server_t *tsp;
3020     int someBusy = 0, someOffline = 0, allOffline = 1, allBusy = 1, allDown = 1;
3021
3022     if (serversp == NULL) {
3023         osi_Log1(afsd_logp, "cm_CheckServersStatus returning 0x%x", CM_ERROR_ALLDOWN);
3024         return CM_ERROR_ALLDOWN;
3025     }
3026
3027     lock_ObtainRead(&cm_serverLock);
3028     for (tsrp = serversp; tsrp; tsrp=tsrp->next) {
3029         if (tsrp->status == srv_deleted)
3030             continue;
3031         if (tsp = tsrp->server) {
3032             cm_GetServerNoLock(tsp);
3033             lock_ReleaseRead(&cm_serverLock);
3034             if (!(tsp->flags & CM_SERVERFLAG_DOWN)) {
3035                 allDown = 0;
3036                 if (tsrp->status == srv_busy) {
3037                     allOffline = 0;
3038                     someBusy = 1;
3039                 } else if (tsrp->status == srv_offline) {
3040                     allBusy = 0;
3041                     someOffline = 1;
3042                 } else {
3043                     allOffline = 0;
3044                     allBusy = 0;
3045                     cm_PutServer(tsp);
3046                     goto done;
3047                 }
3048             }
3049             lock_ObtainRead(&cm_serverLock);
3050             cm_PutServerNoLock(tsp);
3051         }
3052     }   
3053     lock_ReleaseRead(&cm_serverLock);
3054
3055     if (allDown) 
3056         code = CM_ERROR_ALLDOWN;
3057     else if (allBusy) 
3058         code = CM_ERROR_ALLBUSY;
3059     else if (allOffline || (someBusy && someOffline))
3060         code = CM_ERROR_ALLOFFLINE;
3061
3062   done:
3063     osi_Log1(afsd_logp, "cm_CheckServersStatus returning 0x%x", code);
3064     return code;
3065 }
3066
3067 /* 
3068  * VIOC_PATH_AVAILABILITY internals.
3069  * 
3070  * Assumes that pioctl path has been parsed or skipped.
3071  * scp is held but not locked.
3072  */
3073 afs_int32
3074 cm_IoctlPathAvailability(struct cm_ioctl *ioctlp, struct cm_user *userp, cm_scache_t *scp, cm_req_t *reqp)
3075 {
3076     afs_int32 code;
3077     cm_cell_t *cellp;
3078     cm_volume_t *tvp;
3079     cm_vol_state_t *statep;
3080     afs_uint32 volume;
3081         
3082 #ifdef AFS_FREELANCE_CLIENT
3083     if ( scp->fid.cell == AFS_FAKE_ROOT_CELL_ID && scp->fid.volume == AFS_FAKE_ROOT_VOL_ID ) {
3084         code = 0;
3085     } else
3086 #endif
3087     {
3088         volume = scp->fid.volume;
3089
3090         cellp = cm_FindCellByID(scp->fid.cell, 0);
3091
3092         if (!cellp)
3093             return CM_ERROR_NOSUCHCELL;
3094
3095         code = cm_FindVolumeByID(cellp, volume, userp, reqp, CM_GETVOL_FLAG_CREATE, &tvp);
3096         if (code) 
3097             return code;
3098         
3099         statep = cm_VolumeStateByID(tvp, volume);
3100         switch (statep->state) {
3101         case vl_online:
3102         case vl_unknown:
3103             code = 0;
3104             break;
3105         case vl_busy:
3106             code = CM_ERROR_ALLBUSY;
3107             break;
3108         case vl_offline:
3109             code = CM_ERROR_ALLOFFLINE;
3110             break;
3111         case vl_alldown:
3112             code = CM_ERROR_ALLDOWN;
3113             break;
3114         }
3115         cm_PutVolume(tvp);
3116     }
3117     return code;
3118 }       
3119
3120 /* 
3121  * VIOC_VOLSTAT_TEST internals.
3122  * 
3123  * Assumes that pioctl path has been parsed or skipped.
3124  */
3125 afs_int32
3126 cm_IoctlVolStatTest(struct cm_ioctl *ioctlp, struct cm_user *userp, cm_req_t *reqp)
3127 {
3128     afs_int32 code;
3129     cm_cell_t *cellp = NULL;
3130     cm_volume_t *volp;
3131     cm_vol_state_t *statep;
3132     struct VolStatTest * testp;
3133     afs_uint32 n;
3134
3135     testp = (struct VolStatTest *)ioctlp->inDatap;
3136
3137 #ifdef AFS_FREELANCE_CLIENT
3138     if (testp->fid.cell == -1) 
3139         return CM_ERROR_NOACCESS;
3140 #endif
3141
3142     if (testp->flags & VOLSTAT_TEST_CHECK_VOLUME) {
3143         cm_CheckOfflineVolumes();
3144         return 0;
3145     }
3146
3147     if (testp->flags & VOLSTAT_TEST_NETWORK_UP) {
3148         cm_VolStatus_Network_Started(cm_NetbiosName
3149 #ifdef _WIN64
3150                                   , cm_NetbiosName
3151 #endif
3152                                   );
3153         return 0;
3154     }
3155
3156     if (testp->flags & VOLSTAT_TEST_NETWORK_DOWN) {
3157         cm_VolStatus_Network_Stopped(cm_NetbiosName
3158 #ifdef _WIN64
3159                                   , cm_NetbiosName
3160 #endif
3161                                   );
3162         return 0;
3163     }
3164
3165     if (testp->cellname[0]) {
3166         n = atoi(testp->cellname);
3167         if (n)
3168             testp->fid.cell = n;
3169         else
3170             cellp = cm_GetCell(testp->cellname, 0);
3171     }
3172
3173     if (testp->fid.cell > 0) {
3174         cellp = cm_FindCellByID(testp->fid.cell, 0);
3175     }
3176
3177     if (!cellp)
3178         return CM_ERROR_NOSUCHCELL;
3179
3180     if (testp->volname[0]) {
3181         n = atoi(testp->volname);
3182         if (n)
3183             testp->fid.volume = n;
3184         else
3185             code = cm_FindVolumeByName(cellp, testp->volname, userp, reqp, CM_GETVOL_FLAG_NO_LRU_UPDATE, &volp);
3186     }
3187
3188     if (testp->fid.volume > 0)
3189         code = cm_FindVolumeByID(cellp, testp->fid.volume, userp, reqp, CM_GETVOL_FLAG_NO_LRU_UPDATE, &volp);
3190
3191     if (code)
3192         return code;
3193         
3194     if (testp->fid.volume)
3195         statep = cm_VolumeStateByID(volp, testp->fid.volume);
3196     else
3197         statep = cm_VolumeStateByName(volp, testp->volname);
3198
3199     if (statep) {
3200         statep->state = testp->state;
3201         code = cm_VolStatus_Change_Notification(cellp->cellID, statep->ID, testp->state);
3202     }
3203
3204     cm_PutVolume(volp);
3205
3206     return code;
3207 }