fix spelling in comments
[openafs.git] / src / WINNT / afsd / fs.c
1 /*
2  * Copyright 2000, International Business Machines Corporation and others.
3  * All Rights Reserved.
4  *
5  * This software has been released under the terms of the IBM Public
6  * License.  For details, see the LICENSE file in the top-level source
7  * directory or online at http://www.openafs.org/dl/license10.html
8  */
9
10 #include <afsconfig.h>
11 #include <afs/param.h>
12 #include <roken.h>
13
14 #include <afs/opr.h>
15 #include <afs/stds.h>
16 #include <afs/com_err.h>
17 #include <afs/cmd.h>
18
19 #include <windows.h>
20 #include <stdlib.h>
21 #include <sys/stat.h>
22 #include <malloc.h>
23 #include <string.h>
24 #include <strsafe.h>
25 #include <stdio.h>
26 #include <time.h>
27 #include <winsock2.h>
28 #include <errno.h>
29 #include <afs/opr_assert.h>
30 #include <rx/rx_globals.h>
31
32 #include <osi.h>
33 #include <afsint.h>
34 #include <afs/afs_consts.h>
35 #include <afs/cellconfig.h>
36 #include <afs/ptserver.h>
37 #include <afs/ptuser.h>
38 #include <afs/volser.h>
39 #include <WINNT\afsreg.h>
40
41 #include "fs.h"
42 #include "fs_utils.h"
43 #include "fs_acl.h"
44 #include "cmd.h"
45 #include "afsd.h"
46 #include "cm_ioctl.h"
47 #include "parsemode.h"
48
49 #define MAXINSIZE 1300    /* pioctl complains if data is larger than this */
50 #define VMSGSIZE 128      /* size of msg buf in volume hdr */
51 #define CELL_MAXNAMELEN         256
52 #define MAXHOSTCHARS            64
53
54 static char pn[] = "fs";
55
56 static char space[AFS_PIOCTL_MAXSIZE];
57
58 static struct ubik_client *uclient;
59
60 /* some forward references */
61 static int SetVolCmd(struct cmd_syndesc *as, void *arock);
62
63 static int GetCellName(char *cellNamep, struct afsconf_cell *infop);
64 static afs_int32 GetCell(char *fname, char *cellname, size_t cell_len);
65
66 static int VLDBInit(int noAuthFlag, struct afsconf_cell *infop);
67 static int GetClientAddrsCmd(struct cmd_syndesc *asp, void *arock);
68 static int SetClientAddrsCmd(struct cmd_syndesc *asp, void *arock);
69 static int FlushMountCmd(struct cmd_syndesc *asp, void *arock);
70 static int RxStatProcCmd(struct cmd_syndesc *asp, void *arock);
71 static int RxStatPeerCmd(struct cmd_syndesc *asp, void *arock);
72
73 static int MemDumpCmd(struct cmd_syndesc *asp, void *arock);
74 static int CSCPolicyCmd(struct cmd_syndesc *asp, void *arock);
75 static int MiniDumpCmd(struct cmd_syndesc *asp, void *arock);
76
77 static int rxInitDone = 0;
78
79 /*
80  * Offset of -id switch in command structure for various commands.
81  * The -if switch is the next switch always.
82  */
83 static int parm_setacl_id, parm_copyacl_id, parm_listacl_id;
84
85 /*
86  * Determine whether either the -id or -if switches are present, and
87  * return 0, 1 or 2, as appropriate. Abort if both switches are present.
88  */
89 /* int id; Offset of -id switch; -if is next switch */
90 static int
91 getidf(struct cmd_syndesc *as, int id)
92 {
93     int idf = 0;
94
95     if (as->parms[id].items) {
96         idf |= 1;
97     }
98     if (as->parms[id + 1].items) {
99         idf |= 2;
100     }
101     if (idf == 3) {
102         fprintf(stderr,
103              "%s: you may specify either -id or -if, but not both switches\n",
104              pn);
105         exit(1);
106     }
107     return idf;
108 }
109
110 static int
111 PRights(afs_int32 arights, int dfs)
112 {
113     if (!dfs) {
114         if (arights & PRSFS_READ)
115             printf("r");
116         if (arights & PRSFS_LOOKUP)
117             printf("l");
118         if (arights & PRSFS_INSERT)
119             printf("i");
120         if (arights & PRSFS_DELETE)
121             printf("d");
122         if (arights & PRSFS_WRITE)
123             printf("w");
124         if (arights & PRSFS_LOCK)
125             printf("k");
126         if (arights & PRSFS_ADMINISTER)
127             printf("a");
128         if (arights & PRSFS_USR0)
129             printf("A");
130         if (arights & PRSFS_USR1)
131             printf("B");
132         if (arights & PRSFS_USR2)
133             printf("C");
134         if (arights & PRSFS_USR3)
135             printf("D");
136         if (arights & PRSFS_USR4)
137             printf("E");
138         if (arights & PRSFS_USR5)
139             printf("F");
140         if (arights & PRSFS_USR6)
141             printf("G");
142         if (arights & PRSFS_USR7)
143             printf("H");
144     } else {
145         if (arights & DFS_READ)
146             printf("r");
147         else
148             printf("-");
149         if (arights & DFS_WRITE)
150             printf("w");
151         else
152             printf("-");
153         if (arights & DFS_EXECUTE)
154             printf("x");
155         else
156             printf("-");
157         if (arights & DFS_CONTROL)
158             printf("c");
159         else
160             printf("-");
161         if (arights & DFS_INSERT)
162             printf("i");
163         else
164             printf("-");
165         if (arights & DFS_DELETE)
166             printf("d");
167         else
168             printf("-");
169         if (arights & (DFS_USRALL))
170             printf("+");
171         if (arights & DFS_USR0)
172             printf("A");
173         if (arights & DFS_USR1)
174             printf("B");
175         if (arights & DFS_USR2)
176             printf("C");
177         if (arights & DFS_USR3)
178             printf("D");
179         if (arights & DFS_USR4)
180             printf("E");
181         if (arights & DFS_USR5)
182             printf("F");
183         if (arights & DFS_USR6)
184             printf("G");
185         if (arights & DFS_USR7)
186             printf("H");
187     }
188     return 0;
189 }
190
191 static afs_int32
192 Convert(char *arights, int dfs, enum rtype *rtypep)
193 {
194     afs_int32 mode;
195     char tc;
196     char *tcp;
197
198     *rtypep = add;      /* add rights, by default */
199
200                                 /* analyze last character of string   */
201     tcp = arights + strlen(arights);
202     if ( tcp-- > arights ) {    /* assure non-empty string            */
203         if ( *tcp == '+' )
204             *rtypep = reladd;   /* '+' indicates more rights          */
205         else if ( *tcp == '-' )
206             *rtypep = reldel;   /* '-' indicates less rights          */
207         else if ( *tcp == '=' )
208             *rtypep = add;      /* '=' also allows old behaviour      */
209         else
210             tcp++;              /* back to original null byte         */
211         *tcp = '\0';            /* do not disturb old strcmp-s        */
212     }
213
214     if (dfs) {
215         if (!strcmp(arights, "null")) {
216             *rtypep = deny;
217             return 0;
218         }
219         if (!strcmp(arights,"read"))
220             return DFS_READ | DFS_EXECUTE;
221         if (!strcmp(arights, "write"))
222             return DFS_READ | DFS_EXECUTE | DFS_INSERT | DFS_DELETE |
223                 DFS_WRITE;
224         if (!strcmp(arights, "all"))
225             return DFS_READ | DFS_EXECUTE | DFS_INSERT | DFS_DELETE |
226                 DFS_WRITE | DFS_CONTROL;
227     } else {
228         if (!strcmp(arights,"read"))
229             return PRSFS_READ | PRSFS_LOOKUP;
230         if (!strcmp(arights, "write"))
231             return PRSFS_READ | PRSFS_LOOKUP | PRSFS_INSERT | PRSFS_DELETE |
232                 PRSFS_WRITE | PRSFS_LOCK;
233         if (!strcmp(arights, "mail"))
234             return PRSFS_INSERT | PRSFS_LOCK | PRSFS_LOOKUP;
235         if (!strcmp(arights, "all"))
236             return PRSFS_READ | PRSFS_LOOKUP | PRSFS_INSERT | PRSFS_DELETE |
237                 PRSFS_WRITE | PRSFS_LOCK | PRSFS_ADMINISTER;
238     }
239     if (!strcmp(arights, "none")) {
240         *rtypep = destroy; /* Remove entire entry */
241         return 0;
242     }
243     mode = 0;
244     tcp = arights;
245     while ((tc = *tcp++)) {
246         if (dfs) {
247             if (tc == '-')
248                 continue;
249             else if (tc == 'r')
250                 mode |= DFS_READ;
251             else if (tc == 'w')
252                 mode |= DFS_WRITE;
253             else if (tc == 'x')
254                 mode |= DFS_EXECUTE;
255             else if (tc == 'c')
256                 mode |= DFS_CONTROL;
257             else if (tc == 'i')
258                 mode |= DFS_INSERT;
259             else if (tc == 'd')
260                 mode |= DFS_DELETE;
261             else if (tc == 'A')
262                 mode |= DFS_USR0;
263             else if (tc == 'B')
264                 mode |= DFS_USR1;
265             else if (tc == 'C')
266                 mode |= DFS_USR2;
267             else if (tc == 'D')
268                 mode |= DFS_USR3;
269             else if (tc == 'E')
270                 mode |= DFS_USR4;
271             else if (tc == 'F')
272                 mode |= DFS_USR5;
273             else if (tc == 'G')
274                 mode |= DFS_USR6;
275             else if (tc == 'H')
276                 mode |= DFS_USR7;
277             else {
278                 fprintf(stderr, "%s: illegal DFS rights character '%c'.\n",
279                          pn, tc);
280                 exit(1);
281             }
282         } else {
283             if (tc == 'r')
284                 mode |= PRSFS_READ;
285             else if (tc == 'l')
286                 mode |= PRSFS_LOOKUP;
287             else if (tc == 'i')
288                 mode |= PRSFS_INSERT;
289             else if (tc == 'd')
290                 mode |= PRSFS_DELETE;
291             else if (tc == 'w')
292                 mode |= PRSFS_WRITE;
293             else if (tc == 'k')
294                 mode |= PRSFS_LOCK;
295             else if (tc == 'a')
296                 mode |= PRSFS_ADMINISTER;
297             else if (tc == 'A')
298                 mode |= PRSFS_USR0;
299             else if (tc == 'B')
300                 mode |= PRSFS_USR1;
301             else if (tc == 'C')
302                 mode |= PRSFS_USR2;
303             else if (tc == 'D')
304                 mode |= PRSFS_USR3;
305             else if (tc == 'E')
306                 mode |= PRSFS_USR4;
307             else if (tc == 'F')
308                 mode |= PRSFS_USR5;
309             else if (tc == 'G')
310                 mode |= PRSFS_USR6;
311             else if (tc == 'H')
312                 mode |= PRSFS_USR7;
313             else {
314                 fprintf(stderr, "%s: illegal rights character '%c'.\n", pn,
315                          tc);
316                 exit(1);
317             }
318         }
319     }
320     return mode;
321 }
322
323 /* if no parm specified in a particular slot, set parm to be "." instead */
324 static void
325 SetDotDefault(struct cmd_item **aitemp)
326 {
327     struct cmd_item *ti;
328     int len_data = 2;
329
330     if (*aitemp)
331         return;                 /* already has value */
332     /* otherwise, allocate an item representing "." */
333     ti = (struct cmd_item *) malloc(sizeof(struct cmd_item));
334     assert(ti);
335     ti->next = (struct cmd_item *) 0;
336     ti->data = (char *) malloc(len_data);
337     assert(ti->data);
338     if( FAILED(StringCbCopy(ti->data, len_data, "."))) {
339         fprintf (stderr, "data - not enough space");
340         exit(1);
341     }
342     *aitemp = ti;
343 }
344
345 static int
346 PrintStatus(VolumeStatus *status, char *name, char *motd, char *offmsg)
347 {
348     printf("Volume status for vid = %u named %s is\n",status->Vid, name);
349     if (*offmsg != 0)
350         printf("Current offline message is %s\n",offmsg);
351     if (*motd != 0)
352         printf("Current message of the day is %s\n",motd);
353     printf("Current disk quota is ");
354     if (status->MaxQuota != 0)
355         printf("%d\n", status->MaxQuota);
356     else
357         printf("unlimited\n");
358     printf("Current blocks used are %d\n",status->BlocksInUse);
359     printf("The partition has %d blocks available out of %d\n",
360             status->PartBlocksAvail, status->PartMaxBlocks);
361     return 0;
362 }
363
364 static int
365 QuickPrintStatus(VolumeStatus *status, char *name)
366 {
367     double QuotaUsed =0.0;
368     double PartUsed =0.0;
369     int WARN = 0;
370     printf("%-25.25s",name);
371
372     if (status->MaxQuota != 0) {
373         printf(" %10d %10d", status->MaxQuota, status->BlocksInUse);
374         QuotaUsed = ((((double)status->BlocksInUse)/status->MaxQuota) * 100.0);
375     } else {
376         printf("   no limit %10d", status->BlocksInUse);
377     }
378     if (QuotaUsed > 90.0){
379         printf(" %5.0f%%<<", QuotaUsed);
380         WARN = 1;
381     } else
382         printf(" %5.0f%%  ", QuotaUsed);
383     PartUsed = (100.0 - ((((double)status->PartBlocksAvail)/status->PartMaxBlocks) * 100.0));
384     if (PartUsed > 97.0){
385         printf(" %9.0f%%<<", PartUsed);
386         WARN = 1;
387     } else
388         printf(" %9.0f%%  ", PartUsed);
389     if (WARN){
390         printf("  <<WARNING\n");
391     } else
392         printf("\n");
393     return 0;
394 }
395
396 static int
397 QuickPrintSpace(VolumeStatus *status, char *name)
398 {
399     double PartUsed =0.0;
400     int WARN = 0;
401     printf("%-25.25s",name);
402
403     printf("%10d%10d%10d", status->PartMaxBlocks, status->PartMaxBlocks - status->PartBlocksAvail, status->PartBlocksAvail);
404
405     PartUsed = (100.0 - ((((double)status->PartBlocksAvail)/status->PartMaxBlocks) * 100.0));
406     if (PartUsed > 90.0){
407         printf(" %4.0f%%<<", PartUsed);
408         WARN = 1;
409     } else
410         printf(" %4.0f%%  ", PartUsed);
411     if (WARN){
412         printf("  <<WARNING\n");
413     } else
414         printf("\n");
415     return 0;
416 }
417
418 static DWORD IsFreelance(void)
419 {
420     HKEY  parmKey;
421     DWORD code;
422     DWORD dummyLen;
423     DWORD enabled = 0;
424
425     code = RegOpenKeyEx(HKEY_LOCAL_MACHINE, AFSREG_CLT_SVC_PARAM_SUBKEY,
426                          0, (IsWow64()?KEY_WOW64_64KEY:0)|KEY_QUERY_VALUE, &parmKey);
427     if (code == ERROR_SUCCESS) {
428         dummyLen = sizeof(cm_freelanceEnabled);
429         code = RegQueryValueEx(parmKey, "FreelanceClient", NULL, NULL,
430                             (BYTE *) &enabled, &dummyLen);
431         RegCloseKey (parmKey);
432     }
433     return enabled;
434 }
435
436 static int
437 SetACLCmd(struct cmd_syndesc *as, void *arock)
438 {
439     afs_int32 code;
440     struct ViceIoctl blob;
441     struct Acl *ta = 0;
442     struct cmd_item *ti, *ui;
443     int plusp;
444     afs_int32 rights;
445     int clear;
446     int idf = getidf(as, parm_setacl_id);
447     size_t len;
448     int error = 0;
449     char cell[CELL_MAXNAMELEN];
450
451     if (as->parms[2].items)
452         clear = 1;
453     else
454         clear = 0;
455     plusp = !(as->parms[3].items);
456     for(ti=as->parms[0].items; ti;ti=ti->next) {
457         code = GetCell(ti->data, cell, sizeof(cell));
458         if (code) {
459             fs_Die(errno, ti->data);
460             error = 1;
461             continue;
462         }
463
464         if ( fs_IsFreelanceRoot(ti->data) ) {
465             fprintf(stderr,"%s: ACLs cannot be set on the Freelance root.afs volume.\n", pn);
466             error = 1;
467             continue;
468         }
469         blob.out_size = AFS_PIOCTL_MAXSIZE;
470         blob.in_size = idf;
471         blob.in = blob.out = space;
472         code = pioctl_utf8(ti->data, VIOCGETAL, &blob, 1);
473         if (code) {
474             fs_Die(errno, ti->data);
475             error = 1;
476             continue;
477         }
478         if (ta)
479             ZapAcl(ta);
480         ta = ParseAcl(space, AFS_PIOCTL_MAXSIZE);
481         if (!ta) {
482             fprintf(stderr,
483                     "fs: %s: invalid acl data returned from VIOCGETAL\n",
484                      ti->data);
485             error = 1;
486             continue;
487         }
488         if (!plusp && ta->dfs) {
489             fprintf(stderr,
490                     "fs: %s: you may not use the -negative switch with DFS acl's.\n%s",
491                     ti->data,
492                     "(you may specify \"null\" to revoke all rights, however)\n");
493             error = 1;
494             continue;
495         }
496         if (ta)
497             ZapAcl(ta);
498         if (clear)
499             ta = EmptyAcl(space);
500         else
501             ta = ParseAcl(space, AFS_PIOCTL_MAXSIZE);
502         if (!ta) {
503             fprintf(stderr,
504                     "fs: %s: invalid acl data returned from VIOCGETAL\n",
505                      ti->data);
506             error = 1;
507             continue;
508         }
509         CleanAcl(ta, cell);
510         for(ui=as->parms[1].items; ui; ui=ui->next->next) {
511             enum rtype rtype;
512             if (!ui->next) {
513                 fprintf(stderr,
514                         "%s: Missing second half of user/access pair.\n", pn);
515                 ZapAcl(ta);
516                 return 1;
517             }
518             rights = Convert(ui->next->data, ta->dfs, &rtype);
519             if (rtype == destroy && !ta->dfs) {
520                 struct AclEntry *tlist;
521
522                 tlist = (plusp ? ta->pluslist : ta->minuslist);
523                 if (!FindList(tlist, ui->data))
524                     continue;
525             }
526             if (rtype == deny && !ta->dfs)
527                 plusp = 0;
528             if (rtype == destroy && ta->dfs)
529                 rights = -1;
530             ChangeList(ta, plusp, ui->data, rights, &rtype);
531         }
532         blob.in = AclToString(ta);
533         blob.out_size=0;
534         if( FAILED(StringCbLength(blob.in, sizeof(space), &len))) {
535             fprintf (stderr, "StringCbLength failure on blob.in");
536             exit(1);
537         }
538         blob.in_size = 1+(long)len;
539         code = pioctl_utf8(ti->data, VIOCSETAL, &blob, 1);
540         if (code) {
541             if (errno == EINVAL) {
542                 if (ta->dfs) {
543                     static char *fsenv = 0;
544                     if (!fsenv) {
545                         fsenv = (char *)getenv("FS_EXPERT");
546                     }
547                     fprintf(stderr, "fs: \"Invalid argument\" was returned when you tried to store a DFS access list.\n");
548                     if (!fsenv) {
549                         fprintf(stderr,
550     "%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s",
551     "\nPossible reasons for this include:\n\n",
552     " -You may have specified an inappropriate combination of rights.\n",
553     "  For example, some DFS-supported filesystems may not allow you to\n",
554     "  drop the \"c\" right from \"user_obj\".\n\n",
555     " -A mask_obj may be required (it is likely required by the underlying\n",
556     "  filesystem if you try to set anything other than the basic \"user_obj\"\n",
557     "  \"mask_obj\", or \"group_obj\" entries). Unlike acl_edit, the fs command\n",
558     "  does not automatically create or update the mask_obj. Try setting\n",
559     "  the rights \"mask_obj all\" with \"fs sa\" before adding any explicit\n",
560     "  users or groups. You can do this with a single command, such as\n",
561     "  \"fs sa mask_obj all user:somename read\"\n\n",
562     " -A specified user or group may not exist.\n\n",
563     " -You may have tried to delete \"user_obj\", \"group_obj\", or \"other_obj\".\n",
564     "  This is probably not allowed by the underlying file system.\n\n",
565     " -If you add a user or group to a DFS ACL, remember that it must be\n",
566     "  fully specified as \"user:username\" or \"group:groupname\". In addition, there\n",
567     "  may be local requirements on the format of the user or group name.\n",
568     "  Check with your cell administrator.\n\n",
569     " -Or numerous other possibilities. It would be great if we could be more\n",
570     "  precise about the actual problem, but for various reasons, this is\n",
571     "  impractical via this interface.  If you can't figure it out, you\n",
572     "  might try logging into a DCE-equipped machine and use acl_edit (or\n",
573     "  whatever is provided). You may get better results. Good luck!\n\n",
574     " (You may inhibit this message by setting \"FS_EXPERT\" in your environment)\n");
575                     }
576                 } else {
577                     fprintf(stderr,
578                             "%s: Invalid argument, possible reasons include:\n",
579                              pn);
580                     fprintf(stderr,"\t-File not in AFS\n");
581                     fprintf(stderr,
582                             "\t-Too many users on access control list\n");
583                     fprintf(stderr,
584                             "\t-Tried to add non-existent user to access control list\n");
585                 }
586             } else {
587                 fs_Die(errno, ti->data);
588             }
589             error = 1;
590         }
591     }
592     if (ta)
593         ZapAcl(ta);
594     return error;
595 }
596
597 static int
598 CopyACLCmd(struct cmd_syndesc *as, void *arock)
599 {
600     afs_int32 code;
601     struct ViceIoctl blob;
602     struct Acl *fa, *ta = 0;
603     struct AclEntry *tp;
604     struct cmd_item *ti;
605     int clear;
606     int idf = getidf(as, parm_copyacl_id);
607     int error = 0;
608     size_t len;
609     char cell[CELL_MAXNAMELEN];
610
611     if (as->parms[2].items)
612         clear=1;
613     else
614         clear=0;
615     blob.out_size = AFS_PIOCTL_MAXSIZE;
616     blob.in_size = idf;
617     blob.in = blob.out = space;
618     code = pioctl_utf8(as->parms[0].items->data, VIOCGETAL, &blob, 1);
619     if (code) {
620         fs_Die(errno, as->parms[0].items->data);
621         return 1;
622     }
623     fa = ParseAcl(space, AFS_PIOCTL_MAXSIZE);
624     if (!fa) {
625         fprintf(stderr,
626                  "%s: %s: invalid acl data returned from VIOCGETAL\n",
627                  pn, as->parms[0].items->data);
628         return 1;
629     }
630     code = GetCell(as->parms[0].items->data, cell, sizeof(cell));
631     if (code) {
632         fprintf(stderr,
633                 "%s: %s: unable to obtain cell name\n",
634                 pn, as->parms[0].items->data);
635         return 1;
636     }
637     CleanAcl(fa, cell);
638     for (ti=as->parms[1].items; ti;ti=ti->next) {
639         blob.out_size = AFS_PIOCTL_MAXSIZE;
640         blob.in_size = idf;
641         blob.in = blob.out = space;
642         code = pioctl_utf8(ti->data, VIOCGETAL, &blob, 1);
643         if (code) {
644             fs_Die(errno, ti->data);
645             error = 1;
646             continue;
647         }
648         if (ta)
649             ZapAcl(ta);
650         if (clear)
651             ta = EmptyAcl(space);
652         else
653             ta = ParseAcl(space, AFS_PIOCTL_MAXSIZE);
654         if (!ta) {
655             fprintf(stderr,
656                     "%s: %s: invalid acl data returned from VIOCGETAL\n",
657                      pn, ti->data);
658             error = 1;
659             continue;
660         }
661         code = GetCell(ti->data, cell, sizeof(cell));
662         if (code) {
663             fprintf(stderr,
664                     "%s: %s: unable to obtain cell name\n",
665                      pn, ti->data);
666             error = 1;
667             continue;
668         }
669         CleanAcl(ta, cell);
670         if (ta->dfs != fa->dfs) {
671             fprintf(stderr,
672                     "%s: incompatible file system types: acl not copied to %s; aborted\n",
673                     pn, ti->data);
674             error = 1;
675             continue;
676         }
677         if (ta->dfs) {
678             if (! clear && strcmp(ta->cell, fa->cell) != 0) {
679                 fprintf(stderr,
680                         "%s: default DCE cell differs for file %s: use \"-clear\" switch; acl not merged\n",
681                         pn, ti->data);
682                 error = 1;
683                 continue;
684             }
685             if( FAILED(StringCbCopy(ta->cell, sizeof(ta->cell), fa->cell))) {
686                 fprintf (stderr, "cell - not enough space");
687                 exit(1);
688             }
689         }
690         for (tp = fa->pluslist;tp;tp=tp->next)
691             ChangeList(ta, 1, tp->name, tp->rights, NULL);
692         for (tp = fa->minuslist;tp;tp=tp->next)
693             ChangeList(ta, 0, tp->name, tp->rights, NULL);
694         blob.in = AclToString(ta);
695         blob.out_size=0;
696         if( FAILED(StringCbLength(blob.in, sizeof(space), &len))) {
697             fprintf (stderr, "StringCbLength failure on blob.in");
698             exit(1);
699         }
700         blob.in_size = 1+(long)len;
701         code = pioctl_utf8(ti->data, VIOCSETAL, &blob, 1);
702         if (code) {
703             if (errno == EINVAL) {
704                 fprintf(stderr,
705                         "%s: Invalid argument, possible reasons include:\n", pn);
706                 fprintf(stderr,"\t-File not in AFS\n");
707             } else {
708                 fs_Die(errno, ti->data);
709             }
710             error = 1;
711         }
712     }
713     if (ta)
714         ZapAcl(ta);
715     ZapAcl(fa);
716     return error;
717 }
718
719 /* pioctl_utf8() call to get the cellname of a pathname */
720 static afs_int32
721 GetCell(char *fname, char *cellname, size_t cell_len)
722 {
723     afs_int32 code;
724     struct ViceIoctl blob;
725
726     blob.in_size = 0;
727     blob.out_size = cell_len;
728     blob.out = cellname;
729
730     code = pioctl_utf8(fname, VIOC_FILE_CELL_NAME, &blob, 1);
731     if (code == 0)
732         cellname[blob.out_size - 1] = '\0';
733     return code;
734 }
735
736 /* clean up an acl to not have bogus entries */
737 static int
738 CleanACLCmd(struct cmd_syndesc *as, void *arock)
739 {
740     afs_int32 code;
741     struct Acl *ta = 0;
742     struct ViceIoctl blob;
743     int changes;
744     struct cmd_item *ti;
745     struct AclEntry *te;
746     int error = 0;
747     size_t len;
748
749     SetDotDefault(&as->parms[0].items);
750     for(ti=as->parms[0].items; ti; ti=ti->next) {
751         blob.out_size = AFS_PIOCTL_MAXSIZE;
752         blob.in_size = 0;
753         blob.out = space;
754         code = pioctl_utf8(ti->data, VIOCGETAL, &blob, 1);
755         if (code) {
756             fs_Die(errno, ti->data);
757             error = 1;
758             continue;
759         }
760         if (ta)
761             ZapAcl(ta);
762         ta = ParseAcl(space, AFS_PIOCTL_MAXSIZE);
763         if (!ta) {
764             fprintf(stderr,
765                     "fs: %s: invalid acl data returned from VIOCGETAL\n",
766                      ti->data);
767             error = 1;
768             continue;
769         }
770         if (ta->dfs) {
771             fprintf(stderr,
772                     "%s: cleanacl is not supported for DFS access lists.\n",
773                     pn);
774             error = 1;
775             continue;
776         }
777
778         changes = CleanAcl(ta, ti->data);
779
780         if (changes) {
781             /* now set the acl */
782             blob.in=AclToString(ta);
783             if( FAILED(StringCbLength(blob.in, sizeof(space), &len))) {
784                 fprintf (stderr, "StringCbLength failure on blob.in");
785                 exit(1);
786             }
787             blob.in_size = (long)len+1;
788             blob.out_size = 0;
789             code = pioctl_utf8(ti->data, VIOCSETAL, &blob, 1);
790             if (code) {
791                 if (errno == EINVAL) {
792                     fprintf(stderr,
793                             "%s: Invalid argument, possible reasons include\n",
794                              pn);
795                     fprintf(stderr,"%s: File not in vice or\n", pn);
796                     fprintf(stderr,
797                             "%s: Too many users on access control list or\n",
798                             pn);
799                 } else {
800                     fs_Die(errno, ti->data);
801                 }
802                 error = 1;
803                 continue;
804             }
805
806             /* now list the updated acl */
807             printf("Access list for %s is now\n", ti->data);
808             if (ta->nplus > 0) {
809                 if (!ta->dfs)
810                     printf("Normal rights:\n");
811                 for(te = ta->pluslist;te;te=te->next) {
812                     printf("  %s ", te->name);
813                     PRights(te->rights, ta->dfs);
814                     printf("\n");
815                 }
816             }
817             if (ta->nminus > 0) {
818                 printf("Negative rights:\n");
819                 for(te = ta->minuslist;te;te=te->next) {
820                     printf("  %s ", te->name);
821                     PRights(te->rights, ta->dfs);
822                     printf("\n");
823                 }
824             }
825             if (ti->next)
826                 printf("\n");
827         } else
828             printf("Access list for %s is fine.\n", ti->data);
829     }
830     if (ta)
831         ZapAcl(ta);
832     return error;
833 }
834
835 static int
836 ListACLCmd(struct cmd_syndesc *as, void *arock)
837 {
838     afs_int32 code;
839     struct Acl *ta = 0;
840     struct ViceIoctl blob;
841     struct AclEntry *te;
842     struct cmd_item *ti;
843     int idf = getidf(as, parm_listacl_id);
844     int error = 0;
845
846     SetDotDefault(&as->parms[0].items);
847     for(ti=as->parms[0].items; ti; ti=ti->next) {
848         char separator;
849
850         if ( fs_IsFreelanceRoot(ti->data) ) {
851             fprintf(stderr,"%s: ACLs are not set on the Freelance root.afs volume.\n", pn);
852             error = 1;
853             continue;
854         }
855
856         blob.out_size = AFS_PIOCTL_MAXSIZE;
857         blob.in_size = idf;
858         blob.in = blob.out = space;
859         code = pioctl_utf8(ti->data, VIOCGETAL, &blob, 1);
860         if (code) {
861             fs_Die(errno, ti->data);
862             error = 1;
863             continue;
864         }
865         ta = ParseAcl(space, AFS_PIOCTL_MAXSIZE);
866         if (!ta) {
867             fprintf(stderr,
868                     "fs: %s: invalid acl data returned from VIOCGETAL\n",
869                      ti->data);
870             error = 1;
871             continue;
872         }
873         if (as->parms[3].items) {                       /* -cmd */
874             printf("fs setacl -dir %s -acl ", ti->data);
875             if (ta->nplus > 0) {
876                 for (te = ta->pluslist; te; te = te->next) {
877                     printf("  %s ", te->name);
878                     PRights(te->rights, ta->dfs);
879                 }
880             }
881             printf("\n");
882             if (ta->nminus > 0) {
883                 printf("fs setacl -dir %s -acl ", ti->data);
884                 for (te = ta->minuslist; te; te = te->next) {
885                     printf("  %s ", te->name);
886                     PRights(te->rights, ta->dfs);
887                 }
888                 printf(" -negative\n");
889             }
890         } else {
891             switch (ta->dfs) {
892             case 0:
893                 printf("Access list for %s is\n", ti->data);
894                 break;
895             case 1:
896                 printf("DFS access list for %s is\n", ti->data);
897                 break;
898             case 2:
899                 printf("DFS initial directory access list of %s is\n", ti->data);
900                 break;
901             case 3:
902                 printf("DFS initial file access list of %s is\n", ti->data);
903                 break;
904             }
905             if (ta->dfs) {
906                 printf("  Default cell = %s\n", ta->cell);
907             }
908             separator = ta->dfs? DFS_SEPARATOR : ' ';
909             if (ta->nplus > 0) {
910                 if (!ta->dfs)
911                     printf("Normal rights:\n");
912                 for(te = ta->pluslist;te;te=te->next) {
913                     printf("  %s%c", te->name, separator);
914                     PRights(te->rights, ta->dfs);
915                     printf("\n");
916                 }
917             }
918             if (ta->nminus > 0) {
919                 printf("Negative rights:\n");
920                 for(te = ta->minuslist;te;te=te->next) {
921                     printf("  %s ", te->name);
922                     PRights(te->rights, ta->dfs);
923                     printf("\n");
924                 }
925             }
926             if (ti->next)
927                 printf("\n");
928         }
929         ZapAcl(ta);
930     }
931     return error;
932 }
933
934 static int
935 FlushAllCmd(struct cmd_syndesc *as, void *arock)
936 {
937     afs_int32 code;
938     struct ViceIoctl blob;
939
940     blob.in_size = blob.out_size = 0;
941     code = pioctl_utf8(NULL, VIOC_FLUSHALL, &blob, 0);
942     if (code) {
943         fprintf(stderr, "Error flushing all ");
944         return 1;
945     }
946     return 0;
947 }
948
949 static int
950 FlushVolumeCmd(struct cmd_syndesc *as, void *arock)
951 {
952     afs_int32 code;
953     struct ViceIoctl blob;
954     struct cmd_item *ti;
955     int error = 0;
956
957     SetDotDefault(&as->parms[0].items);
958     for(ti=as->parms[0].items; ti; ti=ti->next) {
959         blob.in_size = blob.out_size = 0;
960         code = pioctl_utf8(ti->data, VIOC_FLUSHVOLUME, &blob, 0);
961         if (code) {
962             fprintf(stderr, "Error flushing volume ");
963             perror(ti->data);
964             error = 1;
965             continue;
966         }
967     }
968     return error;
969 }
970
971 static int
972 FlushCmd(struct cmd_syndesc *as, void *arock)
973 {
974     afs_int32 code;
975     struct ViceIoctl blob;
976     struct cmd_item *ti;
977     int error = 0;
978     int literal = 0;
979     cm_ioctlQueryOptions_t options;
980
981     if (as->parms[1].items)
982         literal = 1;
983
984     for(ti=as->parms[0].items; ti; ti=ti->next) {
985         /* once per file */
986         memset(&options, 0, sizeof(options));
987         options.size = sizeof(options);
988         options.field_flags |= CM_IOCTL_QOPTS_FIELD_LITERAL;
989         options.literal = literal;
990         blob.in_size = options.size;    /* no variable length data */
991         blob.in = &options;
992
993         blob.out_size = 0;
994         code = pioctl_utf8(ti->data, VIOCFLUSH, &blob, 0);
995         if (code) {
996             if (errno == EMFILE) {
997                 fprintf(stderr, "%s: Can't flush active file %s\n", pn,
998                         ti->data);
999             } else {
1000                 fprintf(stderr, "%s: Error flushing file ", pn);
1001                 perror(ti->data);
1002             }
1003             error = 1;
1004             continue;
1005         }
1006     }
1007     return error;
1008 }
1009
1010 /* all this command does is repackage its args and call SetVolCmd */
1011 static int
1012 SetQuotaCmd(struct cmd_syndesc *as, void *arock) {
1013     struct cmd_syndesc ts;
1014     errno_t err;
1015     /* copy useful stuff from our command slot; we may later have to reorder */
1016 #if _MSC_VER < 1400
1017     memcpy(&ts, as, sizeof(ts));    /* copy whole thing */
1018 #else
1019     err = memcpy_s(&ts, sizeof(ts), as, sizeof(ts));  /* copy whole thing */
1020     if ( err ) {
1021         fprintf (stderr, "memcpy_s failure on ts");
1022         exit(1);
1023     }
1024 #endif
1025     return SetVolCmd(&ts, arock);
1026 }
1027
1028 static int
1029 SetVolCmd(struct cmd_syndesc *as, void *arock) {
1030     afs_int32 code;
1031     struct ViceIoctl blob;
1032     struct cmd_item *ti;
1033     struct VolumeStatus *status;
1034     char *motd, *offmsg, *input, *destEnd;
1035     size_t destRemaining;
1036     int error = 0;
1037     size_t len;
1038
1039     SetDotDefault(&as->parms[0].items);
1040     for(ti=as->parms[0].items; ti; ti=ti->next) {
1041         /* once per file */
1042         destRemaining = sizeof(space);
1043         blob.out_size = AFS_PIOCTL_MAXSIZE;
1044         blob.in_size = sizeof(*status) + 3;     /* for the three terminating nulls */
1045         blob.out = space;
1046         blob.in = space;
1047         status = (VolumeStatus *)space;
1048         status->MinQuota = status->MaxQuota = -1;
1049         motd = offmsg = NULL;
1050         if (as->parms[1].items) {
1051             code = util_GetHumanInt32(as->parms[1].items->data, &status->MaxQuota);
1052             if (code) {
1053                 fprintf(stderr,"%s: bad integer specified for quota.\n", pn);
1054                 error = 1;
1055                 continue;
1056             }
1057         }
1058         if (as->parms[2].items)
1059             motd = as->parms[2].items->data;
1060         if (as->parms[3].items)
1061             offmsg = as->parms[3].items->data;
1062         input = (char *)status + sizeof(*status);
1063         *(input++) = '\0';      /* never set name: this call doesn't change vldb */
1064         destRemaining -= sizeof(*status) + 1;
1065         if(offmsg) {
1066             if( FAILED(StringCbLength(offmsg, VMSGSIZE, &len))) {
1067                 fprintf(stderr,"%s: message must be shorter than %d characters\n",
1068                          pn, VMSGSIZE);
1069                 error = 1;
1070                 continue;
1071             }
1072             if( FAILED(StringCbCopyEx(input, destRemaining, offmsg, &destEnd, &destRemaining, STRSAFE_FILL_ON_FAILURE))) {
1073                 fprintf (stderr, "input - not enough space");
1074                 exit(1);
1075             }
1076             blob.in_size += destEnd - input;
1077             input = destEnd + 1;
1078             destRemaining -= sizeof(char);
1079         } else {
1080             *(input++) = '\0';
1081             destRemaining -= sizeof(char);
1082         }
1083         if(motd) {
1084             if( FAILED(StringCbLength(motd, VMSGSIZE, &len))) {
1085                 fprintf(stderr,"%s: message must be shorter than %d characters\n",
1086                     pn, VMSGSIZE);
1087                 return code;
1088             }
1089             if( FAILED(StringCbCopyEx(input, destRemaining, motd, &destEnd, &destRemaining, STRSAFE_FILL_ON_FAILURE))) {
1090                 fprintf (stderr, "input - not enough space");
1091                 exit(1);
1092             }
1093             blob.in_size += (long)(destEnd - input);
1094             input = destEnd + 1;
1095             destRemaining -= sizeof(char);
1096         } else {
1097             *(input++) = '\0';
1098             destRemaining -= sizeof(char);
1099         }
1100         code = pioctl_utf8(ti->data,VIOCSETVOLSTAT, &blob, 1);
1101         if (code) {
1102             fs_Die(errno, ti->data);
1103             error = 1;
1104         }
1105     }
1106     return error;
1107 }
1108
1109 static int
1110 ExamineCmd(struct cmd_syndesc *as, void *arock)
1111 {
1112     afs_int32 code;
1113     struct ViceIoctl blob;
1114     struct cmd_item *ti;
1115     struct VolumeStatus *status;
1116     char *name, *offmsg, *motd;
1117     int error = 0;
1118     int literal = 0;
1119     cm_ioctlQueryOptions_t options;
1120     size_t len;
1121
1122     if (as->parms[1].items)
1123         literal = 1;
1124
1125     SetDotDefault(&as->parms[0].items);
1126     for(ti=as->parms[0].items; ti; ti=ti->next) {
1127         cm_fid_t fid;
1128         afs_uint32 filetype;
1129         afs_int32 owner[2];
1130         afs_uint32 unixModeBits;
1131         char cell[CELL_MAXNAMELEN];
1132
1133         /* once per file */
1134         memset(&fid, 0, sizeof(fid));
1135         memset(&options, 0, sizeof(options));
1136         filetype = 0;
1137         options.size = sizeof(options);
1138         options.field_flags |= CM_IOCTL_QOPTS_FIELD_LITERAL;
1139         options.literal = literal;
1140         blob.in_size = options.size;    /* no variable length data */
1141         blob.in = &options;
1142
1143         blob.out_size = sizeof(cm_fid_t);
1144         blob.out = (char *) &fid;
1145         if (0 == pioctl_utf8(ti->data, VIOCGETFID, &blob, 1) &&
1146             blob.out_size == sizeof(cm_fid_t)) {
1147             options.field_flags |= CM_IOCTL_QOPTS_FIELD_FID;
1148             options.fid = fid;
1149         } else {
1150             fs_Die(errno, ti->data);
1151             error = 1;
1152             continue;
1153         }
1154
1155         blob.out_size = sizeof(filetype);
1156         blob.out = &filetype;
1157
1158         code = pioctl_utf8(ti->data, VIOC_GETFILETYPE, &blob, 1);
1159         if (code || blob.out_size != sizeof(filetype)) {
1160             fs_Die(errno, ti->data);
1161             error = 1;
1162             continue;
1163         }
1164
1165         blob.out_size = CELL_MAXNAMELEN;
1166         blob.out = cell;
1167
1168         code = pioctl_utf8(ti->data, VIOC_FILE_CELL_NAME, &blob, 1);
1169         if (code == 0)
1170             cell[blob.out_size-1] = '\0';
1171         printf("%s %s (%u.%u.%u) contained in cell %s\n",
1172                 fs_filetypestr(filetype),
1173                 ti->data, fid.volume, fid.vnode, fid.unique,
1174                 code ? "unknown-cell" : cell);
1175
1176         blob.out_size = 2 * sizeof(afs_uint32);
1177         blob.out = (char *) &owner;
1178         if (0 == pioctl_utf8(ti->data, VIOCGETOWNER, &blob, 1) &&
1179             blob.out_size == 2 * sizeof(afs_uint32)) {
1180             char oname[PR_MAXNAMELEN] = "(unknown)";
1181             char gname[PR_MAXNAMELEN] = "(unknown)";
1182             char confDir[257];
1183
1184             /* Go to the PRDB and see if this all number username is valid */
1185             cm_GetConfigDir(confDir, sizeof(confDir));
1186
1187             pr_Initialize(1, confDir, cell);
1188             pr_SIdToName(owner[0], oname);
1189             pr_SIdToName(owner[1], gname);
1190             printf("Owner %s (%d) Group %s (%d)\n", oname, owner[0], gname, owner[1]);
1191         }
1192
1193         blob.out_size = sizeof(afs_uint32);
1194         blob.out = (char *) &unixModeBits;
1195         if (0 == pioctl_utf8(ti->data, VIOC_GETUNIXMODE, &blob, 1) &&
1196             blob.out_size == sizeof(afs_uint32)) {
1197             printf("UNIX mode 0%o\n", unixModeBits);
1198         }
1199
1200         blob.out = space;
1201         blob.out_size = AFS_PIOCTL_MAXSIZE;
1202         code = pioctl_utf8(ti->data, VIOCGETVOLSTAT, &blob, 1);
1203         if (code == 0) {
1204             space[blob.out_size - 1] = '\0';
1205             status = (VolumeStatus *)space;
1206             name = (char *)status + sizeof(*status);
1207             if( FAILED(StringCbLength(name, sizeof(space) - (name - space), &len))) {
1208                 fprintf (stderr, "StringCbLength failure on name");
1209                 exit(1);
1210             }
1211             offmsg = name + len + 1;
1212             if( FAILED(StringCbLength(offmsg, sizeof(space) - (offmsg - space), &len))) {
1213                 fprintf (stderr, "StringCbLength failure on offmsg");
1214                 exit(1);
1215             }
1216             motd = offmsg + len + 1;
1217             PrintStatus(status, name, motd, offmsg);
1218         } else {
1219             fs_Die(errno, ti->data);
1220         }
1221
1222         errno = 0;
1223         code = pioctl_utf8(ti->data, VIOC_PATH_AVAILABILITY, &blob, 1);
1224         switch (errno) {
1225         case 0:
1226             printf("Volume is online\n");
1227             break;
1228         case ENXIO:
1229             printf("Volume is offline\n");
1230             break;
1231         case ENOSYS:
1232             printf("All Volume servers are down\n");
1233             break;
1234         case EBUSY:
1235             printf("All volume servers are busy\n");
1236             break;
1237         default:
1238             printf("Unknown volume state\n");
1239             fs_Die(errno, ti->data);
1240         }
1241         printf("\n");
1242     }
1243     return error;
1244 }
1245
1246 static int
1247 ListQuotaCmd(struct cmd_syndesc *as, void *arock)
1248 {
1249     afs_int32 code;
1250     struct ViceIoctl blob;
1251     struct cmd_item *ti;
1252     struct VolumeStatus *status;
1253     char *name;
1254
1255     int error = 0;
1256
1257     printf("%-25s%-11s%-11s%-7s%-13s\n", "Volume Name", "      Quota",
1258            "       Used", "  %Used", "    Partition");
1259     SetDotDefault(&as->parms[0].items);
1260     for(ti=as->parms[0].items; ti; ti=ti->next) {
1261         /* once per file */
1262         blob.out_size = AFS_PIOCTL_MAXSIZE;
1263         blob.in_size = 0;
1264         blob.out = space;
1265         code = pioctl_utf8(ti->data, VIOCGETVOLSTAT, &blob, 1);
1266         if (code) {
1267             fs_Die(errno, ti->data);
1268             error = 1;
1269             continue;
1270         }
1271         space[blob.out_size - 1] = '\0';
1272         status = (VolumeStatus *)space;
1273         name = (char *)status + sizeof(*status);
1274         QuickPrintStatus(status, name);
1275     }
1276     return error;
1277 }
1278
1279 static int
1280 WhereIsCmd(struct cmd_syndesc *as, void *arock)
1281 {
1282     afs_int32 code;
1283     struct ViceIoctl blob;
1284     struct cmd_item *ti;
1285     int j;
1286     afs_int32 *hosts;
1287     char *tp;
1288     int error = 0;
1289     int literal = 0;
1290     cm_ioctlQueryOptions_t options;
1291
1292     if (as->parms[1].items)
1293         literal = 1;
1294
1295     SetDotDefault(&as->parms[0].items);
1296     for(ti=as->parms[0].items; ti; ti=ti->next) {
1297         cm_fid_t fid;
1298         afs_uint32 filetype;
1299
1300         /* once per file */
1301         memset(&fid, 0, sizeof(fid));
1302         memset(&options, 0, sizeof(options));
1303         filetype = 0;
1304         options.size = sizeof(options);
1305         options.field_flags |= CM_IOCTL_QOPTS_FIELD_LITERAL;
1306         options.literal = literal;
1307         blob.in_size = options.size;    /* no variable length data */
1308         blob.in = &options;
1309
1310         blob.out_size = sizeof(cm_fid_t);
1311         blob.out = (char *) &fid;
1312         if (0 == pioctl_utf8(ti->data, VIOCGETFID, &blob, 1) &&
1313             blob.out_size == sizeof(cm_fid_t)) {
1314             options.field_flags |= CM_IOCTL_QOPTS_FIELD_FID;
1315             options.fid = fid;
1316         } else {
1317             fs_Die(errno, ti->data);
1318             error = 1;
1319             continue;
1320         }
1321
1322         blob.out_size = sizeof(filetype);
1323         blob.out = &filetype;
1324
1325         code = pioctl_utf8(ti->data, VIOC_GETFILETYPE, &blob, 1);
1326         if (code || blob.out_size != sizeof(filetype)) {
1327             fs_Die(errno, ti->data);
1328             error = 1;
1329             continue;
1330         }
1331         blob.out_size = AFS_PIOCTL_MAXSIZE;
1332         blob.out = space;
1333         memset(space, 0, sizeof(space));
1334         code = pioctl_utf8(ti->data, VIOCWHEREIS, &blob, 1);
1335         if (code) {
1336             fs_Die(errno, ti->data);
1337             error = 1;
1338             continue;
1339         }
1340         hosts = (afs_int32 *) space;
1341         printf("%s %s is on host%s ",
1342                 fs_filetypestr(filetype),
1343                 ti->data,
1344                 (hosts[0] && !hosts[1]) ? "": "s");
1345         for(j=0; j<AFS_MAXHOSTS; j++) {
1346             if (hosts[j] == 0)
1347                 break;
1348             tp = hostutil_GetNameByINet(hosts[j]);
1349             printf("%s ", tp);
1350         }
1351         printf("\n");
1352     }
1353     return error;
1354 }
1355
1356
1357 static int
1358 DiskFreeCmd(struct cmd_syndesc *as, void *arock)
1359 {
1360     afs_int32 code;
1361     struct ViceIoctl blob;
1362     struct cmd_item *ti;
1363     char *name;
1364     struct VolumeStatus *status;
1365     int error = 0;
1366
1367     printf("%-25s%-10s%-10s%-10s%-6s\n", "Volume Name", "    kbytes",
1368            "      used", "     avail", " %used");
1369     SetDotDefault(&as->parms[0].items);
1370     for(ti=as->parms[0].items; ti; ti=ti->next) {
1371         /* once per file */
1372         blob.out_size = AFS_PIOCTL_MAXSIZE;
1373         blob.in_size = 0;
1374         blob.out = space;
1375         code = pioctl_utf8(ti->data, VIOCGETVOLSTAT, &blob, 1);
1376         if (code) {
1377             fs_Die(errno, ti->data);
1378             error = 1;
1379             continue;
1380         }
1381         space[blob.out_size - 1] = '\0';
1382         status = (VolumeStatus *)space;
1383         name = (char *)status + sizeof(*status);
1384         QuickPrintSpace(status, name);
1385     }
1386     return error;
1387 }
1388
1389 static int
1390 QuotaCmd(struct cmd_syndesc *as, void *arock)
1391 {
1392     afs_int32 code;
1393     struct ViceIoctl blob;
1394     struct cmd_item *ti;
1395     double quotaPct;
1396     struct VolumeStatus *status;
1397     int error = 0;
1398
1399     SetDotDefault(&as->parms[0].items);
1400     for(ti=as->parms[0].items; ti; ti=ti->next) {
1401         /* once per file */
1402         blob.out_size = AFS_PIOCTL_MAXSIZE;
1403         blob.in_size = 0;
1404         blob.out = space;
1405         code = pioctl_utf8(ti->data, VIOCGETVOLSTAT, &blob, 1);
1406         /*
1407          * The response is VolumeStatus, volume name, offline message, and motd
1408          */
1409         if (code || blob.out_size < sizeof(*status)) {
1410             fs_Die(errno, ti->data);
1411             error = 1;
1412             continue;
1413         }
1414
1415         status = (VolumeStatus *)space;
1416         if (status->MaxQuota)
1417             quotaPct = ((((double)status->BlocksInUse)/status->MaxQuota) * 100.0);
1418         else
1419             quotaPct = 0.0;
1420         printf("%2.0f%% of quota used.\n", quotaPct);
1421     }
1422     return error;
1423 }
1424
1425 static int
1426 ListMountCmd(struct cmd_syndesc *as, void *arock)
1427 {
1428     afs_int32 code;
1429     struct ViceIoctl blob;
1430     struct cmd_item *ti;
1431     char orig_name[1024];               /*Original name, may be modified*/
1432     char true_name[1024];               /*``True'' dirname (e.g., symlink target)*/
1433     char parent_dir[1024];              /*Parent directory of true name*/
1434     char *last_component;       /*Last component of true name*/
1435     size_t len;
1436
1437 #ifndef WIN32
1438     struct stat statbuff;               /*Buffer for status info*/
1439 #endif /* not WIN32 */
1440 #ifndef WIN32
1441     int link_chars_read;                /*Num chars read in readlink()*/
1442 #endif /* not WIN32 */
1443     int thru_symlink;                   /*Did we get to a mount point via a symlink?*/
1444
1445     int error = 0;
1446     for(ti=as->parms[0].items; ti; ti=ti->next) {
1447         /* once per file */
1448         thru_symlink = 0;
1449 #ifdef WIN32
1450     if( FAILED(StringCbCopy(orig_name, sizeof(orig_name), ti->data))) {
1451         fprintf (stderr, "orig_name - not enough space");
1452         exit(1);
1453     }
1454 #else /* not WIN32 */
1455
1456     if( FAILED(StringCbPrintf(orig_name, sizeof(orig_name), "%s%s",
1457         (ti->data[0] == '/') ? "" : "./",
1458         ti->data))) {
1459         fprintf (stderr, "orig_name - cannot be populated");
1460         exit(1);
1461     }
1462 #endif /* not WIN32 */
1463
1464 #ifndef WIN32
1465         if (lstat(orig_name, &statbuff) < 0) {
1466             /* if lstat fails, we should still try the pioctl, since it
1467              * may work (for example, lstat will fail, but pioctl will
1468              * work if the volume of offline (returning ENODEV). */
1469             statbuff.st_mode = S_IFDIR; /* lie like pros */
1470         }
1471
1472         /*
1473          * The lstat succeeded.  If the given file is a symlink, substitute
1474          * the file name with the link name.
1475          */
1476         if ((statbuff.st_mode & S_IFMT) == S_IFLNK) {
1477             thru_symlink = 1;
1478             /*
1479              * Read name of resolved file.
1480              */
1481             link_chars_read = readlink(orig_name, true_name, 1024);
1482             if (link_chars_read <= 0) {
1483                 fprintf(stderr,
1484                         "%s: Can't read target name for '%s' symbolic link!\n",
1485                        pn, orig_name);
1486                 error = 1;
1487                 continue;
1488             }
1489
1490             /*
1491              * Add a trailing null to what was read, bump the length.
1492              */
1493             true_name[link_chars_read++] = 0;
1494
1495             /*
1496              * If the symlink is an absolute pathname, we're fine.  Otherwise, we
1497              * have to create a full pathname using the original name and the
1498              * relative symlink name.  Find the rightmost slash in the original
1499              * name (we know there is one) and splice in the symlink value.
1500              */
1501             if (true_name[0] != '\\') {
1502                 last_component = (char *) strrchr(orig_name, '\\');
1503                 if( FAILED(StringCbCopy(++last_component, sizeof(orig_name) - (last_component - orig_name) * sizeof(char), true_name))) {
1504                     fprintf (stderr, "last_component - not enough space");
1505                     exit(1);
1506                 }
1507                 if( FAILED(StringCbCopy(true_name, sizeof(true_name), orig_name))) {
1508                     fprintf (stderr, "true_name - not enough space");
1509                     exit(1);
1510                 }
1511             }
1512         } else {
1513             if( FAILED(StringCbCopy(true_name, sizeof(true_name), orig_name))) {
1514                 fprintf (stderr, "true_name - not enough space");
1515                 exit(1);
1516             }
1517         }
1518 #else   /* WIN32 */
1519         if( FAILED(StringCbCopy(true_name, sizeof(true_name), orig_name))) {
1520             fprintf (stderr, "true_name - not enough space");
1521             exit(1);
1522         }
1523 #endif /* WIN32 */
1524
1525         /*
1526          * Find rightmost slash, if any.
1527          */
1528 #ifdef WIN32
1529         last_component = (char *) strrchr(true_name, '\\');
1530         if (!last_component)
1531 #endif /* WIN32 */
1532             last_component = (char *) strrchr(true_name, '/');
1533         if (last_component) {
1534             /*
1535              * Found it.  Designate everything before it as the parent directory,
1536              * everything after it as the final component.
1537              */
1538             if( FAILED(StringCchCopyN(parent_dir, sizeof(parent_dir) / sizeof(char), true_name, last_component - true_name + 1))) {
1539                 fprintf (stderr, "parent_dir - not enough space");
1540                 exit(1);
1541             }
1542             parent_dir[last_component - true_name + 1] = 0;
1543             last_component++;   /*Skip the slash*/
1544 #ifdef WIN32
1545             if (!fs_InAFS(parent_dir)) {
1546                 const char * nbname = fs_NetbiosName();
1547                 if( FAILED(StringCbLength(nbname, NETBIOSNAMESZ, &len))) {
1548                     fprintf (stderr, "StringCbLength failure on nbname");
1549                     exit(1);
1550                 }
1551                 if (parent_dir[0] == '\\' && parent_dir[1] == '\\' &&
1552                     parent_dir[len+2] == '\\' &&
1553                     parent_dir[len+3] == '\0' &&
1554                     !strnicmp(nbname,&parent_dir[2],len))
1555                 {
1556                     if( FAILED(StringCbPrintf(parent_dir, sizeof(parent_dir),"\\\\%s\\all\\", nbname))) {
1557                         fprintf (stderr, "parent_dir - cannot be populated");
1558                         exit(1);
1559                     }
1560                 }
1561             }
1562 #endif
1563         } else {
1564             /*
1565              * No slash appears in the given file name.  Set parent_dir to the current
1566              * directory, and the last component as the given name.
1567              */
1568             fs_ExtractDriveLetter(true_name, parent_dir);
1569             if( FAILED(StringCbCat(parent_dir, sizeof(parent_dir), "."))) {
1570                 fprintf (stderr, "parent_dir - not enough space");
1571                 exit(1);
1572             }
1573             last_component = true_name;
1574             fs_StripDriveLetter(true_name, true_name, sizeof(true_name));
1575         }
1576
1577         if (strcmp(last_component, ".") == 0 || strcmp(last_component, "..") == 0) {
1578             fprintf(stderr,"%s: you may not use '.' or '..' as the last component\n",pn);
1579             fprintf(stderr,"%s: of a name in the 'fs lsmount' command.\n",pn);
1580             error = 1;
1581             continue;
1582         }
1583
1584         blob.in = last_component;
1585         if( FAILED(StringCchLength(last_component, sizeof(true_name) / sizeof(char) - (last_component - true_name), &len))) {
1586             fprintf (stderr, "StringCbLength failure on last_component");
1587             exit(1);
1588         }
1589         blob.in_size = (long)len+1;
1590         blob.out_size = AFS_PIOCTL_MAXSIZE;
1591         blob.out = space;
1592         memset(space, 0, AFS_PIOCTL_MAXSIZE);
1593
1594         code = pioctl_utf8(parent_dir, VIOC_AFS_STAT_MT_PT, &blob, 1);
1595
1596         if (code == 0) {
1597             printf("'%s' is a %smount point for volume '%.*s'\n",
1598                    ti->data,
1599                    (thru_symlink ? "symbolic link, leading to a " : ""),
1600                    blob.out_size,
1601                    space);
1602
1603         } else {
1604             if (errno == EINVAL) {
1605                 fprintf(stderr,"'%s' is not a mount point.\n", ti->data);
1606             } else {
1607                 fs_Die(errno, (ti->data ? ti->data : parent_dir));
1608             }
1609             error = 1;
1610         }
1611     }
1612     return error;
1613 }
1614
1615 static int
1616 MakeMountCmd(struct cmd_syndesc *as, void *arock)
1617 {
1618     afs_int32 code;
1619     char *cellName, *volName, *tmpName;
1620 #ifdef WIN32
1621     char localCellName[128];
1622 #endif
1623     char path[1024] = "";
1624     struct afsconf_cell info;
1625     struct vldbentry vldbEntry;
1626     struct ViceIoctl blob;
1627     char * parent;
1628     size_t len;
1629
1630     memset(&info, 0, sizeof(info));
1631
1632     if (as->parms[2].items)     /* cell name specified */
1633         cellName = as->parms[2].items->data;
1634     else
1635         cellName = NULL;
1636     volName = as->parms[1].items->data;
1637     if( FAILED(StringCbLength(volName, VL_MAXNAMELEN, &len))) {
1638         fprintf(stderr,"%s: volume name too long (length must be <= 64 characters)\n", pn);
1639         return 1;
1640     }
1641
1642     /* Check for a cellname in the volume specification, and complain
1643      * if it doesn't match what was specified with -cell */
1644     if (tmpName = strchr(volName, ':')) {
1645         *tmpName = '\0';
1646         if (cellName) {
1647             if (strcasecmp(cellName,volName)) {
1648                 fprintf(stderr,"fs: cellnames do not match.\n");
1649                 return 1;
1650             }
1651         }
1652         cellName = volName;
1653         volName = ++tmpName;
1654     }
1655
1656     parent = fs_GetParent(as->parms[0].items->data);
1657     if (!fs_InAFS(parent)) {
1658 #ifdef WIN32
1659         const char * nbname = fs_NetbiosName();
1660         if ( FAILED(StringCbLength(nbname, NETBIOSNAMESZ, &len))) {
1661             fprintf (stderr, "StringCbLength failure on nbname");
1662             exit(1);
1663         }
1664         if (parent[0] == '\\' && parent[1] == '\\' &&
1665             (parent[len+2] == '\\' && parent[len+3] == '\0' || parent[len+2] == '\0') &&
1666             !strnicmp(nbname,&parent[2],len))
1667         {
1668             if( FAILED(StringCbPrintf(path, sizeof(path),"%s%sall%s", parent,
1669                                       parent[len+2]?"":"\\",
1670                                       &as->parms[0].items->data[len+2]))) {
1671                 fprintf (stderr, "path - cannot be populated");
1672                 exit(1);
1673             }
1674             parent = fs_GetParent(path);
1675             if (!fs_InAFS(parent)) {
1676                 fprintf(stderr,"%s: mount points must be created within the AFS file system\n", pn);
1677                 return 1;
1678             }
1679         } else
1680 #endif
1681         {
1682             fprintf(stderr,"%s: mount points must be created within the AFS file system\n", pn);
1683             return 1;
1684         }
1685     }
1686
1687     if( FAILED(StringCbLength(path, sizeof(path), &len))) {
1688         fprintf (stderr, "StringCbLength failure on path");
1689         exit(1);
1690     }
1691     if ( len == 0 ) {
1692         if( FAILED(StringCbCopy(path, sizeof(path), as->parms[0].items->data))) {
1693             fprintf (stderr, "path - not enough space");
1694             exit(1);
1695         }
1696     }
1697     if ( fs_IsFreelanceRoot(parent) ) {
1698         if ( !fs_IsAdmin() ) {
1699             fprintf(stderr,"%s: Only AFS Client Administrators may alter the Freelance root.afs volume\n", pn);
1700             return 1;
1701         }
1702
1703         if (!cellName) {
1704             blob.in_size = 0;
1705             blob.out_size = sizeof(localCellName);
1706             blob.out = localCellName;
1707             code = pioctl_utf8(parent, VIOC_GET_WS_CELL, &blob, 1);
1708             if (!code) {
1709                 localCellName[sizeof(localCellName) - 1] = '\0';
1710                 cellName = localCellName;
1711             }
1712         }
1713     } else {
1714         if (!cellName) {
1715             code = GetCell(parent, space, sizeof(space));
1716             if (code)
1717                 return 1;
1718         }
1719     }
1720
1721     code = GetCellName(cellName?cellName:space, &info);
1722     if (code) {
1723         return 1;
1724     }
1725     if (!(as->parms[4].items)) {
1726       /* not fast, check which cell the mountpoint is being created in */
1727       code = 0;
1728         /* not fast, check name with VLDB */
1729       if (!code)
1730         code = VLDBInit(1, &info);
1731       if (code == 0) {
1732           /* make the check.  Don't complain if there are problems with init */
1733           code = ubik_VL_GetEntryByNameO(uclient, 0, volName, &vldbEntry);
1734           if (code == VL_NOENT) {
1735               fprintf(stderr,"%s: warning, volume %s does not exist in cell %s.\n",
1736                       pn, volName, cellName ? cellName : space);
1737           }
1738       }
1739     }
1740
1741     if (as->parms[3].items) {   /* if -rw specified */
1742         if( FAILED(StringCbCopy(space, sizeof(space), "%"))) {
1743             fprintf (stderr, "space arr - not enough space");
1744             exit(1);
1745         }
1746         } else {
1747             if( FAILED(StringCbCopy(space, sizeof(space), "#"))) {
1748                fprintf (stderr, "space arr - not enough space");
1749                exit(1);
1750             }
1751         }
1752     if (cellName) {
1753         /* cellular mount point, prepend cell prefix */
1754         if( FAILED(StringCbCat(space, sizeof(space), info.name))) {
1755             fprintf (stderr, "space arr - not enough space");
1756             exit(1);
1757         }
1758         if( FAILED(StringCbCat(space, sizeof(space), ":"))) {
1759             fprintf (stderr, "space arr - not enough space");
1760             exit(1);
1761         }
1762     }
1763     if( FAILED(StringCbCat(space, sizeof(space), volName))) {    /* append volume name */
1764         fprintf (stderr, "space arr - not enough space");
1765         exit(1);
1766     }
1767     if( FAILED(StringCbCat(space, sizeof(space), "."))) {    /* stupid convention; these end with a period */
1768         fprintf (stderr, "space arr - not enough space");
1769         exit(1);
1770     }
1771 #ifdef WIN32
1772     /* create symlink with a special pioctl for Windows NT, since it doesn't
1773      * have a symlink system call.
1774      */
1775     blob.out_size = 0;
1776     if( FAILED(StringCbLength(space, sizeof(space), &len))) {
1777         fprintf (stderr, "StringCbLength failure on space");
1778         exit(1);
1779     }
1780     blob.in_size = 1 + (long)len;
1781     blob.in = space;
1782     blob.out = NULL;
1783     code = pioctl_utf8(path, VIOC_AFS_CREATE_MT_PT, &blob, 0);
1784 #else /* not WIN32 */
1785     code = symlink(space, path);
1786 #endif /* not WIN32 */
1787
1788     if (info.linkedCell)
1789         free(info.linkedCell);
1790
1791     if (code) {
1792         fs_Die(errno, path);
1793         return 1;
1794     }
1795     return 0;
1796 }
1797
1798 /*
1799  * Delete AFS mount points.  Variables are used as follows:
1800  *       tbuffer: Set to point to the null-terminated directory name of the mount point
1801  *          (or ``.'' if none is provided)
1802  *      tp: Set to point to the actual name of the mount point to nuke.
1803  */
1804 static int
1805 RemoveMountCmd(struct cmd_syndesc *as, void *arock) {
1806     afs_int32 code=0;
1807     struct ViceIoctl blob;
1808     struct cmd_item *ti;
1809     char tbuffer[1024];
1810     char lsbuffer[1024];
1811     char *tp;
1812     int error = 0;
1813     size_t len;
1814
1815     for(ti=as->parms[0].items; ti; ti=ti->next) {
1816         /* once per file */
1817         tp = (char *) strrchr(ti->data, '\\');
1818         if (!tp)
1819             tp = (char *) strrchr(ti->data, '/');
1820         if (tp) {
1821             if( FAILED(StringCchCopyN(tbuffer, sizeof(tbuffer) / sizeof(char), ti->data, code=(afs_int32)(tp-ti->data+1)))) {    /* the dir name */
1822                 fprintf (stderr, "tbuffer - not enough space");
1823                 exit(1);
1824             }
1825             tp++;   /* skip the slash */
1826
1827 #ifdef WIN32
1828             if (!fs_InAFS(tbuffer)) {
1829                 const char * nbname = fs_NetbiosName();
1830                 if( FAILED(StringCbLength(nbname, NETBIOSNAMESZ, &len))) {
1831                     fprintf (stderr, "StringCbLength failure on nbname");
1832                     exit(1);
1833                 }
1834
1835                 if (tbuffer[0] == '\\' && tbuffer[1] == '\\' &&
1836                     tbuffer[len+2] == '\\' &&
1837                     tbuffer[len+3] == '\0' &&
1838                     !strnicmp(nbname,&tbuffer[2],len))
1839                 {
1840                     if( FAILED(StringCbPrintf(tbuffer, sizeof(tbuffer),"\\\\%s\\all\\", nbname))) {
1841                         fprintf (stderr, "tbuffer - cannot be populated");
1842                         exit(1);
1843                     }
1844                 }
1845             }
1846 #endif
1847         } else {
1848             fs_ExtractDriveLetter(ti->data, tbuffer);
1849             if( FAILED(StringCbCat(tbuffer, sizeof(tbuffer), "."))) {
1850                 fprintf (stderr, "tbuffer - not enough space");
1851                 exit(1);
1852             }
1853             tp = ti->data;
1854             fs_StripDriveLetter(tp, tp, strlen(tp) + 1);
1855         }
1856         blob.in = tp;
1857         if( FAILED(StringCbLength(tp, AFS_PIOCTL_MAXSIZE, &len))) {
1858             fprintf (stderr, "StringCbLength failure on tp");
1859             exit(1);
1860         }
1861         blob.in_size = (long)len+1;
1862         blob.out = lsbuffer;
1863         blob.out_size = sizeof(lsbuffer);
1864         code = pioctl_utf8(tbuffer, VIOC_AFS_STAT_MT_PT, &blob, 0);
1865         if (code) {
1866             if (errno == EINVAL) {
1867                 fprintf(stderr,"%s: '%s' is not a mount point.\n", pn, ti->data);
1868             } else {
1869                 fs_Die(errno, ti->data);
1870             }
1871             error = 1;
1872             continue;   /* don't bother trying */
1873         }
1874
1875         if ( fs_IsFreelanceRoot(tbuffer) && !fs_IsAdmin() ) {
1876             fprintf(stderr,"%s: Only AFS Client Administrators may alter the Freelance root.afs volume\n", pn);
1877             error = 1;
1878             continue;   /* skip */
1879         }
1880
1881         blob.out_size = 0;
1882         blob.in = tp;
1883         if( FAILED(StringCbLength(tp, AFS_PIOCTL_MAXSIZE, &len))) {
1884             fprintf (stderr, "StringCbLength failure on tp");
1885             exit(1);
1886         }
1887         blob.in_size = (long)len+1;
1888         code = pioctl_utf8(tbuffer, VIOC_AFS_DELETE_MT_PT, &blob, 0);
1889         if (code) {
1890             fs_Die(errno, ti->data);
1891             error = 1;
1892         }
1893     }
1894     return error;
1895 }
1896
1897 /*
1898 */
1899
1900 static int
1901 CheckServersCmd(struct cmd_syndesc *as, void *arock)
1902 {
1903     afs_int32 code;
1904     struct ViceIoctl blob;
1905     afs_int32 j;
1906     afs_int32 temp;
1907     char *tp;
1908     struct afsconf_cell info;
1909     struct chservinfo checkserv;
1910     errno_t err;
1911     size_t len;
1912
1913     memset(&info, 0, sizeof(info));
1914     memset(&checkserv, 0, sizeof(struct chservinfo));
1915     blob.in_size=sizeof(struct chservinfo);
1916     blob.in=(caddr_t)&checkserv;
1917
1918     blob.out_size = AFS_PIOCTL_MAXSIZE;
1919     blob.out = space;
1920     memset(space, 0, sizeof(afs_int32));        /* so we assure zero when nothing is copied back */
1921
1922     /* prepare flags for checkservers command */
1923     temp = 2;   /* default to checking local cell only */
1924     if (as->parms[2].items)
1925         temp |= 1;      /* set fast flag */
1926     if (as->parms[1].items)
1927         temp &= ~2;     /* turn off local cell check */
1928
1929     checkserv.magic = 0x12345678;       /* XXX */
1930     checkserv.tflags=temp;
1931
1932     /* now copy in optional cell name, if specified */
1933     if (as->parms[0].items) {
1934         code = GetCellName(as->parms[0].items->data, &info);
1935         if (code) {
1936             return 1;
1937         }
1938         if( FAILED(StringCbCopy(checkserv.tbuffer, sizeof(checkserv.tbuffer), info.name))) {
1939             fprintf (stderr, "tbuffer - not enough space");
1940             exit(1);
1941         }
1942         if( FAILED(StringCbLength(info.name, sizeof(info.name), &len))) {
1943             fprintf (stderr, "StringCbLength failure on info.name");
1944             exit(1);
1945         }
1946         checkserv.tsize=(int)len+1;
1947         if (info.linkedCell)
1948             free(info.linkedCell);
1949     } else {
1950         if( FAILED(StringCbCopy(checkserv.tbuffer, sizeof(checkserv.tbuffer),"\0"))) {
1951             fprintf (stderr, "tbuffer - not enough space");
1952             exit(1);
1953         }
1954         checkserv.tsize=0;
1955     }
1956
1957     if(as->parms[3].items) {
1958         checkserv.tinterval=atol(as->parms[3].items->data);
1959
1960         /* sanity check */
1961         if(checkserv.tinterval<0) {
1962             printf("Warning: The negative -interval is ignored; treated as an inquiry\n");
1963             checkserv.tinterval=-1;
1964         } else if(checkserv.tinterval> 600) {
1965             printf("Warning: The maximum -interval value is 10 mins (600 secs)\n");
1966             checkserv.tinterval=600;    /* 10 min max interval */
1967         }
1968     } else {
1969         checkserv.tinterval = -1;       /* don't change current interval */
1970     }
1971
1972     if ( checkserv.tinterval >= 0 ) {
1973 #ifdef WIN32
1974         if ( !fs_IsAdmin() ) {
1975             fprintf (stderr,"Permission denied: requires AFS Client Administrator access.\n");
1976             return EACCES;
1977         }
1978 #else /* WIN32 */
1979         if (geteuid()) {
1980             fprintf (stderr,"Permission denied: requires root access.\n");
1981             return EACCES;
1982         }
1983 #endif /* WIN32 */
1984     }
1985
1986     code = pioctl_utf8(0, VIOCCKSERV, &blob, 1);
1987     if (code) {
1988         if ((errno == EACCES) && (checkserv.tinterval > 0)) {
1989             printf("Must be root to change -interval\n");
1990             return code;
1991         }
1992         fs_Die(errno, 0);
1993         return 1;
1994     }
1995 #if _MSC_VER < 1400
1996     memcpy(&temp, space, sizeof(afs_int32));
1997 #else
1998     err = memcpy_s(&temp, sizeof(temp), space, sizeof(afs_int32));
1999     if ( err ) {
2000         fprintf (stderr, "memcpy_s failure on temp");
2001         exit(1);
2002     }
2003 #endif
2004
2005     if (checkserv.tinterval >= 0) {
2006         if (checkserv.tinterval > 0)
2007             printf("The new down server probe interval (%d secs) is now in effect (old interval was %d secs)\n",
2008                    checkserv.tinterval, temp);
2009         else
2010             printf("The current down server probe interval is %d secs\n", temp);
2011         return 0;
2012     }
2013     if (temp == 0) {
2014         printf("All servers are running.\n");
2015     } else {
2016         printf("These servers unavailable due to network or server problems: ");
2017         for(j=0; j < AFS_MAXHOSTS; j++) {
2018 #if _MSC_VER < 1400
2019             memcpy(&temp, space + j*sizeof(afs_int32), sizeof(afs_int32));
2020 #else
2021             err = memcpy_s(&temp, sizeof(temp), space + j*sizeof(afs_int32), sizeof(afs_int32));
2022             if ( err ) {
2023                 fprintf (stderr, "memcpy_s failure on temp");
2024                 exit(1);
2025             }
2026 #endif
2027
2028             if (temp == 0)
2029                 break;
2030             tp = hostutil_GetNameByINet(temp);
2031             printf(" %s", tp);
2032         }
2033         printf(".\n");
2034         code = 1;       /* XXX */
2035     }
2036     return code;
2037 }
2038
2039 static int
2040 MessagesCmd(struct cmd_syndesc *as, void *arock)
2041 {
2042     afs_int32 code=0;
2043     struct ViceIoctl blob;
2044     struct gaginfo gagflags;
2045     struct cmd_item *show;
2046
2047     memset(&gagflags, 0, sizeof(struct gaginfo));
2048     blob.in_size = sizeof(struct gaginfo);
2049     blob.in = (caddr_t ) &gagflags;
2050     blob.out_size = AFS_PIOCTL_MAXSIZE;
2051     blob.out = space;
2052     memset(space, 0, sizeof(afs_int32));        /* so we assure zero when nothing is copied back */
2053
2054     if (show = as->parms[0].items) {
2055         if (!strcasecmp (show->data, "user"))
2056             gagflags.showflags |= GAGUSER;
2057         else if (!strcasecmp (show->data, "console"))
2058             gagflags.showflags |= GAGCONSOLE;
2059         else if (!strcasecmp (show->data, "all"))
2060             gagflags.showflags |= GAGCONSOLE | GAGUSER;
2061         else if (!strcasecmp (show->data, "none"))
2062             /* do nothing */ ;
2063         else {
2064             fprintf(stderr,
2065                      "unrecognized flag %s: must be in {user,console,all,none}\n",
2066                      show->data);
2067             code = EINVAL;
2068         }
2069     }
2070
2071     if (code)
2072         return 1;
2073
2074     code = pioctl_utf8(0, VIOC_GAG, &blob, 1);
2075     if (code) {
2076         fs_Die(errno, 0);
2077         return 1;
2078     }
2079     return 0;
2080 }
2081
2082 static int
2083 CheckVolumesCmd(struct cmd_syndesc *as, void *arock)
2084 {
2085     afs_int32 code;
2086     struct ViceIoctl blob;
2087
2088     blob.in_size = 0;
2089     blob.out_size = 0;
2090     code = pioctl_utf8(0, VIOCCKBACK, &blob, 1);
2091     if (code) {
2092         fs_Die(errno, 0);
2093         return 1;
2094     }
2095     printf("All volumeID/name mappings checked.\n");
2096
2097     return 0;
2098 }
2099
2100 static int
2101 SetCacheSizeCmd(struct cmd_syndesc *as, void *arock)
2102 {
2103     afs_int32 code;
2104     struct ViceIoctl blob;
2105     afs_int32 temp;
2106
2107 #ifdef WIN32
2108     if ( !fs_IsAdmin() ) {
2109         fprintf (stderr,"Permission denied: requires AFS Client Administrator access.\n");
2110         return EACCES;
2111     }
2112 #else /* WIN32 */
2113     if (geteuid()) {
2114         fprintf (stderr,"Permission denied: requires root access.\n");
2115         return EACCES;
2116     }
2117 #endif /* WIN32 */
2118
2119     if (!as->parms[0].items && !as->parms[1].items) {
2120         fprintf(stderr,"%s: syntax error in set cache size cmd.\n", pn);
2121         return 1;
2122     }
2123     if (as->parms[0].items) {
2124         code = util_GetHumanInt32(as->parms[0].items->data, &temp);
2125         if (code) {
2126             fprintf(stderr,"%s: bad integer specified for cache size.\n", pn);
2127             return 1;
2128         }
2129     } else
2130         temp = 0;
2131     blob.in = (char *) &temp;
2132     blob.in_size = sizeof(afs_int32);
2133     blob.out_size = 0;
2134     code = pioctl_utf8(0, VIOCSETCACHESIZE, &blob, 1);
2135     if (code) {
2136         fs_Die(errno, (char *) 0);
2137         return 1;
2138     }
2139
2140     printf("New cache size set.\n");
2141     return 0;
2142 }
2143
2144 static int
2145 GetCacheParmsCmd(struct cmd_syndesc *as, void *arock)
2146 {
2147     afs_int32 code;
2148     struct ViceIoctl blob;
2149     cm_cacheParms_t parms;
2150
2151     memset(&parms, 0, sizeof(parms));
2152     blob.in = NULL;
2153     blob.in_size = 0;
2154     blob.out_size = sizeof(parms);
2155     blob.out = (char *) &parms;
2156     code = pioctl_utf8(0, VIOCGETCACHEPARMS, &blob, 1);
2157     if (code || blob.out_size != sizeof(parms)) {
2158         fs_Die(errno, NULL);
2159         return 1;
2160     }
2161
2162     printf("AFS using %I64u of the cache's available %I64u 1K byte blocks.\n",
2163            parms.parms[1], parms.parms[0]);
2164     if (parms.parms[1] > parms.parms[0])
2165         printf("[Cache guideline temporarily deliberately exceeded; it will be adjusted down but you may wish to increase the cache size.]\n");
2166     return 0;
2167 }
2168
2169 static int
2170 ListCellsCmd(struct cmd_syndesc *as, void *arock)
2171 {
2172     afs_int32 code;
2173     afs_int32 i, j, *lp, magic, size;
2174     char *tp;
2175     afs_int32 addr, maxa = AFS_OMAXHOSTS;
2176     struct ViceIoctl blob;
2177     int resolve;
2178     errno_t err;
2179
2180     resolve = !(as->parms[0].items);    /* -numeric */
2181
2182     for(i=0;i<1000;i++) {
2183         tp = space;
2184 #if _MSC_VER < 1400
2185         memcpy(tp, &i, sizeof(afs_int32));
2186 #else
2187         err = memcpy_s(tp, sizeof(space), &i, sizeof(afs_int32));
2188         if ( err ) {
2189             fprintf (stderr, "memcpy_s failure on tp");
2190             exit(1);
2191         }
2192 #endif
2193         tp = (char *)(space + sizeof(afs_int32));
2194         lp = (afs_int32 *)tp;
2195         *lp++ = 0x12345678;
2196         size = sizeof(afs_int32) + sizeof(afs_int32);
2197         blob.out_size = AFS_PIOCTL_MAXSIZE;
2198         blob.in_size = sizeof(afs_int32);
2199         blob.in = space;
2200         blob.out = space;
2201         code = pioctl_utf8(0, VIOCGETCELL, &blob, 1);
2202         if (code < 0) {
2203             if (errno == EDOM)
2204                 break;  /* done with the list */
2205             fs_Die(errno, 0);
2206             return 1;
2207         }
2208         tp = space;
2209 #if _MSC_VER < 1400
2210         memcpy(&magic, tp, sizeof(afs_int32));
2211 #else
2212         err = memcpy_s(&magic, sizeof(magic), tp, sizeof(afs_int32));
2213         if ( err ) {
2214             fprintf (stderr, "memcpy_s failure on magic");
2215             exit(1);
2216         }
2217 #endif
2218         if (magic == 0x12345678) {
2219             maxa = AFS_MAXHOSTS;
2220             tp += sizeof(afs_int32);
2221         }
2222         printf("Cell %s on hosts", tp+maxa*sizeof(afs_int32));
2223         for(j=0; j < maxa && j*sizeof(afs_int32) < AFS_PIOCTL_MAXSIZE; j++) {
2224             char *name, tbuffer[20];
2225 #if _MSC_VER < 1400
2226             memcpy(&addr, tp + j*sizeof(afs_int32), sizeof(afs_int32));
2227 #else
2228             err = memcpy_s(&addr, sizeof(addr), tp + j*sizeof(afs_int32), sizeof(afs_int32));
2229             if ( err ) {
2230                 fprintf (stderr, "memcpy_s failure on addr");
2231                 exit(1);
2232            }
2233 #endif
2234             if (addr == 0)
2235                 break;
2236
2237             if (resolve) {
2238                 name = hostutil_GetNameByINet(addr);
2239             } else {
2240                 addr = ntohl(addr);
2241                 if( FAILED(StringCbPrintf(tbuffer, sizeof(tbuffer), "%d.%d.%d.%d", (addr >> 24) & 0xff,
2242                          (addr >> 16) & 0xff, (addr >> 8) & 0xff, addr & 0xff))) {
2243                     fprintf (stderr, "tbuffer - cannot be populated");
2244                     exit(1);
2245                 }
2246                 name = tbuffer;
2247             }
2248             printf(" %s", name);
2249         }
2250         printf(".\n");
2251     }
2252     return 0;
2253 }
2254
2255 #ifndef WIN32
2256 static int
2257 ListAliasesCmd(struct cmd_syndesc *as, void *arock)
2258 {
2259     afs_int32 code, i;
2260     char *tp, *aliasName, *realName;
2261     struct ViceIoctl blob;
2262     errno_t err;
2263     size_t len;
2264
2265     for (i = 0;; i++) {
2266         tp = space;
2267 #if _MSC_VER < 1400
2268         memcpy(tp, &i, sizeof(afs_int32));
2269 #else
2270         err = memcpy_s(tp, sizeof(space), &i, sizeof(afs_int32));
2271         if ( err ) {
2272             fprintf (stderr, "memcpy_s failure on tp");
2273             exit(1);
2274        }
2275 #endif
2276         blob.out_size = AFS_PIOCTL_MAXSIZE;
2277         blob.in_size = sizeof(afs_int32);
2278         blob.in = space;
2279         blob.out = space;
2280         code = pioctl_utf8(0, VIOC_GETALIAS, &blob, 1);
2281         if (code < 0) {
2282             if (errno == EDOM)
2283                 break;          /* done with the list */
2284             fs_Die(errno, 0);
2285             return 1;
2286         }
2287         space[blob.out_size - 1] = '\0';
2288         tp = space;
2289         aliasName = tp;
2290         if( FAILED(StringCbLength(aliasName, sizeof(space), &len))) {
2291             fprintf (stderr, "StringCbLength failure on aliasName");
2292             exit(1);
2293         }
2294         tp += len + 1;
2295         realName = tp;
2296         printf("Alias %s for cell %s\n", aliasName, realName);
2297     }
2298     return 0;
2299 }
2300
2301 static int
2302 CallBackRxConnCmd(struct cmd_syndesc *as, void *arock)
2303 {
2304     afs_int32 code;
2305     struct ViceIoctl blob;
2306     struct cmd_item *ti;
2307     afs_int32 hostAddr;
2308     struct hostent *thp;
2309     char *tp;
2310     int setp;
2311
2312     ti = as->parms[0].items;
2313     setp = 1;
2314     if (ti) {
2315         thp = hostutil_GetHostByName(ti->data);
2316         if (!thp) {
2317             fprintf(stderr, "host %s not found in host table.\n", ti->data);
2318             return 1;
2319         } else {
2320 #if _MSC_VER < 1400
2321             memcpy(&hostAddr, thp->h_addr, sizeof(afs_int32));
2322 #else
2323             err = memcpy_s(&hostAddr, sizeof(hostAddr), thp->h_addr, sizeof(afs_int32));
2324             if ( err ) {
2325                 fprintf (stderr, "memcpy_s failure on hostAddr");
2326                 exit(1);
2327             }
2328 #endif
2329     } else {
2330         hostAddr = 0;   /* means don't set host */
2331         setp = 0;       /* aren't setting host */
2332     }
2333
2334     /* now do operation */
2335     blob.in_size = sizeof(afs_int32);
2336     blob.out_size = sizeof(afs_int32);
2337     blob.in = (char *) &hostAddr;
2338     blob.out = (char *) &hostAddr;
2339
2340     code = pioctl_utf8(0, VIOC_CBADDR, &blob, 1);
2341     if (code < 0) {
2342         fs_Die(errno, 0);
2343         return 1;
2344     }
2345     return 0;
2346 }
2347 #endif /* WIN32 */
2348
2349 static int
2350 NewCellCmd(struct cmd_syndesc *as, void *arock)
2351 {
2352     afs_uint32 code, linkedstate=0, size=0, count=0, *lp;
2353     afs_uint32 usedns=0, useregistry=0;
2354     struct ViceIoctl blob;
2355     struct cmd_item *ti;
2356     char *tp, *cellname=0, *linked_cellname=0;
2357     afs_uint32 fsport = 0, vlport = 0;
2358     size_t destRemaining;
2359
2360     if ( !fs_IsAdmin() ) {
2361         fprintf (stderr,"Permission denied: requires AFS Client Administrator access.\n");
2362         return EACCES;
2363     }
2364
2365     /* if there is no cell specified, use old Windows behavior */
2366     if (as->parms[0].items == NULL) {
2367         blob.in_size = 0;
2368         blob.in = (char *) 0;
2369         blob.out_size = AFS_PIOCTL_MAXSIZE;
2370         blob.out = space;
2371
2372         code = pioctl_utf8((char *) 0, VIOCNEWCELL, &blob, 1);
2373
2374         if (code) {
2375             fs_Die(errno, (char *) 0);
2376             return 1;
2377         }
2378
2379         printf("Cell servers information refreshed\n");
2380         return 0;
2381     } else {
2382         cellname = as->parms[0].items->data;
2383     }
2384
2385     if (as->parms[2].items) {
2386         /*
2387          * Link the cell, for the purposes of volume location, to the specified
2388          * cell.
2389          */
2390         linked_cellname = as->parms[2].items->data;
2391         linkedstate = 1;
2392     }
2393
2394     if (as->parms[3].items) {
2395         code = util_GetInt32(as->parms[2].items->data, &vlport);
2396         if (code) {
2397             fprintf(stderr,"fs: bad integer specified for the fileserver port.\n");
2398             return code;
2399         }
2400     }
2401     if (as->parms[4].items) {
2402         code = util_GetInt32(as->parms[3].items->data, &fsport);
2403         if (code) {
2404             fprintf(stderr,"fs: bad integer specified for the vldb server port.\n");
2405             return code;
2406         }
2407     }
2408
2409     if (as->parms[5].items) {
2410         useregistry = 1;
2411     }
2412
2413     if (as->parms[6].items) {
2414         usedns = 1;
2415     }
2416
2417     /* Count the number of hostnames */
2418     for (ti=as->parms[1].items; ti && count < AFS_MAXHOSTS; ti=ti->next, count++);
2419
2420     if (!usedns && count == 0) {
2421         fprintf( stderr, "fs: at least one vldb server must be specified.");
2422         exit(1);
2423     }
2424
2425     if (count > AFS_MAXHOSTS) {
2426         fprintf( stderr, "fs: at most %u servers may be specified.", AFS_MAXHOSTS);
2427         exit(1);
2428     }
2429
2430     /*
2431      * The pioctl data buffer consists of the following structure:
2432      *
2433      *  afs_uint32 flags
2434      *  afs_uint32 alternative fs port
2435      *  afs_uint32 alternative vl port
2436      *  afs_uint32 count of vldb servers
2437      *  char[]     cellname
2438      *  char[]     linkedcell
2439      *  n * char[] hostnames
2440      */
2441
2442     memset(space, 0, sizeof(space));
2443     tp = space;
2444     lp = (afs_uint32 *)tp;
2445
2446     /* flags */
2447     if (usedns)
2448         *lp |= VIOC_NEWCELL2_FLAG_USEDNS;
2449
2450     if (useregistry)
2451         *lp |= VIOC_NEWCELL2_FLAG_USEREG;
2452
2453     if (linkedstate)
2454         *lp |= VIOC_NEWCELL2_FLAG_LINKED;
2455     lp++;
2456
2457     /* alt fs port */
2458     *lp++ = fsport;
2459
2460     /* alt vl port */
2461     *lp++ = vlport;
2462
2463     /* count of server names */
2464     *lp++ = count;
2465
2466     /* Switch back to char pointer */
2467     tp = (char *)lp;
2468
2469     /* Add nul-terminated cellname */
2470     destRemaining = sizeof(space) - (tp - space);
2471     if( FAILED(StringCbCopyEx( tp,
2472                                destRemaining,
2473                                as->parms[0].items->data,
2474                                &tp,
2475                                &destRemaining,
2476                                STRSAFE_FILL_ON_FAILURE))) {
2477         fprintf (stderr, " not enough space for cellname");
2478         exit(1);
2479     }
2480     /* Move beyond the terminating nul */
2481     tp++;
2482     destRemaining -= sizeof(char);
2483
2484     /* Add nul-terminated linkname */
2485     if( FAILED(StringCbCopyEx( tp,
2486                                destRemaining,
2487                                linkedstate ? linked_cellname : "",
2488                                &tp,
2489                                &destRemaining,
2490                                STRSAFE_FILL_ON_FAILURE))) {
2491         fprintf (stderr, " not enough space for linked cellname");
2492         exit(1);
2493     }
2494     /* Move beyond the terminating nul */
2495     tp++;
2496     destRemaining -= sizeof(char);
2497
2498     /* Add the servers */
2499     for (ti=as->parms[1].items; ti; ti=ti->next) {
2500         if( FAILED(StringCbCopyEx( tp,
2501                                    destRemaining,
2502                                    ti->data,
2503                                    &tp,
2504                                    &destRemaining,
2505                                    STRSAFE_FILL_ON_FAILURE))) {
2506             fprintf (stderr, " not enough space for server %s", ti->data);
2507             exit(1);
2508         }
2509         /* Move beyond the terminating nul */
2510         tp++;
2511         destRemaining -= sizeof(char);
2512     }
2513
2514     blob.in_size = (tp - space);
2515     blob.in = space;
2516     blob.out_size = 0;
2517     blob.out = space;
2518     code = pioctl_utf8(NULL, VIOCNEWCELL2, &blob, 1);
2519
2520     if (code) {
2521         fs_Die(errno, as->parms[0].items->data);
2522         return 1;
2523     }
2524
2525     printf("Cell servers information for %s added or updated.\n",
2526            as->parms[0].items->data);
2527     return 0;
2528 }
2529
2530 #ifndef WIN32
2531 static int
2532 NewAliasCmd(struct cmd_syndesc *as, void *arock)
2533 {
2534     afs_int32 code;
2535     struct ViceIoctl blob;
2536     char *tp;
2537     char *aliasName, *realName;
2538     size_t destRemaining = sizeof(space);
2539
2540     /* Setup and do the NEWALIAS pioctl call */
2541     aliasName = as->parms[0].items->data;
2542     realName = as->parms[1].items->data;
2543     tp = space;
2544     if( FAILED(StringCbCopyEx(tp, destRemaining, aliasName, &tp, &destRemaining, STRSAFE_FILL_ON_FAILURE))) {
2545         fprintf (stderr, "tp - not enough space");
2546         exit(1);
2547     }
2548     tp++;
2549     destRemaining -= sizeof(char);
2550     if( FAILED(StringCbCopyEx(tp, destRemaining, realName, &tp, &destRemaining, STRSAFE_FILL_ON_FAILURE))) {
2551         fprintf (stderr, "tp - not enough space");
2552         exit(1);
2553     }
2554     tp++;
2555     destRemaining -= sizeof(char);
2556
2557     blob.in_size = tp - space;
2558     blob.in = space;
2559     blob.out_size = 0;
2560     blob.out = space;
2561     code = pioctl_utf8(0, VIOC_NEWALIAS, &blob, 1);
2562     if (code < 0) {
2563         if (errno == EEXIST) {
2564             fprintf(stderr,
2565                     "%s: cell name `%s' in use by an existing cell.\n", pn,
2566                     aliasName);
2567         } else {
2568             fs_Die(errno, 0);
2569         }
2570         return 1;
2571     }
2572     return 0;
2573 }
2574 #endif /* WIN32 */
2575
2576 static int
2577 WhichCellCmd(struct cmd_syndesc *as, void *arock)
2578 {
2579     afs_int32 code;
2580     struct cmd_item *ti;
2581     struct ViceIoctl blob;
2582     int error = 0;
2583     int literal = 0;
2584     cm_ioctlQueryOptions_t options;
2585
2586     if (as->parms[1].items)
2587         literal = 1;
2588
2589     SetDotDefault(&as->parms[0].items);
2590     for(ti=as->parms[0].items; ti; ti=ti->next) {
2591         cm_fid_t fid;
2592         afs_uint32 filetype;
2593         char cell[CELL_MAXNAMELEN];
2594
2595         /* once per file */
2596         memset(&fid, 0, sizeof(fid));
2597         memset(&options, 0, sizeof(options));
2598         filetype = 0;
2599         options.size = sizeof(options);
2600         options.field_flags |= CM_IOCTL_QOPTS_FIELD_LITERAL;
2601         options.literal = literal;
2602         blob.in_size = options.size;    /* no variable length data */
2603         blob.in = &options;
2604
2605         blob.out_size = sizeof(cm_fid_t);
2606         blob.out = (char *) &fid;
2607         if (0 == pioctl_utf8(ti->data, VIOCGETFID, &blob, 1) &&
2608             blob.out_size == sizeof(cm_fid_t)) {
2609             options.field_flags |= CM_IOCTL_QOPTS_FIELD_FID;
2610             options.fid = fid;
2611         } else {
2612             fs_Die(errno, ti->data);
2613             error = 1;
2614             continue;
2615         }
2616
2617         blob.out_size = sizeof(filetype);
2618         blob.out = &filetype;
2619
2620         code = pioctl_utf8(ti->data, VIOC_GETFILETYPE, &blob, 1);
2621         if (code || blob.out_size != sizeof(filetype)) {
2622             fs_Die(errno, ti->data);
2623             error = 1;
2624             continue;
2625         }
2626         blob.out_size = CELL_MAXNAMELEN;
2627         blob.out = cell;
2628
2629         code = pioctl_utf8(ti->data, VIOC_FILE_CELL_NAME, &blob, 1);
2630         if (code) {
2631             if (errno == ENOENT)
2632                 fprintf(stderr,"%s: no such cell as '%s'\n", pn, ti->data);
2633             else
2634                 fs_Die(errno, ti->data);
2635             error = 1;
2636             continue;
2637         }
2638         cell[CELL_MAXNAMELEN - 1] = '\0';
2639         printf("%s %s lives in cell '%s'\n",
2640                 fs_filetypestr(filetype),
2641                 ti->data, cell);
2642     }
2643     return error;
2644 }
2645
2646 static int
2647 WSCellCmd(struct cmd_syndesc *as, void *arock)
2648 {
2649     afs_int32 code;
2650     struct ViceIoctl blob;
2651
2652     blob.in_size = 0;
2653     blob.in = NULL;
2654     blob.out_size = AFS_PIOCTL_MAXSIZE;
2655     blob.out = space;
2656
2657     code = pioctl_utf8(NULL, VIOC_GET_WS_CELL, &blob, 1);
2658
2659     if (code) {
2660         fs_Die(errno, NULL);
2661         return 1;
2662     }
2663     space[AFS_PIOCTL_MAXSIZE - 1] = '\0';
2664     printf("This workstation belongs to cell '%s'\n", space);
2665     return 0;
2666 }
2667
2668 /*
2669 static int
2670 PrimaryCellCmd(struct cmd_syndesc *as, void *arock)
2671 {
2672     fprintf(stderr,"This command is obsolete, as is the concept of a primary token.\n");
2673     return 0;
2674 }
2675 */
2676
2677 #ifndef AFS_NT40_ENV
2678 static int
2679 MonitorCmd(struct cmd_syndesc *as, void *arock)
2680 {
2681     afs_int32 code;
2682     struct ViceIoctl blob;
2683     struct cmd_item *ti;
2684     afs_int32 hostAddr;
2685     struct hostent *thp;
2686     char *tp;
2687     int setp;
2688     errno_t err;
2689
2690     ti = as->parms[0].items;
2691     setp = 1;
2692     if (ti) {
2693         /* set the host */
2694         if (!strcmp(ti->data, "off")) {
2695             hostAddr = 0xffffffff;
2696         } else {
2697             thp = hostutil_GetHostByName(ti->data);
2698             if (!thp) {
2699                 if (!strcmp(ti->data, "localhost")) {
2700                     fprintf(stderr,"localhost not in host table, assuming 127.0.0.1\n");
2701                     hostAddr = htonl(0x7f000001);
2702                 } else {
2703                     fprintf(stderr,"host %s not found in host table.\n", ti->data);
2704                     return 1;
2705                 }
2706             } else {
2707 #if _MSC_VER < 1400
2708                 memcpy(&hostAddr, thp->h_addr, sizeof(afs_int32));
2709 #else
2710                 err = memcpy_s(&hostAddr, sizeof(hostAddr), thp->h_addr, sizeof(afs_int32));
2711                 if ( err ) {
2712                     fprintf (stderr, "memcpy_s failure on hostAddr");
2713                     exit(1);
2714                 }
2715 #endif
2716         }
2717         }
2718     } else {
2719         hostAddr = 0;   /* means don't set host */
2720         setp = 0;       /* aren't setting host */
2721     }
2722
2723     /* now do operation */
2724     blob.in_size = sizeof(afs_int32);
2725     blob.out_size = sizeof(afs_int32);
2726     blob.in = (char *) &hostAddr;
2727     blob.out = (char *) &hostAddr;
2728     code = pioctl_utf8(0, VIOC_AFS_MARINER_HOST, &blob, 1);
2729     if (code || blob.out_size != sizeof(afs_int32)) {
2730         fs_Die(errno, 0);
2731         return 1;
2732     }
2733     if (setp) {
2734         printf("%s: new monitor host set.\n", pn);
2735     } else {
2736         /* now decode old address */
2737         if (hostAddr == 0xffffffff) {
2738             printf("Cache monitoring is currently disabled.\n");
2739         } else {
2740             tp = hostutil_GetNameByINet(hostAddr);
2741             printf("Using host %s for monitor services.\n", tp);
2742         }
2743     }
2744     return 0;
2745 }
2746 #endif /* AFS_NT40_ENV */
2747
2748 static int
2749 SysNameCmd(struct cmd_syndesc *as, void *arock)
2750 {
2751     afs_int32 code;
2752     struct ViceIoctl blob;
2753     struct cmd_item *ti;
2754     char *input = space;
2755     afs_int32 setp = 0;
2756     errno_t err;
2757     size_t destRemaining = sizeof(space);
2758     size_t len;
2759
2760     ti = as->parms[0].items;
2761     if (ti) {
2762 #ifdef WIN32
2763     if ( !fs_IsAdmin() ) {
2764         fprintf (stderr,"Permission denied: requires AFS Client Administrator access.\n");
2765         return EACCES;
2766     }
2767 #else /* WIN32 */
2768     if (geteuid()) {
2769         fprintf (stderr,"Permission denied: requires root access.\n");
2770         return EACCES;
2771     }
2772 #endif /* WIN32 */
2773     }
2774
2775     blob.in = space;
2776     blob.out = space;
2777     blob.out_size = AFS_PIOCTL_MAXSIZE;
2778     blob.in_size = sizeof(afs_int32);
2779 #if _MSC_VER < 1400
2780     memcpy(input, &setp, sizeof(afs_int32));
2781 #else
2782     err = memcpy_s(input, destRemaining, &setp, sizeof(afs_int32));
2783     if ( err ) {
2784         fprintf (stderr, "memcpy_s failure on input");
2785         exit(1);
2786     }
2787 #endif
2788     input += sizeof(afs_int32);
2789     destRemaining -= sizeof(afs_int32);
2790     for (; ti; ti = ti->next) {
2791         setp++;
2792         if( FAILED(StringCbCopyEx(input, destRemaining, ti->data, &input, &destRemaining, STRSAFE_FILL_ON_FAILURE))) {
2793             fprintf(stderr, "%s: sysname%s too long.\n", pn,
2794                      setp > 1 ? "s" : "");
2795             return 1;
2796         }
2797         input++;
2798         destRemaining -= sizeof(char);
2799     }
2800     blob.in_size = (input - space) * sizeof(char);
2801 #if _MSC_VER < 1400
2802     memcpy(space, &setp, sizeof(afs_int32));
2803 #else
2804     err = memcpy_s(space, sizeof(space), &setp, sizeof(afs_int32));
2805     if ( err ) {
2806         fprintf (stderr, "memcpy_s failure on space");
2807         exit(1);
2808     }
2809 #endif
2810
2811     code = pioctl_utf8(0, VIOC_AFS_SYSNAME, &blob, 1);
2812     if (code) {
2813         fs_Die(errno, 0);
2814         return 1;
2815     }
2816     if (setp) {
2817         printf("%s: new sysname%s set.\n", pn, setp > 1 ? " list" : "");
2818         return 0;
2819     }
2820
2821     input = space;
2822 #if _MSC_VER < 1400
2823     memcpy(&setp, input, sizeof(afs_int32));
2824 #else
2825     err = memcpy_s(&setp, sizeof(setp), input, sizeof(afs_int32));
2826     if ( err ) {
2827         fprintf (stderr, "memcpy_s failure on setp");
2828         exit(1);
2829     }
2830 #endif
2831     input += sizeof(afs_int32);
2832     if (!setp) {
2833         fprintf(stderr,"No sysname name value was found\n");
2834         return 1;
2835     }
2836     space[blob.out_size - 1] = '\0';
2837     printf("Current sysname%s is", setp > 1 ? " list" : "");
2838     for (; setp > 0; --setp ) {
2839         printf(" \'%s\'", input);
2840         if( FAILED(StringCbLength(input, sizeof(space) - (input - space), &len))) {
2841             fprintf (stderr, "StringCbLength failure on input");
2842             exit(1);
2843         }
2844         input += len + 1;
2845     }
2846     printf("\n");
2847     return 0;
2848 }
2849
2850 #ifndef AFS_NT40_ENV
2851 static char *exported_types[] = {"null", "nfs", ""};
2852 static int ExportAfsCmd(struct cmd_syndesc *as, void *arock)
2853 {
2854     afs_int32 code;
2855     struct ViceIoctl blob;
2856     struct cmd_item *ti;
2857     int export = 0, type = 0, mode = 0, exp = 0, gstat = 0;
2858     int exportcall, pwsync = 0, smounts = 0;
2859
2860 #ifdef WIN32
2861     if ( !fs_IsAdmin() ) {
2862         fprintf (stderr,"Permission denied: requires AFS Client Administrator access.\n");
2863         return EACCES;
2864     }
2865 #else /* WIN32 */
2866     if (geteuid()) {
2867         fprintf (stderr,"Permission denied: requires root access.\n");
2868         return EACCES;
2869     }
2870 #endif /* WIN32 */
2871
2872     ti = as->parms[0].items;
2873     if (strcmp(ti->data, "nfs") == 0)
2874         type = 0x71; /* NFS */
2875     else {
2876         fprintf(stderr,
2877                 "Invalid exporter type, '%s', Only the 'nfs' exporter is currently supported\n", ti->data);
2878         return 1;
2879     }
2880     ti = as->parms[1].items;
2881     if (ti) {
2882         if (strcmp(ti->data, "on") == 0)
2883             export = 3;
2884         else if (strcmp(ti->data, "off") == 0)
2885             export = 2;
2886         else {
2887             fprintf(stderr, "Illegal argument %s\n", ti->data);
2888             return 1;
2889         }
2890         exp = 1;
2891     }
2892     if (ti = as->parms[2].items) {      /* -noconvert */
2893         if (strcmp(ti->data, "on") == 0)
2894             mode = 2;
2895         else if (strcmp(ti->data, "off") == 0)
2896             mode = 3;
2897         else {
2898             fprintf(stderr, "Illegal argument %s\n", ti->data);
2899             return 1;
2900         }
2901     }
2902     if (ti = as->parms[3].items) {      /* -uidcheck */
2903         if (strcmp(ti->data, "on") == 0)
2904             pwsync = 3;
2905         else if (strcmp(ti->data, "off") == 0)
2906             pwsync = 2;
2907         else {
2908             fprintf(stderr, "Illegal argument %s\n", ti->data);
2909             return 1;
2910         }
2911     }
2912     if (ti = as->parms[4].items) {      /* -submounts */
2913         if (strcmp(ti->data, "on") == 0)
2914             smounts = 3;
2915         else if (strcmp(ti->data, "off") == 0)
2916             smounts = 2;
2917         else {
2918             fprintf(stderr, "Illegal argument %s\n", ti->data);
2919             return 1;
2920         }
2921     }
2922     exportcall =  (type << 24) | (mode << 6) | (pwsync << 4) | (smounts << 2) | export;
2923     type &= ~0x70;
2924     /* make the call */
2925     blob.in = (char *) &exportcall;
2926     blob.in_size = sizeof(afs_int32);
2927     blob.out = (char *) &exportcall;
2928     blob.out_size = sizeof(afs_int32);
2929     code = pioctl_utf8(0, VIOC_EXPORTAFS, &blob, 1);
2930     if (code) {
2931         if (errno == ENODEV) {
2932             fprintf(stderr,
2933                     "Sorry, the %s-exporter type is currently not supported on this AFS client\n", exported_types[type]);
2934         } else {
2935             fs_Die(errno, 0);
2936         }
2937         return 1;
2938     } else {
2939         if (!gstat) {
2940             if (exportcall & 1) {
2941                 printf("'%s' translator is enabled with the following options:\n\tRunning in %s mode\n\tRunning in %s mode\n\t%s\n",
2942                        exported_types[type], (exportcall & 2 ? "strict unix" : "convert owner mode bits to world/other"),
2943                        (exportcall & 4 ? "strict 'passwd sync'" : "no 'passwd sync'"),
2944                        (exportcall & 8 ? "Allow mounts of /afs/.. subdirs" : "Only mounts to /afs allowed"));
2945             } else {
2946                 printf("'%s' translator is disabled\n", exported_types[type]);
2947             }
2948         }
2949     }
2950     return 0;
2951 }
2952 #endif
2953
2954 static int
2955 GetCellCmd(struct cmd_syndesc *as, void *arock)
2956 {
2957     afs_int32 code;
2958     struct ViceIoctl blob;
2959     struct afsconf_cell info;
2960     struct cmd_item *ti;
2961     struct a {
2962         afs_int32 stat;
2963         afs_int32 junk;
2964     } args;
2965     int error = 0;
2966     size_t len;
2967
2968     memset(&info, 0, sizeof(info));
2969     memset(&args, 0, sizeof(args));      /* avoid Purify UMR error */
2970     for(ti=as->parms[0].items; ti; ti=ti->next) {
2971         /* once per cell */
2972         blob.out_size = sizeof(args);
2973         blob.out = (caddr_t) &args;
2974         code = GetCellName(ti->data, &info);
2975         if (code) {
2976             error = 1;
2977             continue;
2978         }
2979         if (info.linkedCell)
2980             free(info.linkedCell);
2981         if( FAILED(StringCbLength(info.name, sizeof(info.name), &len))) {
2982             fprintf (stderr, "StringCbLength failure on info.name");
2983             exit(1);
2984         }
2985         blob.in_size = 1+(long)len;
2986         blob.in = info.name;
2987         code = pioctl_utf8(0, VIOC_GETCELLSTATUS, &blob, 1);
2988         if (code) {
2989             if (errno == ENOENT)
2990                 fprintf(stderr,"%s: the cell named '%s' does not exist\n", pn, info.name);
2991             else
2992                 fs_Die(errno, info.name);
2993             error = 1;
2994             continue;
2995         }
2996         printf("Cell %s status: ", info.name);
2997 #ifdef notdef
2998         if (args.stat & 1)
2999             printf("primary ");
3000 #endif
3001         if (args.stat & 2)
3002             printf("no setuid allowed");
3003         else
3004             printf("setuid allowed");
3005         if (args.stat & 4)
3006             printf(", using old VLDB");
3007         printf("\n");
3008     }
3009     return error;
3010 }
3011
3012 static int SetCellCmd(struct cmd_syndesc *as, void *arock)
3013 {
3014     afs_int32 code;
3015     struct ViceIoctl blob;
3016     struct afsconf_cell info;
3017     struct cmd_item *ti;
3018     struct a {
3019         afs_int32 stat;
3020         afs_int32 junk;
3021         char cname[64];
3022     } args;
3023     int error = 0;
3024
3025     memset(&info, 0, sizeof(info));
3026
3027     /* Check arguments. */
3028     if (as->parms[1].items && as->parms[2].items) {
3029         fprintf(stderr, "Cannot specify both -suid and -nosuid.\n");
3030         return 1;
3031     }
3032
3033     /* figure stuff to set */
3034     args.stat = 0;
3035     args.junk = 0;
3036
3037 #ifdef WIN32
3038     if ( !fs_IsAdmin() ) {
3039         fprintf (stderr,"Permission denied: requires AFS Client Administrator access.\n");
3040         return EACCES;
3041     }
3042 #else /* WIN32 */
3043     if (geteuid()) {
3044         fprintf (stderr,"Permission denied: requires root access.\n");
3045         return EACCES;
3046     }
3047 #endif /* WIN32 */
3048
3049     if (! as->parms[1].items)
3050         args.stat |= CM_SETCELLFLAG_SUID; /* default to -nosuid */
3051
3052     /* set stat for all listed cells */
3053     for(ti=as->parms[0].items; ti; ti=ti->next) {
3054         /* once per cell */
3055         code = GetCellName(ti->data, &info);
3056         if (code) {
3057             error = 1;
3058             continue;
3059         }
3060         if (info.linkedCell)
3061             free(info.linkedCell);
3062         if( FAILED(StringCbCopy(args.cname, sizeof(args.cname), info.name))) {
3063             fprintf (stderr, "cname - not enough space");
3064             exit(1);
3065         }
3066         blob.in_size = sizeof(args);
3067         blob.in = (caddr_t) &args;
3068         blob.out_size = 0;
3069         blob.out = (caddr_t) 0;
3070         code = pioctl_utf8(0, VIOC_SETCELLSTATUS, &blob, 1);
3071         if (code) {
3072             fs_Die(errno, info.name);      /* XXX added cell name to fs_Die() call */
3073             error = 1;
3074         }
3075     }
3076     return error;
3077 }
3078
3079 static int
3080 GetCellName(char *cellNamep, struct afsconf_cell *infop)
3081 {
3082     if( FAILED(StringCbCopy(infop->name, sizeof(infop->name), cellNamep))) {
3083         fprintf (stderr, "name - not enough space");
3084         exit(1);
3085     }
3086     return 0;
3087 }
3088
3089 static int
3090 VLDBInit(int noAuthFlag, struct afsconf_cell *info)
3091 {
3092     afs_int32 code;
3093     char confDir[257];
3094
3095     cm_GetConfigDir(confDir, sizeof(confDir));
3096
3097     code = ugen_ClientInit(noAuthFlag, confDir,
3098                            info->name, 0, &uclient,
3099                            NULL, pn, rxkad_clear,
3100                            VLDB_MAXSERVERS, AFSCONF_VLDBSERVICE, 50,
3101                            0, 0, USER_SERVICE_ID);
3102     rxInitDone = 1;
3103     return code;
3104 }
3105
3106 static struct ViceIoctl gblob;
3107 static int debug = 0;
3108 /*
3109  * here follow some routines in support of the setserverprefs and
3110  * getserverprefs commands.  They are:
3111  * SetPrefCmd  "top-level" routine
3112  * addServer   adds a server to the list of servers to be poked into the
3113  *             kernel.  Will poke the list into the kernel if it threatens
3114  *             to get too large.
3115  * pokeServers pokes the existing list of servers and ranks into the kernel
3116  * GetPrefCmd  reads the Cache Manager's current list of server ranks
3117  */
3118
3119 #ifdef WIN32
3120 static int
3121 pokeServers(void)
3122 {
3123     int code;
3124     cm_SSetPref_t *ssp;
3125     code = pioctl_utf8(0, VIOC_SETSPREFS, &gblob, 1);
3126
3127     ssp = (cm_SSetPref_t *)space;
3128     gblob.in_size = (long)(((char *)&(ssp->servers[0])) - (char *)ssp);
3129     gblob.in = space;
3130     return code;
3131 }
3132 #else
3133 /*
3134  * returns -1 if error message printed,
3135  * 0 on success,
3136  * errno value if error and no error message printed
3137  */
3138 static int
3139 pokeServers(void)
3140 {
3141     int code;
3142
3143     code = pioctl_utf8(0, VIOC_SETSPREFS, &gblob, 1);
3144     if (code && (errno == EINVAL)) {
3145         struct setspref *ssp;
3146         ssp = (struct setspref *)gblob.in;
3147         if (!(ssp->flags & DBservers)) {
3148             gblob.in = (void *)&(ssp->servers[0]);
3149             gblob.in_size -= ((char *)&(ssp->servers[0])) - (char *)ssp;
3150             code = pioctl_utf8(0, VIOC_SETSPREFS33, &gblob, 1);
3151             return code ? errno : 0;
3152         }
3153         fprintf(stderr,
3154                 "This cache manager does not support VL server preferences.\n");
3155         return -1;
3156     }
3157
3158     return code ? errno : 0;
3159 }
3160 #endif /* WIN32 */
3161
3162 #ifdef WIN32
3163 static int
3164 addServer(char *name, unsigned short rank)
3165 {
3166     int code;
3167     cm_SSetPref_t *ssp;
3168     cm_SPref_t *sp;
3169     struct hostent *thostent;
3170     errno_t err;
3171
3172 #ifndef MAXUSHORT
3173 #ifdef MAXSHORT
3174 #define MAXUSHORT ((unsigned short) 2*MAXSHORT+1)  /* assumes two's complement binary system */
3175 #else
3176 #define MAXUSHORT ((unsigned short) ~0)
3177 #endif
3178 #endif
3179
3180     code = 0;
3181     thostent = hostutil_GetHostByName(name);
3182     if (!thostent) {
3183         fprintf (stderr, "%s: couldn't resolve name.\n", name);
3184         return EINVAL;
3185     }
3186
3187     ssp = (cm_SSetPref_t *)(gblob.in);
3188
3189     if (gblob.in_size > MAXINSIZE - sizeof(cm_SPref_t)) {
3190         code = pokeServers();
3191         ssp->num_servers = 0;
3192     }
3193
3194     sp = (cm_SPref_t *)((char*)gblob.in + gblob.in_size);
3195 #if _MSC_VER < 1400
3196     memcpy (&(sp->host.s_addr), thostent->h_addr, sizeof(afs_uint32));
3197 #else
3198     err = memcpy_s (&(sp->host.s_addr), sizeof(afs_uint32), thostent->h_addr, sizeof(afs_uint32));
3199     if ( err ) {
3200         fprintf (stderr, "memcpy_s failure on sp->host.s_addr");
3201         exit(1);
3202     }
3203 #endif
3204
3205     sp->rank = (rank > MAXUSHORT ? MAXUSHORT : rank);
3206     gblob.in_size += sizeof(cm_SPref_t);
3207     ssp->num_servers++;
3208
3209     if (debug) fprintf(stderr, "adding server %s, rank %d, ip addr 0x%lx\n",name,sp->rank,sp->host.s_addr);
3210
3211     return code;
3212 }
3213 #else
3214 /*
3215  * returns -1 if error message printed,
3216  * 0 on success,
3217  * errno value if error and no error message printed
3218  */
3219 static int
3220 addServer(char *name, afs_int32 rank)
3221 {
3222     int t, code;
3223     struct setspref *ssp;
3224     struct spref *sp;
3225     struct hostent *thostent;
3226     afs_uint32 addr;
3227     int error = 0;
3228     errno_t err;
3229
3230 #ifndef MAXUSHORT
3231 #ifdef MAXSHORT
3232 #define MAXUSHORT ((unsigned short) 2*MAXSHORT+1)       /* assumes two's complement binary system */
3233 #else
3234 #define MAXUSHORT ((unsigned short) ~0)
3235 #endif
3236 #endif
3237
3238     thostent = hostutil_GetHostByName(name);
3239     if (!thostent) {
3240         fprintf(stderr, "%s: couldn't resolve name.\n", name);
3241         return -1;
3242     }
3243
3244     ssp = (struct setspref *)(gblob.in);
3245
3246     for (t = 0; thostent->h_addr_list[t]; t++) {
3247         if (gblob.in_size > MAXINSIZE - sizeof(struct spref)) {
3248             code = pokeServers();
3249             if (code)
3250                 error = code;
3251             ssp->num_servers = 0;
3252         }
3253
3254         sp = (struct spref *)(gblob.in + gblob.in_size);
3255 #if _MSC_VER < 1400
3256         memcpy(&(sp->server.s_addr), thostent->h_addr_list[t],
3257                sizeof(afs_uint32));
3258 #else
3259         err = memcpy_s(&(sp->server.s_addr), sizeof(afs_uint32), thostent->h_addr_list[t],
3260                sizeof(afs_uint32));
3261         if ( err ) {
3262             fprintf (stderr, "memcpy_s failure on sp->server.s_addr");
3263             exit(1);
3264         }
3265 #endif
3266
3267         sp->rank = (rank > MAXUSHORT ? MAXUSHORT : rank);
3268         gblob.in_size += sizeof(struct spref);
3269         ssp->num_servers++;
3270
3271         if (debug)
3272             fprintf(stderr, "adding server %s, rank %d, ip addr 0x%lx\n",
3273                     name, sp->rank, sp->server.s_addr);
3274     }
3275
3276     return error;
3277 }
3278 #endif /* WIN32 */
3279
3280 #ifdef WIN32
3281 static BOOL IsWindowsNT (void)
3282 {
3283     static BOOL fChecked = FALSE;
3284     static BOOL fIsWinNT = FALSE;
3285
3286     if (!fChecked)
3287     {
3288         OSVERSIONINFO Version;
3289
3290         fChecked = TRUE;
3291
3292         memset (&Version, 0x00, sizeof(Version));
3293         Version.dwOSVersionInfoSize = sizeof(Version);
3294
3295         if (GetVersionEx (&Version))
3296         {
3297             if (Version.dwPlatformId == VER_PLATFORM_WIN32_NT)
3298                 fIsWinNT = TRUE;
3299         }
3300     }
3301     return fIsWinNT;
3302 }
3303 #endif /* WIN32 */
3304
3305 #ifdef WIN32
3306 static int
3307 SetPrefCmd(struct cmd_syndesc *as, void * arock)
3308 {
3309     FILE *infd;
3310     afs_int32 code;
3311     struct cmd_item *ti;
3312     char name[80];
3313     afs_int32 rank;
3314     cm_SSetPref_t *ssp;
3315
3316     ssp = (cm_SSetPref_t *)space;
3317     ssp->flags = 0;
3318     ssp->num_servers = 0;
3319     gblob.in_size = (long)(((char*)&(ssp->servers[0])) - (char *)ssp);
3320     gblob.in = space;
3321     gblob.out = space;
3322     gblob.out_size = AFS_PIOCTL_MAXSIZE;
3323
3324     if ( !fs_IsAdmin() ) {
3325         fprintf (stderr,"Permission denied: requires AFS Client Administrator access.\n");
3326         return EACCES;
3327     }
3328
3329     code = 0;
3330
3331     ti = as->parms[2].items;  /* -file */
3332     if (ti) {
3333         if (debug) fprintf(stderr,"opening file %s\n",ti->data);
3334         if (!(infd = fopen(ti->data,"r" ))) {
3335             code = errno;
3336             fs_Die(errno,ti->data);
3337         } else {
3338 #if _MSC_VER < 1400
3339             while ( fscanf(infd, "%79s%ld", name, &rank) != EOF) {
3340                 code = addServer (name, (unsigned short) rank);
3341             }
3342 #else
3343             while ( fscanf_s(infd, "%79s%ld", name, sizeof(name), &rank) != EOF) {
3344                 code = addServer (name, (unsigned short) rank);
3345             }
3346 #endif
3347         }
3348     }
3349
3350
3351     ti = as->parms[3].items;  /* -stdin */
3352     if (ti) {
3353 #if _MSC_VER < 1400
3354     while ( scanf("%79s%ld", name, &rank) != EOF) {
3355             code = addServer (name, (unsigned short) rank);
3356         }
3357 #else
3358     while ( scanf_s("%79s%ld", name, sizeof(name), &rank) != EOF) {
3359             code = addServer (name, (unsigned short) rank);
3360         }
3361 #endif
3362     }
3363
3364     for (ti = as->parms[0].items;ti;ti=ti->next) {/*list of servers, ranks */
3365         if (ti) {
3366             if (!ti->next) {
3367                 break;
3368             }
3369             code = addServer (ti->data, (unsigned short) atol(ti->next->data));
3370             if (debug)
3371                 printf("set fs prefs %s %s\n", ti->data, ti->next->data);
3372             ti=ti->next;
3373         }
3374     }
3375     code = pokeServers();
3376     if (debug)
3377         printf("now working on vlservers, code=%d, errno=%d\n",code,errno);
3378
3379     ssp = (cm_SSetPref_t *)space;
3380     gblob.in_size = (long)(((char*)&(ssp->servers[0])) - (char *)ssp);
3381     gblob.in = space;
3382     ssp->flags = CM_SPREF_VLONLY;
3383     ssp->num_servers = 0;
3384
3385     for (ti = as->parms[1].items;ti;ti=ti->next) { /* list of dbservers, ranks */
3386         if (ti) {
3387             if (!ti->next) {
3388                 break;
3389             }
3390             code = addServer (ti->data, (unsigned short) atol(ti->next->data));
3391             if (debug)
3392                 printf("set vl prefs %s %s\n", ti->data, ti->next->data);
3393             ti=ti->next;
3394         }
3395     }
3396
3397     if (as->parms[1].items) {
3398         if (debug)
3399             printf("now poking vlservers\n");
3400         code = pokeServers();
3401     }
3402
3403     if (code)
3404         fs_Die(errno,0);
3405
3406     return code;
3407 }
3408 #else
3409 static int
3410 SetPrefCmd(struct cmd_syndesc *as, void *arock)
3411 {
3412     FILE *infd;
3413     afs_int32 code;
3414     struct cmd_item *ti;
3415     char name[80];
3416     afs_int32 rank;
3417     struct setspref *ssp;
3418     int error = 0;              /* -1 means error message printed,
3419                                  * >0 means errno value for unprinted message */
3420
3421     ssp = (struct setspref *)space;
3422     ssp->flags = 0;
3423     ssp->num_servers = 0;
3424     gblob.in_size = ((char *)&(ssp->servers[0])) - (char *)ssp;
3425     gblob.in = space;
3426     gblob.out = space;
3427     gblob.out_size = AFS_PIOCTL_MAXSIZE;
3428
3429
3430     if (geteuid()) {
3431         fprintf(stderr, "Permission denied: requires root access.\n");
3432         return 1;
3433     }
3434
3435     ti = as->parms[2].items;    /* -file */
3436     if (ti) {
3437         if (debug)
3438             fprintf(stderr, "opening file %s\n", ti->data);
3439         if (!(infd = fopen(ti->data, "r"))) {
3440             perror(ti->data);
3441             error = -1;
3442         } else {
3443 #if _MSC_VER < 1400
3444             while (fscanf(infd, "%79s%ld", name, &rank) != EOF) {
3445                 code = addServer(name, (unsigned short)rank);
3446                 if (code)
3447                     error = code;
3448             }
3449 #else
3450             while (fscanf_s(infd, "%79s%ld", name, sizeof(name), &rank) != EOF) {
3451                 code = addServer(name, (unsigned short)rank);
3452                 if (code)
3453                     error = code;
3454             }
3455 #endif
3456
3457         }
3458     }
3459
3460     ti = as->parms[3].items;    /* -stdin */
3461     if (ti) {
3462 #if _MSC_VER < 1400
3463         while (scanf("%79s%ld", name, &rank) != EOF) {
3464             code = addServer(name, (unsigned short)rank);
3465             if (code)
3466                 error = code;
3467         }
3468 #else
3469         while (scanf_s("%79s%ld", name, sizeof(name), &rank) != EOF) {
3470             code = addServer(name, (unsigned short)rank);
3471             if (code)
3472                 error = code;
3473         }
3474 #endif
3475     }
3476
3477     for (ti = as->parms[0].items; ti; ti = ti->next) {  /* list of servers, ranks */
3478         if (ti) {
3479             if (!ti->next) {
3480                 break;
3481             }
3482             code = addServer(ti->data, (unsigned short)atol(ti->next->data));
3483             if (code)
3484                 error = code;
3485             if (debug)
3486                 printf("set fs prefs %s %s\n", ti->data, ti->next->data);
3487             ti = ti->next;
3488         }
3489     }
3490     code = pokeServers();
3491     if (code)
3492         error = code;
3493     if (debug)
3494         printf("now working on vlservers, code=%d\n", code);
3495
3496     ssp = (struct setspref *)space;
3497     ssp->flags = DBservers;
3498     ssp->num_servers = 0;
3499     gblob.in_size = ((char *)&(ssp->servers[0])) - (char *)ssp;
3500     gblob.in = space;
3501
3502     for (ti = as->parms[1].items; ti; ti = ti->next) {  /* list of dbservers, ranks */
3503         if (ti) {
3504             if (!ti->next) {
3505                 break;
3506             }
3507             code = addServer(ti->data, (unsigned short)atol(ti->next->data));
3508             if (code)
3509                 error = code;
3510             if (debug)
3511                 printf("set vl prefs %s %s\n", ti->data, ti->next->data);
3512             ti = ti->next;
3513         }
3514     }
3515
3516     if (as->parms[1].items) {
3517         if (debug)
3518             printf("now poking vlservers\n");
3519         code = pokeServers();
3520         if (code)
3521             error = code;
3522     }
3523
3524     if (error > 0)
3525         fs_Die(error, 0);
3526
3527     return error ? 1 : 0;
3528 }
3529 #endif /* WIN32 */
3530
3531 #ifdef WIN32
3532 static int
3533 GetPrefCmd(struct cmd_syndesc *as, void *arock)
3534 {
3535     afs_int32 code;
3536     struct cmd_item *ti;
3537     char *name, tbuffer[20];
3538     afs_int32 addr;
3539     FILE * outfd;
3540     int resolve;
3541     int vlservers;
3542     struct ViceIoctl blob;
3543     struct cm_SPrefRequest *in;
3544     struct cm_SPrefInfo *out;
3545     int i;
3546
3547     code = 0;
3548     ti = as->parms[0].items;  /* -file */
3549     if (ti) {
3550         if (debug) fprintf(stderr,"opening file %s\n",ti->data);
3551         if (!(outfd = freopen(ti->data,"w",stdout))) {
3552             fs_Die(errno,ti->data);
3553             return errno;
3554         }
3555     }
3556
3557     ti = as->parms[1].items;  /* -numeric */
3558     resolve = !(ti);
3559     ti = as->parms[2].items;  /* -vlservers */
3560     vlservers = (ti ? CM_SPREF_VLONLY : 0);
3561     /*  ti = as->parms[3].items;   -cell */
3562
3563     in = (struct cm_SPrefRequest *)space;
3564     in->offset = 0;
3565
3566     do {
3567         blob.in_size=sizeof(struct cm_SPrefRequest);
3568         blob.in = (char *)in;
3569         blob.out = space;
3570         blob.out_size = AFS_PIOCTL_MAXSIZE;
3571
3572         in->num_servers = (AFS_PIOCTL_MAXSIZE - 2*sizeof(short))/sizeof(struct cm_SPref);
3573         in->flags = vlservers;
3574
3575         code = pioctl_utf8(0, VIOC_GETSPREFS, &blob, 1);
3576         if (code){
3577             perror("getserverprefs pioctl");
3578             fs_Die (errno,0);
3579         }
3580         else {
3581             out = (struct cm_SPrefInfo *) blob.out;
3582
3583             for (i=0;i<out->num_servers;i++) {
3584                 if (resolve) {
3585                     name = hostutil_GetNameByINet(out->servers[i].host.s_addr);
3586                 }
3587                 else {
3588                     addr = ntohl(out->servers[i].host.s_addr);
3589                     if( FAILED(StringCbPrintf(tbuffer, sizeof(tbuffer), "%d.%d.%d.%d", (addr>>24) & 0xff, (addr>>16) & 0xff,
3590                         (addr>>8) & 0xff, addr & 0xff))) {
3591                         fprintf (stderr, "tbuffer - cannot be populated");
3592                         exit(1);
3593                     }
3594                     name=tbuffer;
3595                 }
3596                 printf ("%-50s %5u\n",name,out->servers[i].rank);
3597             }
3598
3599             in->offset = out->next_offset;
3600         }
3601     } while (!code && out->next_offset > 0);
3602
3603     return code;
3604 }
3605 #else
3606 static int
3607 GetPrefCmd(struct cmd_syndesc *as, void *arock)
3608 {
3609     afs_int32 code;
3610     struct cmd_item *ti;
3611     char *name, tbuffer[20];
3612     afs_int32 rank, addr;
3613     FILE *outfd;
3614     int resolve;
3615     int vlservers = 0;
3616     struct ViceIoctl blob;
3617     struct sprefrequest *in;
3618     struct sprefinfo *out;
3619     int i;
3620
3621     ti = as->parms[0].items;    /* -file */
3622     if (ti) {
3623         if (debug)
3624             fprintf(stderr, "opening file %s\n", ti->data);
3625         if (!(outfd = freopen(ti->data, "w", stdout))) {
3626             perror(ti->data);
3627             return 1;
3628         }
3629     }
3630
3631     ti = as->parms[1].items;    /* -numeric */
3632     resolve = !(ti);
3633     ti = as->parms[2].items;    /* -vlservers */
3634     vlservers |= (ti ? DBservers : 0);
3635     /*  ti = as->parms[3].items;   -cell */
3636
3637     in = (struct sprefrequest *)space;
3638     in->offset = 0;
3639
3640     do {
3641         blob.in_size = sizeof(struct sprefrequest);
3642         blob.in = (char *)in;
3643         blob.out = space;
3644         blob.out_size = AFS_PIOCTL_MAXSIZE;
3645
3646         in->num_servers =
3647             (AFS_PIOCTL_MAXSIZE - 2 * sizeof(short)) / sizeof(struct spref);
3648         in->flags = vlservers;
3649
3650         code = pioctl_utf8(0, VIOC_GETSPREFS, &blob, 1);
3651         if (code) {
3652             perror("getserverprefs pioctl");
3653             return 1;
3654         }
3655