windows-rename-20021126
[openafs.git] / src / WINNT / client_exp / gui2fs.cpp
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 extern "C" {
11 #include <afs/param.h>
12 #include <afs/stds.h>
13 }
14
15 #include "stdafx.h"
16 #include <errno.h>
17 #include <time.h>
18
19 #include "gui2fs.h"
20 #include "msgs.h"
21 #include "results_dlg.h"
22 #include "volume_inf.h"
23 #include "mount_points_dlg.h"
24 #include "hourglass.h"
25 #include "down_servers_dlg.h"
26
27 extern "C" {
28 #include <afs/param.h>
29 #include <osi.h>
30 #include "fs.h"
31 #include "fs_utils.h"
32 #include <afsint.h>
33 #include <afs/auth.h>
34 }
35
36
37 #define PCCHAR(str)             ((char *)(const char *)(str))
38
39
40 #define MAXHOSTS 13
41 #define OMAXHOSTS 8
42 #define MAXNAME 100
43 #define MAXSIZE 2048
44 #define MAXINSIZE 1300    /* pioctl complains if data is larger than this */
45 #define VMSGSIZE 128      /* size of msg buf in volume hdr */
46
47 #define MAXCELLCHARS            64
48 #define MAXHOSTCHARS            64
49 #define MAXHOSTSPERCELL         8
50
51 struct afsconf_cell {
52         char name[MAXCELLCHARS];
53     short numServers;
54     short flags;
55     struct sockaddr_in hostAddr[MAXHOSTSPERCELL];
56     char hostName[MAXHOSTSPERCELL][MAXHOSTCHARS];
57     char *linkedCell;
58 };
59
60 static char space[MAXSIZE];
61 static char tspace[1024];
62
63 // #define      LOGGING_ON              // Enable this to log certain pioctl calls
64
65 #ifdef  LOGGING_ON
66 static char *szLogFileName = "afsguilog.txt";
67 #endif
68
69
70 FILE *OpenFile(char *file, char *rwp)
71 {
72         char wdir[256];
73         long code;
74         long tlen;
75         FILE *fp;
76
77         code = GetWindowsDirectory(wdir, sizeof(wdir));
78         if (code == 0 || code > sizeof(wdir)) 
79                 return FALSE;
80
81         /* add trailing backslash, if required */
82         tlen = strlen(wdir);
83         if (wdir[tlen - 1] != '\\')
84                 strcat(wdir, "\\");
85
86         strcat(wdir, file);
87
88         fp = fopen(wdir, rwp);
89
90         return fp;
91 }
92
93 CString StripPath(CString& strPath)
94 {
95         int nIndex = strPath.ReverseFind('\\');
96
97         CString strFile = strPath.Mid(nIndex + 1);
98         if (strFile.IsEmpty())
99                 return strPath;
100
101         return strFile;
102 }
103
104 CStringArray& StripPath(CStringArray& files)
105 {
106         for (int i = 0; i < files.GetSize(); i++)
107                 files[i] = StripPath(files[i]);
108
109         return files;
110 }
111
112 void Flush(const CStringArray& files)
113 {
114     register LONG code;
115     struct ViceIoctl blob;
116     int error = 0;
117
118         HOURGLASS hourglass;
119
120         for (int i = 0; i < files.GetSize(); i++) {
121                 blob.in_size = blob.out_size = 0;
122
123                 code = pioctl(PCCHAR(files[i]), VIOCFLUSH, &blob, 0);
124                 if (code) {
125                         error = 1;
126                         if (errno == EMFILE)
127                                 ShowMessageBox(IDS_FLUSH_FAILED, MB_ICONEXCLAMATION, IDS_FLUSH_FAILED, files[i]);
128                         else 
129                                 ShowMessageBox(IDS_FLUSH_ERROR, MB_ICONEXCLAMATION, IDS_FLUSH_ERROR, files[i], strerror(errno));
130                 }
131     }
132
133         if (!error)
134                 ShowMessageBox(IDS_FLUSH_OK, MB_ICONEXCLAMATION, IDS_FLUSH_OK);
135 }
136
137 void FlushVolume(const CStringArray& files)
138 {
139     register LONG code;
140     struct ViceIoctl blob;
141         int error = 0;
142
143         HOURGLASS hourglass;
144
145         for (int i = 0; i < files.GetSize(); i++) {
146                 blob.in_size = blob.out_size = 0;
147
148                 code = pioctl(PCCHAR(files[i]), VIOC_FLUSHVOLUME, &blob, 0);
149                 if (code) {
150                         error = 1;
151                         ShowMessageBox(IDS_FLUSH_VOLUME_ERROR, MB_ICONEXCLAMATION, IDS_FLUSH_VOLUME_ERROR, files[i], strerror(errno));
152                 }
153     }
154
155         if (!code)
156                 ShowMessageBox(IDS_FLUSH_VOLUME_OK, MB_ICONEXCLAMATION, IDS_FLUSH_VOLUME_OK);
157 }
158
159 void WhichCell(CStringArray& files)
160 {
161     register LONG code;
162     struct ViceIoctl blob;
163     int error;
164     CString str;
165     CString str2;
166
167         CStringArray results;
168
169     error = 0;
170
171         HOURGLASS hourglass;
172
173         for (int i = 0; i < files.GetSize(); i++) {
174                 blob.in_size = 0;
175                 blob.out_size = MAXSIZE;
176                 blob.out = space;
177
178                 code = pioctl(PCCHAR(files[i]), VIOC_FILE_CELL_NAME, &blob, 1);
179                 if (code) {
180                         if (code == ENOENT) {
181                                 LoadString (str, IDS_CANT_GET_CELL);
182                                 results.Add(str);
183                         } else
184                                 results.Add(GetAfsError(errno));
185                 } else
186                         results.Add(space);
187         }
188
189         LoadString (str, IDS_SHOW_CELL);
190         LoadString (str2, IDS_SHOW_CELL_COLUMN);
191         CResultsDlg dlg(SHOW_CELL_HELP_ID);
192         dlg.SetContents(str, str2, StripPath(files), results);
193         dlg.DoModal();
194 }
195
196 void WSCellCmd()
197 {
198     register LONG code;
199     struct ViceIoctl blob;
200     
201         HOURGLASS hourglass;
202
203     blob.in_size = 0;
204     blob.in = (char *) 0;
205     blob.out_size = MAXSIZE;
206     blob.out = space;
207
208     code = pioctl((char *) 0, VIOC_GET_WS_CELL, &blob, 1);
209
210     if (code) {
211                 //Die(errno, (char *) 0);
212     }
213     //else
214                 //printf("This workstation belongs to cell '%s'\n", space);
215 }
216
217 BOOL CheckVolumes()
218 {
219     register LONG code;
220     struct ViceIoctl blob;
221     
222     blob.in_size = 0;
223     blob.out_size = 0;
224     code = pioctl(0, VIOCCKBACK, &blob, 1);
225     if (code) {
226                 ShowMessageBox(IDS_CHECK_VOLUMES_ERROR, MB_ICONEXCLAMATION, IDS_CHECK_VOLUMES_ERROR, GetAfsError(errno, CString()));
227                 return FALSE;
228     }
229
230     ShowMessageBox(IDS_CHECK_VOLUMES_OK, MB_OK, IDS_CHECK_VOLUMES_OK);
231
232         return TRUE;
233 }
234
235 void SetCacheSizeCmd(LONG nNewCacheSize)
236 {
237     register LONG code;
238     struct ViceIoctl blob;
239     
240         HOURGLASS hourglass;
241
242         blob.in = (char *) &nNewCacheSize;
243     blob.in_size = sizeof(LONG);
244     blob.out_size = 0;
245
246     code = pioctl(0, VIOCSETCACHESIZE, &blob, 1);
247     //if (code)
248         //      Die(errno, (char *) 0);
249     //else
250         //      printf("New cache size set.\n");
251 }
252
253 void WhereIs(CStringArray& files)
254 {
255     register LONG code;
256     struct ViceIoctl blob;
257         CStringArray servers;
258         CStringArray resultFiles;
259         CString str;
260         CString str2;
261
262         HOURGLASS hourglass;
263
264         for (int i = 0; i < files.GetSize(); i++) {
265                 blob.out_size = MAXSIZE;
266                 blob.in_size = 0;
267                 blob.out = space;
268                 memset(space, 0, sizeof(space));
269
270                 code = pioctl(PCCHAR(files[i]), VIOCWHEREIS, &blob, 1);
271                 if (code) {
272                         resultFiles.Add(StripPath(files[i]));
273                         servers.Add(GetAfsError(errno));
274                         continue;
275                 }
276                 
277                 LONG *hosts = (LONG *)space;
278                 BOOL bFirst = TRUE;
279                 str = "";
280
281                 for (int j = 0; j < MAXHOSTS; j++) {
282                         if (hosts[j] == 0)
283                                 break;
284                         char *hostName = hostutil_GetNameByINet(hosts[j]);
285                         if (bFirst) {
286                                 resultFiles.Add(StripPath(files[i]));
287                                 bFirst = FALSE;
288                         } else
289                                 resultFiles.Add(" ");
290                         servers.Add(hostName);
291                 }
292         }
293
294         LoadString (str, IDS_SHOW_FS);
295         LoadString (str2, IDS_SHOW_FS_COLUMN);
296         CResultsDlg dlg(SHOW_FILE_SERVERS_HELP_ID);
297         dlg.SetContents(str, str2, resultFiles, servers);
298         dlg.DoModal();
299 }
300
301 CString GetAfsError(int code, const char *filename)
302 {
303     CString strMsg;
304
305         if (code == EINVAL) {
306                 if (filename)
307                     strMsg.Format("Invalid argument; it is possible that the file is not in AFS");
308                 else 
309                         strMsg.Format("Invalid argument");
310     } else if (code == ENOENT) {
311                 if (filename) 
312                         strMsg.Format("The file does not exist");
313                 else 
314                         strMsg.Format("No such file returned");
315     } else if (code == EROFS)  {
316                 strMsg.Format("You can not change a backup or readonly volume");
317     } else if (code == EACCES || code == EPERM) {
318                 strMsg.Format("You do not have the required rights to do this operation");
319     } else if (code == ENODEV) {
320                 strMsg.Format("AFS service may not have started");
321     } else if (code == ESRCH) {
322                 strMsg.Format("Cell name not recognized");
323     } else if (code == ETIMEDOUT) {
324                 strMsg.Format("Connection timed out");
325     } else if (code == EPIPE) {
326                 strMsg.Format("Volume name or ID not recognized");
327     } else {
328                 strMsg.Format("Error 0x%x occurred", code);
329     }
330
331         return strMsg;
332 }
333
334
335 /************************************************************************
336 ************************** ACL Code *************************************
337 ************************************************************************/
338
339 typedef char sec_rgy_name_t[1025];      /* A DCE definition */
340
341 struct AclEntry {
342     struct AclEntry *next;
343     char name[MAXNAME];
344     LONG rights;
345 };
346
347 struct Acl {
348     int dfs;                            //      Originally true if a dfs acl; now also the type
349                                                         //      of the acl (1, 2, or 3, corresponding to object,
350                                                         //      initial dir, or initial object).
351     sec_rgy_name_t cell;        //      DFS cell name
352     int nplus;
353     int nminus;
354     struct AclEntry *pluslist;
355     struct AclEntry *minuslist;
356 };
357
358 int foldcmp (register char *a, register char *b)
359 {
360     register char t, u;
361     while (1) {
362         t = *a++;
363         u = *b++;
364         if (t >= 'A' && t <= 'Z') t += 0x20;
365         if (u >= 'A' && u <= 'Z') u += 0x20;
366         if (t != u) return 1;
367         if (t == 0) return 0;
368     }
369 }
370
371 void ZapList(struct AclEntry *alist)
372 {
373     register struct AclEntry *tp, *np;
374
375     for (tp = alist; tp; tp = np) {
376         np = tp->next;
377         free(tp);
378     }
379 }
380
381 void ZapAcl (struct Acl *acl)
382 {
383     ZapList(acl->pluslist);
384     ZapList(acl->minuslist);
385     free(acl);
386 }
387
388 int PruneList (struct AclEntry **ae, int dfs)
389 {
390     struct AclEntry **lp = ae;
391     struct AclEntry *te, *ne;
392     LONG ctr = 0;
393     
394         for (te = *ae; te; te = ne) {
395         if ((!dfs && te->rights == 0) || te->rights == -1) {
396             *lp = te->next;
397             ne = te->next;
398             free(te);
399             ctr++;
400                 }
401         else {
402             ne = te->next;
403             lp = &te->next;
404                 }
405     }
406     
407         return ctr;
408 }
409
410 char *SkipLine (register char *astr)
411 {
412     while (*astr != '\n') 
413                 astr++;
414     
415         astr++;
416     
417         return astr;
418 }
419
420 /* tell if a name is 23 or -45 (digits or minus digits), which are bad names we must prune */
421 static BadName(register char *aname)
422 {
423     register int tc;
424
425         /* all must be '-' or digit to be bad */
426     while (tc = *aname++) {
427                 if ((tc != '-') && (tc < '0' || tc > '9')) 
428                         return 0;
429     }
430
431     return 1;
432 }
433
434 CString GetRightsString(register LONG arights, int dfs)
435 {
436         CString str;
437
438     if (!dfs) {
439                 if (arights & PRSFS_READ) str += "r";
440                 if (arights & PRSFS_LOOKUP) str += "l";
441                 if (arights & PRSFS_INSERT) str += "i";
442                 if (arights & PRSFS_DELETE) str += "d";
443                 if (arights & PRSFS_WRITE) str += "w";
444                 if (arights & PRSFS_LOCK) str += "k";
445                 if (arights & PRSFS_ADMINISTER) str += "a";
446     } else {
447                 ASSERT(FALSE);
448 /*
449                 if (arights & DFS_READ) str += "r"; else str += "-";
450                 if (arights & DFS_WRITE) str += "w"; else printf("-");
451                 if (arights & DFS_EXECUTE) str += "x"; else printf("-");
452                 if (arights & DFS_CONTROL) str += "c"; else printf("-");
453                 if (arights & DFS_INSERT) str += "i"; else printf("-");
454                 if (arights & DFS_DELETE) str += "d"; else printf("-");
455                 if (arights & (DFS_USRALL)) str += "+";
456 */
457         }       
458
459         return str;
460 }
461
462 char *AclToString(struct Acl *acl)
463 {
464     static char mydata[MAXSIZE];
465     char tstring[MAXSIZE];
466     char dfsstring[30];
467     struct AclEntry *tp;
468     
469     if (acl->dfs)
470                 sprintf(dfsstring, " dfs:%d %s", acl->dfs, acl->cell);
471     else
472                 dfsstring[0] = '\0';
473     sprintf(mydata, "%d%s\n%d\n", acl->nplus, dfsstring, acl->nminus);
474     
475         for(tp = acl->pluslist; tp; tp = tp->next) {
476         sprintf(tstring, "%s %d\n", tp->name, tp->rights);
477         strcat(mydata, tstring);
478     }
479     
480         for(tp = acl->minuslist; tp; tp = tp->next) {
481         sprintf(tstring, "%s %d\n", tp->name, tp->rights);
482         strcat(mydata, tstring);
483     }
484     
485         return mydata;
486 }
487
488 struct Acl *EmptyAcl(const CString& strCellName)
489 {
490     register struct Acl *tp;
491     
492     tp = (struct Acl *)malloc(sizeof (struct Acl));
493     tp->nplus = tp->nminus = 0;
494     tp->pluslist = tp->minuslist = 0;
495     tp->dfs = 0;
496     strcpy(tp->cell, strCellName);
497
498     return tp;
499 }
500
501 struct Acl *ParseAcl(char *astr)
502 {
503     int nplus, nminus, i, trights;
504     char tname[MAXNAME];
505     struct AclEntry *first, *last, *tl;
506     struct Acl *ta;
507
508     ta = (struct Acl *) malloc (sizeof (struct Acl));
509     ta->dfs = 0;
510     sscanf(astr, "%d dfs:%d %s", &ta->nplus, &ta->dfs, ta->cell);
511     astr = SkipLine(astr);
512     sscanf(astr, "%d", &ta->nminus);
513     astr = SkipLine(astr);
514
515     nplus = ta->nplus;
516     nminus = ta->nminus;
517
518     last = 0;
519     first = 0;
520     for(i = 0; i < nplus; i++) {
521         sscanf(astr, "%100s %d", tname, &trights);
522         astr = SkipLine(astr);
523         tl = (struct AclEntry *) malloc(sizeof (struct AclEntry));
524         if (!first)
525                         first = tl;
526         strcpy(tl->name, tname);
527         tl->rights = trights;
528         tl->next = 0;
529         if (last)
530                         last->next = tl;
531         last = tl;
532     }
533     ta->pluslist = first;
534
535     last = 0;
536     first = 0;
537     for(i=0; i < nminus; i++) {
538         sscanf(astr, "%100s %d", tname, &trights);
539         astr = SkipLine(astr);
540         tl = (struct AclEntry *) malloc(sizeof (struct AclEntry));
541         if (!first) 
542                         first = tl;
543         strcpy(tl->name, tname);
544         tl->rights = trights;
545         tl->next = 0;
546         if (last) 
547                         last->next = tl;
548         last = tl;
549     }
550     ta->minuslist = first;
551
552     return ta;
553 }
554
555 /* clean up an access control list of its bad entries; return 1 if we made
556    any changes to the list, and 0 otherwise */
557 int CleanAcl(struct Acl *aa)
558 {
559     register struct AclEntry *te, **le, *ne;
560     int changes;
561
562         HOURGLASS hourglass;
563
564     /* Don't correct DFS ACL's for now */
565     if (aa->dfs)
566                 return 0;
567
568     /* prune out bad entries */
569     changes = 0;            /* count deleted entries */
570     le = &aa->pluslist;
571     for(te = aa->pluslist; te; te = ne) {
572                 ne = te->next;
573                 if (BadName(te->name)) {
574                         /* zap this dude */
575                         *le = te->next;
576                         aa->nplus--;
577                         free(te);
578                         changes++;
579                 }
580                 else
581                         le = &te->next;
582     }
583
584     le = &aa->minuslist;
585     
586         for(te = aa->minuslist; te; te = ne) {
587                 ne = te->next;
588                 if (BadName(te->name)) {
589                         /* zap this dude */
590                         *le = te->next;
591                         aa->nminus--;
592                         free(te);
593                         changes++;
594                 }
595                 else
596                         le = &te->next;
597     }
598
599     return changes;
600 }
601
602 void CleanACL(CStringArray& names)
603 {
604     register LONG code;
605     register struct Acl *ta;
606     struct ViceIoctl blob;
607     int changes;
608
609         ShowMessageBox(IDS_CLEANACL_MSG, MB_OK, IDS_CLEANACL_MSG);
610
611         HOURGLASS hourglass;
612
613         for (int i = 0; i < names.GetSize(); i++) {
614                 blob.out_size = MAXSIZE;
615                 blob.in_size = 0;
616                 blob.out = space;
617
618                 code = pioctl(PCCHAR(names[i]), VIOCGETAL, &blob, 1);
619                 if (code) {
620                         ShowMessageBox(IDS_CLEANACL_ERROR, MB_ICONEXCLAMATION, 0, names[i], GetAfsError(errno));
621                         continue;
622                 }
623                 
624                 ta = ParseAcl(space);
625                 if (ta->dfs) {
626                         ShowMessageBox(IDS_CLEANACL_NOT_SUPPORTED, MB_ICONEXCLAMATION, IDS_CLEANACL_NOT_SUPPORTED, names[i]);
627                         continue;
628                 }
629
630                 changes = CleanAcl(ta);
631                 if (!changes)
632                         continue;
633
634                 /* now set the acl */
635                 blob.in = AclToString(ta);
636                 blob.in_size = strlen((char *)blob.in) + 1;
637                 blob.out_size = 0;
638                 
639                 code = pioctl(PCCHAR(names[i]), VIOCSETAL, &blob, 1);
640                 if (code) {
641                         if (errno == EINVAL) {
642                                 ShowMessageBox(IDS_CLEANACL_INVALID_ARG, MB_ICONEXCLAMATION, IDS_CLEANACL_INVALID_ARG, names[i]);
643                                 continue;
644                         }
645                         else {
646                                 ShowMessageBox(IDS_CLEANACL_ERROR, MB_ICONEXCLAMATION, 0, names[i], GetAfsError(errno));
647                                 continue;
648                         }
649                 }
650         }
651 }
652
653 // Derived from fs.c's ListAclCmd
654 BOOL GetRights(const CString& strDir, CStringArray& strNormal, CStringArray& strNegative)
655 {
656     register LONG code;
657     register struct Acl *ta;
658     struct ViceIoctl blob;
659     struct AclEntry *te;
660     int idf = 0; //getidf(as, parm_listacl_id);
661
662         HOURGLASS hourglass;
663
664         blob.out_size = MAXSIZE;
665         blob.in_size = idf;
666         blob.in = blob.out = space;
667         
668         code = pioctl(PCCHAR(strDir), VIOCGETAL, &blob, 1);
669         if (code) {
670                 ShowMessageBox(IDS_GETRIGHTS_ERROR, MB_ICONEXCLAMATION, IDS_GETRIGHTS_ERROR, strDir, GetAfsError(errno));
671                 return FALSE;
672         }
673
674         ta = ParseAcl(space);
675         if (ta->dfs) {
676                 ShowMessageBox(IDS_DFSACL_ERROR, MB_ICONEXCLAMATION, IDS_DFSACL_ERROR);
677                 return FALSE;
678         }
679
680 //      if (ta->dfs)
681 //              printf("  Default cell = %s\n", ta->cell);
682
683         CString strRight;
684
685         if (ta->nplus > 0) {
686                 for (te = ta->pluslist; te; te = te->next) {
687                         strNormal.Add(te->name);
688                         strNormal.Add(GetRightsString(te->rights, ta->dfs));
689                 }
690         }
691
692         if (ta->nminus > 0) {
693                 for (te = ta->minuslist; te; te = te->next) {
694                         strNegative.Add(te->name);
695                         strNegative.Add(GetRightsString(te->rights, ta->dfs));
696                 }
697         }
698
699         return TRUE;
700 }
701
702 struct AclEntry *FindList(register struct AclEntry *pCurEntry, const char *entryName)
703 {
704     while (pCurEntry) {
705         if (!foldcmp(pCurEntry->name, PCCHAR(entryName)))
706                         return pCurEntry;
707                 pCurEntry = pCurEntry->next;
708     }
709     
710         return 0;
711 }
712
713 void ChangeList (struct Acl *pAcl, BYTE bNormalRights, const char *entryName, LONG nEntryRights)
714 {
715         ASSERT(pAcl);
716         ASSERT(entryName);
717     
718         struct AclEntry *pEntry;
719
720         HOURGLASS hourglass;
721
722     pEntry = (bNormalRights ? pAcl->pluslist : pAcl->minuslist);
723     pEntry = FindList(pEntry, entryName);
724
725         /* Found the item already in the list. */
726     if (pEntry) {
727         pEntry->rights = nEntryRights;
728         if (bNormalRights)
729             pAcl->nplus -= PruneList(&pAcl->pluslist, pAcl->dfs);
730         else
731             pAcl->nminus -= PruneList(&pAcl->minuslist, pAcl->dfs);
732         return;
733     }
734
735     /* Otherwise we make a new item and plug in the new data. */
736     pEntry = (struct AclEntry *) malloc(sizeof (struct AclEntry));
737     ASSERT(pEntry);
738         
739         strcpy(pEntry->name, entryName);
740     pEntry->rights = nEntryRights;
741     
742         if (bNormalRights) {
743         pEntry->next = pAcl->pluslist;
744         pAcl->pluslist = pEntry;
745         pAcl->nplus++;
746         if (nEntryRights == 0 || nEntryRights == -1)
747                         pAcl->nplus -= PruneList(&pAcl->pluslist, pAcl->dfs);
748     }
749     else {
750         pEntry->next = pAcl->minuslist;
751         pAcl->minuslist = pEntry;
752         pAcl->nminus++;
753         if (nEntryRights == 0)
754                         pAcl->nminus -= PruneList(&pAcl->minuslist, pAcl->dfs);
755     }
756 }
757
758 enum rtype {add, destroy, deny};
759
760 LONG Convert(const register char *arights, int dfs, enum rtype *rtypep)
761 {
762     register int i, len;
763     LONG mode;
764     register char tc;
765
766     *rtypep = add;      /* add rights, by default */
767
768         if (!strcmp(arights,"read")) 
769                 return PRSFS_READ | PRSFS_LOOKUP;
770         if (!strcmp(arights, "write")) 
771                 return PRSFS_READ | PRSFS_LOOKUP | PRSFS_INSERT | PRSFS_DELETE | PRSFS_WRITE | PRSFS_LOCK;
772         if (!strcmp(arights, "mail")) 
773                 return PRSFS_INSERT | PRSFS_LOCK | PRSFS_LOOKUP;
774         if (!strcmp(arights, "all")) 
775                 return PRSFS_READ | PRSFS_LOOKUP | PRSFS_INSERT | PRSFS_DELETE | PRSFS_WRITE | PRSFS_LOCK | PRSFS_ADMINISTER;
776     
777         if (!strcmp(arights, "none")) {
778                 *rtypep = destroy; /* Remove entire entry */
779                 return 0;
780     }
781
782     len = strlen(arights);
783     mode = 0;
784
785     for (i = 0; i < len; i++) {
786         tc = *arights++;
787                 if (tc == 'r') mode |= PRSFS_READ;
788                 else if (tc == 'l') mode |= PRSFS_LOOKUP;
789                 else if (tc == 'i') mode |= PRSFS_INSERT;
790                 else if (tc == 'd') mode |= PRSFS_DELETE;
791                 else if (tc == 'w') mode |= PRSFS_WRITE;
792                 else if (tc == 'k') mode |= PRSFS_LOCK;
793                 else if (tc == 'a') mode |= PRSFS_ADMINISTER;
794                 else {
795                         fprintf(stderr, "illegal rights character '%c'.\n", tc);
796                         exit(1);
797                 }
798     }
799     return mode;
800 }
801
802 BOOL SaveACL(const CString& strCellName, const CString& strDir, const CStringArray& normal, const CStringArray& negative)
803 {
804     register LONG code;
805     struct ViceIoctl blob;
806     struct Acl *pAcl;
807     LONG rights;
808         enum rtype rtype;
809
810         HOURGLASS hourglass;
811
812         // Create a new ACL
813         pAcl = EmptyAcl(strCellName);
814
815         // Set its normal rights
816         for (int i = 0; i < normal.GetSize(); i += 2) {
817                 rights = Convert(normal[i + 1], 0, &rtype);
818                 ChangeList(pAcl, TRUE, normal[i], rights);
819         }
820
821         // Set its negative rights
822         for (i = 0; i < negative.GetSize(); i += 2) {
823                 rights = Convert(negative[i + 1], 0, &rtype);
824                 ChangeList(pAcl, FALSE, negative[i], rights);
825         }
826
827         // Write the ACL
828         blob.in = AclToString(pAcl);
829         blob.out_size = 0;
830         blob.in_size = 1 + strlen((const char *)blob.in);
831         
832         code = pioctl(PCCHAR(strDir), VIOCSETAL, &blob, 1);
833         if (code) {
834                 if (errno == EINVAL)
835                         ShowMessageBox(IDS_SAVE_ACL_EINVAL_ERROR, MB_ICONEXCLAMATION, IDS_SAVE_ACL_EINVAL_ERROR, strDir);
836                 else
837                         ShowMessageBox(IDS_SAVE_ACL_ERROR, MB_ICONEXCLAMATION, IDS_SAVE_ACL_ERROR, strDir, GetAfsError(errno, strDir));
838         }
839
840         ZapAcl(pAcl);
841
842     return (code == 0);
843 }
844
845 BOOL CopyACL(const CString& strToDir, const CStringArray& normal, const CStringArray& negative, BOOL bClear)
846 {
847     register LONG code;
848     struct ViceIoctl blob;
849     struct Acl *pToAcl;
850     int idf = 0; // getidf(as, parm_copyacl_id);
851
852         HOURGLASS hourglass;
853
854         // Get ACL to copy to
855         blob.out_size = MAXSIZE;
856         blob.in_size = idf;
857         blob.in = blob.out = space;
858         
859         code = pioctl(PCCHAR(strToDir), VIOCGETAL, &blob, 1);
860         if (code) {
861                 ShowMessageBox(IDS_ACL_READ_ERROR, MB_ICONEXCLAMATION, IDS_ACL_READ_ERROR, strToDir, GetAfsError(errno, strToDir));
862                 return FALSE;
863         }
864         
865         if (bClear) 
866                 pToAcl = EmptyAcl(space);
867         else 
868                 pToAcl = ParseAcl(space);
869         
870         CleanAcl(pToAcl);
871         
872         if (pToAcl->dfs) {
873                 ShowMessageBox(IDS_NO_DFS_COPY_ACL, MB_ICONEXCLAMATION, IDS_NO_DFS_COPY_ACL, strToDir);
874                 ZapAcl(pToAcl);
875                 return FALSE;
876         }
877
878         enum rtype rtype;
879
880         // Set normal rights
881         for (int i = 0; i < normal.GetSize(); i += 2) {
882                 LONG rights = Convert(normal[i + 1], 0, &rtype);
883                 ChangeList(pToAcl, TRUE, normal[i], rights);
884         }
885
886         // Set negative rights
887         for (i = 0; i < negative.GetSize(); i += 2) {
888                 LONG rights = Convert(negative[i + 1], 0, &rtype);
889                 ChangeList(pToAcl, FALSE, normal[i], rights);
890         }
891
892         // Save modified ACL
893         blob.in = AclToString(pToAcl);
894         blob.out_size = 0;
895         blob.in_size = 1 + strlen((char *)blob.in);
896         
897         code = pioctl(PCCHAR(strToDir), VIOCSETAL, &blob, 1);
898         if (code) {
899                 ZapAcl(pToAcl);
900                 if (errno == EINVAL)
901                         ShowMessageBox(IDS_COPY_ACL_EINVAL_ERROR, MB_ICONEXCLAMATION, IDS_COPY_ACL_EINVAL_ERROR, strToDir);
902                 else 
903                         ShowMessageBox(IDS_COPY_ACL_ERROR, MB_ICONEXCLAMATION, IDS_COPY_ACL_ERROR, strToDir, GetAfsError(errno, strToDir));
904                 return FALSE;
905         }
906
907         ZapAcl(pToAcl);
908
909         ShowMessageBox(IDS_COPY_ACL_OK, MB_OK, IDS_COPY_ACL_OK);
910
911     return TRUE;
912 }
913
914 CString ParseMountPoint(const CString strFile, CString strMountPoint)
915 {
916         CString strType;
917         CString strVolume;
918         CString strCell;
919         CString strMountPointInfo;
920
921         if (strMountPoint[0] == '#')
922                 strType = "Regular";
923         else if (strMountPoint[0] == '%')
924                 strType = "Read/Write";
925
926         int nColon = strMountPoint.Find(':');
927         if (nColon >= 0) {
928                 strCell = strMountPoint.Mid(1, nColon - 1);
929                 strVolume = strMountPoint.Mid(nColon + 1);
930         } else
931                 strVolume = strMountPoint.Mid(1);
932
933         strMountPointInfo = strFile + "\t" + strVolume + "\t" + strCell + "\t" + strType;
934
935         return strMountPointInfo;
936 }
937
938 BOOL ListMount(CStringArray& files)
939 {
940     register LONG code;
941     struct ViceIoctl blob;
942     int error;
943     char orig_name[1024];                       /* Original name, may be modified */
944     char true_name[1024];                       /* ``True'' dirname (e.g., symlink target) */
945     char parent_dir[1024];                      /* Parent directory of true name */
946     register char *last_component;      /* Last component of true name */
947         CStringArray mountPoints;
948     
949         HOURGLASS hourglass;
950
951     error = 0;
952
953     for (int i = 0; i < files.GetSize(); i++) {
954                 strcpy(orig_name, files[i]);
955                 strcpy(true_name, orig_name);
956
957                 /*
958                  * Find rightmost slash, if any.
959                  */
960                 last_component = (char *)strrchr(true_name, '\\');
961                 if (last_component) {
962                         /*
963                          * Found it.  Designate everything before it as the parent directory,
964                          * everything after it as the final component.
965                          */
966                         strncpy(parent_dir, true_name, last_component - true_name + 1);
967                         parent_dir[last_component - true_name + 1] = 0;
968                         last_component++;   /* Skip the slash */
969                 }
970                 else {
971                         /*
972                          * No slash appears in the given file name.  Set parent_dir to the current
973                          * directory, and the last component as the given name.
974                          */
975                         fs_ExtractDriveLetter(true_name, parent_dir);
976                         strcat(parent_dir, ".");
977                         last_component = true_name;
978                         fs_StripDriveLetter(true_name, true_name, sizeof(true_name));
979                 }
980
981                 blob.in = last_component;
982                 blob.in_size = strlen(last_component) + 1;
983                 blob.out_size = MAXSIZE;
984                 blob.out = space;
985                 memset(space, 0, MAXSIZE);
986
987                 code = pioctl(parent_dir, VIOC_AFS_STAT_MT_PT, &blob, 1);
988                 if (code == 0) {
989                         int nPos = strlen(space) - 1;
990                         if (space[nPos] == '.')
991                                 space[nPos] = 0;
992                         mountPoints.Add(ParseMountPoint(StripPath(files[i]), space));
993                 } else {
994                         error = 1;
995                         if (errno == EINVAL)
996                                 mountPoints.Add(GetMessageString(IDS_NOT_MOUNT_POINT_ERROR, StripPath(files[i])));
997                         else
998                                 mountPoints.Add(GetMessageString(IDS_LIST_MOUNT_POINT_ERROR, GetAfsError(errno, StripPath(files[i]))));
999                 }
1000         }
1001
1002         CMountPointsDlg dlg;
1003         dlg.SetMountPoints(mountPoints);
1004         dlg.DoModal();
1005
1006         return !error;
1007 }
1008
1009 static BOOL InAFS(register char *apath)
1010 {
1011     struct ViceIoctl blob;
1012     register LONG code;
1013
1014         HOURGLASS hourglass;
1015
1016     blob.in_size = 0;
1017     blob.out_size = MAXSIZE;
1018     blob.out = space;
1019
1020     code = pioctl(apath, VIOC_FILE_CELL_NAME, &blob, 1);
1021     if (code) {
1022                 if ((errno == EINVAL) || (errno == ENOENT))
1023                         return FALSE;
1024     }
1025     
1026         return TRUE;
1027 }
1028
1029 /* return a static pointer to a buffer */
1030 static char *Parent(char *apath)
1031 {
1032     register char *tp;
1033
1034     strcpy(tspace, apath);
1035     tp = strrchr(tspace, '\\');
1036     if (tp) {
1037                 *(tp+1) = 0;    /* lv trailing slash so Parent("k:\foo") is "k:\" not "k:" */
1038     }
1039     else {
1040                 fs_ExtractDriveLetter(apath, tspace);
1041         strcat(tspace, ".");
1042     }
1043     
1044         return tspace;
1045 }
1046
1047 BOOL MakeMount(const CString& strDir, const CString& strVolName, const CString& strCellName, BOOL bRW)
1048 {
1049     register LONG code;
1050     register char *cellName;
1051     char localCellName[1000];
1052     struct ViceIoctl blob;
1053
1054         HOURGLASS hourglass;
1055
1056         ASSERT(strVolName.GetLength() < 64);
1057
1058 /*
1059
1060 defect #3069
1061
1062     if (as->parms[5].items && !as->parms[2].items) {
1063         fprintf(stderr,"fs: must provide cell when creating cellular mount point.\n");
1064         return FALSE;
1065     }
1066 */
1067
1068     if (strCellName.GetLength() > 0)    /* cell name specified */
1069                 cellName = PCCHAR(strCellName);
1070     else
1071                 cellName = (char *) 0;
1072
1073     if (!InAFS(Parent(PCCHAR(strDir)))) {
1074                 ShowMessageBox(IDS_MAKE_MP_NOT_AFS_ERROR, MB_ICONEXCLAMATION, IDS_MAKE_MP_NOT_AFS_ERROR);
1075                 return FALSE;
1076     }
1077
1078     if (cellName) {
1079                 blob.in_size = 0;
1080                 blob.out_size = MAXSIZE;
1081                 blob.out = space;
1082                 code = pioctl(Parent(PCCHAR(strDir)), VIOC_FILE_CELL_NAME, &blob, 1);
1083     }
1084
1085     strcpy(localCellName, (cellName? cellName : space));
1086
1087     if (bRW)    /* if -rw specified */
1088                 strcpy(space, "%");
1089     else
1090                 strcpy(space, "#");
1091
1092     /* If cellular mount point, prepend cell prefix */
1093         if (cellName) {
1094                 strcat(space, localCellName);
1095                 strcat(space, ":");
1096     }
1097
1098     strcat(space, strVolName);  /* append volume name */
1099     strcat(space, ".");         /* stupid convention; these end with a period */
1100
1101     /* create symlink with a special pioctl for Windows NT, since it doesn't
1102      * have a symlink system call.
1103      */
1104     blob.out_size = 0;
1105     blob.in_size = 1 + strlen(space);
1106     blob.in = space;
1107     blob.out = NULL;
1108     code = pioctl(PCCHAR(strDir), VIOC_AFS_CREATE_MT_PT, &blob, 0);
1109
1110     if (code) {
1111                 ShowMessageBox(IDS_MOUNT_POINT_ERROR, MB_ICONEXCLAMATION, IDS_MOUNT_POINT_ERROR, GetAfsError(errno, strDir));
1112                 return FALSE;
1113     }
1114     
1115         return TRUE;
1116 }
1117
1118 /*
1119 */
1120 long fs_ExtractDriveLetter(const char *inPathp, char *outPathp)
1121 {
1122         if (inPathp[0] != 0 && inPathp[1] == ':') {
1123                 /* there is a drive letter */
1124                 *outPathp++ = *inPathp++;
1125                 *outPathp++ = *inPathp++;
1126                 *outPathp++ = 0;
1127         }
1128         else *outPathp = 0;
1129
1130         return 0;
1131 }
1132
1133 /* strip the drive letter from a component */
1134 long fs_StripDriveLetter(const char *inPathp, char *outPathp, long outSize)
1135 {
1136         char tempBuffer[1000];
1137         strcpy(tempBuffer, inPathp);
1138         if (tempBuffer[0] != 0 && tempBuffer[1] == ':') {
1139                 /* drive letter present */
1140                 strcpy(outPathp, tempBuffer+2);
1141         }
1142         else {
1143                 /* no drive letter present */
1144                 strcpy(outPathp, tempBuffer);
1145         }
1146         return 0;
1147 }
1148
1149
1150 BOOL RemoveSymlink(const char * linkName)
1151 {
1152         BOOL error = FALSE;
1153     INT code=0;
1154     struct ViceIoctl blob;
1155     char tbuffer[1024];
1156     char lsbuffer[1024];
1157         char tpbuffer[1024];
1158     char *tp;
1159     
1160         tp = (char *) strrchr(linkName, '\\');
1161         if (!tp)
1162             tp = (char *) strrchr(linkName, '/');
1163         if (tp) {
1164             strncpy(tbuffer, linkName, code=tp-linkName+1);  /* the dir name */
1165             tbuffer[code] = 0;
1166             tp++;   /* skip the slash */
1167         }
1168         else {
1169             fs_ExtractDriveLetter(linkName, tbuffer);
1170             strcat(tbuffer, ".");
1171          fs_StripDriveLetter(tp, tpbuffer, 0);
1172                  tp=tpbuffer;
1173         }
1174         blob.in = tp;
1175         blob.in_size = strlen(tp)+1;
1176         blob.out = lsbuffer;
1177         blob.out_size = sizeof(lsbuffer);
1178         code = pioctl(tbuffer, VIOC_LISTSYMLINK, &blob, 0);
1179         if (code)
1180                 return FALSE;
1181         blob.out_size = 0;
1182         blob.in = tp;
1183         blob.in_size = strlen(tp)+1;
1184         return (pioctl(tbuffer, VIOC_DELSYMLINK, &blob, 0)==0);
1185 }
1186
1187 BOOL IsSymlink(const char * true_name)
1188 {
1189     char parent_dir[MAXSIZE];           /*Parent directory of true name*/
1190         char strip_name[MAXSIZE];
1191     struct ViceIoctl blob;
1192         char *last_component;
1193     int code;
1194         last_component = (char *) strrchr(true_name, '\\');
1195         if (!last_component)
1196             last_component = (char *) strrchr(true_name, '/');
1197         if (last_component) {
1198             /*
1199              * Found it.  Designate everything before it as the parent directory,
1200              * everything after it as the final component.
1201              */
1202             strncpy(parent_dir, true_name, last_component - true_name + 1);
1203             parent_dir[last_component - true_name + 1] = 0;
1204             last_component++;   /*Skip the slash*/
1205         }
1206         else {
1207             /*
1208              * No slash appears in the given file name.  Set parent_dir to the current
1209              * directory, and the last component as the given name.
1210              */
1211             fs_ExtractDriveLetter(true_name, parent_dir);
1212             strcat(parent_dir, ".");
1213             last_component = strip_name;
1214         fs_StripDriveLetter(true_name, strip_name, sizeof(strip_name));
1215         }
1216
1217         blob.in = last_component;
1218         blob.in_size = strlen(last_component)+1;
1219         blob.out_size = MAXSIZE;
1220         blob.out = space;
1221         memset(space, 0, MAXSIZE);
1222         code = pioctl(parent_dir, VIOC_LISTSYMLINK, &blob, 1);
1223         return (code==0);
1224 }
1225
1226
1227 /*
1228  * Delete AFS mount points.  Variables are used as follows:
1229  *       tbuffer: Set to point to the null-terminated directory name of the mount point
1230  *          (or ``.'' if none is provided)
1231  *      tp: Set to point to the actual name of the mount point to nuke.
1232  */
1233 BOOL RemoveMount(CStringArray& files)
1234 {
1235     register LONG code = 0;
1236     struct ViceIoctl blob;
1237     char tbuffer[1024];
1238     char lsbuffer[1024];
1239     register char *tp;
1240         BOOL error = FALSE;
1241         CStringArray results;
1242         CString str;
1243         CString str2;
1244
1245         HOURGLASS hourglass;
1246
1247     for (int i = 0; i < files.GetSize(); i++) {
1248                 char szCurItem[1024];
1249                 strcpy(szCurItem, files[i]);
1250         
1251                 tp = (char *)strrchr(szCurItem, '\\');
1252                 if (tp) {
1253                         strncpy(tbuffer, szCurItem, code = tp - szCurItem + 1);  /* the dir name */
1254                         tbuffer[code] = 0;
1255                         tp++;   /* skip the slash */
1256                 } else {
1257                         fs_ExtractDriveLetter(szCurItem, tbuffer);
1258                         strcat(tbuffer, ".");
1259                         tp = szCurItem;
1260                         fs_StripDriveLetter(tp, tp, 0);
1261                 }
1262
1263                 blob.in = tp;
1264                 blob.in_size = strlen(tp)+1;
1265                 blob.out = lsbuffer;
1266                 blob.out_size = sizeof(lsbuffer);
1267
1268                 code = pioctl(tbuffer, VIOC_AFS_STAT_MT_PT, &blob, 0);
1269                 if (code) {
1270                         error = TRUE;
1271                         if (errno == EINVAL)
1272                                 results.Add(GetMessageString(IDS_NOT_MOUNT_POINT_ERROR, StripPath(files[i])));
1273                         else
1274                                 results.Add(GetMessageString(IDS_ERROR, GetAfsError(errno, StripPath(files[i]))));
1275                         continue;       // don't bother trying
1276                 }
1277                 
1278                 blob.out_size = 0;
1279                 blob.in = tp;
1280                 blob.in_size = strlen(tp)+1;
1281                 
1282                 code = pioctl(tbuffer, VIOC_AFS_DELETE_MT_PT, &blob, 0);
1283                 if (code) {
1284                         error = TRUE;
1285                         results.Add(GetMessageString(IDS_ERROR, GetAfsError(errno, StripPath(files[i]))));
1286                 } else
1287                         results.Add(GetMessageString(IDS_DELETED));
1288     }
1289
1290         LoadString (str, IDS_REMOVE_MP);
1291         LoadString (str2, IDS_REMOVE_MP_COLUMN);
1292         CResultsDlg dlg(REMOVE_MOUNT_POINTS_HELP_ID);
1293         dlg.SetContents(str, str2, StripPath(files), results);
1294         dlg.DoModal();
1295
1296     return !error;
1297 }
1298
1299 BOOL GetVolumeInfo(CString strFile, CVolInfo& volInfo)
1300 {
1301     register LONG code;
1302     struct ViceIoctl blob;
1303     struct VolumeStatus *status;
1304     char *name;
1305
1306         HOURGLASS hourglass;
1307
1308         volInfo.m_strFilePath = strFile;
1309     volInfo.m_strFileName = StripPath(strFile);
1310
1311 /*
1312         volInfo.m_strName = "VolumeName";
1313         volInfo.m_nID = 10;
1314         volInfo.m_nQuota = 20 * 1024 * 1024;
1315         volInfo.m_nNewQuota = volInfo.m_nQuota;
1316         volInfo.m_nUsed = volInfo.m_nQuota / 2;
1317         volInfo.m_nPartSize = 50 * 1024 * 1024;
1318         volInfo.m_nPartFree = 30 * 1024 * 1024;
1319         volInfo.m_nDup = -1;
1320         return TRUE;
1321 */
1322
1323         blob.out_size = MAXSIZE;
1324         blob.in_size = 0;
1325         blob.out = space;
1326
1327         code = pioctl(PCCHAR(strFile), VIOCGETVOLSTAT, &blob, 1);
1328         if (code) {
1329                 volInfo.m_strErrorMsg = GetAfsError(errno, strFile);
1330                 return FALSE;
1331         }
1332
1333         status = (VolumeStatus *)space;
1334         name = (char *)status + sizeof(*status);
1335
1336         volInfo.m_strName = name;
1337         volInfo.m_nID = status->Vid;
1338         volInfo.m_nQuota = status->MaxQuota;
1339         volInfo.m_nNewQuota = status->MaxQuota;
1340         volInfo.m_nUsed = status->BlocksInUse;
1341         volInfo.m_nPartSize = status->PartMaxBlocks;
1342         volInfo.m_nPartFree = status->PartBlocksAvail;
1343         volInfo.m_nDup = -1;
1344
1345     return TRUE;
1346 }
1347         
1348 BOOL SetVolInfo(CVolInfo& volInfo)
1349 {
1350     register LONG code;
1351     struct ViceIoctl blob;
1352     struct VolumeStatus *status;
1353     char *input;
1354
1355         HOURGLASS hourglass;
1356
1357         blob.out_size = MAXSIZE;
1358         blob.in_size = sizeof(*status) + 3;     /* for the three terminating nulls */
1359         blob.out = space;
1360         blob.in = space;
1361         
1362         status = (VolumeStatus *)space;
1363         status->MinQuota = -1;
1364         status->MaxQuota = volInfo.m_nNewQuota;
1365         
1366         input = (char *)status + sizeof(*status);
1367         *(input++) = '\0';      /* never set name: this call doesn't change vldb */
1368         *(input++) = '\0';      // No offmsg
1369         *(input++) = '\0';      // No motd
1370
1371 #ifdef LOGGING_ON
1372         FILE *fp = OpenFile(szLogFileName, "a");
1373         if (fp) {
1374                 fprintf(fp, "\nSetVolInfo() pioctl parms:\n");
1375                 fprintf(fp, "\tpathp = %s\n\topcode = VIOCSETVOLSTAT (%d)\n\tblobp = %ld\n", PCCHAR(volInfo.m_strFilePath), VIOCSETVOLSTAT, &blob);
1376                 fprintf(fp, "\t\tblobp.in = %ld (VolumeStatus *status)\n\t\tblobp.in_size = %ld\n\t\tblobp.out = %ld ((VolumeStatus *status))\n\t\tblobp.out_size = %ld\n", blob.in, blob.in_size, blob.out, blob.out_size);
1377                 fprintf(fp, "\t\t\tstatus->MinQuota = %ld\n", status->MinQuota);
1378                 fprintf(fp, "\t\t\tstatus->MaxQuota = %ld\n", status->MaxQuota);
1379                 fprintf(fp, "\t\t\tOther status fields aren't set\n");
1380                 fprintf(fp, "\t\t\t3 nulls follow the VolumeStatus structure.\n");
1381                 fprintf(fp, "\tfollow = 1\n");
1382                 fclose(fp);             
1383         }
1384 #endif
1385
1386         code = pioctl(PCCHAR(volInfo.m_strFilePath), VIOCSETVOLSTAT, &blob, 1);
1387         if (code) {
1388                 ShowMessageBox(IDS_SET_QUOTA_ERROR, MB_ICONEXCLAMATION, IDS_SET_QUOTA_ERROR, GetAfsError(errno, volInfo.m_strName));
1389                 return FALSE;
1390         }
1391
1392     return TRUE;
1393 }
1394
1395 int GetCellName(char *cellNamep, struct afsconf_cell *infop)
1396 {
1397         strcpy(infop->name, cellNamep);
1398     return 0;
1399 }
1400
1401 BOOL CheckServers(const CString& strCellName, WHICH_CELLS nCellsToCheck, BOOL bFast)
1402 {
1403     register LONG code;
1404     struct ViceIoctl blob;
1405     register LONG j;
1406     LONG temp = 0;
1407     struct afsconf_cell info;
1408     struct chservinfo checkserv;
1409
1410         HOURGLASS hourglass;
1411
1412     memset(&checkserv, 0, sizeof(struct chservinfo));
1413     blob.in_size = sizeof(struct chservinfo);
1414     blob.in = (caddr_t)&checkserv;
1415
1416     blob.out_size = MAXSIZE;
1417     blob.out = space;
1418     memset(space, 0, sizeof(LONG));     /* so we assure zero when nothing is copied back */
1419
1420     /* prepare flags for checkservers command */
1421         if (nCellsToCheck == LOCAL_CELL)
1422                 temp = 2;       /* default to checking local cell only */
1423     else if (nCellsToCheck == ALL_CELLS)
1424                 temp &= ~2;     /* turn off local cell check */
1425
1426         if (bFast)
1427                 temp |= 1;      /* set fast flag */
1428     
1429     checkserv.magic = 0x12345678;       /* XXX */
1430     checkserv.tflags = temp;
1431
1432     /* now copy in optional cell name, if specified */
1433     if (nCellsToCheck == SPECIFIC_CELL) {
1434                 GetCellName(PCCHAR(strCellName), &info);
1435                 strcpy(checkserv.tbuffer,info.name);
1436                 checkserv.tsize = strlen(info.name) + 1;
1437     } else {
1438                 strcpy(checkserv.tbuffer, "\0");
1439                 checkserv.tsize = 0;
1440         }
1441
1442         checkserv.tinterval = -1;       /* don't change current interval */
1443
1444     code = pioctl(0, VIOCCKSERV, &blob, 1);
1445     if (code) {
1446                 ShowMessageBox(IDS_CHECK_SERVERS_ERROR, MB_ICONEXCLAMATION, IDS_CHECK_SERVERS_ERROR, GetAfsError(errno, CString()));
1447                 return FALSE;
1448     }
1449
1450     memcpy(&temp, space, sizeof(LONG));
1451
1452         if (temp == 0) {
1453                 ShowMessageBox(IDS_ALL_SERVERS_RUNNING, MB_OK, IDS_ALL_SERVERS_RUNNING);
1454                 return TRUE;
1455         }
1456
1457         CStringArray servers;
1458         for (j = 0; j < MAXHOSTS; j++) {
1459                 memcpy(&temp, space + j * sizeof(LONG), sizeof(LONG));
1460                 if (temp == 0)
1461                         break;
1462                 
1463                 char *name = hostutil_GetNameByINet(temp);
1464                 servers.Add(name);
1465         }
1466
1467         CDownServersDlg dlg;
1468         dlg.SetServerNames(servers);
1469         dlg.DoModal();
1470
1471     return TRUE;
1472 }
1473
1474 BOOL GetTokenInfo(CStringArray& tokenInfo)
1475 {
1476         int cellNum;
1477         int rc;
1478         int current_time;
1479         long tokenExpireTime;
1480         char *expireString;
1481         char userName[100];
1482 //      char s[100];
1483         struct ktc_principal serviceName, clientName;
1484         struct ktc_token token;
1485         
1486         CString strTokenInfo;
1487         CString strUserName;
1488         CString strCellName;
1489         CString strExpir;
1490
1491 //      tokenInfo.Add("");
1492 //      return TRUE;
1493
1494
1495         HOURGLASS hourglass;
1496
1497 //      printf("\nTokens held by the Cache Manager:\n\n");
1498         cellNum = 0;
1499         current_time = time(0);
1500
1501         while (1) {
1502                 rc = ktc_ListTokens(cellNum, &cellNum, &serviceName);
1503                 if (rc == KTC_NOENT) {
1504                         /* end of list */
1505 //                      printf("   --End of list --\n");
1506                         break;
1507                 }
1508                 else if (rc == KTC_NOCM) {
1509                         ShowMessageBox(IDS_GET_TOKENS_NO_AFS_SERVICE);
1510 //                      printf("AFS service may not have started\n");
1511                         break;
1512                 }
1513                 else if (rc) {
1514                         ShowMessageBox(IDS_GET_TOKENS_UNEXPECTED_ERROR, MB_ICONEXCLAMATION, IDS_GET_TOKENS_UNEXPECTED_ERROR, rc);
1515                         return FALSE;
1516 //                      printf("Unexpected error, code %d\n", rc);
1517 //                      exit(1);
1518                 }
1519                 else {
1520                         rc = ktc_GetToken(&serviceName, &token, sizeof(token), &clientName);
1521                         if (rc) {
1522                                 ShowMessageBox(IDS_GET_TOKENS_UNEXPECTED_ERROR2, MB_ICONEXCLAMATION, IDS_GET_TOKENS_UNEXPECTED_ERROR2, 
1523                                         serviceName.name, serviceName.instance, serviceName.cell, rc);
1524                                 continue;
1525                         }
1526
1527                         tokenExpireTime = token.endTime;
1528                         
1529                         strcpy(userName, clientName.name);
1530                         if (clientName.instance[0] != 0) {
1531                                 strcat(userName, ".");
1532                                 strcat(userName, clientName.instance);
1533                         }
1534
1535                         BOOL bShowName = FALSE;
1536
1537                         if (userName[0] == '\0')
1538                                 ; //printf("Tokens");
1539 // AFS ID is not returned at this time.
1540 //                      else if (strncmp(userName, "AFS ID", 6) == 0)
1541 //                              printf("User's (%s) tokens", userName);
1542 //                              sscanf(userName, "(AFS ID %s)", szAfsID);
1543                         else if (strncmp(userName, "Unix UID", 8) == 0)
1544                                 ; //printf("Tokens");
1545                         else
1546                                 strUserName = userName;
1547 //                              printf("User %s's tokens", userName);
1548                         
1549 //                      printf(" for %s%s%s@%s ", serviceName.name, serviceName.instance[0] ? "." : "", serviceName.instance, serviceName.cell);
1550                         strCellName = serviceName.cell;
1551                         
1552                         if (tokenExpireTime <= current_time)
1553                                 strExpir = "[>> Expired <<]";
1554 //                              printf("[>> Expired <<]\n");
1555                         else {
1556                                 expireString = ctime(&tokenExpireTime);
1557                                 expireString += 4;       /* Skip day of week */
1558                                 expireString[12] = '\0'; /* Omit secs & year */
1559 //                              printf("[Expires %s]\n", expireString);
1560                                 strExpir.Format("%s", expireString);
1561                         }
1562                 
1563                         strTokenInfo = strUserName + "\t" + strCellName + "\t" + strExpir + "\t" + strCellName;
1564                         tokenInfo.Add(strTokenInfo);
1565                 }
1566         }
1567
1568 //      printf("Press <Enter> or <Return> when finished: ");
1569 //      gets(s);
1570         return TRUE;
1571 }
1572
1573 BOOL IsPathInAfs(const CHAR *strPath)
1574 {
1575     struct ViceIoctl blob;
1576     int code;
1577
1578     blob.in_size = 0;
1579     blob.out_size = MAXSIZE;
1580     blob.out = space;
1581
1582     code = pioctl(PCCHAR(strPath), VIOC_FILE_CELL_NAME, &blob, 1);
1583     if (code) {
1584         if ((errno == EINVAL) || (errno == ENOENT)) return FALSE;
1585     }
1586     return TRUE;
1587 }
1588